Symbol Description Uses
dtrad 2


File Line number Procedure Code
./pkg/fizhi/fizhi_lwrad.F 225 LWRIO 
         dtrad(i,L) = (   flx(i,L)-   flx(i,L+1))*adelpl(i,L)
./pkg/fizhi/fizhi_lwrad.F 50 LWRIO 
      _RL dtrad(istrip,lm),dtradc(istrip,lm)