File |
Line number |
Procedure |
Code |
./pkg/aim_v23/aim_land2aim.F |
124 |
AIM_LAND2AIM |
aimSWA(i,j) = land_groundW(i,j,1,bi,bj) |
./pkg/aim_v23/aim_land2aim.F |
137 |
AIM_LAND2AIM |
aimSWA(i,j) = land_groundW(i,j,1,bi,bj) |
./pkg/aim_v23/aim_land2aim.F |
150 |
AIM_LAND2AIM |
land_groundW(i,j,k,bi,bj) = aimSWA(i,j) |
./pkg/aim_v23/aim_land2aim.F |
163 |
AIM_LAND2AIM |
& *land_groundW(i,j,k,bi,bj) |
./pkg/land/land_do_diags.F |
108 |
LAND_DO_DIAGS |
CALL TIMEAVE_CUMULATE(land_grWtave,land_groundW,land_nLev, |
./pkg/land/land_do_diags.F |
72 |
LAND_DO_DIAGS |
& land_groundW(1-OLx,1-OLy,k,bi,bj),bi,bj,k,iterWr,myThid) |
./pkg/land/land_diagnostics_fill.F |
57 |
LAND_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(land_groundW,'GrdWater',0,land_nLev, |
./pkg/land/land_impl_temp.F |
143 |
LAND_IMPL_TEMP |
mW(k) = land_dzF(k)*land_groundW(i,j,k,bi,bj) |
./pkg/land/land_write_pickup.F |
66 |
LAND_WRITE_PICKUP |
& land_groundW,2,myIter,myThid) |
./pkg/land/land_ini_vars.F |
102 |
LAND_INI_VARS |
& land_nLev, land_groundW, 1, myThid) |
./pkg/land/land_ini_vars.F |
133 |
LAND_INI_VARS |
& *land_groundW(i,j,k,bi,bj) |
./pkg/land/land_ini_vars.F |
150 |
LAND_INI_VARS |
& *land_groundW(i,j,k,bi,bj) |
./pkg/land/land_ini_vars.F |
67 |
LAND_INI_VARS |
land_groundW(i,j,k,bi,bj) = 0. _d 0 |
./pkg/land/land_monitor.F |
266 |
LAND_MONITOR |
I land_groundW, land_frc, maskH, rA, yC, land_dzF, |
./pkg/land/LAND_VARS.h |
26 |
NO PROCEDURE |
& land_groundT, land_enthalp, land_groundW, |
./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_read_pickup.F |
52 |
LAND_READ_PICKUP |
CALL MDSREADFIELD(fn,prec,'RL',land_nLev,land_groundW,2,myThid) |
./pkg/land/land_read_pickup.F |
58 |
LAND_READ_PICKUP |
CALL MDSREADFIELD(fn,prec,'RL',land_nLev,land_groundW,2,myThid) |
./pkg/land/land_stepfwd.F |
154 |
LAND_STEPFWD |
& *land_groundW(i,j,k,bi,bj) |
./pkg/land/land_stepfwd.F |
296 |
LAND_STEPFWD |
land_groundW(i,j,k,bi,bj) = land_groundW(i,j,k,bi,bj) |
./pkg/land/land_stepfwd.F |
324 |
LAND_STEPFWD |
& ( land_groundW(i,j,k,bi,bj) |
./pkg/land/land_stepfwd.F |
325 |
LAND_STEPFWD |
& -land_groundW(i,j,kp1,bi,bj) ) |
./pkg/land/land_stepfwd.F |
338 |
LAND_STEPFWD |
groundWnp1 = land_groundW(i,j,k,bi,bj) |
./pkg/land/land_stepfwd.F |
343 |
LAND_STEPFWD |
& ,5,land_groundW(i,j,k,bi,bj)-1., |
./pkg/land/land_stepfwd.F |
348 |
LAND_STEPFWD |
land_groundW(i,j,k,bi,bj) = MIN(1. _d 0, groundWnp1) |
./pkg/land/land_stepfwd.F |
402 |
LAND_STEPFWD |
& *land_groundW(i,j,k,bi,bj) |