1 6cc703dc 2004-05-16 devnull .nr _0 \n(c.
 2 6cc703dc 2004-05-16 devnull .\"	@(#)footnote.me	2.4	9/23/80
 3 6cc703dc 2004-05-16 devnull .\" This version has had comments stripped; an unstripped version is available.
 4 6cc703dc 2004-05-16 devnull .de (f
 5 6cc703dc 2004-05-16 devnull .ec
 6 6cc703dc 2004-05-16 devnull .if "\\n(.z"|f" .tm Line \\n(c. -- Illegal footnote nesting
 7 6cc703dc 2004-05-16 devnull .ie "\\n(.z"" \
 8 6cc703dc 2004-05-16 devnull \{\
 9 6cc703dc 2004-05-16 devnull .	nr _D \\n(dn
10 6cc703dc 2004-05-16 devnull .	nr _0 1v+\\n(nlu
11 6cc703dc 2004-05-16 devnull .	ev 2
12 6cc703dc 2004-05-16 devnull .	da |f
13 6cc703dc 2004-05-16 devnull .	in 0
14 6cc703dc 2004-05-16 devnull .	xl \\n($lu-\\n(fuu
15 6cc703dc 2004-05-16 devnull .	@F \\n(ff
16 6cc703dc 2004-05-16 devnull .	sz \\n(fpu
17 6cc703dc 2004-05-16 devnull .	vs \\n(.su*\\n($Ru
18 6cc703dc 2004-05-16 devnull .	if !\\n(?f \
19 6cc703dc 2004-05-16 devnull \{\
20 6cc703dc 2004-05-16 devnull .		nr _b +2u*\n(.Vu
21 6cc703dc 2004-05-16 devnull .		$s
22 6cc703dc 2004-05-16 devnull .	\}
23 6cc703dc 2004-05-16 devnull .	br
24 6cc703dc 2004-05-16 devnull .	if \\n(.p-\\n(_b-\\n(_0-\\n(.h-1v-\\n(fs<0 \
25 6cc703dc 2004-05-16 devnull \{\
26 6cc703dc 2004-05-16 devnull .		da\"
27 6cc703dc 2004-05-16 devnull .		bc
28 6cc703dc 2004-05-16 devnull .		if !\\n(?f \
29 6cc703dc 2004-05-16 devnull .			rm |f
30 6cc703dc 2004-05-16 devnull .		da |f
31 6cc703dc 2004-05-16 devnull .		in 0
32 6cc703dc 2004-05-16 devnull .		xl \\n($lu-\\n(fuu
33 6cc703dc 2004-05-16 devnull .		@F \\n(ff
34 6cc703dc 2004-05-16 devnull .		sz \\n(fpu
35 6cc703dc 2004-05-16 devnull .		vs \\n(.su*\\n($Ru
36 6cc703dc 2004-05-16 devnull .		if !\\n(?f \
37 6cc703dc 2004-05-16 devnull .			$s
38 6cc703dc 2004-05-16 devnull .		br
39 6cc703dc 2004-05-16 devnull .	\}
40 6cc703dc 2004-05-16 devnull .	rr _0
41 6cc703dc 2004-05-16 devnull .	sp \\n(fsu
42 6cc703dc 2004-05-16 devnull .	nr ?f 1
43 6cc703dc 2004-05-16 devnull .	fi
44 6cc703dc 2004-05-16 devnull .	if !"\\$1"_" \
45 6cc703dc 2004-05-16 devnull .		ti \\n(fiu
46 6cc703dc 2004-05-16 devnull .\}
47 6cc703dc 2004-05-16 devnull .el \
48 6cc703dc 2004-05-16 devnull \{\
49 6cc703dc 2004-05-16 devnull .	ev 2
50 6cc703dc 2004-05-16 devnull \!.(f \\$1
51 6cc703dc 2004-05-16 devnull .\}
52 6cc703dc 2004-05-16 devnull ..
53 6cc703dc 2004-05-16 devnull .de )f
54 6cc703dc 2004-05-16 devnull .ie "\\n(.z"|f" \
55 6cc703dc 2004-05-16 devnull \{\
56 6cc703dc 2004-05-16 devnull .	if \\n* \
57 6cc703dc 2004-05-16 devnull .		nr $f +1
58 6cc703dc 2004-05-16 devnull .	ds * \\*[\\n($f\\*]\k*
59 6cc703dc 2004-05-16 devnull .	rr *
60 6cc703dc 2004-05-16 devnull .	in 0
61 6cc703dc 2004-05-16 devnull .	da
62 6cc703dc 2004-05-16 devnull .	ev
63 6cc703dc 2004-05-16 devnull .	if \\n(_w<\\n(dl \
64 6cc703dc 2004-05-16 devnull .		nr _w \\n(dl
65 6cc703dc 2004-05-16 devnull .	nr _b +\\n(dn
66 6cc703dc 2004-05-16 devnull .	ch @f -\\n(_bu
67 6cc703dc 2004-05-16 devnull .	if \\n(.p-\\n(_b<=\\n(nl \
68 6cc703dc 2004-05-16 devnull .		ch @f \\n(nlu+\n(.Vu
69 6cc703dc 2004-05-16 devnull .	nr dn _D
70 6cc703dc 2004-05-16 devnull .	rr _D
71 6cc703dc 2004-05-16 devnull .\}
72 6cc703dc 2004-05-16 devnull .el \
73 6cc703dc 2004-05-16 devnull \{\
74 6cc703dc 2004-05-16 devnull .	br
75 6cc703dc 2004-05-16 devnull \!.)f
76 6cc703dc 2004-05-16 devnull .	ev
77 6cc703dc 2004-05-16 devnull .\}
78 6cc703dc 2004-05-16 devnull ..
79 6cc703dc 2004-05-16 devnull .if \n(ff<=0 \
80 6cc703dc 2004-05-16 devnull .	nr ff 1
81 6cc703dc 2004-05-16 devnull .if \n(fp<=0 \
82 6cc703dc 2004-05-16 devnull .	nr fp 8
83 6cc703dc 2004-05-16 devnull .nr c. \n(_0