File |
Line number |
Procedure |
Code |
./pkg/gridalt/make_phys_grid.F |
107 |
MAKE_PHYS_GRID |
numlevphys = Nr - nlevs + ntry + 1 |
./pkg/gridalt/make_phys_grid.F |
232 |
MAKE_PHYS_GRID |
if(nlphys.lt.numlevphys)then |
./pkg/gridalt/make_phys_grid.F |
233 |
MAKE_PHYS_GRID |
nlevs = numlevphys-nlphys |
./pkg/gridalt/make_phys_grid.F |
235 |
MAKE_PHYS_GRID |
do Lnew = nlphys+1,numlevphys |
./pkg/gridalt/make_phys_grid.F |
238 |
MAKE_PHYS_GRID |
nlperdyn(i,j,Nr,bi,bj) = numlevphys |
./pkg/gridalt/make_phys_grid.F |
48 |
MAKE_PHYS_GRID |
integer numlevphys |
./pkg/gridalt/make_phys_grid.F |
5 |
MAKE_PHYS_GRID |
. Nsx,Nsy,i1,i2,j1,j2,bi,bj,Nrphys,Lbot,dpphys,numlevphys,nlperdyn) |