Annotation of 43BSDReno/share/me/eqn.me, revision 1.1.1.1

1.1       root        1: .nr _0 \n(c.
                      2: .\" Copyright (c) 1988 The Regents of the University of California.
                      3: .\" All rights reserved.
                      4: .\"
                      5: .\" Redistribution and use in source and binary forms are permitted
                      6: .\" provided that the above copyright notice and this paragraph are
                      7: .\" duplicated in all such forms and that any documentation,
                      8: .\" advertising materials, and other materials related to such
                      9: .\" distribution and use acknowledge that the software was developed
                     10: .\" by the University of California, Berkeley.  The name of the
                     11: .\" University may not be used to endorse or promote products derived
                     12: .\" from this software without specific prior written permission.
                     13: .\" THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
                     14: .\" IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
                     15: .\" WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
                     16: .\"
                     17: .\"    @(#)eqn.me      2.4 (Berkeley) 9/30/88
                     18: .\"
                     19: .\"    %beginstrip%
                     20: .\"
                     21: .de EQ                 \" *** equation start
                     22: .ec
                     23: .if !\\n(?e \
                     24: \{\
                     25: .      if "\\n(.z"|e" .tm Line \\n(c. -- Nested .EQ request
                     26: .      @D 1 "\\$1" "\\$2"
                     27: .      @C 2
                     28: .      di |e
                     29: .\}
                     30: .ls 1
                     31: .in 0
                     32: .nf
                     33: ..
                     34: .de EN                 \" *** equation end
                     35: .br
                     36: .ie "\\$1"C" \
                     37: \{\
                     38: .      nr ?e 1
                     39: .      sp \\n(esu
                     40: .\}
                     41: .el \
                     42: \{\
                     43: .      nr ?e 0
                     44: .      di
                     45: .      if \\n(dn \
                     46: .              @q              \" actual equation output
                     47: .      rm |e
                     48: .      rm 10
                     49: .      rm 11
                     50: .      rm 12
                     51: .      rm 13
                     52: .      rm 14
                     53: .      rm 15
                     54: .      rm 16
                     55: .      rm 17
                     56: .      rm 18
                     57: .      rm 19
                     58: .      rm 20
                     59: .      rm 21
                     60: .      rm 22
                     61: .      rm 23
                     62: .      ev
                     63: .\}
                     64: ..
                     65: .de @q                 \" --- equation output
                     66: .nr _Q \\n(dnu
                     67: .ev
                     68: .sp \\n(esu                    \" output rest of preceeding text
                     69: .@C 2                          \" .ev 2 may be jumbled from header
                     70: .ie \\n(_d=1 \
                     71: .      in (\\n(.lu+\\n($iu-\\n(dlu)/2u
                     72: .el .ie \\n(_d=2 \
                     73: .      in \\n($iu
                     74: .el .ie \\n(_d=3 \
                     75: .      in \\n(biu+\\n($iu
                     76: .el .if \\n(_d=4 \
                     77: .      in 0
                     78: .if !"\\n(.z"" \!.ne \\n(_Qu
                     79: .ne \\n(_Qu+\n(.Vu             \" keep it on one page
                     80: .mk _q
                     81: .if \n@>1 .tm --@e: _Q=\\n(_Q _q=\\n(_q nl=\\n(nl |p=\\*(|p
                     82: .if !"\\*(|p"" \
                     83: \{\
                     84: .      rs
                     85: .      sp (\\n(_Qu-\\n(.vu)/2u
                     86: .      tl """\\*(|p"
                     87: .      rt \\n(_qu
                     88: .\}
                     89: .|e
                     90: .sp |\\n(_qu+\\n(_Qu
                     91: .sp \\n(esu+\\n(.Lv-1v
                     92: .rr _q
                     93: .rr _Q
                     94: ..
                     95: .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.