.nr _0 \n(c. Copyright (c) 1988 The Regents of the University of California.
All rights reserved.

%sccs.include.redist.roff%

@(#)footnote.me 5.1 (Berkeley) 04/17/91

%beginstrip%

.ec \{\ . 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(fp . vs \\n(.su*\\n($Ru . if !\\n(?f \ \{\ . nr _b +1v \" allow space for $s . $s . \} . br . if \\n(.p-\\n(_b-\\n(_0-\\n(.h-1v-\\n(fs<0 \ \{\ . da\" \" won't fit on page at all . bc . if !\\n(?f \ . rm |f . da |f next five lines could be dropped if headers had their own environment
. in 0 \" reset everything from .bc . xl \\n($lu-\\n(fuu . @F \\n(ff . sz \\n(fp . vs \\n(.su*\\n($Ru . if !\\n(?f \ . $s . br . \} . rr _0 . sp \\n(fsu . nr ?f 1 . fi . if !"\\$1"_" \ . ti \\n(fiu . if \n@>2 .tm << (f $f=\\n($f .\} \{\ . ev 2 \!.(f \\$1 .\} .. \{\ . if \\n* \ . nr $f +1 . ds * \\*[\\n($f\\*]\k* . rr * . in 0 . da . ev . if \\n(_w<\\n(dl \ . nr _w \\n(dl \" compute maximum fn width . 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 .\} \{\ . br \!.)f . ev .\} .. . nr ff 1 \" footnote font: Times Roman . nr fp 8 \" footnote pointsize .nr c. \n(_0