Symbol Description Uses
FREFL 5


File Line number Procedure Code
./pkg/aim_v23/phy_radiat.F 220 RADSW 
     &     ALBTOP(NGP,NLEV), FREFL(NGP,NLEV), FLUX(NGP,2)
./pkg/aim_v23/phy_radiat.F 259 RADSW 
        FREFL(J,1)=0.
./pkg/aim_v23/phy_radiat.F 387 RADSW 
         FREFL(J,K)=FLUX(J,1)*ALBTOP(J,K)
./pkg/aim_v23/phy_radiat.F 388 RADSW 
         FLUX (J,1)=FLUX(J,1)-FREFL(J,K)
./pkg/aim_v23/phy_radiat.F 432 RADSW 
         FLUX (J,1)=FLUX(J,1)+FREFL(J,K)