Symbol Description Uses
fluxclr 6



File Line number Procedure Code
./pkg/fizhi/fizhi_swrad.F 464 SWRIO
     .             flux,fluxclr,fdirir,fdifir,dirpar,difpar,
./pkg/fizhi/fizhi_swrad.F 475 SWRIO
      dtswc(i,L) = alf*( fluxclr(i,L)-fluxclr(i,L+1) )/pk(i,L)
./pkg/fizhi/fizhi_swrad.F 483 SWRIO
      call PASTE ( fluxclr(1,1),osrclr,istrip,im*jm,1,nn )
./pkg/fizhi/fizhi_swrad.F 486 SWRIO
      call PASTE ( fluxclr(1,lm+1),swgclr,istrip,im*jm,1,nn )
./pkg/fizhi/fizhi_swrad.F 83 SWRIO
      _RL fluxclr(istrip,lm+1)