Symbol Description Uses
iTyear1 6


File Line number Procedure Code
./pkg/exf/exf_zenithangle.F 133 EXF_ZENITHANGLE 
          iTyear1= 1 + 365.*TYEAR
./pkg/exf/exf_zenithangle.F 134 EXF_ZENITHANGLE 
          wTyear1= iTyear1 - 365.*TYEAR
./pkg/exf/exf_zenithangle.F 135 EXF_ZENITHANGLE 
          iTyear2= iTyear1 + 1
./pkg/exf/exf_zenithangle.F 152 EXF_ZENITHANGLE 
     &         wTyear1*wLat1*zen_albedo_table(iTyear1,iLat1)
./pkg/exf/exf_zenithangle.F 153 EXF_ZENITHANGLE 
     &       + wTyear1*wLat2*zen_albedo_table(iTyear1,iLat2)
./pkg/exf/exf_zenithangle.F 50 EXF_ZENITHANGLE 
      INTEGER iLat1,iLat2,iTyear1,iTyear2