| File |
Line number |
Procedure |
Code |
|
./pkg/gridalt/make_phys_grid.F |
141 |
MAKE_PHYS_GRID |
dpphys(i,j,nlphys,bi,bj) = dptry(Lnew) |
|
./pkg/gridalt/make_phys_grid.F |
150 |
MAKE_PHYS_GRID |
dpphys(i,j,nlphys,bi,bj) = |
|
./pkg/gridalt/make_phys_grid.F |
154 |
MAKE_PHYS_GRID |
dpphys(i,j,nlphys,bi,bj) = dpphys(i,j,nlphys,bi,bj) + |
|
./pkg/gridalt/make_phys_grid.F |
174 |
MAKE_PHYS_GRID |
dpphys(i,j,nlphys,bi,bj) = dptry(Lnew) |
|
./pkg/gridalt/make_phys_grid.F |
185 |
MAKE_PHYS_GRID |
dpphys(i,j,nlphys,bi,bj) = |
|
./pkg/gridalt/make_phys_grid.F |
190 |
MAKE_PHYS_GRID |
dpphys(i,j,nlphys,bi,bj) = dpphys(i,j,nlphys,bi,bj) + |
|
./pkg/gridalt/make_phys_grid.F |
203 |
MAKE_PHYS_GRID |
dpphys(i,j,nlphys,bi,bj) = hfacC(i,j,L-1,bi,bj)*drF(L-1) |
|
./pkg/gridalt/make_phys_grid.F |
213 |
MAKE_PHYS_GRID |
dpphys(i,j,nlphys,bi,bj) = hfacC(i,j,L-1,bi,bj)*drF(L-1) |
|
./pkg/gridalt/make_phys_grid.F |
216 |
MAKE_PHYS_GRID |
dpphys(i,j,nlphys,bi,bj) = hfacC(i,j,L,bi,bj)*drF(L) |
|
./pkg/gridalt/make_phys_grid.F |
219 |
MAKE_PHYS_GRID |
dpphys(i,j,nlphys,bi,bj) = hfacC(i,j,L,bi,bj)*drF(L) |
|
./pkg/gridalt/make_phys_grid.F |
225 |
MAKE_PHYS_GRID |
dpphys(i,j,nlphys,bi,bj) = hfacC(i,j,L,bi,bj)*drF(L) |
|
./pkg/gridalt/make_phys_grid.F |
234 |
MAKE_PHYS_GRID |
dpphys(i,j,nlphys,bi,bj) = dpphys(i,j,nlphys,bi,bj)-100. * nlevs |
|
./pkg/gridalt/make_phys_grid.F |
236 |
MAKE_PHYS_GRID |
dpphys(i,j,Lnew,bi,bj) = 100. |
|
./pkg/gridalt/make_phys_grid.F |
50 |
MAKE_PHYS_GRID |
_RL dpphys(im1:im2,jm1:jm2,Nrphys,Nsx,Nsy) |
|
./pkg/gridalt/make_phys_grid.F |
5 |
MAKE_PHYS_GRID |
. Nsx,Nsy,i1,i2,j1,j2,bi,bj,Nrphys,Lbot,dpphys,numlevphys,nlperdyn) |
|
./pkg/gridalt/gridalt_mapping.h |
11 |
NO PROCEDURE |
common /gridalt_mapping/ nlperdyn,dpphys0,dpphys, |
|
./pkg/gridalt/gridalt_mapping.h |
9 |
NO PROCEDURE |
_RL dpphys(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nrphys,nSx,nSy) |
|
./pkg/gridalt/gridalt_update.F |
55 |
GRIDALT_UPDATE |
dpphys(i,j,L,bi,bj) = dpphys0(i,j,L,bi,bj) * |
|
./pkg/gridalt/gridalt_update.F |
75 |
GRIDALT_UPDATE |
temparr(i,j,L,bi,bj) = dpphys(i,j,L,bi,bj) * 1.e-2 |
|
./pkg/diagnostics/diagstats_local.F |
327 |
DIAGSTATS_LM_CALC |
I dpphys(1-Olx,1-Oly,kl,bi,bj), arrArea, |
|
./pkg/fizhi/step_fizhi_fg.F |
88 |
STEP_FIZHI_FG |
. jm1,jm2,bi,bj,dpphys,sphy) |
|
./pkg/fizhi/step_fizhi_corr.F |
100 |
STEP_FIZHI_CORR |
pephy(i,j,L,bi,bj)=pephy(i,j,L-1,bi,bj)-dpphys(i,j,L-1,bi,bj) |
|
./pkg/fizhi/step_fizhi_corr.F |
289 |
STEP_FIZHI_CORR |
. jdim1,jdim2,bi,bj,dpphys,sphy) |
|
./pkg/fizhi/update_chemistry_exports.F |
59 |
UPDATE_CHEMISTRY_EXPORTS |
pephy(i,j,LL,bi,bj)=pephy(i,j,LL+1,bi,bj)-dpphys(i,j,L-1,bi,bj) |
|
./pkg/fizhi/fizhi_wrapper.F |
69 |
FIZHI_WRAPPER |
pephy(i,j,L,bi,bj)=pephy(i,j,L-1,bi,bj)-dpphys(i,j,L-1,bi,bj) |