d subroutine set c. Used to set up the TEK routines, a noop now. c. c. see INFO TEK for information about all plotting routines c. c.-end.of.info- c.  RETURN X end