projects / unix-history / blame
| Commit | Line | Data |
|---|---|---|
| 84f25a89 | 1 | .nr _0 \n(c. |
| a3fd506b | 2 | .\" @(#)footnote.me 2.8 (Berkeley) %G% |
| 70e37822 KB |
3 | .\" |
| 4 | .\" Copyright (c) 1988 Regents of the University of California. | |
| 5 | .\" All rights reserved. | |
| 6 | .\" | |
| 7 | .\" Redistribution and use in source and binary forms are permitted | |
| 8 | .\" provided that this notice is preserved and that due credit is given | |
| 9 | .\" to the University of California at Berkeley. The name of the University | |
| 10 | .\" may not be used to endorse or promote products derived from this | |
| 11 | .\" software without specific prior written permission. This software | |
| 12 | .\" is provided ``as is'' without express or implied warranty. | |
| a3fd506b | 13 | .\" %beginstrip% |
| 70e37822 | 14 | .\" |
| 84f25a89 EA |
15 | .de (f \" *** begin footnote |
| 16 | .ec | |
| 17 | .if "\\n(.z"|f" .tm Line \\n(c. -- Illegal footnote nesting | |
| e57dda7f | 18 | .ie "\\n(.z"" \ |
| 84f25a89 | 19 | \{\ |
| e57dda7f EA |
20 | . nr _D \\n(dn |
| 21 | . nr _0 1v+\\n(nlu | |
| 22 | . ev 2 | |
| 84f25a89 | 23 | . da |f |
| e57dda7f | 24 | . in 0 |
| 84f25a89 EA |
25 | . xl \\n($lu-\\n(fuu |
| 26 | . @F \\n(ff | |
| 59ed1d66 | 27 | . sz \\n(fp |
| 84f25a89 EA |
28 | . vs \\n(.su*\\n($Ru |
| 29 | . if !\\n(?f \ | |
| e57dda7f | 30 | \{\ |
| 0b7545be | 31 | . nr _b +1v \" allow space for $s |
| 84f25a89 | 32 | . $s |
| e57dda7f | 33 | . \} |
| 84f25a89 | 34 | . br |
| e57dda7f EA |
35 | . if \\n(.p-\\n(_b-\\n(_0-\\n(.h-1v-\\n(fs<0 \ |
| 36 | \{\ | |
| 37 | . da\" \" won't fit on page at all | |
| 38 | . bc | |
| 39 | . if !\\n(?f \ | |
| 40 | . rm |f | |
| 41 | . da |f | |
| 42 | .\" next five lines could be dropped if headers had their own environment | |
| 43 | . in 0 \" reset everything from .bc | |
| 44 | . xl \\n($lu-\\n(fuu | |
| 45 | . @F \\n(ff | |
| 59ed1d66 | 46 | . sz \\n(fp |
| e57dda7f EA |
47 | . vs \\n(.su*\\n($Ru |
| 48 | . if !\\n(?f \ | |
| 49 | . $s | |
| 50 | . br | |
| 51 | . \} | |
| 52 | . rr _0 | |
| 53 | . sp \\n(fsu | |
| 54 | . nr ?f 1 | |
| 55 | . fi | |
| 56 | . if !"\\$1"_" \ | |
| 57 | . ti \\n(fiu | |
| 58 | . if \n@>2 .tm << (f $f=\\n($f | |
| 84f25a89 | 59 | .\} |
| 6f6d9ee7 EA |
60 | .el \ |
| 61 | \{\ | |
| 62 | . ev 2 | |
| 63 | \!.(f \\$1 | |
| 64 | .\} | |
| 84f25a89 EA |
65 | .. |
| 66 | .de )f \" *** end footnote | |
| 70c41273 | 67 | .ie "\\n(.z"|f" \ |
| e57dda7f EA |
68 | \{\ |
| 69 | . if \\n* \ | |
| 70 | . nr $f +1 | |
| 71 | . ds * \\*[\\n($f\\*]\k* | |
| 72 | . rr * | |
| 73 | . in 0 | |
| 74 | . da | |
| 75 | . ev | |
| 76 | . if \\n(_w<\\n(dl \ | |
| 77 | . nr _w \\n(dl \" compute maximum fn width | |
| 78 | . nr _b +\\n(dn | |
| 79 | . ch @f -\\n(_bu | |
| 80 | . if \\n(.p-\\n(_b<=\\n(nl \ | |
| 81 | . ch @f \\n(nlu+\n(.Vu | |
| 82 | . nr dn _D | |
| 83 | . rr _D | |
| 84 | .\} | |
| 6f6d9ee7 EA |
85 | .el \ |
| 86 | \{\ | |
| 87 | . br | |
| 88 | \!.)f | |
| 89 | . ev | |
| 90 | .\} | |
| 84f25a89 EA |
91 | .. |
| 92 | .if \n(ff<=0 \ | |
| 93 | . nr ff 1 \" footnote font: Times Roman | |
| 94 | .if \n(fp<=0 \ | |
| 95 | . nr fp 8 \" footnote pointsize | |
| 84f25a89 | 96 | .nr c. \n(_0 |