Symbol Description Uses
agrn 24



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 251 DO_FIZHI
     & agrn(1,bi,bj),
./pkg/fizhi/do_fizhi.F 60 DO_FIZHI
      _RL agrn(nchp,nSxIn,nSyIn)
./pkg/fizhi/fizhi_driver.F 12 FIZHI_DRIVER
     & albvisdr,albvisdf,albnirdr,albnirdf,emiss,alai,agrn,
./pkg/fizhi/fizhi_driver.F 209 FIZHI_DRIVER
     &  alai,agrn,sea_ice,lpnt,
./pkg/fizhi/fizhi_driver.F 84 FIZHI_DRIVER
      _RL alai(nchp),agrn(nchp)
./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_turb.F 132 TURBIO
      _RL alai(nchp),agrn(nchp),thkz(im*jm,1)
./pkg/fizhi/fizhi_turb.F 31 TURBIO
     5 ,nchp,nchptot,nchplnd,chfr,chlt,chlon,igrd,ityp,alai,agrn,thkz
./pkg/fizhi/fizhi_turb.F 361 TURBIO
     1       agrn,zoch,z2ch,cdrc,cdsc,sqscat,u2fac,rsoil1,rsoil2,rdc)
./pkg/fizhi/fizhi_turb.F 482 TURBIO
       call STRIPIT  (agrn,grnstrip,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_utils.F 712 CHPPRM
     1       agrn,zoch,z2ch,cdrc,cdsc,sqsc,ufac,rsl1,rsl2,rdcs)
./pkg/fizhi/fizhi_utils.F 718 CHPPRM
       _RL alai(mxchps),agrn(mxchps)
./pkg/fizhi/fizhi_utils.F 883 CHPPRM
      scat =       agrn(i) *(vgtr11(ityp(i)) + vgrf11(ityp(i)))
./pkg/fizhi/fizhi_utils.F 884 CHPPRM
     &     + (1. - agrn(i))*(vgtr12(ityp(i)) + vgrf12(ityp(i)))
./pkg/fizhi/fizhi_wrapper.F 268 FIZHI_WRAPPER
     &  albvisdr,albvisdf,ityp,chfr,alai,agrn,igrd,chlt,chlon,
./pkg/fizhi/update_earth_exports.F 101 UPDATE_EARTH_EXPORTS
     &       nchp,nSx,nSy,bi,bj,alai,agrn )
./pkg/fizhi/update_earth_exports.F 116 UPDATE_EARTH_EXPORTS
     &    chfr,chlt,alai,agrn,
./pkg/fizhi/update_earth_exports.F 822 GETALB
     &        alai,agrn,albvr,albvf,albnr,albnf)
./pkg/fizhi/update_earth_exports.F 866 GETALB
      _RL alai(nchp,nSx,nSy),agrn(nchp,nSx,nSy)
./pkg/fizhi/update_earth_exports.F 904 GETALB
     &  agrn(1,bi,bj),zenith,snodep(1,bi,bj),ityp(1,bi,bj),nchpland)
./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 60 DO_FIZHI
      _RL agrn(nchp,nSxin,nSyin)