| File |
Line number |
Procedure |
Code |
|
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F |
1201 |
GET_LANDFRAC |
subroutine GET_LANDFRAC(im,jm,nSx,nSy,bi,bj,maxtyp,surftype, |
|
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F |
1210 |
GET_LANDFRAC |
integer im,jm,nSx,nSy,bi,bj,maxtyp |
|
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F |
1211 |
GET_LANDFRAC |
integer surftype(im,jm,maxtyp,nSx,nSy) |
|
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F |
1212 |
GET_LANDFRAC |
_RL tilefrac(im,jm,maxtyp,nSx,nSy) |
|
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F |
1223 |
GET_LANDFRAC |
do k=1,maxtyp |
|
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F |
70 |
UPDATE_EARTH_EXPORTS |
call GET_LANDFRAC(im2,jm2,nSx,nSy,bi,bj,maxtyp,surftype,tilefrac, |
|
./verification/fizhi-cs-aqualev10/code/fizhi_init_veg.F |
111 |
FIZHI_INIT_VEG |
do k=1,maxtyp |
|
./verification/fizhi-cs-aqualev10/code/fizhi_init_veg.F |
57 |
FIZHI_INIT_VEG |
integer mythid,im,jm,maxtyp,nchp,Nsx,Nsy,Nxg,Nyg |
|
./verification/fizhi-cs-aqualev10/code/fizhi_init_veg.F |
59 |
FIZHI_INIT_VEG |
integer surftype(im,jm,maxtyp,Nsx,Nsy) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_init_veg.F |
61 |
FIZHI_INIT_VEG |
_RL tilefrac(im,jm,maxtyp,Nsx,Nsy) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_init_veg.F |
79 |
FIZHI_INIT_VEG |
do k = 3,maxtyp |
|
./verification/fizhi-cs-aqualev10/code/fizhi_init_veg.F |
7 |
FIZHI_INIT_VEG |
. maxtyp,nchp,nchptot,nchpland,lons,lats,surftype,tilefrac,igrd, |
|
./verification/fizhi-cs-aqualev10/code/fizhi_init_fixed.F |
84 |
FIZHI_INIT_FIXED |
. nSx*nPx,nSy*nPy,maxtyp,nchp,nchptot,nchpland,lons,lats, |
|
./verification/fizhi-cs-aqualev10/code/fizhi_init_fixed.F |
90 |
FIZHI_INIT_FIXED |
call GET_LANDFRAC(im2,jm2,Nsx,Nsy,bi,bj,maxtyp, |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
118 |
FIZHI_INIT_VEG |
do k=1,maxtyp |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
138 |
FIZHI_INIT_VEG |
do k=1,maxtyp |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
57 |
FIZHI_INIT_VEG |
integer mythid,im,jm,maxtyp,nchp,Nsx,Nsy,Nxg,Nyg |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
59 |
FIZHI_INIT_VEG |
integer surftype(im,jm,maxtyp,Nsx,Nsy) |
|
./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 |
91 |
FIZHI_INIT_VEG |
do k = 3,maxtyp |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F |
78 |
FIZHI_INIT_FIXED |
. nSx*nPx,nSy*nPy,maxtyp,nchp,nchptot,nchpland,lons,lats, |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F |
84 |
FIZHI_INIT_FIXED |
call GET_LANDFRAC(im2,jm2,Nsx,Nsy,bi,bj,maxtyp, |
|
./pkg/fizhi/update_earth_exports.F |
1201 |
GET_LANDFRAC |
subroutine GET_LANDFRAC(im,jm,nSx,nSy,bi,bj,maxtyp,surftype, |
|
./pkg/fizhi/update_earth_exports.F |
1210 |
GET_LANDFRAC |
integer im,jm,nSx,nSy,bi,bj,maxtyp |
|
./pkg/fizhi/update_earth_exports.F |
1211 |
GET_LANDFRAC |
integer surftype(im,jm,maxtyp,nSx,nSy) |
|
./pkg/fizhi/update_earth_exports.F |
1212 |
GET_LANDFRAC |
_RL tilefrac(im,jm,maxtyp,nSx,nSy) |
|
./pkg/fizhi/update_earth_exports.F |
1223 |
GET_LANDFRAC |
do k=1,maxtyp |
|
./pkg/fizhi/update_earth_exports.F |
70 |
UPDATE_EARTH_EXPORTS |
call GET_LANDFRAC(im2,jm2,nSx,nSy,bi,bj,maxtyp,surftype,tilefrac, |
|
./pkg/fizhi/fizhi_init_veg.F |
118 |
FIZHI_INIT_VEG |
call MDS_BYTESWAPR4(im*jm*maxtyp,veg_32(1,1,1,biglobal,bjglobal)) |
|
./pkg/fizhi/fizhi_init_veg.F |
119 |
FIZHI_INIT_VEG |
call MDS_BYTESWAPI4(im*jm*maxtyp,iveg_32(1,1,1,biglobal,bjglobal)) |
|
./pkg/fizhi/fizhi_init_veg.F |
121 |
FIZHI_INIT_VEG |
do k = 1,maxtyp |
|
./pkg/fizhi/fizhi_init_veg.F |
148 |
FIZHI_INIT_VEG |
do k=1,maxtyp |
|
./pkg/fizhi/fizhi_init_veg.F |
168 |
FIZHI_INIT_VEG |
do k=1,maxtyp |
|
./pkg/fizhi/fizhi_init_veg.F |
57 |
FIZHI_INIT_VEG |
integer mythid,im,jm,maxtyp,nchp,Nsx,Nsy,Nxg,Nyg |
|
./pkg/fizhi/fizhi_init_veg.F |
59 |
FIZHI_INIT_VEG |
integer surftype(im,jm,maxtyp,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_init_veg.F |
61 |
FIZHI_INIT_VEG |
_RL tilefrac(im,jm,maxtyp,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_init_veg.F |
69 |
FIZHI_INIT_VEG |
integer*4 iveg_32(im,jm,maxtyp,Nxg,Nyg) |
|
./pkg/fizhi/fizhi_init_veg.F |
70 |
FIZHI_INIT_VEG |
real*4 veg_32(im,jm,maxtyp,Nxg,Nyg) |
|
./pkg/fizhi/fizhi_init_veg.F |
7 |
FIZHI_INIT_VEG |
. maxtyp,nchp,nchptot,nchpland,lons,lats,surftype,tilefrac, |
|
./pkg/fizhi/fizhi_earth_coms.h |
8 |
NO PROCEDURE |
_RL tilefrac(sNx,sNy,maxtyp,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_earth_coms.h |
9 |
NO PROCEDURE |
integer surftype(sNx,sNy,maxtyp,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_init_fixed.F |
85 |
FIZHI_INIT_FIXED |
. nSx*nPx,nSy*nPy,maxtyp,nchp,nchptot,nchpland,lons,lats, |
|
./pkg/fizhi/fizhi_init_fixed.F |
91 |
FIZHI_INIT_FIXED |
call GET_LANDFRAC(im2,jm2,Nsx,Nsy,bi,bj,maxtyp, |
|
./pkg/fizhi/fizhi_land_SIZE.h |
6 |
NO PROCEDURE |
integer nchp, maxtyp |
|
./pkg/fizhi/fizhi_land_SIZE.h |
7 |
NO PROCEDURE |
parameter (maxtyp = 10) |
|
./pkg/fizhi/fizhi_land_SIZE.h |
8 |
NO PROCEDURE |
parameter (nchp = sNx*sNy*maxtyp) |
|
./pkg/fizhi/fizhi_mnc_init.F |
225 |
FIZHI_MNC_INIT |
dim(3) = maxtyp |
|
./pkg/fizhi/fizhi_mnc_init.F |
227 |
FIZHI_MNC_INIT |
ie(3) = maxtyp |
|
./pkg/fizhi/fizhi_wrapper.F |
132 |
FIZHI_WRAPPER |
call GET_LANDFRAC(im2,jm2,Nsx,Nsy,bi,bj,maxtyp, |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
83 |
FIZHI_INIT_VEGSURFTILES |
call GET_LANDFRAC(sNx,sNy,Nsx,Nsy,bi,bj,maxtyp, |