File |
Line number |
Procedure |
Code |
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F |
111 |
UPDATE_EARTH_EXPORTS |
. igrd,ityp,chfr,snodep,ficetile,emiss) |
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F |
808 |
GETALB |
subroutine GETALB(sec,month,day,cosz,snodep,fraci,fracg,im,jm, |
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F |
852 |
GETALB |
_RL snodep(nchp,nSx,nSy),chfr(nchp,nSx,nSy),chlt(nchp,nSx,nSy) |
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F |
891 |
GETALB |
. agrn(1,bi,bj),zenith,snodep(1,bi,bj),ityp(1,bi,bj),nchpland) |
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F |
98 |
UPDATE_EARTH_EXPORTS |
call GETALB(sec,month,day,cosz,snodep,fraci,fracl,im2,jm2,nchp, |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
113 |
TURBIO |
_RL swetroot(nchp),swetdeep(nchp),snodep(nchp),capac(nchp) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
528 |
TURBIO |
call STRIPIT (snodep,snowdepth,nchptot,nchp,istrip,1,nn) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
933 |
TURBIO |
call PASTIT (snowdepth,snodep,istrip,nchp,nchptot,1,nn) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
9 |
TURBIO |
4 ,tcanopy,ecanopy,tdeep,swetshal,swetroot,swetdeep,snodep,capac |
./verification/fizhi-cs-aqualev10/code/fizhi_init_vegsurftiles.F |
46 |
FIZHI_INIT_VEGSURFTILES |
snodep(n,bi,bj) = 0. |
./verification/fizhi-cs-aqualev10/code/do_fizhi.F |
11 |
DO_FIZHI |
. tcanopy,tdeep,ecanopy,swetshal,swetroot,swetdeep,snodep,capac, |
./verification/fizhi-cs-aqualev10/code/do_fizhi.F |
241 |
DO_FIZHI |
. swetdeep(1,bi,bj),capac(1,bi,bj),snodep(1,bi,bj), |
./verification/fizhi-cs-aqualev10/code/do_fizhi.F |
65 |
DO_FIZHI |
_RL snodep(nchp,Nsxin,Nsyin),capac(nchp,Nsxin,Nsyin) |
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
239 |
FIZHI_INIT_VARS |
snodep(i,bi,bj) = 0. |
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
11 |
DO_FIZHI |
. tcanopy,tdeep,ecanopy,swetshal,swetroot,swetdeep,snodep,capac, |
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
65 |
DO_FIZHI |
_RL snodep(nchp,Nsxin,Nsyin),capac(nchp,Nsxin,Nsyin) |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
252 |
FIZHI_WRITE_VEGTILES |
r8seg(n) = snodep(n,bi,bj) |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
357 |
FIZHI_READ_VEGTILES |
CALL MNC_CW_RL_R(prec,bnam,0,0,'snodep', snodep, myThid) |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
514 |
FIZHI_READ_VEGTILES |
snodep(n,bi,bj) = r8seg(n) |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
94 |
FIZHI_WRITE_VEGTILES |
CALL MNC_CW_RL_W(prec,bnam,0,0,'snodep', snodep, myThid) |
./pkg/fizhi/fizhi_driver.F |
10 |
FIZHI_DRIVER |
. tcanopy,tdeep,ecanopy,swetshal,swetroot,swetdeep,capac,snodep, |
./pkg/fizhi/fizhi_driver.F |
202 |
FIZHI_DRIVER |
. tcanopy,ecanopy,tdeep,swetshal,swetroot,swetdeep,snodep,capac, |
./pkg/fizhi/fizhi_driver.F |
69 |
FIZHI_DRIVER |
_RL swetroot(nchp),swetdeep(nchp),capac(nchp),snodep(nchp) |
./pkg/fizhi/update_earth_exports.F |
111 |
UPDATE_EARTH_EXPORTS |
. igrd,ityp,chfr,snodep,ficetile,emiss) |
./pkg/fizhi/update_earth_exports.F |
808 |
GETALB |
subroutine GETALB(sec,month,day,cosz,snodep,fraci,fracg,im,jm, |
./pkg/fizhi/update_earth_exports.F |
852 |
GETALB |
_RL snodep(nchp,nSx,nSy),chfr(nchp,nSx,nSy),chlt(nchp,nSx,nSy) |
./pkg/fizhi/update_earth_exports.F |
891 |
GETALB |
. agrn(1,bi,bj),zenith,snodep(1,bi,bj),ityp(1,bi,bj),nchpland) |
./pkg/fizhi/update_earth_exports.F |
98 |
UPDATE_EARTH_EXPORTS |
call GETALB(sec,month,day,cosz,snodep,fraci,fracl,im2,jm2,nchp, |
./pkg/fizhi/fizhi_turb.F |
113 |
TURBIO |
_RL swetroot(nchp),swetdeep(nchp),snodep(nchp),capac(nchp) |
./pkg/fizhi/fizhi_turb.F |
528 |
TURBIO |
call STRIPIT (snodep,snowdepth,nchptot,nchp,istrip,1,nn) |
./pkg/fizhi/fizhi_turb.F |
909 |
TURBIO |
call PASTIT (snowdepth,snodep,istrip,nchp,nchptot,1,nn) |
./pkg/fizhi/fizhi_turb.F |
9 |
TURBIO |
4 ,tcanopy,ecanopy,tdeep,swetshal,swetroot,swetdeep,snodep,capac |
./pkg/fizhi/fizhi_land_coms.h |
14 |
NO PROCEDURE |
_RL snodep(nchp,Nsx,Nsy) |
./pkg/fizhi/fizhi_land_coms.h |
7 |
NO PROCEDURE |
. swetshal, swetroot, swetdeep, snodep, capac |
./pkg/fizhi/fizhi_wrapper.F |
144 |
FIZHI_WRAPPER |
. tcanopy,tdeep,ecanopy,swetshal,swetroot,swetdeep,snodep,capac, |
./pkg/fizhi/fizhi_init_vegsurftiles.F |
165 |
FIZHI_INIT_VEGSURFTILES |
snodep(n,bi,bj) = temptile(n) |
./pkg/fizhi/do_fizhi.F |
11 |
DO_FIZHI |
. tcanopy,tdeep,ecanopy,swetshal,swetroot,swetdeep,snodep,capac, |
./pkg/fizhi/do_fizhi.F |
240 |
DO_FIZHI |
. swetdeep(1,bi,bj),capac(1,bi,bj),snodep(1,bi,bj), |
./pkg/fizhi/do_fizhi.F |
65 |
DO_FIZHI |
_RL snodep(nchp,Nsxin,Nsyin),capac(nchp,Nsxin,Nsyin) |