Symbol Description Uses
tv 3



File Line number Procedure Code
./pkg/fizhi/fizhi_gwdrag.F 138 GWDRAG
      tv(i,j,L) = tz(i,j,L)*pkz(i,j,L)*(1.+.609*qz(i,j,L))
./pkg/fizhi/fizhi_gwdrag.F 163 GWDRAG
      call STRIPIT ( tv,ts,im*jm,im*jm,istrip,Lm,n )
./pkg/fizhi/fizhi_gwdrag.F 61 GWDRAG
      _RL tv(im,jm,Lm)