| File |
Line number |
Procedure |
Code |
|
./pkg/aim_v23/aim_aim2land.F |
105 |
AIM_AIM2LAND |
& - EVAP(I2,1,myThid)*ALHF |
|
./pkg/aim_v23/aim_aim2land.F |
107 |
AIM_AIM2LAND |
& EVAP(I2,1,myThid)*ALHF |
|
./pkg/aim_v23/aim_land_impl.F |
105 |
AIM_LAND_IMPL |
sFlx(I2,0) = sFlx(I2,0) - ALHF*Evp0(I2) |
|
./pkg/aim_v23/aim_land_impl.F |
106 |
AIM_LAND_IMPL |
sFlx(I2,1) = sFlx(I2,1) - ALHF*EVAP(I2) |
|
./pkg/aim_v23/aim_land_impl.F |
107 |
AIM_LAND_IMPL |
sFlx(I2,2) = sFlx(I2,2) - ALHF*dEvp(I2) |
|
./pkg/aim_v23/aim_land_impl.F |
108 |
AIM_LAND_IMPL |
land_EnWFlux(i,j,bi,bj) = -ALHF |
|
./pkg/aim_v23/com_physcon.h |
16 |
NO PROCEDURE |
COMMON /PHYCON/ P0, GG, RD, CP, ALHC, ALHF, SBC, rainCP, tFreeze |
|
./pkg/aim_v23/com_physcon.h |
17 |
NO PROCEDURE |
_RL P0, GG, RD, CP, ALHC, ALHF, SBC, rainCP, tFreeze |
|
./pkg/aim_v23/phy_inphys.F |
70 |
INPHYS |
ALHF = 334. _d 0 |
|
./pkg/aim_v23/phy_snow_precip.F |
88 |
SNOW_PRECIP |
EnPrec(J) = -ALHF |
|
./pkg/aim_v23/phy_suflux_sice.F |
106 |
SUFLUX_SICE |
IF ( aim_energPrecip .OR. useThSIce ) ALHevp = ALHC + ALHF |
|
./pkg/bulk_force/bulkf_formula_aim.F |
100 |
BULKF_FORMULA_AIM |
_RL P0, ALHC, ALHF, RD, CP, SBC, EMISloc |
|
./pkg/bulk_force/bulkf_formula_aim.F |
103 |
BULKF_FORMULA_AIM |
EQUIVALENCE ( Lfresh , ALHF ) |
|
./pkg/bulk_force/bulkf_formula_aim.F |
132 |
BULKF_FORMULA_AIM |
IF ( iceornot.GE.1 ) ALHevp = ALHC + ALHF |