%Three-column format for landscape printing on 8.5x11 paper
%pesch 1990 december 31
%We want output .25 inch *from paper edge*; i.e. -.75in from TeX default
\hoffset=-0.8in \voffset=-0.75in
\newdimen\fullhsize
\fullhsize=10.5in \hsize=3.3in
\def\fulline{\hbox to \fullhsize}
\let\lcr=L \newbox\leftcolumn\newbox\centercolumn
\output={\if L\lcr
            \global\setbox\leftcolumn=\columnbox \global\let\lcr=C
	 \else
            \if C\lcr
               \global\setbox\centercolumn=\columnbox \global\let\lcr=R
            \else \tripleformat \global\let\lcr=L
            \fi
         \fi
%         \ifnum\outputpenalty>-20000 \else\dosupereject\fi
      }
%
%ALTERNATIVE FOLDING GUIDES:
%
%For NO printed folding guide, comment out other \def\vdecor's and uncomment:
%\def\vdecor{\hskip .2in plus1fil}
%
%For SOLID LINE folding guide, comment out other \def\vdecor's and uncomment:
%\def\vdecor{\hskip .1in plus1fil \vrule width .1pt \hskip .1in plus1fil}
%
%For SMALL MARKS NEAR TOP AND BOTTOM as folding guide,
%comment out other \def\vdecor's and uncomment:
\def\vdecor{\hskip .1in plus1fil 
\vbox to \vsize{\hbox to .1pt{\vrule height 2pt width .1pt}\vfill
\hbox to .1pt{\vrule height 2pt width .1pt}}
\hskip .1in plus1fil}
%
%END OF ALTERNATIVES FOR FOLDING GUIDES
%
\def\tripleformat{\shipout\vbox{\fulline{\box\leftcolumn\vdecor
                                         \box\centercolumn\vdecor
                                         \columnbox}
			       }
                 \advancepageno}
\def\columnbox{\leftline{\pagebody}}
\def\bye{\par\vfill
         \supereject
         \if R\lcr \null\vfill\eject\fi
         \end}
