HP Fortran Programmer's Reference (September 2007)

BLAS and libU77 libraries
libU77 routines
Chapter 12 655
TSTATE Allows the user to determine the logical state of the tape I/O channel and to
see the tape drive control status register.
INTEGER FUNCTION TSTATE ( tlu , fileno , recno , errf , eoff , eotf , tcsr )
INTEGER :: tlu , fileno , recno , tcsr
LOGICAL :: errf , eoff , eotf
TTYNAM Returns a blank padded path name of the terminal device associated with a
specified logical unit number.
CHARACTER(LEN=*) FUNCTION TTYNAM ( lunit )
INTEGER :: lunit
TWRITE Writes a physical record to tape from the specified buffer.
INTEGER FUNCTION TWRITE ( tlu , buffer )
INTEGER :: tlu
CHARACTER(LEN=*) :: buffer
UNLINK Removes a specified directory entry.
INTEGER FUNCTION UNLINK ( name )
CHARACTER(LEN=*) :: name
WAIT Waits for a process to terminate.
INTEGER FUNCTION WAIT ( status )
INTEGER :: status
Table 12-3 libU77 routines (Continued)
Name Description and signature