File |
Line number |
Procedure |
Code |
./pkg/aim_v23/phy_suflux_sice.F |
103 |
SUFLUX_SICE |
ALHevp = ALHC |
./pkg/aim_v23/phy_suflux_sice.F |
105 |
SUFLUX_SICE |
IF ( aim_energPrecip ) ALHevp = ALHC + ALHF |
./pkg/aim_v23/phy_suflux_sice.F |
181 |
SUFLUX_SICE |
dEvp(J) = MAX( dEvp(J), -dShf(J)/ALHevp ) |
./pkg/aim_v23/phy_suflux_sice.F |
204 |
SUFLUX_SICE |
& - ( Shf0(J) + ALHevp*Evp0(J) ) |
./pkg/aim_v23/phy_suflux_sice.F |
206 |
SUFLUX_SICE |
& - ( SHF(J) + ALHevp*EVAP(J) ) |
./pkg/aim_v23/phy_suflux_sice.F |
208 |
SUFLUX_SICE |
& - ( dShf(J) + ALHevp*dEvp(J) ) |
./pkg/aim_v23/phy_suflux_sice.F |
96 |
SUFLUX_SICE |
_RL ALHevp, Fstb0, dTstb, dFstb |