File |
Line number |
Procedure |
Code |
./pkg/thsice/thsice_main.F |
131 |
THSICE_MAIN |
snowPrc(i,j,bi,bj) = 0. _d 0 |
./pkg/thsice/thsice_main.F |
138 |
THSICE_MAIN |
snowPrc(i,j,bi,bj) = rain(i,j,bi,bj)*rhofw |
./pkg/thsice/thsice_ave.F |
71 |
THSICE_AVE |
CALL TIMEAVE_CUMUL_2V( ice_snowPr_Ave,snowPrc, iceMask, |
./pkg/thsice/thsice_check_conserv.F |
94 |
THSICE_CHECK_CONSERV |
& hIce, hSnow, snowPrc(i,j,bi,bj)*thSIce_deltaT/rhos |
./pkg/thsice/thsice_step_fwd.F |
171 |
THSICE_STEP_FWD |
I snowPrc, iceMask,tmpFac,1,'SIsnwPrc', |
./pkg/thsice/thsice_step_fwd.F |
208 |
THSICE_STEP_FWD |
snowPr = snowPrc(i,j,bi,bj) |
./pkg/thsice/thsice_step_fwd.F |
225 |
THSICE_STEP_FWD |
snowPrc(i,j,bi,bj) = snowPr |
./pkg/thsice/thsice_step_fwd.F |
239 |
THSICE_STEP_FWD |
flxAtm(i,j) = flxAtm(i,j) - Lfresh*snowPrc(i,j,bi,bj) |
./pkg/thsice/thsice_step_fwd.F |
264 |
THSICE_STEP_FWD |
frw2oc = frw2oc + (prcAtm(i,j)-snowPrc(i,j,bi,bj)) |
./pkg/thsice/THSICE_VARS.h |
50 |
NO PROCEDURE |
& snowPrc, siceAlb |
./pkg/thsice/THSICE_VARS.h |
61 |
NO PROCEDURE |
_RL snowPrc (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/thsice/thsice_ini_vars.F |
69 |
THSICE_INI_VARS |
snowPrc(i,j,bi,bj) = 0. _d 0 |
./pkg/thsice/thsice_output.F |
322 |
THSICE_OUTPUT |
CALL WRITE_FLD_XY_RL('ice_snowPrc.',suff,snowPrc, |
./pkg/aim_v23/aim_aim2sioce.F |
146 |
AIM_AIM2SIOCE |
snowPrc(i,j,bi,bj) = 0. _d 0 |
./pkg/aim_v23/aim_aim2sioce.F |
149 |
AIM_AIM2SIOCE |
snowPrc(i,j,bi,bj) = prcAtm(i,j)*conv_precip |
./pkg/aim_v23/aim_aim2sioce.F |
152 |
AIM_AIM2SIOCE |
snowPrc(i,j,bi,bj) = 0. _d 0 |