| 1 | .\" @(#)eqn.ms 1.3 (Berkeley) %G% |
| 2 | .bd S B 3 |
| 3 | . \" EQ - equation, breakout and display |
| 4 | .de EQ |
| 5 | .nr UR \\n(.u |
| 6 | .rm EE |
| 7 | .nr LE 1 \" default centered |
| 8 | .ds EL \f1\\$1\fP |
| 9 | .if \a\\$1\aC\a .ds EL \f1\\$2\fP |
| 10 | .if \a\\$1\aL\a \{\ |
| 11 | . ds EL \f1\\$2\fP |
| 12 | . nr LE 0 |
| 13 | .\} |
| 14 | .if \a\\$1\aI\a \{\ |
| 15 | . ds EL \f1\\$2\fP |
| 16 | . nr LE 0 |
| 17 | . ds EE \\h'|10n' |
| 18 | . if !\a\\$3\a\a .ds EE \\h'\\$3' |
| 19 | .\} |
| 20 | .if \\n(YE>0 .nf |
| 21 | .di EZ |
| 22 | .. |
| 23 | . \" EN - end of a displayed equation |
| 24 | .de EN |
| 25 | .if !\a\\*(10\a\a .br |
| 26 | .di |
| 27 | .rm EZ |
| 28 | .nr ZN \\n(dn |
| 29 | .if \\n(ZN>0 .if \\n(YE=0 .LP |
| 30 | .if \\n(ZN=0 .if !\a\\*(EL\a\a .nr ZN 1 |
| 31 | .if \a\\n(.z\a\a .if \\n(ZN>0 .if !\\n(nl=\\n(PE .sp \\n(DDu |
| 32 | .if !\a\\n(.z\a\a .if \\n(ZN>0 .if !\\n(.d=\\n(PE .sp \\n(DDu |
| 33 | .pc |
| 34 | .if \\n(BD>0 .nr LE 0 \" can't mean centering in this case. |
| 35 | .if \\n(MK>0 .if \\n(LE=1 .ds EE \\h'|10n' |
| 36 | .if \\n(MK>0 .nr LE 0 \" don't center if mark/lineup |
| 37 | .lt \\n(.lu |
| 38 | .if \\n(EP=0 .if \\n(ZN>0 \{\ |
| 39 | . if \\n(LE>0 .tl \a\a\\*(10\a\\*(EL\a |
| 40 | . if \\n(LE=0 .if \\n(BD=0 .tl \a\\*(EE\\*(10\a\a\\*(EL\a |
| 41 | . if \\n(LE=0 .if \\n(BD>0 .if \\n(BD<\\w\a\\*(10\a .nr BD \\w\a\\*(10\a |
| 42 | . if \\n(LE=0 .if \\n(BD>0 \!\\*(10\\t\\*(EL |
| 43 | .\} |
| 44 | .if \\n(EP>0 .if \\n(ZN>0 \{\ |
| 45 | . if \\n(LE>0 .tl \a\\*(EL\a\\*(10\a\a |
| 46 | . if \\n(LE=0 .if \\n(BD=0 .tl \a\\*(EL\\*(EE\\*(10\a\a\a |
| 47 | . if \\n(LE=0 .if \\n(BD>0 .if \\n(BD<\\w\a\\*(10\a .nr BD \\w\a\\*(10\a |
| 48 | . if \\n(LE=0 .if \\n(BD>0 \!\\h'-\\\\n(.iu'\\*(EL\\h'|0'\\*(10 |
| 49 | .\} |
| 50 | .lt \\n(LLu |
| 51 | .pc % |
| 52 | .if \\n(YE>0 .if \\n(UR>0 .fi |
| 53 | .rm 10 11 12 13 14 15 16 17 18 19 20 21 22 23 EL |
| 54 | .rr 10 11 12 13 14 15 16 17 18 19 20 21 22 23 |
| 55 | .if \\n(ZN>0 .if t .sp \\n(DDu |
| 56 | .if \a\\n(.z\a\a .nr PE \\n(nl |
| 57 | .if !\a\\n(.z\a\a .nr PE \\n(.d |
| 58 | .. |