%% %% This is file `mathastext.sty', %% generated with the docstrip utility. %% %% The original source files were: %% %% mathastext.dtx (with options: `package') %% %% IMPORTANT NOTICE: %% %% For the copyright see the source file. %% %% Any modified versions of this file must be renamed %% with new filenames distinct from mathastext.sty. %% %% For distribution of the original source see the terms %% for copying and modification in the file mathastext.dtx. %% %% This generated file may be distributed as long as the %% original source files, as listed above, are part of the %% same distribution. (The sources need not necessarily be %% in the same archive or directory.) %%---------------------------------------------------------------- %% Package: mathastext %% Use the text font in math mode (jfB) %% Version: 1.3d (2014/05/23; doc of 2015/02/26) %% License: LPPL 1.3c %% Copyright (C) 2011-2015 Jean-Francois Burnol %% Examples of use of mathastext: %% http://jf.burnol.free.fr/mathastext.html %% http://jf.burnol.free.fr/showcase.html %%---------------------------------------------------------------- \NeedsTeXFormat{LaTeX2e} \ProvidesPackage {mathastext} [2014/05/23 v1.3d Use the text font in math mode (jfB)] \newif\ifmst@XeTeX \begingroup\expandafter\expandafter\expandafter\endgroup \expandafter\ifx\csname XeTeXinterchartoks\endcsname\relax \mst@XeTeXfalse \else \mst@XeTeXtrue \fi \newif\ifmst@LuaTeX \begingroup\expandafter\expandafter\expandafter\endgroup \expandafter\ifx\csname directlua\endcsname\relax \mst@LuaTeXfalse \else \mst@LuaTeXtrue \fi \def\mst@oti{OT1}\def\mst@ti{T1}\def\mst@lyi{LY1} \def\mst@eui{EU1}\def\mst@euii{EU2} \newif\ifmst@goahead \newif\ifmst@abort \def\mst@enc{\encodingdefault} \def\mst@fam{\familydefault} \def\mst@ser{\seriesdefault} \def\mst@opsh{\shapedefault} %% will be default shape for operator names \def\mst@bold{\bfdefault} \def\mst@ltsh{\shapedefault} %% will be default shape for letters \edef\mst@greekfont{\familydefault} %% v 1.15c \newif\ifmst@italic \newif\ifmst@frenchmath \DeclareOption{italic}{\mst@italictrue \def\mst@ltsh{\itdefault}} \DeclareOption{frenchmath}{\mst@frenchmathtrue\mst@italictrue \def\mst@ltsh{\itdefault}} %% \newif\ifmst@endash\mst@endashtrue \DeclareOption{endash}{\mst@endashtrue} \DeclareOption{noendash}{\mst@endashfalse} \newif\ifmst@emdash \DeclareOption{emdash}{\mst@emdashtrue\mst@endashfalse} %% \newif\ifmst@alldelims \edef\mst@tmp{\encodingdefault}\ifx\mst@oti\mst@tmp\else\mst@alldelimstrue\fi \DeclareOption{alldelims}{\mst@alldelimstrue} \DeclareOption{nolessnomore}{\mst@alldelimsfalse} %% new with 1.2 \newif\ifmst@nosmalldelims \DeclareOption{nosmalldelims}{\mst@nosmalldelimstrue} %% \newif\ifmst@noplus \DeclareOption{noplus}{\mst@noplustrue} \newif\ifmst@nominus \DeclareOption{nominus}{\mst@nominustrue} \DeclareOption{noplusnominus}{\ExecuteOptions{noplus,nominus}} %% \newif\ifmst@noparen \DeclareOption{noparenthesis}{\mst@noparentrue} \newif\ifmst@nopunct \DeclareOption{nopunctuation}{\mst@nopuncttrue} \newif\ifmst@noequal \DeclareOption{noequal}{\mst@noequaltrue} \newif\ifmst@noexclam \DeclareOption{noexclam}{\mst@noexclamtrue} \newif\ifmst@asterisk \DeclareOption{noasterisk}{\PackageWarningNoLine{mathastext} {option `noasterisk\string' is deprecated.^^J\space\space\space Check the documentation}} \DeclareOption{asterisk}{\mst@asterisktrue \AtBeginDocument{ \everymath\expandafter{\the\everymath \mst@doasterisk \let\mst@doasterisk\relax} \everydisplay\expandafter{\the\everydisplay \mst@doasterisk \let\mst@doasterisk\relax}}} \newif\ifmst@nospecials \DeclareOption{nospecials}{\mst@nospecialstrue} \newif\ifmst@basic % 1.3 to avoid unnecessary patch of amsmath \newmcodes@ \DeclareOption{basic}{\mst@basictrue \ExecuteOptions{noparenthesis,nopunctuation,% noplusnominus,noequal,noexclam,nospecials,nolessnomore}} %% \newif\ifmst@nohbar \DeclareOption{nohbar}{\mst@nohbartrue} \newif\ifmst@nodigits \DeclareOption{nodigits}{\mst@nodigitstrue} \newif\ifmst@defaultimath \DeclareOption{defaultimath}{\mst@defaultimathtrue} \newif\ifmst@mathaccents \DeclareOption{mathaccents}{\mst@mathaccentstrue} %% \newif\ifmst@needsymbol \newif\ifmst@symboldelimiters \DeclareOption{symboldelimiters}{\mst@needsymboltrue\mst@symboldelimiterstrue} \newif\ifmst@symboldigits \DeclareOption{symboldigits}{\mst@needsymboltrue\mst@symboldigitstrue} \newif\ifmst@symbolgreek \newif\ifmst@customgreek %% new with 1.3d \DeclareOption{symbolgreek}{\mst@needsymboltrue\mst@symbolgreektrue \mst@customgreektrue } \newif\ifmst@symbolre \DeclareOption{symbolre}{\mst@needsymboltrue\mst@symbolretrue} \newif\ifmst@symbolmisc \DeclareOption{symbolmisc}{\mst@needsymboltrue\mst@symbolmisctrue} \DeclareOption{symbol}{\ExecuteOptions{symbolgreek,symbolmisc,symbolre}} \DeclareOption{symbolmax}{\ExecuteOptions{symbol,symboldelimiters}} %% \newif\ifmst@needeuler \newif\ifmst@eulerdigits \DeclareOption{eulerdigits}{\mst@needeulertrue\mst@eulerdigitstrue} \newif\ifmst@eulergreek \DeclareOption{eulergreek}{\mst@needeulertrue\mst@eulergreektrue \mst@customgreektrue } %% \newif\ifmst@selfGreek \DeclareOption{selfGreek}{\mst@selfGreektrue\mst@customgreektrue} \newif\ifmst@selfGreeks \DeclareOption{selfGreeks}{\mst@selfGreekstrue\mst@selfGreektrue \mst@customgreektrue } \newif\ifmst@LGRgreek \DeclareOption{LGRgreek}{\mst@LGRgreektrue\mst@customgreektrue} \newif\ifmst@LGRgreeks \DeclareOption{LGRgreeks}{\mst@LGRgreekstrue\mst@LGRgreektrue \mst@customgreektrue} %% \def\mst@greek@select{0} \newif\ifmst@itgreek \newif\ifmst@upgreek \DeclareOption{itgreek}{\mst@itgreektrue} \DeclareOption{upgreek}{\mst@upgreektrue} \DeclareOption{itGreek}{\def\mst@greek@select{1}} \DeclareOption{upGreek}{\def\mst@greek@select{2}} %% \newif\ifmst@defaultnormal \DeclareOption{defaultnormal}{\mst@defaultnormaltrue} \newif\ifmst@defaultrm \DeclareOption{defaultrm}{\mst@defaultrmtrue} \newif\ifmst@defaultbf \DeclareOption{defaultbf}{\mst@defaultbftrue} \newif\ifmst@defaultit \DeclareOption{defaultit}{\mst@defaultittrue} \newif\ifmst@defaultsf \DeclareOption{defaultsf}{\mst@defaultsftrue} \newif\ifmst@defaulttt \DeclareOption{defaulttt}{\mst@defaulttttrue} \newif\ifmst@nonormalbold \DeclareOption{defaultalphabets}{\ExecuteOptions{defaultnormal,defaultrm,% defaultbf,defaultit,defaultsf,defaulttt}\mst@nonormalboldtrue} \newif\ifmst@defaultsizes \DeclareOption{defaultmathsizes}{\mst@defaultsizestrue} \newif\ifmst@twelve \DeclareOption{12pt}{\mst@twelvetrue} \newif\ifmst@fouriervec \DeclareOption{fouriervec}{\mst@fouriervectrue} \newif\ifmst@subdued \DeclareOption{subdued}{\mst@subduedtrue} \DeclareOption*{\PackageWarningNoLine{mathastext} {Unknown option `\CurrentOption\string'}} \ProcessOptions\relax \newmuskip\mst@exists@muskip %% v 1.15e \newmuskip\mst@forall@muskip \def\mst@exists@skip{1mu} \def\mst@forall@skip{.6667mu} \ifmst@italic\ifmst@frenchmath\else \def\mst@exists@skip{0mu}\def\mst@forall@skip{0mu}\def\mst@prime@skip{0mu} \fi\fi \AtEndOfPackage{% must be at end of code \let\mst@stdexists\exists \let\mst@stdforall\forall \renewcommand\exists{\mst@stdexists\mskip\mst@exists@muskip} \renewcommand\forall{\mst@stdforall\mskip\mst@forall@muskip} } \newmuskip\mst@prime@muskip %% v 1.2 \def\mst@prime@skip{.5mu} \ifmst@italic\ifmst@frenchmath\else\def\mst@prime@skip{0mu}\fi\fi \def\mst@active@math@prime{\sp\bgroup\mskip\mst@prime@muskip\prim@s} {\catcode`\'=12 \gdef\mst@modifyprime{\mst@mathactivate'{}\mst@active@math@prime}} \newcommand*\MTnormalprime{\let\mst@modifyprime\relax} \AtBeginDocument{ \everymath\expandafter{\the\everymath \mst@modifyprime \MTnormalprime} \everydisplay\expandafter{\the\everydisplay \mst@modifyprime \MTnormalprime} } \newcommand*\MTexistsskip[1]{\edef\mst@exists@skip{#1}% \mst@exists@muskip\mst@exists@skip\relax} \newcommand*\MTforallskip[1]{\edef\mst@forall@skip{#1}% \mst@forall@muskip\mst@forall@skip\relax} \newcommand*\MTprimeskip[1]{\edef\mst@prime@skip{#1}% \mst@prime@muskip\mst@prime@skip\relax} \let\Mathastextexistsskip\MTexistsskip \let\Mathastextforallskip\MTforallskip \let\Mathastextprimeskip\MTprimeskip \let\mathastextexistsskip\MTexistsskip \let\mathastextforallskip\MTforallskip \let\mathastextprimeskip\MTprimeskip \ifmst@noparen\else \AtBeginDocument{% \@ifundefined{resetMathstrut@}{% nothing to do, no amsmath }{% amsmath loaded, and possibly patched by things such as lualatex-math \let\mst@savedresetMathstrut@\resetMathstrut@ \PackageWarning{mathastext}{current meaning of amsmath \string\resetMathstrut@\space saved}% \ifx\mst@the\the % means that \MTnonlettersobeymathxx was used in preamble \let\mst@the\@gobble\MTnonlettersobeymathxx \fi}} \fi \newtoks\mst@do@nonletters \newtoks\mst@do@easynonletters \newtoks\mst@do@az \newtoks\mst@do@AZ \let\mst@the\@gobble \newcommand*\MTnonlettersdonotobeymathxx{% \ifx\mst@the\@gobble \else \@ifundefined{mst@savedresetMathstrut@}{}{% \PackageWarning{mathastext}{restoring (for this group or environment) amsmath \string\resetMathstrut@}% \let\resetMathstrut@\mst@savedresetMathstrut@}% \fi \let\mst@the\@gobble } \newcommand*\MTnonlettersobeymathxx{% \ifx\mst@the\the \else \@ifundefined{mst@savedresetMathstrut@}{}{% \ifmst@symboldelimiters \def\resetMathstrut@{% \setbox\z@\hbox{\the\textfont\symmtpsymbol\char40 \the\textfont\symmtoperatorfont\char40 \the\textfont\symoperators\char40}% \ht\Mathstrutbox@\ht\z@ \dp\Mathstrutbox@\dp\z@}% \else \def\resetMathstrut@{% \setbox\z@\hbox{\the\textfont\symmtoperatorfont\char40 \the\textfont\symoperators\char40}% \ht\Mathstrutbox@\ht\z@ \dp\Mathstrutbox@\dp\z@}% \fi \PackageWarning{mathastext}{\string\resetMathstrut@\space from amsmath replaced (for this group or environment)}}% \fi \let\mst@the\the } \newcommand*\MTeasynonlettersdonotobeymathxx{\let\mst@theeasy\@gobble} \newcommand*\MTeasynonlettersobeymathxx{\let\mst@theeasy\the} \MTeasynonlettersobeymathxx \newcommand*\MTmathactiveletters{\let\mst@thef\the \let\mst@theF\the} \newcommand*\MTmathactiveLetters{\let\mst@theF\the} \newcommand*\MTmathstandardletters{\let\mst@thef\@gobble \let\mst@theF\@gobble} \newcommand*\MTicinmath{% \MTmathactiveletters \def\mst@itcorr{\ifnum\fam=\m@ne\/\else\ifnum\fam=\symmtletterfont\/\fi\fi}% \let\mst@ITcorr\mst@itcorr} \newcommand*\MTICinmath{% \MTmathactiveLetters \def\mst@ITcorr{\ifnum\fam=\m@ne\/\fi}} \newcommand*\MTnoicinmath{\def\mst@itcorr{}\def\mst@ITcorr{}} \newcommand*\MTnoICinmath{\def\mst@ITcorr{}} \newcommand*\MTicalsoinmathxx{% \ifx\mst@itcorr\@empty\else\def\mst@itcorr{\/}\fi \ifx\mst@ITcorr\@empty\else\def\mst@ITcorr{\/}\fi} \AtBeginDocument{ \everymath\expandafter{\the\everymath \mst@the\mst@do@nonletters \let\mst@the\@gobble \mst@theeasy\mst@do@easynonletters \let\mst@theeasy\@gobble \mst@thef\mst@do@az \let\mst@thef\@gobble \mst@theF\mst@do@AZ \let\mst@theF\@gobble} \everydisplay\expandafter{\the\everydisplay \mst@the\mst@do@nonletters \let\mst@the\@gobble \mst@theeasy\mst@do@easynonletters \let\mst@theeasy\@gobble \mst@thef\mst@do@az \let\mst@thef\@gobble \mst@theF\mst@do@AZ \let\mst@theF\@gobble} } \newcommand*\MTsetmathskips[3]{% \@namedef{mst@before#1}{\mskip#2\relax}% \@namedef{mst@after#1}{\mskip#3\relax}% } \newcommand*\MTunsetmathskips[1]{% \@namedef{mst@before#1}{\relax}% \@namedef{mst@after#1}{\relax}% } \def\mst@magic@v #1#2#3#4#5{#1#3#4} \def\mst@magic@vi #1#2#3#4#5#6{#1#2#4#5} \def\mst@fork{\ifmmode\mst@magic@v\fi\@thirdofthree} \def\mst@safefork{\ifmmode\if@safe@actives\else\mst@magic@vi\fi\fi\@thirdofthree} \def\mst@do@activecase#1#2#3{% #1 is a category 11 or 12 character token \@ifundefined{active@char#1}{}{% \ifcat #1a\mathcode`#1=#2\else \ifx\relax #2\relax\mathcode`#1=`#1 \else\mathcode`#1=#3\fi\fi \expandafter\expandafter\expandafter\let\expandafter\expandafter \csname mst@orig@user@active#1\endcsname \csname user@active#1\endcsname \expandafter\expandafter\expandafter\let\expandafter\expandafter \csname mst@orig@normal@char#1\endcsname \csname normal@char#1\endcsname \ifcat #1a% \expandafter\edef\csname user@active#1\endcsname {\noexpand\mst@fork {{#2\noexpand#3}}{}\expandafter \noexpand\csname mst@orig@user@active#1\endcsname }% \expandafter\edef\csname normal@char#1\endcsname {\noexpand\mst@safefork {{#2\noexpand#3}}{}\expandafter \noexpand\csname mst@orig@normal@char#1\endcsname }% \else \expandafter\edef\csname user@active#1\endcsname {\noexpand\mst@fork {#2}\noexpand#3\expandafter \noexpand\csname mst@orig@user@active#1\endcsname }% \expandafter\edef\csname normal@char#1\endcsname {\noexpand\mst@safefork {#2}\noexpand#3\expandafter \noexpand\csname mst@orig@normal@char#1\endcsname }% \fi}} \begingroup \catcode`\~=\active \def\x{\endgroup \def\mst@mathactivate##1##2##3{% ##1 guaranteed of cat 11 or 12 \begingroup \lccode`~=`##1 \lccode`##1=`##1 \lowercase{\endgroup \ifnum\catcode`##1=\active \mst@do@activecase ##1{##2}##3 % careful as ##2 is empty in the asterisk and % prime case! \else \mathcode`##1="8000 % version 1.3 adds the possibility of extra skips around letters, % (only if non catcode active at the time of use). \ifcat##1a\def~{{\csname mst@before##1\endcsname ##2##3% \csname mst@after##1\endcsname}}% \else\def~{##2##3}\fi \fi}}} \x \def\mst@addtodo@nonletters#1#2#3{% % #1 will be of cat 11 or 12. % #2 is empty for asterisk and right quote \mst@do@nonletters\expandafter {\the\mst@do@nonletters \mst@mathactivate#1{#2}#3}% } \def\mst@addtodo@easynonletters#1#2{% #1 is a one char control sequence \mst@do@easynonletters\expandafter{\the\mst@do@easynonletters\mathcode`#1=#2}% } \def\mst@addtodo@az#1#2#3{% \mst@do@az\expandafter{\the\mst@do@az\mst@mathactivate#1#2#3} } \def\mst@addtodo@AZ#1#2#3{% \mst@do@AZ\expandafter{\the\mst@do@AZ\mst@mathactivate#1#2#3}% } \ifmst@basic\else \AtBeginDocument {% \@ifpackageloaded{amsmath} {\@ifpackageloaded{lualatex-math} {\@ifpackagelater{lualatex-math}{2013/08/03}{}{\let\newmcodes@\relax}} {\let\newmcodes@\relax}} {}} \fi \ifmst@subdued \def\mst@reserved#1\getanddefine@fonts\symletters#2#3\@nil{% \def\mst@normalmv@letter{#2}} \expandafter\mst@reserved\mv@normal\@nil \def\mst@reserved#1\getanddefine@fonts\symletters#2#3\@nil{% \def\mst@boldmv@letter{#2}} \expandafter\mst@reserved\mv@bold\@nil \def\mst@reserved#1\getanddefine@fonts\symoperators#2#3\@nil{% \def\mst@normalmv@operator{#2}} \expandafter\mst@reserved\mv@normal\@nil \def\mst@reserved#1\getanddefine@fonts\symoperators#2#3\@nil{% \def\mst@boldmv@operator{#2}} \expandafter\mst@reserved\mv@bold\@nil %% \edef\mst@tmp{\encodingdefault} \def\mst@reserved#1/#2/#3/#4/{\gdef\mst@debut{#1}\gdef\mst@reste{#2/#3/#4}} \begingroup\escapechar\m@ne \xdef\mst@funnyoti{\expandafter\string\csname OT1\endcsname} \expandafter\expandafter\expandafter \mst@reserved\expandafter\string\mst@normalmv@operator/ \endgroup \ifx\mst@debut\mst@funnyoti\ifx\mst@tmp\mst@oti\def\mst@tmp{T1}\fi\fi \edef\mst@normalmv@operator{\expandafter\noexpand\csname \mst@tmp/\mst@reste\endcsname} \begingroup\escapechar\m@ne \expandafter\expandafter\expandafter \mst@reserved\expandafter\string\mst@boldmv@operator/ \endgroup \ifx\mst@debut\mst@funnyoti\ifx\mst@tmp\mst@oti\def\mst@tmp{T1}\fi\fi \edef\mst@boldmv@operator{\expandafter\noexpand\csname \mst@tmp/\mst@reste\endcsname} \AtEndOfPackage{ \typeout{** ...entering subdued mode...} \expandafter\SetSymbolFont@ \expandafter\mv@normal\mst@normalmv@letter\symmtletterfont \expandafter\SetSymbolFont@ \expandafter\mv@bold\mst@boldmv@letter\symmtletterfont \expandafter\SetSymbolFont@ \expandafter\mv@normal\mst@normalmv@operator\symmtoperatorfont \expandafter\SetSymbolFont@ \expandafter\mv@bold\mst@boldmv@operator\symmtoperatorfont \typeout{** ...done.} } \fi % fin de ce \ifmst@subdued \DeclareSymbolFont{mtoperatorfont}{\mst@enc}{\mst@fam}{\mst@ser}{\mst@opsh} \newcommand*{\MTmathoperatorsobeymathxx} {\def\operator@font{\mathgroup\ifnum\fam=\m@ne\symmtoperatorfont\else\fam\fi}} \newcommand*{\MTmathoperatorsdonotobeymathxx} {\def\operator@font{\mathgroup\symmtoperatorfont}} \MTmathoperatorsobeymathxx \DeclareSymbolFont{mtletterfont}{\mst@enc}{\mst@fam}{\mst@ser}{\mst@ltsh} \let\mst@alph@omicron\mathnormal \@ifpackageloaded{fourier}{\ifsloped\else\let\mst@alph@omicron\mathrm\fi}{} \DeclareSymbolFontAlphabet{\Mathnormal}{mtletterfont} \DeclareSymbolFontAlphabet{\Mathrm}{mtoperatorfont} \ifmst@nonormalbold\else \DeclareMathAlphabet{\mathnormalbold}{\mst@enc}{\mst@fam}{\mst@bold}{\mst@ltsh} \fi \ifmst@defaultbf\else \DeclareMathAlphabet{\Mathbf}{\mst@enc}{\mst@fam}{\mst@bold}{\mst@opsh} \fi \ifmst@defaultit\else \DeclareMathAlphabet{\Mathit}{\mst@enc}{\mst@fam}{\mst@ser}{\itdefault} \fi \ifmst@defaultsf\else \DeclareMathAlphabet{\Mathsf}{\mst@enc}{\sfdefault}{\mst@ser}{\mst@opsh} \fi \ifmst@defaulttt\else \DeclareMathAlphabet{\Mathtt}{\mst@enc}{\ttdefault}{\mst@ser}{\mst@opsh} \fi \let\mst@original@normal\mathnormal \let\mst@original@rm\mathrm \let\mst@original@bf\mathbf \let\mst@original@it\mathit \let\mst@original@sf\mathsf \let\mst@original@tt\mathtt \def\mst@restorealphabets{% for subdued \let\mathnormal\mst@original@normal \let\mathrm\mst@original@rm \let\mathbf\mst@original@bf \let\mathit\mst@original@it \let\mathsf\mst@original@sf \let\mathtt\mst@original@tt} \def\mst@setalphabets{% \ifmst@defaultnormal\else\renewcommand{\mathnormal}{\Mathnormal}\fi \ifmst@defaultrm\else\renewcommand{\mathrm}{\Mathrm}\fi \ifmst@defaultbf\else\renewcommand{\mathbf}{\Mathbf}\fi \ifmst@defaultit\else\renewcommand{\mathit}{\Mathit}\fi \ifmst@defaultsf\else\renewcommand{\mathsf}{\Mathsf}\fi \ifmst@defaulttt\else\renewcommand{\mathtt}{\Mathtt}\fi} \ifmst@subdued\else\mst@setalphabets\fi \def\mst@update@greeksh{ \def\mst@greek@lsh{\mst@ltsh} %% default behavior \def\mst@greek@ush{\mst@opsh} \ifmst@itgreek\def\mst@greek@lsh{\itdefault} \def\mst@greek@ush{\itdefault}\fi \ifmst@upgreek\def\mst@greek@lsh{\updefault} \def\mst@greek@ush{\updefault}\fi \ifmst@frenchmath \ifmst@itgreek\else \ifmst@upgreek\else \def\mst@greek@lsh{\mst@opsh} \def\mst@greek@ush{\mst@opsh} \fi\fi \fi \ifcase\mst@greek@select \or\def\mst@greek@ush{\itdefault} \or\def\mst@greek@ush{\updefault} \fi} \mst@update@greeksh \ifmst@LGRgreek \DeclareFontEncoding{LGR}{}{} \DeclareSymbolFont{mtlgrfontlower}{LGR}{\mst@fam}{\mst@ser}{\mst@greek@lsh} \DeclareSymbolFont{mtlgrfontupper}{LGR}{\mst@fam}{\mst@ser}{\mst@greek@ush} \else \ifmst@selfGreek \DeclareSymbolFont{mtselfGreekfont}{OT1}{\mst@fam}{\mst@ser}{\mst@greek@ush} \fi\fi \ifmst@needeuler\typeout{** will use Euler font; command \string\MTEulerScale} \DeclareSymbolFont{mteulervm}{U}{zeur}{m}{n} \DeclareSymbolFontAlphabet{\MathEuler}{mteulervm} \DeclareMathAlphabet{\MathEulerBold}{U}{zeur}{\mst@bold}{n} \fi \newcommand*\MTEulerScale[1]{\edef\zeu@Scale{#1}} \let\MathastextEulerScale\MTEulerScale \ifmst@needsymbol\typeout{** will use Symbol font; command \string\MTSymbolScale} \def\psy@scale{1} \DeclareSymbolFont{mtpsymbol}{U}{psy}{m}{n} \DeclareSymbolFontAlphabet{\MathPSymbol}{mtpsymbol} \AtBeginDocument{ \DeclareFontFamily{U}{psy}{} \DeclareFontShape{U}{psy}{m}{n}{<->s*[\psy@scale] psyr}{} } \fi \newcommand*\MTSymbolScale[1]{\edef\psy@scale{#1}} \let\MathastextSymbolScale\MTSymbolScale \DeclareRobustCommand*\pmvec[1]{\mathord{\stackrel{\raisebox{-.5ex}% {\tiny\boldmath$\mathord{\rightarrow}$}}{{}#1}}} \ifmst@fouriervec \DeclareFontEncoding{FML}{}{} \DeclareFontSubstitution{FML}{futm}{m}{it} \DeclareSymbolFont{mathastextfourier}{FML}{futm}{m}{it} \SetSymbolFont{mathastextfourier}{bold}{FML}{futm}{b}{it} \DeclareMathAccent{\fouriervec}{\mathord}{mathastextfourier}{"7E} \fi \newcommand*\MTencoding[1]{\def\mst@enc{#1}} \newcommand*\MTfamily[1]{\def\mst@fam{#1}} \newcommand*\MTseries[1]{\def\mst@ser{#1}} \newcommand*\MTshape[1]{\def\mst@opsh{#1} \ifmst@italic\else\def\mst@ltsh{#1}\fi} \newcommand*\MTboldvariant[1]{\def\mst@bold{#1}} \newcommand*\MTlettershape[1]{\def\mst@ltsh{#1}} \let\Mathastextencoding\MTencoding \let\Mathastextfamily\MTfamily \let\Mathastextseries\MTseries \let\Mathastextshape\MTshape \let\Mathastextboldvariant\MTboldvariant \let\Mathastextlettershape\MTlettershape \newcommand*\MTitgreek{% \mst@itgreektrue\mst@upgreekfalse\def\mst@greek@select{0}} \newcommand*\MTupgreek{% \mst@upgreektrue\mst@itgreekfalse\def\mst@greek@select{0}} \newcommand*\MTitGreek{\def\mst@greek@select{1}} \newcommand*\MTupGreek{\def\mst@greek@select{2}} \let\Mathastextitgreek\MTitgreek \let\Mathastextupgreek\MTupgreek \let\MathastextitGreek\MTitGreek \let\MathastextupGreek\MTupGreek \@onlypreamble\MTitgreek \@onlypreamble\MTupgreek \@onlypreamble\MTitGreek \@onlypreamble\MTitGreek \@onlypreamble\Mathastextitgreek \@onlypreamble\Mathastextupgreek \@onlypreamble\MathastextitGreek \@onlypreamble\MathastextitGreek \newcommand*\MTgreekfont[1]{\def\mst@greekfont{#1}} \let\Mathastextgreekfont\MTgreekfont \@onlypreamble\MTgreekfont \@onlypreamble\Mathastextgreekfont \newcommand*\MTWillUse[5][]{ \MTencoding{#2} \MTfamily{#3} \MTseries{#4} \MTshape{#5} \ifmst@italic\MTlettershape{\itdefault}\fi % was missing in v 1.14 and prior \edef\mst@tmp{#1} \ifx\mst@tmp\empty\else\MTlettershape{#1}\fi \Mathastext} \let\MathastextWillUse\MTWillUse \let\Mathastextwilluse\MTWillUse \@onlypreamble\MTWillUse \@onlypreamble\MathastextWillUse \@onlypreamble\Mathastextwilluse \def\Mathastext {\@ifnextchar [\Mathastext@declare\Mathastext@ } \def\Mathastext@declare [#1]{% \edef\mst@tmp{#1}% \ifx\mst@tmp\empty \expandafter\@firstoftwo \else\expandafter\@secondoftwo \fi \Mathastext@ {\MTDeclareVersion[\mst@ltsh]{#1}{\mst@enc}{\mst@fam}{\mst@ser}{\mst@opsh}}% } \def\Mathastext@ {% \mst@update@greeksh \edef\mst@encoding@normal{\mst@enc}% \edef\mst@family@normal{\mst@fam}% \edef\mst@series@normal{\mst@ser}% \edef\mst@shape@normal{\mst@opsh}% \edef\mst@ltshape@normal{\mst@ltsh}% \edef\mst@itdefault@normal{\itdefault}% \edef\mst@rmdefault@normal{\rmdefault}% \edef\mst@sfdefault@normal{\sfdefault}% \edef\mst@ttdefault@normal{\ttdefault}% \edef\mst@boldvariant@normal{\mst@bold}% \edef\mst@exists@skip@normal{\mst@exists@skip}% \edef\mst@forall@skip@normal{\mst@forall@skip}% \edef\mst@prime@skip@normal{\mst@prime@skip}% \edef\mst@encoding@bold{\mst@enc}% \edef\mst@family@bold{\mst@fam}% \edef\mst@series@bold{\mst@bold}% \edef\mst@shape@bold{\mst@opsh}% \edef\mst@ltshape@bold{\mst@ltsh}% \edef\mst@boldvariant@bold{\mst@bold}% \edef\mst@itdefault@bold{\itdefault}% \edef\mst@rmdefault@bold{\rmdefault}% \edef\mst@sfdefault@bold{\sfdefault}% \edef\mst@ttdefault@bold{\ttdefault}% \edef\mst@exists@skip@bold{\mst@exists@skip}% \edef\mst@forall@skip@bold{\mst@forall@skip}% \edef\mst@prime@skip@bold{\mst@prime@skip}% \MTicinmath % does \MTmathactiveletters, \MTnoicinmath only cancels ics \@for\mst@tmp:=it,sl\do{\ifx\mst@tmp\mst@ltshape@normal\MTnoicinmath\fi}% \ifmst@frenchmath \MTICinmath \@for\mst@tmp:=it,sl\do{\ifx\mst@tmp\mst@shape@normal\MTnoICinmath\fi}% \fi \ifmst@subdued \MTeasynonlettersdonotobeymathxx \MTnonlettersdonotobeymathxx \MTmathoperatorsdonotobeymathxx \MTmathstandardletters % prior to 1.3, was \MTnoicinmath \ifmst@asterisk\let\mst@doasterisk\relax\fi \def\mst@exists@skip@normal{0mu}% \def\mst@forall@skip@normal{0mu}% \def\mst@prime@skip@normal{0mu}% \def\mst@exists@skip@bold{0mu}% \def\mst@forall@skip@bold{0mu}% \def\mst@prime@skip@bold{0mu}% \else % not subdued \ifmst@italic \ifmst@frenchmath \mst@exists@muskip\mst@exists@skip\relax \mst@forall@muskip\mst@forall@skip\relax \mst@prime@muskip\mst@prime@skip\relax \else \def\mst@exists@skip@normal{0mu}% \def\mst@forall@skip@normal{0mu}% \def\mst@prime@skip@normal{0mu}% \def\mst@exists@skip@bold{0mu}% \def\mst@forall@skip@bold{0mu}% \def\mst@prime@skip@bold{0mu}% \fi \else \mst@exists@muskip\mst@exists@skip\relax \mst@forall@muskip\mst@forall@skip\relax \mst@prime@muskip\mst@prime@skip\relax \fi \fi %% v1.15f \ifmst@nonormalbold\else \SetMathAlphabet{\mathnormalbold}{normal}{\mst@encoding@normal}% {\mst@family@normal}% {\mst@boldvariant@normal}% {\mst@ltshape@normal}% \SetMathAlphabet{\mathnormalbold}{bold}{\mst@encoding@bold}% {\mst@family@bold}% {\mst@boldvariant@bold}% {\mst@ltshape@bold}% \fi %% v1.15f adds \ifmst@default.. checks \ifmst@subdued\else \SetSymbolFont{mtletterfont}{normal}{\mst@encoding@normal}% {\mst@family@normal}% {\mst@series@normal}% {\mst@ltshape@normal}% \SetSymbolFont{mtletterfont}{bold} {\mst@encoding@bold}% {\mst@family@bold}% {\mst@series@bold}% {\mst@ltshape@bold}% \SetSymbolFont{mtoperatorfont}{normal}{\mst@encoding@normal}% {\mst@family@normal}% {\mst@series@normal}% {\mst@shape@normal}% \SetSymbolFont{mtoperatorfont}{bold} {\mst@encoding@bold}% {\mst@family@bold}% {\mst@series@bold}% {\mst@shape@bold}% \ifmst@defaultbf\else \SetMathAlphabet{\Mathbf}{normal}{\mst@encoding@normal}% {\mst@family@normal}% {\mst@series@bold}% {\mst@shape@normal}% \SetMathAlphabet{\Mathbf}{bold}{\mst@encoding@bold}% {\mst@family@bold}% {\mst@series@bold}% {\mst@shape@bold}% \fi \ifmst@defaultit\else \SetMathAlphabet{\Mathit}{normal}{\mst@encoding@normal}% {\mst@family@normal}% {\mst@series@normal}% {\mst@itdefault@normal}% \SetMathAlphabet{\Mathit}{bold}{\mst@encoding@bold}% {\mst@family@bold}% {\mst@series@bold}% {\mst@itdefault@bold}% \fi \ifmst@defaultsf\else \SetMathAlphabet{\Mathsf}{normal}{\mst@encoding@normal}% {\mst@sfdefault@normal}% {\mst@series@normal}% {\mst@shape@normal}% \SetMathAlphabet{\Mathsf}{bold}{\mst@encoding@bold}% {\mst@sfdefault@bold}% {\mst@series@bold}% {\mst@shape@bold}% \fi \ifmst@defaulttt\else \SetMathAlphabet{\Mathtt}{normal}{\mst@encoding@normal}% {\mst@ttdefault@normal}% {\mst@series@normal}% {\mst@shape@normal}% \SetMathAlphabet{\Mathtt}{bold}{\mst@encoding@bold}% {\mst@ttdefault@bold}% {\mst@series@bold}% {\mst@shape@bold}% \fi \fi % de \ifmst@subdued \ifmst@needeuler \SetSymbolFont{mteulervm}{bold}{U}{zeur}{\mst@boldvariant@normal}{n}% \SetMathAlphabet{\MathEulerBold}{normal}% {U}{zeur}{\mst@boldvariant@normal}{n}% \SetMathAlphabet{\MathEulerBold}{bold}% {U}{zeur}{\mst@boldvariant@normal}{n}% \fi \ifmst@needsymbol\SetSymbolFont{mtpsymbol}{bold}% {U}{psy}{\mst@boldvariant@normal}{n}% \fi \ifmst@subdued\else \ifmst@LGRgreek \SetSymbolFont{mtlgrfontlower}{normal}{LGR}% {\mst@greekfont}{\mst@series@normal}{\mst@greek@lsh}% \SetSymbolFont{mtlgrfontlower}{bold}{LGR}% {\mst@greekfont}{\mst@boldvariant@normal}{\mst@greek@lsh}% \SetSymbolFont{mtlgrfontupper}{normal}{LGR}% {\mst@greekfont}{\mst@series@normal}{\mst@greek@ush}% \SetSymbolFont{mtlgrfontupper}{bold}{LGR}% {\mst@greekfont}{\mst@boldvariant@bold}{\mst@greek@ush}% \else \ifmst@selfGreek \SetSymbolFont{mtselfGreekfont}{normal}{OT1}% {\mst@greekfont}{\mst@series@normal}{\mst@greek@ush}% \SetSymbolFont{mtselfGreekfont}{bold}{OT1}% {\mst@greekfont}{\mst@boldvariant@bold}{\mst@greek@ush}% \fi \fi \fi \ifmst@subdued \typeout{** subdued mode will be activated for the normal and bold math versions}% \else \typeout{** Latin letters in the normal (resp. bold) math versions are now^^J% ** set up to use the fonts \mst@encoding@normal/\mst@family@normal/\mst@series@normal% (\mst@boldvariant@normal)/\mst@ltshape@normal}% \ifmst@LGRgreek\typeout{** Greek letters (\mst@greek@lsh/\mst@greek@ush) will use LGR/\mst@greekfont}% \fi \ifmst@nodigits\else \typeout{** Other characters (digits, ...) and \protect\log-like names will be^^J% ** typeset with the \mst@shape@normal\space shape.}% \fi \fi } \let\mathastext\Mathastext \@onlypreamble\Mathastext \@onlypreamble\mathastext \newcommand*\MTDeclareVersion[6][]{% \def\mst@declareversionargs{{#1}{#2}{#3}{#4}{#5}{#6}}% \edef\mst@version{#2}% \DeclareMathVersion{\mst@version}% \MTDeclareVersion@ } \newcommand*\MTDeclareVersion@[1][]{% \edef\mst@tmp{#1}% \ifx\mst@tmp\empty\else \global\expandafter\let\csname mv@\mst@version\expandafter\endcsname \csname mv@#1\endcsname \typeout{** Math version `\mst@version\string' inherits from `#1\string'.}% \fi \expandafter\MTDeclareVersion@@\mst@declareversionargs } \newcommand*\MTDeclareVersion@@[6]{% \edef\mst@tmp{#1}% \expandafter\edef\csname mst@encoding@\mst@version\endcsname{#3}% \expandafter\edef\csname mst@family@\mst@version\endcsname{#4}% \expandafter\edef\csname mst@series@\mst@version\endcsname{#5}% \expandafter\edef\csname mst@shape@\mst@version\endcsname{#6}% \expandafter\edef\csname mst@boldvariant@\mst@version\endcsname{\mst@bold}% \expandafter\edef\csname mst@itdefault@\mst@version\endcsname{\itdefault}% \expandafter\edef\csname mst@rmdefault@\mst@version\endcsname{\rmdefault}% \expandafter\edef\csname mst@sfdefault@\mst@version\endcsname{\sfdefault}% \expandafter\edef\csname mst@ttdefault@\mst@version\endcsname{\ttdefault}% \expandafter\edef\csname mst@exists@skip@\mst@version\endcsname {\mst@exists@skip}% \expandafter\edef\csname mst@forall@skip@\mst@version\endcsname {\mst@forall@skip}% \expandafter\edef\csname mst@prime@skip@\mst@version\endcsname {\mst@prime@skip}% \ifx\mst@tmp\empty \ifmst@italic \SetSymbolFont{mtletterfont}{#2}{#3}{#4}{#5}{\mst@ltsh}% \typeout{** Latin letters in math version `#2\string' will use the font #3/#4/#5/\mst@ltsh^^J% ** Other characters (digits, ...) and \protect\log-like names will be in #6 shape.}% \expandafter\edef\csname mst@ltshape@\mst@version\endcsname{\mst@ltsh}% \else \SetSymbolFont{mtletterfont}{#2}{#3}{#4}{#5}{#6}% \typeout{** Latin letters in math version `#2\string' will use the fonts #3/#4/#5(\mst@bold)/#6}% \expandafter\edef\csname mst@ltshape@\mst@version\endcsname{#6}% \fi \else \SetSymbolFont{mtletterfont}{#2}{#3}{#4}{#5}{#1}% \typeout{** Latin letters in math version `#2\string' will use the font #3/#4/#5/#1^^J% ** Other characters (digits, ...) and \protect\log-like names will be in #6 shape.}% \expandafter\edef\csname mst@ltshape@\mst@version\endcsname{#1}% \fi \ifmst@nonormalbold\else \SetMathAlphabet{\mathnormalbold}{#2}{#3}{#4}{\mst@bold}% {\csname mst@ltshape@\mst@version\endcsname}% \fi \SetSymbolFont{mtoperatorfont}{#2}{#3}{#4}{#5}{#6}% \ifmst@defaultbf\else\SetMathAlphabet{\Mathbf}{#2}{#3}{#4}{\mst@bold}{#6}\fi \ifmst@defaultit\else\SetMathAlphabet{\Mathit}{#2}{#3}{#4}{#5}{\itdefault}\fi \ifmst@defaultsf\else\SetMathAlphabet{\Mathsf}{#2}{#3}{\sfdefault}{#5}{#6}\fi \ifmst@defaulttt\else\SetMathAlphabet{\Mathtt}{#2}{#3}{\ttdefault}{#5}{#6}\fi \ifmst@needeuler \SetMathAlphabet{\MathEulerBold}{#2}{U}{zeur}{\mst@bold}{n}% \fi \def\mst@greek@lsh@loc{\csname mst@ltshape@\mst@version\endcsname}% \def\mst@greek@ush@loc{\csname mst@shape@\mst@version\endcsname}% \ifmst@itgreek\def\mst@greek@lsh@loc{\itdefault}% \def\mst@greek@ush@loc{\itdefault}\fi \ifmst@upgreek\def\mst@greek@lsh@loc{\updefault}% \def\mst@greek@ush@loc{\updefault}\fi \ifmst@frenchmath \ifmst@itgreek\else \ifmst@upgreek\else \def\mst@greek@lsh@loc{\csname mst@shape@\mst@version\endcsname}% \def\mst@greek@ush@loc{\csname mst@shape@\mst@version\endcsname}% \fi\fi \fi \ifcase\mst@greek@select \or\def\mst@greek@ush@loc{\itdefault}% \or\def\mst@greek@ush@loc{\updefault}% \fi \ifmst@LGRgreeks \SetSymbolFont{mtlgrfontlower}{#2}{LGR}{#4}{#5}{\mst@greek@lsh@loc}% \SetSymbolFont{mtlgrfontupper}{#2}{LGR}{#4}{#5}{\mst@greek@ush@loc}% \typeout{** Greek letters (\mst@greek@lsh@loc/\mst@greek@ush@loc) will use LGR font #4\ifmst@subdued ^^J** (in non subdued versions)\fi}% \else \ifmst@selfGreeks \SetSymbolFont{mtselfGreekfont}{#2}{OT1}{#4}{#5}{\mst@greek@ush@loc}% \typeout{** Capital Greek letters (\mst@greek@lsh@loc/\mst@greek@ush@loc) will use OT1 font #4\ifmst@subdued ^^J** (in non subdued versions)\fi}% \else \ifmst@LGRgreek \SetSymbolFont{mtlgrfontlower}{#2}{LGR}{\mst@greekfont}{#5}{\mst@greek@lsh@loc}% \SetSymbolFont{mtlgrfontupper}{#2}{LGR}{\mst@greekfont}{#5}{\mst@greek@ush@loc}% \typeout{** Greek letters (\mst@greek@lsh@loc/\mst@greek@ush@loc) will use LGR font \mst@greekfont\ifmst@subdued ^^J** (in non subdued versions)\fi}% \else \ifmst@selfGreek \SetSymbolFont{mtselfGreekfont}{#2}{OT1}{\mst@greekfont}{#5}{\mst@greek@ush@loc}% \typeout{** Capital Greek letters (\mst@greek@lsh@loc/\mst@greek@ush@loc) will use OT1 font \mst@greekfont\ifmst@subdued ^^J** (in non subdued versions)\fi}% \fi \fi \fi \fi } \let\MathastextDeclareVersion\MTDeclareVersion \@onlypreamble\MTDeclareVersion \@onlypreamble\MathastextDeclareVersion \newcommand*\MTversion {\@ifstar\MTversion@s\MTversion@ } \newcommand*\MTversion@s [1]{\mathversion{#1}\MTversion@@ {#1}} \newcommand*\MTversion@ [2][]{% \mathversion{#2}% \edef\mst@tmpa{#1}% \ifx\mst@tmpa\empty \edef\mst@tmp{#2}% \else \let\mst@tmp\mst@tmpa \fi \edef\encodingdefault {\csname mst@encoding@\mst@tmp\endcsname}% \edef\familydefault {\csname mst@family@\mst@tmp\endcsname}% \edef\seriesdefault {\csname mst@series@\mst@tmp\endcsname}% \edef\shapedefault {\csname mst@shape@\mst@tmp\endcsname}% \edef\bfdefault {\csname mst@boldvariant@\mst@tmp\endcsname}% \edef\itdefault {\csname mst@itdefault@\mst@tmp\endcsname}% \edef\rmdefault {\csname mst@rmdefault@\mst@tmp\endcsname}% \edef\sfdefault {\csname mst@sfdefault@\mst@tmp\endcsname}% \edef\ttdefault {\csname mst@ttdefault@\mst@tmp\endcsname}% \usefont{\encodingdefault}{\familydefault}{\seriesdefault}{\shapedefault}% \MTversion@@ {#2}% } \newcommand*\MTversion@@ [1]{% \edef\mst@tmp{#1}% %% v1.15e: muskips \expandafter \mst@exists@muskip\csname mst@exists@skip@\mst@tmp\endcsname\relax \expandafter \mst@forall@muskip\csname mst@forall@skip@\mst@tmp\endcsname\relax %% v1.2: muskip for \cs{prime} \expandafter \mst@prime@muskip\csname mst@prime@skip@\mst@tmp\endcsname\relax %% v1.2b: italic corrections except for italic/slanted (sic) letters, and of %% course except in the subdued normal and bold math versions %% v1.3: by default, letters are made mathematically active, even if italic %% corrections are not used, to allow the action of \MTsetmathskips. \edef\mst@tmpa{\csname mst@ltshape@\mst@tmp\endcsname}% \edef\mst@tmpb{\csname mst@shape@\mst@tmp\endcsname}% \MTicinmath \@for\mst@tmpc:=it,sl\do{\ifx\mst@tmpc\mst@tmpa\MTnoicinmath\fi}% \ifmst@frenchmath \MTICinmath \@for\mst@tmpc:=it,sl\do{\ifx\mst@tmpc\mst@tmpb\MTnoICinmath\fi}% \fi %% v1.15c: extending subdued to LGRgreek %% v1.15f: subdueing math alphabets in a simpler way than in 1.15e %% v1.2b: subdueing the activation of characters in math mode %% v1.2d: special treatment of the asterisk %% v1.3d: extended LGRgreek mechanism of activation/restoration of Greek to all %% cases \MTmathoperatorsobeymathxx \MTeasynonlettersobeymathxx \ifmst@asterisk\let\mst@doasterisk\mst@@doasterisk\fi \ifmst@subdued \def\mst@tmpa{normal}% \ifx\mst@tmp\mst@tmpa \mst@restorealphabets \MTstandardgreek \MTmathoperatorsdonotobeymathxx \MTnonlettersdonotobeymathxx \MTeasynonlettersdonotobeymathxx \MTmathstandardletters \ifmst@asterisk\let\mst@doasterisk\relax\fi \else \def\mst@tmpa{bold}% \ifx\mst@tmp\mst@tmpa \mst@restorealphabets \MTstandardgreek \MTmathoperatorsdonotobeymathxx \MTnonlettersdonotobeymathxx \MTeasynonlettersdonotobeymathxx \MTmathstandardletters \ifmst@asterisk\let\mst@doasterisk\relax\fi \else \mst@setalphabets \MTcustomgreek \fi \fi \else \MTcustomgreek % new with 1.3d \fi } \let\MathastextVersion\MTversion \let\Mathastextversion\MTversion \let\MTVersion\MTversion \let\mathastextversion\MTversion \Mathastext \ifmst@eulergreek \typeout{** Greek letters will use the Euler font. Use \protect\MathastextEulerScale{} to scale the font.}% \ifmst@subdued{\typeout{** (subdued mode: normal and bold math version with default Greek letters.)}}\fi \else \ifmst@symbolgreek \typeout{** Greek letters will use the PostScript Symbol font. Use^^J% ** \protect\MathastextSymbolScale{} to scale the font.}% \ifmst@subdued{\typeout{** (subdued mode: normal and bold math version with default Greek letters.)}}\fi \fi\fi \def\mst@DeclareMathLetter #1{% \DeclareMathSymbol {#1}{\mathalpha}{mtletterfont}{`#1}% \expandafter \DeclareMathSymbol \csname mst@#1\endcsname{\mathalpha}{mtletterfont}{`#1}% \expandafter\mst@addtodo@az \expandafter #1\csname mst@#1\endcsname\mst@itcorr }% \@for\mst@tmp:=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\do {\expandafter\mst@DeclareMathLetter\mst@tmp}% \ifmst@frenchmath \def\mst@font@tbu{mtoperatorfont}% \else \def\mst@font@tbu{mtletterfont}% \fi \def\mst@DeclareMathLetter #1{% \DeclareMathSymbol {#1}{\mathalpha}{\mst@font@tbu}{`#1}% \expandafter \DeclareMathSymbol \csname mst@#1\endcsname{\mathalpha}{\mst@font@tbu}{`#1}% \expandafter\mst@addtodo@AZ \expandafter #1\csname mst@#1\endcsname\mst@ITcorr}% \@for\mst@tmp:=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\do {\expandafter\mst@DeclareMathLetter\mst@tmp}% \let\mst@DeclareMathLetter\relax %% \ifmst@nodigits\else \def\mst@font@tbu{mtoperatorfont}% \ifmst@symboldigits \def\mst@font@tbu{mtpsymbol} \fi \ifmst@eulerdigits \def\mst@font@tbu{mteulervm} \fi \DeclareMathSymbol{0}{\mathalpha}{\mst@font@tbu}{`0}% \DeclareMathSymbol{1}{\mathalpha}{\mst@font@tbu}{`1}% \DeclareMathSymbol{2}{\mathalpha}{\mst@font@tbu}{`2}% \DeclareMathSymbol{3}{\mathalpha}{\mst@font@tbu}{`3}% \DeclareMathSymbol{4}{\mathalpha}{\mst@font@tbu}{`4}% \DeclareMathSymbol{5}{\mathalpha}{\mst@font@tbu}{`5}% \DeclareMathSymbol{6}{\mathalpha}{\mst@font@tbu}{`6}% \DeclareMathSymbol{7}{\mathalpha}{\mst@font@tbu}{`7}% \DeclareMathSymbol{8}{\mathalpha}{\mst@font@tbu}{`8}% \DeclareMathSymbol{9}{\mathalpha}{\mst@font@tbu}{`9}% \fi \ifmst@symboldelimiters \def\mst@font@tbu{mtpsymbol}% \mst@endashfalse \mst@emdashfalse \else \def\mst@font@tbu{mtoperatorfont}% \fi \ifmst@noexclam\else\typeout{** \string! and \string?}% \DeclareMathSymbol{!}{\mathclose}{\mst@font@tbu}{"21}% \DeclareMathSymbol{\mst@varfam@exclam}{\mathalpha}{\mst@font@tbu}{"21}% \expandafter\mst@addtodo@nonletters\string!\mathclose\mst@varfam@exclam \DeclareMathSymbol{?}{\mathclose}{\mst@font@tbu}{"3F}% \DeclareMathSymbol{\mst@varfam@question}{\mathalpha}{\mst@font@tbu}{"3F}% \expandafter\mst@addtodo@nonletters\string?\mathclose\mst@varfam@question \fi \def\mst@@doasterisk{\let\ast\mst@ast\mst@mathactivate*{}\mst@ast}% \ifmst@asterisk\typeout{** asterisk: \string\ast\space and *} \ifmst@symbolmisc \def\mst@bin@ast{% \mathbin{\mathchoice{\raisebox{-.1\height}% {\the\textfont\symmtpsymbol\char42}}% {\raisebox{-.1\height}% {\the\textfont\symmtpsymbol\char42}}% {\raisebox{-.1\height}% {\the\scriptfont\symmtpsymbol\char42}}% {\raisebox{-.1\height}% {\the\scriptscriptfont\symmtpsymbol\char42}}}}% \else \def\mst@bin@ast{% \mathbin{\mathchoice{\raisebox{-\mst@lowerast}% {\the\textfont\symmtoperatorfont\char42}}% {\raisebox{-\mst@lowerast}% {\the\textfont\symmtoperatorfont\char42}}% {\raisebox{-\mst@lowerast}% {\the\scriptfont\symmtoperatorfont\char42}}% {\raisebox{-\mst@lowerast}% {\the\scriptscriptfont\symmtoperatorfont\char42}}}}% \fi \def\mst@varfam@ast{\ifnum\fam=\m@ne\mst@bin@ast\else \mathbin{\mathchoice{\raisebox{-\mst@lowerast}% {\the\textfont\fam\char42}}% {\raisebox{-\mst@lowerast}% {\the\textfont\fam\char42}}% {\raisebox{-\mst@lowerast}% {\the\scriptfont\fam\char42}}% {\raisebox{-\mst@lowerast}% {\the\scriptscriptfont\fam\char42}}}\fi}% \let\mst@doasterisk\mst@@doasterisk \DeclareRobustCommand*{\mst@ast}{\mst@bin@ast} \newcommand*\MTlowerast[1]{\def\mst@lowerast{#1}} \MTlowerast{.3\height} \mst@do@easynonletters\expandafter{\the\mst@do@easynonletters \expandafter\def\csname mst@ast \endcsname{\mst@varfam@ast}} \fi \ifmst@nopunct\else\typeout{** punctuation\string: \string, \string. \string: \string; and \string\colon} \DeclareMathSymbol{,}{\mathpunct}{\mst@font@tbu}{"2C} \DeclareMathSymbol{\mst@varfam@comma}{\mathalpha}{\mst@font@tbu}{"2C} \expandafter\mst@addtodo@nonletters\string,\mathpunct\mst@varfam@comma \DeclareMathSymbol{.}{\mathord}{\mst@font@tbu}{"2E} \DeclareMathSymbol{\mst@varfam@dot}{\mathalpha}{\mst@font@tbu}{"2E} \mst@addtodo@easynonletters\.\mst@varfam@dot \DeclareMathSymbol{:}{\mathrel}{\mst@font@tbu}{"3A} % relation spacing \DeclareMathSymbol{\mst@varfam@colon}{\mathalpha}{\mst@font@tbu}{"3A} \expandafter\mst@addtodo@nonletters\string:\mathrel\mst@varfam@colon \@ifpackageloaded{amsmath} {} % \colon defined in amsmath.sty in terms of : with some enlarged explicit % spacing. No need to intervene. {% no amsmath, use standard punctuation spacing \let\colon\undefined % the reason is if some package has redefined \colon which then % can not be used in \cs{DeclareMathSymbol} anymore (we % shamelessly overwrite...) \DeclareMathSymbol{\colon}{\mathpunct}{\mst@font@tbu}{"3A} \mst@do@nonletters\expandafter{\the\mst@do@nonletters \def\colon{\mathpunct{\mst@varfam@colon}}}} \DeclareMathSymbol{;}{\mathpunct}{\mst@font@tbu}{"3B} \DeclareMathSymbol{\mst@varfam@pointvirgule}{\mathalpha}{\mst@font@tbu}{"3B} \expandafter\mst@addtodo@nonletters\string;\mathpunct\mst@varfam@pointvirgule \fi \ifmst@nominus\else \ifmst@XeTeX \XeTeXmathcharnumdef\mst@minus@sign=\XeTeXmathcodenum`\-\relax \else \ifmst@LuaTeX \luatexUmathcharnumdef\mst@minus@sign=\luatexUmathcodenum`\-\relax %% I used this prior to the new \luatexUmathcodenum, as available with TL2013: %% \mathchardef\mst@minus@sign=8704\relax % "2200 \else \mathchardef\mst@minus@sign=\mathcode`\-\relax \fi\fi \@ifpackageloaded{amsmath} {\def\relbar{\mathrel{\mathpalette\mathsm@sh\mst@minus@sign}}} {\DeclareRobustCommand\relbar{\mathrel{\smash\mst@minus@sign}}} \def\rightarrowfill{$\m@th\mathord{\relbar}\mkern-7mu% \cleaders\hbox{$\mkern-2mu\relbar\mkern-2mu$}\hfill \mkern-7mu\mathord\rightarrow$} \def\leftarrowfill{$\m@th\mathord\leftarrow\mkern-7mu% \cleaders\hbox{$\mkern-2mu\relbar\mkern-2mu$}\hfill \mkern-7mu\mathord{\relbar}$} \fi \def\do@the@endashstuff{\edef\mst@tmp@enc{\encodingdefault} \ifx\mst@tmp@enc\mst@eui % xetex+fontspec \AtBeginDocument{% \XeTeXmathcode`\-="2 \symmtoperatorfont "2013\relax \XeTeXmathchardef\mst@varfam@minus="7 \symmtoperatorfont "2013\relax } \else \ifx\mst@tmp@enc\mst@euii % luatex+fontspec \AtBeginDocument{% \luatexUmathcode`\-="2 \symmtoperatorfont "2013\relax \luatexUmathchardef\mst@varfam@minus="7 \symmtoperatorfont "2013\relax } \else \ifx\mst@tmp@enc\mst@ti % T1 \DeclareMathSymbol{-}{\mathbin}{mtoperatorfont}{21} \DeclareMathSymbol{\mst@varfam@minus}{\mathalpha}{mtoperatorfont}{21} \else \ifx\mst@tmp@enc\mst@oti % OT1 \DeclareMathSymbol{-}{\mathbin}{mtoperatorfont}{123} \DeclareMathSymbol{\mst@varfam@minus}{\mathalpha}{mtoperatorfont}{123} \else \ifx\mst@tmp@enc\mst@lyi % LY1 \DeclareMathSymbol{-}{\mathbin}{mtoperatorfont}{150} \DeclareMathSymbol{\mst@varfam@minus}{\mathalpha}{mtoperatorfont}{150} \else % make sure we have neither xetex nor luatex \ifmst@XeTeX\mst@aborttrue\else\ifmst@LuaTeX\mst@aborttrue\else \DeclareMathSymbol{-}{\mathbin}{mtoperatorfont} \DeclareMathSymbol{\mst@varfam@minus}{\mathalpha}{mtoperatorfont} {\expandafter\the\expandafter\csname\mst@tmp@enc\string\textendash\endcsname} \fi\fi \fi\fi\fi\fi\fi} \def\do@the@emdashstuff{\edef\mst@tmp@enc{\encodingdefault} \ifx\mst@tmp@enc\mst@eui % xetex+fontspec \AtBeginDocument{% \XeTeXmathcode`\-="2 \symmtoperatorfont "2014\relax \XeTeXmathchardef\mst@varfam@minus="7 \symmtoperatorfont "2014\relax } \else \ifx\mst@tmp@enc\mst@euii % luatex+fontspec \AtBeginDocument{% \luatexUmathcode`\-="2 \symmtoperatorfont "2014\relax \luatexUmathchardef\mst@varfam@minus="7 \symmtoperatorfont "2014\relax } \else \ifx\mst@tmp@enc\mst@ti % T1 \DeclareMathSymbol{-}{\mathbin}{mtoperatorfont}{22} \DeclareMathSymbol{\mst@varfam@minus}{\mathalpha}{mtoperatorfont}{22} \else \ifx\mst@tmp@enc\mst@oti % OT1 \DeclareMathSymbol{-}{\mathbin}{mtoperatorfont}{124} \DeclareMathSymbol{\mst@varfam@minus}{\mathalpha}{mtoperatorfont}{124} \else \ifx\mst@tmp@enc\mst@lyi % LY1 \DeclareMathSymbol{-}{\mathbin}{mtoperatorfont}{151} \DeclareMathSymbol{\mst@varfam@minus}{\mathalpha}{mtoperatorfont}{151} \else % make sure we have neither xetex nor luatex \ifmst@XeTeX\mst@aborttrue\else\ifmst@LuaTeX\mst@aborttrue\else \DeclareMathSymbol{-}{\mathbin}{mtoperatorfont} \DeclareMathSymbol{\mst@varfam@minus}{\mathalpha}{mtoperatorfont} {\expandafter\the\expandafter\csname\mst@tmp@enc\string\textemdash\endcsname} \fi\fi \fi\fi\fi\fi\fi} \ifmst@nominus\else\typeout{** minus as endash} \mst@abortfalse \ifmst@endash\do@the@endashstuff\else \ifmst@emdash\do@the@emdashstuff\else \DeclareMathSymbol{-}{\mathbin}{\mst@font@tbu}{"2D} \DeclareMathSymbol{\mst@varfam@minus}{\mathalpha}{\mst@font@tbu}{"2D} \fi\fi \ifmst@abort \DeclareMathSymbol{-}{\mathbin}{\mst@font@tbu}{"2D} \DeclareMathSymbol{\mst@varfam@minus}{\mathalpha}{\mst@font@tbu}{"2D} \fi \expandafter\mst@addtodo@nonletters\string-\mathbin\mst@varfam@minus \fi %%\def\hbar{{\mathchar'26\mkern-9muh}} % (original definition from latex.ltx) \def\mst@mathrlap{\mathpalette\mst@mathrlapinternal} \def\mst@mathrlapinternal#1#2{\rlap{$\mathsurround=0pt#1{#2}$}} \def\do@the@hbarstuff{\edef\mst@tmp@enc{\encodingdefault} \ifx\mst@tmp@enc\mst@eui % xetex and unicode font \XeTeXmathchardef\hbar="7 \symmtletterfont "0127 \relax \else \ifx\mst@tmp@enc\mst@euii % luatex and unicode font \luatexUmathchardef\hbar="7 \symmtletterfont "0127 \relax %% or 210F? \else % I must leave open the T1, OT1 possibility also for XeTeX or LuaTeX \ifx\mst@ti\mst@tmp@enc \DeclareMathAccent{\mst@ltbar}{\mathalpha}{mtletterfont}{9} \else %% assume OT1. Bad idea? Should not provoke an error anyhow \DeclareMathAccent{\mst@ltbar}{\mathalpha}{mtletterfont}{22} \fi \def\hbar{\mst@mathrlap{\mst@ltbar{\ }}h} \fi\fi} \ifmst@nohbar\else\typeout{** \string\hbar}\do@the@hbarstuff\fi \ifmst@noplus\else\typeout{** \string+ and \string=} \DeclareMathSymbol{+}{\mathbin}{\mst@font@tbu}{"2B} \DeclareMathSymbol{\mst@varfam@plus}{\mathalpha}{\mst@font@tbu}{"2B} \expandafter\mst@addtodo@nonletters\string+\mathbin\mst@varfam@plus \fi \ifmst@noequal\else \ifmst@XeTeX \XeTeXmathcharnumdef\mst@equal@sign=\XeTeXmathcodenum`\=\relax \else \ifmst@LuaTeX \luatexUmathcharnumdef\mst@equal@sign=\luatexUmathcodenum`\=\relax \else \mathchardef\mst@equal@sign=\mathcode`\=\relax \fi\fi \@ifpackageloaded{amsmath} {\def\Relbar{\mathrel\mst@equal@sign}} {\DeclareRobustCommand\Relbar{\mathrel{\mst@equal@sign}}} \DeclareMathSymbol{=}{\mathrel}{\mst@font@tbu}{"3D} \DeclareMathSymbol{\mst@varfam@equal}{\mathalpha}{\mst@font@tbu}{"3D} \typeout{** adding \string= \string; and \string+ to \string\nfss@catcodes} \g@addto@macro\nfss@catcodes{% \@makeother\=% \@makeother\;% \@makeother\+% } \expandafter\mst@addtodo@nonletters\string=\mathrel\mst@varfam@equal \fi \ifmst@noparen\else\typeout{** parentheses \string( \string) \string[ \string] and slash \string/} \ifmst@nosmalldelims \DeclareMathSymbol{(}{\mathopen}{\mst@font@tbu}{"28} \DeclareMathSymbol{)}{\mathclose}{\mst@font@tbu}{"29} \DeclareMathSymbol{[}{\mathopen} {\mst@font@tbu}{"5B} \DeclareMathSymbol{]}{\mathclose}{\mst@font@tbu}{"5D} \DeclareMathSymbol{/}{\mathord}{\mst@font@tbu}{"2F} \else \DeclareMathDelimiter{(}{\mathopen}{\mst@font@tbu}{"28}{largesymbols}{"00} \DeclareMathDelimiter{)}{\mathclose}{\mst@font@tbu}{"29}{largesymbols}{"01} \DeclareMathDelimiter{[}{\mathopen} {\mst@font@tbu}{"5B}{largesymbols}{"02} \DeclareMathDelimiter{]}{\mathclose}{\mst@font@tbu}{"5D}{largesymbols}{"03} \DeclareMathDelimiter{/}{\mathord}{\mst@font@tbu}{"2F}{largesymbols}{"0E} \fi \DeclareMathSymbol{\mst@varfam@lparen}{\mathalpha}{\mst@font@tbu}{40} \DeclareMathSymbol{\mst@varfam@rparen}{\mathalpha}{\mst@font@tbu}{41} \DeclareMathSymbol{\mst@varfam@lbrack}{\mathalpha}{\mst@font@tbu}{"5B} \DeclareMathSymbol{\mst@varfam@rbrack}{\mathalpha}{\mst@font@tbu}{"5D} \DeclareMathSymbol{\mst@varfam@slash}{\mathalpha}{\mst@font@tbu}{"2F} \expandafter\mst@addtodo@nonletters\string(\mathopen\mst@varfam@lparen \expandafter\mst@addtodo@nonletters\string)\mathclose\mst@varfam@rparen \expandafter\mst@addtodo@nonletters\string[\mathopen\mst@varfam@lbrack \expandafter\mst@addtodo@nonletters\string]\mathclose\mst@varfam@rbrack \mst@addtodo@easynonletters\/\mst@varfam@slash \fi \ifmst@alldelims\typeout{** alldelims: \string< \string> \string\backslash\space\string\setminus\space\string| \string\vert\space\string\mid\space\string\{\space and \string\}} \ifmst@nosmalldelims \DeclareMathDelimiter{\mst@varfam@backslash} {\mathalpha}{symbols}{"6E}{largesymbols}{"0F} \else \DeclareMathDelimiter{<}{\mathopen}{\mst@font@tbu}{"3C}{largesymbols}{"0A} \DeclareMathDelimiter{>}{\mathclose}{\mst@font@tbu}{"3E}{largesymbols}{"0B} \DeclareMathDelimiter{\backslash} {\mathord}{mtoperatorfont}{"5C}{largesymbols}{"0F} \DeclareMathDelimiter{\mst@varfam@backslash} {\mathalpha}{mtoperatorfont}{"5C}{largesymbols}{"0F} \fi \DeclareMathSymbol{<}{\mathrel}{\mst@font@tbu}{"3C} \DeclareMathSymbol{>}{\mathrel}{\mst@font@tbu}{"3E} \DeclareMathSymbol{\mst@varfam@less}{\mathalpha}{\mst@font@tbu}{"3C} \DeclareMathSymbol{\mst@varfam@more}{\mathalpha}{\mst@font@tbu}{"3E} \expandafter\mst@addtodo@nonletters\string<\mathrel\mst@varfam@less \expandafter\mst@addtodo@nonletters\string>\mathrel\mst@varfam@more \mst@do@easynonletters\expandafter{\the\mst@do@easynonletters \let\backslash\mst@varfam@backslash} \DeclareMathSymbol{\setminus}{\mathbin}{mtoperatorfont}{"5C} \DeclareMathSymbol{\mst@varfam@setminus}{\mathalpha}{mtoperatorfont}{"5C} \mst@do@nonletters\expandafter{\the\mst@do@nonletters \def\setminus{\mathbin{\mst@varfam@setminus}}} \ifmst@XeTeX \XeTeXmathcharnumdef\mst@vert@bar=\XeTeXmathcodenum`\|\relax \else \ifmst@LuaTeX \luatexUmathcharnumdef\mst@vert@bar=\luatexUmathcodenum`\|\relax \else\mathchardef\mst@vert@bar=\mathcode`\|\relax \fi\fi \DeclareRobustCommand\models{\mathrel{\mst@vert@bar}\joinrel\Relbar} \ifmst@nosmalldelims \DeclareMathSymbol{|}{\mathord}{\mst@font@tbu}{124} \else \DeclareMathDelimiter{|}{\mathord}{\mst@font@tbu}{124}{largesymbols}{"0C} \fi \def\vert{|} \DeclareMathSymbol{\mst@varfam@vbar}{\mathalpha}{\mst@font@tbu}{124} \mst@addtodo@easynonletters\|\mst@varfam@vbar \let\mid\undefined % 1.3: to avoid problems with some packages \DeclareMathSymbol{\mid}{\mathrel}{\mst@font@tbu}{124} \mst@do@nonletters\expandafter{\the\mst@do@nonletters \def\mid{\mathrel\mst@varfam@vbar}} \let\lbrace\undefined \let\rbrace\undefined \ifmst@nosmalldelims \DeclareMathSymbol{\lbrace}{\mathopen}{\mst@font@tbu}{123} \DeclareMathSymbol{\rbrace}{\mathclose}{\mst@font@tbu}{125} \else \DeclareMathDelimiter{\lbrace} {\mathopen}{\mst@font@tbu}{123}{largesymbols}{"08} \DeclareMathDelimiter{\rbrace} {\mathclose}{\mst@font@tbu}{125}{largesymbols}{"09} \fi \DeclareMathSymbol{\mst@varfam@lbrace}{\mathalpha}{\mst@font@tbu}{123} \DeclareMathSymbol{\mst@varfam@rbrace}{\mathalpha}{\mst@font@tbu}{125} \DeclareRobustCommand*{\mst@lbrace} {\ifmmode\mathopen\mst@varfam@lbrace\else\textbraceleft\fi} \DeclareRobustCommand*{\mst@rbrace} {\ifmmode\mathclose\mst@varfam@rbrace\else\textbraceright\fi} \mst@do@nonletters\expandafter{\the\mst@do@nonletters \mst@dobraces{\let\{\mst@lbrace\let\}\mst@rbrace}} \fi % end of \ifmst@alldelims \newcommand*{\MTexplicitbracesobeymathxx}{\let\mst@dobraces\@firstofone} \newcommand*{\MTexplicitbracesdonotobeymathxx}{\let\mst@dobraces\@gobble} \MTexplicitbracesdonotobeymathxx \ifmst@nospecials\else \typeout{** \string\#\space\string\mathdollar\space \string\%\space\string\&\space} \ifmst@XeTeX \XeTeXmathcode`\#="0 \symmtoperatorfont "0023 \relax \XeTeXmathchardef\mathdollar="0 \symmtoperatorfont "0024 \relax \XeTeXmathcode`\%="0 \symmtoperatorfont "0025 \relax \XeTeXmathcode`\&="0 \symmtoperatorfont "0026 \relax \mst@do@easynonletters\expandafter{\the\mst@do@easynonletters \XeTeXmathcode`\#="7 \symmtoperatorfont "0023 \relax \XeTeXmathchardef\mathdollar="7 \symmtoperatorfont "0024 \relax \XeTeXmathcode`\%="7 \symmtoperatorfont "0025 \relax \XeTeXmathcode`\&="7 \symmtoperatorfont "0026 \relax } \else \ifmst@LuaTeX \luatexUmathcode`\#="0 \symmtoperatorfont "0023 \relax \luatexUmathchardef\mathdollar="0 \symmtoperatorfont "0024 \relax \luatexUmathcode`\%="0 \symmtoperatorfont "0025 \relax \luatexUmathcode`\&="0 \symmtoperatorfont "0026 \relax \mst@do@easynonletters\expandafter{\the\mst@do@easynonletters \luatexUmathcode`\#="7 \symmtoperatorfont "0023 \relax \luatexUmathchardef\mathdollar="7 \symmtoperatorfont "0024 \relax \luatexUmathcode`\%="7 \symmtoperatorfont "0025 \relax \luatexUmathcode`\&="7 \symmtoperatorfont "0026 \relax } \else \count255=\symmtoperatorfont \multiply\count255 by 256 \advance\count255 by 35 \mathcode`\#\count255 \advance\count255 by 1 \mathchardef\mathdollar\count255 \advance\count255 by 1 \mathcode`\%\count255 \advance\count255 by 1 \mathcode`\&\count255 \count255=\symmtoperatorfont \multiply\count255 by 256 \advance\count255 by 28707 % = "7023 \mathchardef\mst@varfam@mathhash\count255 \advance\count255 by 1 \mathchardef\mst@varfam@mathdollar\count255 \advance\count255 by 1 \mathchardef\mst@varfam@mathpercent\count255 \advance\count255 by 1 \mathchardef\mst@varfam@mathampersand\count255 \mst@do@easynonletters\expandafter{\the\mst@do@easynonletters \mathcode`\#=\mst@varfam@mathhash \let\mathdollar\mst@varfam@mathdollar \mathcode`\%=\mst@varfam@mathpercent \mathcode`\&=\mst@varfam@mathampersand} \fi\fi\fi \ifmst@symbolmisc\typeout{** symbolmisc: miscellaneous math symbols from Symbol font} \let\mst@prod\prod \let\MToriginalprod\prod \DeclareMathSymbol{\prodpsy}{\mathop}{mtpsymbol}{213} \renewcommand*{\prod}{\ifinner\prodpsy\else\mst@prod\fi} \let\mst@sum\sum \let\MToriginalsum\sum \DeclareMathSymbol{\sumpsy}{\mathop}{mtpsymbol}{229} \renewcommand*{\sum}{\ifinner\sumpsy\else\mst@sum\fi} \DeclareMathSymbol{\mst@implies}{\mathrel}{mtpsymbol}{222} \DeclareRobustCommand*{\implies}{\;\mst@implies\;} \DeclareMathSymbol{\mst@impliedby}{\mathrel}{mtpsymbol}{220} \DeclareRobustCommand*{\impliedby}{\;\mst@impliedby\;} \DeclareRobustCommand*{\iff}{\;\mst@impliedby\mathrel{\mkern-3mu}\mst@implies\;} \DeclareMathSymbol{\mst@iff}{\mathrel}{mtpsymbol}{219} \DeclareRobustCommand*{\shortiff}{\;\mst@iff\;} \DeclareMathSymbol{\mst@to}{\mathrel}{mtpsymbol}{174} \DeclareMathSymbol{\mst@trait}{\mathrel}{mtpsymbol}{190} \DeclareRobustCommand*\to{\mst@to} \DeclareRobustCommand*\longto{\mkern2mu\mst@trait\mathrel{\mkern-10mu}\mst@to} \DeclareRobustCommand*\mapsto{\mapstochar\mathrel{\mkern0.2mu}\mst@to} \DeclareRobustCommand*\longmapsto{% \mapstochar\mathrel{\mkern2mu}\mst@trait\mathrel{\mkern-10mu}\mst@to} \DeclareMathSymbol{\aleph}{\mathord}{mtpsymbol}{192} \DeclareMathSymbol{\inftypsy}{\mathord}{mtpsymbol}{165} \DeclareMathSymbol{\emptyset}{\mathord}{mtpsymbol}{198} \let\varnothing\emptyset \DeclareMathSymbol{\nabla}{\mathord}{mtpsymbol}{209} \DeclareMathSymbol{\surd}{\mathop}{mtpsymbol}{214} \let\angle\undefined \DeclareMathSymbol{\angle}{\mathord}{mtpsymbol}{208} \DeclareMathSymbol{\forall}{\mathord}{mtpsymbol}{34} \DeclareMathSymbol{\exists}{\mathord}{mtpsymbol}{36} \DeclareMathSymbol{\neg}{\mathord}{mtpsymbol}{216} \DeclareMathSymbol{\clubsuit}{\mathord}{mtpsymbol}{167} \DeclareMathSymbol{\diamondsuit}{\mathord}{mtpsymbol}{168} \DeclareMathSymbol{\heartsuit}{\mathord}{mtpsymbol}{169} \DeclareMathSymbol{\spadesuit}{\mathord}{mtpsymbol}{170} \DeclareMathSymbol{\smallint}{\mathop}{mtpsymbol}{242} \DeclareMathSymbol{\wedge}{\mathbin}{mtpsymbol}{217} \DeclareMathSymbol{\vee}{\mathbin}{mtpsymbol}{218} \DeclareMathSymbol{\cap}{\mathbin}{mtpsymbol}{199} \DeclareMathSymbol{\cup}{\mathbin}{mtpsymbol}{200} \DeclareMathSymbol{\bullet}{\mathbin}{mtpsymbol}{183} \DeclareMathSymbol{\div}{\mathbin}{mtpsymbol}{184} \DeclareMathSymbol{\otimes}{\mathbin}{mtpsymbol}{196} \DeclareMathSymbol{\oplus}{\mathbin}{mtpsymbol}{197} \DeclareMathSymbol{\pm}{\mathbin}{mtpsymbol}{177} \DeclareMathSymbol{\times}{\mathbin}{mtpsymbol}{180} \DeclareMathSymbol{\proptopsy}{\mathrel}{mtpsymbol}{181} \DeclareMathSymbol{\mid}{\mathrel}{mtpsymbol}{124} \DeclareMathSymbol{\leq}{\mathrel}{mtpsymbol}{163} \DeclareMathSymbol{\geq}{\mathrel}{mtpsymbol}{179} \DeclareMathSymbol{\approx}{\mathrel}{mtpsymbol}{187} \DeclareMathSymbol{\supset}{\mathrel}{mtpsymbol}{201} \DeclareMathSymbol{\subset}{\mathrel}{mtpsymbol}{204} \DeclareMathSymbol{\supseteq}{\mathrel}{mtpsymbol}{202} \DeclareMathSymbol{\subseteq}{\mathrel}{mtpsymbol}{205} \DeclareMathSymbol{\in}{\mathrel}{mtpsymbol}{206} \DeclareMathSymbol{\sim}{\mathrel}{mtpsymbol}{126} \let\cong\undefined \DeclareMathSymbol{\cong}{\mathrel}{mtpsymbol}{64} \DeclareMathSymbol{\perp}{\mathrel}{mtpsymbol}{94} \DeclareMathSymbol{\equiv}{\mathrel}{mtpsymbol}{186} \let\notin\undefined \DeclareMathSymbol{\notin}{\mathrel}{mtpsymbol}{207} \DeclareMathDelimiter{\rangle} {\mathclose}{mtpsymbol}{241}{largesymbols}{"0B} \DeclareMathDelimiter{\langle} {\mathopen}{mtpsymbol}{225}{largesymbols}{"0A} \fi \ifmst@symbolre\typeout{** symbolre: \string\Re\space and \string\Im\space from Symbol font} \DeclareMathSymbol{\Re}{\mathord}{mtpsymbol}{"C2} \DeclareMathSymbol{\Im}{\mathord}{mtpsymbol}{"C1} \DeclareMathSymbol{\DotTriangle}{\mathord}{mtpsymbol}{92} \fi \let\mst@mathord\mathalpha \mst@goaheadtrue \ifmst@selfGreek \def\mst@font@tbu{mtselfGreekfont} \else \ifmst@eulergreek \def\mst@font@tbu{mteulervm} \else \ifmst@symbolgreek \def\mst@font@tbu{mtpsymbol} \let\mst@mathord\mathord \else \ifmst@LGRgreek \mst@goaheadfalse \else \mst@goaheadfalse \def\mst@omicron {\mst@alph@omicron{o}} \fi \fi \fi \fi \ifmst@goahead \DeclareMathSymbol{\mst@Alpha}{\mst@mathord}{\mst@font@tbu}{"41} \DeclareMathSymbol{\mst@Beta}{\mst@mathord}{\mst@font@tbu}{"42} \DeclareMathSymbol{\mst@Epsilon}{\mst@mathord}{\mst@font@tbu}{"45} \DeclareMathSymbol{\mst@Zeta}{\mst@mathord}{\mst@font@tbu}{"5A} \DeclareMathSymbol{\mst@Eta}{\mst@mathord}{\mst@font@tbu}{"48} \DeclareMathSymbol{\mst@Iota}{\mst@mathord}{\mst@font@tbu}{"49} \DeclareMathSymbol{\mst@Kappa}{\mst@mathord}{\mst@font@tbu}{"4B} \DeclareMathSymbol{\mst@Mu}{\mst@mathord}{\mst@font@tbu}{"4D} \DeclareMathSymbol{\mst@Nu}{\mst@mathord}{\mst@font@tbu}{"4E} \DeclareMathSymbol{\mst@Omicron}{\mst@mathord}{\mst@font@tbu}{"4F} \DeclareMathSymbol{\mst@Rho}{\mst@mathord}{\mst@font@tbu}{"50} \DeclareMathSymbol{\mst@Tau}{\mst@mathord}{\mst@font@tbu}{"54} \DeclareMathSymbol{\mst@Chi}{\mst@mathord}{\mst@font@tbu}{"58} \ifx\mst@mathord\mathord %% attention le P de Symbol est un \Pi pas un \Rho \DeclareMathSymbol{\mst@Rho}{\mathord}{mtpsymbol}{"52} %% attention le X de Symbol est un \Xi pas un \Chi \DeclareMathSymbol{\mst@Chi}{\mathord}{mtpsymbol}{"43} %% attention le F de Symbol est un \Phi. Il n'y a pas de \Digamma \DeclareMathSymbol{\mst@Gamma}{\mathord}{mtpsymbol}{"47} \DeclareMathSymbol{\mst@Delta}{\mathord}{mtpsymbol}{"44} \DeclareMathSymbol{\mst@Theta}{\mathord}{mtpsymbol}{"51} \DeclareMathSymbol{\mst@Lambda}{\mathord}{mtpsymbol}{"4C} \DeclareMathSymbol{\mst@Xi}{\mathord}{mtpsymbol}{"58} \DeclareMathSymbol{\mst@Pi}{\mathord}{mtpsymbol}{"50} \DeclareMathSymbol{\mst@Sigma}{\mathord}{mtpsymbol}{"53} \DeclareMathSymbol{\mst@Upsilon}{\mathord}{mtpsymbol}{"A1} \DeclareMathSymbol{\mst@Phi}{\mathord}{mtpsymbol}{"46} \DeclareMathSymbol{\mst@Psi}{\mathord}{mtpsymbol}{"59} \DeclareMathSymbol{\mst@Omega}{\mathord}{mtpsymbol}{"57} \else % de \mst@mathord=\mathord \DeclareMathSymbol\mst@Digamma {\mathalpha}{\mst@font@tbu}{"46} \DeclareMathSymbol\mst@Gamma {\mathalpha}{\mst@font@tbu}{"00} \DeclareMathSymbol\mst@Delta {\mathalpha}{\mst@font@tbu}{"01} \DeclareMathSymbol\mst@Theta {\mathalpha}{\mst@font@tbu}{"02} \DeclareMathSymbol\mst@Lambda {\mathalpha}{\mst@font@tbu}{"03} \DeclareMathSymbol\mst@Xi {\mathalpha}{\mst@font@tbu}{"04} \DeclareMathSymbol\mst@Pi {\mathalpha}{\mst@font@tbu}{"05} \DeclareMathSymbol\mst@Sigma {\mathalpha}{\mst@font@tbu}{"06} \DeclareMathSymbol\mst@Upsilon {\mathalpha}{\mst@font@tbu}{"07} \DeclareMathSymbol\mst@Phi {\mathalpha}{\mst@font@tbu}{"08} \DeclareMathSymbol\mst@Psi {\mathalpha}{\mst@font@tbu}{"09} \DeclareMathSymbol\mst@Omega {\mathalpha}{\mst@font@tbu}{"0A} \fi % de \mst@mathord=\mathord \fi % fin de goahead \ifmst@goahead \ifmst@eulergreek \DeclareMathSymbol{\mst@alpha} {\mathalpha}{mteulervm}{"0B} \DeclareMathSymbol{\mst@beta} {\mathalpha}{mteulervm}{"0C} \DeclareMathSymbol{\mst@gamma} {\mathalpha}{mteulervm}{"0D} \DeclareMathSymbol{\mst@delta} {\mathalpha}{mteulervm}{"0E} \DeclareMathSymbol{\mst@epsilon}{\mathalpha}{mteulervm}{"0F} \DeclareMathSymbol{\mst@zeta} {\mathalpha}{mteulervm}{"10} \DeclareMathSymbol{\mst@eta} {\mathalpha}{mteulervm}{"11} \DeclareMathSymbol{\mst@theta} {\mathalpha}{mteulervm}{"12} \DeclareMathSymbol{\mst@iota} {\mathalpha}{mteulervm}{"13} \DeclareMathSymbol{\mst@kappa} {\mathalpha}{mteulervm}{"14} \DeclareMathSymbol{\mst@lambda} {\mathalpha}{mteulervm}{"15} \DeclareMathSymbol{\mst@mu} {\mathalpha}{mteulervm}{"16} \DeclareMathSymbol{\mst@nu} {\mathalpha}{mteulervm}{"17} \DeclareMathSymbol{\mst@xi} {\mathalpha}{mteulervm}{"18} \DeclareMathSymbol{\mst@omicron}{\mathalpha}{mteulervm}{"6F} \DeclareMathSymbol{\mst@pi} {\mathalpha}{mteulervm}{"19} \DeclareMathSymbol{\mst@rho} {\mathalpha}{mteulervm}{"1A} \DeclareMathSymbol{\mst@sigma} {\mathalpha}{mteulervm}{"1B} \DeclareMathSymbol{\mst@tau} {\mathalpha}{mteulervm}{"1C} \DeclareMathSymbol{\mst@upsilon}{\mathalpha}{mteulervm}{"1D} \DeclareMathSymbol{\mst@phi} {\mathalpha}{mteulervm}{"1E} \DeclareMathSymbol{\mst@chi} {\mathalpha}{mteulervm}{"1F} \DeclareMathSymbol{\mst@psi} {\mathalpha}{mteulervm}{"20} \DeclareMathSymbol{\mst@omega} {\mathalpha}{mteulervm}{"21} \let\mst@varrho=\mst@rho \let\mst@varsigma=\mst@sigma \DeclareMathSymbol{\mst@varepsilon}{\mathalpha}{mteulervm}{"22} \DeclareMathSymbol{\mst@vartheta}{\mathalpha}{mteulervm}{"23} \DeclareMathSymbol{\mst@varpi} {\mathalpha}{mteulervm}{"24} \DeclareMathSymbol{\mst@varphi} {\mathalpha}{mteulervm}{"27} \DeclareMathSymbol{\mst@partial}{\mathalpha}{mteulervm}{"40} \DeclareMathSymbol{\mst@wp}{\mathalpha}{mteulervm}{"7D} \DeclareMathSymbol{\mst@ell}{\mathalpha}{mteulervm}{"60} \else \ifmst@symbolgreek \DeclareMathSymbol{\mst@alpha}{\mathord}{mtpsymbol}{"61} \DeclareMathSymbol{\mst@beta}{\mathord}{mtpsymbol}{"62} \DeclareMathSymbol{\mst@gamma}{\mathord}{mtpsymbol}{"67} \DeclareMathSymbol{\mst@delta}{\mathord}{mtpsymbol}{"64} \DeclareMathSymbol{\mst@epsilon}{\mathord}{mtpsymbol}{"65} \DeclareMathSymbol{\mst@zeta}{\mathord}{mtpsymbol}{"7A} \DeclareMathSymbol{\mst@eta}{\mathord}{mtpsymbol}{"68} \DeclareMathSymbol{\mst@theta}{\mathord}{mtpsymbol}{"71} \DeclareMathSymbol{\mst@iota}{\mathord}{mtpsymbol}{"69} \DeclareMathSymbol{\mst@kappa}{\mathord}{mtpsymbol}{"6B} \DeclareMathSymbol{\mst@lambda}{\mathord}{mtpsymbol}{"6C} \DeclareMathSymbol{\mst@mu}{\mathord}{mtpsymbol}{"6D} \DeclareMathSymbol{\mst@nu}{\mathord}{mtpsymbol}{"6E} \DeclareMathSymbol{\mst@xi}{\mathord}{mtpsymbol}{"78} \DeclareMathSymbol{\mst@omicron}{\mathord}{mtpsymbol}{"6F} \DeclareMathSymbol{\mst@pi}{\mathord}{mtpsymbol}{"70} \DeclareMathSymbol{\mst@rho}{\mathord}{mtpsymbol}{"72} \DeclareMathSymbol{\mst@sigma}{\mathord}{mtpsymbol}{"73} \DeclareMathSymbol{\mst@tau}{\mathord}{mtpsymbol}{"74} \DeclareMathSymbol{\mst@upsilon}{\mathord}{mtpsymbol}{"75} \DeclareMathSymbol{\mst@phi}{\mathord}{mtpsymbol}{"66} \DeclareMathSymbol{\mst@chi}{\mathord}{mtpsymbol}{"63} \DeclareMathSymbol{\mst@psi}{\mathord}{mtpsymbol}{"79} \DeclareMathSymbol{\mst@omega}{\mathord}{mtpsymbol}{"77} \let\mst@varepsilon=\mst@epsilon \DeclareMathSymbol{\mst@vartheta}{\mathord}{mtpsymbol}{"4A} \DeclareMathSymbol{\mst@varpi}{\mathord}{mtpsymbol}{"76} \let\mst@varrho=\mst@rho \DeclareMathSymbol{\mst@varsigma}{\mathord}{mtpsymbol}{"56} \DeclareMathSymbol{\mst@varphi}{\mathord}{mtpsymbol}{"6A} \DeclareMathSymbol{\mst@partial}{\mathord}{mtpsymbol}{"B6} \DeclareMathSymbol{\mst@wp}{\mathord}{mtpsymbol}{"C3} \fi \fi \fi \ifmst@LGRgreek \DeclareMathSymbol{\mst@Alpha}{\mathalpha}{mtlgrfontupper}{65} \DeclareMathSymbol{\mst@Beta}{\mathalpha}{mtlgrfontupper}{66} \DeclareMathSymbol{\mst@Gamma}{\mathalpha}{mtlgrfontupper}{71} \DeclareMathSymbol{\mst@Delta}{\mathalpha}{mtlgrfontupper}{68} \DeclareMathSymbol{\mst@Epsilon}{\mathalpha}{mtlgrfontupper}{69} \DeclareMathSymbol{\mst@Zeta}{\mathalpha}{mtlgrfontupper}{90} \DeclareMathSymbol{\mst@Eta}{\mathalpha}{mtlgrfontupper}{72} \DeclareMathSymbol{\mst@Theta}{\mathalpha}{mtlgrfontupper}{74} \DeclareMathSymbol{\mst@Iota}{\mathalpha}{mtlgrfontupper}{73} \DeclareMathSymbol{\mst@Kappa}{\mathalpha}{mtlgrfontupper}{75} \DeclareMathSymbol{\mst@Lambda}{\mathalpha}{mtlgrfontupper}{76} \DeclareMathSymbol{\mst@Mu}{\mathalpha}{mtlgrfontupper}{77} \DeclareMathSymbol{\mst@Nu}{\mathalpha}{mtlgrfontupper}{78} \DeclareMathSymbol{\mst@Xi}{\mathalpha}{mtlgrfontupper}{88} \DeclareMathSymbol{\mst@Omicron}{\mathalpha}{mtlgrfontupper}{79} \DeclareMathSymbol{\mst@Pi}{\mathalpha}{mtlgrfontupper}{80} \DeclareMathSymbol{\mst@Rho}{\mathalpha}{mtlgrfontupper}{82} \DeclareMathSymbol{\mst@Sigma}{\mathalpha}{mtlgrfontupper}{83} \DeclareMathSymbol{\mst@Tau}{\mathalpha}{mtlgrfontupper}{84} \DeclareMathSymbol{\mst@Upsilon}{\mathalpha}{mtlgrfontupper}{85} \DeclareMathSymbol{\mst@Phi}{\mathalpha}{mtlgrfontupper}{70} \DeclareMathSymbol{\mst@Chi}{\mathalpha}{mtlgrfontupper}{81} \DeclareMathSymbol{\mst@Psi}{\mathalpha}{mtlgrfontupper}{89} \DeclareMathSymbol{\mst@Omega}{\mathalpha}{mtlgrfontupper}{87} \DeclareMathSymbol{\mst@alpha}{\mathalpha}{mtlgrfontlower}{97} \DeclareMathSymbol{\mst@beta}{\mathalpha}{mtlgrfontlower}{98} \DeclareMathSymbol{\mst@gamma}{\mathalpha}{mtlgrfontlower}{103} \DeclareMathSymbol{\mst@delta}{\mathalpha}{mtlgrfontlower}{100} \DeclareMathSymbol{\mst@epsilon}{\mathalpha}{mtlgrfontlower}{101} \DeclareMathSymbol{\mst@zeta}{\mathalpha}{mtlgrfontlower}{122} \DeclareMathSymbol{\mst@eta}{\mathalpha}{mtlgrfontlower}{104} \DeclareMathSymbol{\mst@theta}{\mathalpha}{mtlgrfontlower}{106} \DeclareMathSymbol{\mst@iota}{\mathalpha}{mtlgrfontlower}{105} \DeclareMathSymbol{\mst@kappa}{\mathalpha}{mtlgrfontlower}{107} \DeclareMathSymbol{\mst@lambda}{\mathalpha}{mtlgrfontlower}{108} \DeclareMathSymbol{\mst@mu}{\mathalpha}{mtlgrfontlower}{109} \DeclareMathSymbol{\mst@nu}{\mathalpha}{mtlgrfontlower}{110} \DeclareMathSymbol{\mst@xi}{\mathalpha}{mtlgrfontlower}{120} \DeclareMathSymbol{\mst@omicron}{\mathalpha}{mtlgrfontlower}{111} \DeclareMathSymbol{\mst@pi}{\mathalpha}{mtlgrfontlower}{112} \DeclareMathSymbol{\mst@rho}{\mathalpha}{mtlgrfontlower}{114} \DeclareMathSymbol{\mst@varsigma}{\mathalpha}{mtlgrfontlower}{99} \DeclareMathSymbol{\mst@sigma}{\mathalpha}{mtlgrfontlower}{115} \DeclareMathSymbol{\mst@tau}{\mathalpha}{mtlgrfontlower}{116} \DeclareMathSymbol{\mst@upsilon}{\mathalpha}{mtlgrfontlower}{117} \DeclareMathSymbol{\mst@phi}{\mathalpha}{mtlgrfontlower}{102} \DeclareMathSymbol{\mst@chi}{\mathalpha}{mtlgrfontlower}{113} \DeclareMathSymbol{\mst@psi}{\mathalpha}{mtlgrfontlower}{121} \DeclareMathSymbol{\mst@omega}{\mathalpha}{mtlgrfontlower}{119} \DeclareMathSymbol{\mst@digamma}{\mathalpha}{mtlgrfontlower}{147} \DeclareMathSymbol{\mst@Digamma}{\mathalpha}{mtlgrfontlower}{195} \fi \newcommand*{\MTstandardgreek}{} \newcommand*{\MTcustomgreek}{} \newcommand*{\MTrecordstandardgreek}{} \ifmst@customgreek \renewcommand*{\MTrecordstandardgreek}{% \let\mst@origAlpha\Alpha \let\mst@origBeta\Beta \let\mst@origGamma\Gamma \let\mst@origDelta\Delta \let\mst@origEpsilon\Epsilon \let\mst@origZeta\Zeta \let\mst@origEta\Eta \let\mst@origTheta\Theta \let\mst@origIota\Iota \let\mst@origKappa\Kappa \let\mst@origLambda\Lambda \let\mst@origMu\Mu \let\mst@origNu\Nu \let\mst@origXi\Xi \let\mst@origOmicron\Omicron \let\mst@origPi\Pi \let\mst@origRho\Rho \let\mst@origSigma\Sigma \let\mst@origTau\Tau \let\mst@origUpsilon\Upsilon \let\mst@origPhi\Phi \let\mst@origChi\Chi \let\mst@origPsi\Psi \let\mst@origOmega\Omega \let\mst@origalpha\alpha \let\mst@origbeta\beta \let\mst@origgamma\gamma \let\mst@origdelta\delta \let\mst@origepsilon\epsilon \let\mst@origvarepsilon\varepsilon \let\mst@origzeta\zeta \let\mst@origeta\eta \let\mst@origtheta\theta \let\mst@origvartheta\vartheta \let\mst@origiota\iota \let\mst@origkappa\kappa \let\mst@origlambda\lambda \let\mst@origmu\mu \let\mst@orignu\nu \let\mst@origxi\xi \let\mst@origomicron\omicron \let\mst@origpi\pi \let\mst@origvarpi\varpi \let\mst@origrho\rho \let\mst@origvarrho\varrho \let\mst@origsigma\sigma \let\mst@origvarsigma\varsigma \let\mst@origtau\tau \let\mst@origupsilon\upsilon \let\mst@origphi\phi \let\mst@origvarphi\varphi \let\mst@origchi\chi \let\mst@origpsi\psi \let\mst@origomega\omega \let\mst@origDigamma\Digamma \let\mst@origdigamma\digamma \let\mst@origpartial\partial \let\mst@origwp\wp \let\mst@origell\ell } \MTrecordstandardgreek \renewcommand*{\MTstandardgreek}{% \let\Alpha\mst@origAlpha \let\Beta\mst@origBeta \let\Gamma\mst@origGamma \let\Delta\mst@origDelta \let\Epsilon\mst@origEpsilon \let\Zeta\mst@origZeta \let\Eta\mst@origEta \let\Theta\mst@origTheta \let\Iota\mst@origIota \let\Kappa\mst@origKappa \let\Lambda\mst@origLambda \let\Mu\mst@origMu \let\Nu\mst@origNu \let\Xi\mst@origXi \let\Omicron\mst@origOmicron \let\Pi\mst@origPi \let\Rho\mst@origRho \let\Sigma\mst@origSigma \let\Tau\mst@origTau \let\Upsilon\mst@origUpsilon \let\Phi\mst@origPhi \let\Chi\mst@origChi \let\Psi\mst@origPsi \let\Omega\mst@origOmega \let\alpha\mst@origalpha \let\beta\mst@origbeta \let\gamma\mst@origgamma \let\delta\mst@origdelta \let\epsilon\mst@origepsilon \let\varepsilon\mst@origvarepsilon \let\zeta\mst@origzeta \let\eta\mst@origeta \let\theta\mst@origtheta \let\vartheta\mst@origvartheta \let\iota\mst@origiota \let\kappa\mst@origkappa \let\lambda\mst@origlambda \let\mu\mst@origmu \let\nu\mst@orignu \let\xi\mst@origxi \let\omicron\mst@origomicron \let\pi\mst@origpi \let\varpi\mst@origvarpi \let\rho\mst@origrho \let\varrho\mst@origvarrho \let\sigma\mst@origsigma \let\varsigma\mst@origvarsigma \let\tau\mst@origtau \let\upsilon\mst@origupsilon \let\phi\mst@origphi \let\varphi\mst@origvarphi \let\chi\mst@origchi \let\psi\mst@origpsi \let\omega\mst@origomega \let\Digamma\mst@origDigamma \let\digamma\mst@origdigamma \let\partial\mst@origpartial \let\wp\mst@origwp \let\ell\mst@origell } \renewcommand*{\MTcustomgreek}{% \let\Alpha\mst@Alpha \let\Beta\mst@Beta \let\Gamma\mst@Gamma \let\Delta\mst@Delta \let\Epsilon\mst@Epsilon \let\Zeta\mst@Zeta \let\Eta\mst@Eta \let\Theta\mst@Theta \let\Iota\mst@Iota \let\Kappa\mst@Kappa \let\Lambda\mst@Lambda \let\Mu\mst@Mu \let\Nu\mst@Nu \let\Xi\mst@Xi \let\Omicron\mst@Omicron \let\Pi\mst@Pi \let\Rho\mst@Rho \let\Sigma\mst@Sigma \let\Tau\mst@Tau \let\Upsilon\mst@Upsilon \let\Phi\mst@Phi \let\Chi\mst@Chi \let\Psi\mst@Psi \let\Omega\mst@Omega \let\alpha\mst@alpha \let\beta\mst@beta \let\gamma\mst@gamma \let\delta\mst@delta \let\epsilon\mst@epsilon \let\varepsilon\mst@varepsilon \let\zeta\mst@zeta \let\eta\mst@eta \let\theta\mst@theta \let\vartheta\mst@vartheta \let\iota\mst@iota \let\kappa\mst@kappa \let\lambda\mst@lambda \let\mu\mst@mu \let\nu\mst@nu \let\xi\mst@xi \let\omicron\mst@omicron \let\pi\mst@pi \let\varpi\mst@varpi \let\rho\mst@rho \let\varrho\mst@varrho \let\sigma\mst@sigma \let\varsigma\mst@varsigma \let\tau\mst@tau \let\upsilon\mst@upsilon \let\phi\mst@phi \let\varphi\mst@varphi \let\chi\mst@chi \let\psi\mst@psi \let\omega\mst@omega \let\Digamma\mst@Digamma \let\digamma\mst@digamma \let\partial\mst@partial \let\wp\mst@wp \let\ell\mst@ell } \fi \let\Mathastextstandardgreek\MTstandardgreek \let\Mathastextcustomgreek\MTcustomgreek \ifmst@subdued\else\MTcustomgreek\fi \edef\mst@tmp@enc{\encodingdefault} \mst@goaheadtrue \ifx\mst@tmp@enc\mst@eui % xetex and unicode font \XeTeXmathchardef\inodot="7 \symmtletterfont "0131 \relax \XeTeXmathchardef\jnodot="7 \symmtletterfont "0237 \relax \else \ifx\mst@tmp@enc\mst@euii % luatex and unicode font \luatexUmathchardef\inodot="7 \symmtletterfont "0131 \relax \luatexUmathchardef\jnodot="7 \symmtletterfont "0237 \relax \else \ifx\mst@tmp@enc\mst@ti % T1 \DeclareMathSymbol{\inodot}{\mathalpha}{mtletterfont}{25} \DeclareMathSymbol{\jnodot}{\mathalpha}{mtletterfont}{26} \else \ifx\mst@tmp@enc\mst@oti % OT1 \DeclareMathSymbol{\inodot}{\mathalpha}{mtletterfont}{16} \DeclareMathSymbol{\jnodot}{\mathalpha}{mtletterfont}{17} \else \ifx\mst@tmp@enc\mst@lyi % LY1 \DeclareMathSymbol{\inodot}{\mathalpha}{mtletterfont}{16} \DeclareMathSymbol{\jnodot}{\mathalpha}{mtletterfont}{17} \else \ifmst@XeTeX\mst@goaheadfalse\else\ifmst@LuaTeX\mst@goaheadfalse\else \DeclareMathSymbol{\inodot}{\mathalpha}{mtletterfont} {\expandafter\the\expandafter\csname\mst@tmp@enc\string\i\endcsname} \DeclareMathSymbol{\jnodot}{\mathalpha}{mtletterfont} {\expandafter\the\expandafter\csname\mst@tmp@enc\string\j\endcsname} \fi\fi \fi\fi\fi\fi\fi \ifmst@defaultimath\else\typeout{** \string\i\space and \string\j\space} \ifmst@goahead \renewcommand*{\imath}{\inodot} \renewcommand*{\jmath}{\jnodot} \let\mst@oldi\i \let\mst@oldj\j \DeclareRobustCommand*{\i}{\ifmmode\inodot\else\mst@oldi\fi} \DeclareRobustCommand*{\j}{\ifmmode\jnodot\else\mst@oldj\fi} \fi \fi \edef\mst@tmp@enc{\encodingdefault} %% rather one too many than sorry \ifmst@mathaccents\typeout{** math accents} \ifx\mst@ti\mst@tmp@enc \DeclareMathAccent{\acute}{\mathalpha}{mtoperatorfont}{1} \DeclareMathAccent{\grave}{\mathalpha}{mtoperatorfont}{0} \DeclareMathAccent{\ddot}{\mathalpha}{mtoperatorfont}{4} \DeclareMathAccent{\tilde}{\mathalpha}{mtoperatorfont}{3} \DeclareMathAccent{\bar}{\mathalpha}{mtoperatorfont}{9} \DeclareMathAccent{\breve}{\mathalpha}{mtoperatorfont}{8} \DeclareMathAccent{\check}{\mathalpha}{mtoperatorfont}{7} \DeclareMathAccent{\hat}{\mathalpha}{mtoperatorfont}{2} \DeclareMathAccent{\dot}{\mathalpha}{mtoperatorfont}{10} \DeclareMathAccent{\mathring}{\mathalpha}{mtoperatorfont}{6} \else \DeclareMathAccent{\acute}{\mathalpha}{mtoperatorfont}{19} \DeclareMathAccent{\grave}{\mathalpha}{mtoperatorfont}{18} \DeclareMathAccent{\ddot}{\mathalpha}{mtoperatorfont}{127} \DeclareMathAccent{\tilde}{\mathalpha}{mtoperatorfont}{126} \DeclareMathAccent{\bar}{\mathalpha}{mtoperatorfont}{22} \DeclareMathAccent{\breve}{\mathalpha}{mtoperatorfont}{21} \DeclareMathAccent{\check}{\mathalpha}{mtoperatorfont}{20} \DeclareMathAccent{\hat}{\mathalpha}{mtoperatorfont}{94} \DeclareMathAccent{\dot}{\mathalpha}{mtoperatorfont}{95} \DeclareMathAccent{\mathring}{\mathalpha}{mtoperatorfont}{23} \ifx\mst@lyi\mst@tmp@enc % LY1 encoding \DeclareMathAccent{\dot}{\mathalpha}{mtoperatorfont}{5} \else \ifx\mst@oti\mst@tmp@enc\else \typeout{** mathastext: math accents have been assumed to be^^J% ** as in OT1 encoding.} \fi \fi \fi\fi \ifmst@defaultsizes\else \providecommand\@xxxpt{29.86} \providecommand\@xxxvipt{35.83} \ifmst@twelve \def\Huge{\@setfontsize\Huge\@xxxpt{36}} \def\HUGE{\@setfontsize\HUGE\@xxxvipt{43}} \typeout{** \protect\Huge\space and \protect\HUGE\space have been (re)-defined.} \else \def\HUGE{\@setfontsize\HUGE\@xxxpt{36}} \typeout{** \protect\HUGE\space has been (re)-defined.} \fi \def\defaultscriptratio{.8333} \def\defaultscriptscriptratio{.7} \DeclareMathSizes{9}{9}{7}{5} \DeclareMathSizes{\@xpt}{\@xpt}{8}{6} \DeclareMathSizes{\@xipt}{\@xipt}{9}{7} \DeclareMathSizes{\@xiipt}{\@xiipt}{10}{8} \DeclareMathSizes{\@xivpt}{\@xivpt}{\@xiipt}{10} \DeclareMathSizes{\@xviipt}{\@xviipt}{\@xivpt}{\@xiipt} \DeclareMathSizes{\@xxpt}{\@xxpt}{\@xviipt}{\@xivpt} \DeclareMathSizes{\@xxvpt}{\@xxvpt}{\@xxpt}{\@xviipt} \DeclareMathSizes{\@xxxpt}{\@xxxpt}{\@xxvpt}{\@xxpt} \DeclareMathSizes{\@xxxvipt}{\@xxxvipt}{\@xxxpt}{\@xxvpt} \typeout{** mathastext has declared larger sizes for subscripts.^^J% ** To keep LaTeX defaults, use option `defaultmathsizes\string'.} \fi \endinput %% %% End of file `mathastext.sty'.