summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/qtx/amsqtx.def
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/generic/qtx/amsqtx.def')
-rw-r--r--Master/texmf-dist/tex/generic/qtx/amsqtx.def88
1 files changed, 88 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/generic/qtx/amsqtx.def b/Master/texmf-dist/tex/generic/qtx/amsqtx.def
new file mode 100644
index 00000000000..3e11889a36e
--- /dev/null
+++ b/Master/texmf-dist/tex/generic/qtx/amsqtx.def
@@ -0,0 +1,88 @@
+%%% ====================================================================
+%%% amssym.def + txfonts (JM+SW) 09.03.2001. Public domain
+%%% macros borowed from amssym.def ver. 2.2b and amstex.tex ver. 2.1
+%%% by American Mathematical Society
+%%% This file must not be changed. However, if you do make changes,
+%%% you first rename it to some other name.
+%%% ====================================================================
+\expandafter\ifx\csname amsqtx.def\endcsname\relax \else\endinput\fi
+\ifx\PT\undefined\def\PT{pt}\fi
+%
+% Store the catcode of the @ in the csname so that it can be restored later.
+\expandafter\edef\csname amsqtx.def\endcsname{%
+ \catcode`\noexpand\@=\the\catcode`\@\space}
+% Set the catcode to 11 for use in private control sequence names.
+\catcode`\@=11
+%
+% Include all definitions related to the fonts msam, msbm and eufm, so that
+%%% ^txsya^txsyb ^txmia (JM)
+% when this file is used by itself, the results with respect to those fonts
+% are equivalent to what they would have been using AMS-TeX.
+% Most symbols in fonts txsya and txsyb are defined using \newsymbol;
+% however, a few symbols that replace composites defined in plain must be
+% defined with \mathchardef.
+
+\def\undefine#1{\let#1\undefined}
+\def\newsymbol#1#2#3#4#5{\let\next@\relax
+ \ifnum#2=\@ne\let\next@\txafam@\else
+ \ifnum#2=\tw@\let\next@\txbfam@\fi\fi
+ \mathchardef#1="#3\next@#4#5}
+\def\mathhexbox@#1#2#3{\relax
+ \ifmmode\mathpalette{}{\m@th\mathchar"#1#2#3}%
+ \else\leavevmode\hbox{$\m@th\mathchar"#1#2#3$}\fi}
+\def\hexnumber@#1{\ifcase#1 0\or 1\or 2\or 3\or 4\or 5\or 6\or 7\or 8\or
+ 9\or A\or B\or C\or D\or E\or F\fi}
+
+\font\tentxa=txsya at 10\PT % msam10
+\font\seventxa=txsya at 7\PT % msam7
+\font\fivetxa=txsya at 5\PT % msam5
+\newfam\txafam
+\textfont\txafam=\tentxa
+\scriptfont\txafam=\seventxa
+\scriptscriptfont\txafam=\fivetxa
+\edef\txafam@{\hexnumber@\txafam}
+\mathchardef\dabar@"0\txafam@39
+\def\dashrightarrow{\mathrel{\dabar@\dabar@\mathchar"0\txafam@4B}}
+\def\dashleftarrow{\mathrel{\mathchar"0\txafam@4C\dabar@\dabar@}}
+\let\dasharrow\dashrightarrow
+\def\ulcorner{\delimiter"4\txafam@70\txafam@70 }
+\def\urcorner{\delimiter"5\txafam@71\txafam@71 }
+\def\llcorner{\delimiter"4\txafam@78\txafam@78 }
+\def\lrcorner{\delimiter"5\txafam@79\txafam@79 }
+% Note that there should not be a final space after the digits for a
+% \mathhexbox@.
+\def\yen{{\mathhexbox@\txafam@55}}
+\def\checkmark{{\mathhexbox@\txafam@58}}
+\def\circledR{{\mathhexbox@\txafam@72}}
+\def\maltese{{\mathhexbox@\txafam@7A}}
+
+\font\tentxb=txsyb at 10\PT % msbm10
+\font\seventxb=txsyb at 7\PT % msbm7
+\font\fivetxb=txsyb at 5\PT % msbm5
+\newfam\txbfam
+\textfont\txbfam=\tentxb
+\scriptfont\txbfam=\seventxb
+\scriptscriptfont\txbfam=\fivetxb
+\edef\txbfam@{\hexnumber@\txbfam}
+\def\Bbb#1{{\fam\txbfam\relax#1}}
+\def\widehat#1{\setbox\z@\hbox{$\m@th#1$}%
+ \ifdim\wd\z@>\tw@ em\mathaccent"0\txbfam@5B{#1}%
+ \else\mathaccent"0362{#1}\fi}
+\def\widetilde#1{\setbox\z@\hbox{$\m@th#1$}%
+ \ifdim\wd\z@>\tw@ em\mathaccent"0\txbfam@5D{#1}%
+ \else\mathaccent"0365{#1}\fi}
+%%--
+\font\teneufm=txmia at 10\PT % eufm10
+\font\seveneufm=txmia at 7\PT % eufm7
+\font\fiveeufm=txmia at 5\PT % eufm5
+\newfam\eufmfam
+\textfont\eufmfam=\teneufm
+\scriptfont\eufmfam=\seveneufm
+\scriptscriptfont\eufmfam=\fiveeufm
+\def\frak#1{{\fam\eufmfam\relax#1}}
+\let\goth\frak
+
+% Restore the catcode value for @ that was previously saved.
+\csname amsqtx.def\endcsname
+
+\endinput