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