| File |
Line number |
Procedure |
Code |
|
./pkg/aim/phy_radiat.F |
129 |
RADSW |
_RL CLOUDC(NGP), FTOP(NGP), FSFC(NGP), DFABS(NGP,NLEV) |
|
./pkg/aim/phy_radiat.F |
234 |
RADSW |
FTOP(J) =FSOL(J)-FREFL(J) |
|
./pkg/aim/phy_radiat.F |
275 |
RADSW |
FTOP(J)=FTOP(J)-FLUX(J) |
|
./pkg/aim/phy_radiat.F |
374 |
RADLW |
* FTOP,FSFC,DFABS,FDOWN, |
|
./pkg/aim/phy_radiat.F |
416 |
RADLW |
_RL FTOP(NGP), FSFC(NGP), DFABS(NGP,NLEV) |
|
./pkg/aim/phy_radiat.F |
572 |
RADLW |
FTOP(J)=EPSLW*ST4S(J) |
|
./pkg/aim/phy_radiat.F |
573 |
RADLW |
FLUX(J)=ST4S(J)-FTOP(J) |
|
./pkg/aim/phy_radiat.F |
598 |
RADLW |
FTOP(J)=FTOP(J)+FLUX(J)-STCOR(J) |
|
./pkg/aim/phy_radiat.F |
85 |
RADSW |
* CLOUDC,FTOP,FSFC,DFABS, |
|
./pkg/aim_v23/phy_radiat.F |
111 |
RADSW |
O ICLTOP,CLOUDC,FTOP,FSFC,DFABS, |
|
./pkg/aim_v23/phy_radiat.F |
155 |
RADSW |
_RL CLOUDC(NGP), FTOP(NGP), FSFC(NGP,0:3), DFABS(NGP,NLEV) |
|
./pkg/aim_v23/phy_radiat.F |
305 |
RADSW |
FTOP(J) =FSOL(J) |
|
./pkg/aim_v23/phy_radiat.F |
370 |
RADSW |
FTOP(J)=FTOP(J)-FLUX(J,1) |
|
./pkg/aim_v23/phy_radiat.F |
417 |
RADLW |
& FTOP,FSFC,DFABS, |
|
./pkg/aim_v23/phy_radiat.F |
465 |
RADLW |
_RL FTOP(NGP), FSFC(NGP), DFABS(NGP,NLEV) |
|
./pkg/aim_v23/phy_radiat.F |
521 |
RADLW |
FTOP(J) = 0. |
|
./pkg/aim_v23/phy_radiat.F |
596 |
RADLW |
FTOP(J)=FTOP(J)+FBAND(NINT(TS(J)),0)*ST4S(J) |
|
./pkg/aim_v23/phy_radiat.F |
636 |
RADLW |
FTOP(J)=FTOP(J)+FLUX(J,JB) |
|
./pkg/aim_v23/phy_radiat.F |
641 |
RADLW |
FTOP(J)=FTOP(J)+OZUPP(J) |