Symbol Description Uses
H0 10



File Line number Procedure Code
./pkg/exf/exf_zenithangle.F 313 EXF_ZENITHANGLE
           H0 = -TAN( yC(i,j,bi,bj) *deg2rad ) * TAN( DECLI )
./pkg/exf/exf_zenithangle.F 314 EXF_ZENITHANGLE
           IF ( H0.LT.-1. _d 0 ) H0 = -1. _d 0
./pkg/exf/exf_zenithangle.F 315 EXF_ZENITHANGLE
           IF ( H0.GT. 1. _d 0 ) H0 =  1. _d 0
./pkg/exf/exf_zenithangle.F 316 EXF_ZENITHANGLE
           H0 = ACOS( H0 )
./pkg/exf/exf_zenithangle.F 318 EXF_ZENITHANGLE
     &          * ( H0 * TMPA + SIN(H0) * TMPB )
./pkg/exf/exf_zenithangle.F 52 EXF_ZENITHANGLE
      _RL H0, dD0dDsq, CZENdaily, CZENdiurnal