File |
Line number |
Procedure |
Code |
./pkg/gridalt/make_phys_grid.F |
113 |
MAKE_PHYS_GRID |
numlevphys = Nr - nlevs + ntry + 1 |
./pkg/gridalt/make_phys_grid.F |
238 |
MAKE_PHYS_GRID |
if(nlphys.lt.numlevphys)then |
./pkg/gridalt/make_phys_grid.F |
239 |
MAKE_PHYS_GRID |
nlevs = numlevphys-nlphys |
./pkg/gridalt/make_phys_grid.F |
241 |
MAKE_PHYS_GRID |
do Lnew = nlphys+1,numlevphys |
./pkg/gridalt/make_phys_grid.F |
244 |
MAKE_PHYS_GRID |
nlperdyn(i,j,Nr,bi,bj) = numlevphys |
./pkg/gridalt/make_phys_grid.F |
49 |
MAKE_PHYS_GRID |
integer numlevphys |
./pkg/gridalt/make_phys_grid.F |
7 |
MAKE_PHYS_GRID |
& nSx,nSy,i1,i2,j1,j2,bi,bj,Nrphys,Lbot,dpphys,numlevphys,nlperdyn) |