Annotation of src/share/me/footnote.me, Revision 1.4
1.4 ! agc 1: .\" $NetBSD: footnote.me,v 1.3 1997/07/07 20:08:00 phil Exp $
1.2 phil 2: .\"
1.1 cgd 3: .nr _0 \n(c.
1.2 phil 4: .\" Copyright (c) 1988, 1993
5: .\" The Regents of the University of California. All rights reserved.
1.1 cgd 6: .\"
7: .\" Redistribution and use in source and binary forms, with or without
8: .\" modification, are permitted provided that the following conditions
9: .\" are met:
10: .\" 1. Redistributions of source code must retain the above copyright
11: .\" notice, this list of conditions and the following disclaimer.
12: .\" 2. Redistributions in binary form must reproduce the above copyright
13: .\" notice, this list of conditions and the following disclaimer in the
14: .\" documentation and/or other materials provided with the distribution.
1.4 ! agc 15: .\" 3. Neither the name of the University nor the names of its contributors
1.1 cgd 16: .\" may be used to endorse or promote products derived from this software
17: .\" without specific prior written permission.
18: .\"
19: .\" THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20: .\" ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21: .\" IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22: .\" ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23: .\" FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24: .\" DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25: .\" OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26: .\" HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27: .\" LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28: .\" OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29: .\" SUCH DAMAGE.
30: .\"
1.2 phil 31: .\" @(#)footnote.me 8.1 (Berkeley) 6/5/93
1.1 cgd 32: .\"
33: .\" %beginstrip%
34: .\"
35: .de (f \" *** begin footnote
36: .ec
37: .if "\\n(.z"|f" .tm Line \\n(c. -- Illegal footnote nesting
38: .ie "\\n(.z"" \
39: \{\
40: . nr _D \\n(dn
41: . nr _0 1v+\\n(nlu
42: . ev 2
43: . da |f
44: . in 0
45: . xl \\n($lu-\\n(fuu
46: . @F \\n(ff
47: . sz \\n(fp
48: . vs \\n(.su*\\n($Ru
49: . if !\\n(?f \
50: \{\
51: . nr _b +1v \" allow space for $s
52: . $s
53: . \}
54: . br
55: . if \\n(.p-\\n(_b-\\n(_0-\\n(.h-1v-\\n(fs<0 \
56: \{\
57: . da\" \" won't fit on page at all
58: . bc
59: . if !\\n(?f \
60: . rm |f
61: . da |f
62: .\" next five lines could be dropped if headers had their own environment
63: . in 0 \" reset everything from .bc
64: . xl \\n($lu-\\n(fuu
65: . @F \\n(ff
66: . sz \\n(fp
67: . vs \\n(.su*\\n($Ru
68: . if !\\n(?f \
69: . $s
70: . br
71: . \}
72: . rr _0
73: . sp \\n(fsu
74: . nr ?f 1
75: . fi
76: . if !"\\$1"_" \
77: . ti \\n(fiu
78: . if \n@>2 .tm << (f $f=\\n($f
79: .\}
80: .el \
81: \{\
82: . ev 2
83: \!.(f \\$1
84: .\}
85: ..
86: .de )f \" *** end footnote
87: .ie "\\n(.z"|f" \
88: \{\
89: . if \\n* \
90: . nr $f +1
1.3 phil 91: . ds * \\*{\\n($f\\*}\k*
92: . nr * 0
1.1 cgd 93: . in 0
94: . da
95: . ev
96: . if \\n(_w<\\n(dl \
97: . nr _w \\n(dl \" compute maximum fn width
98: . nr _b +\\n(dn
99: . ch @f -\\n(_bu
100: . if \\n(.p-\\n(_b<=\\n(nl \
101: . ch @f \\n(nlu+\n(.Vu
1.3 phil 102: . nr dn \\n(_D
1.1 cgd 103: . rr _D
104: .\}
105: .el \
106: \{\
107: . br
108: \!.)f
109: . ev
110: .\}
111: ..
112: .if \n(ff<=0 \
113: . nr ff 1 \" footnote font: Times Roman
114: .if \n(fp<=0 \
115: . nr fp 8 \" footnote pointsize
116: .nr c. \n(_0
CVSweb <webmaster@jp.NetBSD.org>