File |
Line number |
Procedure |
Code |
./pkg/land/LAND_VARS.h |
27 |
NO PROCEDURE |
& land_skinT, land_hSnow, land_snowAge, |
./pkg/land/LAND_VARS.h |
33 |
NO PROCEDURE |
_RL land_skinT (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/land/land_albedo.F |
65 |
LAND_ALBEDO |
Tsf = land_skinT(i,j,bi,bj) |
./pkg/land/land_diagnostics_state.F |
53 |
LAND_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL(land_skinT,'GrdSurfT',0,1,0,1,1,myThid) |
./pkg/land/land_do_diags.F |
65 |
LAND_DO_DIAGS |
CALL TIMEAVE_CUMULATE(land_sTtave, land_skinT ,1, |
./pkg/land/land_impl_temp.F |
135 |
LAND_IMPL_TEMP |
tSurf = land_skinT(i,j,bi,bj) |
./pkg/land/land_impl_temp.F |
343 |
LAND_IMPL_TEMP |
& dTsurf(i,j) = tSurf - land_skinT(i,j,bi,bj) |
./pkg/land/land_impl_temp.F |
344 |
LAND_IMPL_TEMP |
land_skinT(i,j,bi,bj) = tSurf |
./pkg/land/land_ini_vars.F |
147 |
LAND_INI_VARS |
land_skinT(i,j,bi,bj) = land_groundT(i,j,1,bi,bj) |
./pkg/land/land_ini_vars.F |
75 |
LAND_INI_VARS |
land_skinT (i,j,bi,bj) = 0. _d 0 |
./pkg/land/land_monitor.F |
170 |
LAND_MONITOR |
I land_skinT, land_frc, maskInC, rA, yC, locDr, |
./pkg/land/land_output.F |
139 |
LAND_OUTPUT |
& 'land_skinT', land_skinT, myThid) |
./pkg/land/land_output.F |
94 |
LAND_OUTPUT |
& 'land_skinT.', suff, land_skinT, myIter, myThid ) |
./pkg/land/land_read_pickup.F |
100 |
LAND_READ_PICKUP |
& 'land_skinT', land_skinT, myThid) |
./pkg/land/land_read_pickup.F |
73 |
LAND_READ_PICKUP |
& land_skinT, k+1, myIter, myThid ) |
./pkg/land/land_stepfwd.F |
425 |
LAND_STEPFWD |
land_skinT(i,j,bi,bj) = MIN(land_skinT(i,j,bi,bj), 0. _d 0) |
./pkg/land/land_stepfwd.F |
427 |
LAND_STEPFWD |
land_skinT(i,j,bi,bj) = land_groundT(i,j,1,bi,bj) |
./pkg/land/land_stepfwd.F |
434 |
LAND_STEPFWD |
land_skinT(i,j,bi,bj) = land_groundT(i,j,1,bi,bj) |
./pkg/land/land_write_pickup.F |
109 |
LAND_WRITE_PICKUP |
& 'land_skinT', land_skinT, myThid) |
./pkg/land/land_write_pickup.F |
72 |
LAND_WRITE_PICKUP |
& land_skinT, k+1, myIter, myThid ) |
./pkg/aim_v23/aim_aim2land.F |
102 |
AIM_AIM2LAND |
IF ( land_skinT(i,j,bi,bj).LT. 0. _d 0 .OR. |
./pkg/aim_v23/aim_land2aim.F |
110 |
AIM_LAND2AIM |
land_skinT(i,j,bi,bj) = land_groundT(i,j,1,bi,bj) |
./pkg/aim_v23/aim_land2aim.F |
96 |
AIM_LAND2AIM |
aimTld(i,j) = land_skinT(i,j,bi,bj)+celsius2K |
./pkg/aim_v23/aim_land_impl.F |
103 |
AIM_LAND_IMPL |
IF ( land_skinT(i,j,bi,bj).LT. 0. _d 0 .OR. |