| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/do_fizhi.F |
129 |
DO_FIZHI |
_RL qq(sNx,sNy,Nrphys,Nsx,Nsy) |
|
./pkg/fizhi/do_fizhi.F |
158 |
DO_FIZHI |
common /saver/ qq |
|
./pkg/fizhi/do_fizhi.F |
264 |
DO_FIZHI |
. fccavesw,fccavelw,qq(1,1,1,bi,bj)) |
|
./pkg/fizhi/do_fizhi.F |
310 |
DO_FIZHI |
call FIZHI_STEP_DIAG(myid,p,u,v,t,q,qq,pkl,dpres, |
|
./pkg/fizhi/fizhi_driver.F |
209 |
FIZHI_DRIVER |
. imstturblw,imstturbsw,qliqavelw,qliqavesw,fccavelw,fccavesw,qq, |
|
./pkg/fizhi/fizhi_driver.F |
20 |
FIZHI_DRIVER |
. qliqavelw,fccavesw,fccavelw,qq) |
|
./pkg/fizhi/fizhi_driver.F |
244 |
FIZHI_DRIVER |
. p,pl,ple,dpres,pkht,pkl,u,v,t,q,bi,bj,ntracer,ptracer,qq, |
|
./pkg/fizhi/fizhi_driver.F |
97 |
FIZHI_DRIVER |
_RL qq(im,jm,lm) |
|
./pkg/fizhi/fizhi_step_diag.F |
19 |
FIZHI_STEP_DIAG |
_RL qq(im2,jm2,Nrphys,Nbi,Nbj),pk(im2,jm2,Nrphys,Nbi,Nbj) |
|
./pkg/fizhi/fizhi_step_diag.F |
311 |
FIZHI_STEP_DIAG |
tmpdiag(i,j) = qq(i,j,L,bi,bj) |
|
./pkg/fizhi/fizhi_step_diag.F |
5 |
FIZHI_STEP_DIAG |
subroutine FIZHI_STEP_DIAG(myid,p,uphy,vphy,thphy,sphy,qq,pk,dp, |
|
./pkg/fizhi/fizhi_turb.F |
223 |
TURBIO |
_RL pk(istrip,nlay), qq(istrip,nlay), p(istrip,nlay) |
|
./pkg/fizhi/fizhi_turb.F |
2658 |
TRBFLX |
qqcolmin(i) = qq(i,nlev)*0.1 |
|
./pkg/fizhi/fizhi_turb.F |
2659 |
TRBFLX |
qqcolmax(i) = qq(i,nlev) |
|
./pkg/fizhi/fizhi_turb.F |
2664 |
TRBFLX |
IF ( (qq(i,l).gt.qqcolmax(I)).and.(levpbl(i).eq.nlev))then |
|
./pkg/fizhi/fizhi_turb.F |
2665 |
TRBFLX |
qqcolmax(i) = qq(i,l) |
|
./pkg/fizhi/fizhi_turb.F |
2668 |
TRBFLX |
if((qq(i,l).lt.qqcolmin(i)).and.(levpbl(i).eq.nlev)) |
|
./pkg/fizhi/fizhi_turb.F |
2676 |
TRBFLX |
1 ( (ple(i,lp+2)-ple(i,lp+1))*(qq(i,lp+1)-qqcolmin(i)) |
|
./pkg/fizhi/fizhi_turb.F |
2677 |
TRBFLX |
2 / (qq(i,lp+1)-qq(i,lp)) ) ) * aitr |
|
./pkg/fizhi/fizhi_turb.F |
2680 |
TRBFLX |
1 ( (ple(i,2)-ple(i,1))*(qq(i,1)-qqcolmin(i)) |
|
./pkg/fizhi/fizhi_turb.F |
2681 |
TRBFLX |
2 / qq(i,1) ) ) * aitr |
|
./pkg/fizhi/fizhi_turb.F |
509 |
TURBIO |
call STRIPIT (tke,qq,nchptot,nchp,istrip,nlay-1,nn) |
|
./pkg/fizhi/fizhi_turb.F |
645 |
TURBIO |
call TRBFLX(nn,th,thv,sh,u,v,qq,p,pe,pk,pke,dpstr,stwatr,stz0, |
|
./pkg/fizhi/fizhi_turb.F |
654 |
TURBIO |
call PASTIT (qq,tke,istrip,nchp,nchptot,nlay,nn) |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
129 |
DO_FIZHI |
_RL qq(sNx,sNy,Nrphys,Nsx,Nsy) |