Symbol Description Uses
thindp 5



File Line number Procedure Code
./pkg/gridalt/make_phys_grid.F 240 MAKE_PHYS_GRID
        dpphys(i,j,nlphys,bi,bj)=dpphys(i,j,nlphys,bi,bj)-thindp*nlevs
./pkg/gridalt/make_phys_grid.F 242 MAKE_PHYS_GRID
         dpphys(i,j,Lnew,bi,bj) = thindp
./pkg/gridalt/make_phys_grid.F 73 MAKE_PHYS_GRID
       _RL thindp
./pkg/gridalt/make_phys_grid.F 92 MAKE_PHYS_GRID
       thindp=100.
./pkg/gridalt/make_phys_grid.F 93 MAKE_PHYS_GRID
       if(Nr.eq.70)thindp=0.02