SUBROUTINE ESIND ( )
Description
   THIS ROUTINE EVALUATES THE SPORADIC E (ES) PARAMETERS 
   NOTE THE CRITICAL FREQUENCIES ARE THE MAXIMUM OF REGULAR E AND THE 
   SPORADIC E.  PSC IS USUALLY 0.70 TO OBTAIN MEDIAN LOSSES. 
 
GMT IS UNIVERSAL TIME
Source file:esind.f
External Functions and Subroutines Called
SUBROUTINE         VERSY
Local Variables (+ indicates altered content)
INTEGER           +II
Referenced Common Block Variables (+ indicates altered content)
A11                REAL               GAMMA(6)
ES                 REAL              +FS(3,5),  +HS(5)
PSCA               REAL               PSC(4)
RON                INTEGER            KM