| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_driver.F |
166 |
FIZHI_DRIVER |
& p,pl,ple,dpres,pkht,pkl,t,chemq,chemo3,co2, |
|
./pkg/fizhi/fizhi_driver.F |
189 |
FIZHI_DRIVER |
& p,pl,ple,dpres,pkht,pkl,t,chemq,chemo3,co2, |
|
./pkg/fizhi/fizhi_driver.F |
204 |
FIZHI_DRIVER |
& ptop,p,u,v,t,q,ntracer,ptracer,pl,ple,dpres,pkht,pkl, |
|
./pkg/fizhi/fizhi_driver.F |
226 |
FIZHI_DRIVER |
call RAYLEIGH(myid,pl,pkl,pkht,surfz,u,v,t,q,im,jm,lm, |
|
./pkg/fizhi/fizhi_driver.F |
247 |
FIZHI_DRIVER |
& p,pl,ple,dpres,pkht,pkl,u,v,t,q,bi,bj,ntracer,ptracer,qq, |
|
./pkg/fizhi/fizhi_driver.F |
63 |
FIZHI_DRIVER |
_RL pkht(im,jm,lm+1) |
|
./pkg/fizhi/fizhi_driver.F |
7 |
FIZHI_DRIVER |
& p,u,v,t,q,pl,ple,dpres,pkht,pkl,surfz,fracland,landtype,radswt, |
|
./pkg/fizhi/fizhi_lwrad.F |
23 |
LWRIO |
_RL dpres(im,jm,lm),pkht(im,jm,lm+1),pkz(im,jm,lm) |
|
./pkg/fizhi/fizhi_lwrad.F |
8 |
LWRIO |
. pz,plz,plze,dpres,pkht,pkz,tz,qz,oz, |
|
./pkg/fizhi/fizhi_moist.F |
24 |
MOISTIO |
_RL pkht(im,jm,lm+1),pkl(im,jm,lm) |
|
./pkg/fizhi/fizhi_moist.F |
268 |
MOISTIO |
pkegather(indx,lm+1) = pkht(i,j,lm+1) |
|
./pkg/fizhi/fizhi_moist.F |
285 |
MOISTIO |
pkegather(indx,L) = pkht(i,j,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_swrad.F |
23 |
SWRIO |
_RL pkht(im,jm,lm+1),pkz(im,jm,lm) |
|
./pkg/fizhi/fizhi_swrad.F |
7 |
SWRIO |
. pz,plz,plze,dpres,pkht,pkz,tz,qz,oz,co2, |
|
./pkg/fizhi/fizhi_turb.F |
1170 |
TURBIO |
call CTEI ( tz,qz,fcctmp,qliqtmp,plz,pkz,pkht,im*jm,nlay ) |
|
./pkg/fizhi/fizhi_turb.F |
1204 |
TURBIO |
tmpdiag(i,1) = tz(i,1,nlay) * pkht(i,1,nlay) |
|
./pkg/fizhi/fizhi_turb.F |
123 |
TURBIO |
_RL pkht(im*jm,1,nlay+1),pkz(im*jm,1,nlay) |
|
./pkg/fizhi/fizhi_turb.F |
28 |
TURBIO |
2 ,plz,plze,dpres,pkht,pkz,ctmt,xxmt,yymt,zetamt,xlmt,khmt,tke |
|
./pkg/fizhi/fizhi_turb.F |
449 |
TURBIO |
call STRIP2TILE(pkht,igrd,pke,nchp,ijall,istrip,nlay+1,nn) |