Previous: prstrm Up: ../plot79_p.html Next: prstwd
INTEGER FUNCTION PRSTTY (UNITNO)
C$ (Parse Internal - Terminal Type)
C$ Given a FORTRAN unit number corresponding to an OPEN file,
C$ return as a function value an integer giving the terminal
C$ type as required by the parsing package:
C$
C$ -1 = not a terminal,
C$ 0 = hardcopy or unknown,
C$ 1 = VT52,
C$ 2 = VT100,
C$ 3 = Televideo,
C$ 4 = Hazeltine-1500
C$
C$ In general, this routine will be system-dependent, and this
C$ portable version simply returns -1.
C$ (12-Apr-1991)