File |
Line number |
Procedure |
Code |
./pkg/fizhi/update_earth_exports.F |
810 |
GETALB |
. alai,agrn,albvr,albvf,albnr,albnf) |
./pkg/fizhi/update_earth_exports.F |
854 |
GETALB |
_RL alai(nchp,nSx,nSy),agrn(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 |
89 |
UPDATE_EARTH_EXPORTS |
. nchp,nSx,nSy,bi,bj,alai,agrn ) |
./pkg/fizhi/fizhi_earth_coms.h |
14 |
NO PROCEDURE |
. chfr, alai, agrn, |
./pkg/fizhi/fizhi_earth_coms.h |
19 |
NO PROCEDURE |
_RL agrn(nchp,Nsx,Nsy) |
./pkg/fizhi/fizhi_utils.F |
705 |
CHPPRM |
1 agrn,zoch,z2ch,cdrc,cdsc,sqsc,ufac,rsl1,rsl2,rdcs) |
./pkg/fizhi/fizhi_utils.F |
711 |
CHPPRM |
_RL alai(mxchps),agrn(mxchps) |
./pkg/fizhi/fizhi_utils.F |
876 |
CHPPRM |
scat = agrn(i) *(vgtr11(ityp(i)) + vgrf11(ityp(i))) |
./pkg/fizhi/fizhi_utils.F |
877 |
CHPPRM |
& + (1. - agrn(i))*(vgtr12(ityp(i)) + vgrf12(ityp(i))) |
./pkg/fizhi/fizhi_turb.F |
10 |
TURBIO |
5 ,nchp,nchptot,nchplnd,chfr,chlt,chlon,igrd,ityp,alai,agrn,thkz |
./pkg/fizhi/fizhi_turb.F |
116 |
TURBIO |
_RL alai(nchp),agrn(nchp),thkz(im,jm) |
./pkg/fizhi/fizhi_turb.F |
388 |
TURBIO |
1 agrn,zoch,z2ch,cdrc,cdsc,sqscat,u2fac,rsoil1,rsoil2,rdc) |
./pkg/fizhi/fizhi_turb.F |
509 |
TURBIO |
call STRIPIT (agrn,grnstrip,nchptot,nchp,istrip,1,nn) |
./pkg/fizhi/fizhi_wrapper.F |
143 |
FIZHI_WRAPPER |
. albvisdr,albvisdf,ityp,chfr,alai,agrn,igrd,chlt,chlon, |
./pkg/fizhi/do_fizhi.F |
10 |
DO_FIZHI |
. albvisdr,albvisdf,ityp,chfr,alai,agrn,igrd,chlat,chlon, |
./pkg/fizhi/do_fizhi.F |
245 |
DO_FIZHI |
. agrn(1,bi,bj), |
./pkg/fizhi/do_fizhi.F |
59 |
DO_FIZHI |
_RL agrn(nchp,Nsxin,Nsyin) |