summaryrefslogtreecommitdiff
path: root/info/examples/tex-in-practice/ts-foot.tip
blob: 47d3982dd61062de260a5278a4eaa502c130fec3 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
% 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 35.4.2, p. IV-102.
% Original source in file "o2.TEX", starting line 793.
\wlog{L: "ts-foot.tip" ["o2.TEX," l. 793, p. IV-102]}%
% This file DOES belong to format "texip."
\InputD{op-pagec.tip}
\catcode`\@ = 11
\NewCounter{FootNote}{\arabic}% 
    {\TheCounter{FootNote}}%
    {\PrintCounter{FootNote}}
\AddCounterToResetList{FootNote}{ChapterNo}
\def\FootNote #1{% 
    \StepCounter{FootNote}%
    \footnote{$^{\PrintCounter{FootNote}}$}% 
        {% 
            \small
            \baselineskip = 9pt
            #1% 
        }%
}
\skip\footins = 18.4pt
\def\@PrintFootnotePlain{%
    \vskip 12pt plus 2pt minus 1pt
    \hrule width 5pc height 0.4pt depth 0pt
    \vskip 6pt plus 1pt minus 0.5pt
    \unvbox\footins
}
\catcode`\@ = 12