% ********************************************************
   %  This is the triple column format.                     *
   %  Tomas Rokicki, 29 September 1984                      *
   % ******************************************************** 

\special{landscape}
\newdimen\fullhsize\newdimen\play\newdimen\hmargins\newdimen\vmargins
\def\newmargins#1#2{\hmargins=#1\vmargins=#2
   \play=11truein\advance\play by-2\hmargins\global\fullhsize=\play
   \advance\play by-4\hmargins\divide\play by3\global\hsize=\play
   \play=8truein\advance\play by-2\vmargins\global\vsize=\play
   \play=-1truein\advance\play by\hmargins\global\hoffset=\play
   \play=-1truein\advance\play by\vmargins\global\voffset=\play}
\newmargins{.25truein}{.25truein}
\def\fullline{\hbox to\fullhsize}
\let\lmr=L \newbox\leftcolumn\newbox\middlecolumn
\output={\if L\lmr
   \global\setbox\leftcolumn=\columnbox\global\let\lmr=M
   \else\if M\lmr
   \global\setbox\middlecolumn=\columnbox\global\let\lmr=R
   \else\tripleformat\global\let\lmr=L\fi\fi
   \ifnum\outputpenalty>-20000 \else\dosupereject\fi}
\def\tripleformat{\shipout\vbox{\makeheadline
   \fullline{\box\leftcolumn\hfil\box\middlecolumn\hfil\columnbox}}
   \advancepageno}
\def\columnbox{\leftline{\pagebody}}
\tolerance=1600