File |
Line number |
Procedure |
Code |
./pkg/thsice/thsice_get_precip.F |
17 |
THSICE_GET_PRECIP |
O precip, snowPrc, qPrcRnO, flxSW, |
./pkg/thsice/thsice_get_precip.F |
59 |
THSICE_GET_PRECIP |
_RL flxSW (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/thsice/thsice_get_precip.F |
80 |
THSICE_GET_PRECIP |
flxSW (i,j) = solar(i,j,bi,bj) |
./pkg/thsice/thsice_map_exf.F |
14 |
THSICE_MAP_EXF |
O totPrc, snowPrc, qPrcRnO, flxSW, |
./pkg/thsice/thsice_map_exf.F |
55 |
THSICE_MAP_EXF |
_RL flxSW (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/thsice/thsice_map_exf.F |
80 |
THSICE_MAP_EXF |
flxSW (i,j) = swdown(i,j,bi,bj) |
./pkg/thsice/thsice_solve4temp.F |
110 |
THSICE_SOLVE4TEMP |
_RL flxSW (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/thsice/thsice_solve4temp.F |
19 |
THSICE_SOLVE4TEMP |
U flxSW, tSrf1, qIc1, qIc2, |
./pkg/thsice/thsice_solve4temp.F |
281 |
THSICE_SOLVE4TEMP |
fswpen = flxSW(i,j) * (1. _d 0 - frsnow) * i0swFrac |
./pkg/thsice/thsice_solve4temp.F |
284 |
THSICE_SOLVE4TEMP |
fswdn = flxSW(i,j) - fswpen |
./pkg/thsice/thsice_solve4temp.F |
287 |
THSICE_SOLVE4TEMP |
flxAtm(i,j) = flxSW(i,j) |
./pkg/thsice/thsice_solve4temp.F |
289 |
THSICE_SOLVE4TEMP |
flxSW(i,j) = fswocn |
./pkg/thsice/thsice_solve4temp.F |
638 |
THSICE_SOLVE4TEMP |
& flxAtm(i,j), evpAtm(i,j), netSW, flxSW(i,j) |