      SUBROUTINE FBUFOUT(IU,BUFFER,MAXX,K,LEN)
C
C     * JAN 22/92 - E.CHAN
C     * FBUFOUT CALLS THE C ROUTINE BUFFOUT TO WRITE UNFORMATTED
C     * RECORDS TO A SEQUENTIAL FILE. THE CALL TO BUFFOUT REQUIRES
C     * THE USE OF A POINTER ARRAY PASSED THROUGH FROM SUBROUTINE 
C     * JCLPNT. THE I'TH ELEMENT OF THE POINTER ARRAY FD CONTAINS THE
C     * C FILE DESCRIPTOR CORRESPONDING TO THE FORTRAN UNIT NUMBER I.
C     * 
C     * THE SOURCE CODE FOR BUFFOUT CONTAINS FURTHER DETAILS.
C
      INTEGER BUFFER(MAXX), FD(100)
C
      COMMON /JCLPNTC/ FD 
C
C ---------------------------------------------------------------------
C
      LEN=MAXX
      CALL BUFFOUT(FD(IU),BUFFER,LEN,K)
C
      RETURN
      END
