| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/do_fizhi.F |
241 |
DO_FIZHI |
& fracland(1,1,bi,bj),landtype(1,1,bi,bj),radswt(1,1,bi,bj), |
|
./pkg/fizhi/do_fizhi.F |
56 |
DO_FIZHI |
_RL fracland(im2,jm2,nSxIn,nSyIn),emiss(im2,jm2,10,nSxIn,nSyIn) |
|
./pkg/fizhi/do_fizhi.F |
9 |
DO_FIZHI |
& tgz,sst,sice,phis_var,landtype,fracland,emiss,albnirdr,albnirdf, |
|
./pkg/fizhi/fizhi_driver.F |
206 |
FIZHI_DRIVER |
& tgz,fracland,landtype, |
|
./pkg/fizhi/fizhi_driver.F |
66 |
FIZHI_DRIVER |
_RL radswt(im,jm), fracland(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_init_fixed.F |
112 |
FIZHI_INIT_FIXED |
& surftype,tilefrac,fracland(1,1,bi,bj)) |
|
./pkg/fizhi/fizhi_init_fixed.F |
116 |
FIZHI_INIT_FIXED |
if(fracland(i,j,bi,bj).ge.0.3.and.surftype(i,j,1,bi,bj).ge.100) |
|
./pkg/fizhi/fizhi_init_fixed.F |
157 |
FIZHI_INIT_FIXED |
if(fracland(i,j,bi,bj).gt.0.3) then |
|
./pkg/fizhi/fizhi_init_fixed.F |
51 |
FIZHI_INIT_FIXED |
_RL fracland(sNx,sNy,nSx,nSy) |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
111 |
FIZHI_INIT_VEGSURFTILES |
if (tempgrid(i,j).gt.1.e14 .and. fracland(i,j,bi,bj).gt.0.0001) |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
124 |
FIZHI_INIT_VEGSURFTILES |
if (tempgrid(i,j).gt.1.e14 .and. fracland(i,j,bi,bj).gt.0.0001) |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
137 |
FIZHI_INIT_VEGSURFTILES |
if (tempgrid(i,j).gt.1.e14 .and. fracland(i,j,bi,bj).gt.0.0001) |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
150 |
FIZHI_INIT_VEGSURFTILES |
if (tempgrid(i,j).gt.1.e14 .and. fracland(i,j,bi,bj).gt.0.0001) |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
163 |
FIZHI_INIT_VEGSURFTILES |
if (tempgrid(i,j).gt.1.e14 .and. fracland(i,j,bi,bj).gt.0.0001) |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
176 |
FIZHI_INIT_VEGSURFTILES |
if (tempgrid(i,j).gt.1.e14 .and. fracland(i,j,bi,bj).gt.0.0001) |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
189 |
FIZHI_INIT_VEGSURFTILES |
if (tempgrid(i,j).gt.1.e14 .and. fracland(i,j,bi,bj).gt.0.0001) |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
52 |
FIZHI_INIT_VEGSURFTILES |
_RL fracland(sNx,sNy,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
95 |
FIZHI_INIT_VEGSURFTILES |
. surftype,tilefrac,fracland(1,1,bi,bj)) |
|
./pkg/fizhi/fizhi_turb.F |
1149 |
TURBIO |
call MSC2GRD(igrd,chfr,dumsc(1,L),nchp,nchptot,fracland, |
|
./pkg/fizhi/fizhi_turb.F |
1151 |
TURBIO |
call MSC2GRD(igrd,chfr,dvmsc(1,L),nchp,nchptot,fracland, |
|
./pkg/fizhi/fizhi_turb.F |
1153 |
TURBIO |
call MSC2GRD(igrd,chfr,dtmsc(1,L),nchp,nchptot,fracland, |
|
./pkg/fizhi/fizhi_turb.F |
1156 |
TURBIO |
call MSC2GRD(igrd,chfr,dqmsc(1,L,nt),nchp,nchptot,fracland, |
|
./pkg/fizhi/fizhi_turb.F |
1159 |
TURBIO |
call MSC2GRD(igrd,chfr, tke(1,L),nchp,nchptot,fracland, |
|
./pkg/fizhi/fizhi_turb.F |
1162 |
TURBIO |
call MSC2GRD(igrd,chfr, fccmsc(1,L),nchp,nchptot,fracland, |
|
./pkg/fizhi/fizhi_turb.F |
1164 |
TURBIO |
call MSC2GRD(igrd,chfr,qliqmsc(1,L),nchp,nchptot,fracland, |
|
./pkg/fizhi/fizhi_turb.F |
1192 |
TURBIO |
call MSC2GRD(igrd,chfr,tground ,nchp,nchptot,fracland,tgz ,im,jm) |
|
./pkg/fizhi/fizhi_turb.F |
126 |
TURBIO |
_RL tgz(im*jm,1),fracland(im*jm,1) |
|
./pkg/fizhi/fizhi_turb.F |
29 |
TURBIO |
3 ,tgz,fracland,landtype |
|
./pkg/fizhi/fizhi_turb.F |
431 |
TURBIO |
call MSC2GRD (igrd,chfr,qice,nchp,nchptot,fracland,tmpdiag,im,jm) |
|
./pkg/fizhi/fizhi_wrapper.F |
230 |
FIZHI_WRAPPER |
& surftype,tilefrac,fracland(1,1,bi,bj)) |
|
./pkg/fizhi/fizhi_wrapper.F |
253 |
FIZHI_WRAPPER |
& fracland(1,1,bi,bj),sNx,sNy,Nrphys,slp) |
|
./pkg/fizhi/fizhi_wrapper.F |
267 |
FIZHI_WRAPPER |
& tgz,sst,sice,phis_var,landtype,fracland,emiss,albnirdr,albnirdf, |
|
./pkg/fizhi/fizhi_wrapper.F |
47 |
FIZHI_WRAPPER |
_RL fracland(sNx,sNy,nSx,nSy) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F |
47 |
FIZHI_INIT_FIXED |
_RL fracland(sNx,sNy,nSx,nSy) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F |
91 |
FIZHI_INIT_FIXED |
& surftype,tilefrac,fracland(1,1,bi,bj)) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F |
95 |
FIZHI_INIT_FIXED |
if(fracland(i,j,bi,bj).ge.0.3.and.surftype(i,j,1,bi,bj).ge.100) |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
56 |
DO_FIZHI |
_RL fracland(im2,jm2,nSxin,nSyin),emiss(im2,jm2,10,nSxin,nSyin) |
|
./verification/fizhi-gridalt-hs/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 |
47 |
FIZHI_INIT_FIXED |
_RL fracland(sNx,sNy,nSx,nSy) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F |
91 |
FIZHI_INIT_FIXED |
& surftype,tilefrac,fracland(1,1,bi,bj)) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F |
95 |
FIZHI_INIT_FIXED |
if(fracland(i,j,bi,bj).ge.0.3.and.surftype(i,j,1,bi,bj).ge.100) |
|
./pkg/atm_phys/atm_phys_driver.F |
121 |
ATM_PHYS_DRIVER |
_RL fracland(sNx,sNy) |
|
./pkg/atm_phys/atm_phys_driver.F |
344 |
ATM_PHYS_DRIVER |
fracland = 0.0 |
|
./pkg/atm_phys/atm_phys_driver.F |
347 |
ATM_PHYS_DRIVER |
I fracland(:,:), pHalf3d, pFull3d, zHalf3d, zFull3d, |