SUBROUTINE TIMVAR ( )
Description
THIS ROUTINE EVALUATES THE ZENITH ANGLE, RATIO OF F2 LAYER HEIGHT 
OF MAXIMUM TO SEMITHICKNESS AND ABSORPTION INDEX. 
SUBROUTINE EF1VAR IS CALLED TO EVALUATE THE E AND F1 PARAMETERS
Source file:timvar.f
Intrinsic Functions Called
GENERIC            ABS,        ACOS,       COS,        EXP
GENERIC            SIN
External Functions and Subroutines Called
SUBROUTINE         EF1VAR,     NOISY
Local Variables (+ indicates altered content)
INTEGER           +II
REAL              +ABI,       +CENCAT,    +CENDOG,    +CENLAT
REAL              +CENLG,     +CLOCK,     +CYCEN,     +GM
REAL              +SSL,       +SSP,       +YM,        +Z
Referenced Common Block Variables (+ indicates altered content)
CON                REAL               D2R,       R2D
GEOG               REAL              +ABIY(5),  +CLCK(5)
GEOG               REAL              +RAT(5)
RON                INTEGER            KM
RON                REAL               CLAT(5),   CLONG(5)
RON                REAL               FI(3,5),   GLAT(5)
SSP                INTEGER            MONTH
SSP                REAL               SUN(2,12)
TIME               REAL               GMT