diff options
author | Karl Berry <karl@freefriends.org> | 2022-11-22 21:44:39 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2022-11-22 21:44:39 +0000 |
commit | 383ade8f42bfc4c156b9739d28ae96d370178753 (patch) | |
tree | 44cdf51226c160ef32332542b3777c8f2cde4b40 /Master/texmf-dist/tex/xetex | |
parent | cebc6e65cc9a429afbc4ae53d5a8b67d18d72351 (diff) |
unimath-plain-xetex (22nov22)
git-svn-id: svn://tug.org/texlive/trunk@65085 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/xetex')
-rw-r--r-- | Master/texmf-dist/tex/xetex/unimath-plain-xetex/unimath-plain-xetex.tex | 36 |
1 files changed, 28 insertions, 8 deletions
diff --git a/Master/texmf-dist/tex/xetex/unimath-plain-xetex/unimath-plain-xetex.tex b/Master/texmf-dist/tex/xetex/unimath-plain-xetex/unimath-plain-xetex.tex index 37118739d8a..5346a349632 100644 --- a/Master/texmf-dist/tex/xetex/unimath-plain-xetex/unimath-plain-xetex.tex +++ b/Master/texmf-dist/tex/xetex/unimath-plain-xetex/unimath-plain-xetex.tex @@ -14,7 +14,6 @@ \newdimen\@tempdimd % text font -%\gdef\mainfontname{Latin Modern Roman} \ifdefined\mainfontname\else \gdef\mainfontname{Latin Modern Roman} \fi @@ -32,7 +31,7 @@ \def\textfontopt{mapping=tex-text} \fi \else - \errmessage{umath-plain-xetex Error: Needs XeTeX!} + \errmessage{unimath-plain-xetex Error: Needs XeTeX!} \fi \font\tenrm = "\mainfontname/R:\textfontopt" at 10pt @@ -52,7 +51,7 @@ \gdef\tt@innerratio{\numexpr\dimexpr256\@tempdima/\@tempdimc\relax} \let\tensf@test\relax \let\tentt@test\relax -\def\@sizeat#1{\@tempdimd#1\relax% +\def\@sizeat#1{\@tempdimd#1\relax \sf@size=\dimexpr\sf@innerratio\@tempdimd/256\relax \tt@size=\dimexpr\tt@innerratio\@tempdimd/256\relax } @@ -130,6 +129,9 @@ \def\mathbotaccent{bA} \def\mathbotaccentwide{bAw} +\def\sqrt{sqrt} \def\cuberoot{cuberoot} +\def\fourthroot{fourthroot} \def\longdivision{longdivision} + \begingroup% \catcode`\^^@=13 \protected\gdef\@activedef#1#2{\begingroup% #1: char code; #2: definition @@ -141,6 +143,7 @@ \ifx#3\mathord \Umathchardef #2 = 0 \unimathfam #1 \Umathcode #1 = 0 \unimathfam #1 + % In the future, this module will use another \fam. %\else\ifx#3\mathalpha % \Umathchardef #2 = 0 \unimathfam #1 % \Umathcode #1 = 0 \unimathfam #1 % a \fi in the end @@ -168,13 +171,13 @@ \Umathcode #1 = 4 \unimathfam #1 \Udelcode #1 = \unimathfam #1 \gdef#2{\Udelimiter 4 \unimathfam #1 } - \ifx#2\sqrt + \ifx#2\sqrt%="221A% \gdef#2{\Uradical \unimathfam #1 } - \fi\ifx#2\cuberoot + \fi\ifx#2\cuberoot%="221B \gdef#2{\Uradical \unimathfam #1 } - \fi\ifx#2\fourthroot + \fi\ifx#2\fourthroot%="221C \gdef#2{\Uradical \unimathfam #1 } - \fi\ifx#2\longdivision + \fi\ifx#2\longdivision%="27CC \gdef#2{\Uradical \unimathfam #1 } \fi \else\ifx#3\mathclose @@ -406,7 +409,7 @@ \chardef\AE="00C6 \chardef\OE="0152 \chardef\O="00D8 -\chardef\i="0131 \chardef\j="237 % dotless letters +\chardef\i="0131 \chardef\j="0237 % dotless letters \chardef\aa="00E5 \chardef\l="0142 \chardef\L="0141 @@ -417,6 +420,23 @@ \chardef\P"00B6 \chardef\copyright="00A9 +% Primes. Patch on plain.tex, line 735--739 +\newcount\c@primes% \c@primes=0 +% If the quantity of primes were more than 4, use \nonUprim@s instead. +\newmuskip\betweenprimeskip +\betweenprimeskip=-2.7mu\relax +\def\after@prim@s{\ifcase\c@primes\or\prime\or\dprime\or\trprime\or\qprime% + \else\nonUprim@s\fi} +\def\nonUprim@s{\prime\loop\ifnum\c@primes>1 \advance\c@primes by -1% + \mskip\betweenprimeskip\prime\repeat} +\def\prim@s{\advance\c@primes by 1\futurelet\next\pr@m@s} +\def\pr@m@s{\ifx'\next\let\nxt\pr@@@s \else\ifx^\next\let\nxt\pr@@@t + \else\let\nxt\pr@@@f\fi\fi \nxt} +\def\pr@@@t#1#2{\after@prim@s#2\egroup} +\def\pr@@@f{\after@prim@s\egroup} +% The following command aims to avoid to use \dprime, \trprime, etc. +\def\unicodeprimesoff{\def\after@prim@s{\nonUprim@s}} + \catcode`\@=12 \tenrm \endinput
\ No newline at end of file |