| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_earth_coms.h |
6 |
NO PROCEDURE |
common /earth_state/ phis_var, tilefrac, surftype |
|
./pkg/fizhi/fizhi_earth_coms.h |
8 |
NO PROCEDURE |
_RL tilefrac(sNx,sNy,maxtyp,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_init_fixed.F |
106 |
FIZHI_INIT_FIXED |
& surftype,tilefrac,igrd,ityp,chfr,chlt,chlon) |
|
./pkg/fizhi/fizhi_init_fixed.F |
112 |
FIZHI_INIT_FIXED |
& surftype,tilefrac,fracland(1,1,bi,bj)) |
|
./pkg/fizhi/fizhi_init_veg.F |
136 |
FIZHI_INIT_VEG |
tilefrac(i,j,k,bi,bj) = veg_32(i,j,k,biglobal,bjglobal) |
|
./pkg/fizhi/fizhi_init_veg.F |
169 |
FIZHI_INIT_VEG |
& tilefrac(i,j,k,bi,bj).gt.0.) then |
|
./pkg/fizhi/fizhi_init_veg.F |
173 |
FIZHI_INIT_VEG |
chfr (nchpland(bi,bj),bi,bj) = tilefrac(i,j,k,bi,bj) |
|
./pkg/fizhi/fizhi_init_veg.F |
187 |
FIZHI_INIT_VEG |
& tilefrac(i,j,k,bi,bj).gt.0.) then |
|
./pkg/fizhi/fizhi_init_veg.F |
191 |
FIZHI_INIT_VEG |
chfr (nchptot(bi,bj),bi,bj) = tilefrac(i,j,k,bi,bj) |
|
./pkg/fizhi/fizhi_init_veg.F |
61 |
FIZHI_INIT_VEG |
_RL tilefrac(im,jm,maxtyp,nSx,nSy) |
|
./pkg/fizhi/fizhi_init_veg.F |
7 |
FIZHI_INIT_VEG |
& maxtyp,nchp,nchptot,nchpland,lons,lats,surftype,tilefrac, |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
95 |
FIZHI_INIT_VEGSURFTILES |
. surftype,tilefrac,fracland(1,1,bi,bj)) |
|
./pkg/fizhi/fizhi_wrapper.F |
230 |
FIZHI_WRAPPER |
& surftype,tilefrac,fracland(1,1,bi,bj)) |
|
./pkg/fizhi/update_earth_exports.F |
1222 |
GET_LANDFRAC |
& tilefrac,frac) |
|
./pkg/fizhi/update_earth_exports.F |
1232 |
GET_LANDFRAC |
_RL tilefrac(im,jm,maxtyp,nSx,nSy) |
|
./pkg/fizhi/update_earth_exports.F |
1247 |
GET_LANDFRAC |
& (tilefrac(i,j,k,bi,bj).gt.0.0))then |
|
./pkg/fizhi/update_earth_exports.F |
1248 |
GET_LANDFRAC |
frac(i,j) = frac(i,j) + tilefrac(i,j,k,bi,bj) |
|
./pkg/fizhi/update_earth_exports.F |
82 |
UPDATE_EARTH_EXPORTS |
call GET_LANDFRAC(im2,jm2,nSx,nSy,bi,bj,maxtyp,surftype,tilefrac, |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F |
85 |
FIZHI_INIT_FIXED |
& surftype,tilefrac,igrd,ityp,chfr,chlt,chlon) |
|
./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_veg.F |
123 |
FIZHI_INIT_VEG |
& tilefrac(i,j,k,bi,bj).gt.0.) then |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F |
127 |
FIZHI_INIT_VEG |
chfr (nchptot(bi,bj),bi,bj) = tilefrac(i,j,k,bi,bj) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F |
61 |
FIZHI_INIT_VEG |
_RL tilefrac(im,jm,maxtyp,nSx,nSy) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F |
78 |
FIZHI_INIT_VEG |
tilefrac(i,j,1,bi,bj) = 0.99 _d 0 |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F |
7 |
FIZHI_INIT_VEG |
& maxtyp,nchp,nchptot,nchpland,lons,lats,surftype,tilefrac, |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F |
80 |
FIZHI_INIT_VEG |
tilefrac(i,j,2,bi,bj) = 0.01 _d 0 |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F |
87 |
FIZHI_INIT_VEG |
tilefrac(i,j,k,bi,bj) = 0. |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F |
85 |
FIZHI_INIT_FIXED |
& surftype,tilefrac,igrd,ityp,chfr,chlt,chlon) |
|
./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_veg.F |
100 |
FIZHI_INIT_VEG |
tilefrac(i,j,k,bi,bj) = 0. |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
133 |
FIZHI_INIT_VEG |
& tilefrac(i,j,k,bi,bj).gt.0.) then |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
137 |
FIZHI_INIT_VEG |
chfr (nchpland(bi,bj),bi,bj) = tilefrac(i,j,k,bi,bj) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
151 |
FIZHI_INIT_VEG |
& tilefrac(i,j,k,bi,bj).gt.0.) then |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
155 |
FIZHI_INIT_VEG |
chfr (nchptot(bi,bj),bi,bj) = tilefrac(i,j,k,bi,bj) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
61 |
FIZHI_INIT_VEG |
_RL tilefrac(im,jm,maxtyp,nSx,nSy) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
7 |
FIZHI_INIT_VEG |
& maxtyp,nchp,nchptot,nchpland,lons,lats,surftype,tilefrac, |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
85 |
FIZHI_INIT_VEG |
tilefrac(i,j,1,bi,bj) = 0.5 _d 0 |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
87 |
FIZHI_INIT_VEG |
tilefrac(i,j,2,bi,bj) = 0.5 _d 0 |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
90 |
FIZHI_INIT_VEG |
tilefrac(i,j,1,bi,bj) = 0.99 _d 0 |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
92 |
FIZHI_INIT_VEG |
tilefrac(i,j,2,bi,bj) = 0.01 _d 0 |