File |
Line number |
Procedure |
Code |
./pkg/aim_v23/phy_suflux_post.F |
122 |
SUFLUX_POST |
SLRU(J) = (FMASK(J,1)*SLRup(J,1)+FMASK(J,2)*SLRup(J,2) |
./pkg/aim_v23/phy_suflux_post.F |
123 |
SUFLUX_POST |
& +FMASK(J,3)*SLRup(J,3)) |
./pkg/aim_v23/phy_suflux_post.F |
136 |
SUFLUX_POST |
SLRup(J,1)=EMISloc*SLRup(J,1)-SLRD(J) |
./pkg/aim_v23/phy_suflux_post.F |
137 |
SUFLUX_POST |
SLRup(J,2)=EMISloc*SLRup(J,2)-SLRD(J) |
./pkg/aim_v23/phy_suflux_post.F |
138 |
SUFLUX_POST |
SLRup(J,3)=EMISloc*SLRup(J,3)-SLRD(J) |
./pkg/aim_v23/phy_suflux_post.F |
13 |
SUFLUX_POST |
U DRAG, SHF, EVAP, SLRup, |
./pkg/aim_v23/phy_suflux_post.F |
82 |
SUFLUX_POST |
_RL DRAG(NGP,0:3), SHF(NGP,0:3), EVAP(NGP,0:3), SLRup(NGP,3) |