| File |
Line number |
Procedure |
Code |
|
./pkg/aim_v23/aim_land_impl.F |
124 |
AIM_LAND_IMPL |
SHF (J) = Shf0(J) |
|
./pkg/aim_v23/aim_land_impl.F |
14 |
AIM_LAND_IMPL |
I Shf0, dShf, Evp0, dEvp, Slr0, dSlr, |
|
./pkg/aim_v23/aim_land_impl.F |
69 |
AIM_LAND_IMPL |
_RL Shf0(NGP), dShf(NGP), Evp0(NGP), dEvp(NGP) |
|
./pkg/aim_v23/aim_sice_impl.F |
102 |
AIM_SICE_IMPL |
SHF (J) = Shf0(J) |
|
./pkg/aim_v23/aim_sice_impl.F |
14 |
AIM_SICE_IMPL |
I Shf0, dShf, Evp0, dEvp, Slr0, dSlr, |
|
./pkg/aim_v23/aim_sice_impl.F |
67 |
AIM_SICE_IMPL |
_RL Shf0(NGP), dShf(NGP), Evp0(NGP), dEvp(NGP) |
|
./pkg/aim_v23/phy_driver.F |
125 |
PHY_DRIVER |
_RL Shf0(NGP), dShf(NGP), Evp0(NGP), dEvp(NGP) |
|
./pkg/aim_v23/phy_driver.F |
306 |
PHY_DRIVER |
O Shf0, dShf, Evp0, dEvp, Slr0, dSlr, sFlx, |
|
./pkg/aim_v23/phy_driver.F |
312 |
PHY_DRIVER |
I Shf0, dShf, Evp0, dEvp, Slr0, dSlr, |
|
./pkg/aim_v23/phy_driver.F |
334 |
PHY_DRIVER |
O Shf0, dShf, Evp0, dEvp, Slr0, dSlr, sFlx, |
|
./pkg/aim_v23/phy_driver.F |
340 |
PHY_DRIVER |
I Shf0, dShf, Evp0, dEvp, Slr0, dSlr, |
|
./pkg/aim_v23/phy_suflux_land.F |
129 |
SUFLUX_LAND |
Shf0(J) = CHL*DENVV(J)*Fstb0 |
|
./pkg/aim_v23/phy_suflux_land.F |
149 |
SUFLUX_LAND |
Evp0(J) = Shf0(J)*SWAV(J)*(QSAT0(J,2)-Q0(J)) |
|
./pkg/aim_v23/phy_suflux_land.F |
14 |
SUFLUX_LAND |
O Shf0, dShf, Evp0, dEvp, Slr0, dSlr, sFlx, |
|
./pkg/aim_v23/phy_suflux_land.F |
166 |
SUFLUX_LAND |
Evp0(J) = Shf0(J)*SWAV(J)*MAX(0. _d 0,QSAT0(J,2)-Q0(J)) |
|
./pkg/aim_v23/phy_suflux_land.F |
188 |
SUFLUX_LAND |
Shf0(J) = Shf0(J)*CP*(TSFC(J) -T0(J)) |
|
./pkg/aim_v23/phy_suflux_land.F |
200 |
SUFLUX_LAND |
Shf0(J) = CDENVV(J)*CP*(TSFC(J) -T0(J)) |
|
./pkg/aim_v23/phy_suflux_land.F |
218 |
SUFLUX_LAND |
& - ( Shf0(J) + ALHC*Evp0(J) ) |
|
./pkg/aim_v23/phy_suflux_land.F |
84 |
SUFLUX_LAND |
_RL Shf0(NGP), dShf(NGP), Evp0(NGP), dEvp(NGP) |
|
./pkg/aim_v23/phy_suflux_sice.F |
135 |
SUFLUX_SICE |
Shf0(J) = CHS*DENVV(J)*Fstb0 |
|
./pkg/aim_v23/phy_suflux_sice.F |
14 |
SUFLUX_SICE |
O Shf0, dShf, Evp0, dEvp, Slr0, dSlr, sFlx, |
|
./pkg/aim_v23/phy_suflux_sice.F |
157 |
SUFLUX_SICE |
Evp0(J) = Shf0(J)*(QSAT0(J,2)-Q0(J)) |
|
./pkg/aim_v23/phy_suflux_sice.F |
175 |
SUFLUX_SICE |
Shf0(J) = Shf0(J)*CP*(TSFC(J) -T0(J)) |
|
./pkg/aim_v23/phy_suflux_sice.F |
187 |
SUFLUX_SICE |
Shf0(J) = CDENVV(J)*CP*(TSFC(J) -T0(J)) |
|
./pkg/aim_v23/phy_suflux_sice.F |
205 |
SUFLUX_SICE |
& - ( Shf0(J) + ALHevp*Evp0(J) ) |
|
./pkg/aim_v23/phy_suflux_sice.F |
84 |
SUFLUX_SICE |
_RL Shf0(NGP), dShf(NGP), Evp0(NGP), dEvp(NGP) |
|
./pkg/bulk_force/bulkf_formula_aim.F |
115 |
BULKF_FORMULA_AIM |
_RL Shf0(NGP), dShf(NGP), Evp0(NGP) |
|
./pkg/bulk_force/bulkf_formula_aim.F |
173 |
BULKF_FORMULA_AIM |
Shf0(J) = CHS*DENVV(J)*Fstb0 |
|
./pkg/bulk_force/bulkf_formula_aim.F |
191 |
BULKF_FORMULA_AIM |
Evp0(J) = Shf0(J)*(QSAT0(J,2)-Q0(J)) |
|
./pkg/bulk_force/bulkf_formula_aim.F |
209 |
BULKF_FORMULA_AIM |
Shf0(J) = Shf0(J)*CP*(TSFC(J) -T0(J)) |
|
./pkg/bulk_force/bulkf_formula_aim.F |
221 |
BULKF_FORMULA_AIM |
Shf0(J) = CDENVV(J)*CP*(TSFC(J) -T0(J)) |
|
./pkg/bulk_force/bulkf_formula_aim.F |
239 |
BULKF_FORMULA_AIM |
& - ( Shf0(J) + ALHevp*Evp0(J) ) |