File |
Line number |
Procedure |
Code |
./pkg/aim_v23/phy_suflux_sice.F |
104 |
SUFLUX_SICE |
ALHevp = ALHC |
./pkg/aim_v23/phy_suflux_sice.F |
106 |
SUFLUX_SICE |
IF ( aim_energPrecip .OR. useThSIce ) ALHevp = ALHC + ALHF |
./pkg/aim_v23/phy_suflux_sice.F |
182 |
SUFLUX_SICE |
dEvp(J) = MAX( dEvp(J), -dShf(J)/ALHevp ) |
./pkg/aim_v23/phy_suflux_sice.F |
205 |
SUFLUX_SICE |
& - ( Shf0(J) + ALHevp*Evp0(J) ) |
./pkg/aim_v23/phy_suflux_sice.F |
207 |
SUFLUX_SICE |
& - ( SHF(J) + ALHevp*EVAP(J) ) |
./pkg/aim_v23/phy_suflux_sice.F |
209 |
SUFLUX_SICE |
& - ( dShf(J) + ALHevp*dEvp(J) ) |
./pkg/aim_v23/phy_suflux_sice.F |
97 |
SUFLUX_SICE |
_RL ALHevp, Fstb0, dTstb, dFstb |
./pkg/bulk_force/bulkf_formula_aim.F |
119 |
BULKF_FORMULA_AIM |
_RL ALHevp, Fstb0, dTstb, dFstb |
./pkg/bulk_force/bulkf_formula_aim.F |
129 |
BULKF_FORMULA_AIM |
ALHevp = ALHC |
./pkg/bulk_force/bulkf_formula_aim.F |
132 |
BULKF_FORMULA_AIM |
IF ( iceornot.GE.1 ) ALHevp = ALHC + ALHF |
./pkg/bulk_force/bulkf_formula_aim.F |
216 |
BULKF_FORMULA_AIM |
dEvp(J) = MAX( dEvp(J), -dShf(J)/ALHevp ) |
./pkg/bulk_force/bulkf_formula_aim.F |
239 |
BULKF_FORMULA_AIM |
& - ( Shf0(J) + ALHevp*Evp0(J) ) |
./pkg/bulk_force/bulkf_formula_aim.F |
241 |
BULKF_FORMULA_AIM |
& - ( SHF(J) + ALHevp*EVAP(J) ) |
./pkg/bulk_force/bulkf_formula_aim.F |
243 |
BULKF_FORMULA_AIM |
& - ( dShf(J) + ALHevp*dEvp(J) ) |