File |
Line number |
Procedure |
Code |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
104 |
TURBIO |
_RL pz(im,jm),uz(im,jm,nlay),vz(im,jm,nlay),tz(im,jm,nlay) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
469 |
TURBIO |
call STRIP2TILE(vz,igrd,v,nchp,ijall,istrip,nlay,nn) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
6 |
TURBIO |
1 ,ndturb,nltop,ptop, pz, uz, vz, tz, qz, ntracers,ptracers |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
980 |
TURBIO |
call STRIP2TILE(vz(1,1,l),igrd,tmpstrip,nchp,ijall, |
./pkg/fizhi/fizhi_moist.F |
26 |
MOISTIO |
_RL uz(im,jm,lm),vz(im,jm,lm) |
./pkg/fizhi/fizhi_moist.F |
291 |
MOISTIO |
ugather(indx,L,ntracerin-ptracer+2) = vz(pblindex(indx),1,L) |
./pkg/fizhi/fizhi_moist.F |
7 |
MOISTIO |
. pz,plz,plze,dpres,pkht,pkl,uz,vz,tz,qz,bi,bj,ntracerin,ptracer, |
./pkg/fizhi/fizhi_gwdrag.F |
162 |
GWDRAG |
call STRIPIT ( vz,vs,im*jm,im*jm,istrip,Lm,n ) |
./pkg/fizhi/fizhi_gwdrag.F |
191 |
GWDRAG |
dragt(i,j,L) = -( uz(i,j,L)*dragu(i,j,L)+vz(i,j,L)*dragv(i,j,L) ) |
./pkg/fizhi/fizhi_gwdrag.F |
4 |
GWDRAG |
subroutine GWDRAG (myid,pz,pl,ple,dpres,pkz,uz,vz,tz,qz,phis_var, |
./pkg/fizhi/fizhi_gwdrag.F |
50 |
GWDRAG |
_RL vz(im,jm,Lm) |
./pkg/fizhi/fizhi_turb.F |
104 |
TURBIO |
_RL pz(im,jm),uz(im,jm,nlay),vz(im,jm,nlay),tz(im,jm,nlay) |
./pkg/fizhi/fizhi_turb.F |
469 |
TURBIO |
call STRIP2TILE(vz,igrd,v,nchp,ijall,istrip,nlay,nn) |
./pkg/fizhi/fizhi_turb.F |
6 |
TURBIO |
1 ,ndturb,nltop,ptop, pz, uz, vz, tz, qz, ntracers,ptracers |
./pkg/fizhi/fizhi_turb.F |
950 |
TURBIO |
call STRIP2TILE(vz(1,1,l),igrd,tmpstrip,nchp,ijall, |