From b91f083eda084808b59b93d32baee2e9d1abd7fa Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Tue, 20 Aug 2019 20:44:27 +0000 Subject: mathastext (20aug19) git-svn-id: svn://tug.org/texlive/trunk@51914 c570f23f-e606-0410-a88d-b1316a301751 --- .../texmf-dist/doc/latex/mathastext/ChangeLog.md | 545 +++ Master/texmf-dist/doc/latex/mathastext/README.md | 598 +-- .../texmf-dist/doc/latex/mathastext/mathastext.pdf | Bin 454732 -> 464529 bytes .../latex/mathastext/mathastexttestalphabets.pdf | Bin 42494 -> 43063 bytes .../texmf-dist/source/latex/mathastext/INSTALL.txt | 44 + .../source/latex/mathastext/mathastext.dtx | 5082 +++++++++++--------- .../source/latex/mathastext/mathastext.ins | 56 - .../texmf-dist/tex/latex/mathastext/mathastext.sty | 1738 ++++--- 8 files changed, 4280 insertions(+), 3783 deletions(-) create mode 100644 Master/texmf-dist/doc/latex/mathastext/ChangeLog.md create mode 100644 Master/texmf-dist/source/latex/mathastext/INSTALL.txt delete mode 100644 Master/texmf-dist/source/latex/mathastext/mathastext.ins diff --git a/Master/texmf-dist/doc/latex/mathastext/ChangeLog.md b/Master/texmf-dist/doc/latex/mathastext/ChangeLog.md new file mode 100644 index 00000000000..53f6a0fcba3 --- /dev/null +++ b/Master/texmf-dist/doc/latex/mathastext/ChangeLog.md @@ -0,0 +1,545 @@ +MATHASTEXT CHANGE LOG +===================== + +1.3u \[2019/08/20\] +---- + +* new feature: the initial release dealt with only one font, and + although shortly thereafter the 1.11 version added support for + extended math versions, it was documented that some font-dependent + set-up (minus as endash, dotless i and j, hbar, math accents) was + done only once. This release makes the relevant characters font + encoding savvy in each mathastext-extended math version. Thus, + they should render correctly even with multiple math versions + using fonts with varying encodings. + + This reinforces importance of using `\MTversion` and not the + LaTeX `\mathversion` when switching to a new math version (which + got declared via the package interface). The implementation is + compatible with Unicode engines and mixed usage of `TU` encoding + (OpenType fonts) with traditional 8bits TeX font encodings. For + all engines, all used (8bits) encodings must have been passed as + options to the `fontenc` package. + + Thanks to Falk Hanisch for feature request and code suggestions. + +* new option `unimathaccents`: this adds to option `mathaccents` + the demand to use the text font accents for OpenType fonts in math + mode via the `\Umathaccent` primitive. Indeed, as my testing + showed that this gave non-satisfactory results both with XeTeX + and LuaTeX regarding the horizontal placement of the accents, + the main option `mathaccents` acts only on 8bits encoded fonts. + +* bugfix: the `\Mathastext` without optional argument forgot to + repeat some font-encoding dependent initialization set-up done + originally during package loading. + +* bugfix: under the `subdued` option macros `\MTmathactiveletters` + or `\MTnonlettersobeymathxx` now act like no-ops if + issued explicitly while in the `normal` or `bold` math version. + Formerly, this was not the case and could cause bugs such as a + disappearing minus sign in math mode. + +* bugfix: the letter `h` used in the `\hbar` obeyed the extra + skips as set-up by `\MTsetmathskips`, badly interfering with the + horizontal positioning of the bar accent. They are now ignored + (as well as the added italic correction). + +1.3t \[2018/08/22\] +---- + +* bugfix: the 1.3s bugfix about `subdued` compatibility with + `fontspec` was deficient. + +* bugfix: very old (v1.2, 2012/12/20) bug causing low-level TeX error + during package loading (with pdflatex) when setting up the math minus + sign to be the text font endash character, in cases with + `\encodingdefault` other than OT1, T1 or LY1, e.g. something like + T2A. + +* `\imath` and `\jmath` obey the `subdued` regime. And the minus sign + is now handled especially to ensure perfect compatibility with the + `subdued` option. + +* breaking change: `mathastext` does not redefine anymore + `\i` and `\j` to let them be usable both in text and math mode. + +1.3s \[2018/08/21\] +---- + +* fix to an issue with `subdued` option in a `fontspec` context. + + +1.3r \[2016/11/06\] +---- + +* documentation tweaks. + +1.3q \[2016/10/31\] +---- + +* new option `unicodeminus`. + +* the `Recent Changes` section of the documentation has been removed as it + was a duplicate of information available in the `Change Log`. + +* some other + changes in the documentation, in particular the use of straight quotes + in verbatim. + +1.3p \[2016/05/13\] +---- + +* bugfix: release `1.3n` had forgotten to activate by default its new + customization of the amsmath macro `\newmcodes@` (it was done from + using `\MTversion` in the document body but not by default at start + of body.) + +* public name `\MTfixmathfonts` for a `1.3o` macro. + +1.3o \[2016/05/03\] +---- + +* `mathastext` fixes an issue related to a feature of `LuaLaTeX` and + `luaotfload` that OpenType fonts are declared in one of two modes: + `node` and `base`, and only the latter is functional in math mode. But + by default text fonts are declared in mode `node`. Thus `mathastext` + now intervenes to make it so that the font it declares in math mode + will use mode `base`. This fixes issues with for example old style + figures being used while the text font used lining figures (or vice + versa, depending on the font). But see the code comments for more. + +1.3n \[2016/04/22\] +---- + +* at long last, `mathastext` takes care properly of annoying and perplexing + amsmath's `\newmcodes@`. The very recent change in `amsopn.sty` finally + made it compatible with Unicode engines, but anyhow, `mathastext` must do + its own patch to use the correct font. All of this taking into account + the various options passed to the package. Lots of trouble for a tiny thing. + +1.3m \[2016/04/02\] +---- + +* minor code maintenance before annual TL freeze. + +1.3l \[2016/01/29\] +---- + +* compatibility with fontspec's upcoming switch from `EU1/EU2` to + `TU` common to both Unicode engines. + +1.3k \[2016/01/24\] +---- + +* typos fixed in the documentation. In particular, the README link to + the package homepage had remained broken from day one of the package + releases: `mathastext.html` therein was misspelled as + `mathsastext.html` ! (but the pdf documentation had the correct link; + as well as the CTAN catalogue). + +1.3j \[2016/01/15\] +---- + +* renamed and modified recent `1.3i`'s `\MTactivemathoff` into + `\MTeverymathoff`. Added `\MTeverymathdefault`. + +* `subdued` mode is a bit stronger: also the asterisk reverts to the + default (if it was modified due to option `asterisk`), the added + extra `\mskip`'s (useful with upright fonts) for `'`, `\exists`, + and `\forall` are suppressed rather than re-configured to use `0mu`. + Related new commands `\MTexistsdoesskip`, `\MTforalldoesskip`, + `\MTprimedoesskip`, `\MTnormalexists`, `\MTnormalforall`, + `\MTnormalprime`. + +* the toggle for using mathematically active letters is only emitted + once during package loading; the `\Mathastext` command does not do + it anymore; the use in the preamble of `\MTmathstandardletters`, + or `\MTnoicinmath` and related commands is not overruled by later + use of `\Mathastext`. + +* quite a few documentation improvements and rewrites, particularly + in the description of commands which are related to the + modifications of mathcodes (mainly for math activation of + characters or letters) as done by mathastext at `\everymath` or + `\everydisplay`. + +1.3i \[2016/01/06\] +---- + +* `\url` from `url.sty` as well as `\url` and `\nolinkurl` from + `hyperref.sty` use math mode and (by default) the monospace text + font. To avoid mathastext overwriting the special preparation done + by `{url,hyperref}.sty` the commands `\url/\nolinkurl` are patched + to do automatically `\MTactivemathoff` (now `\MTeverymathoff`) + before entering math mode. + +* the extra skips specified by `\MTsetmathskips` are not inserted + around letters if inside the arguments of math alphabet commands, + or within operator names. + +* the added explicit italic corrections (for non-oblique fonts) were + disabled within math alphabet scopes, except `mathnormal`; they + are now disabled within all math alphabets, inclusive of + `mathnormal`. + +1.3h \[2015/10/31\] +---- + +* bugfixes: since `1.3d 2014/05/23` the option `symbolgreek` caused + `\ell` to become undefined, and, similarly but far worse, options + `selfGreek`, `selfGreeks` caused all lowercase Greek letters + `\alpha`, `\beta`, etc.. to become undefined. + +1.3g \[2015/10/15\] +---- + +* following `2015/10/01` LaTeX release, removal of the `"luatex"` + prefix from the names of the LuaLaTeX math primitives. Compatibility + maintained with older LaTeX formats. + +1.3f \[2015/09/12\] +---- + +* the replacement of amsmath's `\resetMathstrut@`, when it is + done, emits an Info rather than a Warning as this could be + potentially stressful to some users. + +* the `README` self-extracts from the `dtx` source, as a text + file `README.md` with Markdown syntax. + +1.3e \[2015/09/10\] +---- + +* bugfix: under option nosmalldelims, `\lbrace` and `\rbrace` were + redefined as math symbols and could not be used as delimiters. + +1.3d \[2015/02/26\] +---- + +* the documentation mentions the improved compatibility of mathastext + with the latest (3.34) beamer release: no more need for + `\usefonttheme{professionalfonts}`. + +1.3d \[2014/05/23\] +---- + +* new commands `\MTstandardgreek` and `\MTcustomgreek`. + +* The Greek letters, in case of use of one of the package related + options, are left to their defaults in the normal and bold math + versions if the subdued option was also used (this was so far + the case only with options LGRgreek/LGRgreeks). + +* `\newmcodes@` of amsmath is left untouched if package + lualatex-math is detected. + +1.3c \[2013/12/14\] +---- + +* added a starred variant to `\MTversion` which tells mathastext to + only do the math set-up and not modify the text fonts. + +* added second optional version name argument to `\Mathastext` and + to `\MTDeclareVersion`, to transfer settings for things not + otherwise changed by mathastext from a math version to the one + declared. This is mainly for symbols and large symbols to be the + bold ones when the user sets up the series of a mathastextified + font to be bold in a mathastext-declared version. + +* renamed `\defaultprod` to `\MToriginalprod`, `\defaultsum` to + `\MToriginalsum`, (this is in case of option symbolmisc). + +* changes to the dtx organization; options for generating the + documentation can be customized in generated mathastext.tex file. + +* 1.2d code for `\#`, `\$`, `\%`, and `\&` modified erroneously the + earlier correct 1.2c code and created a bug showing up with more + than 16 math families (a possibility only with lualatex or + xelatex). + +1.3a \[2013/09/04\] +---- + +* the somewhat silly `\string`'s are removed from the + `\MTsetmathskips` command of release 1.3, thus allowing its first + argument to be a macro, or any expandable code, giving a letter. + +* the amsmath `\resetMathstrut@`, which is incompatible with a + mathematically active parenthesis ( is now modified only if + necessary (i.e. only when `\MTnonlettersobeymathxx` is issued) and + is restored to its original value if not needed anymore (i.e. + after `\MTnonlettersdonotobeymathxx`, as for example when + switching to the normal version under option subdued). + +* improved documentation. + +1.3 \[2013/09/02\] +---- + +* commands `\MTsetmathskips` and `\MTunsetmathskips` added. + +* commands `\MTmathactiveletters` and `\MTmathstandardletters` to + govern the math activation of letters independently of its use + for insertion of the italic corrections (`\MTicinmath` and + `\MTnoicinmath` correspondingly modified). + +* the new `\luatexUmathcodenum` as available since TL2013 allows + identical treatment by mathastext of = and - under both LuaTeX + and XeTeX. + +* `\newmcodes@` of amsmath is left untouched in case of option basic. + +* a sentence containing | which was written to the log during the + loading caused a problem if | was active (typically if + `\MakeShortVerb`{\|} was added to the preamble prior to the + loading of mathastext). + +* some preemptive measures taken regarding things such as `\mid`, + `\lbrace`, and `\rbrace`, as some packages define these things in + manners which made the re-definitions done by mathastext issue + errors. + +1.2f \[2013/01/21\] +---- + +* minor code improvements. Change log added to the user manual. + +1.2e \[2013/01/10\] +---- + +This version should be the last one in the 1.2 series as it seems to +correct most of the main problems which were introduced with the massive +use of mathematically active characters in versions 1.2 and 1.2b. + +* It is indeed a thorny point when one wants to modify an active character in + math mode only (without breaking usage in label's and ref's for example). + The package now does that _only_ if the activation originated in the Babel + system as it is then possible to modify appropriately the Babel macros + `\user@active` and `\normal@char`, at the time of entering math + mode (mathastext does all its activation job at `\everymath` and + `\everydisplay`). + + The relevant issues are discussed in section 2.10 of the user manual, in the + test file mathastexttestalphabets.tex, and in the source code comments for + macro `\mst@mathactivate`. The inherent incompatibility of Babel with + packages having made mathematically active the characters itself makes + document active is circumvented by this interference of mathastext. A + generally applicable Babel patch could be derived from the method used by + mathastext. + + For the non catcode active characters, mathematical activation is used. + This is done at the entrance in math mode. + +* Sadly, the feature of added italic corrections introduced in + version 1.2b did not behave as described in the user manual, due to + forgotten group braces. Fixed. + +* The command `\MTlowerast` from the user manual of v1.2d was not the + one implemented in the source code. Fixed. + +* The test files automatically extracted from a latex run on the dtx + file have been revised and extended. + +* The code is better documented. + +1.2d \[2013/01/02\] +---- + +* an incompatibility with amsmath (its macro `\resetMathstrut@`), + exists since version 1.2 of the package. This is fixed + here. + +* various improvements in dealing with the asterisk and in the + mechanism of letting non-letter symbols obey the math alphabet + commands. + +* documentation extended and improved. + +1.2c \[2012/12/31\] +---- + +* mathastext now inserts automatically after all (latin) + letters in math mode their italic corrections, if the font + used is upright (sic). This improves the spacings for the + positioning of subscripts. The feature is de-activated + inside the math alphabets commands (apart from `\mathnormal`), + so as to not prohibit the formation of ligatures. + +* the documentation has been extended to explain in detail the + issues which are relevant to the new feature of added italic + corrections. + +* version 1.2 had some bad bugs when confronted to active + characters. This is corrected and additionally + `\MTnonlettersdonotobeymathxx` is made the default, as the user + input is too much constrained in its absence. + +* a less fatal, but still annoying, typo had made the dot in 1.2 + of type `\mathpunct` rather than `\mathord`. + +* the inner namespace has been rationalized a bit. + +1.2 \[2012/12/20\] +---- + +* a new command sets up the amount of space to be automatically + inserted before the derivative glyph (useful when using an + upright font). + +* the scope of the math alphabets has been extended to apply + to the non-alphabetical characters, and also to operator + names. + +* the format of the dtx file has changed. The package file + is self-extracting from the dtx, and four additional test + files are also produced during `latex mathastext.dtx`. + +1.15f and 1.15g \[2012/10/25\] +---- + +* `\$`, `\#`, `\&`, and `\%` had been re-defined by mathastext since its + inception in a rather strange (but working) way, which + could cause surprises to other packages. Fixed. + +* the subdued mechanism for the math alphabets is implemented + in a simpler and more efficient manner than in 1.15e. + +* the `defaultxx` options act a bit differently, and are more + useful in case of a `too many math alphabets` situation. + +* various improvements in the documentation. + +* general clean up and better commenting of the source code. + +1.15e \[2012/10/22\] +---- + +* new user commands to specify skip or glue to be + inserted after the math symbols `\exists` and `\forall` + +* complete (user transparent) rewrite of the code + implementing the subdued option; and its action has + been extended to apply also to the `\mathbf`, `\mathit`, + `\mathsf`, `\mathtt` alphabets and not only to `\mathrm` and + `\mathnormal` as in the previous versions. + +* improvements in the documentation. + +1.15d \[2012/10/13\] +---- + +* the Unicode situation is now correctly treated, throughout the + code (this had been left in a half-done way from version 1.14 of + April 2011). + +* this includes an issue related to amsmath and its + DeclareMathOperator macro which has been fixed, + +* and the code related to `\relbar` and `\Relbar` (and + `\models`) has been revised. + +1.15c \[2012/10/05\] +---- + +* it is now possible to use distinct fonts in LGR encoding + for the Greek letters according to the current math + version. + +* improvements to the documentation. + +1.15b +---- + +* corrected a 'feature' of 1.15 which was backward-incompatible + +* improvements to the pdf documentation + +1.15 \[2012/09/26\] +---- + +* the subdued option allows the mathastextification to + act only locally. + +* some measures taken to deal with amsmath related + issues when using xetex or luatex. + +1.14c +---- + +* a bug is fixed: the `\Mathastext` macro reinitializes + the fonts in the normal and bold math versions, but it + also erroneously redeclared the math alphabet changing + commands which could have been set up in previously + defined math versions (via earlier calls to + `\Mathastext`\[version_name\]). + +1.14b \[2011/04/03\] +---- + +* there was a bug with `\$`, `\#`, `\&`, `\%` in math mode which + showed up when ten or more math families had been + declared. This bug affected also the minus sign under + the same circumstances, when Unicode engines were + used. Fixed. + +* the options LGRgreek and selfGreek act now a bit + differently, and new options LGRgreeks and selfGreeks + have been defined. + +* I also cleaned up a bit the code, for a more + structured namespace. + +1.14 +---- + +* mathastext now modifies also the math alphabets `\mathit`, + `\mathsf` and `\mathtt`, thus making it a quite generic + complete manner to adapt the math configuration to fonts + provided with no math support. + +1.13b +---- + +* when the Symbol font is used for `\prod` and `\sum` this + will be only for inline math; display math will use the + default glyphs + +1.13 \[2011/03/11\] +---- + +* the LGRgreek option is added. + +* internal changes for better readability of the code. + +1.12 +---- + +* various bugs have been corrected. + +* the endash and alldelims options are active by default. + +* the package is more Unicode aware. + +* the `\Mathastext` command has been improved to + facilitate the mechanism of math versions also when + using XeTeX or LuaTeX (with package fontspec.) + +* the en-dash and dotless i and j now work with all + encodings, Unicode inclusive. + +1.11 \[2011/02/06\] +---- + +* optional argument to `\Mathastext` macro. + +1.1 \[2011/02/01\] +---- + +* options italic and frenchmath. + +1.0 \[2011/01/25\] +---- + +* Initial version. + diff --git a/Master/texmf-dist/doc/latex/mathastext/README.md b/Master/texmf-dist/doc/latex/mathastext/README.md index 50b9fc6349a..95e70dd8eae 100644 --- a/Master/texmf-dist/doc/latex/mathastext/README.md +++ b/Master/texmf-dist/doc/latex/mathastext/README.md @@ -12,11 +12,10 @@ of the [LPPL1.3c](http://www.latex-project.org/lppl/lppl-1-3c.txt) The Author of this Work is Jean-Francois Burnol -Copyright (C) 2011-2018 Jean-Francois Burnol (`jfbu at free dot fr`) +Copyright (C) 2011-2019 Jean-Francois Burnol (`jfbu at free dot fr`) - Source: mathastext.dtx 1.3t 2018/08/22 + Source: mathastext.dtx 1.3u 2019/08/20 -> cumulative Change Log at bottom of this file. DESCRIPTION =========== @@ -80,551 +79,50 @@ Main options: `italic`, `subdued`, `LGRgreek`. font. - `\MTsetmathskips` allows to set up extra spacings around letters. -INSTALLATION -============ - -### Using the manager of your TeX installation - -mathastext is in TeXLive and MikTeX. Just use the package manager to upgrade -or install it. - -### From `mathastext.tds.zip` - -user install in \$HOME folder: `unzip -d mathastext.tds.zip`, -where `` could be `~/texmf` or on macosx `~/Library/texmf`. - -### From `mathastext.dtx` - -- with mathastext.ins: run tex on mathastext.ins to generate the package - style file mathastext.sty as well as mathastext.tex and some test - files. -- without mathastext.ins: run tex (or etex) on mathastext.dtx to - generate the package style file mathastext.sty as well as - mathastext.tex and some test files. (and also mathastext.ins) -- Move the style file mathastext.sty to a location where TeX can find it. - In a TDS compliant hierarchy this will be - :tex/latex/mathastext/mathastext.sty - -### Generating documentation and test files - -Run tex (or etex) on mathastext.dtx to generate mathastext.tex and some -test files: - - mathastexttestmathversions.tex - mathastexttestunicodemacos.tex - mathastexttestunicodelinux.tex - mathastexttestalphabets.tex - -To generate the documentation (with source code): - - latex mathastext.tex (thrice) - dvipdfmx mathastext.dvi - -The file mathastext.tex can be customized to change the font size or set -other options therein. Alternative: pdflatex mathastext.dtx (thrice). -This produces the documentation without the source code. - -> (One cannot use lualatex or xelatex to compile the documentation.) - -CHANGE LOG -========== - -1.3t \[2018/08/22\] ----- - -* bugfix: the 1.3s bugfix about `subdued` compatibility with - `fontspec` was deficient. - -* bugfix: very old (v1.2, 2012/12/20) bug causing low-level TeX error - during package loading (with pdflatex) when setting up the math minus - sign to be the text font endash character, in cases with - `\encodingdefault` other than OT1, T1 or LY1, e.g. something like - T2A. - -* `\imath` and `\jmath` obey the `subdued` regime. And the minus sign - is now handled especially to ensure perfect compatibility with the - `subdued` option. - -* breaking change: `mathastext` does not redefine anymore - `\i` and `\j` to let them be usable both in text and math mode. - -1.3s \[2018/08/21\] ----- - -* fix to an issue with `subdued` option in a `fontspec` context. - - https://tex.stackexchange.com/q/444565/4686 - -1.3r \[2016/11/06\] ----- - -* documentation tweaks. - -1.3q \[2016/10/31\] ----- - -* new option `unicodeminus`. - -* the `Recent Changes` section of the documentation has been removed as it - was a duplicate of information available in the `Change Log`. - -* some other - changes in the documentation, in particular the use of straight quotes - in verbatim. - -1.3p \[2016/05/13\] ----- - -* bugfix: release `1.3n` had forgotten to activate by default its new - customization of the amsmath macro `\newmcodes@` (it was done from - using `\MTversion` in the document body but not by default at start - of body.) - -* public name `\MTfixmathfonts` for a `1.3o` macro. - -1.3o \[2016/05/03\] ----- - -* `mathastext` fixes an issue related to a feature of `LuaLaTeX` and - `luaotfload` that OpenType fonts are declared in one of two modes: - `node` and `base`, and only the latter is functional in math mode. But - by default text fonts are declared in mode `node`. Thus `mathastext` - now intervenes to make it so that the font it declares in math mode - will use mode `base`. This fixes issues with for example old style - figures being used while the text font used lining figures (or vice - versa, depending on the font). But see the code comments for more. - -1.3n \[2016/04/22\] ----- - -* at long last, `mathastext` takes care properly of annoying and perplexing - amsmath's `\newmcodes@`. The very recent change in `amsopn.sty` finally - made it compatible with Unicode engines, but anyhow, `mathastext` must do - its own patch to use the correct font. All of this taking into account - the various options passed to the package. Lots of trouble for a tiny thing. - -1.3m \[2016/04/02\] ----- - -* minor code maintenance before annual TL freeze. - -1.3l \[2016/01/29\] ----- - -* compatibility with fontspec's upcoming switch from `EU1/EU2` to - `TU` common to both Unicode engines. - -1.3k \[2016/01/24\] ----- - -* typos fixed in the documentation. In particular, the README link to - the package homepage had remained broken from day one of the package - releases: `mathastext.html` therein was misspelled as - `mathsastext.html` ! (but the pdf documentation had the correct link; - as well as the CTAN catalogue). - -1.3j \[2016/01/15\] ----- - -* renamed and modified recent `1.3i`'s `\MTactivemathoff` into - `\MTeverymathoff`. Added `\MTeverymathdefault`. - -* `subdued` mode is a bit stronger: also the asterisk reverts to the - default (if it was modified due to option `asterisk`), the added - extra `\mskip`'s (useful with upright fonts) for `'`, `\exists`, - and `\forall` are suppressed rather than re-configured to use `0mu`. - Related new commands `\MTexistsdoesskip`, `\MTforalldoesskip`, - `\MTprimedoesskip`, `\MTnormalexists`, `\MTnormalforall`, - `\MTnormalprime`. - -* the toggle for using mathematically active letters is only emitted - once during package loading; the `\Mathastext` command does not do - it anymore; the use in the preamble of `\MTmathstandardletters`, - or `\MTnoicinmath` and related commands is not overruled by later - use of `\Mathastext`. - -* quite a few documentation improvements and rewrites, particularly - in the description of commands which are related to the - modifications of mathcodes (mainly for math activation of - characters or letters) as done by mathastext at `\everymath` or - `\everydisplay`. - -1.3i \[2016/01/06\] ----- - -* `\url` from `url.sty` as well as `\url` and `\nolinkurl` from - `hyperref.sty` use math mode and (by default) the monospace text - font. To avoid mathastext overwriting the special preparation done - by `{url,hyperref}.sty` the commands `\url/\nolinkurl` are patched - to do automatically `\MTactivemathoff` (now `\MTeverymathoff`) - before entering math mode. - -* the extra skips specified by `\MTsetmathskips` are not inserted - around letters if inside the arguments of math alphabet commands, - or within operator names. - -* the added explicit italic corrections (for non-oblique fonts) were - disabled within math alphabet scopes, except `mathnormal`; they - are now disabled within all math alphabets, inclusive of - `mathnormal`. - -1.3h \[2015/10/31\] ----- - -* bugfixes: since `1.3d 2014/05/23` the option `symbolgreek` caused - `\ell` to become undefined, and, similarly but far worse, options - `selfGreek`, `selfGreeks` caused all lowercase Greek letters - `\alpha`, `\beta`, etc.. to become undefined. - -1.3g \[2015/10/15\] ----- - -* following `2015/10/01` LaTeX release, removal of the `"luatex"` - prefix from the names of the LuaLaTeX math primitives. Compatibility - maintained with older LaTeX formats. - -1.3f \[2015/09/12\] ----- - -* the replacement of amsmath's `\resetMathstrut@`, when it is - done, emits an Info rather than a Warning as this could be - potentially stressful to some users. - -* the `README` self-extracts from the `dtx` source, as a text - file `README.md` with Markdown syntax. - -1.3e \[2015/09/10\] ----- - -* bugfix: under option nosmalldelims, `\lbrace` and `\rbrace` were - redefined as math symbols and could not be used as delimiters. - -1.3d \[2015/02/26\] ----- - -* the documentation mentions the improved compatibility of mathastext - with the latest (3.34) beamer release: no more need for - `\usefonttheme{professionalfonts}`. - -1.3d \[2014/05/23\] ----- - -* new commands `\MTstandardgreek` and `\MTcustomgreek`. - -* The Greek letters, in case of use of one of the package related - options, are left to their defaults in the normal and bold math - versions if the subdued option was also used (this was so far - the case only with options LGRgreek/LGRgreeks). - -* `\newmcodes@` of amsmath is left untouched if package - lualatex-math is detected. - -1.3c \[2013/12/14\] ----- - -* added a starred variant to `\MTversion` which tells mathastext to - only do the math set-up and not modify the text fonts. - -* added second optional version name argument to `\Mathastext` and - to `\MTDeclareVersion`, to transfer settings for things not - otherwise changed by mathastext from a math version to the one - declared. This is mainly for symbols and large symbols to be the - bold ones when the user sets up the series of a mathastextified - font to be bold in a mathastext-declared version. - -* renamed `\defaultprod` to `\MToriginalprod`, `\defaultsum` to - `\MToriginalsum`, (this is in case of option symbolmisc). - -* changes to the dtx organization; options for generating the - documentation can be customized in generated mathastext.tex file. - -* 1.2d code for `\#`, `\$`, `\%`, and `\&` modified erroneously the - earlier correct 1.2c code and created a bug showing up with more - than 16 math families (a possibility only with lualatex or - xelatex). - -1.3a \[2013/09/04\] ----- - -* the somewhat silly `\string`'s are removed from the - `\MTsetmathskips` command of release 1.3, thus allowing its first - argument to be a macro, or any expandable code, giving a letter. - -* the amsmath `\resetMathstrut@`, which is incompatible with a - mathematically active parenthesis ( is now modified only if - necessary (i.e. only when `\MTnonlettersobeymathxx` is issued) and - is restored to its original value if not needed anymore (i.e. - after `\MTnonlettersdonotobeymathxx`, as for example when - switching to the normal version under option subdued). - -* improved documentation. - -1.3 \[2013/09/02\] ----- - -* commands `\MTsetmathskips` and `\MTunsetmathskips` added. - -* commands `\MTmathactiveletters` and `\MTmathstandardletters` to - govern the math activation of letters independently of its use - for insertion of the italic corrections (`\MTicinmath` and - `\MTnoicinmath` correspondingly modified). - -* the new `\luatexUmathcodenum` as available since TL2013 allows - identical treatment by mathastext of = and - under both LuaTeX - and XeTeX. - -* `\newmcodes@` of amsmath is left untouched in case of option basic. - -* a sentence containing | which was written to the log during the - loading caused a problem if | was active (typically if - `\MakeShortVerb`{\|} was added to the preamble prior to the - loading of mathastext). - -* some preemptive measures taken regarding things such as `\mid`, - `\lbrace`, and `\rbrace`, as some packages define these things in - manners which made the re-definitions done by mathastext issue - errors. - -1.2f \[2013/01/21\] ----- - -* minor code improvements. Change log added to the user manual. - -1.2e \[2013/01/10\] ----- - -This version should be the last one in the 1.2 series as it seems to -correct most of the main problems which were introduced with the massive -use of mathematically active characters in versions 1.2 and 1.2b. - -* It is indeed a thorny point when one wants to modify an active character in - math mode only (without breaking usage in label's and ref's for example). - The package now does that _only_ if the activation originated in the Babel - system as it is then possible to modify appropriately the Babel macros - `\user@active` and `\normal@char`, at the time of entering math - mode (mathastext does all its activation job at `\everymath` and - `\everydisplay`). - - The relevant issues are discussed in section 2.10 of the user manual, in the - test file mathastexttestalphabets.tex, and in the source code comments for - macro `\mst@mathactivate`. The inherent incompatibility of Babel with - packages having made mathematically active the characters itself makes - document active is circumvented by this interference of mathastext. A - generally applicable Babel patch could be derived from the method used by - mathastext. - - For the non catcode active characters, mathematical activation is used. - This is done at the entrance in math mode. - -* Sadly, the feature of added italic corrections introduced in - version 1.2b did not behave as described in the user manual, due to - forgotten group braces. Fixed. - -* The command `\MTlowerast` from the user manual of v1.2d was not the - one implemented in the source code. Fixed. - -* The test files automatically extracted from a latex run on the dtx - file have been revised and extended. - -* The code is better documented. - -1.2d \[2013/01/02\] ----- - -* an incompatibility with amsmath (its macro `\resetMathstrut@`), - exists since version 1.2 of the package. This is fixed - here. - -* various improvements in dealing with the asterisk and in the - mechanism of letting non-letter symbols obey the math alphabet - commands. - -* documentation extended and improved. - -1.2c \[2012/12/31\] ----- - -* mathastext now inserts automatically after all (latin) - letters in math mode their italic corrections, if the font - used is upright (sic). This improves the spacings for the - positioning of subscripts. The feature is de-activated - inside the math alphabets commands (apart from `\mathnormal`), - so as to not prohibit the formation of ligatures. - -* the documentation has been extended to explain in detail the - issues which are relevant to the new feature of added italic - corrections. - -* version 1.2 had some bad bugs when confronted to active - characters. This is corrected and additionally - `\MTnonlettersdonotobeymathxx` is made the default, as the user - input is too much constrained in its absence. - -* a less fatal, but still annoying, typo had made the dot in 1.2 - of type `\mathpunct` rather than `\mathord`. - -* the inner namespace has been rationalized a bit. - -1.2 \[2012/12/20\] ----- - -* a new command sets up the amount of space to be automatically - inserted before the derivative glyph (useful when using an - upright font). - -* the scope of the math alphabets has been extended to apply - to the non-alphabetical characters, and also to operator - names. - -* the format of the dtx file has changed. The package file - is self-extracting from the dtx, and four additional test - files are also produced during `latex mathastext.dtx`. - -1.15f and 1.15g \[2012/10/25\] ----- - -* `\$`, `\#`, `\&`, and `\%` had been re-defined by mathastext since its - inception in a rather strange (but working) way, which - could cause surprises to other packages. Fixed. - -* the subdued mechanism for the math alphabets is implemented - in a simpler and more efficient manner than in 1.15e. - -* the `defaultxx` options act a bit differently, and are more - useful in case of a `too many math alphabets` situation. - -* various improvements in the documentation. - -* general clean up and better commenting of the source code. - -1.15e \[2012/10/22\] ----- - -* new user commands to specify skip or glue to be - inserted after the math symbols `\exists` and `\forall` - -* complete (user transparent) rewrite of the code - implementing the subdued option; and its action has - been extended to apply also to the `\mathbf`, `\mathit`, - `\mathsf`, `\mathtt` alphabets and not only to `\mathrm` and - `\mathnormal` as in the previous versions. - -* improvements in the documentation. - -1.15d \[2012/10/13\] ----- - -* the Unicode situation is now correctly treated, throughout the - code (this had been left in a half-done way from version 1.14 of - April 2011). - -* this includes an issue related to amsmath and its - DeclareMathOperator macro which has been fixed, - -* and the code related to `\relbar` and `\Relbar` (and - `\models`) has been revised. - -1.15c \[2012/10/05\] ----- - -* it is now possible to use distinct fonts in LGR encoding - for the Greek letters according to the current math - version. - -* improvements to the documentation. - -1.15b ----- - -* corrected a 'feature' of 1.15 which was backward-incompatible - -* improvements to the pdf documentation - -1.15 \[2012/09/26\] ----- - -* the subdued option allows the mathastextification to - act only locally. - -* some measures taken to deal with amsmath related - issues when using xetex or luatex. - -1.14c ----- - -* a bug is fixed: the `\Mathastext` macro reinitializes - the fonts in the normal and bold math versions, but it - also erroneously redeclared the math alphabet changing - commands which could have been set up in previously - defined math versions (via earlier calls to - `\Mathastext`\[version_name\]). - -1.14b \[2011/04/03\] ----- - -* there was a bug with `\$`, `\#`, `\&`, `\%` in math mode which - showed up when ten or more math families had been - declared. This bug affected also the minus sign under - the same circumstances, when Unicode engines were - used. Fixed. - -* the options LGRgreek and selfGreek act now a bit - differently, and new options LGRgreeks and selfGreeks - have been defined. - -* I also cleaned up a bit the code, for a more - structured namespace. - -1.14 ----- - -* mathastext now modifies also the math alphabets `\mathit`, - `\mathsf` and `\mathtt`, thus making it a quite generic - complete manner to adapt the math configuration to fonts - provided with no math support. - -1.13b ----- - -* when the Symbol font is used for `\prod` and `\sum` this - will be only for inline math; display math will use the - default glyphs - -1.13 \[2011/03/11\] ----- - -* the LGRgreek option is added. - -* internal changes for better readability of the code. - -1.12 ----- - -* various bugs have been corrected. - -* the endash and alldelims options are active by default. - -* the package is more Unicode aware. - -* the `\Mathastext` command has been improved to - facilitate the mechanism of math versions also when - using XeTeX or LuaTeX (with package fontspec.) - -* the en-dash and dotless i and j now work with all - encodings, Unicode inclusive. - -1.11 \[2011/02/06\] ----- - -* optional argument to `\Mathastext` macro. - -1.1 \[2011/02/01\] ----- - -* options italic and frenchmath. - -1.0 \[2011/01/25\] ----- - -* Initial version. +RECENT CHANGES +============== + +1.3u (2019/08/20) +--- + +* new feature: the initial release dealt with only one font, and + although shortly thereafter the 1.11 version added support for + extended math versions, it was documented that some font-dependent + set-up (minus as endash, dotless i and j, hbar, math accents) was + done only once. This release makes the relevant characters font + encoding savvy in each mathastext-extended math version. Thus, + they should render correctly even with multiple math versions + using fonts with varying encodings. + + This reinforces importance of using `\MTversion` and not the + LaTeX `\mathversion` when switching to a new math version (which + got declared via the package interface). The implementation is + compatible with Unicode engines and mixed usage of `TU` encoding + (OpenType fonts) with traditional 8bits TeX font encodings. For + all engines, all used (8bits) encodings must have been passed as + options to the `fontenc` package. + + Thanks to Falk Hanisch for feature request and code suggestions. + +* new option `unimathaccents`: this adds to option `mathaccents` + the demand to use the text font accents for OpenType fonts in math + mode via the `\Umathaccent` primitive. Indeed, as my testing + showed that this gave non-satisfactory results both with XeTeX + and LuaTeX regarding the horizontal placement of the accents, + the main option `mathaccents` acts only on 8bits encoded fonts. + +* bugfix: the `\Mathastext` without optional argument forgot to + repeat some font-encoding dependent initialization set-up done + originally during package loading. + +* bugfix: under the `subdued` option macros `\MTmathactiveletters` + or `\MTnonlettersobeymathxx` now act like no-ops if + issued explicitly while in the `normal` or `bold` math version. + Formerly, this was not the case and could cause bugs such as a + disappearing minus sign in math mode. + +* bugfix: the letter `h` used in the `\hbar` obeyed the extra + skips as set-up by `\MTsetmathskips`, badly interfering with the + horizontal positioning of the bar accent. They are now ignored + (as well as the added italic correction). diff --git a/Master/texmf-dist/doc/latex/mathastext/mathastext.pdf b/Master/texmf-dist/doc/latex/mathastext/mathastext.pdf index 525c62c9a6f..a8bccf1cd4c 100644 Binary files a/Master/texmf-dist/doc/latex/mathastext/mathastext.pdf and b/Master/texmf-dist/doc/latex/mathastext/mathastext.pdf differ diff --git a/Master/texmf-dist/doc/latex/mathastext/mathastexttestalphabets.pdf b/Master/texmf-dist/doc/latex/mathastext/mathastexttestalphabets.pdf index 761f3a6d4ac..76d99b0888a 100644 Binary files a/Master/texmf-dist/doc/latex/mathastext/mathastexttestalphabets.pdf and b/Master/texmf-dist/doc/latex/mathastext/mathastexttestalphabets.pdf differ diff --git a/Master/texmf-dist/source/latex/mathastext/INSTALL.txt b/Master/texmf-dist/source/latex/mathastext/INSTALL.txt new file mode 100644 index 00000000000..721c3009fbf --- /dev/null +++ b/Master/texmf-dist/source/latex/mathastext/INSTALL.txt @@ -0,0 +1,44 @@ +The simplest for most users is to use the manager script of the TeX +installation to either install or upgrade mathastext to its current +version. + +Else, for manual install, grab mathastext.tds.zip from CTAN then run + + unzip -d mathastext.tds.zip + +where could be ~/texmf or, on mac os x, ~/Library/texmf. + +Else, download mathastext.dtx and follow these instructions: + +- Run tex or etex on mathastext.dtx to generate the package style + file mathastext.sty as well as additional files: + + mathastext.tex, README.md, ChangeLog.md, and some test files. + +- Move the style file mathastext.sty to a location where TeX can + find it. In a TDS compliant hierarchy this will be + + :tex/latex/mathastext/mathastext.sty + +For the documentation: + +- Follow the above steps, then run latex thrice on mathastext.tex + then dvipdfmx on mathastext.dvi. The file mathastext.tex can be + customized to change the font size or set other options therein. + The produced file mathastext.pdf will by default include the + commented source code. + +It is also possible to run pdflatex (thrice) directly on mathastext.dtx. +In that case mathastext.pdf is produced without the commented source code. + +One can NOT use lualatex or xelatex to compile the documentation. + +The test files + + mathastexttestmathversions.tex + mathastexttestunicodemacos.tex + mathastexttestunicodelinux.tex + mathastexttestalphabets.tex + +illustrate some features of the package and are an addendum to the +main documentation mathastext.pdf. diff --git a/Master/texmf-dist/source/latex/mathastext/mathastext.dtx b/Master/texmf-dist/source/latex/mathastext/mathastext.dtx index 4a6d0583f2f..8978450469a 100644 --- a/Master/texmf-dist/source/latex/mathastext/mathastext.dtx +++ b/Master/texmf-dist/source/latex/mathastext/mathastext.dtx @@ -1,14 +1,14 @@ % -*- coding: iso-latin-1; time-stamp-format: "%02d-%02m-%:y at %02H:%02M:%02S %Z" -*- -% N.B.: this dtx file does NOT use \DocInput (only docstrip), the -% LaTeX source of the documentation is NOT prefixed with % signs. +% N.B.: this dtx file does NOT use \DocInput, it only uses docstrip. +% The LaTeX source of the documentation is NOT prefixed with percent characters. %<*dtx> -\def\dtxtimestamp {Time-stamp: <22-08-2018 at 19:31:52 CEST>}% -\def\docdate{2018/08/22} +\def\dtxtimestamp {Time-stamp: <20-08-2019 at 11:13:40 CEST>}% +\def\docdate{2019/08/20} % -%<*drv|ins> -\def\MSTpkgdate {2018/08/22} -\def\MSTpkgversion {1.3t} -% +%<*drv> +\def\MSTpkgdate {2019/08/20} +\def\MSTpkgversion {1.3u} +% %<*dtx> \iffalse % meta-comment % @@ -27,32 +27,32 @@ of the [LPPL1.3c](http://www.latex-project.org/lppl/lppl-1-3c.txt) The Author of this Work is Jean-Francois Burnol -Copyright (C) 2011-2018 Jean-Francois Burnol (`jfbu at free dot fr`) +Copyright (C) 2011-2019 Jean-Francois Burnol (`jfbu at free dot fr`) - Source: mathastext.dtx 1.3t 2018/08/22 + Source: mathastext.dtx 1.3u 2019/08/20 % %<*dtx> Generating the documentation from source: -1a) tex (or etex) mathastext.dtx to extract the sty file (and README.md) -1b) then latex mathastext.tex (thrice) + dvipdfmx mathastext.dvi +1a) tex (or etex) mathastext.dtx to extract generated files +1b) then latex mathastext.tex (thrice) and dvipdfmx mathastext.dvi 2) alternative to 1a)+1b): pdflatex mathastext.dtx. The documentation does not include the documented source code then, in contrast to 1a)+1b) method \fi % end of meta-comment % -%<*!readme> +%<*!readme&!changelog> %%---------------------------------------------------------------- %% Package: mathastext %% Info: Use the text font in math mode (JFB) -%% Version: 1.3t 2018/08/22 +%% Version: 1.3u 2019/08/20 %% License: LPPL 1.3c (http://www.latex-project.org/lppl/lppl-1-3c.txt) -%% Copyright (C) 2011-2018 Jean-Francois Burnol +%% Copyright (C) 2011-2019 Jean-Francois Burnol %% Examples of use of mathastext: %% http://jf.burnol.free.fr/mathastext.html %% http://jf.burnol.free.fr/showcase.html %%---------------------------------------------------------------- -% +% %<*dtx> \chardef\noetex 0 \ifx\numexpr\undefined\chardef\noetex 1 \fi @@ -100,8 +100,8 @@ not include the documented source code then, in contrast to 1a)+1b) method version \string\texttt{\MSTpkgversion} of \string\texttt{\MSTpkgdate}}} \generate{\nopreamble\nopostamble \file{README.md}{\from{mathastext.dtx}{readme}} + \file{ChangeLog.md}{\from{mathastext.dtx}{changelog}} \usepostamble\defaultpostamble - \file{mathastext.ins}{\from{mathastext.dtx}{ins}} \file{mathastext.tex}{\from{mathastext.dtx}{drv}} \usepreamble\testfilepreamble \file{mathastexttestmathversions.tex}{\from{mathastext.dtx}{mathversions}} @@ -124,7 +124,6 @@ not include the documented source code then, in contrast to 1a)+1b) method ^^Aiffalse % %<*readme> -> cumulative Change Log at bottom of this file. DESCRIPTION =========== @@ -191,54 +190,102 @@ Main options: `italic`, `subdued`, `LGRgreek`. - `\MTsetmathskips` allows to set up extra spacings around letters. -INSTALLATION -============ - -### Using the manager of your TeX installation - -mathastext is in TeXLive and MikTeX. Just use the package manager to upgrade -or install it. - -### From `mathastext.tds.zip` - -user install in \$HOME folder: `unzip -d mathastext.tds.zip`, -where `` could be `~/texmf` or on macosx `~/Library/texmf`. - -### From `mathastext.dtx` - -- with mathastext.ins: run tex on mathastext.ins to generate the package - style file mathastext.sty as well as mathastext.tex and some test - files. -- without mathastext.ins: run tex (or etex) on mathastext.dtx to - generate the package style file mathastext.sty as well as - mathastext.tex and some test files. (and also mathastext.ins) -- Move the style file mathastext.sty to a location where TeX can find it. - In a TDS compliant hierarchy this will be - :tex/latex/mathastext/mathastext.sty +RECENT CHANGES +============== + +1.3u (2019/08/20) +--- + +* new feature: the initial release dealt with only one font, and + although shortly thereafter the 1.11 version added support for + extended math versions, it was documented that some font-dependent + set-up (minus as endash, dotless i and j, hbar, math accents) was + done only once. This release makes the relevant characters font + encoding savvy in each mathastext-extended math version. Thus, + they should render correctly even with multiple math versions + using fonts with varying encodings. + + This reinforces importance of using `\MTversion` and not the + LaTeX `\mathversion` when switching to a new math version (which + got declared via the package interface). The implementation is + compatible with Unicode engines and mixed usage of `TU` encoding + (OpenType fonts) with traditional 8bits TeX font encodings. For + all engines, all used (8bits) encodings must have been passed as + options to the `fontenc` package. + + Thanks to Falk Hanisch for feature request and code suggestions. + +* new option `unimathaccents`: this adds to option `mathaccents` + the demand to use the text font accents for OpenType fonts in math + mode via the `\Umathaccent` primitive. Indeed, as my testing + showed that this gave non-satisfactory results both with XeTeX + and LuaTeX regarding the horizontal placement of the accents, + the main option `mathaccents` acts only on 8bits encoded fonts. + +* bugfix: the `\Mathastext` without optional argument forgot to + repeat some font-encoding dependent initialization set-up done + originally during package loading. -### Generating documentation and test files +* bugfix: under the `subdued` option macros `\MTmathactiveletters` + or `\MTnonlettersobeymathxx` now act like no-ops if + issued explicitly while in the `normal` or `bold` math version. + Formerly, this was not the case and could cause bugs such as a + disappearing minus sign in math mode. -Run tex (or etex) on mathastext.dtx to generate mathastext.tex and some -test files: +* bugfix: the letter `h` used in the `\hbar` obeyed the extra + skips as set-up by `\MTsetmathskips`, badly interfering with the + horizontal positioning of the bar accent. They are now ignored + (as well as the added italic correction). - mathastexttestmathversions.tex - mathastexttestunicodemacos.tex - mathastexttestunicodelinux.tex - mathastexttestalphabets.tex +% +%<*changelog> +MATHASTEXT CHANGE LOG +===================== -To generate the documentation (with source code): +1.3u \[2019/08/20\] +---- - latex mathastext.tex (thrice) - dvipdfmx mathastext.dvi +* new feature: the initial release dealt with only one font, and + although shortly thereafter the 1.11 version added support for + extended math versions, it was documented that some font-dependent + set-up (minus as endash, dotless i and j, hbar, math accents) was + done only once. This release makes the relevant characters font + encoding savvy in each mathastext-extended math version. Thus, + they should render correctly even with multiple math versions + using fonts with varying encodings. + + This reinforces importance of using `\MTversion` and not the + LaTeX `\mathversion` when switching to a new math version (which + got declared via the package interface). The implementation is + compatible with Unicode engines and mixed usage of `TU` encoding + (OpenType fonts) with traditional 8bits TeX font encodings. For + all engines, all used (8bits) encodings must have been passed as + options to the `fontenc` package. + + Thanks to Falk Hanisch for feature request and code suggestions. + +* new option `unimathaccents`: this adds to option `mathaccents` + the demand to use the text font accents for OpenType fonts in math + mode via the `\Umathaccent` primitive. Indeed, as my testing + showed that this gave non-satisfactory results both with XeTeX + and LuaTeX regarding the horizontal placement of the accents, + the main option `mathaccents` acts only on 8bits encoded fonts. + +* bugfix: the `\Mathastext` without optional argument forgot to + repeat some font-encoding dependent initialization set-up done + originally during package loading. -The file mathastext.tex can be customized to change the font size or set -other options therein. Alternative: pdflatex mathastext.dtx (thrice). -This produces the documentation without the source code. +* bugfix: under the `subdued` option macros `\MTmathactiveletters` + or `\MTnonlettersobeymathxx` now act like no-ops if + issued explicitly while in the `normal` or `bold` math version. + Formerly, this was not the case and could cause bugs such as a + disappearing minus sign in math mode. -> (One cannot use lualatex or xelatex to compile the documentation.) +* bugfix: the letter `h` used in the `\hbar` obeyed the extra + skips as set-up by `\MTsetmathskips`, badly interfering with the + horizontal positioning of the bar accent. They are now ignored + (as well as the added italic correction). -CHANGE LOG -========== 1.3t \[2018/08/22\] ---- @@ -259,13 +306,13 @@ CHANGE LOG * breaking change: `mathastext` does not redefine anymore `\i` and `\j` to let them be usable both in text and math mode. + 1.3s \[2018/08/21\] ---- * fix to an issue with `subdued` option in a `fontspec` context. - https://tex.stackexchange.com/q/444565/4686 - +% https://tex.stackexchange.com/q/444565/4686 1.3r \[2016/11/06\] ---- @@ -754,7 +801,7 @@ use of mathematically active characters in versions 1.2 and 1.2b. * Initial version. -% +% %<*drv> %% This is a generated file. Run latex thrice on this file mathastext.tex then %% run dvipdfmx on mathastext.dvi to produce the documentation mathastext.pdf, @@ -777,49 +824,6 @@ use of mathematically active characters in versions 1.2 and 1.2b. %%% mode: latex %%% End: % -%<*ins> -%% This is a generated file. "tex mathastext.ins" extracts mathastext.sty from -%% mathastext.dtx as well as mathastext.tex (for typesetting the documentation), -%% and some test files to check the package commands. -%% -%% See mathastext.dtx for the copyright and the conditions for distribution -%% and/or modification of this work. -%% -\input docstrip.tex -\askforoverwritefalse -\def\testfilepreamble{% - \string\def\string\testfileincipit{Test file - to accompany \string\texttt{mathastext}^^J% - version \string\texttt{\MSTpkgversion} of \string\texttt{\MSTpkgdate}}} -\generate{\nopreamble\nopostamble - \file{README.md}{\from{mathastext.dtx}{readme}} -\usepostamble\defaultpostamble - \file{mathastext.tex}{\from{mathastext.dtx}{drv}} -\usepreamble\testfilepreamble - \file{mathastexttestmathversions.tex}{\from{mathastext.dtx}{mathversions}} - \file{mathastexttestunicodemacos.tex}{\from{mathastext.dtx}{macos}} - \file{mathastexttestunicodelinux.tex}{\from{mathastext.dtx}{linux}} - \file{mathastexttestalphabets.tex}{\from{mathastext.dtx}{alphabets}} -\usepreamble\defaultpreamble - \file{mathastext.sty}{\from{mathastext.dtx}{package}}% -} -\catcode32=13\relax% active space -\let =\space% -\Msg{************************************************************************} -\Msg{*} -\Msg{* To finish the installation you have to move the following} -\Msg{* file into a directory searched by TeX:} -\Msg{*} -\Msg{* mathastext.sty} -\Msg{*} -\Msg{* To produce the documentation run latex thrice on file mathastext.tex} -\Msg{* and then run dvipdfmx on file mathastext.dvi} -\Msg{*} -\Msg{* Happy TeXing!} -\Msg{*} -\Msg{************************************************************************} -\endbatchfile -% %<*mathversions> %% This file `mathastexttestversions.tex' is for testing the enhanced %% concept of math versions provided by the package `mathastext'. @@ -886,31 +890,43 @@ $math\ in\ AvantGarde$. This test uses \verb|mathastext| with its \emph{italic}, \emph{asterisk}, and \emph{subdued} options. The base document fonts are the Latin Modern ones (in -OpenType format). The other fonts used were chosen from those of a Mac OS -machine. We also used the Times font in T1 encoding, to illustrate a warning -from the user manual when using different encodings in the various math -versions: here the minus sign has disappeared from the Times math mode block, -precisely for this matter of encoding. - -Furthermore we test if the non-letter characters obey the math alphabet -\verb|\mathbf|. In the normal and bold math versions, this feature is -de-activated, as option \emph{subdued} was used; and if activated we -should then use in these math versions the package \verb|\Mathbf| rather -than \verb|\mathbf| which is there still the original one, which will -use encoding \verb|OT1| in the normal and bold versions, as we loaded -\verb|fontspec| with its option \emph{no-math}. +OpenType format). The other OpenType fonts were chosen from those available on +a Mac OS machine. We also used the Times font in traditional \TeX\ font T1 +encoding, to demonstrate the removal since release \texttt{1.3u} of a former +limitation that all math versions had to share the same font encoding, else +some characters such as the dotless \texttt{i} ($\imath$), or the minus sign +could well vanish from the output in the non-normal math versions. + +Furthermore we test (last line of each block, on the left) if the non-letter +characters obey the math alphabet \verb|\mathbf|. In the normal and bold math +versions, this feature is de-activated, as option \emph{subdued} was used; and +if activated we should then use in these math versions the package +\verb|\Mathbf| rather than \verb|\mathbf| which is there still the original +one, which will use encoding \verb|OT1| in the normal and bold versions, as we +loaded \verb|fontspec| with its option \emph{no-math}. Some among the fonts tested have no bold variant or no italic variant. Note (tested 2013/09/03): for some reason the \verb|Color| specifications in the \verb|\setmainfont| commands work only -with \XeTeX{}, not with \LuaLaTeX{}; a few months back I had not noticed +with \XeLaTeX{}, not with \LuaLaTeX{}; a few months back I had not noticed such a difference between the two engines. -Update (2016/01/15, with reasonably up-to-date TL2015): \verb|Color| spec in -use of \verb|\setmainfont| command now functional again with +Update (tested 2016/01/15 with reasonably up-to-date TL2015): \verb|Color| +spec in use of \verb|\setmainfont| command now functional again with \LuaLaTeX. +Note (tested 2019/08/11, reasonably up-to-date TL2019): spacing with the Didot +font differs widely between \XeLaTeX\ and \LuaLaTeX{} (perhaps related to +italic corrections, see the package documentation), and also it seems +\LuaLaTeX{} will not find (from our generic usage of the \verb|fontspec| +interface, at least) bold variants of the Hoefler Text and American Typewriter +fonts, contrarily to \XeLaTeX. Also, the \emph{italic} option remains +seemingly without effect with \LuaLaTeX{} in the case of the Hoefler Text font +(see the package source code comments on some problems with the two ``modes'' +for text fonts under \LuaLaTeX, which may be related with this specific issue +here). + \newcommand\TEST[1]{\MTversion{#1}\def\tmpa{#1}% \def\tmpb{normal}\def\tmpc{bold}% \ifx\tmpa\tmpb\else\ifx\tmpa\tmpc\else \MTnonlettersobeymathxx @@ -985,22 +1001,32 @@ use of \verb|\setmainfont| command now functional again with This test uses \verb|mathastext| with its \emph{italic}, \emph{asterisk}, and \emph{subdued} options. The base document fonts are the Latin Modern ones (in -OpenType format). The other fonts used were chosen from those of a Linux -machine. We also used the Times font in T1 encoding, to illustrate a warning -from the user manual when using different encodings in the various math -versions: here the minus sign has disappeared from the Times math mode block, -precisely for this matter of encoding. - -Furthermore we test if the non-letter characters obey the math alphabet -\verb|\mathbf|. In the normal and bold math versions, this feature -is de-activated, as option \emph{subdued} was used; and if activated we -should then use in these math versions the package \verb|\Mathbf| rather -than \verb|\mathbf| which is there still the original one, which will -use encoding \verb|OT1| in the normal and bold versions, as we loaded -\verb|fontspec| with its option \emph{no-math}. +OpenType format). The other OpenType fonts were chosen from those available on +a Linux machine. We also used the Times font in traditional \TeX\ font T1 +encoding, to demonstrate the removal since release \texttt{1.3u} of a former +limitation that all math versions had to share the same font encoding, else +some characters such as the dotless \texttt{i} ($\imath$), or the minus sign +could well vanish from the output in the non-normal math versions. + +Furthermore we test (last line of each block, on the left) if the non-letter +characters obey the math alphabet \verb|\mathbf|. In the normal and bold math +versions, this feature is de-activated, as option \emph{subdued} was used; and +if activated we should then use in these math versions the package +\verb|\Mathbf| rather than \verb|\mathbf| which is there still the original +one, which will use encoding \verb|OT1| in the normal and bold versions, as we +loaded \verb|fontspec| with its option \emph{no-math}. Some among the fonts tested have no bold variant or no italic variant. +Note: the two unicode engines \XeLaTeX\ and \LuaLaTeX\ give likely not fully +identical results particularly for the math mode. At least this is what I +observed regularly over the years with the variant of this file prepared for +fonts available on Mac OS, which is my main system where I develop +|\mathastext|. Lastly for example (TL2019, august 2019), \LuaLaTeX\ could not +find the bold variant of some system font, but \XeLaTeX\ did. And the spacing +for the letters of the Didot font was vastly different between the two +engines. + \newcommand\TEST[1]{\MTversion{#1}\def\tmpa{#1}% \def\tmpb{normal}\def\tmpc{bold}% \ifx\tmpa\tmpb\else\ifx\tmpa\tmpc\else \MTnonlettersobeymathxx @@ -1378,10 +1404,10 @@ pdfpagemode=UseOutlines,% {\hbox to \linewidth \bgroup \hss \bgroup \aftergroup\centeredline@ } \makeatother -\DeclareRobustCommand\cs[1]% - {{\ttfamily\hyphenchar\font=189 \char`\\#1}} +\DeclareRobustCommand\cs[1]% j'utilisais avant 189, j'ai essayé 23 + {{\ttfamily\hyphenchar\font=127 \char`\\#1}} \DeclareRobustCommand\csb[1]% - {\hyperref[#1]{\ttfamily\hyphenchar\font=189 \char`\\#1}} + {\hyperref[#1]{\ttfamily\hyphenchar\font=127 \char`\\#1}} \newcommand*\blueit[1]{\texorpdfstring{\blueitaux #1\relax}{#1}} \def\blueitaux #1#2\relax{\hyperref[#2]{\ttfamily #1#2}} @@ -1395,7 +1421,7 @@ pdfpagemode=UseOutlines,% \def§{\begingroup \let\do\@makeother\dospecials \@jfendshrtverb } -\def\@jfendshrtverb #1#2§{\hyperref[#2]{\ttfamily\hyphenchar\font=189 #1#2}\endgroup} +\def\@jfendshrtverb #1#2§{\hyperref[#2]{\ttfamily\hyphenchar\font=127 #1#2}\endgroup} \makeatother \newcommand\mst{% @@ -1567,8 +1593,7 @@ LGRgreek]{mathastext} \section{What \mst does} -For changes see \autoref{sec:changelog}. For installation instructions see -\autoref{sec:install}. +For changes see \autoref{sec:changelog}. \subsection{Examples} @@ -1697,7 +1722,7 @@ $(\alpha,\beta,\gamma,\delta) = (\frac{(\nu+n)^2}2, document uses the |LGR| encoded fonts |cmtt|, |cmss|, and |txr|, which are part of standard \TeX{} distributions.\footnote{The first two are available (with no need to - load explicitely any package in the document) via the combination + load explicitly any package in the document) via the combination |cbfonts| (|cbgreek-complete|) \& |babel|, and the |LGR| encoded |txr| font (again no package loading is necessary) is part of the files of the |txfontsb| package.} @@ -1934,17 +1959,34 @@ the document, with the help of the mechanism of math versions. Without the to the whole of the document (and one may also define additional math versions in the preamble); with the §subdued§ option the \emph{mathastextification} is done only in \emph{math versions} distinct from -the standard and bold ones. +the standard and bold ones. -The previous description is in fact a bit optimistic: \mst was not -written initially in order to allow its action to be completely -canceled, and achieving this would require a complete rewrite of -large portions of the code.% -% -\footnote{\mst does not store mathcodes nor does it set them when -changing math versions; only that would allow a perfect subdued -mode. The sole exception, since \texttt{1.3t}, is for the handling of -the minus sign.} +Despite some limitations I will now partially describe, the §subdued§ option +has its utility, as I think is illustrated enough by the examples given at the +start of this document and it works reasonably well. + +\begin{framed} + \mst was not written initially in order to allow its action to + be completely canceled. It does not store (all) mathcodes nor + does it set them (all) when changing math versions; only that would + allow a perfect subdued mode (and \LaTeX\ is rather obstinate in + making that tricky or at least uneasy if sticking to its + official interface to math mode, as it is almost entirely + preamble only). + + Releases |1.3t| and |1.3u| do this kind of things to maintain + usability across multiple \mst-ified math versions of characters + which are obviously font encoding dependent such as the minus + sign as en-dash (or unicode minus), the dotless i, the |\hbar|, + the text accents. + + But this should be extended to all \mst-ified characters which + basically would amount to an extensive rewrite of large legacy + portions of the code. Currently the support for the |subdued| + mode and to multiple math versions amounts to some kind of a + kludge, added to an initial design which handled a single unique + text font. +\end{framed} To get the displayed math (almost) as if \mst had not been loaded, one must also @@ -1961,28 +2003,29 @@ where the math operator font is in a classic en-dash or minus character in non-subdued math versions.} % and although it will make a reasonable choice of this font, -this is not a return to the previously prevailing situation. And -then arbitrary packages could have done arbitrary things... so to +this is not an exact re-installement of the previously prevailing situation. And +then other packages could have done arbitrary things regarding character +mathcodes, so to be on the safe side one needs the §basic§ option which limits the -mathastextification to letters and digits; and also the §nohbar§ to -avoid the redefinition of the \cs{hbar} macro.% +mathastextification to letters and digits.% +% +\footnote{\CHANGED{1.3d}The §subdued§ mode does extinguish +in the normal and bold math versions the action of options §selfGreek§, +§eulergreek§, and §symbolgreek§ (previously only §LGRgreek§ was +subdue-able).} \footnote{\CHANGED{1.3t}The \texttt{\string\imath} and -\texttt{\string\jmath} now obey automatically the subdued regime.} - -And even then, in some circumstances, this -may not suffice; for example the \emph{euler} package puts +\texttt{\string\jmath} now obey the subdued regime.} +\footnote{\CHANGED{1.3u}Also \texttt{\string\hbar} +and the math accents (see §mathaccents§ option) obey the subdued regime.} +% +Even then, in some circumstances, this +may not suffice: for example the \emph{euler} package puts the digits in the same font as the Latin letters in math mode, but the subdued \mst will pick them up in the same font as used for operator names, which for example in the case of the \emph{euler} package, is -is the main document font. So, even subdued, \mst still kicks. But, -as I think is illustrated by the examples given at the start of -this document, the §subdued§ option has its utility, and works -reasonably well. +the main document font. + -Starting with package version |1.3d|, the §subdued§ mode does extinguish -in the normal and bold math versions the action of options §selfGreek§, -§eulergreek§, and §symbolgreek§ (previously only §LGRgreek§ was -subdue-able). \subsection{Math versions}\label{sec:mathversions} @@ -2054,10 +2097,10 @@ math version to have distinct fonts for text and math: The native \LaTeX{} command \cs{mathversion}\marg{version\_name} would change only the fonts used in math -mode. It is recommended to use instead the package command +mode. It is important to use rather the package command \csb{MTversion} (or one of its synonyms \cs{mathastextversion}, -\cs{Mathastextversion}, \cs{MTVersion}), with a mandatory argument -\marg{version\_name}, which does additional actions: +\cs{Mathastextversion}, \cs{MTVersion}), with its mandatory argument +\marg{version\_name}, as it does additional actions: \begin{itemize} \item it sets the font for math mode (letters, math operator names, digits, punctuations, some other symbols) according to the version name given as @@ -2066,7 +2109,16 @@ mode. It is recommended to use instead the package command |\(family,rm,sf,...)default|s to their values as registered at the time of definition of the version. \emph{Use the starred variant in case this is not desired.} It is possible to also specify within brackets an extra optional - version name, and the text font will be set according to it, + version name, and the text font will be set according to it. +\end{itemize} +For all math versions if not using the §subdued§ option, or only +for the non-\emph{normal} and non-\emph{bold} math versions if +using the §subdued§ option, \cs{MTversion} does further additional tasks: +\begin{itemize} +\item it resets\RLNote{NEW FEATURE!}{1.3u} the §\hbar§, \cs{imath} + (see §\inodot§), \cs{jmath}, math accents (see option + §mathaccents§) and minus sign as en dash according to the used + font encoding for the \mst-ified text font, \item (see sections \ref{sec:mathskips} and \ref{sec:ic}) it re-issues the command §\MTmathactiveletters§ to let a to z, A to Z, be mathematically active in order to automatically insert the skips as defined by the user @@ -2084,8 +2136,9 @@ mode. It is recommended to use instead the package command received one of the Greek related options. \end{itemize} The scope is limited to the current \LaTeX{} -environment or group. When switching to the \emph{normal} or \emph{bold} math -versions under option §subdued§ most of the above is canceled. +environment or group. +% When switching to the \emph{normal} or \emph{bold} math +% versions under option §subdued§ most of the above is canceled. It is sometimes not compatible with \mst to load a font package after it, as the @@ -2260,7 +2313,7 @@ $\xdef\mstrestorefontdimen{\fontdimen2\textfont\symmtletterfont= We learn in Appendix G of the \TeX book that the italic correction is used for the horizontal shift of the superscript with respect to the position of the subscript: $\mathit{f_i^j}$, or, -going back now to the the standard math italics $f_i^j$. In the next paragraphs +going back now to the standard math italics $f_i^j$. In the next paragraphs we use $f_i^i$ for more accurate comparison of the positioning of the sub- and superscript. If we try something like this: |${f\/}_i^i$| we obtain ${f\/}_i^i$. Our @@ -2377,9 +2430,11 @@ $\mathit{f_i^i}$\par $\mathrm{f_i^i}$ \footnotemark } \footnotetext {2016/11/04: the situation hasn't changed a iota since, -at least on current TL2016. For more see -\url{http://tex.stackexchange.com/a/337076} which explores also the differences -between the two Unicode engines regarding italic corrections in pure text mode.} +at least on current TL2016.} + +% For more see +% \url{http://tex.stackexchange.com/a/337076} which explores also the differences +% between the two Unicode engines regarding italic corrections in pure text mode.} \subsection{Extra glue after \texorpdfstring{\cs{exists}}{\textbackslash exists}, \texorpdfstring{\cs{forall}}{\textbackslash forall}, and before the prime glyph} @@ -2502,7 +2557,7 @@ second feature is \emph{off} by default for the characters listed first. It is \emph{on} for the `easy' cases ${\#}\,{\$}\,{\%}\,{\&}\,.\,/\,\vert\,\backslash$ (activating the feature for them puts no constraint on the user input and should not be too upsetting to -other packages), and also for $*$ but only if this was required explicitely by +other packages), and also for $*$ but only if this was required explicitly by the option §asterisk§, as the user then is supposed to know that |$R^*$| is no valid input anymore and should be replaced by |$R^{*}$|. The remaining `difficult' cases create similar @@ -2518,14 +2573,18 @@ for activation.\footnote{these commands are to be used outside of math mode. Their scope is limited to the current \LaTeX{} environment or group. They use the \cs{everymath} and \cs{everydisplay} mechanism so if the document needs to modify these token lists it has to do so in a responsible manner, extending - not annihilating their previous contents.} \footnote{when in subdued mode, the - math alphabets are the default ones, not the ones modified by \mst to use the - document text fonts. As a result, matters of font encodings may then give - unexpected results, for example for $-$. On the present document page we - switched to a math version to escape from the |subdued| mode and avoid the - problem with \cs{mathbf\{-\}} giving in the normal (subdued) math version - {\MTversion{normal}\MTnonlettersobeymathxx$\mathbf-$\sffamily, when - `non-letters' are declared to obey math alphabets.}} + not annihilating their previous contents.} +%% suppression de cette note de bas de page ŕ 1.3u car elle est obsolčte +%% (pas sűr si ŕ 100%, mais en tout cas l'exemple avec \mathbf{-} n'a plus +%% de problčme. +% \footnote{when in subdued mode, the +% math alphabets are the default ones, not the ones modified by \mst to use the +% document text fonts. As a result, matters of font encodings may then give +% unexpected results, for example for $-$. On the present document page we +% switched to a math version to escape from the |subdued| mode and avoid the +% problem with \cs{mathbf\{-\}} giving in the normal (subdued) math version +% {\MTversion{normal}\MTnonlettersobeymathxx$\mathbf-$\sffamily, when +% `non-letters' are declared to obey math alphabets.}} \begin{framed} \textbf{Important:} the package does \csb{MTnonlettersdonotobeymathxx} by @@ -2747,7 +2806,7 @@ it does not know how to use a given Unicode font simultaneously for Latin and Greek letters. Again the user is strongly advised to look at |mathspec| and |unicode-math|. -Let me point out explicitely that \mst has not been tested in any systematic +Let me point out explicitly that \mst has not been tested in any systematic manner under the Unicode engines; and that it is expected to be most definitely incompatible with |unicode-math|, although your mileage may vary and some features may appear to work. @@ -2770,8 +2829,9 @@ option, and this \emph{must} happen before loading \mst. The |amsmath| package, if used, \emph{must} be loaded \emph{prior} to \mst. \item - Under |lualatex| engine, it is recommended to also load the package - |lualatex-math|. + Under |lualatex| engine, it has long been recommended to also load the package + |lualatex-math|. Please check its documentation as possibly it has now + been incorporated upstream (I am not following up on the situation). \end{itemize} \end{framed} @@ -2796,12 +2856,9 @@ To define math versions when using unicode fonts, use |fontspec|'s \cs{setmainfont} before the \cs{Mathastext}\oarg{version} command, or simply before loading \mst for the default math versions. -It is possible to mix Unicode fonts and classical \TeX{} fonts. But this is -definitely \emph{not} recommended as \mst decides once and for all at loading -time what should be (on the basis of \cs{encodindefault}) the font slot of -things such as the minus sign. So it is best to have either only Unicode -fonts, or only old-fashioned \TeX{} fonts in a fixed encoding (T1, or LY1 for -example). +It is possible to mix usage of Unicode fonts and classical \TeX{} +fonts. All used 8bits font encoding must have been passed as +options to the |fontenc| package. \subsubsection{The unicodeminus option} @@ -3069,28 +3126,31 @@ for subscripts (it also copies code from the |moresize| package to redefine 1.6} does nothing as it is already fixed ``upstream'' in |amsopn.sty|, but anyhow in both cases, this still hardcoded the font, so finally \mst does the right thing from its point of view. See the code comments for more, - there is an issue here with \LuaLaTeX not applying the curly right quote + there is an issue here with \LuaLaTeX\ not applying the curly right quote contrarily to \XeLaTeX.} % This customization is suppressed in §subdued§ mode for the |normal| and |bold| math versions. -\item[hbar:] the definition of \cs{hbar} inherited from - default \LaTeX{} will in our context make use of the - |h| of the current math font (so for us, it is also - the text font, perhaps in italic shape), but the bar - accross the |h| will come from the original default - math font for letters (usually |cmmi|), and - furthermore its placement on the |h| can be - odd-looking. So we redefine \cs{hbar} to use only the - text font (and this will be aware of the §italic§ - option). Our construction does not always give an - optimal result (and its scope is limited to the |OT1|, - |LY1| and |T1| encodings), so an option §nohbar§ - deactivates it. There is no \cs{hslash} provided by - the package, though. The version |1.12| of the - package when dealing with a Unicode font tries to get - the \cs{hbar} directly as a glyph from the font. +\item[hbar:] the default \LaTeX\ definition of §\hbar§ would in our context + make use of the |h| of the current math font (so for us, it is also the text + font, perhaps in italic shape), but with a bar accross the |h| from the + original default math font for letters (usually |cmmi|). We redefine + \cs{hbar} to use the text font macron accent (|\=|) as a mock math accent + (this takes into account the §italic§ option and is compatible with + subscripts and superscripts). + + Since |1.12| \mst when dealing with a Unicode font sets the \cs{hbar} + to be the character from the font having hexadecimal codepoint |U+0127|. + + Since |1.3u| the general 8bits font encoding is + supported\RLNote{changed:}{1.3u} (see discussion of the |mathaccents| option + at end of this list for the shared limitations). Brief testing with + various usual \TeX\ fonts shows that the vertical positioning of + the bar isn't satisfying. It is planned to either add a parameter to + adjust it or to modify altogether the mode of construction of the |\hbar|. + + Use §nohbar§ to tell \mst not do provide its own |\hbar|. \item[dotless i and j:] by default the package redefines \cs{imath} and @@ -3099,7 +3159,7 @@ math versions. % \footnote{\CHANGED{1.3t}Since \texttt{1.12} it also redefined \cs{i} and \cs{j} for usability both in text and math modes, but this has been - dropped at \texttt{1.13t}. Breaking change!} + dropped at \texttt{1.3t}. Breaking change!} \item[asterisk:] versions of \mst earlier than |1.2d [2013/01/02]| did not do anything @@ -3132,18 +3192,22 @@ math versions. |$R^{*}$| and |$R^{\ast}$|. Furthermore, they will obey the math alphabet commands. -\item[\XeTeX{} and \LuaLaTeX{}:] for the en-dash and the dotless i and j, the - package expects to detect either the |fontspec| encodings EU1 (\XeTeX), EU2 - (\LuaLaTeX), or TU\RightNote{1.3l} (both), or one of |OT1|, |LY1| or |T1|, - else it will renounce and not attempt to access the en-dash (or the - Unicode minus) and the dotless i and j glyphs. With \LaTeX{} and - Pdf\LaTeX{}, there is no such limitation and all 8bit-encodings - (containing these glyphs) should be ok. +\item[\XeTeX{} and \LuaLaTeX{}:] regarding the en-dash and the + dotless i and j, the package is now under the Unicode engines + compatible not only with the ``Unicode'' \LaTeX\ font encodings + EU1 (\XeTeX, old fontspec), EU2 (\LuaLaTeX, old fontspec), TU + (\XeTeX\ and \LuaLaTeX, modern fontspec), but also with + traditional 8bits-encodings declared as a |fontenc| + option.\RLNote{NEW FEATURE!}{1.3u} Formerly, with a Unicode engine, + only OT1, T1 and LY1 were supported by \mst as the 8bit encoding + of the document text font, regarding the minus as en-dash and + the dotless i and j. \item[fontspec:] one more note to users of -\XeTeX{}/\LuaLaTeX{} with |fontspec|: it has to be -loaded {with the option} |no-math|, -{and before} \mst. +\XeTeX{}/\LuaLaTeX{} with |fontspec|:\newline +\fbox{it has to be +loaded {with the option} |no-math|}, +and \emph{before} \mst. \item[vec accent:] The default \cs{vec} accent is not appropriate for upright letters, so \mst @@ -3187,27 +3251,61 @@ loaded {with the option} |no-math|, \autoref{sec:ic}) are removed in the scope of the math alphabets. \end{itemize} -\item[math accents:] an option §mathaccents§ is - provided to pick up the accents in math mode from the - text font, but the package knows only |T1|, |LY1| or - |OT1|-compatible encodings. +\item[math accents:] if option §mathaccents§ is used then \mst attempts to let + the math accents |\acute|, |\grave|, etc... use the suitable glyphs from the + text font. Prior to |1.3u| only |OT1|, |T1|, and |LY1| were supported (via + hardcoded slots). It should now work with any 8bits font + encoding\RLNote{NEW FEATURE!}{1.3u} having been declared as an option to the + |fontenc| package (and of course providing the ten needed text accents which + will mock math accents).% + % + \footnote{The code will raise low-level \TeX\ errors if the user attempts to + use an 8bits font encoding whose \LaTeX\ definition file is lacking the + suitable uses of \cs{DeclareTextAccent} or if the low level \LaTeX\ macro + implementation of text accents changes significantly; in such cases please + report the problem to the author, so that it can be documented in future + releases!} + + The |\vec| math accent is not handled here, as it is not available in the + usual 8bits font encodings. See the §fouriervec§ option or the §\pmvec§ + command. + + The math accents obey the §subdued§ option\RLNote{NEW FEATURE!}{1.3u} + and will change in sync with the \mst-ified text font used in + each non subdued math version. + + (Very) brief testing during |1.3u| development with \XeTeX\ and \LuaTeX\ let + the author conclude that usage with the \cs{Umathaccent} primitive of an + OpenType accent glyph slot (which in the text font is for usage as a + postpended combining character) gives definitely bad horizontal placements + for both engines (each in its own way). Thus, the redefinitions of accents + for a \mst declared math version with an OpenType font is by default + canceled.% +% +\footnote{I.e., the \cs{grave} etc... control sequences will, in math versions + with an OpenType \mst-ified font, expand to macros holding their initial + meanings, unmodified by \mst, which was in force at the + |\string\begin\string{document\string}|.} +% + Use §unimathaccents§ to force usage of the OpenType font text + accents glyph slots with the \cs{Umathaccent} primitive. Expert users are + invited to check out the code and to contribute suggestions if some extras + can improve it. +\item[varying font encodings:] the very first release of \mst dealt with only + one font; very soon thereafter it acquired the capacity to define multiple + math versions, each one using its own text font. But, as was documented at + this location formerly, various encoding dependent decisions were done once + and for all during package loading. + + This meant in particular that the minus sign (using the text endash), the + dotless |i| and |j|, the |\hbar|, the math accents were all set up for only + one unique font encoding. It was thus recommended that all math versions + share the same font encoding. + + The |1.3u| release has lifted this restriction.\RLNote{NEW FEATURE!}{1.3u} \end{description} -Regarding the encoding-dependent glyphs: the en-dash, the -dotless i and j, the math accents, the hbar, are encoding -dependent and the relevant decisions are made once by \mst at -the time it is loaded and are applied to all declared math -versions. So you can use math versions with different -encodings but, regarding these characters only those with the -same encoding as the normal math version will display them -correctly. - -\begin{framed} - It is thus recommended that all declared mathastext math - versions use the same font encoding. -\end{framed} - % 2 septembre 2013; finalisé 22:58 \makeatletter \def\@jfendshrtverb #1#2§{\@ifundefined{FLAG#2}% @@ -3454,7 +3552,7 @@ Formerly, italic corrections were added to the (non-oblique) letters of % arguments to all math alphabets (\emph{i.e.} also \cs{mathnormal}) are % suppressed (with \cs{MTicinmath} the italic corrections are suppressed % inside the scope of math alphabets \emph{except} \cs{mathnormal}.) - % No italic corrections are explicitely added inside arguments of math + % No italic corrections are explicitly added inside arguments of math % alphabets. §\MTicalsoinmathxx§: this command de-activates the de-activation of @@ -3495,6 +3593,21 @@ Formerly, italic corrections were added to the (non-oblique) letters of it will have to be coded |$a^{!}$|. Hence, by default, the package does §\MTnonlettersdonotobeymathxx§. + \begin{framed} + Under |subdued| option, \cs{MTnonlettersobeymathxx} effect is of course + canceled in the \emph{normal} and \emph{bold} math versions; but please + note that when switching back to a non-subdued math version it will be + mandatory to issue again \cs{MTnonlettersobeymathxx} explicitly if its + effect is to be re-activated. + + In particular, executing \cs{MTnonlettersobeymathxx} in the preamble or at + the start of the document body serves nothing, because the document is in + the subdued \emph{normal} math version regime then. It must thus be + executed after the first usage of \cs{Mtversion} switching to a + non-subdued math version, and again on each successive exit from the + \emph{normal} or \emph{bold} math versions. + \end{framed} + {\footnotesize §\MTexplicitbracesobeymathxx§ extends an earlier §\MTnonlettersobeymathxx§ to also treat \verb|\{| and \verb|\}|. But then |\left\{|, |\right\}| must @@ -3527,10 +3640,12 @@ Formerly, italic corrections were added to the (non-oblique) letters of \end{verbatim} {\footnotesize Notice that under |subdued| option, switching to the \emph{normal} or \emph{bold} version does \csb{MTeverymathoff} which - includes \cs{MTnonlettersdonotobeymathxx}. But the default + includes \cs{MTnonlettersdonotobeymathxx}. + + The default §\MTeverymathdefault§ which is issued when going back to a non-\emph{normal} or \emph{bold} math version doesn't do - \cs{MTnonlettersobeymathxx}. It is up to the user to correct this if + \cs{MTnonlettersobeymathxx}: thus it is up to the user to correct this if needed (no issue without |subdued| option). @@ -3795,13 +3910,22 @@ Formerly, it was set to |0mu|.} In the case of the option |italic|, the All further commands are usable only inside math mode. \begin{enumerate}[label=$\bullet$] -\item §\hbar§: this macro is by default redefined - (in a way compatible with the |italic| option) combining - the |h| letter and the \={ } accent from the - \mst font. Note that \cs{mathrm}|{\hbar}| and - \cs{mathbf}|{\hbar}| should work and that \cs{hbar} - does scale in subscripts and exponents. Only for |T1| - and |OT1| (or |LY1|) encodings. +\item §\hbar§: this macro is by default redefined (in a way compatible with + the |italic| option) combining the |h| letter and the \={ } accent from the + \mst font. Note that \cs{mathrm}|{\hbar}| and \cs{mathbf}|{\hbar}| will + work and that \cs{hbar} does scale in subscripts and exponents. Since + |1.3u|, this is a priori compatible with all 8bits text font + encodings\RLNote{changed:}{1.3u} supporting the |\=| text accent in + the LaTeX way.% +% +\footnote{\CHANGED{1.3u}The horizontal skips for letter |h| from + \cs{MTsetmathskips} are ignored for \cs{hbar}. Formerly, a positive + ``before'' skip was not properly taken into account for the horizontal + positioning of the accent and thus gave a bad result. The user can extend + the package \cs{hbar} definition to add skips.} +\footnote{\CHANGED{1.3u}The \cs{hbar} redefinition is canceled in normal and + bold math versions under the |subdued| option.} + \item §\fouriervec§: this is a |\vec| accent taken from the Fourier font; the |fourier| package need not be loaded. Active only if option §fouriervec§. @@ -3823,10 +3947,7 @@ distinct from the one for digits and operator names, or similarly when the math version has been declared via §\MTDeclareVersion§ with its optional parameter for shape of letters. \item §\inodot§, §\jnodot§: the corresponding glyphs in the \mst-ified - font for use in math mode. This should work for all 8bit-encodings - having these glyphs, and also with Unicode engines (except for the - latter if the font encoding is an 8-bit one distinct from |OT1|, |T1| - or |LY1|). By default, |\imath| and |\jmath| are redefined to use + font for use in math mode. By default, |\imath| and |\jmath| are redefined to use them. Since \texttt{1.3t}, these macros obey the \texttt{subdued} regime. % @@ -3993,7 +4114,9 @@ letters. \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 -changing commands. Will work only for |T1|, |LY1|, or |OT1|-compatible encodings. +changing commands. + \item §unimathaccents§:\RLNote{new:}{1.3u} extends |mathaccents| to +OpenType fonts. Gave bad results in my brief testing. \item §defaultbf§, §defaultit§, §defaultsf§, §defaulttt§: do not set up, respectively, the \cs{mathbf}, \cs{mathit}, \cs{mathsf}, and \cs{mathtt} commands to use the mathastext-ified @@ -4033,47 +4156,6 @@ Numerous examples will be found there:\\ \clearpage -\section{Installation}\label{sec:install} - -\def\MacroFont{\footnotesize\ttfamily} -\begin{verbatim} -Use the managing tools of your TeX installation to install or upgrade -mathastext. - -Else, for manual user install, grab mathastext.tds.zip from CTAN and run - - unzip -d mathastext.tds.zip - -where could be ~/texmf or, on mac os x, ~/Library/texmf. - -Else, download mathastext.dtx, possibly also mathastext.ins, and follow -these instructions: - -* with mathastext.ins: run tex on mathastext.ins to generate the package -style file mathastext.sty as well as mathastext.tex and some test files. - -* without mathastext.ins: run tex on mathastext.dtx to generate the package -style file mathastext.sty as well as mathastext.tex and some test files. -(and also mathastext.ins) - - Move the style file mathastext.sty to a location where TeX can find it. - In a TDS compliant hierarchy this will be - :tex/latex/mathastext/mathastext.sty - -*documentation*: run latex thrice on mathastext.tex then dvipdfmx. Or, run -pdflatex thrice on mathastext.dtx. In the former case the documentation is -with source code included, in the latter without. The file mathastext.tex -can be customized to change the font size or set other options therein. - - (One cannot use lualatex or xelatex to compile the documentation.) - -*test files*: mathastexttestmathversions.tex - mathastexttestunicodemacos.tex - mathastexttestunicodelinux.tex - mathastexttestalphabets.tex - -\end{verbatim} - \normalsize \section{Change log} @@ -4107,11 +4189,12 @@ can be customized to change the font size or set other options therein. % % Ici je dois faire un input approprié. -% Cette version a uniquement un README.md, dont il faut retirer le début. +% 2019/08/12: le ChangeLog.md est directement disponible, alors qu'auparavant +% il était inclus dans le README.md. +% % Les items sont initiés par des * % Il faut se débarrasser des ---- et remplacer les \[, \] -% Il faut aussi gérer les `, et par ailleurs se débarrasser du début du -% README.md +% Il faut aussi gérer les `. \catcode`*=\active \def*{\ifvmode\smallskip @@ -4134,13 +4217,13 @@ can be customized to change the font size or set other options therein. \catcode`-=\active \def-{% - \catcode`\<=\active + \catcode`M\active \begingroup - \lccode`\-`\< - \lowercase{\endgroup\long\def-}##1CHANGE LOG =========={\catcode`\<=12 \catcode`\-=12 }% + \lccode`\-`M % MATHASTEXT CHANGE LOG est la premičre ligne... + \lowercase{\endgroup\long\def-}##1\par{\catcode`\M=12 \catcode`\-=12 }% \catcode`1=\active \catcode`\` 9 % légčrement ennuyeux mais bon, c'est le plus simple. - \input README.md + \input ChangeLog.md } \makeatother @@ -4206,7 +4289,7 @@ can be customized to change the font size or set other options therein. % \begin{macrocode} \NeedsTeXFormat{LaTeX2e} \ProvidesPackage {mathastext} - [2018/08/22 v1.3t Use the text font in math mode (JFB)] + [2019/08/20 v1.3u Use the text font in math mode (JFB)] % \end{macrocode} % Testing for \XeTeX\ and \LuaLaTeX. % @@ -4222,6 +4305,7 @@ can be customized to change the font size or set other options therein. \let\mst@Umathcodenum \Umathcodenum \let\mst@Umathcode \Umathcode \let\mst@Umathchardef \Umathchardef + \let\mst@Umathaccent \Umathaccent \newif\ifmst@XeTeX \ifx\XeTeXinterchartoks\@undefined \mst@XeTeXfalse @@ -4232,6 +4316,7 @@ can be customized to change the font size or set other options therein. \let\mst@Umathcodenum \XeTeXmathcodenum \let\mst@Umathcode \XeTeXmathcode \let\mst@Umathchardef \XeTeXmathchardef + \let\mst@Umathaccent \XeTeXmathaccent \fi \fi \newif\ifmst@LuaTeX @@ -4244,6 +4329,7 @@ can be customized to change the font size or set other options therein. \let\mst@Umathcodenum \luatexUmathcodenum \let\mst@Umathcode \luatexUmathcode \let\mst@Umathchardef \luatexUmathchardef + \let\mst@Umathaccent \luatexUmathaccent \fi \fi \newif\ifmst@XeOrLua @@ -4262,9 +4348,12 @@ can be customized to change the font size or set other options therein. % |`EU1/EU2'| Anyhow, the code in \mst has been common to the two Unicode % engines for a while, hence it is not hard to adapt to the replacement of % |EU1/EU2| by |TU|, maintaining compatibility with legacy installations. +% % \begin{macro}{\mst@OneifUniEnc} +% The \cs{mst@OneifUniEnc} is expandable but must be used after +% having set \cs{mst@tmp@enc}... % \begin{macrocode} -\def\mst@oti{OT1}\def\mst@ti{T1}\def\mst@lyi{LY1} +\def\mst@oti{OT1} \def\mst@eui{EU1}\def\mst@euii{EU2}\def\mst@tu{TU} \def\mst@OneifUniEnc {% \ifx \mst@tmp@enc\mst@tu 1\else @@ -4316,27 +4405,22 @@ can be customized to change the font size or set other options therein. \def\mst@ltsh{\itdefault}} \DeclareOption{frenchmath}{\mst@frenchmathtrue\mst@italictrue \def\mst@ltsh{\itdefault}} -%% \newif\ifmst@endash\mst@endashtrue \DeclareOption{endash}{\mst@endashtrue} \DeclareOption{noendash}{\mst@endashfalse} \newif\ifmst@emdash \DeclareOption{emdash}{\mst@emdashtrue\mst@endashfalse} -%% \newif\ifmst@alldelims \edef\mst@tmp{\encodingdefault}\ifx\mst@oti\mst@tmp\else\mst@alldelimstrue\fi \DeclareOption{alldelims}{\mst@alldelimstrue} \DeclareOption{nolessnomore}{\mst@alldelimsfalse} -%% new with 1.2 \newif\ifmst@nosmalldelims \DeclareOption{nosmalldelims}{\mst@nosmalldelimstrue} -%% \newif\ifmst@noplus \DeclareOption{noplus}{\mst@noplustrue} \newif\ifmst@nominus \DeclareOption{nominus}{\mst@nominustrue} \DeclareOption{noplusnominus}{\ExecuteOptions{noplus,nominus}} -%% \newif\ifmst@noparen \DeclareOption{noparenthesis}{\mst@noparentrue} \newif\ifmst@nopunct @@ -4353,10 +4437,9 @@ can be customized to change the font size or set other options therein. \newif\ifmst@nospecials \DeclareOption{nospecials}{\mst@nospecialstrue} \newif\ifmst@basic % 1.3 to avoid unnecessary patch of amsmath \newmcodes@ -\DeclareOption{basic}{\mst@basictrue + \DeclareOption{basic}{\mst@basictrue \ExecuteOptions{noparenthesis,nopunctuation,% noplusnominus,noequal,noexclam,nospecials,nolessnomore}} -%% \newif\ifmst@nohbar \DeclareOption{nohbar}{\mst@nohbartrue} \newif\ifmst@nodigits @@ -4365,7 +4448,8 @@ can be customized to change the font size or set other options therein. \DeclareOption{defaultimath}{\mst@defaultimathtrue} \newif\ifmst@mathaccents \DeclareOption{mathaccents}{\mst@mathaccentstrue} -%% +\newif\ifmst@unimathaccents % 1.3u + \DeclareOption{unimathaccents}{\mst@mathaccentstrue\mst@unimathaccentstrue} \newif\ifmst@needsymbol \newif\ifmst@symboldelimiters \DeclareOption{symboldelimiters}{\mst@needsymboltrue\mst@symboldelimiterstrue} @@ -4379,16 +4463,14 @@ can be customized to change the font size or set other options therein. \DeclareOption{symbolre}{\mst@needsymboltrue\mst@symbolretrue} \newif\ifmst@symbolmisc \DeclareOption{symbolmisc}{\mst@needsymboltrue\mst@symbolmisctrue} -\DeclareOption{symbol}{\ExecuteOptions{symbolgreek,symbolmisc,symbolre}} -\DeclareOption{symbolmax}{\ExecuteOptions{symbol,symboldelimiters}} -%% + \DeclareOption{symbol}{\ExecuteOptions{symbolgreek,symbolmisc,symbolre}} + \DeclareOption{symbolmax}{\ExecuteOptions{symbol,symboldelimiters}} \newif\ifmst@needeuler \newif\ifmst@eulerdigits \DeclareOption{eulerdigits}{\mst@needeulertrue\mst@eulerdigitstrue} \newif\ifmst@eulergreek \DeclareOption{eulergreek}{\mst@needeulertrue\mst@eulergreektrue \mst@customgreektrue } -%% \newif\ifmst@selfGreek \DeclareOption{selfGreek}{\mst@selfGreektrue\mst@customgreektrue} \newif\ifmst@selfGreeks @@ -4399,7 +4481,6 @@ can be customized to change the font size or set other options therein. \newif\ifmst@LGRgreeks \DeclareOption{LGRgreeks}{\mst@LGRgreekstrue\mst@LGRgreektrue \mst@customgreektrue} -%% \def\mst@greek@select{0} \newif\ifmst@itgreek \newif\ifmst@upgreek @@ -4407,7 +4488,6 @@ can be customized to change the font size or set other options therein. \DeclareOption{upgreek}{\mst@upgreektrue} \DeclareOption{itGreek}{\def\mst@greek@select{1}} \DeclareOption{upGreek}{\def\mst@greek@select{2}} -%% % \end{macrocode} % Starting with |1.15f| the meaning of the `defaultxx' options has changed. They % now prevent |mathastext| from defining additional alphabets rather than @@ -4761,7 +4841,8 @@ defaultbf,defaultit,defaultsf,defaulttt}\mst@nonormalboldtrue} % by Babel, its fall-back does not invoke |\string'| so being still % of mathcode |32768| is not a problem. % -% I have posted on TeX StackExchange how Babel should possibly modify +% I have posted online ^^A on TeX StackExchange +% how Babel should possibly modify % its definitions and I use this here. I simplify a bit my proposed % replacement of \cs{normal@char}\meta{char} as the check for % \cs{protect} is superfluous, I think, having been @@ -4841,7 +4922,7 @@ defaultbf,defaultit,defaultsf,defaulttt}\mst@nonormalboldtrue} % the added macros \cs{mst@itcorr} and \cs{mst@before} expanding to % nothing). % -% Added note |2016/01/06|: it should be explicitely said that the extra +% Added note |2016/01/06|: it should be explicitly said that the extra % |{..}| in |\mst@mathactivate| for letters end up creating |\hbox|'es % around each letter with its extra skips and explicit italic correction, % when present. These skips are thus set at natural width and do not add @@ -4880,6 +4961,14 @@ defaultbf,defaultit,defaultsf,defaulttt}\mst@nonormalboldtrue} % The new version of \cs{resetMathStrut@} from LaTeX team release % |2016/03/03 v2.15a| of |amsmath.sty| is still not compatible with a math % active opening parenthesis. Hence my patch here is still needed. +% +% At |1.3u| \cs{MTnonlettersobeymathxx} and \cs{MTeasynonlettersobeymathxx} +% are made no-ops under subdued mode. This fixes some bug if for example +% the former was used in preamble or immediately after |\begin{document}| +% making the minus sign math active although the \mst action was +% supposedly subdued. Similarly \cs{MTmathactiveletters} is now a no-op +% if issued under subdued mode in the \emph{normal} or \emph{bold} math +% versions. % \begin{macrocode} \newtoks\mst@do@nonletters \newtoks\mst@do@easynonletters @@ -4894,8 +4983,27 @@ defaultbf,defaultit,defaultsf,defaulttt}\mst@nonormalboldtrue} \let\resetMathstrut@\mst@savedresetMathstrut@}% \fi \let\mst@the\@gobble -} -\newcommand*\MTnonlettersobeymathxx{% +}% +% \end{macrocode} +% |1.3u| adds this check that we are not in a subdued normal or bold math +% version. No need for expandable coding. +% \begin{macrocode} +\def\mst@OnlyIfNotSubdued#1{% + \ifmst@subdued + \def\mst@tmpa{normal}% + \ifx\math@version\mst@tmpa + \else + \def\mst@tmpa{bold}% + \ifx\math@version\mst@tmpa + \else + #1% + \fi + \fi + \else + #1% + \fi +}% +\def\mst@nonlettersobeymathxx{% \ifx\mst@the\the \else \@ifundefined{mst@savedresetMathstrut@}{}{% @@ -4915,14 +5023,22 @@ defaultbf,defaultit,defaultsf,defaulttt}\mst@nonormalboldtrue} from amsmath replaced (for this group or environment)}}% \fi \let\mst@the\the -} -\newcommand*\MTeasynonlettersdonotobeymathxx{\let\mst@theeasy\@gobble} -\newcommand*\MTeasynonlettersobeymathxx{\let\mst@theeasy\the} -\MTeasynonlettersobeymathxx -\newcommand*\MTmathactiveletters{\let\mst@thef\the \let\mst@theF\the} -\ifmst@subdued\else\MTmathactiveletters\fi -\newcommand*\MTmathactiveLetters{\let\mst@theF\the} -\newcommand*\MTmathstandardletters{\let\mst@thef\@gobble \let\mst@theF\@gobble} +}% +\newcommand*\MTnonlettersobeymathxx + {\mst@OnlyIfNotSubdued\mst@nonlettersobeymathxx}% +\newcommand*\MTeasynonlettersdonotobeymathxx{\let\mst@theeasy\@gobble}% +\def\mst@easynonlettersobeymathxx{\let\mst@theeasy\the}% +\newcommand*\MTeasynonlettersobeymathxx + {\mst@OnlyIfNotSubdued\mst@easynonlettersobeymathxx}% +\MTeasynonlettersobeymathxx % no-op here if subdued mode +\def\mst@mathactiveletters{\let\mst@thef\the \let\mst@theF\the}% +\newcommand*\MTmathactiveletters + {\mst@OnlyIfNotSubdued\mst@mathactiveletters}% +\MTmathactiveletters % no-op here if subdued mode +\def\mst@mathactiveLetters{\let\mst@theF\the}% +\newcommand*\MTmathactiveLetters + {\mst@OnlyIfNotSubdued\mst@mathactiveLetters}% +\newcommand*\MTmathstandardletters{\let\mst@thef\@gobble \let\mst@theF\@gobble}% % \end{macrocode} % \begin{macro}{\MTicinmath} % \begin{macro}{\MTICinmath} @@ -4965,73 +5081,6 @@ defaultbf,defaultit,defaultsf,defaulttt}\mst@nonormalboldtrue} \newcommand*\MTicalsoinmathxx{% \ifx\mst@itcorr\@empty\else\def\mst@itcorr{\/}\fi \ifx\mst@ITcorr\@empty\else\def\mst@ITcorr{\/}\fi} -\AtEndOfPackage{\AtBeginDocument{% - \everymath\expandafter{\the\everymath - \mst@the\mst@do@nonletters \let\mst@the\@gobble - \mst@theeasy\mst@do@easynonletters \let\mst@theeasy\@gobble - \mst@thef\mst@do@az \let\mst@thef\@gobble - \mst@theF\mst@do@AZ \let\mst@theF\@gobble}% - \everydisplay\expandafter{\the\everydisplay - \mst@the\mst@do@nonletters \let\mst@the\@gobble - \mst@theeasy\mst@do@easynonletters \let\mst@theeasy\@gobble - \mst@thef\mst@do@az \let\mst@thef\@gobble - \mst@theF\mst@do@AZ \let\mst@theF\@gobble}% -% \end{macrocode} -% |1.3j|: moved here to be executed at begin document (and not from inside -% \cs{Mathastext@}.) The \cs{MTeverymathoff} does: \cs{MTnormalasterisk}, -% \cs{MTnormalprime}, \cs{MTnonlettersdonotobeymathxx}, -% \cs{MTeasynonlettersdonotobeymathxx}, \cs{MTmathstandardletters}. -% -% |1.3m|: doing \cs{MTmathactiveletters} in subdued mode immediately after -% |\begin{document}| resulted in errors because \cs{mst@itcorr} had been left -% undefined. We thus add \cs{MTnoicinmath} to the subdued initialization. -% -% Since |1.3n| there is \cs{MTresetnewmcodes} which needs -% \cs{mst@originalnewmcodes@}, itself defined at begin document. Thus we have -% wrapped the whole thing in \cs{AtEndOfPackage}. -% -% And |1.3p| adds here \cs{MTcustomizenewmcodes} which had been regrettably -% forgotten by |1.3n|. -% -% |1.3t| adds some extras to handle correctly the minus sign and -% dotless i and j in subdued mode, even in case of usage with fontspec. -% \begin{macrocode} - \MTcustomizenewmcodes - \let\mst@imath\imath - \let\mst@jmath\jmath - \ifmst@subdued - \MTeverymathoff - \MTresetnewmcodes - \MTnoicinmath - \MTmathoperatorsdonotobeymathxx - \let\inodot\mst@imath - \let\jnodot\mst@jmath - \mst@subduedminus - \else - \mst@nonsubduedminus -% \end{macrocode} -% |1.3j|: an earlier version of this code was earlier part of \cs{Mathastext@}. -% As we are now in \cs{AtBeginDocument} we try to be careful not to overwrite -% \cs{MTicinmath}, \cs{MTnoicinmath}, \cs{MTicalsoinmathxx}, ... if issued by -% the user in the preamble, though. And we do not execute -% \cs{MTmathactiveletters}, it is issued by the package at loading time in -% order to allow user to cancel it if desired from inside the preamble. -% \begin{macrocode} - \ifx\mst@itcorr\@undefined - \def\mst@itcorr{\ifnum\fam=\m@ne\/\fi}% - \@for\mst@tmp:=it,sl\do - {\ifx\mst@tmp\mst@ltshape@normal\let\mst@itcorr\@empty\fi }% - \fi - \ifx\mst@ITcorr\@undefined - \let\mst@ITcorr\mst@itcorr - \ifmst@frenchmath - \def\mst@ITcorr{\ifnum\fam=\m@ne\/\fi}% - \@for\mst@tmp:=it,sl\do - {\ifx\mst@tmp\mst@shape@normal\let\mst@ITcorr\@empty\fi }% - \fi - \fi - \fi -}} % \end{macrocode} % \end{macro}\end{macro}\end{macro}\end{macro}\end{macro}\end{macro}\end{macro} % \end{macro}\end{macro}\end{macro}\end{macro}\end{macro}\end{macro}\end{macro} @@ -5041,7 +5090,7 @@ defaultbf,defaultit,defaultsf,defaulttt}\mst@nonormalboldtrue} % |1.3| |2013/09/02|: user level command to specify extra spaces in math mode % around the letters (only the 7bit a,b,..,z and A,B,..,Z). First parameter is % the letter, second is the math skip to be inserted before, and third the -% skip to be inserted after; for example \cs{thickmuskip} or explicitely +% skip to be inserted after; for example \cs{thickmuskip} or explicitly % |0.1mu|. % % For this, letters are made mathematically active. This is now the package @@ -5236,9 +5285,10 @@ defaultbf,defaultit,defaultsf,defaulttt}\mst@nonormalboldtrue} % SINGLE QUOTATION MARK in math mode, but \XeLaTeX\ does. From the point % of view of \mst, the behaviour of \XeLaTeX\ is the coherent one. It % appears that \LuaLaTeX\ use in math mode of a text font does not obey -% the set features, like this -% \url{http://tex.stackexchange.com/questions/208688/oldstylefigure-issue-with-lualatex-and-mathastext} -% perhaps illustrates. I opened a ticket at +% the set features.^^A like this +%^^A \url{http://tex.stackexchange.com/questions/208688/oldstylefigure-issue-with-lualatex-and-mathastext} +%^^A perhaps illustrates. +% I opened a ticket at % \url{https://github.com/wspr/fontspec/issues/238}, but as usual it is % hard to figure out the best place where to report font matters. % \emph{This item might be obsolete -- not checked (1.3q).} @@ -5308,133 +5358,6 @@ defaultbf,defaultit,defaultsf,defaulttt}\mst@nonormalboldtrue} \let\newmcodes@\mst@newmcodes@\fi} % \end{macrocode} % \end{macro}\end{macro}\end{macro}\end{macro} -% \begin{macro}{subdued} -% |1.15|: The subdued code was initiated in May 2011. I returned to -% |mathastext| on Sep 24, 2012, and decided to complete what I had started -% then, but in the mean time I had forgotten almost all of the little I knew -% about \LaTeX{} macro programming. -% -% The point was to extract the data about how are `letters' and -% `operators' in the normal and bold versions, through obtaining the -% math families of `a' and `1', respectively$^1$. Due to the -% reassignements done for characters by |mathastext| I also had -% decided in 2011 that the OT1 encoding, if detected, should be -% replaced by T1 ($(1)$: but the \emph{euler} package for example -% assigns the digits to the \emph{letters} symbol font...) -% -% |1.15d|: Oct 13, 2012. The \cs{mathcode} thing has to be used with care -% under Unicode engines. Unfortunately the \cs{luatexUmathcode} macro is -% helpless as it is not possible to know if it will return a legacy mathcode -% or a Unicode mathcode. On the other hand the much saner -% \cs{XeTeXmathcodenum} always return a Unicode mathcode. -% -% {UPDATE for \mst\ 1.3 (|2013/09/02|): since the release of lualatex as -% included in -% TL2013, \cs{luatexUmathcodenum} behaves as \cs{XeTeXmathcodenum} so \mst 1.3 -% treats identically under both unicode engines the equal and minus signs (and -% the vertical bar).} -% -% |1.15e|: Oct 22, 2012. I add the necessary things to also subdue the -% \cs{mathbf}, \cs{mathit}, \cs{mathsf} and \cs{mathtt} macros (previous -% version only took care of the symbol alphabets \cs{mathnormal} and -% \cs{mathrm}.) [update: |1.15f| does that in a completely different and much -% simpler way] Notice that the package defines a \cs{mathnormalbold} macro, -% but it will not be subdued in the normal and bold math versions. -% -% |1.15f|: Oct 23, 2012. The previous version of the code queried the math -% family of a, respectively 1, to guess and then extract the fonts to be -% reassigned to mtletterfont and mtoperatorfont (which is done at the end of -% this .sty file). The present code simply directly uses letters and operators -% (so mathastext could not subdue itself... if it was somehow cloned), but -% obtains indeed the corresponding font specifications in normal and bold in a -% cleaner manner. But it is so much shorter (and avoids the \LuaLaTeX{} -% problem with \cs{luatexUmathcode}). Anyhow, for example the euler package -% puts the digits in the letters math family! so the previous method was also -% error prone. In fact there is no way to do this subdued mechanism on the -% basis of the legacy code of mathastext. The only way is to rewrite entirely -% the package to query all mathcodes of things it changes in order to be able -% to revert these changes (and one would have to do even more hacking for -% |\mathversion{normal}| and not only |\MTversion{normal}| to work). -% -% |1.15f|: and also I take this opportunity to do the subdued math -% alphabets things in a much much easier way, see below. -% -% |1.3s 2018/08/21|: I have half-forgotten the reasons for modifiying the -% font encoding to current |\encodingdefault|, but at any rate this should -% not be done in a |fontspec| context, encoding default being (now) |TU| it -% is very unlikely modifying from |TU| or to |TU| from something else will -% do any good. See -% \centeredline{\url{https://tex.stackexchange.com/questions/444565/mathastext-wrong-digits-in-math-mode/}} -% for original report. I add workaround here for case of |fontspec| being -% detected via the |\encodingdefault| setting. -% -% |1.3t 2018/08/22|: the |1.3s| fix erroneously removed the -% |OT1->T1| replacement in |TU| context. -% \begin{macrocode} -\ifmst@subdued - \def\mst@reserved#1\getanddefine@fonts\symletters#2#3\@nil{% - \def\mst@normalmv@letter{#2}} - \expandafter\mst@reserved\mv@normal\@nil - \def\mst@reserved#1\getanddefine@fonts\symletters#2#3\@nil{% - \def\mst@boldmv@letter{#2}} - \expandafter\mst@reserved\mv@bold\@nil - \def\mst@reserved#1\getanddefine@fonts\symoperators#2#3\@nil{% - \def\mst@normalmv@operator{#2}} - \expandafter\mst@reserved\mv@normal\@nil - \def\mst@reserved#1\getanddefine@fonts\symoperators#2#3\@nil{% - \def\mst@boldmv@operator{#2}} - \expandafter\mst@reserved\mv@bold\@nil -%% - \edef\mst@tmp@enc{\encodingdefault} - \def\mst@reserved#1/#2/#3/#4/{\gdef\mst@debut{#1}\gdef\mst@reste{#2/#3/#4}} - \begingroup\escapechar\m@ne - \xdef\mst@funnyoti{\expandafter\string\csname OT1\endcsname} - \expandafter\expandafter\expandafter - \mst@reserved\expandafter\string\mst@normalmv@operator/ - \endgroup - \ifx\mst@debut\mst@funnyoti\ifx\mst@tmp@enc\mst@oti\def\mst@tmp@enc{T1}\fi\fi - \edef\mst@normalmv@operator{\expandafter\noexpand\csname - \if1\mst@OneifUniEnc - \ifx\mst@debut\mst@funnyoti T1\else\mst@debut\fi - \else - \mst@tmp@enc - \fi/\mst@reste\endcsname} - \begingroup\escapechar\m@ne - \expandafter\expandafter\expandafter - \mst@reserved\expandafter\string\mst@boldmv@operator/ - \endgroup - \ifx\mst@debut\mst@funnyoti\ifx\mst@tmp@enc\mst@oti\def\mst@tmp@enc{T1}\fi\fi - \edef\mst@boldmv@operator{\expandafter\noexpand\csname - \if1\mst@OneifUniEnc - \ifx\mst@debut\mst@funnyoti T1\else\mst@debut\fi - \else - \mst@tmp@enc - \fi/\mst@reste\endcsname} - \AtEndOfPackage{ - \typeout{** ...entering subdued mode...} - \expandafter\SetSymbolFont@ \expandafter\mv@normal\mst@normalmv@letter\symmtletterfont - \expandafter\SetSymbolFont@ \expandafter\mv@bold\mst@boldmv@letter\symmtletterfont - \expandafter\SetSymbolFont@ \expandafter\mv@normal\mst@normalmv@operator\symmtoperatorfont - \expandafter\SetSymbolFont@ \expandafter\mv@bold\mst@boldmv@operator\symmtoperatorfont - \typeout{** ...done.} - } -\fi % fin de ce \ifmst@subdued -% \end{macrocode} -% In the short-lived |1.15e| I was doing the following for alphabets:\\ -% |\def\mst@reservedc#1#2#3#4{\def\mst@normalmv@mathbf{#4#3}}|\\ -% |\def\mst@reserveda#1{%|\\ -% |\def\mst@reservedb##1\install@mathalphabet#1##2##3\@nil{\mst@reservedc##2}%|\\ -% |\expandafter\mst@reservedb\mv@normal\@nil}|\\ -% |\expandafter\mst@reserveda\csname mathbf\space\endcsname|\\ -% and later in the code:\\ -% |\expandafter\expandafter\expandafter\SetMathAlphabet@|\\ -% |\expandafter\expandafter\expandafter\mv@normal|\\ -% |\expandafter\mst@normalmv@mathbf\csname Mathbf\space \endcsname\Mathbf|\\ -% It does work! but |\let\mst@original@bf\mathbf| is so -% much simpler. And also safer, because \cs{mathbf} could have been -% redefined using \cs{DeclareSymbolFontAlphabet}... (I could have -% provided the necessary check to the already bloated code...) -% \end{macro} % \begin{macro}{mtoperatorfont} % Declaration of the current default font as our math % font. The characteristics of the used font can be @@ -5472,7 +5395,7 @@ defaultbf,defaultit,defaultsf,defaulttt}\mst@nonormalboldtrue} % \end{macrocode} % \end{macro}\end{macro}\end{macro}\end{macro}\end{macro}\end{macro} % \begin{macro}{mtletterfont} -% In version |1.1|, we add the possibility to mimick the standard +% At version |1.1|, we add the possibility to mimick the standard % behavior, that is to have italic letters and upright % digits. Thanks to Tariq~\textsc{Perwez} and % Kevin~\textsc{Klement} who asked for such a feature. @@ -5488,7 +5411,8 @@ defaultbf,defaultit,defaultsf,defaulttt}\mst@nonormalboldtrue} % fonts, the default in text being to use the |node| mode, and this mode is % non-working in math, thus \mst needs to force use of |base| mode. Else one % sees old style figures where one does not expect them, or the opposite, -% depending on the default font feature, see for example \url{http://tex.stackexchange.com/questions/208688/oldstylefigure-issue-with-lualatex-and-mathastext/277628}. +% depending on the default font feature. +%^^A see for example \url{http://tex.stackexchange.com/questions/208688/oldstylefigure-issue-with-lualatex-and-mathastext/277628}. % % Once we know the cause, the fix is relatively easy. I will go for the % |\everymath| way, because I don't want to dwelve at all with the details @@ -5498,12 +5422,12 @@ defaultbf,defaultit,defaultsf,defaulttt}\mst@nonormalboldtrue} % present patch by \mst will be unneeded. Naturally, here we care only about % the two maths fonts used by \mst: |mtoperatorfont| and |mtletterfont|. % -% For the |\url| situation, I have posted a patch at: -% \url{http://tex.stackexchange.com/questions/264206/cant-get-oldstyle-figures-in-url-with-lualatex}. +% For the |\url| situation, I have posted online a patch. +%^^A \url{http://tex.stackexchange.com/questions/264206/cant-get-oldstyle-figures-in-url-with-lualatex}. % -% Not all is resolved, as I comment at -% \url{http://tex.stackexchange.com/a/307585/4686} and at -% \url{https://github.com/lualatex/luaotfload/issues/204#issuecomment-216465680} +% Not all is resolved, as I comment online +%^^A \url{http://tex.stackexchange.com/a/307585/4686} and at +% at \url{https://github.com/lualatex/luaotfload/issues/204#issuecomment-216465680} % that with |TeX Gyre Termes| for example I can not get simultaneously Old % Style and Tabular Figures to work in math mode, although the font name as % constructed by my patch (which is like the code below, only simpler as we @@ -5844,2006 +5768,2138 @@ defaultbf,defaultit,defaultsf,defaulttt}\mst@nonormalboldtrue} \let\Mathastextupgreek\MTupgreek \let\MathastextitGreek\MTitGreek \let\MathastextupGreek\MTupGreek -\@onlypreamble\MTitgreek -\@onlypreamble\MTupgreek -\@onlypreamble\MTitGreek -\@onlypreamble\MTitGreek -\@onlypreamble\Mathastextitgreek -\@onlypreamble\Mathastextupgreek -\@onlypreamble\MathastextitGreek -\@onlypreamble\MathastextitGreek \newcommand*\MTgreekfont[1]{\def\mst@greekfont{#1}} \let\Mathastextgreekfont\MTgreekfont -\@onlypreamble\MTgreekfont -\@onlypreamble\Mathastextgreekfont % \end{macrocode} % \end{macro} % \end{macro} % \end{macro} % \end{macro} % \end{macro} -% \begin{macro}{\MTWillUse} -% This is a preamble-only command, which can be used more than once, only the -% latest one counts. Sets up the math fonts in the normal and bold -% versions, as does \cs{Mathastext}. -% \begin{macrocode} -\newcommand*\MTWillUse[5][]{ - \MTencoding{#2} - \MTfamily{#3} - \MTseries{#4} - \MTshape{#5} - \ifmst@italic\MTlettershape{\itdefault}\fi % was missing in v 1.14 and prior - \edef\mst@tmp{#1} - \ifx\mst@tmp\empty\else\MTlettershape{#1}\fi - \Mathastext} -\let\MathastextWillUse\MTWillUse -\let\Mathastextwilluse\MTWillUse -\@onlypreamble\MTWillUse -\@onlypreamble\MathastextWillUse -\@onlypreamble\Mathastextwilluse -% \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. -% -% 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. +% At (long...) last we now change the font for the letters of the +% latin alphabet. In version |1.1|, Latin letters have their own font +% (shape). % -% 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. +% |1.2b| initiated the use of mathematically active letters to insert the italic +% corrections. With version |1.3| the use of math active letters is also for +% extra muglue added before and after the letters. Use of |\@for| to shorten the +% code initiated with release |1.3|. +% \begin{macrocode} +\def\mst@DeclareMathLetter #1{% + \DeclareMathSymbol {#1}{\mathalpha}{mtletterfont}{`#1}% + \expandafter + \DeclareMathSymbol \csname mst@#1\endcsname{\mathalpha}{mtletterfont}{`#1}% + \expandafter\mst@addtodo@az\expandafter #1\csname mst@#1\endcsname +}% +\@tfor\mst@tmp:=abcdefghijklmnopqrstuvwxyz\do + {\expandafter\mst@DeclareMathLetter\mst@tmp}% +\ifmst@frenchmath \def\mst@font@tbu{mtoperatorfont}% + \else \def\mst@font@tbu{mtletterfont}% +\fi +\def\mst@DeclareMathLetter #1{% + \DeclareMathSymbol {#1}{\mathalpha}{\mst@font@tbu}{`#1}% + \expandafter + \DeclareMathSymbol \csname mst@#1\endcsname{\mathalpha}{\mst@font@tbu}{`#1}% + \expandafter\mst@addtodo@AZ\expandafter #1\csname mst@#1\endcsname +}% +\@tfor\mst@tmp:=ABCDEFGHIJKLMNOPQRSTUVWXYZ\do + {\expandafter\mst@DeclareMathLetter\mst@tmp}% +\let\mst@DeclareMathLetter\relax +\ifmst@nodigits\else +\def\mst@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} +\ifmst@symboldigits \def\mst@font@tbu{mtpsymbol} \fi +\ifmst@eulerdigits \def\mst@font@tbu{mteulervm} \fi +\DeclareMathSymbol{0}{\mathalpha}{\mst@font@tbu}{`0}% +\DeclareMathSymbol{1}{\mathalpha}{\mst@font@tbu}{`1}% +\DeclareMathSymbol{2}{\mathalpha}{\mst@font@tbu}{`2}% +\DeclareMathSymbol{3}{\mathalpha}{\mst@font@tbu}{`3}% +\DeclareMathSymbol{4}{\mathalpha}{\mst@font@tbu}{`4}% +\DeclareMathSymbol{5}{\mathalpha}{\mst@font@tbu}{`5}% +\DeclareMathSymbol{6}{\mathalpha}{\mst@font@tbu}{`6}% +\DeclareMathSymbol{7}{\mathalpha}{\mst@font@tbu}{`7}% +\DeclareMathSymbol{8}{\mathalpha}{\mst@font@tbu}{`8}% +\DeclareMathSymbol{9}{\mathalpha}{\mst@font@tbu}{`9}% +\fi +% \end{macrocode} +% When |symboldelimiters| is passed as an option, we use the +% Symbol font for the printable characters other than +% letters and digits. +% \begin{macrocode} +\ifmst@symboldelimiters +\def\mst@font@tbu{mtpsymbol}% +\mst@endashfalse +\mst@emdashfalse +\else +\def\mst@font@tbu{mtoperatorfont}% +\fi +% \end{macrocode} +% |1.2| adds the tricks to let non letters/digits obey math alphabets. We have +% to double the definitions for easy switch on-off of the mechanism, via a token +% list which is put into \cs{everymath} and \cs{everydisplay}. +% \begin{macrocode} +\ifmst@noexclam\else\typeout{** \string! and \string?}% +\DeclareMathSymbol{!}{\mathclose}{\mst@font@tbu}{"21}% +\DeclareMathSymbol{\mst@varfam@exclam}{\mathalpha}{\mst@font@tbu}{"21}% +\expandafter\mst@addtodo@nonletters\string!\mathclose\mst@varfam@exclam +\DeclareMathSymbol{?}{\mathclose}{\mst@font@tbu}{"3F}% +\DeclareMathSymbol{\mst@varfam@question}{\mathalpha}{\mst@font@tbu}{"3F}% +\expandafter\mst@addtodo@nonletters\string?\mathclose\mst@varfam@question +\fi +% \end{macrocode} +% \begin{macro}{\MTlowerast} +% \begin{macro}{\mst@doasterisk} +% \begin{macro}{\mst@@doasterisk} +% \begin{macro}{\MTnormalasterisk} +% \begin{macro}{\MTactiveasterisk} +% |1.12d| The \cs{ast} or |*| is defined in |fontmath.ltx| as a binary +% operator from the |symbols| font. Usually the asterisk from the text +% font is in a raised position. Previous versions of \mst did nothing +% with \cs{ast} but strangely defined |*| to be the one from the text +% font, with type \cs{mathalpha}. The package now leaves by default +% both |*| and |\ast| untouched, and if passed option |asterisk| +% replaces both of them with a lowered text asterisk (or the one from +% the Symbol font), and of type \cs{mathbin}. A trick is used to +% optionally get both |*| and \cs{ast} obey the math alphabets. % -% Versions |1.15x| brought some adaptations related to the subdued -% option. +% The user macro \cs{MTlowerast} sets the amount +% of lowering to be applied to the text asterisk. % -% |1.3c| adds a second optional parameter to inherit previous settings -% from another version; mostly done to inherit the bold version fonts for -% symbols and large symbols. This is done in |\MTDeclareVersion|. +% |1.12e| Somehow there was a big omission in |1.12d|, the +% command \cs{MTlowerast} as described in the manual was missing! % -% |1.3j| moves the code related to \cs{MTicinmath} from \cs{Mathastext@} to -% \cs{AtBeginDocument} (code depending on whether |subdued| option in use). -% But we omit for this from \cs{MTicinmath} the \cs{MTmathactiveletters} -% and issue the latter during loading of package, hence allowing -% \cs{MTmathstandardletters} to be effective in the preamble. +% nota bene: it is assumed that |*| is of type |other| when \mst +% is loaded... it should neither be active, nor of type |letter|! % -% I forgot to document that under |subdued| option the \cs{Mathastext} -% command without optional parameter does not any |\SetSymbolFont| etc... -% has a few other taks to complete nevertheless. +% |1.3i| adds \cs{MTnormalasterisk} and \cs{MTactiveasterisk}. They do nothing +% without option |asterisk|. % \begin{macrocode} -\def\Mathastext {\@ifnextchar [\Mathastext@declare\Mathastext@ } -\def\Mathastext@declare [#1]{% - \edef\mst@tmp{#1}% - \ifx\mst@tmp\empty - \expandafter\@firstoftwo - \else\expandafter\@secondoftwo +\def\mst@@doasterisk{\let\ast\mst@ast\mst@mathactivate*{}\mst@ast}% +\newcommand*\MTnormalasterisk {\let\mst@doasterisk\relax} +\newcommand*\MTactiveasterisk {\let\mst@doasterisk\mst@@doasterisk} +\ifmst@asterisk\typeout{** asterisk: \string\ast\space and *} + \AtBeginDocument{% + \everymath\expandafter + {\the\everymath \mst@doasterisk \MTnormalasterisk }% + \everydisplay\expandafter + {\the\everydisplay\mst@doasterisk \MTnormalasterisk }} + \ifmst@symbolmisc + \def\mst@bin@ast{% + \mathbin{\mathchoice{\raisebox{-.1\height}% + {\the\textfont\symmtpsymbol\char42}}% + {\raisebox{-.1\height}% + {\the\textfont\symmtpsymbol\char42}}% + {\raisebox{-.1\height}% + {\the\scriptfont\symmtpsymbol\char42}}% + {\raisebox{-.1\height}% + {\the\scriptscriptfont\symmtpsymbol\char42}}}}% + \else + \def\mst@bin@ast{% + \mathbin{\mathchoice{\raisebox{-\mst@lowerast}% + {\the\textfont\symmtoperatorfont\char42}}% + {\raisebox{-\mst@lowerast}% + {\the\textfont\symmtoperatorfont\char42}}% + {\raisebox{-\mst@lowerast}% + {\the\scriptfont\symmtoperatorfont\char42}}% + {\raisebox{-\mst@lowerast}% + {\the\scriptscriptfont\symmtoperatorfont\char42}}}}% \fi - \Mathastext@ - {\MTDeclareVersion[\mst@ltsh]{#1}{\mst@enc}{\mst@fam}{\mst@ser}{\mst@opsh}}% -} -\def\Mathastext@ {% - \mst@update@greeksh - \edef\mst@encoding@normal{\mst@enc}% - \edef\mst@family@normal{\mst@fam}% - \edef\mst@series@normal{\mst@ser}% - \edef\mst@shape@normal{\mst@opsh}% - \edef\mst@ltshape@normal{\mst@ltsh}% - \edef\mst@itdefault@normal{\itdefault}% - \edef\mst@rmdefault@normal{\rmdefault}% - \edef\mst@sfdefault@normal{\sfdefault}% - \edef\mst@ttdefault@normal{\ttdefault}% - \edef\mst@boldvariant@normal{\mst@bold}% - \edef\mst@exists@skip@normal{\mst@exists@skip}% - \edef\mst@forall@skip@normal{\mst@forall@skip}% - \edef\mst@prime@skip@normal{\mst@prime@skip}% - \edef\mst@encoding@bold{\mst@enc}% - \edef\mst@family@bold{\mst@fam}% - \edef\mst@series@bold{\mst@bold}% - \edef\mst@shape@bold{\mst@opsh}% - \edef\mst@ltshape@bold{\mst@ltsh}% - \edef\mst@boldvariant@bold{\mst@bold}% - \edef\mst@itdefault@bold{\itdefault}% - \edef\mst@rmdefault@bold{\rmdefault}% - \edef\mst@sfdefault@bold{\sfdefault}% - \edef\mst@ttdefault@bold{\ttdefault}% - \edef\mst@exists@skip@bold{\mst@exists@skip}% - \edef\mst@forall@skip@bold{\mst@forall@skip}% - \edef\mst@prime@skip@bold{\mst@prime@skip}% - \ifmst@subdued + \def\mst@varfam@ast{\ifnum\fam=\m@ne\mst@bin@ast\else + \mathbin{\mathchoice{\raisebox{-\mst@lowerast}% + {\the\textfont\fam\char42}}% + {\raisebox{-\mst@lowerast}% + {\the\textfont\fam\char42}}% + {\raisebox{-\mst@lowerast}% + {\the\scriptfont\fam\char42}}% + {\raisebox{-\mst@lowerast}% + {\the\scriptscriptfont\fam\char42}}}\fi}% + \MTactiveasterisk + \DeclareRobustCommand*{\mst@ast}{\mst@bin@ast} + \newcommand*\MTlowerast[1]{\def\mst@lowerast{#1}} + \MTlowerast{.3\height} + \mst@do@easynonletters\expandafter\expandafter\expandafter + {\expandafter\the\expandafter\mst@do@easynonletters + \expandafter\def\csname mst@ast \endcsname{\mst@varfam@ast}} +\fi % \end{macrocode} -% Since |1.3j| this branch is actually almost superfluous, as entering -% |normal| or |bold| with \cs{MTversion} does \cs{MTnormalexists}, -% \cs{MTnormalforall}, and \cs{MTnormalprime}. But some default values are -% needed if the user insists on issuing \cs{MTexistsdoesskip}, etc... -% nevertheless. +% \end{macro}\end{macro}\end{macro}\end{macro}\end{macro} +% (2011) I renounced to try to do things with all the various dots, they are +% defined in many different ways, and there is the amsmath also. Dealing with +% this issue would mean a lot a time for a minuscule result. Better to leave the +% user use the |mathdots| package and accept that we can not avoid 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). +% +% [(Dec. 2012) should I reexamine these definitive sounding remarks?] % \begin{macrocode} - \def\mst@exists@skip@normal{0mu}% - \def\mst@forall@skip@normal{0mu}% - \def\mst@prime@skip@normal{0mu}% - \def\mst@exists@skip@bold{0mu}% - \def\mst@forall@skip@bold{0mu}% - \def\mst@prime@skip@bold{0mu}% - \else % not subdued - \ifmst@italic - \ifmst@frenchmath - \mst@exists@muskip\mst@exists@skip\relax - \mst@forall@muskip\mst@forall@skip\relax - \mst@prime@muskip\mst@prime@skip\relax - \else - \def\mst@exists@skip@normal{0mu}% - \def\mst@forall@skip@normal{0mu}% - \def\mst@prime@skip@normal{0mu}% - \def\mst@exists@skip@bold{0mu}% - \def\mst@forall@skip@bold{0mu}% - \def\mst@prime@skip@bold{0mu}% - \fi - \else - \mst@exists@muskip\mst@exists@skip\relax - \mst@forall@muskip\mst@forall@skip\relax - \mst@prime@muskip\mst@prime@skip\relax - \fi - \fi -%% v1.15f - \ifmst@nonormalbold\else - \SetMathAlphabet{\mathnormalbold}{normal}{\mst@encoding@normal}% - {\mst@family@normal}% - {\mst@boldvariant@normal}% - {\mst@ltshape@normal}% - \SetMathAlphabet{\mathnormalbold}{bold}{\mst@encoding@bold}% - {\mst@family@bold}% - {\mst@boldvariant@bold}% - {\mst@ltshape@bold}% - \fi -%% v1.15f adds \ifmst@default.. checks - \ifmst@subdued\else - \SetSymbolFont{mtletterfont}{normal}{\mst@encoding@normal}% - {\mst@family@normal}% - {\mst@series@normal}% - {\mst@ltshape@normal}% - \SetSymbolFont{mtletterfont}{bold} {\mst@encoding@bold}% - {\mst@family@bold}% - {\mst@series@bold}% - {\mst@ltshape@bold}% - \SetSymbolFont{mtoperatorfont}{normal}{\mst@encoding@normal}% - {\mst@family@normal}% - {\mst@series@normal}% - {\mst@shape@normal}% - \SetSymbolFont{mtoperatorfont}{bold} {\mst@encoding@bold}% - {\mst@family@bold}% - {\mst@series@bold}% - {\mst@shape@bold}% - \ifmst@defaultbf\else - \SetMathAlphabet{\Mathbf}{normal}{\mst@encoding@normal}% - {\mst@family@normal}% - {\mst@series@bold}% - {\mst@shape@normal}% - \SetMathAlphabet{\Mathbf}{bold}{\mst@encoding@bold}% - {\mst@family@bold}% - {\mst@series@bold}% - {\mst@shape@bold}% - \fi - \ifmst@defaultit\else - \SetMathAlphabet{\Mathit}{normal}{\mst@encoding@normal}% - {\mst@family@normal}% - {\mst@series@normal}% - {\mst@itdefault@normal}% - \SetMathAlphabet{\Mathit}{bold}{\mst@encoding@bold}% - {\mst@family@bold}% - {\mst@series@bold}% - {\mst@itdefault@bold}% - \fi - \ifmst@defaultsf\else - \SetMathAlphabet{\Mathsf}{normal}{\mst@encoding@normal}% - {\mst@sfdefault@normal}% - {\mst@series@normal}% - {\mst@shape@normal}% - \SetMathAlphabet{\Mathsf}{bold}{\mst@encoding@bold}% - {\mst@sfdefault@bold}% - {\mst@series@bold}% - {\mst@shape@bold}% - \fi - \ifmst@defaulttt\else - \SetMathAlphabet{\Mathtt}{normal}{\mst@encoding@normal}% - {\mst@ttdefault@normal}% - {\mst@series@normal}% - {\mst@shape@normal}% - \SetMathAlphabet{\Mathtt}{bold}{\mst@encoding@bold}% - {\mst@ttdefault@bold}% - {\mst@series@bold}% - {\mst@shape@bold}% - \fi - \fi % de \ifmst@subdued +\ifmst@nopunct\else\typeout{** punctuation\string: \string, \string. \string: \string; and \string\colon} +\DeclareMathSymbol{,}{\mathpunct}{\mst@font@tbu}{"2C} +\DeclareMathSymbol{\mst@varfam@comma}{\mathalpha}{\mst@font@tbu}{"2C} +\expandafter\mst@addtodo@nonletters\string,\mathpunct\mst@varfam@comma +\DeclareMathSymbol{.}{\mathord}{\mst@font@tbu}{"2E} +\DeclareMathSymbol{\mst@varfam@dot}{\mathalpha}{\mst@font@tbu}{"2E} +\mst@addtodo@easynonletters\.\mst@varfam@dot +\DeclareMathSymbol{:}{\mathrel}{\mst@font@tbu}{"3A} % relation spacing +\DeclareMathSymbol{\mst@varfam@colon}{\mathalpha}{\mst@font@tbu}{"3A} +\expandafter\mst@addtodo@nonletters\string:\mathrel\mst@varfam@colon +\@ifpackageloaded{amsmath} +{} % \colon defined in amsmath.sty in terms of : with some enlarged explicit + % spacing. No need to intervene. +{% no amsmath, use standard punctuation spacing +\let\colon\undefined + % the reason is if some package has redefined \colon which then + % can not be used in \cs{DeclareMathSymbol} anymore (we + % shamelessly overwrite...) + \DeclareMathSymbol{\colon}{\mathpunct}{\mst@font@tbu}{"3A} + \mst@do@nonletters\expandafter{\the\mst@do@nonletters + \def\colon{\mathpunct{\mst@varfam@colon}}}} +\DeclareMathSymbol{;}{\mathpunct}{\mst@font@tbu}{"3B} +\DeclareMathSymbol{\mst@varfam@pointvirgule}{\mathalpha}{\mst@font@tbu}{"3B} +\expandafter\mst@addtodo@nonletters\string;\mathpunct\mst@varfam@pointvirgule +\fi % \end{macrocode} -% \begin{macro}{\MathEulerBold} -% |1.14c|: We reset |mteulervm| and \cs{MathEulerBold} here as the -% variant for bold may have been changed by the user via -% \cs{Mathastextboldvariant}|{m}|; and we should keep this local to -% math versions. +% \begin{macro}{\relbar} +% Due to the way = and - are used by \LaTeX{} in arrows, we will +% have to redefine \cs{Relbar} and \cs{relbar} in order for +% them to preserve their original meanings. +% +% |1.15d|: Oct 13, 2012. Belated amendment of the code to be compatible +% with Unicode engines in case someone changed the mathcode of -. +% However, for the time being I can do it in an easy way only for +% \XeTeX, not for \LuaLaTeX. Also I do my modifications to \cs{relbar} +% in a manner testing for the presence of amsmath. % \begin{macrocode} - \ifmst@needeuler - \SetSymbolFont{mteulervm}{bold}{U}{zeur}{\mst@boldvariant@normal}{n}% - \SetMathAlphabet{\MathEulerBold}{normal}% - {U}{zeur}{\mst@boldvariant@normal}{n}% - \SetMathAlphabet{\MathEulerBold}{bold}% - {U}{zeur}{\mst@boldvariant@normal}{n}% +\ifmst@nominus +\else + \ifmst@XeOrLua + \mst@Umathcharnumdef\mst@minus@sign=\mst@Umathcodenum`\-\relax +%% I used this prior to the new \luatexUmathcodenum, as available since TL2013: +%% \mathchardef\mst@minus@sign=8704\relax % "2200 + \else + \mathchardef\mst@minus@sign=\mathcode`\-\relax \fi +\@ifpackageloaded{amsmath} +{\def\relbar{\mathrel{\mathpalette\mathsm@sh\mst@minus@sign}}} +{\DeclareRobustCommand\relbar{\mathrel{\smash\mst@minus@sign}}} +\def\rightarrowfill{$\m@th\mathord{\relbar}\mkern-7mu% + \cleaders\hbox{$\mkern-2mu\relbar\mkern-2mu$}\hfill + \mkern-7mu\mathord\rightarrow$} +\def\leftarrowfill{$\m@th\mathord\leftarrow\mkern-7mu% + \cleaders\hbox{$\mkern-2mu\relbar\mkern-2mu$}\hfill + \mkern-7mu\mathord{\relbar}$} +\fi % \end{macrocode} % \end{macro} +% \begin{macro}{endash} +% |1.1| |2011/01/29|: Producing this next piece of code was not a piece +% of cake for a novice like myself!\newline +% |1.11| |2011/02/05|: Compatibility with Unicode (via use of fontspec +% encodings EU1 and EU2)\newline +% |1.12| |2011/02/07|: Improved dealing of Unicode possibility.\newline +% |1.14b| |2011/04/02|: Corrected some very irresponsible bug in the +% Unicode part which caused a problem when 10 or more math families have +% been allocated.\newline +% |1.15| |2012/09/24|: Added AtBeginDocument to circumvent some amsmath +% problem with unicode engines. +% +% |1.3l| |2016/01/29|: anticipating TL2016 fontspec's switch to |TU|. +% +% |1.3t| |2018/08/22|: fix to very ancient (|2012/12/20|) bug with +% |\DeclareMathSymbol| lacking last argument if encoding not T1, OT1 or +% LY1 when setting up math mode to use the en-dash character as minus +% sign (PDF\TeX\ engine). +% +% \begin{macro}{\mst@subduedminus} +% \begin{macro}{\mst@nonsubduedminus} +% |1.3t| Further, new macros |\mst@subduedminus| and |\mst@nonsubduedminus|, +% for the good functioning of the subdued option also in case of +% presence of fontspec. This is the only character for which subdued +% option works (now) by setting the mathcode on each math version +% change. Indeed, a typical issue is when the Unicode EN DASH or MINUS +% is used, but the actual font in subdued normal math version is +% originally in OT1 or T1 encoding. The only reasonable way to address +% this is by actually modifying the assigned mathcode at each version +% change. This means also that |\MTversion| and not |\mathversion| +% must be used for good functioning. % \begin{macrocode} - \ifmst@needsymbol\SetSymbolFont{mtpsymbol}{bold}% - {U}{psy}{\mst@boldvariant@normal}{n}% - \fi +\let\mst@subduedminus\empty +\let\mst@nonsubduedminus\empty +\def\mst@dothe@endashstuff#1#2#3{% + \edef\mst@tmp@enc{#3}% + \if1\mst@OneifUniEnc + \mst@Umathchardef#1=2 \symmtoperatorfont "\mst@unicodeminus\relax + \mst@Umathchardef#2=7 \symmtoperatorfont "\mst@unicodeminus\relax + \else + \DeclareMathSymbol{#1}{\mathbin}{mtoperatorfont} + {\csname\mst@tmp@enc\string\textendash\endcsname} + \DeclareMathSymbol{#2}{\mathalpha}{mtoperatorfont} + {\csname\mst@tmp@enc\string\textendash\endcsname} + \fi}% mst@dothe@endashstuff +\def\mst@dothe@emdashstuff#1#2#3{% + \edef\mst@tmp@enc{#3}% + \if1\mst@OneifUniEnc + \mst@Umathchardef#1=2 \symmtoperatorfont "2014\relax + \mst@Umathchardef#2=7 \symmtoperatorfont "2014\relax + \else + \DeclareMathSymbol{#1}{\mathbin}{mtoperatorfont} + {\csname\mst@tmp@enc\string\textemdash\endcsname} + \DeclareMathSymbol{#2}{\mathalpha}{mtoperatorfont} + {\csname\mst@tmp@enc\string\textemdash\endcsname} + \fi}% mst@dothe@emdashstuff +\def\mst@dothe@hyphenstuff#1#2{% + \DeclareMathSymbol{#1}{\mathbin}{\mst@font@tbu}{"2D}% + \DeclareMathSymbol{#2}{\mathalpha}{\mst@font@tbu}{"2D}% +}% +\def\mst@varfam@minus{\@nameuse{mst@varfam@minus@mv\math@version}}% +\ifmst@nominus\else + \expandafter\mst@addtodo@nonletters\string-\mathbin\mst@varfam@minus + \def\mst@nonsubduedminus{% + \edef\mst@tmp@enc{\csname mst@encoding@\math@version\endcsname}% + \if1\mst@OneifUniEnc + \mst@Umathcode`\-=\expandafter + % Working around a bug (or feature...) of XeTeX/LuaTeX: afaict it is + % impossible to use straightforwardly in extended mathcode assignments + % a control sequence as created by \Umathchardef. + % This is counter-intuitive and breaks expectations. + \mst@UmathchardefWorkAround@i + \csname mst@minus@mv\math@version\endcsname + \relax + \else + \mathcode`\-=\@nameuse{mst@minus@mv\math@version}% self-delimiting + \fi + }% \mst@nonsubduedminus +\fi +\def\mst@UmathchardefWorkAround@i + {\expandafter\mst@UmathchardefWorkAround@ii\meaning}% +\def\mst@UmathchardefWorkAround@ii#1"{"}% % \end{macrocode} -% \begin{macro}{LGRgreek*} -% \begin{macro}{selfGreek*} -% LGRgreek, LGRgreeks, selfGreek, and selfGreeks options. +% \end{macro}\end{macro}\end{macro} +% \begin{macro}{\mst@hbar@mvnormal} +% \begin{macro}{\mst@ltbar@mvnormal} +% |2011/01/31|, |1.1| I decide to settle the question of the |\hbar|. The +% \LaTeX{} definition is |\def\hbar{{\mathchar'26\mkern-9muh}}| +% and its advantage is that |h| is in the correct font. But of course not +% the macron character (|\=|, |\bar|). And anyway |amsfonts| uses a +% \cs{DeclareMathSymbol}. Also there is the kern whose length depends on +% |cmsy| (18mu=1em and em taken from info in |cmsy|). +% +% I will need an |rlap| adapted to math +% mode, and this is provided by code from Alexander~R.~\textsc{Perlis} in +% his TugBoat article 22 (2001), 350--352, which I found by googling |rlap|. +% (as an aside, I am only now (April 2, 2011) aware that the package +% |mathtools| provides the |mathrlap| etc... ) +% +% |1.3l 2016/01/29|: anticipating TL2016 fontspec's switch to |TU|. +% +% |1.3u 2019/08/20|: encoding (8bits) agnostic construct for hbar, using same +% method as for |mathaccents| option. I should add some way to adjust the +% vertical positioning. +% +% On this occasion I replace |h| by |\mst@h| because the mechanism for +% before and after skips does not interact well with the rlap construct. % \begin{macrocode} - \ifmst@subdued\else - \ifmst@LGRgreek - \SetSymbolFont{mtlgrfontlower}{normal}{LGR}% - {\mst@greekfont}{\mst@series@normal}{\mst@greek@lsh}% - \SetSymbolFont{mtlgrfontlower}{bold}{LGR}% - {\mst@greekfont}{\mst@boldvariant@normal}{\mst@greek@lsh}% - \SetSymbolFont{mtlgrfontupper}{normal}{LGR}% - {\mst@greekfont}{\mst@series@normal}{\mst@greek@ush}% - \SetSymbolFont{mtlgrfontupper}{bold}{LGR}% - {\mst@greekfont}{\mst@boldvariant@bold}{\mst@greek@ush}% - \else - \ifmst@selfGreek - \SetSymbolFont{mtselfGreekfont}{normal}{OT1}% - {\mst@greekfont}{\mst@series@normal}{\mst@greek@ush}% - \SetSymbolFont{mtselfGreekfont}{bold}{OT1}% - {\mst@greekfont}{\mst@boldvariant@bold}{\mst@greek@ush}% - \fi - \fi +\let\mst@subduedhbar\@empty +\let\mst@nonsubduedhbar\@empty +\ifmst@nohbar\else + \def\mst@subduedhbar{\let\hbar\mst@original@hbar}% + \def\mst@nonsubduedhbar{% + \expandafter\let\expandafter\hbar + \csname mst@hbar@mv\math@version\endcsname + }% +\fi +\def\mst@mathrlap{\mathpalette\mst@mathrlapinternal} +\def\mst@mathrlapinternal#1#2{\rlap{$\mathsurround=0pt#1{#2}$}} +\def\mst@dothe@hbarstuff#1#2#3{% + \edef\mst@tmp@enc{#3}% + \if1\mst@OneifUniEnc % Unicode engine and font + \mst@Umathchardef#1="7 \symmtletterfont "0127 \relax %% or 210F? + \else + \begingroup + \def\@text@composite##1\@text@composite##2{##2}% + \let\add@accent\@firstoftwo + \DeclareMathAccent{#2}{\mathalpha}{mtletterfont}% + {\csname\mst@tmp@enc\string\=\endcsname{}}% + \endgroup + \def#1{\mst@mathrlap{#2{\ }}\mst@h}% \fi +}% end of \mst@dothe@hbarstuff % \end{macrocode} % \end{macro} % \end{macro} +% |1.15d|: Oct 13, 2012. The \cs{mathcode} thing with = is (belatedly, +% sorry!) made Unicode compatible. +% \begin{macro}{+,=,\Relbar} % \begin{macrocode} - \ifmst@subdued - \typeout{** subdued mode will be activated for the normal and bold math versions}% - \else - \typeout{** Latin letters in the normal (resp. bold) math versions are now^^J% - ** set up to use the fonts - \mst@encoding@normal/\mst@family@normal/\mst@series@normal% - (\mst@boldvariant@normal)/\mst@ltshape@normal}% - \ifmst@LGRgreek\typeout{** Greek letters (\mst@greek@lsh/\mst@greek@ush) - will use LGR/\mst@greekfont}% - \fi - \ifmst@nodigits\else - \typeout{** Other characters (digits, ...) and \protect\log-like names will be^^J% - ** typeset with the \mst@shape@normal\space shape.}% - \fi - \fi -} -\let\mathastext\Mathastext -\@onlypreamble\Mathastext -\@onlypreamble\mathastext +\ifmst@noplus\else\typeout{** \string+ and \string=} +\DeclareMathSymbol{+}{\mathbin}{\mst@font@tbu}{"2B} +\DeclareMathSymbol{\mst@varfam@plus}{\mathalpha}{\mst@font@tbu}{"2B} +\expandafter\mst@addtodo@nonletters\string+\mathbin\mst@varfam@plus +\fi +\ifmst@noequal\else +\ifmst@XeOrLua + \mst@Umathcharnumdef\mst@equal@sign=\mst@Umathcodenum`\=\relax +\else + \mathchardef\mst@equal@sign=\mathcode`\=\relax +\fi +\@ifpackageloaded{amsmath} +{\def\Relbar{\mathrel\mst@equal@sign}} +{\DeclareRobustCommand\Relbar{\mathrel{\mst@equal@sign}}} +\DeclareMathSymbol{=}{\mathrel}{\mst@font@tbu}{"3D} +\DeclareMathSymbol{\mst@varfam@equal}{\mathalpha}{\mst@font@tbu}{"3D} % \end{macrocode} -% \end{macro} -% \begin{macro}{\MTDeclareVersion} -% The \cs{MTDeclareVersion} command is to be used in the preamble -% to declare a math version. A more complicated variant would also -% specify a choice of series for the Euler and Symbol font: anyhow -% Symbol only has the medium series, and Euler has medium and bold, -% so what is lacking is the possibility to create a version with a -% bold Euler. There is already one such version: the default |bold| -% one. And there is always the possibility to add to the preamble -% \cs{SetSymbolFont}|{mteulervm}||{versionname}||{U}{zeur}{bx}{n}| if -% one wants to have a math version with bold Euler characters. -% -% For version |1.1| we add an optional parameter specifying the shape -% to be used for letters. -% -% Note: (|2012/10/24|) I really should check whether the user attempts to -% redefine the `normal' and `bold' versions and issue a warning in -% that case! +% \begin{macro}{\nfss@catcodes} +% |2012/12/18|: Activating = (only in math mode actually) seems very bad but +% surprisingly works well. However I had a problem with |eu2lmtt.fd| which +% should not be loaded with an active =. +% |2012/12/25|: Since then I had switched to only math activation. And in fact +% the problematic = from |eu2lmtt.fd| end up in \cs{csname}...\cs{endcsname} +% and I have +% learnt since that \TeX{} does not look at the |mathcode| inside a +% \cs{csname}...\cs{endcsname}. Example: +% \begin{verbatim} +% \mathcode`x="8000 +% \begingroup +% \catcode`x=\active +% \global\everymath{\defx{Hello}} +% \endgroup +% \def\foox{World!} +% $x \csname foox\endcsname$ +% \end{verbatim} +% We need nevertheless to inactivate the =, for the following reason. Imagine +% someone did |\catcode`==\active\def={\string=}|, or another definition which +% would not lead to a tragedy in a \cs{csname}...\cs{endcsname}. Then the = is +% active and the re-definition done by |mathastext| will not be compatible with +% loading |eu2lmtt.fd| (for the first time) from math mode, as this +% re-definition can not be expanded inside a +% \cs{csname}...\cs{endcsname}. % -% |1.3c| (|2013/12/14|) adds an extra optional parameter after all -% previous ones, to inherit the settings from another version. Typically -% to be used with [bold]. I take this opportunity to sanitize a bit some -% line endings to avoid generating (in the preamble, document macros were -% already careful of course) too many space -% tokens, at least inside macros. And I modifiy (correct? perhaps it was on -% purpose) the strange way I used |\@onlypreamble| in earlier version. +% |2012/12/28|: to be on the safe side, I add also |;| and |+| and do it +% without discriminating between engines % \begin{macrocode} -\newcommand*\MTDeclareVersion[6][]{% - \def\mst@declareversionargs{{#1}{#2}{#3}{#4}{#5}{#6}}% - \edef\mst@version{#2}% - \DeclareMathVersion{\mst@version}% - \MTDeclareVersion@ -} -\newcommand*\MTDeclareVersion@[1][]{% - \edef\mst@tmp{#1}% - \ifx\mst@tmp\empty\else - \global\expandafter\let\csname mv@\mst@version\expandafter\endcsname - \csname mv@#1\endcsname - \typeout{** Math version `\mst@version\string' inherits from `#1\string'.}% - \fi - \expandafter\MTDeclareVersion@@\mst@declareversionargs +\typeout{** adding \string= \string; and \string+ to \string\nfss@catcodes} +\g@addto@macro\nfss@catcodes{% + \@makeother\=% + \@makeother\;% + \@makeother\+% } -\newcommand*\MTDeclareVersion@@[6]{% - \edef\mst@tmp{#1}% - \expandafter\edef\csname mst@encoding@\mst@version\endcsname{#3}% - \expandafter\edef\csname mst@family@\mst@version\endcsname{#4}% - \expandafter\edef\csname mst@series@\mst@version\endcsname{#5}% - \expandafter\edef\csname mst@shape@\mst@version\endcsname{#6}% - \expandafter\edef\csname mst@boldvariant@\mst@version\endcsname{\mst@bold}% - \expandafter\edef\csname mst@itdefault@\mst@version\endcsname{\itdefault}% - \expandafter\edef\csname mst@rmdefault@\mst@version\endcsname{\rmdefault}% - \expandafter\edef\csname mst@sfdefault@\mst@version\endcsname{\sfdefault}% - \expandafter\edef\csname mst@ttdefault@\mst@version\endcsname{\ttdefault}% - \expandafter\edef\csname mst@exists@skip@\mst@version\endcsname - {\mst@exists@skip}% - \expandafter\edef\csname mst@forall@skip@\mst@version\endcsname - {\mst@forall@skip}% - \expandafter\edef\csname mst@prime@skip@\mst@version\endcsname - {\mst@prime@skip}% - \ifx\mst@tmp\empty - \ifmst@italic - \SetSymbolFont{mtletterfont}{#2}{#3}{#4}{#5}{\mst@ltsh}% - \typeout{** Latin letters in math version `#2\string' will use the font - #3/#4/#5/\mst@ltsh^^J% - ** Other characters (digits, ...) and \protect\log-like names - will be in #6 shape.}% - \expandafter\edef\csname mst@ltshape@\mst@version\endcsname{\mst@ltsh}% - \else - \SetSymbolFont{mtletterfont}{#2}{#3}{#4}{#5}{#6}% - \typeout{** Latin letters in math version `#2\string' will use the fonts - #3/#4/#5(\mst@bold)/#6}% - \expandafter\edef\csname mst@ltshape@\mst@version\endcsname{#6}% - \fi - \else - \SetSymbolFont{mtletterfont}{#2}{#3}{#4}{#5}{#1}% - \typeout{** Latin letters in math version `#2\string' will use the font - #3/#4/#5/#1^^J% - ** Other characters (digits, ...) and \protect\log-like - names will be in #6 shape.}% - \expandafter\edef\csname mst@ltshape@\mst@version\endcsname{#1}% - \fi - \ifmst@nonormalbold\else - \SetMathAlphabet{\mathnormalbold}{#2}{#3}{#4}{\mst@bold}% - {\csname mst@ltshape@\mst@version\endcsname}% - \fi - \SetSymbolFont{mtoperatorfont}{#2}{#3}{#4}{#5}{#6}% - \ifmst@defaultbf\else\SetMathAlphabet{\Mathbf}{#2}{#3}{#4}{\mst@bold}{#6}\fi - \ifmst@defaultit\else\SetMathAlphabet{\Mathit}{#2}{#3}{#4}{#5}{\itdefault}\fi - \ifmst@defaultsf\else\SetMathAlphabet{\Mathsf}{#2}{#3}{\sfdefault}{#5}{#6}\fi - \ifmst@defaulttt\else\SetMathAlphabet{\Mathtt}{#2}{#3}{\ttdefault}{#5}{#6}\fi - \ifmst@needeuler - \SetMathAlphabet{\MathEulerBold}{#2}{U}{zeur}{\mst@bold}{n}% - \fi +\expandafter\mst@addtodo@nonletters\string=\mathrel\mst@varfam@equal +\fi % \end{macrocode} -% \begin{macro}{LGRgreeks} -% \begin{macro}{selfGreeks} -% In the case of option LGRgreeks (selfGreeks), it is expected that -% the fonts used in each math versions exist in LGR (OT1) encoding. We -% first recalculate the shapes to be used for lowercase and uppercase -% Greek letters depending on the frenchmath and [it/up][g/G]reek -% options as well as on the (local to this version) shapes for letters -% and digits. +% \end{macro}\end{macro} +% \begin{macro}{noparenthesis} +% \begin{macro}{(,),[,],/} +% \cs{lbrack} and \cs{rbrack} are defined in |latex.ltx| by +% |\def\lbrack{[}\def\rbrack{]}| so this fits well with what we do here. +% \cs{lparen} and \cs{rparen} are similarly defined in |mathtools|. On the +% other hand in |latex.ltx| with |\{| and |\}| are defined (in math mode) in +% terms of the control sequences \cs{lbrace} and \cs{rbrace}. Such control +% sequences can not be simultaneously math symbols and math delimiters, +% thus, this complicates things for the mathastextification. % \begin{macrocode} - \def\mst@greek@lsh@loc{\csname mst@ltshape@\mst@version\endcsname}% - \def\mst@greek@ush@loc{\csname mst@shape@\mst@version\endcsname}% - \ifmst@itgreek\def\mst@greek@lsh@loc{\itdefault}% - \def\mst@greek@ush@loc{\itdefault}\fi - \ifmst@upgreek\def\mst@greek@lsh@loc{\updefault}% - \def\mst@greek@ush@loc{\updefault}\fi - \ifmst@frenchmath - \ifmst@itgreek\else - \ifmst@upgreek\else - \def\mst@greek@lsh@loc{\csname mst@shape@\mst@version\endcsname}% - \def\mst@greek@ush@loc{\csname mst@shape@\mst@version\endcsname}% - \fi\fi - \fi - \ifcase\mst@greek@select - \or\def\mst@greek@ush@loc{\itdefault}% - \or\def\mst@greek@ush@loc{\updefault}% - \fi - \ifmst@LGRgreeks - \SetSymbolFont{mtlgrfontlower}{#2}{LGR}{#4}{#5}{\mst@greek@lsh@loc}% - \SetSymbolFont{mtlgrfontupper}{#2}{LGR}{#4}{#5}{\mst@greek@ush@loc}% - \typeout{** Greek letters (\mst@greek@lsh@loc/\mst@greek@ush@loc) will use - LGR font #4\ifmst@subdued ^^J** (in non subdued versions)\fi}% - \else - \ifmst@selfGreeks - \SetSymbolFont{mtselfGreekfont}{#2}{OT1}{#4}{#5}{\mst@greek@ush@loc}% - \typeout{** Capital Greek letters (\mst@greek@lsh@loc/\mst@greek@ush@loc) - will use OT1 font #4\ifmst@subdued ^^J** (in non subdued versions)\fi}% - \else - \ifmst@LGRgreek - \SetSymbolFont{mtlgrfontlower}{#2}{LGR}{\mst@greekfont}{#5}{\mst@greek@lsh@loc}% - \SetSymbolFont{mtlgrfontupper}{#2}{LGR}{\mst@greekfont}{#5}{\mst@greek@ush@loc}% - \typeout{** Greek letters (\mst@greek@lsh@loc/\mst@greek@ush@loc) will use - LGR font \mst@greekfont\ifmst@subdued ^^J** (in non subdued versions)\fi}% - \else - \ifmst@selfGreek - \SetSymbolFont{mtselfGreekfont}{#2}{OT1}{\mst@greekfont}{#5}{\mst@greek@ush@loc}% - \typeout{** Capital Greek letters (\mst@greek@lsh@loc/\mst@greek@ush@loc) - will use OT1 font \mst@greekfont\ifmst@subdued ^^J** (in non subdued versions)\fi}% - \fi - \fi - \fi - \fi -} +\ifmst@noparen\else\typeout{** parentheses \string( \string) \string[ \string] and slash \string/} +\ifmst@nosmalldelims + \DeclareMathSymbol{(}{\mathopen}{\mst@font@tbu}{"28} + \DeclareMathSymbol{)}{\mathclose}{\mst@font@tbu}{"29} + \DeclareMathSymbol{[}{\mathopen} {\mst@font@tbu}{"5B} + \DeclareMathSymbol{]}{\mathclose}{\mst@font@tbu}{"5D} + \DeclareMathSymbol{/}{\mathord}{\mst@font@tbu}{"2F} +\else + \DeclareMathDelimiter{(}{\mathopen}{\mst@font@tbu}{"28}{largesymbols}{"00} + \DeclareMathDelimiter{)}{\mathclose}{\mst@font@tbu}{"29}{largesymbols}{"01} + \DeclareMathDelimiter{[}{\mathopen} {\mst@font@tbu}{"5B}{largesymbols}{"02} + \DeclareMathDelimiter{]}{\mathclose}{\mst@font@tbu}{"5D}{largesymbols}{"03} + \DeclareMathDelimiter{/}{\mathord}{\mst@font@tbu}{"2F}{largesymbols}{"0E} +\fi +\DeclareMathSymbol{\mst@varfam@lparen}{\mathalpha}{\mst@font@tbu}{40} +\DeclareMathSymbol{\mst@varfam@rparen}{\mathalpha}{\mst@font@tbu}{41} +\DeclareMathSymbol{\mst@varfam@lbrack}{\mathalpha}{\mst@font@tbu}{"5B} +\DeclareMathSymbol{\mst@varfam@rbrack}{\mathalpha}{\mst@font@tbu}{"5D} +\DeclareMathSymbol{\mst@varfam@slash}{\mathalpha}{\mst@font@tbu}{"2F} +\expandafter\mst@addtodo@nonletters\string(\mathopen\mst@varfam@lparen +\expandafter\mst@addtodo@nonletters\string)\mathclose\mst@varfam@rparen +\expandafter\mst@addtodo@nonletters\string[\mathopen\mst@varfam@lbrack +\expandafter\mst@addtodo@nonletters\string]\mathclose\mst@varfam@rbrack +\mst@addtodo@easynonletters\/\mst@varfam@slash +\fi % \end{macrocode} -% \end{macro} -% \end{macro} +% \end{macro}\end{macro} +% \begin{macro}{alldelims} +% \begin{macro}{<,>,\}\begin{macro}{\setminus}\begin{macro}{\backslash} % \begin{macrocode} -\let\MathastextDeclareVersion\MTDeclareVersion -\@onlypreamble\MTDeclareVersion -\@onlypreamble\MathastextDeclareVersion +\ifmst@alldelims\typeout{** alldelims: \string< \string> + \string\backslash\space\string\setminus\space\string| + \string\vert\space\string\mid\space\string\{\space and \string\}} +\ifmst@nosmalldelims % \end{macrocode} -% \end{macro} -% \begin{macro}{\MTversion} -% \begin{macro}{\MTversion@} -% \begin{macro}{\MTversion@s} -% \begin{macro}{\MTversion@@} -% This is a wrapper around \LaTeX{}'s \cs{mathversion}: here we have an -% optional argument allowing a quick and easy change of the text fonts -% additionally to the math fonts. Present already in the initial -% version of the package (January 2011.) -% -% |1.15|: some modifications for the subdued option vs LGRgreek and -% for the math muskips after \cs{exists} and \cs{forall}. -% -% |1.2|: with the subdued option sets the math alphabets in the -% normal and bold math versions do not apply to operator -% names and non-alphabetical symbols. The switch for braces -% is left as it is. -% -% |1.2b|: with the subdued option, the italic corrections are not added. -% Else, we check the shape of letters in this version. Also, there was a bug -% since |1.15|: the values of the math skips were taken not from the -% settings for the math version (\#2) but from those of the optional argument -% (\#1), if present... -% -% |1.3|: activation of italic corrections is now separated from actual math -% activation of letters. -% -% |1.3c|: a starred variant is added which does not modify the text fonts, -% only the math set-tup. -% -% |1.3d|: replaced in |\MTversion@| things like |\edef\mst@encoding{...}| and -% |\renewcommand{\encodingdefault}{\mst@@encoding}| by -% |\edef\encodingdefault{...}| etc\dots All those |\mst@@...| things were -% useless. I also redefine |\seriesdefault| rather than |\mddefault|. -% -% |1.3d|: mechanism of restoration of Greek in subdued normal and bold -% versions has been to all cases, and not only for the |LGRgreek| option. +% Dec 18, 2012. We then want |\let\backslash\mst@varfam@backslash| to do nothing +% when the \cs{backslash} is used as a delimiter. So here the original +% definition from |latex.ltx| is copied, generally speaking when people use +% other math symbol fonts they do respect the encoding of the CM symbols and +% largesymbols, so this is 90\% safe. But in truth I should extract from the +% meaning of \cs{backslash} the |delcode|. % \begin{macrocode} -\newcommand*\MTversion {\@ifstar\MTversion@s\MTversion@ } -\newcommand*\MTversion@s [1]{\mathversion{#1}\MTversion@@ {#1}} -\newcommand*\MTversion@ [2][]{% - \mathversion{#2}% - \edef\mst@tmpa{#1}% - \ifx\mst@tmpa\empty - \edef\mst@tmp{#2}% - \else - \let\mst@tmp\mst@tmpa - \fi - \edef\encodingdefault {\csname mst@encoding@\mst@tmp\endcsname}% - \edef\familydefault {\csname mst@family@\mst@tmp\endcsname}% - \edef\seriesdefault {\csname mst@series@\mst@tmp\endcsname}% - \edef\shapedefault {\csname mst@shape@\mst@tmp\endcsname}% - \edef\bfdefault {\csname mst@boldvariant@\mst@tmp\endcsname}% - \edef\itdefault {\csname mst@itdefault@\mst@tmp\endcsname}% - \edef\rmdefault {\csname mst@rmdefault@\mst@tmp\endcsname}% - \edef\sfdefault {\csname mst@sfdefault@\mst@tmp\endcsname}% - \edef\ttdefault {\csname mst@ttdefault@\mst@tmp\endcsname}% - \usefont{\encodingdefault}{\familydefault}{\seriesdefault}{\shapedefault}% - \MTversion@@ {#2}% -} + \DeclareMathDelimiter{\mst@varfam@backslash} + {\mathalpha}{symbols}{"6E}{largesymbols}{"0F} +\else + \DeclareMathDelimiter{<}{\mathopen}{\mst@font@tbu}{"3C}{largesymbols}{"0A} + \DeclareMathDelimiter{>}{\mathclose}{\mst@font@tbu}{"3E}{largesymbols}{"0B} % \end{macrocode} -% |1.3j| has a stronger subdued which does \cs{MTnormalprime}, -% \cs{MTnormalexists}, \cs{MTnormalforall} rather than setting the skips to -% |0mu|. Hence \cs{MTversion} by default should do \cs{MTprimedoesskip}, -% \cs{MTexistsdoesskip}, \cs{MTforalldoesskip}. +% There is no backslash in the Symbol font hence |mtoperatorfont| here. % \begin{macrocode} -\newcommand*\MTversion@@ [1]{% - \MTexistsdoesskip - \MTforalldoesskip - \MTprimedoesskip - \edef\mst@tmp{#1}% + \DeclareMathDelimiter{\backslash} + {\mathord}{mtoperatorfont}{"5C}{largesymbols}{"0F} + \DeclareMathDelimiter{\mst@varfam@backslash} + {\mathalpha}{mtoperatorfont}{"5C}{largesymbols}{"0F} +\fi +\DeclareMathSymbol{<}{\mathrel}{\mst@font@tbu}{"3C} +\DeclareMathSymbol{>}{\mathrel}{\mst@font@tbu}{"3E} +\DeclareMathSymbol{\mst@varfam@less}{\mathalpha}{\mst@font@tbu}{"3C} +\DeclareMathSymbol{\mst@varfam@more}{\mathalpha}{\mst@font@tbu}{"3E} +\expandafter\mst@addtodo@nonletters\string<\mathrel\mst@varfam@less +\expandafter\mst@addtodo@nonletters\string>\mathrel\mst@varfam@more +\mst@do@easynonletters\expandafter{\the\mst@do@easynonletters + \let\backslash\mst@varfam@backslash} +\DeclareMathSymbol{\setminus}{\mathbin}{mtoperatorfont}{"5C} +\DeclareMathSymbol{\mst@varfam@setminus}{\mathalpha}{mtoperatorfont}{"5C} +\mst@do@nonletters\expandafter{\the\mst@do@nonletters + \def\setminus{\mathbin{\mst@varfam@setminus}}} % \end{macrocode} -% |v1.15e|: muskips. +% \end{macro}\end{macro}\end{macro} +% \begin{macro}{\models} +% |1.15d|: 13 oct 2012. Before modifying \string| we must preserve \cs{models}. % \begin{macrocode} - \expandafter - \mst@exists@muskip\csname mst@exists@skip@\mst@tmp\endcsname\relax - \expandafter - \mst@forall@muskip\csname mst@forall@skip@\mst@tmp\endcsname\relax +\ifmst@XeOrLua + \mst@Umathcharnumdef\mst@vert@bar=\mst@Umathcodenum`\|\relax +\else + \mathchardef\mst@vert@bar=\mathcode`\|\relax +\fi +\DeclareRobustCommand\models{\mathrel{\mst@vert@bar}\joinrel\Relbar} % \end{macrocode} -% |v1.2|: muskip for \cs{prime}. +% \end{macro} +% \begin{macro}{|,\mid,\vert} +% (2011) I did not do anything then to try to emulate \cs{Vert} with the +% vertical bar from the text font... and now (2012) \mst is not as radical as +% it used to be anyhow, so it is too late. % \begin{macrocode} - \expandafter - \mst@prime@muskip\csname mst@prime@skip@\mst@tmp\endcsname\relax +\ifmst@nosmalldelims + \DeclareMathSymbol{|}{\mathord}{\mst@font@tbu}{124} +\else + \DeclareMathDelimiter{|}{\mathord}{\mst@font@tbu}{124}{largesymbols}{"0C} +\fi +\def\vert{|} +\DeclareMathSymbol{\mst@varfam@vbar}{\mathalpha}{\mst@font@tbu}{124} +\mst@addtodo@easynonletters\|\mst@varfam@vbar +\let\mid\undefined % 1.3: to avoid problems with some packages +\DeclareMathSymbol{\mid}{\mathrel}{\mst@font@tbu}{124} +\mst@do@nonletters\expandafter{\the\mst@do@nonletters + \def\mid{\mathrel\mst@varfam@vbar}} % \end{macrocode} -% |v1.2b|: italic corrections except for italic/slanted (sic) letters, and of -% course except in the subdued normal and bold math versions. +% \begin{macro}{\MTexplicitbraces-}\begin{macro}{obeymathxx} +% \begin{macro}{\MTexplicitbraces-}\begin{macro}{donotobeymathxx} +% Braces. With version |1.2|, |\{| and |\}| will not be acceptable as +% delimiters anymore if the redefinitions below in \cs{mst@dobraces} are +% enacted. But they will obey math alphabets. Improvements in |1.2a|, to +% preserve robustness. % -% |v1.3|: by default, letters are made mathematically active, even if italic -% corrections are not used, to allow the action of \cs{MTsetmathskips}. +% For |1.3| I make |\lbrace| and |\rbrace| undefined first, else problems +% may arise with some packages. |1.3e| suppresses under option +% |nosmalldelims| the definitions of |\lbrace| and |\rbrace| as math +% symbols as this bug made |\left\lbrace| cause an error, naturally. % \begin{macrocode} - \edef\mst@tmpa{\csname mst@ltshape@\mst@tmp\endcsname}% - \edef\mst@tmpb{\csname mst@shape@\mst@tmp\endcsname}% + \ifmst@nosmalldelims + \else + \let\lbrace\undefined \let\rbrace\undefined + \DeclareMathDelimiter{\lbrace} + {\mathopen}{\mst@font@tbu}{123}{largesymbols}{"08} + \DeclareMathDelimiter{\rbrace} + {\mathclose}{\mst@font@tbu}{125}{largesymbols}{"09} + \fi +\DeclareMathSymbol{\mst@varfam@lbrace}{\mathalpha}{\mst@font@tbu}{123} +\DeclareMathSymbol{\mst@varfam@rbrace}{\mathalpha}{\mst@font@tbu}{125} +\DeclareRobustCommand*{\mst@lbrace} + {\ifmmode\mathopen\mst@varfam@lbrace\else\textbraceleft\fi} +\DeclareRobustCommand*{\mst@rbrace} + {\ifmmode\mathclose\mst@varfam@rbrace\else\textbraceright\fi} +\mst@do@nonletters\expandafter{\the\mst@do@nonletters + \mst@dobraces{\let\{\mst@lbrace\let\}\mst@rbrace}} +\fi % end of \ifmst@alldelims +\newcommand*{\MTexplicitbracesobeymathxx}{\let\mst@dobraces\@firstofone} +\newcommand*{\MTexplicitbracesdonotobeymathxx}{\let\mst@dobraces\@gobble} +\MTexplicitbracesdonotobeymathxx % \end{macrocode} -% |v1.15c|: extending subdued to LGRgreek. -% -% |v1.15f|: subdueing math alphabets in a simpler way than in |1.15e|. -% -% |v1.2b|: subdueing the activation of characters in math mode. +% \end{macro}\end{macro}\end{macro}\end{macro} +% \end{macro}\end{macro} +% \begin{macro}{specials} +% \leavevmode\kern\parindent |1.14b| |2011/04/02|: the redefinitions of +% \#, \$, \% and \& were buggy (this showed up when 10 or more math +% families had been created). % -% |v1.2d|: special treatment of the asterisk. +% |1.15f| |2012/10/23|: the code, although working, was perhaps a bit insane +% and +% had definitions which could surprise other packages. For example, it did:\\ +% \null\hspace{1cm}|\renewcommand{\%}{\ifmmode\mt@mmode@percent\else\char37\relax\fi}|\\ +% But it seems this provokes a problem with |microtype|. Perhaps the problem +% was that the command was not declared robust? For the dollar \LaTeX{} itself does\\ +% \null\hspace{1cm}|\DeclareRobustCommand{\$}{\ifmmode\mathdollar\else\textdollar\fi}|\\ +% So here I just modify \cs{mathdollar}. Then we have in +% |latex.ltx| the same definitions as in |plain.tex|: +% |\chardef\%=`\%|, +% |\chardef\&=`\&|, and +% |\chardef\#=`\#|. It turns out that we can just adjust the mathcodes of these +% characters and achieve exactly what is wanted for the corresponding one char +% control sequences. In math mode the control sequence will use the specified +% mathcode. So here it is \emph{not} a redefinition of the control sequences, +% purely an adjustment of mathcodes. % -% |v1.3d|: extended LGRgreek mechanism of activation/restoration of Greek to all -% cases. +% |1.2d| |2013/01/01|: previous versions imposed the variable family type. I +% hereby make it possible to de-activate this feature with the macro +% \cs{MTeasynonlettersdonotobeymathxx}. Besides, I have absolutely no idea +% why I had different looking code depending on the engine \XeTeX, \LuaTeX\ or +% default. Removed. % -% |v1.3j|: use of \cs{MTeverymathdefault}, which includes \cs{MTicinmath}, but -% must be corrected then according to shape of letters and presence or absence -% of option |frenchmath|. We do only |\def\mst@ITcorr{\ifnum\fam=\m@ne\/\fi}| -% and not \cs{MTICinmath} to not overwrite some user-defined -% \cs{MTeverymathdefault}. Code for italic corrections or not according to -% letter shape is executed after \cs{MTeverymathdefault} which limits a bit -% user customizing possibilities, but if I moved it later, I would possibly -% have to put inside the \cs{MTicinmath} the check for |it| ot |sl|. Similary -% the \cs{MTcustomgreek} always executed (if not |subdued|). +% |1.3c| |2013/12/14|: I have absolutely no idea why I removed the \XeTeX\ +% and \LuaTeX\ code at the time of |1.2d|! the code for tex/pdftex engine +% could not accomodate more than 16 math families. Code for \XeTeX\ and +% \LuaTeX\ again added. (and since TL2013 no more problems with +% |\luatexUmathcode|.) % \begin{macrocode} - \MTmathoperatorsobeymathxx - \MTeverymathdefault - \MTcustomizenewmcodes - \@for\mst@tmpc:=it,sl\do{\ifx\mst@tmpc\mst@tmpa\MTnoicinmath\fi}% - \ifmst@frenchmath - \def\mst@ITcorr{\ifnum\fam=\m@ne\/\fi}% - \@for\mst@tmpc:=it,sl\do{\ifx\mst@tmpc\mst@tmpb\MTnoICinmath\fi}% - \fi +\ifmst@nospecials +\else + \typeout{** \string\#\space\string\mathdollar\space + \string\%\space\string\&\space} + \ifmst@XeOrLua + \mst@Umathcode`\#=0 \symmtoperatorfont "23 \relax + \mst@Umathchardef\mathdollar=0 \symmtoperatorfont "24 \relax + \mst@Umathcode`\%=0 \symmtoperatorfont "25 \relax + \mst@Umathcode`\&=0 \symmtoperatorfont "26 \relax + \mst@do@easynonletters\expandafter{% + \the\mst@do@easynonletters + \mst@Umathcode`\#=7 \symmtoperatorfont "23 \relax + \mst@Umathchardef\mathdollar=7 \symmtoperatorfont "24 \relax + \mst@Umathcode`\%=7 \symmtoperatorfont "25 \relax + \mst@Umathcode`\&=7 \symmtoperatorfont "26 \relax + } + \else + \count@=\symmtoperatorfont + \multiply\count@ by \@cclvi + \advance\count@ by 35 + \mathcode`\#\count@ + \advance\count@ by \@ne + \mathchardef\mathdollar\count@ + \advance\count@ by \@ne + \mathcode`\%\count@ + \advance\count@ by \@ne + \mathcode`\&\count@ + \count@=\symmtoperatorfont + \multiply\count@ by \@cclvi + \advance\count@ by 28707 % = "7023 + \mathchardef\mst@varfam@mathhash\count@ + \advance\count@ by \@ne + \mathchardef\mst@varfam@mathdollar\count@ + \advance\count@ by \@ne + \mathchardef\mst@varfam@mathpercent\count@ + \advance\count@ by \@ne + \mathchardef\mst@varfam@mathampersand\count@ + \mst@do@easynonletters\expandafter{\the\mst@do@easynonletters + \mathcode`\#=\mst@varfam@mathhash + \let\mathdollar\mst@varfam@mathdollar + \mathcode`\%=\mst@varfam@mathpercent + \mathcode`\&=\mst@varfam@mathampersand} + \fi +\fi % \end{macrocode} -% |1.3j| has a stronger subdued which does \cs{MTnormalprime}, -% \cs{MTnormalexists}, \cs{MTnormalforall} rather than simply setting the -% skips to |0mu|. Note: \cs{MTnormalprime} is done as part of -% \cs{MTeverymathoff}. +% \end{macro} +% \begin{macro}{symbolmisc} +% We construct (with some effort) some long arrows from the Symbol glyphs, of +% almost the same lengths as the standard ones. By the way, I always found the +% \cs{iff} to be too wide, but I follow here the default. Also, although +% there is a \cs{longmapsto} in standard \LaTeX{}, if I am not mistaken, there +% is no \cs{longto}. So I define one here. I could not construct in the same +% manner \cs{Longrightarrow} etc\dots{} as the = sign from Symbol does not +% combine easily with the logical arrows, well, I could have done some box +% manipulations, but well, life is finite. +% \begin{macro}{\prod} +% \begin{macro}{\sum} +% |1.13b|: I correct the brutal re-definitions of \cs{prod} and \cs{sum} from +% the earlier versions of the package; most of the time the Symbol glyphs do +% appear to be too small in display mode. The new redefinitions do have some +% defects: |$\displaystyle\prod_1^2$| changes the position of limits but not +% the glyph itself, and |$$\textstyle\prod_1^2$$| change the limits but +% switches to the CM inline math glyph. So I tried\\ +% |\renewcommand{\prod}{\mathchoice{\mst@prod}{\prodpsy}{\prodpsy}{\prodpsy}}|\\ +% but this did not go well with subscripts and exponents. +% +% Note oct 2012: maybe I should re-examine what I did? +% |1.3c| (|2013/12/14|) renames |\defaultprod| to |\MToriginalprod| and +% |\defaultsum| to +% |\MToriginalsum|. % \begin{macrocode} - \ifmst@subdued - \def\mst@tmpa{normal}% - \ifx\mst@tmp\mst@tmpa - \mst@restorealphabets - \MTstandardgreek - \MTmathoperatorsdonotobeymathxx - \MTnormalexists - \MTnormalforall - \MTeverymathoff - \MTresetnewmcodes +\ifmst@symbolmisc\typeout{** symbolmisc: miscellaneous math symbols from Symbol font} +\let\mst@prod\prod +\let\MToriginalprod\prod +\DeclareMathSymbol{\prodpsy}{\mathop}{mtpsymbol}{213} +\renewcommand*{\prod}{\ifinner\prodpsy\else\mst@prod\fi} +\let\mst@sum\sum +\let\MToriginalsum\sum +\DeclareMathSymbol{\sumpsy}{\mathop}{mtpsymbol}{229} +\renewcommand*{\sum}{\ifinner\sumpsy\else\mst@sum\fi} % \end{macrocode} -% |1.3t| adds better compatibility with |subdued| mode for -% |\imath/\jmath| and perfect compatibility for the minus sign. +% \end{macro} +% \end{macro} % \begin{macrocode} - \let\inodot\mst@imath - \let\jnodot\mst@jmath - \mst@subduedminus - \else - \def\mst@tmpa{bold}% - \ifx\mst@tmp\mst@tmpa - \mst@restorealphabets - \MTstandardgreek - \MTmathoperatorsdonotobeymathxx - \MTnormalexists - \MTnormalforall - \MTeverymathoff - \MTresetnewmcodes - \let\inodot\mst@imath - \let\jnodot\mst@jmath - \mst@subduedminus - \else - \mst@setalphabets - \MTcustomgreek - \let\inodot\mst@inodot - \let\jnodot\mst@jnodot - \mst@nonsubduedminus - \fi - \fi - \else - \MTcustomgreek % new with 1.3d - \fi -} -\let\MathastextVersion\MTversion -\let\Mathastextversion\MTversion -\let\MTVersion\MTversion -\let\mathastextversion\MTversion +\DeclareMathSymbol{\mst@implies}{\mathrel}{mtpsymbol}{222} +\DeclareRobustCommand*{\implies}{\;\mst@implies\;} +\DeclareMathSymbol{\mst@impliedby}{\mathrel}{mtpsymbol}{220} +\DeclareRobustCommand*{\impliedby}{\;\mst@impliedby\;} +\DeclareRobustCommand*{\iff}{\;\mst@impliedby\mathrel{\mkern-3mu}\mst@implies\;} +\DeclareMathSymbol{\mst@iff}{\mathrel}{mtpsymbol}{219} +\DeclareRobustCommand*{\shortiff}{\;\mst@iff\;} +\DeclareMathSymbol{\mst@to}{\mathrel}{mtpsymbol}{174} +\DeclareMathSymbol{\mst@trait}{\mathrel}{mtpsymbol}{190} +\DeclareRobustCommand*\to{\mst@to} +\DeclareRobustCommand*\longto{\mkern2mu\mst@trait\mathrel{\mkern-10mu}\mst@to} +\DeclareRobustCommand*\mapsto{\mapstochar\mathrel{\mkern0.2mu}\mst@to} +\DeclareRobustCommand*\longmapsto{% +\mapstochar\mathrel{\mkern2mu}\mst@trait\mathrel{\mkern-10mu}\mst@to} +\DeclareMathSymbol{\aleph}{\mathord}{mtpsymbol}{192} +\DeclareMathSymbol{\inftypsy}{\mathord}{mtpsymbol}{165} +\DeclareMathSymbol{\emptyset}{\mathord}{mtpsymbol}{198} +\let\varnothing\emptyset +\DeclareMathSymbol{\nabla}{\mathord}{mtpsymbol}{209} +\DeclareMathSymbol{\surd}{\mathop}{mtpsymbol}{214} +\let\angle\undefined +\DeclareMathSymbol{\angle}{\mathord}{mtpsymbol}{208} +\DeclareMathSymbol{\forall}{\mathord}{mtpsymbol}{34} +\DeclareMathSymbol{\exists}{\mathord}{mtpsymbol}{36} +\DeclareMathSymbol{\neg}{\mathord}{mtpsymbol}{216} +\DeclareMathSymbol{\clubsuit}{\mathord}{mtpsymbol}{167} +\DeclareMathSymbol{\diamondsuit}{\mathord}{mtpsymbol}{168} +\DeclareMathSymbol{\heartsuit}{\mathord}{mtpsymbol}{169} +\DeclareMathSymbol{\spadesuit}{\mathord}{mtpsymbol}{170} +\DeclareMathSymbol{\smallint}{\mathop}{mtpsymbol}{242} +\DeclareMathSymbol{\wedge}{\mathbin}{mtpsymbol}{217} +\DeclareMathSymbol{\vee}{\mathbin}{mtpsymbol}{218} +\DeclareMathSymbol{\cap}{\mathbin}{mtpsymbol}{199} +\DeclareMathSymbol{\cup}{\mathbin}{mtpsymbol}{200} +\DeclareMathSymbol{\bullet}{\mathbin}{mtpsymbol}{183} +\DeclareMathSymbol{\div}{\mathbin}{mtpsymbol}{184} +\DeclareMathSymbol{\otimes}{\mathbin}{mtpsymbol}{196} +\DeclareMathSymbol{\oplus}{\mathbin}{mtpsymbol}{197} +\DeclareMathSymbol{\pm}{\mathbin}{mtpsymbol}{177} +\DeclareMathSymbol{\times}{\mathbin}{mtpsymbol}{180} +\DeclareMathSymbol{\proptopsy}{\mathrel}{mtpsymbol}{181} +\DeclareMathSymbol{\mid}{\mathrel}{mtpsymbol}{124} +\DeclareMathSymbol{\leq}{\mathrel}{mtpsymbol}{163} +\DeclareMathSymbol{\geq}{\mathrel}{mtpsymbol}{179} +\DeclareMathSymbol{\approx}{\mathrel}{mtpsymbol}{187} +\DeclareMathSymbol{\supset}{\mathrel}{mtpsymbol}{201} +\DeclareMathSymbol{\subset}{\mathrel}{mtpsymbol}{204} +\DeclareMathSymbol{\supseteq}{\mathrel}{mtpsymbol}{202} +\DeclareMathSymbol{\subseteq}{\mathrel}{mtpsymbol}{205} +\DeclareMathSymbol{\in}{\mathrel}{mtpsymbol}{206} +\DeclareMathSymbol{\sim}{\mathrel}{mtpsymbol}{126} +\let\cong\undefined +\DeclareMathSymbol{\cong}{\mathrel}{mtpsymbol}{64} +\DeclareMathSymbol{\perp}{\mathrel}{mtpsymbol}{94} +\DeclareMathSymbol{\equiv}{\mathrel}{mtpsymbol}{186} +\let\notin\undefined +\DeclareMathSymbol{\notin}{\mathrel}{mtpsymbol}{207} +\DeclareMathDelimiter{\rangle} + {\mathclose}{mtpsymbol}{241}{largesymbols}{"0B} +\DeclareMathDelimiter{\langle} + {\mathopen}{mtpsymbol}{225}{largesymbols}{"0A} +\fi % \end{macrocode} -% \end{macro}\end{macro}\end{macro}\end{macro} -% \begin{macro}{\Mathastext} -% Initialization call: +% \end{macro} +% \begin{macro}{symbolre} +% I like the \cs{Re} and \cs{Im} from Symbol, so I overwrite the CM ones. % \begin{macrocode} -\Mathastext +\ifmst@symbolre\typeout{** symbolre: \string\Re\space and \string\Im\space from Symbol font} +\DeclareMathSymbol{\Re}{\mathord}{mtpsymbol}{"C2} +\DeclareMathSymbol{\Im}{\mathord}{mtpsymbol}{"C1} +\DeclareMathSymbol{\DotTriangle}{\mathord}{mtpsymbol}{92} +\fi % \end{macrocode} % \end{macro} -% Additional appropriate messages to the terminal and the log. +% \begin{macro}{Greek letters} +% LGRgreek $>$ selfGreek $>$ eulergreek $>$ symbolgreek +% +% |1.11| I correct some bugs on how eulergreek and +% symbolgreek interacted. +% +% |1.12b| more bug fixes. +% +% |1.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. +% +% * bugfix: version |1.12b| did not define the \cs{omicron} in the +% case when no Greek-related option was passed to the package. +% +% |1.13d| has new macros |\MTstandardgreek| and |\MTcustomgreek|. +% And in the subdued case |\MTstandardgreek| is done when switching to +% the normal or bold math versions (previously something like this +% was only done in case of |LGRgreek| option. ) % \begin{macrocode} -\ifmst@eulergreek - \typeout{** Greek letters will use the Euler font. Use \protect\MathastextEulerScale{} to scale the - font.}% - \ifmst@subdued{\typeout{** (subdued mode: normal and bold math - version with default Greek letters.)}}\fi +\let\mst@mathord\mathalpha +\mst@goaheadtrue +\ifmst@selfGreek + \def\mst@font@tbu{mtselfGreekfont} \else -\ifmst@symbolgreek - \typeout{** Greek letters will use the PostScript Symbol font. Use^^J% - ** \protect\MathastextSymbolScale{} to scale the font.}% - \ifmst@subdued{\typeout{** (subdued mode: normal and bold math - version with default Greek letters.)}}\fi -\fi\fi + \ifmst@eulergreek + \def\mst@font@tbu{mteulervm} + \else + \ifmst@symbolgreek + \def\mst@font@tbu{mtpsymbol} + \let\mst@mathord\mathord + \else + \ifmst@LGRgreek + \mst@goaheadfalse + \else % \end{macrocode} -% At (long...) last we now change the font for the letters of the -% latin alphabet. In version |1.1|, Latin letters have their own font -% (shape). -% -% |1.2b| initiated the use of mathematically active letters to insert the italic -% corrections. With version |1.3| the use of math active letters is also for -% extra muglue added before and after the letters. Use of |\@for| to shorten the -% code initiated with release |1.3|. +% 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} -\def\mst@DeclareMathLetter #1{% - \DeclareMathSymbol {#1}{\mathalpha}{mtletterfont}{`#1}% - \expandafter - \DeclareMathSymbol \csname mst@#1\endcsname{\mathalpha}{mtletterfont}{`#1}% - \expandafter\mst@addtodo@az\expandafter #1\csname mst@#1\endcsname -}% -\@tfor\mst@tmp:=abcdefghijklmnopqrstuvwxyz\do - {\expandafter\mst@DeclareMathLetter\mst@tmp}% -\ifmst@frenchmath \def\mst@font@tbu{mtoperatorfont}% - \else \def\mst@font@tbu{mtletterfont}% + \mst@goaheadfalse + \def\mst@omicron {\mst@alph@omicron{o}} + \fi + \fi + \fi \fi -\def\mst@DeclareMathLetter #1{% - \DeclareMathSymbol {#1}{\mathalpha}{\mst@font@tbu}{`#1}% - \expandafter - \DeclareMathSymbol \csname mst@#1\endcsname{\mathalpha}{\mst@font@tbu}{`#1}% - \expandafter\mst@addtodo@AZ\expandafter #1\csname mst@#1\endcsname -}% -\@tfor\mst@tmp:=ABCDEFGHIJKLMNOPQRSTUVWXYZ\do - {\expandafter\mst@DeclareMathLetter\mst@tmp}% -\let\mst@DeclareMathLetter\relax -%% -\ifmst@nodigits\else -\def\mst@font@tbu{mtoperatorfont}% +\ifmst@goahead + \DeclareMathSymbol{\mst@Alpha}{\mst@mathord}{\mst@font@tbu}{"41} + \DeclareMathSymbol{\mst@Beta}{\mst@mathord}{\mst@font@tbu}{"42} + \DeclareMathSymbol{\mst@Epsilon}{\mst@mathord}{\mst@font@tbu}{"45} + \DeclareMathSymbol{\mst@Zeta}{\mst@mathord}{\mst@font@tbu}{"5A} + \DeclareMathSymbol{\mst@Eta}{\mst@mathord}{\mst@font@tbu}{"48} + \DeclareMathSymbol{\mst@Iota}{\mst@mathord}{\mst@font@tbu}{"49} + \DeclareMathSymbol{\mst@Kappa}{\mst@mathord}{\mst@font@tbu}{"4B} + \DeclareMathSymbol{\mst@Mu}{\mst@mathord}{\mst@font@tbu}{"4D} + \DeclareMathSymbol{\mst@Nu}{\mst@mathord}{\mst@font@tbu}{"4E} + \DeclareMathSymbol{\mst@Omicron}{\mst@mathord}{\mst@font@tbu}{"4F} + \DeclareMathSymbol{\mst@Rho}{\mst@mathord}{\mst@font@tbu}{"50} + \DeclareMathSymbol{\mst@Tau}{\mst@mathord}{\mst@font@tbu}{"54} + \DeclareMathSymbol{\mst@Chi}{\mst@mathord}{\mst@font@tbu}{"58} % \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. +% When we in fact use Symbol, we have to correct \cs{Rho} and +% \cs{Chi}. And \cs{Digamma} is non-existent in fact (no F +% in Symbol, F codes a \cs{Phi}). % \begin{macrocode} -\ifmst@symboldigits \def\mst@font@tbu{mtpsymbol} \fi -\ifmst@eulerdigits \def\mst@font@tbu{mteulervm} \fi -\DeclareMathSymbol{0}{\mathalpha}{\mst@font@tbu}{`0}% -\DeclareMathSymbol{1}{\mathalpha}{\mst@font@tbu}{`1}% -\DeclareMathSymbol{2}{\mathalpha}{\mst@font@tbu}{`2}% -\DeclareMathSymbol{3}{\mathalpha}{\mst@font@tbu}{`3}% -\DeclareMathSymbol{4}{\mathalpha}{\mst@font@tbu}{`4}% -\DeclareMathSymbol{5}{\mathalpha}{\mst@font@tbu}{`5}% -\DeclareMathSymbol{6}{\mathalpha}{\mst@font@tbu}{`6}% -\DeclareMathSymbol{7}{\mathalpha}{\mst@font@tbu}{`7}% -\DeclareMathSymbol{8}{\mathalpha}{\mst@font@tbu}{`8}% -\DeclareMathSymbol{9}{\mathalpha}{\mst@font@tbu}{`9}% -\fi + \ifx\mst@mathord\mathord % \end{macrocode} -% When |symboldelimiters| is passed as an option, we use the -% Symbol font for the printable characters other than -% letters and digits. +% symbolgreek but neither eulergreek nor selfGreek % \begin{macrocode} -\ifmst@symboldelimiters -\def\mst@font@tbu{mtpsymbol}% -\mst@endashfalse -\mst@emdashfalse -\else -\def\mst@font@tbu{mtoperatorfont}% -\fi +%% attention le P de Symbol est un \Pi pas un \Rho + \DeclareMathSymbol{\mst@Rho}{\mathord}{mtpsymbol}{"52} +%% attention le X de Symbol est un \Xi pas un \Chi + \DeclareMathSymbol{\mst@Chi}{\mathord}{mtpsymbol}{"43} +%% attention le F de Symbol est un \Phi. Il n'y a pas de \Digamma + \DeclareMathSymbol{\mst@Gamma}{\mathord}{mtpsymbol}{"47} + \DeclareMathSymbol{\mst@Delta}{\mathord}{mtpsymbol}{"44} + \DeclareMathSymbol{\mst@Theta}{\mathord}{mtpsymbol}{"51} + \DeclareMathSymbol{\mst@Lambda}{\mathord}{mtpsymbol}{"4C} + \DeclareMathSymbol{\mst@Xi}{\mathord}{mtpsymbol}{"58} + \DeclareMathSymbol{\mst@Pi}{\mathord}{mtpsymbol}{"50} + \DeclareMathSymbol{\mst@Sigma}{\mathord}{mtpsymbol}{"53} + \DeclareMathSymbol{\mst@Upsilon}{\mathord}{mtpsymbol}{"A1} + \DeclareMathSymbol{\mst@Phi}{\mathord}{mtpsymbol}{"46} + \DeclareMathSymbol{\mst@Psi}{\mathord}{mtpsymbol}{"59} + \DeclareMathSymbol{\mst@Omega}{\mathord}{mtpsymbol}{"57} + \else % de \mst@mathord=\mathord % \end{macrocode} -% |1.2| adds the tricks to let non letters/digits obey math alphabets. We have -% to double the definitions for easy switch on-off of the mechanism, via a token -% list which is put into \cs{everymath} and \cs{everydisplay}. +% not symbolgreek but eulergreek or selfGreek. Note |2015/10/31| : apparemment ŕ +% un moment dans le passé je considérais eulergreek et selfGreek comme pouvant +% ętre utilisés simultanément car j'avais ici "or both". Mais je laisse tomber +% tout effort réel de m'en préoccuper. % \begin{macrocode} -\ifmst@noexclam\else\typeout{** \string! and \string?}% -\DeclareMathSymbol{!}{\mathclose}{\mst@font@tbu}{"21}% -\DeclareMathSymbol{\mst@varfam@exclam}{\mathalpha}{\mst@font@tbu}{"21}% -\expandafter\mst@addtodo@nonletters\string!\mathclose\mst@varfam@exclam -\DeclareMathSymbol{?}{\mathclose}{\mst@font@tbu}{"3F}% -\DeclareMathSymbol{\mst@varfam@question}{\mathalpha}{\mst@font@tbu}{"3F}% -\expandafter\mst@addtodo@nonletters\string?\mathclose\mst@varfam@question -\fi + \DeclareMathSymbol\mst@Digamma {\mathalpha}{\mst@font@tbu}{"46} + \DeclareMathSymbol\mst@Gamma {\mathalpha}{\mst@font@tbu}{"00} + \DeclareMathSymbol\mst@Delta {\mathalpha}{\mst@font@tbu}{"01} + \DeclareMathSymbol\mst@Theta {\mathalpha}{\mst@font@tbu}{"02} + \DeclareMathSymbol\mst@Lambda {\mathalpha}{\mst@font@tbu}{"03} + \DeclareMathSymbol\mst@Xi {\mathalpha}{\mst@font@tbu}{"04} + \DeclareMathSymbol\mst@Pi {\mathalpha}{\mst@font@tbu}{"05} + \DeclareMathSymbol\mst@Sigma {\mathalpha}{\mst@font@tbu}{"06} + \DeclareMathSymbol\mst@Upsilon {\mathalpha}{\mst@font@tbu}{"07} + \DeclareMathSymbol\mst@Phi {\mathalpha}{\mst@font@tbu}{"08} + \DeclareMathSymbol\mst@Psi {\mathalpha}{\mst@font@tbu}{"09} + \DeclareMathSymbol\mst@Omega {\mathalpha}{\mst@font@tbu}{"0A} + \fi % de \mst@mathord=\mathord +\fi % fin de goahead % \end{macrocode} -% \begin{macro}{\MTlowerast} -% \begin{macro}{\mst@doasterisk} -% \begin{macro}{\mst@@doasterisk} -% \begin{macro}{\MTnormalasterisk} -% \begin{macro}{\MTactiveasterisk} -% |1.12d| The \cs{ast} or |*| is defined in |fontmath.ltx| as a binary -% operator from the |symbols| font. Usually the asterisk from the text -% font is in a raised position. Previous versions of \mst did nothing -% with \cs{ast} but strangely defined |*| to be the one from the text -% font, with type \cs{mathalpha}. The package now leaves by default -% both |*| and |\ast| untouched, and if passed option |asterisk| -% replaces both of them with a lowered text asterisk (or the one from -% the Symbol font), and of type \cs{mathbin}. A trick is used to -% optionally get both |*| and \cs{ast} obey the math alphabets. -% -% The user macro \cs{MTlowerast} sets the amount -% of lowering to be applied to the text asterisk. -% -% |1.12e| Somehow there was a big omission in |1.12d|, the -% command \cs{MTlowerast} as described in the manual was missing! -% -% nota bene: it is assumed that |*| is of type |other| when \mst -% is loaded... it should neither be active, nor of type |letter|! +% 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|. % -% |1.3i| adds \cs{MTnormalasterisk} and \cs{MTactiveasterisk}. They do nothing -% without option |asterisk|. +% 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| % \begin{macrocode} -\def\mst@@doasterisk{\let\ast\mst@ast\mst@mathactivate*{}\mst@ast}% -\newcommand*\MTnormalasterisk {\let\mst@doasterisk\relax} -\newcommand*\MTactiveasterisk {\let\mst@doasterisk\mst@@doasterisk} -\ifmst@asterisk\typeout{** asterisk: \string\ast\space and *} - \AtBeginDocument{% - \everymath\expandafter - {\the\everymath \mst@doasterisk \MTnormalasterisk }% - \everydisplay\expandafter - {\the\everydisplay\mst@doasterisk \MTnormalasterisk }} - \ifmst@symbolmisc - \def\mst@bin@ast{% - \mathbin{\mathchoice{\raisebox{-.1\height}% - {\the\textfont\symmtpsymbol\char42}}% - {\raisebox{-.1\height}% - {\the\textfont\symmtpsymbol\char42}}% - {\raisebox{-.1\height}% - {\the\scriptfont\symmtpsymbol\char42}}% - {\raisebox{-.1\height}% - {\the\scriptscriptfont\symmtpsymbol\char42}}}}% - \else - \def\mst@bin@ast{% - \mathbin{\mathchoice{\raisebox{-\mst@lowerast}% - {\the\textfont\symmtoperatorfont\char42}}% - {\raisebox{-\mst@lowerast}% - {\the\textfont\symmtoperatorfont\char42}}% - {\raisebox{-\mst@lowerast}% - {\the\scriptfont\symmtoperatorfont\char42}}% - {\raisebox{-\mst@lowerast}% - {\the\scriptscriptfont\symmtoperatorfont\char42}}}}% - \fi - \def\mst@varfam@ast{\ifnum\fam=\m@ne\mst@bin@ast\else - \mathbin{\mathchoice{\raisebox{-\mst@lowerast}% - {\the\textfont\fam\char42}}% - {\raisebox{-\mst@lowerast}% - {\the\textfont\fam\char42}}% - {\raisebox{-\mst@lowerast}% - {\the\scriptfont\fam\char42}}% - {\raisebox{-\mst@lowerast}% - {\the\scriptscriptfont\fam\char42}}}\fi}% - \MTactiveasterisk - \DeclareRobustCommand*{\mst@ast}{\mst@bin@ast} - \newcommand*\MTlowerast[1]{\def\mst@lowerast{#1}} - \MTlowerast{.3\height} - \mst@do@easynonletters\expandafter\expandafter\expandafter - {\expandafter\the\expandafter\mst@do@easynonletters - \expandafter\def\csname mst@ast \endcsname{\mst@varfam@ast}} -\fi -% \end{macrocode} -% \end{macro}\end{macro}\end{macro}\end{macro}\end{macro} -% (2011) I renounced to try to do things with all the various dots, they are -% defined in many different ways, and there is the amsmath also. Dealing with -% this issue would mean a lot a time for a minuscule result. Better to leave the -% user use the |mathdots| package and accept that we can not avoid 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). +\ifmst@goahead + \ifmst@eulergreek + \DeclareMathSymbol{\mst@alpha} {\mathalpha}{mteulervm}{"0B} + \DeclareMathSymbol{\mst@beta} {\mathalpha}{mteulervm}{"0C} + \DeclareMathSymbol{\mst@gamma} {\mathalpha}{mteulervm}{"0D} + \DeclareMathSymbol{\mst@delta} {\mathalpha}{mteulervm}{"0E} + \DeclareMathSymbol{\mst@epsilon}{\mathalpha}{mteulervm}{"0F} + \DeclareMathSymbol{\mst@zeta} {\mathalpha}{mteulervm}{"10} + \DeclareMathSymbol{\mst@eta} {\mathalpha}{mteulervm}{"11} + \DeclareMathSymbol{\mst@theta} {\mathalpha}{mteulervm}{"12} + \DeclareMathSymbol{\mst@iota} {\mathalpha}{mteulervm}{"13} + \DeclareMathSymbol{\mst@kappa} {\mathalpha}{mteulervm}{"14} + \DeclareMathSymbol{\mst@lambda} {\mathalpha}{mteulervm}{"15} + \DeclareMathSymbol{\mst@mu} {\mathalpha}{mteulervm}{"16} + \DeclareMathSymbol{\mst@nu} {\mathalpha}{mteulervm}{"17} + \DeclareMathSymbol{\mst@xi} {\mathalpha}{mteulervm}{"18} + \DeclareMathSymbol{\mst@omicron}{\mathalpha}{mteulervm}{"6F} + \DeclareMathSymbol{\mst@pi} {\mathalpha}{mteulervm}{"19} + \DeclareMathSymbol{\mst@rho} {\mathalpha}{mteulervm}{"1A} + \DeclareMathSymbol{\mst@sigma} {\mathalpha}{mteulervm}{"1B} + \DeclareMathSymbol{\mst@tau} {\mathalpha}{mteulervm}{"1C} + \DeclareMathSymbol{\mst@upsilon}{\mathalpha}{mteulervm}{"1D} + \DeclareMathSymbol{\mst@phi} {\mathalpha}{mteulervm}{"1E} + \DeclareMathSymbol{\mst@chi} {\mathalpha}{mteulervm}{"1F} + \DeclareMathSymbol{\mst@psi} {\mathalpha}{mteulervm}{"20} + \DeclareMathSymbol{\mst@omega} {\mathalpha}{mteulervm}{"21} % -% [(Dec. 2012) should I reexamine these definitive sounding remarks?] -% \begin{macrocode} -\ifmst@nopunct\else\typeout{** punctuation\string: \string, \string. \string: \string; and \string\colon} -\DeclareMathSymbol{,}{\mathpunct}{\mst@font@tbu}{"2C} -\DeclareMathSymbol{\mst@varfam@comma}{\mathalpha}{\mst@font@tbu}{"2C} -\expandafter\mst@addtodo@nonletters\string,\mathpunct\mst@varfam@comma -\DeclareMathSymbol{.}{\mathord}{\mst@font@tbu}{"2E} -\DeclareMathSymbol{\mst@varfam@dot}{\mathalpha}{\mst@font@tbu}{"2E} -\mst@addtodo@easynonletters\.\mst@varfam@dot -\DeclareMathSymbol{:}{\mathrel}{\mst@font@tbu}{"3A} % relation spacing -\DeclareMathSymbol{\mst@varfam@colon}{\mathalpha}{\mst@font@tbu}{"3A} -\expandafter\mst@addtodo@nonletters\string:\mathrel\mst@varfam@colon -\@ifpackageloaded{amsmath} -{} % \colon defined in amsmath.sty in terms of : with some enlarged explicit - % spacing. No need to intervene. -{% no amsmath, use standard punctuation spacing -\let\colon\undefined - % the reason is if some package has redefined \colon which then - % can not be used in \cs{DeclareMathSymbol} anymore (we - % shamelessly overwrite...) - \DeclareMathSymbol{\colon}{\mathpunct}{\mst@font@tbu}{"3A} - \mst@do@nonletters\expandafter{\the\mst@do@nonletters - \def\colon{\mathpunct{\mst@varfam@colon}}}} -\DeclareMathSymbol{;}{\mathpunct}{\mst@font@tbu}{"3B} -\DeclareMathSymbol{\mst@varfam@pointvirgule}{\mathalpha}{\mst@font@tbu}{"3B} -\expandafter\mst@addtodo@nonletters\string;\mathpunct\mst@varfam@pointvirgule -\fi -% \end{macrocode} -% \begin{macro}{\relbar} -% Due to the way = and - are used by \LaTeX{} in arrows, we will -% have to redefine \cs{Relbar} and \cs{relbar} in order for -% them to preserve their original meanings. + \DeclareMathSymbol{\mst@varepsilon}{\mathalpha}{mteulervm}{"22} + \DeclareMathSymbol{\mst@vartheta}{\mathalpha}{mteulervm}{"23} + \DeclareMathSymbol{\mst@varpi} {\mathalpha}{mteulervm}{"24} + \let\mst@varrho=\mst@rho + \let\mst@varsigma=\mst@sigma + \DeclareMathSymbol{\mst@varphi} {\mathalpha}{mteulervm}{"27} % -% |1.15d|: Oct 13, 2012. Belated amendment of the code to be compatible -% with Unicode engines in case someone changed the mathcode of -. -% However, for the time being I can do it in an easy way only for -% \XeTeX, not for \LuaLaTeX. Also I do my modifications to \cs{relbar} -% in a manner testing for the presence of amsmath. -% \begin{macrocode} -\ifmst@nominus -\else - \ifmst@XeOrLua - \mst@Umathcharnumdef\mst@minus@sign=\mst@Umathcodenum`\-\relax -%% I used this prior to the new \luatexUmathcodenum, as available since TL2013: -%% \mathchardef\mst@minus@sign=8704\relax % "2200 - \else - \mathchardef\mst@minus@sign=\mathcode`\-\relax + \DeclareMathSymbol{\mst@partial}{\mathalpha}{mteulervm}{"40} + \DeclareMathSymbol{\mst@wp}{\mathalpha}{mteulervm}{"7D} + \DeclareMathSymbol{\mst@ell}{\mathalpha}{mteulervm}{"60} + \else + \ifmst@symbolgreek + \DeclareMathSymbol{\mst@alpha}{\mathord}{mtpsymbol}{"61} + \DeclareMathSymbol{\mst@beta}{\mathord}{mtpsymbol}{"62} + \DeclareMathSymbol{\mst@gamma}{\mathord}{mtpsymbol}{"67} + \DeclareMathSymbol{\mst@delta}{\mathord}{mtpsymbol}{"64} + \DeclareMathSymbol{\mst@epsilon}{\mathord}{mtpsymbol}{"65} + \DeclareMathSymbol{\mst@zeta}{\mathord}{mtpsymbol}{"7A} + \DeclareMathSymbol{\mst@eta}{\mathord}{mtpsymbol}{"68} + \DeclareMathSymbol{\mst@theta}{\mathord}{mtpsymbol}{"71} + \DeclareMathSymbol{\mst@iota}{\mathord}{mtpsymbol}{"69} + \DeclareMathSymbol{\mst@kappa}{\mathord}{mtpsymbol}{"6B} + \DeclareMathSymbol{\mst@lambda}{\mathord}{mtpsymbol}{"6C} + \DeclareMathSymbol{\mst@mu}{\mathord}{mtpsymbol}{"6D} + \DeclareMathSymbol{\mst@nu}{\mathord}{mtpsymbol}{"6E} + \DeclareMathSymbol{\mst@xi}{\mathord}{mtpsymbol}{"78} + \DeclareMathSymbol{\mst@omicron}{\mathord}{mtpsymbol}{"6F} + \DeclareMathSymbol{\mst@pi}{\mathord}{mtpsymbol}{"70} + \DeclareMathSymbol{\mst@rho}{\mathord}{mtpsymbol}{"72} + \DeclareMathSymbol{\mst@sigma}{\mathord}{mtpsymbol}{"73} + \DeclareMathSymbol{\mst@tau}{\mathord}{mtpsymbol}{"74} + \DeclareMathSymbol{\mst@upsilon}{\mathord}{mtpsymbol}{"75} + \DeclareMathSymbol{\mst@phi}{\mathord}{mtpsymbol}{"66} + \DeclareMathSymbol{\mst@chi}{\mathord}{mtpsymbol}{"63} + \DeclareMathSymbol{\mst@psi}{\mathord}{mtpsymbol}{"79} + \DeclareMathSymbol{\mst@omega}{\mathord}{mtpsymbol}{"77} + \let\mst@varepsilon=\mst@epsilon + \DeclareMathSymbol{\mst@vartheta}{\mathord}{mtpsymbol}{"4A} + \DeclareMathSymbol{\mst@varpi}{\mathord}{mtpsymbol}{"76} + \let\mst@varrho=\mst@rho + \DeclareMathSymbol{\mst@varsigma}{\mathord}{mtpsymbol}{"56} + \DeclareMathSymbol{\mst@varphi}{\mathord}{mtpsymbol}{"6A} + \DeclareMathSymbol{\mst@partial}{\mathord}{mtpsymbol}{"B6} + \DeclareMathSymbol{\mst@wp}{\mathord}{mtpsymbol}{"C3} \fi -\@ifpackageloaded{amsmath} -{\def\relbar{\mathrel{\mathpalette\mathsm@sh\mst@minus@sign}}} -{\DeclareRobustCommand\relbar{\mathrel{\smash\mst@minus@sign}}} -\def\rightarrowfill{$\m@th\mathord{\relbar}\mkern-7mu% - \cleaders\hbox{$\mkern-2mu\relbar\mkern-2mu$}\hfill - \mkern-7mu\mathord\rightarrow$} -\def\leftarrowfill{$\m@th\mathord\leftarrow\mkern-7mu% - \cleaders\hbox{$\mkern-2mu\relbar\mkern-2mu$}\hfill - \mkern-7mu\mathord{\relbar}$} + \fi \fi -% \end{macrocode} -% \end{macro} -% \begin{macro}{endash} -% |1.1| |2011/01/29|: Producing this next piece of code was not a piece -% of cake for a novice like myself!\newline -% |1.11| |2011/02/05|: Compatibility with Unicode (via use of fontspec -% encodings EU1 and EU2)\newline -% |1.12| |2011/02/07|: Improved dealing of Unicode possibility.\newline -% |1.14b| |2011/04/02|: Corrected some very irresponsible bug in the -% Unicode part which caused a problem when 10 or more math families have -% been allocated.\newline -% |1.15| |2012/09/24|: Added AtBeginDocument to circumvent some amsmath -% problem with unicode engines. +\ifmst@LGRgreek +% cf http://milde.users.sourceforge.net/LGR/lgrxenc.def.html +% et greek.ldf du package babel +\DeclareMathSymbol{\mst@Alpha}{\mathalpha}{mtlgrfontupper}{65} +\DeclareMathSymbol{\mst@Beta}{\mathalpha}{mtlgrfontupper}{66} +\DeclareMathSymbol{\mst@Epsilon}{\mathalpha}{mtlgrfontupper}{69} +\DeclareMathSymbol{\mst@Zeta}{\mathalpha}{mtlgrfontupper}{90} +\DeclareMathSymbol{\mst@Eta}{\mathalpha}{mtlgrfontupper}{72} +\DeclareMathSymbol{\mst@Iota}{\mathalpha}{mtlgrfontupper}{73} +\DeclareMathSymbol{\mst@Kappa}{\mathalpha}{mtlgrfontupper}{75} +\DeclareMathSymbol{\mst@Mu}{\mathalpha}{mtlgrfontupper}{77} +\DeclareMathSymbol{\mst@Nu}{\mathalpha}{mtlgrfontupper}{78} +\DeclareMathSymbol{\mst@Omicron}{\mathalpha}{mtlgrfontupper}{79} +\DeclareMathSymbol{\mst@Rho}{\mathalpha}{mtlgrfontupper}{82} +\DeclareMathSymbol{\mst@Tau}{\mathalpha}{mtlgrfontupper}{84} +\DeclareMathSymbol{\mst@Chi}{\mathalpha}{mtlgrfontupper}{81} % -% |1.3l| |2016/01/29|: anticipating TL2016 fontspec's switch to |TU|. +\DeclareMathSymbol{\mst@Digamma}{\mathalpha}{mtlgrfontlower}{195} % -% |1.3t| |2018/08/22|: fix to very ancient (|2012/12/20|) bug with -% |\DeclareMathSymbol| lacking last argument if encoding not T1, OT1 or -% LY1 when setting up math mode to use the en-dash character as minus -% sign (PDF\TeX\ engine). +\DeclareMathSymbol{\mst@Gamma}{\mathalpha}{mtlgrfontupper}{71} +\DeclareMathSymbol{\mst@Delta}{\mathalpha}{mtlgrfontupper}{68} +\DeclareMathSymbol{\mst@Theta}{\mathalpha}{mtlgrfontupper}{74} +\DeclareMathSymbol{\mst@Lambda}{\mathalpha}{mtlgrfontupper}{76} +\DeclareMathSymbol{\mst@Xi}{\mathalpha}{mtlgrfontupper}{88} +\DeclareMathSymbol{\mst@Pi}{\mathalpha}{mtlgrfontupper}{80} +\DeclareMathSymbol{\mst@Sigma}{\mathalpha}{mtlgrfontupper}{83} +\DeclareMathSymbol{\mst@Upsilon}{\mathalpha}{mtlgrfontupper}{85} +\DeclareMathSymbol{\mst@Phi}{\mathalpha}{mtlgrfontupper}{70} +\DeclareMathSymbol{\mst@Psi}{\mathalpha}{mtlgrfontupper}{89} +\DeclareMathSymbol{\mst@Omega}{\mathalpha}{mtlgrfontupper}{87} % -% \begin{macro}{\mst@subduedminus} -% \begin{macro}{\mst@nonsubduedminus} -% |1.3t| Further, new macros |\mst@subduedminus| and |\mst@nonsubduedminus|, -% for the good functioning of the subdued option also in case of -% presence of fontspec. This is the only character for which subdued -% option works (now) by setting the mathcode on each math version -% change. Indeed, a typical issue is when the Unicode EN DASH or MINUS -% is used, but the actual font in subdued normal math version is -% originally in OT1 or T1 encoding. The only reasonable way to address -% this is by actually modifying the assigned mathcode at each version -% change. This means also that |\MTversion| and not |\mathversion| -% must be used for good functioning. -% \begin{macrocode} -\def\mst@dothe@endashstuff{\edef\mst@tmp@enc{\encodingdefault} -\if1\mst@OneifUniEnc - \AtBeginDocument{% Unicode engines and font - \mst@Umathcode`\-=2 \symmtoperatorfont "\mst@unicodeminus\relax - \mst@Umathchardef\mst@varfam@minus=7 \symmtoperatorfont "\mst@unicodeminus\relax - } -\else -\ifx\mst@tmp@enc\mst@ti % T1 - \DeclareMathSymbol{-}{\mathbin}{mtoperatorfont}{21} - \DeclareMathSymbol{\mst@varfam@minus}{\mathalpha}{mtoperatorfont}{21} -\else -\ifx\mst@tmp@enc\mst@oti % OT1 - \DeclareMathSymbol{-}{\mathbin}{mtoperatorfont}{123} - \DeclareMathSymbol{\mst@varfam@minus}{\mathalpha}{mtoperatorfont}{123} -\else -\ifx\mst@tmp@enc\mst@lyi % LY1 - \DeclareMathSymbol{-}{\mathbin}{mtoperatorfont}{150} - \DeclareMathSymbol{\mst@varfam@minus}{\mathalpha}{mtoperatorfont}{150} -\else % make sure we have neither xetex nor luatex - \ifmst@XeOrLua\mst@aborttrue - \else - \DeclareMathSymbol{-}{\mathbin}{mtoperatorfont} -{\expandafter\the\expandafter\csname\mst@tmp@enc\string\textendash\endcsname} - \DeclareMathSymbol{\mst@varfam@minus}{\mathalpha}{mtoperatorfont} -{\expandafter\the\expandafter\csname\mst@tmp@enc\string\textendash\endcsname} - \fi -\fi\fi\fi\fi} -\def\mst@dothe@emdashstuff{\edef\mst@tmp@enc{\encodingdefault} -\if1\mst@OneifUniEnc - \AtBeginDocument{% Unicode engine and font - \mst@Umathcode`\-=2 \symmtoperatorfont "2014\relax - \mst@Umathchardef\mst@varfam@minus=7 \symmtoperatorfont "2014\relax - } -\else -\ifx\mst@tmp@enc\mst@ti % T1 - \DeclareMathSymbol{-}{\mathbin}{mtoperatorfont}{22} - \DeclareMathSymbol{\mst@varfam@minus}{\mathalpha}{mtoperatorfont}{22} -\else -\ifx\mst@tmp@enc\mst@oti % OT1 - \DeclareMathSymbol{-}{\mathbin}{mtoperatorfont}{124} - \DeclareMathSymbol{\mst@varfam@minus}{\mathalpha}{mtoperatorfont}{124} -\else -\ifx\mst@tmp@enc\mst@lyi % LY1 - \DeclareMathSymbol{-}{\mathbin}{mtoperatorfont}{151} - \DeclareMathSymbol{\mst@varfam@minus}{\mathalpha}{mtoperatorfont}{151} -\else % make sure we have neither xetex nor luatex - \ifmst@XeOrLua\mst@aborttrue - \else - \DeclareMathSymbol{-}{\mathbin}{mtoperatorfont} -{\expandafter\the\expandafter\csname\mst@tmp@enc\string\textemdash\endcsname} - \DeclareMathSymbol{\mst@varfam@minus}{\mathalpha}{mtoperatorfont} -{\expandafter\the\expandafter\csname\mst@tmp@enc\string\textemdash\endcsname} - \fi -\fi\fi\fi\fi} -\let\mst@subduedminus\empty -\let\mst@nonsubduedminus\empty -\ifmst@nominus\else\typeout{** minus as endash} - \edef\mst@tmp@enc{\encodingdefault} - \ifmst@XeOrLua - \if1\mst@OneifUniEnc\expandafter\AtBeginDocument - \else\expandafter\@firstofone - \fi - {\edef\mst@subduedminus - {\mst@Umathcodenum`\noexpand\-=\the\mst@Umathcodenum`\-\relax}}% - \else - \edef\mst@subduedminus{\mathcode`\noexpand\-=\the\mathcode`\-\relax}% - \fi - \mst@abortfalse - \ifmst@endash\mst@dothe@endashstuff\else - \ifmst@emdash\mst@dothe@emdashstuff\else - \if1\mst@OneifUniEnc\expandafter\AtBeginDocument - \else\expandafter\@firstofone - \fi - {\DeclareMathSymbol{-}{\mathbin}{\mst@font@tbu}{"2D}% - \DeclareMathSymbol{\mst@varfam@minus}{\mathalpha}{\mst@font@tbu}{"2D}}% - \fi\fi - \ifmst@abort - \DeclareMathSymbol{-}{\mathbin}{\mst@font@tbu}{"2D} - \DeclareMathSymbol{\mst@varfam@minus}{\mathalpha}{\mst@font@tbu}{"2D} - \fi - \expandafter\mst@addtodo@nonletters\string-\mathbin\mst@varfam@minus - \ifmst@XeOrLua - \if1\mst@OneifUniEnc\expandafter\AtBeginDocument - \else\expandafter\@firstofone - \fi - {\edef\mst@nonsubduedminus - {\mst@Umathcodenum`\noexpand\-=\the\mst@Umathcodenum`\-\relax}}% - \else - \edef\mst@nonsubduedminus{\mathcode`\noexpand\-=\the\mathcode`\-\relax}% - \fi -\fi -% \end{macrocode} -% \end{macro}\end{macro}\end{macro} -% \begin{macro}{\hbar} -% \begin{macro}{\mst@ltbar} -% |2011/01/31|, |1.1| I decide to settle the question of the |\hbar|. First, the -% \LaTeX{} definition -% \begin{macrocode} -%%\def\hbar{{\mathchar'26\mkern-9muh}} % (original definition from latex.ltx) -% \end{macrocode} -% Well, the fact is that there is a \cs{DeclareMathSymbol} in |amsfonts.sty|, so -% I can not always rely on the original which had the advantage that at least -% |h| would be in the correct font. But of course not the macron character -% (|\=|, |\bar|). And there is also the issue of the kern whose length is given -% in a way which depends on |cmsy| (18mu=1em and em taken from info in |cmsy|). -% The first problem is that I don't know how to get the slot position of the -% macron, given the encoding. So I found another way. I will need an |rlap| -% adapted to math mode, and this is provided by code from -% Alexander~R.~\textsc{Perlis} in his TugBoat article 22 (2001), 350--352, which -% I found by googling |rlap|. (as an aside, I am only now (April 2, 2011) aware -% that the package |mathtools| provides the |mathrlap| etc... ) +\DeclareMathSymbol{\mst@alpha}{\mathalpha}{mtlgrfontlower}{97} +\DeclareMathSymbol{\mst@beta}{\mathalpha}{mtlgrfontlower}{98} +\DeclareMathSymbol{\mst@gamma}{\mathalpha}{mtlgrfontlower}{103} +\DeclareMathSymbol{\mst@delta}{\mathalpha}{mtlgrfontlower}{100} +\DeclareMathSymbol{\mst@epsilon}{\mathalpha}{mtlgrfontlower}{101} +\DeclareMathSymbol{\mst@zeta}{\mathalpha}{mtlgrfontlower}{122} +\DeclareMathSymbol{\mst@eta}{\mathalpha}{mtlgrfontlower}{104} +\DeclareMathSymbol{\mst@theta}{\mathalpha}{mtlgrfontlower}{106} +\DeclareMathSymbol{\mst@iota}{\mathalpha}{mtlgrfontlower}{105} +\DeclareMathSymbol{\mst@kappa}{\mathalpha}{mtlgrfontlower}{107} +\DeclareMathSymbol{\mst@lambda}{\mathalpha}{mtlgrfontlower}{108} +\DeclareMathSymbol{\mst@mu}{\mathalpha}{mtlgrfontlower}{109} +\DeclareMathSymbol{\mst@nu}{\mathalpha}{mtlgrfontlower}{110} +\DeclareMathSymbol{\mst@xi}{\mathalpha}{mtlgrfontlower}{120} +\DeclareMathSymbol{\mst@omicron}{\mathalpha}{mtlgrfontlower}{111} +\DeclareMathSymbol{\mst@pi}{\mathalpha}{mtlgrfontlower}{112} +\DeclareMathSymbol{\mst@rho}{\mathalpha}{mtlgrfontlower}{114} +\DeclareMathSymbol{\mst@sigma}{\mathalpha}{mtlgrfontlower}{115} +\DeclareMathSymbol{\mst@tau}{\mathalpha}{mtlgrfontlower}{116} +\DeclareMathSymbol{\mst@upsilon}{\mathalpha}{mtlgrfontlower}{117} +\DeclareMathSymbol{\mst@phi}{\mathalpha}{mtlgrfontlower}{102} +\DeclareMathSymbol{\mst@chi}{\mathalpha}{mtlgrfontlower}{113} +\DeclareMathSymbol{\mst@psi}{\mathalpha}{mtlgrfontlower}{121} +\DeclareMathSymbol{\mst@omega}{\mathalpha}{mtlgrfontlower}{119} % -% |1.3l| |2016/01/29|: anticipating TL2016 fontspec's switch to |TU|. -% \begin{macrocode} -\def\mst@mathrlap{\mathpalette\mst@mathrlapinternal} -\def\mst@mathrlapinternal#1#2{\rlap{$\mathsurround=0pt#1{#2}$}} -\def\mst@dothe@hbarstuff{\edef\mst@tmp@enc{\encodingdefault} -\if1\mst@OneifUniEnc - % Unicode engine and font - \mst@Umathchardef\hbar="7 \symmtletterfont "0127 \relax %% or 210F? -\else % I must leave open the T1, OT1 possibility also for XeTeX or LuaTeX - \ifx\mst@ti\mst@tmp@enc - \DeclareMathAccent{\mst@ltbar}{\mathalpha}{mtletterfont}{9} - \else %% assume OT1. Bad idea? Should not provoke an error anyhow - \DeclareMathAccent{\mst@ltbar}{\mathalpha}{mtletterfont}{22} - \fi - \def\hbar{\mst@mathrlap{\mst@ltbar{\ }}h} -\fi } -\ifmst@nohbar\else\typeout{** \string\hbar}\mst@dothe@hbarstuff\fi +\DeclareMathSymbol{\mst@digamma}{\mathalpha}{mtlgrfontlower}{147} +% only varsigma defined (I should check this again) +\DeclareMathSymbol{\mst@varsigma}{\mathalpha}{mtlgrfontlower}{99} +\fi % \end{macrocode} % \end{macro} -% \end{macro} -% As |h| is from |mtletterfont|, the accent \cs{mst@ltbar} is the -% \cs{bar} accent from that same font. Of course, if the user -% defines math versions with other encodings than the default one -% when loading the package this will probably not work there (if I -% knew how to do for accents what I did for the endash I could do -% it for all encodings. Surely easy for a \TeX{}pert.) Not to -% mention if he/she changes the letter shape... one never should -% give so much freedom to users ;-) Well this construction gives -% an acceptable result for some of the fonts I have tested, -% whether upright or in italics. +% \begin{macro}{\MTstandardgreek} +% \begin{macro}{\MTcustomgreek} +% \begin{macro}{\MTrecordstandardgreek} +% |1.3d 2014/05/23| defines the commands |\MTstandardgreek| and +% |\MTcustomgreek| for package and user. I leave |\MTrecordstandardgreek| +% undocumented as I don't want to encourage people to load math packages +% after \mst. % -% |1.15d|: Oct 13, 2012. The \cs{mathcode} thing with = is (belatedly, -% sorry!) made Unicode compatible. -% \begin{macro}{+,=,\Relbar} +% |1.3h 2015/10/31|: corrected |\MTcustomgreek| as it caused |\ell| to +% become undefined under option |symbolgreek| and, much more catastrophic, +% caused |\alpha|, etc.. to become undefined under option |selfGreek| ! % \begin{macrocode} -\ifmst@noplus\else\typeout{** \string+ and \string=} -\DeclareMathSymbol{+}{\mathbin}{\mst@font@tbu}{"2B} -\DeclareMathSymbol{\mst@varfam@plus}{\mathalpha}{\mst@font@tbu}{"2B} -\expandafter\mst@addtodo@nonletters\string+\mathbin\mst@varfam@plus -\fi -\ifmst@noequal\else -\ifmst@XeOrLua - \mst@Umathcharnumdef\mst@equal@sign=\mst@Umathcodenum`\=\relax -\else - \mathchardef\mst@equal@sign=\mathcode`\=\relax -\fi -\@ifpackageloaded{amsmath} -{\def\Relbar{\mathrel\mst@equal@sign}} -{\DeclareRobustCommand\Relbar{\mathrel{\mst@equal@sign}}} -\DeclareMathSymbol{=}{\mathrel}{\mst@font@tbu}{"3D} -\DeclareMathSymbol{\mst@varfam@equal}{\mathalpha}{\mst@font@tbu}{"3D} -% \end{macrocode} -% \begin{macro}{\nfss@catcodes} -% |2012/12/18|: Activating = (only in math mode actually) seems very bad but -% surprisingly works well. However I had a problem with |eu2lmtt.fd| which -% should not be loaded with an active =. -% |2012/12/25|: Since then I had switched to only math activation. And in fact -% the problematic = from |eu2lmtt.fd| end up in \cs{csname}...\cs{endcsname} -% and I have -% learnt since that \TeX{} does not look at the |mathcode| inside a -% \cs{csname}...\cs{endcsname}. Example: -% \begin{verbatim} -% \mathcode`x="8000 -% \begingroup -% \catcode`x=\active -% \global\everymath{\defx{Hello}} -% \endgroup -% \def\foox{World!} -% $x \csname foox\endcsname$ -% \end{verbatim} -% We need nevertheless to inactivate the =, for the following reason. Imagine -% someone did |\catcode`==\active\def={\string=}|, or another definition which -% would not lead to a tragedy in a \cs{csname}...\cs{endcsname}. Then the = is -% active and the re-definition done by |mathastext| will not be compatible with -% loading |eu2lmtt.fd| (for the first time) from math mode, as this -% re-definition can not be expanded inside a -% \cs{csname}...\cs{endcsname}. +\newcommand*{\MTstandardgreek}{} +\newcommand*{\MTcustomgreek}{} +\newcommand*{\MTrecordstandardgreek}{} +\ifmst@customgreek + \renewcommand*{\MTrecordstandardgreek}{% + \let\mst@origAlpha\Alpha + \let\mst@origBeta\Beta + \let\mst@origGamma\Gamma + \let\mst@origDelta\Delta + \let\mst@origEpsilon\Epsilon + \let\mst@origZeta\Zeta + \let\mst@origEta\Eta + \let\mst@origTheta\Theta + \let\mst@origIota\Iota + \let\mst@origKappa\Kappa + \let\mst@origLambda\Lambda + \let\mst@origMu\Mu + \let\mst@origNu\Nu + \let\mst@origXi\Xi + \let\mst@origOmicron\Omicron + \let\mst@origPi\Pi + \let\mst@origRho\Rho + \let\mst@origSigma\Sigma + \let\mst@origTau\Tau + \let\mst@origUpsilon\Upsilon + \let\mst@origPhi\Phi + \let\mst@origChi\Chi + \let\mst@origPsi\Psi + \let\mst@origOmega\Omega % -% |2012/12/28|: to be on the safe side, I add also |;| and |+| and do it -% without discriminating between engines -% \begin{macrocode} -\typeout{** adding \string= \string; and \string+ to \string\nfss@catcodes} -\g@addto@macro\nfss@catcodes{% - \@makeother\=% - \@makeother\;% - \@makeother\+% -} -\expandafter\mst@addtodo@nonletters\string=\mathrel\mst@varfam@equal -\fi -% \end{macrocode} -% \end{macro}\end{macro} -% \begin{macro}{noparenthesis} -% \begin{macro}{(,),[,],/} -% \cs{lbrack} and \cs{rbrack} are defined in |latex.ltx| by -% |\def\lbrack{[}\def\rbrack{]}| so this fits well with what we do here. -% \cs{lparen} and \cs{rparen} are similarly defined in |mathtools|. On the -% other hand in |latex.ltx| with |\{| and |\}| are defined (in math mode) in -% terms of the control sequences \cs{lbrace} and \cs{rbrace}. Such control -% sequences can not be simultaneously math symbols and math delimiters, -% thus, this complicates things for the mathastextification. -% \begin{macrocode} -\ifmst@noparen\else\typeout{** parentheses \string( \string) \string[ \string] and slash \string/} -\ifmst@nosmalldelims - \DeclareMathSymbol{(}{\mathopen}{\mst@font@tbu}{"28} - \DeclareMathSymbol{)}{\mathclose}{\mst@font@tbu}{"29} - \DeclareMathSymbol{[}{\mathopen} {\mst@font@tbu}{"5B} - \DeclareMathSymbol{]}{\mathclose}{\mst@font@tbu}{"5D} - \DeclareMathSymbol{/}{\mathord}{\mst@font@tbu}{"2F} -\else - \DeclareMathDelimiter{(}{\mathopen}{\mst@font@tbu}{"28}{largesymbols}{"00} - \DeclareMathDelimiter{)}{\mathclose}{\mst@font@tbu}{"29}{largesymbols}{"01} - \DeclareMathDelimiter{[}{\mathopen} {\mst@font@tbu}{"5B}{largesymbols}{"02} - \DeclareMathDelimiter{]}{\mathclose}{\mst@font@tbu}{"5D}{largesymbols}{"03} - \DeclareMathDelimiter{/}{\mathord}{\mst@font@tbu}{"2F}{largesymbols}{"0E} -\fi -\DeclareMathSymbol{\mst@varfam@lparen}{\mathalpha}{\mst@font@tbu}{40} -\DeclareMathSymbol{\mst@varfam@rparen}{\mathalpha}{\mst@font@tbu}{41} -\DeclareMathSymbol{\mst@varfam@lbrack}{\mathalpha}{\mst@font@tbu}{"5B} -\DeclareMathSymbol{\mst@varfam@rbrack}{\mathalpha}{\mst@font@tbu}{"5D} -\DeclareMathSymbol{\mst@varfam@slash}{\mathalpha}{\mst@font@tbu}{"2F} -\expandafter\mst@addtodo@nonletters\string(\mathopen\mst@varfam@lparen -\expandafter\mst@addtodo@nonletters\string)\mathclose\mst@varfam@rparen -\expandafter\mst@addtodo@nonletters\string[\mathopen\mst@varfam@lbrack -\expandafter\mst@addtodo@nonletters\string]\mathclose\mst@varfam@rbrack -\mst@addtodo@easynonletters\/\mst@varfam@slash -\fi -% \end{macrocode} -% \end{macro}\end{macro} -% \begin{macro}{alldelims} -% \begin{macro}{<,>,\}\begin{macro}{\setminus}\begin{macro}{\backslash} -% \begin{macrocode} -\ifmst@alldelims\typeout{** alldelims: \string< \string> - \string\backslash\space\string\setminus\space\string| - \string\vert\space\string\mid\space\string\{\space and \string\}} -\ifmst@nosmalldelims -% \end{macrocode} -% Dec 18, 2012. We then want |\let\backslash\mst@varfam@backslash| to do nothing -% when the \cs{backslash} is used as a delimiter. So here the original -% definition from |latex.ltx| is copied, generally speaking when people use -% other math symbol fonts they do respect the encoding of the CM symbols and -% largesymbols, so this is 90\% safe. But in truth I should extract from the -% meaning of \cs{backslash} the |delcode|. -% \begin{macrocode} - \DeclareMathDelimiter{\mst@varfam@backslash} - {\mathalpha}{symbols}{"6E}{largesymbols}{"0F} -\else - \DeclareMathDelimiter{<}{\mathopen}{\mst@font@tbu}{"3C}{largesymbols}{"0A} - \DeclareMathDelimiter{>}{\mathclose}{\mst@font@tbu}{"3E}{largesymbols}{"0B} -% \end{macrocode} -% There is no backslash in the Symbol font hence |mtoperatorfont| here. -% \begin{macrocode} - \DeclareMathDelimiter{\backslash} - {\mathord}{mtoperatorfont}{"5C}{largesymbols}{"0F} - \DeclareMathDelimiter{\mst@varfam@backslash} - {\mathalpha}{mtoperatorfont}{"5C}{largesymbols}{"0F} -\fi -\DeclareMathSymbol{<}{\mathrel}{\mst@font@tbu}{"3C} -\DeclareMathSymbol{>}{\mathrel}{\mst@font@tbu}{"3E} -\DeclareMathSymbol{\mst@varfam@less}{\mathalpha}{\mst@font@tbu}{"3C} -\DeclareMathSymbol{\mst@varfam@more}{\mathalpha}{\mst@font@tbu}{"3E} -\expandafter\mst@addtodo@nonletters\string<\mathrel\mst@varfam@less -\expandafter\mst@addtodo@nonletters\string>\mathrel\mst@varfam@more -\mst@do@easynonletters\expandafter{\the\mst@do@easynonletters - \let\backslash\mst@varfam@backslash} -\DeclareMathSymbol{\setminus}{\mathbin}{mtoperatorfont}{"5C} -\DeclareMathSymbol{\mst@varfam@setminus}{\mathalpha}{mtoperatorfont}{"5C} -\mst@do@nonletters\expandafter{\the\mst@do@nonletters - \def\setminus{\mathbin{\mst@varfam@setminus}}} + \let\mst@origalpha\alpha + \let\mst@origbeta\beta + \let\mst@origgamma\gamma + \let\mst@origdelta\delta + \let\mst@origepsilon\epsilon + \let\mst@origvarepsilon\varepsilon + \let\mst@origzeta\zeta + \let\mst@origeta\eta + \let\mst@origtheta\theta + \let\mst@origvartheta\vartheta + \let\mst@origiota\iota + \let\mst@origkappa\kappa + \let\mst@origlambda\lambda + \let\mst@origmu\mu + \let\mst@orignu\nu + \let\mst@origxi\xi + \let\mst@origomicron\omicron + \let\mst@origpi\pi + \let\mst@origvarpi\varpi + \let\mst@origrho\rho + \let\mst@origvarrho\varrho + \let\mst@origsigma\sigma + \let\mst@origvarsigma\varsigma + \let\mst@origtau\tau + \let\mst@origupsilon\upsilon + \let\mst@origphi\phi + \let\mst@origvarphi\varphi + \let\mst@origchi\chi + \let\mst@origpsi\psi + \let\mst@origomega\omega + \let\mst@origDigamma\Digamma + \let\mst@origdigamma\digamma +% + \let\mst@origpartial\partial + \let\mst@origwp\wp + \let\mst@origell\ell }% \MTrecordstandardgreek +\MTrecordstandardgreek +\renewcommand*{\MTstandardgreek}{% + \let\Alpha\mst@origAlpha + \let\Beta\mst@origBeta + \let\Gamma\mst@origGamma + \let\Delta\mst@origDelta + \let\Epsilon\mst@origEpsilon + \let\Zeta\mst@origZeta + \let\Eta\mst@origEta + \let\Theta\mst@origTheta + \let\Iota\mst@origIota + \let\Kappa\mst@origKappa + \let\Lambda\mst@origLambda + \let\Mu\mst@origMu + \let\Nu\mst@origNu + \let\Xi\mst@origXi + \let\Omicron\mst@origOmicron + \let\Pi\mst@origPi + \let\Rho\mst@origRho + \let\Sigma\mst@origSigma + \let\Tau\mst@origTau + \let\Upsilon\mst@origUpsilon + \let\Phi\mst@origPhi + \let\Chi\mst@origChi + \let\Psi\mst@origPsi + \let\Omega\mst@origOmega +% + \let\alpha\mst@origalpha + \let\beta\mst@origbeta + \let\gamma\mst@origgamma + \let\delta\mst@origdelta + \let\epsilon\mst@origepsilon + \let\varepsilon\mst@origvarepsilon + \let\zeta\mst@origzeta + \let\eta\mst@origeta + \let\theta\mst@origtheta + \let\vartheta\mst@origvartheta + \let\iota\mst@origiota + \let\kappa\mst@origkappa + \let\lambda\mst@origlambda + \let\mu\mst@origmu + \let\nu\mst@orignu + \let\xi\mst@origxi + \let\omicron\mst@origomicron + \let\pi\mst@origpi + \let\varpi\mst@origvarpi + \let\rho\mst@origrho + \let\varrho\mst@origvarrho + \let\sigma\mst@origsigma + \let\varsigma\mst@origvarsigma + \let\tau\mst@origtau + \let\upsilon\mst@origupsilon + \let\phi\mst@origphi + \let\varphi\mst@origvarphi + \let\chi\mst@origchi + \let\psi\mst@origpsi + \let\omega\mst@origomega + \let\Digamma\mst@origDigamma + \let\digamma\mst@origdigamma +% + \let\partial\mst@origpartial + \let\wp\mst@origwp + \let\ell\mst@origell +}% \MTstandardgreek +\renewcommand*{\MTcustomgreek}{% + \let\Alpha\mst@Alpha + \let\Beta\mst@Beta + \let\Epsilon\mst@Epsilon + \let\Zeta\mst@Zeta + \let\Eta\mst@Eta + \let\Iota\mst@Iota + \let\Kappa\mst@Kappa + \let\Mu\mst@Mu + \let\Nu\mst@Nu + \let\Omicron\mst@Omicron + \let\Rho\mst@Rho + \let\Tau\mst@Tau + \let\Chi\mst@Chi +% 1.3h: \mst@Digamma not defined if symbolgreek option + \ifmst@symbolgreek\else\let\Digamma\mst@Digamma\fi +% + \let\Gamma\mst@Gamma + \let\Delta\mst@Delta + \let\Theta\mst@Theta + \let\Lambda\mst@Lambda + \let\Xi\mst@Xi + \let\Pi\mst@Pi + \let\Sigma\mst@Sigma + \let\Upsilon\mst@Upsilon + \let\Phi\mst@Phi + \let\Psi\mst@Psi + \let\Omega\mst@Omega +% \end{macrocode} +% |1.3h 2015/10/31| adds this conditional to correct the bad bug in +% |1.3d 2014/05/23| which caused |\alpha| etc... to become undefined +% under option |selfGreek|. +% \begin{macrocode} + \ifmst@selfGreek\else + \let\alpha\mst@alpha + \let\beta\mst@beta + \let\gamma\mst@gamma + \let\delta\mst@delta + \let\epsilon\mst@epsilon + \let\zeta\mst@zeta + \let\eta\mst@eta + \let\theta\mst@theta + \let\iota\mst@iota + \let\kappa\mst@kappa + \let\lambda\mst@lambda + \let\mu\mst@mu + \let\nu\mst@nu + \let\xi\mst@xi + \let\omicron\mst@omicron + \let\pi\mst@pi + \let\rho\mst@rho + \let\sigma\mst@sigma + \let\tau\mst@tau + \let\upsilon\mst@upsilon + \let\phi\mst@phi + \let\chi\mst@chi + \let\psi\mst@psi + \let\omega\mst@omega +% 1.3h: digamma only defined with option LGRgreek: + \ifmst@LGRgreek\let\digamma\mst@digamma\fi +% + \let\varsigma\mst@varsigma +% conditional added 1.3h 2015/10/31 + \ifmst@LGRgreek\else + \let\varepsilon\mst@varepsilon + \let\vartheta\mst@vartheta + \let\varpi\mst@varpi + \let\varrho\mst@varrho + \let\varphi\mst@varphi +% + \let\partial\mst@partial + \let\wp\mst@wp +% 1.3h: no \mst@ell if symbolgreek (bugfix 1.3h 2015/10/31) + \ifmst@symbolgreek\else\let\ell\mst@ell\fi + \fi + \fi +}% \MTcustomgreek +\fi +\let\Mathastextstandardgreek\MTstandardgreek +\let\Mathastextcustomgreek\MTcustomgreek +\ifmst@subdued\else\MTcustomgreek\fi % \end{macrocode} % \end{macro}\end{macro}\end{macro} -% \begin{macro}{\models} -% |1.15d|: 13 oct 2012. Before modifying \string| we must preserve \cs{models}. +% \begin{macro}{\inodot} +% \begin{macro}{\jnodot} +% In |1.0|, I had them of type |mathord|, here I choose |mathalpha|. If I +% 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. +% +% |1.14b| |2011/04/02|: again this bug in the EU1/EU2 encoding part, as in the +% code redefining \$ etc in math mode (see above). Fixed. +% +% |1.3l| |2016/01/29|: anticipating TL2016 fontspec's switch to |TU|. +% +% |1.3t| |2018/08/22| removes the definitions done of |\i| and |\j| +% since |1.12| (as robust commands usable both in text and math mode). +% +% |1.3u| lets the \cs{imath} and \cs{jmath} react to the font encoding at each +% math version. % \begin{macrocode} -\ifmst@XeOrLua - \mst@Umathcharnumdef\mst@vert@bar=\mst@Umathcodenum`\|\relax -\else - \mathchardef\mst@vert@bar=\mathcode`\|\relax +\def\mst@subduedinodot{% + \let\inodot\mst@original@imath + \let\jnodot\mst@original@jmath +}% +\def\mst@nonsubduedinodot{% + \expandafter\let\expandafter\inodot + \csname mst@inodot@mv\math@version\endcsname + \expandafter\let\expandafter\jnodot + \csname mst@jnodot@mv\math@version\endcsname +}% +\def\mst@dothe@inodotstuff#1#2#3{% + \edef\mst@tmp@enc{#3}% + \if1\mst@OneifUniEnc + % Unicode engine and font + \mst@Umathchardef#1="7 \symmtletterfont "0131 \relax + \mst@Umathchardef#2="7 \symmtletterfont "0237 \relax + \else + \DeclareMathSymbol{#1}{\mathalpha}{mtletterfont} + {\csname\mst@tmp@enc\string\i\endcsname} + \DeclareMathSymbol{#2}{\mathalpha}{mtletterfont} + {\csname\mst@tmp@enc\string\j\endcsname} + \fi}% \mst@dothe@inodotstuff +\ifmst@defaultimath\else\typeout{** \string\imath\space and \string\jmath\space} + \AtEndOfPackage{\AtBeginDocument{% + \renewcommand*{\imath}{\inodot}% + \renewcommand*{\jmath}{\jnodot}% + }}% \fi -\DeclareRobustCommand\models{\mathrel{\mst@vert@bar}\joinrel\Relbar} % \end{macrocode} % \end{macro} -% \begin{macro}{|,\mid,\vert} -% (2011) I did not do anything then to try to emulate \cs{Vert} with the -% vertical bar from the text font... and now (2012) \mst is not as radical as -% it used to be anyhow, so it is too late. +% \end{macro} +% \begin{macro}{math accents} +% \emph{Obsolete comments relative to the 2011 code:} +% \begin{quote} +% I don't know how to get from the encoding to the slot +% positions of the accents (apart from going to look at +% all possible encodings definition files and putting this +% info here). In standard \LaTeX{}, the math accents are +% taken from the `operators' font. So we do the same +% here. Of course there is the problem that the user can +% define math versions with different encodings. Here I +% take T1 if it was the default at the time of loading the +% package, else OT1. +% |1.12b|: I add LY1 which is quasi like OT1. +% \end{quote} +% +% At |1.3u 2019/08/20| I decide to remove the hard-coded slot positions +% for OT1, T1 and LY1, and replace them with some hack which assumes +% LaTeX2e way of handling text accents got executed by the encoding +% definition file. If not, some breakage on package loading could occur, but +% this whole thing is conditional on the |mathaccents| option anyway, which +% per default is not executed. +% +% The |\vec| accent is not considered here because it has no suitable +% available glyph in a standard 8bits text font encodings. +% +% Also at |1.3u| the math accents adapt to the font encoding at each math +% version. % \begin{macrocode} -\ifmst@nosmalldelims - \DeclareMathSymbol{|}{\mathord}{\mst@font@tbu}{124} -\else - \DeclareMathDelimiter{|}{\mathord}{\mst@font@tbu}{124}{largesymbols}{"0C} -\fi -\def\vert{|} -\DeclareMathSymbol{\mst@varfam@vbar}{\mathalpha}{\mst@font@tbu}{124} -\mst@addtodo@easynonletters\|\mst@varfam@vbar -\let\mid\undefined % 1.3: to avoid problems with some packages -\DeclareMathSymbol{\mid}{\mathrel}{\mst@font@tbu}{124} -\mst@do@nonletters\expandafter{\the\mst@do@nonletters - \def\mid{\mathrel\mst@varfam@vbar}} +\let\mst@subduedmathaccents\@empty +\let\mst@nonsubduedmathaccents\@empty +\ifmst@mathaccents +\def\mst@subduedmathaccents{% + \@tfor\@tempa:={grave}{acute}{check}{breve}{bar}% + {dot}{ddot}{mathring}{hat}{tilde}% + \do + {\expandafter\let\csname\@tempa\expandafter\endcsname + \csname mst@original@\@tempa\endcsname}% +}% +\def\mst@nonsubduedmathaccents{% + \@tfor\@tempa:={grave}{acute}{check}{breve}{bar}% + {dot}{ddot}{mathring}{hat}{tilde}% + \do + {\expandafter\let\csname\@tempa\expandafter\endcsname + \csname mst@\@tempa @mv\math@version\endcsname}% +}% +\def\mst@dothe@mathaccentsstuff#1#2{% + \begingroup + \edef\mst@tmp@enc{#2}% + \def\@text@composite##1\@text@composite##2{##2}% + \let\add@accent\@firstoftwo + \let\add@unicode@accent\@firstoftwo + \if1\mst@OneifUniEnc + \ifmst@unimathaccents + % \` -> \grave + \expandafter\xdef\csname mst@grave@mv#1\endcsname + {\mst@Umathaccent + 7 + \number\symmtoperatorfont\space + \csname#2\string\`\endcsname{}\relax}% + % \' -> \acute + \expandafter\xdef\csname mst@acute@mv#1\endcsname + {\mst@Umathaccent + 7 + \number\symmtoperatorfont\space + \csname#2\string\'\endcsname{}\relax}% + % \v -> \check + \expandafter\xdef\csname mst@check@mv#1\endcsname + {\mst@Umathaccent + 7 + \number\symmtoperatorfont\space + \csname#2\string\v\endcsname{}\relax}% + % \u -> \breve + \expandafter\xdef\csname mst@breve@mv#1\endcsname + {\mst@Umathaccent + 7 + \number\symmtoperatorfont\space + \csname#2\string\u\endcsname{}\relax}% + % \= -> \bar + \expandafter\xdef\csname mst@bar@mv#1\endcsname + {\mst@Umathaccent + 7 + \number\symmtoperatorfont\space + \csname#2\string\=\endcsname{}\relax}% + % \. -> \dot + \expandafter\xdef\csname mst@dot@mv#1\endcsname + {\mst@Umathaccent + 7 + \number\symmtoperatorfont\space + \csname#2\string\.\endcsname{}\relax}% + % \" -> \ddot + \expandafter\xdef\csname mst@ddot@mv#1\endcsname + {\mst@Umathaccent + 7 + \number\symmtoperatorfont\space + \csname#2\string\"\endcsname{}\relax}% + % \r -> \mathring + \expandafter\xdef\csname mst@mathring@mv#1\endcsname + {\mst@Umathaccent + 7 + \number\symmtoperatorfont\space + \csname#2\string\r\endcsname{}\relax}% + % \^ -> \hat + \expandafter\xdef\csname mst@hat@mv#1\endcsname + {\mst@Umathaccent + 7 + \number\symmtoperatorfont\space + \csname#2\string\^\endcsname{}\relax}% + % \~ -> \tilde + \expandafter\xdef\csname mst@tilde@mv#1\endcsname + {\mst@Umathaccent + 7 + \number\symmtoperatorfont\space + \csname#2\string\~\endcsname{}\relax}% + \else + \@tfor\@tempa:={grave}{acute}{check}{breve}{bar}% + {dot}{ddot}{mathring}{hat}{tilde}% + \do + {\expandafter\gdef\csname mst@\@tempa @mv#1\expandafter\endcsname + \expandafter{\csname mst@original@\@tempa\endcsname}}% + \fi + \else + % \` -> \grave + \expandafter\DeclareMathAccent\expandafter + {\csname mst@grave@mv#1\endcsname}{\mathalpha}{mtoperatorfont}% + {\csname#2\string\`\endcsname{}} + % \' -> \acute + \expandafter\DeclareMathAccent\expandafter + {\csname mst@acute@mv#1\endcsname}{\mathalpha}{mtoperatorfont}% + {\csname#2\string\'\endcsname{}} + % \v -> \check + \expandafter\DeclareMathAccent\expandafter + {\csname mst@check@mv#1\endcsname}{\mathalpha}{mtoperatorfont}% + {\csname#2\string\v\endcsname{}} + % \u -> \breve + \expandafter\DeclareMathAccent\expandafter + {\csname mst@breve@mv#1\endcsname}{\mathalpha}{mtoperatorfont}% + {\csname#2\string\u\endcsname{}} + % \= -> \bar + \expandafter\DeclareMathAccent\expandafter + {\csname mst@bar@mv#1\endcsname}{\mathalpha}{mtoperatorfont}% + {\csname#2\string\=\endcsname{}} + % \. -> \dot + \expandafter\DeclareMathAccent\expandafter + {\csname mst@dot@mv#1\endcsname}{\mathalpha}{mtoperatorfont}% + {\csname#2\string\.\endcsname{}} + % \" -> \ddot + \expandafter\DeclareMathAccent\expandafter + {\csname mst@ddot@mv#1\endcsname}{\mathalpha}{mtoperatorfont}% + {\csname#2\string\"\endcsname{}} + % \r -> \mathring + \expandafter\DeclareMathAccent\expandafter + {\csname mst@mathring@mv#1\endcsname}{\mathalpha}{mtoperatorfont}% + {\csname#2\string\r\endcsname{}} + % \^ -> \hat + \expandafter\DeclareMathAccent\expandafter + {\csname mst@hat@mv#1\endcsname}{\mathalpha}{mtoperatorfont}% + {\csname#2\string\^\endcsname{}} + % \~ -> \tilde + \expandafter\DeclareMathAccent\expandafter + {\csname mst@tilde@mv#1\endcsname}{\mathalpha}{mtoperatorfont}% + {\csname#2\string\~\endcsname{}} + \fi + \endgroup +}% +\fi % \ifmst@mathaccents % \end{macrocode} -% \begin{macro}{\MTexplicitbraces-}\begin{macro}{obeymathxx} -% \begin{macro}{\MTexplicitbraces-}\begin{macro}{donotobeymathxx} -% Braces. With version |1.2|, |\{| and |\}| will not be acceptable as -% delimiters anymore if the redefinitions below in \cs{mst@dobraces} are -% enacted. But they will obey math alphabets. Improvements in |1.2a|, to -% preserve robustness. +% \end{macro} +% \begin{macro}{\MTDeclareVersion} +% The \cs{MTDeclareVersion} command is to be used in the preamble +% to declare a math version. A more complicated variant would also +% specify a choice of series for the Euler and Symbol font: anyhow +% Symbol only has the medium series, and Euler has medium and bold, +% so what is lacking is the possibility to create a version with a +% bold Euler. There is already one such version: the default |bold| +% one. And there is always the possibility to add to the preamble +% \cs{SetSymbolFont}|{mteulervm}||{versionname}||{U}{zeur}{bx}{n}| if +% one wants to have a math version with bold Euler characters. % -% For |1.3| I make |\lbrace| and |\rbrace| undefined first, else problems -% may arise with some packages. |1.3e| suppresses under option -% |nosmalldelims| the definitions of |\lbrace| and |\rbrace| as math -% symbols as this bug made |\left\lbrace| cause an error, naturally. +% For version |1.1| we add an optional parameter specifying the shape +% to be used for letters. +% +% Note: (|2012/10/24|) I really should check whether the user attempts to +% redefine the `normal' and `bold' versions and issue a warning in +% that case! +% +% |1.3c| (|2013/12/14|) adds an extra optional parameter after all +% previous ones, to inherit the settings from another version. Typically +% to be used with [bold]. I take this opportunity to sanitize a bit some +% line endings to avoid generating (in the preamble, document macros were +% already careful of course) too many space +% tokens, at least inside macros. And I modifiy (correct? perhaps it was on +% purpose) the strange way I used |\@onlypreamble| in earlier +% version. +% +% |1.3u| adds storage of macros holding the needed meanings for +% \cs{imath}, \cs{hbar}, math accents, and the minus symbol, +% version wise. % \begin{macrocode} - \ifmst@nosmalldelims +\newcommand*\MTDeclareVersion[6][]{% + \edef\mst@declareversionargs{{#1}{#2}{#3}{#4}{#5}{#6}}% + \edef\mst@version{#2}% + \DeclareMathVersion{\mst@version}% + \MTDeclareVersion@ +}% \MTDeclareVersion +\newcommand*\MTDeclareVersion@[1][]{% + \edef\mst@tmp{#1}% + \ifx\mst@tmp\empty\else + \global\expandafter\let\csname mv@\mst@version\expandafter\endcsname + \csname mv@#1\endcsname + \typeout{** Math version `\mst@version\string' inherits from `#1\string'.}% + \fi + \expandafter\MTDeclareVersion@@\mst@declareversionargs +}% \MTDeclareVersion@ +\newcommand*\MTDeclareVersion@@[6]{% + \expandafter\edef\csname mst@encoding@\mst@version\endcsname{#3}% + \expandafter\edef\csname mst@family@\mst@version\endcsname{#4}% + \expandafter\edef\csname mst@series@\mst@version\endcsname{#5}% + \expandafter\edef\csname mst@shape@\mst@version\endcsname{#6}% + \expandafter\edef\csname mst@boldvariant@\mst@version\endcsname{\mst@bold}% + \expandafter\edef\csname mst@itdefault@\mst@version\endcsname{\itdefault}% + \expandafter\edef\csname mst@rmdefault@\mst@version\endcsname{\rmdefault}% + \expandafter\edef\csname mst@sfdefault@\mst@version\endcsname{\sfdefault}% + \expandafter\edef\csname mst@ttdefault@\mst@version\endcsname{\ttdefault}% + \expandafter\edef\csname mst@exists@skip@\mst@version\endcsname + {\mst@exists@skip}% + \expandafter\edef\csname mst@forall@skip@\mst@version\endcsname + {\mst@forall@skip}% + \expandafter\edef\csname mst@prime@skip@\mst@version\endcsname + {\mst@prime@skip}% + \def\mst@tmp{#1}% + \ifx\mst@tmp\empty + \ifmst@italic + \SetSymbolFont{mtletterfont}{#2}{#3}{#4}{#5}{\mst@ltsh}% + \typeout{** Latin letters in math version `#2\string' will use the font + #3/#4/#5/\mst@ltsh^^J% + ** Other characters (digits, ...) and \protect\log-like names + will be in #6 shape.}% + \expandafter\edef\csname mst@ltshape@\mst@version\endcsname{\mst@ltsh}% + \else + \SetSymbolFont{mtletterfont}{#2}{#3}{#4}{#5}{#6}% + \typeout{** Latin letters in math version `#2\string' will use the fonts + #3/#4/#5(\mst@bold)/#6}% + \expandafter\edef\csname mst@ltshape@\mst@version\endcsname{#6}% + \fi \else - \let\lbrace\undefined \let\rbrace\undefined - \DeclareMathDelimiter{\lbrace} - {\mathopen}{\mst@font@tbu}{123}{largesymbols}{"08} - \DeclareMathDelimiter{\rbrace} - {\mathclose}{\mst@font@tbu}{125}{largesymbols}{"09} + \SetSymbolFont{mtletterfont}{#2}{#3}{#4}{#5}{#1}% + \typeout{** Latin letters in math version `#2\string' will use the font + #3/#4/#5/#1^^J% + ** Other characters (digits, ...) and \protect\log-like + names will be in #6 shape.}% + \expandafter\edef\csname mst@ltshape@\mst@version\endcsname{#1}% + \fi + \ifmst@nonormalbold\else + \SetMathAlphabet{\mathnormalbold}{#2}{#3}{#4}{\mst@bold}% + {\csname mst@ltshape@\mst@version\endcsname}% + \fi + \SetSymbolFont{mtoperatorfont}{#2}{#3}{#4}{#5}{#6}% + \ifmst@defaultbf\else\SetMathAlphabet{\Mathbf}{#2}{#3}{#4}{\mst@bold}{#6}\fi + \ifmst@defaultit\else\SetMathAlphabet{\Mathit}{#2}{#3}{#4}{#5}{\itdefault}\fi + \ifmst@defaultsf\else\SetMathAlphabet{\Mathsf}{#2}{#3}{\sfdefault}{#5}{#6}\fi + \ifmst@defaulttt\else\SetMathAlphabet{\Mathtt}{#2}{#3}{\ttdefault}{#5}{#6}\fi + \ifmst@needeuler + \SetMathAlphabet{\MathEulerBold}{#2}{U}{zeur}{\mst@bold}{n}% \fi -\DeclareMathSymbol{\mst@varfam@lbrace}{\mathalpha}{\mst@font@tbu}{123} -\DeclareMathSymbol{\mst@varfam@rbrace}{\mathalpha}{\mst@font@tbu}{125} -\DeclareRobustCommand*{\mst@lbrace} - {\ifmmode\mathopen\mst@varfam@lbrace\else\textbraceleft\fi} -\DeclareRobustCommand*{\mst@rbrace} - {\ifmmode\mathclose\mst@varfam@rbrace\else\textbraceright\fi} -\mst@do@nonletters\expandafter{\the\mst@do@nonletters - \mst@dobraces{\let\{\mst@lbrace\let\}\mst@rbrace}} -\fi % end of \ifmst@alldelims -\newcommand*{\MTexplicitbracesobeymathxx}{\let\mst@dobraces\@firstofone} -\newcommand*{\MTexplicitbracesdonotobeymathxx}{\let\mst@dobraces\@gobble} -\MTexplicitbracesdonotobeymathxx % \end{macrocode} -% \end{macro}\end{macro}\end{macro}\end{macro} -% \end{macro}\end{macro} -% \begin{macro}{specials} -% \leavevmode\kern\parindent |1.14b| |2011/04/02|: the redefinitions of -% \#, \$, \% and \& were buggy (this showed up when 10 or more math -% families had been created). -% -% |1.15f| |2012/10/23|: the code, although working, was perhaps a bit insane -% and -% had definitions which could surprise other packages. For example, it did:\\ -% \null\hspace{1cm}|\renewcommand{\%}{\ifmmode\mt@mmode@percent\else\char37\relax\fi}|\\ -% But it seems this provokes a problem with |microtype|. Perhaps the problem -% was that the command was not declared robust? For the dollar \LaTeX{} itself does\\ -% \null\hspace{1cm}|\DeclareRobustCommand{\$}{\ifmmode\mathdollar\else\textdollar\fi}|\\ -% So here I just modify \cs{mathdollar}. Then we have in -% |latex.ltx| the same definitions as in |plain.tex|: -% |\chardef\%=`\%|, -% |\chardef\&=`\&|, and -% |\chardef\#=`\#|. It turns out that we can just adjust the mathcodes of these -% characters and achieve exactly what is wanted for the corresponding one char -% control sequences. In math mode the control sequence will use the specified -% mathcode. So here it is \emph{not} a redefinition of the control sequences, -% purely an adjustment of mathcodes. -% -% |1.2d| |2013/01/01|: previous versions imposed the variable family type. I -% hereby make it possible to de-activate this feature with the macro -% \cs{MTeasynonlettersdonotobeymathxx}. Besides, I have absolutely no idea -% why I had different looking code depending on the engine \XeTeX, \LuaTeX\ or -% default. Removed. -% -% |1.3c| |2013/12/14|: I have absolutely no idea why I removed the \XeTeX\ -% and \LuaTeX\ code at the time of |1.2d|! the code for tex/pdftex engine -% could not accomodate more than 16 math families. Code for \XeTeX\ and -% \LuaTeX\ again added. (and since TL2013 no more problems with -% |\luatexUmathcode|.) +% \begin{macro}{LGRgreeks} +% \begin{macro}{selfGreeks} +% In the case of option LGRgreeks (selfGreeks), it is expected that +% the fonts used in each math versions exist in LGR (OT1) encoding. We +% first recalculate the shapes to be used for lowercase and uppercase +% Greek letters depending on the frenchmath and [it/up][g/G]reek +% options as well as on the (local to this version) shapes for letters +% and digits. % \begin{macrocode} -\ifmst@nospecials -\else - \typeout{** \string\#\space\string\mathdollar\space - \string\%\space\string\&\space} - \ifmst@XeOrLua - \mst@Umathcode`\#=0 \symmtoperatorfont "23 \relax - \mst@Umathchardef\mathdollar=0 \symmtoperatorfont "24 \relax - \mst@Umathcode`\%=0 \symmtoperatorfont "25 \relax - \mst@Umathcode`\&=0 \symmtoperatorfont "26 \relax - \mst@do@easynonletters\expandafter{% - \the\mst@do@easynonletters - \mst@Umathcode`\#=7 \symmtoperatorfont "23 \relax - \mst@Umathchardef\mathdollar=7 \symmtoperatorfont "24 \relax - \mst@Umathcode`\%=7 \symmtoperatorfont "25 \relax - \mst@Umathcode`\&=7 \symmtoperatorfont "26 \relax - } + \def\mst@greek@lsh@loc{\csname mst@ltshape@\mst@version\endcsname}% + \def\mst@greek@ush@loc{\csname mst@shape@\mst@version\endcsname}% + \ifmst@itgreek\def\mst@greek@lsh@loc{\itdefault}% + \def\mst@greek@ush@loc{\itdefault}% + \fi + \ifmst@upgreek\def\mst@greek@lsh@loc{\updefault}% + \def\mst@greek@ush@loc{\updefault}% + \fi + \ifmst@frenchmath + \ifmst@itgreek\else + \ifmst@upgreek\else + \def\mst@greek@lsh@loc{\csname mst@shape@\mst@version\endcsname}% + \def\mst@greek@ush@loc{\csname mst@shape@\mst@version\endcsname}% + \fi\fi + \fi + \ifcase\mst@greek@select + \or\def\mst@greek@ush@loc{\itdefault}% + \or\def\mst@greek@ush@loc{\updefault}% + \fi + \ifmst@LGRgreeks + \SetSymbolFont{mtlgrfontlower}{#2}{LGR}{#4}{#5}{\mst@greek@lsh@loc}% + \SetSymbolFont{mtlgrfontupper}{#2}{LGR}{#4}{#5}{\mst@greek@ush@loc}% + \typeout{** Greek letters (\mst@greek@lsh@loc/\mst@greek@ush@loc) will use + LGR font #4\ifmst@subdued ^^J** (in non subdued versions)\fi}% \else - \count@=\symmtoperatorfont - \multiply\count@ by \@cclvi - \advance\count@ by 35 - \mathcode`\#\count@ - \advance\count@ by \@ne - \mathchardef\mathdollar\count@ - \advance\count@ by \@ne - \mathcode`\%\count@ - \advance\count@ by \@ne - \mathcode`\&\count@ - \count@=\symmtoperatorfont - \multiply\count@ by \@cclvi - \advance\count@ by 28707 % = "7023 - \mathchardef\mst@varfam@mathhash\count@ - \advance\count@ by \@ne - \mathchardef\mst@varfam@mathdollar\count@ - \advance\count@ by \@ne - \mathchardef\mst@varfam@mathpercent\count@ - \advance\count@ by \@ne - \mathchardef\mst@varfam@mathampersand\count@ - \mst@do@easynonletters\expandafter{\the\mst@do@easynonletters - \mathcode`\#=\mst@varfam@mathhash - \let\mathdollar\mst@varfam@mathdollar - \mathcode`\%=\mst@varfam@mathpercent - \mathcode`\&=\mst@varfam@mathampersand} + \ifmst@selfGreeks + \SetSymbolFont{mtselfGreekfont}{#2}{OT1}{#4}{#5}{\mst@greek@ush@loc}% + \typeout{** Capital Greek letters (\mst@greek@lsh@loc/\mst@greek@ush@loc) + will use OT1 font #4\ifmst@subdued ^^J** (in non subdued versions)\fi}% + \else + \ifmst@LGRgreek + \SetSymbolFont{mtlgrfontlower}{#2}{LGR}{\mst@greekfont}{#5}{\mst@greek@lsh@loc}% + \SetSymbolFont{mtlgrfontupper}{#2}{LGR}{\mst@greekfont}{#5}{\mst@greek@ush@loc}% + \typeout{** Greek letters (\mst@greek@lsh@loc/\mst@greek@ush@loc) will use + LGR font \mst@greekfont\ifmst@subdued ^^J** (in non subdued versions)\fi}% + \else + \ifmst@selfGreek + \SetSymbolFont{mtselfGreekfont}{#2}{OT1}{\mst@greekfont}{#5}{\mst@greek@ush@loc}% + \typeout{** Capital Greek letters (\mst@greek@lsh@loc/\mst@greek@ush@loc) + will use OT1 font \mst@greekfont\ifmst@subdued ^^J** (in non subdued versions)\fi}% + \fi + \fi + \fi \fi -\fi + \edef\mst@tmp{\expandafter\noexpand\csname mst@hbar@mv#2\endcsname + \expandafter\noexpand\csname mst@ltbar@mv#2\endcsname}% + \expandafter\mst@dothe@hbarstuff\mst@tmp{#3}% + \edef\mst@tmp{\expandafter\noexpand\csname mst@inodot@mv#2\endcsname + \expandafter\noexpand\csname mst@jnodot@mv#2\endcsname}% + \expandafter\mst@dothe@inodotstuff\mst@tmp{#3}% + \ifmst@mathaccents + \mst@dothe@mathaccentsstuff{#2}{#3}% + \fi + \edef\mst@tmp{\expandafter\noexpand\csname mst@minus@mv#2\endcsname + \expandafter\noexpand\csname mst@varfam@minus@mv#2\endcsname}% + \ifmst@endash + \expandafter\mst@dothe@endashstuff\mst@tmp{#3}% + \else + \ifmst@emdash + \expandafter\mst@dothe@emdashstuff\mst@tmp{#3}% + \else + \expandafter\mst@dothe@hyphenstuff\mst@tmp + \fi + \fi +}% \MTDeclareVersion@@ +\let\MathastextDeclareVersion\MTDeclareVersion % \end{macrocode} % \end{macro} -% \begin{macro}{symbolmisc} -% We construct (with some effort) some long arrows from the Symbol glyphs, of -% almost the same lengths as the standard ones. By the way, I always found the -% \cs{iff} to be too wide, but I follow here the default. Also, although -% there is a \cs{longmapsto} in standard \LaTeX{}, if I am not mistaken, there -% is no \cs{longto}. So I define one here. I could not construct in the same -% manner \cs{Longrightarrow} etc\dots{} as the = sign from Symbol does not -% combine easily with the logical arrows, well, I could have done some box -% manipulations, but well, life is finite. -% \begin{macro}{\prod} -% \begin{macro}{\sum} -% |1.13b|: I correct the brutal re-definitions of \cs{prod} and \cs{sum} from -% the earlier versions of the package; most of the time the Symbol glyphs do -% appear to be too small in display mode. The new redefinitions do have some -% defects: |$\displaystyle\prod_1^2$| changes the position of limits but not -% the glyph itself, and |$$\textstyle\prod_1^2$$| change the limits but -% switches to the CM inline math glyph. So I tried\\ -% |\renewcommand{\prod}{\mathchoice{\mst@prod}{\prodpsy}{\prodpsy}{\prodpsy}}|\\ -% but this did not go well with subscripts and exponents. -% -% Note oct 2012: maybe I should re-examine what I did? -% |1.3c| (|2013/12/14|) renames |\defaultprod| to |\MToriginalprod| and -% |\defaultsum| to -% |\MToriginalsum|. -% \begin{macrocode} -\ifmst@symbolmisc\typeout{** symbolmisc: miscellaneous math symbols from Symbol font} -\let\mst@prod\prod -\let\MToriginalprod\prod -\DeclareMathSymbol{\prodpsy}{\mathop}{mtpsymbol}{213} -\renewcommand*{\prod}{\ifinner\prodpsy\else\mst@prod\fi} -\let\mst@sum\sum -\let\MToriginalsum\sum -\DeclareMathSymbol{\sumpsy}{\mathop}{mtpsymbol}{229} -\renewcommand*{\sum}{\ifinner\sumpsy\else\mst@sum\fi} -% \end{macrocode} -% \end{macro} -% \end{macro} -% \begin{macrocode} -\DeclareMathSymbol{\mst@implies}{\mathrel}{mtpsymbol}{222} -\DeclareRobustCommand*{\implies}{\;\mst@implies\;} -\DeclareMathSymbol{\mst@impliedby}{\mathrel}{mtpsymbol}{220} -\DeclareRobustCommand*{\impliedby}{\;\mst@impliedby\;} -\DeclareRobustCommand*{\iff}{\;\mst@impliedby\mathrel{\mkern-3mu}\mst@implies\;} -\DeclareMathSymbol{\mst@iff}{\mathrel}{mtpsymbol}{219} -\DeclareRobustCommand*{\shortiff}{\;\mst@iff\;} -\DeclareMathSymbol{\mst@to}{\mathrel}{mtpsymbol}{174} -\DeclareMathSymbol{\mst@trait}{\mathrel}{mtpsymbol}{190} -\DeclareRobustCommand*\to{\mst@to} -\DeclareRobustCommand*\longto{\mkern2mu\mst@trait\mathrel{\mkern-10mu}\mst@to} -\DeclareRobustCommand*\mapsto{\mapstochar\mathrel{\mkern0.2mu}\mst@to} -\DeclareRobustCommand*\longmapsto{% -\mapstochar\mathrel{\mkern2mu}\mst@trait\mathrel{\mkern-10mu}\mst@to} -\DeclareMathSymbol{\aleph}{\mathord}{mtpsymbol}{192} -\DeclareMathSymbol{\inftypsy}{\mathord}{mtpsymbol}{165} -\DeclareMathSymbol{\emptyset}{\mathord}{mtpsymbol}{198} -\let\varnothing\emptyset -\DeclareMathSymbol{\nabla}{\mathord}{mtpsymbol}{209} -\DeclareMathSymbol{\surd}{\mathop}{mtpsymbol}{214} -\let\angle\undefined -\DeclareMathSymbol{\angle}{\mathord}{mtpsymbol}{208} -\DeclareMathSymbol{\forall}{\mathord}{mtpsymbol}{34} -\DeclareMathSymbol{\exists}{\mathord}{mtpsymbol}{36} -\DeclareMathSymbol{\neg}{\mathord}{mtpsymbol}{216} -\DeclareMathSymbol{\clubsuit}{\mathord}{mtpsymbol}{167} -\DeclareMathSymbol{\diamondsuit}{\mathord}{mtpsymbol}{168} -\DeclareMathSymbol{\heartsuit}{\mathord}{mtpsymbol}{169} -\DeclareMathSymbol{\spadesuit}{\mathord}{mtpsymbol}{170} -\DeclareMathSymbol{\smallint}{\mathop}{mtpsymbol}{242} -\DeclareMathSymbol{\wedge}{\mathbin}{mtpsymbol}{217} -\DeclareMathSymbol{\vee}{\mathbin}{mtpsymbol}{218} -\DeclareMathSymbol{\cap}{\mathbin}{mtpsymbol}{199} -\DeclareMathSymbol{\cup}{\mathbin}{mtpsymbol}{200} -\DeclareMathSymbol{\bullet}{\mathbin}{mtpsymbol}{183} -\DeclareMathSymbol{\div}{\mathbin}{mtpsymbol}{184} -\DeclareMathSymbol{\otimes}{\mathbin}{mtpsymbol}{196} -\DeclareMathSymbol{\oplus}{\mathbin}{mtpsymbol}{197} -\DeclareMathSymbol{\pm}{\mathbin}{mtpsymbol}{177} -\DeclareMathSymbol{\times}{\mathbin}{mtpsymbol}{180} -\DeclareMathSymbol{\proptopsy}{\mathrel}{mtpsymbol}{181} -\DeclareMathSymbol{\mid}{\mathrel}{mtpsymbol}{124} -\DeclareMathSymbol{\leq}{\mathrel}{mtpsymbol}{163} -\DeclareMathSymbol{\geq}{\mathrel}{mtpsymbol}{179} -\DeclareMathSymbol{\approx}{\mathrel}{mtpsymbol}{187} -\DeclareMathSymbol{\supset}{\mathrel}{mtpsymbol}{201} -\DeclareMathSymbol{\subset}{\mathrel}{mtpsymbol}{204} -\DeclareMathSymbol{\supseteq}{\mathrel}{mtpsymbol}{202} -\DeclareMathSymbol{\subseteq}{\mathrel}{mtpsymbol}{205} -\DeclareMathSymbol{\in}{\mathrel}{mtpsymbol}{206} -\DeclareMathSymbol{\sim}{\mathrel}{mtpsymbol}{126} -\let\cong\undefined -\DeclareMathSymbol{\cong}{\mathrel}{mtpsymbol}{64} -\DeclareMathSymbol{\perp}{\mathrel}{mtpsymbol}{94} -\DeclareMathSymbol{\equiv}{\mathrel}{mtpsymbol}{186} -\let\notin\undefined -\DeclareMathSymbol{\notin}{\mathrel}{mtpsymbol}{207} -\DeclareMathDelimiter{\rangle} - {\mathclose}{mtpsymbol}{241}{largesymbols}{"0B} -\DeclareMathDelimiter{\langle} - {\mathopen}{mtpsymbol}{225}{largesymbols}{"0A} -\fi -% \end{macrocode} % \end{macro} -% \begin{macro}{symbolre} -% I like the \cs{Re} and \cs{Im} from Symbol, so I overwrite the CM ones. -% \begin{macrocode} -\ifmst@symbolre\typeout{** symbolre: \string\Re\space and \string\Im\space from Symbol font} -\DeclareMathSymbol{\Re}{\mathord}{mtpsymbol}{"C2} -\DeclareMathSymbol{\Im}{\mathord}{mtpsymbol}{"C1} -\DeclareMathSymbol{\DotTriangle}{\mathord}{mtpsymbol}{92} -\fi -% \end{macrocode} % \end{macro} -% \begin{macro}{Greek letters} -% LGRgreek $>$ selfGreek $>$ eulergreek $>$ symbolgreek -% -% |1.11| I correct some bugs on how eulergreek and -% symbolgreek interacted. +% \begin{macro}{\MTversion} +% \begin{macro}{\MTversion@} +% \begin{macro}{\MTversion@s} +% \begin{macro}{\MTversion@@} +% This is a wrapper around \LaTeX{}'s \cs{mathversion}: here we have an +% optional argument allowing a quick and easy change of the text fonts +% additionally to the math fonts. Present already in the initial +% version of the package (January 2011.) +% +% |1.15|: some modifications for the subdued option vs LGRgreek and +% for the math muskips after \cs{exists} and \cs{forall}. % -% |1.12b| more bug fixes. +% |1.2|: with the subdued option sets the math alphabets in the +% normal and bold math versions do not apply to operator +% names and non-alphabetical symbols. The switch for braces +% is left as it is. % -% |1.13| +% |1.2b|: with the subdued option, the italic corrections are not added. +% Else, we check the shape of letters in this version. Also, there was a bug +% since |1.15|: the values of the math skips were taken not from the +% settings for the math version (\#2) but from those of the optional argument +% (\#1), if present... % -% * Option LGRgreek. +% |1.3|: activation of italic corrections is now separated from actual math +% activation of letters. % -% * 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. +% |1.3c|: a starred variant is added which does not modify the text fonts, +% only the math set-tup. % -% * bugfix: version |1.12b| did not define the \cs{omicron} in the -% case when no Greek-related option was passed to the package. +% |1.3d|: replaced in |\MTversion@| things like |\edef\mst@encoding{...}| and +% |\renewcommand{\encodingdefault}{\mst@@encoding}| by +% |\edef\encodingdefault{...}| etc\dots All those |\mst@@...| things were +% useless. I also redefine |\seriesdefault| rather than |\mddefault|. % -% |1.13d| has new macros |\MTstandardgreek| and |\MTcustomgreek|. -% And in the subdued case |\MTstandardgreek| is done when switching to -% the normal or bold math versions (previously something like this -% was only done in case of |LGRgreek| option. ) +% |1.3d|: mechanism of restoration of Greek in subdued normal and bold +% versions has been to all cases, and not only for the +% |LGRgreek| option. +% +% |1.3u|: version savvy (i.e. font-encoding savvy) minus sign, +% \cs{hbar}, \cs{imath}, math accents. % \begin{macrocode} -\let\mst@mathord\mathalpha -\mst@goaheadtrue -\ifmst@selfGreek - \def\mst@font@tbu{mtselfGreekfont} -\else - \ifmst@eulergreek - \def\mst@font@tbu{mteulervm} +\newcommand*\MTversion {\@ifstar\MTversion@s\MTversion@ } +\newcommand*\MTversion@s [1]{\mathversion{#1}\MTversion@@ } +\newcommand*\MTversion@ [2][]{% + \mathversion{#2}% defines \math@version as expanded #2 + \edef\mst@tmpa{#1}% + \ifx\mst@tmpa\empty + \let\mst@tmp\math@version \else - \ifmst@symbolgreek - \def\mst@font@tbu{mtpsymbol} - \let\mst@mathord\mathord - \else - \ifmst@LGRgreek - \mst@goaheadfalse - \else + \let\mst@tmp\mst@tmpa + \fi + \edef\encodingdefault {\csname mst@encoding@\mst@tmp\endcsname}% + \edef\familydefault {\csname mst@family@\mst@tmp\endcsname}% + \edef\seriesdefault {\csname mst@series@\mst@tmp\endcsname}% + \edef\shapedefault {\csname mst@shape@\mst@tmp\endcsname}% + \edef\bfdefault {\csname mst@boldvariant@\mst@tmp\endcsname}% + \edef\itdefault {\csname mst@itdefault@\mst@tmp\endcsname}% + \edef\rmdefault {\csname mst@rmdefault@\mst@tmp\endcsname}% + \edef\sfdefault {\csname mst@sfdefault@\mst@tmp\endcsname}% + \edef\ttdefault {\csname mst@ttdefault@\mst@tmp\endcsname}% + \usefont{\encodingdefault}{\familydefault}{\seriesdefault}{\shapedefault}% + \MTversion@@ +}% \MTversion@ % \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. +% |1.3j| has a stronger subdued which does \cs{MTnormalprime}, +% \cs{MTnormalexists}, \cs{MTnormalforall} rather than setting the skips to +% |0mu|. Hence \cs{MTversion} by default should do \cs{MTprimedoesskip}, +% \cs{MTexistsdoesskip}, \cs{MTforalldoesskip}. +% +% |1.3u| drops the argument, as the info is in \cs{math@version} from +% \LaTeX2e code. % \begin{macrocode} - \mst@goaheadfalse - \def\mst@omicron {\mst@alph@omicron{o}} - \fi - \fi - \fi -\fi -\ifmst@goahead - \DeclareMathSymbol{\mst@Alpha}{\mst@mathord}{\mst@font@tbu}{"41} - \DeclareMathSymbol{\mst@Beta}{\mst@mathord}{\mst@font@tbu}{"42} - \DeclareMathSymbol{\mst@Epsilon}{\mst@mathord}{\mst@font@tbu}{"45} - \DeclareMathSymbol{\mst@Zeta}{\mst@mathord}{\mst@font@tbu}{"5A} - \DeclareMathSymbol{\mst@Eta}{\mst@mathord}{\mst@font@tbu}{"48} - \DeclareMathSymbol{\mst@Iota}{\mst@mathord}{\mst@font@tbu}{"49} - \DeclareMathSymbol{\mst@Kappa}{\mst@mathord}{\mst@font@tbu}{"4B} - \DeclareMathSymbol{\mst@Mu}{\mst@mathord}{\mst@font@tbu}{"4D} - \DeclareMathSymbol{\mst@Nu}{\mst@mathord}{\mst@font@tbu}{"4E} - \DeclareMathSymbol{\mst@Omicron}{\mst@mathord}{\mst@font@tbu}{"4F} - \DeclareMathSymbol{\mst@Rho}{\mst@mathord}{\mst@font@tbu}{"50} - \DeclareMathSymbol{\mst@Tau}{\mst@mathord}{\mst@font@tbu}{"54} - \DeclareMathSymbol{\mst@Chi}{\mst@mathord}{\mst@font@tbu}{"58} +\newcommand*\MTversion@@ {% + \MTexistsdoesskip + \MTforalldoesskip + \MTprimedoesskip % \end{macrocode} -% When we in fact use Symbol, we have to correct \cs{Rho} and -% \cs{Chi}. And \cs{Digamma} is non-existent in fact (no F -% in Symbol, F codes a \cs{Phi}). +% |v1.15e|: muskips. % \begin{macrocode} - \ifx\mst@mathord\mathord + \mst@exists@muskip\csname mst@exists@skip@\math@version\endcsname\relax + \mst@forall@muskip\csname mst@forall@skip@\math@version\endcsname\relax % \end{macrocode} -% symbolgreek but neither eulergreek nor selfGreek +% |v1.2|: muskip for \cs{prime}. % \begin{macrocode} -%% attention le P de Symbol est un \Pi pas un \Rho - \DeclareMathSymbol{\mst@Rho}{\mathord}{mtpsymbol}{"52} -%% attention le X de Symbol est un \Xi pas un \Chi - \DeclareMathSymbol{\mst@Chi}{\mathord}{mtpsymbol}{"43} -%% attention le F de Symbol est un \Phi. Il n'y a pas de \Digamma - \DeclareMathSymbol{\mst@Gamma}{\mathord}{mtpsymbol}{"47} - \DeclareMathSymbol{\mst@Delta}{\mathord}{mtpsymbol}{"44} - \DeclareMathSymbol{\mst@Theta}{\mathord}{mtpsymbol}{"51} - \DeclareMathSymbol{\mst@Lambda}{\mathord}{mtpsymbol}{"4C} - \DeclareMathSymbol{\mst@Xi}{\mathord}{mtpsymbol}{"58} - \DeclareMathSymbol{\mst@Pi}{\mathord}{mtpsymbol}{"50} - \DeclareMathSymbol{\mst@Sigma}{\mathord}{mtpsymbol}{"53} - \DeclareMathSymbol{\mst@Upsilon}{\mathord}{mtpsymbol}{"A1} - \DeclareMathSymbol{\mst@Phi}{\mathord}{mtpsymbol}{"46} - \DeclareMathSymbol{\mst@Psi}{\mathord}{mtpsymbol}{"59} - \DeclareMathSymbol{\mst@Omega}{\mathord}{mtpsymbol}{"57} - \else % de \mst@mathord=\mathord + \mst@prime@muskip\csname mst@prime@skip@\math@version\endcsname\relax % \end{macrocode} -% not symbolgreek but eulergreek or selfGreek. Note |2015/10/31| : apparemment ŕ -% un moment dans le passé je considérais eulergreek et selfGreek comme pouvant -% ętre utilisés simultanément car j'avais ici "or both". Mais je laisse tomber -% tout effort réel de m'en préoccuper. +% |v1.2b|: italic corrections except for italic/slanted (sic) letters, and of +% course except in the subdued normal and bold math versions. +% +% |v1.3|: by default, letters are made mathematically active, even if italic +% corrections are not used, to allow the action of \cs{MTsetmathskips}. % \begin{macrocode} - \DeclareMathSymbol\mst@Digamma {\mathalpha}{\mst@font@tbu}{"46} - \DeclareMathSymbol\mst@Gamma {\mathalpha}{\mst@font@tbu}{"00} - \DeclareMathSymbol\mst@Delta {\mathalpha}{\mst@font@tbu}{"01} - \DeclareMathSymbol\mst@Theta {\mathalpha}{\mst@font@tbu}{"02} - \DeclareMathSymbol\mst@Lambda {\mathalpha}{\mst@font@tbu}{"03} - \DeclareMathSymbol\mst@Xi {\mathalpha}{\mst@font@tbu}{"04} - \DeclareMathSymbol\mst@Pi {\mathalpha}{\mst@font@tbu}{"05} - \DeclareMathSymbol\mst@Sigma {\mathalpha}{\mst@font@tbu}{"06} - \DeclareMathSymbol\mst@Upsilon {\mathalpha}{\mst@font@tbu}{"07} - \DeclareMathSymbol\mst@Phi {\mathalpha}{\mst@font@tbu}{"08} - \DeclareMathSymbol\mst@Psi {\mathalpha}{\mst@font@tbu}{"09} - \DeclareMathSymbol\mst@Omega {\mathalpha}{\mst@font@tbu}{"0A} - \fi % de \mst@mathord=\mathord -\fi % fin de goahead + \edef\mst@tmpa{\csname mst@ltshape@\math@version\endcsname}% + \edef\mst@tmpb{\csname mst@shape@\math@version\endcsname}% % \end{macrocode} -% 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|. -% -% 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| -% \begin{macrocode} -\ifmst@goahead - \ifmst@eulergreek - \DeclareMathSymbol{\mst@alpha} {\mathalpha}{mteulervm}{"0B} - \DeclareMathSymbol{\mst@beta} {\mathalpha}{mteulervm}{"0C} - \DeclareMathSymbol{\mst@gamma} {\mathalpha}{mteulervm}{"0D} - \DeclareMathSymbol{\mst@delta} {\mathalpha}{mteulervm}{"0E} - \DeclareMathSymbol{\mst@epsilon}{\mathalpha}{mteulervm}{"0F} - \DeclareMathSymbol{\mst@zeta} {\mathalpha}{mteulervm}{"10} - \DeclareMathSymbol{\mst@eta} {\mathalpha}{mteulervm}{"11} - \DeclareMathSymbol{\mst@theta} {\mathalpha}{mteulervm}{"12} - \DeclareMathSymbol{\mst@iota} {\mathalpha}{mteulervm}{"13} - \DeclareMathSymbol{\mst@kappa} {\mathalpha}{mteulervm}{"14} - \DeclareMathSymbol{\mst@lambda} {\mathalpha}{mteulervm}{"15} - \DeclareMathSymbol{\mst@mu} {\mathalpha}{mteulervm}{"16} - \DeclareMathSymbol{\mst@nu} {\mathalpha}{mteulervm}{"17} - \DeclareMathSymbol{\mst@xi} {\mathalpha}{mteulervm}{"18} - \DeclareMathSymbol{\mst@omicron}{\mathalpha}{mteulervm}{"6F} - \DeclareMathSymbol{\mst@pi} {\mathalpha}{mteulervm}{"19} - \DeclareMathSymbol{\mst@rho} {\mathalpha}{mteulervm}{"1A} - \DeclareMathSymbol{\mst@sigma} {\mathalpha}{mteulervm}{"1B} - \DeclareMathSymbol{\mst@tau} {\mathalpha}{mteulervm}{"1C} - \DeclareMathSymbol{\mst@upsilon}{\mathalpha}{mteulervm}{"1D} - \DeclareMathSymbol{\mst@phi} {\mathalpha}{mteulervm}{"1E} - \DeclareMathSymbol{\mst@chi} {\mathalpha}{mteulervm}{"1F} - \DeclareMathSymbol{\mst@psi} {\mathalpha}{mteulervm}{"20} - \DeclareMathSymbol{\mst@omega} {\mathalpha}{mteulervm}{"21} +% |v1.15c|: extending subdued to LGRgreek. % - \DeclareMathSymbol{\mst@varepsilon}{\mathalpha}{mteulervm}{"22} - \DeclareMathSymbol{\mst@vartheta}{\mathalpha}{mteulervm}{"23} - \DeclareMathSymbol{\mst@varpi} {\mathalpha}{mteulervm}{"24} - \let\mst@varrho=\mst@rho - \let\mst@varsigma=\mst@sigma - \DeclareMathSymbol{\mst@varphi} {\mathalpha}{mteulervm}{"27} +% |v1.15f|: subdueing math alphabets in a simpler way than in |1.15e|. % - \DeclareMathSymbol{\mst@partial}{\mathalpha}{mteulervm}{"40} - \DeclareMathSymbol{\mst@wp}{\mathalpha}{mteulervm}{"7D} - \DeclareMathSymbol{\mst@ell}{\mathalpha}{mteulervm}{"60} - \else - \ifmst@symbolgreek - \DeclareMathSymbol{\mst@alpha}{\mathord}{mtpsymbol}{"61} - \DeclareMathSymbol{\mst@beta}{\mathord}{mtpsymbol}{"62} - \DeclareMathSymbol{\mst@gamma}{\mathord}{mtpsymbol}{"67} - \DeclareMathSymbol{\mst@delta}{\mathord}{mtpsymbol}{"64} - \DeclareMathSymbol{\mst@epsilon}{\mathord}{mtpsymbol}{"65} - \DeclareMathSymbol{\mst@zeta}{\mathord}{mtpsymbol}{"7A} - \DeclareMathSymbol{\mst@eta}{\mathord}{mtpsymbol}{"68} - \DeclareMathSymbol{\mst@theta}{\mathord}{mtpsymbol}{"71} - \DeclareMathSymbol{\mst@iota}{\mathord}{mtpsymbol}{"69} - \DeclareMathSymbol{\mst@kappa}{\mathord}{mtpsymbol}{"6B} - \DeclareMathSymbol{\mst@lambda}{\mathord}{mtpsymbol}{"6C} - \DeclareMathSymbol{\mst@mu}{\mathord}{mtpsymbol}{"6D} - \DeclareMathSymbol{\mst@nu}{\mathord}{mtpsymbol}{"6E} - \DeclareMathSymbol{\mst@xi}{\mathord}{mtpsymbol}{"78} - \DeclareMathSymbol{\mst@omicron}{\mathord}{mtpsymbol}{"6F} - \DeclareMathSymbol{\mst@pi}{\mathord}{mtpsymbol}{"70} - \DeclareMathSymbol{\mst@rho}{\mathord}{mtpsymbol}{"72} - \DeclareMathSymbol{\mst@sigma}{\mathord}{mtpsymbol}{"73} - \DeclareMathSymbol{\mst@tau}{\mathord}{mtpsymbol}{"74} - \DeclareMathSymbol{\mst@upsilon}{\mathord}{mtpsymbol}{"75} - \DeclareMathSymbol{\mst@phi}{\mathord}{mtpsymbol}{"66} - \DeclareMathSymbol{\mst@chi}{\mathord}{mtpsymbol}{"63} - \DeclareMathSymbol{\mst@psi}{\mathord}{mtpsymbol}{"79} - \DeclareMathSymbol{\mst@omega}{\mathord}{mtpsymbol}{"77} - \let\mst@varepsilon=\mst@epsilon - \DeclareMathSymbol{\mst@vartheta}{\mathord}{mtpsymbol}{"4A} - \DeclareMathSymbol{\mst@varpi}{\mathord}{mtpsymbol}{"76} - \let\mst@varrho=\mst@rho - \DeclareMathSymbol{\mst@varsigma}{\mathord}{mtpsymbol}{"56} - \DeclareMathSymbol{\mst@varphi}{\mathord}{mtpsymbol}{"6A} - \DeclareMathSymbol{\mst@partial}{\mathord}{mtpsymbol}{"B6} - \DeclareMathSymbol{\mst@wp}{\mathord}{mtpsymbol}{"C3} - \fi - \fi -\fi -\ifmst@LGRgreek -% cf http://milde.users.sourceforge.net/LGR/lgrxenc.def.html -% et greek.ldf du package babel -\DeclareMathSymbol{\mst@Alpha}{\mathalpha}{mtlgrfontupper}{65} -\DeclareMathSymbol{\mst@Beta}{\mathalpha}{mtlgrfontupper}{66} -\DeclareMathSymbol{\mst@Epsilon}{\mathalpha}{mtlgrfontupper}{69} -\DeclareMathSymbol{\mst@Zeta}{\mathalpha}{mtlgrfontupper}{90} -\DeclareMathSymbol{\mst@Eta}{\mathalpha}{mtlgrfontupper}{72} -\DeclareMathSymbol{\mst@Iota}{\mathalpha}{mtlgrfontupper}{73} -\DeclareMathSymbol{\mst@Kappa}{\mathalpha}{mtlgrfontupper}{75} -\DeclareMathSymbol{\mst@Mu}{\mathalpha}{mtlgrfontupper}{77} -\DeclareMathSymbol{\mst@Nu}{\mathalpha}{mtlgrfontupper}{78} -\DeclareMathSymbol{\mst@Omicron}{\mathalpha}{mtlgrfontupper}{79} -\DeclareMathSymbol{\mst@Rho}{\mathalpha}{mtlgrfontupper}{82} -\DeclareMathSymbol{\mst@Tau}{\mathalpha}{mtlgrfontupper}{84} -\DeclareMathSymbol{\mst@Chi}{\mathalpha}{mtlgrfontupper}{81} +% |v1.2b|: subdueing the activation of characters in math mode. % -\DeclareMathSymbol{\mst@Digamma}{\mathalpha}{mtlgrfontlower}{195} +% |v1.2d|: special treatment of the asterisk. % -\DeclareMathSymbol{\mst@Gamma}{\mathalpha}{mtlgrfontupper}{71} -\DeclareMathSymbol{\mst@Delta}{\mathalpha}{mtlgrfontupper}{68} -\DeclareMathSymbol{\mst@Theta}{\mathalpha}{mtlgrfontupper}{74} -\DeclareMathSymbol{\mst@Lambda}{\mathalpha}{mtlgrfontupper}{76} -\DeclareMathSymbol{\mst@Xi}{\mathalpha}{mtlgrfontupper}{88} -\DeclareMathSymbol{\mst@Pi}{\mathalpha}{mtlgrfontupper}{80} -\DeclareMathSymbol{\mst@Sigma}{\mathalpha}{mtlgrfontupper}{83} -\DeclareMathSymbol{\mst@Upsilon}{\mathalpha}{mtlgrfontupper}{85} -\DeclareMathSymbol{\mst@Phi}{\mathalpha}{mtlgrfontupper}{70} -\DeclareMathSymbol{\mst@Psi}{\mathalpha}{mtlgrfontupper}{89} -\DeclareMathSymbol{\mst@Omega}{\mathalpha}{mtlgrfontupper}{87} +% |v1.3d|: extended LGRgreek mechanism of activation/restoration of Greek to all +% cases. % -\DeclareMathSymbol{\mst@alpha}{\mathalpha}{mtlgrfontlower}{97} -\DeclareMathSymbol{\mst@beta}{\mathalpha}{mtlgrfontlower}{98} -\DeclareMathSymbol{\mst@gamma}{\mathalpha}{mtlgrfontlower}{103} -\DeclareMathSymbol{\mst@delta}{\mathalpha}{mtlgrfontlower}{100} -\DeclareMathSymbol{\mst@epsilon}{\mathalpha}{mtlgrfontlower}{101} -\DeclareMathSymbol{\mst@zeta}{\mathalpha}{mtlgrfontlower}{122} -\DeclareMathSymbol{\mst@eta}{\mathalpha}{mtlgrfontlower}{104} -\DeclareMathSymbol{\mst@theta}{\mathalpha}{mtlgrfontlower}{106} -\DeclareMathSymbol{\mst@iota}{\mathalpha}{mtlgrfontlower}{105} -\DeclareMathSymbol{\mst@kappa}{\mathalpha}{mtlgrfontlower}{107} -\DeclareMathSymbol{\mst@lambda}{\mathalpha}{mtlgrfontlower}{108} -\DeclareMathSymbol{\mst@mu}{\mathalpha}{mtlgrfontlower}{109} -\DeclareMathSymbol{\mst@nu}{\mathalpha}{mtlgrfontlower}{110} -\DeclareMathSymbol{\mst@xi}{\mathalpha}{mtlgrfontlower}{120} -\DeclareMathSymbol{\mst@omicron}{\mathalpha}{mtlgrfontlower}{111} -\DeclareMathSymbol{\mst@pi}{\mathalpha}{mtlgrfontlower}{112} -\DeclareMathSymbol{\mst@rho}{\mathalpha}{mtlgrfontlower}{114} -\DeclareMathSymbol{\mst@sigma}{\mathalpha}{mtlgrfontlower}{115} -\DeclareMathSymbol{\mst@tau}{\mathalpha}{mtlgrfontlower}{116} -\DeclareMathSymbol{\mst@upsilon}{\mathalpha}{mtlgrfontlower}{117} -\DeclareMathSymbol{\mst@phi}{\mathalpha}{mtlgrfontlower}{102} -\DeclareMathSymbol{\mst@chi}{\mathalpha}{mtlgrfontlower}{113} -\DeclareMathSymbol{\mst@psi}{\mathalpha}{mtlgrfontlower}{121} -\DeclareMathSymbol{\mst@omega}{\mathalpha}{mtlgrfontlower}{119} +% |v1.3j|: use of \cs{MTeverymathdefault}, which includes \cs{MTicinmath}, but +% must be corrected then according to shape of letters and presence or absence +% of option |frenchmath|. We do only |\def\mst@ITcorr{\ifnum\fam=\m@ne\/\fi}| +% and not \cs{MTICinmath} to not overwrite some user-defined +% \cs{MTeverymathdefault}. Code for italic corrections or not according to +% letter shape is executed after \cs{MTeverymathdefault} which limits a bit +% user customizing possibilities, but if I moved it later, I would possibly +% have to put inside the \cs{MTicinmath} the check for |it| ot |sl|. Similary +% the \cs{MTcustomgreek} always executed (if not |subdued|). +% \begin{macrocode} + \MTmathoperatorsobeymathxx + \MTeverymathdefault + \MTcustomizenewmcodes + \@for\mst@tmpc:=it,sl\do{\ifx\mst@tmpc\mst@tmpa\MTnoicinmath\fi}% + \ifmst@frenchmath + \def\mst@ITcorr{\ifnum\fam=\m@ne\/\fi}% + \@for\mst@tmpc:=it,sl\do{\ifx\mst@tmpc\mst@tmpb\MTnoICinmath\fi}% + \fi +% \end{macrocode} +% |1.3j| has a stronger subdued which does \cs{MTnormalprime}, +% \cs{MTnormalexists}, \cs{MTnormalforall} rather than simply setting the +% skips to |0mu|. Note: \cs{MTnormalprime} is done as part of +% \cs{MTeverymathoff}. +% \begin{macrocode} + \ifmst@subdued + \def\mst@tmpa{normal}% + \ifx\math@version\mst@tmpa + \mst@restorealphabets + \MTstandardgreek + \MTmathoperatorsdonotobeymathxx + \MTnormalexists + \MTnormalforall + \MTeverymathoff + \MTresetnewmcodes +% \end{macrocode} +% |1.3t| adds better compatibility with |subdued| mode for +% |\imath/\jmath| and perfect compatibility for the minus sign. % -\DeclareMathSymbol{\mst@digamma}{\mathalpha}{mtlgrfontlower}{147} -% only varsigma defined (I should check this again) -\DeclareMathSymbol{\mst@varsigma}{\mathalpha}{mtlgrfontlower}{99} -\fi +% |1.3u| extends this further to allow per-math-version meanings +% for them. +% \begin{macrocode} + \mst@subduedhbar + \mst@subduedinodot + \mst@subduedmathaccents + \mst@subduedminus + \else + \def\mst@tmpa{bold}% + \ifx\math@version\mst@tmpa + \mst@restorealphabets + \MTstandardgreek + \MTmathoperatorsdonotobeymathxx + \MTnormalexists + \MTnormalforall + \MTeverymathoff + \MTresetnewmcodes + \mst@subduedhbar + \mst@subduedinodot + \mst@subduedmathaccents + \mst@subduedminus + \else + \mst@setalphabets + \MTcustomgreek + \mst@nonsubduedhbar + \mst@nonsubduedinodot + \mst@nonsubduedmathaccents + \mst@nonsubduedminus + \fi + \fi + \else + \MTcustomgreek % new with 1.3d + \mst@nonsubduedhbar + \mst@nonsubduedinodot + \mst@nonsubduedmathaccents + \mst@nonsubduedminus + \fi +}% \MTversion@@ +\let\MathastextVersion\MTversion +\let\Mathastextversion\MTversion +\let\MTVersion\MTversion +\let\mathastextversion\MTversion +% \end{macrocode} +% \end{macro}\end{macro}\end{macro}\end{macro} +% \begin{macro}{\MTWillUse} +% This is a preamble-only command, which can be used more than once, only the +% latest one counts. Sets up the math fonts in the normal and bold +% versions, as does \cs{Mathastext}. +% \begin{macrocode} +\newcommand*\MTWillUse[5][]{ + \MTencoding{#2} + \MTfamily{#3} + \MTseries{#4} + \MTshape{#5} + \ifmst@italic\MTlettershape{\itdefault}\fi % was missing in v 1.14 and prior + \edef\mst@tmp{#1} + \ifx\mst@tmp\empty\else\MTlettershape{#1}\fi + \Mathastext} +\let\MathastextWillUse\MTWillUse +\let\Mathastextwilluse\MTWillUse % \end{macrocode} % \end{macro} -% \begin{macro}{\MTstandardgreek} -% \begin{macro}{\MTcustomgreek} -% \begin{macro}{\MTrecordstandardgreek} -% |1.3d 2014/05/23| defines the commands |\MTstandardgreek| and -% |\MTcustomgreek| for package and user. I leave |\MTrecordstandardgreek| -% undocumented as I don't want to encourage people to load math packages -% after \mst. +% \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. % -% |1.3h 2015/10/31|: corrected |\MTcustomgreek| as it caused |\ell| to -% become undefined under option |symbolgreek| and, much more catastrophic, -% caused |\alpha|, etc.. to become undefined under option |selfGreek| ! +% 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. +% +% Versions |1.15x| brought some adaptations related to the subdued +% option. +% +% |1.3c| adds a second optional parameter to inherit previous settings +% from another version; mostly done to inherit the bold version fonts for +% symbols and large symbols. This is done in |\MTDeclareVersion|. +% +% |1.3j| moves the code related to \cs{MTicinmath} from \cs{Mathastext@} to +% \cs{AtBeginDocument} (code depending on whether |subdued| option in use). +% But we omit for this from \cs{MTicinmath} the \cs{MTmathactiveletters} +% and issue the latter during loading of package, hence allowing +% \cs{MTmathstandardletters} to be effective in the preamble. +% +% I forgot to document that under |subdued| option the \cs{Mathastext} +% command without optional parameter does not any |\SetSymbolFont| etc... +% but it has a few other tasks to complete nevertheless. +% +% |1.3u| fixes some long-standing bug that \cs{Mathastext} did not repeat some +% font-encoding dependent things: they got done only once during package +% loading (things regarding the \cs{hbar}, \cs{imath}, the math accents and +% the minus sign). They are now part of the contents of \cs{Mathastext} macro +% itself (which is executed during package loading). % \begin{macrocode} -\newcommand*{\MTstandardgreek}{} -\newcommand*{\MTcustomgreek}{} -\newcommand*{\MTrecordstandardgreek}{} -\ifmst@customgreek - \renewcommand*{\MTrecordstandardgreek}{% - \let\mst@origAlpha\Alpha - \let\mst@origBeta\Beta - \let\mst@origGamma\Gamma - \let\mst@origDelta\Delta - \let\mst@origEpsilon\Epsilon - \let\mst@origZeta\Zeta - \let\mst@origEta\Eta - \let\mst@origTheta\Theta - \let\mst@origIota\Iota - \let\mst@origKappa\Kappa - \let\mst@origLambda\Lambda - \let\mst@origMu\Mu - \let\mst@origNu\Nu - \let\mst@origXi\Xi - \let\mst@origOmicron\Omicron - \let\mst@origPi\Pi - \let\mst@origRho\Rho - \let\mst@origSigma\Sigma - \let\mst@origTau\Tau - \let\mst@origUpsilon\Upsilon - \let\mst@origPhi\Phi - \let\mst@origChi\Chi - \let\mst@origPsi\Psi - \let\mst@origOmega\Omega -% - \let\mst@origalpha\alpha - \let\mst@origbeta\beta - \let\mst@origgamma\gamma - \let\mst@origdelta\delta - \let\mst@origepsilon\epsilon - \let\mst@origvarepsilon\varepsilon - \let\mst@origzeta\zeta - \let\mst@origeta\eta - \let\mst@origtheta\theta - \let\mst@origvartheta\vartheta - \let\mst@origiota\iota - \let\mst@origkappa\kappa - \let\mst@origlambda\lambda - \let\mst@origmu\mu - \let\mst@orignu\nu - \let\mst@origxi\xi - \let\mst@origomicron\omicron - \let\mst@origpi\pi - \let\mst@origvarpi\varpi - \let\mst@origrho\rho - \let\mst@origvarrho\varrho - \let\mst@origsigma\sigma - \let\mst@origvarsigma\varsigma - \let\mst@origtau\tau - \let\mst@origupsilon\upsilon - \let\mst@origphi\phi - \let\mst@origvarphi\varphi - \let\mst@origchi\chi - \let\mst@origpsi\psi - \let\mst@origomega\omega - \let\mst@origDigamma\Digamma - \let\mst@origdigamma\digamma -% - \let\mst@origpartial\partial - \let\mst@origwp\wp - \let\mst@origell\ell } -\MTrecordstandardgreek -\renewcommand*{\MTstandardgreek}{% - \let\Alpha\mst@origAlpha - \let\Beta\mst@origBeta - \let\Gamma\mst@origGamma - \let\Delta\mst@origDelta - \let\Epsilon\mst@origEpsilon - \let\Zeta\mst@origZeta - \let\Eta\mst@origEta - \let\Theta\mst@origTheta - \let\Iota\mst@origIota - \let\Kappa\mst@origKappa - \let\Lambda\mst@origLambda - \let\Mu\mst@origMu - \let\Nu\mst@origNu - \let\Xi\mst@origXi - \let\Omicron\mst@origOmicron - \let\Pi\mst@origPi - \let\Rho\mst@origRho - \let\Sigma\mst@origSigma - \let\Tau\mst@origTau - \let\Upsilon\mst@origUpsilon - \let\Phi\mst@origPhi - \let\Chi\mst@origChi - \let\Psi\mst@origPsi - \let\Omega\mst@origOmega -% - \let\alpha\mst@origalpha - \let\beta\mst@origbeta - \let\gamma\mst@origgamma - \let\delta\mst@origdelta - \let\epsilon\mst@origepsilon - \let\varepsilon\mst@origvarepsilon - \let\zeta\mst@origzeta - \let\eta\mst@origeta - \let\theta\mst@origtheta - \let\vartheta\mst@origvartheta - \let\iota\mst@origiota - \let\kappa\mst@origkappa - \let\lambda\mst@origlambda - \let\mu\mst@origmu - \let\nu\mst@orignu - \let\xi\mst@origxi - \let\omicron\mst@origomicron - \let\pi\mst@origpi - \let\varpi\mst@origvarpi - \let\rho\mst@origrho - \let\varrho\mst@origvarrho - \let\sigma\mst@origsigma - \let\varsigma\mst@origvarsigma - \let\tau\mst@origtau - \let\upsilon\mst@origupsilon - \let\phi\mst@origphi - \let\varphi\mst@origvarphi - \let\chi\mst@origchi - \let\psi\mst@origpsi - \let\omega\mst@origomega - \let\Digamma\mst@origDigamma - \let\digamma\mst@origdigamma -% - \let\partial\mst@origpartial - \let\wp\mst@origwp - \let\ell\mst@origell -} -\renewcommand*{\MTcustomgreek}{% - \let\Alpha\mst@Alpha - \let\Beta\mst@Beta - \let\Epsilon\mst@Epsilon - \let\Zeta\mst@Zeta - \let\Eta\mst@Eta - \let\Iota\mst@Iota - \let\Kappa\mst@Kappa - \let\Mu\mst@Mu - \let\Nu\mst@Nu - \let\Omicron\mst@Omicron - \let\Rho\mst@Rho - \let\Tau\mst@Tau - \let\Chi\mst@Chi -% 1.3h: \mst@Digamma not defined if symbolgreek option - \ifmst@symbolgreek\else\let\Digamma\mst@Digamma\fi -% - \let\Gamma\mst@Gamma - \let\Delta\mst@Delta - \let\Theta\mst@Theta - \let\Lambda\mst@Lambda - \let\Xi\mst@Xi - \let\Pi\mst@Pi - \let\Sigma\mst@Sigma - \let\Upsilon\mst@Upsilon - \let\Phi\mst@Phi - \let\Psi\mst@Psi - \let\Omega\mst@Omega +\def\Mathastext {\@ifnextchar [\Mathastext@declare\Mathastext@ } +\def\Mathastext@declare [#1]{% + \edef\mst@tmp{#1}% + \ifx\mst@tmp\empty + \expandafter\@firstoftwo + \else\expandafter\@secondoftwo + \fi + \Mathastext@ + {\MTDeclareVersion[\mst@ltsh]{#1}{\mst@enc}{\mst@fam}{\mst@ser}{\mst@opsh}}% +}% \Mathastext@declare +\def\Mathastext@ {% + \mst@update@greeksh + \edef\mst@encoding@normal{\mst@enc}% + \edef\mst@family@normal{\mst@fam}% + \edef\mst@series@normal{\mst@ser}% + \edef\mst@shape@normal{\mst@opsh}% + \edef\mst@ltshape@normal{\mst@ltsh}% + \edef\mst@itdefault@normal{\itdefault}% + \edef\mst@rmdefault@normal{\rmdefault}% + \edef\mst@sfdefault@normal{\sfdefault}% + \edef\mst@ttdefault@normal{\ttdefault}% + \edef\mst@boldvariant@normal{\mst@bold}% + \edef\mst@exists@skip@normal{\mst@exists@skip}% + \edef\mst@forall@skip@normal{\mst@forall@skip}% + \edef\mst@prime@skip@normal{\mst@prime@skip}% + \edef\mst@encoding@bold{\mst@enc}% + \edef\mst@family@bold{\mst@fam}% + \edef\mst@series@bold{\mst@bold}% + \edef\mst@shape@bold{\mst@opsh}% + \edef\mst@ltshape@bold{\mst@ltsh}% + \edef\mst@boldvariant@bold{\mst@bold}% + \edef\mst@itdefault@bold{\itdefault}% + \edef\mst@rmdefault@bold{\rmdefault}% + \edef\mst@sfdefault@bold{\sfdefault}% + \edef\mst@ttdefault@bold{\ttdefault}% + \edef\mst@exists@skip@bold{\mst@exists@skip}% + \edef\mst@forall@skip@bold{\mst@forall@skip}% + \edef\mst@prime@skip@bold{\mst@prime@skip}% + \ifmst@subdued % \end{macrocode} -% |1.3h 2015/10/31| adds this conditional to correct the bad bug in -% |1.3d 2014/05/23| which caused |\alpha| etc... to become undefined -% under option |selfGreek|. +% Since |1.3j| this branch is actually almost superfluous, as entering +% |normal| or |bold| with \cs{MTversion} does \cs{MTnormalexists}, +% \cs{MTnormalforall}, and \cs{MTnormalprime}. But some default values are +% needed if the user insists on issuing \cs{MTexistsdoesskip}, etc... +% nevertheless. % \begin{macrocode} - \ifmst@selfGreek\else - \let\alpha\mst@alpha - \let\beta\mst@beta - \let\gamma\mst@gamma - \let\delta\mst@delta - \let\epsilon\mst@epsilon - \let\zeta\mst@zeta - \let\eta\mst@eta - \let\theta\mst@theta - \let\iota\mst@iota - \let\kappa\mst@kappa - \let\lambda\mst@lambda - \let\mu\mst@mu - \let\nu\mst@nu - \let\xi\mst@xi - \let\omicron\mst@omicron - \let\pi\mst@pi - \let\rho\mst@rho - \let\sigma\mst@sigma - \let\tau\mst@tau - \let\upsilon\mst@upsilon - \let\phi\mst@phi - \let\chi\mst@chi - \let\psi\mst@psi - \let\omega\mst@omega -% 1.3h: digamma only defined with option LGRgreek: - \ifmst@LGRgreek\let\digamma\mst@digamma\fi -% - \let\varsigma\mst@varsigma -% conditional added 1.3h 2015/10/31 - \ifmst@LGRgreek\else - \let\varepsilon\mst@varepsilon - \let\vartheta\mst@vartheta - \let\varpi\mst@varpi - \let\varrho\mst@varrho - \let\varphi\mst@varphi -% - \let\partial\mst@partial - \let\wp\mst@wp -% 1.3h: no \mst@ell if symbolgreek (bugfix 1.3h 2015/10/31) - \ifmst@symbolgreek\else\let\ell\mst@ell\fi + \def\mst@exists@skip@normal{0mu}% + \def\mst@forall@skip@normal{0mu}% + \def\mst@prime@skip@normal{0mu}% + \def\mst@exists@skip@bold{0mu}% + \def\mst@forall@skip@bold{0mu}% + \def\mst@prime@skip@bold{0mu}% + \else % not subdued + \ifmst@italic + \ifmst@frenchmath + \mst@exists@muskip\mst@exists@skip\relax + \mst@forall@muskip\mst@forall@skip\relax + \mst@prime@muskip\mst@prime@skip\relax + \else + \def\mst@exists@skip@normal{0mu}% + \def\mst@forall@skip@normal{0mu}% + \def\mst@prime@skip@normal{0mu}% + \def\mst@exists@skip@bold{0mu}% + \def\mst@forall@skip@bold{0mu}% + \def\mst@prime@skip@bold{0mu}% + \fi + \else + \mst@exists@muskip\mst@exists@skip\relax + \mst@forall@muskip\mst@forall@skip\relax + \mst@prime@muskip\mst@prime@skip\relax \fi - \fi -} -\fi -\let\Mathastextstandardgreek\MTstandardgreek -\let\Mathastextcustomgreek\MTcustomgreek -\ifmst@subdued\else\MTcustomgreek\fi + \fi +%% v1.15f + \ifmst@nonormalbold\else + \SetMathAlphabet{\mathnormalbold}{normal}{\mst@encoding@normal}% + {\mst@family@normal}% + {\mst@boldvariant@normal}% + {\mst@ltshape@normal}% + \SetMathAlphabet{\mathnormalbold}{bold}{\mst@encoding@bold}% + {\mst@family@bold}% + {\mst@boldvariant@bold}% + {\mst@ltshape@bold}% + \fi +%% v1.15f adds \ifmst@default.. checks + \ifmst@subdued\else + \SetSymbolFont{mtletterfont}{normal}{\mst@encoding@normal}% + {\mst@family@normal}% + {\mst@series@normal}% + {\mst@ltshape@normal}% + \SetSymbolFont{mtletterfont}{bold} {\mst@encoding@bold}% + {\mst@family@bold}% + {\mst@series@bold}% + {\mst@ltshape@bold}% + \SetSymbolFont{mtoperatorfont}{normal}{\mst@encoding@normal}% + {\mst@family@normal}% + {\mst@series@normal}% + {\mst@shape@normal}% + \SetSymbolFont{mtoperatorfont}{bold} {\mst@encoding@bold}% + {\mst@family@bold}% + {\mst@series@bold}% + {\mst@shape@bold}% + \ifmst@defaultbf\else + \SetMathAlphabet{\Mathbf}{normal}{\mst@encoding@normal}% + {\mst@family@normal}% + {\mst@series@bold}% + {\mst@shape@normal}% + \SetMathAlphabet{\Mathbf}{bold}{\mst@encoding@bold}% + {\mst@family@bold}% + {\mst@series@bold}% + {\mst@shape@bold}% + \fi + \ifmst@defaultit\else + \SetMathAlphabet{\Mathit}{normal}{\mst@encoding@normal}% + {\mst@family@normal}% + {\mst@series@normal}% + {\mst@itdefault@normal}% + \SetMathAlphabet{\Mathit}{bold}{\mst@encoding@bold}% + {\mst@family@bold}% + {\mst@series@bold}% + {\mst@itdefault@bold}% + \fi + \ifmst@defaultsf\else + \SetMathAlphabet{\Mathsf}{normal}{\mst@encoding@normal}% + {\mst@sfdefault@normal}% + {\mst@series@normal}% + {\mst@shape@normal}% + \SetMathAlphabet{\Mathsf}{bold}{\mst@encoding@bold}% + {\mst@sfdefault@bold}% + {\mst@series@bold}% + {\mst@shape@bold}% + \fi + \ifmst@defaulttt\else + \SetMathAlphabet{\Mathtt}{normal}{\mst@encoding@normal}% + {\mst@ttdefault@normal}% + {\mst@series@normal}% + {\mst@shape@normal}% + \SetMathAlphabet{\Mathtt}{bold}{\mst@encoding@bold}% + {\mst@ttdefault@bold}% + {\mst@series@bold}% + {\mst@shape@bold}% + \fi + \fi % de \ifmst@subdued % \end{macrocode} -% \end{macro}\end{macro}\end{macro} -% \begin{macro}{\inodot} -% \begin{macro}{\jnodot} -% In |1.0|, I had them of type |mathord|, here I choose |mathalpha|. If I -% 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. -% -% |1.14b| |2011/04/02|: again this bug in the EU1/EU2 encoding part, as in the -% code redefining \$ etc in math mode (see above). Fixed. -% -% |1.3l| |2016/01/29|: anticipating TL2016 fontspec's switch to |TU|. -% -% |1.3t| |2018/08/22| removes the definitions done of |\i| and |\j| -% since |1.12| (as robust commands usable both in text and math mode). +% \begin{macro}{\MathEulerBold} +% |1.14c|: We reset |mteulervm| and \cs{MathEulerBold} here as the +% variant for bold may have been changed by the user via +% \cs{Mathastextboldvariant}|{m}|; and we should keep this local to +% math versions. +% \begin{macrocode} + \ifmst@needeuler + \SetSymbolFont{mteulervm}{bold}{U}{zeur}{\mst@boldvariant@normal}{n}% + \SetMathAlphabet{\MathEulerBold}{normal}% + {U}{zeur}{\mst@boldvariant@normal}{n}% + \SetMathAlphabet{\MathEulerBold}{bold}% + {U}{zeur}{\mst@boldvariant@normal}{n}% + \fi +% \end{macrocode} +% \end{macro} % \begin{macrocode} -\edef\mst@tmp@enc{\encodingdefault} -\mst@goaheadtrue -\if1\mst@OneifUniEnc - % Unicode engine and font - \mst@Umathchardef\inodot="7 \symmtletterfont "0131 \relax - \mst@Umathchardef\jnodot="7 \symmtletterfont "0237 \relax -\else -\ifx\mst@tmp@enc\mst@ti % T1 - \DeclareMathSymbol{\inodot}{\mathalpha}{mtletterfont}{25} - \DeclareMathSymbol{\jnodot}{\mathalpha}{mtletterfont}{26} -\else -\ifx\mst@tmp@enc\mst@oti % OT1 - \DeclareMathSymbol{\inodot}{\mathalpha}{mtletterfont}{16} - \DeclareMathSymbol{\jnodot}{\mathalpha}{mtletterfont}{17} -\else -\ifx\mst@tmp@enc\mst@lyi % LY1 - \DeclareMathSymbol{\inodot}{\mathalpha}{mtletterfont}{16} - \DeclareMathSymbol{\jnodot}{\mathalpha}{mtletterfont}{17} -\else - \ifmst@XeOrLua\mst@goaheadfalse\else - \DeclareMathSymbol{\inodot}{\mathalpha}{mtletterfont} -{\expandafter\the\expandafter\csname\mst@tmp@enc\string\i\endcsname} - \DeclareMathSymbol{\jnodot}{\mathalpha}{mtletterfont} -{\expandafter\the\expandafter\csname\mst@tmp@enc\string\j\endcsname} + \ifmst@needsymbol\SetSymbolFont{mtpsymbol}{bold}% + {U}{psy}{\mst@boldvariant@normal}{n}% + \fi +% \end{macrocode} +% \begin{macro}{LGRgreek*} +% \begin{macro}{selfGreek*} +% LGRgreek, LGRgreeks, selfGreek, and selfGreeks options. +% \begin{macrocode} + \ifmst@subdued\else + \ifmst@LGRgreek + \SetSymbolFont{mtlgrfontlower}{normal}{LGR}% + {\mst@greekfont}{\mst@series@normal}{\mst@greek@lsh}% + \SetSymbolFont{mtlgrfontlower}{bold}{LGR}% + {\mst@greekfont}{\mst@boldvariant@normal}{\mst@greek@lsh}% + \SetSymbolFont{mtlgrfontupper}{normal}{LGR}% + {\mst@greekfont}{\mst@series@normal}{\mst@greek@ush}% + \SetSymbolFont{mtlgrfontupper}{bold}{LGR}% + {\mst@greekfont}{\mst@boldvariant@bold}{\mst@greek@ush}% + \else + \ifmst@selfGreek + \SetSymbolFont{mtselfGreekfont}{normal}{OT1}% + {\mst@greekfont}{\mst@series@normal}{\mst@greek@ush}% + \SetSymbolFont{mtselfGreekfont}{bold}{OT1}% + {\mst@greekfont}{\mst@boldvariant@bold}{\mst@greek@ush}% + \fi \fi -\fi\fi\fi\fi -\let\mst@inodot\inodot -\let\mst@jnodot\jnodot -\ifmst@defaultimath\else\typeout{** \string\imath\space and \string\jmath\space} - \ifmst@goahead - \AtEndOfPackage{\AtBeginDocument{% - \renewcommand*{\imath}{\inodot}% - \renewcommand*{\jmath}{\jnodot}% - }}% \fi -\fi % \end{macrocode} % \end{macro} % \end{macro} -% \begin{macro}{math accents} -% I don't know how to get from the encoding to the slot -% positions of the accents (apart from going to look at -% all possible encodings definition files and putting this -% info here). In standard \LaTeX{}, the mathaccents are -% taken from the `operators' font. So we do the same -% here. Of course there is the problem that the user can -% define math versions with different encodings. Here I -% take T1 if it was the default at the time of loading the -% package, else OT1. -% |1.12b|: I add LY1 which is quasi like OT1 % \begin{macrocode} -\edef\mst@tmp@enc{\encodingdefault} %% rather one too many than sorry -\ifmst@mathaccents\typeout{** math accents} -\ifx\mst@ti\mst@tmp@enc -\DeclareMathAccent{\acute}{\mathalpha}{mtoperatorfont}{1} -\DeclareMathAccent{\grave}{\mathalpha}{mtoperatorfont}{0} -\DeclareMathAccent{\ddot}{\mathalpha}{mtoperatorfont}{4} -\DeclareMathAccent{\tilde}{\mathalpha}{mtoperatorfont}{3} -\DeclareMathAccent{\bar}{\mathalpha}{mtoperatorfont}{9} -\DeclareMathAccent{\breve}{\mathalpha}{mtoperatorfont}{8} -\DeclareMathAccent{\check}{\mathalpha}{mtoperatorfont}{7} -\DeclareMathAccent{\hat}{\mathalpha}{mtoperatorfont}{2} -\DeclareMathAccent{\dot}{\mathalpha}{mtoperatorfont}{10} -\DeclareMathAccent{\mathring}{\mathalpha}{mtoperatorfont}{6} -\else -\DeclareMathAccent{\acute}{\mathalpha}{mtoperatorfont}{19} -\DeclareMathAccent{\grave}{\mathalpha}{mtoperatorfont}{18} -\DeclareMathAccent{\ddot}{\mathalpha}{mtoperatorfont}{127} -\DeclareMathAccent{\tilde}{\mathalpha}{mtoperatorfont}{126} -\DeclareMathAccent{\bar}{\mathalpha}{mtoperatorfont}{22} -\DeclareMathAccent{\breve}{\mathalpha}{mtoperatorfont}{21} -\DeclareMathAccent{\check}{\mathalpha}{mtoperatorfont}{20} -\DeclareMathAccent{\hat}{\mathalpha}{mtoperatorfont}{94} -\DeclareMathAccent{\dot}{\mathalpha}{mtoperatorfont}{95} -\DeclareMathAccent{\mathring}{\mathalpha}{mtoperatorfont}{23} - \ifx\mst@lyi\mst@tmp@enc % LY1 encoding - \DeclareMathAccent{\dot}{\mathalpha}{mtoperatorfont}{5} - \else - \ifx\mst@oti\mst@tmp@enc\else - \typeout{** mathastext: math accents have been assumed to be^^J% - ** as in OT1 encoding.} - \fi + \ifmst@subdued + \typeout{** subdued mode will be activated for the normal and bold math versions}% + \else + \typeout{** Latin letters in the normal (resp. bold) math versions are now^^J% + ** set up to use the fonts + \mst@encoding@normal/\mst@family@normal/\mst@series@normal% + (\mst@boldvariant@normal)/\mst@ltshape@normal}% + \ifmst@LGRgreek\typeout{** Greek letters (\mst@greek@lsh/\mst@greek@ush) + will use LGR/\mst@greekfont}% \fi -\fi\fi + \ifmst@nodigits\else + \typeout{** Other characters (digits, ...) and \protect\log-like names will be^^J% + ** typeset with the \mst@shape@normal\space shape.}% + \fi + \fi + \ifmst@nohbar\else + \typeout{** \string\hbar}% + \mst@dothe@hbarstuff + \mst@hbar@mvnormal\mst@ltbar@mvnormal\mst@encoding@normal + \let\mst@hbar@mvbold\mst@hbar@mvnormal + \fi + \mst@dothe@inodotstuff\inodot\jnodot\mst@encoding@normal + \let\mst@inodot@mvnormal\inodot + \let\mst@inodot@mvbold\inodot + \let\mst@jnodot@mvnormal\jnodot + \let\mst@jnodot@mvbold\jnodot + \ifmst@mathaccents + \typeout{** math accents}% + \mst@dothe@mathaccentsstuff{normal}\mst@encoding@normal + \fi + \ifmst@nominus\else + \typeout{** minus as endash}% + \ifmst@endash + \mst@dothe@endashstuff\mst@minus@mvnormal\mst@varfam@minus@mvnormal + \mst@encoding@normal + \mst@dothe@endashstuff\mst@minus@mvbold\mst@varfam@minus@mvbold + \mst@encoding@normal + \else + \ifmst@emdash + \mst@dothe@emdashstuff\mst@minus@mvnormal\mst@varfam@minus@mvnormal + \mst@encoding@normal + \mst@dothe@emdashstuff\mst@minus@mvbold\mst@varfam@minus@mvbold + \mst@encoding@normal + \else + \mst@dothe@hyphenstuff\mst@minus@mvnormal\mst@varfam@minus@mvnormal + \let\mst@minus@mvbold\mst@minus@mvnormal + \let\mst@varfam@minus@mvbold\mst@varfam@minus@mvnormal + \fi + \fi + \fi +}% \Mathastext@ +\let\mathastext\Mathastext +\Mathastext % \end{macrocode} % \end{macro} +% Additional appropriate messages to the terminal and the log. +% \begin{macrocode} +\ifmst@eulergreek + \typeout{** Greek letters will use the Euler font. Use \protect\MathastextEulerScale{} to scale the + font.}% + \ifmst@subdued{\typeout{** (subdued mode: normal and bold math + version with default Greek letters.)}}\fi +\else +\ifmst@symbolgreek + \typeout{** Greek letters will use the PostScript Symbol font. Use^^J% + ** \protect\MathastextSymbolScale{} to scale the font.}% + \ifmst@subdued{\typeout{** (subdued mode: normal and bold math + version with default Greek letters.)}}\fi +\fi\fi +% \end{macrocode} % \begin{macro}{Math sizes} % I took the code for \cs{Huge} and \cs{HUGE} from the |moresize| package of % Christian~\textsc{Cornelssen} @@ -7938,6 +7994,258 @@ defaultbf,defaultit,defaultsf,defaulttt}\mst@nonormalboldtrue} \MTicinmath \MTfixfonts }% +% \end{macrocode} +% \end{macro} +% \let\temp~ +% \def~{\rlap} +% \begin{macro}{Things to do last ~{``at begin document''}} +% \let~\temp +% \begin{macrocode} +\AtBeginDocument{% + \everymath\expandafter{\the\everymath + \mst@the\mst@do@nonletters \let\mst@the\@gobble + \mst@theeasy\mst@do@easynonletters \let\mst@theeasy\@gobble + \mst@thef\mst@do@az \let\mst@thef\@gobble + \mst@theF\mst@do@AZ \let\mst@theF\@gobble}% + \everydisplay\expandafter{\the\everydisplay + \mst@the\mst@do@nonletters \let\mst@the\@gobble + \mst@theeasy\mst@do@easynonletters \let\mst@theeasy\@gobble + \mst@thef\mst@do@az \let\mst@thef\@gobble + \mst@theF\mst@do@AZ \let\mst@theF\@gobble}% +% \end{macrocode} +% |1.3j|: moved here to be executed at begin document (and not from inside +% \cs{Mathastext@}.) The \cs{MTeverymathoff} does: \cs{MTnormalasterisk}, +% \cs{MTnormalprime}, \cs{MTnonlettersdonotobeymathxx}, +% \cs{MTeasynonlettersdonotobeymathxx}, \cs{MTmathstandardletters}. +% +% |1.3m|: doing \cs{MTmathactiveletters} in subdued mode immediately after +% |\begin{document}| resulted in errors because \cs{mst@itcorr} had been left +% undefined. We thus add \cs{MTnoicinmath} to the subdued initialization. +% +% Since |1.3n| there is \cs{MTresetnewmcodes} which needs +% \cs{mst@originalnewmcodes@}, itself defined at begin document. Thus we have +% wrapped the whole thing in \cs{AtEndOfPackage} (at |1.3u| whole code +% directly moved at end of package). +% +% And |1.3p| adds here \cs{MTcustomizenewmcodes} which had been regrettably +% forgotten by |1.3n|. +% +% |1.3t| adds some extras to handle correctly the minus sign and +% dotless i and j in subdued mode, even in case of usage with fontspec. +% +% |1.3u| similarly lets math accents be correctly subdued. +% \begin{macrocode} + \MTcustomizenewmcodes + \let\mst@original@hbar\hbar + \let\mst@original@imath\imath + \let\mst@original@jmath\jmath + \@tfor\@tempa:={grave}{acute}{check}{breve}{bar}% + {dot}{ddot}{mathring}{hat}{tilde}% + \do + {\expandafter\let\csname mst@original@\@tempa\expandafter\endcsname + \csname \@tempa\endcsname}% + \ifmst@XeOrLua + \edef\mst@subduedminus + {\mst@Umathcodenum`\noexpand\-=\the\mst@Umathcodenum`\-\relax}% + \else + \edef\mst@subduedminus{\mathcode`\noexpand\-=\the\mathcode`\-\relax}% + \fi + \ifmst@subdued + \MTeverymathoff + \MTresetnewmcodes + \MTnoicinmath + \MTmathoperatorsdonotobeymathxx + %\mst@subduedhbar + \let\inodot\imath + \let\jnodot\jmath + %\mst@subduedmathaccents + \mst@subduedminus + \else + \mst@nonsubduedhbar + \mst@nonsubduedmathaccents + \mst@nonsubduedminus +% \end{macrocode} +% |1.3j|: an earlier version of this code was earlier part of \cs{Mathastext@}. +% As we are now in \cs{AtBeginDocument} we try to be careful not to overwrite +% \cs{MTicinmath}, \cs{MTnoicinmath}, \cs{MTicalsoinmathxx}, ... if issued by +% the user in the preamble, though. And we do not execute +% \cs{MTmathactiveletters}, it is issued by the package at loading time in +% order to allow user to cancel it if desired from inside the preamble. +% \begin{macrocode} + \ifx\mst@itcorr\@undefined + \def\mst@itcorr{\ifnum\fam=\m@ne\/\fi}% + \@for\mst@tmp:=it,sl\do + {\ifx\mst@tmp\mst@ltshape@normal\let\mst@itcorr\@empty\fi }% + \fi + \ifx\mst@ITcorr\@undefined + \let\mst@ITcorr\mst@itcorr + \ifmst@frenchmath + \def\mst@ITcorr{\ifnum\fam=\m@ne\/\fi}% + \@for\mst@tmp:=it,sl\do + {\ifx\mst@tmp\mst@shape@normal\let\mst@ITcorr\@empty\fi }% + \fi + \fi + \fi +}% \AtBeginDocument +% \end{macrocode} +% \end{macro} +% \begin{macro}{subdued} +% |1.15|: The subdued code was initiated in May 2011. I returned to +% |mathastext| on Sep 24, 2012, and decided to complete what I had started +% then, but in the mean time I had forgotten almost all of the little I knew +% about \LaTeX{} macro programming. +% +% The point was to extract the data about how are `letters' and +% `operators' in the normal and bold versions, through obtaining the +% math families of `a' and `1', respectively$^1$. Due to the +% reassignements done for characters by |mathastext| I also had +% decided in 2011 that the OT1 encoding, if detected, should be +% replaced by T1 ($(1)$: but the \emph{euler} package for example +% assigns the digits to the \emph{letters} symbol font...) +% +% |1.15d|: Oct 13, 2012. The \cs{mathcode} thing has to be used with care +% under Unicode engines. Unfortunately the \cs{luatexUmathcode} macro is +% helpless as it is not possible to know if it will return a legacy mathcode +% or a Unicode mathcode. On the other hand the much saner +% \cs{XeTeXmathcodenum} always return a Unicode mathcode. +% +% {UPDATE for \mst\ 1.3 (|2013/09/02|): since the release of lualatex as +% included in +% TL2013, \cs{luatexUmathcodenum} behaves as \cs{XeTeXmathcodenum} so \mst 1.3 +% treats identically under both unicode engines the equal and minus signs (and +% the vertical bar).} +% +% |1.15e|: Oct 22, 2012. I add the necessary things to also subdue the +% \cs{mathbf}, \cs{mathit}, \cs{mathsf} and \cs{mathtt} macros (previous +% version only took care of the symbol alphabets \cs{mathnormal} and +% \cs{mathrm}.) [update: |1.15f| does that in a completely different and much +% simpler way] Notice that the package defines a \cs{mathnormalbold} macro, +% but it will not be subdued in the normal and bold math versions. +% +% |1.15f|: Oct 23, 2012. The previous version of the code queried the math +% family of a, respectively 1, to guess and then extract the fonts to be +% reassigned to mtletterfont and mtoperatorfont (which is done at the end of +% this .sty file). The present code simply directly uses letters and operators +% (so mathastext could not subdue itself... if it was somehow cloned), but +% obtains indeed the corresponding font specifications in normal and bold in a +% cleaner manner. But it is so much shorter (and avoids the \LuaLaTeX{} +% problem with \cs{luatexUmathcode}). Anyhow, for example the euler package +% puts the digits in the letters math family! so the previous method was also +% error prone. In fact there is no way to do this subdued mechanism on the +% basis of the legacy code of mathastext. The only way is to rewrite entirely +% the package to query all mathcodes of things it changes in order to be able +% to revert these changes (and one would have to do even more hacking for +% |\mathversion{normal}| and not only |\MTversion{normal}| to work). +% +% |1.15f|: and also I take this opportunity to do the subdued math +% alphabets things in a much much easier way, see below. +% +% |1.3s 2018/08/21|: I have half-forgotten the reasons for modifiying the +% font encoding to current |\encodingdefault|, but at any rate this should +% not be done in a |fontspec| context, encoding default being (now) |TU| it +% is very unlikely modifying from |TU| or to |TU| from something else will +% do any good.^^A See +%^^A \centeredline{\url{https://tex.stackexchange.com/questions/444565/mathastext-wrong-digits-in-math-mode/}} +%^^A for original report. +% I add workaround here for case of |fontspec| being +% detected via the |\encodingdefault| setting. +% +% |1.3t 2018/08/22|: the |1.3s| fix erroneously removed the +% |OT1->T1| replacement in |TU| context. +% +% |1.3u|: the whole thing will only get executed At Begin Document. +% \begin{macrocode} +\ifmst@subdued +\AtBeginDocument{% + \def\mst@reserved#1\getanddefine@fonts\symletters#2#3\@nil{% + \def\mst@normalmv@letter{#2}}% + \expandafter\mst@reserved\mv@normal\@nil + \def\mst@reserved#1\getanddefine@fonts\symletters#2#3\@nil{% + \def\mst@boldmv@letter{#2}}% + \expandafter\mst@reserved\mv@bold\@nil + \def\mst@reserved#1\getanddefine@fonts\symoperators#2#3\@nil{% + \def\mst@normalmv@operator{#2}}% + \expandafter\mst@reserved\mv@normal\@nil + \def\mst@reserved#1\getanddefine@fonts\symoperators#2#3\@nil{% + \def\mst@boldmv@operator{#2}}% + \expandafter\mst@reserved\mv@bold\@nil + \edef\mst@tmp@enc{\mst@encoding@normal}% + \def\mst@reserved#1/#2/#3/#4/{\gdef\mst@debut{#1}\gdef\mst@reste{#2/#3/#4}}% + \begingroup\escapechar\m@ne + \xdef\mst@funnyoti{\expandafter\string\csname OT1\endcsname}% + \expandafter\expandafter\expandafter + \mst@reserved\expandafter\string\mst@normalmv@operator/% + \endgroup + \ifx\mst@debut\mst@funnyoti\ifx\mst@tmp@enc\mst@oti\def\mst@tmp@enc{T1}\fi\fi + \edef\mst@normalmv@operator{\expandafter\noexpand\csname + \if1\mst@OneifUniEnc + \ifx\mst@debut\mst@funnyoti T1\else\mst@debut\fi + \else + \mst@tmp@enc + \fi/\mst@reste\endcsname}% + \edef\mst@tmp@enc{\mst@encoding@bold}% + \begingroup\escapechar\m@ne + \expandafter\expandafter\expandafter + \mst@reserved\expandafter\string\mst@boldmv@operator/% + \endgroup + \ifx\mst@debut\mst@funnyoti\ifx\mst@tmp@enc\mst@oti\def\mst@tmp@enc{T1}\fi\fi + \edef\mst@boldmv@operator{\expandafter\noexpand\csname + \if1\mst@OneifUniEnc + \ifx\mst@debut\mst@funnyoti T1\else\mst@debut\fi + \else + \mst@tmp@enc + \fi/\mst@reste\endcsname}% + \typeout{** ...entering subdued mode...}% + \expandafter\SetSymbolFont@ \expandafter\mv@normal\mst@normalmv@letter\symmtletterfont + \expandafter\SetSymbolFont@ \expandafter\mv@bold\mst@boldmv@letter\symmtletterfont + \expandafter\SetSymbolFont@ \expandafter\mv@normal\mst@normalmv@operator\symmtoperatorfont + \expandafter\SetSymbolFont@ \expandafter\mv@bold\mst@boldmv@operator\symmtoperatorfont + \typeout{** ...done.}% +}% \AtBeginDocument +\fi % \ifmst@subdued +% \end{macrocode} +%^^A In the short-lived |1.15e| I was doing the following for alphabets:\\ +%^^A |\def\mst@reservedc#1#2#3#4{\def\mst@normalmv@mathbf{#4#3}}|\\ +%^^A |\def\mst@reserveda#1{%|\\ +%^^A |\def\mst@reservedb##1\install@mathalphabet#1##2##3\@nil{\mst@reservedc##2}%|\\ +%^^A |\expandafter\mst@reservedb\mv@normal\@nil}|\\ +%^^A |\expandafter\mst@reserveda\csname mathbf\space\endcsname|\\ +%^^A and later in the code:\\ +%^^A |\expandafter\expandafter\expandafter\SetMathAlphabet@|\\ +%^^A |\expandafter\expandafter\expandafter\mv@normal|\\ +%^^A |\expandafter\mst@normalmv@mathbf\csname Mathbf\space \endcsname\Mathbf|\\ +%^^A It does work! but |\let\mst@original@bf\mathbf| is so +%^^A much simpler. And also safer, because \cs{mathbf} could have been +%^^A redefined using \cs{DeclareSymbolFontAlphabet}... (I could have +%^^A provided the necessary check to the already bloated code...) +% \end{macro} +% \begin{macro}{Preamble-only...} +% ``Only preamble'' restrictions. I was way too much obedient back in 2011, +% particularly taking into account how much of a pain it has been and still is +% that things such as \cs{DeclareMathSymbol} or \cs{DeclareMathAccent} are +% preamble-only. But keeping this for time being, however not using +% \cs{@onlypreamble} which breaks one's heart when tracing to see how much +% place it takes, so we do it in one go. +% \begin{macrocode} +\expandafter \gdef \expandafter \@preamblecmds \expandafter {\@preamblecmds +\do\MTitgreek +\do\MTupgreek +\do\MTitGreek +\do\MTitGreek +\do\Mathastextitgreek +\do\Mathastextupgreek +\do\MathastextitGreek +\do\MathastextitGreek +\do\MTgreekfont +\do\Mathastextgreekfont +\do\MTDeclareVersion +\do\MathastextDeclareVersion +\do\MTWillUse +\do\MathastextWillUse +\do\Mathastextwilluse +\do\Mathastext +\do\mathastext +} \endinput % \end{macrocode} % \end{macro} @@ -7961,7 +8269,7 @@ defaultbf,defaultit,defaultsf,defaulttt}\mst@nonormalboldtrue} Grave accent \` Left brace \{ Vertical bar \| Right brace \} Tilde \~} -\CheckSum{5692} +\CheckSum{6010} \makeatletter\check@checksum\makeatother \Finale %% diff --git a/Master/texmf-dist/source/latex/mathastext/mathastext.ins b/Master/texmf-dist/source/latex/mathastext/mathastext.ins deleted file mode 100644 index fceff48e299..00000000000 --- a/Master/texmf-dist/source/latex/mathastext/mathastext.ins +++ /dev/null @@ -1,56 +0,0 @@ -\def\MSTpkgdate {2018/08/22} -\def\MSTpkgversion {1.3t} -%%---------------------------------------------------------------- -%% Package: mathastext -%% Info: Use the text font in math mode (JFB) -%% Version: 1.3t 2018/08/22 -%% License: LPPL 1.3c (http://www.latex-project.org/lppl/lppl-1-3c.txt) -%% Copyright (C) 2011-2018 Jean-Francois Burnol -%% Examples of use of mathastext: -%% http://jf.burnol.free.fr/mathastext.html -%% http://jf.burnol.free.fr/showcase.html -%%---------------------------------------------------------------- -%% This is a generated file. "tex mathastext.ins" extracts mathastext.sty from -%% mathastext.dtx as well as mathastext.tex (for typesetting the documentation), -%% and some test files to check the package commands. -%% -%% See mathastext.dtx for the copyright and the conditions for distribution -%% and/or modification of this work. -%% -\input docstrip.tex -\askforoverwritefalse -\def\testfilepreamble{% - \string\def\string\testfileincipit{Test file - to accompany \string\texttt{mathastext}^^J% - version \string\texttt{\MSTpkgversion} of \string\texttt{\MSTpkgdate}}} -\generate{\nopreamble\nopostamble - \file{README.md}{\from{mathastext.dtx}{readme}} -\usepostamble\defaultpostamble - \file{mathastext.tex}{\from{mathastext.dtx}{drv}} -\usepreamble\testfilepreamble - \file{mathastexttestmathversions.tex}{\from{mathastext.dtx}{mathversions}} - \file{mathastexttestunicodemacos.tex}{\from{mathastext.dtx}{macos}} - \file{mathastexttestunicodelinux.tex}{\from{mathastext.dtx}{linux}} - \file{mathastexttestalphabets.tex}{\from{mathastext.dtx}{alphabets}} -\usepreamble\defaultpreamble - \file{mathastext.sty}{\from{mathastext.dtx}{package}}% -} -\catcode32=13\relax% active space -\let =\space% -\Msg{************************************************************************} -\Msg{*} -\Msg{* To finish the installation you have to move the following} -\Msg{* file into a directory searched by TeX:} -\Msg{*} -\Msg{* mathastext.sty} -\Msg{*} -\Msg{* To produce the documentation run latex thrice on file mathastext.tex} -\Msg{* and then run dvipdfmx on file mathastext.dvi} -\Msg{*} -\Msg{* Happy TeXing!} -\Msg{*} -\Msg{************************************************************************} -\endbatchfile -\endinput -%% -%% End of file `mathastext.ins'. diff --git a/Master/texmf-dist/tex/latex/mathastext/mathastext.sty b/Master/texmf-dist/tex/latex/mathastext/mathastext.sty index db69294645c..ac3d383e246 100644 --- a/Master/texmf-dist/tex/latex/mathastext/mathastext.sty +++ b/Master/texmf-dist/tex/latex/mathastext/mathastext.sty @@ -23,20 +23,21 @@ %%---------------------------------------------------------------- %% Package: mathastext %% Info: Use the text font in math mode (JFB) -%% Version: 1.3t 2018/08/22 +%% Version: 1.3u 2019/08/20 %% License: LPPL 1.3c (http://www.latex-project.org/lppl/lppl-1-3c.txt) -%% Copyright (C) 2011-2018 Jean-Francois Burnol +%% Copyright (C) 2011-2019 Jean-Francois Burnol %% Examples of use of mathastext: %% http://jf.burnol.free.fr/mathastext.html %% http://jf.burnol.free.fr/showcase.html %%---------------------------------------------------------------- \NeedsTeXFormat{LaTeX2e} \ProvidesPackage {mathastext} - [2018/08/22 v1.3t Use the text font in math mode (JFB)] + [2019/08/20 v1.3u Use the text font in math mode (JFB)] \let\mst@Umathcharnumdef\Umathcharnumdef \let\mst@Umathcodenum \Umathcodenum \let\mst@Umathcode \Umathcode \let\mst@Umathchardef \Umathchardef + \let\mst@Umathaccent \Umathaccent \newif\ifmst@XeTeX \ifx\XeTeXinterchartoks\@undefined \mst@XeTeXfalse @@ -47,6 +48,7 @@ \let\mst@Umathcodenum \XeTeXmathcodenum \let\mst@Umathcode \XeTeXmathcode \let\mst@Umathchardef \XeTeXmathchardef + \let\mst@Umathaccent \XeTeXmathaccent \fi \fi \newif\ifmst@LuaTeX @@ -59,12 +61,13 @@ \let\mst@Umathcodenum \luatexUmathcodenum \let\mst@Umathcode \luatexUmathcode \let\mst@Umathchardef \luatexUmathchardef + \let\mst@Umathaccent \luatexUmathaccent \fi \fi \newif\ifmst@XeOrLua \ifmst@LuaTeX\mst@XeOrLuatrue\fi \ifmst@XeTeX \mst@XeOrLuatrue\fi -\def\mst@oti{OT1}\def\mst@ti{T1}\def\mst@lyi{LY1} +\def\mst@oti{OT1} \def\mst@eui{EU1}\def\mst@euii{EU2}\def\mst@tu{TU} \def\mst@OneifUniEnc {% \ifx \mst@tmp@enc\mst@tu 1\else @@ -85,27 +88,22 @@ \def\mst@ltsh{\itdefault}} \DeclareOption{frenchmath}{\mst@frenchmathtrue\mst@italictrue \def\mst@ltsh{\itdefault}} -%% \newif\ifmst@endash\mst@endashtrue \DeclareOption{endash}{\mst@endashtrue} \DeclareOption{noendash}{\mst@endashfalse} \newif\ifmst@emdash \DeclareOption{emdash}{\mst@emdashtrue\mst@endashfalse} -%% \newif\ifmst@alldelims \edef\mst@tmp{\encodingdefault}\ifx\mst@oti\mst@tmp\else\mst@alldelimstrue\fi \DeclareOption{alldelims}{\mst@alldelimstrue} \DeclareOption{nolessnomore}{\mst@alldelimsfalse} -%% new with 1.2 \newif\ifmst@nosmalldelims \DeclareOption{nosmalldelims}{\mst@nosmalldelimstrue} -%% \newif\ifmst@noplus \DeclareOption{noplus}{\mst@noplustrue} \newif\ifmst@nominus \DeclareOption{nominus}{\mst@nominustrue} \DeclareOption{noplusnominus}{\ExecuteOptions{noplus,nominus}} -%% \newif\ifmst@noparen \DeclareOption{noparenthesis}{\mst@noparentrue} \newif\ifmst@nopunct @@ -122,10 +120,9 @@ \newif\ifmst@nospecials \DeclareOption{nospecials}{\mst@nospecialstrue} \newif\ifmst@basic % 1.3 to avoid unnecessary patch of amsmath \newmcodes@ -\DeclareOption{basic}{\mst@basictrue + \DeclareOption{basic}{\mst@basictrue \ExecuteOptions{noparenthesis,nopunctuation,% noplusnominus,noequal,noexclam,nospecials,nolessnomore}} -%% \newif\ifmst@nohbar \DeclareOption{nohbar}{\mst@nohbartrue} \newif\ifmst@nodigits @@ -134,7 +131,8 @@ \DeclareOption{defaultimath}{\mst@defaultimathtrue} \newif\ifmst@mathaccents \DeclareOption{mathaccents}{\mst@mathaccentstrue} -%% +\newif\ifmst@unimathaccents % 1.3u + \DeclareOption{unimathaccents}{\mst@mathaccentstrue\mst@unimathaccentstrue} \newif\ifmst@needsymbol \newif\ifmst@symboldelimiters \DeclareOption{symboldelimiters}{\mst@needsymboltrue\mst@symboldelimiterstrue} @@ -148,16 +146,14 @@ \DeclareOption{symbolre}{\mst@needsymboltrue\mst@symbolretrue} \newif\ifmst@symbolmisc \DeclareOption{symbolmisc}{\mst@needsymboltrue\mst@symbolmisctrue} -\DeclareOption{symbol}{\ExecuteOptions{symbolgreek,symbolmisc,symbolre}} -\DeclareOption{symbolmax}{\ExecuteOptions{symbol,symboldelimiters}} -%% + \DeclareOption{symbol}{\ExecuteOptions{symbolgreek,symbolmisc,symbolre}} + \DeclareOption{symbolmax}{\ExecuteOptions{symbol,symboldelimiters}} \newif\ifmst@needeuler \newif\ifmst@eulerdigits \DeclareOption{eulerdigits}{\mst@needeulertrue\mst@eulerdigitstrue} \newif\ifmst@eulergreek \DeclareOption{eulergreek}{\mst@needeulertrue\mst@eulergreektrue \mst@customgreektrue } -%% \newif\ifmst@selfGreek \DeclareOption{selfGreek}{\mst@selfGreektrue\mst@customgreektrue} \newif\ifmst@selfGreeks @@ -168,7 +164,6 @@ \newif\ifmst@LGRgreeks \DeclareOption{LGRgreeks}{\mst@LGRgreekstrue\mst@LGRgreektrue \mst@customgreektrue} -%% \def\mst@greek@select{0} \newif\ifmst@itgreek \newif\ifmst@upgreek @@ -176,7 +171,6 @@ \DeclareOption{upgreek}{\mst@upgreektrue} \DeclareOption{itGreek}{\def\mst@greek@select{1}} \DeclareOption{upGreek}{\def\mst@greek@select{2}} -%% \newif\ifmst@defaultnormal \DeclareOption{defaultnormal}{\mst@defaultnormaltrue} \newif\ifmst@defaultrm @@ -293,8 +287,23 @@ defaultbf,defaultit,defaultsf,defaulttt}\mst@nonormalboldtrue} \let\resetMathstrut@\mst@savedresetMathstrut@}% \fi \let\mst@the\@gobble -} -\newcommand*\MTnonlettersobeymathxx{% +}% +\def\mst@OnlyIfNotSubdued#1{% + \ifmst@subdued + \def\mst@tmpa{normal}% + \ifx\math@version\mst@tmpa + \else + \def\mst@tmpa{bold}% + \ifx\math@version\mst@tmpa + \else + #1% + \fi + \fi + \else + #1% + \fi +}% +\def\mst@nonlettersobeymathxx{% \ifx\mst@the\the \else \@ifundefined{mst@savedresetMathstrut@}{}{% @@ -314,14 +323,22 @@ defaultbf,defaultit,defaultsf,defaulttt}\mst@nonormalboldtrue} from amsmath replaced (for this group or environment)}}% \fi \let\mst@the\the -} -\newcommand*\MTeasynonlettersdonotobeymathxx{\let\mst@theeasy\@gobble} -\newcommand*\MTeasynonlettersobeymathxx{\let\mst@theeasy\the} -\MTeasynonlettersobeymathxx -\newcommand*\MTmathactiveletters{\let\mst@thef\the \let\mst@theF\the} -\ifmst@subdued\else\MTmathactiveletters\fi -\newcommand*\MTmathactiveLetters{\let\mst@theF\the} -\newcommand*\MTmathstandardletters{\let\mst@thef\@gobble \let\mst@theF\@gobble} +}% +\newcommand*\MTnonlettersobeymathxx + {\mst@OnlyIfNotSubdued\mst@nonlettersobeymathxx}% +\newcommand*\MTeasynonlettersdonotobeymathxx{\let\mst@theeasy\@gobble}% +\def\mst@easynonlettersobeymathxx{\let\mst@theeasy\the}% +\newcommand*\MTeasynonlettersobeymathxx + {\mst@OnlyIfNotSubdued\mst@easynonlettersobeymathxx}% +\MTeasynonlettersobeymathxx % no-op here if subdued mode +\def\mst@mathactiveletters{\let\mst@thef\the \let\mst@theF\the}% +\newcommand*\MTmathactiveletters + {\mst@OnlyIfNotSubdued\mst@mathactiveletters}% +\MTmathactiveletters % no-op here if subdued mode +\def\mst@mathactiveLetters{\let\mst@theF\the}% +\newcommand*\MTmathactiveLetters + {\mst@OnlyIfNotSubdued\mst@mathactiveLetters}% +\newcommand*\MTmathstandardletters{\let\mst@thef\@gobble \let\mst@theF\@gobble}% \newcommand*\MTicinmath{% \MTmathactiveletters \def\mst@itcorr{\ifnum\fam=\m@ne\/\fi}% @@ -334,45 +351,6 @@ defaultbf,defaultit,defaultsf,defaulttt}\mst@nonormalboldtrue} \newcommand*\MTicalsoinmathxx{% \ifx\mst@itcorr\@empty\else\def\mst@itcorr{\/}\fi \ifx\mst@ITcorr\@empty\else\def\mst@ITcorr{\/}\fi} -\AtEndOfPackage{\AtBeginDocument{% - \everymath\expandafter{\the\everymath - \mst@the\mst@do@nonletters \let\mst@the\@gobble - \mst@theeasy\mst@do@easynonletters \let\mst@theeasy\@gobble - \mst@thef\mst@do@az \let\mst@thef\@gobble - \mst@theF\mst@do@AZ \let\mst@theF\@gobble}% - \everydisplay\expandafter{\the\everydisplay - \mst@the\mst@do@nonletters \let\mst@the\@gobble - \mst@theeasy\mst@do@easynonletters \let\mst@theeasy\@gobble - \mst@thef\mst@do@az \let\mst@thef\@gobble - \mst@theF\mst@do@AZ \let\mst@theF\@gobble}% - \MTcustomizenewmcodes - \let\mst@imath\imath - \let\mst@jmath\jmath - \ifmst@subdued - \MTeverymathoff - \MTresetnewmcodes - \MTnoicinmath - \MTmathoperatorsdonotobeymathxx - \let\inodot\mst@imath - \let\jnodot\mst@jmath - \mst@subduedminus - \else - \mst@nonsubduedminus - \ifx\mst@itcorr\@undefined - \def\mst@itcorr{\ifnum\fam=\m@ne\/\fi}% - \@for\mst@tmp:=it,sl\do - {\ifx\mst@tmp\mst@ltshape@normal\let\mst@itcorr\@empty\fi }% - \fi - \ifx\mst@ITcorr\@undefined - \let\mst@ITcorr\mst@itcorr - \ifmst@frenchmath - \def\mst@ITcorr{\ifnum\fam=\m@ne\/\fi}% - \@for\mst@tmp:=it,sl\do - {\ifx\mst@tmp\mst@shape@normal\let\mst@ITcorr\@empty\fi }% - \fi - \fi - \fi -}} \newcommand*\MTsetmathskips[3]{% \@namedef{mst@before#1}{\ifnum\fam=\m@ne\mskip#2\relax\fi }% \@namedef{mst@after#1}{\ifnum\fam=\m@ne\mskip#3\relax\fi }% @@ -507,54 +485,6 @@ defaultbf,defaultit,defaultsf,defaulttt}\mst@nonormalboldtrue} \let\newmcodes@\mst@originalnewmcodes@\fi} \newcommand*\MTcustomizenewmcodes{\ifx\mst@originalnewmcodes@\undefined\else \let\newmcodes@\mst@newmcodes@\fi} -\ifmst@subdued - \def\mst@reserved#1\getanddefine@fonts\symletters#2#3\@nil{% - \def\mst@normalmv@letter{#2}} - \expandafter\mst@reserved\mv@normal\@nil - \def\mst@reserved#1\getanddefine@fonts\symletters#2#3\@nil{% - \def\mst@boldmv@letter{#2}} - \expandafter\mst@reserved\mv@bold\@nil - \def\mst@reserved#1\getanddefine@fonts\symoperators#2#3\@nil{% - \def\mst@normalmv@operator{#2}} - \expandafter\mst@reserved\mv@normal\@nil - \def\mst@reserved#1\getanddefine@fonts\symoperators#2#3\@nil{% - \def\mst@boldmv@operator{#2}} - \expandafter\mst@reserved\mv@bold\@nil -%% - \edef\mst@tmp@enc{\encodingdefault} - \def\mst@reserved#1/#2/#3/#4/{\gdef\mst@debut{#1}\gdef\mst@reste{#2/#3/#4}} - \begingroup\escapechar\m@ne - \xdef\mst@funnyoti{\expandafter\string\csname OT1\endcsname} - \expandafter\expandafter\expandafter - \mst@reserved\expandafter\string\mst@normalmv@operator/ - \endgroup - \ifx\mst@debut\mst@funnyoti\ifx\mst@tmp@enc\mst@oti\def\mst@tmp@enc{T1}\fi\fi - \edef\mst@normalmv@operator{\expandafter\noexpand\csname - \if1\mst@OneifUniEnc - \ifx\mst@debut\mst@funnyoti T1\else\mst@debut\fi - \else - \mst@tmp@enc - \fi/\mst@reste\endcsname} - \begingroup\escapechar\m@ne - \expandafter\expandafter\expandafter - \mst@reserved\expandafter\string\mst@boldmv@operator/ - \endgroup - \ifx\mst@debut\mst@funnyoti\ifx\mst@tmp@enc\mst@oti\def\mst@tmp@enc{T1}\fi\fi - \edef\mst@boldmv@operator{\expandafter\noexpand\csname - \if1\mst@OneifUniEnc - \ifx\mst@debut\mst@funnyoti T1\else\mst@debut\fi - \else - \mst@tmp@enc - \fi/\mst@reste\endcsname} - \AtEndOfPackage{ - \typeout{** ...entering subdued mode...} - \expandafter\SetSymbolFont@ \expandafter\mv@normal\mst@normalmv@letter\symmtletterfont - \expandafter\SetSymbolFont@ \expandafter\mv@bold\mst@boldmv@letter\symmtletterfont - \expandafter\SetSymbolFont@ \expandafter\mv@normal\mst@normalmv@operator\symmtoperatorfont - \expandafter\SetSymbolFont@ \expandafter\mv@bold\mst@boldmv@operator\symmtoperatorfont - \typeout{** ...done.} - } -\fi % fin de ce \ifmst@subdued \DeclareSymbolFont{mtoperatorfont}{\mst@enc}{\mst@fam}{\mst@ser}{\mst@opsh} \newcommand*{\MTmathoperatorsobeymathxx} {\def\operator@font{\mathgroup\ifnum\fam=\m@ne\symmtoperatorfont\else\fam\fi}} @@ -715,505 +645,87 @@ defaultbf,defaultit,defaultsf,defaulttt}\mst@nonormalboldtrue} \let\Mathastextupgreek\MTupgreek \let\MathastextitGreek\MTitGreek \let\MathastextupGreek\MTupGreek -\@onlypreamble\MTitgreek -\@onlypreamble\MTupgreek -\@onlypreamble\MTitGreek -\@onlypreamble\MTitGreek -\@onlypreamble\Mathastextitgreek -\@onlypreamble\Mathastextupgreek -\@onlypreamble\MathastextitGreek -\@onlypreamble\MathastextitGreek \newcommand*\MTgreekfont[1]{\def\mst@greekfont{#1}} \let\Mathastextgreekfont\MTgreekfont -\@onlypreamble\MTgreekfont -\@onlypreamble\Mathastextgreekfont -\newcommand*\MTWillUse[5][]{ - \MTencoding{#2} - \MTfamily{#3} - \MTseries{#4} - \MTshape{#5} - \ifmst@italic\MTlettershape{\itdefault}\fi % was missing in v 1.14 and prior - \edef\mst@tmp{#1} - \ifx\mst@tmp\empty\else\MTlettershape{#1}\fi - \Mathastext} -\let\MathastextWillUse\MTWillUse -\let\Mathastextwilluse\MTWillUse -\@onlypreamble\MTWillUse -\@onlypreamble\MathastextWillUse -\@onlypreamble\Mathastextwilluse -\def\Mathastext {\@ifnextchar [\Mathastext@declare\Mathastext@ } -\def\Mathastext@declare [#1]{% - \edef\mst@tmp{#1}% - \ifx\mst@tmp\empty - \expandafter\@firstoftwo - \else\expandafter\@secondoftwo - \fi - \Mathastext@ - {\MTDeclareVersion[\mst@ltsh]{#1}{\mst@enc}{\mst@fam}{\mst@ser}{\mst@opsh}}% -} -\def\Mathastext@ {% - \mst@update@greeksh - \edef\mst@encoding@normal{\mst@enc}% - \edef\mst@family@normal{\mst@fam}% - \edef\mst@series@normal{\mst@ser}% - \edef\mst@shape@normal{\mst@opsh}% - \edef\mst@ltshape@normal{\mst@ltsh}% - \edef\mst@itdefault@normal{\itdefault}% - \edef\mst@rmdefault@normal{\rmdefault}% - \edef\mst@sfdefault@normal{\sfdefault}% - \edef\mst@ttdefault@normal{\ttdefault}% - \edef\mst@boldvariant@normal{\mst@bold}% - \edef\mst@exists@skip@normal{\mst@exists@skip}% - \edef\mst@forall@skip@normal{\mst@forall@skip}% - \edef\mst@prime@skip@normal{\mst@prime@skip}% - \edef\mst@encoding@bold{\mst@enc}% - \edef\mst@family@bold{\mst@fam}% - \edef\mst@series@bold{\mst@bold}% - \edef\mst@shape@bold{\mst@opsh}% - \edef\mst@ltshape@bold{\mst@ltsh}% - \edef\mst@boldvariant@bold{\mst@bold}% - \edef\mst@itdefault@bold{\itdefault}% - \edef\mst@rmdefault@bold{\rmdefault}% - \edef\mst@sfdefault@bold{\sfdefault}% - \edef\mst@ttdefault@bold{\ttdefault}% - \edef\mst@exists@skip@bold{\mst@exists@skip}% - \edef\mst@forall@skip@bold{\mst@forall@skip}% - \edef\mst@prime@skip@bold{\mst@prime@skip}% - \ifmst@subdued - \def\mst@exists@skip@normal{0mu}% - \def\mst@forall@skip@normal{0mu}% - \def\mst@prime@skip@normal{0mu}% - \def\mst@exists@skip@bold{0mu}% - \def\mst@forall@skip@bold{0mu}% - \def\mst@prime@skip@bold{0mu}% - \else % not subdued - \ifmst@italic - \ifmst@frenchmath - \mst@exists@muskip\mst@exists@skip\relax - \mst@forall@muskip\mst@forall@skip\relax - \mst@prime@muskip\mst@prime@skip\relax - \else - \def\mst@exists@skip@normal{0mu}% - \def\mst@forall@skip@normal{0mu}% - \def\mst@prime@skip@normal{0mu}% - \def\mst@exists@skip@bold{0mu}% - \def\mst@forall@skip@bold{0mu}% - \def\mst@prime@skip@bold{0mu}% - \fi - \else - \mst@exists@muskip\mst@exists@skip\relax - \mst@forall@muskip\mst@forall@skip\relax - \mst@prime@muskip\mst@prime@skip\relax - \fi - \fi -%% v1.15f - \ifmst@nonormalbold\else - \SetMathAlphabet{\mathnormalbold}{normal}{\mst@encoding@normal}% - {\mst@family@normal}% - {\mst@boldvariant@normal}% - {\mst@ltshape@normal}% - \SetMathAlphabet{\mathnormalbold}{bold}{\mst@encoding@bold}% - {\mst@family@bold}% - {\mst@boldvariant@bold}% - {\mst@ltshape@bold}% - \fi -%% v1.15f adds \ifmst@default.. checks - \ifmst@subdued\else - \SetSymbolFont{mtletterfont}{normal}{\mst@encoding@normal}% - {\mst@family@normal}% - {\mst@series@normal}% - {\mst@ltshape@normal}% - \SetSymbolFont{mtletterfont}{bold} {\mst@encoding@bold}% - {\mst@family@bold}% - {\mst@series@bold}% - {\mst@ltshape@bold}% - \SetSymbolFont{mtoperatorfont}{normal}{\mst@encoding@normal}% - {\mst@family@normal}% - {\mst@series@normal}% - {\mst@shape@normal}% - \SetSymbolFont{mtoperatorfont}{bold} {\mst@encoding@bold}% - {\mst@family@bold}% - {\mst@series@bold}% - {\mst@shape@bold}% - \ifmst@defaultbf\else - \SetMathAlphabet{\Mathbf}{normal}{\mst@encoding@normal}% - {\mst@family@normal}% - {\mst@series@bold}% - {\mst@shape@normal}% - \SetMathAlphabet{\Mathbf}{bold}{\mst@encoding@bold}% - {\mst@family@bold}% - {\mst@series@bold}% - {\mst@shape@bold}% - \fi - \ifmst@defaultit\else - \SetMathAlphabet{\Mathit}{normal}{\mst@encoding@normal}% - {\mst@family@normal}% - {\mst@series@normal}% - {\mst@itdefault@normal}% - \SetMathAlphabet{\Mathit}{bold}{\mst@encoding@bold}% - {\mst@family@bold}% - {\mst@series@bold}% - {\mst@itdefault@bold}% - \fi - \ifmst@defaultsf\else - \SetMathAlphabet{\Mathsf}{normal}{\mst@encoding@normal}% - {\mst@sfdefault@normal}% - {\mst@series@normal}% - {\mst@shape@normal}% - \SetMathAlphabet{\Mathsf}{bold}{\mst@encoding@bold}% - {\mst@sfdefault@bold}% - {\mst@series@bold}% - {\mst@shape@bold}% - \fi - \ifmst@defaulttt\else - \SetMathAlphabet{\Mathtt}{normal}{\mst@encoding@normal}% - {\mst@ttdefault@normal}% - {\mst@series@normal}% - {\mst@shape@normal}% - \SetMathAlphabet{\Mathtt}{bold}{\mst@encoding@bold}% - {\mst@ttdefault@bold}% - {\mst@series@bold}% - {\mst@shape@bold}% - \fi - \fi % de \ifmst@subdued - \ifmst@needeuler - \SetSymbolFont{mteulervm}{bold}{U}{zeur}{\mst@boldvariant@normal}{n}% - \SetMathAlphabet{\MathEulerBold}{normal}% - {U}{zeur}{\mst@boldvariant@normal}{n}% - \SetMathAlphabet{\MathEulerBold}{bold}% - {U}{zeur}{\mst@boldvariant@normal}{n}% - \fi - \ifmst@needsymbol\SetSymbolFont{mtpsymbol}{bold}% - {U}{psy}{\mst@boldvariant@normal}{n}% - \fi - \ifmst@subdued\else - \ifmst@LGRgreek - \SetSymbolFont{mtlgrfontlower}{normal}{LGR}% - {\mst@greekfont}{\mst@series@normal}{\mst@greek@lsh}% - \SetSymbolFont{mtlgrfontlower}{bold}{LGR}% - {\mst@greekfont}{\mst@boldvariant@normal}{\mst@greek@lsh}% - \SetSymbolFont{mtlgrfontupper}{normal}{LGR}% - {\mst@greekfont}{\mst@series@normal}{\mst@greek@ush}% - \SetSymbolFont{mtlgrfontupper}{bold}{LGR}% - {\mst@greekfont}{\mst@boldvariant@bold}{\mst@greek@ush}% - \else - \ifmst@selfGreek - \SetSymbolFont{mtselfGreekfont}{normal}{OT1}% - {\mst@greekfont}{\mst@series@normal}{\mst@greek@ush}% - \SetSymbolFont{mtselfGreekfont}{bold}{OT1}% - {\mst@greekfont}{\mst@boldvariant@bold}{\mst@greek@ush}% - \fi - \fi - \fi - \ifmst@subdued - \typeout{** subdued mode will be activated for the normal and bold math versions}% - \else - \typeout{** Latin letters in the normal (resp. bold) math versions are now^^J% - ** set up to use the fonts - \mst@encoding@normal/\mst@family@normal/\mst@series@normal% - (\mst@boldvariant@normal)/\mst@ltshape@normal}% - \ifmst@LGRgreek\typeout{** Greek letters (\mst@greek@lsh/\mst@greek@ush) - will use LGR/\mst@greekfont}% - \fi - \ifmst@nodigits\else - \typeout{** Other characters (digits, ...) and \protect\log-like names will be^^J% - ** typeset with the \mst@shape@normal\space shape.}% - \fi - \fi -} -\let\mathastext\Mathastext -\@onlypreamble\Mathastext -\@onlypreamble\mathastext -\newcommand*\MTDeclareVersion[6][]{% - \def\mst@declareversionargs{{#1}{#2}{#3}{#4}{#5}{#6}}% - \edef\mst@version{#2}% - \DeclareMathVersion{\mst@version}% - \MTDeclareVersion@ -} -\newcommand*\MTDeclareVersion@[1][]{% - \edef\mst@tmp{#1}% - \ifx\mst@tmp\empty\else - \global\expandafter\let\csname mv@\mst@version\expandafter\endcsname - \csname mv@#1\endcsname - \typeout{** Math version `\mst@version\string' inherits from `#1\string'.}% - \fi - \expandafter\MTDeclareVersion@@\mst@declareversionargs -} -\newcommand*\MTDeclareVersion@@[6]{% - \edef\mst@tmp{#1}% - \expandafter\edef\csname mst@encoding@\mst@version\endcsname{#3}% - \expandafter\edef\csname mst@family@\mst@version\endcsname{#4}% - \expandafter\edef\csname mst@series@\mst@version\endcsname{#5}% - \expandafter\edef\csname mst@shape@\mst@version\endcsname{#6}% - \expandafter\edef\csname mst@boldvariant@\mst@version\endcsname{\mst@bold}% - \expandafter\edef\csname mst@itdefault@\mst@version\endcsname{\itdefault}% - \expandafter\edef\csname mst@rmdefault@\mst@version\endcsname{\rmdefault}% - \expandafter\edef\csname mst@sfdefault@\mst@version\endcsname{\sfdefault}% - \expandafter\edef\csname mst@ttdefault@\mst@version\endcsname{\ttdefault}% - \expandafter\edef\csname mst@exists@skip@\mst@version\endcsname - {\mst@exists@skip}% - \expandafter\edef\csname mst@forall@skip@\mst@version\endcsname - {\mst@forall@skip}% - \expandafter\edef\csname mst@prime@skip@\mst@version\endcsname - {\mst@prime@skip}% - \ifx\mst@tmp\empty - \ifmst@italic - \SetSymbolFont{mtletterfont}{#2}{#3}{#4}{#5}{\mst@ltsh}% - \typeout{** Latin letters in math version `#2\string' will use the font - #3/#4/#5/\mst@ltsh^^J% - ** Other characters (digits, ...) and \protect\log-like names - will be in #6 shape.}% - \expandafter\edef\csname mst@ltshape@\mst@version\endcsname{\mst@ltsh}% - \else - \SetSymbolFont{mtletterfont}{#2}{#3}{#4}{#5}{#6}% - \typeout{** Latin letters in math version `#2\string' will use the fonts - #3/#4/#5(\mst@bold)/#6}% - \expandafter\edef\csname mst@ltshape@\mst@version\endcsname{#6}% - \fi - \else - \SetSymbolFont{mtletterfont}{#2}{#3}{#4}{#5}{#1}% - \typeout{** Latin letters in math version `#2\string' will use the font - #3/#4/#5/#1^^J% - ** Other characters (digits, ...) and \protect\log-like - names will be in #6 shape.}% - \expandafter\edef\csname mst@ltshape@\mst@version\endcsname{#1}% - \fi - \ifmst@nonormalbold\else - \SetMathAlphabet{\mathnormalbold}{#2}{#3}{#4}{\mst@bold}% - {\csname mst@ltshape@\mst@version\endcsname}% - \fi - \SetSymbolFont{mtoperatorfont}{#2}{#3}{#4}{#5}{#6}% - \ifmst@defaultbf\else\SetMathAlphabet{\Mathbf}{#2}{#3}{#4}{\mst@bold}{#6}\fi - \ifmst@defaultit\else\SetMathAlphabet{\Mathit}{#2}{#3}{#4}{#5}{\itdefault}\fi - \ifmst@defaultsf\else\SetMathAlphabet{\Mathsf}{#2}{#3}{\sfdefault}{#5}{#6}\fi - \ifmst@defaulttt\else\SetMathAlphabet{\Mathtt}{#2}{#3}{\ttdefault}{#5}{#6}\fi - \ifmst@needeuler - \SetMathAlphabet{\MathEulerBold}{#2}{U}{zeur}{\mst@bold}{n}% - \fi - \def\mst@greek@lsh@loc{\csname mst@ltshape@\mst@version\endcsname}% - \def\mst@greek@ush@loc{\csname mst@shape@\mst@version\endcsname}% - \ifmst@itgreek\def\mst@greek@lsh@loc{\itdefault}% - \def\mst@greek@ush@loc{\itdefault}\fi - \ifmst@upgreek\def\mst@greek@lsh@loc{\updefault}% - \def\mst@greek@ush@loc{\updefault}\fi - \ifmst@frenchmath - \ifmst@itgreek\else - \ifmst@upgreek\else - \def\mst@greek@lsh@loc{\csname mst@shape@\mst@version\endcsname}% - \def\mst@greek@ush@loc{\csname mst@shape@\mst@version\endcsname}% - \fi\fi - \fi - \ifcase\mst@greek@select - \or\def\mst@greek@ush@loc{\itdefault}% - \or\def\mst@greek@ush@loc{\updefault}% - \fi - \ifmst@LGRgreeks - \SetSymbolFont{mtlgrfontlower}{#2}{LGR}{#4}{#5}{\mst@greek@lsh@loc}% - \SetSymbolFont{mtlgrfontupper}{#2}{LGR}{#4}{#5}{\mst@greek@ush@loc}% - \typeout{** Greek letters (\mst@greek@lsh@loc/\mst@greek@ush@loc) will use - LGR font #4\ifmst@subdued ^^J** (in non subdued versions)\fi}% - \else - \ifmst@selfGreeks - \SetSymbolFont{mtselfGreekfont}{#2}{OT1}{#4}{#5}{\mst@greek@ush@loc}% - \typeout{** Capital Greek letters (\mst@greek@lsh@loc/\mst@greek@ush@loc) - will use OT1 font #4\ifmst@subdued ^^J** (in non subdued versions)\fi}% - \else - \ifmst@LGRgreek - \SetSymbolFont{mtlgrfontlower}{#2}{LGR}{\mst@greekfont}{#5}{\mst@greek@lsh@loc}% - \SetSymbolFont{mtlgrfontupper}{#2}{LGR}{\mst@greekfont}{#5}{\mst@greek@ush@loc}% - \typeout{** Greek letters (\mst@greek@lsh@loc/\mst@greek@ush@loc) will use - LGR font \mst@greekfont\ifmst@subdued ^^J** (in non subdued versions)\fi}% - \else - \ifmst@selfGreek - \SetSymbolFont{mtselfGreekfont}{#2}{OT1}{\mst@greekfont}{#5}{\mst@greek@ush@loc}% - \typeout{** Capital Greek letters (\mst@greek@lsh@loc/\mst@greek@ush@loc) - will use OT1 font \mst@greekfont\ifmst@subdued ^^J** (in non subdued versions)\fi}% - \fi - \fi - \fi - \fi -} -\let\MathastextDeclareVersion\MTDeclareVersion -\@onlypreamble\MTDeclareVersion -\@onlypreamble\MathastextDeclareVersion -\newcommand*\MTversion {\@ifstar\MTversion@s\MTversion@ } -\newcommand*\MTversion@s [1]{\mathversion{#1}\MTversion@@ {#1}} -\newcommand*\MTversion@ [2][]{% - \mathversion{#2}% - \edef\mst@tmpa{#1}% - \ifx\mst@tmpa\empty - \edef\mst@tmp{#2}% - \else - \let\mst@tmp\mst@tmpa - \fi - \edef\encodingdefault {\csname mst@encoding@\mst@tmp\endcsname}% - \edef\familydefault {\csname mst@family@\mst@tmp\endcsname}% - \edef\seriesdefault {\csname mst@series@\mst@tmp\endcsname}% - \edef\shapedefault {\csname mst@shape@\mst@tmp\endcsname}% - \edef\bfdefault {\csname mst@boldvariant@\mst@tmp\endcsname}% - \edef\itdefault {\csname mst@itdefault@\mst@tmp\endcsname}% - \edef\rmdefault {\csname mst@rmdefault@\mst@tmp\endcsname}% - \edef\sfdefault {\csname mst@sfdefault@\mst@tmp\endcsname}% - \edef\ttdefault {\csname mst@ttdefault@\mst@tmp\endcsname}% - \usefont{\encodingdefault}{\familydefault}{\seriesdefault}{\shapedefault}% - \MTversion@@ {#2}% -} -\newcommand*\MTversion@@ [1]{% - \MTexistsdoesskip - \MTforalldoesskip - \MTprimedoesskip - \edef\mst@tmp{#1}% - \expandafter - \mst@exists@muskip\csname mst@exists@skip@\mst@tmp\endcsname\relax - \expandafter - \mst@forall@muskip\csname mst@forall@skip@\mst@tmp\endcsname\relax - \expandafter - \mst@prime@muskip\csname mst@prime@skip@\mst@tmp\endcsname\relax - \edef\mst@tmpa{\csname mst@ltshape@\mst@tmp\endcsname}% - \edef\mst@tmpb{\csname mst@shape@\mst@tmp\endcsname}% - \MTmathoperatorsobeymathxx - \MTeverymathdefault - \MTcustomizenewmcodes - \@for\mst@tmpc:=it,sl\do{\ifx\mst@tmpc\mst@tmpa\MTnoicinmath\fi}% - \ifmst@frenchmath - \def\mst@ITcorr{\ifnum\fam=\m@ne\/\fi}% - \@for\mst@tmpc:=it,sl\do{\ifx\mst@tmpc\mst@tmpb\MTnoICinmath\fi}% - \fi - \ifmst@subdued - \def\mst@tmpa{normal}% - \ifx\mst@tmp\mst@tmpa - \mst@restorealphabets - \MTstandardgreek - \MTmathoperatorsdonotobeymathxx - \MTnormalexists - \MTnormalforall - \MTeverymathoff - \MTresetnewmcodes - \let\inodot\mst@imath - \let\jnodot\mst@jmath - \mst@subduedminus - \else - \def\mst@tmpa{bold}% - \ifx\mst@tmp\mst@tmpa - \mst@restorealphabets - \MTstandardgreek - \MTmathoperatorsdonotobeymathxx - \MTnormalexists - \MTnormalforall - \MTeverymathoff - \MTresetnewmcodes - \let\inodot\mst@imath - \let\jnodot\mst@jmath - \mst@subduedminus - \else - \mst@setalphabets - \MTcustomgreek - \let\inodot\mst@inodot - \let\jnodot\mst@jnodot - \mst@nonsubduedminus - \fi - \fi - \else - \MTcustomgreek % new with 1.3d - \fi -} -\let\MathastextVersion\MTversion -\let\Mathastextversion\MTversion -\let\MTVersion\MTversion -\let\mathastextversion\MTversion -\Mathastext -\ifmst@eulergreek - \typeout{** Greek letters will use the Euler font. Use \protect\MathastextEulerScale{} to scale the - font.}% - \ifmst@subdued{\typeout{** (subdued mode: normal and bold math - version with default Greek letters.)}}\fi -\else -\ifmst@symbolgreek - \typeout{** Greek letters will use the PostScript Symbol font. Use^^J% - ** \protect\MathastextSymbolScale{} to scale the font.}% - \ifmst@subdued{\typeout{** (subdued mode: normal and bold math - version with default Greek letters.)}}\fi -\fi\fi -\def\mst@DeclareMathLetter #1{% - \DeclareMathSymbol {#1}{\mathalpha}{mtletterfont}{`#1}% - \expandafter - \DeclareMathSymbol \csname mst@#1\endcsname{\mathalpha}{mtletterfont}{`#1}% - \expandafter\mst@addtodo@az\expandafter #1\csname mst@#1\endcsname -}% -\@tfor\mst@tmp:=abcdefghijklmnopqrstuvwxyz\do - {\expandafter\mst@DeclareMathLetter\mst@tmp}% -\ifmst@frenchmath \def\mst@font@tbu{mtoperatorfont}% - \else \def\mst@font@tbu{mtletterfont}% -\fi -\def\mst@DeclareMathLetter #1{% - \DeclareMathSymbol {#1}{\mathalpha}{\mst@font@tbu}{`#1}% - \expandafter - \DeclareMathSymbol \csname mst@#1\endcsname{\mathalpha}{\mst@font@tbu}{`#1}% - \expandafter\mst@addtodo@AZ\expandafter #1\csname mst@#1\endcsname -}% -\@tfor\mst@tmp:=ABCDEFGHIJKLMNOPQRSTUVWXYZ\do - {\expandafter\mst@DeclareMathLetter\mst@tmp}% -\let\mst@DeclareMathLetter\relax -%% -\ifmst@nodigits\else -\def\mst@font@tbu{mtoperatorfont}% -\ifmst@symboldigits \def\mst@font@tbu{mtpsymbol} \fi -\ifmst@eulerdigits \def\mst@font@tbu{mteulervm} \fi -\DeclareMathSymbol{0}{\mathalpha}{\mst@font@tbu}{`0}% -\DeclareMathSymbol{1}{\mathalpha}{\mst@font@tbu}{`1}% -\DeclareMathSymbol{2}{\mathalpha}{\mst@font@tbu}{`2}% -\DeclareMathSymbol{3}{\mathalpha}{\mst@font@tbu}{`3}% -\DeclareMathSymbol{4}{\mathalpha}{\mst@font@tbu}{`4}% -\DeclareMathSymbol{5}{\mathalpha}{\mst@font@tbu}{`5}% -\DeclareMathSymbol{6}{\mathalpha}{\mst@font@tbu}{`6}% -\DeclareMathSymbol{7}{\mathalpha}{\mst@font@tbu}{`7}% -\DeclareMathSymbol{8}{\mathalpha}{\mst@font@tbu}{`8}% -\DeclareMathSymbol{9}{\mathalpha}{\mst@font@tbu}{`9}% -\fi -\ifmst@symboldelimiters -\def\mst@font@tbu{mtpsymbol}% -\mst@endashfalse -\mst@emdashfalse -\else -\def\mst@font@tbu{mtoperatorfont}% -\fi -\ifmst@noexclam\else\typeout{** \string! and \string?}% -\DeclareMathSymbol{!}{\mathclose}{\mst@font@tbu}{"21}% -\DeclareMathSymbol{\mst@varfam@exclam}{\mathalpha}{\mst@font@tbu}{"21}% -\expandafter\mst@addtodo@nonletters\string!\mathclose\mst@varfam@exclam -\DeclareMathSymbol{?}{\mathclose}{\mst@font@tbu}{"3F}% -\DeclareMathSymbol{\mst@varfam@question}{\mathalpha}{\mst@font@tbu}{"3F}% -\expandafter\mst@addtodo@nonletters\string?\mathclose\mst@varfam@question -\fi -\def\mst@@doasterisk{\let\ast\mst@ast\mst@mathactivate*{}\mst@ast}% -\newcommand*\MTnormalasterisk {\let\mst@doasterisk\relax} -\newcommand*\MTactiveasterisk {\let\mst@doasterisk\mst@@doasterisk} -\ifmst@asterisk\typeout{** asterisk: \string\ast\space and *} - \AtBeginDocument{% - \everymath\expandafter - {\the\everymath \mst@doasterisk \MTnormalasterisk }% - \everydisplay\expandafter - {\the\everydisplay\mst@doasterisk \MTnormalasterisk }} - \ifmst@symbolmisc - \def\mst@bin@ast{% - \mathbin{\mathchoice{\raisebox{-.1\height}% - {\the\textfont\symmtpsymbol\char42}}% - {\raisebox{-.1\height}% - {\the\textfont\symmtpsymbol\char42}}% - {\raisebox{-.1\height}% - {\the\scriptfont\symmtpsymbol\char42}}% - {\raisebox{-.1\height}% - {\the\scriptscriptfont\symmtpsymbol\char42}}}}% - \else - \def\mst@bin@ast{% - \mathbin{\mathchoice{\raisebox{-\mst@lowerast}% - {\the\textfont\symmtoperatorfont\char42}}% - {\raisebox{-\mst@lowerast}% - {\the\textfont\symmtoperatorfont\char42}}% - {\raisebox{-\mst@lowerast}% - {\the\scriptfont\symmtoperatorfont\char42}}% - {\raisebox{-\mst@lowerast}% - {\the\scriptscriptfont\symmtoperatorfont\char42}}}}% +\def\mst@DeclareMathLetter #1{% + \DeclareMathSymbol {#1}{\mathalpha}{mtletterfont}{`#1}% + \expandafter + \DeclareMathSymbol \csname mst@#1\endcsname{\mathalpha}{mtletterfont}{`#1}% + \expandafter\mst@addtodo@az\expandafter #1\csname mst@#1\endcsname +}% +\@tfor\mst@tmp:=abcdefghijklmnopqrstuvwxyz\do + {\expandafter\mst@DeclareMathLetter\mst@tmp}% +\ifmst@frenchmath \def\mst@font@tbu{mtoperatorfont}% + \else \def\mst@font@tbu{mtletterfont}% +\fi +\def\mst@DeclareMathLetter #1{% + \DeclareMathSymbol {#1}{\mathalpha}{\mst@font@tbu}{`#1}% + \expandafter + \DeclareMathSymbol \csname mst@#1\endcsname{\mathalpha}{\mst@font@tbu}{`#1}% + \expandafter\mst@addtodo@AZ\expandafter #1\csname mst@#1\endcsname +}% +\@tfor\mst@tmp:=ABCDEFGHIJKLMNOPQRSTUVWXYZ\do + {\expandafter\mst@DeclareMathLetter\mst@tmp}% +\let\mst@DeclareMathLetter\relax +\ifmst@nodigits\else +\def\mst@font@tbu{mtoperatorfont}% +\ifmst@symboldigits \def\mst@font@tbu{mtpsymbol} \fi +\ifmst@eulerdigits \def\mst@font@tbu{mteulervm} \fi +\DeclareMathSymbol{0}{\mathalpha}{\mst@font@tbu}{`0}% +\DeclareMathSymbol{1}{\mathalpha}{\mst@font@tbu}{`1}% +\DeclareMathSymbol{2}{\mathalpha}{\mst@font@tbu}{`2}% +\DeclareMathSymbol{3}{\mathalpha}{\mst@font@tbu}{`3}% +\DeclareMathSymbol{4}{\mathalpha}{\mst@font@tbu}{`4}% +\DeclareMathSymbol{5}{\mathalpha}{\mst@font@tbu}{`5}% +\DeclareMathSymbol{6}{\mathalpha}{\mst@font@tbu}{`6}% +\DeclareMathSymbol{7}{\mathalpha}{\mst@font@tbu}{`7}% +\DeclareMathSymbol{8}{\mathalpha}{\mst@font@tbu}{`8}% +\DeclareMathSymbol{9}{\mathalpha}{\mst@font@tbu}{`9}% +\fi +\ifmst@symboldelimiters +\def\mst@font@tbu{mtpsymbol}% +\mst@endashfalse +\mst@emdashfalse +\else +\def\mst@font@tbu{mtoperatorfont}% +\fi +\ifmst@noexclam\else\typeout{** \string! and \string?}% +\DeclareMathSymbol{!}{\mathclose}{\mst@font@tbu}{"21}% +\DeclareMathSymbol{\mst@varfam@exclam}{\mathalpha}{\mst@font@tbu}{"21}% +\expandafter\mst@addtodo@nonletters\string!\mathclose\mst@varfam@exclam +\DeclareMathSymbol{?}{\mathclose}{\mst@font@tbu}{"3F}% +\DeclareMathSymbol{\mst@varfam@question}{\mathalpha}{\mst@font@tbu}{"3F}% +\expandafter\mst@addtodo@nonletters\string?\mathclose\mst@varfam@question +\fi +\def\mst@@doasterisk{\let\ast\mst@ast\mst@mathactivate*{}\mst@ast}% +\newcommand*\MTnormalasterisk {\let\mst@doasterisk\relax} +\newcommand*\MTactiveasterisk {\let\mst@doasterisk\mst@@doasterisk} +\ifmst@asterisk\typeout{** asterisk: \string\ast\space and *} + \AtBeginDocument{% + \everymath\expandafter + {\the\everymath \mst@doasterisk \MTnormalasterisk }% + \everydisplay\expandafter + {\the\everydisplay\mst@doasterisk \MTnormalasterisk }} + \ifmst@symbolmisc + \def\mst@bin@ast{% + \mathbin{\mathchoice{\raisebox{-.1\height}% + {\the\textfont\symmtpsymbol\char42}}% + {\raisebox{-.1\height}% + {\the\textfont\symmtpsymbol\char42}}% + {\raisebox{-.1\height}% + {\the\scriptfont\symmtpsymbol\char42}}% + {\raisebox{-.1\height}% + {\the\scriptscriptfont\symmtpsymbol\char42}}}}% + \else + \def\mst@bin@ast{% + \mathbin{\mathchoice{\raisebox{-\mst@lowerast}% + {\the\textfont\symmtoperatorfont\char42}}% + {\raisebox{-\mst@lowerast}% + {\the\textfont\symmtoperatorfont\char42}}% + {\raisebox{-\mst@lowerast}% + {\the\scriptfont\symmtoperatorfont\char42}}% + {\raisebox{-\mst@lowerast}% + {\the\scriptscriptfont\symmtoperatorfont\char42}}}}% \fi \def\mst@varfam@ast{\ifnum\fam=\m@ne\mst@bin@ast\else \mathbin{\mathchoice{\raisebox{-\mst@lowerast}% @@ -1270,119 +782,87 @@ defaultbf,defaultit,defaultsf,defaulttt}\mst@nonormalboldtrue} {\def\relbar{\mathrel{\mathpalette\mathsm@sh\mst@minus@sign}}} {\DeclareRobustCommand\relbar{\mathrel{\smash\mst@minus@sign}}} \def\rightarrowfill{$\m@th\mathord{\relbar}\mkern-7mu% - \cleaders\hbox{$\mkern-2mu\relbar\mkern-2mu$}\hfill - \mkern-7mu\mathord\rightarrow$} -\def\leftarrowfill{$\m@th\mathord\leftarrow\mkern-7mu% - \cleaders\hbox{$\mkern-2mu\relbar\mkern-2mu$}\hfill - \mkern-7mu\mathord{\relbar}$} -\fi -\def\mst@dothe@endashstuff{\edef\mst@tmp@enc{\encodingdefault} -\if1\mst@OneifUniEnc - \AtBeginDocument{% Unicode engines and font - \mst@Umathcode`\-=2 \symmtoperatorfont "\mst@unicodeminus\relax - \mst@Umathchardef\mst@varfam@minus=7 \symmtoperatorfont "\mst@unicodeminus\relax - } -\else -\ifx\mst@tmp@enc\mst@ti % T1 - \DeclareMathSymbol{-}{\mathbin}{mtoperatorfont}{21} - \DeclareMathSymbol{\mst@varfam@minus}{\mathalpha}{mtoperatorfont}{21} -\else -\ifx\mst@tmp@enc\mst@oti % OT1 - \DeclareMathSymbol{-}{\mathbin}{mtoperatorfont}{123} - \DeclareMathSymbol{\mst@varfam@minus}{\mathalpha}{mtoperatorfont}{123} -\else -\ifx\mst@tmp@enc\mst@lyi % LY1 - \DeclareMathSymbol{-}{\mathbin}{mtoperatorfont}{150} - \DeclareMathSymbol{\mst@varfam@minus}{\mathalpha}{mtoperatorfont}{150} -\else % make sure we have neither xetex nor luatex - \ifmst@XeOrLua\mst@aborttrue - \else - \DeclareMathSymbol{-}{\mathbin}{mtoperatorfont} -{\expandafter\the\expandafter\csname\mst@tmp@enc\string\textendash\endcsname} - \DeclareMathSymbol{\mst@varfam@minus}{\mathalpha}{mtoperatorfont} -{\expandafter\the\expandafter\csname\mst@tmp@enc\string\textendash\endcsname} - \fi -\fi\fi\fi\fi} -\def\mst@dothe@emdashstuff{\edef\mst@tmp@enc{\encodingdefault} -\if1\mst@OneifUniEnc - \AtBeginDocument{% Unicode engine and font - \mst@Umathcode`\-=2 \symmtoperatorfont "2014\relax - \mst@Umathchardef\mst@varfam@minus=7 \symmtoperatorfont "2014\relax - } -\else -\ifx\mst@tmp@enc\mst@ti % T1 - \DeclareMathSymbol{-}{\mathbin}{mtoperatorfont}{22} - \DeclareMathSymbol{\mst@varfam@minus}{\mathalpha}{mtoperatorfont}{22} -\else -\ifx\mst@tmp@enc\mst@oti % OT1 - \DeclareMathSymbol{-}{\mathbin}{mtoperatorfont}{124} - \DeclareMathSymbol{\mst@varfam@minus}{\mathalpha}{mtoperatorfont}{124} -\else -\ifx\mst@tmp@enc\mst@lyi % LY1 - \DeclareMathSymbol{-}{\mathbin}{mtoperatorfont}{151} - \DeclareMathSymbol{\mst@varfam@minus}{\mathalpha}{mtoperatorfont}{151} -\else % make sure we have neither xetex nor luatex - \ifmst@XeOrLua\mst@aborttrue - \else - \DeclareMathSymbol{-}{\mathbin}{mtoperatorfont} -{\expandafter\the\expandafter\csname\mst@tmp@enc\string\textemdash\endcsname} - \DeclareMathSymbol{\mst@varfam@minus}{\mathalpha}{mtoperatorfont} -{\expandafter\the\expandafter\csname\mst@tmp@enc\string\textemdash\endcsname} - \fi -\fi\fi\fi\fi} + \cleaders\hbox{$\mkern-2mu\relbar\mkern-2mu$}\hfill + \mkern-7mu\mathord\rightarrow$} +\def\leftarrowfill{$\m@th\mathord\leftarrow\mkern-7mu% + \cleaders\hbox{$\mkern-2mu\relbar\mkern-2mu$}\hfill + \mkern-7mu\mathord{\relbar}$} +\fi \let\mst@subduedminus\empty \let\mst@nonsubduedminus\empty -\ifmst@nominus\else\typeout{** minus as endash} - \edef\mst@tmp@enc{\encodingdefault} - \ifmst@XeOrLua - \if1\mst@OneifUniEnc\expandafter\AtBeginDocument - \else\expandafter\@firstofone - \fi - {\edef\mst@subduedminus - {\mst@Umathcodenum`\noexpand\-=\the\mst@Umathcodenum`\-\relax}}% +\def\mst@dothe@endashstuff#1#2#3{% + \edef\mst@tmp@enc{#3}% + \if1\mst@OneifUniEnc + \mst@Umathchardef#1=2 \symmtoperatorfont "\mst@unicodeminus\relax + \mst@Umathchardef#2=7 \symmtoperatorfont "\mst@unicodeminus\relax \else - \edef\mst@subduedminus{\mathcode`\noexpand\-=\the\mathcode`\-\relax}% - \fi - \mst@abortfalse - \ifmst@endash\mst@dothe@endashstuff\else - \ifmst@emdash\mst@dothe@emdashstuff\else - \if1\mst@OneifUniEnc\expandafter\AtBeginDocument - \else\expandafter\@firstofone - \fi - {\DeclareMathSymbol{-}{\mathbin}{\mst@font@tbu}{"2D}% - \DeclareMathSymbol{\mst@varfam@minus}{\mathalpha}{\mst@font@tbu}{"2D}}% - \fi\fi - \ifmst@abort - \DeclareMathSymbol{-}{\mathbin}{\mst@font@tbu}{"2D} - \DeclareMathSymbol{\mst@varfam@minus}{\mathalpha}{\mst@font@tbu}{"2D} - \fi - \expandafter\mst@addtodo@nonletters\string-\mathbin\mst@varfam@minus - \ifmst@XeOrLua - \if1\mst@OneifUniEnc\expandafter\AtBeginDocument - \else\expandafter\@firstofone - \fi - {\edef\mst@nonsubduedminus - {\mst@Umathcodenum`\noexpand\-=\the\mst@Umathcodenum`\-\relax}}% + \DeclareMathSymbol{#1}{\mathbin}{mtoperatorfont} + {\csname\mst@tmp@enc\string\textendash\endcsname} + \DeclareMathSymbol{#2}{\mathalpha}{mtoperatorfont} + {\csname\mst@tmp@enc\string\textendash\endcsname} + \fi}% mst@dothe@endashstuff +\def\mst@dothe@emdashstuff#1#2#3{% + \edef\mst@tmp@enc{#3}% + \if1\mst@OneifUniEnc + \mst@Umathchardef#1=2 \symmtoperatorfont "2014\relax + \mst@Umathchardef#2=7 \symmtoperatorfont "2014\relax \else - \edef\mst@nonsubduedminus{\mathcode`\noexpand\-=\the\mathcode`\-\relax}% - \fi + \DeclareMathSymbol{#1}{\mathbin}{mtoperatorfont} + {\csname\mst@tmp@enc\string\textemdash\endcsname} + \DeclareMathSymbol{#2}{\mathalpha}{mtoperatorfont} + {\csname\mst@tmp@enc\string\textemdash\endcsname} + \fi}% mst@dothe@emdashstuff +\def\mst@dothe@hyphenstuff#1#2{% + \DeclareMathSymbol{#1}{\mathbin}{\mst@font@tbu}{"2D}% + \DeclareMathSymbol{#2}{\mathalpha}{\mst@font@tbu}{"2D}% +}% +\def\mst@varfam@minus{\@nameuse{mst@varfam@minus@mv\math@version}}% +\ifmst@nominus\else + \expandafter\mst@addtodo@nonletters\string-\mathbin\mst@varfam@minus + \def\mst@nonsubduedminus{% + \edef\mst@tmp@enc{\csname mst@encoding@\math@version\endcsname}% + \if1\mst@OneifUniEnc + \mst@Umathcode`\-=\expandafter + % Working around a bug (or feature...) of XeTeX/LuaTeX: afaict it is + % impossible to use straightforwardly in extended mathcode assignments + % a control sequence as created by \Umathchardef. + % This is counter-intuitive and breaks expectations. + \mst@UmathchardefWorkAround@i + \csname mst@minus@mv\math@version\endcsname + \relax + \else + \mathcode`\-=\@nameuse{mst@minus@mv\math@version}% self-delimiting + \fi + }% \mst@nonsubduedminus +\fi +\def\mst@UmathchardefWorkAround@i + {\expandafter\mst@UmathchardefWorkAround@ii\meaning}% +\def\mst@UmathchardefWorkAround@ii#1"{"}% +\let\mst@subduedhbar\@empty +\let\mst@nonsubduedhbar\@empty +\ifmst@nohbar\else + \def\mst@subduedhbar{\let\hbar\mst@original@hbar}% + \def\mst@nonsubduedhbar{% + \expandafter\let\expandafter\hbar + \csname mst@hbar@mv\math@version\endcsname + }% \fi -%%\def\hbar{{\mathchar'26\mkern-9muh}} % (original definition from latex.ltx) \def\mst@mathrlap{\mathpalette\mst@mathrlapinternal} \def\mst@mathrlapinternal#1#2{\rlap{$\mathsurround=0pt#1{#2}$}} -\def\mst@dothe@hbarstuff{\edef\mst@tmp@enc{\encodingdefault} -\if1\mst@OneifUniEnc - % Unicode engine and font - \mst@Umathchardef\hbar="7 \symmtletterfont "0127 \relax %% or 210F? -\else % I must leave open the T1, OT1 possibility also for XeTeX or LuaTeX - \ifx\mst@ti\mst@tmp@enc - \DeclareMathAccent{\mst@ltbar}{\mathalpha}{mtletterfont}{9} - \else %% assume OT1. Bad idea? Should not provoke an error anyhow - \DeclareMathAccent{\mst@ltbar}{\mathalpha}{mtletterfont}{22} - \fi - \def\hbar{\mst@mathrlap{\mst@ltbar{\ }}h} -\fi } -\ifmst@nohbar\else\typeout{** \string\hbar}\mst@dothe@hbarstuff\fi +\def\mst@dothe@hbarstuff#1#2#3{% + \edef\mst@tmp@enc{#3}% + \if1\mst@OneifUniEnc % Unicode engine and font + \mst@Umathchardef#1="7 \symmtletterfont "0127 \relax %% or 210F? + \else + \begingroup + \def\@text@composite##1\@text@composite##2{##2}% + \let\add@accent\@firstoftwo + \DeclareMathAccent{#2}{\mathalpha}{mtletterfont}% + {\csname\mst@tmp@enc\string\=\endcsname{}}% + \endgroup + \def#1{\mst@mathrlap{#2{\ }}\mst@h}% + \fi +}% end of \mst@dothe@hbarstuff \ifmst@noplus\else\typeout{** \string+ and \string=} \DeclareMathSymbol{+}{\mathbin}{\mst@font@tbu}{"2B} \DeclareMathSymbol{\mst@varfam@plus}{\mathalpha}{\mst@font@tbu}{"2B} @@ -1871,7 +1351,7 @@ defaultbf,defaultit,defaultsf,defaulttt}\mst@nonormalboldtrue} \let\mst@origdigamma\digamma \let\mst@origpartial\partial \let\mst@origwp\wp - \let\mst@origell\ell } + \let\mst@origell\ell }% \MTrecordstandardgreek \MTrecordstandardgreek \renewcommand*{\MTstandardgreek}{% \let\Alpha\mst@origAlpha @@ -1933,7 +1413,7 @@ defaultbf,defaultit,defaultsf,defaulttt}\mst@nonormalboldtrue} \let\partial\mst@origpartial \let\wp\mst@origwp \let\ell\mst@origell -} +}% \MTstandardgreek \renewcommand*{\MTcustomgreek}{% \let\Alpha\mst@Alpha \let\Beta\mst@Beta @@ -1997,80 +1477,636 @@ defaultbf,defaultit,defaultsf,defaulttt}\mst@nonormalboldtrue} \let\wp\mst@wp \ifmst@symbolgreek\else\let\ell\mst@ell\fi \fi - \fi -} -\fi -\let\Mathastextstandardgreek\MTstandardgreek -\let\Mathastextcustomgreek\MTcustomgreek -\ifmst@subdued\else\MTcustomgreek\fi -\edef\mst@tmp@enc{\encodingdefault} -\mst@goaheadtrue -\if1\mst@OneifUniEnc - % Unicode engine and font - \mst@Umathchardef\inodot="7 \symmtletterfont "0131 \relax - \mst@Umathchardef\jnodot="7 \symmtletterfont "0237 \relax -\else -\ifx\mst@tmp@enc\mst@ti % T1 - \DeclareMathSymbol{\inodot}{\mathalpha}{mtletterfont}{25} - \DeclareMathSymbol{\jnodot}{\mathalpha}{mtletterfont}{26} -\else -\ifx\mst@tmp@enc\mst@oti % OT1 - \DeclareMathSymbol{\inodot}{\mathalpha}{mtletterfont}{16} - \DeclareMathSymbol{\jnodot}{\mathalpha}{mtletterfont}{17} -\else -\ifx\mst@tmp@enc\mst@lyi % LY1 - \DeclareMathSymbol{\inodot}{\mathalpha}{mtletterfont}{16} - \DeclareMathSymbol{\jnodot}{\mathalpha}{mtletterfont}{17} -\else - \ifmst@XeOrLua\mst@goaheadfalse\else - \DeclareMathSymbol{\inodot}{\mathalpha}{mtletterfont} -{\expandafter\the\expandafter\csname\mst@tmp@enc\string\i\endcsname} - \DeclareMathSymbol{\jnodot}{\mathalpha}{mtletterfont} -{\expandafter\the\expandafter\csname\mst@tmp@enc\string\j\endcsname} + \fi +}% \MTcustomgreek +\fi +\let\Mathastextstandardgreek\MTstandardgreek +\let\Mathastextcustomgreek\MTcustomgreek +\ifmst@subdued\else\MTcustomgreek\fi +\def\mst@subduedinodot{% + \let\inodot\mst@original@imath + \let\jnodot\mst@original@jmath +}% +\def\mst@nonsubduedinodot{% + \expandafter\let\expandafter\inodot + \csname mst@inodot@mv\math@version\endcsname + \expandafter\let\expandafter\jnodot + \csname mst@jnodot@mv\math@version\endcsname +}% +\def\mst@dothe@inodotstuff#1#2#3{% + \edef\mst@tmp@enc{#3}% + \if1\mst@OneifUniEnc + % Unicode engine and font + \mst@Umathchardef#1="7 \symmtletterfont "0131 \relax + \mst@Umathchardef#2="7 \symmtletterfont "0237 \relax + \else + \DeclareMathSymbol{#1}{\mathalpha}{mtletterfont} + {\csname\mst@tmp@enc\string\i\endcsname} + \DeclareMathSymbol{#2}{\mathalpha}{mtletterfont} + {\csname\mst@tmp@enc\string\j\endcsname} + \fi}% \mst@dothe@inodotstuff +\ifmst@defaultimath\else\typeout{** \string\imath\space and \string\jmath\space} + \AtEndOfPackage{\AtBeginDocument{% + \renewcommand*{\imath}{\inodot}% + \renewcommand*{\jmath}{\jnodot}% + }}% +\fi +\let\mst@subduedmathaccents\@empty +\let\mst@nonsubduedmathaccents\@empty +\ifmst@mathaccents +\def\mst@subduedmathaccents{% + \@tfor\@tempa:={grave}{acute}{check}{breve}{bar}% + {dot}{ddot}{mathring}{hat}{tilde}% + \do + {\expandafter\let\csname\@tempa\expandafter\endcsname + \csname mst@original@\@tempa\endcsname}% +}% +\def\mst@nonsubduedmathaccents{% + \@tfor\@tempa:={grave}{acute}{check}{breve}{bar}% + {dot}{ddot}{mathring}{hat}{tilde}% + \do + {\expandafter\let\csname\@tempa\expandafter\endcsname + \csname mst@\@tempa @mv\math@version\endcsname}% +}% +\def\mst@dothe@mathaccentsstuff#1#2{% + \begingroup + \edef\mst@tmp@enc{#2}% + \def\@text@composite##1\@text@composite##2{##2}% + \let\add@accent\@firstoftwo + \let\add@unicode@accent\@firstoftwo + \if1\mst@OneifUniEnc + \ifmst@unimathaccents + % \` -> \grave + \expandafter\xdef\csname mst@grave@mv#1\endcsname + {\mst@Umathaccent + 7 + \number\symmtoperatorfont\space + \csname#2\string\`\endcsname{}\relax}% + % \' -> \acute + \expandafter\xdef\csname mst@acute@mv#1\endcsname + {\mst@Umathaccent + 7 + \number\symmtoperatorfont\space + \csname#2\string\'\endcsname{}\relax}% + % \v -> \check + \expandafter\xdef\csname mst@check@mv#1\endcsname + {\mst@Umathaccent + 7 + \number\symmtoperatorfont\space + \csname#2\string\v\endcsname{}\relax}% + % \u -> \breve + \expandafter\xdef\csname mst@breve@mv#1\endcsname + {\mst@Umathaccent + 7 + \number\symmtoperatorfont\space + \csname#2\string\u\endcsname{}\relax}% + % \= -> \bar + \expandafter\xdef\csname mst@bar@mv#1\endcsname + {\mst@Umathaccent + 7 + \number\symmtoperatorfont\space + \csname#2\string\=\endcsname{}\relax}% + % \. -> \dot + \expandafter\xdef\csname mst@dot@mv#1\endcsname + {\mst@Umathaccent + 7 + \number\symmtoperatorfont\space + \csname#2\string\.\endcsname{}\relax}% + % \" -> \ddot + \expandafter\xdef\csname mst@ddot@mv#1\endcsname + {\mst@Umathaccent + 7 + \number\symmtoperatorfont\space + \csname#2\string\"\endcsname{}\relax}% + % \r -> \mathring + \expandafter\xdef\csname mst@mathring@mv#1\endcsname + {\mst@Umathaccent + 7 + \number\symmtoperatorfont\space + \csname#2\string\r\endcsname{}\relax}% + % \^ -> \hat + \expandafter\xdef\csname mst@hat@mv#1\endcsname + {\mst@Umathaccent + 7 + \number\symmtoperatorfont\space + \csname#2\string\^\endcsname{}\relax}% + % \~ -> \tilde + \expandafter\xdef\csname mst@tilde@mv#1\endcsname + {\mst@Umathaccent + 7 + \number\symmtoperatorfont\space + \csname#2\string\~\endcsname{}\relax}% + \else + \@tfor\@tempa:={grave}{acute}{check}{breve}{bar}% + {dot}{ddot}{mathring}{hat}{tilde}% + \do + {\expandafter\gdef\csname mst@\@tempa @mv#1\expandafter\endcsname + \expandafter{\csname mst@original@\@tempa\endcsname}}% + \fi + \else + % \` -> \grave + \expandafter\DeclareMathAccent\expandafter + {\csname mst@grave@mv#1\endcsname}{\mathalpha}{mtoperatorfont}% + {\csname#2\string\`\endcsname{}} + % \' -> \acute + \expandafter\DeclareMathAccent\expandafter + {\csname mst@acute@mv#1\endcsname}{\mathalpha}{mtoperatorfont}% + {\csname#2\string\'\endcsname{}} + % \v -> \check + \expandafter\DeclareMathAccent\expandafter + {\csname mst@check@mv#1\endcsname}{\mathalpha}{mtoperatorfont}% + {\csname#2\string\v\endcsname{}} + % \u -> \breve + \expandafter\DeclareMathAccent\expandafter + {\csname mst@breve@mv#1\endcsname}{\mathalpha}{mtoperatorfont}% + {\csname#2\string\u\endcsname{}} + % \= -> \bar + \expandafter\DeclareMathAccent\expandafter + {\csname mst@bar@mv#1\endcsname}{\mathalpha}{mtoperatorfont}% + {\csname#2\string\=\endcsname{}} + % \. -> \dot + \expandafter\DeclareMathAccent\expandafter + {\csname mst@dot@mv#1\endcsname}{\mathalpha}{mtoperatorfont}% + {\csname#2\string\.\endcsname{}} + % \" -> \ddot + \expandafter\DeclareMathAccent\expandafter + {\csname mst@ddot@mv#1\endcsname}{\mathalpha}{mtoperatorfont}% + {\csname#2\string\"\endcsname{}} + % \r -> \mathring + \expandafter\DeclareMathAccent\expandafter + {\csname mst@mathring@mv#1\endcsname}{\mathalpha}{mtoperatorfont}% + {\csname#2\string\r\endcsname{}} + % \^ -> \hat + \expandafter\DeclareMathAccent\expandafter + {\csname mst@hat@mv#1\endcsname}{\mathalpha}{mtoperatorfont}% + {\csname#2\string\^\endcsname{}} + % \~ -> \tilde + \expandafter\DeclareMathAccent\expandafter + {\csname mst@tilde@mv#1\endcsname}{\mathalpha}{mtoperatorfont}% + {\csname#2\string\~\endcsname{}} + \fi + \endgroup +}% +\fi % \ifmst@mathaccents +\newcommand*\MTDeclareVersion[6][]{% + \edef\mst@declareversionargs{{#1}{#2}{#3}{#4}{#5}{#6}}% + \edef\mst@version{#2}% + \DeclareMathVersion{\mst@version}% + \MTDeclareVersion@ +}% \MTDeclareVersion +\newcommand*\MTDeclareVersion@[1][]{% + \edef\mst@tmp{#1}% + \ifx\mst@tmp\empty\else + \global\expandafter\let\csname mv@\mst@version\expandafter\endcsname + \csname mv@#1\endcsname + \typeout{** Math version `\mst@version\string' inherits from `#1\string'.}% + \fi + \expandafter\MTDeclareVersion@@\mst@declareversionargs +}% \MTDeclareVersion@ +\newcommand*\MTDeclareVersion@@[6]{% + \expandafter\edef\csname mst@encoding@\mst@version\endcsname{#3}% + \expandafter\edef\csname mst@family@\mst@version\endcsname{#4}% + \expandafter\edef\csname mst@series@\mst@version\endcsname{#5}% + \expandafter\edef\csname mst@shape@\mst@version\endcsname{#6}% + \expandafter\edef\csname mst@boldvariant@\mst@version\endcsname{\mst@bold}% + \expandafter\edef\csname mst@itdefault@\mst@version\endcsname{\itdefault}% + \expandafter\edef\csname mst@rmdefault@\mst@version\endcsname{\rmdefault}% + \expandafter\edef\csname mst@sfdefault@\mst@version\endcsname{\sfdefault}% + \expandafter\edef\csname mst@ttdefault@\mst@version\endcsname{\ttdefault}% + \expandafter\edef\csname mst@exists@skip@\mst@version\endcsname + {\mst@exists@skip}% + \expandafter\edef\csname mst@forall@skip@\mst@version\endcsname + {\mst@forall@skip}% + \expandafter\edef\csname mst@prime@skip@\mst@version\endcsname + {\mst@prime@skip}% + \def\mst@tmp{#1}% + \ifx\mst@tmp\empty + \ifmst@italic + \SetSymbolFont{mtletterfont}{#2}{#3}{#4}{#5}{\mst@ltsh}% + \typeout{** Latin letters in math version `#2\string' will use the font + #3/#4/#5/\mst@ltsh^^J% + ** Other characters (digits, ...) and \protect\log-like names + will be in #6 shape.}% + \expandafter\edef\csname mst@ltshape@\mst@version\endcsname{\mst@ltsh}% + \else + \SetSymbolFont{mtletterfont}{#2}{#3}{#4}{#5}{#6}% + \typeout{** Latin letters in math version `#2\string' will use the fonts + #3/#4/#5(\mst@bold)/#6}% + \expandafter\edef\csname mst@ltshape@\mst@version\endcsname{#6}% + \fi + \else + \SetSymbolFont{mtletterfont}{#2}{#3}{#4}{#5}{#1}% + \typeout{** Latin letters in math version `#2\string' will use the font + #3/#4/#5/#1^^J% + ** Other characters (digits, ...) and \protect\log-like + names will be in #6 shape.}% + \expandafter\edef\csname mst@ltshape@\mst@version\endcsname{#1}% + \fi + \ifmst@nonormalbold\else + \SetMathAlphabet{\mathnormalbold}{#2}{#3}{#4}{\mst@bold}% + {\csname mst@ltshape@\mst@version\endcsname}% + \fi + \SetSymbolFont{mtoperatorfont}{#2}{#3}{#4}{#5}{#6}% + \ifmst@defaultbf\else\SetMathAlphabet{\Mathbf}{#2}{#3}{#4}{\mst@bold}{#6}\fi + \ifmst@defaultit\else\SetMathAlphabet{\Mathit}{#2}{#3}{#4}{#5}{\itdefault}\fi + \ifmst@defaultsf\else\SetMathAlphabet{\Mathsf}{#2}{#3}{\sfdefault}{#5}{#6}\fi + \ifmst@defaulttt\else\SetMathAlphabet{\Mathtt}{#2}{#3}{\ttdefault}{#5}{#6}\fi + \ifmst@needeuler + \SetMathAlphabet{\MathEulerBold}{#2}{U}{zeur}{\mst@bold}{n}% + \fi + \def\mst@greek@lsh@loc{\csname mst@ltshape@\mst@version\endcsname}% + \def\mst@greek@ush@loc{\csname mst@shape@\mst@version\endcsname}% + \ifmst@itgreek\def\mst@greek@lsh@loc{\itdefault}% + \def\mst@greek@ush@loc{\itdefault}% + \fi + \ifmst@upgreek\def\mst@greek@lsh@loc{\updefault}% + \def\mst@greek@ush@loc{\updefault}% + \fi + \ifmst@frenchmath + \ifmst@itgreek\else + \ifmst@upgreek\else + \def\mst@greek@lsh@loc{\csname mst@shape@\mst@version\endcsname}% + \def\mst@greek@ush@loc{\csname mst@shape@\mst@version\endcsname}% + \fi\fi + \fi + \ifcase\mst@greek@select + \or\def\mst@greek@ush@loc{\itdefault}% + \or\def\mst@greek@ush@loc{\updefault}% + \fi + \ifmst@LGRgreeks + \SetSymbolFont{mtlgrfontlower}{#2}{LGR}{#4}{#5}{\mst@greek@lsh@loc}% + \SetSymbolFont{mtlgrfontupper}{#2}{LGR}{#4}{#5}{\mst@greek@ush@loc}% + \typeout{** Greek letters (\mst@greek@lsh@loc/\mst@greek@ush@loc) will use + LGR font #4\ifmst@subdued ^^J** (in non subdued versions)\fi}% + \else + \ifmst@selfGreeks + \SetSymbolFont{mtselfGreekfont}{#2}{OT1}{#4}{#5}{\mst@greek@ush@loc}% + \typeout{** Capital Greek letters (\mst@greek@lsh@loc/\mst@greek@ush@loc) + will use OT1 font #4\ifmst@subdued ^^J** (in non subdued versions)\fi}% + \else + \ifmst@LGRgreek + \SetSymbolFont{mtlgrfontlower}{#2}{LGR}{\mst@greekfont}{#5}{\mst@greek@lsh@loc}% + \SetSymbolFont{mtlgrfontupper}{#2}{LGR}{\mst@greekfont}{#5}{\mst@greek@ush@loc}% + \typeout{** Greek letters (\mst@greek@lsh@loc/\mst@greek@ush@loc) will use + LGR font \mst@greekfont\ifmst@subdued ^^J** (in non subdued versions)\fi}% + \else + \ifmst@selfGreek + \SetSymbolFont{mtselfGreekfont}{#2}{OT1}{\mst@greekfont}{#5}{\mst@greek@ush@loc}% + \typeout{** Capital Greek letters (\mst@greek@lsh@loc/\mst@greek@ush@loc) + will use OT1 font \mst@greekfont\ifmst@subdued ^^J** (in non subdued versions)\fi}% + \fi + \fi + \fi + \fi + \edef\mst@tmp{\expandafter\noexpand\csname mst@hbar@mv#2\endcsname + \expandafter\noexpand\csname mst@ltbar@mv#2\endcsname}% + \expandafter\mst@dothe@hbarstuff\mst@tmp{#3}% + \edef\mst@tmp{\expandafter\noexpand\csname mst@inodot@mv#2\endcsname + \expandafter\noexpand\csname mst@jnodot@mv#2\endcsname}% + \expandafter\mst@dothe@inodotstuff\mst@tmp{#3}% + \ifmst@mathaccents + \mst@dothe@mathaccentsstuff{#2}{#3}% + \fi + \edef\mst@tmp{\expandafter\noexpand\csname mst@minus@mv#2\endcsname + \expandafter\noexpand\csname mst@varfam@minus@mv#2\endcsname}% + \ifmst@endash + \expandafter\mst@dothe@endashstuff\mst@tmp{#3}% + \else + \ifmst@emdash + \expandafter\mst@dothe@emdashstuff\mst@tmp{#3}% + \else + \expandafter\mst@dothe@hyphenstuff\mst@tmp + \fi + \fi +}% \MTDeclareVersion@@ +\let\MathastextDeclareVersion\MTDeclareVersion +\newcommand*\MTversion {\@ifstar\MTversion@s\MTversion@ } +\newcommand*\MTversion@s [1]{\mathversion{#1}\MTversion@@ } +\newcommand*\MTversion@ [2][]{% + \mathversion{#2}% defines \math@version as expanded #2 + \edef\mst@tmpa{#1}% + \ifx\mst@tmpa\empty + \let\mst@tmp\math@version + \else + \let\mst@tmp\mst@tmpa + \fi + \edef\encodingdefault {\csname mst@encoding@\mst@tmp\endcsname}% + \edef\familydefault {\csname mst@family@\mst@tmp\endcsname}% + \edef\seriesdefault {\csname mst@series@\mst@tmp\endcsname}% + \edef\shapedefault {\csname mst@shape@\mst@tmp\endcsname}% + \edef\bfdefault {\csname mst@boldvariant@\mst@tmp\endcsname}% + \edef\itdefault {\csname mst@itdefault@\mst@tmp\endcsname}% + \edef\rmdefault {\csname mst@rmdefault@\mst@tmp\endcsname}% + \edef\sfdefault {\csname mst@sfdefault@\mst@tmp\endcsname}% + \edef\ttdefault {\csname mst@ttdefault@\mst@tmp\endcsname}% + \usefont{\encodingdefault}{\familydefault}{\seriesdefault}{\shapedefault}% + \MTversion@@ +}% \MTversion@ +\newcommand*\MTversion@@ {% + \MTexistsdoesskip + \MTforalldoesskip + \MTprimedoesskip + \mst@exists@muskip\csname mst@exists@skip@\math@version\endcsname\relax + \mst@forall@muskip\csname mst@forall@skip@\math@version\endcsname\relax + \mst@prime@muskip\csname mst@prime@skip@\math@version\endcsname\relax + \edef\mst@tmpa{\csname mst@ltshape@\math@version\endcsname}% + \edef\mst@tmpb{\csname mst@shape@\math@version\endcsname}% + \MTmathoperatorsobeymathxx + \MTeverymathdefault + \MTcustomizenewmcodes + \@for\mst@tmpc:=it,sl\do{\ifx\mst@tmpc\mst@tmpa\MTnoicinmath\fi}% + \ifmst@frenchmath + \def\mst@ITcorr{\ifnum\fam=\m@ne\/\fi}% + \@for\mst@tmpc:=it,sl\do{\ifx\mst@tmpc\mst@tmpb\MTnoICinmath\fi}% + \fi + \ifmst@subdued + \def\mst@tmpa{normal}% + \ifx\math@version\mst@tmpa + \mst@restorealphabets + \MTstandardgreek + \MTmathoperatorsdonotobeymathxx + \MTnormalexists + \MTnormalforall + \MTeverymathoff + \MTresetnewmcodes + \mst@subduedhbar + \mst@subduedinodot + \mst@subduedmathaccents + \mst@subduedminus + \else + \def\mst@tmpa{bold}% + \ifx\math@version\mst@tmpa + \mst@restorealphabets + \MTstandardgreek + \MTmathoperatorsdonotobeymathxx + \MTnormalexists + \MTnormalforall + \MTeverymathoff + \MTresetnewmcodes + \mst@subduedhbar + \mst@subduedinodot + \mst@subduedmathaccents + \mst@subduedminus + \else + \mst@setalphabets + \MTcustomgreek + \mst@nonsubduedhbar + \mst@nonsubduedinodot + \mst@nonsubduedmathaccents + \mst@nonsubduedminus + \fi + \fi + \else + \MTcustomgreek % new with 1.3d + \mst@nonsubduedhbar + \mst@nonsubduedinodot + \mst@nonsubduedmathaccents + \mst@nonsubduedminus + \fi +}% \MTversion@@ +\let\MathastextVersion\MTversion +\let\Mathastextversion\MTversion +\let\MTVersion\MTversion +\let\mathastextversion\MTversion +\newcommand*\MTWillUse[5][]{ + \MTencoding{#2} + \MTfamily{#3} + \MTseries{#4} + \MTshape{#5} + \ifmst@italic\MTlettershape{\itdefault}\fi % was missing in v 1.14 and prior + \edef\mst@tmp{#1} + \ifx\mst@tmp\empty\else\MTlettershape{#1}\fi + \Mathastext} +\let\MathastextWillUse\MTWillUse +\let\Mathastextwilluse\MTWillUse +\def\Mathastext {\@ifnextchar [\Mathastext@declare\Mathastext@ } +\def\Mathastext@declare [#1]{% + \edef\mst@tmp{#1}% + \ifx\mst@tmp\empty + \expandafter\@firstoftwo + \else\expandafter\@secondoftwo + \fi + \Mathastext@ + {\MTDeclareVersion[\mst@ltsh]{#1}{\mst@enc}{\mst@fam}{\mst@ser}{\mst@opsh}}% +}% \Mathastext@declare +\def\Mathastext@ {% + \mst@update@greeksh + \edef\mst@encoding@normal{\mst@enc}% + \edef\mst@family@normal{\mst@fam}% + \edef\mst@series@normal{\mst@ser}% + \edef\mst@shape@normal{\mst@opsh}% + \edef\mst@ltshape@normal{\mst@ltsh}% + \edef\mst@itdefault@normal{\itdefault}% + \edef\mst@rmdefault@normal{\rmdefault}% + \edef\mst@sfdefault@normal{\sfdefault}% + \edef\mst@ttdefault@normal{\ttdefault}% + \edef\mst@boldvariant@normal{\mst@bold}% + \edef\mst@exists@skip@normal{\mst@exists@skip}% + \edef\mst@forall@skip@normal{\mst@forall@skip}% + \edef\mst@prime@skip@normal{\mst@prime@skip}% + \edef\mst@encoding@bold{\mst@enc}% + \edef\mst@family@bold{\mst@fam}% + \edef\mst@series@bold{\mst@bold}% + \edef\mst@shape@bold{\mst@opsh}% + \edef\mst@ltshape@bold{\mst@ltsh}% + \edef\mst@boldvariant@bold{\mst@bold}% + \edef\mst@itdefault@bold{\itdefault}% + \edef\mst@rmdefault@bold{\rmdefault}% + \edef\mst@sfdefault@bold{\sfdefault}% + \edef\mst@ttdefault@bold{\ttdefault}% + \edef\mst@exists@skip@bold{\mst@exists@skip}% + \edef\mst@forall@skip@bold{\mst@forall@skip}% + \edef\mst@prime@skip@bold{\mst@prime@skip}% + \ifmst@subdued + \def\mst@exists@skip@normal{0mu}% + \def\mst@forall@skip@normal{0mu}% + \def\mst@prime@skip@normal{0mu}% + \def\mst@exists@skip@bold{0mu}% + \def\mst@forall@skip@bold{0mu}% + \def\mst@prime@skip@bold{0mu}% + \else % not subdued + \ifmst@italic + \ifmst@frenchmath + \mst@exists@muskip\mst@exists@skip\relax + \mst@forall@muskip\mst@forall@skip\relax + \mst@prime@muskip\mst@prime@skip\relax + \else + \def\mst@exists@skip@normal{0mu}% + \def\mst@forall@skip@normal{0mu}% + \def\mst@prime@skip@normal{0mu}% + \def\mst@exists@skip@bold{0mu}% + \def\mst@forall@skip@bold{0mu}% + \def\mst@prime@skip@bold{0mu}% + \fi + \else + \mst@exists@muskip\mst@exists@skip\relax + \mst@forall@muskip\mst@forall@skip\relax + \mst@prime@muskip\mst@prime@skip\relax + \fi + \fi +%% v1.15f + \ifmst@nonormalbold\else + \SetMathAlphabet{\mathnormalbold}{normal}{\mst@encoding@normal}% + {\mst@family@normal}% + {\mst@boldvariant@normal}% + {\mst@ltshape@normal}% + \SetMathAlphabet{\mathnormalbold}{bold}{\mst@encoding@bold}% + {\mst@family@bold}% + {\mst@boldvariant@bold}% + {\mst@ltshape@bold}% + \fi +%% v1.15f adds \ifmst@default.. checks + \ifmst@subdued\else + \SetSymbolFont{mtletterfont}{normal}{\mst@encoding@normal}% + {\mst@family@normal}% + {\mst@series@normal}% + {\mst@ltshape@normal}% + \SetSymbolFont{mtletterfont}{bold} {\mst@encoding@bold}% + {\mst@family@bold}% + {\mst@series@bold}% + {\mst@ltshape@bold}% + \SetSymbolFont{mtoperatorfont}{normal}{\mst@encoding@normal}% + {\mst@family@normal}% + {\mst@series@normal}% + {\mst@shape@normal}% + \SetSymbolFont{mtoperatorfont}{bold} {\mst@encoding@bold}% + {\mst@family@bold}% + {\mst@series@bold}% + {\mst@shape@bold}% + \ifmst@defaultbf\else + \SetMathAlphabet{\Mathbf}{normal}{\mst@encoding@normal}% + {\mst@family@normal}% + {\mst@series@bold}% + {\mst@shape@normal}% + \SetMathAlphabet{\Mathbf}{bold}{\mst@encoding@bold}% + {\mst@family@bold}% + {\mst@series@bold}% + {\mst@shape@bold}% \fi -\fi\fi\fi\fi -\let\mst@inodot\inodot -\let\mst@jnodot\jnodot -\ifmst@defaultimath\else\typeout{** \string\imath\space and \string\jmath\space} - \ifmst@goahead - \AtEndOfPackage{\AtBeginDocument{% - \renewcommand*{\imath}{\inodot}% - \renewcommand*{\jmath}{\jnodot}% - }}% + \ifmst@defaultit\else + \SetMathAlphabet{\Mathit}{normal}{\mst@encoding@normal}% + {\mst@family@normal}% + {\mst@series@normal}% + {\mst@itdefault@normal}% + \SetMathAlphabet{\Mathit}{bold}{\mst@encoding@bold}% + {\mst@family@bold}% + {\mst@series@bold}% + {\mst@itdefault@bold}% + \fi + \ifmst@defaultsf\else + \SetMathAlphabet{\Mathsf}{normal}{\mst@encoding@normal}% + {\mst@sfdefault@normal}% + {\mst@series@normal}% + {\mst@shape@normal}% + \SetMathAlphabet{\Mathsf}{bold}{\mst@encoding@bold}% + {\mst@sfdefault@bold}% + {\mst@series@bold}% + {\mst@shape@bold}% + \fi + \ifmst@defaulttt\else + \SetMathAlphabet{\Mathtt}{normal}{\mst@encoding@normal}% + {\mst@ttdefault@normal}% + {\mst@series@normal}% + {\mst@shape@normal}% + \SetMathAlphabet{\Mathtt}{bold}{\mst@encoding@bold}% + {\mst@ttdefault@bold}% + {\mst@series@bold}% + {\mst@shape@bold}% + \fi + \fi % de \ifmst@subdued + \ifmst@needeuler + \SetSymbolFont{mteulervm}{bold}{U}{zeur}{\mst@boldvariant@normal}{n}% + \SetMathAlphabet{\MathEulerBold}{normal}% + {U}{zeur}{\mst@boldvariant@normal}{n}% + \SetMathAlphabet{\MathEulerBold}{bold}% + {U}{zeur}{\mst@boldvariant@normal}{n}% \fi -\fi -\edef\mst@tmp@enc{\encodingdefault} %% rather one too many than sorry -\ifmst@mathaccents\typeout{** math accents} -\ifx\mst@ti\mst@tmp@enc -\DeclareMathAccent{\acute}{\mathalpha}{mtoperatorfont}{1} -\DeclareMathAccent{\grave}{\mathalpha}{mtoperatorfont}{0} -\DeclareMathAccent{\ddot}{\mathalpha}{mtoperatorfont}{4} -\DeclareMathAccent{\tilde}{\mathalpha}{mtoperatorfont}{3} -\DeclareMathAccent{\bar}{\mathalpha}{mtoperatorfont}{9} -\DeclareMathAccent{\breve}{\mathalpha}{mtoperatorfont}{8} -\DeclareMathAccent{\check}{\mathalpha}{mtoperatorfont}{7} -\DeclareMathAccent{\hat}{\mathalpha}{mtoperatorfont}{2} -\DeclareMathAccent{\dot}{\mathalpha}{mtoperatorfont}{10} -\DeclareMathAccent{\mathring}{\mathalpha}{mtoperatorfont}{6} -\else -\DeclareMathAccent{\acute}{\mathalpha}{mtoperatorfont}{19} -\DeclareMathAccent{\grave}{\mathalpha}{mtoperatorfont}{18} -\DeclareMathAccent{\ddot}{\mathalpha}{mtoperatorfont}{127} -\DeclareMathAccent{\tilde}{\mathalpha}{mtoperatorfont}{126} -\DeclareMathAccent{\bar}{\mathalpha}{mtoperatorfont}{22} -\DeclareMathAccent{\breve}{\mathalpha}{mtoperatorfont}{21} -\DeclareMathAccent{\check}{\mathalpha}{mtoperatorfont}{20} -\DeclareMathAccent{\hat}{\mathalpha}{mtoperatorfont}{94} -\DeclareMathAccent{\dot}{\mathalpha}{mtoperatorfont}{95} -\DeclareMathAccent{\mathring}{\mathalpha}{mtoperatorfont}{23} - \ifx\mst@lyi\mst@tmp@enc % LY1 encoding - \DeclareMathAccent{\dot}{\mathalpha}{mtoperatorfont}{5} + \ifmst@needsymbol\SetSymbolFont{mtpsymbol}{bold}% + {U}{psy}{\mst@boldvariant@normal}{n}% + \fi + \ifmst@subdued\else + \ifmst@LGRgreek + \SetSymbolFont{mtlgrfontlower}{normal}{LGR}% + {\mst@greekfont}{\mst@series@normal}{\mst@greek@lsh}% + \SetSymbolFont{mtlgrfontlower}{bold}{LGR}% + {\mst@greekfont}{\mst@boldvariant@normal}{\mst@greek@lsh}% + \SetSymbolFont{mtlgrfontupper}{normal}{LGR}% + {\mst@greekfont}{\mst@series@normal}{\mst@greek@ush}% + \SetSymbolFont{mtlgrfontupper}{bold}{LGR}% + {\mst@greekfont}{\mst@boldvariant@bold}{\mst@greek@ush}% + \else + \ifmst@selfGreek + \SetSymbolFont{mtselfGreekfont}{normal}{OT1}% + {\mst@greekfont}{\mst@series@normal}{\mst@greek@ush}% + \SetSymbolFont{mtselfGreekfont}{bold}{OT1}% + {\mst@greekfont}{\mst@boldvariant@bold}{\mst@greek@ush}% + \fi + \fi + \fi + \ifmst@subdued + \typeout{** subdued mode will be activated for the normal and bold math versions}% \else - \ifx\mst@oti\mst@tmp@enc\else - \typeout{** mathastext: math accents have been assumed to be^^J% - ** as in OT1 encoding.} - \fi + \typeout{** Latin letters in the normal (resp. bold) math versions are now^^J% + ** set up to use the fonts + \mst@encoding@normal/\mst@family@normal/\mst@series@normal% + (\mst@boldvariant@normal)/\mst@ltshape@normal}% + \ifmst@LGRgreek\typeout{** Greek letters (\mst@greek@lsh/\mst@greek@ush) + will use LGR/\mst@greekfont}% + \fi + \ifmst@nodigits\else + \typeout{** Other characters (digits, ...) and \protect\log-like names will be^^J% + ** typeset with the \mst@shape@normal\space shape.}% + \fi + \fi + \ifmst@nohbar\else + \typeout{** \string\hbar}% + \mst@dothe@hbarstuff + \mst@hbar@mvnormal\mst@ltbar@mvnormal\mst@encoding@normal + \let\mst@hbar@mvbold\mst@hbar@mvnormal + \fi + \mst@dothe@inodotstuff\inodot\jnodot\mst@encoding@normal + \let\mst@inodot@mvnormal\inodot + \let\mst@inodot@mvbold\inodot + \let\mst@jnodot@mvnormal\jnodot + \let\mst@jnodot@mvbold\jnodot + \ifmst@mathaccents + \typeout{** math accents}% + \mst@dothe@mathaccentsstuff{normal}\mst@encoding@normal + \fi + \ifmst@nominus\else + \typeout{** minus as endash}% + \ifmst@endash + \mst@dothe@endashstuff\mst@minus@mvnormal\mst@varfam@minus@mvnormal + \mst@encoding@normal + \mst@dothe@endashstuff\mst@minus@mvbold\mst@varfam@minus@mvbold + \mst@encoding@normal + \else + \ifmst@emdash + \mst@dothe@emdashstuff\mst@minus@mvnormal\mst@varfam@minus@mvnormal + \mst@encoding@normal + \mst@dothe@emdashstuff\mst@minus@mvbold\mst@varfam@minus@mvbold + \mst@encoding@normal + \else + \mst@dothe@hyphenstuff\mst@minus@mvnormal\mst@varfam@minus@mvnormal + \let\mst@minus@mvbold\mst@minus@mvnormal + \let\mst@varfam@minus@mvbold\mst@varfam@minus@mvnormal + \fi \fi + \fi +}% \Mathastext@ +\let\mathastext\Mathastext +\Mathastext +\ifmst@eulergreek + \typeout{** Greek letters will use the Euler font. Use \protect\MathastextEulerScale{} to scale the + font.}% + \ifmst@subdued{\typeout{** (subdued mode: normal and bold math + version with default Greek letters.)}}\fi +\else +\ifmst@symbolgreek + \typeout{** Greek letters will use the PostScript Symbol font. Use^^J% + ** \protect\MathastextSymbolScale{} to scale the font.}% + \ifmst@subdued{\typeout{** (subdued mode: normal and bold math + version with default Greek letters.)}}\fi \fi\fi \ifmst@defaultsizes\else \providecommand\@xxxpt{29.86} @@ -2118,6 +2154,128 @@ defaultbf,defaultit,defaultsf,defaulttt}\mst@nonormalboldtrue} \MTicinmath \MTfixfonts }% +\AtBeginDocument{% + \everymath\expandafter{\the\everymath + \mst@the\mst@do@nonletters \let\mst@the\@gobble + \mst@theeasy\mst@do@easynonletters \let\mst@theeasy\@gobble + \mst@thef\mst@do@az \let\mst@thef\@gobble + \mst@theF\mst@do@AZ \let\mst@theF\@gobble}% + \everydisplay\expandafter{\the\everydisplay + \mst@the\mst@do@nonletters \let\mst@the\@gobble + \mst@theeasy\mst@do@easynonletters \let\mst@theeasy\@gobble + \mst@thef\mst@do@az \let\mst@thef\@gobble + \mst@theF\mst@do@AZ \let\mst@theF\@gobble}% + \MTcustomizenewmcodes + \let\mst@original@hbar\hbar + \let\mst@original@imath\imath + \let\mst@original@jmath\jmath + \@tfor\@tempa:={grave}{acute}{check}{breve}{bar}% + {dot}{ddot}{mathring}{hat}{tilde}% + \do + {\expandafter\let\csname mst@original@\@tempa\expandafter\endcsname + \csname \@tempa\endcsname}% + \ifmst@XeOrLua + \edef\mst@subduedminus + {\mst@Umathcodenum`\noexpand\-=\the\mst@Umathcodenum`\-\relax}% + \else + \edef\mst@subduedminus{\mathcode`\noexpand\-=\the\mathcode`\-\relax}% + \fi + \ifmst@subdued + \MTeverymathoff + \MTresetnewmcodes + \MTnoicinmath + \MTmathoperatorsdonotobeymathxx + %\mst@subduedhbar + \let\inodot\imath + \let\jnodot\jmath + %\mst@subduedmathaccents + \mst@subduedminus + \else + \mst@nonsubduedhbar + \mst@nonsubduedmathaccents + \mst@nonsubduedminus + \ifx\mst@itcorr\@undefined + \def\mst@itcorr{\ifnum\fam=\m@ne\/\fi}% + \@for\mst@tmp:=it,sl\do + {\ifx\mst@tmp\mst@ltshape@normal\let\mst@itcorr\@empty\fi }% + \fi + \ifx\mst@ITcorr\@undefined + \let\mst@ITcorr\mst@itcorr + \ifmst@frenchmath + \def\mst@ITcorr{\ifnum\fam=\m@ne\/\fi}% + \@for\mst@tmp:=it,sl\do + {\ifx\mst@tmp\mst@shape@normal\let\mst@ITcorr\@empty\fi }% + \fi + \fi + \fi +}% \AtBeginDocument +\ifmst@subdued +\AtBeginDocument{% + \def\mst@reserved#1\getanddefine@fonts\symletters#2#3\@nil{% + \def\mst@normalmv@letter{#2}}% + \expandafter\mst@reserved\mv@normal\@nil + \def\mst@reserved#1\getanddefine@fonts\symletters#2#3\@nil{% + \def\mst@boldmv@letter{#2}}% + \expandafter\mst@reserved\mv@bold\@nil + \def\mst@reserved#1\getanddefine@fonts\symoperators#2#3\@nil{% + \def\mst@normalmv@operator{#2}}% + \expandafter\mst@reserved\mv@normal\@nil + \def\mst@reserved#1\getanddefine@fonts\symoperators#2#3\@nil{% + \def\mst@boldmv@operator{#2}}% + \expandafter\mst@reserved\mv@bold\@nil + \edef\mst@tmp@enc{\mst@encoding@normal}% + \def\mst@reserved#1/#2/#3/#4/{\gdef\mst@debut{#1}\gdef\mst@reste{#2/#3/#4}}% + \begingroup\escapechar\m@ne + \xdef\mst@funnyoti{\expandafter\string\csname OT1\endcsname}% + \expandafter\expandafter\expandafter + \mst@reserved\expandafter\string\mst@normalmv@operator/% + \endgroup + \ifx\mst@debut\mst@funnyoti\ifx\mst@tmp@enc\mst@oti\def\mst@tmp@enc{T1}\fi\fi + \edef\mst@normalmv@operator{\expandafter\noexpand\csname + \if1\mst@OneifUniEnc + \ifx\mst@debut\mst@funnyoti T1\else\mst@debut\fi + \else + \mst@tmp@enc + \fi/\mst@reste\endcsname}% + \edef\mst@tmp@enc{\mst@encoding@bold}% + \begingroup\escapechar\m@ne + \expandafter\expandafter\expandafter + \mst@reserved\expandafter\string\mst@boldmv@operator/% + \endgroup + \ifx\mst@debut\mst@funnyoti\ifx\mst@tmp@enc\mst@oti\def\mst@tmp@enc{T1}\fi\fi + \edef\mst@boldmv@operator{\expandafter\noexpand\csname + \if1\mst@OneifUniEnc + \ifx\mst@debut\mst@funnyoti T1\else\mst@debut\fi + \else + \mst@tmp@enc + \fi/\mst@reste\endcsname}% + \typeout{** ...entering subdued mode...}% + \expandafter\SetSymbolFont@ \expandafter\mv@normal\mst@normalmv@letter\symmtletterfont + \expandafter\SetSymbolFont@ \expandafter\mv@bold\mst@boldmv@letter\symmtletterfont + \expandafter\SetSymbolFont@ \expandafter\mv@normal\mst@normalmv@operator\symmtoperatorfont + \expandafter\SetSymbolFont@ \expandafter\mv@bold\mst@boldmv@operator\symmtoperatorfont + \typeout{** ...done.}% +}% \AtBeginDocument +\fi % \ifmst@subdued +\expandafter \gdef \expandafter \@preamblecmds \expandafter {\@preamblecmds +\do\MTitgreek +\do\MTupgreek +\do\MTitGreek +\do\MTitGreek +\do\Mathastextitgreek +\do\Mathastextupgreek +\do\MathastextitGreek +\do\MathastextitGreek +\do\MTgreekfont +\do\Mathastextgreekfont +\do\MTDeclareVersion +\do\MathastextDeclareVersion +\do\MTWillUse +\do\MathastextWillUse +\do\Mathastextwilluse +\do\Mathastext +\do\mathastext +} \endinput %% %% End of file `mathastext.sty'. -- cgit v1.2.3