13 |
C-- COMMON /LAND_PAR_L/: logical parameters |
C-- COMMON /LAND_PAR_L/: logical parameters |
14 |
C land_calc_grT :: step forward ground Temperature |
C land_calc_grT :: step forward ground Temperature |
15 |
C land_calc_grW :: step forward soil moiture |
C land_calc_grW :: step forward soil moiture |
|
|
|
16 |
COMMON /LAND_PAR_L/ |
COMMON /LAND_PAR_L/ |
17 |
& land_calc_grT, land_calc_grW |
& land_calc_grT, land_calc_grW |
18 |
LOGICAL land_calc_grT |
LOGICAL land_calc_grT |
19 |
LOGICAL land_calc_grW |
LOGICAL land_calc_grW |
20 |
|
|
21 |
|
C-- COMMON /LAND_PAR_C/: Character valued parameters |
22 |
|
C land_grT_iniFile :: File containing initial ground Temp. |
23 |
|
C land_grW_iniFile :: File containing initial ground Water. |
24 |
|
COMMON /LAND_PAR_C/ |
25 |
|
& land_grT_iniFile, land_grW_iniFile |
26 |
|
CHARACTER*(MAX_LEN_FNAM) land_grT_iniFile |
27 |
|
CHARACTER*(MAX_LEN_FNAM) land_grW_iniFile |
28 |
|
|
29 |
C-- COMMON /LAND_PAR_R/: real-type parameters |
C-- COMMON /LAND_PAR_R/: real-type parameters |
30 |
C land_deltaT :: land model time-step |
C land_deltaT :: land model time-step |
31 |
C land_taveFreq :: Frequency^-1 for time-Aver. output (s) |
C land_taveFreq :: Frequency^-1 for time-Aver. output (s) |