diff options
Diffstat (limited to 'info/examples/tex-in-practice/ts-chhe.tip')
-rw-r--r-- | info/examples/tex-in-practice/ts-chhe.tip | 48 |
1 files changed, 48 insertions, 0 deletions
diff --git a/info/examples/tex-in-practice/ts-chhe.tip b/info/examples/tex-in-practice/ts-chhe.tip new file mode 100644 index 0000000000..4ade3e51c9 --- /dev/null +++ b/info/examples/tex-in-practice/ts-chhe.tip @@ -0,0 +1,48 @@ +% This macro source file is from the four volume series +% "TeX in Practice" by Stephan von Bechtolsheim, published +% 1993 by Springer-Verlag, New York. +% Copyright 1993 Stephan von Bechtolsheim. +% No warranty or liability is assumed. +% This macro may be copied freely if no fees other than +% media cost or shipping charges are charged and as long +% as this copyright and the following source code itself +% is not changed. Please see the series for further information. +% +% Version: 1.0 +% Date: May 1, 1993 +% +% +% This source code is documented in 8.4, p. I-300. +% Original source in file "vboxes2.TEX", starting line 1294. +\wlog{L: "ts-chhe.tip" ["vboxes2.TEX," l. 1294, p. I-300]}% +% This file DOES belong to format "texip." +\InputD{parin.tip} +\InputD{shboxes.tip} +\InputD{alwbase.tip} +\def\ChapterHeadingTeXIP #1#2{% + \setbox 1 = + \vbox to 13pc{ + \hyphenpenalty = 10000 + \parindent = 0pt + \huge + \bf + \baselineskip = 21pt + \AlwaysBaselineskip + \setbox 0 = \hbox{#1}% + \copy0 + \parskip = 3pc + \advance\parskip by -\dp0 + \advance\parskip by -\ht0 + \advance\parskip by -\baselineskip + \wlog{\string\ChapterHeadingTeXIP: computed value + of \noexpand\parskip is \the\parskip.}% + \spaceskip = 0.3333em + \xspaceskip = \spaceskip + \rightskip = 0pt plus 4em + #2 + \par + \vfil + } + \box 1 + \SuppressNextParIndent +} |