| File |
Line number |
Procedure |
Code |
|
./pkg/land/land_albedo.F |
56 |
LAND_ALBEDO |
_RL albSnow, ageSnow, hSnow, Tsf |
|
./pkg/land/land_albedo.F |
68 |
LAND_ALBEDO |
hSnow = land_hSnow(i,j,bi,bj) |
|
./pkg/land/land_albedo.F |
87 |
LAND_ALBEDO |
& +(alb_land(i,j)-albSnow)*exp(-hSnow/hAlbSnow) |
|
./pkg/thsice/thsice_albedo.F |
104 |
THSICE_ALBEDO |
hs = hSnow(i,j) |
|
./pkg/thsice/thsice_albedo.F |
12 |
THSICE_ALBEDO |
I iceMask, hIce, hSnow, tSrf, ageSnw, |
|
./pkg/thsice/thsice_albedo.F |
56 |
THSICE_ALBEDO |
_RL hSnow (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_calc_thickn.F |
124 |
THSICE_CALC_THICKN |
_RL hSnow (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_calc_thickn.F |
14 |
THSICE_CALC_THICKN |
U icFrac, hIce, hSnow, tSrf, qIc1, qIc2, |
|
./pkg/thsice/thsice_calc_thickn.F |
302 |
THSICE_CALC_THICKN |
hs = hSnow(i,j) |
|
./pkg/thsice/thsice_calc_thickn.F |
904 |
THSICE_CALC_THICKN |
hSnow(i,j ) = hs |
|
./pkg/thsice/thsice_check_conserv.F |
104 |
THSICE_CHECK_CONSERV |
& hIce, hSnow, snowPrc(i,j,bi,bj)*thSIce_deltaT/rhos |
|
./pkg/thsice/thsice_check_conserv.F |
10 |
THSICE_CHECK_CONSERV |
I iceFrac, compact, hIce, hSnow, qicen, |
|
./pkg/thsice/thsice_check_conserv.F |
38 |
THSICE_CHECK_CONSERV |
_RL compact, hIce, hSnow, qicen(nlyr) |
|
./pkg/thsice/thsice_check_conserv.F |
76 |
THSICE_CHECK_CONSERV |
& + compact*( rhos*hSnow*qsnow |
|
./pkg/thsice/thsice_check_conserv.F |
80 |
THSICE_CHECK_CONSERV |
& - compact*( rhos*hSnow + rhoi*hIce ) |
|
./pkg/thsice/thsice_extend.F |
13 |
THSICE_EXTEND |
U icFrac, hIce, hSnow, |
|
./pkg/thsice/thsice_extend.F |
204 |
THSICE_EXTEND |
hSnow(i,j) = hSnow(i,j)*icFrac(i,j)/iceFrac |
|
./pkg/thsice/thsice_extend.F |
222 |
THSICE_EXTEND |
I icFrac(i,j), iceFrac, iceThick, hSnow(i,j), qicen, |
|
./pkg/thsice/thsice_extend.F |
81 |
THSICE_EXTEND |
_RL hSnow (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_solve4temp.F |
100 |
THSICE_SOLVE4TEMP |
_RL hSnow (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_solve4temp.F |
13 |
THSICE_SOLVE4TEMP |
I iceMask, hIce, hSnow, tFrz, flxExSW, |
|
./pkg/thsice/thsice_solve4temp.F |
223 |
THSICE_SOLVE4TEMP |
hs = hSnow(i,j) |