| File |
Line number |
Procedure |
Code |
|
./pkg/aim_v23/aim_sice_impl.F |
107 |
AIM_SICE_IMPL |
SHF (J) = SHF (J) + dTsurf(J)*dShf(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_suflux_land.F |
132 |
SUFLUX_LAND |
dShf(J) = CHL*DENVV(J)*dFstb |
|
./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 |
151 |
SUFLUX_LAND |
& + dShf(J)*SWAV(J)*(QSAT0(J,1)-Q0(J)) |
|
./pkg/aim_v23/phy_suflux_land.F |
168 |
SUFLUX_LAND |
& + dShf(J)*SWAV(J)*MAX(0. _d 0,QSAT0(J,1)-Q0(J)) |
|
./pkg/aim_v23/phy_suflux_land.F |
189 |
SUFLUX_LAND |
dShf(J) = CDENVV(J)*CP |
|
./pkg/aim_v23/phy_suflux_land.F |
190 |
SUFLUX_LAND |
& + dShf(J)*CP*(TSKIN(J)-T0(J)) |
|
./pkg/aim_v23/phy_suflux_land.F |
191 |
SUFLUX_LAND |
dShf(J) = MAX( dShf(J), 0. _d 0 ) |
|
./pkg/aim_v23/phy_suflux_land.F |
195 |
SUFLUX_LAND |
dEvp(J) = MAX( dEvp(J), -dShf(J)/ALHC ) |
|
./pkg/aim_v23/phy_suflux_land.F |
201 |
SUFLUX_LAND |
dShf(J) = CDENVV(J)*CP |
|
./pkg/aim_v23/phy_suflux_land.F |
222 |
SUFLUX_LAND |
& - ( dShf(J) + ALHC*dEvp(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 |
137 |
SUFLUX_SICE |
dShf(J) = CHS*DENVV(J)*dFstb |
|
./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 |
158 |
SUFLUX_SICE |
& + dShf(J)*(QSAT0(J,1)-Q0(J)) |
|
./pkg/aim_v23/phy_suflux_sice.F |
175 |
SUFLUX_SICE |
dShf(J) = CDENVV(J)*CP |
|
./pkg/aim_v23/phy_suflux_sice.F |
176 |
SUFLUX_SICE |
& + dShf(J)*CP*(TSKIN(J)-T0(J)) |
|
./pkg/aim_v23/phy_suflux_sice.F |
177 |
SUFLUX_SICE |
dShf(J) = MAX( dShf(J), 0. _d 0 ) |
|
./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 |
187 |
SUFLUX_SICE |
dShf(J) = CDENVV(J)*CP |
|
./pkg/aim_v23/phy_suflux_sice.F |
208 |
SUFLUX_SICE |
& - ( dShf(J) + ALHevp*dEvp(J) ) |
|
./pkg/aim_v23/phy_suflux_sice.F |
83 |
SUFLUX_SICE |
_RL Shf0(NGP), dShf(NGP), Evp0(NGP), dEvp(NGP) |
|
./pkg/aim_v23/aim_land_impl.F |
128 |
AIM_LAND_IMPL |
SHF (J) = SHF (J) + dTsurf(J)*dShf(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/phy_driver.F |
252 |
PHY_DRIVER |
O Shf0, dShf, Evp0, dEvp, Slr0, dSlr, sFlx, |
|
./pkg/aim_v23/phy_driver.F |
258 |
PHY_DRIVER |
I Shf0, dShf, Evp0, dEvp, Slr0, dSlr, |
|
./pkg/aim_v23/phy_driver.F |
280 |
PHY_DRIVER |
O Shf0, dShf, Evp0, dEvp, Slr0, dSlr, sFlx, |
|
./pkg/aim_v23/phy_driver.F |
286 |
PHY_DRIVER |
I Shf0, dShf, Evp0, dEvp, Slr0, dSlr, |
|
./pkg/aim_v23/phy_driver.F |
88 |
PHY_DRIVER |
_RL Shf0(NGP), dShf(NGP), Evp0(NGP), dEvp(NGP) |