| 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 |
125 |
FIZHI_INIT_VEG |
tilefrac(i,j,k,bi,bj) = veg_32(i,j,k,biglobal,bjglobal) |
|
./pkg/fizhi/fizhi_init_veg.F |
152 |
FIZHI_INIT_VEG |
. tilefrac(i,j,k,bi,bj).gt.0.) then |
|
./pkg/fizhi/fizhi_init_veg.F |
156 |
FIZHI_INIT_VEG |
chfr (nchpland(bi,bj),bi,bj) = tilefrac(i,j,k,bi,bj) |
|
./pkg/fizhi/fizhi_init_veg.F |
172 |
FIZHI_INIT_VEG |
. tilefrac(i,j,k,bi,bj).gt.0.) then |
|
./pkg/fizhi/fizhi_init_veg.F |
176 |
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 |
1206 |
GET_LANDFRAC |
& tilefrac,frac) |
|
./pkg/fizhi/update_earth_exports.F |
1216 |
GET_LANDFRAC |
_RL tilefrac(im,jm,maxtyp,nSx,nSy) |
|
./pkg/fizhi/update_earth_exports.F |
1231 |
GET_LANDFRAC |
& (tilefrac(i,j,k,bi,bj).gt.0.0))then |
|
./pkg/fizhi/update_earth_exports.F |
1232 |
GET_LANDFRAC |
frac(i,j) = frac(i,j) + tilefrac(i,j,k,bi,bj) |
|
./pkg/fizhi/update_earth_exports.F |
70 |
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 |
115 |
FIZHI_INIT_VEG |
. tilefrac(i,j,k,bi,bj).gt.0.) then |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F |
119 |
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 |
74 |
FIZHI_INIT_VEG |
tilefrac(i,j,1,bi,bj) = 0.99 |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F |
76 |
FIZHI_INIT_VEG |
tilefrac(i,j,2,bi,bj) = 0.01 |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F |
7 |
FIZHI_INIT_VEG |
. maxtyp,nchp,nchptot,nchpland,lons,lats,surftype,tilefrac,igrd, |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F |
83 |
FIZHI_INIT_VEG |
tilefrac(i,j,k,bi,bj) = 0. |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F |
79 |
FIZHI_INIT_FIXED |
. surftype,tilefrac,igrd,ityp,chfr,chlt,chlon) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F |
85 |
FIZHI_INIT_FIXED |
. surftype,tilefrac,fracland) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
122 |
FIZHI_INIT_VEG |
. tilefrac(i,j,k,bi,bj).gt.0.) then |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
126 |
FIZHI_INIT_VEG |
chfr (nchpland(bi,bj),bi,bj) = tilefrac(i,j,k,bi,bj) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
142 |
FIZHI_INIT_VEG |
. tilefrac(i,j,k,bi,bj).gt.0.) then |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
146 |
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,igrd, |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
80 |
FIZHI_INIT_VEG |
tilefrac(i,j,1,bi,bj) = 0.5 |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
82 |
FIZHI_INIT_VEG |
tilefrac(i,j,2,bi,bj) = 0.5 |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
85 |
FIZHI_INIT_VEG |
tilefrac(i,j,1,bi,bj) = 0.99 |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
87 |
FIZHI_INIT_VEG |
tilefrac(i,j,2,bi,bj) = 0.01 |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
95 |
FIZHI_INIT_VEG |
tilefrac(i,j,k,bi,bj) = 0. |