;ELC   
;;; compiled by rms@churchy.gnu.ai.mit.edu on Thu Apr 20 22:09:02 1995
;;; from file /gd/gnu/emacs/19.0/lisp/term/vt100.el
;;; emacs version 19.28.90.4.
;;; bytecomp version FSF 2.10
;;; optimization is on.
;;; this file uses opcodes which do not exist in Emacs 18.

(if (and (boundp 'emacs-version)
	 (or (and (boundp 'epoch::version) epoch::version)
	     (string-lessp emacs-version "19")))
    (error "`/gd/gnu/emacs/19.0/lisp/term/vt100.el' was compiled for Emacs 19"))


(load "term/lk201" nil t)
#@35 t if vt100 is in 132-column mode.
(defconst vt100-wide-mode (byte-code "À ÁU‡" [frame-width 132] 2) (#$ . 517))
#@140 Toggle 132/80 column mode for vt100s.
With positive argument, switch to 132-column mode.
With negative argument, switch to 80-column mode.
(defalias 'vt100-wide-mode #[(&optional arg) "„	 	?‚ Â!ÃVÄ	ƒ Å‚ Æ!ˆÇ	ƒ& É‚' Ê\"‡" [arg vt100-wide-mode prefix-numeric-value 0 send-string-to-terminal "[?3h" "[?3l" set-frame-width terminal-frame 132 80] 3 (#$ . 636) "P"])