/[MITgcm]/MITgcm/pkg/land/LAND_PARAMS.h
ViewVC logotype

Diff of /MITgcm/pkg/land/LAND_PARAMS.h

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

revision 1.5 by edhill, Sat Sep 10 20:40:27 2005 UTC revision 1.6 by jmc, Fri Jun 23 00:49:27 2006 UTC
# Line 6  C     *================================= Line 6  C     *=================================
6  C     | LAND_PARAMS.h  C     | LAND_PARAMS.h
7  C     | o Header file for LAND package parameters:  C     | o Header file for LAND package parameters:
8  C     |   - basic parameter ( I/O frequency, etc ...)  C     |   - basic parameter ( I/O frequency, etc ...)
9  C     |   - physical constants  C     |   - physical constants
10  C     |   - vertical discretization  C     |   - vertical discretization
11  C     *==========================================================*  C     *==========================================================*
12    
# Line 18  C     land_calc_snow :: step forward sno Line 18  C     land_calc_snow :: step forward sno
18  C     land_calc_alb  :: compute albedo of snow over land  C     land_calc_alb  :: compute albedo of snow over land
19  C     land_oldPickup :: restart from an old pickup (= before checkpoint 52l_pre)  C     land_oldPickup :: restart from an old pickup (= before checkpoint 52l_pre)
20        COMMON /LAND_PAR_L/        COMMON /LAND_PAR_L/
21       &    land_calc_grT, land_calc_grW,       &    land_calc_grT, land_calc_grW,
22       &    land_impl_grT, land_calc_snow,       &    land_impl_grT, land_calc_snow,
23       &    land_calc_alb, land_oldPickup,       &    land_calc_alb, land_oldPickup,
24       &     land_timeave_mnc, land_snapshot_mnc,       &    land_timeave_mnc, land_snapshot_mnc, land_mon_mnc,
25       &     land_pickup_write_mnc, land_pickup_read_mnc,       &    land_pickup_write_mnc, land_pickup_read_mnc,
26       &     land_timeave_mdsio, land_snapshot_mdsio,       &    land_timeave_mdsio, land_snapshot_mdsio, land_mon_stdio,
27       &     land_pickup_write_mdsio, land_pickup_read_mdsio       &    land_pickup_write_mdsio
28        LOGICAL land_calc_grT        LOGICAL land_calc_grT
29        LOGICAL land_calc_grW        LOGICAL land_calc_grW
30        LOGICAL land_impl_grT        LOGICAL land_impl_grT
# Line 32  C     land_oldPickup :: restart from an Line 32  C     land_oldPickup :: restart from an
32        LOGICAL land_calc_alb        LOGICAL land_calc_alb
33        LOGICAL land_oldPickup        LOGICAL land_oldPickup
34        LOGICAL        LOGICAL
35       &     land_timeave_mnc, land_snapshot_mnc,       &    land_timeave_mnc, land_snapshot_mnc, land_mon_mnc,
36       &     land_pickup_write_mnc, land_pickup_read_mnc,       &    land_pickup_write_mnc, land_pickup_read_mnc,
37       &     land_timeave_mdsio, land_snapshot_mdsio,       &    land_timeave_mdsio, land_snapshot_mdsio, land_mon_stdio,
38       &     land_pickup_write_mdsio, land_pickup_read_mdsio       &    land_pickup_write_mdsio
39    
40  C--   COMMON /LAND_PAR_C/: Character valued parameters  C--   COMMON /LAND_PAR_C/: Character valued parameters
41  C     land_grT_iniFile  :: File containing initial ground Temp.  C     land_grT_iniFile  :: File containing initial ground Temp.
42  C     land_grW_iniFile  :: File containing initial ground Water.  C     land_grW_iniFile  :: File containing initial ground Water.
43  C     land_snow_iniFile :: File containing initial snow thickness.  C     land_snow_iniFile :: File containing initial snow thickness.
44        COMMON /LAND_PAR_C/        COMMON /LAND_PAR_C/
45       &    land_grT_iniFile, land_grW_iniFile, land_snow_iniFile       &    land_grT_iniFile, land_grW_iniFile, land_snow_iniFile
46        CHARACTER*(MAX_LEN_FNAM) land_grT_iniFile        CHARACTER*(MAX_LEN_FNAM) land_grT_iniFile
47        CHARACTER*(MAX_LEN_FNAM) land_grW_iniFile        CHARACTER*(MAX_LEN_FNAM) land_grW_iniFile
# Line 71  C     albWarmSnow     :: albedo of warm Line 71  C     albWarmSnow     :: albedo of warm
71  C     albOldSnow      :: albedo of old snow (snowAge > 35.d)  C     albOldSnow      :: albedo of old snow (snowAge > 35.d)
72  C     hAlbSnow        :: snow thickness for albedo transition: snow/ground  C     hAlbSnow        :: snow thickness for albedo transition: snow/ground
73    
74        COMMON /LAND_PAR_R/        COMMON /LAND_PAR_R/
75       &    land_deltaT, land_taveFreq, land_diagFreq, land_monFreq,       &    land_deltaT, land_taveFreq, land_diagFreq, land_monFreq,
76       &    land_grdLambda, land_heatCs, land_CpWater,       &    land_grdLambda, land_heatCs, land_CpWater,
77       &    land_wTauDiff, land_waterCap, land_fractRunOff,       &    land_wTauDiff, land_waterCap, land_fractRunOff,
78       &    land_rhoLiqW,       &    land_rhoLiqW,
79       &    land_rhoSnow, land_Lfreez, recip_Lfreez,       &    land_rhoSnow, land_Lfreez, recip_Lfreez,
80       &    land_hMaxSnow, diffKsnow, timeSnowAge, hNewSnowAge,       &    land_hMaxSnow, diffKsnow, timeSnowAge, hNewSnowAge,
81       &    albColdSnow, albWarmSnow, albOldSnow, hAlbSnow       &    albColdSnow, albWarmSnow, albOldSnow, hAlbSnow
82    
# Line 91  C     hAlbSnow        :: snow thickness Line 91  C     hAlbSnow        :: snow thickness
91  C--   COMMON /LAND_GRID_R/: layer dependent parameters  C--   COMMON /LAND_GRID_R/: layer dependent parameters
92  C     land_dzF        :: layer thickness  C     land_dzF        :: layer thickness
93  C     land_rec_dzC    :: reciprol vertical spacing (from center to center)  C     land_rec_dzC    :: reciprol vertical spacing (from center to center)
94        COMMON /LAND_GRID_R/        COMMON /LAND_GRID_R/
95       &    land_dzF, land_rec_dzC       &    land_dzF, land_rec_dzC
96    
97        _RL land_dzF(land_nLev), land_rec_dzC(land_nLev)        _RL land_dzF(land_nLev), land_rec_dzC(land_nLev)
98    
99  #endif /* ALLOW_LAND */  #endif /* ALLOW_LAND */
100    
101  CEH3 ;;; Local Variables: ***  CEH3 ;;; Local Variables: ***
102  CEH3 ;;; mode:fortran ***  CEH3 ;;; mode:fortran ***
Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6
  ViewVC Help
Powered by ViewVC 1.1.22