nr _0 \n(c.
\"      @(#)footnote.me 2.4     9/23/80
\" This version has had comments stripped; an unstripped version is available.
de (f
ec
if "\\n(.z"|f" .tm Line \\n(c. -- Illegal footnote nesting
ie "\\n(.z"" \
\{\
       nr _D \\n(dn
       nr _0 1v+\\n(nlu
       ev 2
       da |f
       in 0
       xl \\n($lu-\\n(fuu
       @F \\n(ff
       sz \\n(fpu
       vs \\n(.su*\\n($Ru
       if !\\n(?f \
\{\
               nr _b +2u*\n(.Vu
               $s
       \}
       br
       if \\n(.p-\\n(_b-\\n(_0-\\n(.h-1v-\\n(fs<0 \
\{\
               da\"
               bc
               if !\\n(?f \
                       rm |f
               da |f
               in 0
               xl \\n($lu-\\n(fuu
               @F \\n(ff
               sz \\n(fpu
               vs \\n(.su*\\n($Ru
               if !\\n(?f \
                       $s
               br
       \}
       rr _0
       sp \\n(fsu
       nr ?f 1
       fi
       if !"\\$1"_" \
               ti \\n(fiu
\}
el \
\{\
       ev 2
\!.(f \\$1
\}
.
de )f
ie "\\n(.z"|f" \
\{\
       if \\n* \
               nr $f +1
       ds * \\*[\\n($f\\*]\k*
       rr *
       in 0
       da
       ev
       if \\n(_w<\\n(dl \
               nr _w \\n(dl
       nr _b +\\n(dn
       ch @f -\\n(_bu
       if \\n(.p-\\n(_b<=\\n(nl \
               ch @f \\n(nlu+\n(.Vu
       nr dn _D
       rr _D
\}
el \
\{\
       br
\!.)f
       ev
\}
.
if \n(ff<=0 \
       nr ff 1
if \n(fp<=0 \
       nr fp 8
nr c. \n(_0