| File |
Line number |
Procedure |
Code |
|
./pkg/aim/phy_suflux.F |
103 |
SUFLUX |
_RL FSLAND, FSSEA, CHLCP, CHSCP, QDUMMY(1), RDUMMY(1) |
|
./pkg/aim/phy_suflux.F |
192 |
SUFLUX |
FSLAND=1.+MIN(DTHETAF,MAX(-DTHETAF,TLAND(J)-T0(J,2)))*RDTH |
|
./pkg/aim/phy_suflux.F |
194 |
SUFLUX |
aux(J)=FSLAND |
|
./pkg/aim/phy_suflux.F |
195 |
SUFLUX |
DENVV(J,1)=DENVV(J,3)*FSLAND |
|
./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 |
120 |
SUFLUX_LAND |
CDENVV(J)=CHL*DENVV(J)*FSLAND |
|
./pkg/aim_v23/phy_suflux_land.F |
95 |
SUFLUX_LAND |
_RL CDENVV(NGP), RDTH, FSLAND |