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 |
468 |
TURBIO |
call STRIP2TILE(uz,igrd,u,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 |
973 |
TURBIO |
call STRIP2TILE(uz(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 |
290 |
MOISTIO |
ugather(indx,L,ntracerin-ptracer+1) = uz(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 |
161 |
GWDRAG |
call STRIPIT ( uz,us,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 |
49 |
GWDRAG |
_RL uz(im,jm,Lm) |
./pkg/fizhi/fizhi_gwdrag.F |
4 |
GWDRAG |
subroutine GWDRAG (myid,pz,pl,ple,dpres,pkz,uz,vz,tz,qz,phis_var, |
./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 |
468 |
TURBIO |
call STRIP2TILE(uz,igrd,u,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 |
943 |
TURBIO |
call STRIP2TILE(uz(1,1,l),igrd,tmpstrip,nchp,ijall, |