File |
Line number |
Procedure |
Code |
./pkg/fizhi/update_chemistry_exports.F |
140 |
INTERP_QZ |
. irun,bi,bj,xlat,nlevs,pres,qz_in,qz_out ) |
./pkg/fizhi/update_chemistry_exports.F |
164 |
INTERP_QZ |
integer irun,nlevs |
./pkg/fizhi/update_chemistry_exports.F |
166 |
INTERP_QZ |
_RL pres (irun,nlevs) |
./pkg/fizhi/update_chemistry_exports.F |
167 |
INTERP_QZ |
_RL qz_in (irun,nlevs) |
./pkg/fizhi/update_chemistry_exports.F |
168 |
INTERP_QZ |
_RL qz_out(irun,nlevs) |
./pkg/fizhi/update_chemistry_exports.F |
179 |
INTERP_QZ |
_RL qz_clim(irun,nlevs) |
./pkg/fizhi/update_chemistry_exports.F |
226 |
INTERP_QZ |
DO 40 L2 = 1,nlevs |
./pkg/fizhi/update_chemistry_exports.F |
262 |
INTERP_QZ |
do k= 1, nlevs |
./pkg/fizhi/update_chemistry_exports.F |
279 |
INTERP_OZ |
. irun,bi,bj,xlat,nlevs,plevs,ozrad) |
./pkg/fizhi/update_chemistry_exports.F |
295 |
INTERP_OZ |
integer nozlevs,nozlats,irun,nlevs |
./pkg/fizhi/update_chemistry_exports.F |
299 |
INTERP_OZ |
_RL plevs(irun,nlevs) |
./pkg/fizhi/update_chemistry_exports.F |
300 |
INTERP_OZ |
_RL ozrad(irun,nlevs) |
./pkg/gridalt/make_phys_grid.F |
107 |
MAKE_PHYS_GRID |
nlevs = 0 |
./pkg/gridalt/make_phys_grid.F |
111 |
MAKE_PHYS_GRID |
if(dpstar_accum.le.bot_thick) nlevs = nlevs+1 |
./pkg/gridalt/make_phys_grid.F |
113 |
MAKE_PHYS_GRID |
numlevphys = Nr - nlevs + ntry + 1 |
./pkg/gridalt/make_phys_grid.F |
239 |
MAKE_PHYS_GRID |
nlevs = numlevphys-nlphys |
./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 |
72 |
MAKE_PHYS_GRID |
integer nlbotmax, nstart, nlevs, nlphys, ndone |
./pkg/diagnostics/diag_vegtile_fill.F |
52 |
DIAG_VEGTILE_FILL |
_RL field(ib,nlevs), chfr(ib) |
./pkg/diagnostics/diag_vegtile_fill.F |
69 |
DIAG_VEGTILE_FILL |
_RL gridField(sNx*sNy,nlevs), gridFrac(sNx*sNy) |
./pkg/diagnostics/diagnostics_set_levels.F |
64 |
DIAGNOSTICS_SET_LEVELS |
INTEGER nlevs, nGroundLev |
./pkg/diagnostics/diagnostics_set_levels.F |
82 |
DIAGNOSTICS_SET_LEVELS |
nlevs = MAX(Nr,Nrphys) |
./pkg/diagnostics/diagnostics_set_levels.F |
97 |
DIAGNOSTICS_SET_LEVELS |
kdiag(n) = nlevs |
./pkg/diagnostics/diagnostics_set_levels.F |
99 |
DIAGNOSTICS_SET_LEVELS |
kdiag(n) = nlevs - 1 |