| File |
Line number |
Procedure |
Code |
|
./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 |
139 |
THSICE_GET_PRECIP |
snowPrc(i,j) = cheapPrecip(i,j,bi,bj) |
|
./pkg/thsice/thsice_get_precip.F |
154 |
THSICE_GET_PRECIP |
& *( cheapPrecip(i,j,bi,bj) - snowPrc(i,j) ) |
|
./pkg/thsice/thsice_get_precip.F |
17 |
THSICE_GET_PRECIP |
O precip, snowPrc, qPrcRnO, flxSW, |
|
./pkg/thsice/thsice_get_precip.F |
57 |
THSICE_GET_PRECIP |
_RL snowPrc(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/thsice/thsice_get_precip.F |
92 |
THSICE_GET_PRECIP |
snowPrc(i,j) = rain(i,j,bi,bj)*rhofw |
|
./pkg/thsice/thsice_map_exf.F |
102 |
THSICE_MAP_EXF |
snowPrc(i,j) = precip(i,j,bi,bj)*rhoConstFresh |
|
./pkg/thsice/thsice_map_exf.F |
117 |
THSICE_MAP_EXF |
& *( precip(i,j,bi,bj)*rhoConstFresh - snowPrc(i,j) ) |
|
./pkg/thsice/thsice_map_exf.F |
14 |
THSICE_MAP_EXF |
O totPrc, snowPrc, qPrcRnO, flxSW, |
|
./pkg/thsice/thsice_map_exf.F |
53 |
THSICE_MAP_EXF |
_RL snowPrc(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/thsice/thsice_map_exf.F |
91 |
THSICE_MAP_EXF |
snowPrc(i,j) = snowPrecip(i,j,bi,bj)*rhoConstFresh |
|
./pkg/thsice/thsice_step_fwd.F |
14 |
THSICE_STEP_FWD |
I prcAtm, snowPrc, qPrcRnO, |
|
./pkg/thsice/thsice_step_fwd.F |
168 |
THSICE_STEP_FWD |
IF ( snowPrc(i,j).GT.0. _d 0 ) |
|
./pkg/thsice/thsice_step_fwd.F |
170 |
THSICE_STEP_FWD |
& * EXP( - snowFac*snowPrc(i,j) ) |
|
./pkg/thsice/thsice_step_fwd.F |
175 |
THSICE_STEP_FWD |
& - Lfresh*snowPrc(i,j) |
|
./pkg/thsice/thsice_step_fwd.F |
187 |
THSICE_STEP_FWD |
CALL DIAGNOSTICS_FRACT_FILL( snowPrc, |
|
./pkg/thsice/thsice_step_fwd.F |
229 |
THSICE_STEP_FWD |
& icFrwAtm(i,j,bi,bj),-Lfresh*snowPrc(i,j) |
|
./pkg/thsice/thsice_step_fwd.F |
244 |
THSICE_STEP_FWD |
I snowPrc(siLo,sjLo), prcAtm, |
|
./pkg/thsice/thsice_step_fwd.F |
72 |
THSICE_STEP_FWD |
_RL snowPrc(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/aim_v23/aim_aim2sioce.F |
14 |
AIM_AIM2SIOCE |
O prcAtm, snowPrc, |
|
./pkg/aim_v23/aim_aim2sioce.F |
169 |
AIM_AIM2SIOCE |
snowPrc(i,j) = 0. _d 0 |
|
./pkg/aim_v23/aim_aim2sioce.F |
172 |
AIM_AIM2SIOCE |
snowPrc(i,j) = prcAtm(i,j)*convPrcEvp |
|
./pkg/aim_v23/aim_aim2sioce.F |
175 |
AIM_AIM2SIOCE |
snowPrc(i,j) = 0. _d 0 |
|
./pkg/aim_v23/aim_aim2sioce.F |
78 |
AIM_AIM2SIOCE |
_RL snowPrc(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/atm2d/ATM2D_VARS.h |
213 |
NO PROCEDURE |
COMMON/ICE_FLUXES_PASS/ netSW, sFlx, dTsurf, pass_prcAtm, snowPrc |
|
./pkg/atm2d/ATM2D_VARS.h |
221 |
NO PROCEDURE |
_RL snowPrc(1-OLx:sNx+OLx,1-OLy:sNy+OLy) ! snow precip (kg/m2/s) |
|
./pkg/atm2d/atm2d_read_pickup.F |
58 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,snowPrc, 15, nIter0, myThid) |
|
./pkg/atm2d/atm2d_write_pickup.F |
168 |
ATM2D_WRITE_PICKUP_NOW |
CALL WRITE_REC_3D_RL( fn,prec,1,snowPrc, 15,myIter,myThid ) |
|
./pkg/atm2d/forward_step_atm2d.F |
213 |
FORWARD_STEP_ATM2D |
I pass_prcAtm, snowPrc, qPrcRn, |
|
./pkg/atm2d/init_atm2d.F |
353 |
INIT_ATM2D |
snowPrc (i,j) = 0. _d 0 |
|
./pkg/atm2d/norm_ocn_fluxes.F |
63 |
NORM_OCN_FLUXES |
snowPrc(i,j)= sum_snowPrc(i,j)/nper |