| File |
Line number |
Procedure |
Code |
|
./pkg/aim_v23/phy_suflux_land.F |
116 |
SUFLUX_LAND |
RDTH = FSTAB/DTHETA |
|
./pkg/aim_v23/phy_suflux_land.F |
119 |
SUFLUX_LAND |
FSLAND=1.+MIN(DTHETA,MAX(-DTHETA,TSKIN(J)-T1(J)))*RDTH |
|
./pkg/aim_v23/phy_suflux_land.F |
128 |
SUFLUX_LAND |
Fstb0 = 1.+MIN(DTHETA,MAX(-DTHETA,TSFC(J) -T1(J)))*RDTH |
|
./pkg/aim_v23/phy_suflux_land.F |
131 |
SUFLUX_LAND |
dFstb = RDTH*MIN(1. _d 0, MAX(0. _d 0, dTstb*0.5 _d 0)) |
|
./pkg/aim_v23/phy_suflux_land.F |
95 |
SUFLUX_LAND |
_RL CDENVV(NGP), RDTH, FSLAND |
|
./pkg/aim_v23/phy_suflux_ocean.F |
72 |
SUFLUX_OCEAN |
_RL CDENVV(NGP), RDTH, FSSEA |
|
./pkg/aim_v23/phy_suflux_ocean.F |
87 |
SUFLUX_OCEAN |
RDTH = FSTAB/DTHETA |
|
./pkg/aim_v23/phy_suflux_ocean.F |
90 |
SUFLUX_OCEAN |
FSSEA =1.+MIN(DTHETA,MAX(-DTHETA, Tsurf(J)-T1(J)))*RDTH |
|
./pkg/aim_v23/phy_suflux_sice.F |
122 |
SUFLUX_SICE |
RDTH = FSTAB/DTHETA |
|
./pkg/aim_v23/phy_suflux_sice.F |
125 |
SUFLUX_SICE |
FSSICE=1.+MIN(DTHETA,MAX(-DTHETA,TSKIN(J)-T1(J)))*RDTH |
|
./pkg/aim_v23/phy_suflux_sice.F |
134 |
SUFLUX_SICE |
Fstb0 = 1.+MIN(DTHETA,MAX(-DTHETA,TSFC(J) -T1(J)))*RDTH |
|
./pkg/aim_v23/phy_suflux_sice.F |
137 |
SUFLUX_SICE |
dFstb = RDTH*MIN(1. _d 0, MAX(0. _d 0, dTstb*0.5 _d 0)) |
|
./pkg/aim_v23/phy_suflux_sice.F |
96 |
SUFLUX_SICE |
_RL CDENVV(NGP), RDTH, FSSICE |
|
./pkg/bulk_force/bulkf_formula_aim.F |
118 |
BULKF_FORMULA_AIM |
_RL CDENVV(NGP), RDTH, FSSICE |
|
./pkg/bulk_force/bulkf_formula_aim.F |
160 |
BULKF_FORMULA_AIM |
RDTH = FSTAB/DTHETA |
|
./pkg/bulk_force/bulkf_formula_aim.F |
163 |
BULKF_FORMULA_AIM |
FSSICE=1.+MIN(DTHETA,MAX(-DTHETA,TSKIN(J)-T1(J)))*RDTH |
|
./pkg/bulk_force/bulkf_formula_aim.F |
172 |
BULKF_FORMULA_AIM |
Fstb0 = 1.+MIN(DTHETA,MAX(-DTHETA,TSFC(J) -T1(J)))*RDTH |
|
./pkg/bulk_force/bulkf_formula_aim.F |
175 |
BULKF_FORMULA_AIM |
dFstb = RDTH*MIN(1. _d 0, MAX(0. _d 0, dTstb*0.5 _d 0)) |