Return to eqn.me CVS log

Up to [local] / src / share / me

Annotation of src/share/me/eqn.me, Revision 1.1.1.1

1.1       deraadt     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, with or without
                      6: .\" modification, are permitted provided that the following conditions
                      7: .\" are met:
                      8: .\" 1. Redistributions of source code must retain the above copyright
                      9: .\"    notice, this list of conditions and the following disclaimer.
                     10: .\" 2. Redistributions in binary form must reproduce the above copyright
                     11: .\"    notice, this list of conditions and the following disclaimer in the
                     12: .\"    documentation and/or other materials provided with the distribution.
                     13: .\" 3. All advertising materials mentioning features or use of this software
                     14: .\"    must display the following acknowledgement:
                     15: .\"    This product includes software developed by the University of
                     16: .\"    California, Berkeley and its contributors.
                     17: .\" 4. Neither the name of the University nor the names of its contributors
                     18: .\"    may be used to endorse or promote products derived from this software
                     19: .\"    without specific prior written permission.
                     20: .\"
                     21: .\" THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
                     22: .\" ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
                     23: .\" IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
                     24: .\" ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
                     25: .\" FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
                     26: .\" DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
                     27: .\" OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
                     28: .\" HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
                     29: .\" LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
                     30: .\" OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
                     31: .\" SUCH DAMAGE.
                     32: .\"
                     33: .\"    @(#)eqn.me      5.1 (Berkeley) 4/17/91
                     34: .\"
                     35: .\"    %beginstrip%
                     36: .\"
                     37: .de EQ                 \" *** equation start
                     38: .ec
                     39: .if !\\n(?e \
                     40: \{\
                     41: .      if "\\n(.z"|e" .tm Line \\n(c. -- Nested .EQ request
                     42: .      @D 1 "\\$1" "\\$2"
                     43: .      @C 2
                     44: .      di |e
                     45: .\}
                     46: .ls 1
                     47: .in 0
                     48: .nf
                     49: ..
                     50: .de EN                 \" *** equation end
                     51: .br
                     52: .ie "\\$1"C" \
                     53: \{\
                     54: .      nr ?e 1
                     55: .      sp \\n(esu
                     56: .\}
                     57: .el \
                     58: \{\
                     59: .      nr ?e 0
                     60: .      di
                     61: .      if \\n(dn \
                     62: .              @q              \" actual equation output
                     63: .      rm |e
                     64: .      rm 10
                     65: .      rm 11
                     66: .      rm 12
                     67: .      rm 13
                     68: .      rm 14
                     69: .      rm 15
                     70: .      rm 16
                     71: .      rm 17
                     72: .      rm 18
                     73: .      rm 19
                     74: .      rm 20
                     75: .      rm 21
                     76: .      rm 22
                     77: .      rm 23
                     78: .      ev
                     79: .\}
                     80: ..
                     81: .de @q                 \" --- equation output
                     82: .nr _Q \\n(dnu
                     83: .ev
                     84: .sp \\n(esu                    \" output rest of preceeding text
                     85: .@C 2                          \" .ev 2 may be jumbled from header
                     86: .ie \\n(_d=1 \
                     87: .      in (\\n(.lu+\\n($iu-\\n(dlu)/2u
                     88: .el .ie \\n(_d=2 \
                     89: .      in \\n($iu
                     90: .el .ie \\n(_d=3 \
                     91: .      in \\n(biu+\\n($iu
                     92: .el .if \\n(_d=4 \
                     93: .      in 0
                     94: .if !"\\n(.z"" \!.ne \\n(_Qu
                     95: .ne \\n(_Qu+\n(.Vu             \" keep it on one page
                     96: .mk _q
                     97: .if \n@>1 .tm --@e: _Q=\\n(_Q _q=\\n(_q nl=\\n(nl |p=\\*(|p
                     98: .if !"\\*(|p"" \
                     99: \{\
                    100: .      rs
                    101: .      sp (\\n(_Qu-\\n(.vu)/2u
                    102: .      tl """\\*(|p"
                    103: .      rt \\n(_qu
                    104: .\}
                    105: .|e
                    106: .sp |\\n(_qu+\\n(_Qu
                    107: .sp \\n(esu+\\n(.Lv-1v
                    108: .rr _q
                    109: .rr _Q
                    110: ..
                    111: .nr c. \n(_0