File |
Line number |
Procedure |
Code |
./pkg/land/LAND_VARS.h |
27 |
NO PROCEDURE |
& land_skinT, land_hSnow, land_snowAge, |
./pkg/land/LAND_VARS.h |
35 |
NO PROCEDURE |
_RL land_snowAge(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/land/land_albedo.F |
67 |
LAND_ALBEDO |
ageSnow = land_snowAge(i,j,bi,bj)/86400. _d 0 |
./pkg/land/land_diagnostics_state.F |
61 |
LAND_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL(land_snowAge,'LdSnwAge',0,1, |
./pkg/land/land_do_diags.F |
69 |
LAND_DO_DIAGS |
CALL TIMEAVE_CUMULATE(land_sAtave, land_snowAge,1, |
./pkg/land/land_ini_vars.F |
77 |
LAND_INI_VARS |
land_snowAge(i,j,bi,bj) = 0. _d 0 |
./pkg/land/land_output.F |
143 |
LAND_OUTPUT |
& 'land_snAge', land_snowAge, myThid) |
./pkg/land/land_output.F |
98 |
LAND_OUTPUT |
& 'land_snAge.', suff, land_snowAge, myIter, myThid ) |
./pkg/land/land_read_pickup.F |
104 |
LAND_READ_PICKUP |
& 'land_snAge', land_snowAge, myThid) |
./pkg/land/land_read_pickup.F |
77 |
LAND_READ_PICKUP |
& land_snowAge,k+3, myIter, myThid ) |
./pkg/land/land_stepfwd.F |
190 |
LAND_STEPFWD |
land_snowAge(i,j,bi,bj) = |
./pkg/land/land_stepfwd.F |
191 |
LAND_STEPFWD |
& ( land_deltaT + land_snowAge(i,j,bi,bj)*ageFac ) |
./pkg/land/land_stepfwd.F |
203 |
LAND_STEPFWD |
land_snowAge(i,j,bi,bj) = land_snowAge(i,j,bi,bj) |
./pkg/land/land_stepfwd.F |
247 |
LAND_STEPFWD |
& land_snowAge(i,j,bi,bj) = 0. _d 0 |
./pkg/land/land_write_pickup.F |
113 |
LAND_WRITE_PICKUP |
& 'land_snAge', land_snowAge, myThid) |
./pkg/land/land_write_pickup.F |
76 |
LAND_WRITE_PICKUP |
& land_snowAge,k+3, myIter, myThid ) |