C
C******************* TOP OF COMMON BLOCK - OZONE *******************
C
C   NAME- OZONE
C
C   LANGUAGE- VS FORTRAN TYPE- COMMON BLOCK   COMPUTER- CRAY J916
C
C   VERSION- 1.0    DATE-  7/27/93   PROGRAMMER- DAVE MOREL, SMSRC
C   VERSION- 3.0    DATE- 11/03/97   PROGRAMMER- LEAH WILSON, HSTX
C   VERSION- 3.1    DATE- 03/09/98   PROGRAMMER- LEAH WILSON, HSTX
C   VERSION- 3.2    DATE- 05/11/99   PROGRAMMER- BRIAN BARIL, RAYTHEON/
C                                                LEAH WILSON, RAYTHEON
C
C   FUNCTION- CONTAINS THE DATA REQUIRED TO WRITE OUT THE OZONE
C             FILE.
C   VERSION- 3.0  MODIFICATIONS FOR USE ON CRAY FOR ATOVS.
C   VERSION- 3.1  ADD ON/OFF FLAG FOR OZONE FILE, SINCE IT IS NOT
C                 REQUIRED FOR NON-SBUV SATELLITES.
C   VERSION- 3.2  REMOVE REFERENCES TO OZONE FILE, SINCE THIS IS
C                 NO LONGER NEEDED.
C
C   SHARED PARAMETERS-
C     VARIABLE      TYPE    DESCRIPTION
C     --------      ----    -----------
C     FSTIME        INT     VECTOR OF THREE ELEMENTS CONTAINING THE
C                           FRAME START TIME (YYMM, DDHH, MMSS).
C
C     HIRTIP        INT     VECTOR OF THREE ELEMENTS CONTAINING THE
C                           HIRS TIP STARTING TIME CODE.
C
C     SUPFLG        INT     SUPERADAIBATIC FLAG, 1 INDICATES A
C                           SUPERADAIBATIC CONDITION, 0 OTHERWISE.
C
C     SID           INT     SPACE CRAFT IDENTIFICATION NUMBER.
C
C     SML           INT     SURFACE MODEL LEVEL
C 
C
C   BLOCK DATA- NONE
C
C********************************************************************
C
      INTEGER HIRTIP(3), SUPFLG, SID, FSTIME(3), SML
C
      COMMON /OZONE/ FSTIME,HIRTIP,SUPFLG,SID,SML
C
C******************* BOTTOM OF COMMON BLOCK - OZONE ****************
C