Annotation of 43BSD/usr.lib/me/eqn.me, revision 1.1

1.1     ! root        1: .nr _0 \n(c.
        !             2: .\"    @(#)eqn.me      2.1     8/18/80
        !             3: .\"    %beginstrip%
        !             4: .de EQ                 \" *** equation start
        !             5: .ec
        !             6: .if !\\n(?e \
        !             7: \{\
        !             8: .      if "\\n(.z"|e" .tm Line \\n(c. -- Nested .EQ request
        !             9: .      @D 1 "\\$1" "\\$2"
        !            10: .      @C 2
        !            11: .      di |e
        !            12: .\}
        !            13: .ls 1
        !            14: .in 0
        !            15: .nf
        !            16: ..
        !            17: .de EN                 \" *** equation end
        !            18: .br
        !            19: .ie "\\$1"C" \
        !            20: \{\
        !            21: .      nr ?e 1
        !            22: .      sp \\n(esu
        !            23: .\}
        !            24: .el \
        !            25: \{\
        !            26: .      nr ?e 0
        !            27: .      di
        !            28: .      if \\n(dn \
        !            29: .              @q              \" actual equation output
        !            30: .      rm |e
        !            31: .      rm 10
        !            32: .      rm 11
        !            33: .      rm 12
        !            34: .      rm 13
        !            35: .      rm 14
        !            36: .      rm 15
        !            37: .      rm 16
        !            38: .      rm 17
        !            39: .      rm 18
        !            40: .      rm 19
        !            41: .      rm 20
        !            42: .      rm 21
        !            43: .      rm 22
        !            44: .      rm 23
        !            45: .      ev
        !            46: .\}
        !            47: ..
        !            48: .de @q                 \" --- equation output
        !            49: .nr _Q \\n(dnu
        !            50: .ev
        !            51: .sp \\n(esu                    \" output rest of preceeding text
        !            52: .@C 2                          \" .ev 2 may be jumbled from header
        !            53: .ie \\n(_d=1 \
        !            54: .      in (\\n(.lu+\\n($iu-\\n(dlu)/2u
        !            55: .el .ie \\n(_d=2 \
        !            56: .      in \\n($iu
        !            57: .el .ie \\n(_d=3 \
        !            58: .      in \\n(biu+\\n($iu
        !            59: .el .if \\n(_d=4 \
        !            60: .      in 0
        !            61: .if !"\\n(.z"" \!.ne \\n(_Qu
        !            62: .ne \\n(_Qu+\n(.Vu             \" keep it on one page
        !            63: .mk _q
        !            64: .if \n@>1 .tm --@e: _Q=\\n(_Q _q=\\n(_q nl=\\n(nl |p=\\*(|p
        !            65: .if !"\\*(|p"" \
        !            66: \{\
        !            67: .      rs
        !            68: .      sp (\\n(_Qu-\\n(.vu)/2u
        !            69: .      tl """\\*(|p"
        !            70: .      rt \\n(_qu
        !            71: .\}
        !            72: .|e
        !            73: .sp |\\n(_qu+\\n(_Qu
        !            74: .sp \\n(esu+\\n(.Lv-1v
        !            75: .rr _q
        !            76: .rr _Q
        !            77: ..
        !            78: .nr c. \n(_0

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.