Symbol Description Uses
dptry_accum 5



File Line number Procedure Code
./pkg/gridalt/make_phys_grid.F 109 MAKE_PHYS_GRID
       dptry_accum(1) = dptry(1)
./pkg/gridalt/make_phys_grid.F 111 MAKE_PHYS_GRID
        dptry_accum(Lnew) = dptry_accum(Lnew-1) + dptry(Lnew)
./pkg/gridalt/make_phys_grid.F 124 MAKE_PHYS_GRID
     . (dptry_accum(Lnew).gt.(hfacC(i,j,Lbotij,bi,bj)*drF(Lbotij))))then
./pkg/gridalt/make_phys_grid.F 62 MAKE_PHYS_GRID
       _RL dptry_accum(15)