Symbol Description Uses
wTyear1 5


File Line number Procedure Code
./pkg/exf/exf_zenithangle.F 134 EXF_ZENITHANGLE 
          wTyear1= iTyear1 - 365.*TYEAR
./pkg/exf/exf_zenithangle.F 136 EXF_ZENITHANGLE 
          wTyear2= 1.0 _d 0 - wTyear1
./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 51 EXF_ZENITHANGLE 
      _RL     wLat1,wLat2,wTyear1,wTyear2