File |
Line number |
Procedure |
Code |
./pkg/thsice/THSICE_PARAMS.h |
80 |
NO PROCEDURE |
& rhos, rhoi, rhosw, rhofw, floodFac, |
./pkg/thsice/THSICE_PARAMS.h |
98 |
NO PROCEDURE |
_RL rhofw |
./pkg/thsice/thsice_get_precip.F |
108 |
THSICE_GET_PRECIP |
& *( rain(i,j,bi,bj)*rhofw - snowPrc(i,j) ) |
./pkg/thsice/thsice_get_precip.F |
110 |
THSICE_GET_PRECIP |
& *runoff(i,j,bi,bj)*rhofw ) |
./pkg/thsice/thsice_get_precip.F |
79 |
THSICE_GET_PRECIP |
precip(i,j) = ( rain(i,j,bi,bj)+runoff(i,j,bi,bj) )*rhofw |
./pkg/thsice/thsice_get_precip.F |
92 |
THSICE_GET_PRECIP |
snowPrc(i,j) = rain(i,j,bi,bj)*rhofw |
./pkg/thsice/thsice_readparms.F |
111 |
THSICE_READPARMS |
rhofw = rhoConstFresh |
./pkg/thsice/thsice_readparms.F |
294 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'rhofw =', rhofw |
./pkg/thsice/thsice_readparms.F |
52 |
THSICE_READPARMS |
& rhos, rhoi, rhosw, rhofw, |
./pkg/thsice/thsice_step_fwd.F |
285 |
THSICE_STEP_FWD |
pass_evap(i,j) = pass_evap(i,j) - icFrac*frw2oc(i,j)/rhofw |
./pkg/thsice/thsice_step_fwd.F |
351 |
THSICE_STEP_FWD |
pass_evap(i,j) = pass_evap(i,j) - frw2oc(i,j)/rhofw |
./pkg/atm2d/pass_thsice_fluxes.F |
47 |
PASS_THSICE_FLUXES |
sum_prcIce(i,j) = sum_prcIce(i,j) - precipi_2D(i,j)*rhofw |
./pkg/atm2d/pass_thsice_fluxes.F |
48 |
PASS_THSICE_FLUXES |
sum_evapIce(i,j) = sum_evapIce(i,j) - evapi_2D(i,j)*rhofw |
./pkg/atm2d/pass_thsice_fluxes.F |
50 |
PASS_THSICE_FLUXES |
& sum_snowPrc(i,j) = sum_snowPrc(i,j) - precipi_2D(i,j)*rhofw |