Symbol Description Uses
wTyear1 5


File Line number Procedure Code
./pkg/exf/exf_zenithangle.F 117 EXF_ZENITHANGLE 
          wTyear1= iTyear1 - 365.*TYEAR
./pkg/exf/exf_zenithangle.F 119 EXF_ZENITHANGLE 
          wTyear2= 1.0 _d 0 - wTyear1
./pkg/exf/exf_zenithangle.F 134 EXF_ZENITHANGLE 
     &    wTyear1*wLat1*zen_albedo_table(iTyear1,iLat1)+
./pkg/exf/exf_zenithangle.F 135 EXF_ZENITHANGLE 
     &    wTyear1*wLat2*zen_albedo_table(iTyear1,iLat2)+
./pkg/exf/exf_zenithangle.F 48 EXF_ZENITHANGLE 
      _RL     wLat1,wLat2,wTyear1,wTyear2