| File |
Line number |
Procedure |
Code |
|
./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 |
125 |
AIM_LAND_IMPL |
EVAP(J) = Evp0(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 |
103 |
AIM_SICE_IMPL |
EVAP(J) = Evp0(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 |
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 |
156 |
SUFLUX_LAND |
Evp0(J) = CDENVV(J)*SWAV(J)*(QSAT0(J,2)-Q0(J)) |
|
./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 |
176 |
SUFLUX_LAND |
Evp0(J) = CDENVV(J)*SWAV(J)*MAX(0. _d 0,QSAT0(J,2)-Q0(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 |
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 |
164 |
SUFLUX_SICE |
Evp0(J) = CDENVV(J)*(QSAT0(J,2)-Q0(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 |
191 |
BULKF_FORMULA_AIM |
Evp0(J) = Shf0(J)*(QSAT0(J,2)-Q0(J)) |
|
./pkg/bulk_force/bulkf_formula_aim.F |
198 |
BULKF_FORMULA_AIM |
Evp0(J) = CDENVV(J)*(QSAT0(J,2)-Q0(J)) |
|
./pkg/bulk_force/bulkf_formula_aim.F |
239 |
BULKF_FORMULA_AIM |
& - ( Shf0(J) + ALHevp*Evp0(J) ) |