summaryrefslogtreecommitdiff
path: root/info/digests/texline/no7/double.tex
diff options
context:
space:
mode:
Diffstat (limited to 'info/digests/texline/no7/double.tex')
-rw-r--r--info/digests/texline/no7/double.tex18
1 files changed, 18 insertions, 0 deletions
diff --git a/info/digests/texline/no7/double.tex b/info/digests/texline/no7/double.tex
new file mode 100644
index 0000000000..4a65fb6c7e
--- /dev/null
+++ b/info/digests/texline/no7/double.tex
@@ -0,0 +1,18 @@
+%double column macros from the TeXbook
+\def\makeheadline{\vbox to 0pt{\vskip-22.5pt
+ \fullline{\vbox to 8.5pt{}\the\headline}\vss}\nointerlineskip}
+\def\makefootline{\baselineskip=24pt \fullline{\the\footline}}
+\newdimen\fullhsize
+\fullhsize=6.5in \hsize=3.1in
+\def\fullline{\hbox to\fullhsize}
+\let\lr=L \newbox\leftcolumn
+\output={\if L\lr
+ \global\setbox\leftcolumn=\columnbox \global\let\lr=R
+ \else
+ \doubleformat \global\let\lr=L\fi
+ \ifnum\outputpenalty>-20000 \else\dosupereject\fi}
+ \def\doubleformat{\shipout\vbox{\makeheadline
+ \fullline{\box\leftcolumn\hfil\columnbox}
+ \makefootline}
+ \advancepageno}
+ \def\columnbox{\leftline{\pagebody}}