| File |
Line number |
Procedure |
Code |
|
./pkg/aim_v23/aim_land_impl.F |
126 |
AIM_LAND_IMPL |
SLRU(J) = Slr0(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 |
70 |
AIM_LAND_IMPL |
_RL Slr0(NGP), dSlr(NGP), sFlx(NGP,0:2) |
|
./pkg/aim_v23/aim_sice_impl.F |
104 |
AIM_SICE_IMPL |
SLRU(J) = Slr0(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 |
68 |
AIM_SICE_IMPL |
_RL Slr0(NGP), dSlr(NGP) |
|
./pkg/aim_v23/phy_driver.F |
126 |
PHY_DRIVER |
_RL Slr0(NGP), dSlr(NGP), sFlx(NGP,0:2) |
|
./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 |
14 |
SUFLUX_LAND |
O Shf0, dShf, Evp0, dEvp, Slr0, dSlr, sFlx, |
|
./pkg/aim_v23/phy_suflux_land.F |
209 |
SUFLUX_LAND |
Slr0(J) = SBC*TS2*TS2 |
|
./pkg/aim_v23/phy_suflux_land.F |
217 |
SUFLUX_LAND |
sFlx(J,0)= ( SSR(J) + SLRD(J) - EMISloc*Slr0(J) ) |
|
./pkg/aim_v23/phy_suflux_land.F |
85 |
SUFLUX_LAND |
_RL Slr0(NGP), dSlr(NGP), sFlx(NGP,0:2) |
|
./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 |
196 |
SUFLUX_SICE |
Slr0(J) = SBC*TS2*TS2 |
|
./pkg/aim_v23/phy_suflux_sice.F |
204 |
SUFLUX_SICE |
sFlx(J,0)= ( SLRD(J) - EMISloc*Slr0(J) ) |
|
./pkg/aim_v23/phy_suflux_sice.F |
85 |
SUFLUX_SICE |
_RL Slr0(NGP), dSlr(NGP), sFlx(NGP,0:2) |
|
./pkg/bulk_force/bulkf_formula_aim.F |
116 |
BULKF_FORMULA_AIM |
_RL Slr0(NGP), dSlr(NGP) |
|
./pkg/bulk_force/bulkf_formula_aim.F |
230 |
BULKF_FORMULA_AIM |
Slr0(J) = SBC*TS2*TS2 |
|
./pkg/bulk_force/bulkf_formula_aim.F |
238 |
BULKF_FORMULA_AIM |
sFlx(J,0)= ( SLRD(J) - EMISloc*Slr0(J) ) |