/[MITgcm]/MITgcm/pkg/thsice/THSICE_PARAMS.h
ViewVC logotype

Diff of /MITgcm/pkg/thsice/THSICE_PARAMS.h

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.10 by heimbach, Mon Apr 16 22:38:24 2007 UTC revision 1.11 by jmc, Sun Apr 29 23:48:44 2007 UTC
# Line 15  C--------------------------------------- Line 15  C---------------------------------------
15    
16  C--   COMMON / THSICE_PHYSPAR_R / physical (real) parameter  C--   COMMON / THSICE_PHYSPAR_R / physical (real) parameter
17  C.. densities  C.. densities
18  C     rhos      ::   density of snow (kg/m^3)  C     rhos      ::   density of snow [kg/m^3]
19  C     rhoi      ::   density of ice (kg/m^3)  C     rhoi      ::   density of ice [kg/m^3]
20  C     rhosw     ::   density of seawater (kg/m^3)  C     rhosw     ::   density of seawater [kg/m^3]
21  C     rhofw     ::   density of fresh water (kg/m^3)  C     rhofw     ::   density of fresh water [kg/m^3]
22  C     rhoiw     ::   ocean-ice density difference (kg/m^3)  C     rhoiw     ::   ocean-ice density difference [kg/m^3]
23  C.. specific heats  C.. specific heats
24  C     cpice     ::   specific heat of fresh ice (J/kg/K)  C     cpIce     ::   specific heat of fresh ice [J/kg/K]
25  C     cpwater   ::   specific heat of water (J/kg/K)  C     cpWater   ::   specific heat of water [J/kg/K]
26  C .. thermal conductivity. QQ check units  C .. thermal conductivity. QQ check units
27  C     kice      ::   thermal conductivity of pure ice (W/m/K)  C     kIce      ::   thermal conductivity of pure ice [W/m/K]
28  C     ksnow     ::   thermal conductivity of snow (W/m/K)  C     kSnow     ::   thermal conductivity of snow [W/m/K]
29  C .. heat transfer coefficient  C .. heat transfer coefficient
30  C     transcoef ::   transfer coef between ice and water (unitless)  C     bMeltCoef ::   base-melting heat transfer coefficient
31    C                    (between ice & water) [no unit]
32  C .. latent heat  C .. latent heat
33  C     Lfresh    ::   latent heat of melting of pure ice (J/kg)  C     Lfresh    ::   latent heat of melting of pure ice [J/kg]
34  C .. Enthalpy  C .. Enthalpy
35  C     qsnow     ::   snow enthalpy (J/kg)  C     qsnow     ::   snow enthalpy [J/kg]
36  C .. Albedo  C .. Albedo
37  C     albColdSnow :: albedo of cold (=dry) new snow (Tsfc < tempSnowAlb)  C     albColdSnow :: albedo of cold (=dry) new snow (Tsfc < tempSnowAlb)
38  C     albWarmSnow :: albedo of warm (=wet) new snow (Tsfc = 0)  C     albWarmSnow :: albedo of warm (=wet) new snow (Tsfc = 0)
39  C     tempSnowAlb :: temperature transition from ColdSnow to WarmSnow Alb. (oC)  C     tempSnowAlb :: temperature transition from ColdSnow to WarmSnow Alb. [oC]
40  C     albOldSnow  :: albedo of old snow (snowAge > 35.d)  C     albOldSnow  :: albedo of old snow (snowAge > 35.d)
41  C     albIceMax   :: max albedo of bare ice (thick ice)  C     albIceMax   :: max albedo of bare ice (thick ice)
42  C     albIceMin   :: minimum ice albedo (very thin ice)  C     albIceMin   :: minimum ice albedo (very thin ice)
43  C     hAlbIce     :: ice thickness for albedo transition: thin/thick ice albedo  C     hAlbIce     :: ice thickness for albedo transition: thin/thick ice albedo
44  C     hAlbSnow    :: snow thickness for albedo transition: snow/ice albedo  C     hAlbSnow    :: snow thickness for albedo transition: snow/ice albedo
45  C     hNewSnowAge :: new snow thickness that refresh the snow-age (by 1/e)  C     hNewSnowAge :: new snow thickness that refresh the snow-age (by 1/e)
46  C     snowAgTime  :: snow aging time scale (s)  C     snowAgTime  :: snow aging time scale [s]
47  C .. Solar parameters  C .. Solar parameters
48  C     i0        ::   fraction of penetrating solar rad  C     i0swFrac  ::   fraction of penetrating solar rad
49  C     ksolar    ::   bulk solar abs coeff of sea ice (m-1)  C     ksolar    ::   bulk solar abs coeff of sea ice [m^-1]
50    C     dhSnowLin ::   half slope of linear distribution of snow thickness within
51    C                    the grid-cell (from hSnow-dhSnow to hSnow+dhSnow, if full
52    C                    ice & snow cover) [m] ; (only used for SW radiation).
53  C .. Salinity  C .. Salinity
54  C     saltice   ::   salinity of ice (o/oo)  C     saltIce   ::   salinity of ice [g/kg]
55  C     S_winton  ::   winton salinity of ice (o/oo)  C     S_winton  ::   Winton salinity of ice [g/kg]
 C     mu_Tf     ::   Tf:brine salinity ratio (C/ppt)  
56  C .. melting  C .. melting
57  C     Tf0kel    ::   Freezing temp of fresh ice in Kelvin = 273.15  C     Tf0kel    ::   Freezing temp of fresh water in Kelvin = 273.15
58  C     Tmlt1     ::    melting temp; depends on S (C)  C     mu_Tf     ::   linear dependance of melting temperature on Salinity [oC/psu]
59    C                     Tf(sea-water) = -mu_Tf * S
60    C     Tmlt1     ::   Winton melting temperature: Tmlt1 = -mu_Tf * S_winton
61    C     Terrmax   ::   Temperature convergence criteria [oC]
62  C .. Min/Max  C .. Min/Max
63  C     himin     ::   minimum thickness for ice (m)  C     hIceMin   ::   Minimum ice  thickness [m]
64  C     Terrmax   ::   temperature convergence precision (C)  C     hiMax     ::   Maximum ice  thickness [m]
65  C     hiMax     ::   Maximum thickness for ice  (m)  C     hsMax     ::   Maximum snow thickness [m]
 C     hsMax     ::   Maximum thickness for snow (m)  
66  C .. for fractional ice  C .. for fractional ice
67  C     iceMaskmax :: maximum Ice fraction (=1 for no fractional ice)  C     iceMaskMax  :: maximum Ice fraction (=1 for no fractional ice)
68  C     iceMaskmin :: mimimum Ice fraction (=1 for no fractional ice)  C     iceMaskMin  :: mimimum Ice fraction (=1 for no fractional ice)
69  C     himin0     :: minimum ice height   (=himin for no fractional ice)  C     fracEnFreez :: fraction of energy going to lateral freezing (vs height increase)
70  C     frac_energy:: fraction of energy going to melting (=0 for no fract. ice)  C     fracEnMelt  :: fraction of energy going to lateral melting (vs height decrease)
71  C     hihig      :: ice height above which freezing only occurs over open ocean  C                                         (=0 for no fract. ice)
72  C                                        (=large for no fractional ice)  C     hThinIce    :: ice height above which fracEnMelt/Freez are applied [m]
73    C                                         (=hIceMin for no fractional ice)
74    C     hThickIce   :: ice height below which fracEnMelt/Freez are applied [m]
75    C                                         (=large for no fractional ice)
76    C     hNewIceMax  :: new ice maximum thickness [m]
77  C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|  C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|
78    
79        COMMON / THSICE_PHYSPAR_R /        COMMON / THSICE_PHYSPAR_R /
80       &  rhos, rhoi, rhosw, rhofw, rhoiw,       &  rhos, rhoi, rhosw, rhofw, rhoiw,
81       &  cpice, cpwater,       &  cpIce, cpWater,
82       &  kice, ksnow,       &  kIce, kSnow,
83       &  transcoef, Lfresh, qsnow,       &  bMeltCoef, Lfresh, qsnow,
84       &  albColdSnow, albWarmSnow, tempSnowAlb,       &  albColdSnow, albWarmSnow, tempSnowAlb,
85       &  albOldSnow, hNewSnowAge, snowAgTime,       &  albOldSnow, hNewSnowAge, snowAgTime,
86       &  albIceMax, albIceMin, hAlbIce, hAlbSnow,       &  albIceMax, albIceMin, hAlbIce, hAlbSnow,
87       &  i0, ksolar,       &  i0swFrac, ksolar, dhSnowLin,
88       &  saltice, S_winton, mu_Tf,       &  saltIce, S_winton, mu_Tf,
89       &  Tf0kel, Tmlt1,       &  Tf0kel, Tmlt1, Terrmax,
90       &  himin, Terrmax, hiMax, hsMax,       &  hIceMin, hiMax, hsMax,
91       &  iceMaskmax, iceMaskmin, himin0,       &  iceMaskMax, iceMaskMin,
92       &  frac_energy, hihig       &  fracEnMelt, fracEnFreez,
93         &  hThinIce, hThickIce, hNewIceMax
94    
95        _RL  rhos        _RL  rhos
96        _RL  rhoi        _RL  rhoi
97        _RL  rhosw        _RL  rhosw
98        _RL  rhofw        _RL  rhofw
99        _RL  rhoiw        _RL  rhoiw
100        _RL  cpice        _RL  cpIce
101        _RL  cpwater        _RL  cpWater
102        _RL  kice        _RL  kIce
103        _RL  ksnow        _RL  kSnow
104        _RL  transcoef        _RL  bMeltCoef
105        _RL  Lfresh        _RL  Lfresh
106        _RL  qsnow        _RL  qsnow
107        _RL  albColdSnow        _RL  albColdSnow
# Line 104  C---+----1----+----2----+----3----+----4 Line 114  C---+----1----+----2----+----3----+----4
114        _RL  albIceMin        _RL  albIceMin
115        _RL  hAlbIce        _RL  hAlbIce
116        _RL  hAlbSnow        _RL  hAlbSnow
117        _RL  i0        _RL  i0swFrac
118        _RL  ksolar        _RL  ksolar
119        _RL  saltice        _RL  dhSnowLin
120          _RL  saltIce
121        _RL  S_winton        _RL  S_winton
122        _RL  mu_Tf        _RL  mu_Tf
123        _RL  Tf0kel        _RL  Tf0kel
124        _RL  Tmlt1        _RL  Tmlt1
       _RL  himin  
125        _RL  Terrmax        _RL  Terrmax
126          _RL  hIceMin
127        _RL  hiMax        _RL  hiMax
128        _RL  hsMax        _RL  hsMax
129        _RL iceMaskmax        _RL iceMaskMax
130        _RL iceMaskmin        _RL iceMaskMin
131        _RL himin0        _RL fracEnMelt
132        _RL frac_energy        _RL fracEnFreez
133        _RL hihig        _RL hThinIce
134          _RL hThickIce
135          _RL hNewIceMax
136    
137  C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|  C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|
138    

Legend:
Removed from v.1.10  
changed lines
  Added in v.1.11

  ViewVC Help
Powered by ViewVC 1.1.22