Function:     MTCLOSE

Purpose:      Closes a specified tape device.

Category:     TAPES

File:         mtiodev.c

Author:       K.G. Begeman

Use:          INTEGER MTCLOSE( MTID )      Input        INTEGER

              MTCLOSE   Returns:
                         0: Operation was completed successfully.
                        -1: System error.
                        -4: Device not open.
              MTID      Id returned by MTOPEN.

Warning:      Code is System dependent!

Updates:      Mar 30, 1990 : KGB Document created.