summaryrefslogtreecommitdiff
path: root/Master/texmf-dist
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2011-03-12 23:55:50 +0000
committerKarl Berry <karl@freefriends.org>2011-03-12 23:55:50 +0000
commitaca3c88c6c3ea09b39b5ecaea2d97e4c5b3cfc77 (patch)
treeb3ac124c6e73789511061db220394f50f21bf910 /Master/texmf-dist
parent7b0a4c0345bd3b1608762f4eb480ef33e7d640a9 (diff)
mathastext (12mar11)
git-svn-id: svn://tug.org/texlive/trunk@21699 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist')
-rw-r--r--Master/texmf-dist/doc/latex/mathastext/README144
-rw-r--r--Master/texmf-dist/doc/latex/mathastext/mathastext.pdfbin119105 -> 135526 bytes
-rw-r--r--Master/texmf-dist/source/latex/mathastext/mathastext.dtx1240
-rw-r--r--Master/texmf-dist/source/latex/mathastext/mathastext.ins10
-rw-r--r--Master/texmf-dist/tex/latex/mathastext/mathastext.sty507
5 files changed, 1237 insertions, 664 deletions
diff --git a/Master/texmf-dist/doc/latex/mathastext/README b/Master/texmf-dist/doc/latex/mathastext/README
index cb7fe89b3ec..79cf53e3246 100644
--- a/Master/texmf-dist/doc/latex/mathastext/README
+++ b/Master/texmf-dist/doc/latex/mathastext/README
@@ -1,87 +1,87 @@
-This README file is for version 1.12b, 2011/02/09
-of the package `mathastext' for LaTeX2e
+ +-------------------------------------------+
+ + mathastext 1.13 +
+ + `Use the text font in simple mathematics' +
+ + +
+ + jfbu (at) free.fr +
+ +-------------------------------------------+
+
+This is the README file for the LaTeX2e package `mathastext',
+version 1.13, 2011/03/11
Copyright (C) 2011 by Jean-Francois Burnol.
-Please report errors to jfbu at free dot fr
-
-Files `mathastext.dtx' and this README may be distributed
-and/or modified under the conditions of the LaTeX Project
-Public License, either version 1.3 of this license or (at
-your option) any later version.
-
-The latest version of this license is in
- http://www.latex-project.org/lppl.txt
-and version 1.3 or later is part of all distributions of
-LaTeX version 2003/12/01 or later.
-
- THIS IS VERSION 1.12b (2011/02/09)
-
-USAGE
-
-Include in the preamble
-
- \usepackage{mathastext}
-main options: italic, eulergreek, symbolgreek, defaultmathsizes
-
-after other font related packages. This will make your
-document use the main text font also in mathematics
-mode. The default is that the letters in text and math mode
-have the same shape but option `italic' will make the
-letters use the italic shape in math mode. Digits and
-log-like operator names will be upright (if the text font is
-upright). So one can now typeset documents (containing
-simple mathematics formulas) with a quite arbitrary TeX text
-font, without worrying too much that nobody ever designed
-accompanying math fonts.
-
-Options are provided to pick up the Greek letters from
-either the Euler or the Symbol font, and they can be scaled
-by an arbitrary factor to let them fit with the document
-text font. It is also possible to have other packages set up
-the fonts for Greek letters, as mathastext by default only
-modifies the font for Latin letters and typographical
-characters.
-
-The goal (somewhat altered by the `italic' option) was to
-make documents with the difference between math and text
-blurred out, so that the reader would be forced to
-concentrate more on the contents: text AND math. There is no
-reason to use another font for math: as the text is also an
-equation in its own way, everything should be given equal
-weight. For example, the package gives results corresponding
-to that goal when used with typewriter fonts (possibly of
-variable width like Latin Modern Typewriter Proportional).
-It also gives interesting results for calligraphical fonts.
-
-Another feature is that mathastext provides a simple
-interface to use many different fonts in the same document,
-be it for math or text (not that we recommend abusing it!).
-
-Using mathastext without the `italic' option usually reduces
-the size of the final PDF file. The option `symbolmax' will
-get quite a few mathematicals glyph from the postscript
-Symbol font included in all LaTeX distributions, so that for
-documents with simple mathematics, the default math fonts
-might be completely avoided. This sometimes leads to smaller
-PDF files.
-
-INSTALLATION
+ The files of this package may be distributed and/or modified
+ under the conditions of the LaTeX Project Public License,
+ either version 1.3 of this license or (at your option) any
+ later version.
+
+ The latest version of this license is in
+ http://www.latex-project.org/lppl.txt
+ and version 1.3 or later is part of all distributions of
+ LaTeX version 2003/12/01 or later.
+
+
+ INSTALLATION
Run latex on mathastext.ins to create mathastext.sty from
mathastext.dtx and put it where LaTeX can find it.
-To generate documentation, including the commented source
-code, run latex on mathastext.dtx
+To generate documentation, including the commented source code, run
+latex on mathastext.dtx
+
+Numerous examples of use are available at
+
+ http://jf.burnol.free.fr/mathsastext.html
+
+
+ USAGE
-Illustrative examples are available at
-http://jf.burnol.free.fr/mathsastext.html
+ \usepackage[options]{mathastext}
+ after other font related packages
+
+main options:
+ italic, LGRgreek, eulergreek, symbolgreek, defaultmathsizes
+
+This will make the document use the main text font also in
+mathematics mode. With the `italic' option, the Latin letters use
+the italic shape in math mode. Digits and log-like operator names
+will be upright (if the text font is upright). So one can now
+typeset documents (containing simple mathematics formulas) with a
+quite arbitrary TeX text font, without worrying too much that nobody
+ever designed accompanying math fonts.
+
+If the text font is also available in LGR encoding, then the option
+LGRgreek will pick up the Greek letters from the text font in that
+encoding. It is also possible to use either the Euler of the
+Postscript Symbol font for Greek letters, and they can be scaled by
+an arbitrary factor to let them fit better with the document text
+font.
+
+As mathastext by default only modifies the font for Latin letters
+and typographical characters, almost all in the 32-127 ascii range,
+it is possible to let other packages take care of setting up the
+math fonts, in particular for the Greek letters (but they should be
+loaded before mathastext).
+
+Additionally mathastext provides a simple interface to use different
+fonts in the same document, be it for math or text (not that we
+recommend abusing it!).
+
+Using mathastext without the `italic' option usually reduces the
+size of the final PDF file. The option `symbolmax' will get quite a
+few mathematicals glyph from the postscript Symbol font included in
+all LaTeX distributions, so that for documents with simple
+mathematics, the default math fonts might be completely
+avoided. This sometimes leads to smaller PDF files.
CHANGE LOG
-1.12b
+1.13
+
+ * the LGRgreek option is added.
+
+ * internal changes for better readability of the code.
- * fixes a bug from 1.12
1.12
diff --git a/Master/texmf-dist/doc/latex/mathastext/mathastext.pdf b/Master/texmf-dist/doc/latex/mathastext/mathastext.pdf
index 837530818d9..4108a526967 100644
--- a/Master/texmf-dist/doc/latex/mathastext/mathastext.pdf
+++ b/Master/texmf-dist/doc/latex/mathastext/mathastext.pdf
Binary files differ
diff --git a/Master/texmf-dist/source/latex/mathastext/mathastext.dtx b/Master/texmf-dist/source/latex/mathastext/mathastext.dtx
index ce5e9f43cb9..c3070bbba7c 100644
--- a/Master/texmf-dist/source/latex/mathastext/mathastext.dtx
+++ b/Master/texmf-dist/source/latex/mathastext/mathastext.dtx
@@ -1,14 +1,10 @@
% \iffalse meta-comment
-% Time-stamp: <09-02-2011 23:34:54 CET JF>
+% Time-stamp: <12-03-2011 10:58:48 CET JF>
% File `mathastext.dtx'
%
% Copyright (C) 2011 by Jean-Francois Burnol
%
-% Please report errors to jfbu at free . fr
-% Illustrative examples available at
-% http://jf.burnol.free.fr/mathastext.html
-%
-% This file be distributed and/or modified under the
+% This file may be distributed and/or modified under the
% conditions of the LaTeX Project Public License,
% either version 1.3 of this license or (at your
% option) any later version. The latest version of
@@ -16,11 +12,16 @@
% http://www.latex-project.org/lppl.txt
% and version 1.3 or later is part of all distributions of
% LaTeX version 2003/12/01 or later.
+%
+% Please report errors to jfbu (at) free.fr
+% Numerous examples are available at
+% http://jf.burnol.free.fr/mathastext.html
+%
% \fi
% \iffalse
%<*dtx>
\ProvidesFile{mathastext.dtx}
- [2011/02/09 1.12b Use the text font in simple mathematics]
+ [2011/03/11 1.13 Use the text font in simple mathematics]
%</dtx>
%
%<*driver>
@@ -33,11 +34,12 @@
\setlength{\textwidth}{360pt}
\setlength{\oddsidemargin}{46pt}
\setlength{\marginparwidth}{100pt}
-%% glyphs from the Symbol font
+%% The Symbol font will be used in the text
\DeclareSymbolFont{mtpsymbol}{U}{psy}{m}{n}
\makeatletter
\DeclareFontFamily{U}{psy}{}
\DeclareFontShape{U}{psy}{m}{n}{<-> psyr}{}
+%% the following is taken from the package itself
\let\prod\undefined
\DeclareMathSymbol{\prod}{\mathop}{mtpsymbol}{213}
\let\sum\undefined
@@ -110,20 +112,25 @@
\DeclareMathSymbol{\Im}{\mathord}{mtpsymbol}{"C1}
\DeclareMathSymbol{\DotTriangle}{\mathord}{mtpsymbol}{92}
%\RecordChanges
-\OnlyDescription
+%\OnlyDescription
\begin{document}
\DocInput{mathastext.dtx}
\end{document}
%</driver>
% \fi
-%
+% \changes{1.13}{2011/03/11}{
+% * option LGRgreek: for fonts also available in LGR-encoding
+% * internal changes: systematic use of `if' conditionals
+% for better readability of the code and easier error-checking
+% (done a bit late for that aspect, though... )
+% }
+%
% \changes{1.12b}{2011/02/09}{
% * a completely stupid bug regarding uppercase Greek is
% corrected
-% * I take this opportunity to add LY1 as supported
+% * I take this opportunity to add LY1 as one of the supported
% encoding for math accents
-% * and I correct an orthographical mistake in the
-% README
+% * and I correct an orthographical mistake in the README
% }
%
% \changes{1.12}{2011/02/07}{
@@ -219,22 +226,30 @@
% \end{center}
%
% \begin{abstract}
-% The |mathastext| package\footnote{This document describes |mathastext|
-% version \fileversion\ (\filedate).} propagates the document {\em text}
-% font to {\em mathematical} mode, for the letters and digits of the Latin
-% alphabet and, optionally, some further characters. The idea is to produce
-% handouts or research papers with a less book-like typography than what is
-% typical of standard \TeX\ with the Computer Modern fonts. Hopefully, this
-% will force the reader to concentrate more on the contents ;-). It also
-% makes it possible (for a document with simple mathematics) to use a quite
-% arbitrary font without worrying too much that it does not have specially
-% designed accompanying math fonts. Also, |mathastext| provides a simple
-% mechanism in order to use many different choices of (text hence, now,
-% math) fonts in the same document (not that we recommend it!). A final
-% aspect is that |mathastext| helps sometimes produce smaller PDF files.
+% The |mathastext| package\footnote{This document
+% describes |mathastext| version \fileversion\
+% (\filedate).} propagates the document {\em text} font
+% to {\em mathematical} mode, for the letters and digits
+% of the Latin alphabet and a few further
+% characters. Various possibilities are provided for
+% Greek letters, including picking them up in the font
+% itself, if the font is available in LGR-encoding. The
+% initial idea was to produce handouts or research papers
+% with a less book-like typography than what is typical
+% of standard \TeX-\LaTeX{} with the Computer Modern
+% fonts, but equipped with a very uniform look (with the
+% hope to coerce the reader into concentrating more onto
+% the contents ;-).) A side-effect is that the package
+% makes it possible to use a quite arbitrary font without
+% worrying too much that it does not have specially
+% designed accompanying math fonts. Also, |mathastext|
+% provides a simple mechanism in order to use more than
+% one math-as-text font in the same document (not that we
+% recommend it!). A final aspect is that |mathastext|
+% helps sometimes produce smaller PDF files.
%
% \begin{center}
-% Further documentation, and examples, are available here:\\
+% Numerous examples are available here:\\
% |http://jf.burnol.free.fr/mathastext.html|
% \end{center}
% \end{abstract}
@@ -263,160 +278,265 @@
% \DeleteShortVerb{\|}
% \centerline{!\,?\,*\,,\,.\,:\,;\,+\,\textendash\,=\,(\,)\,[\,]\,/\,\#\,%
% \$\,\%\,\&\,$\mathord{<}\,\mathord{>}\,\mathord{|}$\,\{\,\}
-% and $\backslash$} If the package detects at the time of
-% being loaded that the default encoding is OT1, it takes
-% out from the list
+% and $\backslash$}
+%
+% Note: if the package detects OT1 as default encoding it
+% will take out from the list
% $\mathord{<}\,\mathord{>}\,\mathord{|}$\,\{\,\} and
-% $\backslash$. \MakeShortVerb{\|} The option
-% |alldelims| will force re-integration in case one wants
-% to use a fixed-width OT1 font.
+% $\backslash$\MakeShortVerb{\|} as they are not available
+% in OT1, except for the typewriter fonts; the option
+% |alldelims| forces re-integration in this case.
%
% The commands \cs{mathnormal}, \cs{mathrm} and
-% \cs{mathbf} are modified but nothing is changed to
-% \cs{mathit} and to the other math alphabet commands which
-% will use the default math fonts, not the text font.
-%
-% A very short list of further glyphs will be also picked
-% up in or constructed from the text font: the dotless i
-% and j, the hbar and the math accents. By default the
-% en-dash \textendash{} is used for the minus sign and
-% not the hyphen character -. Version |1.12| brings a
-% better compatibility with a Unicode setting (assuming
-% that |fontspec| is made use of), but the scope of
-% |mathastext| does not include letters with diacritics
-% such as \'e, \`a, \"o in math mode. Users of Xe\TeX{}
-% are advised to look at the |mathspec| package which has
-% a much wider scope than |mathastext|.
+% \cs{mathbf} are modified to now make use of the text
+% font; but nothing is changed to \cs{mathit} and the
+% other math alphabet commands which will use the default
+% math fonts, not the text font.
+%
+% The en-dash (\textendash{}) is used for the minus sign,
+% rather than the hyphen (-) character. Additionally,
+% some further glyphs will also be picked up in the text
+% font: the dotless i and j, the hbar and the math
+% accents. Version |1.12| brought a better compatibility
+% with a Unicode setting (assuming that |fontspec| is
+% made use of), but the scope of |mathastext| does not
+% include letters with diacritics such as \'e, \`a, \"o
+% in math mode. Users of Unicode engines and fonts are
+% advised to look at the |mathspec| and |unicode-math|
+% packages which have a much wider scope than
+% |mathastext|.
%
% Even when typesetting simple mathematics, some glyphs
-% may have to be taken from the default math fonts, for
-% example the prime ${}'$.
+% (almost) must be taken from the default math fonts: in
+% particular the prime ${}'$ for derivatives, as the text
+% font {}'{} is not, as a rule, a satisfying
+% alternative. Also, the package does nothing special
+% regarding the large math symbols (except for $\prod$
+% and $\sum$ whose ``non-large'' versions may be taken
+% from the Symbol Font).
%
% \subsection{The italic option}
%
-% In the initial version |1.0|, the package gave the same
-% shape to both letters and digits, either the one given
-% by \cs{shapedefault} at the time of loading the
-% package, or another one specified by the user, and this
-% was deliberate. This gives a very uniform look to the
-% document, so that one has to make an effort and read it
-% with attention, I explained above why I did this on
-% purpose.
-%
-% Nevertheless, soon after I posted the package to CTAN, I was overwhelmed
-% by numerous\footnote{this means ``more then one.''} questions\footnote{I
-% thank in particular Tariq~\textsc{Perwez} and Kevin~\textsc{Klement} for
-% their kind remarks (chronological order).} on how to have
-% the letters be in italic shape.
-%
-% The version |1.1| provided precisely this feature. The
-% default is still, as in version |1.0|, for everything to be
-% in upright shape, but it suffices to pass to the package the
-% option |italic|. There is now also an option |frenchmath| to
-% make the uppercase letters nevertheless upright, because this
-% is the way of traditional French mathematical typography.
+% In the initial version |1.0|, the Latin letters in
+% mathematical mode assumed the exact same shape as in
+% text mode, and this meant, generally speaking, that
+% they would turn up upright. Doing this gives a very
+% uniform look to the document, so that one has to make
+% an effort and read it with attention, I explained above
+% why I did this on purpose.
+%
+% Nevertheless, soon after I posted the initial version
+% of the package to CTAN, I was overwhelmed by
+% numerous\footnote{this means ``more then one.''}
+% questions\footnote{I thank in particular
+% Tariq~\textsc{Perwez} and Kevin~\textsc{Klement} for
+% their kind remarks (chronological order).} on how to
+% have the letters be in italic shape.
+%
+% Starting with version |1.1| the default is still, as in
+% version |1.0|, for everything to be in upright shape,
+% but it suffices to pass to the package the option
+% |italic| to have italic Latin letters in math
+% mode. There is also an option |frenchmath|\footnote{in
+% versions of the package prior to |1.13|, it was
+% necessary to also pass the option |italic| to enable
+% |frenchmath|. This is now superfluous.} to make the uppercase letters
+% nevertheless upright, because this is the way of
+% traditional French mathematical typography.
%
% \subsection{Greek letters}
%
-% Regarding the Greek letters: the default (lowercase)
-% ones from Computer Modern are slanted, hence, if the
-% |italic| option just mentioned is not made use of, they
-% will not mix well with upright letters (besides, the
-% Computer Modern typefaces are very light in comparison
-% to many text fonts). So there are options to take these
-% glyphs either from the Euler font or from the
-% Postscript Symbol font. Both are included in all
-% \LaTeX{} distributions. Although no package loading is
-% necessary for the user, nor done internally by
-% |mathastext|, the file |uzeur.fd| from the |eulervm|
-% package must be accessible to \LaTeX{} as it provides a
-% mechanism to scale by an arbitrary factor the Euler
-% font. For the Postscript Symbol font (which is included
-% in the basic \LaTeX{} distribution), |mathastext| does
-% internally what is necessary, so that in both cases
-% commands are provided so that the user can scale the
-% font with respect to nominal size.
-%
-% Of course, it is also possible to access upright Greek
-% letters via loading first specific packages providing math
-% fonts, for example the |fourier| package (with option
-% `upright'). One just has to make sure to load |mathastext| as
-% the last one of the font-related packages.
-%
-% \subsection{Math versions}
-%
-% \LaTeX{} has two math versions (|normal| and |bold|):
-% |mathastext| provides a straightforward mechanism to define
-% many more. The encodings of the various |mathastext|-defined versions
-% can be arbitrary; but as |mathastext| decides at the time
-% when it is loaded where to look for things like the en-dash,
-% or the dotless i and j, or the math accents, which are
-% encoding-dependent, there are obviously some limitations to
-% the use of these things in more than one math
-% version. Here is an example of how this goes:
+% The Computer Modern fonts are very light in comparison
+% to many text fonts, and as a result rarely mix
+% well with them (particularly if the Latin letters in
+% math mode are upright). The following options are
+% provided by |mathastext|:
+% \begin{description}
+% \item[$<$\textemdash$>$:] nothing is done by the
+% package, Greek letters are the default Computer
+% Modern ones or have been set-up by other packages;
+% for example by the |fourier| package with option
+% `upright', which gives upright Greek letters.
+% \item[LGRgreek:] this is for fonts which additionally
+% to Latin letters also provide Greek letters in LGR
+% encoding.\footnote{among examples known to the author are
+% the Comfortaa and the Droid (serif and sans) fonts,
+% and of course the Greek Font Society fonts such as
+% GFS Didot.} The letters (but see below) will be in
+% the same shape as the Latin letters, or upright in
+% case of the option |frenchmath|.
+% \item[eulergreek:] the Greek letters will be taken from
+% the Euler font which is included in all \LaTeX{}
+% distributions (although no package loading is
+% necessary for the user, nor done by |mathastext|, the
+% file |uzeur.fd| from the |eulervm| package must be
+% accessible to \LaTeX{} as it provides a mechanism to
+% scale by an arbitrary factor the Euler font.) The
+% letters are upright.
+% \item[symbolgreek:] the Greek letters will be taken
+% from the (Adobe) Symbol font. A command is provided
+% so that the user can scale the Symbol font to let it
+% better mix with the text font. The letters are upright.
+% \item[selfGreek:] this option has limited use; it is
+% for OT1-encoded text fonts which do provide the
+% glyphs for the capital Greek letters. It does nothing
+% for the lowercase Greek letters.
+% \end{description}
+%
+% \subsubsection{Shape of Greek letters}
+%
+% Classic \TeX{} uses in math mode italic lowercase and
+% upright uppercase Greek letters. French typography uses
+% upright shape for both lowercase and uppercase. And the
+% ISO standard is to use italic shape for both lowercase
+% and uppercase.
+%
+% The Euler and Symbol font are not available in italic
+% shape, so this raises issues only in the case of the
+% options |LGRgreek| and |selfGreek|. The |mathastext|
+% default is to let the Greek letters have the same shape
+% as the Latin letters (and be upright in the case of
+% option |frenchmath|.)
+%
+% A finer control is provided by options |upgreek|,
+% |itgreek|, |upGreek|, |itGreek|: the former first two
+% control both lower- and uppercase, the latter control
+% only the uppercase shape. So classic \TeX{} is
+% |itgreek|+|upGreek|, ISO is |itgreek|, and French is
+% |upgreek|.
+%
+% Note that, as mentioned before, the options |italic|
+% and |frenchmath| act on both Latin and Greek letters,
+% so |italic| gives ISO behavior, and |frenchmath| gives
+% French behavior,\footnote{In fact, |frenchmath| confers
+% to the Greek letters and uppercase Latin letters the
+% same shape as to the operator-names and digits, so
+% generally speaking this will be the \cs{shapedefault}
+% at the time of loading the package. If this shape is
+% not the upright one and one still wants upright Greek,
+% then it is thus necessary to use |upgreek|.} without
+% need to use the \DeleteShortVerb{|}\MakeShortVerb{*}
+% *[up|it][g|G]reek*\DeleteShortVerb{*}\MakeShortVerb{|}
+% options.
+%
+% Again, all of this applies only in case of option
+% |LGRgreek| and to a lesser extent, |selfGreek|. And to
+% recapitulate, people wanting the classic \TeX{}
+% behavior will use |italic|+|upGreek|, or
+% |itgreek|+|upGreek| in the absence of |italic|.
+%
+%
+%
+% \subsection{Advanced use: math versions}
+%
+%
+% It is not infrequent to use two different text fonts in
+% the same document. In the context of the |mathastext|
+% design goals it was thus necessary to find a way to let
+% changes of the text font also propagate to math
+% mode. For this the package extends the \LaTeX{}
+% mechanism of math versions. However this is only for
+% Latin letters, digits, and the other characters
+% mentioned above, but not for Greek letters: the choice
+% of a Greek-related option (or none) at the time of
+% loading the package will affect all math versions. This
+% does mean though that in the case of the |LGRgreek|
+% option changing the text font will also change the font
+% for the Greek letters. But it is not possible (in the
+% current version of the package) to have one part of the
+% document use the Euler font for Greek letters and
+% another part use the Symbol font (it is possible to
+% use both fonts simultaneously but Symbol will then be
+% employed for various mathematical symbols, not for
+% Greek, see option |symbolmax|).
+%
+% Let us now see a small document using four math versions:
% \begin{verbatim}
+% \documentclass{minimal}
% \usepackage[T1]{fontenc}
% \usepackage{mathastext}
-% % Latin Modern Typewriter Proportional
+% % declares Latin Modern Typewriter Proportional:
% \MTDeclareVersion{lmvtt}{T1}{lmvtt}{m}{n}
-% % Baskervald, letters in italics
+% % declares Baskervald, italic letters in math:
% \MTDeclareVersion[it]{baskervald}{T1}{ybv}{m}{n}
-% % Bold Helvetica, digits and operator names slanted
-% % and letters (in math mode only) upright
+% % declares Helvetica-Bold-Slanted, but upright
+% % letters in math mode:
% \MTDeclareVersion[n]{helvetica}{T1}{phv}{b}{sl}
% \begin{document}
% \MTVersion{helvetica}
-% Hello $world!$.
+% Bold-slanted Helvetica in text,
+% $bold\ upright\ Helvetica\ in\ math$.\\
% \MTVersion[lmvtt]{baskervald}
-% Here lmvtt but $here\ baskervald$.
+% Text in lmvtt but $math\ in\ Baskervald-Italic$.\\
% \MTVersion{normal}
-% Default font when loading mathastext, $in\ math\ also$.
+% The normal version uses the default text font at
+% the time of loading mathastext, $in\ math\ also\ of\ course$.
% \end{document}
% \end{verbatim}
-% Other ways to achieve the same result:
+% The encodings of the various |mathastext|-defined versions
+% can be arbitrary; but as |mathastext| decides at the time
+% when it is loaded where to look for things like the en-dash,
+% or the dotless i and j, or the math accents, which are
+% encoding-dependent, there are obviously some limitations to
+% the use of these things in more than one math
+% version.
+%
+%
+% The package provides various macros to interface with
+% its `math versions' functionalities. These commands are
+% detailed in a later section. As an example, here is an
+% equivalent manner to set up our small document:
% \begin{verbatim}
+% \documentclass{minimal}
% \usepackage[T1]{fontenc}
% \usepackage{mathastext}
% \renewcommand{\rmdefault}{lmvtt}
-% \Mathastext[lmvtt]
+% \Mathastext[lmvtt] % Declares the `lmvtt' version
% \renewcommand{\rmdefault}{ybv}
% \MTlettershape{it}
-% \Mathastext[baskervald]
+% \Mathastext[baskervald] % Declares the `baskervald' version
% \renewcommand{\shapedefault}{sl}
% \renewcommand{\rmdefault}{phv}
% \renewcommand{\mddefault}{b}
% \MTlettershape{n}
-% \Mathastext[helvetica]
+% \Mathastext[helvetica] % Declares the `helvetica' version
% \begin{document}
-% \MTVersion{helvetica}
-% Hello $world!$.
+% \MTVersion{helvetica} % use `helvetica' both in text and math
+% Bold-slanted Helvetica in text, $bold\ upright\ Helvetica\ in\ math$.\\
% \MTVersion[lmvtt]{baskervald}
-% Here lmvtt but $here\ baskervald$.
+% Text in lmvtt but $math\ in\ Baskervald-Italic$.\\
% \MTVersion{normal}
-% Default font when loading mathastext, $in\ math\ also$.
+% The normal version uses the default text font at
+% the time of loading mathastext, $in\ math\ also\ of\ course$.
% \end{document}
% \end{verbatim}
% Unicode \TeX{} engines and fonts can also be
% accomodated. It is recommended to load the package
-% |fontspec|. Here is an example (a bit schizophrenic)
-% for a Xe\TeX{} or Lua\LaTeX{} user. Of course
-% |mathastext| does not really define a math font, as it
-% applies basically only to a subset of the 32-127 ascii
-% range: the package |mathspec| has a far wider scope and
-% is recommended to Xe\TeX{} users.
+% |fontspec|. Of course |mathastext| is extremely far
+% from really defining a math font, as it applies
+% basically only to a subset of the 32-127 ascii
+% range. And it does not know how to use a given Unicode font
+% simultaneously for Latin and Greek letters: interested people are
+% advised to look at packages |mathspec| and
+% |unicode-math|. Here is an example (a bit
+% schizophrenic) of a document with mathastext-versions
+% for a Xe\TeX{} or Lua\LaTeX{} user:
% \begin{verbatim}
+% \documentclass{minimal}
% \usepackage[no-math]{fontspec}
% \setmainfont{comfortaa}
% \usepackage{mathastext} % the normal version uses Comfortaa
% \setmainfont{TeX Gyre Pagella}
-% \Mathastext[pagella] % the pagella version uses Pagella
+% \Mathastext[pagella] % the pagella version uses
+% % TeX Gyre Pagella
% \MTDeclareVersion{times}{T1}{ptm}{m}{n}
-% % this is a T1-times. Do not try to use this
-% % command for a Unicode font, use rather the
-% % \setmainfont command of |fontspec|,
-% % followed by \Mathastext
+% % this is a T1-encoded URW Times.
+% % Do not use this interface for a Unicode font,
+% % use rather as above the \setmainfont
+% % command of |fontspec|, followed by \Mathastext
% \setmainfont{TeX Gyre Schola}
-% \Mathastext[schola] % and unicode TeX Gyre Schola
+% \Mathastext[schola] % and the schola version uses
+% % unicode TeX Gyre Schola
% \begin{document}
% \MTVersion{pagella}
% This is in TeX Gyre Pagella $and\ this\ also$ (unicode font).
@@ -430,22 +550,22 @@
%
% \subsection{Main options}
% \begin{description}
-% \item[{\tt italic, frenchmath:}] were described above (new in |1.1|).
-% \item[{\tt symbolgreek:}] the Greek letters will be taken from the
-% Postscript Symbol font.
-% \item[{\tt eulergreek:}] the Greek letters will be taken from the Euler
-% font.
-% \item[{\tt symbolmax:}] all characters other than
-% letters and digits will be taken from the Symbol
-% font. This option also makes a number of further
-% glyphs available, including some basic mathematical
-% arrows, as well as the sum and product signs. For
-% documents with very simple needs in mathematical
-% symbols, the options |symbolmax| may give in the end
-% a quite smaller PDF file, as the Computer Modern
-% fonts, or whatever mathematical fonts initially
-% loaded by packages for use in the document, may sometimes
-% be avoided altogether.
+% \item[{\tt italic, frenchmath:}] italic letters in
+% math, upright uppercase if |frenchmath|.
+% \item[{\tt LGRgreek, eulergreek, symbolgreek:}] the
+% Greek letters will be taken, respectively from the
+% text font itself (in LGR encoding), or from the Euler
+% font, or from the Postscript Symbol font.
+% \item[{\tt symbolmax:}] all characters listed supra,
+% other than letters and digits, are taken from the
+% Symbol font. This option also makes a number of
+% further glyphs available, including some basic
+% mathematical arrows, as well as the sum and product
+% signs. For documents with very simple needs in
+% mathematical symbols, |mathastext| with option
+% |symbolmax| may give in the end a PDF file quite
+% smaller than the one one would get without the
+% package.
% \item[{\tt defaultmathsizes:}] the package |mathastext| opts for bigger
% subscripts (and, copied from the |moresize| package, redefines
% \cs{Huge} and defines \cs{HUGE}). Use this option to prevent it from
@@ -459,10 +579,10 @@
% character from the text font does not give a good
% minus sign. So by default, the package uses the
% en-dash sign \textendash{}. Use |noendash| to
-% deactivate it. In version |1.12| of the package this
-% `en-dash as minus' should work in all encodings,
-% including Unicode (if |fontspec|
-% has been loaded).
+% deactivate it. Starting with version |1.12| of the
+% package this `en-dash as minus' should work in all
+% encodings, including Unicode (if |fontspec| has been
+% loaded).
%
%
% \item[hbar:] The definition of \cs{hbar} inherited from
@@ -578,7 +698,7 @@
% is the Helvetica font in T1-encoding, regular
% (medium) series, upright shape, and the letters
% will be in italic shape.
-% \item with version |1.12| \cs{Mathastext} accepts an
+% \item starting with version |1.12| \cs{Mathastext} accepts an
% optional argument, which will serve as a name to
% designate the corresponding math version. Without
% optional argument \cs{Mathastext} redefines the default
@@ -630,12 +750,14 @@
% \subsection{Body Text and Math commands}
%
% \begin{itemize}
-% \item |\MTVersion|\oarg{nametext}\marg{namemath}: in
-% the absence of the optional argument changes
-% simultaneously the text and the math font to be the
-% font corresponding to the version \meta{namemath}. If
-% there is an optional argument then the text font will
-% use \meta{nametext} and the math mode will use
+% \item
+% |\MTVersion|\oarg{nametext}\marg{namemath}:\footnote{\cs{MTVersion}
+% is also available as \cs{MTversion}.} in the absence
+% of the optional argument changes simultaneously the
+% text and the math font to be the font corresponding
+% to the version \meta{namemath}. If there is an
+% optional argument then the text font will use
+% \meta{nametext} and the math mode will use
% \meta{namemath}. To change only the math font, use
% the \LaTeX{} command \cs{mathversion}.
% \end{itemize}
@@ -679,6 +801,15 @@
% |eulergreek| or |selfGreek| was passed to the
% package. Also an \cs{omicron} control sequence is
% provided.
+% \item LGR Greek and `var'-letters: only the
+% \cs{varsigma} is from the font, others such as
+% \cs{varphi} will load the previous default math
+% font. So when re-compiling a previously written
+% document it might be suitable to
+% \cs{let}\cs{varphi}$=$\cs{phi},
+% \cs{let}\cs{varepsilon}$=$\cs{epsilon}, etc\dots,
+% when only the `variant' form of the letter was used
+% therein.
% \item Miscelleneous mathematical symbols from the
% postscript Symbol font are made available (or
% replaced) when option |symbolmisc| is passed. They
@@ -719,10 +850,13 @@
% \item |basic|: only mathastextify letters and digits.
% \item |italic|: the letters will default to italic shape in
% math mode.
-% \item |frenchmath|: uppercase Latin letters in the same font as for digits
-% and operator names. In general this means that they will be upright.
-% \item |endash|, |emdash|: use the text font en-dash \textendash\ or even
-% the em-dash \textemdash\ (but this seems crazy) for the minus sign
+% \item |frenchmath|: |italic|, but uppercase Latin letters
+% in the same font as for digits and operator names. In
+% general this means that they will be upright. In case of
+% the |LGRgreek| option, this generally upright shape will
+% be applied also to Greek letters.
+% \item |endash|, |emdash|: use the text font en-dash (\textendash) or even
+% the em-dash (\textemdash, but this seems crazy) for the minus sign
% rather than {}-{}. |endash| option is default for the package.
% \item |noendash|: the minus sign will be the - from the
% text font, not the en-dash \textendash.
@@ -759,8 +893,13 @@
% \item |symbolmax|: combines |symbol| and |symboldelimiters|.
% \item |eulergreek|, |eulerdigits|: to let Greek letters (digits) use the
% Euler font.
+% \item |LGRgreek|: this is for a font which is also available in LGR-encoding.
% \item |selfGreek|: this is for a font which has the capital Greek
% letters at the OT1 slot positions.
+% \item |upgreek|, |itgreek|, |upGreek|, |itGreek|:
+% optional specification of the shapes of the Greek
+% letters, or only of the uppercase Greek letters. Only operant
+% in the case of the |LGRgreek| and |selfGreek| options.
% \item |mathaccents|: use the text font also for the math
% accents. As in vanilla \LaTeX{}, they are taken from the font
% for the digits and \cs{log}-like names. Obey the alphabet
@@ -770,21 +909,23 @@
% \item |defaultimath|: do not overwrite \cs{imath} and
% \cs{jmath}, do not extend \cs{i} and \cs{j} to math mode use.
% \item |defaultmathsizes|: do not change the \LaTeX{} defaults.
-% \item |fouriervec|: provides a \cs{fouriervec} command.
+% \item |fouriervec|: provides a \cs{fouriervec} command. The user can then
+% add in the preamble \cs{let}\cs{vec}$=$\cs{fouriervec}. There is also
+% always available a ``poor man'' vec accent \cs{pmvec} for upright letters.
% \end{itemize}
%
% Thanks to Kevin~\textsc{Klement}, Tariq~\textsc{Perwez}
% and Ricard~\textsc{Torres} for bug reports and feature requests.
%
% \StopEventually{}
-%
+%
% \section{Commented source code}
%
%
% \begin{macrocode}
\NeedsTeXFormat{LaTeX2e}
\ProvidesFile{mathastext.sty}
- [2011/02/09 1.12b Use the text font in simple mathematics]
+ [2011/03/11 1.13 Use the text font in simple mathematics]
% \end{macrocode}
% I copied these macros from the |iftex| package of Vafa~\textsc{Khalighi}.
% Perhaps I should rather require the package?
@@ -830,6 +971,8 @@
\edef\m@stextsh{\shapedefault}
\edef\m@stextbold{\bfdefault}
\edef\m@stextshletter{\shapedefault}
+\newif\ifmt@proceed
+\newif\ifmt@failed
% \end{macrocode}
% \end{macro}
% \end{macro}
@@ -837,104 +980,114 @@
% \end{macro}
% \end{macro}
% \end{macro}
-% A number of ifs for treating (some among) the options
-% \begin{macrocode}
-\newif\ifmt@need@euler\mt@need@eulerfalse
-\newif\ifmt@need@symbol\mt@need@symbolfalse
-\newif\ifmt@defaultnormal\mt@defaultnormalfalse
-\newif\ifmt@defaultrm\mt@defaultrmfalse
-\newif\ifmt@defaultbf\mt@defaultbffalse
-\newif\ifmt@defaultsizes\mt@defaultsizesfalse
-\newif\ifmt@twelve\mt@twelvefalse
-%% new behavior in v1.11:
-\newif\ifmt@endash\mt@endashtrue
-\newif\ifmt@emdash\mt@emdashfalse
+% March 9, 2011: v1.13 introduces the option LGRgreek; and I
+% make systematic use of \cs{if...} conditionals, for better
+% readability of the code and error checking (too late for
+% that!), although this means using a bit more of TeX
+% resources.
+% \begin{macrocode}
\def\mt@oti{OT1}\def\mt@ti{T1}
\def\mt@eui{EU1}\def\mt@euii{EU2}
-\newif\ifmt@alldelims
-\ifx\mt@oti\m@stextenc\mt@alldelimsfalse\else\mt@alldelimstrue\fi
-%% new in v1.12b:
\def\mt@lyi{LY1}
% \end{macrocode}
-% The options:
+% \begin{macro}{Package options}
% \begin{macrocode}
-%% new or modified in v1.11:
-\DeclareOption{fouriervec}{\let\mt@fouriervec\@empty}
-\DeclareOption{nolessnomore}{\mt@alldelimsfalse}
+\newif\ifmt@italic\DeclareOption{italic}{\mt@italictrue
+ \edef\m@stextshletter{\itdefault}}
+\newif\ifmt@frenchmath
+\DeclareOption{frenchmath}{\mt@frenchmathtrue
+ \ExecuteOptions{italic}}
+%%
+\newif\ifmt@endash\mt@endashtrue
\DeclareOption{endash}{\mt@endashtrue}
-\DeclareOption{emdash}{\mt@emdashtrue\mt@endashfalse}
\DeclareOption{noendash}{\mt@endashfalse}
-\DeclareOption{symboldelimiters}{\mt@need@symboltrue
- \let\mt@symboldelimiters\@empty}
-%% new in v1.1:
-\DeclareOption{italic}{\let\mt@italic\@empty\edef\m@stextshletter{\itdefault}}
-\DeclareOption{frenchmath}{\let\mt@frenchmath\@empty}
-\DeclareOption{noplus}{\let\mtno@plus\@empty}
-\DeclareOption{nominus}{\let\mtno@minus\@empty}
-\DeclareOption{nohbar}{\let\mtno@hbar\@empty}
+\newif\ifmt@emdash\DeclareOption{emdash}{\mt@emdashtrue\mt@endashfalse}
%%
-\DeclareOption{noparenthesis}{\let\mtno@paren\@empty}
-\DeclareOption{nopunctuation}{\let\mtno@punct\@empty}
+\newif\ifmt@alldelims
+\DeclareOption{alldelims}{\mt@alldelimstrue}
+\ifx\mt@oti\m@stextenc\else\mt@alldelimstrue\fi
+\DeclareOption{nolessnomore}{\mt@alldelimsfalse}
+%%
+\newif\ifmt@noplus\DeclareOption{noplus}{\mt@noplustrue}
+\newif\ifmt@nominus\DeclareOption{nominus}{\mt@nominustrue}
\DeclareOption{noplusnominus}{\ExecuteOptions{noplus,nominus}}
-\DeclareOption{noequal}{\let\mtno@equal\@empty}
-\DeclareOption{noexclam}{\let\mtno@exclam\@empty}
-\DeclareOption{noasterisk}{\let\mtno@ast\@empty}
-\DeclareOption{nospecials}{\let\mtno@specials\@empty}
+%%
+\newif\ifmt@noparen\DeclareOption{noparenthesis}{\mt@noparentrue}
+\newif\ifmt@nopunct\DeclareOption{nopunctuation}{\mt@nopuncttrue}
+\newif\ifmt@noequal\DeclareOption{noequal}{\mt@noequaltrue}
+\newif\ifmt@noexclam\DeclareOption{noexclam}{\mt@noexclamtrue}
+\newif\ifmt@noast\DeclareOption{noasterisk}{\mt@noasttrue}
+\newif\ifmt@nospecials\DeclareOption{nospecials}{\mt@nospecialstrue}
\DeclareOption{basic}{\ExecuteOptions{noparenthesis,nopunctuation,%
noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
-\DeclareOption{nodigits}{\let\mtno@digits\@empty}
-\DeclareOption{defaultimath}{\let\mt@defaultimath\@empty}
-\DeclareOption{alldelims}{\mt@alldelimstrue}
-\DeclareOption{mathaccents}{\let\mt@mathaccents\@empty}
-\DeclareOption{selfGreek}{\let\mt@selfGreek\@empty}
-\DeclareOption{selfgreek}{\let\mt@selfGreek\@empty}
-\DeclareOption{symboldigits}{\mt@need@symboltrue
- \let\mt@symboldigits\@empty}
-\DeclareOption{symbolgreek}{\mt@need@symboltrue
- \let\mt@symbolgreek\@empty}
-\DeclareOption{symbolre}{\mt@need@symboltrue
- \let\mt@symbolre\@empty}
-\DeclareOption{symbolmisc}{\mt@need@symboltrue
- \let\mt@symbolmisc\@empty}
+%%
+\newif\ifmt@nohbar\DeclareOption{nohbar}{\mt@nohbartrue}
+\newif\ifmt@nodigits\DeclareOption{nodigits}{\mt@nodigitstrue}
+\newif\ifmt@defaultimath\DeclareOption{defaultimath}{\mt@defaultimathtrue}
+\newif\ifmt@mathaccents\DeclareOption{mathaccents}{\mt@mathaccentstrue}
+%%
+\newif\ifmt@selfGreek
+ \DeclareOption{selfGreek}{\mt@selfGreektrue}
+ \DeclareOption{selfgreek}{\mt@selfGreektrue}
+\newif\ifmt@LGRgreek\DeclareOption{LGRgreek}{\mt@LGRgreektrue}
+%%
+\newif\ifmt@needsymbol
+\newif\ifmt@symboldelimiters
+\DeclareOption{symboldelimiters}{\mt@needsymboltrue\mt@symboldelimiterstrue}
+\newif\ifmt@symboldigits
+\DeclareOption{symboldigits}{\mt@needsymboltrue\mt@symboldigitstrue}
+\newif\ifmt@symbolgreek
+\DeclareOption{symbolgreek}{\mt@needsymboltrue\mt@symbolgreektrue}
+\newif\ifmt@symbolre
+\DeclareOption{symbolre}{\mt@needsymboltrue\mt@symbolretrue}
+\newif\ifmt@symbolmisc
+\DeclareOption{symbolmisc}{\mt@needsymboltrue\mt@symbolmisctrue}
\DeclareOption{symbol}{\ExecuteOptions{symbolgreek,symbolmisc,symbolre}}
\DeclareOption{symbolmax}{\ExecuteOptions{symbol,symboldelimiters}}
-\DeclareOption{eulerdigits}{\mt@need@eulertrue\let\mt@eulerdigits\@empty}
-\DeclareOption{eulergreek}{\mt@need@eulertrue\let\mt@eulergreek\@empty}
+%%
+\newif\ifmt@needeuler
+\newif\ifmt@eulerdigits
+\DeclareOption{eulerdigits}{\mt@needeulertrue\mt@eulerdigitstrue}
+\newif\ifmt@eulergreek
+\DeclareOption{eulergreek}{\mt@needeulertrue\mt@eulergreektrue}
+%%
+\newif\ifmt@twoshapesforgreek
+\newif\ifmt@upgreek
+\newif\ifmt@itgreek
+\newif\ifmt@upGreek
+\newif\ifmt@itGreek
+\DeclareOption{upgreek}{\mt@upgreektrue}
+\DeclareOption{itgreek}{\mt@itgreektrue}
+\DeclareOption{upGreek}{\mt@twoshapesforgreektrue\mt@upGreektrue}
+\DeclareOption{itGreek}{\mt@twoshapesforgreektrue\mt@itGreektrue}
+%%
+\newif\ifmt@defaultnormal
\DeclareOption{defaultnormal}{\mt@defaultnormaltrue}
+\newif\ifmt@defaultrm
\DeclareOption{defaultrm}{\mt@defaultrmtrue}
+\newif\ifmt@defaultbf
\DeclareOption{defaultbf}{\mt@defaultbftrue}
% \end{macrocode}
% We intend to change the default script and scriptscript sizes, and also to
% declare a \cs{HUGE} size and modify the \cs{Huge} one at 12pt (taken from
% the |moresize| package). So we have an option to maintain default situation.
% \begin{macrocode}
-\DeclareOption{defaultmathsizes}{\mt@defaultsizestrue}
-\DeclareOption{12pt}{\mt@twelvetrue}
+\newif\ifmt@defaultsizes\DeclareOption{defaultmathsizes}{\mt@defaultsizestrue}
+\newif\ifmt@twelve\DeclareOption{12pt}{\mt@twelvetrue}
+\newif\ifmt@fouriervec\DeclareOption{fouriervec}{\mt@fouriervectrue}
\DeclareOption*{\PackageWarning{mathastext}{Unknown option `\CurrentOption'}}
-\ProcessOptions\relax
-% \end{macrocode}
%%
-% \begin{macro}{\pmvec}
-% Definition of a poor man version of the \cs{vec} accent
-% \begin{macrocode}
-\DeclareRobustCommand\pmvec[1]{\mathord{\stackrel{\raisebox{-.5ex}%
-{\tiny\boldmath$\mathord{\rightarrow}$}}{{}#1}}}
-% \end{macrocode}
-% \end{macro}
-% \begin{macro}{\fouriervec}
-% The glyph is taken from the Fourier font of Michel~\textsc{Bovani}.
-% \begin{macrocode}
-\ifx\mt@fouriervec\@empty
- \DeclareFontEncoding{FML}{}{}
- \DeclareFontSubstitution{FML}{futm}{m}{it}
- \DeclareSymbolFont{mtfourierpourvec}{FML}{futm}{m}{it}
- \SetSymbolFont{mtfourierpourvec}{bold}{FML}{futm}{b}{it}
- \DeclareMathAccent{\fouriervec}{\mathord}{mtfourierpourvec}{"7E}
-\fi
+\ProcessOptions\relax
% \end{macrocode}
% \end{macro}
% \begin{macro}{mtoperatorfont}
-% Declaration of the current default font as our math font.
+% Declaration of the current default font as our math
+% font. The characteristics of the used font can be
+% changed by a user call to the macros \cs{Mathastext} or
+% \cs{Mathastextwilluse}, which will be defined next. We
+% will also make one internal call to \cs{Mathastext} to
+% set up the normal and bold math versions, so we will
+% also employ \cs{SetSymbolFont} later.
% \begin{macrocode}
\DeclareSymbolFont{mtoperatorfont}
{\m@stextenc}{\m@stextfam}{\m@stextser}{\m@stextsh}
@@ -951,36 +1104,85 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\DeclareSymbolFontAlphabet{\Mathnormal}{mtletterfont}
\DeclareSymbolFontAlphabet{\Mathrm}{mtoperatorfont}
% \end{macrocode}
-% Our internal variables redefined without expansion. They will get expanded
-% inside the \cs{Mathastext} macro.
+% \end{macro}
+% \begin{macro}{LGRgreek}
+% \begin{macro}{mtlgrfont}
+% \begin{macro}{mtlgrfontupper}
+% The LGRgreek option necessitates to define at least one
+% additional symbol font |mtlgrfont|, and possibly a further
+% one |mtlgrfontupper| for uppercase Greek.
% \begin{macrocode}
- \def\m@stextenc{\encodingdefault}
- \def\m@stextfam{\familydefault}
- \def\m@stextser{\seriesdefault}
- \def\m@stextsh{\shapedefault}
- \def\m@stextbold{\bfdefault}
- \def\m@stextshletter{\shapedefault}
- \ifx\mt@italic\@empty\def\m@stextshletter{\itdefault}\fi
+\ifmt@LGRgreek
+ \DeclareFontEncoding{LGR}{}{}
+ \DeclareSymbolFont{mtlgrfont}{LGR}
+ {\m@stextfam}{\m@stextser}{\m@stextshletter}
+ \def\mtlgrfontupper{mtlgrfont}
+ \ifmt@twoshapesforgreek
+ \ifmt@upGreek
+ \DeclareSymbolFont{mtlgrfontupper}{LGR}{\m@stextfam}{\m@stextser}{n}
+ \else
+ \DeclareSymbolFont{mtlgrfontupper}{LGR}{\m@stextfam}{\m@stextser}{it}
+ \fi
+ \def\mtlgrfontupper{mtlgrfontupper}
+ \fi
+\else
% \end{macrocode}
% \end{macro}
+% \end{macro}
+% \end{macro}
+% \begin{macro}{selfGreek}
+% \begin{macro}{mtselffontupper}
+% \begin{macro}{\mt@uppergreekfont}
+% We must also make provisions for a possible additional
+% font for uppercase Greek, in the case of the option
+% selfGreek, when the shape is not necessarily
+% \cs{m@stextsh} (that is \cs{shapedefault}).
+% \begin{macrocode}
+\ifmt@selfGreek\mt@proceedfalse
+ \ifmt@upGreek\def\mt@tmp{n}\mt@proceedtrue\else
+ \ifmt@upgreek\def\mt@tmp{n}\mt@proceedtrue\else
+ \ifmt@itGreek\def\mt@tmp{it}\mt@proceedtrue\else
+ \ifmt@itgreek\def\mt@tmp{it}\mt@proceedtrue
+ \fi\fi\fi\fi
+ \ifmt@proceed
+ \def\mt@uppergreekfont{mtselffontupper}
+ \DeclareSymbolFont{mtselffontupper}{\m@stextenc} % should be OT1!
+ {\m@stextfam}{\m@stextser}{\mt@tmp}
+ \else
+ \ifmt@frenchmath
+ \def\mt@uppergreekfont{mtoperatorfont}
+ \else
+ \def\mt@uppergreekfont{mtletterfont}
+ \fi
+% \end{macrocode}
+% Used to be mtoperatorfont in versions prior to 1.13, so typically
+% upright. Not the case anymore (in the case of option italic for
+% example), to comply to ISO standard. Use upGreek if necessary.
+% \begin{macrocode}
+ \fi
+\fi\fi
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
% \begin{macro}{mteulervm}
% \begin{macro}{\MathEuler}
% In case we need the Euler font, we declare it here. It will use
% |uzeur.fd| from the |eulervm| package of Walter~\textsc{Schmidt}
% \begin{macrocode}
-\ifmt@need@euler
+\ifmt@needeuler
\DeclareSymbolFont{mteulervm}{U}{zeur}{m}{n}
\DeclareSymbolFontAlphabet{\MathEuler}{mteulervm}
-%% \SetSymbolFont{mteulervm}{bold}{U}{zeur}{\m@stextbold}{n}
\fi
\newcommand\MTEulerScale[1]{\edef\zeu@Scale{#1}}
\let\MathastextEulerScale\MTEulerScale
% \end{macrocode}
% \end{macro}
% \end{macro}
-% In the end, I moved the bold stuff to \cs{Mathastext} as the user may want
-% his choice of |boldvariant| to have effect on the Euler font (it is
-% possible to use \cs{Mathastextboldvariant}|{m}|).
+% In the end, I moved the bold stuff to \cs{Mathastext} as
+% the user may want his choice of |boldvariant| to have
+% effect on the Euler font (it is possible to use
+% \cs{Mathastextboldvariant}|{m}|).
%
% \LaTeXe{} has a strange initial configuration where the
% capital Greek letters are of type |mathalpha|, but the
@@ -989,30 +1191,31 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
% Latin letters are from the same font. This is because
% \cs{mathbf} is set up to be like a bold version of
% \cs{mathrm}, and \cs{mathrm} uses the `operators' font, by
-% default |cmr|, where there are no lowercase greek
+% default |cmr|, where there are NO lowercase greek
% letters. This set-up is ok for the Capital Greek letters
% which are together with the Latin letters in both |cmmi|
% and |cmr|.
%
-% The package eulervm sets also the lowercase Greek letters
-% to be of type |mathalpha|, the default \cs{mathbf} and
-% \cs{mathrm} will act wierdly on them, but a new
-% \cs{mathbold} is defined which will use the bold series of
-% the Euler roman font, it gives something coherent for
-% Latin and Greek \emph{lowercase} letters, and this is
-% possible because the same font contains upright forms for
-% them all.
-%
-% Here in |mathastext|, Latin letters and Greek letters (lower and
-% upper case) must be assumed to come from two different fonts, as
-% a result the standard \cs{mathbf} (and \cs{mathrm}) will give
-% weird results when used for Greek letters. It would be tricky
-% but not impossible to coerce \cs{mathbf} to do something
-% reasonable. I posted the method I have in mind to the texhax
-% mailing list
-% (|http://tug.org/pipermail/texhax/2011-January/016605.html|) but
-% at this time |30-01-2011 09:42:27 CET| I decided I would not try
-% to implement it here. I prefer to respect the default things.
+% The package eulervm sets the lowercase Greek letters to be
+% of type |mathalpha|, the default \cs{mathbf} and
+% \cs{mathrm} will act wierdly on them, but a \cs{mathbold}
+% is defined which will use the bold series of the Euler
+% roman font, it gives something coherent for Latin and
+% Greek \emph{lowercase} letters, and this is possible
+% because the same font contains upright forms for them all.
+%
+% Here in |mathastext|, Latin letters and Greek letters
+% (lower and upper case) must be (generally) assumed to come
+% from two different fonts, as a result the standard
+% \cs{mathbf} (and \cs{mathrm}) will give weird results when
+% used for Greek letters. It would be tricky but not
+% impossible to coerce \cs{mathbf} to do something
+% reasonable. I posted the method I have in mind to the
+% texhax mailing list
+% (|http://tug.org/pipermail/texhax/2011-January/016605.html|)
+% but at this time |30-01-2011 09:42:27 CET| I decided I
+% would not try to implement it here. I prefer to respect
+% the default things.
%
% I follow the simpler idea of the |eulervm| package and
% define \cs{MathEuler} and \cs{MathEulerBold} alphabet
@@ -1024,25 +1227,38 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
% \cs{psy@scale} will be used to scale the font (see at the
% very end of this file).
% \begin{macrocode}
-\ifmt@need@symbol
+\ifmt@needsymbol
\def\psy@scale{1}
\DeclareSymbolFont{mtpsymbol}{U}{psy}{m}{n}
-%% \SetSymbolFont{mtpsymbol}{bold}{U}{psy}{\m@stextbold}{n}
\DeclareSymbolFontAlphabet{\MathPSymbol}{mtpsymbol}
\fi
\newcommand\MTSymbolScale[1]{\edef\psy@scale{#1}}
\let\MathastextSymbolScale\MTSymbolScale
% \end{macrocode}
-% In v1.0 the math alphabet was called \cs{MathastextSymbol}. I did not
-% choose the name \cs{MathSymbol} as this name may be
-% defined somewhere for another thing.
+% I did not choose the name \cs{MathSymbol} as this name may
+% be defined somewhere for another thing. There is no bold
+% for the postscript Symbol font distributed with the
+% \LaTeXe{} |psnffs| core package.
+% \end{macro}
+% \end{macro}
+% \begin{macro}{\pmvec}
+% Definition of a poor man version of the \cs{vec} accent
+% \begin{macrocode}
+\DeclareRobustCommand\pmvec[1]{\mathord{\stackrel{\raisebox{-.5ex}%
+{\tiny\boldmath$\mathord{\rightarrow}$}}{{}#1}}}
+% \end{macrocode}
% \end{macro}
-% There is no bold for the postscript Symbol font
-% distributed with the \LaTeXe{} |psnffs|. In v1.0 I
-% included some code ready for an eventual bold, one never
-% knows which might come in an update to the |psnfss|
-% package, but, if this day arrives, I or someone else shall
-% simply upgrade the package.
+% \begin{macro}{\fouriervec}
+% The glyph is taken from the Fourier font of Michel~\textsc{Bovani}.
+% \begin{macrocode}
+\ifmt@fouriervec
+ \DeclareFontEncoding{FML}{}{}
+ \DeclareFontSubstitution{FML}{futm}{m}{it}
+ \DeclareSymbolFont{mtfourierpourvec}{FML}{futm}{m}{it}
+ \SetSymbolFont{mtfourierpourvec}{bold}{FML}{futm}{b}{it}
+ \DeclareMathAccent{\fouriervec}{\mathord}{mtfourierpourvec}{"7E}
+\fi
+% \end{macrocode}
% \end{macro}
% \begin{macro}{\MTencoding}
% \begin{macro}{\MTfamily}
@@ -1050,23 +1266,19 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
% \begin{macro}{\MTshape}
% \begin{macro}{\MTboldvariant}
% \begin{macro}{\MTlettershape}
-% We declare some public macros to modify our private internals, and we will
-% use them also ourself.
-%
-% In version 1.1 we add the possibility to have two distinct font shapes for
-% letters and digits. So in fact we could as well have two really unrelated
-% fonts but this is really not the spirit of the package, already making
-% italic letters easy for the user was only made possible by a moment of
-% weakness of the package author.
+% Some public macros to modify our private internals, and
+% we will use them also ourself.
%
-% In version 1.11 I fix bugs in the way this was all set
-% up. I change the macro names for brevity sake.
+% In version 1.1 we add the possibility to have two
+% distinct font shapes for letters and digits. So in fact
+% we could as well have two really unrelated fonts but
+% this is really not the spirit of the package.
% \begin{macrocode}
\DeclareRobustCommand\MTencoding[1]{\def\m@stextenc{#1}}
\DeclareRobustCommand\MTfamily[1]{\def\m@stextfam{#1}}
\DeclareRobustCommand\MTseries[1]{\def\m@stextser{#1}}
\DeclareRobustCommand\MTshape[1]{\def\m@stextsh{#1}
- \ifx\mt@italic\@empty\else\def\m@stextshletter{#1}\fi}
+ \ifmt@italic\else\def\m@stextshletter{#1}\fi}
\DeclareRobustCommand\MTboldvariant[1]{\def\m@stextbold{#1}}
\DeclareRobustCommand\MTlettershape[1]{\def\m@stextshletter{#1}}
\let\Mathastextencoding\MTencoding
@@ -1099,15 +1311,22 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\fi
\Mathastext}
\let\MathastextWillUse\MTWillUse
+\let\Mathastextwilluse\MTWillUse
% \end{macrocode}
% \end{macro}
% \begin{macro}{\Mathastext}
-% The command \cs{Mathastext} can be used anywhere in the preamble and any
-% number of time, the last one is the one that counts.
+% The command \cs{Mathastext} can be used anywhere in the
+% preamble and any number of time, the last one is the
+% one that counts.
%
-% In version 1.1 we have two fonts: they only differ in shape. The
-% |mtletterfont| is for letters, and the |mtoperatorfont| for digits and
-% log-like operator names. The default is that both are upright.
+% In version 1.1 we have two fonts: they only differ in
+% shape. The |mtletterfont| is for letters, and the
+% |mtoperatorfont| for digits and log-like operator
+% names. The default is that both are upright.
+%
+% Starting with version 1.12, an optional argument makes
+% \cs{Mathastext} act as the Declaration of a math
+% version, to be later used in the document.
% \begin{macrocode}
\DeclareRobustCommand\Mathastext[1][\@empty]{
\mt@font@info@off
@@ -1137,7 +1356,7 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
{\mt@family@normal}
{\mt@series@normal}
{\mt@shape@normal}
- \SetSymbolFont{mtoperatorfont}{bold} {\mt@encoding@bold}
+ \SetSymbolFont{mtoperatorfont}{bold} {\mt@encoding@bold}
{\mt@family@bold}
{\mt@series@bold}
{\mt@shape@bold}
@@ -1162,23 +1381,68 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
% \end{macrocode}
% \end{macro}
% \begin{macro}{\MathEulerBold}
-% We define it here as we leave open the possibility to deactivate it via
-% using \cs{Mathastextboldvariant}|{m}|.
+% We define it here as we leave open the possibility for the
+% user to type \cs{Mathastextboldvariant}|{m}|.
% \begin{macrocode}
- \ifmt@need@euler
+ \ifmt@needeuler
\SetSymbolFont{mteulervm}{bold}{U}{zeur}{\mt@boldvariant@normal}{n}
\DeclareMathAlphabet{\MathEulerBold}{U}{zeur}{\mt@boldvariant@normal}{n}
\fi
% \end{macrocode}
% \end{macro}
% \begin{macrocode}
- \ifmt@need@symbol\SetSymbolFont{mtpsymbol}{bold}
- {U}{psy}{\mt@boldvariant@normal}{n}\fi
- \typeout{** Latin letters in math versions normal (resp. bold) are now^^J%
+ \ifmt@needsymbol\SetSymbolFont{mtpsymbol}{bold}
+ {U}{psy}{\mt@boldvariant@normal}{n}
+ \fi
+% \end{macrocode}
+% \begin{macro}{LGRgreek}
+% LGRgreek option.
+% \begin{macrocode}
+ \ifmt@LGRgreek
+ \ifmt@upgreek\def\mt@tmp{n}
+ \else\ifmt@itgreek\def\mt@tmp{it}
+ \else\ifmt@frenchmath\def\mt@tmp{\mt@shape@normal}
+ \else\def\mt@tmp{\mt@ltshape@normal}
+ \fi\fi\fi
+ \SetSymbolFont{mtlgrfont}{normal}{LGR}
+ {\mt@family@normal}{\mt@series@normal}{\mt@tmp}
+ \SetSymbolFont{mtlgrfont}{bold}{LGR}
+ {\mt@family@bold}{\mt@boldvariant@normal}{\mt@tmp}
+ \ifmt@twoshapesforgreek
+ \ifmt@upGreek\def\mt@tmp{n}\else\def\mt@tmp{it}\fi
+ \SetSymbolFont{mtlgrfontupper}{normal}{LGR}
+ {\mt@family@normal}{\mt@series@normal}{\mt@tmp}
+ \SetSymbolFont{mtlgrfontupper}{bold}{LGR}
+ {\mt@family@bold}{\mt@boldvariant@bold}{\mt@tmp}
+ \fi
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{selfGreek}
+% selfGreek option.
+% \begin{macrocode}
+ \else
+ \ifmt@selfGreek
+ \mt@proceedfalse
+ \ifmt@upGreek\def\mt@tmp{n}\mt@proceedtrue\else
+ \ifmt@upgreek\def\mt@tmp{n}\mt@proceedtrue\else
+ \ifmt@itGreek\def\mt@tmp{it}\mt@proceedtrue\else
+ \ifmt@itgreek\def\mt@tmp{it}\mt@proceedtrue
+ \fi\fi\fi\fi
+ \ifmt@proceed
+ \SetSymbolFont{mtselffontupper}{normal}{\mt@encoding@normal}
+ {\mt@family@normal}{\mt@series@normal}{\mt@tmp}
+ \SetSymbolFont{mtselffontupper}{bold}{\mt@encoding@bold}
+ {\mt@family@bold}{\mt@boldvariant@bold}{\mt@tmp}
+ \fi
+\fi\fi
+% \end{macrocode}
+% \end{macro}
+% \begin{macrocode}
+\typeout{** Latin letters in math versions normal (resp. bold) are now^^J%
** set up to use the fonts
\mt@encoding@normal/\mt@family@normal/\mt@series@normal%
(\mt@boldvariant@normal)/\mt@ltshape@normal}
-\ifx\mtno@digits\@empty\else
+\ifmt@nodigits\else
\typeout{** Other characters (digits, ...) and
\protect\log-like names will be^^J%
** typeset with the \expandafter`\mt@shape@normal' shape.}
@@ -1214,13 +1478,13 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
% \begin{macrocode}
\DeclareRobustCommand\MTDeclareVersion[6][\@empty]{
\mt@font@info@off
- \edef\mt@tmp{#2}
- \DeclareMathVersion{\mt@tmp}
- \expandafter\edef\csname mt@encoding@\mt@tmp\endcsname{#3}
- \expandafter\edef\csname mt@family@\mt@tmp\endcsname{#4}
- \expandafter\edef\csname mt@series@\mt@tmp\endcsname{#5}
- \expandafter\edef\csname mt@shape@\mt@tmp\endcsname{#6}
- \expandafter\edef\csname mt@boldvariant@\mt@tmp\endcsname{\m@stextbold}
+ \edef\mt@version{#2}
+ \DeclareMathVersion{\mt@version}
+ \expandafter\edef\csname mt@encoding@\mt@version\endcsname{#3}
+ \expandafter\edef\csname mt@family@\mt@version\endcsname{#4}
+ \expandafter\edef\csname mt@series@\mt@version\endcsname{#5}
+ \expandafter\edef\csname mt@shape@\mt@version\endcsname{#6}
+ \expandafter\edef\csname mt@boldvariant@\mt@version\endcsname{\m@stextbold}
\newif\ifmt@reallynoopt\mt@reallynoopttrue
\ifx\@empty#1
\else % we check nevertheless for [] situation, will not work with [ ]
@@ -1228,36 +1492,95 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\ifx\mt@@tmp\mt@empty\else\mt@reallynooptfalse\fi
\fi
\ifmt@reallynoopt
- \ifx\mt@italic\@empty
+ \ifmt@italic
\SetSymbolFont{mtletterfont}{#2}{#3}{#4}{#5}{\m@stextshletter}
\typeout{** Latin letters in math version `#2' will use the font
#3/#4/#5/\m@stextshletter^^J%
** Other characters (digits, ...) and \protect\log-like names
will be in `#6' shape.}
- \expandafter\def\csname mt@ltshape\mt@tmp\endcsname{\m@stextshletter}
+ \expandafter\edef\csname mt@ltshape@\mt@version\endcsname{\m@stextshletter}
\else
\SetSymbolFont{mtletterfont}{#2}{#3}{#4}{#5}{#6}
\typeout{** Latin letters in math version `#2' will use the fonts
#3/#4/#5(\m@stextbold)/#6}
- \expandafter\edef\csname mt@ltshape\mt@tmp\endcsname{#6}
+ \expandafter\edef\csname mt@ltshape@\mt@version\endcsname{#6}
\fi
\else
\SetSymbolFont{mtletterfont}{#2}{#3}{#4}{#5}{#1}
\typeout{** Latin letters in math version `#2' 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 mt@ltshape\mt@tmp\endcsname{#1}
+ ** Other characters (digits, ...) and \protect\log-like
+ names will be in `#6' shape.}
+ \expandafter\edef\csname mt@ltshape@\mt@version\endcsname{#1}
\fi
\SetMathAlphabet{\Mathbf}{#2}{#3}{#4}{\m@stextbold}{#6}
\SetSymbolFont{mtoperatorfont}{#2}{#3}{#4}{#5}{#6}
- \ifmt@need@euler
+ \ifmt@needeuler
\SetMathAlphabet{\MathEulerBold}{#2}{U}{zeur}{\m@stextbold}{n}
\fi
+% \end{macrocode}
+% \begin{macro}{mtlgrfont}
+% In the case of option LGRgreek, it is expected that the
+% fonts used in each math versions exist in LGR encoding.
+% \begin{macrocode}
+ \ifmt@LGRgreek
+ \ifmt@upgreek\def\mt@tmp{n}
+ \else\ifmt@itgreek\def\mt@tmp{it}
+ \else\ifmt@frenchmath\def\mt@tmp{\csname mt@shape@\mt@version\endcsname}
+ \else\def\mt@tmp{\csname mt@ltshape@\mt@version\endcsname}
+ \fi\fi\fi
+ \SetSymbolFont{mtlgrfont}{#2}{LGR}{#4}{#5}{\mt@tmp}
+%% \typeout{** Greek letters in math version `#2' will use the font
+%% LGR/#4/#5/\mt@tmp}
+ \ifmt@twoshapesforgreek
+ \ifmt@upGreek\def\mt@tmp{n}\else\def\mt@tmp{it}\fi
+ \SetSymbolFont{mtlgrfontupper}{#2}{LGR}{#4}{#5}{\mt@tmp}
+%% \typeout{** Uppercase Greek letters in math version `#2' will use the font
+%% LGR/#4/#5/\mt@tmp}
+ \fi
+% \end{macrocode}
+% \end{macro}
+% \begin{macro}{mtlgrfont}
+% selfGreek
+% \begin{macrocode}
+\else
+ \ifmt@selfGreek
+ \mt@proceedfalse
+ \ifmt@upGreek\def\mt@tmp{n}\mt@proceedtrue\else
+ \ifmt@upgreek\def\mt@tmp{n}\mt@proceedtrue\else
+ \ifmt@itGreek\def\mt@tmp{it}\mt@proceedtrue\else
+ \ifmt@itgreek\def\mt@tmp{it}\mt@proceedtrue
+ \fi\fi\fi\fi
+ \ifmt@proceed
+ \SetSymbolFont{mtselffontupper}{#2}{#3}{#4}{#5}{\mt@tmp}
+ \fi
+\fi\fi
+% \end{macrocode}
+% \end{macro}
+% \begin{macrocode}
\mt@font@info@on
}
\let\MathastextDeclareVersion\MTDeclareVersion
% \end{macrocode}
% \end{macro}
+% We redefine our internal variables without expansion
+% so that they get a chance to be also (indirectly or
+% directly) modified by user later choices regarding
+% \cs{encodingdefault}, etc\dots, previous to a user call to
+% \cs{Mathastext} or \cs{Mathastextwilluse}.
+% \begin{macrocode}
+ \def\m@stextenc{\encodingdefault}
+ \def\m@stextfam{\familydefault}
+ \def\m@stextser{\seriesdefault}
+ \def\m@stextsh{\shapedefault}
+ \def\m@stextbold{\bfdefault}
+ \def\m@stextshletter{\shapedefault}
+ \ifmt@italic\def\m@stextshletter{\itdefault}\fi
+% \end{macrocode}
+% Initialization call:
+% \begin{macrocode}
+\Mathastext
+% \end{macrocode}
% \begin{macro}{\operator@font}
% We modify this \LaTeX{} internal variable in order for the
% predefined \cs{cos}, \cs{sin}, etc\dots to be typeset with the
@@ -1272,21 +1595,21 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\def\operator@font{\mathgroup\symmtoperatorfont}
% \end{macrocode}
% \end{macro}
-% Initialization call:
-% \begin{macrocode}
-\Mathastext
-% \end{macrocode}
+% \begin{macro}{\mathnormal}
+% \begin{macro}{\mathrm}
+% \begin{macro}{\mathbf}
% We redefine the normal, rm and bf alphabets. In version 1.1 we
% follow the standard: normal gives the font for letters, rm gives
% the font for digits and log-like names, bf for the bold series
% of the font for digits and log-like names.
%
-% We will access by default the \cs{omicron} via
-% \cs{mathnormal}. So we save it for future use. But
-% unfortunately the Fourier package with the upright option does
-% not have an upright omicron obtainable by simply typing
-% \cs{mathnormal}|{o}|. So in this case we shall use \cs{mathrm}
-% and not \cs{mathnormal}.
+% We will access by default (if no option is passed for
+% Greek) the \cs{omicron} via \cs{mathnormal}. So we save it
+% for future use. But unfortunately the Fourier package
+% with the upright option does not have an upright omicron
+% obtainable by simply typing \cs{mathnormal}|{o}|. So in
+% this case we shall use \cs{mathrm} and not
+% \cs{mathnormal}.
% \begin{macrocode}
\let\mt@saved@mathnormal\mathnormal
\@ifpackageloaded{fourier}{\ifsloped\else\let\mt@saved@mathnormal\mathrm\fi}{}
@@ -1294,20 +1617,29 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\ifmt@defaultrm\else\renewcommand{\mathrm}{\Mathrm}\fi
\ifmt@defaultbf\else\renewcommand{\mathbf}{\Mathbf}\fi
% \end{macrocode}
+% \end{macro}
+% \end{macro}
+% \end{macro}
% We write appropriate messages to the terminal and the log.
% \begin{macrocode}
-\ifx\mt@symbolgreek\@empty
-\typeout{** Greek letters will use the PostScript Symbol font. Use^^J%
-** \protect\MathastextSymbolScale{factor} to scale the font by <factor>.}
-\fi
-\ifx\mt@eulergreek\@empty
-\typeout{** Greek letters will use the Euler font. Use^^J%
-** \protect\MathastextEulerScale{factor} to scale the font by <factor>.}
-\fi
-\ifx\mt@selfGreek\@empty
-\typeout{** Capital Greek letters from the fonts declared for latin letters:^^J%
+%% \ifmt@LGRgreek
+%% \typeout{** Greek letters will use the font
+%% LGR/\mt@family@normal/\mt@series@normal/\mt@ltshape@normal}
+%% \else
+\ifmt@selfGreek
+ \typeout{** Capital Greek letters will be taken from the fonts
+ declared for latin letters:^^J%
** only for OT1 or compatible encodings; glyphs may be unavailable.}
-\fi
+\else
+\ifmt@eulergreek
+ \typeout{** Greek letters will use the Euler font. Use^^J%
+** \protect\MathastextEulerScale{<factor>} to scale the font.}
+\else
+\ifmt@symbolgreek
+ \typeout{** Greek letters will use the PostScript Symbol font. Use^^J%
+** \protect\MathastextSymbolScale{<factor>} to scale the font.}
+\fi\fi\fi
+%%\fi
% \end{macrocode}
% \begin{macro}{\MTVersion}
% This is a wrapper around \LaTeX{}'s \cs{mathversion}: here we have an
@@ -1316,28 +1648,30 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\DeclareRobustCommand\MTVersion[2][\@empty]{%
\mathversion{#2}%
\ifx\@empty#1% no optional argument
- \edef\mt@tmp{@#2}
+ \edef\mt@tmp{#2}
\else% we check nevertheless for [] situation, will not work with [ ]
\def\mt@@tmp{#1}\def\mt@empty{}%
- \ifx\mt@@tmp\mt@empty\edef\mt@tmp{@#2}%
- \else\edef\mt@tmp{@#1}%
+ \ifx\mt@@tmp\mt@empty\edef\mt@tmp{#2}%
+ \else\edef\mt@tmp{#1}%
\fi%
\fi%
- \usefont{\csname mt@encoding\mt@tmp\endcsname}%
- {\csname mt@family\mt@tmp\endcsname}%
- {\csname mt@series\mt@tmp\endcsname}%
- {\csname mt@shape\mt@tmp\endcsname}%
- \edef\mt@@encoding{\csname mt@encoding\mt@tmp\endcsname}%
+ \usefont{\csname mt@encoding@\mt@tmp\endcsname}%
+ {\csname mt@family@\mt@tmp\endcsname}%
+ {\csname mt@series@\mt@tmp\endcsname}%
+ {\csname mt@shape@\mt@tmp\endcsname}%
+ \edef\mt@@encoding{\csname mt@encoding@\mt@tmp\endcsname}%
\renewcommand{\encodingdefault}{\mt@@encoding}%
- \edef\mt@@family{\csname mt@family\mt@tmp\endcsname}%
+ \edef\mt@@family{\csname mt@family@\mt@tmp\endcsname}%
\renewcommand{\rmdefault}{\mt@@family}%
- \edef\mt@@series{\csname mt@series\mt@tmp\endcsname}%
+ \edef\mt@@series{\csname mt@series@\mt@tmp\endcsname}%
\renewcommand{\mddefault}{\mt@@series}%
- \edef\mt@@shape{\csname mt@shape\mt@tmp\endcsname}%
+ \edef\mt@@shape{\csname mt@shape@\mt@tmp\endcsname}%
\renewcommand{\updefault}{\mt@@shape}%
- \edef\mt@@boldvariant{\csname mt@boldvariant\mt@tmp\endcsname}%
+ \edef\mt@@boldvariant{\csname mt@boldvariant@\mt@tmp\endcsname}%
\renewcommand{\bfdefault}{\mt@@boldvariant}}
\let\MathastextVersion\MTVersion
+\let\Mathastextversion\MTVersion
+\let\MTversion\MTVersion
% \end{macrocode}
% \end{macro}
% At last we now change the font for the letters of the latin alphabet.
@@ -1369,7 +1703,7 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\DeclareMathSymbol{x}{\mathalpha}{mtletterfont}{`x}
\DeclareMathSymbol{y}{\mathalpha}{mtletterfont}{`y}
\DeclareMathSymbol{z}{\mathalpha}{mtletterfont}{`z}
-\ifx\mt@frenchmath\@empty\def\mt@font@tbu{mtoperatorfont}
+\ifmt@frenchmath\def\mt@font@tbu{mtoperatorfont}
\else\def\mt@font@tbu{mtletterfont}\fi
\DeclareMathSymbol{A}{\mathalpha}{\mt@font@tbu}{`A}
\DeclareMathSymbol{B}{\mathalpha}{\mt@font@tbu}{`B}
@@ -1398,14 +1732,14 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\DeclareMathSymbol{Y}{\mathalpha}{\mt@font@tbu}{`Y}
\DeclareMathSymbol{Z}{\mathalpha}{\mt@font@tbu}{`Z}
%%
-\ifx\mtno@digits\@empty\else
+\ifmt@nodigits\else
\def\mt@font@tbu{mtoperatorfont}
% \end{macrocode}
% In version 1.1, we have now separated digits from letters, so paradoxically
% it is less problematic to give them the |mathalpha| type.
% \begin{macrocode}
-\ifx\mt@symboldigits\@empty \def\mt@font@tbu{mtpsymbol} \fi
-\ifx\mt@eulerdigits\@empty \def\mt@font@tbu{mteulervm} \fi
+\ifmt@symboldigits \def\mt@font@tbu{mtpsymbol} \fi
+\ifmt@eulerdigits \def\mt@font@tbu{mteulervm} \fi
\DeclareMathSymbol{0}{\mathalpha}{\mt@font@tbu}{`0}
\DeclareMathSymbol{1}{\mathalpha}{\mt@font@tbu}{`1}
\DeclareMathSymbol{2}{\mathalpha}{\mt@font@tbu}{`2}
@@ -1422,7 +1756,7 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
% Symbol font for the printable characters other than
% letters and digits.
% \begin{macrocode}
-\ifx\mt@symboldelimiters\@empty
+\ifmt@symboldelimiters
\def\mt@font@tbu{mtpsymbol}
\mt@endashfalse
\mt@emdashfalse
@@ -1430,12 +1764,12 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\def\mt@font@tbu{mtoperatorfont}
\fi
%%
-\ifx\mtno@exclam\@empty\else
+\ifmt@noexclam\else
\DeclareMathSymbol{!}{\mathclose}{\mt@font@tbu}{"21}
\DeclareMathSymbol{?}{\mathclose}{\mt@font@tbu}{"3F}
\fi
%%
-\ifx\mtno@ast\@empty\else
+\ifmt@noast\else
\DeclareMathSymbol{*}{\mathalpha}{\mt@font@tbu}{"2A}
\fi
% \end{macrocode}
@@ -1446,14 +1780,14 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
% the default fonts in that case. So here I just treat |.| (in the hope to
% really lessen by 1 the number of fonts embedded at the end in the PDF).
% \begin{macrocode}
-\ifx\mtno@punct\@empty\else
+\ifmt@nopunct\else
\DeclareMathSymbol{,}{\mathpunct}{\mt@font@tbu}{"2C}
\DeclareMathSymbol{.}{\mathord}{\mt@font@tbu}{"2E}
-\DeclareMathSymbol{:}{\mathrel}{\mt@font@tbu}{"3A}
+\DeclareMathSymbol{:}{\mathrel}{\mt@font@tbu}{"3A} % relation spacing
\@ifpackageloaded{amsmath}
- {}
- {\let\colon\undefined
- \DeclareMathSymbol{\colon}{\mathpunct}{\mt@font@tbu}{"3A}}
+ {} %\colon defined in amsmath.sty (enlarged punctuation spacing)
+ {\let\colon\undefined % no amsmath, use punctuation spacing
+ \DeclareMathSymbol{\colon}{\mathpunct}{\mt@font@tbu}{"3A}}
\DeclareMathSymbol{;}{\mathpunct}{\mt@font@tbu}{"3B}
\fi
% \end{macrocode}
@@ -1462,7 +1796,7 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
% have to redefine \cs{Relbar} and \cs{relbar} in order for
% them to preserve their original meanings.
% \begin{macrocode}
-\ifx\mtno@minus\@empty\else
+\ifmt@nominus\else
\edef\mt@minus@sign{\mathord{\expandafter\mathchar\number\mathcode`\-}}
\def\relbar{\mathrel{\smash\mt@minus@sign}}
\def\rightarrowfill{$\m@th\mt@minus@sign\mkern-7mu%
@@ -1484,7 +1818,6 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
% fontspec encodings EU1 and EU2)
% 2011/02/07, v1.12. Improved dealing of unicode engines.
% \begin{macrocode}
-\newif\ifmt@failed
\def\do@the@endashstuff{\edef\mt@enc{\m@stextenc}
\ifx\mt@enc\mt@eui % xetex+fontspec
\XeTeXmathcode`\-="2 "\the\symmtoperatorfont "2013 \relax
@@ -1527,7 +1860,7 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
{\expandafter\the\expandafter\csname\mt@enc\string\textemdash\endcsname}
\fi\fi
\fi\fi\fi\fi\fi}
-\ifx\mtno@minus\@empty\else
+\ifmt@nominus\else
\mt@failedfalse
\ifmt@endash\do@the@endashstuff\else
\ifmt@emdash\do@the@emdashstuff\else
@@ -1572,7 +1905,7 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\fi
\def\hbar{\mathrlap{\mt@ltbar{\ }}h}
\fi\fi}
-\ifx\mtno@hbar\@empty\else\do@the@hbarstuff\fi
+\ifmt@nohbar\else\do@the@hbarstuff\fi
% \end{macrocode}
% \end{macro}
% \end{macro}
@@ -1588,10 +1921,10 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
% whether upright or in italics.
% \begin{macro}{+,=,\Relbar}
% \begin{macrocode}
-\ifx\mtno@plus\@empty\else
+\ifmt@noplus\else
\DeclareMathSymbol{+}{\mathbin}{\mt@font@tbu}{"2B}
\fi
-\ifx\mtno@equal\@empty\else
+\ifmt@noequal\else
\edef\mt@equal@sign{{\expandafter\mathchar\number\mathcode`\=}}
\DeclareRobustCommand\Relbar{\mathrel{\mt@equal@sign}}
\DeclareMathSymbol{=}{\mathrel}{\mt@font@tbu}{"3D}
@@ -1600,7 +1933,7 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
% \end{macro}
% \begin{macro}{(,),[,],/}
% \begin{macrocode}
-\ifx\mtno@paren\@empty\else
+\ifmt@noparen\else
\DeclareMathDelimiter{(}{\mathopen} {\mt@font@tbu}{"28}{largesymbols}{"00}
\DeclareMathDelimiter{)}{\mathclose}{\mt@font@tbu}{"29}{largesymbols}{"01}
\DeclareMathDelimiter{[}{\mathopen} {\mt@font@tbu}{"5B}{largesymbols}{"02}
@@ -1613,7 +1946,7 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
% \begin{macro}{alldelims}
% \begin{macrocode}
\ifmt@alldelims
-%% \ifx\mt@symboldelimiters\@empty\else
+%% \ifmt@symboldelimiters\else
%% \ifx\mt@ti\mt@enc\else
%% \typeout{** mathastext: `alldelims'. Characters <,>,{,},| will be assumed
%% to^^J%
@@ -1650,7 +1983,7 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
% We never take the specials from the Symbol (Adobe) font, as they are not all
% available there.
% \begin{macrocode}
-\ifx\mtno@specials\@empty\else
+\ifmt@nospecials\else
\renewcommand{\#}{\ifmmode\edef\ms@tmp{7\the\symmtoperatorfont23}%
\mathchar\expandafter"\ms@tmp\relax\else\char"23\relax\fi}
\renewcommand{\$}{\ifmmode\edef\ms@tmp{7\the\symmtoperatorfont24}%
@@ -1672,7 +2005,7 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
% combine easily with the logical arrows, well, I could have done some box
% manipulations, but well, life is finite.
% \begin{macrocode}
-\ifx\mt@symbolmisc\@empty
+\ifmt@symbolmisc
\let\prod\undefined
\DeclareMathSymbol{\prod}{\mathop}{mtpsymbol}{213}
\let\sum\undefined
@@ -1746,7 +2079,7 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
% \begin{macro}{symbolre}
% I like the \cs{Re} and \cs{Im} from Symbol, so I overwrite the CM ones.
% \begin{macrocode}
-\ifx\mt@symbolre\@empty
+\ifmt@symbolre
\DeclareMathSymbol{\Re}{\mathord}{mtpsymbol}{"C2}
\DeclareMathSymbol{\Im}{\mathord}{mtpsymbol}{"C1}
\DeclareMathSymbol{\DotTriangle}{\mathord}{mtpsymbol}{92}
@@ -1754,22 +2087,12 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
% \end{macrocode}
% \end{macro}
% \begin{macro}{Greek letters}
-% selfGreek $>$ eulergreek $>$ symbolgreek
-%
-% v1.1 We declare control sequences for the capital Greek letters
-% which look like their latin counterparts. If \cs{digamma} is
-% defined, presumably some package has been loaded for greek
-% letters and we do not change anything (except if option
-% symbolgreek or eulergreek or selfgreek was passed). I took
-% motivation for this from the Xe\LaTeX{} package |mathspec|,
-% which I didn't know about when writing up the version |1.0| of
-% the present package. The goals of |mathastext| are much more
-% restricted than those achieved by |mathspec|.
+% LGRgreek $>$ selfGreek $>$ eulergreek $>$ symbolgreek
%
% v1.11 I correct some bugs on how eulergreek and
% symbolgreek interacted.
%
-% v.12b I introduced another very stupid bug (regarding
+% v1.12b I introduced another very stupid bug (regarding
% uppercase Greek) in v1.1. This is corrected here. All this
% business of checking for \cs{digamma} was truly stupid as
% some package might well have defined the font for Greek
@@ -1778,20 +2101,41 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
% started redefining uppercase Greek, and it is even worse
% than that as I was redefining not only relatively benign
% things such as \cs{Alpha} but also \cs{Phi} etc\dots
-%
+%
+% v1.13 * Option LGRgreek.
+% * Also, a behavior has been changed: it regards the selfGreek case,
+% the default shape is now the one for letters, not for operator-names
+% and digits. This complies to the ISO standard.
+% * version 1.12b did not define the \cs{omicron} in the case when no
+% Greek-related option was passed to the package. This was a bug.
% \begin{macrocode}
-\newif\ifmt@dogreek\mt@dogreektrue
\let\mt@mathord\mathalpha
-\ifx\mt@selfGreek\@empty \def\mt@font@tbu{mtoperatorfont}
- \else
-\ifx\mt@eulergreek\@empty \def\mt@font@tbu{mteulervm}
- \else
-\ifx\mt@symbolgreek\@empty \def\mt@font@tbu{mtpsymbol}
- \let\mt@mathord\mathord
- \else
- \mt@dogreekfalse
-\fi\fi\fi
-\ifmt@dogreek
+\mt@proceedtrue
+\ifmt@selfGreek
+ \def\mt@font@tbu{\mt@uppergreekfont}
+ \else
+\ifmt@eulergreek
+ \def\mt@font@tbu{mteulervm}
+ \else
+\ifmt@symbolgreek
+ \def\mt@font@tbu{mtpsymbol}
+ \let\mt@mathord\mathord
+ \else
+\ifmt@LGRgreek
+ \mt@proceedfalse
+ \else
+% \end{macrocode}
+% The \cs{omicron} requires special treatment. By default we use the o from the
+% (original) normal alphabet, if eulergreek or symbolgreek we adapt. There is
+% also a special adjustment if the package |fourier| was loaded in its
+% |upright| variant: we then take \cs{omicron} from the (original) rm alphabet.
+% \begin{macrocode}
+ \mt@proceedfalse
+ \ifx\omicron\undefined
+ \newcommand{\omicron}{\mt@saved@mathnormal{o}}
+ \fi
+\fi\fi\fi\fi
+\ifmt@proceed
\DeclareMathSymbol{\Alpha}{\mt@mathord}{\mt@font@tbu}{"41}
\DeclareMathSymbol{\Beta}{\mt@mathord}{\mt@font@tbu}{"42}
\DeclareMathSymbol{\Epsilon}{\mt@mathord}{\mt@font@tbu}{"45}
@@ -1823,7 +2167,7 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\DeclareMathSymbol{\Delta}{\mathord}{mtpsymbol}{"44}
\DeclareMathSymbol{\Theta}{\mathord}{mtpsymbol}{"51}
\DeclareMathSymbol{\Lambda}{\mathord}{mtpsymbol}{"4C}
-\DeclareMathSymbol{\Xi}{\mathord}{mtpsymbol}{"58} %% was "59 in v10
+\DeclareMathSymbol{\Xi}{\mathord}{mtpsymbol}{"58}
\DeclareMathSymbol{\Pi}{\mathord}{mtpsymbol}{"50}
\DeclareMathSymbol{\Sigma}{\mathord}{mtpsymbol}{"53}
\DeclareMathSymbol{\Upsilon}{\mathord}{mtpsymbol}{"A1}
@@ -1849,11 +2193,6 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\fi
\fi
% \end{macrocode}
-% The \cs{omicron} requires special treatment. By default we use the o from the
-% (original) normal alphabet, if eulergreek or symbolgreek we adapt. There is
-% also a special adjustment needed if the package |fourier| was loaded in its
-% |upright| variant: we then take \cs{omicron} from the (original) rm alphabet.
-%
% There are differences regarding Euler and Symbol with respect to the
% available var-letters. We include one or two things like the |wp| and the
% |partial|.
@@ -1861,11 +2200,9 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
% The lower case Greek letters in default \LaTeX{} are of type |mathord|. If
% we use the Euler font it is perhaps better to have them be of type
% |mathalpha|
-%
-% v1.12b: I define \cs{omicron} only if (eulergreek or
-% symbolgreek) OR it was not defined
% \begin{macrocode}
-\ifx\mt@eulergreek\@empty
+\ifmt@proceed
+\ifmt@eulergreek
\DeclareMathSymbol{\alpha} {\mathalpha}{mteulervm}{"0B}
\DeclareMathSymbol{\beta} {\mathalpha}{mteulervm}{"0C}
\DeclareMathSymbol{\gamma} {\mathalpha}{mteulervm}{"0D}
@@ -1901,7 +2238,7 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\DeclareMathSymbol{\wp}{\mathalpha}{mteulervm}{"7D}
\DeclareMathSymbol{\ell}{\mathalpha}{mteulervm}{"60}
\else
-\ifx\mt@symbolgreek\@empty
+\ifmt@symbolgreek
\DeclareMathSymbol{\alpha}{\mathord}{mtpsymbol}{"61}
\DeclareMathSymbol{\beta}{\mathord}{mtpsymbol}{"62}
\DeclareMathSymbol{\gamma}{\mathord}{mtpsymbol}{"67}
@@ -1935,10 +2272,64 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\DeclareMathSymbol{\varphi}{\mathord}{mtpsymbol}{"6A}
\DeclareMathSymbol{\partial}{\mathord}{mtpsymbol}{"B6}
\DeclareMathSymbol{\wp}{\mathord}{mtpsymbol}{"C3}
-\else
-\ifx\omicron\undefined
-\newcommand{\omicron}{\mt@saved@mathnormal{o}}\fi
-\fi\fi
+\fi\fi\fi
+%%
+\ifmt@LGRgreek
+\DeclareMathSymbol{\Alpha}{\mathalpha}{\mtlgrfontupper}{65}
+\DeclareMathSymbol{\Beta}{\mathalpha}{\mtlgrfontupper}{66}
+\DeclareMathSymbol{\Gamma}{\mathalpha}{\mtlgrfontupper}{71}
+\DeclareMathSymbol{\Delta}{\mathalpha}{\mtlgrfontupper}{68}
+\DeclareMathSymbol{\Epsilon}{\mathalpha}{\mtlgrfontupper}{69}
+\DeclareMathSymbol{\Zeta}{\mathalpha}{\mtlgrfontupper}{90}
+\DeclareMathSymbol{\Eta}{\mathalpha}{\mtlgrfontupper}{72}
+\DeclareMathSymbol{\Theta}{\mathalpha}{\mtlgrfontupper}{74}
+\DeclareMathSymbol{\Iota}{\mathalpha}{\mtlgrfontupper}{73}
+\DeclareMathSymbol{\Kappa}{\mathalpha}{\mtlgrfontupper}{75}
+\DeclareMathSymbol{\Lambda}{\mathalpha}{\mtlgrfontupper}{76}
+\DeclareMathSymbol{\Mu}{\mathalpha}{\mtlgrfontupper}{77}
+\DeclareMathSymbol{\Nu}{\mathalpha}{\mtlgrfontupper}{78}
+\DeclareMathSymbol{\Xi}{\mathalpha}{\mtlgrfontupper}{88}
+\DeclareMathSymbol{\Omicron}{\mathalpha}{\mtlgrfontupper}{79}
+\DeclareMathSymbol{\Pi}{\mathalpha}{\mtlgrfontupper}{80}
+\DeclareMathSymbol{\Rho}{\mathalpha}{\mtlgrfontupper}{82}
+\DeclareMathSymbol{\Sigma}{\mathalpha}{\mtlgrfontupper}{83}
+\DeclareMathSymbol{\Tau}{\mathalpha}{\mtlgrfontupper}{84}
+\DeclareMathSymbol{\Upsilon}{\mathalpha}{\mtlgrfontupper}{85}
+\DeclareMathSymbol{\Phi}{\mathalpha}{\mtlgrfontupper}{70}
+\DeclareMathSymbol{\Chi}{\mathalpha}{\mtlgrfontupper}{81}
+\DeclareMathSymbol{\Psi}{\mathalpha}{\mtlgrfontupper}{89}
+\DeclareMathSymbol{\Omega}{\mathalpha}{\mtlgrfontupper}{87}
+%
+\DeclareMathSymbol{\alpha}{\mathalpha}{mtlgrfont}{97}
+\DeclareMathSymbol{\beta}{\mathalpha}{mtlgrfont}{98}
+\DeclareMathSymbol{\gamma}{\mathalpha}{mtlgrfont}{103}
+\DeclareMathSymbol{\delta}{\mathalpha}{mtlgrfont}{100}
+\DeclareMathSymbol{\epsilon}{\mathalpha}{mtlgrfont}{101}
+\DeclareMathSymbol{\zeta}{\mathalpha}{mtlgrfont}{122}
+\DeclareMathSymbol{\eta}{\mathalpha}{mtlgrfont}{104}
+\DeclareMathSymbol{\theta}{\mathalpha}{mtlgrfont}{106}
+\DeclareMathSymbol{\iota}{\mathalpha}{mtlgrfont}{105}
+\DeclareMathSymbol{\kappa}{\mathalpha}{mtlgrfont}{107}
+\DeclareMathSymbol{\lambda}{\mathalpha}{mtlgrfont}{108}
+\DeclareMathSymbol{\mu}{\mathalpha}{mtlgrfont}{109}
+\DeclareMathSymbol{\nu}{\mathalpha}{mtlgrfont}{110}
+\DeclareMathSymbol{\xi}{\mathalpha}{mtlgrfont}{120}
+\DeclareMathSymbol{\omicron}{\mathalpha}{mtlgrfont}{111}
+\DeclareMathSymbol{\pi}{\mathalpha}{mtlgrfont}{112}
+\DeclareMathSymbol{\rho}{\mathalpha}{mtlgrfont}{114}
+\DeclareMathSymbol{\varsigma}{\mathalpha}{mtlgrfont}{99}
+\DeclareMathSymbol{\sigma}{\mathalpha}{mtlgrfont}{115}
+\DeclareMathSymbol{\tau}{\mathalpha}{mtlgrfont}{116}
+\DeclareMathSymbol{\upsilon}{\mathalpha}{mtlgrfont}{117}
+\DeclareMathSymbol{\phi}{\mathalpha}{mtlgrfont}{102}
+\DeclareMathSymbol{\chi}{\mathalpha}{mtlgrfont}{113}
+\DeclareMathSymbol{\psi}{\mathalpha}{mtlgrfont}{121}
+\DeclareMathSymbol{\omega}{\mathalpha}{mtlgrfont}{119}
+\DeclareMathSymbol{\digamma}{\mathalpha}{mtlgrfont}{147}
+\DeclareMathSymbol{\Digamma}{\mathalpha}{mtlgrfont}{195}
+% cf http://milde.users.sourceforge.net/LGR/lgrxenc.def.html
+% et greek.ldf du package babel
+\fi
% \end{macrocode}
% \end{macro}
% \begin{macro}{\inodot}
@@ -1947,7 +2338,8 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
% used \cs{i} and \cs{j} from the text font the problem would be with the
% fontsize, if in scriptstyle. The amsmath \cs{text} would do the trick.
% \begin{macrocode}
-\edef\mt@enc{\m@stextenc}\newif\ifmt@goon\mt@goontrue
+\edef\mt@enc{\m@stextenc}
+\mt@proceedtrue
\ifx\mt@enc\mt@eui % xetex and unicode font
\XeTeXmathchardef\inodot="7 "\the\symmtletterfont "0131 \relax
\XeTeXmathchardef\jnodot="7 "\the\symmtletterfont "0237 \relax
@@ -1968,15 +2360,15 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\DeclareMathSymbol{\inodot}{\mathalpha}{mtletterfont}{16}
\DeclareMathSymbol{\jnodot}{\mathalpha}{mtletterfont}{17}
\else
- \ifXeTeX\mt@goonfalse\else\ifLuaTeX\mt@goonfalse\else
+ \ifXeTeX\mt@proceedfalse\else\ifLuaTeX\mt@proceedfalse\else
\DeclareMathSymbol{\inodot}{\mathalpha}{mtletterfont}
{\expandafter\the\expandafter\csname\mt@enc\string\i\endcsname}
\DeclareMathSymbol{\jnodot}{\mathalpha}{mtletterfont}
{\expandafter\the\expandafter\csname\mt@enc\string\j\endcsname}
\fi\fi
\fi\fi\fi\fi\fi
-\ifx\mt@defaultimath\@empty\else
- \ifmt@goon
+\ifmt@defaultimath\else
+ \ifmt@proceed
\renewcommand{\imath}{\inodot}
\renewcommand{\jmath}{\jnodot}
\let\mt@oldi\i \let\mt@oldj\j
@@ -2000,7 +2392,7 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
% v1.12b: I add LY1 which is quasi like OT1
% \begin{macrocode}
\edef\mt@enc{\m@stextenc} %% rather one too many than sorry
-\ifx\mt@mathaccents\@empty
+\ifmt@mathaccents
\ifx\mt@ti\mt@enc
\DeclareMathAccent{\acute}{\mathalpha}{mtoperatorfont}{1}
\DeclareMathAccent{\grave}{\mathalpha}{mtoperatorfont}{0}
@@ -2072,7 +2464,7 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
% Scaling mechanism for the Symbol font.
% \begin{macrocode}
\AtBeginDocument{
- \ifmt@need@symbol
+ \ifmt@needsymbol
\DeclareFontFamily{U}{psy}{}
\DeclareFontShape{U}{psy}{m}{n}{<->s*[\psy@scale] psyr}{}
\fi
@@ -2108,6 +2500,6 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
%</dtx>
% \fi
%
-% \CheckSum{2387}
+% \CheckSum{2757}
% \Finale
\endinput \ No newline at end of file
diff --git a/Master/texmf-dist/source/latex/mathastext/mathastext.ins b/Master/texmf-dist/source/latex/mathastext/mathastext.ins
index adf7b68c453..e65095bb939 100644
--- a/Master/texmf-dist/source/latex/mathastext/mathastext.ins
+++ b/Master/texmf-dist/source/latex/mathastext/mathastext.ins
@@ -4,8 +4,8 @@
%%
%% Copyright (C) 2011 by Jean-Francois Burnol
%%
-%% Please report errors to jfbu at free dot fr
-%% Illustrative examples at
+%% Please report errors to jfbu (at) free.fr
+%% Numerous examples at
%% http://jf.burnol.free.fr/mathastext.html
%%
%% This file be distributed and/or modified under the
@@ -19,7 +19,7 @@
%%
%% --------------- start of docstrip commands ------------------
%%
-\def\filedate{2011/02/09}
+\def\filedate{2011/03/11}
\def\batchfile{mathastext.ins}
\input docstrip.tex
@@ -43,8 +43,8 @@ This is a generated file.
Copyright (C) 2011 by Jean-Francois Burnol
- Please report errors to jfbu at free dot fr
- Illustrative examples at
+ Please report errors to jfbu (at) free.fr
+ Numerous examples at
http://jf.burnol.free.fr/mathastext.html
This file may be distributed and/or modified under the
diff --git a/Master/texmf-dist/tex/latex/mathastext/mathastext.sty b/Master/texmf-dist/tex/latex/mathastext/mathastext.sty
index b8e168998cb..ef14e342c10 100644
--- a/Master/texmf-dist/tex/latex/mathastext/mathastext.sty
+++ b/Master/texmf-dist/tex/latex/mathastext/mathastext.sty
@@ -9,8 +9,8 @@
%%
%% Copyright (C) 2011 by Jean-Francois Burnol
%%
-%% Please report errors to jfbu at free dot fr
-%% Illustrative examples at
+%% Please report errors to jfbu (at) free.fr
+%% Numerous examples at
%% http://jf.burnol.free.fr/mathastext.html
%%
%% This file may be distributed and/or modified under the
@@ -31,7 +31,7 @@
%%
\NeedsTeXFormat{LaTeX2e}
\ProvidesFile{mathastext.sty}
- [2011/02/09 1.12b Use the text font in simple mathematics]
+ [2011/03/11 1.13 Use the text font in simple mathematics]
\newif\ifXeTeX
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname XeTeXinterchartoks\endcsname\relax
@@ -61,114 +61,157 @@
\edef\m@stextsh{\shapedefault}
\edef\m@stextbold{\bfdefault}
\edef\m@stextshletter{\shapedefault}
-\newif\ifmt@need@euler\mt@need@eulerfalse
-\newif\ifmt@need@symbol\mt@need@symbolfalse
-\newif\ifmt@defaultnormal\mt@defaultnormalfalse
-\newif\ifmt@defaultrm\mt@defaultrmfalse
-\newif\ifmt@defaultbf\mt@defaultbffalse
-\newif\ifmt@defaultsizes\mt@defaultsizesfalse
-\newif\ifmt@twelve\mt@twelvefalse
-%% new behavior in v1.11:
-\newif\ifmt@endash\mt@endashtrue
-\newif\ifmt@emdash\mt@emdashfalse
+\newif\ifmt@proceed
+\newif\ifmt@failed
\def\mt@oti{OT1}\def\mt@ti{T1}
\def\mt@eui{EU1}\def\mt@euii{EU2}
-\newif\ifmt@alldelims
-\ifx\mt@oti\m@stextenc\mt@alldelimsfalse\else\mt@alldelimstrue\fi
-%% new in v1.12b:
\def\mt@lyi{LY1}
-%% new or modified in v1.11:
-\DeclareOption{fouriervec}{\let\mt@fouriervec\@empty}
-\DeclareOption{nolessnomore}{\mt@alldelimsfalse}
+\newif\ifmt@italic\DeclareOption{italic}{\mt@italictrue
+ \edef\m@stextshletter{\itdefault}}
+\newif\ifmt@frenchmath
+\DeclareOption{frenchmath}{\mt@frenchmathtrue
+ \ExecuteOptions{italic}}
+%%
+\newif\ifmt@endash\mt@endashtrue
\DeclareOption{endash}{\mt@endashtrue}
-\DeclareOption{emdash}{\mt@emdashtrue\mt@endashfalse}
\DeclareOption{noendash}{\mt@endashfalse}
-\DeclareOption{symboldelimiters}{\mt@need@symboltrue
- \let\mt@symboldelimiters\@empty}
-%% new in v1.1:
-\DeclareOption{italic}{\let\mt@italic\@empty\edef\m@stextshletter{\itdefault}}
-\DeclareOption{frenchmath}{\let\mt@frenchmath\@empty}
-\DeclareOption{noplus}{\let\mtno@plus\@empty}
-\DeclareOption{nominus}{\let\mtno@minus\@empty}
-\DeclareOption{nohbar}{\let\mtno@hbar\@empty}
+\newif\ifmt@emdash\DeclareOption{emdash}{\mt@emdashtrue\mt@endashfalse}
+%%
+\newif\ifmt@alldelims
+\DeclareOption{alldelims}{\mt@alldelimstrue}
+\ifx\mt@oti\m@stextenc\else\mt@alldelimstrue\fi
+\DeclareOption{nolessnomore}{\mt@alldelimsfalse}
%%
-\DeclareOption{noparenthesis}{\let\mtno@paren\@empty}
-\DeclareOption{nopunctuation}{\let\mtno@punct\@empty}
+\newif\ifmt@noplus\DeclareOption{noplus}{\mt@noplustrue}
+\newif\ifmt@nominus\DeclareOption{nominus}{\mt@nominustrue}
\DeclareOption{noplusnominus}{\ExecuteOptions{noplus,nominus}}
-\DeclareOption{noequal}{\let\mtno@equal\@empty}
-\DeclareOption{noexclam}{\let\mtno@exclam\@empty}
-\DeclareOption{noasterisk}{\let\mtno@ast\@empty}
-\DeclareOption{nospecials}{\let\mtno@specials\@empty}
+%%
+\newif\ifmt@noparen\DeclareOption{noparenthesis}{\mt@noparentrue}
+\newif\ifmt@nopunct\DeclareOption{nopunctuation}{\mt@nopuncttrue}
+\newif\ifmt@noequal\DeclareOption{noequal}{\mt@noequaltrue}
+\newif\ifmt@noexclam\DeclareOption{noexclam}{\mt@noexclamtrue}
+\newif\ifmt@noast\DeclareOption{noasterisk}{\mt@noasttrue}
+\newif\ifmt@nospecials\DeclareOption{nospecials}{\mt@nospecialstrue}
\DeclareOption{basic}{\ExecuteOptions{noparenthesis,nopunctuation,%
noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
-\DeclareOption{nodigits}{\let\mtno@digits\@empty}
-\DeclareOption{defaultimath}{\let\mt@defaultimath\@empty}
-\DeclareOption{alldelims}{\mt@alldelimstrue}
-\DeclareOption{mathaccents}{\let\mt@mathaccents\@empty}
-\DeclareOption{selfGreek}{\let\mt@selfGreek\@empty}
-\DeclareOption{selfgreek}{\let\mt@selfGreek\@empty}
-\DeclareOption{symboldigits}{\mt@need@symboltrue
- \let\mt@symboldigits\@empty}
-\DeclareOption{symbolgreek}{\mt@need@symboltrue
- \let\mt@symbolgreek\@empty}
-\DeclareOption{symbolre}{\mt@need@symboltrue
- \let\mt@symbolre\@empty}
-\DeclareOption{symbolmisc}{\mt@need@symboltrue
- \let\mt@symbolmisc\@empty}
+%%
+\newif\ifmt@nohbar\DeclareOption{nohbar}{\mt@nohbartrue}
+\newif\ifmt@nodigits\DeclareOption{nodigits}{\mt@nodigitstrue}
+\newif\ifmt@defaultimath\DeclareOption{defaultimath}{\mt@defaultimathtrue}
+\newif\ifmt@mathaccents\DeclareOption{mathaccents}{\mt@mathaccentstrue}
+%%
+\newif\ifmt@selfGreek
+ \DeclareOption{selfGreek}{\mt@selfGreektrue}
+ \DeclareOption{selfgreek}{\mt@selfGreektrue}
+\newif\ifmt@LGRgreek\DeclareOption{LGRgreek}{\mt@LGRgreektrue}
+%%
+\newif\ifmt@needsymbol
+\newif\ifmt@symboldelimiters
+\DeclareOption{symboldelimiters}{\mt@needsymboltrue\mt@symboldelimiterstrue}
+\newif\ifmt@symboldigits
+\DeclareOption{symboldigits}{\mt@needsymboltrue\mt@symboldigitstrue}
+\newif\ifmt@symbolgreek
+\DeclareOption{symbolgreek}{\mt@needsymboltrue\mt@symbolgreektrue}
+\newif\ifmt@symbolre
+\DeclareOption{symbolre}{\mt@needsymboltrue\mt@symbolretrue}
+\newif\ifmt@symbolmisc
+\DeclareOption{symbolmisc}{\mt@needsymboltrue\mt@symbolmisctrue}
\DeclareOption{symbol}{\ExecuteOptions{symbolgreek,symbolmisc,symbolre}}
\DeclareOption{symbolmax}{\ExecuteOptions{symbol,symboldelimiters}}
-\DeclareOption{eulerdigits}{\mt@need@eulertrue\let\mt@eulerdigits\@empty}
-\DeclareOption{eulergreek}{\mt@need@eulertrue\let\mt@eulergreek\@empty}
+%%
+\newif\ifmt@needeuler
+\newif\ifmt@eulerdigits
+\DeclareOption{eulerdigits}{\mt@needeulertrue\mt@eulerdigitstrue}
+\newif\ifmt@eulergreek
+\DeclareOption{eulergreek}{\mt@needeulertrue\mt@eulergreektrue}
+%%
+\newif\ifmt@twoshapesforgreek
+\newif\ifmt@upgreek
+\newif\ifmt@itgreek
+\newif\ifmt@upGreek
+\newif\ifmt@itGreek
+\DeclareOption{upgreek}{\mt@upgreektrue}
+\DeclareOption{itgreek}{\mt@itgreektrue}
+\DeclareOption{upGreek}{\mt@twoshapesforgreektrue\mt@upGreektrue}
+\DeclareOption{itGreek}{\mt@twoshapesforgreektrue\mt@itGreektrue}
+%%
+\newif\ifmt@defaultnormal
\DeclareOption{defaultnormal}{\mt@defaultnormaltrue}
+\newif\ifmt@defaultrm
\DeclareOption{defaultrm}{\mt@defaultrmtrue}
+\newif\ifmt@defaultbf
\DeclareOption{defaultbf}{\mt@defaultbftrue}
-\DeclareOption{defaultmathsizes}{\mt@defaultsizestrue}
-\DeclareOption{12pt}{\mt@twelvetrue}
+\newif\ifmt@defaultsizes\DeclareOption{defaultmathsizes}{\mt@defaultsizestrue}
+\newif\ifmt@twelve\DeclareOption{12pt}{\mt@twelvetrue}
+\newif\ifmt@fouriervec\DeclareOption{fouriervec}{\mt@fouriervectrue}
\DeclareOption*{\PackageWarning{mathastext}{Unknown option `\CurrentOption'}}
-\ProcessOptions\relax
%%
-\DeclareRobustCommand\pmvec[1]{\mathord{\stackrel{\raisebox{-.5ex}%
-{\tiny\boldmath$\mathord{\rightarrow}$}}{{}#1}}}
-\ifx\mt@fouriervec\@empty
- \DeclareFontEncoding{FML}{}{}
- \DeclareFontSubstitution{FML}{futm}{m}{it}
- \DeclareSymbolFont{mtfourierpourvec}{FML}{futm}{m}{it}
- \SetSymbolFont{mtfourierpourvec}{bold}{FML}{futm}{b}{it}
- \DeclareMathAccent{\fouriervec}{\mathord}{mtfourierpourvec}{"7E}
-\fi
+\ProcessOptions\relax
\DeclareSymbolFont{mtoperatorfont}
{\m@stextenc}{\m@stextfam}{\m@stextser}{\m@stextsh}
\DeclareSymbolFont{mtletterfont}
{\m@stextenc}{\m@stextfam}{\m@stextser}{\m@stextshletter}
\DeclareSymbolFontAlphabet{\Mathnormal}{mtletterfont}
\DeclareSymbolFontAlphabet{\Mathrm}{mtoperatorfont}
- \def\m@stextenc{\encodingdefault}
- \def\m@stextfam{\familydefault}
- \def\m@stextser{\seriesdefault}
- \def\m@stextsh{\shapedefault}
- \def\m@stextbold{\bfdefault}
- \def\m@stextshletter{\shapedefault}
- \ifx\mt@italic\@empty\def\m@stextshletter{\itdefault}\fi
-\ifmt@need@euler
+\ifmt@LGRgreek
+ \DeclareFontEncoding{LGR}{}{}
+ \DeclareSymbolFont{mtlgrfont}{LGR}
+ {\m@stextfam}{\m@stextser}{\m@stextshletter}
+ \def\mtlgrfontupper{mtlgrfont}
+ \ifmt@twoshapesforgreek
+ \ifmt@upGreek
+ \DeclareSymbolFont{mtlgrfontupper}{LGR}{\m@stextfam}{\m@stextser}{n}
+ \else
+ \DeclareSymbolFont{mtlgrfontupper}{LGR}{\m@stextfam}{\m@stextser}{it}
+ \fi
+ \def\mtlgrfontupper{mtlgrfontupper}
+ \fi
+\else
+\ifmt@selfGreek\mt@proceedfalse
+ \ifmt@upGreek\def\mt@tmp{n}\mt@proceedtrue\else
+ \ifmt@upgreek\def\mt@tmp{n}\mt@proceedtrue\else
+ \ifmt@itGreek\def\mt@tmp{it}\mt@proceedtrue\else
+ \ifmt@itgreek\def\mt@tmp{it}\mt@proceedtrue
+ \fi\fi\fi\fi
+ \ifmt@proceed
+ \def\mt@uppergreekfont{mtselffontupper}
+ \DeclareSymbolFont{mtselffontupper}{\m@stextenc} % should be OT1!
+ {\m@stextfam}{\m@stextser}{\mt@tmp}
+ \else
+ \ifmt@frenchmath
+ \def\mt@uppergreekfont{mtoperatorfont}
+ \else
+ \def\mt@uppergreekfont{mtletterfont}
+ \fi
+ \fi
+\fi\fi
+\ifmt@needeuler
\DeclareSymbolFont{mteulervm}{U}{zeur}{m}{n}
\DeclareSymbolFontAlphabet{\MathEuler}{mteulervm}
-%% \SetSymbolFont{mteulervm}{bold}{U}{zeur}{\m@stextbold}{n}
\fi
\newcommand\MTEulerScale[1]{\edef\zeu@Scale{#1}}
\let\MathastextEulerScale\MTEulerScale
-\ifmt@need@symbol
+\ifmt@needsymbol
\def\psy@scale{1}
\DeclareSymbolFont{mtpsymbol}{U}{psy}{m}{n}
-%% \SetSymbolFont{mtpsymbol}{bold}{U}{psy}{\m@stextbold}{n}
\DeclareSymbolFontAlphabet{\MathPSymbol}{mtpsymbol}
\fi
\newcommand\MTSymbolScale[1]{\edef\psy@scale{#1}}
\let\MathastextSymbolScale\MTSymbolScale
+\DeclareRobustCommand\pmvec[1]{\mathord{\stackrel{\raisebox{-.5ex}%
+{\tiny\boldmath$\mathord{\rightarrow}$}}{{}#1}}}
+\ifmt@fouriervec
+ \DeclareFontEncoding{FML}{}{}
+ \DeclareFontSubstitution{FML}{futm}{m}{it}
+ \DeclareSymbolFont{mtfourierpourvec}{FML}{futm}{m}{it}
+ \SetSymbolFont{mtfourierpourvec}{bold}{FML}{futm}{b}{it}
+ \DeclareMathAccent{\fouriervec}{\mathord}{mtfourierpourvec}{"7E}
+\fi
\DeclareRobustCommand\MTencoding[1]{\def\m@stextenc{#1}}
\DeclareRobustCommand\MTfamily[1]{\def\m@stextfam{#1}}
\DeclareRobustCommand\MTseries[1]{\def\m@stextser{#1}}
\DeclareRobustCommand\MTshape[1]{\def\m@stextsh{#1}
- \ifx\mt@italic\@empty\else\def\m@stextshletter{#1}\fi}
+ \ifmt@italic\else\def\m@stextshletter{#1}\fi}
\DeclareRobustCommand\MTboldvariant[1]{\def\m@stextbold{#1}}
\DeclareRobustCommand\MTlettershape[1]{\def\m@stextshletter{#1}}
\let\Mathastextencoding\MTencoding
@@ -190,6 +233,7 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\fi
\Mathastext}
\let\MathastextWillUse\MTWillUse
+\let\Mathastextwilluse\MTWillUse
\DeclareRobustCommand\Mathastext[1][\@empty]{
\mt@font@info@off
\ifx\@empty#1 % no optional argument
@@ -218,7 +262,7 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
{\mt@family@normal}
{\mt@series@normal}
{\mt@shape@normal}
- \SetSymbolFont{mtoperatorfont}{bold} {\mt@encoding@bold}
+ \SetSymbolFont{mtoperatorfont}{bold} {\mt@encoding@bold}
{\mt@family@bold}
{\mt@series@bold}
{\mt@shape@bold}
@@ -230,17 +274,50 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
{\mt@family@bold}
{\mt@series@bold}
{\mt@ltshape@bold}
- \ifmt@need@euler
+ \ifmt@needeuler
\SetSymbolFont{mteulervm}{bold}{U}{zeur}{\mt@boldvariant@normal}{n}
\DeclareMathAlphabet{\MathEulerBold}{U}{zeur}{\mt@boldvariant@normal}{n}
\fi
- \ifmt@need@symbol\SetSymbolFont{mtpsymbol}{bold}
- {U}{psy}{\mt@boldvariant@normal}{n}\fi
- \typeout{** Latin letters in math versions normal (resp. bold) are now^^J%
+ \ifmt@needsymbol\SetSymbolFont{mtpsymbol}{bold}
+ {U}{psy}{\mt@boldvariant@normal}{n}
+ \fi
+ \ifmt@LGRgreek
+ \ifmt@upgreek\def\mt@tmp{n}
+ \else\ifmt@itgreek\def\mt@tmp{it}
+ \else\ifmt@frenchmath\def\mt@tmp{\mt@shape@normal}
+ \else\def\mt@tmp{\mt@ltshape@normal}
+ \fi\fi\fi
+ \SetSymbolFont{mtlgrfont}{normal}{LGR}
+ {\mt@family@normal}{\mt@series@normal}{\mt@tmp}
+ \SetSymbolFont{mtlgrfont}{bold}{LGR}
+ {\mt@family@bold}{\mt@boldvariant@normal}{\mt@tmp}
+ \ifmt@twoshapesforgreek
+ \ifmt@upGreek\def\mt@tmp{n}\else\def\mt@tmp{it}\fi
+ \SetSymbolFont{mtlgrfontupper}{normal}{LGR}
+ {\mt@family@normal}{\mt@series@normal}{\mt@tmp}
+ \SetSymbolFont{mtlgrfontupper}{bold}{LGR}
+ {\mt@family@bold}{\mt@boldvariant@bold}{\mt@tmp}
+ \fi
+ \else
+ \ifmt@selfGreek
+ \mt@proceedfalse
+ \ifmt@upGreek\def\mt@tmp{n}\mt@proceedtrue\else
+ \ifmt@upgreek\def\mt@tmp{n}\mt@proceedtrue\else
+ \ifmt@itGreek\def\mt@tmp{it}\mt@proceedtrue\else
+ \ifmt@itgreek\def\mt@tmp{it}\mt@proceedtrue
+ \fi\fi\fi\fi
+ \ifmt@proceed
+ \SetSymbolFont{mtselffontupper}{normal}{\mt@encoding@normal}
+ {\mt@family@normal}{\mt@series@normal}{\mt@tmp}
+ \SetSymbolFont{mtselffontupper}{bold}{\mt@encoding@bold}
+ {\mt@family@bold}{\mt@boldvariant@bold}{\mt@tmp}
+ \fi
+\fi\fi
+\typeout{** Latin letters in math versions normal (resp. bold) are now^^J%
** set up to use the fonts
\mt@encoding@normal/\mt@family@normal/\mt@series@normal%
(\mt@boldvariant@normal)/\mt@ltshape@normal}
-\ifx\mtno@digits\@empty\else
+\ifmt@nodigits\else
\typeout{** Other characters (digits, ...) and
\protect\log-like names will be^^J%
** typeset with the \expandafter`\mt@shape@normal' shape.}
@@ -258,13 +335,13 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
}
\DeclareRobustCommand\MTDeclareVersion[6][\@empty]{
\mt@font@info@off
- \edef\mt@tmp{#2}
- \DeclareMathVersion{\mt@tmp}
- \expandafter\edef\csname mt@encoding@\mt@tmp\endcsname{#3}
- \expandafter\edef\csname mt@family@\mt@tmp\endcsname{#4}
- \expandafter\edef\csname mt@series@\mt@tmp\endcsname{#5}
- \expandafter\edef\csname mt@shape@\mt@tmp\endcsname{#6}
- \expandafter\edef\csname mt@boldvariant@\mt@tmp\endcsname{\m@stextbold}
+ \edef\mt@version{#2}
+ \DeclareMathVersion{\mt@version}
+ \expandafter\edef\csname mt@encoding@\mt@version\endcsname{#3}
+ \expandafter\edef\csname mt@family@\mt@version\endcsname{#4}
+ \expandafter\edef\csname mt@series@\mt@version\endcsname{#5}
+ \expandafter\edef\csname mt@shape@\mt@version\endcsname{#6}
+ \expandafter\edef\csname mt@boldvariant@\mt@version\endcsname{\m@stextbold}
\newif\ifmt@reallynoopt\mt@reallynoopttrue
\ifx\@empty#1
\else % we check nevertheless for [] situation, will not work with [ ]
@@ -272,78 +349,121 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\ifx\mt@@tmp\mt@empty\else\mt@reallynooptfalse\fi
\fi
\ifmt@reallynoopt
- \ifx\mt@italic\@empty
+ \ifmt@italic
\SetSymbolFont{mtletterfont}{#2}{#3}{#4}{#5}{\m@stextshletter}
\typeout{** Latin letters in math version `#2' will use the font
#3/#4/#5/\m@stextshletter^^J%
** Other characters (digits, ...) and \protect\log-like names
will be in `#6' shape.}
- \expandafter\def\csname mt@ltshape\mt@tmp\endcsname{\m@stextshletter}
+ \expandafter\edef\csname mt@ltshape@\mt@version\endcsname{\m@stextshletter}
\else
\SetSymbolFont{mtletterfont}{#2}{#3}{#4}{#5}{#6}
\typeout{** Latin letters in math version `#2' will use the fonts
#3/#4/#5(\m@stextbold)/#6}
- \expandafter\edef\csname mt@ltshape\mt@tmp\endcsname{#6}
+ \expandafter\edef\csname mt@ltshape@\mt@version\endcsname{#6}
\fi
\else
\SetSymbolFont{mtletterfont}{#2}{#3}{#4}{#5}{#1}
\typeout{** Latin letters in math version `#2' 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 mt@ltshape\mt@tmp\endcsname{#1}
+ ** Other characters (digits, ...) and \protect\log-like
+ names will be in `#6' shape.}
+ \expandafter\edef\csname mt@ltshape@\mt@version\endcsname{#1}
\fi
\SetMathAlphabet{\Mathbf}{#2}{#3}{#4}{\m@stextbold}{#6}
\SetSymbolFont{mtoperatorfont}{#2}{#3}{#4}{#5}{#6}
- \ifmt@need@euler
+ \ifmt@needeuler
\SetMathAlphabet{\MathEulerBold}{#2}{U}{zeur}{\m@stextbold}{n}
\fi
+ \ifmt@LGRgreek
+ \ifmt@upgreek\def\mt@tmp{n}
+ \else\ifmt@itgreek\def\mt@tmp{it}
+ \else\ifmt@frenchmath\def\mt@tmp{\csname mt@shape@\mt@version\endcsname}
+ \else\def\mt@tmp{\csname mt@ltshape@\mt@version\endcsname}
+ \fi\fi\fi
+ \SetSymbolFont{mtlgrfont}{#2}{LGR}{#4}{#5}{\mt@tmp}
+%% \typeout{** Greek letters in math version `#2' will use the font
+%% LGR/#4/#5/\mt@tmp}
+ \ifmt@twoshapesforgreek
+ \ifmt@upGreek\def\mt@tmp{n}\else\def\mt@tmp{it}\fi
+ \SetSymbolFont{mtlgrfontupper}{#2}{LGR}{#4}{#5}{\mt@tmp}
+%% \typeout{** Uppercase Greek letters in math version `#2' will use the font
+%% LGR/#4/#5/\mt@tmp}
+ \fi
+\else
+ \ifmt@selfGreek
+ \mt@proceedfalse
+ \ifmt@upGreek\def\mt@tmp{n}\mt@proceedtrue\else
+ \ifmt@upgreek\def\mt@tmp{n}\mt@proceedtrue\else
+ \ifmt@itGreek\def\mt@tmp{it}\mt@proceedtrue\else
+ \ifmt@itgreek\def\mt@tmp{it}\mt@proceedtrue
+ \fi\fi\fi\fi
+ \ifmt@proceed
+ \SetSymbolFont{mtselffontupper}{#2}{#3}{#4}{#5}{\mt@tmp}
+ \fi
+\fi\fi
\mt@font@info@on
}
\let\MathastextDeclareVersion\MTDeclareVersion
-\def\operator@font{\mathgroup\symmtoperatorfont}
+ \def\m@stextenc{\encodingdefault}
+ \def\m@stextfam{\familydefault}
+ \def\m@stextser{\seriesdefault}
+ \def\m@stextsh{\shapedefault}
+ \def\m@stextbold{\bfdefault}
+ \def\m@stextshletter{\shapedefault}
+ \ifmt@italic\def\m@stextshletter{\itdefault}\fi
\Mathastext
+\def\operator@font{\mathgroup\symmtoperatorfont}
\let\mt@saved@mathnormal\mathnormal
\@ifpackageloaded{fourier}{\ifsloped\else\let\mt@saved@mathnormal\mathrm\fi}{}
\ifmt@defaultnormal\else\renewcommand{\mathnormal}{\Mathnormal}\fi
\ifmt@defaultrm\else\renewcommand{\mathrm}{\Mathrm}\fi
\ifmt@defaultbf\else\renewcommand{\mathbf}{\Mathbf}\fi
-\ifx\mt@symbolgreek\@empty
-\typeout{** Greek letters will use the PostScript Symbol font. Use^^J%
-** \protect\MathastextSymbolScale{factor} to scale the font by <factor>.}
-\fi
-\ifx\mt@eulergreek\@empty
-\typeout{** Greek letters will use the Euler font. Use^^J%
-** \protect\MathastextEulerScale{factor} to scale the font by <factor>.}
-\fi
-\ifx\mt@selfGreek\@empty
-\typeout{** Capital Greek letters from the fonts declared for latin letters:^^J%
+%% \ifmt@LGRgreek
+%% \typeout{** Greek letters will use the font
+%% LGR/\mt@family@normal/\mt@series@normal/\mt@ltshape@normal}
+%% \else
+\ifmt@selfGreek
+ \typeout{** Capital Greek letters will be taken from the fonts
+ declared for latin letters:^^J%
** only for OT1 or compatible encodings; glyphs may be unavailable.}
-\fi
+\else
+\ifmt@eulergreek
+ \typeout{** Greek letters will use the Euler font. Use^^J%
+** \protect\MathastextEulerScale{<factor>} to scale the font.}
+\else
+\ifmt@symbolgreek
+ \typeout{** Greek letters will use the PostScript Symbol font. Use^^J%
+** \protect\MathastextSymbolScale{<factor>} to scale the font.}
+\fi\fi\fi
+%%\fi
\DeclareRobustCommand\MTVersion[2][\@empty]{%
\mathversion{#2}%
\ifx\@empty#1% no optional argument
- \edef\mt@tmp{@#2}
+ \edef\mt@tmp{#2}
\else% we check nevertheless for [] situation, will not work with [ ]
\def\mt@@tmp{#1}\def\mt@empty{}%
- \ifx\mt@@tmp\mt@empty\edef\mt@tmp{@#2}%
- \else\edef\mt@tmp{@#1}%
+ \ifx\mt@@tmp\mt@empty\edef\mt@tmp{#2}%
+ \else\edef\mt@tmp{#1}%
\fi%
\fi%
- \usefont{\csname mt@encoding\mt@tmp\endcsname}%
- {\csname mt@family\mt@tmp\endcsname}%
- {\csname mt@series\mt@tmp\endcsname}%
- {\csname mt@shape\mt@tmp\endcsname}%
- \edef\mt@@encoding{\csname mt@encoding\mt@tmp\endcsname}%
+ \usefont{\csname mt@encoding@\mt@tmp\endcsname}%
+ {\csname mt@family@\mt@tmp\endcsname}%
+ {\csname mt@series@\mt@tmp\endcsname}%
+ {\csname mt@shape@\mt@tmp\endcsname}%
+ \edef\mt@@encoding{\csname mt@encoding@\mt@tmp\endcsname}%
\renewcommand{\encodingdefault}{\mt@@encoding}%
- \edef\mt@@family{\csname mt@family\mt@tmp\endcsname}%
+ \edef\mt@@family{\csname mt@family@\mt@tmp\endcsname}%
\renewcommand{\rmdefault}{\mt@@family}%
- \edef\mt@@series{\csname mt@series\mt@tmp\endcsname}%
+ \edef\mt@@series{\csname mt@series@\mt@tmp\endcsname}%
\renewcommand{\mddefault}{\mt@@series}%
- \edef\mt@@shape{\csname mt@shape\mt@tmp\endcsname}%
+ \edef\mt@@shape{\csname mt@shape@\mt@tmp\endcsname}%
\renewcommand{\updefault}{\mt@@shape}%
- \edef\mt@@boldvariant{\csname mt@boldvariant\mt@tmp\endcsname}%
+ \edef\mt@@boldvariant{\csname mt@boldvariant@\mt@tmp\endcsname}%
\renewcommand{\bfdefault}{\mt@@boldvariant}}
\let\MathastextVersion\MTVersion
+\let\Mathastextversion\MTVersion
+\let\MTversion\MTVersion
\DeclareMathSymbol{a}{\mathalpha}{mtletterfont}{`a}
\DeclareMathSymbol{b}{\mathalpha}{mtletterfont}{`b}
\DeclareMathSymbol{c}{\mathalpha}{mtletterfont}{`c}
@@ -370,7 +490,7 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\DeclareMathSymbol{x}{\mathalpha}{mtletterfont}{`x}
\DeclareMathSymbol{y}{\mathalpha}{mtletterfont}{`y}
\DeclareMathSymbol{z}{\mathalpha}{mtletterfont}{`z}
-\ifx\mt@frenchmath\@empty\def\mt@font@tbu{mtoperatorfont}
+\ifmt@frenchmath\def\mt@font@tbu{mtoperatorfont}
\else\def\mt@font@tbu{mtletterfont}\fi
\DeclareMathSymbol{A}{\mathalpha}{\mt@font@tbu}{`A}
\DeclareMathSymbol{B}{\mathalpha}{\mt@font@tbu}{`B}
@@ -399,10 +519,10 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\DeclareMathSymbol{Y}{\mathalpha}{\mt@font@tbu}{`Y}
\DeclareMathSymbol{Z}{\mathalpha}{\mt@font@tbu}{`Z}
%%
-\ifx\mtno@digits\@empty\else
+\ifmt@nodigits\else
\def\mt@font@tbu{mtoperatorfont}
-\ifx\mt@symboldigits\@empty \def\mt@font@tbu{mtpsymbol} \fi
-\ifx\mt@eulerdigits\@empty \def\mt@font@tbu{mteulervm} \fi
+\ifmt@symboldigits \def\mt@font@tbu{mtpsymbol} \fi
+\ifmt@eulerdigits \def\mt@font@tbu{mteulervm} \fi
\DeclareMathSymbol{0}{\mathalpha}{\mt@font@tbu}{`0}
\DeclareMathSymbol{1}{\mathalpha}{\mt@font@tbu}{`1}
\DeclareMathSymbol{2}{\mathalpha}{\mt@font@tbu}{`2}
@@ -414,7 +534,7 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\DeclareMathSymbol{8}{\mathalpha}{\mt@font@tbu}{`8}
\DeclareMathSymbol{9}{\mathalpha}{\mt@font@tbu}{`9}
\fi
-\ifx\mt@symboldelimiters\@empty
+\ifmt@symboldelimiters
\def\mt@font@tbu{mtpsymbol}
\mt@endashfalse
\mt@emdashfalse
@@ -422,25 +542,25 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\def\mt@font@tbu{mtoperatorfont}
\fi
%%
-\ifx\mtno@exclam\@empty\else
+\ifmt@noexclam\else
\DeclareMathSymbol{!}{\mathclose}{\mt@font@tbu}{"21}
\DeclareMathSymbol{?}{\mathclose}{\mt@font@tbu}{"3F}
\fi
%%
-\ifx\mtno@ast\@empty\else
+\ifmt@noast\else
\DeclareMathSymbol{*}{\mathalpha}{\mt@font@tbu}{"2A}
\fi
-\ifx\mtno@punct\@empty\else
+\ifmt@nopunct\else
\DeclareMathSymbol{,}{\mathpunct}{\mt@font@tbu}{"2C}
\DeclareMathSymbol{.}{\mathord}{\mt@font@tbu}{"2E}
-\DeclareMathSymbol{:}{\mathrel}{\mt@font@tbu}{"3A}
+\DeclareMathSymbol{:}{\mathrel}{\mt@font@tbu}{"3A} % relation spacing
\@ifpackageloaded{amsmath}
- {}
- {\let\colon\undefined
+ {} %\colon defined in amsmath.sty (enlarged punctuation spacing)
+ {\let\colon\undefined % no amsmath, use punctuation spacing
\DeclareMathSymbol{\colon}{\mathpunct}{\mt@font@tbu}{"3A}}
\DeclareMathSymbol{;}{\mathpunct}{\mt@font@tbu}{"3B}
\fi
-\ifx\mtno@minus\@empty\else
+\ifmt@nominus\else
\edef\mt@minus@sign{\mathord{\expandafter\mathchar\number\mathcode`\-}}
\def\relbar{\mathrel{\smash\mt@minus@sign}}
\def\rightarrowfill{$\m@th\mt@minus@sign\mkern-7mu%
@@ -450,7 +570,6 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\cleaders\hbox{$\mkern-2mu\mt@minus@sign\mkern-2mu$}\hfill
\mkern-7mu\smash\mt@minus@sign$}
\fi
-\newif\ifmt@failed
\def\do@the@endashstuff{\edef\mt@enc{\m@stextenc}
\ifx\mt@enc\mt@eui % xetex+fontspec
\XeTeXmathcode`\-="2 "\the\symmtoperatorfont "2013 \relax
@@ -493,7 +612,7 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
{\expandafter\the\expandafter\csname\mt@enc\string\textemdash\endcsname}
\fi\fi
\fi\fi\fi\fi\fi}
-\ifx\mtno@minus\@empty\else
+\ifmt@nominus\else
\mt@failedfalse
\ifmt@endash\do@the@endashstuff\else
\ifmt@emdash\do@the@emdashstuff\else
@@ -519,16 +638,16 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\fi
\def\hbar{\mathrlap{\mt@ltbar{\ }}h}
\fi\fi}
-\ifx\mtno@hbar\@empty\else\do@the@hbarstuff\fi
-\ifx\mtno@plus\@empty\else
+\ifmt@nohbar\else\do@the@hbarstuff\fi
+\ifmt@noplus\else
\DeclareMathSymbol{+}{\mathbin}{\mt@font@tbu}{"2B}
\fi
-\ifx\mtno@equal\@empty\else
+\ifmt@noequal\else
\edef\mt@equal@sign{{\expandafter\mathchar\number\mathcode`\=}}
\DeclareRobustCommand\Relbar{\mathrel{\mt@equal@sign}}
\DeclareMathSymbol{=}{\mathrel}{\mt@font@tbu}{"3D}
\fi
-\ifx\mtno@paren\@empty\else
+\ifmt@noparen\else
\DeclareMathDelimiter{(}{\mathopen} {\mt@font@tbu}{"28}{largesymbols}{"00}
\DeclareMathDelimiter{)}{\mathclose}{\mt@font@tbu}{"29}{largesymbols}{"01}
\DeclareMathDelimiter{[}{\mathopen} {\mt@font@tbu}{"5B}{largesymbols}{"02}
@@ -537,7 +656,7 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\DeclareMathSymbol{/}{\mathord}{\mt@font@tbu}{"2F}
\fi
\ifmt@alldelims
-%% \ifx\mt@symboldelimiters\@empty\else
+%% \ifmt@symboldelimiters\else
%% \ifx\mt@ti\mt@enc\else
%% \typeout{** mathastext: `alldelims'. Characters <,>,{,},| will be assumed
%% to^^J%
@@ -562,7 +681,7 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\DeclareMathDelimiter{\rbrace}
{\mathclose}{\mt@font@tbu}{"7D}{largesymbols}{"09}
\fi
-\ifx\mtno@specials\@empty\else
+\ifmt@nospecials\else
\renewcommand{\#}{\ifmmode\edef\ms@tmp{7\the\symmtoperatorfont23}%
\mathchar\expandafter"\ms@tmp\relax\else\char"23\relax\fi}
\renewcommand{\$}{\ifmmode\edef\ms@tmp{7\the\symmtoperatorfont24}%
@@ -572,7 +691,7 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\renewcommand{\&}{\ifmmode\edef\ms@tmp{7\the\symmtoperatorfont26}%
\mathchar\expandafter"\ms@tmp\relax\else\char"26\relax\fi}
\fi
-\ifx\mt@symbolmisc\@empty
+\ifmt@symbolmisc
\let\prod\undefined
\DeclareMathSymbol{\prod}{\mathop}{mtpsymbol}{213}
\let\sum\undefined
@@ -641,23 +760,32 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\DeclareMathDelimiter{\langle}
{\mathopen}{mtpsymbol}{225}{largesymbols}{"0A}
\fi
-\ifx\mt@symbolre\@empty
+\ifmt@symbolre
\DeclareMathSymbol{\Re}{\mathord}{mtpsymbol}{"C2}
\DeclareMathSymbol{\Im}{\mathord}{mtpsymbol}{"C1}
\DeclareMathSymbol{\DotTriangle}{\mathord}{mtpsymbol}{92}
\fi
-\newif\ifmt@dogreek\mt@dogreektrue
\let\mt@mathord\mathalpha
-\ifx\mt@selfGreek\@empty \def\mt@font@tbu{mtoperatorfont}
- \else
-\ifx\mt@eulergreek\@empty \def\mt@font@tbu{mteulervm}
- \else
-\ifx\mt@symbolgreek\@empty \def\mt@font@tbu{mtpsymbol}
- \let\mt@mathord\mathord
- \else
- \mt@dogreekfalse
-\fi\fi\fi
-\ifmt@dogreek
+\mt@proceedtrue
+\ifmt@selfGreek
+ \def\mt@font@tbu{\mt@uppergreekfont}
+ \else
+\ifmt@eulergreek
+ \def\mt@font@tbu{mteulervm}
+ \else
+\ifmt@symbolgreek
+ \def\mt@font@tbu{mtpsymbol}
+ \let\mt@mathord\mathord
+ \else
+\ifmt@LGRgreek
+ \mt@proceedfalse
+ \else
+ \mt@proceedfalse
+ \ifx\omicron\undefined
+ \newcommand{\omicron}{\mt@saved@mathnormal{o}}
+ \fi
+\fi\fi\fi\fi
+\ifmt@proceed
\DeclareMathSymbol{\Alpha}{\mt@mathord}{\mt@font@tbu}{"41}
\DeclareMathSymbol{\Beta}{\mt@mathord}{\mt@font@tbu}{"42}
\DeclareMathSymbol{\Epsilon}{\mt@mathord}{\mt@font@tbu}{"45}
@@ -681,7 +809,7 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\DeclareMathSymbol{\Delta}{\mathord}{mtpsymbol}{"44}
\DeclareMathSymbol{\Theta}{\mathord}{mtpsymbol}{"51}
\DeclareMathSymbol{\Lambda}{\mathord}{mtpsymbol}{"4C}
-\DeclareMathSymbol{\Xi}{\mathord}{mtpsymbol}{"58} %% was "59 in v10
+\DeclareMathSymbol{\Xi}{\mathord}{mtpsymbol}{"58}
\DeclareMathSymbol{\Pi}{\mathord}{mtpsymbol}{"50}
\DeclareMathSymbol{\Sigma}{\mathord}{mtpsymbol}{"53}
\DeclareMathSymbol{\Upsilon}{\mathord}{mtpsymbol}{"A1}
@@ -703,7 +831,8 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\DeclareMathSymbol\Omega {\mathalpha}{\mt@font@tbu}{"0A}
\fi
\fi
-\ifx\mt@eulergreek\@empty
+\ifmt@proceed
+\ifmt@eulergreek
\DeclareMathSymbol{\alpha} {\mathalpha}{mteulervm}{"0B}
\DeclareMathSymbol{\beta} {\mathalpha}{mteulervm}{"0C}
\DeclareMathSymbol{\gamma} {\mathalpha}{mteulervm}{"0D}
@@ -739,7 +868,7 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\DeclareMathSymbol{\wp}{\mathalpha}{mteulervm}{"7D}
\DeclareMathSymbol{\ell}{\mathalpha}{mteulervm}{"60}
\else
-\ifx\mt@symbolgreek\@empty
+\ifmt@symbolgreek
\DeclareMathSymbol{\alpha}{\mathord}{mtpsymbol}{"61}
\DeclareMathSymbol{\beta}{\mathord}{mtpsymbol}{"62}
\DeclareMathSymbol{\gamma}{\mathord}{mtpsymbol}{"67}
@@ -773,11 +902,63 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\DeclareMathSymbol{\varphi}{\mathord}{mtpsymbol}{"6A}
\DeclareMathSymbol{\partial}{\mathord}{mtpsymbol}{"B6}
\DeclareMathSymbol{\wp}{\mathord}{mtpsymbol}{"C3}
-\else
-\ifx\omicron\undefined
-\newcommand{\omicron}{\mt@saved@mathnormal{o}}\fi
-\fi\fi
-\edef\mt@enc{\m@stextenc}\newif\ifmt@goon\mt@goontrue
+\fi\fi\fi
+%%
+\ifmt@LGRgreek
+\DeclareMathSymbol{\Alpha}{\mathalpha}{\mtlgrfontupper}{65}
+\DeclareMathSymbol{\Beta}{\mathalpha}{\mtlgrfontupper}{66}
+\DeclareMathSymbol{\Gamma}{\mathalpha}{\mtlgrfontupper}{71}
+\DeclareMathSymbol{\Delta}{\mathalpha}{\mtlgrfontupper}{68}
+\DeclareMathSymbol{\Epsilon}{\mathalpha}{\mtlgrfontupper}{69}
+\DeclareMathSymbol{\Zeta}{\mathalpha}{\mtlgrfontupper}{90}
+\DeclareMathSymbol{\Eta}{\mathalpha}{\mtlgrfontupper}{72}
+\DeclareMathSymbol{\Theta}{\mathalpha}{\mtlgrfontupper}{74}
+\DeclareMathSymbol{\Iota}{\mathalpha}{\mtlgrfontupper}{73}
+\DeclareMathSymbol{\Kappa}{\mathalpha}{\mtlgrfontupper}{75}
+\DeclareMathSymbol{\Lambda}{\mathalpha}{\mtlgrfontupper}{76}
+\DeclareMathSymbol{\Mu}{\mathalpha}{\mtlgrfontupper}{77}
+\DeclareMathSymbol{\Nu}{\mathalpha}{\mtlgrfontupper}{78}
+\DeclareMathSymbol{\Xi}{\mathalpha}{\mtlgrfontupper}{88}
+\DeclareMathSymbol{\Omicron}{\mathalpha}{\mtlgrfontupper}{79}
+\DeclareMathSymbol{\Pi}{\mathalpha}{\mtlgrfontupper}{80}
+\DeclareMathSymbol{\Rho}{\mathalpha}{\mtlgrfontupper}{82}
+\DeclareMathSymbol{\Sigma}{\mathalpha}{\mtlgrfontupper}{83}
+\DeclareMathSymbol{\Tau}{\mathalpha}{\mtlgrfontupper}{84}
+\DeclareMathSymbol{\Upsilon}{\mathalpha}{\mtlgrfontupper}{85}
+\DeclareMathSymbol{\Phi}{\mathalpha}{\mtlgrfontupper}{70}
+\DeclareMathSymbol{\Chi}{\mathalpha}{\mtlgrfontupper}{81}
+\DeclareMathSymbol{\Psi}{\mathalpha}{\mtlgrfontupper}{89}
+\DeclareMathSymbol{\Omega}{\mathalpha}{\mtlgrfontupper}{87}
+\DeclareMathSymbol{\alpha}{\mathalpha}{mtlgrfont}{97}
+\DeclareMathSymbol{\beta}{\mathalpha}{mtlgrfont}{98}
+\DeclareMathSymbol{\gamma}{\mathalpha}{mtlgrfont}{103}
+\DeclareMathSymbol{\delta}{\mathalpha}{mtlgrfont}{100}
+\DeclareMathSymbol{\epsilon}{\mathalpha}{mtlgrfont}{101}
+\DeclareMathSymbol{\zeta}{\mathalpha}{mtlgrfont}{122}
+\DeclareMathSymbol{\eta}{\mathalpha}{mtlgrfont}{104}
+\DeclareMathSymbol{\theta}{\mathalpha}{mtlgrfont}{106}
+\DeclareMathSymbol{\iota}{\mathalpha}{mtlgrfont}{105}
+\DeclareMathSymbol{\kappa}{\mathalpha}{mtlgrfont}{107}
+\DeclareMathSymbol{\lambda}{\mathalpha}{mtlgrfont}{108}
+\DeclareMathSymbol{\mu}{\mathalpha}{mtlgrfont}{109}
+\DeclareMathSymbol{\nu}{\mathalpha}{mtlgrfont}{110}
+\DeclareMathSymbol{\xi}{\mathalpha}{mtlgrfont}{120}
+\DeclareMathSymbol{\omicron}{\mathalpha}{mtlgrfont}{111}
+\DeclareMathSymbol{\pi}{\mathalpha}{mtlgrfont}{112}
+\DeclareMathSymbol{\rho}{\mathalpha}{mtlgrfont}{114}
+\DeclareMathSymbol{\varsigma}{\mathalpha}{mtlgrfont}{99}
+\DeclareMathSymbol{\sigma}{\mathalpha}{mtlgrfont}{115}
+\DeclareMathSymbol{\tau}{\mathalpha}{mtlgrfont}{116}
+\DeclareMathSymbol{\upsilon}{\mathalpha}{mtlgrfont}{117}
+\DeclareMathSymbol{\phi}{\mathalpha}{mtlgrfont}{102}
+\DeclareMathSymbol{\chi}{\mathalpha}{mtlgrfont}{113}
+\DeclareMathSymbol{\psi}{\mathalpha}{mtlgrfont}{121}
+\DeclareMathSymbol{\omega}{\mathalpha}{mtlgrfont}{119}
+\DeclareMathSymbol{\digamma}{\mathalpha}{mtlgrfont}{147}
+\DeclareMathSymbol{\Digamma}{\mathalpha}{mtlgrfont}{195}
+\fi
+\edef\mt@enc{\m@stextenc}
+\mt@proceedtrue
\ifx\mt@enc\mt@eui % xetex and unicode font
\XeTeXmathchardef\inodot="7 "\the\symmtletterfont "0131 \relax
\XeTeXmathchardef\jnodot="7 "\the\symmtletterfont "0237 \relax
@@ -798,15 +979,15 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\DeclareMathSymbol{\inodot}{\mathalpha}{mtletterfont}{16}
\DeclareMathSymbol{\jnodot}{\mathalpha}{mtletterfont}{17}
\else
- \ifXeTeX\mt@goonfalse\else\ifLuaTeX\mt@goonfalse\else
+ \ifXeTeX\mt@proceedfalse\else\ifLuaTeX\mt@proceedfalse\else
\DeclareMathSymbol{\inodot}{\mathalpha}{mtletterfont}
{\expandafter\the\expandafter\csname\mt@enc\string\i\endcsname}
\DeclareMathSymbol{\jnodot}{\mathalpha}{mtletterfont}
{\expandafter\the\expandafter\csname\mt@enc\string\j\endcsname}
\fi\fi
\fi\fi\fi\fi\fi
-\ifx\mt@defaultimath\@empty\else
- \ifmt@goon
+\ifmt@defaultimath\else
+ \ifmt@proceed
\renewcommand{\imath}{\inodot}
\renewcommand{\jmath}{\jnodot}
\let\mt@oldi\i \let\mt@oldj\j
@@ -815,7 +996,7 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
\fi
\fi
\edef\mt@enc{\m@stextenc} %% rather one too many than sorry
-\ifx\mt@mathaccents\@empty
+\ifmt@mathaccents
\ifx\mt@ti\mt@enc
\DeclareMathAccent{\acute}{\mathalpha}{mtoperatorfont}{1}
\DeclareMathAccent{\grave}{\mathalpha}{mtoperatorfont}{0}
@@ -874,7 +1055,7 @@ noplusnominus,noequal,noexclam,noasterisk,nospecials,nolessnomore}}
** To keep LaTeX defaults, use option `defaultmathsizes'.}
\fi
\AtBeginDocument{
- \ifmt@need@symbol
+ \ifmt@needsymbol
\DeclareFontFamily{U}{psy}{}
\DeclareFontShape{U}{psy}{m}{n}{<->s*[\psy@scale] psyr}{}
\fi