c Common block /ovx/ Overpass data

c--Variable usage:
c    n_fov	number of fov's that have been identified as matches so far
c		for this site and for this day
c    filehndl   5-character (YYDOY) handle for the filename the matched data
c               are in
c    filerec    record number within the file specified by filehandl
c    scanpos    scan position number of matched fov
c    gmtsec     gmt seconds since midnight -- kept as redundant information
c               to ensure, on retrieval, we've got the right record.
c    costfun    cost function value for each match
c    scantime   time at beginning of scan containing the matched fov
c    ptr	pointer array that keeps the order, by cost function, of
c		the matched points

      REAL*8      costfun(max_vicin, max_sites)
      REAL*8      scantime(max_vicin, max_sites)
      REAL*4      ovplat(max_vicin, max_sites)
      REAL*4      ovplon(max_vicin, max_sites)
      INTEGER*4   n_fov(max_sites)
      INTEGER*4   ptr(0:max_vicin, max_sites)
      INTEGER*4   filerec(max_vicin, max_sites)
      INTEGER*4   scanpos(max_vicin, max_sites)
      INTEGER*4   gmtsec(max_vicin, max_sites)
      INTEGER*4   yy, doy
      CHARACTER*5 filehndl(max_vicin, max_sites)

      COMMON /ovx/ costfun, scantime,     !R*8
     &    ovplat, ovplon,                 !R*4
     &    yy, doy, gmtsec,  		  !I*4
     &    filerec, scanpos, ptr, n_fov,   !I*4
     &    filehndl 			  !C*

      SAVE /ovx/