Symbol Description Uses
H0 10



File Line number Procedure Code
./pkg/exf/exf_zenithangle.F 279 EXF_ZENITHANGLE
       H0 = -tan( yC(i,j,bi,bj) *deg2rad ) * tan( DECLI )
./pkg/exf/exf_zenithangle.F 280 EXF_ZENITHANGLE
       if ( H0.LT.-1. _d 0 ) H0 = -1. _d 0
./pkg/exf/exf_zenithangle.F 281 EXF_ZENITHANGLE
       if ( H0.GT.1. _d 0 ) H0 = 1. _d 0
./pkg/exf/exf_zenithangle.F 282 EXF_ZENITHANGLE
       H0 = acos( H0 )
./pkg/exf/exf_zenithangle.F 284 EXF_ZENITHANGLE
     &       ( H0 * TMPA + sin(H0) * TMPB )
./pkg/exf/exf_zenithangle.F 50 EXF_ZENITHANGLE
      _RL H0, dD0dDsq, CZENdaily, CZENdiurnal