c ----------- SAMPLE FORTRAN CODE TO READ THESE BINARY FILES ----
c  
      parameter(lenr=6160)
      real*4 dum(770*2),stat(770,194,8),y(194)

      equivalence (nx,dum(1098))
      equivalence (ny,dum(1099))
      equivalence (ix,dum(1100))
      equivalence (iy,dum(1101))
      equivalence (nl,dum(1102))
      equivalence (dx,dum(1103))
      equivalence (re,dum(1104))
      equivalence (y,dum(1105))

      open(1,file='stats1pt.bin',access='direct',recl=lenr/4)    ! for SGI machines
*     open(1,file='stats1pt.bin',access='direct',recl=lenr)      ! for anything else

      irec=1
      read(1,rec=irec) dum
      write(*,*) nx,ny,ix,iy,nl,dx,re

      do k=1,8
         do j=1,194,2
            irec=irec+1
            read(1,rec=irec) ((stat(i,jj,k),i=1,770),jj=j,j+1)
         enddo
      enddo

      do j=1,194
         write(*,'(9e12.4)') y(j),(stat(500,j,k),k=1,8)
      enddo

      end