File |
Line number |
Procedure |
Code |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
12 |
SWRIO |
. lpnt,imstturb,qliqave,fccave,landtype,xlats,xlons) |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
298 |
SWRIO |
call OPTHK(tdry,plz,plze,swlz,cldtot,cldmxo,landtype,im,jm,lm, |
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
37 |
SWRIO |
integer landtype(im,jm) |
./verification/fizhi-cs-aqualev10/code/fizhi_init_fixed.F |
94 |
FIZHI_INIT_FIXED |
landtype(i,j,bi,bj) = surftype(i,j,1,bi,bj) |
./verification/fizhi-cs-aqualev10/code/fizhi_init_fixed.F |
96 |
FIZHI_INIT_FIXED |
. landtype(i,j,bi,bj) = surftype(i,j,2,bi,bj) |
./verification/fizhi-cs-aqualev10/code/fizhi_init_fixed.F |
97 |
FIZHI_INIT_FIXED |
if(sice(i,j,bi,bj).ne.0.0)landtype(i,j,bi,bj) = 101 |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
111 |
TURBIO |
integer landtype(im,jm) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
8 |
TURBIO |
3 ,tgz,fracland,landtype |
./verification/fizhi-cs-aqualev10/code/do_fizhi.F |
236 |
DO_FIZHI |
. fracland(1,1,bi,bj),landtype(1,1,bi,bj),radswt(1,1,bi,bj), |
./verification/fizhi-cs-aqualev10/code/do_fizhi.F |
54 |
DO_FIZHI |
integer landtype(im2,jm2,Nsxin,Nsyin) |
./verification/fizhi-cs-aqualev10/code/do_fizhi.F |
9 |
DO_FIZHI |
. tgz,sst,sice,phis_var,landtype,fracland,emiss,albnirdr,albnirdf, |
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F |
88 |
FIZHI_INIT_FIXED |
landtype(i,j,bi,bj) = surftype(i,j,1,bi,bj) |
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F |
90 |
FIZHI_INIT_FIXED |
. landtype(i,j,bi,bj) = surftype(i,j,2,bi,bj) |
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F |
91 |
FIZHI_INIT_FIXED |
if(sice(i,j,bi,bj).ne.0.0)landtype(i,j,bi,bj) = 101 |
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
54 |
DO_FIZHI |
integer landtype(im2,jm2,Nsxin,Nsyin) |
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
9 |
DO_FIZHI |
. tgz,sst,sice,phis_var,landtype,fracland,emiss,albnirdr,albnirdf, |
./pkg/fizhi/fizhi_swrad.F |
12 |
SWRIO |
. lpnt,imstturb,qliqave,fccave,landtype,xlats,xlons) |
./pkg/fizhi/fizhi_swrad.F |
297 |
SWRIO |
call OPTHK(tdry,plz,plze,swlz,cldtot,cldmxo,landtype,im,jm,lm, |
./pkg/fizhi/fizhi_swrad.F |
37 |
SWRIO |
integer landtype(im,jm) |
./pkg/fizhi/fizhi_driver.F |
167 |
FIZHI_DRIVER |
. fccavesw,landtype,xlats,xlons ) |
./pkg/fizhi/fizhi_driver.F |
190 |
FIZHI_DRIVER |
. fccavelw,landtype ) |
./pkg/fizhi/fizhi_driver.F |
201 |
FIZHI_DRIVER |
. tgz,fracland,landtype, |
./pkg/fizhi/fizhi_driver.F |
65 |
FIZHI_DRIVER |
integer landtype(im,jm) |
./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_earth_coms.h |
16 |
NO PROCEDURE |
. tgz, landtype, nchptot, nchpland, ityp |
./pkg/fizhi/fizhi_earth_coms.h |
26 |
NO PROCEDURE |
integer landtype(sNx,sNy,Nsx,Nsy) |
./pkg/fizhi/fizhi_init_fixed.F |
95 |
FIZHI_INIT_FIXED |
landtype(i,j,bi,bj) = surftype(i,j,1,bi,bj) |
./pkg/fizhi/fizhi_init_fixed.F |
97 |
FIZHI_INIT_FIXED |
. landtype(i,j,bi,bj) = surftype(i,j,2,bi,bj) |
./pkg/fizhi/fizhi_init_fixed.F |
98 |
FIZHI_INIT_FIXED |
if(sice(i,j,bi,bj).ne.0.0)landtype(i,j,bi,bj) = 101 |
./pkg/fizhi/fizhi_turb.F |
111 |
TURBIO |
integer landtype(im,jm) |
./pkg/fizhi/fizhi_turb.F |
8 |
TURBIO |
3 ,tgz,fracland,landtype |
./pkg/fizhi/fizhi_lwrad.F |
13 |
LWRIO |
. lpnt,imstturb,qliqave,fccave,landtype) |
./pkg/fizhi/fizhi_lwrad.F |
142 |
LWRIO |
call STRIPITINT (landtype,lwi,im*jm,im*jm,istrip,1,nn) |
./pkg/fizhi/fizhi_lwrad.F |
35 |
LWRIO |
integer landtype(im,jm) |
./pkg/fizhi/fizhi_wrapper.F |
142 |
FIZHI_WRAPPER |
. tgz,sst,sice,phis_var,landtype,fracland,emiss,albnirdr,albnirdf, |
./pkg/fizhi/do_fizhi.F |
235 |
DO_FIZHI |
. fracland(1,1,bi,bj),landtype(1,1,bi,bj),radswt(1,1,bi,bj), |
./pkg/fizhi/do_fizhi.F |
54 |
DO_FIZHI |
integer landtype(im2,jm2,Nsxin,Nsyin) |
./pkg/fizhi/do_fizhi.F |
9 |
DO_FIZHI |
. tgz,sst,sice,phis_var,landtype,fracland,emiss,albnirdr,albnirdf, |