Symbol Description Uses
DTRAD 3



File Line number Procedure Code
./pkg/fizhi/fizhi_lwrad.F 264 LWRIO
      DTRAD (I,L) = ple(i,lm+1) * DTRAD (I,L)/pk(I,L)
./pkg/fizhi/fizhi_lwrad.F 270 LWRIO
      CALL PASTE ( DTRAD ,DTRADLW ,ISTRIP,im*jm,lm,NN )