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.
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"" \
9 6cc703dc 2004-05-16 devnull . nr _D \\n(dn
10 6cc703dc 2004-05-16 devnull . nr _0 1v+\\n(nlu
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 \
20 6cc703dc 2004-05-16 devnull . nr _b +2u*\n(.Vu
24 6cc703dc 2004-05-16 devnull . if \\n(.p-\\n(_b-\\n(_0-\\n(.h-1v-\\n(fs<0 \
28 6cc703dc 2004-05-16 devnull . if !\\n(?f \
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 \
41 6cc703dc 2004-05-16 devnull . sp \\n(fsu
42 6cc703dc 2004-05-16 devnull . nr ?f 1
44 6cc703dc 2004-05-16 devnull . if !"\\$1"_" \
45 6cc703dc 2004-05-16 devnull . ti \\n(fiu
50 6cc703dc 2004-05-16 devnull \!.(f \\$1
54 6cc703dc 2004-05-16 devnull .ie "\\n(.z"|f" \
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*
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
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