Symbol Description Uses
flux 7



File Line number Procedure Code
./pkg/fizhi/fizhi_swrad.F 464 SWRIO
     .             flux,fluxclr,fdirir,fdifir,dirpar,difpar,
./pkg/fizhi/fizhi_swrad.F 474 SWRIO
      dtsw (i,L) = alf*( flux   (i,L)-flux   (i,L+1) )/pk(i,L)
./pkg/fizhi/fizhi_swrad.F 482 SWRIO
      call PASTE ( flux   (1,1),osr   ,istrip,im*jm,1,nn )
./pkg/fizhi/fizhi_swrad.F 485 SWRIO
      call PASTE ( flux   (1,lm+1),radswg,istrip,im*jm,1,nn )
./pkg/fizhi/fizhi_swrad.F 495 SWRIO
        tstrip(i) = 1.0 - flux(i,lm+1)/
./pkg/fizhi/fizhi_swrad.F 82 SWRIO
      _RL flux(istrip,lm+1)