| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/do_fizhi.F |
10 |
DO_FIZHI |
& albvisdr,albvisdf,ityp,chfr,alai,agrn,igrd,chlat,chlon, |
|
./pkg/fizhi/do_fizhi.F |
244 |
DO_FIZHI |
& chfr(1,bi,bj),ityp(1,bi,bj),tcanopy(1,bi,bj),tdeep(1,bi,bj), |
|
./pkg/fizhi/do_fizhi.F |
59 |
DO_FIZHI |
_RL chfr(nchp,nSxIn,nSyIn),alai(nchp,nSxIn,nSyIn) |
|
./pkg/fizhi/fizhi_driver.F |
208 |
FIZHI_DRIVER |
& nchp,nchptot,nchpland,chfr,chlat,chlon,igrd,ityp, |
|
./pkg/fizhi/fizhi_driver.F |
69 |
FIZHI_DRIVER |
_RL chlat(nchp),chlon(nchp),chfr(nchp) |
|
./pkg/fizhi/fizhi_driver.F |
9 |
FIZHI_DRIVER |
& nchp,chlat,chlon,igrd,nchptot,nchpland,chfr,ityp, |
|
./pkg/fizhi/fizhi_earth_coms.h |
14 |
NO PROCEDURE |
. chfr, alai, agrn, |
|
./pkg/fizhi/fizhi_earth_coms.h |
17 |
NO PROCEDURE |
_RL chfr(nchp,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_init_fixed.F |
106 |
FIZHI_INIT_FIXED |
& surftype,tilefrac,igrd,ityp,chfr,chlt,chlon) |
|
./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 |
191 |
FIZHI_INIT_VEG |
chfr (nchptot(bi,bj),bi,bj) = tilefrac(i,j,k,bi,bj) |
|
./pkg/fizhi/fizhi_init_veg.F |
63 |
FIZHI_INIT_VEG |
_RL chfr(nchp,nSx,nSy),chlt(nchp,nSx,nSy),chlon(nchp,nSx,nSy) |
|
./pkg/fizhi/fizhi_init_veg.F |
8 |
FIZHI_INIT_VEG |
& igrd,ityp,chfr,chlt,chlon) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
102 |
FIZHI_WRITE_VEGTILES |
CALL MNC_CW_RL_W(prec,bnam,0,0,'chfr', chfr, myThid) |
|
./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 |
130 |
TURBIO |
_RL chfr(nchp),chlt(nchp),chlon(nchp) |
|
./pkg/fizhi/fizhi_turb.F |
31 |
TURBIO |
5 ,nchp,nchptot,nchplnd,chfr,chlt,chlon,igrd,ityp,alai,agrn,thkz |
|
./pkg/fizhi/fizhi_turb.F |
431 |
TURBIO |
call MSC2GRD (igrd,chfr,qice,nchp,nchptot,fracland,tmpdiag,im,jm) |
|
./pkg/fizhi/fizhi_turb.F |
468 |
TURBIO |
call STRIPIT (chfr,chfrstr,nchptot,nchp,istrip,1,nn) |
|
./pkg/fizhi/fizhi_utils.F |
546 |
PASTE2GRD_OLD |
subroutine PASTE2GRD_OLD(b,indx,chfr,ib,numpts,a,ia,levs,npeice) |
|
./pkg/fizhi/fizhi_utils.F |
575 |
PASTE2GRD_OLD |
_RL a(ia,levs), b(ib,levs), chfr(ib) |
|
./pkg/fizhi/fizhi_utils.F |
585 |
PASTE2GRD_OLD |
a(indx(i+offset-1),L) = a(indx(i+offset-1),L) + b(i,L)*chfr(i) |
|
./pkg/fizhi/fizhi_utils.F |
590 |
PASTE2GRD |
subroutine PASTE2GRD (b,indx,chfr,ib,numpts,a,ia,levs,npeice, |
|
./pkg/fizhi/fizhi_utils.F |
621 |
PASTE2GRD |
_RL a(ia,levs), b(ib,levs), chfr(ib) |
|
./pkg/fizhi/fizhi_utils.F |
638 |
PASTE2GRD |
a(indx(i+offset-1),L)=a(indx(i+offset-1),L) + b(i,L)*chfr(i) |
|
./pkg/fizhi/fizhi_utils.F |
645 |
PASTE2GRD |
a(indx(i+offset-1),L)=a(indx(i+offset-1),L) + b(i,L)*chfr(i) |
|
./pkg/fizhi/fizhi_wrapper.F |
268 |
FIZHI_WRAPPER |
& albvisdr,albvisdf,ityp,chfr,alai,agrn,igrd,chlt,chlon, |
|
./pkg/fizhi/update_earth_exports.F |
1025 |
GETEMISS |
call MSC2GRD(igrd(1,bi,bj),chfr(1,bi,bj),emisstile(1,k),nchp, |
|
./pkg/fizhi/update_earth_exports.F |
116 |
UPDATE_EARTH_EXPORTS |
& chfr,chlt,alai,agrn, |
|
./pkg/fizhi/update_earth_exports.F |
128 |
UPDATE_EARTH_EXPORTS |
& igrd,ityp,chfr,snodep,ficetile,emiss) |
|
./pkg/fizhi/update_earth_exports.F |
144 |
UPDATE_EARTH_EXPORTS |
call MSC2GRD(igrd(1,bi,bj),chfr(1,bi,bj),tmpchp, |
|
./pkg/fizhi/update_earth_exports.F |
821 |
GETALB |
& nchp,nchptot,nchpland,nSx,nSy,bi,bj,igrd,ityp,chfr,chlt, |
|
./pkg/fizhi/update_earth_exports.F |
864 |
GETALB |
_RL snodep(nchp,nSx,nSy),chfr(nchp,nSx,nSy),chlt(nchp,nSx,nSy) |
|
./pkg/fizhi/update_earth_exports.F |
913 |
GETALB |
call MSC2GRD(igrd(1,bi,bj),chfr(1,bi,bj),avisdr,nchp,nchpland, |
|
./pkg/fizhi/update_earth_exports.F |
926 |
GETALB |
call MSC2GRD(igrd(1,bi,bj),chfr(1,bi,bj),avisdf,nchp,nchpland, |
|
./pkg/fizhi/update_earth_exports.F |
938 |
GETALB |
call MSC2GRD(igrd(1,bi,bj),chfr(1,bi,bj),anirdr,nchp,nchpland, |
|
./pkg/fizhi/update_earth_exports.F |
950 |
GETALB |
call MSC2GRD(igrd(1,bi,bj),chfr(1,bi,bj),anirdf,nchp,nchpland, |
|
./pkg/fizhi/update_earth_exports.F |
964 |
GETEMISS |
& igrd,ityp,chfr,snowdep,fraci,emiss) |
|
./pkg/fizhi/update_earth_exports.F |
996 |
GETEMISS |
_RL chfr(nchp,nSx,nSy) |
|
./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_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 |
63 |
FIZHI_INIT_VEG |
_RL chfr(nchp,nSx,nSy),chlt(nchp,nSx,nSy),chlon(nchp,nSx,nSy) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F |
8 |
FIZHI_INIT_VEG |
& igrd,ityp,chfr,chlt,chlon) |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
10 |
DO_FIZHI |
& albvisdr,albvisdf,ityp,chfr,alai,agrn,igrd,chlat,chlon, |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
59 |
DO_FIZHI |
_RL chfr(nchp,nSxin,nSyin),alai(nchp,nSxin,nSyin) |
|
./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_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 |
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 |
63 |
FIZHI_INIT_VEG |
_RL chfr(nchp,nSx,nSy),chlt(nchp,nSx,nSy),chlon(nchp,nSx,nSy) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
8 |
FIZHI_INIT_VEG |
& igrd,ityp,chfr,chlt,chlon) |
|
./pkg/diagnostics/diag_vegtile_fill.F |
10 |
DIAG_VEGTILE_FILL |
& field,indx,chfr,ib,numpts,npeice, |
|
./pkg/diagnostics/diag_vegtile_fill.F |
162 |
DIAG_VEGTILE_FILL |
& + field(ivt,k)*chfr(ivt) |
|
./pkg/diagnostics/diag_vegtile_fill.F |
171 |
DIAG_VEGTILE_FILL |
& + field(ivt,k)*chfr(ivt) |
|
./pkg/diagnostics/diag_vegtile_fill.F |
230 |
DIAG_VEGTILE_FILL |
gridFrac(ij)=gridFrac(ij)+chfr(ivt) |
|
./pkg/diagnostics/diag_vegtile_fill.F |
244 |
DIAG_VEGTILE_FILL |
& + field(ivt,k)*chfr(ivt)/gridFrac(ij) |
|
./pkg/diagnostics/diag_vegtile_fill.F |
252 |
DIAG_VEGTILE_FILL |
& + field(ivt,k)*chfr(ivt)/gridFrac(ij) |
|
./pkg/diagnostics/diag_vegtile_fill.F |
52 |
DIAG_VEGTILE_FILL |
_RL field(ib,nlevs), chfr(ib) |