BSD 4 release
[unix-history] / usr / lib / me / eqn.me
CommitLineData
cba3d868 1.nr _0 \n(c.
31cef89c 2.\" @(#)eqn.me 2.1 8/18/80
cba3d868
BJ
3.\" This version has had comments stripped; an unstripped version is available.
4.de EQ
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
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
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
49.nr _Q \\n(dnu
50.ev
51.sp \\n(esu
52.@C 2
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
63.mk _q
64.if !"\\*(|p"" \
65\{\
66. rs
67. sp (\\n(_Qu-\\n(.vu)/2u
68. tl """\\*(|p"
69. rt \\n(_qu
70.\}
71.|e
72.sp |\\n(_qu+\\n(_Qu
73.sp \\n(esu+\\n(.Lv-1v
74.rr _q
75.rr _Q
76..
77.nr c. \n(_0