Symbol Description Uses
dtradc 2


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