%N grtter %F $MIR/opt/local/var/macports/build/_opt_PPCSnowLeopardPorts_science_miriad/miriad/work/miriad-4.3.8/borrow/pgplot/sys/grtter.f
%D Test whether device is user's terminal (Sun/Convex-UNIX)
%B
      SUBROUTINE GRTTER(STRING, SAME)
      CHARACTER*(*) STRING
      LOGICAL SAME

 Return a logical flag indicating whether the supplied device
 name is a name for the user's controlling terminal or not.
 (Some PGPLOT programs wish to take special action if they are
 plotting on the user's terminal.)

 Arguments:
  STRING : (input) the device name to be tested.
  SAME   : (output) .TRUE. is STRING contains a valid name for the
           user's terminal; .FALSE. otherwise.
