c      This defines the unit used in the open statement for recl. 
c      The number of bytes per unit is the variable reclunit.
c      For Silicon Graphics it is apparently 4 bytes
c
      INTEGER reclunit
      parameter(reclunit=1)