blob: 16690c688d077994c89e86453937159dc58a2757 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
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
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
|
%%
%% This is file `euler.sty',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% euler.dtx (with options: `package')
%%
%% File `euler.dtx'.
%% Copyright (C) 1992 Frank Jensen. All rights reserved.
%% Copyright (C) 1993--1995 Frank Jensen and Frank Mittelbach.
%% All rights reserved.
\def\fileversion{v2.5}
\def\filedate{1995/03/05}
%% \CharacterTable
%% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
%% Lower-case \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
%% Digits \0\1\2\3\4\5\6\7\8\9
%% Exclamation \! Double quote \" Hash (number) \#
%% Dollar \$ Percent \% Ampersand \&
%% Acute accent \' Left paren \( Right paren \)
%% Asterisk \* Plus \+ Comma \,
%% Minus \- Point \. Solidus \/
%% Colon \: Semicolon \; Less than \<
%% Equals \= Greater than \> Question mark \?
%% Commercial at \@ Left bracket \[ Backslash \\
%% Right bracket \] Circumflex \^ Underscore \_
%% Grave accent \` Left brace \{ Vertical bar \|
%% Right brace \} Tilde \~}
\NeedsTeXFormat{LaTeX2e}[1994/12/01]
\ProvidesPackage{euler}[\filedate\space\fileversion]
\typeout{Package: `euler' \fileversion\space <\filedate> (FJ and FMi)}
\DeclareSymbolFont{letters}{U}{eur}{m}{n}
\SetSymbolFont{letters}{bold}{U}{eur}{b}{n}
\DeclareMathSymbol{0}\mathalpha{letters}{"30}
\DeclareMathSymbol{1}\mathalpha{letters}{"31}
\DeclareMathSymbol{2}\mathalpha{letters}{"32}
\DeclareMathSymbol{3}\mathalpha{letters}{"33}
\DeclareMathSymbol{4}\mathalpha{letters}{"34}
\DeclareMathSymbol{5}\mathalpha{letters}{"35}
\DeclareMathSymbol{6}\mathalpha{letters}{"36}
\DeclareMathSymbol{7}\mathalpha{letters}{"37}
\DeclareMathSymbol{8}\mathalpha{letters}{"38}
\DeclareMathSymbol{9}\mathalpha{letters}{"39}
\DeclareMathSymbol\Gamma \mathord{letters}{"00}
\DeclareMathSymbol\Delta \mathord{letters}{"01}
\DeclareMathSymbol\Theta \mathord{letters}{"02}
\DeclareMathSymbol\Lambda \mathord{letters}{"03}
\DeclareMathSymbol\Xi \mathord{letters}{"04}
\DeclareMathSymbol\Pi \mathord{letters}{"05}
\DeclareMathSymbol\Sigma \mathord{letters}{"06}
\DeclareMathSymbol\Upsilon\mathord{letters}{"07}
\DeclareMathSymbol\Phi \mathord{letters}{"08}
\DeclareMathSymbol\Psi \mathord{letters}{"09}
\DeclareMathSymbol\Omega \mathord{letters}{"0A}
\let\varsigma=\sigma
\let\varrho=\rho
\DeclareOption{mathbf}
{\AtBeginDocument{\DeclareMathAlphabet\mathbf{U}{eur}{b}{n}}}
\DeclareSymbolFont{EulerFraktur}{U}{euf}{m}{n}
\SetSymbolFont{EulerFraktur}{bold}{U}{euf}{b}{n}
\DeclareSymbolFontAlphabet\mathfrak{EulerFraktur}
\@ifpackageloaded{amsfonts}{}{\newcommand\frak{\mathfrak}}
\DeclareMathSymbol{!}\mathord {EulerFraktur}{"21}
\DeclareMathSymbol{(}\mathopen {EulerFraktur}{"28}
\DeclareMathSymbol{)}\mathclose{EulerFraktur}{"29}
\DeclareMathSymbol{+}\mathbin {EulerFraktur}{"2B}
\DeclareMathSymbol{-}\mathbin {EulerFraktur}{"2D}
\DeclareMathSymbol{=}\mathrel {EulerFraktur}{"3D}
\DeclareMathSymbol{[}\mathopen {EulerFraktur}{"5B}
\DeclareMathSymbol{]}\mathclose{EulerFraktur}{"5D}
\DeclareMathSymbol{"}\mathord {EulerFraktur}{"7D}
\DeclareMathSymbol{&}\mathord {EulerFraktur}{"26}
\DeclareMathSymbol{:}\mathrel {EulerFraktur}{"3A}
\DeclareMathSymbol{;}\mathpunct{EulerFraktur}{"3B}
\DeclareMathSymbol{?}\mathord {EulerFraktur}{"3F}
\DeclareMathSymbol{^}\mathord {EulerFraktur}{"5E}
\DeclareMathSymbol{`}\mathord {EulerFraktur}{"12}
\DeclareMathDelimiter{(}{EulerFraktur}{"28}{largesymbols}{"00}
\DeclareMathDelimiter{)}{EulerFraktur}{"29}{largesymbols}{"01}
\DeclareMathDelimiter{[}{EulerFraktur}{"5B}{largesymbols}{"02}
\DeclareMathDelimiter{]}{EulerFraktur}{"5D}{largesymbols}{"03}
\DeclareRobustCommand\oldstylenums[1]%
{\begingroup
\spaceskip\fontdimen\tw@\font
\TextOldstyle \MathOldstyle #1%
\endgroup}
\def\MathOldstyle{\mathgroup\symEulerFraktur}
\providecommand\TextOldstyle{\usefont{OML}{cmm}\f@series{it}}
\DeclareSymbolFont{EulerScript}{U}{eus}{m}{n}
\SetSymbolFont{EulerScript}{bold}{U}{eus}{b}{n}
\DeclareSymbolFontAlphabet\mathscr{EulerScript}
\newcommand\scr{\mathscr}
\DeclareOption{mathcal}{\renewcommand\mathcal{\mathscr}}
\DeclareMathSymbol\aleph\mathord{EulerScript}{"40}
\DeclareMathSymbol\Re \mathord{EulerScript}{"3C}
\DeclareMathSymbol\Im \mathord{EulerScript}{"3D}
\DeclareMathDelimiter\vert
\mathord{EulerScript}{"6A}{largesymbols}{"0C}
\DeclareMathDelimiter\backslash
\mathord{EulerScript}{"6E}{largesymbols}{"0F}
\DeclareMathSymbol{|}\mathord{EulerScript}{"6A}
\DeclareMathDelimiter{|}{EulerScript}{"6A}{largesymbols}{"0C}
\DeclareMathSymbol\neg \mathord{EulerScript}{"3A}
\let\lnot=\neg
\DeclareMathSymbol\wedge \mathbin{EulerScript}{"5E}
\let\land=\wedge
\DeclareMathSymbol\vee \mathbin{EulerScript}{"5F}
\let\lor=\vee
\DeclareMathSymbol\setminus\mathbin{EulerScript}{"6E}
\DeclareMathSymbol\sim \mathrel{EulerScript}{"18}
\DeclareMathSymbol\mid \mathrel{EulerScript}{"6A}
\DeclareMathDelimiter\arrowvert
\mathord{EulerScript}{"6A}{largesymbols}{"3C} % ???
\DeclareMathSymbol\mathsection\mathord{EulerScript}{"78}
\DeclareSymbolFont{EulerExtension}{U}{euex}{m}{n}
\@ifpackageloaded{amsmath}
{\DeclareMathSymbol\coprod@\mathop{EulerExtension}{"60}%
\DeclareMathSymbol\prod@ \mathop{EulerExtension}{"51}%
\DeclareMathSymbol\sum@ \mathop{EulerExtension}{"50}}
{\DeclareMathSymbol\coprod \mathop{EulerExtension}{"60}%
\DeclareMathSymbol\prod \mathop{EulerExtension}{"51}%
\DeclareMathSymbol\sum \mathop{EulerExtension}{"50}}
\AtBeginDocument
{\@ifpackageloaded{amstex}%
{\PackageWarningNoLine{euler}{Please do not use `amstex'.
Use `amsmath' instead}{}}}
\DeclareMathSymbol\intop \mathop {EulerExtension}{"52}
\DeclareMathSymbol\ointop \mathop {EulerExtension}{"48}
\DeclareMathSymbol\braceld\mathord{EulerExtension}{"7A}
\DeclareMathSymbol\bracerd\mathord{EulerExtension}{"7B}
\DeclareMathSymbol\bracelu\mathord{EulerExtension}{"7C}
\DeclareMathSymbol\braceru\mathord{EulerExtension}{"7D}
\DeclareMathSymbol\infty \mathord{EulerExtension}{"31}
\AtBeginDocument
{\@ifpackageloaded{amsmath}%
{\def\intkern@{\mkern -6mu }%
\def\ints@#1{\mkern -3mu
\mathop{\mkern 3mu
\intop
\ifnum #1=\z@ \intdots@ \else
\intkern@
\ifnum #1>\tw@ \intop\intkern@
\ifnum #1>\thr@@ \intop\intkern@ \fi
\fi
\fi
\intop
}\ilimits@
}%
}{}}
\DeclareMathSymbol\nearrow\mathrel{EulerExtension}{"25}
\DeclareMathSymbol\searrow\mathrel{EulerExtension}{"26}
\DeclareMathSymbol\nwarrow\mathrel{EulerExtension}{"2D}
\DeclareMathSymbol\swarrow\mathrel{EulerExtension}{"2E}
\DeclareMathSymbol\Leftrightarrow\mathrel{EulerExtension}{"2C}
\DeclareMathSymbol\Leftarrow \mathrel{EulerExtension}{"28}
\DeclareMathSymbol\Rightarrow \mathrel{EulerExtension}{"29}
\DeclareMathSymbol\leftrightarrow\mathrel{EulerExtension}{"24}
\DeclareMathSymbol\leftarrow \mathrel{EulerExtension}{"20}
\let\gets=\leftarrow
\DeclareMathSymbol\rightarrow \mathrel{EulerExtension}{"21}
\let\to=\rightarrow
\DeclareMathDelimiter\uparrow
\mathrel{EulerExtension}{"22}{largesymbols}{"78}
\DeclareMathDelimiter\downarrow
\mathrel{EulerExtension}{"23}{largesymbols}{"79}
\DeclareMathDelimiter\updownarrow
\mathrel{EulerExtension}{"6C}{largesymbols}{"3F}
\DeclareMathDelimiter\Uparrow
\mathrel{EulerExtension}{"2A}{largesymbols}{"7E}
\DeclareMathDelimiter\Downarrow
\mathrel{EulerExtension}{"2B}{largesymbols}{"7F}
\DeclareMathDelimiter\Updownarrow
\mathrel{EulerExtension}{"6D}{largesymbols}{"77}
\DeclareMathSymbol\leftharpoonup \mathrel{EulerExtension}{"18}
\DeclareMathSymbol\leftharpoondown \mathrel{EulerExtension}{"19}
\DeclareMathSymbol\rightharpoonup \mathrel{EulerExtension}{"1A}
\DeclareMathSymbol\rightharpoondown\mathrel{EulerExtension}{"1B}
\DeclareMathDelimiter\lbrace
\mathopen{EulerScript}{"66}{EulerExtension}{"08}
\DeclareMathDelimiter\rbrace
\mathclose{EulerScript}{"67}{EulerExtension}{"09}
\DeclareMathAlphabet\cm@equals@alphabet{OT1}{cmr}{m}{n}
\DeclareMathAlphabet\cm@minus@alphabet{OMS}{cmsy}{m}{n}
\def\Relbar{\mathrel{\cm@equals@alphabet{\mathchar"703D}}}
\def\cm@minus{{\cm@minus@alphabet{\mathchar"7000}}}
\def\relbar{\mathrel{\smash\cm@minus}}
% \smash, because - has the same height as +
\def\leftarrowfill
{$\m@th\mathord\leftarrow\mkern-6mu%
\cleaders\hbox{$\mkern-2mu\cm@minus\mkern-2mu$}\hfill
\mkern-6mu\cm@minus$}
\def\rightarrowfill
{$\m@th\cm@minus\mkern-6mu%
\cleaders\hbox{$\mkern-2mu\cm@minus\mkern-2mu$}\hfill
\mkern-6mu\mathord\rightarrow$}
\DeclareSymbolFont{cmmigroup}{OML}{cmm}{m}{it}
\SetSymbolFont{cmmigroup}{bold}{OML}{cmm}{b}{it}
\DeclareMathAccent\vec \mathord{cmmigroup}{"7E}
\DeclareMathSymbol\triangleleft \mathbin{cmmigroup}{"2F}
\DeclareMathSymbol\triangleright\mathbin{cmmigroup}{"2E}
\DeclareMathSymbol\star \mathbin{cmmigroup}{"3F}
\DeclareMathSymbol\lhook \mathrel{cmmigroup}{"2C}
\DeclareMathSymbol\rhook \mathrel{cmmigroup}{"2D}
\DeclareMathSymbol\flat \mathord{cmmigroup}{"5B}
\DeclareMathSymbol\natural \mathord{cmmigroup}{"5C}
\DeclareMathSymbol\sharp \mathord{cmmigroup}{"5D}
\DeclareMathSymbol\smile \mathrel{cmmigroup}{"5E}
\DeclareMathSymbol\frown \mathrel{cmmigroup}{"5F}
\begingroup
\catcode`\'=\active
\gdef'{^\bgroup\mskip2mu\prim@s} % more space before '
\endgroup
\newif\ifCorkEncoding
\edef\@tempa{\encodingdefault}\def\@tempb{T1}
\ifx\@tempa\@tempb
\CorkEncodingtrue
\else
\CorkEncodingfalse
\fi
\ifCorkEncoding
\AtBeginDocument
{\DeclareSymbolFont{operators}{T1}\rmdefault\mddefault\updefault
\SetSymbolFont{operators}{bold}{T1}\rmdefault\bfdefault\updefault
\DeclareMathAlphabet\mathbf{T1}\rmdefault\bfdefault\updefault
\DeclareMathAlphabet\mathsf{T1}\sfdefault\mddefault\updefault
\DeclareMathAlphabet\mathit{T1}\rmdefault\mddefault\itdefault
\DeclareMathAlphabet\mathtt{T1}\ttdefault\mddefault\updefault
\SetMathAlphabet\mathsf{bold}{T1}\sfdefault\bfdefault\updefault
\SetMathAlphabet\mathit{bold}{T1}\rmdefault\bfdefault\itdefault}
\else
\AtBeginDocument
{\DeclareSymbolFont{operators}{OT1}\rmdefault\mddefault\updefault
\SetSymbolFont{operators}{bold}{OT1}\rmdefault\bfdefault\updefault
\DeclareMathAlphabet\mathbf{OT1}\rmdefault\bfdefault\updefault
\DeclareMathAlphabet\mathsf{OT1}\sfdefault\mddefault\updefault
\DeclareMathAlphabet\mathit{OT1}\rmdefault\mddefault\itdefault
\DeclareMathAlphabet\mathtt{OT1}\ttdefault\mddefault\updefault
\SetMathAlphabet\mathsf{bold}{OT1}\sfdefault\bfdefault\updefault
\SetMathAlphabet\mathit{bold}{OT1}\rmdefault\bfdefault\itdefault}
\fi
\ifCorkEncoding
\DeclareMathAccent\grave\mathalpha{operators}{"00}
\DeclareMathAccent\acute\mathalpha{operators}{"01}
\DeclareMathAccent\tilde\mathalpha{operators}{"03}
\DeclareMathAccent\ddot \mathalpha{operators}{"04}
\DeclareMathAccent\check\mathalpha{operators}{"07}
\DeclareMathAccent\breve\mathalpha{operators}{"08}
\DeclareMathAccent\bar \mathalpha{operators}{"09}
\DeclareMathAccent\dot \mathalpha{operators}{"0A}
\fi
\DeclareMathAccent\hat\mathalpha{EulerFraktur}{"5E}
\DeclareOption{text-hat-accent}
{\ifCorkEncoding
\DeclareMathAccent\hat\mathalpha{operators}{"02}%
\else
\DeclareMathAccent\hat\mathalpha{operators}{"5E}%
\fi}
\ifCorkEncoding
\DeclareMathSymbol\euler@hbar\mathord{operators}{"09}
\else
\DeclareMathSymbol\euler@hbar\mathord{operators}{"16}
\fi
\def\hbar{{\euler@hbar\mkern-8muh}}
\def\@makefnmark{\hbox{$\operator@font^{\@thefnmark}\m@th$}}
\ProcessOptions
\endinput
%%
%% End of file `euler.sty'.
|
