1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16\unprotect
17
18\mathgroupingmode \zerocount
19
20\ifdefined\eqalign \else
21
22 \permanent\protected\def\eqalign#1
23 {\dontleavehmode
24 \mskip\thinmuskip\vcenter\bgroup
25 \mathsurround\zeropoint
26 \ialign
27 {\strut
28 \hfil
29 \mathbeginclass\mathordcode
30 \mathendclass \mathordcode
31 \startforceddisplaymath\aligncontent\stopforceddisplaymath
32 \aligntab
33 \mathbeginclass\mathordcode
34 \mathendclass \mathordcode
35 \startforceddisplaymath\aligncontent\stopforceddisplaymath
36 \hfil
37 \crcr
38 #1
39 \crcr}
40 \egroup\mskip\thinmuskip}
41
42\fi
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74\permanent\protected\def\buildrel#1\over#2
75 {\mathrel{\mathop{\kern\zeropoint#2}\limits{#1}}}
76
77\permanent\protected\def\math_openup
78 {\afterassignment\math_openup_indeed\scratchdimen}
79
80\aliased\let\math_closeup\relax
81
82\def\math_openup_indeed
83 {\enforced\permanent\protected\edef\math_closeup
84 {\lineskip \the\lineskip
85 \baselineskip \the\baselineskip
86 \lineskiplimit\the\lineskiplimit
87 \relax}
88 \advanceby\lineskip \scratchdimen
89 \advanceby\baselineskip \scratchdimen
90 \advanceby\lineskiplimit\scratchdimen}
91
92\permanent\protected\def\openup {\math_openup }
93\permanent\protected\def\closeup{\math_closeup}
94
95
96
97\permanent\protected\def\choose{\atopwithdelims()}
98\permanent\protected\def\brack {\atopwithdelims[]}
99\permanent\protected\def\brace {\atopwithdelims\{\}}
100
101
102
103\permanent\protected\def\cases#1
104 {\left\{
105 \mskip\thinmuskip
106 \vcenter
107 {\normalbaselines
108 \mathsurround\zeropoint
109 \ialign{
110 \normalstartimath\alignmark\alignmark\hfil\normalstopimath
111 \aligntab
112 \quad\alignmark\alignmark\hfil
113 \crcr
114 #1
115 \crcr}}
116 \right.}
117
118\permanent\protected\def\matrix#1
119 {\emptyhbox
120 \mskip\thinmuskip
121 \vcenter
122 {\normalbaselines
123 \mathsurround\zeropoint
124 \ialign{
125 \hfil\normalstartimath\alignmark\alignmark\normalstopimath\hfil
126 \aligntab
127 \aligntab
128 \quad\hfil\normalstartimath\alignmark\alignmark\normalstopimath\hfil
129 \crcr
130 \mathstrut
131 \crcr
132 \noalign{\kern\baselineskip}
133 #1\crcr
134 \mathstrut
135 \crcr
136 \noalign{\kern\baselineskip}}}
137 \mskip\thinmuskip}
138
139\permanent\protected\def\pmatrix#1
140 {\left(\matrix{#1}\right)}
141
142\permanent\protected\def\root#1\of
143
144 {\Uradical \zerocount "221A{#1}}
145
146\protect
147
148\endinput
149 |