| File |
Line number |
Procedure |
Code |
|
./pkg/land/land_do_diags.F |
114 |
LAND_DO_DIAGS |
CALL TIMEAVE_CUMULATE(land_sAtave, land_snowAge,1, |
|
./pkg/land/land_do_diags.F |
79 |
LAND_DO_DIAGS |
& land_snowAge(1-OLx,1-OLy,bi,bj),bi,bj,1,iterWr,myThid) |
|
./pkg/land/land_diagnostics_fill.F |
60 |
LAND_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(land_snowAge,'LdSnwAge',0,1, |
|
./pkg/land/land_write_pickup.F |
73 |
LAND_WRITE_PICKUP |
& land_snowAge,k+3,myIter,myThid) |
|
./pkg/land/land_ini_vars.F |
77 |
LAND_INI_VARS |
land_snowAge(i,j,bi,bj) = 0. _d 0 |
|
./pkg/land/land_albedo.F |
67 |
LAND_ALBEDO |
ageSnow = land_snowAge(i,j,bi,bj)/86400. _d 0 |
|
./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_read_pickup.F |
62 |
LAND_READ_PICKUP |
CALL MDSREADFIELD(fn,prec,'RL', 1, land_snowAge,k+3, 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 |