File |
Line number |
Procedure |
Code |
./pkg/fizhi/do_fizhi.F |
11 |
DO_FIZHI |
. tcanopy,tdeep,ecanopy,swetshal,swetroot,swetdeep,snodep,capac, |
./pkg/fizhi/do_fizhi.F |
243 |
DO_FIZHI |
. ecanopy(1,bi,bj),swetshal(1,bi,bj),swetroot(1,bi,bj), |
./pkg/fizhi/do_fizhi.F |
63 |
DO_FIZHI |
_RL ecanopy(nchp,Nsxin,Nsyin),swetshal(nchp,Nsxin,Nsyin) |
./pkg/fizhi/fizhi_driver.F |
10 |
FIZHI_DRIVER |
. tcanopy,tdeep,ecanopy,swetshal,swetroot,swetdeep,capac,snodep, |
./pkg/fizhi/fizhi_driver.F |
204 |
FIZHI_DRIVER |
. tcanopy,ecanopy,tdeep,swetshal,swetroot,swetdeep,snodep,capac, |
./pkg/fizhi/fizhi_driver.F |
68 |
FIZHI_DRIVER |
_RL tcanopy(nchp),tdeep(nchp),ecanopy(nchp),swetshal(nchp) |
./pkg/fizhi/fizhi_init_vegsurftiles.F |
144 |
FIZHI_INIT_VEGSURFTILES |
swetshal(n,bi,bj) = temptile(n) |
./pkg/fizhi/fizhi_land_coms.h |
11 |
NO PROCEDURE |
_RL swetshal(nchp,Nsx,Nsy) |
./pkg/fizhi/fizhi_land_coms.h |
7 |
NO PROCEDURE |
. swetshal, swetroot, swetdeep, snodep, capac |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
225 |
FIZHI_WRITE_VEGTILES |
r8seg(n) = swetshal(n,bi,bj) |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
354 |
FIZHI_READ_VEGTILES |
CALL MNC_CW_RL_R(prec,bnam,0,0,'swetshal', swetshal, myThid) |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
487 |
FIZHI_READ_VEGTILES |
swetshal(n,bi,bj) = r8seg(n) |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
91 |
FIZHI_WRITE_VEGTILES |
CALL MNC_CW_RL_W(prec,bnam,0,0,'swetshal', swetshal, myThid) |
./pkg/fizhi/fizhi_turb.F |
118 |
TURBIO |
_RL tcanopy(nchp),tdeep(nchp),ecanopy(nchp),swetshal(nchp) |
./pkg/fizhi/fizhi_turb.F |
463 |
TURBIO |
swetshal(i) = 1. |
./pkg/fizhi/fizhi_turb.F |
549 |
TURBIO |
call STRIPIT (swetshal,swet1,nchptot,nchp,istrip,1,nn) |
./pkg/fizhi/fizhi_turb.F |
933 |
TURBIO |
call PASTIT (swet1,swetshal,istrip,nchp,nchptot,1,nn) |
./pkg/fizhi/fizhi_turb.F |
9 |
TURBIO |
4 ,tcanopy,ecanopy,tdeep,swetshal,swetroot,swetdeep,snodep,capac |
./pkg/fizhi/fizhi_wrapper.F |
268 |
FIZHI_WRAPPER |
. tcanopy,tdeep,ecanopy,swetshal,swetroot,swetdeep,snodep,capac, |
./verification/fizhi-cs-aqualev20/code/fizhi_init_vegsurftiles.F |
47 |
FIZHI_INIT_VEGSURFTILES |
swetshal(n,bi,bj) = 0.1 |
./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 |
63 |
DO_FIZHI |
_RL ecanopy(nchp,Nsxin,Nsyin),swetshal(nchp,Nsxin,Nsyin) |
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
235 |
FIZHI_INIT_VARS |
swetshal(i,bi,bj) = 0.6 |