program read_ssh
c
c   Sample program provides FORTRAN statements used to read TOPEX/POSEIDON
c   data.
c
c   The 1994 TOPEX/POSEIDON data is on a 539 X 396 element grid with the
c   origin at -65.8333 degrees South latitude and 0.3333 degrees East 
c   longitude.
c
c      	lat grid interval, dlat = 1/3
c      	lon grid interval, dlon = 2/3
c
c	lat limits: -65.8333 (S)  to  65.8333 (N)
c       lon limits:   0.3333 (E)  to 359.0000 (E)
c
c   There are 12 monthly data files for 1994.
c
c   Declarations:

      real*4 ssh(539,396)       ! Topex data is in cm.

c     Note: The value 3276.7 (cm) indicates no data

c     Open and read data:

      open(8,file='ssh9401.dat',form='unformatted')
      read(8) ssh
      close(8)

c     Create file test data:

	do 100 i = 1, 5 
           write(*,*) ssh(i,183)
 100    continue
	
C
c	Sample Output from read test:
c
c	    3276.70
c	    1.37943
c	    2.34202
c	    3276.70
c	    3276.70
c 
        
        stop
        end