summaryrefslogtreecommitdiff
path: root/tex/context/base/mkxl/math-rad.mklx
diff options
context:
space:
mode:
authorHans Hagen <pragma@wxs.nl>2023-02-23 21:40:04 +0100
committerContext Git Mirror Bot <phg@phi-gamma.net>2023-02-23 21:40:04 +0100
commit23b5ef45e7939a00addff726d02d6c29243177af (patch)
tree9b9317684a63bc93fc181c16518293204224430c /tex/context/base/mkxl/math-rad.mklx
parentcd404631d7079a9af603d173eb015f026731aa01 (diff)
downloadcontext-23b5ef45e7939a00addff726d02d6c29243177af.tar.gz
2023-02-23 21:26:00
Diffstat (limited to 'tex/context/base/mkxl/math-rad.mklx')
-rw-r--r--tex/context/base/mkxl/math-rad.mklx16
1 files changed, 14 insertions, 2 deletions
diff --git a/tex/context/base/mkxl/math-rad.mklx b/tex/context/base/mkxl/math-rad.mklx
index cb3cdb0a8..703481c08 100644
--- a/tex/context/base/mkxl/math-rad.mklx
+++ b/tex/context/base/mkxl/math-rad.mklx
@@ -189,14 +189,25 @@
% as struts are sort of predictable we can now fix all fonts in the lfg file.
\protected\def\math_radical_common#degree%
- {\Urooted
+ {\scratchcounter\ifcstok{\mathradicalparameter\c!rule}\v!symbol
+ \mathradicalparameter\c!top\relax
+ \else
+ \zerocount
+ \fi
+ \Urooted
\s!height\dimexpr\mathradicalparameter\c!height\relax
\s!depth \dimexpr\mathradicalparameter\c!depth\relax
\s!source\numexpr\namedboxanchor{\mathradicalparameter\c!source}\relax
\s!style \normalmathstyle
+ \ifzeronum\scratchcounter\else
+ top % \s!top
+ \fi
\zerocount \mathradicalparameter\c!left
\zerocount \mathradicalparameter\c!right
- \relax
+ \ifzeronum\scratchcounter\else
+ \zerocount\scratchcounter
+ \fi
+ \relax
{\mathstrut#degree}}
\defcsname\??mathradicalalternative\v!default\endcsname % #body%
@@ -365,6 +376,7 @@
\integerdef\delimitedleftanutityuc \privatecharactercode{delimited left annuity}
\integerdef\delimitedrightanutityuc \privatecharactercode{delimited right annuity}
+\integerdef\radicalbarextenderuc \privatecharactercode{radical bar extender}
\definemathradical
[rannuity]