%N grtt03 %F $MIR/opt/local/var/macports/build/_opt_PPCSnowLeopardPorts_science_miriad/miriad/work/miriad-4.3.8/borrow/pgplot/drivers/ttdriv.f
%D PGPLOT Tektronix driver, cursor routine
%B
      SUBROUTINE GRTT03 (ICHAN, IX, IY, IC, IER)
      INTEGER   ICHAN, IX, IY, IC, IER

 Arguments:
   ICHAN  (input)  : channel for output to device.
   IX, IY (in/out) : initial/final coordinates of cursor (device 
                     coordinates).
   IC     (output) : character code.
   IER    (output) : error status (0 is OK).
