| File |
Line number |
Procedure |
Code |
|
./pkg/land/LAND_PARAMS.h |
100 |
NO PROCEDURE |
_RL land_dzF(land_nLev), land_rec_dzC(land_nLev) |
|
./pkg/land/LAND_SIZE.h |
17 |
NO PROCEDURE |
INTEGER land_nLev |
|
./pkg/land/LAND_SIZE.h |
18 |
NO PROCEDURE |
PARAMETER ( land_nLev=2 ) |
|
./pkg/land/LAND_TAVE.h |
41 |
NO PROCEDURE |
_RL land_grTtave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,land_nLev,nSx,nSy) |
|
./pkg/land/LAND_TAVE.h |
42 |
NO PROCEDURE |
_RL land_entave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,land_nLev,nSx,nSy) |
|
./pkg/land/LAND_TAVE.h |
43 |
NO PROCEDURE |
_RL land_grWtave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,land_nLev,nSx,nSy) |
|
./pkg/land/LAND_VARS.h |
30 |
NO PROCEDURE |
_RL land_groundT(1-OLx:sNx+OLx,1-OLy:sNy+OLy,land_nLev,nSx,nSy) |
|
./pkg/land/LAND_VARS.h |
31 |
NO PROCEDURE |
_RL land_enthalp(1-OLx:sNx+OLx,1-OLy:sNy+OLy,land_nLev,nSx,nSy) |
|
./pkg/land/LAND_VARS.h |
32 |
NO PROCEDURE |
_RL land_groundW(1-OLx:sNx+OLx,1-OLy:sNy+OLy,land_nLev,nSx,nSy) |
|
./pkg/land/land_check.F |
119 |
LAND_CHECK |
CALL WRITE_1D_RL( land_dzF,land_nLev, INDEX_K,'land_dzF = ', |
|
./pkg/land/land_check.F |
121 |
LAND_CHECK |
CALL WRITE_1D_RL(land_rec_dzC,land_nLev,INDEX_K,'land_rec_dzC= ' |
|
./pkg/land/land_check.F |
198 |
LAND_CHECK |
IF ( land_nLev.NE.2 .AND. land_impl_grT ) THEN |
|
./pkg/land/land_check.F |
200 |
LAND_CHECK |
& ' land_impl_grT=.T. but land_nLev=',land_nLev |
|
./pkg/land/land_diagnostics_state.F |
54 |
LAND_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL(land_groundT,'GrdTemp ',0,land_nLev, |
|
./pkg/land/land_diagnostics_state.F |
56 |
LAND_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL(land_enthalp,'GrdEnth ',0,land_nLev, |
|
./pkg/land/land_diagnostics_state.F |
58 |
LAND_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL(land_groundW,'GrdWater',0,land_nLev, |
|
./pkg/land/land_do_diags.F |
59 |
LAND_DO_DIAGS |
CALL TIMEAVE_CUMULATE(land_grTtave,land_groundT,land_nLev, |
|
./pkg/land/land_do_diags.F |
61 |
LAND_DO_DIAGS |
CALL TIMEAVE_CUMULATE(land_entave, land_enthalp,land_nLev, |
|
./pkg/land/land_do_diags.F |
63 |
LAND_DO_DIAGS |
CALL TIMEAVE_CUMULATE(land_grWtave,land_groundW,land_nLev, |
|
./pkg/land/land_impl_temp.F |
141 |
LAND_IMPL_TEMP |
DO k=1,land_nLev |
|
./pkg/land/land_impl_temp.F |
345 |
LAND_IMPL_TEMP |
DO k=1,land_nLev |
|
./pkg/land/land_impl_temp.F |
81 |
LAND_IMPL_TEMP |
_RL tSurf, tg(land_nLev), eg(land_nLev) |
|
./pkg/land/land_impl_temp.F |
82 |
LAND_IMPL_TEMP |
_RL cg(land_nLev), mW(land_nLev) |
|
./pkg/land/land_ini_vars.F |
100 |
LAND_INI_VARS |
& land_nLev, land_groundT, 1, nIter0, myThid ) |
|
./pkg/land/land_ini_vars.F |
104 |
LAND_INI_VARS |
& land_nLev, land_groundW, 1, nIter0, myThid ) |
|
./pkg/land/land_ini_vars.F |
137 |
LAND_INI_VARS |
DO k=1,land_nLev |
|
./pkg/land/land_ini_vars.F |
154 |
LAND_INI_VARS |
DO k=1,land_nLev |
|
./pkg/land/land_ini_vars.F |
62 |
LAND_INI_VARS |
DO k=1,land_nLev |
|
./pkg/land/land_init_fixed.F |
44 |
LAND_INIT_FIXED |
& land_nLev, myThid) |
|
./pkg/land/land_monitor.F |
127 |
LAND_MONITOR |
DO k=1,land_nLev |
|
./pkg/land/land_monitor.F |
197 |
LAND_MONITOR |
I land_nLev, 1, 1, nLatBnd, yBand, |
|
./pkg/land/land_monitor.F |
225 |
LAND_MONITOR |
I land_nLev, 1, 2, nLatBnd, yBand, |
|
./pkg/land/land_monitor.F |
252 |
LAND_MONITOR |
DO k=1,land_nLev |
|
./pkg/land/land_monitor.F |
256 |
LAND_MONITOR |
I land_nLev, 1, 0, nLatBnd, yBand, |
|
./pkg/land/land_monitor.F |
273 |
LAND_MONITOR |
I land_nLev, 1, 0, nLatBnd, yBand, |
|
./pkg/land/land_monitor.F |
70 |
LAND_MONITOR |
_RS yBand(nLatBnd), locDr(land_nLev) |
|
./pkg/land/land_output.F |
172 |
LAND_OUTPUT |
CALL TIMEAVE_RESET(land_grTtave,land_nLev, bi, bj, myThid) |
|
./pkg/land/land_output.F |
173 |
LAND_OUTPUT |
CALL TIMEAVE_RESET(land_entave, land_nLev, bi, bj, myThid) |
|
./pkg/land/land_output.F |
174 |
LAND_OUTPUT |
CALL TIMEAVE_RESET(land_grWtave,land_nLev, bi, bj, myThid) |
|
./pkg/land/land_output.F |
193 |
LAND_OUTPUT |
& land_nLev, bi, bj, myThid ) |
|
./pkg/land/land_output.F |
195 |
LAND_OUTPUT |
& land_nLev, bi, bj, myThid ) |
|
./pkg/land/land_output.F |
197 |
LAND_OUTPUT |
& land_nLev, bi, bj, myThid ) |
|
./pkg/land/land_output.F |
219 |
LAND_OUTPUT |
CALL WRITE_REC_3D_RL( fn, writeBinaryPrec, land_nLev, |
|
./pkg/land/land_output.F |
221 |
LAND_OUTPUT |
CALL WRITE_REC_3D_RL( fn, writeBinaryPrec, land_nLev, |
|
./pkg/land/land_output.F |
223 |
LAND_OUTPUT |
CALL WRITE_REC_3D_RL( fn, writeBinaryPrec, land_nLev, |
|
./pkg/land/land_output.F |
225 |
LAND_OUTPUT |
k = 3*land_nLev |
|
./pkg/land/land_output.F |
281 |
LAND_OUTPUT |
CALL TIMEAVE_RESET(land_grTtave,land_nLev, bi, bj, myThid) |
|
./pkg/land/land_output.F |
282 |
LAND_OUTPUT |
CALL TIMEAVE_RESET(land_entave, land_nLev, bi, bj, myThid) |
|
./pkg/land/land_output.F |
283 |
LAND_OUTPUT |
CALL TIMEAVE_RESET(land_grWtave,land_nLev, bi, bj, myThid) |
|
./pkg/land/land_output.F |
86 |
LAND_OUTPUT |
CALL WRITE_FLD_3D_RL( 'land_groundT.', suff, land_nLev, |
|
./pkg/land/land_output.F |
88 |
LAND_OUTPUT |
CALL WRITE_FLD_3D_RL( 'land_enthalp.', suff, land_nLev, |
|
./pkg/land/land_output.F |
90 |
LAND_OUTPUT |
CALL WRITE_FLD_3D_RL( 'land_groundW.', suff, land_nLev, |
|
./pkg/land/land_read_pickup.F |
59 |
LAND_READ_PICKUP |
CALL READ_REC_3D_RL( fn, prec, land_nLev, |
|
./pkg/land/land_read_pickup.F |
61 |
LAND_READ_PICKUP |
CALL READ_REC_3D_RL( fn, prec, land_nLev, |
|
./pkg/land/land_read_pickup.F |
67 |
LAND_READ_PICKUP |
CALL READ_REC_3D_RL( fn, prec, land_nLev, |
|
./pkg/land/land_read_pickup.F |
69 |
LAND_READ_PICKUP |
CALL READ_REC_3D_RL( fn, prec, land_nLev, |
|
./pkg/land/land_read_pickup.F |
71 |
LAND_READ_PICKUP |
k=2*land_nLev |
|
./pkg/land/land_readparms.F |
163 |
LAND_READPARMS |
DO k=1,land_nLev |
|
./pkg/land/land_readparms.F |
201 |
LAND_READPARMS |
DO k=1,land_nLev |
|
./pkg/land/land_stepfwd.F |
149 |
LAND_STEPFWD |
DO k=1,land_nLev |
|
./pkg/land/land_stepfwd.F |
271 |
LAND_STEPFWD |
DO k=1,land_nLev |
|
./pkg/land/land_stepfwd.F |
272 |
LAND_STEPFWD |
IF (k.EQ.land_nLev) THEN |
|
./pkg/land/land_stepfwd.F |
290 |
LAND_STEPFWD |
IF ( k.EQ.land_nLev ) THEN |
|
./pkg/land/land_stepfwd.F |
316 |
LAND_STEPFWD |
IF ( k.EQ.land_nLev .OR. |
|
./pkg/land/land_stepfwd.F |
397 |
LAND_STEPFWD |
DO k=1,land_nLev |
|
./pkg/land/land_stepfwd.F |
93 |
LAND_STEPFWD |
DO k=1,land_nLev |
|
./pkg/land/land_stepfwd.F |
94 |
LAND_STEPFWD |
kp1 = MIN(k+1,land_nLev) |
|
./pkg/land/land_write_pickup.F |
66 |
LAND_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, prec, land_nLev, |
|
./pkg/land/land_write_pickup.F |
68 |
LAND_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, prec, land_nLev, |
|
./pkg/land/land_write_pickup.F |
70 |
LAND_WRITE_PICKUP |
k=2*land_nLev |
|
./pkg/aim_v23/aim_land2aim.F |
101 |
AIM_LAND2AIM |
DO k=1,land_nLev |
|
./pkg/aim_v23/aim_land2aim.F |
145 |
AIM_LAND2AIM |
kFillW = land_nLev |
|
./pkg/aim_v23/aim_land2aim.F |
161 |
AIM_LAND2AIM |
DO k=1,land_nLev |
|
./pkg/diagnostics/diagnostics_set_levels.F |
53 |
DIAGNOSTICS_SET_LEVELS |
INTEGER land_nLev |
|
./pkg/diagnostics/diagnostics_set_levels.F |
54 |
DIAGNOSTICS_SET_LEVELS |
PARAMETER ( land_nLev = 0 ) |
|
./pkg/diagnostics/diagnostics_set_levels.F |
83 |
DIAGNOSTICS_SET_LEVELS |
nGroundLev = land_nLev |
|
./pkg/diagnostics/diagstats_others_calc.F |
214 |
DIAGSTATS_G_CALC |
kl = MIN(k,land_nLev) |