summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/siunitx
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2012-07-26 22:43:34 +0000
committerKarl Berry <karl@freefriends.org>2012-07-26 22:43:34 +0000
commit6de23ba3ea913fe19bef0226096c339ec2c81e78 (patch)
tree8051b1be2affc6f88a3d4905c8bcdb8f03506d1d /Master/texmf-dist/tex/latex/siunitx
parent28c1ee71d4aff12fb6ecc265a01679aea2ca776d (diff)
siunitx (22jul12)
git-svn-id: svn://tug.org/texlive/trunk@27181 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/siunitx')
-rw-r--r--Master/texmf-dist/tex/latex/siunitx/config/siunitx-abbreviations.cfg2
-rw-r--r--Master/texmf-dist/tex/latex/siunitx/config/siunitx-binary.cfg2
-rw-r--r--Master/texmf-dist/tex/latex/siunitx/config/siunitx-version-1.cfg4
-rw-r--r--Master/texmf-dist/tex/latex/siunitx/siunitx.sty7777
4 files changed, 3893 insertions, 3892 deletions
diff --git a/Master/texmf-dist/tex/latex/siunitx/config/siunitx-abbreviations.cfg b/Master/texmf-dist/tex/latex/siunitx/config/siunitx-abbreviations.cfg
index b4e87ff14b8..0e45ed370aa 100644
--- a/Master/texmf-dist/tex/latex/siunitx/config/siunitx-abbreviations.cfg
+++ b/Master/texmf-dist/tex/latex/siunitx/config/siunitx-abbreviations.cfg
@@ -13,7 +13,7 @@
%% See http://www.latex-project.org/lppl.txt
%% ---------------------------------------------------------------
%%
-\ProvidesExplFile {siunitx-abbreviations.cfg} {2012/06/13} {2.5e}
+\ProvidesExplFile {siunitx-abbreviations.cfg} {2012/07/22} {2.5g}
{siunitx: Abbreviated units}
\DeclareSIUnit \A { \ampere }
\DeclareSIUnit \pA { \pico \ampere }
diff --git a/Master/texmf-dist/tex/latex/siunitx/config/siunitx-binary.cfg b/Master/texmf-dist/tex/latex/siunitx/config/siunitx-binary.cfg
index ea100300477..2401df00c95 100644
--- a/Master/texmf-dist/tex/latex/siunitx/config/siunitx-binary.cfg
+++ b/Master/texmf-dist/tex/latex/siunitx/config/siunitx-binary.cfg
@@ -13,7 +13,7 @@
%% See http://www.latex-project.org/lppl.txt
%% ---------------------------------------------------------------
%%
-\ProvidesExplFile {siunitx-binary.cfg} {2012/06/13} {2.5e}
+\ProvidesExplFile {siunitx-binary.cfg} {2012/07/22} {2.5g}
{siunitx: Binary units}
\DeclareBinaryPrefix \kibi { Ki } { 10 }
\DeclareBinaryPrefix \mebi { Mi } { 20 }
diff --git a/Master/texmf-dist/tex/latex/siunitx/config/siunitx-version-1.cfg b/Master/texmf-dist/tex/latex/siunitx/config/siunitx-version-1.cfg
index a477aaebe02..6880d03e676 100644
--- a/Master/texmf-dist/tex/latex/siunitx/config/siunitx-version-1.cfg
+++ b/Master/texmf-dist/tex/latex/siunitx/config/siunitx-version-1.cfg
@@ -13,7 +13,7 @@
%% See http://www.latex-project.org/lppl.txt
%% ---------------------------------------------------------------
%%
-\ProvidesExplFile {siunitx-version-1.cfg} {2012/06/13} {2.5e}
+\ProvidesExplFile {siunitx-version-1.cfg} {2012/07/22} {2.5g}
{siunitx: Version 1 settings}
\keys_define:nn { siunitx } {
addsign .choice: ,
@@ -660,7 +660,7 @@
{ \DeclareBinaryPrefix #2 {#3} {#4} }
}
\NewDocumentCommand \newqualifier { m m } {
- \siunitx_declare_qualifier:Nn #1 {#2}
+ \__siunitx_declare_qualifier:Nn #1 {#2}
}
\cs_new_eq:NN \renewqualifier \newqualifier
\cs_new_eq:NN \providequalifier \newqualifier
diff --git a/Master/texmf-dist/tex/latex/siunitx/siunitx.sty b/Master/texmf-dist/tex/latex/siunitx/siunitx.sty
index 993b5fd345a..fa34d419b17 100644
--- a/Master/texmf-dist/tex/latex/siunitx/siunitx.sty
+++ b/Master/texmf-dist/tex/latex/siunitx/siunitx.sty
@@ -14,9 +14,9 @@
%% ---------------------------------------------------------------
%%
\RequirePackage{expl3}
-\ProvidesExplPackage {siunitx} {2012/06/13} {2.5e}
+\ProvidesExplPackage {siunitx} {2012/07/22} {2.5g}
{A comprehensive (SI) units package}
-\@ifpackagelater { expl3 } { 2011/09/05 }
+\@ifpackagelater { expl3 } { 2012/07/16 }
{ }
{
\PackageError { siunitx } { Support~package~expl3~too~old. }
@@ -30,7 +30,7 @@
\msg_new:nnnn { siunitx } { incompatible-package }
{ Package~'#1'~incompatible. }
{ The~#1~package~and~siunitx~are~incompatible. }
-\cs_new_protected:Npn \siunitx_load_check:n #1 {
+\cs_new_protected:Npn \__siunitx_load_check:n #1 {
\group_begin:
\@ifpackageloaded {#1}
{ \msg_error:nnx { siunitx } { incompatible-package } {#1} }
@@ -39,31 +39,31 @@
}
\clist_map_function:nN
{ SIunits , sistyle , siunits , SIstyle , unitsdef , fancyunits }
- \siunitx_load_check:n
+ \__siunitx_load_check:n
\AtBeginDocument {
\clist_map_function:nN { SIunits , sistyle , siunits , SIstyle }
- \siunitx_load_check:n
+ \__siunitx_load_check:n
}
\RequirePackage{ amstext , array , l3keys2e }
-\cs_new:Npn \siunitx_tmp:w { }
+\cs_new:Npn \__siunitx_tmp:w { }
\cs_generate_variant:Nn \clist_map_function:nN { nc }
-\bool_new:N \l_siunitx_tmp_bool
-\box_new:N \l_siunitx_tmp_box
-\dim_new:N \l_siunitx_tmp_dim
-\int_new:N \l_siunitx_tmp_int
-\tl_new:N \l_siunitx_tmpa_tl
-\tl_new:N \l_siunitx_tmpb_tl
-\cs_new_protected:Npn \siunitx_error:nxx #1#2#3 {
- \bool_set_true:N \l_siunitx_error_bool
+\bool_new:N \l__siunitx_tmp_bool
+\box_new:N \l__siunitx_tmp_box
+\dim_new:N \l__siunitx_tmp_dim
+\int_new:N \l__siunitx_tmp_int
+\tl_new:N \l__siunitx_tmpa_tl
+\tl_new:N \l__siunitx_tmpb_tl
+\cs_new_protected:Npn \__siunitx_error:nxx #1#2#3 {
+ \bool_set_true:N \l__siunitx_error_bool
\msg_error:nnxx { siunitx } {#1} {#2} {#3}
}
-\cs_new_protected:Npn \siunitx_error:nx #1#2 {
- \siunitx_error:nxx {#1} {#2} { }
+\cs_new_protected:Npn \__siunitx_error:nx #1#2 {
+ \__siunitx_error:nxx {#1} {#2} { }
}
-\cs_new_protected:Npn \siunitx_error:n #1 {
- \siunitx_error:nxx {#1} { } { }
+\cs_new_protected:Npn \__siunitx_error:n #1 {
+ \__siunitx_error:nxx {#1} { } { }
}
-\bool_new:N \l_siunitx_error_bool
+\bool_new:N \l__siunitx_error_bool
\AtBeginDocument {
\cs_if_free:cT { T@TS1 }
{
@@ -71,191 +71,191 @@
\DeclareFontSubstitution { TS1 } { cmr } { m } { n }
}
}
-\DeclareTextSymbolDefault \c_siunitx_minus_tl { TS1 }
-\DeclareTextSymbol \c_siunitx_minus_tl { TS1 } { 61 }
+\DeclareTextSymbolDefault \c__siunitx_minus_tl { TS1 }
+\DeclareTextSymbol \c__siunitx_minus_tl { TS1 } { 61 }
\AtBeginDocument {
\@ifpackageloaded { fontspec }
{
- \int_const:Nn \c_siunitx_minus_int { 8722 }
- \tl_set:Nn \c_siunitx_minus_tl
- { \tex_char:D \c_siunitx_minus_int }
+ \int_const:Nn \c__siunitx_minus_int { 8722 }
+ \tl_set:Nn \c__siunitx_minus_tl
+ { \tex_char:D \c__siunitx_minus_int }
}
{ }
}
-\DeclareTextSymbol \c_siunitx_mu_tl { TS1 } { 181 }
-\DeclareTextSymbolDefault \c_siunitx_mu_tl { TS1 }
+\DeclareTextSymbol \c__siunitx_mu_tl { TS1 } { 181 }
+\DeclareTextSymbolDefault \c__siunitx_mu_tl { TS1 }
\AtBeginDocument {
\@ifpackageloaded { fontspec }
{
- \int_const:Nn \c_siunitx_mu_int { 181 }
- \tl_set:Nn \c_siunitx_mu_tl { \tex_char:D \c_siunitx_mu_int }
+ \int_const:Nn \c__siunitx_mu_int { 181 }
+ \tl_set:Nn \c__siunitx_mu_tl { \tex_char:D \c__siunitx_mu_int }
}
{ }
}
-\tl_new:N \c_siunitx_omega_tl
-\tl_set:Nn \c_siunitx_omega_tl { \Omega }
+\tl_new:N \c__siunitx_omega_tl
+\tl_set:Nn \c__siunitx_omega_tl { \Omega }
\AtBeginDocument {
\cs_if_exist:NT \upOmega
- { \tl_set:Nn \c_siunitx_omega_tl { \upOmega } }
+ { \tl_set:Nn \c__siunitx_omega_tl { \upOmega } }
}
-\cs_new_protected:Npn \siunitx_tl_put_left_math:Nn #1#2
+\cs_new_protected:Npn \__siunitx_tl_put_left_math:Nn #1#2
{ \tl_put_left:Nn #1 { \ensuremath {#2} } }
-\cs_generate_variant:Nn \siunitx_tl_put_left_math:Nn { NV }
-\seq_new:N \c_siunitx_old_options_seq
-\cs_set_protected:Npn \siunitx_tmp:w #1 {
- \seq_put_right:No \c_siunitx_old_options_seq { \tl_to_str:n {#1} }
-}
-\siunitx_tmp:w { addsign }
-\siunitx_tmp:w { allowlitunits }
-\siunitx_tmp:w { allowoptarg }
-\siunitx_tmp:w { allowzeroexp }
-\siunitx_tmp:w { alsoload }
-\siunitx_tmp:w { angformat }
-\siunitx_tmp:w { anglesep }
-\siunitx_tmp:w { astroang }
-\siunitx_tmp:w { closeerr }
-\siunitx_tmp:w { closrfrac }
-\siunitx_tmp:w { closerange }
-\siunitx_tmp:w { colour }
-\siunitx_tmp:w { colorall }
-\siunitx_tmp:w { colourall }
-\siunitx_tmp:w { colorneg }
-\siunitx_tmp:w { colourneg }
-\siunitx_tmp:w { colourunits }
-\siunitx_tmp:w { colourunits }
-\siunitx_tmp:w { colorvalues }
-\siunitx_tmp:w { colourvalues }
-\siunitx_tmp:w { decimalsymbol }
-\siunitx_tmp:w { debug }
-\siunitx_tmp:w { detectdisplay }
-\siunitx_tmp:w { digitsep }
-\siunitx_tmp:w { dp }
-\siunitx_tmp:w { emulate }
-\siunitx_tmp:w { errspace }
-\siunitx_tmp:w { eVcorra }
-\siunitx_tmp:w { eVcorrb }
-\siunitx_tmp:w { expbase }
-\siunitx_tmp:w { expproduct }
-\siunitx_tmp:w { fixdp }
-\siunitx_tmp:w { fixsf }
-\siunitx_tmp:w { fraction }
-\siunitx_tmp:w { inlinebold }
-\siunitx_tmp:w { loctolang }
-\siunitx_tmp:w { log }
-\siunitx_tmp:w { load }
-\siunitx_tmp:w { mathOmega }
-\siunitx_tmp:w { mathcelsius }
-\siunitx_tmp:w { mathdegree }
-\siunitx_tmp:w { mathminute }
-\siunitx_tmp:w { mathmu }
-\siunitx_tmp:w { mathringA }
-\siunitx_tmp:w { mathrm }
-\siunitx_tmp:w { mathsOmega }
-\siunitx_tmp:w { mathscelsius }
-\siunitx_tmp:w { mathsdegree }
-\siunitx_tmp:w { mathsecond }
-\siunitx_tmp:w { mathsf }
-\siunitx_tmp:w { mathsminute }
-\siunitx_tmp:w { mathsmu }
-\siunitx_tmp:w { mathsringA }
-\siunitx_tmp:w { mathsrm }
-\siunitx_tmp:w { mathssecond }
-\siunitx_tmp:w { mathssf }
-\siunitx_tmp:w { mathstt }
-\siunitx_tmp:w { mathtt }
-\siunitx_tmp:w { negcolor }
-\siunitx_tmp:w { negcolour }
-\siunitx_tmp:w { noload }
-\siunitx_tmp:w { numaddn }
-\siunitx_tmp:w { numcloseerr }
-\siunitx_tmp:w { numdecimal }
-\siunitx_tmp:w { numdigits }
-\siunitx_tmp:w { numdiv }
-\siunitx_tmp:w { numexp }
-\siunitx_tmp:w { numgobble }
-\siunitx_tmp:w { numopenerr }
-\siunitx_tmp:w { numprod }
-\siunitx_tmp:w { numsign }
-\siunitx_tmp:w { obeyall }
-\siunitx_tmp:w { obeybold }
-\siunitx_tmp:w { obeyfamily }
-\siunitx_tmp:w { obeymode }
-\siunitx_tmp:w { obeyitalic }
-\siunitx_tmp:w { openerr }
-\siunitx_tmp:w { openfrac }
-\siunitx_tmp:w { openrange }
-\siunitx_tmp:w { padangle }
-\siunitx_tmp:w { padnumber }
-\siunitx_tmp:w { per }
-\siunitx_tmp:w { prefixbase }
-\siunitx_tmp:w { prefixproduct }
-\siunitx_tmp:w { prefixsymbolic }
-\siunitx_tmp:w { prespace }
-\siunitx_tmp:w { redefsymbols }
-\siunitx_tmp:w { repeatunits }
-\siunitx_tmp:w { retainplus }
-\siunitx_tmp:w { seperr }
-\siunitx_tmp:w { sepfour }
-\siunitx_tmp:w { sf }
-\siunitx_tmp:w { sign }
-\siunitx_tmp:w { slash }
-\siunitx_tmp:w { stickyper }
-\siunitx_tmp:w { strictarc }
-\siunitx_tmp:w { tabalign }
-\siunitx_tmp:w { tabalignexp }
-\siunitx_tmp:w { tabautofit }
-\siunitx_tmp:w { tabexpalign }
-\siunitx_tmp:w { tabformat }
-\siunitx_tmp:w { tabnumalign }
-\siunitx_tmp:w { tabparseonly }
-\siunitx_tmp:w { tabtextalign }
-\siunitx_tmp:w { textOmega }
-\siunitx_tmp:w { textcelsius }
-\siunitx_tmp:w { textdegree }
-\siunitx_tmp:w { textminute }
-\siunitx_tmp:w { textmode }
-\siunitx_tmp:w { textmu }
-\siunitx_tmp:w { textringA }
-\siunitx_tmp:w { textrm }
-\siunitx_tmp:w { textsecond }
-\siunitx_tmp:w { textsf }
-\siunitx_tmp:w { texttt }
-\siunitx_tmp:w { tightpm }
-\siunitx_tmp:w { tophrase }
-\siunitx_tmp:w { trapamigerr }
-\siunitx_tmp:w { trapambigfrac }
-\siunitx_tmp:w { trapambigrange }
-\siunitx_tmp:w { unitcolor }
-\siunitx_tmp:w { unitcolour }
-\siunitx_tmp:w { unitmathrm }
-\siunitx_tmp:w { unitmathsf }
-\siunitx_tmp:w { unitmathsrm }
-\siunitx_tmp:w { unitmathssf }
-\siunitx_tmp:w { unitmathstt }
-\siunitx_tmp:w { unitmathtt }
-\siunitx_tmp:w { unitmode }
-\siunitx_tmp:w { unitsep }
-\siunitx_tmp:w { unitspace }
-\siunitx_tmp:w { valuecolor }
-\siunitx_tmp:w { valuecolour }
-\siunitx_tmp:w { valuemathrm }
-\siunitx_tmp:w { valuemathsf }
-\siunitx_tmp:w { valuemathsrm }
-\siunitx_tmp:w { valuemathssf }
-\siunitx_tmp:w { valuemathstt }
-\siunitx_tmp:w { valuemathtt }
-\siunitx_tmp:w { valuemode }
-\siunitx_tmp:w { valuesep }
-\siunitx_tmp:w { xpace }
-\tl_new:N \l_siunitx_key_tl
+\cs_generate_variant:Nn \__siunitx_tl_put_left_math:Nn { NV }
+\seq_new:N \c__siunitx_old_options_seq
+\cs_set_protected:Npn \__siunitx_tmp:w #1 {
+ \seq_put_right:No \c__siunitx_old_options_seq { \tl_to_str:n {#1} }
+}
+\__siunitx_tmp:w { addsign }
+\__siunitx_tmp:w { allowlitunits }
+\__siunitx_tmp:w { allowoptarg }
+\__siunitx_tmp:w { allowzeroexp }
+\__siunitx_tmp:w { alsoload }
+\__siunitx_tmp:w { angformat }
+\__siunitx_tmp:w { anglesep }
+\__siunitx_tmp:w { astroang }
+\__siunitx_tmp:w { closeerr }
+\__siunitx_tmp:w { closrfrac }
+\__siunitx_tmp:w { closerange }
+\__siunitx_tmp:w { colour }
+\__siunitx_tmp:w { colorall }
+\__siunitx_tmp:w { colourall }
+\__siunitx_tmp:w { colorneg }
+\__siunitx_tmp:w { colourneg }
+\__siunitx_tmp:w { colourunits }
+\__siunitx_tmp:w { colourunits }
+\__siunitx_tmp:w { colorvalues }
+\__siunitx_tmp:w { colourvalues }
+\__siunitx_tmp:w { decimalsymbol }
+\__siunitx_tmp:w { debug }
+\__siunitx_tmp:w { detectdisplay }
+\__siunitx_tmp:w { digitsep }
+\__siunitx_tmp:w { dp }
+\__siunitx_tmp:w { emulate }
+\__siunitx_tmp:w { errspace }
+\__siunitx_tmp:w { eVcorra }
+\__siunitx_tmp:w { eVcorrb }
+\__siunitx_tmp:w { expbase }
+\__siunitx_tmp:w { expproduct }
+\__siunitx_tmp:w { fixdp }
+\__siunitx_tmp:w { fixsf }
+\__siunitx_tmp:w { fraction }
+\__siunitx_tmp:w { inlinebold }
+\__siunitx_tmp:w { loctolang }
+\__siunitx_tmp:w { log }
+\__siunitx_tmp:w { load }
+\__siunitx_tmp:w { mathOmega }
+\__siunitx_tmp:w { mathcelsius }
+\__siunitx_tmp:w { mathdegree }
+\__siunitx_tmp:w { mathminute }
+\__siunitx_tmp:w { mathmu }
+\__siunitx_tmp:w { mathringA }
+\__siunitx_tmp:w { mathrm }
+\__siunitx_tmp:w { mathsOmega }
+\__siunitx_tmp:w { mathscelsius }
+\__siunitx_tmp:w { mathsdegree }
+\__siunitx_tmp:w { mathsecond }
+\__siunitx_tmp:w { mathsf }
+\__siunitx_tmp:w { mathsminute }
+\__siunitx_tmp:w { mathsmu }
+\__siunitx_tmp:w { mathsringA }
+\__siunitx_tmp:w { mathsrm }
+\__siunitx_tmp:w { mathssecond }
+\__siunitx_tmp:w { mathssf }
+\__siunitx_tmp:w { mathstt }
+\__siunitx_tmp:w { mathtt }
+\__siunitx_tmp:w { negcolor }
+\__siunitx_tmp:w { negcolour }
+\__siunitx_tmp:w { noload }
+\__siunitx_tmp:w { numaddn }
+\__siunitx_tmp:w { numcloseerr }
+\__siunitx_tmp:w { numdecimal }
+\__siunitx_tmp:w { numdigits }
+\__siunitx_tmp:w { numdiv }
+\__siunitx_tmp:w { numexp }
+\__siunitx_tmp:w { numgobble }
+\__siunitx_tmp:w { numopenerr }
+\__siunitx_tmp:w { numprod }
+\__siunitx_tmp:w { numsign }
+\__siunitx_tmp:w { obeyall }
+\__siunitx_tmp:w { obeybold }
+\__siunitx_tmp:w { obeyfamily }
+\__siunitx_tmp:w { obeymode }
+\__siunitx_tmp:w { obeyitalic }
+\__siunitx_tmp:w { openerr }
+\__siunitx_tmp:w { openfrac }
+\__siunitx_tmp:w { openrange }
+\__siunitx_tmp:w { padangle }
+\__siunitx_tmp:w { padnumber }
+\__siunitx_tmp:w { per }
+\__siunitx_tmp:w { prefixbase }
+\__siunitx_tmp:w { prefixproduct }
+\__siunitx_tmp:w { prefixsymbolic }
+\__siunitx_tmp:w { prespace }
+\__siunitx_tmp:w { redefsymbols }
+\__siunitx_tmp:w { repeatunits }
+\__siunitx_tmp:w { retainplus }
+\__siunitx_tmp:w { seperr }
+\__siunitx_tmp:w { sepfour }
+\__siunitx_tmp:w { sf }
+\__siunitx_tmp:w { sign }
+\__siunitx_tmp:w { slash }
+\__siunitx_tmp:w { stickyper }
+\__siunitx_tmp:w { strictarc }
+\__siunitx_tmp:w { tabalign }
+\__siunitx_tmp:w { tabalignexp }
+\__siunitx_tmp:w { tabautofit }
+\__siunitx_tmp:w { tabexpalign }
+\__siunitx_tmp:w { tabformat }
+\__siunitx_tmp:w { tabnumalign }
+\__siunitx_tmp:w { tabparseonly }
+\__siunitx_tmp:w { tabtextalign }
+\__siunitx_tmp:w { textOmega }
+\__siunitx_tmp:w { textcelsius }
+\__siunitx_tmp:w { textdegree }
+\__siunitx_tmp:w { textminute }
+\__siunitx_tmp:w { textmode }
+\__siunitx_tmp:w { textmu }
+\__siunitx_tmp:w { textringA }
+\__siunitx_tmp:w { textrm }
+\__siunitx_tmp:w { textsecond }
+\__siunitx_tmp:w { textsf }
+\__siunitx_tmp:w { texttt }
+\__siunitx_tmp:w { tightpm }
+\__siunitx_tmp:w { tophrase }
+\__siunitx_tmp:w { trapamigerr }
+\__siunitx_tmp:w { trapambigfrac }
+\__siunitx_tmp:w { trapambigrange }
+\__siunitx_tmp:w { unitcolor }
+\__siunitx_tmp:w { unitcolour }
+\__siunitx_tmp:w { unitmathrm }
+\__siunitx_tmp:w { unitmathsf }
+\__siunitx_tmp:w { unitmathsrm }
+\__siunitx_tmp:w { unitmathssf }
+\__siunitx_tmp:w { unitmathstt }
+\__siunitx_tmp:w { unitmathtt }
+\__siunitx_tmp:w { unitmode }
+\__siunitx_tmp:w { unitsep }
+\__siunitx_tmp:w { unitspace }
+\__siunitx_tmp:w { valuecolor }
+\__siunitx_tmp:w { valuecolour }
+\__siunitx_tmp:w { valuemathrm }
+\__siunitx_tmp:w { valuemathsf }
+\__siunitx_tmp:w { valuemathsrm }
+\__siunitx_tmp:w { valuemathssf }
+\__siunitx_tmp:w { valuemathstt }
+\__siunitx_tmp:w { valuemathtt }
+\__siunitx_tmp:w { valuemode }
+\__siunitx_tmp:w { valuesep }
+\__siunitx_tmp:w { xpace }
+\tl_new:N \l__siunitx_key_tl
\keys_define:nn { siunitx } {
unknown .code:n =
{
- \seq_if_in:NVTF \c_siunitx_old_options_seq \l_keys_key_tl
+ \seq_if_in:NVTF \c__siunitx_old_options_seq \l_keys_key_tl
{
\msg_warning:nnx { siunitx } { version-1-option }
{ \exp_not:V \l_keys_key_tl }
- \tl_set:Nx \l_siunitx_key_tl
+ \tl_set:Nx \l__siunitx_key_tl
{
\keys_set:nn { siunitx }
{
@@ -264,7 +264,7 @@
}
}
\keys_set:nn { siunitx } { version-1-compatibility }
- \tl_use:N \l_siunitx_key_tl
+ \tl_use:N \l__siunitx_key_tl
}
{
\msg_error:nnx { siunitx } { unknown-option }
@@ -276,7 +276,7 @@
\keys_define:nn { siunitx } {
unknown .code:n =
{
- \seq_if_in:NVTF \c_siunitx_old_options_seq \l_keys_key_tl
+ \seq_if_in:NVTF \c__siunitx_old_options_seq \l_keys_key_tl
{
\msg_error:nnx { siunitx } { version-1-option }
{ \exp_not:V \l_keys_key_tl }
@@ -288,10 +288,10 @@
}
}
}
-\cs_new_protected:Npn \siunitx_option_deactivate:n #1 {
- \clist_put_right:Nn \l_siunitx_option_deactivate_clist {#1}
+\cs_new_protected:Npn \__siunitx_option_deactivate:n #1 {
+ \clist_put_right:Nn \l__siunitx_option_deactivate_clist {#1}
}
-\cs_new_protected:Npn \siunitx_option_deactivate_aux:n #1 {
+\cs_new_protected:Npn \__siunitx_option_deactivate_aux:n #1 {
\keys_define:nn { siunitx }
{
#1 .code:n =
@@ -299,11 +299,11 @@
}
}
\AtBeginDocument {
- \clist_map_function:NN \l_siunitx_option_deactivate_clist
- \siunitx_option_deactivate_aux:n
+ \clist_map_function:NN \l__siunitx_option_deactivate_clist
+ \__siunitx_option_deactivate_aux:n
}
-\clist_new:N \l_siunitx_option_deactivate_clist
-\cs_new_protected:Npn \siunitx_option_unchanged:Nnn #1#2#3
+\clist_new:N \l__siunitx_option_deactivate_clist
+\cs_new_protected:Npn \__siunitx_option_unchanged:Nnn #1#2#3
{
\str_if_eq:VnT #1 {#2}
{ \tl_set:Nn #1 {#3} }
@@ -317,9 +317,9 @@
{ \char_set_lccode:nn { `#1 } { `#1 } }
\tl_to_lowercase:n {
\group_end:
- \prg_new_conditional:Npnn \siunitx_cs_if_tl:N #1 { T , F, TF , p }
+ \prg_new_conditional:Npnn \__siunitx_cs_if_tl:N #1 { T , F, TF , p }
{
- \exp_last_unbraced:No \siunitx_cs_if_tl_aux:w
+ \exp_last_unbraced:No \__siunitx_cs_if_tl_aux:w
{ \token_to_meaning:N #1 MACRO \q_stop }
{
\cs_if_exist:cTF { \cs_to_str:N #1 ~ }
@@ -328,12 +328,12 @@
}
{ \prg_return_false: }
}
- \cs_new:Npn \siunitx_cs_if_tl_aux:w #1 MACRO #2 \q_stop
+ \cs_new:Npn \__siunitx_cs_if_tl_aux:w #1 MACRO #2 \q_stop
{ \tl_if_empty:nTF {#1} }
- \prg_new_conditional:Npnn \siunitx_cs_if_macro:N #1
+ \prg_new_conditional:Npnn \__siunitx_cs_if_macro:N #1
{ T , F , TF , p }
{
- \exp_last_unbraced:No \siunitx_cs_if_tl_aux:w
+ \exp_last_unbraced:No \__siunitx_cs_if_tl_aux:w
{ \token_to_meaning:N #1 MACRO \q_stop }
{ \prg_return_true: }
{ \prg_return_false: }
@@ -343,52 +343,52 @@
{
\@ifpackageloaded { tex4ht }
{
- \cs_set_eq:NN \siunitx_print_text_super:n \textsuperscript
- \siunitx_option_unchanged:Nnn \l_siunitx_qualifier_mode_tl
+ \cs_set_eq:NN \__siunitx_print_text_super:n \textsuperscript
+ \__siunitx_option_unchanged:Nnn \l__siunitx_qualifier_mode_tl
{ subscript } { brackets }
\keys_set:nn { siunitx } { mode = text }
}
{ }
}
-\cs_new_eq:NN \siunitx_textsuperscript:n \textsuperscript
-\bool_new:N \l_siunitx_display_math_bool
+\cs_new_eq:NN \__siunitx_textsuperscript:n \textsuperscript
+\bool_new:N \l__siunitx_display_math_bool
\tex_everydisplay:D \exp_after:wN
{
\tex_the:D \tex_everydisplay:D
- \bool_set_true:N \l_siunitx_display_math_bool
+ \bool_set_true:N \l__siunitx_display_math_bool
}
\cs_generate_variant:Nn \prop_get:NnNT { NV }
\cs_generate_variant:Nn \prop_get:NnNF { NV }
\cs_generate_variant:Nn \prop_get:NnNTF { NV }
-\cs_new_protected:Npn \siunitx_set_math_fam:n #1 {
- \int_new:c { c_siunitx_math #1 _int }
+\cs_new_protected:Npn \__siunitx_set_math_fam:n #1 {
+ \int_new:c { c__siunitx_math #1 _int }
\group_begin:
- \hbox_set:Nn \l_siunitx_tmp_box
+ \hbox_set:Nn \l__siunitx_tmp_box
{
\ensuremath
{
\use:c { math #1 }
{
- \int_gset:cn { c_siunitx_math #1 _int } { \fam }
+ \int_gset:cn { c__siunitx_math #1 _int } { \fam }
}
}
}
\group_end:
}
\tl_put_right:Nn \document {
- \siunitx_set_math_fam:n { sf }
- \siunitx_set_math_fam:n { tt }
+ \__siunitx_set_math_fam:n { sf }
+ \__siunitx_set_math_fam:n { tt }
}
-\cs_new_protected:Npn \siunitx_set_text_fam:n #1 {
- \tl_new:c { c_siunitx_text #1 _tl }
- \tl_set:cx { c_siunitx_text #1 _tl } { \use:c { #1 default } }
+\cs_new_protected:Npn \__siunitx_set_text_fam:n #1 {
+ \tl_new:c { c__siunitx_text #1 _tl }
+ \tl_set:cx { c__siunitx_text #1 _tl } { \use:c { #1 default } }
}
\AtBeginDocument {
- \siunitx_set_text_fam:n { sf }
- \siunitx_set_text_fam:n { tt }
+ \__siunitx_set_text_fam:n { sf }
+ \__siunitx_set_text_fam:n { tt }
}
-\tl_new:N \l_siunitx_detect_inline_weight_tl
-\tl_new:N \l_siunitx_detect_inline_family_tl
+\tl_new:N \l__siunitx_detect_inline_weight_tl
+\tl_new:N \l__siunitx_detect_inline_family_tl
\keys_define:nn { siunitx } {
detect-all .choice:,
detect-all .default:n = true,
@@ -407,26 +407,26 @@
detect-weight = true ,
},
detect-display-math .bool_set:N =
- \l_siunitx_detect_display_math_bool,
- detect-family .bool_set:N = \l_siunitx_detect_family_bool,
+ \l__siunitx_detect_display_math_bool,
+ detect-family .bool_set:N = \l__siunitx_detect_family_bool,
detect-inline-family .choice:,
detect-inline-family .value_required:,
detect-inline-family /
math .code:n =
- { \tl_set:Nn \l_siunitx_detect_inline_family_tl { math } },
+ { \tl_set:Nn \l__siunitx_detect_inline_family_tl { math } },
detect-inline-family /
text .code:n =
- { \tl_set:Nn \l_siunitx_detect_inline_family_tl { text } },
+ { \tl_set:Nn \l__siunitx_detect_inline_family_tl { text } },
detect-inline-weight .choice:,
detect-inline-weight .value_required:,
detect-inline-weight /
math .code:n =
- { \tl_set:Nn \l_siunitx_detect_inline_weight_tl { math } },
+ { \tl_set:Nn \l__siunitx_detect_inline_weight_tl { math } },
detect-inline-weight /
text .code:n =
- { \tl_set:Nn \l_siunitx_detect_inline_weight_tl { text } },
- detect-italic .bool_set:N = \l_siunitx_detect_shape_bool,
- detect-mode .bool_set:N = \l_siunitx_detect_mode_bool,
+ { \tl_set:Nn \l__siunitx_detect_inline_weight_tl { text } },
+ detect-italic .bool_set:N = \l__siunitx_detect_shape_bool,
+ detect-mode .bool_set:N = \l__siunitx_detect_mode_bool,
detect-none .choice:,
detect-none .default:n = true,
detect-none / false .meta:n =
@@ -443,188 +443,188 @@
detect-shape = false,
detect-weight = false
},
- detect-shape .bool_set:N = \l_siunitx_detect_shape_bool,
- detect-weight .bool_set:N = \l_siunitx_detect_weight_bool
+ detect-shape .bool_set:N = \l__siunitx_detect_shape_bool,
+ detect-weight .bool_set:N = \l__siunitx_detect_weight_bool
}
\keys_set:nn { siunitx } {
detect-inline-family = text ,
detect-inline-weight = text ,
}
-\bool_new:N \l_siunitx_font_set_bool
-\bool_new:N \l_siunitx_font_math_mode_bool
-\tl_new:N \l_siunitx_font_family_tl
-\cs_new:Npn \siunitx_font_shape: { }
-\cs_new:Npn \siunitx_font_weight: { }
-\cs_new_protected:Npn \siunitx_detect_font: {
- \bool_if:NF \l_siunitx_font_set_bool
- {
- \siunitx_detect_font_init:
- \bool_if:NT \l_siunitx_detect_weight_bool
- { \siunitx_detect_font_weight: }
- \bool_if:NT \l_siunitx_detect_family_bool
- { \siunitx_detect_font_family: }
- \bool_if:NT \l_siunitx_detect_shape_bool
- { \siunitx_detect_font_shape: }
- \bool_if:NT \l_siunitx_detect_mode_bool
- { \siunitx_detect_font_mode: }
- }
-}
-\cs_new_protected:Npn \siunitx_detect_font_init: {
- \bool_set_true:N \l_siunitx_font_set_bool
- \cs_set:Npn \siunitx_font_weight:
+\bool_new:N \l__siunitx_font_set_bool
+\bool_new:N \l__siunitx_font_math_mode_bool
+\tl_new:N \l__siunitx_font_family_tl
+\cs_new:Npn \__siunitx_font_shape: { }
+\cs_new:Npn \__siunitx_font_weight: { }
+\cs_new_protected:Npn \__siunitx_detect_font: {
+ \bool_if:NF \l__siunitx_font_set_bool
+ {
+ \__siunitx_detect_font_init:
+ \bool_if:NT \l__siunitx_detect_weight_bool
+ { \__siunitx_detect_font_weight: }
+ \bool_if:NT \l__siunitx_detect_family_bool
+ { \__siunitx_detect_font_family: }
+ \bool_if:NT \l__siunitx_detect_shape_bool
+ { \__siunitx_detect_font_shape: }
+ \bool_if:NT \l__siunitx_detect_mode_bool
+ { \__siunitx_detect_font_mode: }
+ }
+}
+\cs_new_protected:Npn \__siunitx_detect_font_init: {
+ \bool_set_true:N \l__siunitx_font_set_bool
+ \cs_set:Npn \__siunitx_font_weight:
{
\unboldmath
\mdseries
}
- \cs_set:Npn \siunitx_font_shape: { \upshape }
- \tl_set:Nn \l_siunitx_font_family_tl { rm }
- \bool_set_true:N \l_siunitx_font_math_mode_bool
+ \cs_set:Npn \__siunitx_font_shape: { \upshape }
+ \tl_set:Nn \l__siunitx_font_family_tl { rm }
+ \bool_set_true:N \l__siunitx_font_math_mode_bool
}
-\cs_new_protected:Npn \siunitx_detect_font_weight: {
+\cs_new_protected:Npn \__siunitx_detect_font_weight: {
\mode_if_math:TF
{
- \bool_if:NTF \l_siunitx_display_math_bool
+ \bool_if:NTF \l__siunitx_display_math_bool
{
- \bool_if:NTF \l_siunitx_detect_display_math_bool
- { \siunitx_detect_font_weight_math: }
- { \siunitx_detect_font_weight_text: }
+ \bool_if:NTF \l__siunitx_detect_display_math_bool
+ { \__siunitx_detect_font_weight_math: }
+ { \__siunitx_detect_font_weight_text: }
}
{
\use:c
{
- siunitx_detect_font_weight_
- \l_siunitx_detect_inline_weight_tl
+ __siunitx_detect_font_weight_
+ \l__siunitx_detect_inline_weight_tl
:
}
}
}
- { \siunitx_detect_font_weight_text: }
+ { \__siunitx_detect_font_weight_text: }
}
-\cs_new_protected:Npn \siunitx_detect_font_weight_math: {
+\cs_new_protected:Npn \__siunitx_detect_font_weight_math: {
\str_if_eq:VnT \math@version { bold }
{
- \cs_set:Npn \siunitx_font_weight:
+ \cs_set:Npn \__siunitx_font_weight:
{
\boldmath
\bfseries
}
}
\str_if_eq:VnT \math@version { light }
- { \cs_set:Npn \siunitx_font_weight: { \lseries } }
+ { \cs_set:Npn \__siunitx_font_weight: { \lseries } }
}
-\cs_new_protected:Npn \siunitx_detect_font_weight_text: {
- \tl_set:Nx \l_siunitx_tmpa_tl { \tl_head:V \f@series }
- \str_if_eq:VnT \l_siunitx_tmpa_tl { b }
+\cs_new_protected:Npn \__siunitx_detect_font_weight_text: {
+ \tl_set:Nx \l__siunitx_tmpa_tl { \tl_head:V \f@series }
+ \str_if_eq:VnT \l__siunitx_tmpa_tl { b }
{
- \cs_set:Npn \siunitx_font_weight:
+ \cs_set:Npn \__siunitx_font_weight:
{
\boldmath
\bfseries
}
}
- \str_if_eq:VnT \l_siunitx_tmpa_tl { l }
- { \cs_set:Npn \siunitx_font_weight: { \lseries } }
+ \str_if_eq:VnT \l__siunitx_tmpa_tl { l }
+ { \cs_set:Npn \__siunitx_font_weight: { \lseries } }
}
-\cs_new_protected:Npn \siunitx_detect_font_family: {
+\cs_new_protected:Npn \__siunitx_detect_font_family: {
\mode_if_math:TF
{
- \bool_if:NTF \l_siunitx_display_math_bool
+ \bool_if:NTF \l__siunitx_display_math_bool
{
- \bool_if:NTF \l_siunitx_detect_display_math_bool
- { \siunitx_detect_font_family_math: }
- { \siunitx_detect_font_family_text: }
+ \bool_if:NTF \l__siunitx_detect_display_math_bool
+ { \__siunitx_detect_font_family_math: }
+ { \__siunitx_detect_font_family_text: }
}
{
\use:c
{
- siunitx_detect_font_family_
- \l_siunitx_detect_inline_family_tl
+ __siunitx_detect_font_family_
+ \l__siunitx_detect_inline_family_tl
:
}
}
}
- { \siunitx_detect_font_family_text: }
+ { \__siunitx_detect_font_family_text: }
}
-\cs_new_protected:Npn \siunitx_detect_font_family_math: {
- \tl_set:Nn \l_siunitx_font_family_tl { rm }
- \int_compare:nNnT { \fam } = { \c_siunitx_mathsf_int }
- { \tl_set:Nn \l_siunitx_font_family_tl { sf } }
- \int_compare:nNnT { \fam } = { \c_siunitx_mathtt_int }
- { \tl_set:Nn \l_siunitx_font_family_tl { tt } }
+\cs_new_protected:Npn \__siunitx_detect_font_family_math: {
+ \tl_set:Nn \l__siunitx_font_family_tl { rm }
+ \int_compare:nNnT { \fam } = { \c__siunitx_mathsf_int }
+ { \tl_set:Nn \l__siunitx_font_family_tl { sf } }
+ \int_compare:nNnT { \fam } = { \c__siunitx_mathtt_int }
+ { \tl_set:Nn \l__siunitx_font_family_tl { tt } }
}
-\cs_new_protected:Npn \siunitx_detect_font_family_text: {
- \tl_if_eq:NNT \f@family \c_siunitx_textsf_tl
- { \tl_set:Nn \l_siunitx_font_family_tl { sf } }
- \tl_if_eq:NNT \f@family \c_siunitx_texttt_tl
- { \tl_set:Nn \l_siunitx_font_family_tl { tt } }
+\cs_new_protected:Npn \__siunitx_detect_font_family_text: {
+ \tl_if_eq:NNT \f@family \c__siunitx_textsf_tl
+ { \tl_set:Nn \l__siunitx_font_family_tl { sf } }
+ \tl_if_eq:NNT \f@family \c__siunitx_texttt_tl
+ { \tl_set:Nn \l__siunitx_font_family_tl { tt } }
}
-\cs_new_protected:Npn \siunitx_detect_font_shape: {
+\cs_new_protected:Npn \__siunitx_detect_font_shape: {
\str_if_eq:VnT \f@shape { it }
- { \cs_set:Npn \siunitx_font_shape: { \itshape } }
+ { \cs_set:Npn \__siunitx_font_shape: { \itshape } }
\str_if_eq:VnT \f@shape { sl }
- { \cs_set:Npn \siunitx_font_shape: { \slshape } }
+ { \cs_set:Npn \__siunitx_font_shape: { \slshape } }
}
-\cs_new_protected:Npn \siunitx_detect_font_mode: {
+\cs_new_protected:Npn \__siunitx_detect_font_mode: {
\mode_if_math:F
{
- \bool_set_false:N \l_siunitx_font_math_mode_bool
- \bool_set_false:N \l_siunitx_number_math_mode_bool
- \bool_set_false:N \l_siunitx_unit_math_mode_bool
+ \bool_set_false:N \l__siunitx_font_math_mode_bool
+ \bool_set_false:N \l__siunitx_number_math_mode_bool
+ \bool_set_false:N \l__siunitx_unit_math_mode_bool
}
}
-\bool_new:N \l_siunitx_number_math_mode_bool
-\bool_new:N \l_siunitx_unit_math_mode_bool
-\cs_new:Npn \siunitx_number_mathrm:n #1 { }
-\cs_new:Npn \siunitx_number_mathsf:n #1 { }
-\cs_new:Npn \siunitx_number_mathtt:n #1 { }
-\cs_new:Npn \siunitx_number_textrm: { }
-\cs_new:Npn \siunitx_number_textsf: { }
-\cs_new:Npn \siunitx_number_texttt: { }
+\bool_new:N \l__siunitx_number_math_mode_bool
+\bool_new:N \l__siunitx_unit_math_mode_bool
+\cs_new:Npn \__siunitx_number_mathrm:n #1 { }
+\cs_new:Npn \__siunitx_number_mathsf:n #1 { }
+\cs_new:Npn \__siunitx_number_mathtt:n #1 { }
+\cs_new:Npn \__siunitx_number_textrm: { }
+\cs_new:Npn \__siunitx_number_textsf: { }
+\cs_new:Npn \__siunitx_number_texttt: { }
\keys_define:nn { siunitx } {
- number-color .tl_set:N = \l_siunitx_number_color_tl,
+ number-color .tl_set:N = \l__siunitx_number_color_tl,
number-math-rm .code:n =
- { \cs_set:Npn \siunitx_number_mathrm:n ##1 { #1 {##1} } },
+ { \cs_set:Npn \__siunitx_number_mathrm:n ##1 { #1 {##1} } },
number-math-sf .code:n =
- { \cs_set:Npn \siunitx_number_mathsf:n ##1 { #1 {##1} } },
+ { \cs_set:Npn \__siunitx_number_mathsf:n ##1 { #1 {##1} } },
number-math-tt .code:n =
- { \cs_set:Npn \siunitx_number_mathtt:n ##1 { #1 {##1} } },
+ { \cs_set:Npn \__siunitx_number_mathtt:n ##1 { #1 {##1} } },
number-mode .choice:,
number-mode / math .code:n =
- { \bool_set_true:N \l_siunitx_number_math_mode_bool },
+ { \bool_set_true:N \l__siunitx_number_math_mode_bool },
number-mode / text .code:n =
- { \bool_set_false:N \l_siunitx_number_math_mode_bool },
+ { \bool_set_false:N \l__siunitx_number_math_mode_bool },
number-text-rm .code:n =
- { \cs_set:Npn \siunitx_number_textrm: {#1} },
+ { \cs_set:Npn \__siunitx_number_textrm: {#1} },
number-text-sf .code:n =
- { \cs_set:Npn \siunitx_number_textsf: {#1} },
+ { \cs_set:Npn \__siunitx_number_textsf: {#1} },
number-text-tt .code:n =
- { \cs_set:Npn \siunitx_number_texttt: {#1} }
-}
-\cs_new:Npn \siunitx_unit_mathrm: { }
-\cs_new:Npn \siunitx_unit_mathsf: { }
-\cs_new:Npn \siunitx_unit_mathtt: { }
-\cs_new:Npn \siunitx_unit_textrm: { }
-\cs_new:Npn \siunitx_unit_textsf: { }
-\cs_new:Npn \siunitx_unit_texttt: { }
+ { \cs_set:Npn \__siunitx_number_texttt: {#1} }
+}
+\cs_new:Npn \__siunitx_unit_mathrm: { }
+\cs_new:Npn \__siunitx_unit_mathsf: { }
+\cs_new:Npn \__siunitx_unit_mathtt: { }
+\cs_new:Npn \__siunitx_unit_textrm: { }
+\cs_new:Npn \__siunitx_unit_textsf: { }
+\cs_new:Npn \__siunitx_unit_texttt: { }
\keys_define:nn { siunitx } {
- unit-color .tl_set:N = \l_siunitx_unit_color_tl,
+ unit-color .tl_set:N = \l__siunitx_unit_color_tl,
unit-math-rm .code:n =
- { \cs_set:Npn \siunitx_unit_mathrm:n ##1 { #1 {##1} } },
+ { \cs_set:Npn \__siunitx_unit_mathrm:n ##1 { #1 {##1} } },
unit-math-sf .code:n =
- { \cs_set:Npn \siunitx_unit_mathsf:n ##1 { #1 {##1} } },
+ { \cs_set:Npn \__siunitx_unit_mathsf:n ##1 { #1 {##1} } },
unit-math-tt .code:n =
- { \cs_set:Npn \siunitx_unit_mathtt:n ##1 { #1 {##1} } },
+ { \cs_set:Npn \__siunitx_unit_mathtt:n ##1 { #1 {##1} } },
unit-mode .choice:,
unit-mode / math .code:n =
- { \bool_set_true:N \l_siunitx_unit_math_mode_bool },
+ { \bool_set_true:N \l__siunitx_unit_math_mode_bool },
unit-mode / text .code:n =
- { \bool_set_false:N \l_siunitx_unit_math_mode_bool },
+ { \bool_set_false:N \l__siunitx_unit_math_mode_bool },
unit-text-rm .code:n =
- { \cs_set:Npn \siunitx_unit_textrm: {#1} },
+ { \cs_set:Npn \__siunitx_unit_textrm: {#1} },
unit-text-sf .code:n =
- { \cs_set:Npn \siunitx_unit_textsf: {#1} },
+ { \cs_set:Npn \__siunitx_unit_textsf: {#1} },
unit-text-tt .code:n =
- { \cs_set:Npn \siunitx_unit_texttt: {#1} }
+ { \cs_set:Npn \__siunitx_unit_texttt: {#1} }
}
\keys_define:nn { siunitx } {
color .meta:n =
@@ -684,17 +684,17 @@
text-tt = \ttfamily,
}
\AtBeginDocument {
- \tl_set:Nx \l_siunitx_tmpa_tl { \familydefault }
+ \tl_set:Nx \l__siunitx_tmpa_tl { \familydefault }
\@ifpackageloaded { eulervm }
{
- \cs_set:Npn \siunitx_tmp:w #1 { \mathrm {#1} }
- \cs_if_eq:NNT \siunitx_number_mathrm:n \siunitx_tmp:w
+ \cs_set:Npn \__siunitx_tmp:w #1 { \mathrm {#1} }
+ \cs_if_eq:NNT \__siunitx_number_mathrm:n \__siunitx_tmp:w
{ \keys_set:nn { siunitx } { number-math-rm = \mathnormal } }
- \cs_if_eq:NNT \siunitx_unit_mathrm:n \siunitx_tmp:w
+ \cs_if_eq:NNT \__siunitx_unit_mathrm:n \__siunitx_tmp:w
{ \keys_set:nn { siunitx } { unit-math-rm = \mathnormal } }
}
{ }
- \tl_if_eq:NNT \l_siunitx_tmpa_tl \c_siunitx_textsf_tl
+ \tl_if_eq:NNT \l__siunitx_tmpa_tl \c__siunitx_textsf_tl
{
\@ifpackageloaded { arev }
{ }
@@ -702,84 +702,84 @@
\@ifpackageloaded { cmbright }
{ }
{
- \cs_set:Npn \siunitx_tmp:w #1 { \mathrm {#1} }
- \cs_if_eq:NNT \siunitx_number_mathrm:n \siunitx_tmp:w
+ \cs_set:Npn \__siunitx_tmp:w #1 { \mathrm {#1} }
+ \cs_if_eq:NNT \__siunitx_number_mathrm:n \__siunitx_tmp:w
{ \keys_set:nn { siunitx } { number-math-rm = \mathsf } }
- \cs_if_eq:NNT \siunitx_unit_mathrm:n \siunitx_tmp:w
+ \cs_if_eq:NNT \__siunitx_unit_mathrm:n \__siunitx_tmp:w
{ \keys_set:nn { siunitx } { unit-math-rm = \mathsf } }
}
}
- \cs_set:Npn \siunitx_tmp:w { \rmfamily }
- \cs_if_eq:NNT \siunitx_number_textrm: \siunitx_tmp:w
+ \cs_set:Npn \__siunitx_tmp:w { \rmfamily }
+ \cs_if_eq:NNT \__siunitx_number_textrm: \__siunitx_tmp:w
{ \keys_set:nn { siunitx } { number-text-rm = \sffamily } }
- \cs_if_eq:NNT \siunitx_unit_textrm: \siunitx_tmp:w
+ \cs_if_eq:NNT \__siunitx_unit_textrm: \__siunitx_tmp:w
{ \keys_set:nn { siunitx } { unit-text-rm = \sffamily } }
}
- \tl_if_eq:NNT \l_siunitx_tmpa_tl \c_siunitx_texttt_tl
+ \tl_if_eq:NNT \l__siunitx_tmpa_tl \c__siunitx_texttt_tl
{
- \cs_set:Npn \siunitx_tmp:w #1 { \mathrm {#1} }
- \cs_if_eq:NNT \siunitx_number_mathrm:n \siunitx_tmp:w
+ \cs_set:Npn \__siunitx_tmp:w #1 { \mathrm {#1} }
+ \cs_if_eq:NNT \__siunitx_number_mathrm:n \__siunitx_tmp:w
{ \keys_set:nn { siunitx } { number-math-rm = \mathtt } }
- \cs_if_eq:NNT \siunitx_unit_mathrm:n \siunitx_tmp:w
+ \cs_if_eq:NNT \__siunitx_unit_mathrm:n \__siunitx_tmp:w
{ \keys_set:nn { siunitx } { unit-math-rm = \mathtt } }
- \cs_set:Npn \siunitx_tmp:w { \rmfamily }
- \cs_if_eq:NNT \siunitx_number_textrm: \siunitx_tmp:w
+ \cs_set:Npn \__siunitx_tmp:w { \rmfamily }
+ \cs_if_eq:NNT \__siunitx_number_textrm: \__siunitx_tmp:w
{ \keys_set:nn { siunitx } { number-text-rm = \ttfamily } }
- \cs_if_eq:NNT \siunitx_unit_textrm: \siunitx_tmp:w
+ \cs_if_eq:NNT \__siunitx_unit_textrm: \__siunitx_tmp:w
{ \keys_set:nn { siunitx } { unit-text-rm = \ttfamily } }
}
}
-\tl_new:N \l_siunitx_print_arg_tl
-\tl_new:N \l_siunitx_print_type_tl
-\cs_new_protected:Npn \siunitx_print:nn #1#2 {
+\tl_new:N \l__siunitx_print_arg_tl
+\tl_new:N \l__siunitx_print_type_tl
+\cs_new_protected:Npn \__siunitx_print:nn #1#2 {
\group_begin:
- \tl_set:Nn \l_siunitx_print_type_tl {#1}
- \tl_set:Nn \l_siunitx_print_arg_tl {#2}
- \siunitx_detect_font:
- \bool_if:NF \l_siunitx_detect_mode_bool
+ \tl_set:Nn \l__siunitx_print_type_tl {#1}
+ \tl_set:Nn \l__siunitx_print_arg_tl {#2}
+ \__siunitx_detect_font:
+ \bool_if:NF \l__siunitx_detect_mode_bool
{
- \bool_if:cTF { l_siunitx_ #1 _math_mode_bool }
- { \bool_set_true:N \l_siunitx_font_math_mode_bool }
- { \bool_set_false:N \l_siunitx_font_math_mode_bool }
+ \bool_if:cTF { l__siunitx_ #1 _math_mode_bool }
+ { \bool_set_true:N \l__siunitx_font_math_mode_bool }
+ { \bool_set_false:N \l__siunitx_font_math_mode_bool }
}
- \siunitx_print_aux:
+ \__siunitx_print_aux:
\group_end:
}
-\cs_generate_variant:Nn \siunitx_print:nn { nV }
-\cs_new_protected:Npn \siunitx_print_aux: {
+\cs_generate_variant:Nn \__siunitx_print:nn { nV }
+\cs_new_protected:Npn \__siunitx_print_aux: {
\text
{
- \siunitx_print_color:
- \siunitx_font_shape:
- \siunitx_font_weight:
+ \__siunitx_print_color:
+ \__siunitx_font_shape:
+ \__siunitx_font_weight:
\use:c
{
- siunitx_ \l_siunitx_print_type_tl _
- text \l_siunitx_font_family_tl :
+ __siunitx_ \l__siunitx_print_type_tl _
+ text \l__siunitx_font_family_tl :
}
- \bool_if:NTF \l_siunitx_font_math_mode_bool
- { \siunitx_print_math: }
- { \siunitx_print_text: }
+ \bool_if:NTF \l__siunitx_font_math_mode_bool
+ { \__siunitx_print_math: }
+ { \__siunitx_print_text: }
}
}
-\cs_new_protected:Npn \siunitx_print_color: {
- \tl_if_empty:cF { l_siunitx_ \l_siunitx_print_type_tl _color_tl }
+\cs_new_protected:Npn \__siunitx_print_color: {
+ \tl_if_empty:cF { l__siunitx_ \l__siunitx_print_type_tl _color_tl }
{
\color
{
- \tl_use:c { l_siunitx_ \l_siunitx_print_type_tl _color_tl }
+ \tl_use:c { l__siunitx_ \l__siunitx_print_type_tl _color_tl }
}
}
}
\AtBeginDocument {
\@ifpackageloaded { color }
- { \cs_new_eq:NN \siunitx_textcolor:n \textcolor }
+ { \cs_new_eq:NN \__siunitx_textcolor:n \textcolor }
{
- \cs_set_eq:NN \siunitx_print_color: \scan_stop:
- \cs_new_eq:NN \siunitx_textcolor:n \use_none:n
+ \cs_set_eq:NN \__siunitx_print_color: \scan_stop:
+ \cs_new_eq:NN \__siunitx_textcolor:n \use_none:n
}
}
-\cs_new_protected:Npn \siunitx_print_math:
+\cs_new_protected:Npn \__siunitx_print_math:
{
\cs_set_eq:NN \PrintSubscript \sb
\cs_set_eq:NN \PrintSuperscript \sp
@@ -787,10 +787,10 @@
{
\use:c
{
- siunitx_ \l_siunitx_print_type_tl _
- math \l_siunitx_font_family_tl :n
+ __siunitx_ \l__siunitx_print_type_tl _
+ math \l__siunitx_font_family_tl :n
}
- { \l_siunitx_print_arg_tl }
+ { \l__siunitx_print_arg_tl }
}
}
\group_begin:
@@ -802,167 +802,167 @@
\char_set_lccode:nn { `\+ } { `\^ }
\tl_to_lowercase:n {
\group_end:
- \cs_new_protected:Npn \siunitx_print_text:
- {
- \tl_replace_all:Nnn \l_siunitx_print_arg_tl { - }
- { \c_siunitx_minus_tl }
- \cs_set_eq:NN \PrintSubscript \siunitx_print_text_sub:n
- \cs_set_eq:NN \PrintSuperscript \siunitx_print_text_super:n
- \tl_replace_all:Nnn \l_siunitx_print_arg_tl { @ }
- { \siunitx_print_text_sub:n }
- \tl_replace_all:Nnn \l_siunitx_print_arg_tl { ! }
- { \siunitx_print_text_sub:n }
- \tl_replace_all:Nnn \l_siunitx_print_arg_tl { = }
- { \siunitx_print_text_sub:n }
- \tl_replace_all:Nnn \l_siunitx_print_arg_tl { ^ }
- { \siunitx_print_text_super:n }
- \tl_replace_all:Nnn \l_siunitx_print_arg_tl { + }
- { \siunitx_print_text_super:n }
- \l_siunitx_print_arg_tl
- }
-}
-\cs_new_protected:Npn \siunitx_print_text_sub:n #1
- {
- \cs_set:Npn \siunitx_print_text_sub_super:n ##1
- {
- \ensuremath
+ \cs_new_protected:Npn \__siunitx_print_text:
+ {
+ \tl_replace_all:Nnn \l__siunitx_print_arg_tl { - }
+ { \c__siunitx_minus_tl }
+ \cs_set_eq:NN \PrintSubscript \__siunitx_print_text_sub:n
+ \cs_set_eq:NN \PrintSuperscript \__siunitx_print_text_super:n
+ \tl_replace_all:Nnn \l__siunitx_print_arg_tl { @ }
+ { \__siunitx_print_text_sub:n }
+ \tl_replace_all:Nnn \l__siunitx_print_arg_tl { ! }
+ { \__siunitx_print_text_sub:n }
+ \tl_replace_all:Nnn \l__siunitx_print_arg_tl { = }
+ { \__siunitx_print_text_sub:n }
+ \tl_replace_all:Nnn \l__siunitx_print_arg_tl { ^ }
+ { \__siunitx_print_text_super:n }
+ \tl_replace_all:Nnn \l__siunitx_print_arg_tl { + }
+ { \__siunitx_print_text_super:n }
+ \l__siunitx_print_arg_tl
+ }
+}
+\cs_new_protected:Npn \__siunitx_print_text_sub:n #1
+ {
+ \cs_set:Npn \__siunitx_print_text_sub_super:n ##1
+ {
+ \ensuremath
{
\sb { \text {#1} }
\sp { \text {##1} }
}
}
- \cs_set_eq:NN \l_peek_search_token \siunitx_print_text_super:n
- \cs_set:Npn \peek_true:w
+ \cs_set_eq:NN \l__peek_search_token \__siunitx_print_text_super:n
+ \cs_set:Npn \__peek_true:w
{
- \tex_afterassignment:D \peek_true_aux:w
- \cs_set_eq:NN \peek_tmp:w
+ \tex_afterassignment:D \__peek_true_aux:w
+ \cs_set_eq:NN \__peek_tmp:w
}
- \cs_set:Npn \peek_true_aux:w { \siunitx_print_text_sub_super:n }
- \cs_set:Npn \peek_false:w { \ensuremath { \sb { \text {#1} } } }
- \peek_after:Nw \peek_execute_branches_meaning:
+ \cs_set:Npn \__peek_true_aux:w { \__siunitx_print_text_sub_super:n }
+ \cs_set:Npn \__peek_false:w { \ensuremath { \sb { \text {#1} } } }
+ \peek_after:Nw \__peek_execute_branches_meaning:
}
-\cs_new_protected:Npn \siunitx_print_text_sub_super:n { }
-\cs_new_protected:Npn \siunitx_print_text_super:n #1 {
- \tl_set:Nn \l_siunitx_tmpa_tl {#1}
- \tl_replace_all:Nnn \l_siunitx_tmpa_tl { - }
- { \c_siunitx_minus_tl }
- \tl_set:Nx \l_siunitx_tmpa_tl
+\cs_new_protected:Npn \__siunitx_print_text_sub_super:n { }
+\cs_new_protected:Npn \__siunitx_print_text_super:n #1 {
+ \tl_set:Nn \l__siunitx_tmpa_tl {#1}
+ \tl_replace_all:Nnn \l__siunitx_tmpa_tl { - }
+ { \c__siunitx_minus_tl }
+ \tl_set:Nx \l__siunitx_tmpa_tl
{
\exp_not:N \ensuremath
- { \sp { \exp_not:N \text { \exp_not:V \l_siunitx_tmpa_tl } } }
+ { \sp { \exp_not:N \text { \exp_not:V \l__siunitx_tmpa_tl } } }
}
- \l_siunitx_tmpa_tl
+ \l__siunitx_tmpa_tl
}
\keys_define:nn { siunitx } {
- input-product .tl_set:N = \l_siunitx_input_product_tl,
- input-quotient .tl_set:N = \l_siunitx_input_quotient_tl,
+ input-product .tl_set:N = \l__siunitx_input_product_tl,
+ input-quotient .tl_set:N = \l__siunitx_input_quotient_tl,
}
\keys_set:nn { siunitx } {
input-product = x,
input-quotient = /
}
-\tl_new:N \l_siunitx_number_arg_tl
-\tl_new:N \l_siunitx_number_next_tl
-\tl_new:N \l_siunitx_number_multi_tl
-\tl_new:N \l_siunitx_number_denominator_tl
-\tl_new:N \l_siunitx_number_numerator_tl
-\cs_new_protected:Npn \siunitx_number_preprocess:n #1 {
- \siunitx_number_preprocess_init:
- \tl_set:Nn \l_siunitx_number_arg_tl {#1}
- \siunitx_number_preprocess_product:
- \tl_if_empty:NT \l_siunitx_number_multi_tl
- { \siunitx_number_preprocess_quotient: }
-}
-\cs_generate_variant:Nn \siunitx_number_preprocess:n { V }
-\cs_new_protected:Npn \siunitx_number_preprocess_init: {
- \bool_set_false:N \l_siunitx_error_bool
- \tl_clear:N \l_siunitx_number_multi_tl
-}
-\cs_new_protected:Npn \siunitx_number_preprocess_product: {
- \tl_map_function:NN \l_siunitx_input_product_tl
- \siunitx_number_preprocess_product_aux:N
-}
-\cs_new_protected:Npn \siunitx_number_preprocess_product_aux:N #1 {
- \tl_if_in:NnT \l_siunitx_number_arg_tl {#1}
- {
- \cs_set:Npn \siunitx_tmp:w ##1 #1 ##2 \q_stop
+\tl_new:N \l__siunitx_number_arg_tl
+\tl_new:N \l__siunitx_number_next_tl
+\tl_new:N \l__siunitx_number_multi_tl
+\tl_new:N \l__siunitx_number_denominator_tl
+\tl_new:N \l__siunitx_number_numerator_tl
+\cs_new_protected:Npn \__siunitx_number_preprocess:n #1 {
+ \__siunitx_number_preprocess_init:
+ \tl_set:Nn \l__siunitx_number_arg_tl {#1}
+ \__siunitx_number_preprocess_product:
+ \tl_if_empty:NT \l__siunitx_number_multi_tl
+ { \__siunitx_number_preprocess_quotient: }
+}
+\cs_generate_variant:Nn \__siunitx_number_preprocess:n { V }
+\cs_new_protected:Npn \__siunitx_number_preprocess_init: {
+ \bool_set_false:N \l__siunitx_error_bool
+ \tl_clear:N \l__siunitx_number_multi_tl
+}
+\cs_new_protected:Npn \__siunitx_number_preprocess_product: {
+ \tl_map_function:NN \l__siunitx_input_product_tl
+ \__siunitx_number_preprocess_product_aux:N
+}
+\cs_new_protected:Npn \__siunitx_number_preprocess_product_aux:N #1 {
+ \tl_if_in:NnT \l__siunitx_number_arg_tl {#1}
+ {
+ \cs_set:Npn \__siunitx_tmp:w ##1 #1 ##2 \q_stop
{
- \tl_set:Nn \l_siunitx_number_arg_tl {##1}
- \tl_set:Nn \l_siunitx_number_next_tl {##2}
- \tl_set:Nn \l_siunitx_number_multi_tl { product }
+ \tl_set:Nn \l__siunitx_number_arg_tl {##1}
+ \tl_set:Nn \l__siunitx_number_next_tl {##2}
+ \tl_set:Nn \l__siunitx_number_multi_tl { product }
}
- \exp_after:wN \siunitx_tmp:w \l_siunitx_number_arg_tl \q_stop
- \tl_if_empty:NT \l_siunitx_number_arg_tl
- { \siunitx_error:n { starting-product-token } }
- \tl_if_empty:NT \l_siunitx_number_next_tl
- { \siunitx_error:n { ending-product-token } }
+ \exp_after:wN \__siunitx_tmp:w \l__siunitx_number_arg_tl \q_stop
+ \tl_if_empty:NT \l__siunitx_number_arg_tl
+ { \__siunitx_error:n { starting-product-token } }
+ \tl_if_empty:NT \l__siunitx_number_next_tl
+ { \__siunitx_error:n { ending-product-token } }
\tl_map_break:
}
}
-\cs_new_protected:Npn \siunitx_number_preprocess_quotient: {
- \tl_map_function:NN \l_siunitx_input_quotient_tl
- \siunitx_number_preprocess_quotient_aux:N
+\cs_new_protected:Npn \__siunitx_number_preprocess_quotient: {
+ \tl_map_function:NN \l__siunitx_input_quotient_tl
+ \__siunitx_number_preprocess_quotient_aux:N
}
-\cs_new_protected:Npn \siunitx_number_preprocess_quotient_aux:N #1 {
- \tl_if_in:NnT \l_siunitx_number_arg_tl {#1}
+\cs_new_protected:Npn \__siunitx_number_preprocess_quotient_aux:N #1 {
+ \tl_if_in:NnT \l__siunitx_number_arg_tl {#1}
{
- \cs_set:Npn \siunitx_tmp:w ##1 #1 ##2 \q_stop
+ \cs_set:Npn \__siunitx_tmp:w ##1 #1 ##2 \q_stop
{
- \tl_set:Nn \l_siunitx_number_numerator_tl {##1}
- \tl_set:Nn \l_siunitx_number_denominator_tl {##2}
- \tl_set:Nn \l_siunitx_number_multi_tl { quotient }
+ \tl_set:Nn \l__siunitx_number_numerator_tl {##1}
+ \tl_set:Nn \l__siunitx_number_denominator_tl {##2}
+ \tl_set:Nn \l__siunitx_number_multi_tl { quotient }
}
- \exp_after:wN \siunitx_tmp:w \l_siunitx_number_arg_tl \q_stop
- \tl_if_empty:NT \l_siunitx_number_numerator_tl
- { \siunitx_error:n { starting-quotient-token } }
- \tl_if_empty:NT \l_siunitx_number_denominator_tl
- { \siunitx_error:n { ending-quotient-token } }
- \tl_if_in:NnT \l_siunitx_number_denominator_tl {#1}
- { \siunitx_error:n { duplicate-quotient-token } }
+ \exp_after:wN \__siunitx_tmp:w \l__siunitx_number_arg_tl \q_stop
+ \tl_if_empty:NT \l__siunitx_number_numerator_tl
+ { \__siunitx_error:n { starting-quotient-token } }
+ \tl_if_empty:NT \l__siunitx_number_denominator_tl
+ { \__siunitx_error:n { ending-quotient-token } }
+ \tl_if_in:NnT \l__siunitx_number_denominator_tl {#1}
+ { \__siunitx_error:n { duplicate-quotient-token } }
\tl_map_break:
}
}
-\tl_new:N \c_siunitx_number_part_complex_tl
-\tl_set:Nn \c_siunitx_number_part_complex_tl { complex }
-\bool_new:N \l_siunitx_number_in_complex_bool
-\bool_new:N \l_siunitx_number_in_complex_root_bool
-\bool_new:N \l_siunitx_number_in_decimal_bool
-\bool_new:N \l_siunitx_number_in_exponent_bool
-\bool_new:N \l_siunitx_number_in_first_bool
-\bool_new:N \l_siunitx_number_in_sign_bool
-\bool_new:N \l_siunitx_number_in_uncert_bool
-\bool_new:N \l_siunitx_number_in_value_bool
-\prop_new:N \l_siunitx_number_in_prop
-\tl_new:N \l_siunitx_number_parsed_tl
-\tl_new:N \l_siunitx_number_part_tl
-\tl_new:N \l_siunitx_number_part_decimal_tl
-\tl_new:N \l_siunitx_number_part_decimal_marker_tl
-\tl_new:N \l_siunitx_number_part_integer_tl
-\tl_new:N \l_siunitx_number_part_sign_tl
-\tl_new:N \l_siunitx_number_part_uncert_tl
-\int_new:N \l_siunitx_number_mantissa_length_int
-\tl_new:N \l_siunitx_number_uncert_tl
-\int_new:N \l_siunitx_number_uncert_length_int
-\tl_new:N \l_siunitx_input_uncert_sign_tl
+\tl_new:N \c__siunitx_number_part_complex_tl
+\tl_set:Nn \c__siunitx_number_part_complex_tl { complex }
+\bool_new:N \l__siunitx_number_in_complex_bool
+\bool_new:N \l__siunitx_number_in_complex_root_bool
+\bool_new:N \l__siunitx_number_in_decimal_bool
+\bool_new:N \l__siunitx_number_in_exponent_bool
+\bool_new:N \l__siunitx_number_in_first_bool
+\bool_new:N \l__siunitx_number_in_sign_bool
+\bool_new:N \l__siunitx_number_in_uncert_bool
+\bool_new:N \l__siunitx_number_in_value_bool
+\prop_new:N \l__siunitx_number_in_prop
+\tl_new:N \l__siunitx_number_parsed_tl
+\tl_new:N \l__siunitx_number_part_tl
+\tl_new:N \l__siunitx_number_part_decimal_tl
+\tl_new:N \l__siunitx_number_part_decimal_marker_tl
+\tl_new:N \l__siunitx_number_part_integer_tl
+\tl_new:N \l__siunitx_number_part_sign_tl
+\tl_new:N \l__siunitx_number_part_uncert_tl
+\int_new:N \l__siunitx_number_mantissa_length_int
+\tl_new:N \l__siunitx_number_uncert_tl
+\int_new:N \l__siunitx_number_uncert_length_int
+\tl_new:N \l__siunitx_input_uncert_sign_tl
\keys_define:nn { siunitx } {
- input-close-uncertainty .tl_set:N = \l_siunitx_input_uncert_close_tl ,
- input-complex-roots .tl_set:N = \l_siunitx_input_complex_tl ,
- input-comparators .tl_set:N = \l_siunitx_input_comparator_tl ,
- input-decimal-markers .tl_set:N = \l_siunitx_input_decimal_tl ,
- input-digits .tl_set:N = \l_siunitx_input_digit_tl ,
- input-exponent-markers .tl_set:N = \l_siunitx_input_exponent_tl ,
- input-ignore .tl_set:N = \l_siunitx_input_ignore_tl ,
- input-open-uncertainty .tl_set:N = \l_siunitx_input_uncert_open_tl ,
- input-protect-tokens .tl_set:N = \l_siunitx_input_protect_tl ,
- input-signs .tl_set:N = \l_siunitx_input_sign_tl ,
- input-symbols .tl_set:N = \l_siunitx_input_symbol_tl ,
+ input-close-uncertainty .tl_set:N = \l__siunitx_input_uncert_close_tl ,
+ input-complex-roots .tl_set:N = \l__siunitx_input_complex_tl ,
+ input-comparators .tl_set:N = \l__siunitx_input_comparator_tl ,
+ input-decimal-markers .tl_set:N = \l__siunitx_input_decimal_tl ,
+ input-digits .tl_set:N = \l__siunitx_input_digit_tl ,
+ input-exponent-markers .tl_set:N = \l__siunitx_input_exponent_tl ,
+ input-ignore .tl_set:N = \l__siunitx_input_ignore_tl ,
+ input-open-uncertainty .tl_set:N = \l__siunitx_input_uncert_open_tl ,
+ input-protect-tokens .tl_set:N = \l__siunitx_input_protect_tl ,
+ input-signs .tl_set:N = \l__siunitx_input_sign_tl ,
+ input-symbols .tl_set:N = \l__siunitx_input_symbol_tl ,
input-uncertainty-signs .code:n =
{
- \tl_set:Nn \l_siunitx_input_uncert_sign_tl {#1}
+ \tl_set:Nn \l__siunitx_input_uncert_sign_tl {#1}
\tl_map_inline:nn {#1}
{
- \tl_if_in:NnF \l_siunitx_input_sign_tl {##1}
- { \tl_put_right:Nn \l_siunitx_input_sign_tl {##1} }
+ \tl_if_in:NnF \l__siunitx_input_sign_tl {##1}
+ { \tl_put_right:Nn \l__siunitx_input_sign_tl {##1} }
}
} ,
}
@@ -979,22 +979,22 @@
input-symbols = \dots\pi,
input-uncertainty-signs = \pm,
}
-\cs_new_protected:Npn \siunitx_number_in_parse:n #1 {
+\cs_new_protected:Npn \__siunitx_number_in_parse:n #1 {
\tl_if_empty:nF {#1}
{
- \siunitx_number_in_init:
- \cs_set_eq:NN \siunitx_number_in_parse_more:N
- \siunitx_number_in_parse_mantissa_aux:N
- \siunitx_number_in_parse_aux:n {#1}
+ \__siunitx_number_in_init:
+ \cs_set_eq:NN \__siunitx_number_in_parse_more:N
+ \__siunitx_number_in_parse_mantissa_aux:N
+ \__siunitx_number_in_parse_aux:n {#1}
}
}
-\cs_generate_variant:Nn \siunitx_number_in_parse:n { V }
-\cs_new_protected:Npn \siunitx_number_in_parse_aux:n #1
+\cs_generate_variant:Nn \__siunitx_number_in_parse:n { V }
+\cs_new_protected:Npn \__siunitx_number_in_parse_aux:n #1
{
\group_begin:
- \siunitx_number_in_protect:
+ \__siunitx_number_in_protect:
\cs_set_eq:NN \, \prg_do_nothing:
- \tl_set_rescan:Nnx \l_siunitx_number_arg_tl
+ \tl_set_rescan:Nnx \l__siunitx_number_arg_tl
{
\char_set_catcode_ignore:N \~
\char_set_catcode_other:N \,
@@ -1002,68 +1002,68 @@
}
{#1}
\exp_args:NNNV \group_end:
- \tl_set:Nn \l_siunitx_number_arg_tl \l_siunitx_number_arg_tl
- \siunitx_number_in_sign_replace:N \l_siunitx_number_arg_tl
- \siunitx_number_in_parse_relation:N \l_siunitx_number_arg_tl
- \tl_map_function:NN \l_siunitx_number_arg_tl
- \siunitx_number_in_parse_loop:N
- \tl_if_empty:NF \l_siunitx_number_parsed_tl
- {
- \bool_if:NTF \l_siunitx_number_in_uncert_bool
- { \siunitx_error:nx { invalid-number } {#1} }
+ \tl_set:Nn \l__siunitx_number_arg_tl \l__siunitx_number_arg_tl
+ \__siunitx_number_in_sign_replace:N \l__siunitx_number_arg_tl
+ \__siunitx_number_in_parse_relation:N \l__siunitx_number_arg_tl
+ \tl_map_function:NN \l__siunitx_number_arg_tl
+ \__siunitx_number_in_parse_loop:N
+ \tl_if_empty:NF \l__siunitx_number_parsed_tl
+ {
+ \bool_if:NTF \l__siunitx_number_in_uncert_bool
+ { \__siunitx_error:nx { invalid-number } {#1} }
{
- \prop_put:NVn \l_siunitx_number_in_prop
- \l_siunitx_number_part_tl { true }
- \bool_if:NTF \l_siunitx_number_in_decimal_bool
+ \prop_put:NVn \l__siunitx_number_in_prop
+ \l__siunitx_number_part_tl { true }
+ \bool_if:NTF \l__siunitx_number_in_decimal_bool
{
- \prop_put:NVV \l_siunitx_number_in_prop
- \l_siunitx_number_part_decimal_tl
- \l_siunitx_number_parsed_tl
+ \prop_put:NVV \l__siunitx_number_in_prop
+ \l__siunitx_number_part_decimal_tl
+ \l__siunitx_number_parsed_tl
}
{
- \prop_put:NVV \l_siunitx_number_in_prop
- \l_siunitx_number_part_integer_tl
- \l_siunitx_number_parsed_tl
+ \prop_put:NVV \l__siunitx_number_in_prop
+ \l__siunitx_number_part_integer_tl
+ \l__siunitx_number_parsed_tl
}
}
}
- \siunitx_number_in_check:n {#1}
- }
-\cs_new_protected:Npn \siunitx_number_in_init: {
- \cs_set_eq:NN \siunitx_number_in_parse_loop:N
- \siunitx_number_in_parse_mantissa:N
- \cs_set_eq:NN \siunitx_number_in_check:n
- \siunitx_number_in_check_short:n
- \tl_clear:N \l_siunitx_number_parsed_tl
- \prop_clear:N \l_siunitx_number_in_prop
- \bool_set_false:N \l_siunitx_error_bool
- \bool_set_false:N \l_siunitx_number_in_complex_bool
- \bool_set_false:N \l_siunitx_number_in_complex_root_bool
- \bool_set_false:N \l_siunitx_number_in_exponent_bool
- \bool_set_false:N \l_siunitx_number_in_uncert_bool
- \siunitx_number_in_init_part:n { mantissa }
-}
-\cs_new_protected:Npn \siunitx_number_in_init_part:n #1 {
- \bool_set_false:N \l_siunitx_number_in_decimal_bool
- \bool_set_true:N \l_siunitx_number_in_first_bool
- \bool_set_false:N \l_siunitx_number_in_sign_bool
- \bool_set_false:N \l_siunitx_number_in_value_bool
- \tl_set:Nn \l_siunitx_number_part_tl {#1}
- \tl_set:Nn \l_siunitx_number_part_decimal_tl { #1 -decimal }
- \tl_set:Nn \l_siunitx_number_part_decimal_marker_tl
+ \__siunitx_number_in_check:n {#1}
+ }
+\cs_new_protected:Npn \__siunitx_number_in_init: {
+ \cs_set_eq:NN \__siunitx_number_in_parse_loop:N
+ \__siunitx_number_in_parse_mantissa:N
+ \cs_set_eq:NN \__siunitx_number_in_check:n
+ \__siunitx_number_in_check_short:n
+ \tl_clear:N \l__siunitx_number_parsed_tl
+ \prop_clear:N \l__siunitx_number_in_prop
+ \bool_set_false:N \l__siunitx_error_bool
+ \bool_set_false:N \l__siunitx_number_in_complex_bool
+ \bool_set_false:N \l__siunitx_number_in_complex_root_bool
+ \bool_set_false:N \l__siunitx_number_in_exponent_bool
+ \bool_set_false:N \l__siunitx_number_in_uncert_bool
+ \__siunitx_number_in_init_part:n { mantissa }
+}
+\cs_new_protected:Npn \__siunitx_number_in_init_part:n #1 {
+ \bool_set_false:N \l__siunitx_number_in_decimal_bool
+ \bool_set_true:N \l__siunitx_number_in_first_bool
+ \bool_set_false:N \l__siunitx_number_in_sign_bool
+ \bool_set_false:N \l__siunitx_number_in_value_bool
+ \tl_set:Nn \l__siunitx_number_part_tl {#1}
+ \tl_set:Nn \l__siunitx_number_part_decimal_tl { #1 -decimal }
+ \tl_set:Nn \l__siunitx_number_part_decimal_marker_tl
{ #1 -decimal-marker }
- \tl_set:Nn \l_siunitx_number_part_integer_tl { #1 -integer }
- \tl_set:Nn \l_siunitx_number_part_sign_tl { #1 -sign }
- \tl_set:Nn \l_siunitx_number_part_uncert_tl { #1 -uncertainty }
+ \tl_set:Nn \l__siunitx_number_part_integer_tl { #1 -integer }
+ \tl_set:Nn \l__siunitx_number_part_sign_tl { #1 -sign }
+ \tl_set:Nn \l__siunitx_number_part_uncert_tl { #1 -uncertainty }
}
-\cs_new_protected:Npn \siunitx_number_in_protect: {
- \tl_map_function:NN \l_siunitx_input_protect_tl
- \siunitx_number_in_protect_aux:N
+\cs_new_protected:Npn \__siunitx_number_in_protect: {
+ \tl_map_function:NN \l__siunitx_input_protect_tl
+ \__siunitx_number_in_protect_aux:N
}
-\cs_new_protected:Npn \siunitx_number_in_protect_aux:N #1 {
+\cs_new_protected:Npn \__siunitx_number_in_protect_aux:N #1 {
\cs_set_eq:NN #1 \scan_stop:
}
-\cs_new_protected:Npn \siunitx_number_in_sign_replace:N #1 {
+\cs_new_protected:Npn \__siunitx_number_in_sign_replace:N #1 {
\tl_replace_all:Nnn #1 { -+ } { \mp }
\tl_replace_all:Nnn #1 { +- } { \pm }
\tl_replace_all:Nnn #1 { << } { \ll }
@@ -1071,186 +1071,186 @@
\tl_replace_all:Nnn #1 { >> } { \gg }
\tl_replace_all:Nnn #1 { >= } { \ge }
}
-\cs_new_protected:Npn \siunitx_number_in_parse_error:nn #1#2 {
- \siunitx_error:nx {#1} { \exp_not:n {#2} }
+\cs_new_protected:Npn \__siunitx_number_in_parse_error:nn #1#2 {
+ \__siunitx_error:nx {#1} { \exp_not:n {#2} }
\tl_map_break:
}
-\cs_generate_variant:Nn \siunitx_number_in_parse_error:nn { nV }
-\cs_new_protected:Npn \siunitx_number_in_parse_loop:N #1 { }
-\cs_new_protected:Npn \siunitx_number_in_parse_more:N #1 { }
-\cs_new_protected:Npn \siunitx_number_in_parse_relation:N #1 {
- \exp_after:wN \siunitx_number_in_parse_relation:w #1 \q_stop #1
+\cs_generate_variant:Nn \__siunitx_number_in_parse_error:nn { nV }
+\cs_new_protected:Npn \__siunitx_number_in_parse_loop:N #1 { }
+\cs_new_protected:Npn \__siunitx_number_in_parse_more:N #1 { }
+\cs_new_protected:Npn \__siunitx_number_in_parse_relation:N #1 {
+ \exp_after:wN \__siunitx_number_in_parse_relation:w #1 \q_stop #1
}
-\cs_new_protected:Npn \siunitx_number_in_parse_relation:w
+\cs_new_protected:Npn \__siunitx_number_in_parse_relation:w
#1#2 \q_stop #3 {
- \tl_if_in:NnT \l_siunitx_input_comparator_tl {#1}
+ \tl_if_in:NnT \l__siunitx_input_comparator_tl {#1}
{
- \prop_put:Nnn \l_siunitx_number_in_prop { comparator } {#1}
+ \prop_put:Nnn \l__siunitx_number_in_prop { comparator } {#1}
\tl_set:Nn #3 {#2}
}
}
-\cs_new_protected:Npn \siunitx_number_in_parse_restricted:N #1 {
- \tl_if_in:NnTF \l_siunitx_input_exponent_tl {#1}
+\cs_new_protected:Npn \__siunitx_number_in_parse_restricted:N #1 {
+ \tl_if_in:NnTF \l__siunitx_input_exponent_tl {#1}
{
- \siunitx_number_in_parse_error:nn
+ \__siunitx_number_in_parse_error:nn
{ restricted-number } {#1}
}
{
- \tl_if_in:NnTF \l_siunitx_input_uncert_open_tl {#1}
+ \tl_if_in:NnTF \l__siunitx_input_uncert_open_tl {#1}
{
- \siunitx_number_in_parse_error:nV
- { restricted-number } \l_siunitx_number_arg_tl
+ \__siunitx_number_in_parse_error:nV
+ { restricted-number } \l__siunitx_number_arg_tl
}
{
- \tl_if_in:NnTF \l_siunitx_input_uncert_close_tl {#1}
+ \tl_if_in:NnTF \l__siunitx_input_uncert_close_tl {#1}
{
- \siunitx_number_in_parse_error:nV
- { restricted-number } \l_siunitx_number_arg_tl
+ \__siunitx_number_in_parse_error:nV
+ { restricted-number } \l__siunitx_number_arg_tl
}
{
- \tl_if_in:NnTF \l_siunitx_input_complex_tl {#1}
+ \tl_if_in:NnTF \l__siunitx_input_complex_tl {#1}
{
- \siunitx_number_in_parse_error:nV
- { restricted-number } \l_siunitx_number_arg_tl
+ \__siunitx_number_in_parse_error:nV
+ { restricted-number } \l__siunitx_number_arg_tl
}
{
- \siunitx_number_in_parse_error:nn
+ \__siunitx_number_in_parse_error:nn
{ restricted-number } {#1}
}
}
}
}
}
-\cs_new_protected:Npn \siunitx_number_in_parse_complex:N #1 {
- \tl_if_in:NnTF \l_siunitx_input_exponent_tl {#1}
+\cs_new_protected:Npn \__siunitx_number_in_parse_complex:N #1 {
+ \tl_if_in:NnTF \l__siunitx_input_exponent_tl {#1}
{
- \cs_set_eq:NN \siunitx_number_in_parse_loop:N
- \siunitx_number_in_parse_mantissa:N
- \siunitx_number_in_exponent:N #1
+ \cs_set_eq:NN \__siunitx_number_in_parse_loop:N
+ \__siunitx_number_in_parse_mantissa:N
+ \__siunitx_number_in_exponent:N #1
}
{
- \tl_if_in:NnF \l_siunitx_input_ignore_tl {#1}
+ \tl_if_in:NnF \l__siunitx_input_ignore_tl {#1}
{
- \siunitx_number_in_parse_error:nV
+ \__siunitx_number_in_parse_error:nV
{ misplaced-complex-root-token }
- \l_siunitx_number_arg_tl
+ \l__siunitx_number_arg_tl
}
}
}
-\cs_new_protected:Npn \siunitx_number_in_parse_exponent:N #1 {
- \tl_if_in:NnTF \l_siunitx_input_exponent_tl {#1}
+\cs_new_protected:Npn \__siunitx_number_in_parse_exponent:N #1 {
+ \tl_if_in:NnTF \l__siunitx_input_exponent_tl {#1}
{
- \siunitx_number_in_parse_error:nn
+ \__siunitx_number_in_parse_error:nn
{ duplicate-exponent-token } { \token_to_str:N #1 }
}
{
- \tl_if_in:NnTF \l_siunitx_input_uncert_open_tl {#1}
+ \tl_if_in:NnTF \l__siunitx_input_uncert_open_tl {#1}
{
- \siunitx_number_in_parse_error:nV
- { invalid-token-in-exponent } \l_siunitx_number_arg_tl
+ \__siunitx_number_in_parse_error:nV
+ { invalid-token-in-exponent } \l__siunitx_number_arg_tl
}
{
- \tl_if_in:NnTF \l_siunitx_input_uncert_close_tl {#1}
+ \tl_if_in:NnTF \l__siunitx_input_uncert_close_tl {#1}
{
- \siunitx_number_in_parse_error:nV
- { invalid-token-in-exponent } \l_siunitx_number_arg_tl
+ \__siunitx_number_in_parse_error:nV
+ { invalid-token-in-exponent } \l__siunitx_number_arg_tl
}
{
- \tl_if_in:NnTF \l_siunitx_input_complex_tl {#1}
+ \tl_if_in:NnTF \l__siunitx_input_complex_tl {#1}
{
- \siunitx_number_in_parse_error:nV
+ \__siunitx_number_in_parse_error:nV
{ invalid-token-in-exponent }
- \l_siunitx_number_arg_tl
+ \l__siunitx_number_arg_tl
}
{
- \siunitx_number_in_parse_error:nn
+ \__siunitx_number_in_parse_error:nn
{ invalid-token-in-number } {#1}
}
}
}
}
}
-\cs_new_protected:Npn \siunitx_number_in_parse_mantissa:N #1 {
- \tl_if_in:NnTF \l_siunitx_input_digit_tl {#1}
- { \siunitx_number_in_digit:n {#1} }
+\cs_new_protected:Npn \__siunitx_number_in_parse_mantissa:N #1 {
+ \tl_if_in:NnTF \l__siunitx_input_digit_tl {#1}
+ { \__siunitx_number_in_digit:n {#1} }
{
- \tl_if_in:NnTF \l_siunitx_input_decimal_tl {#1}
- { \siunitx_number_in_decimal:N #1 }
+ \tl_if_in:NnTF \l__siunitx_input_decimal_tl {#1}
+ { \__siunitx_number_in_decimal:N #1 }
{
- \tl_if_in:NnTF \l_siunitx_input_sign_tl {#1}
- { \siunitx_number_in_sign:N #1 }
+ \tl_if_in:NnTF \l__siunitx_input_sign_tl {#1}
+ { \__siunitx_number_in_sign:N #1 }
{
- \tl_if_in:NnTF \l_siunitx_input_symbol_tl {#1}
+ \tl_if_in:NnTF \l__siunitx_input_symbol_tl {#1}
{
- \prop_put:Nnn \l_siunitx_number_in_prop { symbolic }
+ \prop_put:Nnn \l__siunitx_number_in_prop { symbolic }
{ true }
- \siunitx_number_in_digit:n { \ensuremath {#1} }
+ \__siunitx_number_in_digit:n { \ensuremath {#1} }
}
{
- \tl_if_in:NnF \l_siunitx_input_ignore_tl {#1}
- { \siunitx_number_in_parse_more:N #1 }
+ \tl_if_in:NnF \l__siunitx_input_ignore_tl {#1}
+ { \__siunitx_number_in_parse_more:N #1 }
}
}
}
}
}
-\cs_new_protected:Npn \siunitx_number_in_parse_mantissa_aux:N #1 {
- \tl_if_in:NnTF \l_siunitx_input_exponent_tl {#1}
- { \siunitx_number_in_exponent:N #1 }
+\cs_new_protected:Npn \__siunitx_number_in_parse_mantissa_aux:N #1 {
+ \tl_if_in:NnTF \l__siunitx_input_exponent_tl {#1}
+ { \__siunitx_number_in_exponent:N #1 }
{
- \tl_if_in:NnTF \l_siunitx_input_uncert_open_tl {#1}
- { \siunitx_number_in_uncert_open:N #1 }
+ \tl_if_in:NnTF \l__siunitx_input_uncert_open_tl {#1}
+ { \__siunitx_number_in_uncert_open:N #1 }
{
- \tl_if_in:NnTF \l_siunitx_input_uncert_close_tl {#1}
+ \tl_if_in:NnTF \l__siunitx_input_uncert_close_tl {#1}
{
- \siunitx_number_in_parse_error:nn
+ \__siunitx_number_in_parse_error:nn
{ misplaced-uncertainty-token } {#1}
}
{
- \tl_if_in:NnTF \l_siunitx_input_complex_tl {#1}
- { \siunitx_number_in_complex:N #1 }
+ \tl_if_in:NnTF \l__siunitx_input_complex_tl {#1}
+ { \__siunitx_number_in_complex:N #1 }
{
- \siunitx_number_in_parse_error:nn
+ \__siunitx_number_in_parse_error:nn
{ invalid-token-in-number } {#1}
}
}
}
}
}
-\cs_new_protected:Npn \siunitx_number_in_parse_uncert:N #1 {
- \tl_if_in:NnTF \l_siunitx_input_digit_tl {#1}
- { \siunitx_number_in_digit:n {#1} }
+\cs_new_protected:Npn \__siunitx_number_in_parse_uncert:N #1 {
+ \tl_if_in:NnTF \l__siunitx_input_digit_tl {#1}
+ { \__siunitx_number_in_digit:n {#1} }
{
- \tl_if_in:NnTF \l_siunitx_input_decimal_tl {#1}
+ \tl_if_in:NnTF \l__siunitx_input_decimal_tl {#1}
{
- \siunitx_number_in_parse_error:nV
+ \__siunitx_number_in_parse_error:nV
{ invalid-token-in-uncertainty }
- \l_siunitx_number_arg_tl
+ \l__siunitx_number_arg_tl
}
{
- \tl_if_in:NnTF \l_siunitx_input_sign_tl {#1}
+ \tl_if_in:NnTF \l__siunitx_input_sign_tl {#1}
{
- \siunitx_number_in_parse_error:nV
+ \__siunitx_number_in_parse_error:nV
{ invalid-token-in-uncertainty }
- \l_siunitx_number_arg_tl
+ \l__siunitx_number_arg_tl
}
{
- \tl_if_in:NnTF \l_siunitx_input_symbol_tl {#1}
+ \tl_if_in:NnTF \l__siunitx_input_symbol_tl {#1}
{
- \prop_put:Nnn \l_siunitx_number_in_prop { symbolic }
+ \prop_put:Nnn \l__siunitx_number_in_prop { symbolic }
{ true }
- \siunitx_number_in_digit:n {#1}
+ \__siunitx_number_in_digit:n {#1}
}
{
- \tl_if_in:NnF \l_siunitx_input_ignore_tl {#1}
+ \tl_if_in:NnF \l__siunitx_input_ignore_tl {#1}
{
- \tl_if_in:NnTF \l_siunitx_input_uncert_close_tl
+ \tl_if_in:NnTF \l__siunitx_input_uncert_close_tl
{#1}
- { \siunitx_number_in_uncert_close:N #1 }
+ { \__siunitx_number_in_uncert_close:N #1 }
{
- \siunitx_number_in_parse_error:nV
+ \__siunitx_number_in_parse_error:nV
{ invalid-token-in-uncertainty }
- \l_siunitx_number_arg_tl
+ \l__siunitx_number_arg_tl
}
}
}
@@ -1258,496 +1258,496 @@
}
}
}
-\cs_new_protected:Npn \siunitx_number_in_parse_uncert_after:N #1 {
- \tl_if_in:NnTF \l_siunitx_input_exponent_tl {#1}
+\cs_new_protected:Npn \__siunitx_number_in_parse_uncert_after:N #1 {
+ \tl_if_in:NnTF \l__siunitx_input_exponent_tl {#1}
{
- \cs_set_eq:NN \siunitx_number_in_parse_loop:N
- \siunitx_number_in_parse_mantissa:N
- \siunitx_number_in_exponent:N #1
+ \cs_set_eq:NN \__siunitx_number_in_parse_loop:N
+ \__siunitx_number_in_parse_mantissa:N
+ \__siunitx_number_in_exponent:N #1
}
{
- \tl_if_in:NnTF \l_siunitx_input_sign_tl {#1}
+ \tl_if_in:NnTF \l__siunitx_input_sign_tl {#1}
{
- \cs_set_eq:NN \siunitx_number_in_parse_loop:N
- \siunitx_number_in_parse_mantissa:N
- \siunitx_number_in_sign:N #1
+ \cs_set_eq:NN \__siunitx_number_in_parse_loop:N
+ \__siunitx_number_in_parse_mantissa:N
+ \__siunitx_number_in_sign:N #1
}
{
- \tl_if_in:NnF \l_siunitx_input_ignore_tl {#1}
+ \tl_if_in:NnF \l__siunitx_input_ignore_tl {#1}
{
- \tl_if_in:NnTF \l_siunitx_input_complex_tl {#1}
+ \tl_if_in:NnTF \l__siunitx_input_complex_tl {#1}
{
- \cs_set_eq:NN \siunitx_number_in_parse_loop:N
- \siunitx_number_in_parse_mantissa:N
- \siunitx_number_in_complex:N #1
+ \cs_set_eq:NN \__siunitx_number_in_parse_loop:N
+ \__siunitx_number_in_parse_mantissa:N
+ \__siunitx_number_in_complex:N #1
}
{
- \siunitx_number_in_parse_error:nV { invalid-number }
- \l_siunitx_number_arg_tl
+ \__siunitx_number_in_parse_error:nV { invalid-number }
+ \l__siunitx_number_arg_tl
}
}
}
}
}
-\cs_new_protected:Npn \siunitx_number_in_complex:N #1 {
- \bool_set_false:N \l_siunitx_number_in_first_bool
- \bool_if:NTF \l_siunitx_number_in_complex_root_bool
+\cs_new_protected:Npn \__siunitx_number_in_complex:N #1 {
+ \bool_set_false:N \l__siunitx_number_in_first_bool
+ \bool_if:NTF \l__siunitx_number_in_complex_root_bool
{
- \siunitx_number_in_parse_error:nn
+ \__siunitx_number_in_parse_error:nn
{ duplicate-complex-root-token } { \token_to_str:N #1 }
}
{
- \cs_set_eq:NN \siunitx_number_in_check:n
- \siunitx_number_in_check_full:n
- \bool_set_true:N \l_siunitx_number_in_complex_root_bool
- \prop_put:Nnn \l_siunitx_number_in_prop { complex-root } {#1}
- \tl_if_empty:NF \l_siunitx_number_parsed_tl
+ \cs_set_eq:NN \__siunitx_number_in_check:n
+ \__siunitx_number_in_check_full:n
+ \bool_set_true:N \l__siunitx_number_in_complex_root_bool
+ \prop_put:Nnn \l__siunitx_number_in_prop { complex-root } {#1}
+ \tl_if_empty:NF \l__siunitx_number_parsed_tl
{
- \cs_set_eq:NN \siunitx_number_in_parse_loop:N
- \siunitx_number_in_parse_complex:N
+ \cs_set_eq:NN \__siunitx_number_in_parse_loop:N
+ \__siunitx_number_in_parse_complex:N
}
- \bool_if:NT \l_siunitx_number_in_decimal_bool
+ \bool_if:NT \l__siunitx_number_in_decimal_bool
{
- \bool_if:NF \l_siunitx_number_in_complex_bool
+ \bool_if:NF \l__siunitx_number_in_complex_bool
{
- \prop_if_in:NnT \l_siunitx_number_in_prop
+ \prop_if_in:NnT \l__siunitx_number_in_prop
{ mantissa-uncertainty }
{
- \siunitx_number_in_complex_aux:nn
+ \__siunitx_number_in_complex_aux:nn
{ mantissa-decimal } { complex-decimal }
- \siunitx_number_in_complex_aux:nn
+ \__siunitx_number_in_complex_aux:nn
{ mantissa-uncertainty } { complex-uncertainty }
}
- \siunitx_number_in_complex_aux:nn { mantissa-integer }
+ \__siunitx_number_in_complex_aux:nn { mantissa-integer }
{ complex-integer }
- \siunitx_number_in_complex_aux:nn
+ \__siunitx_number_in_complex_aux:nn
{ mantissa-decimal-marker } { complex-decimal-marker }
- \prop_del:Nn \l_siunitx_number_in_prop { mantissa }
- \prop_put:Nnn \l_siunitx_number_in_prop { complex }
+ \prop_del:Nn \l__siunitx_number_in_prop { mantissa }
+ \prop_put:Nnn \l__siunitx_number_in_prop { complex }
{ true }
}
}
- \prop_if_in:NnF \l_siunitx_number_in_prop { mantissa }
+ \prop_if_in:NnF \l__siunitx_number_in_prop { mantissa }
{
- \prop_if_in:NnT \l_siunitx_number_in_prop { mantissa-sign }
+ \prop_if_in:NnT \l__siunitx_number_in_prop { mantissa-sign }
{
- \siunitx_number_in_complex_aux:nn { mantissa-sign }
+ \__siunitx_number_in_complex_aux:nn { mantissa-sign }
{ complex-sign }
}
}
- \bool_set_true:N \l_siunitx_number_in_complex_bool
- \bool_set_false:N \l_siunitx_number_in_first_bool
- \siunitx_number_in_init_part:n { complex }
- \prop_if_in:NnT \l_siunitx_number_in_prop
+ \bool_set_true:N \l__siunitx_number_in_complex_bool
+ \bool_set_false:N \l__siunitx_number_in_first_bool
+ \__siunitx_number_in_init_part:n { complex }
+ \prop_if_in:NnT \l__siunitx_number_in_prop
{ complex-decimal-marker }
- { \bool_set_true:N \l_siunitx_number_in_decimal_bool }
- \prop_if_in:NnTF \l_siunitx_number_in_prop
+ { \bool_set_true:N \l__siunitx_number_in_decimal_bool }
+ \prop_if_in:NnTF \l__siunitx_number_in_prop
{ complex-sign }
- { \bool_set_true:N \l_siunitx_number_in_sign_bool }
- { \prop_del:Nn \l_siunitx_number_in_prop { mantissa } }
+ { \bool_set_true:N \l__siunitx_number_in_sign_bool }
+ { \prop_del:Nn \l__siunitx_number_in_prop { mantissa } }
}
}
-\cs_new_protected:Npn \siunitx_number_in_complex_aux:nn #1#2 {
- \prop_get:NnNT \l_siunitx_number_in_prop {#1} \l_siunitx_tmpa_tl
+\cs_new_protected:Npn \__siunitx_number_in_complex_aux:nn #1#2 {
+ \prop_get:NnNT \l__siunitx_number_in_prop {#1} \l__siunitx_tmpa_tl
{
- \prop_del:Nn \l_siunitx_number_in_prop {#1}
- \prop_put:NnV \l_siunitx_number_in_prop {#2} \l_siunitx_tmpa_tl
+ \prop_del:Nn \l__siunitx_number_in_prop {#1}
+ \prop_put:NnV \l__siunitx_number_in_prop {#2} \l__siunitx_tmpa_tl
}
}
-\cs_new_protected:Npn \siunitx_number_in_decimal:N #1 {
- \bool_set_false:N \l_siunitx_number_in_first_bool
- \bool_if:NTF \l_siunitx_number_in_decimal_bool
+\cs_new_protected:Npn \__siunitx_number_in_decimal:N #1 {
+ \bool_set_false:N \l__siunitx_number_in_first_bool
+ \bool_if:NTF \l__siunitx_number_in_decimal_bool
{
- \siunitx_number_in_parse_error:nn { duplicate-decimal-token }
+ \__siunitx_number_in_parse_error:nn { duplicate-decimal-token }
{#1}
}
{
- \bool_set_true:N \l_siunitx_number_in_decimal_bool
- \tl_if_empty:NF \l_siunitx_number_parsed_tl
+ \bool_set_true:N \l__siunitx_number_in_decimal_bool
+ \tl_if_empty:NF \l__siunitx_number_parsed_tl
{
- \prop_put:NVn \l_siunitx_number_in_prop
- \l_siunitx_number_part_tl { true }
- \prop_put:NVV \l_siunitx_number_in_prop
- \l_siunitx_number_part_integer_tl
- \l_siunitx_number_parsed_tl
- \tl_clear:N \l_siunitx_number_parsed_tl
+ \prop_put:NVn \l__siunitx_number_in_prop
+ \l__siunitx_number_part_tl { true }
+ \prop_put:NVV \l__siunitx_number_in_prop
+ \l__siunitx_number_part_integer_tl
+ \l__siunitx_number_parsed_tl
+ \tl_clear:N \l__siunitx_number_parsed_tl
}
- \prop_put:NVn \l_siunitx_number_in_prop
- \l_siunitx_number_part_decimal_marker_tl {#1}
+ \prop_put:NVn \l__siunitx_number_in_prop
+ \l__siunitx_number_part_decimal_marker_tl {#1}
}
}
-\cs_new_protected:Npn \siunitx_number_in_digit:n #1 {
- \bool_set_false:N \l_siunitx_number_in_first_bool
- \bool_if:NTF \l_siunitx_number_in_uncert_bool
- { \tl_put_right:Nn \l_siunitx_number_parsed_tl {#1} }
+\cs_new_protected:Npn \__siunitx_number_in_digit:n #1 {
+ \bool_set_false:N \l__siunitx_number_in_first_bool
+ \bool_if:NTF \l__siunitx_number_in_uncert_bool
+ { \tl_put_right:Nn \l__siunitx_number_parsed_tl {#1} }
{
- \bool_if:NTF \l_siunitx_number_in_decimal_bool
+ \bool_if:NTF \l__siunitx_number_in_decimal_bool
{
- \tl_put_right:Nn \l_siunitx_number_parsed_tl {#1}
+ \tl_put_right:Nn \l__siunitx_number_parsed_tl {#1}
\str_if_eq:nnF {#1} { 0 }
- { \bool_set_true:N \l_siunitx_number_in_value_bool }
+ { \bool_set_true:N \l__siunitx_number_in_value_bool }
}
{
\str_if_eq:nnTF {#1} { 0 }
{
- \prop_put:NVn \l_siunitx_number_in_prop
- \l_siunitx_number_part_tl { true }
- \prop_put:NVn \l_siunitx_number_in_prop
- \l_siunitx_number_part_integer_tl { 0 }
+ \prop_put:NVn \l__siunitx_number_in_prop
+ \l__siunitx_number_part_tl { true }
+ \prop_put:NVn \l__siunitx_number_in_prop
+ \l__siunitx_number_part_integer_tl { 0 }
}
- { \bool_set_true:N \l_siunitx_number_in_value_bool }
- \bool_if:NT \l_siunitx_number_in_value_bool
- { \tl_put_right:Nn \l_siunitx_number_parsed_tl {#1} }
+ { \bool_set_true:N \l__siunitx_number_in_value_bool }
+ \bool_if:NT \l__siunitx_number_in_value_bool
+ { \tl_put_right:Nn \l__siunitx_number_parsed_tl {#1} }
}
}
}
-\cs_new_protected:Npn \siunitx_number_in_exponent:N #1 {
- \bool_if:NTF \l_siunitx_number_in_exponent_bool
+\cs_new_protected:Npn \__siunitx_number_in_exponent:N #1 {
+ \bool_if:NTF \l__siunitx_number_in_exponent_bool
{
- \siunitx_number_in_parse_error:nn { duplicate-exponent-token }
+ \__siunitx_number_in_parse_error:nn { duplicate-exponent-token }
{ \token_to_str:N #1 }
}
{
- \cs_set_eq:NN \siunitx_number_in_parse_more:N
- \siunitx_number_in_parse_exponent:N
- \tl_if_empty:NF \l_siunitx_number_parsed_tl
- { \siunitx_number_in_store: }
- \bool_set_true:N \l_siunitx_number_in_exponent_bool
- \siunitx_number_in_init_part:n { exponent }
+ \cs_set_eq:NN \__siunitx_number_in_parse_more:N
+ \__siunitx_number_in_parse_exponent:N
+ \tl_if_empty:NF \l__siunitx_number_parsed_tl
+ { \__siunitx_number_in_store: }
+ \bool_set_true:N \l__siunitx_number_in_exponent_bool
+ \__siunitx_number_in_init_part:n { exponent }
}
}
-\cs_new_protected:Npn \siunitx_number_in_sign:N #1 {
- \bool_if:NTF \l_siunitx_number_in_first_bool
+\cs_new_protected:Npn \__siunitx_number_in_sign:N #1 {
+ \bool_if:NTF \l__siunitx_number_in_first_bool
{
- \bool_set_false:N \l_siunitx_number_in_first_bool
- \bool_set_true:N \l_siunitx_number_in_sign_bool
- \prop_put:NVn \l_siunitx_number_in_prop
- \l_siunitx_number_part_sign_tl {#1}
+ \bool_set_false:N \l__siunitx_number_in_first_bool
+ \bool_set_true:N \l__siunitx_number_in_sign_bool
+ \prop_put:NVn \l__siunitx_number_in_prop
+ \l__siunitx_number_part_sign_tl {#1}
}
{
- \bool_if:NTF \l_siunitx_number_in_exponent_bool
+ \bool_if:NTF \l__siunitx_number_in_exponent_bool
{
- \siunitx_number_in_parse_error:nn { misplaced-sign-token }
+ \__siunitx_number_in_parse_error:nn { misplaced-sign-token }
{#1}
}
{
- \bool_if:NTF \l_siunitx_number_in_complex_bool
+ \bool_if:NTF \l__siunitx_number_in_complex_bool
{
- \siunitx_number_in_parse_error:nn
+ \__siunitx_number_in_parse_error:nn
{ misplaced-sign-token } {#1}
}
{
- \tl_if_empty:NF \l_siunitx_number_parsed_tl
- { \siunitx_number_in_store: }
- \cs_set_eq:NN \siunitx_number_in_check:n
- \siunitx_number_in_check_full:n
- \siunitx_number_in_init_part:n { complex }
- \prop_put:Nnn \l_siunitx_number_in_prop
+ \tl_if_empty:NF \l__siunitx_number_parsed_tl
+ { \__siunitx_number_in_store: }
+ \cs_set_eq:NN \__siunitx_number_in_check:n
+ \__siunitx_number_in_check_full:n
+ \__siunitx_number_in_init_part:n { complex }
+ \prop_put:Nnn \l__siunitx_number_in_prop
{ complex-sign } {#1}
- \bool_set_true:N \l_siunitx_number_in_complex_bool
+ \bool_set_true:N \l__siunitx_number_in_complex_bool
}
}
}
}
-\cs_new_protected:Npn \siunitx_number_in_uncert_open:N #1 {
- \bool_set_false:N \l_siunitx_number_in_first_bool
- \cs_set_eq:NN \siunitx_number_in_parse_loop:N
- \siunitx_number_in_parse_uncert:N
- \bool_set_true:N \l_siunitx_number_in_uncert_bool
- \tl_if_empty:NTF \l_siunitx_number_parsed_tl
+\cs_new_protected:Npn \__siunitx_number_in_uncert_open:N #1 {
+ \bool_set_false:N \l__siunitx_number_in_first_bool
+ \cs_set_eq:NN \__siunitx_number_in_parse_loop:N
+ \__siunitx_number_in_parse_uncert:N
+ \bool_set_true:N \l__siunitx_number_in_uncert_bool
+ \tl_if_empty:NTF \l__siunitx_number_parsed_tl
{
- \prop_if_in:NVF \l_siunitx_number_in_prop
- \l_siunitx_number_part_integer_tl
+ \prop_if_in:NVF \l__siunitx_number_in_prop
+ \l__siunitx_number_part_integer_tl
{
- \siunitx_number_in_parse_error:nV { invalid-number }
- \l_siunitx_number_arg_tl
+ \__siunitx_number_in_parse_error:nV { invalid-number }
+ \l__siunitx_number_arg_tl
}
}
- { \siunitx_number_in_store: }
+ { \__siunitx_number_in_store: }
}
-\cs_new_protected:Npn \siunitx_number_in_uncert_close:N #1 {
- \bool_set_false:N \l_siunitx_number_in_uncert_bool
- \tl_if_empty:NTF \l_siunitx_number_parsed_tl
+\cs_new_protected:Npn \__siunitx_number_in_uncert_close:N #1 {
+ \bool_set_false:N \l__siunitx_number_in_uncert_bool
+ \tl_if_empty:NTF \l__siunitx_number_parsed_tl
{
- \siunitx_number_in_parse_error:nV { empty-uncertainty }
- \l_siunitx_number_arg_tl
+ \__siunitx_number_in_parse_error:nV { empty-uncertainty }
+ \l__siunitx_number_arg_tl
}
{
- \prop_put:NVV \l_siunitx_number_in_prop
- \l_siunitx_number_part_uncert_tl \l_siunitx_number_parsed_tl
- \prop_put:Nnn \l_siunitx_number_in_prop
+ \prop_put:NVV \l__siunitx_number_in_prop
+ \l__siunitx_number_part_uncert_tl \l__siunitx_number_parsed_tl
+ \prop_put:Nnn \l__siunitx_number_in_prop
{ uncertainty } { true }
- \tl_clear:N \l_siunitx_number_parsed_tl
- \cs_set_eq:NN \siunitx_number_in_parse_loop:N
- \siunitx_number_in_parse_uncert_after:N
+ \tl_clear:N \l__siunitx_number_parsed_tl
+ \cs_set_eq:NN \__siunitx_number_in_parse_loop:N
+ \__siunitx_number_in_parse_uncert_after:N
}
}
-\cs_new_protected:Npn \siunitx_number_in_store: {
- \prop_put:NVn \l_siunitx_number_in_prop \l_siunitx_number_part_tl
+\cs_new_protected:Npn \__siunitx_number_in_store: {
+ \prop_put:NVn \l__siunitx_number_in_prop \l__siunitx_number_part_tl
{ true }
- \bool_if:NTF \l_siunitx_number_in_decimal_bool
+ \bool_if:NTF \l__siunitx_number_in_decimal_bool
{
- \prop_put:NVV \l_siunitx_number_in_prop
- \l_siunitx_number_part_decimal_tl \l_siunitx_number_parsed_tl
+ \prop_put:NVV \l__siunitx_number_in_prop
+ \l__siunitx_number_part_decimal_tl \l__siunitx_number_parsed_tl
}
{
- \prop_put:NVV \l_siunitx_number_in_prop
- \l_siunitx_number_part_integer_tl \l_siunitx_number_parsed_tl
+ \prop_put:NVV \l__siunitx_number_in_prop
+ \l__siunitx_number_part_integer_tl \l__siunitx_number_parsed_tl
}
- \tl_clear:N \l_siunitx_number_parsed_tl
+ \tl_clear:N \l__siunitx_number_parsed_tl
}
-\cs_new_protected:Npn \siunitx_number_in_check:n #1 { }
-\cs_new_protected:Npn \siunitx_number_in_check_short:n #1 {
- \prop_if_in:NVF \l_siunitx_number_in_prop
- \l_siunitx_number_part_integer_tl
+\cs_new_protected:Npn \__siunitx_number_in_check:n #1 { }
+\cs_new_protected:Npn \__siunitx_number_in_check_short:n #1 {
+ \prop_if_in:NVF \l__siunitx_number_in_prop
+ \l__siunitx_number_part_integer_tl
{
- \prop_if_in:NVF \l_siunitx_number_in_prop
- \l_siunitx_number_part_decimal_tl
- { \siunitx_error:nx { invalid-number } {#1} }
+ \prop_if_in:NVF \l__siunitx_number_in_prop
+ \l__siunitx_number_part_decimal_tl
+ { \__siunitx_error:nx { invalid-number } {#1} }
}
- \bool_if:NF \l_siunitx_number_in_value_bool
+ \bool_if:NF \l__siunitx_number_in_value_bool
{
- \tl_if_eq:NNF \l_siunitx_number_part_tl
- \c_siunitx_number_part_complex_tl
+ \tl_if_eq:NNF \l__siunitx_number_part_tl
+ \c__siunitx_number_part_complex_tl
{
- \prop_get:NVNT \l_siunitx_number_in_prop
- \l_siunitx_number_part_sign_tl \l_siunitx_tmpa_tl
+ \prop_get:NVNT \l__siunitx_number_in_prop
+ \l__siunitx_number_part_sign_tl \l__siunitx_tmpa_tl
{
- \tl_set:Nx \l_siunitx_tmpb_tl
- { \l_siunitx_number_part_sign_tl -deleted }
- \prop_put:NVV \l_siunitx_number_in_prop
- \l_siunitx_tmpb_tl \l_siunitx_tmpa_tl
+ \tl_set:Nx \l__siunitx_tmpb_tl
+ { \l__siunitx_number_part_sign_tl -deleted }
+ \prop_put:NVV \l__siunitx_number_in_prop
+ \l__siunitx_tmpb_tl \l__siunitx_tmpa_tl
}
- \prop_del:NV \l_siunitx_number_in_prop
- \l_siunitx_number_part_sign_tl
+ \prop_del:NV \l__siunitx_number_in_prop
+ \l__siunitx_number_part_sign_tl
}
}
}
-\cs_new_protected:Npn \siunitx_number_in_check_full:n #1 {
- \tl_if_eq:NNF \l_siunitx_number_part_tl
- \c_siunitx_number_part_complex_tl
- { \siunitx_number_in_check_short:n {#1} }
- \bool_if:NF \l_siunitx_number_in_complex_root_bool
+\cs_new_protected:Npn \__siunitx_number_in_check_full:n #1 {
+ \tl_if_eq:NNF \l__siunitx_number_part_tl
+ \c__siunitx_number_part_complex_tl
+ { \__siunitx_number_in_check_short:n {#1} }
+ \bool_if:NF \l__siunitx_number_in_complex_root_bool
{
- \prop_get:NnN \l_siunitx_number_in_prop { complex-sign }
- \l_siunitx_tmpa_tl
- \tl_if_in:NVTF \l_siunitx_input_uncert_sign_tl \l_siunitx_tmpa_tl
+ \prop_get:NnN \l__siunitx_number_in_prop { complex-sign }
+ \l__siunitx_tmpa_tl
+ \tl_if_in:NVTF \l__siunitx_input_uncert_sign_tl \l__siunitx_tmpa_tl
{
- \prop_if_in:NnTF \l_siunitx_number_in_prop { uncertainty }
+ \prop_if_in:NnTF \l__siunitx_number_in_prop { uncertainty }
{
- \siunitx_error:nx { misplaced-sign-token }
+ \__siunitx_error:nx { misplaced-sign-token }
{ \exp_not:n {#1} }
}
- { \siunitx_number_in_complex_to_uncert:n {#1} }
+ { \__siunitx_number_in_complex_to_uncert:n {#1} }
}
{
- \siunitx_error:nx { misplaced-sign-token }
+ \__siunitx_error:nx { misplaced-sign-token }
{ \exp_not:n {#1} }
}
}
- \prop_get:NnNT \l_siunitx_number_in_prop { mantissa-sign }
- \l_siunitx_tmpa_tl
+ \prop_get:NnNT \l__siunitx_number_in_prop { mantissa-sign }
+ \l__siunitx_tmpa_tl
{
- \prop_if_in:NnF \l_siunitx_number_in_prop { mantissa }
+ \prop_if_in:NnF \l__siunitx_number_in_prop { mantissa }
{
- \prop_del:Nn \l_siunitx_number_in_prop { mantissa-sign }
- \prop_put:NnV \l_siunitx_number_in_prop { complex-sign }
- \l_siunitx_tmpa_tl
+ \prop_del:Nn \l__siunitx_number_in_prop { mantissa-sign }
+ \prop_put:NnV \l__siunitx_number_in_prop { complex-sign }
+ \l__siunitx_tmpa_tl
}
}
}
-\cs_new_protected:Npn \siunitx_number_in_complex_to_uncert:n #1 {
- \prop_del:Nn \l_siunitx_number_in_prop { complex }
- \prop_del:Nn \l_siunitx_number_in_prop { complex-decimal-marker }
- \prop_del:Nn \l_siunitx_number_in_prop { complex-sign }
- \prop_put:Nnn \l_siunitx_number_in_prop { uncertainty } { true }
- \prop_get:NnNTF \l_siunitx_number_in_prop { complex-integer }
- \l_siunitx_number_uncert_tl
+\cs_new_protected:Npn \__siunitx_number_in_complex_to_uncert:n #1 {
+ \prop_del:Nn \l__siunitx_number_in_prop { complex }
+ \prop_del:Nn \l__siunitx_number_in_prop { complex-decimal-marker }
+ \prop_del:Nn \l__siunitx_number_in_prop { complex-sign }
+ \prop_put:Nnn \l__siunitx_number_in_prop { uncertainty } { true }
+ \prop_get:NnNTF \l__siunitx_number_in_prop { complex-integer }
+ \l__siunitx_number_uncert_tl
{
- \tl_if_single:NTF \l_siunitx_number_uncert_tl
+ \tl_if_single:NTF \l__siunitx_number_uncert_tl
{
\int_compare:nNnTF
- { \l_siunitx_number_uncert_tl } = { \c_zero }
- { \siunitx_number_in_complex_to_uncert_dec:n {#1} }
- { \siunitx_number_in_complex_to_uncert_int: }
+ { \l__siunitx_number_uncert_tl } = { \c_zero }
+ { \__siunitx_number_in_complex_to_uncert_dec:n {#1} }
+ { \__siunitx_number_in_complex_to_uncert_int: }
}
- { \siunitx_number_in_complex_to_uncert_int: }
- }
- { \siunitx_number_in_complex_to_uncert_dec:n {#1} }
- \prop_del:Nn \l_siunitx_number_in_prop { complex-integer }
- \prop_del:Nn \l_siunitx_number_in_prop { complex-decimal }
-}
-\cs_new_protected:Npn \siunitx_number_in_complex_to_uncert_int: {
- \prop_get:NnNF \l_siunitx_number_in_prop { complex-decimal }
- \l_siunitx_tmpa_tl
- { \tl_clear:N \l_siunitx_tmpa_tl }
- \prop_get:NnNF \l_siunitx_number_in_prop { mantissa-decimal }
- \l_siunitx_tmpb_tl
- { \tl_clear:N \l_siunitx_tmpb_tl }
- \siunitx_number_in_complex_to_uncert_pad:
-}
-\cs_new_protected:Npn \siunitx_number_in_complex_to_uncert_dec:n
+ { \__siunitx_number_in_complex_to_uncert_int: }
+ }
+ { \__siunitx_number_in_complex_to_uncert_dec:n {#1} }
+ \prop_del:Nn \l__siunitx_number_in_prop { complex-integer }
+ \prop_del:Nn \l__siunitx_number_in_prop { complex-decimal }
+}
+\cs_new_protected:Npn \__siunitx_number_in_complex_to_uncert_int: {
+ \prop_get:NnNF \l__siunitx_number_in_prop { complex-decimal }
+ \l__siunitx_tmpa_tl
+ { \tl_clear:N \l__siunitx_tmpa_tl }
+ \prop_get:NnNF \l__siunitx_number_in_prop { mantissa-decimal }
+ \l__siunitx_tmpb_tl
+ { \tl_clear:N \l__siunitx_tmpb_tl }
+ \__siunitx_number_in_complex_to_uncert_pad:
+}
+\cs_new_protected:Npn \__siunitx_number_in_complex_to_uncert_dec:n
#1
{
- \tl_clear:N \l_siunitx_number_uncert_tl
- \prop_get:NnNTF \l_siunitx_number_in_prop { complex-decimal }
- \l_siunitx_tmpa_tl
+ \tl_clear:N \l__siunitx_number_uncert_tl
+ \prop_get:NnNTF \l__siunitx_number_in_prop { complex-decimal }
+ \l__siunitx_tmpa_tl
{
- \prop_get:NnN \l_siunitx_number_in_prop { mantissa-decimal }
- \l_siunitx_tmpb_tl
- \quark_if_no_value:NT \l_siunitx_tmpb_tl
- { \tl_clear:N \l_siunitx_tmpb_tl }
+ \prop_get:NnN \l__siunitx_number_in_prop { mantissa-decimal }
+ \l__siunitx_tmpb_tl
+ \quark_if_no_value:NT \l__siunitx_tmpb_tl
+ { \tl_clear:N \l__siunitx_tmpb_tl }
\tl_map_function:NN
- \l_siunitx_tmpa_tl
- \siunitx_number_in_complex_to_uncert_dec_loop:N
- \siunitx_number_in_complex_to_uncert_pad:
+ \l__siunitx_tmpa_tl
+ \__siunitx_number_in_complex_to_uncert_dec_loop:N
+ \__siunitx_number_in_complex_to_uncert_pad:
}
- { \siunitx_error:nx { misplaced-sign-token } { \exp_not:n {#1} } }
+ { \__siunitx_error:nx { misplaced-sign-token } { \exp_not:n {#1} } }
}
\cs_new_protected:Npn
- \siunitx_number_in_complex_to_uncert_dec_loop:N #1
+ \__siunitx_number_in_complex_to_uncert_dec_loop:N #1
{
\str_if_eq:nnTF {#1} { 0 }
{
- \tl_set:Nf \l_siunitx_tmpa_tl
- { \tl_tail:V \l_siunitx_tmpa_tl }
- \tl_if_empty:NF \l_siunitx_tmpb_tl
+ \tl_set:Nf \l__siunitx_tmpa_tl
+ { \tl_tail:V \l__siunitx_tmpa_tl }
+ \tl_if_empty:NF \l__siunitx_tmpb_tl
{
- \tl_set:Nf \l_siunitx_tmpb_tl
- { \tl_tail:V \l_siunitx_tmpb_tl }
+ \tl_set:Nf \l__siunitx_tmpb_tl
+ { \tl_tail:V \l__siunitx_tmpb_tl }
}
}
{ \tl_map_break: }
}
-\cs_new_protected:Npn \siunitx_number_in_complex_to_uncert_pad:
+\cs_new_protected:Npn \__siunitx_number_in_complex_to_uncert_pad:
{
- \int_set:Nn \l_siunitx_number_uncert_length_int
- { \tl_length:N \l_siunitx_tmpa_tl }
- \int_set:Nn \l_siunitx_number_mantissa_length_int
- { \tl_length:N \l_siunitx_tmpb_tl }
+ \int_set:Nn \l__siunitx_number_uncert_length_int
+ { \tl_length:N \l__siunitx_tmpa_tl }
+ \int_set:Nn \l__siunitx_number_mantissa_length_int
+ { \tl_length:N \l__siunitx_tmpb_tl }
\int_compare:nNnTF
- { \l_siunitx_number_mantissa_length_int }
- > { \l_siunitx_number_uncert_length_int }
+ { \l__siunitx_number_mantissa_length_int }
+ > { \l__siunitx_number_uncert_length_int }
{
- \tl_set:Nx \l_siunitx_tmpa_tl
+ \tl_set:Nx \l__siunitx_tmpa_tl
{
- \exp_not:V \l_siunitx_tmpa_tl
+ \exp_not:V \l__siunitx_tmpa_tl
\prg_replicate:nn
{
- \l_siunitx_number_mantissa_length_int
- - \l_siunitx_number_uncert_length_int
+ \l__siunitx_number_mantissa_length_int
+ - \l__siunitx_number_uncert_length_int
}
{ 0 }
}
}
{
- \prop_get:NnNF \l_siunitx_number_in_prop { mantissa-decimal }
- \l_siunitx_tmpb_tl
- { \tl_clear:N \l_siunitx_tmpb_tl }
- \tl_set:Nx \l_siunitx_tmpb_tl
+ \prop_get:NnNF \l__siunitx_number_in_prop { mantissa-decimal }
+ \l__siunitx_tmpb_tl
+ { \tl_clear:N \l__siunitx_tmpb_tl }
+ \tl_set:Nx \l__siunitx_tmpb_tl
{
- \exp_not:V \l_siunitx_tmpb_tl
+ \exp_not:V \l__siunitx_tmpb_tl
\prg_replicate:nn
{
- \l_siunitx_number_uncert_length_int
- - \l_siunitx_number_mantissa_length_int
+ \l__siunitx_number_uncert_length_int
+ - \l__siunitx_number_mantissa_length_int
}
{ 0 }
}
- \tl_if_empty:NF \l_siunitx_tmpb_tl
+ \tl_if_empty:NF \l__siunitx_tmpb_tl
{
- \prop_put:NnV \l_siunitx_number_in_prop { mantissa-decimal }
- \l_siunitx_tmpb_tl
- \prop_if_in:NnF \l_siunitx_number_in_prop
+ \prop_put:NnV \l__siunitx_number_in_prop { mantissa-decimal }
+ \l__siunitx_tmpb_tl
+ \prop_if_in:NnF \l__siunitx_number_in_prop
{ mantissa-decimal-marker }
{
- \prop_put:Nnn \l_siunitx_number_in_prop
+ \prop_put:Nnn \l__siunitx_number_in_prop
{ mantissa-decimal-marker } { . }
}
}
}
- \tl_put_right:NV \l_siunitx_number_uncert_tl \l_siunitx_tmpa_tl
- \prop_put:NnV \l_siunitx_number_in_prop { mantissa-uncertainty }
- \l_siunitx_number_uncert_tl
- }
-\int_new:N \l_siunitx_round_int
-\tl_new:N \l_siunitx_round_tl
-\bool_new:N \l_siunitx_round_bool
-\tl_new:N \l_siunitx_round_decimal_in_tl
-\tl_new:N \l_siunitx_round_decimal_out_tl
-\tl_new:N \l_siunitx_round_discard_tl
-\tl_new:N \l_siunitx_round_even_bool
-\tl_new:N \l_siunitx_round_integer_in_tl
-\tl_new:N \l_siunitx_round_integer_out_tl
-\bool_new:N \l_siunitx_round_half_up_bool
-\int_new:N \l_siunitx_process_decimal_int
-\int_new:N \l_siunitx_process_uncertainty_int
-\tl_new:N \l_siunitx_uncertainty_decimal_tl
-\tl_new:N \l_siunitx_uncertainty_integer_tl
-\bool_new:N \l_siunitx_process_fixed_bool
-\bool_new:N \l_siunitx_process_engineering_bool
-\bool_new:N \l_siunitx_process_scientific_bool
-\bool_new:N \l_siunitx_process_drop_exponent_bool
+ \tl_put_right:NV \l__siunitx_number_uncert_tl \l__siunitx_tmpa_tl
+ \prop_put:NnV \l__siunitx_number_in_prop { mantissa-uncertainty }
+ \l__siunitx_number_uncert_tl
+ }
+\int_new:N \l__siunitx_round_int
+\tl_new:N \l__siunitx_round_tl
+\bool_new:N \l__siunitx_round_bool
+\tl_new:N \l__siunitx_round_decimal_in_tl
+\tl_new:N \l__siunitx_round_decimal_out_tl
+\tl_new:N \l__siunitx_round_discard_tl
+\tl_new:N \l__siunitx_round_even_bool
+\tl_new:N \l__siunitx_round_integer_in_tl
+\tl_new:N \l__siunitx_round_integer_out_tl
+\bool_new:N \l__siunitx_round_half_up_bool
+\int_new:N \l__siunitx_process_decimal_int
+\int_new:N \l__siunitx_process_uncertainty_int
+\tl_new:N \l__siunitx_uncertainty_decimal_tl
+\tl_new:N \l__siunitx_uncertainty_integer_tl
+\bool_new:N \l__siunitx_process_fixed_bool
+\bool_new:N \l__siunitx_process_engineering_bool
+\bool_new:N \l__siunitx_process_scientific_bool
+\bool_new:N \l__siunitx_process_drop_exponent_bool
\keys_define:nn { siunitx }
{
- add-decimal-zero .bool_set:N = \l_siunitx_process_decimal_zero_bool,
- add-integer-zero .bool_set:N = \l_siunitx_process_integer_zero_bool,
- explicit-sign .tl_set:N = \l_siunitx_process_sign_tl,
- fixed-exponent .int_set:N = \l_siunitx_process_fixed_int,
+ add-decimal-zero .bool_set:N = \l__siunitx_process_decimal_zero_bool,
+ add-integer-zero .bool_set:N = \l__siunitx_process_integer_zero_bool,
+ explicit-sign .tl_set:N = \l__siunitx_process_sign_tl,
+ fixed-exponent .int_set:N = \l__siunitx_process_fixed_int,
minimum-integer-digits .int_set:N =
- \l_siunitx_process_integer_min_int,
- retain-explicit-plus .bool_set:N = \l_siunitx_process_plus_bool,
- omit-uncertainty .bool_set:N = \l_siunitx_omit_uncert_bool,
+ \l__siunitx_process_integer_min_int,
+ retain-explicit-plus .bool_set:N = \l__siunitx_process_plus_bool,
+ omit-uncertainty .bool_set:N = \l__siunitx_omit_uncert_bool,
retain-unity-mantissa .bool_set:N =
- \l_siunitx_process_unity_mantissa_bool,
+ \l__siunitx_process_unity_mantissa_bool,
retain-zero-exponent .bool_set:N =
- \l_siunitx_process_zero_exponent_bool,
+ \l__siunitx_process_zero_exponent_bool,
round-half .choice:,
round-half / even .code:n =
- { \bool_set_false:N \l_siunitx_round_half_up_bool },
+ { \bool_set_false:N \l__siunitx_round_half_up_bool },
round-half / up .code:n =
- { \bool_set_true:N \l_siunitx_round_half_up_bool },
+ { \bool_set_true:N \l__siunitx_round_half_up_bool },
round-integer-to-decimal .bool_set:N =
- \l_siunitx_process_int_to_dec_bool,
- round-minimum .tl_set:N = \l_siunitx_process_round_min_tl,
+ \l__siunitx_process_int_to_dec_bool,
+ round-minimum .tl_set:N = \l__siunitx_process_round_min_tl,
round-mode .choice: ,
round-mode / figures .code:n =
- { \tl_set:Nn \l_siunitx_round_tl { figures } },
- round-mode / off .code:n = { \tl_clear:N \l_siunitx_round_tl },
+ { \tl_set:Nn \l__siunitx_round_tl { figures } },
+ round-mode / off .code:n = { \tl_clear:N \l__siunitx_round_tl },
round-mode / places .code:n =
- { \tl_set:Nn \l_siunitx_round_tl { places } },
- round-precision .int_set:N = \l_siunitx_process_precision_int,
+ { \tl_set:Nn \l__siunitx_round_tl { places } },
+ round-precision .int_set:N = \l__siunitx_process_precision_int,
scientific-notation .choice: ,
scientific-notation
/ false .code:n =
{
- \bool_set_false:N \l_siunitx_process_fixed_bool
- \bool_set_false:N \l_siunitx_process_engineering_bool
- \bool_set_false:N \l_siunitx_process_scientific_bool
+ \bool_set_false:N \l__siunitx_process_fixed_bool
+ \bool_set_false:N \l__siunitx_process_engineering_bool
+ \bool_set_false:N \l__siunitx_process_scientific_bool
},
scientific-notation
/ engineering .code:n =
{
- \bool_set_false:N \l_siunitx_process_fixed_bool
- \bool_set_true:N \l_siunitx_process_engineering_bool
- \bool_set_true:N \l_siunitx_process_scientific_bool
+ \bool_set_false:N \l__siunitx_process_fixed_bool
+ \bool_set_true:N \l__siunitx_process_engineering_bool
+ \bool_set_true:N \l__siunitx_process_scientific_bool
},
scientific-notation
/ fixed .code:n =
{
- \bool_set_true:N \l_siunitx_process_fixed_bool
- \bool_set_false:N \l_siunitx_process_engineering_bool
- \bool_set_false:N \l_siunitx_process_scientific_bool
+ \bool_set_true:N \l__siunitx_process_fixed_bool
+ \bool_set_false:N \l__siunitx_process_engineering_bool
+ \bool_set_false:N \l__siunitx_process_scientific_bool
},
scientific-notation
/ true .code:n =
{
- \bool_set_false:N \l_siunitx_process_fixed_bool
- \bool_set_false:N \l_siunitx_process_engineering_bool
- \bool_set_true:N \l_siunitx_process_scientific_bool
+ \bool_set_false:N \l__siunitx_process_fixed_bool
+ \bool_set_false:N \l__siunitx_process_engineering_bool
+ \bool_set_true:N \l__siunitx_process_scientific_bool
},
zero-decimal-to-integer .bool_set:N =
- \l_siunitx_zero_decimal_to_integer_bool
+ \l__siunitx_zero_decimal_to_integer_bool
}
\keys_set:nn { siunitx }
{
@@ -1758,407 +1758,407 @@
round-minimum = 0,
round-precision = 2
}
-\cs_new_protected:Npn \siunitx_number_process:
+\cs_new_protected:Npn \__siunitx_number_process:
{
- \siunitx_number_process_sign:
- \siunitx_number_process_zero_fill:
- \siunitx_number_process_mantissa:
- \prop_if_in:NnF \l_siunitx_number_in_prop { symbolic }
+ \__siunitx_number_process_sign:
+ \__siunitx_number_process_zero_fill:
+ \__siunitx_number_process_mantissa:
+ \prop_if_in:NnF \l__siunitx_number_in_prop { symbolic }
{
- \bool_if:NTF \l_siunitx_process_fixed_bool
- { \siunitx_number_process_fixed: }
+ \bool_if:NTF \l__siunitx_process_fixed_bool
+ { \__siunitx_number_process_fixed: }
{
- \bool_if:NT \l_siunitx_process_scientific_bool
- { \siunitx_number_process_scientific: }
+ \bool_if:NT \l__siunitx_process_scientific_bool
+ { \__siunitx_number_process_scientific: }
}
- \siunitx_number_process_exponent:
- \siunitx_number_process_uncertainty:
- \bool_if:NT \l_siunitx_exp_to_prefix_bool
+ \__siunitx_number_process_exponent:
+ \__siunitx_number_process_uncertainty:
+ \bool_if:NT \l__siunitx_exp_to_prefix_bool
{
- \tl_if_empty:NF \l_siunitx_unit_tl
- { \siunitx_number_exp_to_prefix: }
+ \tl_if_empty:NF \l__siunitx_unit_tl
+ { \__siunitx_number_exp_to_prefix: }
}
- \prop_if_in:NnTF \l_siunitx_number_in_prop { uncertainty }
+ \prop_if_in:NnTF \l__siunitx_number_in_prop { uncertainty }
{
- \bool_if:NTF \l_siunitx_omit_uncert_bool
+ \bool_if:NTF \l__siunitx_omit_uncert_bool
{
- \prop_del:Nn \l_siunitx_number_in_prop { uncertainty }
- \prop_del:Nn \l_siunitx_number_in_prop { mantissa-uncertainty }
+ \prop_del:Nn \l__siunitx_number_in_prop { uncertainty }
+ \prop_del:Nn \l__siunitx_number_in_prop { mantissa-uncertainty }
}
- { \siunitx_number_process_round: }
+ { \__siunitx_number_process_round: }
}
- { \siunitx_number_process_round: }
+ { \__siunitx_number_process_round: }
}
- \siunitx_number_process_zero_to_integer:
- \siunitx_number_process_integer_digits:
- \bool_if:NT \l_siunitx_process_drop_exponent_bool
+ \__siunitx_number_process_zero_to_integer:
+ \__siunitx_number_process_integer_digits:
+ \bool_if:NT \l__siunitx_process_drop_exponent_bool
{
- \prop_del:Nn \l_siunitx_number_in_prop { exponent }
- \prop_del:Nn \l_siunitx_number_in_prop { exponent-integer }
+ \prop_del:Nn \l__siunitx_number_in_prop { exponent }
+ \prop_del:Nn \l__siunitx_number_in_prop { exponent-integer }
}
}
-\cs_new_protected:Npn \siunitx_number_process_exponent: {
- \bool_if:NF \l_siunitx_process_zero_exponent_bool
+\cs_new_protected:Npn \__siunitx_number_process_exponent: {
+ \bool_if:NF \l__siunitx_process_zero_exponent_bool
{
- \prop_if_in:NnT \l_siunitx_number_in_prop { exponent }
+ \prop_if_in:NnT \l__siunitx_number_in_prop { exponent }
{
- \bool_set_false:N \l_siunitx_tmp_bool
- \siunitx_number_process_exponent_aux:n { integer }
- \bool_if:NF \l_siunitx_tmp_bool
- { \siunitx_number_process_exponent_aux:n { decimal } }
- \bool_if:NF \l_siunitx_tmp_bool
+ \bool_set_false:N \l__siunitx_tmp_bool
+ \__siunitx_number_process_exponent_aux:n { integer }
+ \bool_if:NF \l__siunitx_tmp_bool
+ { \__siunitx_number_process_exponent_aux:n { decimal } }
+ \bool_if:NF \l__siunitx_tmp_bool
{
- \prop_del:Nn \l_siunitx_number_in_prop { exponent }
- \prop_del:Nn \l_siunitx_number_in_prop
+ \prop_del:Nn \l__siunitx_number_in_prop { exponent }
+ \prop_del:Nn \l__siunitx_number_in_prop
{ exponent-integer }
- \prop_del:Nn \l_siunitx_number_in_prop
+ \prop_del:Nn \l__siunitx_number_in_prop
{ exponent-decimal }
}
}
}
}
-\cs_new_protected:Npn \siunitx_number_process_exponent_aux:n #1 {
- \prop_get:NnNT \l_siunitx_number_in_prop { exponent- #1 }
- \l_siunitx_tmpa_tl
+\cs_new_protected:Npn \__siunitx_number_process_exponent_aux:n #1 {
+ \prop_get:NnNT \l__siunitx_number_in_prop { exponent- #1 }
+ \l__siunitx_tmpa_tl
{
- \int_compare:nNnF { \l_siunitx_tmpa_tl } = { 0 }
- { \bool_set_true:N \l_siunitx_tmp_bool }
+ \int_compare:nNnF { \l__siunitx_tmpa_tl } = { 0 }
+ { \bool_set_true:N \l__siunitx_tmp_bool }
}
}
-\cs_new_protected:Npn \siunitx_number_process_figures:n #1
+\cs_new_protected:Npn \__siunitx_number_process_figures:n #1
{
- \int_compare:nNnTF \l_siunitx_process_precision_int > \c_zero
+ \int_compare:nNnTF \l__siunitx_process_precision_int > \c_zero
{
- \prop_if_in:NnT \l_siunitx_number_in_prop {#1}
- { \siunitx_number_process_figures_aux:n {#1} }
+ \prop_if_in:NnT \l__siunitx_number_in_prop {#1}
+ { \__siunitx_number_process_figures_aux:n {#1} }
}
{
- \prop_del:Nn \l_siunitx_number_in_prop { #1 -sign }
- \prop_put:Nnn \l_siunitx_number_in_prop { #1 -integer } { 0 }
- \prop_del:Nn \l_siunitx_number_in_prop { #1 -decimal }
- \bool_if:NF \l_siunitx_process_int_to_dec_bool
- { \prop_del:Nn \l_siunitx_number_in_prop { #1 -decimal-marker } }
+ \prop_del:Nn \l__siunitx_number_in_prop { #1 -sign }
+ \prop_put:Nnn \l__siunitx_number_in_prop { #1 -integer } { 0 }
+ \prop_del:Nn \l__siunitx_number_in_prop { #1 -decimal }
+ \bool_if:NF \l__siunitx_process_int_to_dec_bool
+ { \prop_del:Nn \l__siunitx_number_in_prop { #1 -decimal-marker } }
}
}
-\cs_new_protected:Npn \siunitx_number_process_figures_aux:n #1
+\cs_new_protected:Npn \__siunitx_number_process_figures_aux:n #1
{
- \siunitx_number_process_figures_init:n {#1}
- \siunitx_number_process_figures_count:n { integer }
- \siunitx_number_process_figures_count:n { decimal }
- \bool_if:NTF \l_siunitx_round_bool
+ \__siunitx_number_process_figures_init:n {#1}
+ \__siunitx_number_process_figures_count:n { integer }
+ \__siunitx_number_process_figures_count:n { decimal }
+ \bool_if:NTF \l__siunitx_round_bool
{
- \bool_set_false:N \l_siunitx_round_bool
+ \bool_set_false:N \l__siunitx_round_bool
\int_compare:nNnTF
- \l_siunitx_round_int > \l_siunitx_process_precision_int
+ \l__siunitx_round_int > \l__siunitx_process_precision_int
{
- \siunitx_number_process_figures_round:
- \siunitx_number_process_round_tidy:n {#1}
+ \__siunitx_number_process_figures_round:
+ \__siunitx_number_process_round_tidy:n {#1}
}
- { \siunitx_number_process_figures_pad:n {#1} }
+ { \__siunitx_number_process_figures_pad:n {#1} }
}
{
- \prop_put:Nnn \l_siunitx_number_in_prop { #1 -integer } { 0 }
- \prop_del:Nn \l_siunitx_number_in_prop { #1 -decimal }
+ \prop_put:Nnn \l__siunitx_number_in_prop { #1 -integer } { 0 }
+ \prop_del:Nn \l__siunitx_number_in_prop { #1 -decimal }
}
}
-\cs_new_protected:Npn \siunitx_number_process_figures_init:n #1
+\cs_new_protected:Npn \__siunitx_number_process_figures_init:n #1
{
- \int_zero:N \l_siunitx_round_int
- \bool_set_false:N \l_siunitx_round_bool
- \bool_set_false:N \l_siunitx_round_even_bool
- \prop_get:NnNF \l_siunitx_number_in_prop { #1 -decimal }
- \l_siunitx_round_decimal_in_tl
- { \tl_clear:N \l_siunitx_round_decimal_in_tl }
- \prop_get:NnNF \l_siunitx_number_in_prop { #1 -integer }
- \l_siunitx_round_integer_in_tl
- { \tl_clear:N \l_siunitx_round_integer_in_tl }
- \tl_clear:N \l_siunitx_round_decimal_out_tl
- \tl_clear:N \l_siunitx_round_integer_out_tl
- \tl_clear:N \l_siunitx_round_discard_tl
+ \int_zero:N \l__siunitx_round_int
+ \bool_set_false:N \l__siunitx_round_bool
+ \bool_set_false:N \l__siunitx_round_even_bool
+ \prop_get:NnNF \l__siunitx_number_in_prop { #1 -decimal }
+ \l__siunitx_round_decimal_in_tl
+ { \tl_clear:N \l__siunitx_round_decimal_in_tl }
+ \prop_get:NnNF \l__siunitx_number_in_prop { #1 -integer }
+ \l__siunitx_round_integer_in_tl
+ { \tl_clear:N \l__siunitx_round_integer_in_tl }
+ \tl_clear:N \l__siunitx_round_decimal_out_tl
+ \tl_clear:N \l__siunitx_round_integer_out_tl
+ \tl_clear:N \l__siunitx_round_discard_tl
}
-\cs_new_protected:Npn \siunitx_number_process_figures_count:n #1
+\cs_new_protected:Npn \__siunitx_number_process_figures_count:n #1
{
- \tl_if_empty:cF { l_siunitx_round_ #1 _in_tl }
+ \tl_if_empty:cF { l__siunitx_round_ #1 _in_tl }
{
- \prop_if_in:NnF \l_siunitx_number_in_prop { #1 -uncertainty }
- { \siunitx_number_process_figures_count_aux:n {#1} }
+ \prop_if_in:NnF \l__siunitx_number_in_prop { #1 -uncertainty }
+ { \__siunitx_number_process_figures_count_aux:n {#1} }
}
}
-\cs_new_protected:Npn \siunitx_number_process_figures_count_aux:n #1
+\cs_new_protected:Npn \__siunitx_number_process_figures_count_aux:n #1
{
- \int_set:Nn \l_siunitx_tmp_int
- { \tl_head:v { l_siunitx_round_ #1 _in_tl } }
- \tl_set:cx { l_siunitx_round_ #1 _in_tl }
- { \tl_tail:v { l_siunitx_round_ #1 _in_tl } }
- \tl_put_left:cV { l_siunitx_round_ #1 _out_tl } \l_siunitx_tmp_int
- \bool_if:NF \l_siunitx_round_bool
+ \int_set:Nn \l__siunitx_tmp_int
+ { \tl_head:v { l__siunitx_round_ #1 _in_tl } }
+ \tl_set:cx { l__siunitx_round_ #1 _in_tl }
+ { \tl_tail:v { l__siunitx_round_ #1 _in_tl } }
+ \tl_put_left:cV { l__siunitx_round_ #1 _out_tl } \l__siunitx_tmp_int
+ \bool_if:NF \l__siunitx_round_bool
{
- \int_compare:nNnF { \l_siunitx_tmp_int } = \c_zero
- { \bool_set_true:N \l_siunitx_round_bool }
+ \int_compare:nNnF { \l__siunitx_tmp_int } = \c_zero
+ { \bool_set_true:N \l__siunitx_round_bool }
}
- \bool_if:NT \l_siunitx_round_bool
- { \int_incr:N \l_siunitx_round_int }
- \tl_if_empty:cTF { l_siunitx_round_ #1 _in_tl }
+ \bool_if:NT \l__siunitx_round_bool
+ { \int_incr:N \l__siunitx_round_int }
+ \tl_if_empty:cTF { l__siunitx_round_ #1 _in_tl }
{
- \tl_set_eq:cc { l_siunitx_round_ #1 _in_tl }
- { l_siunitx_round_ #1 _out_tl }
- \tl_clear:c { l_siunitx_round_ #1 _out_tl }
+ \tl_set_eq:cc { l__siunitx_round_ #1 _in_tl }
+ { l__siunitx_round_ #1 _out_tl }
+ \tl_clear:c { l__siunitx_round_ #1 _out_tl }
}
- { \siunitx_number_process_figures_count_aux:n {#1} }
+ { \__siunitx_number_process_figures_count_aux:n {#1} }
}
-\cs_new_protected:Npn \siunitx_number_process_figures_round:
+\cs_new_protected:Npn \__siunitx_number_process_figures_round:
{
- \int_set:Nn \l_siunitx_round_int
- { \l_siunitx_round_int - \l_siunitx_process_precision_int }
- \tl_if_empty:NF \l_siunitx_round_decimal_in_tl
- { \siunitx_number_process_figures_round_loop: }
- \tl_if_empty:NF \l_siunitx_round_integer_in_tl
- { \siunitx_number_process_figures_integer: }
- \bool_if:NT \l_siunitx_round_bool
- { \tl_put_left:Nn \l_siunitx_round_integer_out_tl { 1 } }
+ \int_set:Nn \l__siunitx_round_int
+ { \l__siunitx_round_int - \l__siunitx_process_precision_int }
+ \tl_if_empty:NF \l__siunitx_round_decimal_in_tl
+ { \__siunitx_number_process_figures_round_loop: }
+ \tl_if_empty:NF \l__siunitx_round_integer_in_tl
+ { \__siunitx_number_process_figures_integer: }
+ \bool_if:NT \l__siunitx_round_bool
+ { \tl_put_left:Nn \l__siunitx_round_integer_out_tl { 1 } }
}
-\cs_new_protected:Npn \siunitx_number_process_figures_round_loop:
+\cs_new_protected:Npn \__siunitx_number_process_figures_round_loop:
{
- \siunitx_number_process_round_decimal:
- \tl_if_empty:NF \l_siunitx_round_decimal_in_tl
- { \siunitx_number_process_figures_round_loop: }
+ \__siunitx_number_process_round_decimal:
+ \tl_if_empty:NF \l__siunitx_round_decimal_in_tl
+ { \__siunitx_number_process_figures_round_loop: }
}
-\cs_new_protected:Npn \siunitx_number_process_figures_integer:
+\cs_new_protected:Npn \__siunitx_number_process_figures_integer:
{
- \int_compare:nNnT \l_siunitx_round_int > \c_zero
- { \tl_put_left:Nn \l_siunitx_round_integer_out_tl { 0 } }
- \int_compare:nNnF \l_siunitx_round_int > \c_one
+ \int_compare:nNnT \l__siunitx_round_int > \c_zero
+ { \tl_put_left:Nn \l__siunitx_round_integer_out_tl { 0 } }
+ \int_compare:nNnF \l__siunitx_round_int > \c_one
{
- \int_set:Nn \l_siunitx_tmp_int
- { \tl_head:V \l_siunitx_round_integer_in_tl }
- \siunitx_number_process_round_up:
- \int_compare:nNnTF \l_siunitx_round_int = \c_one
+ \int_set:Nn \l__siunitx_tmp_int
+ { \tl_head:V \l__siunitx_round_integer_in_tl }
+ \__siunitx_number_process_round_up:
+ \int_compare:nNnTF \l__siunitx_round_int = \c_one
{
- \int_compare:nNnT \l_siunitx_tmp_int > \c_four
- { \bool_set_true:N \l_siunitx_round_bool }
+ \int_compare:nNnT \l__siunitx_tmp_int > \c_four
+ { \bool_set_true:N \l__siunitx_round_bool }
}
{
- \int_compare:nNnT \l_siunitx_tmp_int = \c_ten
+ \int_compare:nNnT \l__siunitx_tmp_int = \c_ten
{
- \bool_set_true:N \l_siunitx_round_bool
- \int_zero:N \l_siunitx_tmp_int
+ \bool_set_true:N \l__siunitx_round_bool
+ \int_zero:N \l__siunitx_tmp_int
}
- \tl_put_left:NV \l_siunitx_round_integer_out_tl
- \l_siunitx_tmp_int
+ \tl_put_left:NV \l__siunitx_round_integer_out_tl
+ \l__siunitx_tmp_int
}
}
- \int_decr:N \l_siunitx_round_int
- \tl_set:Nx \l_siunitx_round_integer_in_tl
- { \tl_tail:V \l_siunitx_round_integer_in_tl }
- \tl_if_empty:NF \l_siunitx_round_integer_in_tl
- { \siunitx_number_process_figures_integer: }
- }
-\cs_new_protected:Npn \siunitx_number_process_figures_pad:n #1 {
- \prop_get:NnN \l_siunitx_number_in_prop { #1 -integer }
- \l_siunitx_round_integer_in_tl
- \prop_get:NnN \l_siunitx_number_in_prop { #1 -decimal }
- \l_siunitx_round_decimal_in_tl
- \int_set:Nn \l_siunitx_round_int
- { \l_siunitx_process_precision_int - \l_siunitx_round_int }
- \siunitx_number_process_pad:n {#1}
-}
-\cs_new_protected:Npn \siunitx_number_process_fixed: {
- \prop_if_in:NnF \l_siunitx_number_in_prop { complex }
- {
- \prop_get:NnNF \l_siunitx_number_in_prop { mantissa-integer }
- \l_siunitx_tmpa_tl
- { \tl_set:Nn \l_siunitx_tmpa_tl { 0 } }
- \prop_get:NnNF \l_siunitx_number_in_prop { mantissa-decimal }
- \l_siunitx_tmpb_tl
- { \tl_clear:N \l_siunitx_tmpb_tl }
- \tl_set:Nx \l_siunitx_tmpa_tl
- { { \l_siunitx_tmpa_tl } { \l_siunitx_tmpb_tl } }
- \prop_get:NnNF \l_siunitx_number_in_prop { exponent-integer }
- \l_siunitx_tmpb_tl
- { \tl_set:Nn \l_siunitx_tmpb_tl { 0 } }
+ \int_decr:N \l__siunitx_round_int
+ \tl_set:Nx \l__siunitx_round_integer_in_tl
+ { \tl_tail:V \l__siunitx_round_integer_in_tl }
+ \tl_if_empty:NF \l__siunitx_round_integer_in_tl
+ { \__siunitx_number_process_figures_integer: }
+ }
+\cs_new_protected:Npn \__siunitx_number_process_figures_pad:n #1 {
+ \prop_get:NnN \l__siunitx_number_in_prop { #1 -integer }
+ \l__siunitx_round_integer_in_tl
+ \prop_get:NnN \l__siunitx_number_in_prop { #1 -decimal }
+ \l__siunitx_round_decimal_in_tl
+ \int_set:Nn \l__siunitx_round_int
+ { \l__siunitx_process_precision_int - \l__siunitx_round_int }
+ \__siunitx_number_process_pad:n {#1}
+}
+\cs_new_protected:Npn \__siunitx_number_process_fixed: {
+ \prop_if_in:NnF \l__siunitx_number_in_prop { complex }
+ {
+ \prop_get:NnNF \l__siunitx_number_in_prop { mantissa-integer }
+ \l__siunitx_tmpa_tl
+ { \tl_set:Nn \l__siunitx_tmpa_tl { 0 } }
+ \prop_get:NnNF \l__siunitx_number_in_prop { mantissa-decimal }
+ \l__siunitx_tmpb_tl
+ { \tl_clear:N \l__siunitx_tmpb_tl }
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { { \l__siunitx_tmpa_tl } { \l__siunitx_tmpb_tl } }
+ \prop_get:NnNF \l__siunitx_number_in_prop { exponent-integer }
+ \l__siunitx_tmpb_tl
+ { \tl_set:Nn \l__siunitx_tmpb_tl { 0 } }
\group_begin:
- \prop_get:NnNT \l_siunitx_number_in_prop { exponent-sign }
- \l_siunitx_tmpa_tl
+ \prop_get:NnNT \l__siunitx_number_in_prop { exponent-sign }
+ \l__siunitx_tmpa_tl
{
- \tl_put_left:NV \l_siunitx_tmpb_tl \l_siunitx_tmpa_tl
+ \tl_put_left:NV \l__siunitx_tmpb_tl \l__siunitx_tmpa_tl
}
\exp_args:NNNV \group_end:
- \tl_set:Nn \l_siunitx_tmpb_tl \l_siunitx_tmpb_tl
- \tl_set:Nx \l_siunitx_tmpa_tl
- { \l_siunitx_tmpa_tl { \l_siunitx_tmpb_tl } }
- \exp_after:wN \siunitx_number_process_fixed_aux_i:nnn
- \l_siunitx_tmpa_tl
+ \tl_set:Nn \l__siunitx_tmpb_tl \l__siunitx_tmpb_tl
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { \l__siunitx_tmpa_tl { \l__siunitx_tmpb_tl } }
+ \exp_after:wN \__siunitx_number_process_fixed_aux_i:nnn
+ \l__siunitx_tmpa_tl
}
}
-\cs_new_protected:Npn \siunitx_number_process_fixed_aux_i:nnn #1#2#3
+\cs_new_protected:Npn \__siunitx_number_process_fixed_aux_i:nnn #1#2#3
{
- \prop_put:Nnn \l_siunitx_number_in_prop { exponent } { true }
- \int_compare:nNnTF { \l_siunitx_process_fixed_int } > { \c_zero }
+ \prop_put:Nnn \l__siunitx_number_in_prop { exponent } { true }
+ \int_compare:nNnTF { \l__siunitx_process_fixed_int } > { \c_zero }
{
- \prop_put:NnV \l_siunitx_number_in_prop { exponent-integer }
- \l_siunitx_process_fixed_int
- \prop_del:Nn \l_siunitx_number_in_prop { exponent-sign }
+ \prop_put:NnV \l__siunitx_number_in_prop { exponent-integer }
+ \l__siunitx_process_fixed_int
+ \prop_del:Nn \l__siunitx_number_in_prop { exponent-sign }
}
{
- \prop_put:Nnx \l_siunitx_number_in_prop { exponent-integer }
- { \int_eval:n { - \l_siunitx_process_fixed_int } }
- \prop_put:Nnn \l_siunitx_number_in_prop { exponent-sign } { - }
+ \prop_put:Nnx \l__siunitx_number_in_prop { exponent-integer }
+ { \int_eval:n { - \l__siunitx_process_fixed_int } }
+ \prop_put:Nnn \l__siunitx_number_in_prop { exponent-sign } { - }
}
- \siunitx_number_process_fixed_aux_ii:nnn {#1} {#2} {#3}
+ \__siunitx_number_process_fixed_aux_ii:nnn {#1} {#2} {#3}
}
-\cs_new_protected:Npn \siunitx_number_process_fixed_aux_ii:nnn #1#2#3
+\cs_new_protected:Npn \__siunitx_number_process_fixed_aux_ii:nnn #1#2#3
{
- \bool_set_true:N \l_siunitx_tmp_bool
+ \bool_set_true:N \l__siunitx_tmp_bool
\tl_map_inline:nn {#1#2}
{
\str_if_eq:nnF {##1} { 0 }
{
- \bool_set_false:N \l_siunitx_tmp_bool
+ \bool_set_false:N \l__siunitx_tmp_bool
\tl_map_break:
}
}
- \bool_if:NF \l_siunitx_tmp_bool
- { \siunitx_number_process_fixed_aux_iii:nnn {#1} {#2} {#3} }
+ \bool_if:NF \l__siunitx_tmp_bool
+ { \__siunitx_number_process_fixed_aux_iii:nnn {#1} {#2} {#3} }
}
\cs_new_protected:Npn
- \siunitx_number_process_fixed_aux_iii:nnn #1#2#3 {
- \int_compare:nNnTF {#3} > { \l_siunitx_process_fixed_int }
- { \siunitx_number_process_fixed_large:nnn {#1} {#2} {#3} }
+ \__siunitx_number_process_fixed_aux_iii:nnn #1#2#3 {
+ \int_compare:nNnTF {#3} > { \l__siunitx_process_fixed_int }
+ { \__siunitx_number_process_fixed_large:nnn {#1} {#2} {#3} }
{
- \int_compare:nNnTF {#3} < { \l_siunitx_process_fixed_int }
- { \siunitx_number_process_fixed_small:nnn {#1} {#2} {#3} }
+ \int_compare:nNnTF {#3} < { \l__siunitx_process_fixed_int }
+ { \__siunitx_number_process_fixed_small:nnn {#1} {#2} {#3} }
{
- \prop_put:Nnn \l_siunitx_number_in_prop
+ \prop_put:Nnn \l__siunitx_number_in_prop
{ mantissa-integer } {#1}
\tl_if_empty:nTF {#2}
{
- \prop_del:Nn \l_siunitx_number_in_prop
+ \prop_del:Nn \l__siunitx_number_in_prop
{ mantissa-decimal }
- \prop_del:Nn \l_siunitx_number_in_prop
+ \prop_del:Nn \l__siunitx_number_in_prop
{ mantissa-decimal-marker }
}
{
- \prop_put:Nnn \l_siunitx_number_in_prop
+ \prop_put:Nnn \l__siunitx_number_in_prop
{ mantissa-decimal } {#2}
- \prop_if_in:NnF \l_siunitx_number_in_prop
+ \prop_if_in:NnF \l__siunitx_number_in_prop
{ mantissa-decimal-marker }
{
- \prop_put:Nnn \l_siunitx_number_in_prop
+ \prop_put:Nnn \l__siunitx_number_in_prop
{ mantissa-decimal-marker } { . }
}
}
}
}
}
-\cs_new_protected:Npn \siunitx_number_process_fixed_large:nnn #1
+\cs_new_protected:Npn \__siunitx_number_process_fixed_large:nnn #1
{
\int_compare:nNnTF {#1} = \c_zero
- { \siunitx_number_process_fixed_large_aux:nnn { } }
- { \siunitx_number_process_fixed_large_aux:nnn {#1} }
+ { \__siunitx_number_process_fixed_large_aux:nnn { } }
+ { \__siunitx_number_process_fixed_large_aux:nnn {#1} }
}
-\cs_new_protected:Npn \siunitx_number_process_fixed_large_aux:nnn #1#2#3
+\cs_new_protected:Npn \__siunitx_number_process_fixed_large_aux:nnn #1#2#3
{
\cs_set_protected:Npn
- \siunitx_number_process_fixed_large_aux:w ##1##2 \q_stop
+ \__siunitx_number_process_fixed_large_aux:w ##1##2 \q_stop
{
\tl_if_empty:nTF {##2}
{
\int_compare:nNnTF
- { #3 - 1 } = { \l_siunitx_process_fixed_int }
+ { #3 - 1 } = { \l__siunitx_process_fixed_int }
{
- \siunitx_number_process_fixed_aux_ii:nnn { #1 ##1 }
+ \__siunitx_number_process_fixed_aux_ii:nnn { #1 ##1 }
{ } { #3 - 1 }
}
{
- \siunitx_number_process_fixed_aux_ii:nnn { #1 ##1 }
+ \__siunitx_number_process_fixed_aux_ii:nnn { #1 ##1 }
{ 0 } { #3 - 1 }
}
}
{
\int_compare:nNnTF { 0 #1 } = { 0 }
{
- \siunitx_number_process_fixed_aux_ii:nnn {##1} {##2}
+ \__siunitx_number_process_fixed_aux_ii:nnn {##1} {##2}
{ #3 - 1 }
}
{
- \siunitx_number_process_fixed_aux_ii:nnn { #1 ##1 }
+ \__siunitx_number_process_fixed_aux_ii:nnn { #1 ##1 }
{##2} { #3 - 1 }
}
}
}
\tl_if_empty:nTF {#2}
- { \siunitx_number_process_fixed_aux_ii:nnn { #1 0 } { } { #3 - 1 } }
- { \siunitx_number_process_fixed_large_aux:w #2 \q_stop }
+ { \__siunitx_number_process_fixed_aux_ii:nnn { #1 0 } { } { #3 - 1 } }
+ { \__siunitx_number_process_fixed_large_aux:w #2 \q_stop }
}
-\cs_new_protected:Npn \siunitx_number_process_fixed_large_aux:w
+\cs_new_protected:Npn \__siunitx_number_process_fixed_large_aux:w
{ }
\cs_new_protected:Npn
- \siunitx_number_process_fixed_small:nnn #1#2#3 {
+ \__siunitx_number_process_fixed_small:nnn #1#2#3 {
\cs_set_protected:Npn
- \siunitx_number_process_fixed_small_aux:w ##1##2 \q_stop ##3
+ \__siunitx_number_process_fixed_small_aux:w ##1##2 \q_stop ##3
{
\tl_if_empty:nTF {##2}
{
\tl_if_empty:nTF {##3}
{
- \siunitx_number_process_fixed_aux_ii:nnn { 0 }
+ \__siunitx_number_process_fixed_aux_ii:nnn { 0 }
{ ##1 #2 } { #3 + 1 }
}
{
- \siunitx_number_process_fixed_aux_ii:nnn {##3}
+ \__siunitx_number_process_fixed_aux_ii:nnn {##3}
{ ##1 #2 } { #3 + 1 }
}
}
{
- \siunitx_number_process_fixed_small_aux:w ##2 \q_stop
+ \__siunitx_number_process_fixed_small_aux:w ##2 \q_stop
{ ##3 ##1 }
}
}
- \siunitx_number_process_fixed_small_aux:w #1 \q_stop { }
+ \__siunitx_number_process_fixed_small_aux:w #1 \q_stop { }
}
-\cs_new_protected:Npn \siunitx_number_process_fixed_small_aux:w
+\cs_new_protected:Npn \__siunitx_number_process_fixed_small_aux:w
{ }
-\cs_new_protected:Npn \siunitx_number_process_integer_digits: {
+\cs_new_protected:Npn \__siunitx_number_process_integer_digits: {
\int_compare:nNnT
- { \l_siunitx_process_integer_min_int } > { \c_zero }
+ { \l__siunitx_process_integer_min_int } > { \c_zero }
{
- \prop_get:NnNT \l_siunitx_number_in_prop { mantissa-integer }
- \l_siunitx_tmpa_tl
+ \prop_get:NnNT \l__siunitx_number_in_prop { mantissa-integer }
+ \l__siunitx_tmpa_tl
{
- \int_set:Nn \l_siunitx_tmp_int
+ \int_set:Nn \l__siunitx_tmp_int
{
- \l_siunitx_process_integer_min_int
- - \tl_length:N \l_siunitx_tmpa_tl
+ \l__siunitx_process_integer_min_int
+ - \tl_length:N \l__siunitx_tmpa_tl
}
- \int_compare:nNnT { \l_siunitx_tmp_int } > { \c_zero }
+ \int_compare:nNnT { \l__siunitx_tmp_int } > { \c_zero }
{
- \tl_set:Nx \l_siunitx_tmpa_tl
+ \tl_set:Nx \l__siunitx_tmpa_tl
{
- \prg_replicate:nn { \l_siunitx_tmp_int } { 0 }
- \exp_not:V \l_siunitx_tmpa_tl
+ \prg_replicate:nn { \l__siunitx_tmp_int } { 0 }
+ \exp_not:V \l__siunitx_tmpa_tl
}
- \prop_put:NnV \l_siunitx_number_in_prop
- { mantissa-integer } \l_siunitx_tmpa_tl
+ \prop_put:NnV \l__siunitx_number_in_prop
+ { mantissa-integer } \l__siunitx_tmpa_tl
}
}
}
}
-\cs_new_protected:Npn \siunitx_number_process_mantissa: {
- \bool_if:NF \l_siunitx_process_unity_mantissa_bool
+\cs_new_protected:Npn \__siunitx_number_process_mantissa: {
+ \bool_if:NF \l__siunitx_process_unity_mantissa_bool
{
- \prop_if_in:NnT \l_siunitx_number_in_prop { exponent }
+ \prop_if_in:NnT \l__siunitx_number_in_prop { exponent }
{
- \prop_get:NnNT \l_siunitx_number_in_prop { mantissa-integer }
- \l_siunitx_tmpa_tl
+ \prop_get:NnNT \l__siunitx_number_in_prop { mantissa-integer }
+ \l__siunitx_tmpa_tl
{
- \tl_if_eq:NNT \c_siunitx_unity_tl \l_siunitx_tmpa_tl
+ \tl_if_eq:NNT \c__siunitx_unity_tl \l__siunitx_tmpa_tl
{
- \prop_if_in:NnF \l_siunitx_number_in_prop
+ \prop_if_in:NnF \l__siunitx_number_in_prop
{ mantissa-decimal-marker }
{
- \prop_del:Nn \l_siunitx_number_in_prop
+ \prop_del:Nn \l__siunitx_number_in_prop
{ mantissa }
- \prop_del:Nn \l_siunitx_number_in_prop
+ \prop_del:Nn \l__siunitx_number_in_prop
{ mantissa-integer }
}
}
@@ -2166,417 +2166,417 @@
}
}
}
-\tl_new:N \c_siunitx_unity_tl
-\tl_set:Nn \c_siunitx_unity_tl { 1 }
-\cs_new_protected:Npn \siunitx_number_process_pad:n #1 {
- \prop_get:NnNT \l_siunitx_number_in_prop { #1 -decimal }
- \l_siunitx_tmpa_tl
+\tl_new:N \c__siunitx_unity_tl
+\tl_set:Nn \c__siunitx_unity_tl { 1 }
+\cs_new_protected:Npn \__siunitx_number_process_pad:n #1 {
+ \prop_get:NnNT \l__siunitx_number_in_prop { #1 -decimal }
+ \l__siunitx_tmpa_tl
{
- \int_while_do:nNnn { \l_siunitx_round_int } > { 0 }
+ \int_while_do:nNnn { \l__siunitx_round_int } > { 0 }
{
- \tl_put_right:Nn \l_siunitx_tmpa_tl { 0 }
- \int_decr:N \l_siunitx_round_int
+ \tl_put_right:Nn \l__siunitx_tmpa_tl { 0 }
+ \int_decr:N \l__siunitx_round_int
}
- \prop_put:NnV \l_siunitx_number_in_prop { #1 -decimal }
- \l_siunitx_tmpa_tl
+ \prop_put:NnV \l__siunitx_number_in_prop { #1 -decimal }
+ \l__siunitx_tmpa_tl
}
}
-\cs_new_protected:Npn \siunitx_number_process_places:n #1
+\cs_new_protected:Npn \__siunitx_number_process_places:n #1
{
- \prop_if_in:NnT \l_siunitx_number_in_prop {#1}
+ \prop_if_in:NnT \l__siunitx_number_in_prop {#1}
{
- \prop_if_in:NnF \l_siunitx_number_in_prop { #1 -uncertainty }
- { \siunitx_number_process_places_aux_i:n {#1} }
+ \prop_if_in:NnF \l__siunitx_number_in_prop { #1 -uncertainty }
+ { \__siunitx_number_process_places_aux_i:n {#1} }
}
}
-\cs_new_protected:Npn \siunitx_number_process_places_aux_i:n #1
+\cs_new_protected:Npn \__siunitx_number_process_places_aux_i:n #1
{
- \int_compare:nNnTF \l_siunitx_process_precision_int = \c_zero
- { \siunitx_number_process_places_none:n {#1} }
+ \int_compare:nNnTF \l__siunitx_process_precision_int = \c_zero
+ { \__siunitx_number_process_places_none:n {#1} }
{
- \prop_get:NnNT \l_siunitx_number_in_prop { #1 -decimal }
- \l_siunitx_tmpa_tl
+ \prop_get:NnNT \l__siunitx_number_in_prop { #1 -decimal }
+ \l__siunitx_tmpa_tl
{
- \tl_if_empty:NT \l_siunitx_tmpa_tl
- { \tl_set:Nn \l_siunitx_tmpa_tl { 0 } }
- \siunitx_number_process_places_aux_i:TF
+ \tl_if_empty:NT \l__siunitx_tmpa_tl
+ { \tl_set:Nn \l__siunitx_tmpa_tl { 0 } }
+ \__siunitx_number_process_places_aux_i:TF
{
- \prop_put:Nnn \l_siunitx_number_in_prop { #1 -decimal } { }
- \int_set:Nn \l_siunitx_round_int
- { \l_siunitx_process_precision_int }
- \siunitx_number_process_pad:n {#1}
+ \prop_put:Nnn \l__siunitx_number_in_prop { #1 -decimal } { }
+ \int_set:Nn \l__siunitx_round_int
+ { \l__siunitx_process_precision_int }
+ \__siunitx_number_process_pad:n {#1}
}
{
- \int_set:Nn \l_siunitx_round_int
- { \tl_length:N \l_siunitx_tmpa_tl }
- \siunitx_number_process_places_aux_ii:n {#1}
+ \int_set:Nn \l__siunitx_round_int
+ { \tl_length:N \l__siunitx_tmpa_tl }
+ \__siunitx_number_process_places_aux_ii:n {#1}
}
}
}
}
-\cs_new_protected:Npn \siunitx_number_process_places_aux_i:TF
+\cs_new_protected:Npn \__siunitx_number_process_places_aux_i:TF
{
- \bool_set_true:N \l_siunitx_tmp_bool
- \tl_map_inline:Nn \l_siunitx_tmpa_tl
+ \bool_set_true:N \l__siunitx_tmp_bool
+ \tl_map_inline:Nn \l__siunitx_tmpa_tl
{
\int_compare:nNnF {##1} = \c_zero
{
- \bool_set_false:N \l_siunitx_tmp_bool
+ \bool_set_false:N \l__siunitx_tmp_bool
\tl_map_break:
}
}
- \bool_if:NTF \l_siunitx_tmp_bool
+ \bool_if:NTF \l__siunitx_tmp_bool
}
-\cs_new_protected:Npn \siunitx_number_process_places_none:n #1
+\cs_new_protected:Npn \__siunitx_number_process_places_none:n #1
{
- \prop_get:NnNT \l_siunitx_number_in_prop { #1 -decimal } \l_siunitx_tmpa_tl
+ \prop_get:NnNT \l__siunitx_number_in_prop { #1 -decimal } \l__siunitx_tmpa_tl
{
- \int_compare:nNnTF { \tl_head:V \l_siunitx_tmpa_tl } > \c_four
+ \int_compare:nNnTF { \tl_head:V \l__siunitx_tmpa_tl } > \c_four
{
- \prop_get:NnNTF \l_siunitx_number_in_prop { #1 -integer }
- \l_siunitx_tmpb_tl
+ \prop_get:NnNTF \l__siunitx_number_in_prop { #1 -integer }
+ \l__siunitx_tmpb_tl
{
- \tl_set:Nx \l_siunitx_tmpb_tl
- { \int_eval:n { \l_siunitx_tmpb_tl + 1 } }
- \bool_if:NF \l_siunitx_round_half_up_bool
+ \tl_set:Nx \l__siunitx_tmpb_tl
+ { \int_eval:n { \l__siunitx_tmpb_tl + 1 } }
+ \bool_if:NF \l__siunitx_round_half_up_bool
{
\int_compare:nNnT
- { 0 \tl_tail:V \l_siunitx_tmpa_tl } = \c_zero
+ { 0 \tl_tail:V \l__siunitx_tmpa_tl } = \c_zero
{
- \int_if_odd:nT \l_siunitx_tmpb_tl
+ \int_if_odd:nT \l__siunitx_tmpb_tl
{
- \tl_set:Nx \l_siunitx_tmpb_tl
- { \int_eval:n { \l_siunitx_tmpb_tl - 1 } }
+ \tl_set:Nx \l__siunitx_tmpb_tl
+ { \int_eval:n { \l__siunitx_tmpb_tl - 1 } }
}
}
}
}
- { \tl_set:Nn \l_siunitx_tmpb_tl { 1 } }
- \prop_put:NnV \l_siunitx_number_in_prop
- { #1 -integer } \l_siunitx_tmpb_tl
+ { \tl_set:Nn \l__siunitx_tmpb_tl { 1 } }
+ \prop_put:NnV \l__siunitx_number_in_prop
+ { #1 -integer } \l__siunitx_tmpb_tl
}
{
- \prop_if_in:NnF \l_siunitx_number_in_prop { #1 -integer }
+ \prop_if_in:NnF \l__siunitx_number_in_prop { #1 -integer }
{
- \prop_put:Nnn \l_siunitx_number_in_prop
+ \prop_put:Nnn \l__siunitx_number_in_prop
{ #1 -integer } { 0 }
}
}
}
- \prop_del:Nn \l_siunitx_number_in_prop { #1 -decimal }
- \bool_if:NF \l_siunitx_process_int_to_dec_bool
- { \prop_del:Nn \l_siunitx_number_in_prop { #1 -decimal-marker } }
+ \prop_del:Nn \l__siunitx_number_in_prop { #1 -decimal }
+ \bool_if:NF \l__siunitx_process_int_to_dec_bool
+ { \prop_del:Nn \l__siunitx_number_in_prop { #1 -decimal-marker } }
}
-\cs_new_protected:Npn \siunitx_number_process_places_aux_ii:n #1
+\cs_new_protected:Npn \__siunitx_number_process_places_aux_ii:n #1
{
- \int_sub:Nn \l_siunitx_round_int
- { \l_siunitx_process_precision_int }
- \int_compare:nNnTF \l_siunitx_round_int < \c_zero
+ \int_sub:Nn \l__siunitx_round_int
+ { \l__siunitx_process_precision_int }
+ \int_compare:nNnTF \l__siunitx_round_int < \c_zero
{
- \int_set:Nn \l_siunitx_round_int { - \l_siunitx_round_int }
- \siunitx_number_process_pad:n {#1}
+ \int_set:Nn \l__siunitx_round_int { - \l__siunitx_round_int }
+ \__siunitx_number_process_pad:n {#1}
}
{
- \siunitx_number_process_places_init:n {#1}
- \siunitx_number_process_places_loop:n {#1}
- \siunitx_number_process_round_tidy:n {#1}
+ \__siunitx_number_process_places_init:n {#1}
+ \__siunitx_number_process_places_loop:n {#1}
+ \__siunitx_number_process_round_tidy:n {#1}
}
}
-\cs_new_protected:Npn \siunitx_number_process_places_init:n #1
+\cs_new_protected:Npn \__siunitx_number_process_places_init:n #1
{
- \prop_get:NnNF \l_siunitx_number_in_prop { #1 -integer }
- \l_siunitx_round_integer_in_tl
- { \tl_clear:N \l_siunitx_round_integer_in_tl }
- \prop_get:NnN \l_siunitx_number_in_prop { #1 -decimal }
- \l_siunitx_round_decimal_in_tl
- \tl_reverse:N \l_siunitx_round_integer_in_tl
- \tl_reverse:N \l_siunitx_round_decimal_in_tl
- \tl_clear:N \l_siunitx_round_integer_out_tl
- \tl_clear:N \l_siunitx_round_decimal_out_tl
- \tl_clear:N \l_siunitx_round_discard_tl
- \bool_set_false:N \l_siunitx_round_bool
- \bool_set_false:N \l_siunitx_round_even_bool
+ \prop_get:NnNF \l__siunitx_number_in_prop { #1 -integer }
+ \l__siunitx_round_integer_in_tl
+ { \tl_clear:N \l__siunitx_round_integer_in_tl }
+ \prop_get:NnN \l__siunitx_number_in_prop { #1 -decimal }
+ \l__siunitx_round_decimal_in_tl
+ \tl_reverse:N \l__siunitx_round_integer_in_tl
+ \tl_reverse:N \l__siunitx_round_decimal_in_tl
+ \tl_clear:N \l__siunitx_round_integer_out_tl
+ \tl_clear:N \l__siunitx_round_decimal_out_tl
+ \tl_clear:N \l__siunitx_round_discard_tl
+ \bool_set_false:N \l__siunitx_round_bool
+ \bool_set_false:N \l__siunitx_round_even_bool
}
-\cs_new_protected:Npn \siunitx_number_process_places_loop:n #1
+\cs_new_protected:Npn \__siunitx_number_process_places_loop:n #1
{
- \tl_if_empty:NTF \l_siunitx_round_decimal_in_tl
+ \tl_if_empty:NTF \l__siunitx_round_decimal_in_tl
{
- \tl_if_empty:NF \l_siunitx_round_integer_in_tl
+ \tl_if_empty:NF \l__siunitx_round_integer_in_tl
{
- \siunitx_number_process_places_integer:n {#1}
- \siunitx_number_process_places_loop:n {#1}
+ \__siunitx_number_process_places_integer:n {#1}
+ \__siunitx_number_process_places_loop:n {#1}
}
- \bool_if:NT \l_siunitx_round_bool
+ \bool_if:NT \l__siunitx_round_bool
{
- \tl_put_left:Nn \l_siunitx_round_integer_out_tl { 1 }
- \bool_set_false:N \l_siunitx_round_bool
+ \tl_put_left:Nn \l__siunitx_round_integer_out_tl { 1 }
+ \bool_set_false:N \l__siunitx_round_bool
}
}
{
- \siunitx_number_process_round_decimal:
- \siunitx_number_process_places_loop:n {#1}
+ \__siunitx_number_process_round_decimal:
+ \__siunitx_number_process_places_loop:n {#1}
}
}
-\cs_new_protected:Npn \siunitx_number_process_places_integer:n #1
+\cs_new_protected:Npn \__siunitx_number_process_places_integer:n #1
{
- \int_set:Nn \l_siunitx_tmp_int
- { \tl_head:V \l_siunitx_round_integer_in_tl }
- \tl_set:Nx \l_siunitx_round_integer_in_tl
- { \tl_tail:V \l_siunitx_round_integer_in_tl }
- \siunitx_number_process_round_up:
- \bool_set_false:N \l_siunitx_round_bool
- \int_compare:nNnT \l_siunitx_tmp_int = \c_ten
+ \int_set:Nn \l__siunitx_tmp_int
+ { \tl_head:V \l__siunitx_round_integer_in_tl }
+ \tl_set:Nx \l__siunitx_round_integer_in_tl
+ { \tl_tail:V \l__siunitx_round_integer_in_tl }
+ \__siunitx_number_process_round_up:
+ \bool_set_false:N \l__siunitx_round_bool
+ \int_compare:nNnT \l__siunitx_tmp_int = \c_ten
{
- \int_zero:N \l_siunitx_tmp_int
- \bool_set_true:N \l_siunitx_round_bool
+ \int_zero:N \l__siunitx_tmp_int
+ \bool_set_true:N \l__siunitx_round_bool
}
- \tl_put_left:NV \l_siunitx_round_integer_out_tl \l_siunitx_tmp_int
+ \tl_put_left:NV \l__siunitx_round_integer_out_tl \l__siunitx_tmp_int
}
-\cs_new_protected:Npn \siunitx_number_process_round:
+\cs_new_protected:Npn \__siunitx_number_process_round:
{
- \tl_if_empty:NF \l_siunitx_round_tl
+ \tl_if_empty:NF \l__siunitx_round_tl
{
- \bool_if:NT \l_siunitx_process_int_to_dec_bool
+ \bool_if:NT \l__siunitx_process_int_to_dec_bool
{
- \prop_if_in:NnF \l_siunitx_number_in_prop { mantissa-decimal }
+ \prop_if_in:NnF \l__siunitx_number_in_prop { mantissa-decimal }
{
- \prop_put:Nnn \l_siunitx_number_in_prop { mantissa-decimal }
+ \prop_put:Nnn \l__siunitx_number_in_prop { mantissa-decimal }
{ 0 }
}
- \prop_if_in:NnF \l_siunitx_number_in_prop
+ \prop_if_in:NnF \l__siunitx_number_in_prop
{ mantissa-decimal-marker }
{
- \prop_put:Nnn \l_siunitx_number_in_prop
+ \prop_put:Nnn \l__siunitx_number_in_prop
{ mantissa-decimal-marker } { . }
}
}
\clist_map_function:nc { mantissa , complex }
- { siunitx_number_process_ \l_siunitx_round_tl :n }
+ { __siunitx_number_process_ \l__siunitx_round_tl :n }
}
}
-\cs_new_protected:Npn \siunitx_number_process_round_decimal:
+\cs_new_protected:Npn \__siunitx_number_process_round_decimal:
{
- \int_compare:nNnF \l_siunitx_round_int > \c_one
- { \siunitx_number_process_round_decimal_aux: }
- \tl_put_right:Nx \l_siunitx_round_discard_tl
- { \tl_head:V \l_siunitx_round_decimal_in_tl }
- \tl_set:Nx \l_siunitx_round_decimal_in_tl
- { \tl_tail:V \l_siunitx_round_decimal_in_tl }
- \int_decr:N \l_siunitx_round_int
+ \int_compare:nNnF \l__siunitx_round_int > \c_one
+ { \__siunitx_number_process_round_decimal_aux: }
+ \tl_put_right:Nx \l__siunitx_round_discard_tl
+ { \tl_head:V \l__siunitx_round_decimal_in_tl }
+ \tl_set:Nx \l__siunitx_round_decimal_in_tl
+ { \tl_tail:V \l__siunitx_round_decimal_in_tl }
+ \int_decr:N \l__siunitx_round_int
}
-\cs_new_protected:Npn \siunitx_number_process_round_decimal_aux:
+\cs_new_protected:Npn \__siunitx_number_process_round_decimal_aux:
{
- \int_set:Nn \l_siunitx_tmp_int
- { \tl_head:V \l_siunitx_round_decimal_in_tl }
- \siunitx_number_process_round_up:
- \int_compare:nNnTF \l_siunitx_round_int = \c_one
+ \int_set:Nn \l__siunitx_tmp_int
+ { \tl_head:V \l__siunitx_round_decimal_in_tl }
+ \__siunitx_number_process_round_up:
+ \int_compare:nNnTF \l__siunitx_round_int = \c_one
{
- \int_compare:nNnT \l_siunitx_tmp_int > \c_four
+ \int_compare:nNnT \l__siunitx_tmp_int > \c_four
{
- \bool_set_true:N \l_siunitx_round_bool
- \bool_if:NF \l_siunitx_round_half_up_bool
+ \bool_set_true:N \l__siunitx_round_bool
+ \bool_if:NF \l__siunitx_round_half_up_bool
{
\int_compare:nNnT
- { \l_siunitx_round_discard_tl \int_use:N \l_siunitx_tmp_int }
+ { \l__siunitx_round_discard_tl \int_use:N \l__siunitx_tmp_int }
= \c_five
- { \bool_set_true:N \l_siunitx_round_even_bool }
+ { \bool_set_true:N \l__siunitx_round_even_bool }
}
}
}
{
- \int_compare:nNnT \l_siunitx_tmp_int = \c_ten
+ \int_compare:nNnT \l__siunitx_tmp_int = \c_ten
{
- \bool_set_true:N \l_siunitx_round_bool
- \int_zero:N \l_siunitx_tmp_int
+ \bool_set_true:N \l__siunitx_round_bool
+ \int_zero:N \l__siunitx_tmp_int
}
- \tl_put_left:NV \l_siunitx_round_decimal_out_tl
- \l_siunitx_tmp_int
+ \tl_put_left:NV \l__siunitx_round_decimal_out_tl
+ \l__siunitx_tmp_int
}
}
-\cs_new_protected:Npn \siunitx_number_process_round_up:
+\cs_new_protected:Npn \__siunitx_number_process_round_up:
{
- \bool_if:NT \l_siunitx_round_bool
+ \bool_if:NT \l__siunitx_round_bool
{
- \bool_if:NTF \l_siunitx_round_even_bool
+ \bool_if:NTF \l__siunitx_round_even_bool
{
- \bool_set_false:N \l_siunitx_round_even_bool
- \int_if_even:nF \l_siunitx_tmp_int
- { \int_incr:N \l_siunitx_tmp_int }
+ \bool_set_false:N \l__siunitx_round_even_bool
+ \int_if_even:nF \l__siunitx_tmp_int
+ { \int_incr:N \l__siunitx_tmp_int }
}
- { \int_incr:N \l_siunitx_tmp_int }
+ { \int_incr:N \l__siunitx_tmp_int }
}
- \bool_set_false:N \l_siunitx_round_bool
+ \bool_set_false:N \l__siunitx_round_bool
}
-\cs_new_protected:Npn \siunitx_number_process_round_tidy:n #1
+\cs_new_protected:Npn \__siunitx_number_process_round_tidy:n #1
{
\int_compare:nNnTF
{
- 0 \l_siunitx_round_integer_out_tl +
- 0 \l_siunitx_round_decimal_out_tl
+ 0 \l__siunitx_round_integer_out_tl +
+ 0 \l__siunitx_round_decimal_out_tl
}
= \c_zero
{
- \str_if_eq:VnTF \l_siunitx_process_round_min_tl { 0 }
+ \str_if_eq:VnTF \l__siunitx_process_round_min_tl { 0 }
{
- \prop_put:Nnn \l_siunitx_number_in_prop { #1 -integer } { 0 }
- \prop_put:NnV \l_siunitx_number_in_prop { #1 -decimal }
- \l_siunitx_round_decimal_out_tl
+ \prop_put:Nnn \l__siunitx_number_in_prop { #1 -integer } { 0 }
+ \prop_put:NnV \l__siunitx_number_in_prop { #1 -decimal }
+ \l__siunitx_round_decimal_out_tl
}
{
- \exp_after:wN \siunitx_number_process_round_tidy_aux:w
- \l_siunitx_process_round_min_tl . . \q_stop {#1}
+ \exp_after:wN \__siunitx_number_process_round_tidy_aux:w
+ \l__siunitx_process_round_min_tl . . \q_stop {#1}
}
}
{
- \prop_put:NnV \l_siunitx_number_in_prop { #1 -integer }
- \l_siunitx_round_integer_out_tl
- \tl_if_empty:NTF \l_siunitx_round_decimal_out_tl
+ \prop_put:NnV \l__siunitx_number_in_prop { #1 -integer }
+ \l__siunitx_round_integer_out_tl
+ \tl_if_empty:NTF \l__siunitx_round_decimal_out_tl
{
- \prop_del:Nn \l_siunitx_number_in_prop { #1 -decimal }
- \prop_del:Nn \l_siunitx_number_in_prop { #1 -decimal-marker }
+ \prop_del:Nn \l__siunitx_number_in_prop { #1 -decimal }
+ \prop_del:Nn \l__siunitx_number_in_prop { #1 -decimal-marker }
}
{
- \prop_put:NnV \l_siunitx_number_in_prop { #1 -decimal }
- \l_siunitx_round_decimal_out_tl
+ \prop_put:NnV \l__siunitx_number_in_prop { #1 -decimal }
+ \l__siunitx_round_decimal_out_tl
}
}
}
-\cs_new_protected:Npn \siunitx_number_process_round_tidy_aux:w
+\cs_new_protected:Npn \__siunitx_number_process_round_tidy_aux:w
#1 . #2 . #3 \q_stop #4
{
- \prop_put:Nnn \l_siunitx_number_in_prop { comparator } { < }
- \prop_put:Nnn \l_siunitx_number_in_prop { #4 -integer } {#1}
+ \prop_put:Nnn \l__siunitx_number_in_prop { comparator } { < }
+ \prop_put:Nnn \l__siunitx_number_in_prop { #4 -integer } {#1}
\tl_if_empty:nTF {#2}
- { \prop_del:Nn \l_siunitx_number_in_prop { #4 -decimal } }
- { \prop_put:Nnn \l_siunitx_number_in_prop { #4 -decimal } {#2} }
- }
-\cs_new_protected:Npn \siunitx_number_process_scientific: {
- \prop_if_in:NnF \l_siunitx_number_in_prop { complex }
- {
- \prop_get:NnNF \l_siunitx_number_in_prop { mantissa-integer }
- \l_siunitx_tmpa_tl
- { \tl_set:Nn \l_siunitx_tmpa_tl { 0 } }
- \prop_get:NnNF \l_siunitx_number_in_prop { mantissa-decimal }
- \l_siunitx_tmpb_tl
- { \tl_clear:N \l_siunitx_tmpb_tl }
- \tl_set:Nx \l_siunitx_tmpa_tl
- { { \l_siunitx_tmpa_tl } { \l_siunitx_tmpb_tl } }
- \prop_get:NnNF \l_siunitx_number_in_prop { exponent-integer }
- \l_siunitx_tmpb_tl
- { \tl_set:Nn \l_siunitx_tmpb_tl { 0 } }
+ { \prop_del:Nn \l__siunitx_number_in_prop { #4 -decimal } }
+ { \prop_put:Nnn \l__siunitx_number_in_prop { #4 -decimal } {#2} }
+ }
+\cs_new_protected:Npn \__siunitx_number_process_scientific: {
+ \prop_if_in:NnF \l__siunitx_number_in_prop { complex }
+ {
+ \prop_get:NnNF \l__siunitx_number_in_prop { mantissa-integer }
+ \l__siunitx_tmpa_tl
+ { \tl_set:Nn \l__siunitx_tmpa_tl { 0 } }
+ \prop_get:NnNF \l__siunitx_number_in_prop { mantissa-decimal }
+ \l__siunitx_tmpb_tl
+ { \tl_clear:N \l__siunitx_tmpb_tl }
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { { \l__siunitx_tmpa_tl } { \l__siunitx_tmpb_tl } }
+ \prop_get:NnNF \l__siunitx_number_in_prop { exponent-integer }
+ \l__siunitx_tmpb_tl
+ { \tl_set:Nn \l__siunitx_tmpb_tl { 0 } }
\group_begin:
- \prop_get:NnNT \l_siunitx_number_in_prop { exponent-sign }
- \l_siunitx_tmpa_tl
- { \tl_put_left:NV \l_siunitx_tmpb_tl \l_siunitx_tmpa_tl }
+ \prop_get:NnNT \l__siunitx_number_in_prop { exponent-sign }
+ \l__siunitx_tmpa_tl
+ { \tl_put_left:NV \l__siunitx_tmpb_tl \l__siunitx_tmpa_tl }
\exp_args:NNNV \group_end:
- \tl_set:Nn \l_siunitx_tmpb_tl \l_siunitx_tmpb_tl
- \tl_set:Nx \l_siunitx_tmpa_tl
- { \l_siunitx_tmpa_tl { \l_siunitx_tmpb_tl } }
- \exp_after:wN \siunitx_number_process_scientific_aux_i:nnn
- \l_siunitx_tmpa_tl
+ \tl_set:Nn \l__siunitx_tmpb_tl \l__siunitx_tmpb_tl
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { \l__siunitx_tmpa_tl { \l__siunitx_tmpb_tl } }
+ \exp_after:wN \__siunitx_number_process_scientific_aux_i:nnn
+ \l__siunitx_tmpa_tl
}
}
-\cs_new_protected:Npn \siunitx_number_process_scientific_aux_i:nnn #1#2#3
+\cs_new_protected:Npn \__siunitx_number_process_scientific_aux_i:nnn #1#2#3
{
- \bool_set_true:N \l_siunitx_tmp_bool
+ \bool_set_true:N \l__siunitx_tmp_bool
\tl_map_inline:nn {#1#2}
{
\str_if_eq:nnF {##1} { 0 }
{
- \bool_set_false:N \l_siunitx_tmp_bool
+ \bool_set_false:N \l__siunitx_tmp_bool
\tl_map_break:
}
}
- \bool_if:NF \l_siunitx_tmp_bool
- { \siunitx_number_process_scientific_aux_ii:nnn {#1} {#2} {#3} }
+ \bool_if:NF \l__siunitx_tmp_bool
+ { \__siunitx_number_process_scientific_aux_ii:nnn {#1} {#2} {#3} }
}
\cs_new_protected:Npn
- \siunitx_number_process_scientific_aux_ii:nnn #1#2#3 {
+ \__siunitx_number_process_scientific_aux_ii:nnn #1#2#3 {
\int_compare:nNnTF {#1} > { 9 }
- { \siunitx_number_process_scientific_large:nnn {#1} {#2} {#3} }
+ { \__siunitx_number_process_scientific_large:nnn {#1} {#2} {#3} }
{
\int_compare:nNnTF {#1} > { 0 }
{
- \bool_if:NTF \l_siunitx_process_engineering_bool
- { \siunitx_number_process_scientific_engineering:nnn }
- { \siunitx_number_process_scientific_store:nnn }
+ \bool_if:NTF \l__siunitx_process_engineering_bool
+ { \__siunitx_number_process_scientific_engineering:nnn }
+ { \__siunitx_number_process_scientific_store:nnn }
{#1} {#2} {#3}
}
{
- \siunitx_number_process_scientific_small:wn
+ \__siunitx_number_process_scientific_small:wn
#2 \q_stop {#3}
}
}
}
\cs_new_protected:Npn
- \siunitx_number_process_scientific_large:nnn #1#2#3 {
- \int_set:Nn \l_siunitx_tmp_int { \int_div_truncate:nn {#1} { 10 } }
- \tl_set:Nx \l_siunitx_tmpa_tl { \int_use:N \l_siunitx_tmp_int }
- \int_set:Nn \l_siunitx_tmp_int { #1 - 10 * \l_siunitx_tmp_int }
- \tl_set:Nx \l_siunitx_tmpa_tl
+ \__siunitx_number_process_scientific_large:nnn #1#2#3 {
+ \int_set:Nn \l__siunitx_tmp_int { \int_div_truncate:nn {#1} { 10 } }
+ \tl_set:Nx \l__siunitx_tmpa_tl { \int_use:N \l__siunitx_tmp_int }
+ \int_set:Nn \l__siunitx_tmp_int { #1 - 10 * \l__siunitx_tmp_int }
+ \tl_set:Nx \l__siunitx_tmpa_tl
{
- { \l_siunitx_tmpa_tl } { \int_use:N \l_siunitx_tmp_int #2 }
+ { \l__siunitx_tmpa_tl } { \int_use:N \l__siunitx_tmp_int #2 }
{ #3 + 1 }
}
- \exp_after:wN \siunitx_number_process_scientific_aux_ii:nnn
- \l_siunitx_tmpa_tl
+ \exp_after:wN \__siunitx_number_process_scientific_aux_ii:nnn
+ \l__siunitx_tmpa_tl
}
\cs_new_protected:Npn
- \siunitx_number_process_scientific_small:wn #1#2 \q_stop #3
- { \siunitx_number_process_scientific_aux_ii:nnn {#1} {#2} { #3 - 1 } }
+ \__siunitx_number_process_scientific_small:wn #1#2 \q_stop #3
+ { \__siunitx_number_process_scientific_aux_ii:nnn {#1} {#2} { #3 - 1 } }
\cs_new_protected:Npn
- \siunitx_number_process_scientific_store:nnn #1#2#3
+ \__siunitx_number_process_scientific_store:nnn #1#2#3
{
- \prop_put:Nnn \l_siunitx_number_in_prop { mantissa-integer } {#1}
+ \prop_put:Nnn \l__siunitx_number_in_prop { mantissa-integer } {#1}
\tl_if_empty:nTF {#2}
{
- \prop_del:Nn \l_siunitx_number_in_prop { mantissa-decimal }
- \prop_del:Nn \l_siunitx_number_in_prop
+ \prop_del:Nn \l__siunitx_number_in_prop { mantissa-decimal }
+ \prop_del:Nn \l__siunitx_number_in_prop
{ mantissa-decimal-marker }
}
{
- \prop_put:Nnn \l_siunitx_number_in_prop
+ \prop_put:Nnn \l__siunitx_number_in_prop
{ mantissa-decimal } {#2}
- \prop_if_in:NnF \l_siunitx_number_in_prop
+ \prop_if_in:NnF \l__siunitx_number_in_prop
{ mantissa-decimal-marker }
{
- \prop_put:Nnn \l_siunitx_number_in_prop
+ \prop_put:Nnn \l__siunitx_number_in_prop
{ mantissa-decimal-marker } { . }
}
}
\int_compare:nNnTF {#3} = { 0 }
{
- \prop_del:Nn \l_siunitx_number_in_prop { exponent }
- \prop_del:Nn \l_siunitx_number_in_prop { exponent-sign }
- \prop_del:Nn \l_siunitx_number_in_prop { exponent-integer }
+ \prop_del:Nn \l__siunitx_number_in_prop { exponent }
+ \prop_del:Nn \l__siunitx_number_in_prop { exponent-sign }
+ \prop_del:Nn \l__siunitx_number_in_prop { exponent-integer }
}
{
- \prop_put:Nnn \l_siunitx_number_in_prop { exponent } { true }
+ \prop_put:Nnn \l__siunitx_number_in_prop { exponent } { true }
\int_compare:nNnTF {#3} > { 0 }
{
- \int_set:Nn \l_siunitx_tmp_int {#3}
- \prop_put:NnV \l_siunitx_number_in_prop
- { exponent-integer } \l_siunitx_tmp_int
- \prop_del:Nn \l_siunitx_number_in_prop { exponent-sign }
+ \int_set:Nn \l__siunitx_tmp_int {#3}
+ \prop_put:NnV \l__siunitx_number_in_prop
+ { exponent-integer } \l__siunitx_tmp_int
+ \prop_del:Nn \l__siunitx_number_in_prop { exponent-sign }
}
{
- \int_set:Nn \l_siunitx_tmp_int { 0 - (#3) }
- \prop_put:NnV \l_siunitx_number_in_prop
- { exponent-integer } \l_siunitx_tmp_int
- \prop_put:Nnn \l_siunitx_number_in_prop { exponent-sign }
+ \int_set:Nn \l__siunitx_tmp_int { 0 - (#3) }
+ \prop_put:NnV \l__siunitx_number_in_prop
+ { exponent-integer } \l__siunitx_tmp_int
+ \prop_put:Nnn \l__siunitx_number_in_prop { exponent-sign }
{ - }
}
}
}
\cs_new_protected:Npn
- \siunitx_number_process_scientific_engineering:nnn #1#2#3
+ \__siunitx_number_process_scientific_engineering:nnn #1#2#3
{
\use:c
{
- siunitx_number_process_scientific_engineering_
+ __siunitx_number_process_scientific_engineering_
\int_compare:nNnTF {#3} < { 0 }
{
- \prg_case_int:nnn { \int_mod:nn { 0 - (#3) } { 3 } }
+ \int_case:nnn { \int_mod:nn { 0 - (#3) } { 3 } }
{
{ 1 } { 2 }
{ 2 } { 1 }
@@ -2589,326 +2589,326 @@
{#1} {#2} {#3}
}
\cs_new_eq:cN
- { siunitx_number_process_scientific_engineering_0:nnn }
- \siunitx_number_process_scientific_store:nnn
+ { __siunitx_number_process_scientific_engineering_0:nnn }
+ \__siunitx_number_process_scientific_store:nnn
\cs_new_protected:cpn
- { siunitx_number_process_scientific_engineering_1:nnn } #1#2#3
+ { __siunitx_number_process_scientific_engineering_1:nnn } #1#2#3
{
\tl_if_empty:nTF {#2}
{
- \siunitx_number_process_scientific_store:nnn { #1 0 } { }
+ \__siunitx_number_process_scientific_store:nnn { #1 0 } { }
{ #3 - 1 }
}
{
\use:c
- { siunitx_number_process_scientific_engineering_1:nw }
+ { __siunitx_number_process_scientific_engineering_1:nw }
{#1} #2 \q_stop {#3}
}
}
\cs_new_protected:cpn
- { siunitx_number_process_scientific_engineering_1:nw }
+ { __siunitx_number_process_scientific_engineering_1:nw }
#1#2#3 \q_stop #4
{
- \siunitx_number_process_scientific_store:nnn
+ \__siunitx_number_process_scientific_store:nnn
{#1#2} {#3} { #4 - 1 }
}
\cs_new_protected:cpn
- { siunitx_number_process_scientific_engineering_2:nnn } #1#2#3
+ { __siunitx_number_process_scientific_engineering_2:nnn } #1#2#3
{
\tl_if_empty:nTF {#2}
{
- \siunitx_number_process_scientific_store:nnn { #1 00 } { }
+ \__siunitx_number_process_scientific_store:nnn { #1 00 } { }
{ #3 - 2 }
}
{
\use:c
- { siunitx_number_process_scientific_engineering_2_i:nw }
+ { __siunitx_number_process_scientific_engineering_2_i:nw }
{#1} #2 \q_stop {#3}
}
}
\cs_new_protected:cpn
- { siunitx_number_process_scientific_engineering_2_i:nw }
+ { __siunitx_number_process_scientific_engineering_2_i:nw }
#1#2#3 \q_stop #4
{
\tl_if_empty:nTF {#3}
{
- \siunitx_number_process_scientific_store:nnn { #1#2 0 } { }
+ \__siunitx_number_process_scientific_store:nnn { #1#2 0 } { }
{ #4 - 2 }
}
{
\use:c
- { siunitx_number_process_scientific_engineering_2_ii:nw }
+ { __siunitx_number_process_scientific_engineering_2_ii:nw }
{#1#2} #3 \q_stop {#4}
}
}
\cs_new_protected:cpn
- { siunitx_number_process_scientific_engineering_2_ii:nw }
+ { __siunitx_number_process_scientific_engineering_2_ii:nw }
#1#2#3 \q_stop #4
{
- \siunitx_number_process_scientific_store:nnn { #1#2 } {#3}
+ \__siunitx_number_process_scientific_store:nnn { #1#2 } {#3}
{ #4 - 2 }
}
-\cs_new_protected:Npn \siunitx_number_process_sign: {
- \bool_if:NF \l_siunitx_process_plus_bool
+\cs_new_protected:Npn \__siunitx_number_process_sign: {
+ \bool_if:NF \l__siunitx_process_plus_bool
{
- \prop_if_in:NnTF \l_siunitx_number_in_prop { mantissa-sign }
- { \siunitx_number_process_sign_plus:n { mantissa } }
+ \prop_if_in:NnTF \l__siunitx_number_in_prop { mantissa-sign }
+ { \__siunitx_number_process_sign_plus:n { mantissa } }
{
- \prop_if_in:NnT \l_siunitx_number_in_prop { complex-sign }
+ \prop_if_in:NnT \l__siunitx_number_in_prop { complex-sign }
{
- \prop_if_in:NnF \l_siunitx_number_in_prop { mantissa }
- { \siunitx_number_process_sign_plus:n { complex } }
+ \prop_if_in:NnF \l__siunitx_number_in_prop { mantissa }
+ { \__siunitx_number_process_sign_plus:n { complex } }
}
}
- \prop_if_in:NnT \l_siunitx_number_in_prop { exponent-sign }
- { \siunitx_number_process_sign_plus:n { exponent } }
+ \prop_if_in:NnT \l__siunitx_number_in_prop { exponent-sign }
+ { \__siunitx_number_process_sign_plus:n { exponent } }
}
- \tl_if_empty:NF \l_siunitx_process_sign_tl
+ \tl_if_empty:NF \l__siunitx_process_sign_tl
{
- \siunitx_number_process_sign_add:n { mantissa }
- \prop_if_in:NnTF \l_siunitx_number_in_prop { complex }
- { \siunitx_number_process_sign_add:n { complex } }
+ \__siunitx_number_process_sign_add:n { mantissa }
+ \prop_if_in:NnTF \l__siunitx_number_in_prop { complex }
+ { \__siunitx_number_process_sign_add:n { complex } }
}
}
-\cs_new_protected:Npn \siunitx_number_process_sign_add:n #1 {
- \prop_if_in:NnF \l_siunitx_number_in_prop { #1 -sign }
+\cs_new_protected:Npn \__siunitx_number_process_sign_add:n #1 {
+ \prop_if_in:NnF \l__siunitx_number_in_prop { #1 -sign }
{
- \prop_if_in:NnF \l_siunitx_number_in_prop { #1 -had-sign }
+ \prop_if_in:NnF \l__siunitx_number_in_prop { #1 -had-sign }
{
- \prop_get:NnN \l_siunitx_number_in_prop {#1}
- \l_siunitx_tmpa_tl
- \tl_if_empty:NTF \l_siunitx_tmpa_tl
+ \prop_get:NnN \l__siunitx_number_in_prop {#1}
+ \l__siunitx_tmpa_tl
+ \tl_if_empty:NTF \l__siunitx_tmpa_tl
{
- \prop_put:NnV \l_siunitx_number_in_prop { sign }
- \l_siunitx_process_sign_tl
+ \prop_put:NnV \l__siunitx_number_in_prop { sign }
+ \l__siunitx_process_sign_tl
}
{
- \prop_put:NnV \l_siunitx_number_in_prop { #1 -sign }
- \l_siunitx_process_sign_tl
+ \prop_put:NnV \l__siunitx_number_in_prop { #1 -sign }
+ \l__siunitx_process_sign_tl
}
}
}
}
-\cs_new_protected:Npn \siunitx_number_process_sign_plus:n #1 {
- \prop_get:NnN \l_siunitx_number_in_prop { #1 -sign }
- \l_siunitx_tmpa_tl
- \tl_if_eq:NNT \c_siunitx_plus_tl \l_siunitx_tmpa_tl
+\cs_new_protected:Npn \__siunitx_number_process_sign_plus:n #1 {
+ \prop_get:NnN \l__siunitx_number_in_prop { #1 -sign }
+ \l__siunitx_tmpa_tl
+ \tl_if_eq:NNT \c__siunitx_plus_tl \l__siunitx_tmpa_tl
{
- \prop_del:Nn \l_siunitx_number_in_prop { #1 -sign }
- \prop_put:Nnn \l_siunitx_number_in_prop { #1 -had-sign } { true }
+ \prop_del:Nn \l__siunitx_number_in_prop { #1 -sign }
+ \prop_put:Nnn \l__siunitx_number_in_prop { #1 -had-sign } { true }
}
}
-\tl_new:N \c_siunitx_plus_tl
-\tl_set:Nn \c_siunitx_plus_tl { + }
-\cs_new_protected:Npn \siunitx_number_process_uncertainty: {
+\tl_new:N \c__siunitx_plus_tl
+\tl_set:Nn \c__siunitx_plus_tl { + }
+\cs_new_protected:Npn \__siunitx_number_process_uncertainty: {
\clist_map_function:nN { mantissa , complex }
- \siunitx_number_process_uncertainty_aux:n
+ \__siunitx_number_process_uncertainty_aux:n
}
\cs_new_protected:Npn
- \siunitx_number_process_uncertainty_aux:n #1 {
- \prop_if_in:NnT \l_siunitx_number_in_prop { #1 -uncertainty }
+ \__siunitx_number_process_uncertainty_aux:n #1 {
+ \prop_if_in:NnT \l__siunitx_number_in_prop { #1 -uncertainty }
{
- \prop_if_in:NnTF \l_siunitx_number_in_prop { #1 -decimal-marker }
- { \siunitx_number_process_uncertainty_decimal:n {#1} }
- { \siunitx_number_process_uncertainty_integer:n {#1} }
+ \prop_if_in:NnTF \l__siunitx_number_in_prop { #1 -decimal-marker }
+ { \__siunitx_number_process_uncertainty_decimal:n {#1} }
+ { \__siunitx_number_process_uncertainty_integer:n {#1} }
}
}
\cs_new_protected:Npn
- \siunitx_number_process_uncertainty_decimal:n #1 {
- \siunitx_number_process_uncertainty_count:nn {#1} { decimal }
- \siunitx_number_process_uncertainty_count:nn {#1} { uncertainty }
- \tl_clear:N \l_siunitx_uncertainty_decimal_tl
- \tl_clear:N \l_siunitx_uncertainty_integer_tl
+ \__siunitx_number_process_uncertainty_decimal:n #1 {
+ \__siunitx_number_process_uncertainty_count:nn {#1} { decimal }
+ \__siunitx_number_process_uncertainty_count:nn {#1} { uncertainty }
+ \tl_clear:N \l__siunitx_uncertainty_decimal_tl
+ \tl_clear:N \l__siunitx_uncertainty_integer_tl
\int_compare:nNnTF
- { \l_siunitx_process_uncertainty_int } >
- { \l_siunitx_process_decimal_int }
- { \siunitx_number_process_uncertainty_separate: }
- { \siunitx_number_process_uncertainty_pad: }
- \tl_if_empty:NF \l_siunitx_uncertainty_integer_tl
+ { \l__siunitx_process_uncertainty_int } >
+ { \l__siunitx_process_decimal_int }
+ { \__siunitx_number_process_uncertainty_separate: }
+ { \__siunitx_number_process_uncertainty_pad: }
+ \tl_if_empty:NF \l__siunitx_uncertainty_integer_tl
{
- \prop_put:NnV \l_siunitx_number_in_prop
+ \prop_put:NnV \l__siunitx_number_in_prop
{ #1 -uncertainty-integer }
- \l_siunitx_uncertainty_integer_tl
+ \l__siunitx_uncertainty_integer_tl
}
- \prop_put:NnV \l_siunitx_number_in_prop { #1 -uncertainty-decimal }
- \l_siunitx_uncertainty_decimal_tl
- \prop_get:NnN \l_siunitx_number_in_prop { #1 -decimal-marker }
- \l_siunitx_tmpa_tl
- \prop_put:NnV \l_siunitx_number_in_prop
- { #1 -uncertainty-decimal-marker } \l_siunitx_tmpa_tl
+ \prop_put:NnV \l__siunitx_number_in_prop { #1 -uncertainty-decimal }
+ \l__siunitx_uncertainty_decimal_tl
+ \prop_get:NnN \l__siunitx_number_in_prop { #1 -decimal-marker }
+ \l__siunitx_tmpa_tl
+ \prop_put:NnV \l__siunitx_number_in_prop
+ { #1 -uncertainty-decimal-marker } \l__siunitx_tmpa_tl
}
\cs_new_protected:Npn
- \siunitx_number_process_uncertainty_count:nn #1#2 {
- \prop_get:NnN \l_siunitx_number_in_prop { #1 - #2 }
- \l_siunitx_tmpa_tl
- \int_set:cn { l_siunitx_process_ #2 _int }
- { \tl_length:N \l_siunitx_tmpa_tl }
+ \__siunitx_number_process_uncertainty_count:nn #1#2 {
+ \prop_get:NnN \l__siunitx_number_in_prop { #1 - #2 }
+ \l__siunitx_tmpa_tl
+ \int_set:cn { l__siunitx_process_ #2 _int }
+ { \tl_length:N \l__siunitx_tmpa_tl }
}
-\cs_new_protected:Npn \siunitx_number_process_uncertainty_pad: {
+\cs_new_protected:Npn \__siunitx_number_process_uncertainty_pad: {
\int_while_do:nNnn
- { \l_siunitx_process_uncertainty_int } <
- { \l_siunitx_process_decimal_int }
+ { \l__siunitx_process_uncertainty_int } <
+ { \l__siunitx_process_decimal_int }
{
- \tl_put_right:Nn \l_siunitx_uncertainty_decimal_tl {0}
- \int_incr:N \l_siunitx_process_uncertainty_int
+ \tl_put_right:Nn \l__siunitx_uncertainty_decimal_tl {0}
+ \int_incr:N \l__siunitx_process_uncertainty_int
}
- \tl_put_right:NV \l_siunitx_uncertainty_decimal_tl
- \l_siunitx_tmpa_tl
+ \tl_put_right:NV \l__siunitx_uncertainty_decimal_tl
+ \l__siunitx_tmpa_tl
}
\cs_new_protected:Npn
- \siunitx_number_process_uncertainty_separate: {
- \tl_map_function:NN \l_siunitx_tmpa_tl
- \siunitx_number_process_uncertainty_separate_aux:N
+ \__siunitx_number_process_uncertainty_separate: {
+ \tl_map_function:NN \l__siunitx_tmpa_tl
+ \__siunitx_number_process_uncertainty_separate_aux:N
}
\cs_new_protected:Npn
- \siunitx_number_process_uncertainty_separate_aux:N #1 {
+ \__siunitx_number_process_uncertainty_separate_aux:N #1 {
\int_compare:nNnTF
- { \l_siunitx_process_uncertainty_int } >
- { \l_siunitx_process_decimal_int }
- { \tl_put_right:Nn \l_siunitx_uncertainty_integer_tl {#1} }
- { \tl_put_right:Nn \l_siunitx_uncertainty_decimal_tl {#1} }
- \int_decr:N \l_siunitx_process_uncertainty_int
+ { \l__siunitx_process_uncertainty_int } >
+ { \l__siunitx_process_decimal_int }
+ { \tl_put_right:Nn \l__siunitx_uncertainty_integer_tl {#1} }
+ { \tl_put_right:Nn \l__siunitx_uncertainty_decimal_tl {#1} }
+ \int_decr:N \l__siunitx_process_uncertainty_int
}
\cs_new_protected:Npn
- \siunitx_number_process_uncertainty_integer:n #1 {
- \prop_get:NnN \l_siunitx_number_in_prop { #1 -uncertainty }
- \l_siunitx_tmpa_tl
- \prop_put:NnV \l_siunitx_number_in_prop { #1 -uncertainty-integer }
- \l_siunitx_tmpa_tl
+ \__siunitx_number_process_uncertainty_integer:n #1 {
+ \prop_get:NnN \l__siunitx_number_in_prop { #1 -uncertainty }
+ \l__siunitx_tmpa_tl
+ \prop_put:NnV \l__siunitx_number_in_prop { #1 -uncertainty-integer }
+ \l__siunitx_tmpa_tl
}
-\cs_new_protected:Npn \siunitx_number_process_zero_fill: {
- \siunitx_number_process_zero_fill_aux:n { integer }
- \siunitx_number_process_zero_fill_aux:n { decimal }
+\cs_new_protected:Npn \__siunitx_number_process_zero_fill: {
+ \__siunitx_number_process_zero_fill_aux:n { integer }
+ \__siunitx_number_process_zero_fill_aux:n { decimal }
}
-\cs_new:Npn \siunitx_number_process_zero_fill_aux:n #1 {
- \bool_if:cT { l_siunitx_process_ #1 _zero_bool }
+\cs_new:Npn \__siunitx_number_process_zero_fill_aux:n #1 {
+ \bool_if:cT { l__siunitx_process_ #1 _zero_bool }
{
- \siunitx_number_process_zero_fill_aux:nn { mantissa } {#1}
- \siunitx_number_process_zero_fill_aux:nn { complex } {#1}
- \siunitx_number_process_zero_fill_aux:nn { exponent } {#1}
+ \__siunitx_number_process_zero_fill_aux:nn { mantissa } {#1}
+ \__siunitx_number_process_zero_fill_aux:nn { complex } {#1}
+ \__siunitx_number_process_zero_fill_aux:nn { exponent } {#1}
}
}
\cs_new_protected:Npn
- \siunitx_number_process_zero_fill_aux:nn #1#2 {
- \prop_if_in:NnT \l_siunitx_number_in_prop { #1 -decimal-marker }
+ \__siunitx_number_process_zero_fill_aux:nn #1#2 {
+ \prop_if_in:NnT \l__siunitx_number_in_prop { #1 -decimal-marker }
{
- \prop_if_in:NnF \l_siunitx_number_in_prop { #1 - #2 }
- { \prop_put:Nnn \l_siunitx_number_in_prop { #1 - #2 } { 0 } }
+ \prop_if_in:NnF \l__siunitx_number_in_prop { #1 - #2 }
+ { \prop_put:Nnn \l__siunitx_number_in_prop { #1 - #2 } { 0 } }
}
}
-\cs_new_protected_nopar:Npn \siunitx_number_process_zero_to_integer:
+\cs_new_protected_nopar:Npn \__siunitx_number_process_zero_to_integer:
{
- \bool_if:NT \l_siunitx_zero_decimal_to_integer_bool
+ \bool_if:NT \l__siunitx_zero_decimal_to_integer_bool
{
- \siunitx_number_process_zero_to_integer_aux:n { mantissa }
- \siunitx_number_process_zero_to_integer_aux:n { complex }
+ \__siunitx_number_process_zero_to_integer_aux:n { mantissa }
+ \__siunitx_number_process_zero_to_integer_aux:n { complex }
}
}
-\cs_new_protected:Npn \siunitx_number_process_zero_to_integer_aux:n #1
+\cs_new_protected:Npn \__siunitx_number_process_zero_to_integer_aux:n #1
{
- \prop_get:NnNT \l_siunitx_number_in_prop { #1 -decimal } \l_siunitx_tmpa_tl
+ \prop_get:NnNT \l__siunitx_number_in_prop { #1 -decimal } \l__siunitx_tmpa_tl
{
- \bool_set_true:N \l_siunitx_tmp_bool
- \tl_map_inline:Nn \l_siunitx_tmpa_tl
+ \bool_set_true:N \l__siunitx_tmp_bool
+ \tl_map_inline:Nn \l__siunitx_tmpa_tl
{
\str_if_eq:nnF {##1} { 0 }
{
- \bool_set_false:N \l_siunitx_tmp_bool
+ \bool_set_false:N \l__siunitx_tmp_bool
\tl_map_break:
}
}
- \bool_if:NT \l_siunitx_tmp_bool
+ \bool_if:NT \l__siunitx_tmp_bool
{
- \prop_del:Nn \l_siunitx_number_in_prop { #1 -decimal }
- \prop_del:Nn \l_siunitx_number_in_prop { #1 -decimal-marker }
+ \prop_del:Nn \l__siunitx_number_in_prop { #1 -decimal }
+ \prop_del:Nn \l__siunitx_number_in_prop { #1 -decimal-marker }
}
}
}
-\cs_new_protected:Npn \siunitx_number_exp_to_prefix:
+\cs_new_protected:Npn \__siunitx_number_exp_to_prefix:
{
- \prop_set_eq:NN \l_siunitx_unit_prop \l_siunitx_unit_saved_prop
- \prop_get:NnNT \l_siunitx_number_in_prop { exponent-integer }
- \l_siunitx_tmpa_tl
+ \prop_set_eq:NN \l__siunitx_unit_prop \l__siunitx_unit_saved_prop
+ \prop_get:NnNT \l__siunitx_number_in_prop { exponent-integer }
+ \l__siunitx_tmpa_tl
{
- \prop_get:NnNT \l_siunitx_number_in_prop { exponent-sign }
- \l_siunitx_tmpb_tl
- { \tl_put_left:NV \l_siunitx_tmpa_tl \l_siunitx_tmpb_tl }
- \prop_get:NnNT \l_siunitx_unit_prop { prefix-1 } \l_siunitx_tmpb_tl
+ \prop_get:NnNT \l__siunitx_number_in_prop { exponent-sign }
+ \l__siunitx_tmpb_tl
+ { \tl_put_left:NV \l__siunitx_tmpa_tl \l__siunitx_tmpb_tl }
+ \prop_get:NnNT \l__siunitx_unit_prop { prefix-1 } \l__siunitx_tmpb_tl
{
- \prop_del:Nn \l_siunitx_unit_prop { prefix-1 }
- \prop_del:Nn \l_siunitx_unit_prop { prefix-symbol-1 }
- \prop_get:NVN \l_siunitx_prefix_forward_prop \l_siunitx_tmpb_tl
- \l_siunitx_tmpb_tl
- \tl_set:Nx \l_siunitx_tmpa_tl
- { \int_eval:n { \l_siunitx_tmpa_tl + \l_siunitx_tmpb_tl } }
+ \prop_del:Nn \l__siunitx_unit_prop { prefix-1 }
+ \prop_del:Nn \l__siunitx_unit_prop { prefix-symbol-1 }
+ \prop_get:NVN \l__siunitx_prefix_forward_prop \l__siunitx_tmpb_tl
+ \l__siunitx_tmpb_tl
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { \int_eval:n { \l__siunitx_tmpa_tl + \l__siunitx_tmpb_tl } }
}
- \prop_get:NVNTF \l_siunitx_prefix_reverse_prop \l_siunitx_tmpa_tl
- \l_siunitx_tmpb_tl
+ \prop_get:NVNTF \l__siunitx_prefix_reverse_prop \l__siunitx_tmpa_tl
+ \l__siunitx_tmpb_tl
{
- \prop_del:Nn \l_siunitx_number_in_prop { exponent }
+ \prop_del:Nn \l__siunitx_number_in_prop { exponent }
\use:c
{
- siunitx_ \exp_after:wN \token_to_str:N \l_siunitx_tmpb_tl
+ __siunitx_ \exp_after:wN \token_to_str:N \l__siunitx_tmpb_tl
_function:w
}
- \siunitx_unit_format:
+ \__siunitx_unit_format:
}
{
\msg_error:nnx { siunitx } { non-convertible-exponent }
- { \l_siunitx_tmpa_tl }
+ { \l__siunitx_tmpa_tl }
}
}
}
-\prop_new:N \l_siunitx_number_out_prop
-\tl_new:N \l_siunitx_group_sep_tl
-\tl_new:N \l_siunitx_output_decimal_tl
-\bool_new:N \l_siunitx_complex_after_bool
-\bool_new:N \l_siunitx_group_decimal_bool
-\bool_new:N \l_siunitx_group_integer_bool
+\prop_new:N \l__siunitx_number_out_prop
+\tl_new:N \l__siunitx_group_sep_tl
+\tl_new:N \l__siunitx_output_decimal_tl
+\bool_new:N \l__siunitx_complex_after_bool
+\bool_new:N \l__siunitx_group_decimal_bool
+\bool_new:N \l__siunitx_group_integer_bool
\keys_define:nn { siunitx } {
bracket-negative-numbers .bool_set:N =
- \l_siunitx_negative_bracket_bool ,
- bracket-numbers .bool_set:N = \l_siunitx_brackets_bool,
- close-bracket .tl_set:N = \l_siunitx_bracket_close_tl,
+ \l__siunitx_negative_bracket_bool ,
+ bracket-numbers .bool_set:N = \l__siunitx_brackets_bool,
+ close-bracket .tl_set:N = \l__siunitx_bracket_close_tl,
complex-root-position .choice:,
complex-root-position
/ after-number .code:n =
- { \bool_set_true:N \l_siunitx_complex_after_bool } ,
+ { \bool_set_true:N \l__siunitx_complex_after_bool } ,
complex-root-position
/ before-number .code:n =
- { \bool_set_false:N \l_siunitx_complex_after_bool } ,
+ { \bool_set_false:N \l__siunitx_complex_after_bool } ,
copy-complex-root .bool_set:N =
- \l_siunitx_output_complex_copy_bool,
+ \l__siunitx_output_complex_copy_bool,
copy-decimal-marker .bool_set:N =
- \l_siunitx_output_decimal_copy_bool,
- exponent-base .tl_set:N = \l_siunitx_exponent_base_tl,
+ \l__siunitx_output_decimal_copy_bool,
+ exponent-base .tl_set:N = \l__siunitx_exponent_base_tl,
exponent-product .tl_set:N =
- \l_siunitx_exponent_product_tl,
+ \l__siunitx_exponent_product_tl,
group-decimal-digits .meta:n = { group-digits = decimal },
group-digits .choice: ,
group-digits /
decimal .code:n =
{
- \bool_set_true:N \l_siunitx_group_decimal_bool
- \bool_set_false:N \l_siunitx_group_integer_bool
+ \bool_set_true:N \l__siunitx_group_decimal_bool
+ \bool_set_false:N \l__siunitx_group_integer_bool
},
group-digits /
false .code:n =
{
- \bool_set_false:N \l_siunitx_group_decimal_bool
- \bool_set_false:N \l_siunitx_group_integer_bool
+ \bool_set_false:N \l__siunitx_group_decimal_bool
+ \bool_set_false:N \l__siunitx_group_integer_bool
},
group-digits /
integer .code:n =
{
- \bool_set_false:N \l_siunitx_group_decimal_bool
- \bool_set_true:N \l_siunitx_group_integer_bool
+ \bool_set_false:N \l__siunitx_group_decimal_bool
+ \bool_set_true:N \l__siunitx_group_integer_bool
},
group-digits /
true .code:n =
{
- \bool_set_true:N \l_siunitx_group_decimal_bool
- \bool_set_true:N \l_siunitx_group_integer_bool
+ \bool_set_true:N \l__siunitx_group_decimal_bool
+ \bool_set_true:N \l__siunitx_group_integer_bool
},
group-digits .default:n = true ,
group-four-digits .choice:,
@@ -2918,22 +2918,22 @@
true .meta:n = { group-minimum-digits = 4 },
group-four-digits .default:n = true,
group-integer-digits .meta:n = { group-digits = integer },
- group-minimum-digits .int_set:N = \l_siunitx_group_min_int,
+ group-minimum-digits .int_set:N = \l__siunitx_group_min_int,
group-separator .code:n =
- { \tl_set:Nn \l_siunitx_group_sep_tl { {#1} } },
- negative-color .tl_set:N = \l_siunitx_negative_color_tl,
- open-bracket .tl_set:N = \l_siunitx_bracket_open_tl,
+ { \tl_set:Nn \l__siunitx_group_sep_tl { {#1} } },
+ negative-color .tl_set:N = \l__siunitx_negative_color_tl,
+ open-bracket .tl_set:N = \l__siunitx_bracket_open_tl,
output-close-uncertainty .tl_set:N =
- \l_siunitx_output_uncert_close_tl,
- output-complex-root .tl_set:N = \l_siunitx_output_complex_tl ,
+ \l__siunitx_output_uncert_close_tl,
+ output-complex-root .tl_set:N = \l__siunitx_output_complex_tl ,
output-decimal-marker .code:n =
- { \tl_set:Nn \l_siunitx_output_decimal_tl { {#1} } },
- output-exponent-marker .tl_set:N = \l_siunitx_output_exponent_tl,
+ { \tl_set:Nn \l__siunitx_output_decimal_tl { {#1} } },
+ output-exponent-marker .tl_set:N = \l__siunitx_output_exponent_tl,
output-open-uncertainty .tl_set:N =
- \l_siunitx_output_uncert_open_tl,
- separate-uncertainty .bool_set:N = \l_siunitx_uncert_sep_bool,
- tight-spacing .bool_set:N = \l_siunitx_tight_bool,
- uncertainty-separator .tl_set:N = \l_siunitx_uncert_sep_tl,
+ \l__siunitx_output_uncert_open_tl,
+ separate-uncertainty .bool_set:N = \l__siunitx_uncert_sep_bool,
+ tight-spacing .bool_set:N = \l__siunitx_tight_bool,
+ uncertainty-separator .tl_set:N = \l__siunitx_uncert_sep_tl,
}
\keys_set:nn { siunitx }
{
@@ -2952,527 +2952,527 @@
output-decimal-marker = . ,
output-open-uncertainty = ( % )
}
-\cs_new_protected:Npn \siunitx_number_format: {
- \prop_if_empty:NF \l_siunitx_number_in_prop
+\cs_new_protected:Npn \__siunitx_number_format: {
+ \prop_if_empty:NF \l__siunitx_number_in_prop
{
- \prop_clear:N \l_siunitx_number_out_prop
- \siunitx_number_format_reassemble:
- \siunitx_number_format_complex:
- \siunitx_number_format_sign:n { mantissa }
- \siunitx_number_format_sign:n { exponent }
- \siunitx_number_format_relation:
- \siunitx_number_format_color:
- \siunitx_number_format_final:
+ \prop_clear:N \l__siunitx_number_out_prop
+ \__siunitx_number_format_reassemble:
+ \__siunitx_number_format_complex:
+ \__siunitx_number_format_sign:n { mantissa }
+ \__siunitx_number_format_sign:n { exponent }
+ \__siunitx_number_format_relation:
+ \__siunitx_number_format_color:
+ \__siunitx_number_format_final:
}
}
-\cs_new_protected:Npn \siunitx_number_format_brackets:n #1 {
- \bool_if:NT \l_siunitx_brackets_bool
+\cs_new_protected:Npn \__siunitx_number_format_brackets:n #1 {
+ \bool_if:NT \l__siunitx_brackets_bool
{
- \prop_if_in:NnT \l_siunitx_number_out_prop { #1 -bracket }
+ \prop_if_in:NnT \l__siunitx_number_out_prop { #1 -bracket }
{
- \siunitx_number_format_brackets_aux:n {#1}
- \prop_del:Nn \l_siunitx_number_out_prop { #1 -bracket }
+ \__siunitx_number_format_brackets_aux:n {#1}
+ \prop_del:Nn \l__siunitx_number_out_prop { #1 -bracket }
}
}
}
-\cs_new_protected:Npn \siunitx_number_format_brackets_aux:n #1 {
- \prop_get:NnNF \l_siunitx_number_out_prop { #1 -result }
- \l_siunitx_tmpa_tl
+\cs_new_protected:Npn \__siunitx_number_format_brackets_aux:n #1 {
+ \prop_get:NnNF \l__siunitx_number_out_prop { #1 -result }
+ \l__siunitx_tmpa_tl
{
- \prop_get:NnN \l_siunitx_number_out_prop {#1} \l_siunitx_tmpa_tl
+ \prop_get:NnN \l__siunitx_number_out_prop {#1} \l__siunitx_tmpa_tl
}
- \tl_put_left:NV \l_siunitx_tmpa_tl \l_siunitx_bracket_open_tl
- \tl_put_right:NV \l_siunitx_tmpa_tl \l_siunitx_bracket_close_tl
+ \tl_put_left:NV \l__siunitx_tmpa_tl \l__siunitx_bracket_open_tl
+ \tl_put_right:NV \l__siunitx_tmpa_tl \l__siunitx_bracket_close_tl
\str_if_eq:nnTF {#1} { result }
- { \prop_put:NnV \l_siunitx_number_out_prop {#1} \l_siunitx_tmpa_tl }
+ { \prop_put:NnV \l__siunitx_number_out_prop {#1} \l__siunitx_tmpa_tl }
{
- \prop_put:NnV \l_siunitx_number_out_prop { #1 -result }
- \l_siunitx_tmpa_tl
+ \prop_put:NnV \l__siunitx_number_out_prop { #1 -result }
+ \l__siunitx_tmpa_tl
}
}
-\cs_new_protected:Npn \siunitx_number_format_color: {
- \tl_if_empty:NF \l_siunitx_negative_color_tl
+\cs_new_protected:Npn \__siunitx_number_format_color: {
+ \tl_if_empty:NF \l__siunitx_negative_color_tl
{
- \siunitx_number_format_color_aux:n { mantissa-sign }
- \siunitx_number_format_color_aux:n { sign }
+ \__siunitx_number_format_color_aux:n { mantissa-sign }
+ \__siunitx_number_format_color_aux:n { sign }
}
}
-\cs_new_protected:Npn \siunitx_number_format_color_aux:n #1 {
- \prop_get:NnNT \l_siunitx_number_in_prop {#1} \l_siunitx_tmpa_tl
+\cs_new_protected:Npn \__siunitx_number_format_color_aux:n #1 {
+ \prop_get:NnNT \l__siunitx_number_in_prop {#1} \l__siunitx_tmpa_tl
{
- \str_if_eq:VnT \l_siunitx_tmpa_tl { - }
+ \str_if_eq:VnT \l__siunitx_tmpa_tl { - }
{
- \prop_put:NnV \l_siunitx_number_out_prop { color }
- \l_siunitx_negative_color_tl
+ \prop_put:NnV \l__siunitx_number_out_prop { color }
+ \l__siunitx_negative_color_tl
}
}
}
-\cs_new_protected:Npn \siunitx_number_format_complex: {
- \prop_if_in:NnT \l_siunitx_number_in_prop { complex-root }
+\cs_new_protected:Npn \__siunitx_number_format_complex: {
+ \prop_if_in:NnT \l__siunitx_number_in_prop { complex-root }
{
- \prop_if_in:NnTF \l_siunitx_number_out_prop { complex }
+ \prop_if_in:NnTF \l__siunitx_number_out_prop { complex }
{
- \siunitx_number_format_brackets:n { complex }
- \siunitx_number_format_complex_aux:n { complex }
- \siunitx_number_format_complex_aux:n { complex-result }
- \prop_if_in:NnT \l_siunitx_number_out_prop
+ \__siunitx_number_format_brackets:n { complex }
+ \__siunitx_number_format_complex_aux:n { complex }
+ \__siunitx_number_format_complex_aux:n { complex-result }
+ \prop_if_in:NnT \l__siunitx_number_out_prop
{ complex-uncertainty }
{
- \siunitx_number_format_complex_aux:n
+ \__siunitx_number_format_complex_aux:n
{ complex-uncertainty }
}
}
{
- \prop_put:NnV \l_siunitx_number_out_prop { complex }
- \l_siunitx_output_complex_tl
+ \prop_put:NnV \l__siunitx_number_out_prop { complex }
+ \l__siunitx_output_complex_tl
}
- \siunitx_number_format_join_complex:
+ \__siunitx_number_format_join_complex:
}
}
-\cs_new_protected:Npn \siunitx_number_format_complex_aux:n #1 {
- \bool_if:NTF \l_siunitx_output_complex_copy_bool
+\cs_new_protected:Npn \__siunitx_number_format_complex_aux:n #1 {
+ \bool_if:NTF \l__siunitx_output_complex_copy_bool
{
- \prop_get:NnN \l_siunitx_number_in_prop { complex-root }
- \l_siunitx_tmpa_tl
+ \prop_get:NnN \l__siunitx_number_in_prop { complex-root }
+ \l__siunitx_tmpa_tl
}
- { \tl_set_eq:NN \l_siunitx_tmpa_tl \l_siunitx_output_complex_tl }
- \prop_get:NnN \l_siunitx_number_out_prop {#1} \l_siunitx_tmpb_tl
- \bool_if:NTF \l_siunitx_complex_after_bool
- { \tl_put_right:NV \l_siunitx_tmpb_tl \l_siunitx_tmpa_tl }
- { \tl_put_left:NV \l_siunitx_tmpb_tl \l_siunitx_tmpa_tl }
- \prop_put:NnV \l_siunitx_number_out_prop {#1} \l_siunitx_tmpb_tl
+ { \tl_set_eq:NN \l__siunitx_tmpa_tl \l__siunitx_output_complex_tl }
+ \prop_get:NnN \l__siunitx_number_out_prop {#1} \l__siunitx_tmpb_tl
+ \bool_if:NTF \l__siunitx_complex_after_bool
+ { \tl_put_right:NV \l__siunitx_tmpb_tl \l__siunitx_tmpa_tl }
+ { \tl_put_left:NV \l__siunitx_tmpb_tl \l__siunitx_tmpa_tl }
+ \prop_put:NnV \l__siunitx_number_out_prop {#1} \l__siunitx_tmpb_tl
}
-\cs_new_protected:Npn \siunitx_number_format_copy:n #1 {
- \prop_get:NnN \l_siunitx_number_in_prop {#1} \l_siunitx_tmpa_tl
- \prop_put:NnV \l_siunitx_number_out_prop {#1} \l_siunitx_tmpa_tl
+\cs_new_protected:Npn \__siunitx_number_format_copy:n #1 {
+ \prop_get:NnN \l__siunitx_number_in_prop {#1} \l__siunitx_tmpa_tl
+ \prop_put:NnV \l__siunitx_number_out_prop {#1} \l__siunitx_tmpa_tl
}
-\cs_new_protected:Npn \siunitx_number_format_copy:nn #1#2 {
- \prop_get:NnN \l_siunitx_number_out_prop {#1} \l_siunitx_tmpa_tl
- \prop_put:NnV \l_siunitx_number_out_prop {#2} \l_siunitx_tmpa_tl
+\cs_new_protected:Npn \__siunitx_number_format_copy:nn #1#2 {
+ \prop_get:NnN \l__siunitx_number_out_prop {#1} \l__siunitx_tmpa_tl
+ \prop_put:NnV \l__siunitx_number_out_prop {#2} \l__siunitx_tmpa_tl
}
-\cs_new_protected:Npn \siunitx_number_format_final: {
- \prop_if_in:NnT \l_siunitx_number_out_prop { complex }
+\cs_new_protected:Npn \__siunitx_number_format_final: {
+ \prop_if_in:NnT \l__siunitx_number_out_prop { complex }
{
- \prop_if_in:NnF \l_siunitx_number_out_prop { mantissa-result }
+ \prop_if_in:NnF \l__siunitx_number_out_prop { mantissa-result }
{
- \siunitx_number_format_copy:nn { complex }
+ \__siunitx_number_format_copy:nn { complex }
{ mantissa-result }
}
}
- \prop_if_in:NnTF \l_siunitx_number_out_prop { exponent }
+ \prop_if_in:NnTF \l__siunitx_number_out_prop { exponent }
{
- \siunitx_number_format_final_exponent:
- \prop_if_in:NnTF \l_siunitx_number_out_prop { mantissa-result }
- { \siunitx_number_format_final_combined: }
- { \siunitx_number_format_final_exponent_only: }
+ \__siunitx_number_format_final_exponent:
+ \prop_if_in:NnTF \l__siunitx_number_out_prop { mantissa-result }
+ { \__siunitx_number_format_final_combined: }
+ { \__siunitx_number_format_final_exponent_only: }
}
- { \siunitx_number_format_copy:nn { mantissa-result } { result } }
- \prop_if_in:NnT \l_siunitx_number_out_prop { mantissa-bracket }
+ { \__siunitx_number_format_copy:nn { mantissa-result } { result } }
+ \prop_if_in:NnT \l__siunitx_number_out_prop { mantissa-bracket }
{
- \prop_put:Nnn \l_siunitx_number_out_prop { result-bracket }
+ \prop_put:Nnn \l__siunitx_number_out_prop { result-bracket }
{ true }
- \prop_del:Nn \l_siunitx_number_out_prop { mantissa-bracket }
+ \prop_del:Nn \l__siunitx_number_out_prop { mantissa-bracket }
}
- \prop_if_in:NnT \l_siunitx_number_out_prop { comparator }
+ \prop_if_in:NnT \l__siunitx_number_out_prop { comparator }
{
- \siunitx_number_format_brackets:n { result }
- \prop_get:NnN \l_siunitx_number_out_prop { comparator }
- \l_siunitx_tmpa_tl
- \prop_get:NnN \l_siunitx_number_out_prop { result }
- \l_siunitx_tmpb_tl
- \tl_put_right:No \l_siunitx_tmpa_tl { \l_siunitx_tmpb_tl }
- \prop_put:NnV \l_siunitx_number_out_prop { result }
- \l_siunitx_tmpa_tl
+ \__siunitx_number_format_brackets:n { result }
+ \prop_get:NnN \l__siunitx_number_out_prop { comparator }
+ \l__siunitx_tmpa_tl
+ \prop_get:NnN \l__siunitx_number_out_prop { result }
+ \l__siunitx_tmpb_tl
+ \tl_put_right:No \l__siunitx_tmpa_tl { \l__siunitx_tmpb_tl }
+ \prop_put:NnV \l__siunitx_number_out_prop { result }
+ \l__siunitx_tmpa_tl
}
}
-\cs_new_protected:Npn \siunitx_number_format_final_combined: {
- \siunitx_number_format_brackets:n { mantissa }
- \prop_get:NnN \l_siunitx_number_out_prop { mantissa-result }
- \l_siunitx_tmpa_tl
- \tl_if_empty:NT \l_siunitx_output_exponent_tl
+\cs_new_protected:Npn \__siunitx_number_format_final_combined: {
+ \__siunitx_number_format_brackets:n { mantissa }
+ \prop_get:NnN \l__siunitx_number_out_prop { mantissa-result }
+ \l__siunitx_tmpa_tl
+ \tl_if_empty:NT \l__siunitx_output_exponent_tl
{
- \tl_put_right:Nx \l_siunitx_tmpa_tl
+ \tl_put_right:Nx \l__siunitx_tmpa_tl
{
\exp_not:N \ensuremath
{
- \bool_if:NTF \l_siunitx_tight_bool
- { { \exp_not:V \l_siunitx_exponent_product_tl } }
- { { } \exp_not:V \l_siunitx_exponent_product_tl { } }
+ \bool_if:NTF \l__siunitx_tight_bool
+ { { \exp_not:V \l__siunitx_exponent_product_tl } }
+ { { } \exp_not:V \l__siunitx_exponent_product_tl { } }
}
}
}
- \prop_get:NnN \l_siunitx_number_out_prop { exponent-result }
- \l_siunitx_tmpb_tl
- \tl_put_right:NV \l_siunitx_tmpa_tl \l_siunitx_tmpb_tl
- \prop_put:NnV \l_siunitx_number_out_prop { result }
- \l_siunitx_tmpa_tl
- \prop_put:Nnn \l_siunitx_number_out_prop
+ \prop_get:NnN \l__siunitx_number_out_prop { exponent-result }
+ \l__siunitx_tmpb_tl
+ \tl_put_right:NV \l__siunitx_tmpa_tl \l__siunitx_tmpb_tl
+ \prop_put:NnV \l__siunitx_number_out_prop { result }
+ \l__siunitx_tmpa_tl
+ \prop_put:Nnn \l__siunitx_number_out_prop
{ result-bracket-exponent } { true }
}
-\cs_new_protected:Npn \siunitx_number_format_final_exponent: {
- \prop_get:NnN \l_siunitx_number_out_prop { exponent }
- \l_siunitx_tmpa_tl
- \tl_if_empty:NTF \l_siunitx_output_exponent_tl
+\cs_new_protected:Npn \__siunitx_number_format_final_exponent: {
+ \prop_get:NnN \l__siunitx_number_out_prop { exponent }
+ \l__siunitx_tmpa_tl
+ \tl_if_empty:NTF \l__siunitx_output_exponent_tl
{
- \tl_set:Nx \l_siunitx_tmpa_tl
- { ^ { \exp_not:V \l_siunitx_tmpa_tl } }
- \tl_put_left:NV \l_siunitx_tmpa_tl \l_siunitx_exponent_base_tl
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { ^ { \exp_not:V \l__siunitx_tmpa_tl } }
+ \tl_put_left:NV \l__siunitx_tmpa_tl \l__siunitx_exponent_base_tl
}
{
- \tl_set:Nx \l_siunitx_tmpa_tl
+ \tl_set:Nx \l__siunitx_tmpa_tl
{
- \exp_not:V \l_siunitx_output_exponent_tl
- { \exp_not:V \l_siunitx_tmpa_tl }
+ \exp_not:V \l__siunitx_output_exponent_tl
+ { \exp_not:V \l__siunitx_tmpa_tl }
}
}
- \prop_put:NnV \l_siunitx_number_out_prop { exponent-result }
- \l_siunitx_tmpa_tl
+ \prop_put:NnV \l__siunitx_number_out_prop { exponent-result }
+ \l__siunitx_tmpa_tl
}
\cs_new_protected:Npn
- \siunitx_number_format_final_exponent_only: {
- \prop_get:NnNT \l_siunitx_number_in_prop { mantissa-sign }
- \l_siunitx_tmpa_tl
+ \__siunitx_number_format_final_exponent_only: {
+ \prop_get:NnNT \l__siunitx_number_in_prop { mantissa-sign }
+ \l__siunitx_tmpa_tl
{
- \bool_if:NT \l_siunitx_tight_bool
+ \bool_if:NT \l__siunitx_tight_bool
{
- \tl_set:Nx \l_siunitx_tmpa_tl
- { { \exp_not:V \l_siunitx_tmpa_tl } }
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { { \exp_not:V \l__siunitx_tmpa_tl } }
}
- \prop_get:NnN \l_siunitx_number_out_prop { exponent-result }
- \l_siunitx_tmpb_tl
- \siunitx_tl_put_left_math:NV \l_siunitx_tmpb_tl
- \l_siunitx_tmpa_tl
- \prop_put:NnV \l_siunitx_number_out_prop { exponent-result }
- \l_siunitx_tmpb_tl
- }
- \siunitx_number_format_copy:nn { exponent-result } { result }
-}
-\cs_new_protected:Npn \siunitx_number_format_group:n #1 {
- \siunitx_number_format_group_aux:nn {#1} { integer }
- \siunitx_number_format_group_aux:nn {#1} { decimal }
- \prop_if_in:NnTF \l_siunitx_number_out_prop { #1 -integer }
- { \siunitx_number_format_copy:nn { #1 -integer } {#1} }
- { \tl_clear:N \l_siunitx_tmpa_tl }
- \prop_get:NnNT \l_siunitx_number_in_prop { #1 -decimal-marker }
- \l_siunitx_tmpb_tl
- {
- \bool_if:NTF \l_siunitx_output_decimal_copy_bool
- { \tl_set:Nx \l_siunitx_tmpb_tl { { \l_siunitx_tmpb_tl } } }
+ \prop_get:NnN \l__siunitx_number_out_prop { exponent-result }
+ \l__siunitx_tmpb_tl
+ \__siunitx_tl_put_left_math:NV \l__siunitx_tmpb_tl
+ \l__siunitx_tmpa_tl
+ \prop_put:NnV \l__siunitx_number_out_prop { exponent-result }
+ \l__siunitx_tmpb_tl
+ }
+ \__siunitx_number_format_copy:nn { exponent-result } { result }
+}
+\cs_new_protected:Npn \__siunitx_number_format_group:n #1 {
+ \__siunitx_number_format_group_aux:nn {#1} { integer }
+ \__siunitx_number_format_group_aux:nn {#1} { decimal }
+ \prop_if_in:NnTF \l__siunitx_number_out_prop { #1 -integer }
+ { \__siunitx_number_format_copy:nn { #1 -integer } {#1} }
+ { \tl_clear:N \l__siunitx_tmpa_tl }
+ \prop_get:NnNT \l__siunitx_number_in_prop { #1 -decimal-marker }
+ \l__siunitx_tmpb_tl
+ {
+ \bool_if:NTF \l__siunitx_output_decimal_copy_bool
+ { \tl_set:Nx \l__siunitx_tmpb_tl { { \l__siunitx_tmpb_tl } } }
{
- \tl_set_eq:NN \l_siunitx_tmpb_tl
- \l_siunitx_output_decimal_tl
+ \tl_set_eq:NN \l__siunitx_tmpb_tl
+ \l__siunitx_output_decimal_tl
}
- \tl_put_right:NV \l_siunitx_tmpa_tl \l_siunitx_tmpb_tl
- \prop_put:NnV \l_siunitx_number_out_prop { #1 -decimal-marker }
- \l_siunitx_tmpb_tl
- \prop_get:NnNF \l_siunitx_number_out_prop { #1 -decimal }
- \l_siunitx_tmpb_tl
- { \tl_clear:N \l_siunitx_tmpb_tl }
- \tl_put_right:NV \l_siunitx_tmpa_tl \l_siunitx_tmpb_tl
- \prop_put:NnV \l_siunitx_number_out_prop {#1} \l_siunitx_tmpa_tl
+ \tl_put_right:NV \l__siunitx_tmpa_tl \l__siunitx_tmpb_tl
+ \prop_put:NnV \l__siunitx_number_out_prop { #1 -decimal-marker }
+ \l__siunitx_tmpb_tl
+ \prop_get:NnNF \l__siunitx_number_out_prop { #1 -decimal }
+ \l__siunitx_tmpb_tl
+ { \tl_clear:N \l__siunitx_tmpb_tl }
+ \tl_put_right:NV \l__siunitx_tmpa_tl \l__siunitx_tmpb_tl
+ \prop_put:NnV \l__siunitx_number_out_prop {#1} \l__siunitx_tmpa_tl
}
}
-\cs_new_protected:Npn \siunitx_number_format_group_aux:nn #1#2 {
- \prop_if_in:NnT \l_siunitx_number_in_prop { #1 - #2 }
+\cs_new_protected:Npn \__siunitx_number_format_group_aux:nn #1#2 {
+ \prop_if_in:NnT \l__siunitx_number_in_prop { #1 - #2 }
{
- \bool_if:cTF { l_siunitx_group_ #2 _bool }
- { \siunitx_number_format_group:nn {#1} {#2} }
- { \siunitx_number_format_copy:n { #1 - #2 } }
+ \bool_if:cTF { l__siunitx_group_ #2 _bool }
+ { \__siunitx_number_format_group:nn {#1} {#2} }
+ { \__siunitx_number_format_copy:n { #1 - #2 } }
}
}
-\cs_new_protected:Npn \siunitx_number_format_group:nn #1#2
+\cs_new_protected:Npn \__siunitx_number_format_group:nn #1#2
{
- \prop_get:NnN \l_siunitx_number_in_prop { #1 - #2 } \l_siunitx_tmpa_tl
+ \prop_get:NnN \l__siunitx_number_in_prop { #1 - #2 } \l__siunitx_tmpa_tl
\int_compare:nNnTF
- { \tl_length:N \l_siunitx_tmpa_tl } < \l_siunitx_group_min_int
- { \siunitx_number_format_copy:n { #1 - #2 } }
+ { \tl_length:N \l__siunitx_tmpa_tl } < \l__siunitx_group_min_int
+ { \__siunitx_number_format_copy:n { #1 - #2 } }
{
- \tl_clear:N \l_siunitx_tmpb_tl
- \use:c { siunitx_number_format_group_ #2 : }
- \prop_put:NnV \l_siunitx_number_out_prop { #1 - #2 } \l_siunitx_tmpb_tl
+ \tl_clear:N \l__siunitx_tmpb_tl
+ \use:c { __siunitx_number_format_group_ #2 : }
+ \prop_put:NnV \l__siunitx_number_out_prop { #1 - #2 } \l__siunitx_tmpb_tl
}
}
-\cs_new_protected:Npn \siunitx_number_format_group_decimal: {
- \tl_if_empty:NF \l_siunitx_tmpa_tl
+\cs_new_protected:Npn \__siunitx_number_format_group_decimal: {
+ \tl_if_empty:NF \l__siunitx_tmpa_tl
{
- \exp_after:wN \siunitx_number_format_group_decimal_aux:NNNN
- \l_siunitx_tmpa_tl { } { } { }
+ \exp_after:wN \__siunitx_number_format_group_decimal_aux:NNNN
+ \l__siunitx_tmpa_tl { } { } { }
}
}
-\cs_new_protected:Npn \siunitx_number_format_group_decimal_aux:NNNN
+\cs_new_protected:Npn \__siunitx_number_format_group_decimal_aux:NNNN
#1#2#3#4 {
\tl_if_empty:nTF {#2}
- { \tl_put_right:Nn \l_siunitx_tmpb_tl {#1} }
+ { \tl_put_right:Nn \l__siunitx_tmpb_tl {#1} }
{
\tl_if_empty:nTF {#3}
- { \tl_put_right:Nn \l_siunitx_tmpb_tl { #1 #2 } }
+ { \tl_put_right:Nn \l__siunitx_tmpb_tl { #1 #2 } }
{
- \tl_put_right:Nn \l_siunitx_tmpb_tl { #1 #2 #3 }
+ \tl_put_right:Nn \l__siunitx_tmpb_tl { #1 #2 #3 }
\tl_if_empty:nF {#4}
{
- \tl_put_right:NV \l_siunitx_tmpb_tl \l_siunitx_group_sep_tl
- \siunitx_number_format_group_decimal_aux:NNNN #4
+ \tl_put_right:NV \l__siunitx_tmpb_tl \l__siunitx_group_sep_tl
+ \__siunitx_number_format_group_decimal_aux:NNNN #4
}
}
}
}
-\cs_new_protected:Npn \siunitx_number_format_group_integer: {
- \tl_if_empty:NF \l_siunitx_tmpa_tl
+\cs_new_protected:Npn \__siunitx_number_format_group_integer: {
+ \tl_if_empty:NF \l__siunitx_tmpa_tl
{
- \siunitx_number_format_group_integer_setup:V \l_siunitx_tmpa_tl
+ \__siunitx_number_format_group_integer_setup:V \l__siunitx_tmpa_tl
}
}
-\cs_new_protected:Npn \siunitx_number_format_group_integer_setup:n #1 {
- \siunitx_number_format_group_integer_setup_aux:NNNN
+\cs_new_protected:Npn \__siunitx_number_format_group_integer_setup:n #1 {
+ \__siunitx_number_format_group_integer_setup_aux:NNNN
{ } #1 { } { } { }
}
-\cs_generate_variant:Nn \siunitx_number_format_group_integer_setup:n
+\cs_generate_variant:Nn \__siunitx_number_format_group_integer_setup:n
{ V }
\cs_new_protected:Npn
- \siunitx_number_format_group_integer_setup_aux:NNNN #1#2#3#4 {
+ \__siunitx_number_format_group_integer_setup_aux:NNNN #1#2#3#4 {
\tl_if_empty:nTF {#2}
- { \siunitx_number_format_group_integer_aux:NNNN #1 \q_nil }
+ { \__siunitx_number_format_group_integer_aux:NNNN #1 \q_nil }
{
\tl_if_empty:nTF {#3}
{
- \siunitx_number_format_group_integer_aux:NNNN { } { } #1#2
+ \__siunitx_number_format_group_integer_aux:NNNN { } { } #1#2
\q_nil
}
{
\tl_if_empty:nTF {#4}
{
- \siunitx_number_format_group_integer_aux:NNNN { } #1#2#3
+ \__siunitx_number_format_group_integer_aux:NNNN { } #1#2#3
\q_nil
}
{
- \siunitx_number_format_group_integer_setup_aux:NNNN
+ \__siunitx_number_format_group_integer_setup_aux:NNNN
{#1#2#3#4}
}
}
}
}
\cs_new_protected:Npn
- \siunitx_number_format_group_integer_aux:NNNN #1#2#3#4 {
- \tl_put_right:Nn \l_siunitx_tmpb_tl {#1#2#3}
+ \__siunitx_number_format_group_integer_aux:NNNN #1#2#3#4 {
+ \tl_put_right:Nn \l__siunitx_tmpb_tl {#1#2#3}
\quark_if_nil:nF {#4}
{
- \tl_put_right:NV \l_siunitx_tmpb_tl \l_siunitx_group_sep_tl
- \siunitx_number_format_group_integer_aux:NNNN #4
+ \tl_put_right:NV \l__siunitx_tmpb_tl \l__siunitx_group_sep_tl
+ \__siunitx_number_format_group_integer_aux:NNNN #4
}
}
-\cs_new_protected:Npn \siunitx_number_format_join_complex: {
- \siunitx_number_format_sign_complex:
- \prop_if_in:NnT \l_siunitx_number_out_prop { mantissa }
+\cs_new_protected:Npn \__siunitx_number_format_join_complex: {
+ \__siunitx_number_format_sign_complex:
+ \prop_if_in:NnT \l__siunitx_number_out_prop { mantissa }
{
- \siunitx_number_format_brackets:n { mantissa }
- \prop_get:NnN \l_siunitx_number_out_prop { mantissa-result }
- \l_siunitx_tmpa_tl
- \prop_get:NnNF \l_siunitx_number_out_prop { complex-result }
- \l_siunitx_tmpb_tl
+ \__siunitx_number_format_brackets:n { mantissa }
+ \prop_get:NnN \l__siunitx_number_out_prop { mantissa-result }
+ \l__siunitx_tmpa_tl
+ \prop_get:NnNF \l__siunitx_number_out_prop { complex-result }
+ \l__siunitx_tmpb_tl
{
- \prop_get:NnN \l_siunitx_number_out_prop { complex }
- \l_siunitx_tmpb_tl
+ \prop_get:NnN \l__siunitx_number_out_prop { complex }
+ \l__siunitx_tmpb_tl
}
- \tl_put_right:NV \l_siunitx_tmpa_tl \l_siunitx_tmpb_tl
- \prop_put:NnV \l_siunitx_number_out_prop { mantissa-result }
- \l_siunitx_tmpa_tl
- \prop_put:Nnn \l_siunitx_number_out_prop { mantissa-bracket }
+ \tl_put_right:NV \l__siunitx_tmpa_tl \l__siunitx_tmpb_tl
+ \prop_put:NnV \l__siunitx_number_out_prop { mantissa-result }
+ \l__siunitx_tmpa_tl
+ \prop_put:Nnn \l__siunitx_number_out_prop { mantissa-bracket }
{ true }
}
}
-\cs_new_protected:Npn \siunitx_number_format_join_uncert: {
- \siunitx_number_format_join_uncert:n { mantissa }
- \siunitx_number_format_join_uncert:n { complex }
+\cs_new_protected:Npn \__siunitx_number_format_join_uncert: {
+ \__siunitx_number_format_join_uncert:n { mantissa }
+ \__siunitx_number_format_join_uncert:n { complex }
}
-\cs_new_protected:Npn \siunitx_number_format_join_uncert:n #1 {
- \prop_get:NnNT \l_siunitx_number_out_prop {#1}
- \l_siunitx_tmpa_tl
+\cs_new_protected:Npn \__siunitx_number_format_join_uncert:n #1 {
+ \prop_get:NnNT \l__siunitx_number_out_prop {#1}
+ \l__siunitx_tmpa_tl
{
- \prop_get:NnNTF \l_siunitx_number_out_prop { #1 -uncertainty }
- \l_siunitx_tmpb_tl
+ \prop_get:NnNTF \l__siunitx_number_out_prop { #1 -uncertainty }
+ \l__siunitx_tmpb_tl
{
- \bool_if:NT \l_siunitx_uncert_sep_bool
- { \siunitx_number_format_join_uncert_pm:N \l_siunitx_tmpb_tl }
- \tl_put_right:NV \l_siunitx_tmpa_tl \l_siunitx_tmpb_tl
- \prop_put:NnV \l_siunitx_number_out_prop { #1 -result }
- \l_siunitx_tmpa_tl
- \prop_put:Nnn \l_siunitx_number_out_prop { #1 -bracket }
+ \bool_if:NT \l__siunitx_uncert_sep_bool
+ { \__siunitx_number_format_join_uncert_pm:N \l__siunitx_tmpb_tl }
+ \tl_put_right:NV \l__siunitx_tmpa_tl \l__siunitx_tmpb_tl
+ \prop_put:NnV \l__siunitx_number_out_prop { #1 -result }
+ \l__siunitx_tmpa_tl
+ \prop_put:Nnn \l__siunitx_number_out_prop { #1 -bracket }
{ true }
}
- { \siunitx_number_format_copy:nn {#1} { #1 -result } }
+ { \__siunitx_number_format_copy:nn {#1} { #1 -result } }
}
}
-\cs_new_protected:Npn \siunitx_number_format_join_uncert_pm:N #1
+\cs_new_protected:Npn \__siunitx_number_format_join_uncert_pm:N #1
{
- \bool_if:NTF \l_siunitx_tight_bool
+ \bool_if:NTF \l__siunitx_tight_bool
{ \tl_put_left:Nn #1 { \ensuremath { { \pm } } } }
{ \tl_put_left:Nn #1 { \ensuremath { { } \pm { } } } }
}
-\cs_new_protected:Npn \siunitx_number_format_reassemble: {
- \prop_if_in:NnT \l_siunitx_number_in_prop { mantissa }
+\cs_new_protected:Npn \__siunitx_number_format_reassemble: {
+ \prop_if_in:NnT \l__siunitx_number_in_prop { mantissa }
{
- \siunitx_number_format_group:n { mantissa }
- \siunitx_number_format_uncertainty:n { mantissa }
+ \__siunitx_number_format_group:n { mantissa }
+ \__siunitx_number_format_uncertainty:n { mantissa }
}
- \prop_if_in:NnT \l_siunitx_number_in_prop { complex }
+ \prop_if_in:NnT \l__siunitx_number_in_prop { complex }
{
- \siunitx_number_format_group:n { complex }
- \siunitx_number_format_uncertainty:n { complex }
+ \__siunitx_number_format_group:n { complex }
+ \__siunitx_number_format_uncertainty:n { complex }
}
- \prop_if_in:NnT \l_siunitx_number_in_prop { exponent }
- { \siunitx_number_format_group:n { exponent } }
+ \prop_if_in:NnT \l__siunitx_number_in_prop { exponent }
+ { \__siunitx_number_format_group:n { exponent } }
}
-\cs_new_protected:Npn \siunitx_number_format_relation: {
- \prop_get:NnNT \l_siunitx_number_in_prop { comparator }
- \l_siunitx_tmpa_tl
+\cs_new_protected:Npn \__siunitx_number_format_relation: {
+ \prop_get:NnNT \l__siunitx_number_in_prop { comparator }
+ \l__siunitx_tmpa_tl
{
- \tl_set:Nx \l_siunitx_tmpa_tl
+ \tl_set:Nx \l__siunitx_tmpa_tl
{
\exp_not:N \ensuremath
- { \exp_not:V \l_siunitx_tmpa_tl }
+ { \exp_not:V \l__siunitx_tmpa_tl }
}
- \prop_put:NnV \l_siunitx_number_out_prop { comparator }
- \l_siunitx_tmpa_tl
+ \prop_put:NnV \l__siunitx_number_out_prop { comparator }
+ \l__siunitx_tmpa_tl
}
}
-\cs_new_protected:Npn \siunitx_number_format_sign:n #1 {
- \prop_if_in:NnT \l_siunitx_number_out_prop {#1}
+\cs_new_protected:Npn \__siunitx_number_format_sign:n #1 {
+ \prop_if_in:NnT \l__siunitx_number_out_prop {#1}
{
- \prop_get:NnNT \l_siunitx_number_in_prop { #1 -sign }
- \l_siunitx_tmpa_tl
+ \prop_get:NnNT \l__siunitx_number_in_prop { #1 -sign }
+ \l__siunitx_tmpa_tl
{
- \bool_if:NTF \l_siunitx_negative_bracket_bool
+ \bool_if:NTF \l__siunitx_negative_bracket_bool
{
- \str_if_eq:VnTF \l_siunitx_tmpa_tl { - }
- { \siunitx_number_format_sign_negative_brackets:n {#1} }
- { \siunitx_number_format_sign_aux:n {#1} }
+ \str_if_eq:VnTF \l__siunitx_tmpa_tl { - }
+ { \__siunitx_number_format_sign_negative_brackets:n {#1} }
+ { \__siunitx_number_format_sign_aux:n {#1} }
}
- { \siunitx_number_format_sign_aux:n {#1} }
+ { \__siunitx_number_format_sign_aux:n {#1} }
}
}
}
-\cs_new_protected:Npn \siunitx_number_format_sign_aux:n #1 {
- \bool_if:NT \l_siunitx_tight_bool
+\cs_new_protected:Npn \__siunitx_number_format_sign_aux:n #1 {
+ \bool_if:NT \l__siunitx_tight_bool
{
- \tl_set:Nx \l_siunitx_tmpa_tl
- { { \exp_not:V \l_siunitx_tmpa_tl } }
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { { \exp_not:V \l__siunitx_tmpa_tl } }
}
- \tl_clear:N \l_siunitx_tmpb_tl
- \tl_put_left:NV \l_siunitx_tmpb_tl \l_siunitx_tmpa_tl
- \prop_put:NnV \l_siunitx_number_out_prop { #1 -sign }
- \l_siunitx_tmpb_tl
- \prop_get:NnN \l_siunitx_number_out_prop {#1} \l_siunitx_tmpa_tl
- \tl_put_left:NV \l_siunitx_tmpa_tl \l_siunitx_tmpb_tl
- \prop_put:NnV \l_siunitx_number_out_prop {#1} \l_siunitx_tmpa_tl
- \prop_get:NnNT \l_siunitx_number_out_prop { #1 -result }
- \l_siunitx_tmpa_tl
+ \tl_clear:N \l__siunitx_tmpb_tl
+ \tl_put_left:NV \l__siunitx_tmpb_tl \l__siunitx_tmpa_tl
+ \prop_put:NnV \l__siunitx_number_out_prop { #1 -sign }
+ \l__siunitx_tmpb_tl
+ \prop_get:NnN \l__siunitx_number_out_prop {#1} \l__siunitx_tmpa_tl
+ \tl_put_left:NV \l__siunitx_tmpa_tl \l__siunitx_tmpb_tl
+ \prop_put:NnV \l__siunitx_number_out_prop {#1} \l__siunitx_tmpa_tl
+ \prop_get:NnNT \l__siunitx_number_out_prop { #1 -result }
+ \l__siunitx_tmpa_tl
{
- \tl_put_left:NV \l_siunitx_tmpa_tl \l_siunitx_tmpb_tl
- \prop_put:NnV \l_siunitx_number_out_prop { #1 -result }
- \l_siunitx_tmpa_tl
+ \tl_put_left:NV \l__siunitx_tmpa_tl \l__siunitx_tmpb_tl
+ \prop_put:NnV \l__siunitx_number_out_prop { #1 -result }
+ \l__siunitx_tmpa_tl
}
}
\cs_new_protected:Npn
- \siunitx_number_format_sign_negative_brackets:n #1
+ \__siunitx_number_format_sign_negative_brackets:n #1
{
- \siunitx_number_format_brackets_aux:n {#1}
- \prop_get:NnNT \l_siunitx_number_out_prop { #1 }
- \l_siunitx_tmpa_tl
+ \__siunitx_number_format_brackets_aux:n {#1}
+ \prop_get:NnNT \l__siunitx_number_out_prop { #1 }
+ \l__siunitx_tmpa_tl
{
- \tl_put_left:NV \l_siunitx_tmpa_tl \l_siunitx_bracket_open_tl
- \tl_put_right:NV \l_siunitx_tmpa_tl \l_siunitx_bracket_close_tl
- \prop_put:NnV \l_siunitx_number_out_prop { #1 }
- \l_siunitx_tmpa_tl
+ \tl_put_left:NV \l__siunitx_tmpa_tl \l__siunitx_bracket_open_tl
+ \tl_put_right:NV \l__siunitx_tmpa_tl \l__siunitx_bracket_close_tl
+ \prop_put:NnV \l__siunitx_number_out_prop { #1 }
+ \l__siunitx_tmpa_tl
}
}
-\cs_new_protected:Npn \siunitx_number_format_sign_complex: {
- \siunitx_number_format_sign_complex:n { complex }
- \siunitx_number_format_sign_complex:n { complex-result }
+\cs_new_protected:Npn \__siunitx_number_format_sign_complex: {
+ \__siunitx_number_format_sign_complex:n { complex }
+ \__siunitx_number_format_sign_complex:n { complex-result }
}
-\cs_new_protected:Npn \siunitx_number_format_sign_complex:n #1 {
- \prop_if_in:NnT \l_siunitx_number_out_prop {#1}
+\cs_new_protected:Npn \__siunitx_number_format_sign_complex:n #1 {
+ \prop_if_in:NnT \l__siunitx_number_out_prop {#1}
{
- \prop_get:NnNT \l_siunitx_number_in_prop { complex-sign }
- \l_siunitx_tmpa_tl
+ \prop_get:NnNT \l__siunitx_number_in_prop { complex-sign }
+ \l__siunitx_tmpa_tl
{
- \bool_if:NTF \l_siunitx_tight_bool
+ \bool_if:NTF \l__siunitx_tight_bool
{
- \tl_set:Nx \l_siunitx_tmpa_tl
- { { \exp_not:V \l_siunitx_tmpa_tl } }
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { { \exp_not:V \l__siunitx_tmpa_tl } }
}
{
- \prop_if_in:NnT \l_siunitx_number_out_prop { mantissa }
+ \prop_if_in:NnT \l__siunitx_number_out_prop { mantissa }
{
- \tl_set:Nx \l_siunitx_tmpa_tl
- { { } \exp_not:V \l_siunitx_tmpa_tl { } }
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { { } \exp_not:V \l__siunitx_tmpa_tl { } }
}
}
- \tl_clear:N \l_siunitx_tmpb_tl
- \tl_put_left:NV \l_siunitx_tmpb_tl \l_siunitx_tmpa_tl
- \prop_put:NnV \l_siunitx_number_out_prop { complex-sign }
- \l_siunitx_tmpb_tl
- \prop_get:NnN \l_siunitx_number_out_prop {#1}
- \l_siunitx_tmpa_tl
- \tl_put_left:NV \l_siunitx_tmpa_tl \l_siunitx_tmpb_tl
- \prop_put:NnV \l_siunitx_number_out_prop {#1}
- \l_siunitx_tmpa_tl
+ \tl_clear:N \l__siunitx_tmpb_tl
+ \tl_put_left:NV \l__siunitx_tmpb_tl \l__siunitx_tmpa_tl
+ \prop_put:NnV \l__siunitx_number_out_prop { complex-sign }
+ \l__siunitx_tmpb_tl
+ \prop_get:NnN \l__siunitx_number_out_prop {#1}
+ \l__siunitx_tmpa_tl
+ \tl_put_left:NV \l__siunitx_tmpa_tl \l__siunitx_tmpb_tl
+ \prop_put:NnV \l__siunitx_number_out_prop {#1}
+ \l__siunitx_tmpa_tl
}
}
}
-\cs_new_protected:Npn \siunitx_number_format_uncertainty:n #1 {
- \prop_if_in:NnTF \l_siunitx_number_in_prop { #1 -uncertainty }
+\cs_new_protected:Npn \__siunitx_number_format_uncertainty:n #1 {
+ \prop_if_in:NnTF \l__siunitx_number_in_prop { #1 -uncertainty }
{
- \bool_if:NTF \l_siunitx_uncert_sep_bool
- { \siunitx_number_format_uncertainty_sep:n {#1} }
- { \siunitx_number_format_uncertainty_joined:n {#1} }
- \siunitx_number_format_join_uncert:
+ \bool_if:NTF \l__siunitx_uncert_sep_bool
+ { \__siunitx_number_format_uncertainty_sep:n {#1} }
+ { \__siunitx_number_format_uncertainty_joined:n {#1} }
+ \__siunitx_number_format_join_uncert:
}
- { \siunitx_number_format_copy:nn {#1} { #1 -result } }
+ { \__siunitx_number_format_copy:nn {#1} { #1 -result } }
}
\cs_new_protected:Npn
- \siunitx_number_format_uncertainty_joined:n #1 {
- \prop_get:NnN \l_siunitx_number_in_prop { #1 -uncertainty }
- \l_siunitx_tmpa_tl
- \prop_del:Nn \l_siunitx_number_in_prop { #1 -uncertainty }
- \tl_put_left:NV \l_siunitx_tmpa_tl \l_siunitx_output_uncert_open_tl
- \tl_put_left:NV \l_siunitx_tmpa_tl \l_siunitx_uncert_sep_tl
- \tl_put_right:NV \l_siunitx_tmpa_tl \l_siunitx_output_uncert_close_tl
- \prop_get:NnN \l_siunitx_number_out_prop {#1} \l_siunitx_tmpb_tl
- \tl_put_right:NV \l_siunitx_tmpb_tl \l_siunitx_tmpa_tl
- \prop_put:NnV \l_siunitx_number_out_prop {#1} \l_siunitx_tmpb_tl
+ \__siunitx_number_format_uncertainty_joined:n #1 {
+ \prop_get:NnN \l__siunitx_number_in_prop { #1 -uncertainty }
+ \l__siunitx_tmpa_tl
+ \prop_del:Nn \l__siunitx_number_in_prop { #1 -uncertainty }
+ \tl_put_left:NV \l__siunitx_tmpa_tl \l__siunitx_output_uncert_open_tl
+ \tl_put_left:NV \l__siunitx_tmpa_tl \l__siunitx_uncert_sep_tl
+ \tl_put_right:NV \l__siunitx_tmpa_tl \l__siunitx_output_uncert_close_tl
+ \prop_get:NnN \l__siunitx_number_out_prop {#1} \l__siunitx_tmpb_tl
+ \tl_put_right:NV \l__siunitx_tmpb_tl \l__siunitx_tmpa_tl
+ \prop_put:NnV \l__siunitx_number_out_prop {#1} \l__siunitx_tmpb_tl
}
\cs_new_protected:Npn
- \siunitx_number_format_uncertainty_sep:n #1 {
- \prop_if_in:NnT \l_siunitx_number_out_prop { #1 -integer }
+ \__siunitx_number_format_uncertainty_sep:n #1 {
+ \prop_if_in:NnT \l__siunitx_number_out_prop { #1 -integer }
{
- \prop_if_in:NnF \l_siunitx_number_out_prop
+ \prop_if_in:NnF \l__siunitx_number_out_prop
{ #1 -uncertainty-integer }
{
- \prop_put:Nnn \l_siunitx_number_out_prop
+ \prop_put:Nnn \l__siunitx_number_out_prop
{ #1 -uncertainty-integer } { 0 }
}
}
- \siunitx_number_format_group:n { #1 -uncertainty }
- \prop_put:NnV \l_siunitx_number_out_prop { #1 -uncertainty }
- \l_siunitx_tmpa_tl
+ \__siunitx_number_format_group:n { #1 -uncertainty }
+ \prop_put:NnV \l__siunitx_number_out_prop { #1 -uncertainty }
+ \l__siunitx_tmpa_tl
}
-\tl_new:N \l_siunitx_number_out_tl
-\tl_new:N \l_siunitx_number_out_saved_tl
-\tl_new:N \l_siunitx_number_fraction_tl
-\bool_new:N \l_siunitx_number_compound_bool
-\tl_new:N \l_siunitx_quotient_mode_tl
-\cs_new_protected:Npn \siunitx_fraction:nn { }
+\tl_new:N \l__siunitx_number_out_tl
+\tl_new:N \l__siunitx_number_out_saved_tl
+\tl_new:N \l__siunitx_number_fraction_tl
+\bool_new:N \l__siunitx_number_compound_bool
+\tl_new:N \l__siunitx_quotient_mode_tl
+\cs_new_protected:Npn \__siunitx_fraction:nn { }
\keys_define:nn { siunitx } {
fraction-function .code:n =
- { \cs_set_eq:NN \siunitx_fraction:nn #1 },
- output-product .tl_set:N = \l_siunitx_output_product_tl,
- output-quotient .tl_set:N = \l_siunitx_output_quotient_tl,
- parse-numbers .bool_set:N = \l_siunitx_number_parse_bool,
+ { \cs_set_eq:NN \__siunitx_fraction:nn #1 },
+ output-product .tl_set:N = \l__siunitx_output_product_tl,
+ output-quotient .tl_set:N = \l__siunitx_output_quotient_tl,
+ parse-numbers .bool_set:N = \l__siunitx_number_parse_bool,
quotient-mode .choice:,
quotient-mode / fraction .code:n =
- { \tl_set:Nn \l_siunitx_quotient_mode_tl { fraction } },
+ { \tl_set:Nn \l__siunitx_quotient_mode_tl { fraction } },
quotient-mode / symbol .code:n =
- { \tl_set:Nn \l_siunitx_quotient_mode_tl { symbol } },
+ { \tl_set:Nn \l__siunitx_quotient_mode_tl { symbol } },
}
\keys_set:nn { siunitx } {
fraction-function = \frac ,
@@ -3481,741 +3481,741 @@
parse-numbers = true ,
quotient-mode = symbol
}
-\cs_new_protected:Npn \siunitx_number_output:n #1 {
- \tl_clear:N \l_siunitx_unit_tl
- \tl_clear:N \l_siunitx_preunit_tl
- \siunitx_combined_output:n {#1}
+\cs_new_protected:Npn \__siunitx_number_output:n #1 {
+ \tl_clear:N \l__siunitx_unit_tl
+ \tl_clear:N \l__siunitx_preunit_tl
+ \__siunitx_combined_output:n {#1}
}
-\cs_generate_variant:Nn \siunitx_number_output:n { V }
-\cs_new_protected:Npn \siunitx_number_output_bracket: {
- \bool_if:NF \l_siunitx_error_bool
+\cs_generate_variant:Nn \__siunitx_number_output:n { V }
+\cs_new_protected:Npn \__siunitx_number_output_bracket: {
+ \bool_if:NF \l__siunitx_error_bool
{
- \bool_if:NT \l_siunitx_number_compound_bool
- { \siunitx_number_format_brackets:n { result } }
+ \bool_if:NT \l__siunitx_number_compound_bool
+ { \__siunitx_number_format_brackets:n { result } }
}
}
-\cs_new_protected:Npn \siunitx_number_output_color: {
- \prop_if_in:NnT \l_siunitx_number_out_prop { color }
+\cs_new_protected:Npn \__siunitx_number_output_color: {
+ \prop_if_in:NnT \l__siunitx_number_out_prop { color }
{
- \prop_get:NnN \l_siunitx_number_out_prop { color }
- \l_siunitx_number_color_tl
+ \prop_get:NnN \l__siunitx_number_out_prop { color }
+ \l__siunitx_number_color_tl
}
}
-\cs_new_protected:Npn \siunitx_number_output_parse:n #1 {
- \siunitx_number_preprocess:n {#1}
- \bool_if:NF \l_siunitx_error_bool
+\cs_new_protected:Npn \__siunitx_number_output_parse:n #1 {
+ \__siunitx_number_preprocess:n {#1}
+ \bool_if:NF \l__siunitx_error_bool
{
- \tl_if_empty:NTF \l_siunitx_number_multi_tl
- { \siunitx_number_output_parse_aux: }
+ \tl_if_empty:NTF \l__siunitx_number_multi_tl
+ { \__siunitx_number_output_parse_aux: }
{
\use:c
- { siunitx_number_output_ \l_siunitx_number_multi_tl : }
+ { __siunitx_number_output_ \l__siunitx_number_multi_tl : }
}
}
}
-\cs_generate_variant:Nn \siunitx_number_output_parse:n { V }
-\cs_new_protected:Npn \siunitx_number_output_parse_aux: {
- \siunitx_number_in_parse:V \l_siunitx_number_arg_tl
- \bool_if:NF \l_siunitx_error_bool
+\cs_generate_variant:Nn \__siunitx_number_output_parse:n { V }
+\cs_new_protected:Npn \__siunitx_number_output_parse_aux: {
+ \__siunitx_number_in_parse:V \l__siunitx_number_arg_tl
+ \bool_if:NF \l__siunitx_error_bool
{
- \siunitx_number_process:
- \siunitx_number_format:
- \siunitx_number_output_color:
- \bool_if:NTF \l_siunitx_brackets_bool
- { \siunitx_number_output_single: }
+ \__siunitx_number_process:
+ \__siunitx_number_format:
+ \__siunitx_number_output_color:
+ \bool_if:NTF \l__siunitx_brackets_bool
+ { \__siunitx_number_output_single: }
{
- \prop_if_in:NnTF \l_siunitx_number_out_prop
+ \prop_if_in:NnTF \l__siunitx_number_out_prop
{ result-bracket }
- { \siunitx_number_output_parts: }
- { \siunitx_number_output_single: }
+ { \__siunitx_number_output_parts: }
+ { \__siunitx_number_output_single: }
}
}
}
-\cs_new_protected:Npn \siunitx_number_output_parts: {
+\cs_new_protected:Npn \__siunitx_number_output_parts: {
\bool_if:nTF
{
- \tl_if_empty_p:N \l_siunitx_pre_unit_tl &&
- \tl_if_empty_p:N \l_siunitx_unit_tl
+ \tl_if_empty_p:N \l__siunitx_pre_unit_tl &&
+ \tl_if_empty_p:N \l__siunitx_unit_tl
}
- { \siunitx_number_output_single: }
- { \siunitx_number_output_parts_aux: }
+ { \__siunitx_number_output_single: }
+ { \__siunitx_number_output_parts_aux: }
}
-\cs_new_protected:Npn \siunitx_number_output_parts_aux: {
- \bool_if:NTF \l_siunitx_multi_repeat_bool
+\cs_new_protected:Npn \__siunitx_number_output_parts_aux: {
+ \bool_if:NTF \l__siunitx_multi_repeat_bool
{
- \prop_if_in:NnT \l_siunitx_number_out_prop { mantissa-result }
+ \prop_if_in:NnT \l__siunitx_number_out_prop { mantissa-result }
{
- \siunitx_number_output_parts_aux:n { mantissa }
- \siunitx_number_output_parts_aux:n { complex }
+ \__siunitx_number_output_parts_aux:n { mantissa }
+ \__siunitx_number_output_parts_aux:n { complex }
}
- \prop_get:NnNT \l_siunitx_number_out_prop { exponent-result }
- \l_siunitx_tmpa_tl
+ \prop_get:NnNT \l__siunitx_number_out_prop { exponent-result }
+ \l__siunitx_tmpa_tl
{
- \prop_if_in:NnT \l_siunitx_number_out_prop { mantissa-result }
+ \prop_if_in:NnT \l__siunitx_number_out_prop { mantissa-result }
{
- \tl_put_left:Nx \l_siunitx_tmpa_tl
+ \tl_put_left:Nx \l__siunitx_tmpa_tl
{
\exp_not:N \ensuremath
{
- \bool_if:NTF \l_siunitx_tight_bool
- { { \exp_not:V \l_siunitx_exponent_product_tl } }
- { { } \exp_not:V \l_siunitx_exponent_product_tl { } }
+ \bool_if:NTF \l__siunitx_tight_bool
+ { { \exp_not:V \l__siunitx_exponent_product_tl } }
+ { { } \exp_not:V \l__siunitx_exponent_product_tl { } }
}
}
- \prop_put:NnV \l_siunitx_number_out_prop { exponent }
- \l_siunitx_tmpa_tl
+ \prop_put:NnV \l__siunitx_number_out_prop { exponent }
+ \l__siunitx_tmpa_tl
}
- \siunitx_number_output_parts_print:n { exponent }
+ \__siunitx_number_output_parts_print:n { exponent }
}
}
- { \siunitx_number_output_single: }
+ { \__siunitx_number_output_single: }
}
-\cs_new_protected:Npn \siunitx_number_output_parts_aux:n #1 {
- \prop_if_in:NnT \l_siunitx_number_out_prop {#1}
- { \siunitx_number_output_parts_print:n {#1} }
- \prop_if_in:NnT \l_siunitx_number_out_prop { #1 -uncertainty }
+\cs_new_protected:Npn \__siunitx_number_output_parts_aux:n #1 {
+ \prop_if_in:NnT \l__siunitx_number_out_prop {#1}
+ { \__siunitx_number_output_parts_print:n {#1} }
+ \prop_if_in:NnT \l__siunitx_number_out_prop { #1 -uncertainty }
{
- \bool_if:NTF \l_siunitx_tight_bool
- { \siunitx_print:nn { number } { \ensuremath { { \pm } } } }
- { \siunitx_print:nn { number } { \ensuremath { { } \pm { } } } }
- \siunitx_number_output_parts_print:n { #1 -uncertainty }
+ \bool_if:NTF \l__siunitx_tight_bool
+ { \__siunitx_print:nn { number } { \ensuremath { { \pm } } } }
+ { \__siunitx_print:nn { number } { \ensuremath { { } \pm { } } } }
+ \__siunitx_number_output_parts_print:n { #1 -uncertainty }
}
}
-\cs_new_protected:Npn \siunitx_number_output_parts_print:n #1 {
- \siunitx_unit_output_pre_print:
- \prop_get:NnN \l_siunitx_number_out_prop {#1} \l_siunitx_tmpa_tl
- \siunitx_print:nV { number } \l_siunitx_tmpa_tl
- \siunitx_unit_output_print:
+\cs_new_protected:Npn \__siunitx_number_output_parts_print:n #1 {
+ \__siunitx_unit_output_pre_print:
+ \prop_get:NnN \l__siunitx_number_out_prop {#1} \l__siunitx_tmpa_tl
+ \__siunitx_print:nV { number } \l__siunitx_tmpa_tl
+ \__siunitx_unit_output_print:
}
-\cs_new_protected:Npn \siunitx_number_output_product: {
- \bool_if:NTF \l_siunitx_product_brackets_bool
+\cs_new_protected:Npn \__siunitx_number_output_product: {
+ \bool_if:NTF \l__siunitx_product_brackets_bool
{
\bool_if:nTF
{
- \tl_if_empty_p:N \l_siunitx_pre_unit_tl &&
- \tl_if_empty_p:N \l_siunitx_unit_tl
+ \tl_if_empty_p:N \l__siunitx_pre_unit_tl &&
+ \tl_if_empty_p:N \l__siunitx_unit_tl
}
- { \siunitx_number_output_product_aux: }
- { \siunitx_number_output_product_brackets: }
+ { \__siunitx_number_output_product_aux: }
+ { \__siunitx_number_output_product_brackets: }
}
{
- \bool_if:NTF \l_siunitx_product_repeat_bool
- { \siunitx_number_output_product_aux: }
+ \bool_if:NTF \l__siunitx_product_repeat_bool
+ { \__siunitx_number_output_product_aux: }
{
- \siunitx_unit_output_pre_print:
- \tl_set_eq:NN \l_siunitx_unit_saved_tl \l_siunitx_unit_tl
- \tl_clear:N \l_siunitx_pre_unit_tl
- \tl_clear:N \l_siunitx_unit_tl
+ \__siunitx_unit_output_pre_print:
+ \tl_set_eq:NN \l__siunitx_unit_saved_tl \l__siunitx_unit_tl
+ \tl_clear:N \l__siunitx_pre_unit_tl
+ \tl_clear:N \l__siunitx_unit_tl
\group_begin:
- \siunitx_number_output_product_aux:
+ \__siunitx_number_output_product_aux:
\group_end:
- \tl_set_eq:NN \l_siunitx_unit_tl \l_siunitx_unit_saved_tl
- \siunitx_unit_output_print:
+ \tl_set_eq:NN \l__siunitx_unit_tl \l__siunitx_unit_saved_tl
+ \__siunitx_unit_output_print:
}
}
}
-\cs_new_protected:Npn \siunitx_number_output_product_brackets: {
- \siunitx_unit_output_pre_print:
- \siunitx_print:nV { number } \l_siunitx_bracket_open_tl
+\cs_new_protected:Npn \__siunitx_number_output_product_brackets: {
+ \__siunitx_unit_output_pre_print:
+ \__siunitx_print:nV { number } \l__siunitx_bracket_open_tl
\nobreak
- \tl_set_eq:NN \l_siunitx_unit_saved_tl \l_siunitx_unit_tl
- \tl_clear:N \l_siunitx_pre_unit_tl
- \tl_clear:N \l_siunitx_unit_tl
- \siunitx_number_output_product_aux:
+ \tl_set_eq:NN \l__siunitx_unit_saved_tl \l__siunitx_unit_tl
+ \tl_clear:N \l__siunitx_pre_unit_tl
+ \tl_clear:N \l__siunitx_unit_tl
+ \__siunitx_number_output_product_aux:
\nobreak
- \tl_set_eq:NN \l_siunitx_unit_tl \l_siunitx_unit_saved_tl
- \siunitx_print:nV { number } \l_siunitx_bracket_close_tl
- \siunitx_unit_output_print:
-}
-\cs_new_protected:Npn \siunitx_number_output_product_aux: {
- \bool_set_true:N \l_siunitx_number_compound_bool
- \siunitx_number_preprocess:V \l_siunitx_number_arg_tl
- \bool_if:NF \l_siunitx_error_bool
- {
- \tl_if_empty:NTF \l_siunitx_number_multi_tl
- { \siunitx_number_output_parse_aux: }
- { \siunitx_number_output_quotient: }
- \tl_if_empty:NF \l_siunitx_number_next_tl
+ \tl_set_eq:NN \l__siunitx_unit_tl \l__siunitx_unit_saved_tl
+ \__siunitx_print:nV { number } \l__siunitx_bracket_close_tl
+ \__siunitx_unit_output_print:
+}
+\cs_new_protected:Npn \__siunitx_number_output_product_aux: {
+ \bool_set_true:N \l__siunitx_number_compound_bool
+ \__siunitx_number_preprocess:V \l__siunitx_number_arg_tl
+ \bool_if:NF \l__siunitx_error_bool
+ {
+ \tl_if_empty:NTF \l__siunitx_number_multi_tl
+ { \__siunitx_number_output_parse_aux: }
+ { \__siunitx_number_output_quotient: }
+ \tl_if_empty:NF \l__siunitx_number_next_tl
{
- \bool_if:NTF \l_siunitx_tight_bool
+ \bool_if:NTF \l__siunitx_tight_bool
{
- \siunitx_print:nn { number }
- { \ensuremath { \l_siunitx_output_product_tl } }
+ \__siunitx_print:nn { number }
+ { \ensuremath { \l__siunitx_output_product_tl } }
}
{
- \siunitx_print:nn { number }
- { \ensuremath { { } \l_siunitx_output_product_tl { } } }
+ \__siunitx_print:nn { number }
+ { \ensuremath { { } \l__siunitx_output_product_tl { } } }
}
- \siunitx_number_output_parse:V \l_siunitx_number_next_tl
+ \__siunitx_number_output_parse:V \l__siunitx_number_next_tl
}
}
}
-\cs_new_protected:Npn \siunitx_number_output_quotient: {
+\cs_new_protected:Npn \__siunitx_number_output_quotient: {
\use:c
- { siunitx_number_output_quotient_ \l_siunitx_quotient_mode_tl : }
-}
-\cs_new_protected:Npn \siunitx_number_output_quotient_fraction: {
- \bool_set_false:N \l_siunitx_number_compound_bool
- \siunitx_number_output_quotient_aux_i:
- \tl_set:Nx \l_siunitx_number_out_tl
- { { \exp_not:V \l_siunitx_number_numerator_tl } }
- \tl_set:Nx \l_siunitx_tmpa_tl
- { { \exp_not:V \l_siunitx_number_denominator_tl } }
- \tl_put_right:NV \l_siunitx_number_out_tl \l_siunitx_tmpa_tl
- \tl_put_left:Nn \l_siunitx_number_out_tl { \siunitx_fraction:nn }
- \tl_set:Nx \l_siunitx_number_out_tl
+ { __siunitx_number_output_quotient_ \l__siunitx_quotient_mode_tl : }
+}
+\cs_new_protected:Npn \__siunitx_number_output_quotient_fraction: {
+ \bool_set_false:N \l__siunitx_number_compound_bool
+ \__siunitx_number_output_quotient_aux_i:
+ \tl_set:Nx \l__siunitx_number_out_tl
+ { { \exp_not:V \l__siunitx_number_numerator_tl } }
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { { \exp_not:V \l__siunitx_number_denominator_tl } }
+ \tl_put_right:NV \l__siunitx_number_out_tl \l__siunitx_tmpa_tl
+ \tl_put_left:Nn \l__siunitx_number_out_tl { \__siunitx_fraction:nn }
+ \tl_set:Nx \l__siunitx_number_out_tl
{
\exp_not:N \ensuremath
- { \exp_not:V \l_siunitx_number_out_tl }
- }
- \siunitx_number_output_single_aux:
-}
-\cs_new_protected:Npn \siunitx_number_output_quotient_symbol: {
- \bool_set_true:N \l_siunitx_number_compound_bool
- \siunitx_number_output_quotient_aux_i:
- \tl_set_eq:NN \l_siunitx_number_out_tl
- \l_siunitx_number_numerator_tl
- \tl_put_right:NV \l_siunitx_number_out_tl \l_siunitx_output_quotient_tl
- \tl_put_right:NV \l_siunitx_number_out_tl
- \l_siunitx_number_denominator_tl
- \siunitx_number_output_single_aux:
-}
-\cs_new_protected:Npn \siunitx_number_output_quotient_aux_i: {
- \siunitx_number_in_parse:V \l_siunitx_number_numerator_tl
- \siunitx_number_output_quotient_aux_ii:
- \siunitx_number_output_color:
- \prop_if_in:NnT \l_siunitx_number_out_prop { complex }
- {
- \prop_if_in:NnT \l_siunitx_number_out_prop { mantissa }
+ { \exp_not:V \l__siunitx_number_out_tl }
+ }
+ \__siunitx_number_output_single_aux:
+}
+\cs_new_protected:Npn \__siunitx_number_output_quotient_symbol: {
+ \bool_set_true:N \l__siunitx_number_compound_bool
+ \__siunitx_number_output_quotient_aux_i:
+ \tl_set_eq:NN \l__siunitx_number_out_tl
+ \l__siunitx_number_numerator_tl
+ \tl_put_right:NV \l__siunitx_number_out_tl \l__siunitx_output_quotient_tl
+ \tl_put_right:NV \l__siunitx_number_out_tl
+ \l__siunitx_number_denominator_tl
+ \__siunitx_number_output_single_aux:
+}
+\cs_new_protected:Npn \__siunitx_number_output_quotient_aux_i: {
+ \__siunitx_number_in_parse:V \l__siunitx_number_numerator_tl
+ \__siunitx_number_output_quotient_aux_ii:
+ \__siunitx_number_output_color:
+ \prop_if_in:NnT \l__siunitx_number_out_prop { complex }
+ {
+ \prop_if_in:NnT \l__siunitx_number_out_prop { mantissa }
{
- \prop_put:Nnn \l_siunitx_number_out_prop
+ \prop_put:Nnn \l__siunitx_number_out_prop
{ result-bracket } { true }
- \siunitx_number_format_brackets:n { result }
+ \__siunitx_number_format_brackets:n { result }
}
}
- \prop_get:NnN \l_siunitx_number_out_prop { result }
- \l_siunitx_number_numerator_tl
- \siunitx_number_in_parse:V \l_siunitx_number_denominator_tl
- \siunitx_number_output_quotient_aux_ii:
- \prop_if_in:NnT \l_siunitx_number_out_prop
+ \prop_get:NnN \l__siunitx_number_out_prop { result }
+ \l__siunitx_number_numerator_tl
+ \__siunitx_number_in_parse:V \l__siunitx_number_denominator_tl
+ \__siunitx_number_output_quotient_aux_ii:
+ \prop_if_in:NnT \l__siunitx_number_out_prop
{ result-bracket-exponent }
{
- \prop_put:Nnn \l_siunitx_number_out_prop { result-bracket }
+ \prop_put:Nnn \l__siunitx_number_out_prop { result-bracket }
{ true }
}
- \siunitx_number_output_bracket:
- \prop_get:NnN \l_siunitx_number_out_prop { result }
- \l_siunitx_number_denominator_tl
+ \__siunitx_number_output_bracket:
+ \prop_get:NnN \l__siunitx_number_out_prop { result }
+ \l__siunitx_number_denominator_tl
}
-\cs_new_protected:Npn \siunitx_number_output_quotient_aux_ii: {
- \siunitx_number_process:
- \siunitx_number_format:
+\cs_new_protected:Npn \__siunitx_number_output_quotient_aux_ii: {
+ \__siunitx_number_process:
+ \__siunitx_number_format:
}
-\cs_new_protected:Npn \siunitx_number_output_single: {
+\cs_new_protected:Npn \__siunitx_number_output_single: {
\bool_if:nF
{
- \tl_if_empty_p:N \l_siunitx_pre_unit_tl &&
- \tl_if_empty_p:N \l_siunitx_unit_tl
- }
- {
- \prop_if_in:NnF \l_siunitx_number_out_prop { exponent }
- { \siunitx_number_format_brackets:n { result } }
- }
- \siunitx_number_output_bracket:
- \prop_get:NnN \l_siunitx_number_out_prop { result }
- \l_siunitx_number_out_tl
- \siunitx_number_output_single_aux:
-}
-\cs_new_protected:Npn \siunitx_number_output_single_aux: {
- \siunitx_unit_output_pre_print:
- \quark_if_no_value:NTF \l_siunitx_number_out_tl
- { \tl_clear:N \l_siunitx_number_unit_product_tl }
- { \siunitx_print:nV { number } \l_siunitx_number_out_tl }
- \siunitx_unit_output_print:
-}
-\bool_new:N \l_siunitx_angle_degree_space_bool
-\bool_new:N \l_siunitx_angle_minute_space_bool
-\box_new:N \l_siunitx_angle_marker_box
-\box_new:N \l_siunitx_angle_unit_box
-\dim_new:N \l_siunitx_angle_marker_dim
-\dim_new:N \l_siunitx_angle_unit_dim
-\prop_new:N \l_siunitx_angle_degree_prop
-\prop_new:N \l_siunitx_angle_minute_prop
-\prop_new:N \l_siunitx_angle_second_prop
+ \tl_if_empty_p:N \l__siunitx_pre_unit_tl &&
+ \tl_if_empty_p:N \l__siunitx_unit_tl
+ }
+ {
+ \prop_if_in:NnF \l__siunitx_number_out_prop { exponent }
+ { \__siunitx_number_format_brackets:n { result } }
+ }
+ \__siunitx_number_output_bracket:
+ \prop_get:NnN \l__siunitx_number_out_prop { result }
+ \l__siunitx_number_out_tl
+ \__siunitx_number_output_single_aux:
+}
+\cs_new_protected:Npn \__siunitx_number_output_single_aux: {
+ \__siunitx_unit_output_pre_print:
+ \quark_if_no_value:NTF \l__siunitx_number_out_tl
+ { \tl_clear:N \l__siunitx_number_unit_product_tl }
+ { \__siunitx_print:nV { number } \l__siunitx_number_out_tl }
+ \__siunitx_unit_output_print:
+}
+\bool_new:N \l__siunitx_angle_degree_space_bool
+\bool_new:N \l__siunitx_angle_minute_space_bool
+\box_new:N \l__siunitx_angle_marker_box
+\box_new:N \l__siunitx_angle_unit_box
+\dim_new:N \l__siunitx_angle_marker_dim
+\dim_new:N \l__siunitx_angle_unit_dim
+\prop_new:N \l__siunitx_angle_degree_prop
+\prop_new:N \l__siunitx_angle_minute_prop
+\prop_new:N \l__siunitx_angle_second_prop
\keys_define:nn { siunitx } {
add-arc-degree-zero .bool_set:N =
- \l_siunitx_angle_degree_zero_bool ,
+ \l__siunitx_angle_degree_zero_bool ,
add-arc-minute-zero .bool_set:N =
- \l_siunitx_angle_minute_zero_bool ,
+ \l__siunitx_angle_minute_zero_bool ,
add-arc-second-zero .bool_set:N =
- \l_siunitx_angle_second_zero_bool ,
+ \l__siunitx_angle_second_zero_bool ,
angle-symbol-over-decimal .bool_set:N =
- \l_siunitx_angle_astronomy_bool ,
+ \l__siunitx_angle_astronomy_bool ,
arc-separator .tl_set:N =
- \l_siunitx_angle_arc_separator_tl ,
+ \l__siunitx_angle_arc_separator_tl ,
number-angle-product .tl_set:N =
- \l_siunitx_angle_unit_product_tl ,
+ \l__siunitx_angle_unit_product_tl ,
number-angle-separator .tl_set:N =
- \l_siunitx_angle_unit_product_tl ,
+ \l__siunitx_angle_unit_product_tl ,
}
-\cs_new_protected:Npn \siunitx_angle_output:nnn #1#2#3 {
- \siunitx_angle_init:
+\cs_new_protected:Npn \__siunitx_angle_output:nnn #1#2#3 {
+ \__siunitx_angle_init:
\IfNoValueTF {#2}
{
- \bool_set_false:N \l_siunitx_angle_minute_zero_bool
- \bool_set_false:N \l_siunitx_angle_second_zero_bool
- \siunitx_angle_output_aux:nnn {#1} { } { }
+ \bool_set_false:N \l__siunitx_angle_minute_zero_bool
+ \bool_set_false:N \l__siunitx_angle_second_zero_bool
+ \__siunitx_angle_output_aux:nnn {#1} { } { }
}
{
\IfNoValueTF {#3}
- { \siunitx_error:nx { invalid-arc-format } { #1 ; #2 } }
- { \siunitx_angle_output_aux:nnn {#1} {#2} {#3} }
+ { \__siunitx_error:nx { invalid-arc-format } { #1 ; #2 } }
+ { \__siunitx_angle_output_aux:nnn {#1} {#2} {#3} }
}
}
-\cs_new_protected:Npn \siunitx_angle_output_aux:nnn #1#2#3 {
+\cs_new_protected:Npn \__siunitx_angle_output_aux:nnn #1#2#3 {
\tl_if_empty:nTF { #1#2#3 }
- { \siunitx_error:n { empty-arc } }
- {
- \bool_if:NTF \l_siunitx_number_parse_bool
- { \siunitx_angle_parse:nnn {#1} {#2} {#3} }
- { \siunitx_angle_direct:nnn {#1} {#2} {#3} }
- }
-}
-\cs_new_protected:Npn \siunitx_angle_init: {
- \bool_set_false:N \l_siunitx_angle_degree_space_bool
- \bool_set_false:N \l_siunitx_angle_minute_space_bool
- \prop_clear:N \l_siunitx_angle_degree_prop
- \prop_clear:N \l_siunitx_angle_minute_prop
- \prop_clear:N \l_siunitx_angle_second_prop
- \tl_clear:N \l_siunitx_preunit_tl
- \tl_set_eq:NN \l_siunitx_number_unit_product_tl
- \l_siunitx_angle_unit_product_tl
- \cs_set_eq:NN \siunitx_number_in_parse_more:N
- \siunitx_number_in_parse_restricted:N
-}
-\cs_new_protected:Npn \siunitx_angle_direct:nnn #1 {
+ { \__siunitx_error:n { empty-arc } }
+ {
+ \bool_if:NTF \l__siunitx_number_parse_bool
+ { \__siunitx_angle_parse:nnn {#1} {#2} {#3} }
+ { \__siunitx_angle_direct:nnn {#1} {#2} {#3} }
+ }
+}
+\cs_new_protected:Npn \__siunitx_angle_init: {
+ \bool_set_false:N \l__siunitx_angle_degree_space_bool
+ \bool_set_false:N \l__siunitx_angle_minute_space_bool
+ \prop_clear:N \l__siunitx_angle_degree_prop
+ \prop_clear:N \l__siunitx_angle_minute_prop
+ \prop_clear:N \l__siunitx_angle_second_prop
+ \tl_clear:N \l__siunitx_preunit_tl
+ \tl_set_eq:NN \l__siunitx_number_unit_product_tl
+ \l__siunitx_angle_unit_product_tl
+ \cs_set_eq:NN \__siunitx_number_in_parse_more:N
+ \__siunitx_number_in_parse_restricted:N
+}
+\cs_new_protected:Npn \__siunitx_angle_direct:nnn #1 {
\tl_if_empty:nTF {#1}
{
- \bool_if:NTF \l_siunitx_angle_degree_zero_bool
- { \siunitx_angle_direct_aux_i:nnn { 0 } }
- { \siunitx_angle_direct_aux_i:nnn { } }
+ \bool_if:NTF \l__siunitx_angle_degree_zero_bool
+ { \__siunitx_angle_direct_aux_i:nnn { 0 } }
+ { \__siunitx_angle_direct_aux_i:nnn { } }
}
- { \siunitx_angle_direct_aux_i:nnn {#1} }
+ { \__siunitx_angle_direct_aux_i:nnn {#1} }
}
-\cs_new_protected:Npn \siunitx_angle_direct_aux_i:nnn #1#2 {
+\cs_new_protected:Npn \__siunitx_angle_direct_aux_i:nnn #1#2 {
\tl_if_empty:nTF {#2}
{
- \bool_if:NTF \l_siunitx_angle_minte_zero_bool
- { \siunitx_angle_direct_aux_ii:nnn {#1} { 0 } }
- { \siunitx_angle_direct_aux_ii:nnn {#1} { } }
+ \bool_if:NTF \l__siunitx_angle_minte_zero_bool
+ { \__siunitx_angle_direct_aux_ii:nnn {#1} { 0 } }
+ { \__siunitx_angle_direct_aux_ii:nnn {#1} { } }
}
- { \siunitx_angle_direct_aux_ii:nnn {#1} {#2} }
+ { \__siunitx_angle_direct_aux_ii:nnn {#1} {#2} }
}
-\cs_new_protected:Npn \siunitx_angle_direct_aux_ii:nnn #1#2#3 {
+\cs_new_protected:Npn \__siunitx_angle_direct_aux_ii:nnn #1#2#3 {
\tl_if_empty:nTF {#3}
{
- \bool_if:NTF \l_siunitx_angle_second_zero_bool
- { \siunitx_angle_direct_aux_iii:nnn {#1} {#2} { 0 } }
- { \siunitx_angle_direct_aux_iii:nnn {#1} {#2} { } }
+ \bool_if:NTF \l__siunitx_angle_second_zero_bool
+ { \__siunitx_angle_direct_aux_iii:nnn {#1} {#2} { 0 } }
+ { \__siunitx_angle_direct_aux_iii:nnn {#1} {#2} { } }
}
- { \siunitx_angle_direct_aux_iii:nnn {#1} {#2} {#3} }
+ { \__siunitx_angle_direct_aux_iii:nnn {#1} {#2} {#3} }
}
-\cs_new_protected:Npn \siunitx_angle_direct_aux_iii:nnn #1#2#3 {
+\cs_new_protected:Npn \__siunitx_angle_direct_aux_iii:nnn #1#2#3 {
\tl_if_empty:nF {#1}
{
\tl_if_empty:nF {#2#3}
- { \bool_set_true:N \l_siunitx_angle_degree_space_bool }
+ { \bool_set_true:N \l__siunitx_angle_degree_space_bool }
}
\tl_if_empty:nF {#2}
{
\tl_if_empty:nF {#3}
- { \bool_set_true:N \l_siunitx_angle_minute_space_bool }
+ { \bool_set_true:N \l__siunitx_angle_minute_space_bool }
}
- \siunitx_angle_print_direct:nnn {#1} {#2} {#3}
+ \__siunitx_angle_print_direct:nnn {#1} {#2} {#3}
}
-\cs_new_protected:Npn \siunitx_angle_parse:nnn #1#2#3 {
- \siunitx_angle_parse_aux:nn {#1} { degree }
- \siunitx_angle_parse_aux:nn {#2} { minute }
- \siunitx_angle_parse_aux:nn {#3} { second }
- \siunitx_angle_check_sign:
- \siunitx_angle_zero_fill:
- \prop_if_empty:NF \l_siunitx_angle_degree_prop
+\cs_new_protected:Npn \__siunitx_angle_parse:nnn #1#2#3 {
+ \__siunitx_angle_parse_aux:nn {#1} { degree }
+ \__siunitx_angle_parse_aux:nn {#2} { minute }
+ \__siunitx_angle_parse_aux:nn {#3} { second }
+ \__siunitx_angle_check_sign:
+ \__siunitx_angle_zero_fill:
+ \prop_if_empty:NF \l__siunitx_angle_degree_prop
{
- \prop_if_empty:NF \l_siunitx_angle_minute_prop
- { \bool_set_true:N \l_siunitx_angle_degree_space_bool }
- \prop_if_empty:NF \l_siunitx_angle_second_prop
- { \bool_set_true:N \l_siunitx_angle_degree_space_bool }
+ \prop_if_empty:NF \l__siunitx_angle_minute_prop
+ { \bool_set_true:N \l__siunitx_angle_degree_space_bool }
+ \prop_if_empty:NF \l__siunitx_angle_second_prop
+ { \bool_set_true:N \l__siunitx_angle_degree_space_bool }
}
- \prop_if_empty:NF \l_siunitx_angle_minute_prop
+ \prop_if_empty:NF \l__siunitx_angle_minute_prop
{
- \prop_if_empty:NF \l_siunitx_angle_second_prop
- { \bool_set_true:N \l_siunitx_angle_minute_space_bool }
+ \prop_if_empty:NF \l__siunitx_angle_second_prop
+ { \bool_set_true:N \l__siunitx_angle_minute_space_bool }
}
- \siunitx_angle_print:
+ \__siunitx_angle_print:
}
-\cs_new_protected:Npn \siunitx_angle_parse_aux:nn #1#2 {
- \prop_clear:N \l_siunitx_number_in_prop
+\cs_new_protected:Npn \__siunitx_angle_parse_aux:nn #1#2 {
+ \prop_clear:N \l__siunitx_number_in_prop
\tl_if_empty:nF {#1}
{
- \siunitx_number_in_init:
- \siunitx_number_in_parse_aux:n {#1}
+ \__siunitx_number_in_init:
+ \__siunitx_number_in_parse_aux:n {#1}
}
- \prop_get:NnNT \l_siunitx_number_in_prop { mantissa-sign-deleted }
- \l_siunitx_tmpa_tl
+ \prop_get:NnNT \l__siunitx_number_in_prop { mantissa-sign-deleted }
+ \l__siunitx_tmpa_tl
{
- \prop_put:NnV \l_siunitx_number_in_prop { mantissa-sign }
- \l_siunitx_tmpa_tl
+ \prop_put:NnV \l__siunitx_number_in_prop { mantissa-sign }
+ \l__siunitx_tmpa_tl
}
- \siunitx_number_process:
- \prop_set_eq:cN { l_siunitx_angle_ #2 _prop }
- \l_siunitx_number_in_prop
+ \__siunitx_number_process:
+ \prop_set_eq:cN { l__siunitx_angle_ #2 _prop }
+ \l__siunitx_number_in_prop
}
-\cs_new_protected:Npn \siunitx_angle_check_sign: {
- \prop_if_empty:NTF \l_siunitx_angle_degree_prop
+\cs_new_protected:Npn \__siunitx_angle_check_sign: {
+ \prop_if_empty:NTF \l__siunitx_angle_degree_prop
{
- \prop_if_empty:NF \l_siunitx_angle_minute_prop
- { \siunitx_angle_check_sign_aux:n { second } }
+ \prop_if_empty:NF \l__siunitx_angle_minute_prop
+ { \__siunitx_angle_check_sign_aux:n { second } }
}
{
- \siunitx_angle_check_sign_aux:n { minute }
- \siunitx_angle_check_sign_aux:n { second }
+ \__siunitx_angle_check_sign_aux:n { minute }
+ \__siunitx_angle_check_sign_aux:n { second }
}
}
-\cs_new_protected:Npn \siunitx_angle_check_sign_aux:n #1 {
- \prop_if_in:cnTF { l_siunitx_angle_ #1 _prop }
+\cs_new_protected:Npn \__siunitx_angle_check_sign_aux:n #1 {
+ \prop_if_in:cnTF { l__siunitx_angle_ #1 _prop }
{ mantissa-sign }
{ \msg_error:nn { siunitx } { bad-arc-sign } }
{
- \prop_if_in:cnT { l_siunitx_angle_ #1 _prop }
+ \prop_if_in:cnT { l__siunitx_angle_ #1 _prop }
{ mantissa-sign-deleted }
{ \msg_error:nn { siunitx } { bad-arc-sign } }
}
}
-\cs_new_protected:Npn \siunitx_angle_zero_fill: {
+\cs_new_protected:Npn \__siunitx_angle_zero_fill: {
\bool_if:nT
{
- \prop_if_empty_p:N \l_siunitx_angle_second_prop &&
- \l_siunitx_angle_second_zero_bool
+ \prop_if_empty_p:N \l__siunitx_angle_second_prop &&
+ \l__siunitx_angle_second_zero_bool
}
{
- \prop_put:Nnn \l_siunitx_angle_second_prop { mantissa }
+ \prop_put:Nnn \l__siunitx_angle_second_prop { mantissa }
{ true }
- \prop_put:Nnn \l_siunitx_angle_second_prop { mantissa-integer }
+ \prop_put:Nnn \l__siunitx_angle_second_prop { mantissa-integer }
{ 0 }
}
\bool_if:nT
{
- \prop_if_empty_p:N \l_siunitx_angle_minute_prop &&
- \l_siunitx_angle_minute_zero_bool
+ \prop_if_empty_p:N \l__siunitx_angle_minute_prop &&
+ \l__siunitx_angle_minute_zero_bool
}
{
- \prop_put:Nnn \l_siunitx_angle_minute_prop { mantissa }
+ \prop_put:Nnn \l__siunitx_angle_minute_prop { mantissa }
{ true }
- \prop_put:Nnn \l_siunitx_angle_minute_prop { mantissa-integer }
+ \prop_put:Nnn \l__siunitx_angle_minute_prop { mantissa-integer }
{ 0 }
- \siunitx_angle_sign_shuffle:nn { second } { minute }
+ \__siunitx_angle_sign_shuffle:nn { second } { minute }
}
\bool_if:nT
{
- \prop_if_empty_p:N \l_siunitx_angle_degree_prop &&
- \l_siunitx_angle_degree_zero_bool
+ \prop_if_empty_p:N \l__siunitx_angle_degree_prop &&
+ \l__siunitx_angle_degree_zero_bool
}
{
- \prop_put:Nnn \l_siunitx_angle_degree_prop { mantissa }
+ \prop_put:Nnn \l__siunitx_angle_degree_prop { mantissa }
{ true }
- \prop_put:Nnn \l_siunitx_angle_degree_prop { mantissa-integer }
+ \prop_put:Nnn \l__siunitx_angle_degree_prop { mantissa-integer }
{ 0 }
- \siunitx_angle_sign_shuffle:nn { second } { degree }
- \siunitx_angle_sign_shuffle:nn { minute } { degree }
+ \__siunitx_angle_sign_shuffle:nn { second } { degree }
+ \__siunitx_angle_sign_shuffle:nn { minute } { degree }
}
}
-\cs_new_protected:Npn \siunitx_angle_sign_shuffle:nn #1#2 {
- \siunitx_angle_sign_shuffle_aux:nnn {#1} {#2} { }
- \siunitx_angle_sign_shuffle_aux:nnn {#1} {#2} { -deleted }
+\cs_new_protected:Npn \__siunitx_angle_sign_shuffle:nn #1#2 {
+ \__siunitx_angle_sign_shuffle_aux:nnn {#1} {#2} { }
+ \__siunitx_angle_sign_shuffle_aux:nnn {#1} {#2} { -deleted }
}
-\cs_new_protected:Npn \siunitx_angle_sign_shuffle_aux:nnn
+\cs_new_protected:Npn \__siunitx_angle_sign_shuffle_aux:nnn
#1#2#3 {
- \prop_get:cnN { l_siunitx_angle_ #1 _prop } { mantissa-sign #3 }
- \l_siunitx_tmpa_tl
- \prop_del:cn { l_siunitx_angle_ #1 _prop } { mantissa-sign #3 }
- \quark_if_no_value:NF \l_siunitx_tmpa_tl
+ \prop_get:cnN { l__siunitx_angle_ #1 _prop } { mantissa-sign #3 }
+ \l__siunitx_tmpa_tl
+ \prop_del:cn { l__siunitx_angle_ #1 _prop } { mantissa-sign #3 }
+ \quark_if_no_value:NF \l__siunitx_tmpa_tl
{
- \prop_put:cnV { l_siunitx_angle_ #2 _prop } { mantissa-sign #3 }
- \l_siunitx_tmpa_tl
+ \prop_put:cnV { l__siunitx_angle_ #2 _prop } { mantissa-sign #3 }
+ \l__siunitx_tmpa_tl
}
}
-\cs_new_protected:Npn \siunitx_angle_print: {
- \siunitx_angle_print_aux:nn { degree } { \SIUnitSymbolDegree }
- \bool_if:NT \l_siunitx_angle_degree_space_bool
+\cs_new_protected:Npn \__siunitx_angle_print: {
+ \__siunitx_angle_print_aux:nn { degree } { \SIUnitSymbolDegree }
+ \bool_if:NT \l__siunitx_angle_degree_space_bool
{
\nobreak
- \l_siunitx_angle_arc_separator_tl
+ \l__siunitx_angle_arc_separator_tl
}
- \siunitx_angle_print_aux:nn { minute } { \SIUnitSymbolArcminute }
- \bool_if:NT \l_siunitx_angle_minute_space_bool
+ \__siunitx_angle_print_aux:nn { minute } { \SIUnitSymbolArcminute }
+ \bool_if:NT \l__siunitx_angle_minute_space_bool
{
\nobreak
- \l_siunitx_angle_arc_separator_tl
+ \l__siunitx_angle_arc_separator_tl
}
- \siunitx_angle_print_aux:nn { second } { \SIUnitSymbolArcsecond }
+ \__siunitx_angle_print_aux:nn { second } { \SIUnitSymbolArcsecond }
}
-\cs_new_protected:Npn \siunitx_angle_print_aux:nn #1#2 {
- \prop_if_empty:cF { l_siunitx_angle_ #1 _prop }
+\cs_new_protected:Npn \__siunitx_angle_print_aux:nn #1#2 {
+ \prop_if_empty:cF { l__siunitx_angle_ #1 _prop }
{
- \prop_set_eq:Nc \l_siunitx_number_in_prop
- { l_siunitx_angle_ #1 _prop }
- \tl_set:Nn \l_siunitx_unit_tl {#2}
- \tl_clear:N \l_siunitx_number_out_tl
- \siunitx_number_format:
- \siunitx_number_output_color:
- \bool_if:NTF \l_siunitx_angle_astronomy_bool
- { \siunitx_angle_print_astronomy: }
- { \siunitx_number_output_single: }
+ \prop_set_eq:Nc \l__siunitx_number_in_prop
+ { l__siunitx_angle_ #1 _prop }
+ \tl_set:Nn \l__siunitx_unit_tl {#2}
+ \tl_clear:N \l__siunitx_number_out_tl
+ \__siunitx_number_format:
+ \__siunitx_number_output_color:
+ \bool_if:NTF \l__siunitx_angle_astronomy_bool
+ { \__siunitx_angle_print_astronomy: }
+ { \__siunitx_number_output_single: }
}
}
-\cs_new_protected:Npn \siunitx_angle_print_astronomy: {
- \prop_if_in:NnTF \l_siunitx_number_in_prop
+\cs_new_protected:Npn \__siunitx_angle_print_astronomy: {
+ \prop_if_in:NnTF \l__siunitx_number_in_prop
{ mantissa-decimal-marker }
- { \siunitx_angle_print_astronomy_aux: }
- { \siunitx_number_output_single: }
+ { \__siunitx_angle_print_astronomy_aux: }
+ { \__siunitx_number_output_single: }
}
-\cs_new_protected:Npn \siunitx_angle_print_astronomy_aux: {
- \prop_get:NnNT \l_siunitx_number_out_prop { mantissa-integer }
- \l_siunitx_tmpa_tl
- { \siunitx_print:nV { number } \l_siunitx_tmpa_tl }
- \hbox_set:Nn \l_siunitx_angle_marker_box
+\cs_new_protected:Npn \__siunitx_angle_print_astronomy_aux: {
+ \prop_get:NnNT \l__siunitx_number_out_prop { mantissa-integer }
+ \l__siunitx_tmpa_tl
+ { \__siunitx_print:nV { number } \l__siunitx_tmpa_tl }
+ \hbox_set:Nn \l__siunitx_angle_marker_box
{
- \siunitx_print:nn { number } { { \l_siunitx_output_decimal_tl } }
+ \__siunitx_print:nn { number } { { \l__siunitx_output_decimal_tl } }
}
- \hbox_set:Nn \l_siunitx_angle_unit_box
+ \hbox_set:Nn \l__siunitx_angle_unit_box
{
- \siunitx_print:nV { unit } \l_siunitx_unit_tl
+ \__siunitx_print:nV { unit } \l__siunitx_unit_tl
\skip_horizontal:n { -\scriptspace }
}
- \siunitx_angle_print_astronomy_aux:n { marker }
- \siunitx_angle_print_astronomy_aux:n { unit }
- \hbox_set:Nn \l_siunitx_angle_marker_box
+ \__siunitx_angle_print_astronomy_aux:n { marker }
+ \__siunitx_angle_print_astronomy_aux:n { unit }
+ \hbox_set:Nn \l__siunitx_angle_marker_box
{
- \box_use:N \l_siunitx_angle_marker_box
- \box_use:N \l_siunitx_angle_unit_box
+ \box_use:N \l__siunitx_angle_marker_box
+ \box_use:N \l__siunitx_angle_unit_box
}
\dim_compare:nNnTF
- { \l_siunitx_angle_marker_dim } > { \l_siunitx_angle_unit_dim }
- { \siunitx_angle_print_astronomy_marker: }
- { \siunitx_angle_print_astronomy_unit: }
- \prop_get:NnNT \l_siunitx_number_out_prop { mantissa-decimal }
- \l_siunitx_tmpa_tl
- { \siunitx_print:nV { number } \l_siunitx_tmpa_tl }
-}
-\cs_new_protected:Npn \siunitx_angle_print_astronomy_aux:n #1 {
- \dim_set:cn { l_siunitx_angle_ #1 _dim }
- { \box_wd:c { l_siunitx_angle_ #1 _box } }
- \hbox_set_to_wd:cnn { l_siunitx_angle_ #1 _box } { \c_zero_skip }
+ { \l__siunitx_angle_marker_dim } > { \l__siunitx_angle_unit_dim }
+ { \__siunitx_angle_print_astronomy_marker: }
+ { \__siunitx_angle_print_astronomy_unit: }
+ \prop_get:NnNT \l__siunitx_number_out_prop { mantissa-decimal }
+ \l__siunitx_tmpa_tl
+ { \__siunitx_print:nV { number } \l__siunitx_tmpa_tl }
+}
+\cs_new_protected:Npn \__siunitx_angle_print_astronomy_aux:n #1 {
+ \dim_set:cn { l__siunitx_angle_ #1 _dim }
+ { \box_wd:c { l__siunitx_angle_ #1 _box } }
+ \hbox_set_to_wd:cnn { l__siunitx_angle_ #1 _box } { \c_zero_skip }
{
\tex_hss:D
- \hbox_unpack:c { l_siunitx_angle_ #1_box }
+ \hbox_unpack:c { l__siunitx_angle_ #1_box }
\tex_hss:D
}
}
-\cs_new_protected:Npn \siunitx_angle_print_astronomy_marker: {
- \hbox_set_to_wd:Nnn \l_siunitx_angle_marker_box
- { \l_siunitx_angle_marker_dim }
+\cs_new_protected:Npn \__siunitx_angle_print_astronomy_marker: {
+ \hbox_set_to_wd:Nnn \l__siunitx_angle_marker_box
+ { \l__siunitx_angle_marker_dim }
{
\tex_hss:D
- \hbox_unpack:N \l_siunitx_angle_marker_box
+ \hbox_unpack:N \l__siunitx_angle_marker_box
\tex_hss:D
}
- \box_use:N \l_siunitx_angle_marker_box
+ \box_use:N \l__siunitx_angle_marker_box
}
-\cs_new_protected:Npn \siunitx_angle_print_astronomy_unit: {
- \hbox_set_to_wd:Nnn \l_siunitx_angle_marker_box
- { \l_siunitx_angle_unit_dim }
+\cs_new_protected:Npn \__siunitx_angle_print_astronomy_unit: {
+ \hbox_set_to_wd:Nnn \l__siunitx_angle_marker_box
+ { \l__siunitx_angle_unit_dim }
{
\tex_hss:D
- \hbox_unpack:N \l_siunitx_angle_marker_box
+ \hbox_unpack:N \l__siunitx_angle_marker_box
\tex_hss:D
}
- \box_use:N \l_siunitx_angle_marker_box
+ \box_use:N \l__siunitx_angle_marker_box
\skip_horizontal:N \scriptspace
}
-\cs_new_protected:Npn \siunitx_angle_print_direct:nnn #1#2#3 {
- \siunitx_angle_print_direct_aux:nn {#1} { \SIUnitSymbolDegree }
- \bool_if:NT \l_siunitx_angle_degree_space_bool
+\cs_new_protected:Npn \__siunitx_angle_print_direct:nnn #1#2#3 {
+ \__siunitx_angle_print_direct_aux:nn {#1} { \SIUnitSymbolDegree }
+ \bool_if:NT \l__siunitx_angle_degree_space_bool
{
\nobreak
- \l_siunitx_angle_arc_separator_tl
+ \l__siunitx_angle_arc_separator_tl
}
- \siunitx_angle_print_direct_aux:nn {#2} { \SIUnitSymbolArcminute }
- \bool_if:NT \l_siunitx_angle_minute_space_bool
+ \__siunitx_angle_print_direct_aux:nn {#2} { \SIUnitSymbolArcminute }
+ \bool_if:NT \l__siunitx_angle_minute_space_bool
{
\nobreak
- \l_siunitx_angle_arc_separator_tl
+ \l__siunitx_angle_arc_separator_tl
}
- \siunitx_angle_print_direct_aux:nn {#3} { \SIUnitSymbolArcsecond }
+ \__siunitx_angle_print_direct_aux:nn {#3} { \SIUnitSymbolArcsecond }
}
-\cs_new_protected:Npn \siunitx_angle_print_direct_aux:nn #1#2 {
+\cs_new_protected:Npn \__siunitx_angle_print_direct_aux:nn #1#2 {
\tl_if_empty:nF {#1}
{
- \tl_set:Nn \l_siunitx_unit_tl {#2}
- \siunitx_print:nn { number } { \ensuremath {#1} }
- \siunitx_unit_output_print:
- }
-}
-\seq_new:N \l_siunitx_declare_list_seq
-\seq_put_right:Nn \l_siunitx_declare_list_seq { \of }
-\seq_put_right:Nn \l_siunitx_declare_list_seq { \highlight }
-\seq_put_right:Nn \l_siunitx_declare_list_seq { \per }
-\seq_put_right:Nn \l_siunitx_declare_list_seq { \raiseto }
-\seq_put_right:Nn \l_siunitx_declare_list_seq { \tothe }
-\cs_new_protected:Npn \siunitx_declare_power_after:Nn #1#2 {
- \seq_put_right:Nn \l_siunitx_declare_list_seq {#1}
- \cs_set:cpn { siunitx_ \token_to_str:N #1 _literal:w }
- { \siunitx_textsuperscript:n {#2} }
- \cs_set:cpn { siunitx_ \token_to_str:N #1 _function:w }
- { \siunitx_unit_parse_power_after:n {#2} }
-}
-\cs_new_protected:Npn \siunitx_declare_power_before:Nn #1#2 {
- \seq_put_right:Nn \l_siunitx_declare_list_seq {#1}
- \cs_set:cpn { siunitx_ \token_to_str:N #1 _literal:w } ##1
- { ##1 \siunitx_textsuperscript:n {#2} }
- \cs_set:cpn { siunitx_ \token_to_str:N #1 _function:w }
- { \siunitx_unit_parse_power_before:n {#2} }
-}
-\cs_new_protected:Npn \siunitx_declare_prefix:Nnnn #1#2#3#4
- {
- \seq_put_right:Nn \l_siunitx_declare_list_seq {#1}
- \prop_put:Nnn \l_siunitx_prefix_forward_prop {#1} {#4}
- \prop_put:Nnn \l_siunitx_prefix_reverse_prop {#4} {#1}
- \cs_set:cpn { siunitx_ \token_to_str:N #1 _literal:w } {#2}
- \cs_set:cpn { siunitx_ \token_to_str:N #1 _function:w }
- {
- \bool_if:NTF \l_siunitx_prefix_symbols_bool
- { \siunitx_unit_parse_prefix:Nn #1 {#2} }
- { \siunitx_unit_parse_prefix:nn {#3} {#4} }
- }
- }
-\prop_new:N \l_siunitx_prefix_forward_prop
-\prop_new:N \l_siunitx_prefix_reverse_prop
-\cs_new_protected:Npn \siunitx_declare_qualifier:Nn #1#2 {
- \seq_put_right:Nn \l_siunitx_declare_list_seq {#1}
- \cs_set:cpn { siunitx_ \token_to_str:N #1 _literal:w }
+ \tl_set:Nn \l__siunitx_unit_tl {#2}
+ \__siunitx_print:nn { number } { \ensuremath {#1} }
+ \__siunitx_unit_output_print:
+ }
+}
+\seq_new:N \l__siunitx_declare_list_seq
+\seq_put_right:Nn \l__siunitx_declare_list_seq { \of }
+\seq_put_right:Nn \l__siunitx_declare_list_seq { \highlight }
+\seq_put_right:Nn \l__siunitx_declare_list_seq { \per }
+\seq_put_right:Nn \l__siunitx_declare_list_seq { \raiseto }
+\seq_put_right:Nn \l__siunitx_declare_list_seq { \tothe }
+\cs_new_protected:Npn \__siunitx_declare_power_after:Nn #1#2 {
+ \seq_put_right:Nn \l__siunitx_declare_list_seq {#1}
+ \cs_set:cpn { __siunitx_ \token_to_str:N #1 _literal:w }
+ { \__siunitx_textsuperscript:n {#2} }
+ \cs_set:cpn { __siunitx_ \token_to_str:N #1 _function:w }
+ { \__siunitx_unit_parse_power_after:n {#2} }
+}
+\cs_new_protected:Npn \__siunitx_declare_power_before:Nn #1#2 {
+ \seq_put_right:Nn \l__siunitx_declare_list_seq {#1}
+ \cs_set:cpn { __siunitx_ \token_to_str:N #1 _literal:w } ##1
+ { ##1 \__siunitx_textsuperscript:n {#2} }
+ \cs_set:cpn { __siunitx_ \token_to_str:N #1 _function:w }
+ { \__siunitx_unit_parse_power_before:n {#2} }
+}
+\cs_new_protected:Npn \__siunitx_declare_prefix:Nnnn #1#2#3#4
+ {
+ \seq_put_right:Nn \l__siunitx_declare_list_seq {#1}
+ \prop_put:Nnn \l__siunitx_prefix_forward_prop {#1} {#4}
+ \prop_put:Nnn \l__siunitx_prefix_reverse_prop {#4} {#1}
+ \cs_set:cpn { __siunitx_ \token_to_str:N #1 _literal:w } {#2}
+ \cs_set:cpn { __siunitx_ \token_to_str:N #1 _function:w }
+ {
+ \bool_if:NTF \l__siunitx_prefix_symbols_bool
+ { \__siunitx_unit_parse_prefix:Nn #1 {#2} }
+ { \__siunitx_unit_parse_prefix:nn {#3} {#4} }
+ }
+ }
+\prop_new:N \l__siunitx_prefix_forward_prop
+\prop_new:N \l__siunitx_prefix_reverse_prop
+\cs_new_protected:Npn \__siunitx_declare_qualifier:Nn #1#2 {
+ \seq_put_right:Nn \l__siunitx_declare_list_seq {#1}
+ \cs_set:cpn { __siunitx_ \token_to_str:N #1 _literal:w }
{ \text { ~ } ( #2 ) }
- \cs_set:cpn { siunitx_ \token_to_str:N #1 _function:w }
- { \siunitx_unit_parse_qualifier:n {#2} }
+ \cs_set:cpn { __siunitx_ \token_to_str:N #1 _function:w }
+ { \__siunitx_unit_parse_qualifier:n {#2} }
}
-\cs_new_protected:Npn \siunitx_declare_unit:Nnn #1#2#3 {
- \seq_put_right:Nn \l_siunitx_declare_list_seq {#1}
- \cs_set:cpn { siunitx_ \token_to_str:N #1 _literal:w } {#2}
- \cs_set_protected:cpn { siunitx_ \token_to_str:N #1 _function:w }
+\cs_new_protected:Npn \__siunitx_declare_unit:Nnn #1#2#3 {
+ \seq_put_right:Nn \l__siunitx_declare_list_seq {#1}
+ \cs_set:cpn { __siunitx_ \token_to_str:N #1 _literal:w } {#2}
+ \cs_set_protected:cpn { __siunitx_ \token_to_str:N #1 _function:w }
{
- \siunitx_unit_if_literal:nTF {#2}
- { \siunitx_unit_parse_unit:Nn #1 {#2} }
+ \__siunitx_unit_if_literal:nTF {#2}
+ { \__siunitx_unit_parse_unit:Nn #1 {#2} }
{#2}
}
\tl_if_empty:nTF {#3}
- { \cs_undefine:c { l_siunitx_ \token_to_str:N #1 _options_tl } }
+ { \cs_undefine:c { l__siunitx_ \token_to_str:N #1 _options_tl } }
{
- \tl_clear_new:c { l_siunitx_ \token_to_str:N #1 _options_tl }
- \tl_set:cn { l_siunitx_ \token_to_str:N #1 _options_tl } {#3}
+ \tl_clear_new:c { l__siunitx_ \token_to_str:N #1 _options_tl }
+ \tl_set:cn { l__siunitx_ \token_to_str:N #1 _options_tl } {#3}
}
}
-\cs_new_protected:Npn \siunitx_unit_first_token:n #1 {
+\cs_new_protected:Npn \__siunitx_unit_first_token:n #1 {
\exp_last_unbraced:No \token_to_str:N { \tl_head:w #1 \q_stop }
}
-\cs_new:cpn { siunitx_ \token_to_str:N \per _literal:w } { / }
-\cs_new_protected:cpn { siunitx_ \token_to_str:N \per _function:w } {
- \bool_set_true:N \l_siunitx_per_bool
- \siunitx_unit_parse_per:
+\cs_new:cpn { __siunitx_ \token_to_str:N \per _literal:w } { / }
+\cs_new_protected:cpn { __siunitx_ \token_to_str:N \per _function:w } {
+ \bool_set_true:N \l__siunitx_per_bool
+ \__siunitx_unit_parse_per:
}
-\cs_new:cpn { siunitx_ \token_to_str:N \raiseto _literal:w } #1#2 {
+\cs_new:cpn { __siunitx_ \token_to_str:N \raiseto _literal:w } #1#2 {
#2
- \siunitx_textsuperscript:n {#1}
+ \__siunitx_textsuperscript:n {#1}
}
-\cs_new_protected:cpn { siunitx_ \token_to_str:N \raiseto _function:w }
+\cs_new_protected:cpn { __siunitx_ \token_to_str:N \raiseto _function:w }
#1 {
- \siunitx_unit_parse_power_before:n {#1}
+ \__siunitx_unit_parse_power_before:n {#1}
}
-\cs_new:cpn { siunitx_ \token_to_str:N \tothe _literal:w } #1 {
- \siunitx_textsuperscript:n {#1}
+\cs_new:cpn { __siunitx_ \token_to_str:N \tothe _literal:w } #1 {
+ \__siunitx_textsuperscript:n {#1}
}
-\cs_new_protected:cpn { siunitx_ \token_to_str:N \tothe _function:w }
+\cs_new_protected:cpn { __siunitx_ \token_to_str:N \tothe _function:w }
#1 {
- \siunitx_unit_parse_power_after:n {#1}
+ \__siunitx_unit_parse_power_after:n {#1}
}
-\cs_new:cpn { siunitx_ \token_to_str:N \of _literal:w } #1 {
+\cs_new:cpn { __siunitx_ \token_to_str:N \of _literal:w } #1 {
\text { ~ } ( #1 )
}
-\cs_new_protected:cpn { siunitx_ \token_to_str:N \of _function:w } #1 {
- \siunitx_unit_parse_qualifier:n {#1}
+\cs_new_protected:cpn { __siunitx_ \token_to_str:N \of _function:w } #1 {
+ \__siunitx_unit_parse_qualifier:n {#1}
}
\AtBeginDocument {
\cs_if_exist:NT \cancel
{
- \cs_set_eq:NN \siunitx_cancel:n \cancel
- \seq_put_right:Nn \l_siunitx_declare_list_seq { \cancel }
+ \cs_set_eq:NN \__siunitx_cancel:n \cancel
+ \seq_put_right:Nn \l__siunitx_declare_list_seq { \cancel }
\cs_new_protected:cpn
- { siunitx_ \token_to_str:N \cancel _function:w }
- { \siunitx_unit_parse_special:n { \siunitx_cancel:n } }
+ { __siunitx_ \token_to_str:N \cancel _function:w }
+ { \__siunitx_unit_parse_special:n { \__siunitx_cancel:n } }
}
}
\cs_new:cpn
- { siunitx_ \token_to_str:N \highlight _literal:w } #1
- { \siunitx_textcolor:n {#1} }
+ { __siunitx_ \token_to_str:N \highlight _literal:w } #1
+ { \__siunitx_textcolor:n {#1} }
\cs_new_protected:cpn
- { siunitx_ \token_to_str:N \highlight _function:w } #1
- { \siunitx_unit_parse_special:n { \siunitx_textcolor:n {#1} } }
+ { __siunitx_ \token_to_str:N \highlight _function:w } #1
+ { \__siunitx_unit_parse_special:n { \__siunitx_textcolor:n {#1} } }
\keys_define:nn { siunitx } {
- free-standing-units .bool_set:N = \l_siunitx_create_free_bool ,
- overwrite-functions .bool_set:N = \l_siunitx_create_overwrite_bool,
- space-before-unit .bool_set:N = \l_siunitx_create_prespace_bool ,
- unit-optional-argument .bool_set:N = \l_siunitx_create_optional_bool ,
- use-xspace .bool_set:N = \l_siunitx_create_xspace_bool ,
+ free-standing-units .bool_set:N = \l__siunitx_create_free_bool ,
+ overwrite-functions .bool_set:N = \l__siunitx_create_overwrite_bool,
+ space-before-unit .bool_set:N = \l__siunitx_create_prespace_bool ,
+ unit-optional-argument .bool_set:N = \l__siunitx_create_optional_bool ,
+ use-xspace .bool_set:N = \l__siunitx_create_xspace_bool ,
}
-\siunitx_option_deactivate:n {
+\__siunitx_option_deactivate:n {
free-standing-units ,
overwrite-functions ,
space-before-unit ,
unit-optional-argument ,
use-xspace ,
}
-\cs_new_protected_nopar:Npn \siunitx_unit_create_empty_functions:
+\cs_new_protected_nopar:Npn \__siunitx_unit_create_empty_functions:
{
- \siunitx_unit_create_functions_aux_i:
- \seq_map_function:NN \l_siunitx_declare_list_seq
- \siunitx_unit_create_empty_functions_aux:N
- \siunitx_unit_create_functions_aux_ii:
+ \__siunitx_unit_create_functions_aux_i:
+ \seq_map_function:NN \l__siunitx_declare_list_seq
+ \__siunitx_unit_create_empty_functions_aux:N
+ \__siunitx_unit_create_functions_aux_ii:
}
-\cs_new_protected:Npn \siunitx_unit_create_empty_functions_aux:N #1
+\cs_new_protected:Npn \__siunitx_unit_create_empty_functions_aux:N #1
{
\cs_if_free:NT #1
{ \cs_set_protected:Npn #1 { \ERROR } }
}
-\cs_new_protected_nopar:Npn \siunitx_unit_create_functions:
+\cs_new_protected_nopar:Npn \__siunitx_unit_create_functions:
{
- \siunitx_unit_create_functions_aux_i:
- \bool_if:NT \l_siunitx_create_overwrite_bool
- { \seq_map_function:NN \l_siunitx_declare_list_seq \cs_undefine:N }
- \bool_if:NTF \l_siunitx_create_optional_bool
+ \__siunitx_unit_create_functions_aux_i:
+ \bool_if:NT \l__siunitx_create_overwrite_bool
+ { \seq_map_function:NN \l__siunitx_declare_list_seq \cs_undefine:N }
+ \bool_if:NTF \l__siunitx_create_optional_bool
{
- \seq_map_function:NN \l_siunitx_declare_list_seq
- \siunitx_unit_create_with_arg:N
+ \seq_map_function:NN \l__siunitx_declare_list_seq
+ \__siunitx_unit_create_with_arg:N
}
{
- \seq_map_function:NN \l_siunitx_declare_list_seq
- \siunitx_unit_create:N
+ \seq_map_function:NN \l__siunitx_declare_list_seq
+ \__siunitx_unit_create:N
}
- \siunitx_unit_create_functions_aux_ii:
- \bool_if:NT \l_siunitx_create_xspace_bool
+ \__siunitx_unit_create_functions_aux_ii:
+ \bool_if:NT \l__siunitx_create_xspace_bool
{ \RequirePackage { xspace } }
}
-\cs_new_protected_nopar:Npn \siunitx_unit_create_functions_aux_i:
+\cs_new_protected_nopar:Npn \__siunitx_unit_create_functions_aux_i:
{
\@ifpackageloaded { soulpos }
{
\@ifpackageloaded { soul }
{ }
{
- \cs_set_protected_nopar:Npn \siunitx_unit_create_functions_aux_ii:
+ \cs_set_protected_nopar:Npn \__siunitx_unit_create_functions_aux_ii:
{
\cs_undefine:N \hl
\cs_undefine:N \ul
@@ -4224,349 +4224,349 @@
}
{ }
}
-\cs_new_protected_nopar:Npn \siunitx_unit_create_functions_aux_ii: { }
-\cs_new_protected:Npn \siunitx_unit_create:N #1 {
+\cs_new_protected_nopar:Npn \__siunitx_unit_create_functions_aux_ii: { }
+\cs_new_protected:Npn \__siunitx_unit_create:N #1 {
\cs_if_free:NT #1
{
- \cs_set:Npx \siunitx_tmp:w
+ \cs_set:Npx \__siunitx_tmp:w
{
\ProvideDocumentCommand \exp_not:N #1 { }
{
\group_begin:
\exp_not:N \cs_if_free:NF
\exp_not:c
- { l_siunitx_ \token_to_str:N #1 _options_tl }
+ { l__siunitx_ \token_to_str:N #1 _options_tl }
{
\keys_set:nV { siunitx }
\exp_not:c
- { l_siunitx_ \token_to_str:N #1 _options_tl }
+ { l__siunitx_ \token_to_str:N #1 _options_tl }
}
- \bool_if:NT \l_siunitx_create_prespace_bool
- { \exp_not:N \l_siunitx_number_unit_product_tl }
- \exp_not:n { \siunitx_unit_output:nn {#1} { } }
+ \bool_if:NT \l__siunitx_create_prespace_bool
+ { \exp_not:N \l__siunitx_number_unit_product_tl }
+ \exp_not:n { \__siunitx_unit_output:nn {#1} { } }
\group_end:
- \bool_if:NT \l_siunitx_create_xspace_bool
+ \bool_if:NT \l__siunitx_create_xspace_bool
{ \exp_not:N \xspace }
}
}
- \siunitx_tmp:w
+ \__siunitx_tmp:w
}
}
-\cs_new_protected:Npn \siunitx_unit_create_with_arg:N #1 {
+\cs_new_protected:Npn \__siunitx_unit_create_with_arg:N #1 {
\cs_if_free:NT #1
{
- \cs_set:Npx \siunitx_tmp:w
+ \cs_set:Npx \__siunitx_tmp:w
{
\ProvideDocumentCommand \exp_not:N #1 { o }
{
\group_begin:
\exp_not:N \cs_if_free:NF
\exp_not:c
- { l_siunitx_ \token_to_str:N #1 _options_tl }
+ { l__siunitx_ \token_to_str:N #1 _options_tl }
{
\keys_set:nV { siunitx }
\exp_not:c
{
- l_siunitx_ \token_to_str:N #1 _options_tl
+ l__siunitx_ \token_to_str:N #1 _options_tl
}
}
\exp_not:N \IfNoValueTF {####1}
{
- \bool_if:NT \l_siunitx_create_prespace_bool
- { \exp_not:N \l_siunitx_number_unit_product_tl }
- \exp_not:n { \siunitx_unit_output:nn {#1} { } }
+ \bool_if:NT \l__siunitx_create_prespace_bool
+ { \exp_not:N \l__siunitx_number_unit_product_tl }
+ \exp_not:n { \__siunitx_unit_output:nn {#1} { } }
}
{ \SI {####1} { \exp_not:N #1 } }
\group_end:
- \bool_if:NT \l_siunitx_create_xspace_bool
+ \bool_if:NT \l__siunitx_create_xspace_bool
{ \exp_not:N \xspace }
}
}
- \siunitx_tmp:w
+ \__siunitx_tmp:w
}
}
\AtBeginDocument {
\cs_if_eq:NNT \color \use_none:n
{ \cs_set_protected:Npn \color #1 { } }
- \cs_set:Npn \siunitx_tmp:w #1 { }
- \cs_if_eq:NNT \color \siunitx_tmp:w
+ \cs_set:Npn \__siunitx_tmp:w #1 { }
+ \cs_if_eq:NNT \color \__siunitx_tmp:w
{ \cs_set_protected:Npn \color #1 { } }
\tl_map_function:nN { \bar \color \ng \pm \array@row@rst }
- \siunitx_protect_symbols:N
+ \__siunitx_protect_symbols:N
}
-\tl_put_right:Nn \document { \siunitx_protect_symbols:N \fg }
-\cs_new_protected:Npn \siunitx_protect_symbols:N #1 {
+\tl_put_right:Nn \document { \__siunitx_protect_symbols:N \fg }
+\cs_new_protected:Npn \__siunitx_protect_symbols:N #1 {
\cs_if_exist:NT #1
{
- \siunitx_cs_if_macro:NT #1
+ \__siunitx_cs_if_macro:NT #1
{ \cs_set_protected:Npx #1 { \exp_not:V #1 } }
}
}
\keys_define:nn { siunitx } {
forbid-literal-units .bool_set:N =
- \l_siunitx_unit_forbid_literal_bool,
- parse-units .bool_set:N = \l_siunitx_unit_parse_bool
+ \l__siunitx_unit_forbid_literal_bool,
+ parse-units .bool_set:N = \l__siunitx_unit_parse_bool
}
\keys_set:nn { siunitx } {
forbid-literal-units = false,
parse-units = true
}
-\cs_new_protected:Npn \siunitx_unit_in:nn #1#2 {
- \bool_if:NTF \l_siunitx_unit_parse_bool
+\cs_new_protected:Npn \__siunitx_unit_in:nn #1#2 {
+ \bool_if:NTF \l__siunitx_unit_parse_bool
{
\tl_if_empty:nF {#1}
{
- \siunitx_unit_if_literal:nTF {#1}
+ \__siunitx_unit_if_literal:nTF {#1}
{
- \tl_clear:N \l_siunitx_per_mode_tl
- \bool_if:NTF \l_siunitx_unit_forbid_literal_bool
+ \tl_clear:N \l__siunitx_per_mode_tl
+ \bool_if:NTF \l__siunitx_unit_forbid_literal_bool
{
\msg_error:nnx { siunitx } { literal-unit }
{ \exp_not:n {#1} }
}
{
- \cs_set_eq:NN \siunitx_pm: \pm
- \siunitx_unit_format_literal:n {#1}
- \cs_set_eq:NN \pm \siunitx_pm:
+ \cs_set_eq:NN \__siunitx_pm: \pm
+ \__siunitx_unit_format_literal:n {#1}
+ \cs_set_eq:NN \pm \__siunitx_pm:
}
}
{
- \cs_set_eq:NN \siunitx_pm: \pm
- \siunitx_unit_parse:nn {#1} {#2}
- \siunitx_unit_format:
- \prop_set_eq:NN \l_siunitx_unit_saved_prop \l_siunitx_unit_prop
- \cs_set_eq:NN \pm \siunitx_pm:
+ \cs_set_eq:NN \__siunitx_pm: \pm
+ \__siunitx_unit_parse:nn {#1} {#2}
+ \__siunitx_unit_format:
+ \prop_set_eq:NN \l__siunitx_unit_saved_prop \l__siunitx_unit_prop
+ \cs_set_eq:NN \pm \__siunitx_pm:
}
}
}
- { \siunitx_unit_format_literal:n {#1} }
+ { \__siunitx_unit_format_literal:n {#1} }
}
-\cs_generate_variant:Nn \siunitx_unit_in:nn { V }
-\cs_new:Npn \siunitx_pm: { }
-\cs_new_protected:Npn \siunitx_unit_if_literal:nTF #1#2#3 {
+\cs_generate_variant:Nn \__siunitx_unit_in:nn { V }
+\cs_new:Npn \__siunitx_pm: { }
+\cs_new_protected:Npn \__siunitx_unit_if_literal:nTF #1#2#3 {
\group_begin:
- \seq_map_function:NN \l_siunitx_declare_list_seq
- \siunitx_unit_if_literal_aux:N
+ \seq_map_function:NN \l__siunitx_declare_list_seq
+ \__siunitx_unit_if_literal_aux:N
\cs_set_eq:NN \of \use_none:n
\cs_set_eq:NN \highlight \use_none:n
\cs_set_eq:NN \raiseto \use_none:n
\cs_set_eq:NN \tothe \use_none:n
- \protected@edef \l_siunitx_tmpa_tl {#1}
+ \protected@edef \l__siunitx_tmpa_tl {#1}
\exp_args:NNNV \group_end:
- \tl_set:Nn \l_siunitx_tmpa_tl \l_siunitx_tmpa_tl
- \tl_if_empty:NTF \l_siunitx_tmpa_tl {#3} {#2}
+ \tl_set:Nn \l__siunitx_tmpa_tl \l__siunitx_tmpa_tl
+ \tl_if_empty:NTF \l__siunitx_tmpa_tl {#3} {#2}
}
-\cs_new_protected:Npn \siunitx_unit_if_literal_aux:N #1 {
+\cs_new_protected:Npn \__siunitx_unit_if_literal_aux:N #1 {
\cs_set_eq:NN #1 \prg_do_nothing:
}
-\int_new:N \l_siunitx_unit_int
-\prop_new:N \l_siunitx_unit_prop
-\prop_new:N \l_siunitx_unit_saved_prop
-\bool_new:N \l_siunitx_per_bool
+\int_new:N \l__siunitx_unit_int
+\prop_new:N \l__siunitx_unit_prop
+\prop_new:N \l__siunitx_unit_saved_prop
+\bool_new:N \l__siunitx_per_bool
\keys_define:nn { siunitx }
{
- exponent-to-prefix .bool_set:N = \l_siunitx_exp_to_prefix_bool ,
- prefixes-as-symbols .bool_set:N = \l_siunitx_prefix_symbols_bool ,
- sticky-per .bool_set:N = \l_siunitx_sticky_per_bool
+ exponent-to-prefix .bool_set:N = \l__siunitx_exp_to_prefix_bool ,
+ prefixes-as-symbols .bool_set:N = \l__siunitx_prefix_symbols_bool ,
+ sticky-per .bool_set:N = \l__siunitx_sticky_per_bool
}
\keys_set:nn { siunitx } { prefixes-as-symbols = true }
-\cs_new_protected:Npn \siunitx_unit_parse:nn #1#2 {
- \siunitx_unit_parse_init:
- \siunitx_unit_parse_options:nn {#1} {#2}
+\cs_new_protected:Npn \__siunitx_unit_parse:nn #1#2 {
+ \__siunitx_unit_parse_init:
+ \__siunitx_unit_parse_options:nn {#1} {#2}
#1
}
-\cs_new_protected:Npn \siunitx_unit_parse_init:
+\cs_new_protected:Npn \__siunitx_unit_parse_init:
{
- \prop_clear:N \l_siunitx_unit_prop
- \int_zero:N \l_siunitx_unit_int
- \bool_set_false:N \l_siunitx_per_bool
- \seq_map_inline:Nn \l_siunitx_declare_list_seq
- { \cs_set_eq:Nc ##1 { siunitx_ \token_to_str:N ##1 _function:w } }
+ \prop_clear:N \l__siunitx_unit_prop
+ \int_zero:N \l__siunitx_unit_int
+ \bool_set_false:N \l__siunitx_per_bool
+ \seq_map_inline:Nn \l__siunitx_declare_list_seq
+ { \cs_set_eq:Nc ##1 { __siunitx_ \token_to_str:N ##1 _function:w } }
}
-\cs_new_protected:Npn \siunitx_unit_parse_options:nn #1#2 {
+\cs_new_protected:Npn \__siunitx_unit_parse_options:nn #1#2 {
\tl_if_single:nT {#1}
{
\cs_if_free:cF
- { l_siunitx_ \siunitx_unit_first_token:n {#1} _options_tl }
+ { l__siunitx_ \__siunitx_unit_first_token:n {#1} _options_tl }
{
\keys_set:nv { siunitx }
- { l_siunitx_ \siunitx_unit_first_token:n {#1} _options_tl }
+ { l__siunitx_ \__siunitx_unit_first_token:n {#1} _options_tl }
\keys_set:nn { siunitx } {#2}
}
}
}
-\cs_new_protected:Npn \siunitx_unit_parse_power_before:n #1 {
- \tl_set:Nx \l_siunitx_tmpa_tl
- { power- \int_eval:n { \l_siunitx_unit_int + 1 } }
- \prop_put:NVn \l_siunitx_unit_prop \l_siunitx_tmpa_tl {#1}
+\cs_new_protected:Npn \__siunitx_unit_parse_power_before:n #1 {
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { power- \int_eval:n { \l__siunitx_unit_int + 1 } }
+ \prop_put:NVn \l__siunitx_unit_prop \l__siunitx_tmpa_tl {#1}
}
-\cs_new_protected:Npn \siunitx_unit_parse_power_after:n #1 {
- \tl_set:Nx \l_siunitx_tmpa_tl
- { power- \int_use:N \l_siunitx_unit_int }
- \prop_put:NVn \l_siunitx_unit_prop \l_siunitx_tmpa_tl {#1}
+\cs_new_protected:Npn \__siunitx_unit_parse_power_after:n #1 {
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { power- \int_use:N \l__siunitx_unit_int }
+ \prop_put:NVn \l__siunitx_unit_prop \l__siunitx_tmpa_tl {#1}
}
-\cs_new_protected:Npn \siunitx_unit_parse_prefix:Nn #1#2
+\cs_new_protected:Npn \__siunitx_unit_parse_prefix:Nn #1#2
{
- \int_incr:N \l_siunitx_unit_int
- \tl_set:Nx \l_siunitx_tmpa_tl
- { prefix- \int_use:N \l_siunitx_unit_int }
- \prop_put:NVn \l_siunitx_unit_prop \l_siunitx_tmpa_tl {#1}
- \tl_set:Nx \l_siunitx_tmpa_tl
- { prefix-symbol- \int_use:N \l_siunitx_unit_int }
- \prop_put:NVn \l_siunitx_unit_prop \l_siunitx_tmpa_tl {#2}
+ \int_incr:N \l__siunitx_unit_int
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { prefix- \int_use:N \l__siunitx_unit_int }
+ \prop_put:NVn \l__siunitx_unit_prop \l__siunitx_tmpa_tl {#1}
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { prefix-symbol- \int_use:N \l__siunitx_unit_int }
+ \prop_put:NVn \l__siunitx_unit_prop \l__siunitx_tmpa_tl {#2}
}
-\cs_new_protected:Npn \siunitx_unit_parse_prefix:nn #1#2
+\cs_new_protected:Npn \__siunitx_unit_parse_prefix:nn #1#2
{
- \siunitx_unit_parse_prefix:Nn \ERROR {#2}
- \tl_set:Nx \l_siunitx_tmpa_tl
- { prefix-base- \int_use:N \l_siunitx_unit_int }
- \prop_put:NVn \l_siunitx_unit_prop \l_siunitx_tmpa_tl {#1}
+ \__siunitx_unit_parse_prefix:Nn \ERROR {#2}
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { prefix-base- \int_use:N \l__siunitx_unit_int }
+ \prop_put:NVn \l__siunitx_unit_prop \l__siunitx_tmpa_tl {#1}
}
-\cs_new_protected:Npn \siunitx_unit_parse_per: {
- \tl_set:Nx \l_siunitx_tmpa_tl
- { per- \int_eval:n { \l_siunitx_unit_int + 1 } }
- \prop_put:NVn \l_siunitx_unit_prop \l_siunitx_tmpa_tl { true }
- \bool_if:NT \l_siunitx_sticky_per_bool
- { \cs_set_eq:NN \per \siunitx_unit_parse_per_error: }
+\cs_new_protected:Npn \__siunitx_unit_parse_per: {
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { per- \int_eval:n { \l__siunitx_unit_int + 1 } }
+ \prop_put:NVn \l__siunitx_unit_prop \l__siunitx_tmpa_tl { true }
+ \bool_if:NT \l__siunitx_sticky_per_bool
+ { \cs_set_eq:NN \per \__siunitx_unit_parse_per_error: }
}
-\cs_new_protected:Npn \siunitx_unit_parse_per_error: {
+\cs_new_protected:Npn \__siunitx_unit_parse_per_error: {
\msg_error:nn { siunitx } { duplicate-sticky-per }
}
-\cs_new_protected:Npn \siunitx_unit_parse_qualifier:n #1 {
- \tl_set:Nx \l_siunitx_tmpa_tl
- { symbol- \int_use:N \l_siunitx_unit_int }
- \prop_if_in:NVF \l_siunitx_unit_prop \l_siunitx_tmpa_tl
+\cs_new_protected:Npn \__siunitx_unit_parse_qualifier:n #1 {
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { symbol- \int_use:N \l__siunitx_unit_int }
+ \prop_if_in:NVF \l__siunitx_unit_prop \l__siunitx_tmpa_tl
{ \msg_error:nn { siunitx } { qualifier-before-unit } }
- \tl_set:Nx \l_siunitx_tmpa_tl
- { qualifier- \int_use:N \l_siunitx_unit_int }
- \prop_put:NVn \l_siunitx_unit_prop \l_siunitx_tmpa_tl {#1}
-}
-\cs_new_protected:Npn \siunitx_unit_parse_special:n #1 {
- \tl_set:Nx \l_siunitx_tmpa_tl
- { special- \int_eval:n { \l_siunitx_unit_int + 1 } }
- \prop_put:NVn \l_siunitx_unit_prop \l_siunitx_tmpa_tl {#1}
-}
-\cs_new_protected:Npn \siunitx_unit_parse_unit:Nn #1#2 {
- \tl_set:Nx \l_siunitx_tmpa_tl
- { prefix-symbol- \int_use:N \l_siunitx_unit_int }
- \prop_if_in:NVTF \l_siunitx_unit_prop \l_siunitx_tmpa_tl
- {
- \tl_set:Nx \l_siunitx_tmpa_tl
- { symbol- \int_use:N \l_siunitx_unit_int }
- \prop_if_in:NVT \l_siunitx_unit_prop \l_siunitx_tmpa_tl
- { \int_incr:N \l_siunitx_unit_int }
- }
- { \int_incr:N \l_siunitx_unit_int }
- \tl_set:Nx \l_siunitx_tmpa_tl
- { unit- \int_use:N \l_siunitx_unit_int }
- \prop_put:NVn \l_siunitx_unit_prop \l_siunitx_tmpa_tl {#1}
- \tl_set:Nx \l_siunitx_tmpa_tl
- { symbol- \int_use:N \l_siunitx_unit_int }
- \prop_put:NVn \l_siunitx_unit_prop \l_siunitx_tmpa_tl {#2}
- \siunitx_unit_parse_unit_per:
-}
-\cs_new_protected:Npn \siunitx_unit_parse_unit_per: {
- \bool_if:NT \l_siunitx_sticky_per_bool
- {
- \bool_if:NT \l_siunitx_per_bool
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { qualifier- \int_use:N \l__siunitx_unit_int }
+ \prop_put:NVn \l__siunitx_unit_prop \l__siunitx_tmpa_tl {#1}
+}
+\cs_new_protected:Npn \__siunitx_unit_parse_special:n #1 {
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { special- \int_eval:n { \l__siunitx_unit_int + 1 } }
+ \prop_put:NVn \l__siunitx_unit_prop \l__siunitx_tmpa_tl {#1}
+}
+\cs_new_protected:Npn \__siunitx_unit_parse_unit:Nn #1#2 {
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { prefix-symbol- \int_use:N \l__siunitx_unit_int }
+ \prop_if_in:NVTF \l__siunitx_unit_prop \l__siunitx_tmpa_tl
+ {
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { symbol- \int_use:N \l__siunitx_unit_int }
+ \prop_if_in:NVT \l__siunitx_unit_prop \l__siunitx_tmpa_tl
+ { \int_incr:N \l__siunitx_unit_int }
+ }
+ { \int_incr:N \l__siunitx_unit_int }
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { unit- \int_use:N \l__siunitx_unit_int }
+ \prop_put:NVn \l__siunitx_unit_prop \l__siunitx_tmpa_tl {#1}
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { symbol- \int_use:N \l__siunitx_unit_int }
+ \prop_put:NVn \l__siunitx_unit_prop \l__siunitx_tmpa_tl {#2}
+ \__siunitx_unit_parse_unit_per:
+}
+\cs_new_protected:Npn \__siunitx_unit_parse_unit_per: {
+ \bool_if:NT \l__siunitx_sticky_per_bool
+ {
+ \bool_if:NT \l__siunitx_per_bool
{
- \tl_set:Nx \l_siunitx_tmpa_tl
- { per- \int_use:N \l_siunitx_unit_int }
- \prop_put:NVn \l_siunitx_unit_prop \l_siunitx_tmpa_tl
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { per- \int_use:N \l__siunitx_unit_int }
+ \prop_put:NVn \l__siunitx_unit_prop \l__siunitx_tmpa_tl
{ true }
}
}
}
-\tl_new:N \l_siunitx_preunit_tl
-\tl_new:N \l_siunitx_unit_tl
-\tl_new:N \l_siunitx_unit_current_tl
-\tl_new:N \l_siunitx_unit_denominator_tl
-\tl_new:N \l_siunitx_unit_numerator_tl
-\tl_new:N \l_siunitx_unit_saved_tl
-\int_new:N \l_siunitx_unit_denominator_int
-\int_new:N \l_siunitx_unit_numerator_int
-\int_new:N \l_siunitx_unit_prefix_int
-\int_new:N \l_siunitx_unit_prefix_base_int
-\tl_new:N \l_siunitx_unit_prefix_current_tl
-\int_new:N \l_siunitx_unit_prefix_gram_int
-\bool_new:N \l_siunitx_omit_unit_space_bool
-\bool_new:N \l_siunitx_per_auto_bool
-\bool_new:N \l_siunitx_per_fraction_bool
-\tl_new:N \l_siunitx_per_mode_tl
-\bool_new:N \l_siunitx_power_number_bool
-\bool_new:N \l_siunitx_two_parts_bool
-\tl_new:N \l_siunitx_qualifier_mode_tl
+\tl_new:N \l__siunitx_preunit_tl
+\tl_new:N \l__siunitx_unit_tl
+\tl_new:N \l__siunitx_unit_current_tl
+\tl_new:N \l__siunitx_unit_denominator_tl
+\tl_new:N \l__siunitx_unit_numerator_tl
+\tl_new:N \l__siunitx_unit_saved_tl
+\int_new:N \l__siunitx_unit_denominator_int
+\int_new:N \l__siunitx_unit_numerator_int
+\int_new:N \l__siunitx_unit_prefix_int
+\int_new:N \l__siunitx_unit_prefix_base_int
+\tl_new:N \l__siunitx_unit_prefix_current_tl
+\int_new:N \l__siunitx_unit_prefix_gram_int
+\bool_new:N \l__siunitx_omit_unit_space_bool
+\bool_new:N \l__siunitx_per_auto_bool
+\bool_new:N \l__siunitx_per_fraction_bool
+\tl_new:N \l__siunitx_per_mode_tl
+\bool_new:N \l__siunitx_power_number_bool
+\bool_new:N \l__siunitx_two_parts_bool
+\tl_new:N \l__siunitx_qualifier_mode_tl
\keys_define:nn { siunitx } {
bracket-unit-denominator .bool_set:N
- = \l_siunitx_unit_denominator_bracket_bool,
- inter-unit-product .tl_set:N = \l_siunitx_unit_product_tl ,
- inter-unit-separator .tl_set:N = \l_siunitx_unit_product_tl ,
+ = \l__siunitx_unit_denominator_bracket_bool,
+ inter-unit-product .tl_set:N = \l__siunitx_unit_product_tl ,
+ inter-unit-separator .tl_set:N = \l__siunitx_unit_product_tl ,
literal-superscript-as-power
- .bool_set:N = \l_siunitx_literal_power_bool,
+ .bool_set:N = \l__siunitx_literal_power_bool,
per-mode .choice:,
per-mode / fraction .code:n =
{
- \bool_set_false:N \l_siunitx_per_auto_bool
- \bool_set_true:N \l_siunitx_per_fraction_bool
- \bool_set_true:N \l_siunitx_per_two_parts_bool
- \tl_set:Nn \l_siunitx_per_mode_tl { fraction }
+ \bool_set_false:N \l__siunitx_per_auto_bool
+ \bool_set_true:N \l__siunitx_per_fraction_bool
+ \bool_set_true:N \l__siunitx_per_two_parts_bool
+ \tl_set:Nn \l__siunitx_per_mode_tl { fraction }
},
per-mode / power .meta:n = { per-mode = reciprocal } ,
per-mode / power-positive-first .meta:n =
{ per-mode = reciprocal-positive-first } ,
per-mode / reciprocal .code:n =
{
- \bool_set_false:N \l_siunitx_per_auto_bool
- \bool_set_false:N \l_siunitx_per_fraction_bool
- \bool_set_false:N \l_siunitx_per_two_parts_bool
- \tl_clear:N \l_siunitx_per_mode_tl
+ \bool_set_false:N \l__siunitx_per_auto_bool
+ \bool_set_false:N \l__siunitx_per_fraction_bool
+ \bool_set_false:N \l__siunitx_per_two_parts_bool
+ \tl_clear:N \l__siunitx_per_mode_tl
},
per-mode / reciprocal-positive-first .code:n =
{
- \bool_set_false:N \l_siunitx_per_auto_bool
- \bool_set_false:N \l_siunitx_per_fraction_bool
- \bool_set_true:N \l_siunitx_per_two_parts_bool
- \tl_clear:N \l_siunitx_per_mode_tl
+ \bool_set_false:N \l__siunitx_per_auto_bool
+ \bool_set_false:N \l__siunitx_per_fraction_bool
+ \bool_set_true:N \l__siunitx_per_two_parts_bool
+ \tl_clear:N \l__siunitx_per_mode_tl
},
per-mode / repeated-symbol .code:n =
{
- \bool_set_false:N \l_siunitx_per_auto_bool
- \bool_set_false:N \l_siunitx_per_fraction_bool
- \bool_set_false:N \l_siunitx_per_two_parts_bool
- \tl_set:Nn \l_siunitx_per_mode_tl { repeat }
+ \bool_set_false:N \l__siunitx_per_auto_bool
+ \bool_set_false:N \l__siunitx_per_fraction_bool
+ \bool_set_false:N \l__siunitx_per_two_parts_bool
+ \tl_set:Nn \l__siunitx_per_mode_tl { repeat }
},
per-mode / symbol .code:n =
{
- \bool_set_false:N \l_siunitx_per_auto_bool
- \bool_set_true:N \l_siunitx_per_fraction_bool
- \bool_set_true:N \l_siunitx_per_two_parts_bool
- \tl_set:Nn \l_siunitx_per_mode_tl { symbol }
+ \bool_set_false:N \l__siunitx_per_auto_bool
+ \bool_set_true:N \l__siunitx_per_fraction_bool
+ \bool_set_true:N \l__siunitx_per_two_parts_bool
+ \tl_set:Nn \l__siunitx_per_mode_tl { symbol }
},
per-mode / symbol-or-fraction .code:n =
{
- \bool_set_true:N \l_siunitx_per_auto_bool
- \bool_set_true:N \l_siunitx_per_fraction_bool
- \bool_set_true:N \l_siunitx_per_two_parts_bool
- \tl_set:Nn \l_siunitx_per_mode_tl { symbol }
+ \bool_set_true:N \l__siunitx_per_auto_bool
+ \bool_set_true:N \l__siunitx_per_fraction_bool
+ \bool_set_true:N \l__siunitx_per_two_parts_bool
+ \tl_set:Nn \l__siunitx_per_mode_tl { symbol }
},
- per-symbol .tl_set:N = \l_siunitx_per_symbol_tl,
+ per-symbol .tl_set:N = \l__siunitx_per_symbol_tl,
power-font .choice:,
power-font / number .code:n =
- { \bool_set_true:N \l_siunitx_power_number_bool },
+ { \bool_set_true:N \l__siunitx_power_number_bool },
power-font / unit .code:n =
- { \bool_set_false:N \l_siunitx_power_number_bool },
+ { \bool_set_false:N \l__siunitx_power_number_bool },
qualifier-mode .choice:,
qualifier-mode / brackets .code:n =
- { \tl_set:Nn \l_siunitx_qualifier_mode_tl { brackets } },
+ { \tl_set:Nn \l__siunitx_qualifier_mode_tl { brackets } },
qualifier-mode / phrase .code:n =
- { \tl_set:Nn \l_siunitx_qualifier_mode_tl { phrase } },
+ { \tl_set:Nn \l__siunitx_qualifier_mode_tl { phrase } },
qualifier-mode / space .code:n =
- { \tl_set:Nn \l_siunitx_qualifier_mode_tl { space } },
+ { \tl_set:Nn \l__siunitx_qualifier_mode_tl { space } },
qualifier-mode / subscript .code:n =
- { \tl_set:Nn \l_siunitx_qualifier_mode_tl { subscript } },
+ { \tl_set:Nn \l__siunitx_qualifier_mode_tl { subscript } },
qualifier-mode / text .code:n =
- { \tl_set:Nn \l_siunitx_qualifier_mode_tl { text } },
- qualifier-phrase .tl_set:N = \l_siunitx_qualifier_phrase_tl
+ { \tl_set:Nn \l__siunitx_qualifier_mode_tl { text } },
+ qualifier-phrase .tl_set:N = \l__siunitx_qualifier_phrase_tl
}
\keys_set:nn { siunitx } {
bracket-unit-denominator = true,
@@ -4578,177 +4578,177 @@
qualifier-mode = subscript,
qualifier-phrase = { ~ of ~ }
}
-\cs_new_protected:Npn \siunitx_unit_format: {
- \siunitx_unit_format_init:
- \int_while_do:nNnn { \l_siunitx_unit_int } > { 0 }
+\cs_new_protected:Npn \__siunitx_unit_format: {
+ \__siunitx_unit_format_init:
+ \int_while_do:nNnn { \l__siunitx_unit_int } > { 0 }
{
- \siunitx_unit_format_prefix:
- \siunitx_unit_format_symbol:
- \siunitx_unit_format_qualifier:
- \siunitx_unit_format_power:
- \siunitx_unit_format_add:
- \int_decr:N \l_siunitx_unit_int
+ \__siunitx_unit_format_prefix:
+ \__siunitx_unit_format_symbol:
+ \__siunitx_unit_format_qualifier:
+ \__siunitx_unit_format_power:
+ \__siunitx_unit_format_add:
+ \int_decr:N \l__siunitx_unit_int
}
- \bool_if:NT \l_siunitx_per_two_parts_bool
+ \bool_if:NT \l__siunitx_per_two_parts_bool
{
- \bool_if:NTF \l_siunitx_per_fraction_bool
- { \siunitx_unit_format_fraction: }
- { \siunitx_unit_format_sorted: }
+ \bool_if:NTF \l__siunitx_per_fraction_bool
+ { \__siunitx_unit_format_fraction: }
+ { \__siunitx_unit_format_sorted: }
}
}
-\cs_new_protected:Npn \siunitx_unit_format_add: {
- \bool_if:NTF \l_siunitx_per_two_parts_bool
+\cs_new_protected:Npn \__siunitx_unit_format_add: {
+ \bool_if:NTF \l__siunitx_per_two_parts_bool
{
- \tl_set:Nx \l_siunitx_tmpb_tl
- { per- \int_use:N \l_siunitx_unit_int }
- \prop_if_in:NVTF \l_siunitx_unit_prop \l_siunitx_tmpb_tl
+ \tl_set:Nx \l__siunitx_tmpb_tl
+ { per- \int_use:N \l__siunitx_unit_int }
+ \prop_if_in:NVTF \l__siunitx_unit_prop \l__siunitx_tmpb_tl
{
- \siunitx_unit_format_add_aux:n { _denominator }
- \int_incr:N \l_siunitx_unit_denominator_int
+ \__siunitx_unit_format_add_aux:n { _denominator }
+ \int_incr:N \l__siunitx_unit_denominator_int
}
{
- \siunitx_unit_format_add_aux:n { _numerator }
- \int_incr:N \l_siunitx_unit_numerator_int
+ \__siunitx_unit_format_add_aux:n { _numerator }
+ \int_incr:N \l__siunitx_unit_numerator_int
}
}
- { \siunitx_unit_format_add_aux:n { } }
- \tl_clear:N \l_siunitx_unit_current_tl
+ { \__siunitx_unit_format_add_aux:n { } }
+ \tl_clear:N \l__siunitx_unit_current_tl
}
-\cs_new_protected:Npn \siunitx_unit_format_add_aux:n #1 {
- \tl_if_empty:cF { l_siunitx_unit #1 _tl }
+\cs_new_protected:Npn \__siunitx_unit_format_add_aux:n #1 {
+ \tl_if_empty:cF { l__siunitx_unit #1 _tl }
{
- \str_if_eq:VnTF \l_siunitx_per_mode_tl { repeat }
+ \str_if_eq:VnTF \l__siunitx_per_mode_tl { repeat }
{
- \tl_set:Nx \l_siunitx_tmpa_tl
- { per- \int_eval:n { \l_siunitx_unit_int + 1 } }
- \prop_if_in:NVF \l_siunitx_unit_prop \l_siunitx_tmpa_tl
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { per- \int_eval:n { \l__siunitx_unit_int + 1 } }
+ \prop_if_in:NVF \l__siunitx_unit_prop \l__siunitx_tmpa_tl
{
- \tl_put_right:NV \l_siunitx_unit_current_tl
- \l_siunitx_unit_product_tl
+ \tl_put_right:NV \l__siunitx_unit_current_tl
+ \l__siunitx_unit_product_tl
}
}
{
- \tl_put_right:NV \l_siunitx_unit_current_tl
- \l_siunitx_unit_product_tl
+ \tl_put_right:NV \l__siunitx_unit_current_tl
+ \l__siunitx_unit_product_tl
}
}
- \tl_set:Nx \l_siunitx_tmpa_tl
- { special- \int_use:N \l_siunitx_unit_int }
- \prop_get:NVNTF \l_siunitx_unit_prop \l_siunitx_tmpa_tl
- \l_siunitx_tmpa_tl
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { special- \int_use:N \l__siunitx_unit_int }
+ \prop_get:NVNTF \l__siunitx_unit_prop \l__siunitx_tmpa_tl
+ \l__siunitx_tmpa_tl
{
- \tl_put_left:cx { l_siunitx_unit #1 _tl }
+ \tl_put_left:cx { l__siunitx_unit #1 _tl }
{
- \exp_not:V \l_siunitx_tmpa_tl
- { \exp_not:V \l_siunitx_unit_current_tl }
+ \exp_not:V \l__siunitx_tmpa_tl
+ { \exp_not:V \l__siunitx_unit_current_tl }
}
}
{
- \tl_put_left:cV { l_siunitx_unit #1 _tl }
- \l_siunitx_unit_current_tl
+ \tl_put_left:cV { l__siunitx_unit #1 _tl }
+ \l__siunitx_unit_current_tl
}
}
-\cs_new_protected:Npn \siunitx_unit_format_fraction: {
- \int_compare:nNnT { \l_siunitx_unit_numerator_int } = { 0 }
+\cs_new_protected:Npn \__siunitx_unit_format_fraction: {
+ \int_compare:nNnT { \l__siunitx_unit_numerator_int } = { 0 }
{
- \str_if_eq:VnT \l_siunitx_per_mode_tl { symbol }
- { \bool_set_true:N \l_siunitx_omit_unit_space_bool }
+ \str_if_eq:VnT \l__siunitx_per_mode_tl { symbol }
+ { \bool_set_true:N \l__siunitx_omit_unit_space_bool }
}
- \int_compare:nNnTF { \l_siunitx_unit_denominator_int } > { 0 }
+ \int_compare:nNnTF { \l__siunitx_unit_denominator_int } > { 0 }
{
- \bool_if:NTF \l_siunitx_per_auto_bool
- { \siunitx_unit_format_fraction_auto: }
+ \bool_if:NTF \l__siunitx_per_auto_bool
+ { \__siunitx_unit_format_fraction_auto: }
{
\use:c
- { siunitx_unit_format_fraction_ \l_siunitx_per_mode_tl : }
+ { __siunitx_unit_format_fraction_ \l__siunitx_per_mode_tl : }
}
}
- { \tl_set_eq:NN \l_siunitx_unit_tl \l_siunitx_unit_numerator_tl }
-}
-\cs_new_protected:Npn \siunitx_unit_format_fraction_fraction: {
- \tl_if_empty:NT \l_siunitx_unit_numerator_tl
- { \tl_set:Nn \l_siunitx_unit_numerator_tl { 1 } }
- \tl_set:Nx \l_siunitx_unit_numerator_tl
- { { \exp_not:V \l_siunitx_unit_numerator_tl } }
- \tl_put_left:Nn \l_siunitx_unit_numerator_tl
- { \siunitx_print:nn { unit } }
- \tl_set:Nx \l_siunitx_unit_numerator_tl
- { { \exp_not:V \l_siunitx_unit_numerator_tl } }
- \tl_set:Nx \l_siunitx_unit_denominator_tl
- { { \exp_not:V \l_siunitx_unit_denominator_tl } }
- \tl_put_left:Nn \l_siunitx_unit_denominator_tl
- { \siunitx_print:nn { unit } }
- \tl_set:Nx \l_siunitx_unit_denominator_tl
- { { \exp_not:V \l_siunitx_unit_denominator_tl } }
- \tl_set:Nn \l_siunitx_unit_tl { \siunitx_fraction:nn }
- \tl_put_right:NV \l_siunitx_unit_tl \l_siunitx_unit_numerator_tl
- \tl_put_right:NV \l_siunitx_unit_tl \l_siunitx_unit_denominator_tl
- \tl_set:Nx \l_siunitx_unit_tl
- { \exp_not:N \ensuremath { \exp_not:V \l_siunitx_unit_tl } }
-}
-\cs_new_protected:Npn \siunitx_unit_format_fraction_auto: {
+ { \tl_set_eq:NN \l__siunitx_unit_tl \l__siunitx_unit_numerator_tl }
+}
+\cs_new_protected:Npn \__siunitx_unit_format_fraction_fraction: {
+ \tl_if_empty:NT \l__siunitx_unit_numerator_tl
+ { \tl_set:Nn \l__siunitx_unit_numerator_tl { 1 } }
+ \tl_set:Nx \l__siunitx_unit_numerator_tl
+ { { \exp_not:V \l__siunitx_unit_numerator_tl } }
+ \tl_put_left:Nn \l__siunitx_unit_numerator_tl
+ { \__siunitx_print:nn { unit } }
+ \tl_set:Nx \l__siunitx_unit_numerator_tl
+ { { \exp_not:V \l__siunitx_unit_numerator_tl } }
+ \tl_set:Nx \l__siunitx_unit_denominator_tl
+ { { \exp_not:V \l__siunitx_unit_denominator_tl } }
+ \tl_put_left:Nn \l__siunitx_unit_denominator_tl
+ { \__siunitx_print:nn { unit } }
+ \tl_set:Nx \l__siunitx_unit_denominator_tl
+ { { \exp_not:V \l__siunitx_unit_denominator_tl } }
+ \tl_set:Nn \l__siunitx_unit_tl { \__siunitx_fraction:nn }
+ \tl_put_right:NV \l__siunitx_unit_tl \l__siunitx_unit_numerator_tl
+ \tl_put_right:NV \l__siunitx_unit_tl \l__siunitx_unit_denominator_tl
+ \tl_set:Nx \l__siunitx_unit_tl
+ { \exp_not:N \ensuremath { \exp_not:V \l__siunitx_unit_tl } }
+}
+\cs_new_protected:Npn \__siunitx_unit_format_fraction_auto: {
\mode_if_math:TF
{
\group_begin:
- \siunitx_unit_format_fraction_fraction:
+ \__siunitx_unit_format_fraction_fraction:
\exp_args:NNNV \group_end:
- \tl_set:Nn \l_siunitx_tmpa_tl \l_siunitx_unit_tl
+ \tl_set:Nn \l__siunitx_tmpa_tl \l__siunitx_unit_tl
\group_begin:
- \siunitx_unit_format_fraction_symbol:
+ \__siunitx_unit_format_fraction_symbol:
\exp_args:NNNV \group_end:
- \tl_set:Nn \l_siunitx_tmpb_tl \l_siunitx_unit_tl
- \tl_set:Nx \l_siunitx_tmpb_tl
+ \tl_set:Nn \l__siunitx_tmpb_tl \l__siunitx_unit_tl
+ \tl_set:Nx \l__siunitx_tmpb_tl
{
- \siunitx_print:nn { unit }
- { \exp_not:V \l_siunitx_tmpb_tl }
+ \__siunitx_print:nn { unit }
+ { \exp_not:V \l__siunitx_tmpb_tl }
}
- \tl_set:Nx \l_siunitx_unit_tl
+ \tl_set:Nx \l__siunitx_unit_tl
{
\exp_not:N \ensuremath {
\tex_mathchoice:D
- { \exp_not:V \l_siunitx_tmpa_tl }
- { \exp_not:V \l_siunitx_tmpb_tl }
- { \exp_not:V \l_siunitx_tmpb_tl }
- { \exp_not:V \l_siunitx_tmpb_tl }
+ { \exp_not:V \l__siunitx_tmpa_tl }
+ { \exp_not:V \l__siunitx_tmpb_tl }
+ { \exp_not:V \l__siunitx_tmpb_tl }
+ { \exp_not:V \l__siunitx_tmpb_tl }
}
}
}
- { \siunitx_unit_format_fraction_symbol: }
+ { \__siunitx_unit_format_fraction_symbol: }
}
-\cs_new_protected:Npn \siunitx_unit_format_fraction_symbol: {
- \siunitx_unit_format_fraction_symbol_aux:
- \int_compare:nNnT { \l_siunitx_unit_denominator_int } > { 1 }
+\cs_new_protected:Npn \__siunitx_unit_format_fraction_symbol: {
+ \__siunitx_unit_format_fraction_symbol_aux:
+ \int_compare:nNnT { \l__siunitx_unit_denominator_int } > { 1 }
{
- \bool_if:NT \l_siunitx_unit_denominator_bracket_bool
+ \bool_if:NT \l__siunitx_unit_denominator_bracket_bool
{
- \tl_put_left:NV \l_siunitx_unit_denominator_tl \l_siunitx_bracket_open_tl
- \tl_put_right:NV \l_siunitx_unit_denominator_tl \l_siunitx_bracket_close_tl
+ \tl_put_left:NV \l__siunitx_unit_denominator_tl \l__siunitx_bracket_open_tl
+ \tl_put_right:NV \l__siunitx_unit_denominator_tl \l__siunitx_bracket_close_tl
}
}
- \tl_set_eq:NN \l_siunitx_unit_tl \l_siunitx_unit_numerator_tl
- \tl_put_right:NV \l_siunitx_unit_tl \l_siunitx_per_symbol_tl
- \tl_put_right:NV \l_siunitx_unit_tl \l_siunitx_unit_denominator_tl
+ \tl_set_eq:NN \l__siunitx_unit_tl \l__siunitx_unit_numerator_tl
+ \tl_put_right:NV \l__siunitx_unit_tl \l__siunitx_per_symbol_tl
+ \tl_put_right:NV \l__siunitx_unit_tl \l__siunitx_unit_denominator_tl
}
\cs_new_protected:Npn
- \siunitx_unit_format_fraction_symbol_aux: { }
+ \__siunitx_unit_format_fraction_symbol_aux: { }
\cs_new_protected:Npn
- \siunitx_unit_format_fraction_symbol_aux_alt: {
- \tl_if_empty:NT \l_siunitx_unit_numerator_tl
- { \tl_set:Nn \l_siunitx_unit_numerator_tl { 1 } }
-}
-\cs_new_protected:Npn \siunitx_unit_format_init: {
- \bool_set_false:N \l_siunitx_omit_unit_space_bool
- \tl_clear:N \l_siunitx_unit_tl
- \tl_clear:N \l_siunitx_unit_current_tl
- \tl_clear:N \l_siunitx_unit_denominator_tl
- \int_zero:N \l_siunitx_unit_prefix_gram_int
- \tl_clear:N \l_siunitx_unit_numerator_tl
- \int_zero:N \l_siunitx_unit_prefix_base_int
- \int_zero:N \l_siunitx_unit_prefix_int
- \int_zero:N \l_siunitx_unit_denominator_int
- \int_zero:N \l_siunitx_unit_numerator_int
- \seq_map_inline:Nn \l_siunitx_declare_list_seq
- { \siunitx_unit_print_literal_aux:N ##1 }
+ \__siunitx_unit_format_fraction_symbol_aux_alt: {
+ \tl_if_empty:NT \l__siunitx_unit_numerator_tl
+ { \tl_set:Nn \l__siunitx_unit_numerator_tl { 1 } }
+}
+\cs_new_protected:Npn \__siunitx_unit_format_init: {
+ \bool_set_false:N \l__siunitx_omit_unit_space_bool
+ \tl_clear:N \l__siunitx_unit_tl
+ \tl_clear:N \l__siunitx_unit_current_tl
+ \tl_clear:N \l__siunitx_unit_denominator_tl
+ \int_zero:N \l__siunitx_unit_prefix_gram_int
+ \tl_clear:N \l__siunitx_unit_numerator_tl
+ \int_zero:N \l__siunitx_unit_prefix_base_int
+ \int_zero:N \l__siunitx_unit_prefix_int
+ \int_zero:N \l__siunitx_unit_denominator_int
+ \int_zero:N \l__siunitx_unit_numerator_int
+ \seq_map_inline:Nn \l__siunitx_declare_list_seq
+ { \__siunitx_unit_print_literal_aux:N ##1 }
}
\group_begin:
\char_set_lccode:nn { `\+ } { `\^ }
@@ -4756,45 +4756,45 @@
\tl_to_lowercase:n
{
\group_end:
- \cs_new_protected:Npn \siunitx_unit_format_literal:n #1
- {
- \int_zero:N \l_siunitx_unit_prefix_int
- \seq_map_inline:Nn \l_siunitx_declare_list_seq
- { \siunitx_unit_print_literal_aux:N ##1 }
- \tl_set:Nn \l_siunitx_unit_tl {#1}
- \tl_replace_all:NnV \l_siunitx_unit_tl { . } \l_siunitx_unit_product_tl
- \tl_replace_all:NnV \l_siunitx_unit_tl { ~ } \l_siunitx_unit_product_tl
- \bool_if:NT \l_siunitx_literal_power_bool
+ \cs_new_protected:Npn \__siunitx_unit_format_literal:n #1
+ {
+ \int_zero:N \l__siunitx_unit_prefix_int
+ \seq_map_inline:Nn \l__siunitx_declare_list_seq
+ { \__siunitx_unit_print_literal_aux:N ##1 }
+ \tl_set:Nn \l__siunitx_unit_tl {#1}
+ \tl_replace_all:NnV \l__siunitx_unit_tl { . } \l__siunitx_unit_product_tl
+ \tl_replace_all:NnV \l__siunitx_unit_tl { ~ } \l__siunitx_unit_product_tl
+ \bool_if:NT \l__siunitx_literal_power_bool
{
- \tl_replace_all:Nnn \l_siunitx_unit_tl { ^ }
- { \siunitx_unit_format_literal_power:n }
- \tl_replace_all:Nnn \l_siunitx_unit_tl { + }
- { \siunitx_unit_format_literal_power:n }
+ \tl_replace_all:Nnn \l__siunitx_unit_tl { ^ }
+ { \__siunitx_unit_format_literal_power:n }
+ \tl_replace_all:Nnn \l__siunitx_unit_tl { + }
+ { \__siunitx_unit_format_literal_power:n }
}
- \siunitx_unit_format_literal_extras:
+ \__siunitx_unit_format_literal_extras:
}
}
-\cs_new_protected:Npn \siunitx_unit_print_literal_aux:N #1
- { \cs_set_eq:Nc #1 { siunitx_ \token_to_str:N #1 _literal:w } }
-\cs_new_protected:Npn \siunitx_unit_format_literal_power:n #1
- { \PrintSuperscript { \siunitx_unit_format_power_aux:n {#1} } }
+\cs_new_protected:Npn \__siunitx_unit_print_literal_aux:N #1
+ { \cs_set_eq:Nc #1 { __siunitx_ \token_to_str:N #1 _literal:w } }
+\cs_new_protected:Npn \__siunitx_unit_format_literal_power:n #1
+ { \PrintSuperscript { \__siunitx_unit_format_power_aux:n {#1} } }
%\end{macro}
-\cs_new_protected:Npn \siunitx_unit_format_literal_extras:
+\cs_new_protected:Npn \__siunitx_unit_format_literal_extras:
{
- \siunitx_unit_format_literal_extras_aux:nN { 176 }
+ \__siunitx_unit_format_literal_extras_aux:nN { 176 }
\SIUnitSymbolDegree
- \siunitx_unit_format_literal_extras_aux:nN { 181 }
+ \__siunitx_unit_format_literal_extras_aux:nN { 181 }
\SIUnitSymbolMicro
- \siunitx_unit_format_literal_extras_aux:nN { 197 }
+ \__siunitx_unit_format_literal_extras_aux:nN { 197 }
\SIUnitSymbolAngstrom
}
\cs_new_protected:Npn
- \siunitx_unit_format_literal_extras_aux:nN #1#2 {
+ \__siunitx_unit_format_literal_extras_aux:nN #1#2 {
\char_set_lccode:nn { `\@ } {#1}
\tl_to_lowercase:n
{
- \tl_replace_all:NnV \l_siunitx_unit_tl { @ }
- \l_siunitx_unit_tl
+ \tl_replace_all:NnV \l__siunitx_unit_tl { @ }
+ \l__siunitx_unit_tl
}
}
\pdftex_if_engine:T
@@ -4803,318 +4803,318 @@
{
\cs_if_exist:NTF \inputencodingname
{
- \tl_set:Nn \l_siunitx_tmpa_tl { latin1 , latin5 , latin9 }
- \clist_if_in:NVF \l_siunitx_tmpa_tl \inputencodingname
+ \tl_set:Nn \l__siunitx_tmpa_tl { latin1 , latin5 , latin9 }
+ \clist_if_in:NVF \l__siunitx_tmpa_tl \inputencodingname
{
- \cs_set_eq:NN \siunitx_unit_format_literal_extras:
+ \cs_set_eq:NN \__siunitx_unit_format_literal_extras:
\scan_stop:
}
}
{
- \cs_set_eq:NN \siunitx_unit_format_literal_extras:
+ \cs_set_eq:NN \__siunitx_unit_format_literal_extras:
\scan_stop:
}
}
}
-\cs_new_protected:Npn \siunitx_unit_format_power: {
- \tl_set:Nx \l_siunitx_tmpa_tl
- { power- \int_use:N \l_siunitx_unit_int }
- \prop_get:NVNTF \l_siunitx_unit_prop \l_siunitx_tmpa_tl
- \l_siunitx_tmpa_tl
- { \siunitx_unit_format_power_aux: }
+\cs_new_protected:Npn \__siunitx_unit_format_power: {
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { power- \int_use:N \l__siunitx_unit_int }
+ \prop_get:NVNTF \l__siunitx_unit_prop \l__siunitx_tmpa_tl
+ \l__siunitx_tmpa_tl
+ { \__siunitx_unit_format_power_aux: }
{
- \tl_set:Nx \l_siunitx_tmpa_tl
- { per- \int_use:N \l_siunitx_unit_int }
- \prop_if_in:NVT \l_siunitx_unit_prop \l_siunitx_tmpa_tl
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { per- \int_use:N \l__siunitx_unit_int }
+ \prop_if_in:NVT \l__siunitx_unit_prop \l__siunitx_tmpa_tl
{
- \tl_set:Nn \l_siunitx_tmpa_tl { 1 }
- \siunitx_unit_format_power_aux:
+ \tl_set:Nn \l__siunitx_tmpa_tl { 1 }
+ \__siunitx_unit_format_power_aux:
}
}
}
-\cs_new_protected:Npn \siunitx_unit_format_power_aux: {
- \str_if_eq:VnTF \l_siunitx_per_mode_tl { repeat }
- { \siunitx_unit_format_power_repeat: }
- { \siunitx_unit_format_power_per: }
- \str_if_eq:VnF \l_siunitx_tmpa_tl { 1 }
+\cs_new_protected:Npn \__siunitx_unit_format_power_aux: {
+ \str_if_eq:VnTF \l__siunitx_per_mode_tl { repeat }
+ { \__siunitx_unit_format_power_repeat: }
+ { \__siunitx_unit_format_power_per: }
+ \str_if_eq:VnF \l__siunitx_tmpa_tl { 1 }
{
- \siunitx_unit_format_power_brackets:
- \tl_put_right:Nx \l_siunitx_unit_current_tl
+ \__siunitx_unit_format_power_brackets:
+ \tl_put_right:Nx \l__siunitx_unit_current_tl
{
\exp_not:N \PrintSuperscript
{
- \siunitx_unit_format_power_aux:n
- { \exp_not:V \l_siunitx_tmpa_tl }
+ \__siunitx_unit_format_power_aux:n
+ { \exp_not:V \l__siunitx_tmpa_tl }
}
}
}
}
-\cs_new_protected:Npn \siunitx_unit_format_power_aux:n #1 {
- \bool_if:NTF \l_siunitx_power_number_bool
- { \siunitx_unit_format_power_aux:nn { number } {#1} }
- { \siunitx_unit_format_power_aux:nn { unit } {#1} }
+\cs_new_protected:Npn \__siunitx_unit_format_power_aux:n #1 {
+ \bool_if:NTF \l__siunitx_power_number_bool
+ { \__siunitx_unit_format_power_aux:nn { number } {#1} }
+ { \__siunitx_unit_format_power_aux:nn { unit } {#1} }
}
-\cs_new_protected:Npn \siunitx_unit_format_power_aux:nn #1#2 {
- \bool_if:cTF { l_siunitx_ #1 _math_mode_bool }
- { \siunitx_print:nn {#1} {#2} }
+\cs_new_protected:Npn \__siunitx_unit_format_power_aux:nn #1#2 {
+ \bool_if:cTF { l__siunitx_ #1 _math_mode_bool }
+ { \__siunitx_print:nn {#1} {#2} }
{
- \tl_set:Nn \l_siunitx_tmpa_tl {#2}
- \tl_replace_all:Nnn \l_siunitx_tmpa_tl { - }
- { \text { \c_siunitx_minus_tl } }
- \siunitx_print:nV {#1} \l_siunitx_tmpa_tl
+ \tl_set:Nn \l__siunitx_tmpa_tl {#2}
+ \tl_replace_all:Nnn \l__siunitx_tmpa_tl { - }
+ { \text { \c__siunitx_minus_tl } }
+ \__siunitx_print:nV {#1} \l__siunitx_tmpa_tl
}
}
-\cs_new_protected:Npn \siunitx_unit_format_power_brackets: {
- \tl_set:Nx \l_siunitx_tmpb_tl
- { bracket- \int_use:N \l_siunitx_unit_int }
- \prop_if_in:NVT \l_siunitx_unit_prop \l_siunitx_tmpb_tl
+\cs_new_protected:Npn \__siunitx_unit_format_power_brackets: {
+ \tl_set:Nx \l__siunitx_tmpb_tl
+ { bracket- \int_use:N \l__siunitx_unit_int }
+ \prop_if_in:NVT \l__siunitx_unit_prop \l__siunitx_tmpb_tl
{
- \tl_put_left:NV \l_siunitx_unit_current_tl \l_siunitx_bracket_open_tl
- \tl_put_right:NV \l_siunitx_unit_current_tl \l_siunitx_bracket_close_tl
+ \tl_put_left:NV \l__siunitx_unit_current_tl \l__siunitx_bracket_open_tl
+ \tl_put_right:NV \l__siunitx_unit_current_tl \l__siunitx_bracket_close_tl
}
}
-\cs_new_protected:Npn \siunitx_unit_format_power_per: {
- \tl_set:Nx \l_siunitx_tmpb_tl
- { per- \int_use:N \l_siunitx_unit_int }
- \prop_if_in:NVT \l_siunitx_unit_prop \l_siunitx_tmpb_tl
+\cs_new_protected:Npn \__siunitx_unit_format_power_per: {
+ \tl_set:Nx \l__siunitx_tmpb_tl
+ { per- \int_use:N \l__siunitx_unit_int }
+ \prop_if_in:NVT \l__siunitx_unit_prop \l__siunitx_tmpb_tl
{
- \bool_if:NF \l_siunitx_per_fraction_bool
+ \bool_if:NF \l__siunitx_per_fraction_bool
{
- \tl_if_in:NnTF \l_siunitx_tmpa_tl { - }
+ \tl_if_in:NnTF \l__siunitx_tmpa_tl { - }
{
- \cs_set:Npn \siunitx_tmp:w ##1 - ##2 \q_stop
- { \tl_set:Nn \l_siunitx_tmpa_tl {##2} }
- \exp_after:wN \siunitx_tmp:w \l_siunitx_tmpa_tl \q_stop
+ \cs_set:Npn \__siunitx_tmp:w ##1 - ##2 \q_stop
+ { \tl_set:Nn \l__siunitx_tmpa_tl {##2} }
+ \exp_after:wN \__siunitx_tmp:w \l__siunitx_tmpa_tl \q_stop
}
- { \tl_put_left:Nn \l_siunitx_tmpa_tl { - } }
+ { \tl_put_left:Nn \l__siunitx_tmpa_tl { - } }
}
}
}
-\cs_new_protected:Npn \siunitx_unit_format_power_repeat: {
- \tl_set:Nx \l_siunitx_tmpb_tl
- { per- \int_use:N \l_siunitx_unit_int }
- \prop_if_in:NVT \l_siunitx_unit_prop \l_siunitx_tmpb_tl
+\cs_new_protected:Npn \__siunitx_unit_format_power_repeat: {
+ \tl_set:Nx \l__siunitx_tmpb_tl
+ { per- \int_use:N \l__siunitx_unit_int }
+ \prop_if_in:NVT \l__siunitx_unit_prop \l__siunitx_tmpb_tl
{
- \tl_put_left:NV \l_siunitx_unit_current_tl \l_siunitx_per_symbol_tl
+ \tl_put_left:NV \l__siunitx_unit_current_tl \l__siunitx_per_symbol_tl
}
}
-\cs_new_protected:Npn \siunitx_unit_format_prefix: {
- \tl_set:Nx \l_siunitx_tmpa_tl
- { prefix-symbol- \int_use:N \l_siunitx_unit_int }
- \prop_if_in:NVT \l_siunitx_unit_prop \l_siunitx_tmpa_tl
+\cs_new_protected:Npn \__siunitx_unit_format_prefix: {
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { prefix-symbol- \int_use:N \l__siunitx_unit_int }
+ \prop_if_in:NVT \l__siunitx_unit_prop \l__siunitx_tmpa_tl
{
- \prop_get:NVN \l_siunitx_unit_prop \l_siunitx_tmpa_tl
- \l_siunitx_unit_prefix_current_tl
- \bool_if:NTF \l_siunitx_prefix_symbols_bool
- { \siunitx_unit_format_prefix_symbol: }
- { \siunitx_unit_format_prefix_number: }
+ \prop_get:NVN \l__siunitx_unit_prop \l__siunitx_tmpa_tl
+ \l__siunitx_unit_prefix_current_tl
+ \bool_if:NTF \l__siunitx_prefix_symbols_bool
+ { \__siunitx_unit_format_prefix_symbol: }
+ { \__siunitx_unit_format_prefix_number: }
}
}
-\cs_new_protected:Npn \siunitx_unit_format_prefix_number: {
- \tl_set:Nx \l_siunitx_tmpa_tl
- { prefix-base- \int_use:N \l_siunitx_unit_int }
- \prop_get:NVN \l_siunitx_unit_prop \l_siunitx_tmpa_tl
- \l_siunitx_tmpa_tl
- \int_compare:nNnT { \l_siunitx_unit_prefix_base_int } = { 0 }
+\cs_new_protected:Npn \__siunitx_unit_format_prefix_number: {
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { prefix-base- \int_use:N \l__siunitx_unit_int }
+ \prop_get:NVN \l__siunitx_unit_prop \l__siunitx_tmpa_tl
+ \l__siunitx_tmpa_tl
+ \int_compare:nNnT { \l__siunitx_unit_prefix_base_int } = { 0 }
{
- \int_set:Nn \l_siunitx_unit_prefix_base_int
- { \l_siunitx_tmpa_tl }
+ \int_set:Nn \l__siunitx_unit_prefix_base_int
+ { \l__siunitx_tmpa_tl }
}
\int_compare:nNnTF
- { \l_siunitx_unit_prefix_base_int } = { \l_siunitx_tmpa_tl }
- { \siunitx_unit_format_prefix_number_calc: }
+ { \l__siunitx_unit_prefix_base_int } = { \l__siunitx_tmpa_tl }
+ { \__siunitx_unit_format_prefix_number_calc: }
{ \msg_error:nn { siunitx } { prefix-base-mismatch } }
}
-\cs_new_protected:Npn \siunitx_unit_format_prefix_number_calc: {
- \tl_set:Nx \l_siunitx_tmpa_tl
- { power- \int_use:N \l_siunitx_unit_int }
- \prop_get:NVNF \l_siunitx_unit_prop \l_siunitx_tmpa_tl
- \l_siunitx_tmpa_tl
- { \tl_set:Nn \l_siunitx_tmpa_tl { 1 } }
- \tl_set:Nx \l_siunitx_tmpb_tl
- { unit- \int_use:N \l_siunitx_unit_int }
- \prop_get:NVN \l_siunitx_unit_prop \l_siunitx_tmpb_tl
- \l_siunitx_tmpb_tl
- \str_if_eq:VnT \l_siunitx_tmpb_tl { \gram }
- {
- \tl_set:Nx \l_siunitx_unit_prefix_current_tl
- { \int_eval:n { \l_siunitx_unit_prefix_current_tl - 3 } }
- \tl_set:Nx \l_siunitx_tmpb_tl
- { symbol- \int_use:N \l_siunitx_unit_int }
- \prop_put:NVn \l_siunitx_unit_prop \l_siunitx_tmpb_tl { kg }
- }
- \tl_set:Nx \l_siunitx_unit_prefix_current_tl
+\cs_new_protected:Npn \__siunitx_unit_format_prefix_number_calc: {
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { power- \int_use:N \l__siunitx_unit_int }
+ \prop_get:NVNF \l__siunitx_unit_prop \l__siunitx_tmpa_tl
+ \l__siunitx_tmpa_tl
+ { \tl_set:Nn \l__siunitx_tmpa_tl { 1 } }
+ \tl_set:Nx \l__siunitx_tmpb_tl
+ { unit- \int_use:N \l__siunitx_unit_int }
+ \prop_get:NVN \l__siunitx_unit_prop \l__siunitx_tmpb_tl
+ \l__siunitx_tmpb_tl
+ \str_if_eq:VnT \l__siunitx_tmpb_tl { \gram }
+ {
+ \tl_set:Nx \l__siunitx_unit_prefix_current_tl
+ { \int_eval:n { \l__siunitx_unit_prefix_current_tl - 3 } }
+ \tl_set:Nx \l__siunitx_tmpb_tl
+ { symbol- \int_use:N \l__siunitx_unit_int }
+ \prop_put:NVn \l__siunitx_unit_prop \l__siunitx_tmpb_tl { kg }
+ }
+ \tl_set:Nx \l__siunitx_unit_prefix_current_tl
{
\int_eval:n
- { \l_siunitx_unit_prefix_current_tl * \l_siunitx_tmpa_tl }
+ { \l__siunitx_unit_prefix_current_tl * \l__siunitx_tmpa_tl }
}
- \tl_set:Nx \l_siunitx_tmpa_tl
- { per- \int_use:N \l_siunitx_unit_int }
- \prop_if_in:NVTF \l_siunitx_unit_prop \l_siunitx_tmpa_tl
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { per- \int_use:N \l__siunitx_unit_int }
+ \prop_if_in:NVTF \l__siunitx_unit_prop \l__siunitx_tmpa_tl
{
- \int_set:Nn \l_siunitx_unit_prefix_int
+ \int_set:Nn \l__siunitx_unit_prefix_int
{
- \l_siunitx_unit_prefix_int
- - \l_siunitx_unit_prefix_current_tl
+ \l__siunitx_unit_prefix_int
+ - \l__siunitx_unit_prefix_current_tl
}
}
{
- \int_set:Nn \l_siunitx_unit_prefix_int
+ \int_set:Nn \l__siunitx_unit_prefix_int
{
- \l_siunitx_unit_prefix_int
- + \l_siunitx_unit_prefix_current_tl
+ \l__siunitx_unit_prefix_int
+ + \l__siunitx_unit_prefix_current_tl
}
}
}
-\cs_new_protected:Npn \siunitx_unit_format_prefix_symbol: {
- \tl_set_eq:NN \l_siunitx_unit_current_tl
- \l_siunitx_unit_prefix_current_tl
+\cs_new_protected:Npn \__siunitx_unit_format_prefix_symbol: {
+ \tl_set_eq:NN \l__siunitx_unit_current_tl
+ \l__siunitx_unit_prefix_current_tl
}
-\cs_new_protected:Npn \siunitx_unit_format_qualifier: {
- \tl_set:Nx \l_siunitx_tmpa_tl
- { qualifier- \int_use:N \l_siunitx_unit_int }
- \prop_get:NVNT \l_siunitx_unit_prop \l_siunitx_tmpa_tl
- \l_siunitx_tmpa_tl
+\cs_new_protected:Npn \__siunitx_unit_format_qualifier: {
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { qualifier- \int_use:N \l__siunitx_unit_int }
+ \prop_get:NVNT \l__siunitx_unit_prop \l__siunitx_tmpa_tl
+ \l__siunitx_tmpa_tl
{
\use:c
{
- siunitx_unit_format_qualifier_
- \l_siunitx_qualifier_mode_tl :
+ __siunitx_unit_format_qualifier_
+ \l__siunitx_qualifier_mode_tl :
}
}
}
-\cs_new_protected:Npn \siunitx_unit_format_qualifier_brackets: {
- \tl_put_right:NV \l_siunitx_unit_current_tl \l_siunitx_bracket_open_tl
- \tl_put_right:NV \l_siunitx_unit_current_tl \l_siunitx_tmpa_tl
- \tl_put_right:NV \l_siunitx_unit_current_tl \l_siunitx_bracket_close_tl
+\cs_new_protected:Npn \__siunitx_unit_format_qualifier_brackets: {
+ \tl_put_right:NV \l__siunitx_unit_current_tl \l__siunitx_bracket_open_tl
+ \tl_put_right:NV \l__siunitx_unit_current_tl \l__siunitx_tmpa_tl
+ \tl_put_right:NV \l__siunitx_unit_current_tl \l__siunitx_bracket_close_tl
}
-\cs_new_protected_nopar:Npn \siunitx_unit_format_qualifier_phrase:
+\cs_new_protected_nopar:Npn \__siunitx_unit_format_qualifier_phrase:
{
- \tl_put_right:NV \l_siunitx_unit_current_tl \l_siunitx_qualifier_phrase_tl
- \tl_put_right:NV \l_siunitx_unit_current_tl \l_siunitx_tmpa_tl
- \tl_set:Nx \l_siunitx_tmpa_tl
- { bracket- \int_use:N \l_siunitx_unit_int }
- \prop_put:NVn \l_siunitx_unit_prop \l_siunitx_tmpa_tl { true }
+ \tl_put_right:NV \l__siunitx_unit_current_tl \l__siunitx_qualifier_phrase_tl
+ \tl_put_right:NV \l__siunitx_unit_current_tl \l__siunitx_tmpa_tl
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { bracket- \int_use:N \l__siunitx_unit_int }
+ \prop_put:NVn \l__siunitx_unit_prop \l__siunitx_tmpa_tl { true }
}
\char_set_catcode_active:N \~
-\cs_new_protected:Npn \siunitx_unit_format_qualifier_space: {
- \tl_put_right:Nn \l_siunitx_unit_current_tl { \text { ~ } }
- \tl_put_right:NV \l_siunitx_unit_current_tl \l_siunitx_tmpa_tl
- \tl_set:Nx \l_siunitx_tmpa_tl
- { bracket- \int_use:N \l_siunitx_unit_int }
- \prop_put:NVn \l_siunitx_unit_prop \l_siunitx_tmpa_tl { true }
+\cs_new_protected:Npn \__siunitx_unit_format_qualifier_space: {
+ \tl_put_right:Nn \l__siunitx_unit_current_tl { \text { ~ } }
+ \tl_put_right:NV \l__siunitx_unit_current_tl \l__siunitx_tmpa_tl
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { bracket- \int_use:N \l__siunitx_unit_int }
+ \prop_put:NVn \l__siunitx_unit_prop \l__siunitx_tmpa_tl { true }
}
\char_set_catcode_space:N \~
-\cs_new_protected:Npn \siunitx_unit_format_qualifier_subscript: {
- \tl_put_right:Nx \l_siunitx_unit_current_tl
- { \exp_not:N \PrintSubscript { \exp_not:V \l_siunitx_tmpa_tl } }
+\cs_new_protected:Npn \__siunitx_unit_format_qualifier_subscript: {
+ \tl_put_right:Nx \l__siunitx_unit_current_tl
+ { \exp_not:N \PrintSubscript { \exp_not:V \l__siunitx_tmpa_tl } }
}
-\cs_new_protected:Npn \siunitx_unit_format_qualifier_text: {
- \tl_put_right:NV \l_siunitx_unit_current_tl \l_siunitx_tmpa_tl
+\cs_new_protected:Npn \__siunitx_unit_format_qualifier_text: {
+ \tl_put_right:NV \l__siunitx_unit_current_tl \l__siunitx_tmpa_tl
}
-\cs_new_protected:Npn \siunitx_unit_format_sorted:
+\cs_new_protected:Npn \__siunitx_unit_format_sorted:
{
- \tl_set_eq:NN \l_siunitx_unit_tl \l_siunitx_unit_numerator_tl
- \tl_if_empty:NT \l_siunitx_unit_tl
+ \tl_set_eq:NN \l__siunitx_unit_tl \l__siunitx_unit_numerator_tl
+ \tl_if_empty:NT \l__siunitx_unit_tl
{
- \tl_if_empty:NF \l_siunitx_unit_denominator_tl
+ \tl_if_empty:NF \l__siunitx_unit_denominator_tl
{
- \tl_put_right:NV \l_siunitx_unit_tl
- \l_siunitx_unit_product_tl
+ \tl_put_right:NV \l__siunitx_unit_tl
+ \l__siunitx_unit_product_tl
}
}
- \tl_put_right:NV \l_siunitx_unit_tl \l_siunitx_unit_denominator_tl
+ \tl_put_right:NV \l__siunitx_unit_tl \l__siunitx_unit_denominator_tl
}
-\cs_new_protected:Npn \siunitx_unit_format_symbol: {
- \tl_set:Nx \l_siunitx_tmpa_tl
- { symbol- \int_use:N \l_siunitx_unit_int }
- \prop_get:NVNTF \l_siunitx_unit_prop \l_siunitx_tmpa_tl
- \l_siunitx_tmpa_tl
+\cs_new_protected:Npn \__siunitx_unit_format_symbol: {
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { symbol- \int_use:N \l__siunitx_unit_int }
+ \prop_get:NVNTF \l__siunitx_unit_prop \l__siunitx_tmpa_tl
+ \l__siunitx_tmpa_tl
{
- \tl_put_right:NV \l_siunitx_unit_current_tl \l_siunitx_tmpa_tl
+ \tl_put_right:NV \l__siunitx_unit_current_tl \l__siunitx_tmpa_tl
}
- { \siunitx_unit_format_symbol_aux: }
+ { \__siunitx_unit_format_symbol_aux: }
}
-\cs_new_protected:Npn \siunitx_unit_format_symbol_aux: {
+\cs_new_protected:Npn \__siunitx_unit_format_symbol_aux: {
\msg_error:nn { siunitx } { prefix-only }
}
-\cs_new_protected:Npn \siunitx_unit_format_symbol_aux_alt: {
- \int_compare:nNnTF { \l_siunitx_unit_int } = { 1 }
+\cs_new_protected:Npn \__siunitx_unit_format_symbol_aux_alt: {
+ \int_compare:nNnTF { \l__siunitx_unit_int } = { 1 }
{
- \prop_del:Nn \l_siunitx_unit_prop { prefix-1 }
- \prop_del:Nn \l_siunitx_unit_prop { prefix-symbol-1 }
- \prop_del:Nn \l_siunitx_unit_prop { prefix-base-1 }
- \prop_if_empty:NF \l_siunitx_unit_prop
+ \prop_del:Nn \l__siunitx_unit_prop { prefix-1 }
+ \prop_del:Nn \l__siunitx_unit_prop { prefix-symbol-1 }
+ \prop_del:Nn \l__siunitx_unit_prop { prefix-base-1 }
+ \prop_if_empty:NF \l__siunitx_unit_prop
{ \msg_error:nn { siunitx } { prefix-only } }
}
{ \msg_error:nn { siunitx } { prefix-only } }
}
-\bool_new:N \l_siunitx_multi_brackets_bool
-\bool_new:N \l_siunitx_multi_repeat_bool
-\bool_new:N \l_siunitx_product_brackets_bool
-\bool_new:N \l_siunitx_product_power_bool
-\bool_new:N \l_siunitx_number_unit_repeat_bool
+\bool_new:N \l__siunitx_multi_brackets_bool
+\bool_new:N \l__siunitx_multi_repeat_bool
+\bool_new:N \l__siunitx_product_brackets_bool
+\bool_new:N \l__siunitx_product_power_bool
+\bool_new:N \l__siunitx_number_unit_repeat_bool
\keys_define:nn { siunitx } {
allow-number-unit-breaks .bool_set:N =
- \l_siunitx_number_unit_breaks_bool,
+ \l__siunitx_number_unit_breaks_bool,
multi-part-units .choice:,
multi-part-units
/ brackets .code:n =
{
- \bool_set_true:N \l_siunitx_multi_brackets_bool
- \bool_set_false:N \l_siunitx_multi_repeat_bool
+ \bool_set_true:N \l__siunitx_multi_brackets_bool
+ \bool_set_false:N \l__siunitx_multi_repeat_bool
},
multi-part-units
/ repeat .code:n =
{
- \bool_set_false:N \l_siunitx_multi_brackets_bool
- \bool_set_true:N \l_siunitx_multi_repeat_bool
+ \bool_set_false:N \l__siunitx_multi_brackets_bool
+ \bool_set_true:N \l__siunitx_multi_repeat_bool
},
multi-part-units
/ single .code:n =
{
- \bool_set_false:N \l_siunitx_multi_brackets_bool
- \bool_set_false:N \l_siunitx_multi_repeat_bool
+ \bool_set_false:N \l__siunitx_multi_brackets_bool
+ \bool_set_false:N \l__siunitx_multi_repeat_bool
},
number-unit-product .tl_set:N =
- \l_siunitx_number_unit_product_tl,
+ \l__siunitx_number_unit_product_tl,
number-unit-separator .tl_set:N =
- \l_siunitx_number_unit_product_tl,
+ \l__siunitx_number_unit_product_tl,
product-units .choice:,
product-units
/ brackets .code:n =
{
- \bool_set_true:N \l_siunitx_product_brackets_bool
- \bool_set_false:N \l_siunitx_product_power_bool
- \bool_set_false:N \l_siunitx_product_repeat_bool
+ \bool_set_true:N \l__siunitx_product_brackets_bool
+ \bool_set_false:N \l__siunitx_product_power_bool
+ \bool_set_false:N \l__siunitx_product_repeat_bool
},
product-units
/ brackets-power .code:n =
{
- \bool_set_true:N \l_siunitx_product_brackets_bool
- \bool_set_true:N \l_siunitx_product_power_bool
- \bool_set_false:N \l_siunitx_product_repeat_bool
+ \bool_set_true:N \l__siunitx_product_brackets_bool
+ \bool_set_true:N \l__siunitx_product_power_bool
+ \bool_set_false:N \l__siunitx_product_repeat_bool
},
product-units
/ power .code:n =
{
- \bool_set_false:N \l_siunitx_product_brackets_bool
- \bool_set_true:N \l_siunitx_product_power_bool
- \bool_set_false:N \l_siunitx_product_repeat_bool
+ \bool_set_false:N \l__siunitx_product_brackets_bool
+ \bool_set_true:N \l__siunitx_product_power_bool
+ \bool_set_false:N \l__siunitx_product_repeat_bool
},
product-units
/ repeat .code:n =
{
- \bool_set_false:N \l_siunitx_product_brackets_bool
- \bool_set_false:N \l_siunitx_product_power_bool
- \bool_set_true:N \l_siunitx_product_repeat_bool
+ \bool_set_false:N \l__siunitx_product_brackets_bool
+ \bool_set_false:N \l__siunitx_product_power_bool
+ \bool_set_true:N \l__siunitx_product_repeat_bool
},
product-units
/ single .code:n =
{
- \bool_set_false:N \l_siunitx_product_brackets_bool
- \bool_set_false:N \l_siunitx_product_power_bool
- \bool_set_false:N \l_siunitx_product_repeat_bool
+ \bool_set_false:N \l__siunitx_product_brackets_bool
+ \bool_set_false:N \l__siunitx_product_power_bool
+ \bool_set_false:N \l__siunitx_product_repeat_bool
},
}
\keys_set:nn { siunitx } {
@@ -5122,177 +5122,177 @@
number-unit-product = \,,
product-units = repeat,
}
-\cs_new_protected:Npn \siunitx_unit_output:nn #1#2 {
- \cs_set_eq:NN \siunitx_unit_format_symbol_aux:
- \siunitx_unit_format_symbol_aux_alt:
- \cs_set_eq:NN \siunitx_unit_format_fraction_symbol_aux_ii:
- \siunitx_unit_format_fraction_symbol_aux_alt:
- \siunitx_unit_in:nn {#1} {#2}
- \int_compare:nNnTF { \l_siunitx_unit_prefix_int } = { 0 }
+\cs_new_protected:Npn \__siunitx_unit_output:nn #1#2 {
+ \cs_set_eq:NN \__siunitx_unit_format_symbol_aux:
+ \__siunitx_unit_format_symbol_aux_alt:
+ \cs_set_eq:NN \__siunitx_unit_format_fraction_symbol_aux_ii:
+ \__siunitx_unit_format_fraction_symbol_aux_alt:
+ \__siunitx_unit_in:nn {#1} {#2}
+ \int_compare:nNnTF { \l__siunitx_unit_prefix_int } = { 0 }
{
- \str_if_eq:VnT \l_siunitx_per_mode_tl { symbol }
+ \str_if_eq:VnT \l__siunitx_per_mode_tl { symbol }
{
- \int_compare:nNnT { \l_siunitx_unit_numerator_int } = { 0 }
- { \siunitx_print:nn { unit } { 1 } }
+ \int_compare:nNnT { \l__siunitx_unit_numerator_int } = { 0 }
+ { \__siunitx_print:nn { unit } { 1 } }
}
}
{
- \tl_set:Nx \l_siunitx_tmpa_tl
+ \tl_set:Nx \l__siunitx_tmpa_tl
{
- \int_use:N \l_siunitx_unit_prefix_base_int
+ \int_use:N \l__siunitx_unit_prefix_base_int
\exp_not:N \PrintSuperscript
- { \int_use:N \l_siunitx_unit_prefix_int }
+ { \int_use:N \l__siunitx_unit_prefix_int }
}
- \siunitx_print:nV { number } \l_siunitx_tmpa_tl
- \siunitx_unit_output_number_sep:
+ \__siunitx_print:nV { number } \l__siunitx_tmpa_tl
+ \__siunitx_unit_output_number_sep:
}
- \siunitx_print:nV { unit } \l_siunitx_unit_tl
+ \__siunitx_print:nV { unit } \l__siunitx_unit_tl
}
-\cs_generate_variant:Nn \siunitx_unit_output:nn { V }
-\cs_new_protected:Npn \siunitx_unit_output_number_sep: {
- \bool_if:NTF \l_siunitx_number_unit_breaks_bool
+\cs_generate_variant:Nn \__siunitx_unit_output:nn { V }
+\cs_new_protected:Npn \__siunitx_unit_output_number_sep: {
+ \bool_if:NTF \l__siunitx_number_unit_breaks_bool
{ \penalty \binoppenalty } { \nobreak }
- \bool_if:NTF \l_siunitx_per_auto_bool
+ \bool_if:NTF \l__siunitx_per_auto_bool
{
\mode_if_math:TF
{
\tex_mathchoice:D
- { \l_siunitx_number_unit_product_tl }
- { \siunitx_unit_output_number_sep_aux: }
- { \siunitx_unit_output_number_sep_aux: }
- { \siunitx_unit_output_number_sep_aux: }
+ { \l__siunitx_number_unit_product_tl }
+ { \__siunitx_unit_output_number_sep_aux: }
+ { \__siunitx_unit_output_number_sep_aux: }
+ { \__siunitx_unit_output_number_sep_aux: }
}
- { \siunitx_unit_output_number_sep_aux: }
+ { \__siunitx_unit_output_number_sep_aux: }
}
- { \siunitx_unit_output_number_sep_aux: }
+ { \__siunitx_unit_output_number_sep_aux: }
}
-\cs_new_protected:Npn \siunitx_unit_output_number_sep_aux: {
- \bool_if:NF \l_siunitx_omit_unit_space_bool
- { \l_siunitx_number_unit_product_tl }
+\cs_new_protected:Npn \__siunitx_unit_output_number_sep_aux: {
+ \bool_if:NF \l__siunitx_omit_unit_space_bool
+ { \l__siunitx_number_unit_product_tl }
}
-\cs_new_protected:Npn \siunitx_unit_output_pre_print: {
- \tl_if_empty:NF \l_siunitx_pre_unit_tl
+\cs_new_protected:Npn \__siunitx_unit_output_pre_print: {
+ \tl_if_empty:NF \l__siunitx_pre_unit_tl
{
\nobreak
- \siunitx_print:nV { unit } \l_siunitx_pre_unit_tl
+ \__siunitx_print:nV { unit } \l__siunitx_pre_unit_tl
}
}
-\cs_new_protected:Npn \siunitx_unit_output_print: {
- \int_compare:nNnF { \l_siunitx_unit_prefix_int } = { 0 }
+\cs_new_protected:Npn \__siunitx_unit_output_print: {
+ \int_compare:nNnF { \l__siunitx_unit_prefix_int } = { 0 }
{
- \tl_set:Nx \l_siunitx_tmpa_tl
+ \tl_set:Nx \l__siunitx_tmpa_tl
{
- \bool_if:NTF \l_siunitx_tight_bool
+ \bool_if:NTF \l__siunitx_tight_bool
{
\exp_not:N \ensuremath
- { { \exp_not:V \l_siunitx_exponent_product_tl } }
+ { { \exp_not:V \l__siunitx_exponent_product_tl } }
}
{
\exp_not:N \ensuremath
- { { } \exp_not:V \l_siunitx_exponent_product_tl { } }
+ { { } \exp_not:V \l__siunitx_exponent_product_tl { } }
}
- \int_use:N \l_siunitx_unit_prefix_base_int
- ^ { \int_use:N \l_siunitx_unit_prefix_int }
+ \int_use:N \l__siunitx_unit_prefix_base_int
+ ^ { \int_use:N \l__siunitx_unit_prefix_int }
}
- \siunitx_print:nV { number } \l_siunitx_tmpa_tl
+ \__siunitx_print:nV { number } \l__siunitx_tmpa_tl
}
- \tl_if_empty:NF \l_siunitx_unit_tl
+ \tl_if_empty:NF \l__siunitx_unit_tl
{
- \siunitx_unit_output_number_sep:
- \siunitx_print:nV { unit } \l_siunitx_unit_tl
+ \__siunitx_unit_output_number_sep:
+ \__siunitx_print:nV { unit } \l__siunitx_unit_tl
}
}
\keys_define:nn { siunitx } {
- preunit .tl_set:N = \l_siunitx_preunit_tl ,
+ preunit .tl_set:N = \l__siunitx_preunit_tl ,
}
-\tl_new:N \l_siunitx_pre_unit_tl
-\int_new:N \l_siunitx_number_product_int
-\cs_new_protected:Npn \siunitx_combined:nnnn #1#2#3#4 {
+\tl_new:N \l__siunitx_pre_unit_tl
+\int_new:N \l__siunitx_number_product_int
+\cs_new_protected:Npn \__siunitx_combined:nnnn #1#2#3#4 {
\IfNoValueTF {#3}
- { \tl_clear:N \l_siunitx_pre_unit_tl }
+ { \tl_clear:N \l__siunitx_pre_unit_tl }
{
\group_begin:
- \siunitx_unit_in:nn {#3} {#1}
- \cs_set_eq:NN \l_siunitx_pre_unit_tl \l_siunitx_unit_tl
+ \__siunitx_unit_in:nn {#3} {#1}
+ \cs_set_eq:NN \l__siunitx_pre_unit_tl \l__siunitx_unit_tl
\exp_args:NNNo \group_end:
- \tl_set:Nn \l_siunitx_pre_unit_tl { \l_siunitx_unit_tl }
+ \tl_set:Nn \l__siunitx_pre_unit_tl { \l__siunitx_unit_tl }
}
- \cs_set_eq:NN \l_siunitx_brackets_bool
- \l_siunitx_multi_brackets_bool
- \siunitx_combined_unit:nnn {#2} {#4} {#1}
- \siunitx_combined_output:n {#2}
+ \cs_set_eq:NN \l__siunitx_brackets_bool
+ \l__siunitx_multi_brackets_bool
+ \__siunitx_combined_unit:nnn {#2} {#4} {#1}
+ \__siunitx_combined_output:n {#2}
}
-\cs_new_protected:Npn \siunitx_combined_output:n #1 {
- \bool_if:NTF \l_siunitx_number_parse_bool
+\cs_new_protected:Npn \__siunitx_combined_output:n #1 {
+ \bool_if:NTF \l__siunitx_number_parse_bool
{
- \tl_clear:N \l_siunitx_number_out_tl
- \bool_set_false:N \l_siunitx_number_compound_bool
- \siunitx_number_output_parse:n {#1}
+ \tl_clear:N \l__siunitx_number_out_tl
+ \bool_set_false:N \l__siunitx_number_compound_bool
+ \__siunitx_number_output_parse:n {#1}
}
{
- \siunitx_unit_output_pre_print:
- \siunitx_print:nn { number } { \ensuremath {#1} }
- \siunitx_unit_output_print:
+ \__siunitx_unit_output_pre_print:
+ \__siunitx_print:nn { number } { \ensuremath {#1} }
+ \__siunitx_unit_output_print:
}
}
-\cs_new_protected:Npn \siunitx_combined_unit:nnn #1#2#3 {
- \bool_if:NTF \l_siunitx_product_power_bool
+\cs_new_protected:Npn \__siunitx_combined_unit:nnn #1#2#3 {
+ \bool_if:NTF \l__siunitx_product_power_bool
{
- \siunitx_combined_product_count:n {#1}
- \int_compare:nNnTF { \l_siunitx_number_product_int } > { 0 }
+ \__siunitx_combined_product_count:n {#1}
+ \int_compare:nNnTF { \l__siunitx_number_product_int } > { 0 }
{
- \int_incr:N \l_siunitx_number_product_int
- \tl_set:Nn \l_siunitx_tmpa_tl {#2}
- \tl_set:Nx \l_siunitx_tmpb_tl
- { \tothe { \exp_not:V \l_siunitx_number_product_int } }
- \tl_put_right:NV \l_siunitx_tmpa_tl \l_siunitx_tmpb_tl
- \siunitx_unit_in:Vn \l_siunitx_tmpa_tl {#3}
+ \int_incr:N \l__siunitx_number_product_int
+ \tl_set:Nn \l__siunitx_tmpa_tl {#2}
+ \tl_set:Nx \l__siunitx_tmpb_tl
+ { \tothe { \exp_not:V \l__siunitx_number_product_int } }
+ \tl_put_right:NV \l__siunitx_tmpa_tl \l__siunitx_tmpb_tl
+ \__siunitx_unit_in:Vn \l__siunitx_tmpa_tl {#3}
}
- { \siunitx_unit_in:nn {#2} {#3} }
+ { \__siunitx_unit_in:nn {#2} {#3} }
}
- { \siunitx_unit_in:nn {#2} {#3} }
+ { \__siunitx_unit_in:nn {#2} {#3} }
}
-\cs_new_protected:Npn \siunitx_combined_product_count:n #1 {
- \int_zero:N \l_siunitx_number_product_int
- \tl_set:Nn \l_siunitx_tmpa_tl {#1}
- \tl_map_function:NN \l_siunitx_input_product_tl
- \siunitx_combined_product_count_aux:N
+\cs_new_protected:Npn \__siunitx_combined_product_count:n #1 {
+ \int_zero:N \l__siunitx_number_product_int
+ \tl_set:Nn \l__siunitx_tmpa_tl {#1}
+ \tl_map_function:NN \l__siunitx_input_product_tl
+ \__siunitx_combined_product_count_aux:N
}
-\cs_new_protected:Npn \siunitx_combined_product_count_aux:N #1 {
- \tl_if_in:NnT \l_siunitx_tmpa_tl {#1}
+\cs_new_protected:Npn \__siunitx_combined_product_count_aux:N #1 {
+ \tl_if_in:NnT \l__siunitx_tmpa_tl {#1}
{
- \int_incr:N \l_siunitx_number_product_int
- \tl_remove_once:Nn \l_siunitx_tmpa_tl {#1}
- \siunitx_combined_product_count_aux:N #1
+ \int_incr:N \l__siunitx_number_product_int
+ \tl_remove_once:Nn \l__siunitx_tmpa_tl {#1}
+ \__siunitx_combined_product_count_aux:N #1
}
}
-\bool_new:N \l_siunitx_list_brackets_bool
-\bool_new:N \l_siunitx_list_repeat_bool
-\tl_new:N \l_siunitx_list_current_tl
-\tl_new:N \l_siunitx_list_tl
+\bool_new:N \l__siunitx_list_brackets_bool
+\bool_new:N \l__siunitx_list_repeat_bool
+\tl_new:N \l__siunitx_list_current_tl
+\tl_new:N \l__siunitx_list_tl
\keys_define:nn { siunitx }
{
- list-final-separator .tl_set:N = \l_siunitx_list_separator_final_tl ,
- list-pair-separator .tl_set:N = \l_siunitx_list_separator_pair_tl ,
- list-separator .tl_set:N = \l_siunitx_list_separator_tl ,
+ list-final-separator .tl_set:N = \l__siunitx_list_separator_final_tl ,
+ list-pair-separator .tl_set:N = \l__siunitx_list_separator_pair_tl ,
+ list-separator .tl_set:N = \l__siunitx_list_separator_tl ,
list-units .choice:,
list-units
/ brackets .code:n =
{
- \bool_set_true:N \l_siunitx_list_brackets_bool
- \bool_set_false:N \l_siunitx_list_repeat_bool
+ \bool_set_true:N \l__siunitx_list_brackets_bool
+ \bool_set_false:N \l__siunitx_list_repeat_bool
},
list-units
/ repeat .code:n =
{
- \bool_set_false:N \l_siunitx_list_brackets_bool
- \bool_set_true:N \l_siunitx_list_repeat_bool
+ \bool_set_false:N \l__siunitx_list_brackets_bool
+ \bool_set_true:N \l__siunitx_list_repeat_bool
},
list-units
/ single .code:n =
{
- \bool_set_false:N \l_siunitx_list_brackets_bool
- \bool_set_false:N \l_siunitx_list_repeat_bool
+ \bool_set_false:N \l__siunitx_list_brackets_bool
+ \bool_set_false:N \l__siunitx_list_repeat_bool
}
}
\keys_set:nn { siunitx }
@@ -5302,153 +5302,153 @@
list-separator = { , ~ } ,
list-units = repeat
}
-\cs_new_protected:Npn \siunitx_list_numbers:n #1
+\cs_new_protected:Npn \__siunitx_list_numbers:n #1
{
- \tl_clear:N \l_siunitx_unit_tl
- \tl_clear:N \l_siunitx_preunit_tl
- \siunitx_list_numbers_aux_i:n {#1}
+ \tl_clear:N \l__siunitx_unit_tl
+ \tl_clear:N \l__siunitx_preunit_tl
+ \__siunitx_list_numbers_aux_i:n {#1}
}
-\cs_new_protected:Npn \siunitx_list_numbers_aux_i:n #1
+\cs_new_protected:Npn \__siunitx_list_numbers_aux_i:n #1
{
- \bool_set_true:N \l_siunitx_list_first_bool
- \tl_clear:N \l_siunitx_list_current_tl
+ \bool_set_true:N \l__siunitx_list_first_bool
+ \tl_clear:N \l__siunitx_list_current_tl
\int_compare:nNnTF { \tl_length:n {#1} } > \c_two
{
- \tl_map_function:nN {#1} \siunitx_list_numbers_aux_ii:n
- \l_siunitx_list_tl
- \l_siunitx_list_separator_final_tl
- \l_siunitx_list_current_tl
+ \tl_map_function:nN {#1} \__siunitx_list_numbers_aux_ii:n
+ \l__siunitx_list_tl
+ \l__siunitx_list_separator_final_tl
+ \l__siunitx_list_current_tl
}
{
\int_compare:nNnTF { \tl_length:n {#1} } = \c_two
- { \siunitx_list_numbers_aux:nn #1 }
- { \siunitx_combined_output:n #1 }
+ { \__siunitx_list_numbers_aux:nn #1 }
+ { \__siunitx_combined_output:n #1 }
}
}
-\cs_new_protected:Npn \siunitx_list_numbers_aux_ii:n #1
+\cs_new_protected:Npn \__siunitx_list_numbers_aux_ii:n #1
{
- \tl_if_empty:NTF \l_siunitx_list_tl
- { \tl_set_eq:NN \l_siunitx_list_tl \l_siunitx_list_current_tl }
+ \tl_if_empty:NTF \l__siunitx_list_tl
+ { \tl_set_eq:NN \l__siunitx_list_tl \l__siunitx_list_current_tl }
{
- \tl_put_right:NV \l_siunitx_list_tl \l_siunitx_list_separator_tl
- \tl_put_right:NV \l_siunitx_list_tl \l_siunitx_list_current_tl
+ \tl_put_right:NV \l__siunitx_list_tl \l__siunitx_list_separator_tl
+ \tl_put_right:NV \l__siunitx_list_tl \l__siunitx_list_current_tl
}
- \tl_set:Nn \l_siunitx_list_current_tl { \siunitx_combined_output:n {#1} }
+ \tl_set:Nn \l__siunitx_list_current_tl { \__siunitx_combined_output:n {#1} }
}
-\cs_new_protected:Npn \siunitx_list_numbers_aux:nn #1#2
+\cs_new_protected:Npn \__siunitx_list_numbers_aux:nn #1#2
{
- \siunitx_combined_output:n {#1}
- \l_siunitx_list_separator_pair_tl
- \siunitx_combined_output:n {#2}
+ \__siunitx_combined_output:n {#1}
+ \l__siunitx_list_separator_pair_tl
+ \__siunitx_combined_output:n {#2}
}
-\cs_new_protected:Npn \siunitx_list_units:nnn #1#2#3
+\cs_new_protected:Npn \__siunitx_list_units:nnn #1#2#3
{
- \siunitx_unit_parse_options:nn {#2} {#3}
- \bool_if:NTF \l_siunitx_list_repeat_bool
+ \__siunitx_unit_parse_options:nn {#2} {#3}
+ \bool_if:NTF \l__siunitx_list_repeat_bool
{
- \siunitx_unit_in:nn {#2} {#3}
- \siunitx_list_numbers_aux_i:n {#1}
+ \__siunitx_unit_in:nn {#2} {#3}
+ \__siunitx_list_numbers_aux_i:n {#1}
}
{
- \bool_if:NT \l_siunitx_process_fixed_bool
- { \bool_set_true:N \l_siunitx_process_drop_exponent_bool }
- \bool_if:NT \l_siunitx_list_brackets_bool
- { \siunitx_print:nV { number } \l_siunitx_bracket_open_tl }
- \siunitx_list_numbers:n {#1}
- \bool_if:NT \l_siunitx_list_brackets_bool
- { \siunitx_print:nV { number } \l_siunitx_bracket_close_tl }
- \siunitx_range_exponent:
- \siunitx_unit_output_number_sep:
- \siunitx_unit_output:nn {#2} {#3}
+ \bool_if:NT \l__siunitx_process_fixed_bool
+ { \bool_set_true:N \l__siunitx_process_drop_exponent_bool }
+ \bool_if:NT \l__siunitx_list_brackets_bool
+ { \__siunitx_print:nV { number } \l__siunitx_bracket_open_tl }
+ \__siunitx_list_numbers:n {#1}
+ \bool_if:NT \l__siunitx_list_brackets_bool
+ { \__siunitx_print:nV { number } \l__siunitx_bracket_close_tl }
+ \__siunitx_range_exponent:
+ \__siunitx_unit_output_number_sep:
+ \__siunitx_unit_output:nn {#2} {#3}
}
}
-\bool_new:N \l_siunitx_range_brackets_bool
-\bool_new:N \l_siunitx_range_repeat_bool
+\bool_new:N \l__siunitx_range_brackets_bool
+\bool_new:N \l__siunitx_range_repeat_bool
\keys_define:nn { siunitx } {
- range-phrase .tl_set:N = \l_siunitx_range_phrase_tl,
+ range-phrase .tl_set:N = \l__siunitx_range_phrase_tl,
range-units .choice:,
range-units
/ brackets .code:n =
{
- \bool_set_true:N \l_siunitx_range_brackets_bool
- \bool_set_false:N \l_siunitx_range_repeat_bool
+ \bool_set_true:N \l__siunitx_range_brackets_bool
+ \bool_set_false:N \l__siunitx_range_repeat_bool
},
range-units
/ repeat .code:n =
{
- \bool_set_false:N \l_siunitx_range_brackets_bool
- \bool_set_true:N \l_siunitx_range_repeat_bool
+ \bool_set_false:N \l__siunitx_range_brackets_bool
+ \bool_set_true:N \l__siunitx_range_repeat_bool
},
range-units
/ single .code:n =
{
- \bool_set_false:N \l_siunitx_range_brackets_bool
- \bool_set_false:N \l_siunitx_range_repeat_bool
+ \bool_set_false:N \l__siunitx_range_brackets_bool
+ \bool_set_false:N \l__siunitx_range_repeat_bool
},
}
\keys_set:nn { siunitx } {
range-phrase = { ~ to ~ },
range-units = repeat,
}
-\cs_new_protected:Npn \siunitx_range_numbers:nn #1#2
+\cs_new_protected:Npn \__siunitx_range_numbers:nn #1#2
{
- \siunitx_range_numbers_aux:n {#1}
- \l_siunitx_range_phrase_tl
- \siunitx_range_numbers_aux:n {#2}
+ \__siunitx_range_numbers_aux:n {#1}
+ \l__siunitx_range_phrase_tl
+ \__siunitx_range_numbers_aux:n {#2}
}
-\cs_new_protected:Npn \siunitx_range_numbers_aux:n #1
+\cs_new_protected:Npn \__siunitx_range_numbers_aux:n #1
{
- \bool_if:NTF \l_siunitx_number_parse_bool
+ \bool_if:NTF \l__siunitx_number_parse_bool
{
- \tl_clear:N \l_siunitx_number_out_tl
- \tl_clear:N \l_siunitx_number_out_saved_tl
- \bool_set_false:N \l_siunitx_number_compound_bool
- \siunitx_number_output_parse:n {#1}
- \bool_if:NT \l_siunitx_number_compound_bool
+ \tl_clear:N \l__siunitx_number_out_tl
+ \tl_clear:N \l__siunitx_number_out_saved_tl
+ \bool_set_false:N \l__siunitx_number_compound_bool
+ \__siunitx_number_output_parse:n {#1}
+ \bool_if:NT \l__siunitx_number_compound_bool
{ \msg_error:nnx { siunitx } { multi-part-range } {#1} }
}
{
- \siunitx_unit_output_pre_print:
- \siunitx_print:nn { number } {#1}
- \siunitx_unit_output_print:
+ \__siunitx_unit_output_pre_print:
+ \__siunitx_print:nn { number } {#1}
+ \__siunitx_unit_output_print:
}
}
-\cs_new_protected:Npn \siunitx_range_unit:nnnn #1#2#3#4 {
- \siunitx_unit_parse_options:nn {#1} {#2}
- \bool_if:NTF \l_siunitx_range_repeat_bool
+\cs_new_protected:Npn \__siunitx_range_unit:nnnn #1#2#3#4 {
+ \__siunitx_unit_parse_options:nn {#1} {#2}
+ \bool_if:NTF \l__siunitx_range_repeat_bool
{
- \siunitx_unit_in:nn {#1} {#2}
- \siunitx_range_numbers_aux:n {#3}
- \l_siunitx_range_phrase_tl
- \siunitx_range_numbers_aux:n {#4}
+ \__siunitx_unit_in:nn {#1} {#2}
+ \__siunitx_range_numbers_aux:n {#3}
+ \l__siunitx_range_phrase_tl
+ \__siunitx_range_numbers_aux:n {#4}
}
{
- \bool_if:NT \l_siunitx_process_fixed_bool
- { \bool_set_true:N \l_siunitx_process_drop_exponent_bool }
- \bool_if:NT \l_siunitx_range_brackets_bool
- { \siunitx_print:nV { number } \l_siunitx_bracket_open_tl }
- \siunitx_range_numbers:nn {#3} {#4}
- \bool_if:NT \l_siunitx_range_brackets_bool
- { \siunitx_print:nV { number } \l_siunitx_bracket_close_tl }
- \siunitx_range_exponent:
- \siunitx_unit_output_number_sep:
- \siunitx_unit_output:nn {#1} {#2}
+ \bool_if:NT \l__siunitx_process_fixed_bool
+ { \bool_set_true:N \l__siunitx_process_drop_exponent_bool }
+ \bool_if:NT \l__siunitx_range_brackets_bool
+ { \__siunitx_print:nV { number } \l__siunitx_bracket_open_tl }
+ \__siunitx_range_numbers:nn {#3} {#4}
+ \bool_if:NT \l__siunitx_range_brackets_bool
+ { \__siunitx_print:nV { number } \l__siunitx_bracket_close_tl }
+ \__siunitx_range_exponent:
+ \__siunitx_unit_output_number_sep:
+ \__siunitx_unit_output:nn {#1} {#2}
}
}
-\cs_new_protected:Npn \siunitx_range_exponent:
+\cs_new_protected:Npn \__siunitx_range_exponent:
{
- \bool_if:NT \l_siunitx_process_fixed_bool
+ \bool_if:NT \l__siunitx_process_fixed_bool
{
- \tl_set_eq:NN \l_siunitx_tmpa_tl \l_siunitx_exponent_product_tl
- \bool_if:NT \l_siunitx_tight_bool
- { \tl_set:Nx \l_siunitx_tmpa_tl { { \exp_not:o \l_siunitx_tmpa_tl } } }
- \tl_set:Nx \l_siunitx_tmpa_tl
+ \tl_set_eq:NN \l__siunitx_tmpa_tl \l__siunitx_exponent_product_tl
+ \bool_if:NT \l__siunitx_tight_bool
+ { \tl_set:Nx \l__siunitx_tmpa_tl { { \exp_not:o \l__siunitx_tmpa_tl } } }
+ \tl_set:Nx \l__siunitx_tmpa_tl
{
- \exp_not:N \ensuremath { { } \exp_not:o \l_siunitx_tmpa_tl { } }
+ \exp_not:N \ensuremath { { } \exp_not:o \l__siunitx_tmpa_tl { } }
10 \exp_not:N \PrintSuperscript
- { \int_use:N \l_siunitx_process_fixed_int }
+ { \int_use:N \l__siunitx_process_fixed_int }
}
- \siunitx_print:nV { number } \l_siunitx_tmpa_tl
+ \__siunitx_print:nV { number } \l__siunitx_tmpa_tl
}
}
\AtBeginDocument {
@@ -5456,497 +5456,497 @@
{
\newcolumntype { C } [1]
{ > { \bcolumn #1 \@nil } #1 < { \ecolumn } }
- \cs_set:Npn \siunitx_tmp:w #1 \NC@do S #2 \q_stop
+ \cs_set:Npn \__siunitx_tmp:w #1 \NC@do S #2 \q_stop
{ \NC@list { #1 #2 } }
- \exp_after:wN \siunitx_tmp:w \tex_the:D \NC@list \q_stop
+ \exp_after:wN \__siunitx_tmp:w \tex_the:D \NC@list \q_stop
\cs_undefine:N \NC@find@S
}
{ }
}
-\cs_new_protected:Npn \siunitx_table_rewrite_create:N #1 {
+\cs_new_protected:Npn \__siunitx_table_rewrite_create:N #1 {
\newcolumntype {#1} { }
\cs_set_protected:Npn
- \siunitx_table_rewrite_create_aux:w \NC@do ##1##2 \NC@do #1
+ \__siunitx_table_rewrite_create_aux:w \NC@do ##1##2 \NC@do #1
{ \NC@list { \NC@do ##1 \NC@do #1 ##2 } }
- \exp_after:wN \siunitx_table_rewrite_create_aux:w \tex_the:D \NC@list
+ \exp_after:wN \__siunitx_table_rewrite_create_aux:w \tex_the:D \NC@list
\exp_args:NNc \renewcommand * { NC@rewrite@ #1 } [1] [ ]
{
\@temptokena \exp_after:wN
{
\tex_the:D \@temptokena
- > { \siunitx_table_collect_begin:Nn #1 {##1} }
+ > { \__siunitx_table_collect_begin:Nn #1 {##1} }
c
- < { \siunitx_table_print: }
+ < { \__siunitx_table_print: }
}
\NC@find
}
}
-\cs_new_protected:Npn \siunitx_table_rewrite_create_aux:w { }
-\AtBeginDocument { \siunitx_table_rewrite_create:N s }
-\AtBeginDocument { \siunitx_table_rewrite_create:N S }
-\tl_new:N \l_siunitx_table_collect_tl
-\tl_new:N \l_siunitx_table_collect_pre_tl
-\tl_new:N \l_siunitx_table_collect_post_tl
-\tl_new:N \l_siunitx_number_valid_tl
-\bool_new:N \l_siunitx_table_math_bool
-\bool_new:N \l_siunitx_table_collect_pre_bool
-\bool_new:N \l_siunitx_table_collect_post_bool
-\cs_new_protected:Npn \siunitx_table_collect_begin:Nn #1#2 {
+\cs_new_protected:Npn \__siunitx_table_rewrite_create_aux:w { }
+\AtBeginDocument { \__siunitx_table_rewrite_create:N s }
+\AtBeginDocument { \__siunitx_table_rewrite_create:N S }
+\tl_new:N \l__siunitx_table_collect_tl
+\tl_new:N \l__siunitx_table_collect_pre_tl
+\tl_new:N \l__siunitx_table_collect_post_tl
+\tl_new:N \l__siunitx_number_valid_tl
+\bool_new:N \l__siunitx_table_math_bool
+\bool_new:N \l__siunitx_table_collect_pre_bool
+\bool_new:N \l__siunitx_table_collect_post_bool
+\cs_new_protected:Npn \__siunitx_table_collect_begin:Nn #1#2 {
\keys_set:nn { siunitx } {#2}
- \use:c { siunitx_table_collect_begin_ #1 : }
-}
-\cs_new_protected:Npn \siunitx_table_collect_begin_s: {
- \cs_set_eq:NN \siunitx_table_collect_token:N
- \siunitx_table_collect_token_s:N
- \cs_set_eq:NN \siunitx_table_print: \siunitx_table_print_s:
- \siunitx_table_collect_init_s:
- \siunitx_table_collect_get:
-}
-\cs_new_protected:Npn \siunitx_table_collect_begin_S: {
- \cs_set_eq:NN \siunitx_table_collect_token:N
- \siunitx_table_collect_token_S:N
- \cs_set_eq:NN \siunitx_table_print: \siunitx_table_print_S:
- \siunitx_table_collect_init_S:
- \siunitx_detect_font:
- \bool_if:NTF \l_siunitx_number_parse_bool
- { \siunitx_table_collect_get: }
- { \siunitx_table_print_S_direct:N }
-}
-\cs_new_protected:Npn \siunitx_table_collect_braced:n #1 { }
-\cs_new_protected:Npn \siunitx_table_collect_expand:N #1 {
+ \use:c { __siunitx_table_collect_begin_ #1 : }
+}
+\cs_new_protected:Npn \__siunitx_table_collect_begin_s: {
+ \cs_set_eq:NN \__siunitx_table_collect_token:N
+ \__siunitx_table_collect_token_s:N
+ \cs_set_eq:NN \__siunitx_table_print: \__siunitx_table_print_s:
+ \__siunitx_table_collect_init_s:
+ \__siunitx_table_collect_get:
+}
+\cs_new_protected:Npn \__siunitx_table_collect_begin_S: {
+ \cs_set_eq:NN \__siunitx_table_collect_token:N
+ \__siunitx_table_collect_token_S:N
+ \cs_set_eq:NN \__siunitx_table_print: \__siunitx_table_print_S:
+ \__siunitx_table_collect_init_S:
+ \__siunitx_detect_font:
+ \bool_if:NTF \l__siunitx_number_parse_bool
+ { \__siunitx_table_collect_get: }
+ { \__siunitx_table_print_S_direct:N }
+}
+\cs_new_protected:Npn \__siunitx_table_collect_braced:n #1 { }
+\cs_new_protected:Npn \__siunitx_table_collect_expand:N #1 {
\cs_if_eq:NNTF #1 \color
{
- \bool_if:NTF \l_siunitx_table_collect_pre_bool
+ \bool_if:NTF \l__siunitx_table_collect_pre_bool
{
- \tl_clear:N \l_siunitx_number_color_tl
- \tl_clear:N \l_siunitx_unit_color_tl
- \tl_put_right:Nn \l_siunitx_table_collect_pre_tl {#1}
+ \tl_clear:N \l__siunitx_number_color_tl
+ \tl_clear:N \l__siunitx_unit_color_tl
+ \tl_put_right:Nn \l__siunitx_table_collect_pre_tl {#1}
}
{
- \bool_set_true:N \l_siunitx_table_collect_post_bool
- \tl_put_right:Nn \l_siunitx_table_collect_post_tl {#1}
+ \bool_set_true:N \l__siunitx_table_collect_post_bool
+ \tl_put_right:Nn \l__siunitx_table_collect_post_tl {#1}
}
}
{
- \siunitx_cs_if_tl:NTF #1
+ \__siunitx_cs_if_tl:NTF #1
{
- \tl_use:N \l_siunitx_table_collect_pre_tl
- \tl_clear:N \l_siunitx_table_collect_pre_tl
- \cs_set:Npn \siunitx_table_collect_next:
- { \exp_after:wN \siunitx_table_collect_get: #1 }
+ \tl_use:N \l__siunitx_table_collect_pre_tl
+ \tl_clear:N \l__siunitx_table_collect_pre_tl
+ \cs_set:Npn \__siunitx_table_collect_next:
+ { \exp_after:wN \__siunitx_table_collect_get: #1 }
}
{
- \bool_if:NTF \l_siunitx_table_collect_pre_bool
+ \bool_if:NTF \l__siunitx_table_collect_pre_bool
{
- \tl_put_right:Nn \l_siunitx_table_collect_pre_tl {#1}
- \siunitx_table_collect_expand_math:N #1
+ \tl_put_right:Nn \l__siunitx_table_collect_pre_tl {#1}
+ \__siunitx_table_collect_expand_math:N #1
}
{
- \bool_set_true:N \l_siunitx_table_collect_post_bool
- \tl_put_right:Nn \l_siunitx_table_collect_post_tl {#1}
+ \bool_set_true:N \l__siunitx_table_collect_post_bool
+ \tl_put_right:Nn \l__siunitx_table_collect_post_tl {#1}
}
}
}
}
-\cs_new_protected:Npn \siunitx_table_collect_expand_math:N #1 {
+\cs_new_protected:Npn \__siunitx_table_collect_expand_math:N #1 {
\token_if_math_toggle:NTF #1
{
- \bool_if:NTF \l_siunitx_table_math_bool
- { \bool_set_false:N \l_siunitx_table_math_bool }
- { \bool_set_true:N \l_siunitx_table_math_bool }
+ \bool_if:NTF \l__siunitx_table_math_bool
+ { \bool_set_false:N \l__siunitx_table_math_bool }
+ { \bool_set_true:N \l__siunitx_table_math_bool }
}
{
\cs_if_eq:NNTF #1 \( % \)
- { \bool_set_true:N \l_siunitx_table_math_bool }
+ { \bool_set_true:N \l__siunitx_table_math_bool }
{ % \(
\cs_if_eq:NNT #1 \)
- { \bool_set_false:N \l_siunitx_table_math_bool }
+ { \bool_set_false:N \l__siunitx_table_math_bool }
}
}
}
-\cs_new_protected:Npn \siunitx_table_collect_get: {
- \cs_set_eq:NN \siunitx_table_collect_next:
- \siunitx_table_collect_get:
- \cs_set:Npn \peek_execute_branches:
+\cs_new_protected:Npn \__siunitx_table_collect_get: {
+ \cs_set_eq:NN \__siunitx_table_collect_next:
+ \__siunitx_table_collect_get:
+ \cs_set:Npn \__peek_execute_branches:
{
\if_catcode:w \exp_not:N \l_peek_token \c_group_begin_token
- \exp_after:wN \siunitx_table_collect_braced:n
+ \exp_after:wN \__siunitx_table_collect_braced:n
\else:
- \exp_after:wN \siunitx_table_collect_not_braced:N
+ \exp_after:wN \__siunitx_table_collect_not_braced:N
\fi:
}
- \peek_after:Nw \peek_ignore_spaces_execute_branches:
+ \peek_after:Nw \__peek_ignore_spaces_execute_branches:
}
-\cs_new_protected:Npn \siunitx_table_collect_init: {
- \tl_clear:N \l_siunitx_table_collect_tl
- \tl_clear:N \l_siunitx_table_collect_pre_tl
- \tl_clear:N \l_siunitx_table_collect_post_tl
- \bool_set_false:N \l_siunitx_table_collect_post_bool
- \bool_set_false:N \l_siunitx_table_math_bool
+\cs_new_protected:Npn \__siunitx_table_collect_init: {
+ \tl_clear:N \l__siunitx_table_collect_tl
+ \tl_clear:N \l__siunitx_table_collect_pre_tl
+ \tl_clear:N \l__siunitx_table_collect_post_tl
+ \bool_set_false:N \l__siunitx_table_collect_post_bool
+ \bool_set_false:N \l__siunitx_table_math_bool
}
-\cs_new_protected:Npn \siunitx_table_collect_init_s: {
- \siunitx_table_collect_init:
- \bool_set_false:N \l_siunitx_table_collect_pre_bool
- \cs_set_protected:Npn \siunitx_table_collect_braced:n ##1
+\cs_new_protected:Npn \__siunitx_table_collect_init_s: {
+ \__siunitx_table_collect_init:
+ \bool_set_false:N \l__siunitx_table_collect_pre_bool
+ \cs_set_protected:Npn \__siunitx_table_collect_braced:n ##1
{
- \tl_put_right:Nn \l_siunitx_table_collect_tl { {##1} }
- \siunitx_table_collect_next:
+ \tl_put_right:Nn \l__siunitx_table_collect_tl { {##1} }
+ \__siunitx_table_collect_next:
}
}
-\cs_new_protected:Npn \siunitx_table_collect_init_S: {
- \siunitx_number_in_init:
- \tl_set:Nx \l_siunitx_number_valid_tl
+\cs_new_protected:Npn \__siunitx_table_collect_init_S: {
+ \__siunitx_number_in_init:
+ \tl_set:Nx \l__siunitx_number_valid_tl
{
- \exp_not:V \l_siunitx_input_complex_tl
- \exp_not:V \l_siunitx_input_decimal_tl
- \exp_not:V \l_siunitx_input_digit_tl
- \exp_not:V \l_siunitx_input_exponent_tl
- \exp_not:V \l_siunitx_input_ignore_tl
- \exp_not:V \l_siunitx_input_comparator_tl
- \exp_not:V \l_siunitx_input_uncert_close_tl
- \exp_not:V \l_siunitx_input_uncert_open_tl
- \exp_not:V \l_siunitx_input_sign_tl
- \exp_not:V \l_siunitx_input_symbol_tl
+ \exp_not:V \l__siunitx_input_complex_tl
+ \exp_not:V \l__siunitx_input_decimal_tl
+ \exp_not:V \l__siunitx_input_digit_tl
+ \exp_not:V \l__siunitx_input_exponent_tl
+ \exp_not:V \l__siunitx_input_ignore_tl
+ \exp_not:V \l__siunitx_input_comparator_tl
+ \exp_not:V \l__siunitx_input_uncert_close_tl
+ \exp_not:V \l__siunitx_input_uncert_open_tl
+ \exp_not:V \l__siunitx_input_sign_tl
+ \exp_not:V \l__siunitx_input_symbol_tl
}
- \bool_set_true:N \l_siunitx_table_collect_pre_bool
- \cs_set_protected:Npn \siunitx_table_collect_braced:n ##1
+ \bool_set_true:N \l__siunitx_table_collect_pre_bool
+ \cs_set_protected:Npn \__siunitx_table_collect_braced:n ##1
{
- \bool_if:NTF \l_siunitx_table_collect_pre_bool
- { \tl_put_right:Nn \l_siunitx_table_collect_pre_tl { {##1} } }
+ \bool_if:NTF \l__siunitx_table_collect_pre_bool
+ { \tl_put_right:Nn \l__siunitx_table_collect_pre_tl { {##1} } }
{
- \bool_set_true:N \l_siunitx_table_collect_post_bool
- \tl_put_right:Nn \l_siunitx_table_collect_post_tl { {##1} }
+ \bool_set_true:N \l__siunitx_table_collect_post_bool
+ \tl_put_right:Nn \l__siunitx_table_collect_post_tl { {##1} }
}
- \siunitx_table_collect_next:
+ \__siunitx_table_collect_next:
}
}
-\cs_new_protected:Npn \siunitx_table_collect_next: { }
-\cs_new_protected:Npn \siunitx_table_collect_newline: {
- \siunitx_table_print:
- \cs_set_eq:NN \siunitx_table_print: \prg_do_nothing:
+\cs_new_protected:Npn \__siunitx_table_collect_next: { }
+\cs_new_protected:Npn \__siunitx_table_collect_newline: {
+ \__siunitx_table_print:
+ \cs_set_eq:NN \__siunitx_table_print: \prg_do_nothing:
\tabularnewline
}
-\cs_new_protected:Npn \siunitx_table_collect_end: {
- \siunitx_table_print:
- \cs_set_eq:NN \siunitx_table_print: \prg_do_nothing:
+\cs_new_protected:Npn \__siunitx_table_collect_end: {
+ \__siunitx_table_print:
+ \cs_set_eq:NN \__siunitx_table_print: \prg_do_nothing:
\end
}
-\cs_new_protected:Npn \siunitx_table_collect_not_braced:N #1 {
+\cs_new_protected:Npn \__siunitx_table_collect_not_braced:N #1 {
\token_if_eq_meaning:NNF #1 \tex_ignorespaces:D
{
\token_if_eq_meaning:NNF #1 \tex_unskip:D
- { \siunitx_table_collect_not_braced_aux_i:N #1 }
+ { \__siunitx_table_collect_not_braced_aux_i:N #1 }
}
- \siunitx_table_collect_next:
+ \__siunitx_table_collect_next:
}
-\cs_new_protected:Npn \siunitx_table_collect_not_braced_aux_i:N #1 {
- \cs_set:Npn \siunitx_table_collect_not_braced_aux_ii:N ##1
+\cs_new_protected:Npn \__siunitx_table_collect_not_braced_aux_i:N #1 {
+ \cs_set:Npn \__siunitx_table_collect_not_braced_aux_ii:N ##1
{
\token_if_eq_meaning:NNT #1 ##1
- { \cs_set_eq:NN \siunitx_table_collect_next: ##1 }
+ { \cs_set_eq:NN \__siunitx_table_collect_next: ##1 }
}
\tl_map_function:nN
- { \cs:w \scan_stop: \siunitx_table_print: }
- \siunitx_table_collect_not_braced_aux_ii:N
- \token_if_eq_meaning:NNT \siunitx_table_collect_next:
- \siunitx_table_collect_get:
+ { \cs:w \scan_stop: \__siunitx_table_print: }
+ \__siunitx_table_collect_not_braced_aux_ii:N
+ \token_if_eq_meaning:NNT \__siunitx_table_collect_next:
+ \__siunitx_table_collect_get:
{
\token_if_eq_meaning:NNTF #1 \tabularnewline
{
- \cs_set_eq:NN \siunitx_table_collect_next:
- \siunitx_table_collect_newline:
+ \cs_set_eq:NN \__siunitx_table_collect_next:
+ \__siunitx_table_collect_newline:
}
{
\token_if_eq_meaning:NNTF #1 \end
{
- \cs_set_eq:NN \siunitx_table_collect_next:
- \siunitx_table_collect_end:
+ \cs_set_eq:NN \__siunitx_table_collect_next:
+ \__siunitx_table_collect_end:
}
- { \siunitx_table_collect_token:N #1 }
+ { \__siunitx_table_collect_token:N #1 }
}
}
}
-\cs_new_protected:Npn \siunitx_table_collect_not_braced_aux_ii:N #1 { }
-\cs_new_protected:Npn \siunitx_table_collect_token:N #1 { }
-\cs_new_protected:Npn \siunitx_table_collect_token_s:N #1 {
- \tl_put_right:Nn \l_siunitx_table_collect_tl {#1}
+\cs_new_protected:Npn \__siunitx_table_collect_not_braced_aux_ii:N #1 { }
+\cs_new_protected:Npn \__siunitx_table_collect_token:N #1 { }
+\cs_new_protected:Npn \__siunitx_table_collect_token_s:N #1 {
+ \tl_put_right:Nn \l__siunitx_table_collect_tl {#1}
}
-\cs_new_protected:Npn \siunitx_table_collect_token_S:N #1 {
- \bool_if:NTF \l_siunitx_table_collect_post_bool
- { \tl_put_right:Nn \l_siunitx_table_collect_post_tl {#1} }
+\cs_new_protected:Npn \__siunitx_table_collect_token_S:N #1 {
+ \bool_if:NTF \l__siunitx_table_collect_post_bool
+ { \tl_put_right:Nn \l__siunitx_table_collect_post_tl {#1} }
{
- \tl_if_in:NnTF \l_siunitx_number_valid_tl {#1}
+ \tl_if_in:NnTF \l__siunitx_number_valid_tl {#1}
{
- \bool_set_false:N \l_siunitx_table_collect_pre_bool
- \tl_put_right:Nn \l_siunitx_table_collect_tl {#1}
+ \bool_set_false:N \l__siunitx_table_collect_pre_bool
+ \tl_put_right:Nn \l__siunitx_table_collect_tl {#1}
}
- { \siunitx_table_collect_expand:N #1 }
+ { \__siunitx_table_collect_expand:N #1 }
}
}
-\skip_new:N \c_siunitx_one_fill_skip
-\skip_set:Nn \c_siunitx_one_fill_skip { \c_zero_skip plus 1 fill }
+\skip_new:N \c__siunitx_one_fill_skip
+\skip_set:Nn \c__siunitx_one_fill_skip { \c_zero_skip plus 1 fill }
\AtBeginDocument
{
\@ifpackageloaded { colortbl }
{
- \cs_new_protected:Npn \siunitx_table_colortbl_correction:
+ \cs_new_protected:Npn \__siunitx_table_colortbl_correction:
{
\skip_horizontal:n { \c_zero_skip plus -0.5 fill }
\tex_kern:D \c_zero_skip
}
}
- { \cs_new_protected:Npn \siunitx_table_colortbl_correction: { } }
+ { \cs_new_protected:Npn \__siunitx_table_colortbl_correction: { } }
}
-\cs_new_protected:Npn \siunitx_table_align_left:n #1
+\cs_new_protected:Npn \__siunitx_table_align_left:n #1
{
- \siunitx_table_colortbl_correction:
+ \__siunitx_table_colortbl_correction:
\skip_horizontal:n {#1}
\tex_kern:D \c_zero_skip
}
-\cs_new_protected:Npn \siunitx_table_align_right:n #1
+\cs_new_protected:Npn \__siunitx_table_align_right:n #1
{
- \skip_horizontal:n { \c_siunitx_one_fill_skip - #1 }
+ \skip_horizontal:n { \c__siunitx_one_fill_skip - #1 }
\tex_kern:D \c_zero_skip
- \siunitx_table_colortbl_correction:
+ \__siunitx_table_colortbl_correction:
}
-\cs_new_eq:NN \siunitx_table_column_begin:n \siunitx_table_align_left:n
-\cs_new_eq:NN \siunitx_table_column_end:n \siunitx_table_align_right:n
+\cs_new_eq:NN \__siunitx_table_column_begin:n \__siunitx_table_align_left:n
+\cs_new_eq:NN \__siunitx_table_column_end:n \__siunitx_table_align_right:n
\keys_define:nn { siunitx }
{
table-column-width .code:n =
{
\dim_compare:nNnTF {#1} = { \c_zero_dim }
{
- \cs_set_eq:NN \siunitx_table_column_begin:n
- \siunitx_table_align_left:n
- \cs_set_eq:NN \siunitx_table_column_end:n
- \siunitx_table_align_right:n
+ \cs_set_eq:NN \__siunitx_table_column_begin:n
+ \__siunitx_table_align_left:n
+ \cs_set_eq:NN \__siunitx_table_column_end:n
+ \__siunitx_table_align_right:n
}
{
- \cs_set_protected:Npn \siunitx_table_column_begin:n ##1
+ \cs_set_protected:Npn \__siunitx_table_column_begin:n ##1
{
- \siunitx_table_colortbl_correction:
+ \__siunitx_table_colortbl_correction:
\tex_hbox:D to \dim_eval:n {#1}
\c_group_begin_token
\skip_horizontal:n {##1}
\tex_kern:D \c_zero_skip
}
- \cs_set_protected:Npn \siunitx_table_column_end:n ##1
+ \cs_set_protected:Npn \__siunitx_table_column_end:n ##1
{
- \skip_horizontal:n { \c_siunitx_one_fill_skip - ##1 }
+ \skip_horizontal:n { \c__siunitx_one_fill_skip - ##1 }
\tex_kern:D \c_zero_skip
\hbox_set_inline_end:
- \siunitx_table_colortbl_correction:
+ \__siunitx_table_colortbl_correction:
}
}
}
}
-\skip_new:N \l_siunitx_table_unit_align_skip
+\skip_new:N \l__siunitx_table_unit_align_skip
\keys_define:nn { siunitx }
{
table-unit-alignment .choice:,
table-unit-alignment /
center .code:n =
{
- \skip_set:Nn \l_siunitx_table_unit_align_skip
+ \skip_set:Nn \l__siunitx_table_unit_align_skip
{ \c_zero_skip plus 0.5 fill }
},
table-unit-alignment /
left .code:n =
- { \skip_set:Nn \l_siunitx_table_unit_align_skip { \c_zero_skip } },
+ { \skip_set:Nn \l__siunitx_table_unit_align_skip { \c_zero_skip } },
table-unit-alignment /
right .code:n =
{
- \skip_set:Nn \l_siunitx_table_unit_align_skip
+ \skip_set:Nn \l__siunitx_table_unit_align_skip
{ \c_zero_skip plus 1 fill }
}
}
\keys_set:nn { siunitx } { table-unit-alignment = center }
-\cs_new_protected:Npn \siunitx_table_print_s:
- {
- \siunitx_table_column_begin:n { \l_siunitx_table_unit_align_skip }
- \tl_if_empty:NF \l_siunitx_table_collect_tl
- { \siunitx_unit_output:Vn \l_siunitx_table_collect_tl { } }
- \siunitx_table_column_end:n { \l_siunitx_table_unit_align_skip }
- }
-\prop_new:N \l_siunitx_table_model_prop
-\dim_new:N \l_siunitx_table_exponent_dim
-\dim_new:N \l_siunitx_table_integer_dim
-\dim_new:N \l_siunitx_table_mantissa_dim
-\dim_new:N \l_siunitx_table_marker_dim
-\dim_new:N \l_siunitx_table_result_dim
-\dim_new:N \l_siunitx_table_uncert_dim
-\dim_new:N \l_siunitx_table_fill_pre_dim
-\dim_new:N \l_siunitx_table_fill_post_dim
-\dim_new:N \l_siunitx_table_fill_mid_dim
-\box_new:N \l_siunitx_table_pre_box
-\box_new:N \l_siunitx_table_post_box
-\box_new:N \l_siunitx_table_mantissa_box
-\box_new:N \l_siunitx_table_result_box
-\skip_new:N \l_siunitx_table_number_align_skip
-\skip_new:N \l_siunitx_table_text_align_skip
-\cs_new_protected:Npn \siunitx_table_print_S_direct_main: { }
-\cs_new_protected:Npn \siunitx_table_print_S_parsed: { }
-\cs_new_protected:Npn \siunitx_table_print_S_reserved_store_fill:n #1 { }
+\cs_new_protected:Npn \__siunitx_table_print_s:
+ {
+ \__siunitx_table_column_begin:n { \l__siunitx_table_unit_align_skip }
+ \tl_if_empty:NF \l__siunitx_table_collect_tl
+ { \__siunitx_unit_output:Vn \l__siunitx_table_collect_tl { } }
+ \__siunitx_table_column_end:n { \l__siunitx_table_unit_align_skip }
+ }
+\prop_new:N \l__siunitx_table_model_prop
+\dim_new:N \l__siunitx_table_exponent_dim
+\dim_new:N \l__siunitx_table_integer_dim
+\dim_new:N \l__siunitx_table_mantissa_dim
+\dim_new:N \l__siunitx_table_marker_dim
+\dim_new:N \l__siunitx_table_result_dim
+\dim_new:N \l__siunitx_table_uncert_dim
+\dim_new:N \l__siunitx_table_fill_pre_dim
+\dim_new:N \l__siunitx_table_fill_post_dim
+\dim_new:N \l__siunitx_table_fill_mid_dim
+\box_new:N \l__siunitx_table_pre_box
+\box_new:N \l__siunitx_table_post_box
+\box_new:N \l__siunitx_table_mantissa_box
+\box_new:N \l__siunitx_table_result_box
+\skip_new:N \l__siunitx_table_number_align_skip
+\skip_new:N \l__siunitx_table_text_align_skip
+\cs_new_protected:Npn \__siunitx_table_print_S_direct_main: { }
+\cs_new_protected:Npn \__siunitx_table_print_S_parsed: { }
+\cs_new_protected:Npn \__siunitx_table_print_S_reserved_store_fill:n #1 { }
\keys_define:nn { siunitx }
{
table-align-comparator .choice:,
table-align-comparator /
false .code:n =
{
- \cs_set_eq:NN \siunitx_table_print_S_reserved_store_fill:n
- \siunitx_table_print_S_reserved_store_fill_pre:n
+ \cs_set_eq:NN \__siunitx_table_print_S_reserved_store_fill:n
+ \__siunitx_table_print_S_reserved_store_fill_pre:n
},
table-align-comparator /
true .code:n =
{
- \cs_set_eq:NN \siunitx_table_print_S_reserved_store_fill:n
- \siunitx_table_print_S_reserved_store_fill_mid:n
+ \cs_set_eq:NN \__siunitx_table_print_S_reserved_store_fill:n
+ \__siunitx_table_print_S_reserved_store_fill_mid:n
},
table-align-comparator .default:n = true,
table-align-exponent .bool_set:N =
- \l_siunitx_table_align_exponent_bool,
+ \l__siunitx_table_align_exponent_bool,
table-align-text-pre .bool_set:N =
- \l_siunitx_table_align_text_pre_bool,
+ \l__siunitx_table_align_text_pre_bool,
table-align-text-post .bool_set:N =
- \l_siunitx_table_align_text_post_bool,
- table-align-uncertainty .bool_set:N = \l_siunitx_table_align_uncert_bool,
- table-auto-round .bool_set:N = \l_siunitx_table_auto_round_bool,
+ \l__siunitx_table_align_text_post_bool,
+ table-align-uncertainty .bool_set:N = \l__siunitx_table_align_uncert_bool,
+ table-auto-round .bool_set:N = \l__siunitx_table_auto_round_bool,
table-number-alignment .choice:,
table-number-alignment /
center .code:n =
{
- \skip_set:Nn \l_siunitx_table_number_align_skip
+ \skip_set:Nn \l__siunitx_table_number_align_skip
{ \c_zero_skip plus 0.5 fill }
- \cs_set_eq:NN \siunitx_table_print_S_direct_main:
- \siunitx_table_print_S_direct_reserved:
- \cs_set_eq:NN \siunitx_table_print_S_parsed:
- \siunitx_table_print_S_reserved:
+ \cs_set_eq:NN \__siunitx_table_print_S_direct_main:
+ \__siunitx_table_print_S_direct_reserved:
+ \cs_set_eq:NN \__siunitx_table_print_S_parsed:
+ \__siunitx_table_print_S_reserved:
},
table-number-alignment /
center-decimal-marker .code:n =
{
- \skip_set:Nn \l_siunitx_table_number_align_skip
+ \skip_set:Nn \l__siunitx_table_number_align_skip
{ \c_zero_skip plus 0.5 fill }
- \cs_set_eq:NN \siunitx_table_print_S_direct_main:
- \siunitx_table_print_S_direct_centered:
- \cs_set_eq:NN \siunitx_table_print_S_parsed:
- \siunitx_table_print_S_centered:
+ \cs_set_eq:NN \__siunitx_table_print_S_direct_main:
+ \__siunitx_table_print_S_direct_centered:
+ \cs_set_eq:NN \__siunitx_table_print_S_parsed:
+ \__siunitx_table_print_S_centered:
},
table-number-alignment /
left .code:n =
{
- \skip_zero:N \l_siunitx_table_number_align_skip
- \cs_set_eq:NN \siunitx_table_print_S_direct_main:
- \siunitx_table_print_S_direct_reserved:
- \cs_set_eq:NN \siunitx_table_print_S_parsed:
- \siunitx_table_print_S_reserved:
+ \skip_zero:N \l__siunitx_table_number_align_skip
+ \cs_set_eq:NN \__siunitx_table_print_S_direct_main:
+ \__siunitx_table_print_S_direct_reserved:
+ \cs_set_eq:NN \__siunitx_table_print_S_parsed:
+ \__siunitx_table_print_S_reserved:
},
table-number-alignment /
right .code:n =
{
- \skip_set:Nn \l_siunitx_table_number_align_skip
+ \skip_set:Nn \l__siunitx_table_number_align_skip
{ \c_zero_skip plus 1 fill }
- \cs_set_eq:NN \siunitx_table_print_S_direct_main:
- \siunitx_table_print_S_direct_reserved:
- \cs_set_eq:NN \siunitx_table_print_S_parsed:
- \siunitx_table_print_S_reserved:
+ \cs_set_eq:NN \__siunitx_table_print_S_direct_main:
+ \__siunitx_table_print_S_direct_reserved:
+ \cs_set_eq:NN \__siunitx_table_print_S_parsed:
+ \__siunitx_table_print_S_reserved:
},
table-omit-exponent .bool_set:N =
- \l_siunitx_table_omit_exponent_bool,
+ \l__siunitx_table_omit_exponent_bool,
table-text-alignment .choice:,
table-text-alignment /
center .code:n =
{
- \skip_set:Nn \l_siunitx_table_text_align_skip
+ \skip_set:Nn \l__siunitx_table_text_align_skip
{ \c_zero_skip plus 0.5 fill }
},
table-text-alignment /
left .code:n =
- { \skip_zero:N \l_siunitx_table_text_align_skip },
+ { \skip_zero:N \l__siunitx_table_text_align_skip },
table-text-alignment /
right .code:n =
{
- \skip_set:Nn \l_siunitx_table_text_align_skip
+ \skip_set:Nn \l__siunitx_table_text_align_skip
{ \c_zero_skip plus 1 fill }
},
table-comparator .choice:,
table-comparator /
false .code:n =
- { \prop_del:Nn \l_siunitx_table_model_prop { comparator } },
+ { \prop_del:Nn \l__siunitx_table_model_prop { comparator } },
table-comparator /
true .code:n =
- { \prop_put:Nnn \l_siunitx_table_model_prop { comparator } { > } },
+ { \prop_put:Nnn \l__siunitx_table_model_prop { comparator } { > } },
table-comparator .default:n = true,
table-figures-decimal .code:n =
{
\int_compare:nNnTF {#1} = \c_zero
{
- \prop_del:Nn \l_siunitx_table_model_prop { mantissa-decimal }
- \prop_del:Nn \l_siunitx_table_model_prop { mantissa-decimal-raw }
- \prop_del:Nn \l_siunitx_table_model_prop
+ \prop_del:Nn \l__siunitx_table_model_prop { mantissa-decimal }
+ \prop_del:Nn \l__siunitx_table_model_prop { mantissa-decimal-raw }
+ \prop_del:Nn \l__siunitx_table_model_prop
{ mantissa-decimal-marker }
- \prop_if_in:NnTF \l_siunitx_table_model_prop { mantissa-integer }
+ \prop_if_in:NnTF \l__siunitx_table_model_prop { mantissa-integer }
{
- \prop_put:Nnn \l_siunitx_table_model_prop { mantissa }
+ \prop_put:Nnn \l__siunitx_table_model_prop { mantissa }
{ true }
}
- { \prop_del:Nn \l_siunitx_table_model_prop { mantissa } }
+ { \prop_del:Nn \l__siunitx_table_model_prop { mantissa } }
}
{
- \prop_put:Nnx \l_siunitx_table_model_prop { mantissa-decimal }
+ \prop_put:Nnx \l__siunitx_table_model_prop { mantissa-decimal }
{ \prg_replicate:nn {#1} { 8 } }
- \prop_put:Nnn \l_siunitx_table_model_prop { mantissa-decimal-raw }
+ \prop_put:Nnn \l__siunitx_table_model_prop { mantissa-decimal-raw }
{#1}
- \prop_put:Nnn \l_siunitx_table_model_prop { mantissa } { true }
- \prop_put:NnV \l_siunitx_table_model_prop
- { mantissa-decimal-marker } \l_siunitx_output_decimal_tl
+ \prop_put:Nnn \l__siunitx_table_model_prop { mantissa } { true }
+ \prop_put:NnV \l__siunitx_table_model_prop
+ { mantissa-decimal-marker } \l__siunitx_output_decimal_tl
}
},
table-figures-exponent .code:n =
{
\int_compare:nNnTF {#1} = \c_zero
- { \prop_del:Nn \l_siunitx_table_model_prop { exponent-integer } }
+ { \prop_del:Nn \l__siunitx_table_model_prop { exponent-integer } }
{
- \prop_put:Nnx \l_siunitx_table_model_prop { exponent-integer }
+ \prop_put:Nnx \l__siunitx_table_model_prop { exponent-integer }
{ \prg_replicate:nn {#1} { 8 } }
- \prop_put:Nnn \l_siunitx_table_model_prop { exponent } { true }
+ \prop_put:Nnn \l__siunitx_table_model_prop { exponent } { true }
}
},
table-figures-integer .code:n =
{
\int_compare:nNnTF {#1} = \c_zero
{
- \prop_del:Nn \l_siunitx_table_model_prop { mantissa-integer }
- \prop_if_in:NnTF \l_siunitx_table_model_prop { mantissa-decimal }
+ \prop_del:Nn \l__siunitx_table_model_prop { mantissa-integer }
+ \prop_if_in:NnTF \l__siunitx_table_model_prop { mantissa-decimal }
{
- \prop_put:Nnn \l_siunitx_table_model_prop { mantissa }
+ \prop_put:Nnn \l__siunitx_table_model_prop { mantissa }
{ true }
}
- { \prop_del:Nn \l_siunitx_table_model_prop { mantissa } }
+ { \prop_del:Nn \l__siunitx_table_model_prop { mantissa } }
}
{
- \prop_put:Nnx \l_siunitx_table_model_prop { mantissa-integer }
+ \prop_put:Nnx \l__siunitx_table_model_prop { mantissa-integer }
{ \prg_replicate:nn {#1} { 8 } }
- \prop_put:Nnn \l_siunitx_table_model_prop { mantissa } { true }
+ \prop_put:Nnn \l__siunitx_table_model_prop { mantissa } { true }
}
},
table-figures-uncertainty .code:n =
{
\int_compare:nNnTF {#1} = \c_zero
- { \prop_del:Nn \l_siunitx_table_model_prop { mantissa-uncertainty } }
+ { \prop_del:Nn \l__siunitx_table_model_prop { mantissa-uncertainty } }
{
- \prop_put:Nnx \l_siunitx_table_model_prop { mantissa-uncertainty }
+ \prop_put:Nnx \l__siunitx_table_model_prop { mantissa-uncertainty }
{ \prg_replicate:nn {#1} { 8 } }
}
},
- table-parse-only .bool_set:N = \l_siunitx_table_parse_only_bool,
- table-space-text-pre .tl_set:N = \l_siunitx_table_pre_tl,
- table-space-text-post .tl_set:N = \l_siunitx_table_post_tl,
+ table-parse-only .bool_set:N = \l__siunitx_table_parse_only_bool,
+ table-space-text-pre .tl_set:N = \l__siunitx_table_pre_tl,
+ table-space-text-post .tl_set:N = \l__siunitx_table_post_tl,
table-sign-exponent .code:n =
- { \prop_put:Nnn \l_siunitx_table_model_prop { exponent-sign } { - } },
+ { \prop_put:Nnn \l__siunitx_table_model_prop { exponent-sign } { - } },
table-sign-mantissa .code:n =
- { \prop_put:Nnn \l_siunitx_table_model_prop { mantissa-sign } { - } },
+ { \prop_put:Nnn \l__siunitx_table_model_prop { mantissa-sign } { - } },
}
\keys_define:nn { siunitx }
{
@@ -5961,149 +5961,149 @@
{
table-format .code:n =
{
- \siunitx_number_in_parse:n {#1}
- \prop_set_eq:NN \l_siunitx_table_model_prop \l_siunitx_number_in_prop
- \tl_clear:N \l_siunitx_tmpa_tl
- \prop_get:NnNT \l_siunitx_number_in_prop { mantissa-integer }
- \l_siunitx_tmpb_tl
+ \__siunitx_number_in_parse:n {#1}
+ \prop_set_eq:NN \l__siunitx_table_model_prop \l__siunitx_number_in_prop
+ \tl_clear:N \l__siunitx_tmpa_tl
+ \prop_get:NnNT \l__siunitx_number_in_prop { mantissa-integer }
+ \l__siunitx_tmpb_tl
{
- \tl_set:Nx \l_siunitx_tmpa_tl
- { table-figures-integer = \l_siunitx_tmpb_tl }
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { table-figures-integer = \l__siunitx_tmpb_tl }
}
- \prop_get:NnNT \l_siunitx_number_in_prop { mantissa-decimal }
- \l_siunitx_tmpb_tl
+ \prop_get:NnNT \l__siunitx_number_in_prop { mantissa-decimal }
+ \l__siunitx_tmpb_tl
{
- \clist_put_right:Nx \l_siunitx_tmpa_tl
- { table-figures-decimal = \l_siunitx_tmpb_tl }
+ \clist_put_right:Nx \l__siunitx_tmpa_tl
+ { table-figures-decimal = \l__siunitx_tmpb_tl }
}
- \prop_get:NnNT \l_siunitx_number_in_prop { mantissa-uncertainty }
- \l_siunitx_tmpb_tl
+ \prop_get:NnNT \l__siunitx_number_in_prop { mantissa-uncertainty }
+ \l__siunitx_tmpb_tl
{
- \clist_put_right:Nx \l_siunitx_tmpa_tl
- { table-figures-uncertainty = \l_siunitx_tmpb_tl }
+ \clist_put_right:Nx \l__siunitx_tmpa_tl
+ { table-figures-uncertainty = \l__siunitx_tmpb_tl }
}
- \prop_get:NnNT \l_siunitx_number_in_prop { exponent-integer }
- \l_siunitx_tmpb_tl
+ \prop_get:NnNT \l__siunitx_number_in_prop { exponent-integer }
+ \l__siunitx_tmpb_tl
{
- \clist_put_right:Nx \l_siunitx_tmpa_tl
- { table-figures-exponent = \l_siunitx_tmpb_tl }
+ \clist_put_right:Nx \l__siunitx_tmpa_tl
+ { table-figures-exponent = \l__siunitx_tmpb_tl }
}
- \clist_put_right:Nn \l_siunitx_tmpa_tl
+ \clist_put_right:Nn \l__siunitx_tmpa_tl
{ table-number-alignment = center }
- \keys_set:nV { siunitx } \l_siunitx_tmpa_tl
+ \keys_set:nV { siunitx } \l__siunitx_tmpa_tl
}
}
-\cs_new_protected:Npn \siunitx_table_print_S:
+\cs_new_protected:Npn \__siunitx_table_print_S:
{
- \bool_if:NTF \l_siunitx_table_collect_pre_bool
+ \bool_if:NTF \l__siunitx_table_collect_pre_bool
{
- \siunitx_table_column_begin:n { \l_siunitx_table_text_align_skip }
- \l_siunitx_table_collect_pre_tl
- \siunitx_table_column_end:n { \l_siunitx_table_text_align_skip }
+ \__siunitx_table_column_begin:n { \l__siunitx_table_text_align_skip }
+ \l__siunitx_table_collect_pre_tl
+ \__siunitx_table_column_end:n { \l__siunitx_table_text_align_skip }
}
{
- \siunitx_table_column_begin:n { \l_siunitx_table_number_align_skip }
- \bool_if:NTF \l_siunitx_table_parse_only_bool
- { \siunitx_table_print_S_no_alignment: }
- { \siunitx_table_print_S_alignment: }
- \bool_if:NTF \l_siunitx_table_align_text_pre_bool
- { \siunitx_table_print_S_pre_aligned: }
- { \siunitx_table_print_S_pre_not_aligned: }
- \box_use:N \l_siunitx_table_result_box
- \bool_if:NTF \l_siunitx_table_align_text_post_bool
- { \siunitx_table_print_S_post_aligned: }
- { \siunitx_table_print_S_post_not_aligned: }
- \siunitx_table_column_end:n { \l_siunitx_table_number_align_skip }
+ \__siunitx_table_column_begin:n { \l__siunitx_table_number_align_skip }
+ \bool_if:NTF \l__siunitx_table_parse_only_bool
+ { \__siunitx_table_print_S_no_alignment: }
+ { \__siunitx_table_print_S_alignment: }
+ \bool_if:NTF \l__siunitx_table_align_text_pre_bool
+ { \__siunitx_table_print_S_pre_aligned: }
+ { \__siunitx_table_print_S_pre_not_aligned: }
+ \box_use:N \l__siunitx_table_result_box
+ \bool_if:NTF \l__siunitx_table_align_text_post_bool
+ { \__siunitx_table_print_S_post_aligned: }
+ { \__siunitx_table_print_S_post_not_aligned: }
+ \__siunitx_table_column_end:n { \l__siunitx_table_number_align_skip }
}
}
-\cs_new_protected:Npn \siunitx_table_print_S_no_alignment:
+\cs_new_protected:Npn \__siunitx_table_print_S_no_alignment:
{
- \l_siunitx_table_collect_pre_tl
- \siunitx_number_output:V \l_siunitx_table_collect_tl
- \l_siunitx_table_collect_post_tl
+ \l__siunitx_table_collect_pre_tl
+ \__siunitx_number_output:V \l__siunitx_table_collect_tl
+ \l__siunitx_table_collect_post_tl
}
-\cs_new_protected:Npn \siunitx_table_print_S_alignment:
- { \siunitx_table_print_S_parsed: }
-\cs_new_protected:Npn \siunitx_table_print_S_parse:
+\cs_new_protected:Npn \__siunitx_table_print_S_alignment:
+ { \__siunitx_table_print_S_parsed: }
+\cs_new_protected:Npn \__siunitx_table_print_S_parse:
{
- \bool_set_false:N \l_siunitx_error_bool
- \siunitx_number_in_parse:V \l_siunitx_table_collect_tl
- \bool_if:NF \l_siunitx_error_bool
+ \bool_set_false:N \l__siunitx_error_bool
+ \__siunitx_number_in_parse:V \l__siunitx_table_collect_tl
+ \bool_if:NF \l__siunitx_error_bool
{
- \bool_if:NTF \l_siunitx_table_omit_exponent_bool
+ \bool_if:NTF \l__siunitx_table_omit_exponent_bool
{
- \bool_set_true:N \l_siunitx_process_fixed_bool
- \siunitx_number_process:
- \prop_del:Nn \l_siunitx_number_in_prop { exponent }
- \prop_del:Nn \l_siunitx_number_in_prop { exponent-integer }
+ \bool_set_true:N \l__siunitx_process_fixed_bool
+ \__siunitx_number_process:
+ \prop_del:Nn \l__siunitx_number_in_prop { exponent }
+ \prop_del:Nn \l__siunitx_number_in_prop { exponent-integer }
}
- { \siunitx_number_process: }
- \siunitx_number_format:
- \siunitx_number_output_color:
+ { \__siunitx_number_process: }
+ \__siunitx_number_format:
+ \__siunitx_number_output_color:
}
}
-\cs_new_protected:Npn \siunitx_table_print_S_measure:NN #1#2
+\cs_new_protected:Npn \__siunitx_table_print_S_measure:NN #1#2
{
\tl_if_empty:NTF #1
{ \dim_zero:N #2 }
{
\group_begin:
- \hbox_set:Nn \l_siunitx_tmp_box
- { \siunitx_print:nV { number } #1 }
+ \hbox_set:Nn \l__siunitx_tmp_box
+ { \__siunitx_print:nV { number } #1 }
\exp_args:NNNo \group_end:
- \dim_set:Nn #2 { \dim_use:N \box_wd:N \l_siunitx_tmp_box }
+ \dim_set:Nn #2 { \dim_use:N \box_wd:N \l__siunitx_tmp_box }
}
}
-\cs_new_protected:Npn \siunitx_table_print_S_pre_aligned:
+\cs_new_protected:Npn \__siunitx_table_print_S_pre_aligned:
{
- \box_use:N \l_siunitx_table_pre_box
- \hbox_to_wd:nn { \l_siunitx_table_fill_pre_dim } { \tex_hfil:D }
+ \box_use:N \l__siunitx_table_pre_box
+ \hbox_to_wd:nn { \l__siunitx_table_fill_pre_dim } { \tex_hfil:D }
}
-\cs_new_protected:Npn \siunitx_table_print_S_pre_not_aligned:
+\cs_new_protected:Npn \__siunitx_table_print_S_pre_not_aligned:
{
- \hbox_to_wd:nn { \l_siunitx_table_fill_pre_dim } { \tex_hfil:D }
- \box_use:N \l_siunitx_table_pre_box
+ \hbox_to_wd:nn { \l__siunitx_table_fill_pre_dim } { \tex_hfil:D }
+ \box_use:N \l__siunitx_table_pre_box
}
-\cs_new_protected:Npn \siunitx_table_print_S_post_aligned:
+\cs_new_protected:Npn \__siunitx_table_print_S_post_aligned:
{
- \hbox_to_wd:nn { \l_siunitx_table_fill_post_dim } { \tex_hfil:D }
- \box_use:N \l_siunitx_table_post_box
+ \hbox_to_wd:nn { \l__siunitx_table_fill_post_dim } { \tex_hfil:D }
+ \box_use:N \l__siunitx_table_post_box
}
-\cs_new_protected:Npn \siunitx_table_print_S_post_not_aligned:
+\cs_new_protected:Npn \__siunitx_table_print_S_post_not_aligned:
{
- \box_use:N \l_siunitx_table_post_box
- \hbox_to_wd:nn { \l_siunitx_table_fill_post_dim } { \tex_hfil:D }
+ \box_use:N \l__siunitx_table_post_box
+ \hbox_to_wd:nn { \l__siunitx_table_fill_post_dim } { \tex_hfil:D }
}
-\cs_new_protected:Npn \siunitx_table_print_S_centered:
+\cs_new_protected:Npn \__siunitx_table_print_S_centered:
{
- \siunitx_table_print_S_centered_ends:
- \bool_if:NT \l_siunitx_table_math_bool { \c_math_toggle_token }
- \siunitx_table_print_S_parse:
- \bool_if:NF \l_siunitx_error_bool
+ \__siunitx_table_print_S_centered_ends:
+ \bool_if:NT \l__siunitx_table_math_bool { \c_math_toggle_token }
+ \__siunitx_table_print_S_parse:
+ \bool_if:NF \l__siunitx_error_bool
{
- \siunitx_table_print_S_centered_measure:
- \bool_if:NT \l_siunitx_table_math_bool { \c_math_toggle_token }
- \dim_set:Nn \l_siunitx_table_fill_pre_dim
+ \__siunitx_table_print_S_centered_measure:
+ \bool_if:NT \l__siunitx_table_math_bool { \c_math_toggle_token }
+ \dim_set:Nn \l__siunitx_table_fill_pre_dim
{
- \l_siunitx_table_result_dim
- - \l_siunitx_table_integer_dim
- \prop_if_in:NnT \l_siunitx_number_out_prop
+ \l__siunitx_table_result_dim
+ - \l__siunitx_table_integer_dim
+ \prop_if_in:NnT \l__siunitx_number_out_prop
{ mantissa-decimal-marker }
- { - \l_siunitx_table_marker_dim }
+ { - \l__siunitx_table_marker_dim }
}
- \dim_compare:nNnTF \l_siunitx_table_integer_dim >
- \l_siunitx_table_fill_pre_dim
- { \siunitx_table_print_S_centered_integer: }
- { \siunitx_table_print_S_centered_decimal: }
+ \dim_compare:nNnTF \l__siunitx_table_integer_dim >
+ \l__siunitx_table_fill_pre_dim
+ { \__siunitx_table_print_S_centered_integer: }
+ { \__siunitx_table_print_S_centered_decimal: }
}
}
-\cs_new_protected:Npn \siunitx_table_print_S_centered_ends:
+\cs_new_protected:Npn \__siunitx_table_print_S_centered_ends:
{
- \hbox_set:Nn \l_siunitx_table_pre_box
+ \hbox_set:Nn \l__siunitx_table_pre_box
{
{
- \l_siunitx_table_collect_pre_tl
- \bool_if:NT \l_siunitx_table_math_bool
+ \l__siunitx_table_collect_pre_tl
+ \bool_if:NT \l__siunitx_table_math_bool
{
\scan_stop:
\c_math_toggle_token
@@ -6111,126 +6111,126 @@
}
}
\dim_compare:nNnT
- { \box_wd:N \l_siunitx_table_pre_box } = \c_zero_skip
+ { \box_wd:N \l__siunitx_table_pre_box } = \c_zero_skip
{
- \l_siunitx_table_collect_pre_tl
- \bool_set_false:N \l_siunitx_font_set_bool
+ \l__siunitx_table_collect_pre_tl
+ \bool_set_false:N \l__siunitx_font_set_bool
}
- \hbox_set:Nn \l_siunitx_table_post_box
+ \hbox_set:Nn \l__siunitx_table_post_box
{
- \bool_if:NT \l_siunitx_table_math_bool
+ \bool_if:NT \l__siunitx_table_math_bool
{
\c_math_toggle_token
\scan_stop:
}
- \l_siunitx_table_collect_post_tl
+ \l__siunitx_table_collect_post_tl
}
\dim_compare:nNnTF
- { \box_wd:N \l_siunitx_table_pre_box } >
- { \box_wd:N \l_siunitx_table_post_box }
+ { \box_wd:N \l__siunitx_table_pre_box } >
+ { \box_wd:N \l__siunitx_table_post_box }
{
- \hbox_set_to_wd:Nnn \l_siunitx_table_post_box
- { \box_wd:N \l_siunitx_table_pre_box }
+ \hbox_set_to_wd:Nnn \l__siunitx_table_post_box
+ { \box_wd:N \l__siunitx_table_pre_box }
{
- \hbox_unpack:N \l_siunitx_table_post_box
+ \hbox_unpack:N \l__siunitx_table_post_box
\tex_hfil:D
}
}
{
- \hbox_set_to_wd:Nnn \l_siunitx_table_pre_box
- { \box_wd:N \l_siunitx_table_post_box }
+ \hbox_set_to_wd:Nnn \l__siunitx_table_pre_box
+ { \box_wd:N \l__siunitx_table_post_box }
{
\tex_hfil:D
- \hbox_unpack:N \l_siunitx_table_pre_box
+ \hbox_unpack:N \l__siunitx_table_pre_box
}
}
}
-\cs_new_protected:Npn \siunitx_table_print_S_centered_measure:
+\cs_new_protected:Npn \__siunitx_table_print_S_centered_measure:
{
- \siunitx_table_print_S_centered_measure_int_part:
- \siunitx_table_print_S_centered_measure_marker:
- \siunitx_table_print_S_centered_measure_result:
+ \__siunitx_table_print_S_centered_measure_int_part:
+ \__siunitx_table_print_S_centered_measure_marker:
+ \__siunitx_table_print_S_centered_measure_result:
}
-\cs_new_protected:Npn \siunitx_table_print_S_centered_measure_int_part:
+\cs_new_protected:Npn \__siunitx_table_print_S_centered_measure_int_part:
{
- \prop_get:NnNF \l_siunitx_number_out_prop { comparator } \l_siunitx_tmpa_tl
- { \tl_clear:N \l_siunitx_tmpa_tl }
- \prop_get:NnNT \l_siunitx_number_out_prop { mantissa-sign }
- \l_siunitx_tmpb_tl
- { \tl_put_right:No \l_siunitx_tmpa_tl \l_siunitx_tmpb_tl }
- \prop_get:NnNT \l_siunitx_number_out_prop { mantissa-integer }
- \l_siunitx_tmpb_tl
- { \tl_put_right:No \l_siunitx_tmpa_tl \l_siunitx_tmpb_tl }
- \siunitx_table_print_S_measure:NN \l_siunitx_tmpa_tl
- \l_siunitx_table_integer_dim
+ \prop_get:NnNF \l__siunitx_number_out_prop { comparator } \l__siunitx_tmpa_tl
+ { \tl_clear:N \l__siunitx_tmpa_tl }
+ \prop_get:NnNT \l__siunitx_number_out_prop { mantissa-sign }
+ \l__siunitx_tmpb_tl
+ { \tl_put_right:No \l__siunitx_tmpa_tl \l__siunitx_tmpb_tl }
+ \prop_get:NnNT \l__siunitx_number_out_prop { mantissa-integer }
+ \l__siunitx_tmpb_tl
+ { \tl_put_right:No \l__siunitx_tmpa_tl \l__siunitx_tmpb_tl }
+ \__siunitx_table_print_S_measure:NN \l__siunitx_tmpa_tl
+ \l__siunitx_table_integer_dim
}
-\cs_new_protected:Npn \siunitx_table_print_S_centered_measure_marker:
+\cs_new_protected:Npn \__siunitx_table_print_S_centered_measure_marker:
{
- \siunitx_table_print_S_measure:NN \l_siunitx_output_decimal_tl
- \l_siunitx_table_marker_dim
+ \__siunitx_table_print_S_measure:NN \l__siunitx_output_decimal_tl
+ \l__siunitx_table_marker_dim
}
-\cs_new_protected:Npn \siunitx_table_print_S_centered_measure_result:
+\cs_new_protected:Npn \__siunitx_table_print_S_centered_measure_result:
{
- \prop_get:NnN \l_siunitx_number_out_prop { result } \l_siunitx_tmpa_tl
- \hbox_set:Nn \l_siunitx_table_result_box
- { \siunitx_print:nV { number } \l_siunitx_tmpa_tl }
- \dim_set:Nn \l_siunitx_table_result_dim
- { \box_wd:N \l_siunitx_table_result_box }
+ \prop_get:NnN \l__siunitx_number_out_prop { result } \l__siunitx_tmpa_tl
+ \hbox_set:Nn \l__siunitx_table_result_box
+ { \__siunitx_print:nV { number } \l__siunitx_tmpa_tl }
+ \dim_set:Nn \l__siunitx_table_result_dim
+ { \box_wd:N \l__siunitx_table_result_box }
}
-\cs_new_protected:Npn \siunitx_table_print_S_centered_integer:
+\cs_new_protected:Npn \__siunitx_table_print_S_centered_integer:
{
- \dim_set:Nn \l_siunitx_table_fill_post_dim
- { \l_siunitx_table_integer_dim - \l_siunitx_table_fill_pre_dim }
- \dim_zero:N \l_siunitx_table_fill_pre_dim
+ \dim_set:Nn \l__siunitx_table_fill_post_dim
+ { \l__siunitx_table_integer_dim - \l__siunitx_table_fill_pre_dim }
+ \dim_zero:N \l__siunitx_table_fill_pre_dim
}
-\cs_new_protected:Npn \siunitx_table_print_S_centered_decimal:
+\cs_new_protected:Npn \__siunitx_table_print_S_centered_decimal:
{
- \dim_sub:Nn \l_siunitx_table_fill_pre_dim
- { \l_siunitx_table_integer_dim }
- \dim_zero:N \l_siunitx_table_fill_post_dim
+ \dim_sub:Nn \l__siunitx_table_fill_pre_dim
+ { \l__siunitx_table_integer_dim }
+ \dim_zero:N \l__siunitx_table_fill_post_dim
}
-\cs_new_protected:Npn \siunitx_table_print_S_reserved:
+\cs_new_protected:Npn \__siunitx_table_print_S_reserved:
{
- \siunitx_table_print_S_reserved_init:
- \siunitx_table_print_S_reserved_ends:
- \bool_if:NT \l_siunitx_table_auto_round_bool
- { \siunitx_table_print_S_reserved_round_auto: }
- \siunitx_table_print_S_parse:
- \bool_if:NF \l_siunitx_error_bool
+ \__siunitx_table_print_S_reserved_init:
+ \__siunitx_table_print_S_reserved_ends:
+ \bool_if:NT \l__siunitx_table_auto_round_bool
+ { \__siunitx_table_print_S_reserved_round_auto: }
+ \__siunitx_table_print_S_parse:
+ \bool_if:NF \l__siunitx_error_bool
{
- \bool_if:NT \l_siunitx_table_math_bool { \c_math_toggle_token }
- \siunitx_table_print_S_reserved_comparator:
- \siunitx_table_print_S_reserved_mantissa:
- \siunitx_table_print_S_reserved_exponent:
- \bool_if:NT \l_siunitx_table_math_bool { \c_math_toggle_token }
+ \bool_if:NT \l__siunitx_table_math_bool { \c_math_toggle_token }
+ \__siunitx_table_print_S_reserved_comparator:
+ \__siunitx_table_print_S_reserved_mantissa:
+ \__siunitx_table_print_S_reserved_exponent:
+ \bool_if:NT \l__siunitx_table_math_bool { \c_math_toggle_token }
}
}
-\cs_new_protected:Npn \siunitx_table_print_S_reserved_init:
+\cs_new_protected:Npn \__siunitx_table_print_S_reserved_init:
{
- \dim_zero:N \l_siunitx_table_fill_mid_dim
- \dim_zero:N \l_siunitx_table_fill_post_dim
- \prop_set_eq:NN \l_siunitx_number_in_prop \l_siunitx_table_model_prop
- \siunitx_number_process_sign:
- \siunitx_number_process_zero_fill:
- \siunitx_number_process_mantissa:
- \prop_if_in:NnF \l_siunitx_number_in_prop { symbolic }
- { \siunitx_number_process_uncertainty: }
- \siunitx_number_format:
- \prop_get:NnNT \l_siunitx_table_model_prop { mantissa-decimal-raw }
- \l_siunitx_tmpa_tl
+ \dim_zero:N \l__siunitx_table_fill_mid_dim
+ \dim_zero:N \l__siunitx_table_fill_post_dim
+ \prop_set_eq:NN \l__siunitx_number_in_prop \l__siunitx_table_model_prop
+ \__siunitx_number_process_sign:
+ \__siunitx_number_process_zero_fill:
+ \__siunitx_number_process_mantissa:
+ \prop_if_in:NnF \l__siunitx_number_in_prop { symbolic }
+ { \__siunitx_number_process_uncertainty: }
+ \__siunitx_number_format:
+ \prop_get:NnNT \l__siunitx_table_model_prop { mantissa-decimal-raw }
+ \l__siunitx_tmpa_tl
{
- \prop_put:NnV \l_siunitx_number_out_prop { mantissa-decimal-raw }
- \l_siunitx_tmpa_tl
+ \prop_put:NnV \l__siunitx_number_out_prop { mantissa-decimal-raw }
+ \l__siunitx_tmpa_tl
}
- \prop_set_eq:NN \l_siunitx_table_model_prop \l_siunitx_number_out_prop
+ \prop_set_eq:NN \l__siunitx_table_model_prop \l__siunitx_number_out_prop
}
-\cs_new_protected:Npn \siunitx_table_print_S_reserved_ends:
+\cs_new_protected:Npn \__siunitx_table_print_S_reserved_ends:
{
- \hbox_set:Nn \l_siunitx_table_pre_box
+ \hbox_set:Nn \l__siunitx_table_pre_box
{
{
- \l_siunitx_table_collect_pre_tl
- \bool_if:NT \l_siunitx_table_math_bool
+ \l__siunitx_table_collect_pre_tl
+ \bool_if:NT \l__siunitx_table_math_bool
{
\scan_stop:
\c_math_toggle_token
@@ -6238,328 +6238,328 @@
}
}
\dim_compare:nNnT
- { \box_wd:N \l_siunitx_table_pre_box } = \c_zero_skip
+ { \box_wd:N \l__siunitx_table_pre_box } = \c_zero_skip
{
- \l_siunitx_table_collect_pre_tl
- \bool_set_false:N \l_siunitx_font_set_bool
+ \l__siunitx_table_collect_pre_tl
+ \bool_set_false:N \l__siunitx_font_set_bool
}
- \hbox_set:Nn \l_siunitx_tmp_box { { \l_siunitx_table_pre_tl } }
- \hbox_set_to_wd:Nnn \l_siunitx_table_pre_box
- { \box_wd:N \l_siunitx_tmp_box }
+ \hbox_set:Nn \l__siunitx_tmp_box { { \l__siunitx_table_pre_tl } }
+ \hbox_set_to_wd:Nnn \l__siunitx_table_pre_box
+ { \box_wd:N \l__siunitx_tmp_box }
{
\tex_hfil:D
- \hbox_unpack:N \l_siunitx_table_pre_box
+ \hbox_unpack:N \l__siunitx_table_pre_box
}
- \hbox_set:Nn \l_siunitx_tmp_box { \l_siunitx_table_post_tl }
- \hbox_set_to_wd:Nnn \l_siunitx_table_post_box
- { \box_wd:N \l_siunitx_tmp_box }
+ \hbox_set:Nn \l__siunitx_tmp_box { \l__siunitx_table_post_tl }
+ \hbox_set_to_wd:Nnn \l__siunitx_table_post_box
+ { \box_wd:N \l__siunitx_tmp_box }
{
{
- \bool_if:NT \l_siunitx_table_math_bool
+ \bool_if:NT \l__siunitx_table_math_bool
{
\c_math_toggle_token
\scan_stop:
}
- \l_siunitx_table_collect_post_tl
+ \l__siunitx_table_collect_post_tl
}
\tex_hfil:D
}
}
-\cs_new_protected:Npn \siunitx_table_print_S_reserved_round_auto:
+\cs_new_protected:Npn \__siunitx_table_print_S_reserved_round_auto:
{
- \prop_get:NnNTF \l_siunitx_table_model_prop { mantissa-decimal-raw }
- \l_siunitx_tmpa_tl
- { \int_set:Nn \l_siunitx_process_precision_int { \l_siunitx_tmpa_tl } }
- { \int_zero:N \l_siunitx_process_precision_int }
- \tl_set:Nn \l_siunitx_round_tl { places }
+ \prop_get:NnNTF \l__siunitx_table_model_prop { mantissa-decimal-raw }
+ \l__siunitx_tmpa_tl
+ { \int_set:Nn \l__siunitx_process_precision_int { \l__siunitx_tmpa_tl } }
+ { \int_zero:N \l__siunitx_process_precision_int }
+ \tl_set:Nn \l__siunitx_round_tl { places }
}
-\cs_new_protected:Npn \siunitx_table_print_S_reserved_comparator:
+\cs_new_protected:Npn \__siunitx_table_print_S_reserved_comparator:
{
- \prop_get:NnNTF \l_siunitx_table_model_prop { comparator }
- \l_siunitx_tmpa_tl
+ \prop_get:NnNTF \l__siunitx_table_model_prop { comparator }
+ \l__siunitx_tmpa_tl
{
- \hbox_set:Nn \l_siunitx_tmp_box
- { \siunitx_print:nV { number } \l_siunitx_tmpa_tl }
- \prop_get:NnNTF \l_siunitx_number_out_prop { comparator }
- \l_siunitx_tmpa_tl
+ \hbox_set:Nn \l__siunitx_tmp_box
+ { \__siunitx_print:nV { number } \l__siunitx_tmpa_tl }
+ \prop_get:NnNTF \l__siunitx_number_out_prop { comparator }
+ \l__siunitx_tmpa_tl
{
- \hbox_set_to_wd:Nnn \l_siunitx_table_result_box
- { \box_wd:N \l_siunitx_tmp_box }
- { \siunitx_print:nV { number } \l_siunitx_tmpa_tl }
+ \hbox_set_to_wd:Nnn \l__siunitx_table_result_box
+ { \box_wd:N \l__siunitx_tmp_box }
+ { \__siunitx_print:nV { number } \l__siunitx_tmpa_tl }
}
{
- \dim_add:Nn \l_siunitx_table_fill_pre_dim
- { \box_wd:N \l_siunitx_tmp_box }
- \cs_set_eq:NN \siunitx_table_print_S_reserved_store_fill:n
- \siunitx_table_print_S_reserved_store_fill_pre:n
+ \dim_add:Nn \l__siunitx_table_fill_pre_dim
+ { \box_wd:N \l__siunitx_tmp_box }
+ \cs_set_eq:NN \__siunitx_table_print_S_reserved_store_fill:n
+ \__siunitx_table_print_S_reserved_store_fill_pre:n
}
}
{
- \cs_set_eq:NN \siunitx_table_print_S_reserved_store_fill:n
- \siunitx_table_print_S_reserved_store_fill_pre:n
- \prop_if_in:NnT \l_siunitx_number_out_prop { comparator }
+ \cs_set_eq:NN \__siunitx_table_print_S_reserved_store_fill:n
+ \__siunitx_table_print_S_reserved_store_fill_pre:n
+ \prop_if_in:NnT \l__siunitx_number_out_prop { comparator }
{
\msg_error:nnx { siunitx } { table-partial-number }
{ a~comparator }
}
}
}
-\cs_new_protected:Npn \siunitx_table_print_S_reserved_store_fill_pre:n
- { \dim_add:Nn \l_siunitx_table_fill_pre_dim }
-\cs_new_protected:Npn \siunitx_table_print_S_reserved_store_fill_mid:n
- { \dim_add:Nn \l_siunitx_table_fill_mid_dim }
-\cs_new_protected:Npn \siunitx_table_print_S_reserved_mantissa:
+\cs_new_protected:Npn \__siunitx_table_print_S_reserved_store_fill_pre:n
+ { \dim_add:Nn \l__siunitx_table_fill_pre_dim }
+\cs_new_protected:Npn \__siunitx_table_print_S_reserved_store_fill_mid:n
+ { \dim_add:Nn \l__siunitx_table_fill_mid_dim }
+\cs_new_protected:Npn \__siunitx_table_print_S_reserved_mantissa:
{
- \prop_get:NnNTF \l_siunitx_table_model_prop { mantissa }
- \l_siunitx_tmpa_tl
+ \prop_get:NnNTF \l__siunitx_table_model_prop { mantissa }
+ \l__siunitx_tmpa_tl
{
- \hbox_set:Nn \l_siunitx_tmp_box
- { \siunitx_print:nV { number } \l_siunitx_tmpa_tl }
- \prop_get:NnNTF \l_siunitx_number_out_prop { mantissa }
- \l_siunitx_tmpa_tl
+ \hbox_set:Nn \l__siunitx_tmp_box
+ { \__siunitx_print:nV { number } \l__siunitx_tmpa_tl }
+ \prop_get:NnNTF \l__siunitx_number_out_prop { mantissa }
+ \l__siunitx_tmpa_tl
{
- \dim_set:Nn \l_siunitx_table_mantissa_dim
- { \box_wd:N \l_siunitx_tmp_box }
- \hbox_set:Nn \l_siunitx_table_mantissa_box
- { \siunitx_print:nV { number } \l_siunitx_tmpa_tl }
- \siunitx_table_print_S_reserved_mantissa_parts:
+ \dim_set:Nn \l__siunitx_table_mantissa_dim
+ { \box_wd:N \l__siunitx_tmp_box }
+ \hbox_set:Nn \l__siunitx_table_mantissa_box
+ { \__siunitx_print:nV { number } \l__siunitx_tmpa_tl }
+ \__siunitx_table_print_S_reserved_mantissa_parts:
}
{
- \siunitx_table_print_S_reserved_store_fill:n
- { \box_wd:N \l_siunitx_tmp_box }
+ \__siunitx_table_print_S_reserved_store_fill:n
+ { \box_wd:N \l__siunitx_tmp_box }
}
}
{
- \prop_if_in:NnT \l_siunitx_number_out_prop { mantissa }
+ \prop_if_in:NnT \l__siunitx_number_out_prop { mantissa }
{
\msg_error:nnx { siunitx } { table-partial-number }
{ a~mantissa }
}
}
}
-\cs_new_protected:Npn \siunitx_table_print_S_reserved_mantissa_parts:
+\cs_new_protected:Npn \__siunitx_table_print_S_reserved_mantissa_parts:
{
- \siunitx_table_print_S_reserved_mantissa_integer:
- \hbox_set:Nn \l_siunitx_table_result_box
+ \__siunitx_table_print_S_reserved_mantissa_integer:
+ \hbox_set:Nn \l__siunitx_table_result_box
{
- \hbox_unpack:N \l_siunitx_table_result_box
- \hbox_to_wd:nn { \l_siunitx_table_fill_mid_dim } { \tex_hfil:D }
- \hbox_unpack:N \l_siunitx_table_mantissa_box
+ \hbox_unpack:N \l__siunitx_table_result_box
+ \hbox_to_wd:nn { \l__siunitx_table_fill_mid_dim } { \tex_hfil:D }
+ \hbox_unpack:N \l__siunitx_table_mantissa_box
}
- \dim_set:Nn \l_siunitx_table_fill_mid_dim
+ \dim_set:Nn \l__siunitx_table_fill_mid_dim
{
- \l_siunitx_table_mantissa_dim
- - \box_wd:N \l_siunitx_table_mantissa_box
- - \l_siunitx_table_integer_dim
+ \l__siunitx_table_mantissa_dim
+ - \box_wd:N \l__siunitx_table_mantissa_box
+ - \l__siunitx_table_integer_dim
}
- \siunitx_table_print_S_reserved_mantissa_uncert:
+ \__siunitx_table_print_S_reserved_mantissa_uncert:
}
-\cs_new_protected:Npn \siunitx_table_print_S_reserved_mantissa_integer:
+\cs_new_protected:Npn \__siunitx_table_print_S_reserved_mantissa_integer:
{
- \prop_get:NnNF \l_siunitx_table_model_prop { mantissa-sign }
- \l_siunitx_tmpa_tl
- { \tl_clear:N \l_siunitx_tmpa_tl }
- \prop_get:NnNT \l_siunitx_table_model_prop { mantissa-integer }
- \l_siunitx_tmpb_tl
- { \tl_put_right:No \l_siunitx_tmpa_tl \l_siunitx_tmpb_tl }
- \siunitx_table_print_S_measure:NN \l_siunitx_tmpa_tl
- \l_siunitx_table_integer_dim
- \prop_get:NnNF \l_siunitx_number_out_prop { mantissa-sign }
- \l_siunitx_tmpa_tl
- { \tl_clear:N \l_siunitx_tmpa_tl }
- \prop_get:NnNT \l_siunitx_number_out_prop { mantissa-integer }
- \l_siunitx_tmpb_tl
- { \tl_put_right:No \l_siunitx_tmpa_tl \l_siunitx_tmpb_tl }
- \tl_if_empty:NF \l_siunitx_tmpa_tl
+ \prop_get:NnNF \l__siunitx_table_model_prop { mantissa-sign }
+ \l__siunitx_tmpa_tl
+ { \tl_clear:N \l__siunitx_tmpa_tl }
+ \prop_get:NnNT \l__siunitx_table_model_prop { mantissa-integer }
+ \l__siunitx_tmpb_tl
+ { \tl_put_right:No \l__siunitx_tmpa_tl \l__siunitx_tmpb_tl }
+ \__siunitx_table_print_S_measure:NN \l__siunitx_tmpa_tl
+ \l__siunitx_table_integer_dim
+ \prop_get:NnNF \l__siunitx_number_out_prop { mantissa-sign }
+ \l__siunitx_tmpa_tl
+ { \tl_clear:N \l__siunitx_tmpa_tl }
+ \prop_get:NnNT \l__siunitx_number_out_prop { mantissa-integer }
+ \l__siunitx_tmpb_tl
+ { \tl_put_right:No \l__siunitx_tmpa_tl \l__siunitx_tmpb_tl }
+ \tl_if_empty:NF \l__siunitx_tmpa_tl
{
- \siunitx_table_print_S_measure:NN \l_siunitx_tmpa_tl
- \l_siunitx_tmp_dim
- \dim_sub:Nn \l_siunitx_table_integer_dim { \l_siunitx_tmp_dim }
+ \__siunitx_table_print_S_measure:NN \l__siunitx_tmpa_tl
+ \l__siunitx_tmp_dim
+ \dim_sub:Nn \l__siunitx_table_integer_dim { \l__siunitx_tmp_dim }
}
- \siunitx_table_print_S_reserved_store_fill:n
- { \l_siunitx_table_integer_dim }
+ \__siunitx_table_print_S_reserved_store_fill:n
+ { \l__siunitx_table_integer_dim }
}
-\cs_new_protected:Npn \siunitx_table_print_S_reserved_mantissa_uncert:
+\cs_new_protected:Npn \__siunitx_table_print_S_reserved_mantissa_uncert:
{
- \prop_get:NnNT \l_siunitx_table_model_prop { mantissa-uncertainty }
- \l_siunitx_tmpa_tl
+ \prop_get:NnNT \l__siunitx_table_model_prop { mantissa-uncertainty }
+ \l__siunitx_tmpa_tl
{
- \siunitx_number_format_join_uncert_pm:N \l_siunitx_tmpa_tl
- \hbox_set:Nn \l_siunitx_tmp_box
- { \siunitx_print:nV { number } \l_siunitx_tmpa_tl }
- \prop_get:NnNTF \l_siunitx_number_out_prop { mantissa-uncertainty }
- \l_siunitx_tmpa_tl
+ \__siunitx_number_format_join_uncert_pm:N \l__siunitx_tmpa_tl
+ \hbox_set:Nn \l__siunitx_tmp_box
+ { \__siunitx_print:nV { number } \l__siunitx_tmpa_tl }
+ \prop_get:NnNTF \l__siunitx_number_out_prop { mantissa-uncertainty }
+ \l__siunitx_tmpa_tl
{
- \dim_set:Nn \l_siunitx_table_uncert_dim
- { \box_wd:N \l_siunitx_tmp_box }
- \siunitx_number_format_join_uncert_pm:N \l_siunitx_tmpa_tl
- \hbox_set:Nn \l_siunitx_tmp_box
- { \siunitx_print:nV { number } \l_siunitx_tmpa_tl }
- \bool_if:NTF \l_siunitx_table_align_uncert_bool
- { \siunitx_table_print_S_reserved_mantissa_uncert_aligned: }
- { \siunitx_table_print_S_reserved_mantissa_uncert_not_aligned: }
+ \dim_set:Nn \l__siunitx_table_uncert_dim
+ { \box_wd:N \l__siunitx_tmp_box }
+ \__siunitx_number_format_join_uncert_pm:N \l__siunitx_tmpa_tl
+ \hbox_set:Nn \l__siunitx_tmp_box
+ { \__siunitx_print:nV { number } \l__siunitx_tmpa_tl }
+ \bool_if:NTF \l__siunitx_table_align_uncert_bool
+ { \__siunitx_table_print_S_reserved_mantissa_uncert_aligned: }
+ { \__siunitx_table_print_S_reserved_mantissa_uncert_not_aligned: }
}
{
- \siunitx_table_print_S_reserved_store_fill:n
- { \box_wd:N \l_siunitx_tmp_box }
+ \__siunitx_table_print_S_reserved_store_fill:n
+ { \box_wd:N \l__siunitx_tmp_box }
}
}
}
\cs_new_protected:Npn
- \siunitx_table_print_S_reserved_mantissa_uncert_aligned:
+ \__siunitx_table_print_S_reserved_mantissa_uncert_aligned:
{
- \hbox_set:Nn \l_siunitx_table_result_box
+ \hbox_set:Nn \l__siunitx_table_result_box
{
- \hbox_unpack:N \l_siunitx_table_result_box
- \hbox_to_wd:nn { \l_siunitx_table_fill_mid_dim } { \tex_hfil:D }
- \hbox_unpack:N \l_siunitx_tmp_box
+ \hbox_unpack:N \l__siunitx_table_result_box
+ \hbox_to_wd:nn { \l__siunitx_table_fill_mid_dim } { \tex_hfil:D }
+ \hbox_unpack:N \l__siunitx_tmp_box
}
- \dim_set:Nn \l_siunitx_table_fill_mid_dim
- { \l_siunitx_table_uncert_dim - \box_wd:N \l_siunitx_tmp_box }
+ \dim_set:Nn \l__siunitx_table_fill_mid_dim
+ { \l__siunitx_table_uncert_dim - \box_wd:N \l__siunitx_tmp_box }
}
\cs_new_protected:Npn
- \siunitx_table_print_S_reserved_mantissa_uncert_not_aligned:
+ \__siunitx_table_print_S_reserved_mantissa_uncert_not_aligned:
{
- \hbox_set:Nn \l_siunitx_table_result_box
+ \hbox_set:Nn \l__siunitx_table_result_box
{
- \hbox_unpack:N \l_siunitx_table_result_box
- \hbox_unpack:N \l_siunitx_tmp_box
+ \hbox_unpack:N \l__siunitx_table_result_box
+ \hbox_unpack:N \l__siunitx_tmp_box
}
- \dim_add:Nn \l_siunitx_table_fill_mid_dim
+ \dim_add:Nn \l__siunitx_table_fill_mid_dim
{
- \l_siunitx_table_uncert_dim
- - \box_wd:N \l_siunitx_tmp_box
+ \l__siunitx_table_uncert_dim
+ - \box_wd:N \l__siunitx_tmp_box
}
}
-\cs_new_protected:Npn \siunitx_table_print_S_reserved_exponent:
+\cs_new_protected:Npn \__siunitx_table_print_S_reserved_exponent:
{
- \prop_get:NnNTF \l_siunitx_table_model_prop { exponent-result }
- \l_siunitx_tmpa_tl
+ \prop_get:NnNTF \l__siunitx_table_model_prop { exponent-result }
+ \l__siunitx_tmpa_tl
{
- \prop_if_in:NnT \l_siunitx_table_model_prop { mantissa }
- { \siunitx_table_print_S_reserved_exponent_product: }
- \hbox_set:Nn \l_siunitx_tmp_box
- { \siunitx_print:nV { number } \l_siunitx_tmpa_tl }
- \prop_get:NnNTF \l_siunitx_number_out_prop { exponent-result }
- \l_siunitx_tmpa_tl
+ \prop_if_in:NnT \l__siunitx_table_model_prop { mantissa }
+ { \__siunitx_table_print_S_reserved_exponent_product: }
+ \hbox_set:Nn \l__siunitx_tmp_box
+ { \__siunitx_print:nV { number } \l__siunitx_tmpa_tl }
+ \prop_get:NnNTF \l__siunitx_number_out_prop { exponent-result }
+ \l__siunitx_tmpa_tl
{
- \dim_set:Nn \l_siunitx_table_exponent_dim
- { \box_wd:N \l_siunitx_tmp_box }
- \prop_if_in:NnTF \l_siunitx_number_out_prop { mantissa }
- { \siunitx_table_print_S_reserved_exponent_product: }
- { \siunitx_table_print_S_reserved_exponent_product_correction: }
- \hbox_set:Nn \l_siunitx_tmp_box
- { \siunitx_print:nV { number } \l_siunitx_tmpa_tl }
- \bool_if:NTF \l_siunitx_table_align_exponent_bool
- { \siunitx_table_print_S_reserved_exponent_aligned: }
- { \siunitx_table_print_S_reserved_exponent_not_aligned: }
+ \dim_set:Nn \l__siunitx_table_exponent_dim
+ { \box_wd:N \l__siunitx_tmp_box }
+ \prop_if_in:NnTF \l__siunitx_number_out_prop { mantissa }
+ { \__siunitx_table_print_S_reserved_exponent_product: }
+ { \__siunitx_table_print_S_reserved_exponent_product_correction: }
+ \hbox_set:Nn \l__siunitx_tmp_box
+ { \__siunitx_print:nV { number } \l__siunitx_tmpa_tl }
+ \bool_if:NTF \l__siunitx_table_align_exponent_bool
+ { \__siunitx_table_print_S_reserved_exponent_aligned: }
+ { \__siunitx_table_print_S_reserved_exponent_not_aligned: }
}
{
- \dim_set:Nn \l_siunitx_table_fill_post_dim
- { \l_siunitx_table_fill_mid_dim + \box_wd:N \l_siunitx_tmp_box }
+ \dim_set:Nn \l__siunitx_table_fill_post_dim
+ { \l__siunitx_table_fill_mid_dim + \box_wd:N \l__siunitx_tmp_box }
}
}
{
- \prop_if_in:NnT \l_siunitx_number_out_prop { exponent-result }
+ \prop_if_in:NnT \l__siunitx_number_out_prop { exponent-result }
{
\msg_error:nnx { siunitx } { table-partial-number }
{ an~exponent }
}
- \dim_set_eq:NN \l_siunitx_table_fill_post_dim
- \l_siunitx_table_fill_mid_dim
+ \dim_set_eq:NN \l__siunitx_table_fill_post_dim
+ \l__siunitx_table_fill_mid_dim
}
}
-\cs_new_protected:Npn \siunitx_table_print_S_reserved_exponent_product:
+\cs_new_protected:Npn \__siunitx_table_print_S_reserved_exponent_product:
{
- \tl_set_eq:NN \l_siunitx_tmpb_tl \l_siunitx_exponent_product_tl
- \bool_if:NT \l_siunitx_tight_bool
- { \tl_set:Nx \l_siunitx_tmpb_tl { { \exp_not:o \l_siunitx_tmpb_tl } } }
- \tl_set:Nx \l_siunitx_tmpa_tl
+ \tl_set_eq:NN \l__siunitx_tmpb_tl \l__siunitx_exponent_product_tl
+ \bool_if:NT \l__siunitx_tight_bool
+ { \tl_set:Nx \l__siunitx_tmpb_tl { { \exp_not:o \l__siunitx_tmpb_tl } } }
+ \tl_set:Nx \l__siunitx_tmpa_tl
{
- \exp_not:N \ensuremath { { } \exp_not:o \l_siunitx_tmpb_tl { } }
- \exp_not:o \l_siunitx_tmpa_tl
+ \exp_not:N \ensuremath { { } \exp_not:o \l__siunitx_tmpb_tl { } }
+ \exp_not:o \l__siunitx_tmpa_tl
}
}
\cs_new_protected:Npn
- \siunitx_table_print_S_reserved_exponent_product_correction:
+ \__siunitx_table_print_S_reserved_exponent_product_correction:
{
\group_begin:
- \tl_clear:N \l_siunitx_tmpa_tl
- \siunitx_table_print_S_reserved_exponent_product:
- \tl_set:Nx \l_siunitx_tmpa_tl
- { { } \exp_not:o \l_siunitx_tmpa_tl { } }
- \siunitx_table_print_S_measure:NN \l_siunitx_tmpa_tl \l_siunitx_tmp_dim
+ \tl_clear:N \l__siunitx_tmpa_tl
+ \__siunitx_table_print_S_reserved_exponent_product:
+ \tl_set:Nx \l__siunitx_tmpa_tl
+ { { } \exp_not:o \l__siunitx_tmpa_tl { } }
+ \__siunitx_table_print_S_measure:NN \l__siunitx_tmpa_tl \l__siunitx_tmp_dim
\exp_args:NNNo \group_end:
- \dim_set:Nn \l_siunitx_tmp_dim { \dim_use:N \l_siunitx_tmp_dim }
- \siunitx_table_print_S_reserved_store_fill:n { \l_siunitx_tmp_dim }
- \dim_sub:Nn \l_siunitx_table_exponent_dim { \l_siunitx_tmp_dim }
+ \dim_set:Nn \l__siunitx_tmp_dim { \dim_use:N \l__siunitx_tmp_dim }
+ \__siunitx_table_print_S_reserved_store_fill:n { \l__siunitx_tmp_dim }
+ \dim_sub:Nn \l__siunitx_table_exponent_dim { \l__siunitx_tmp_dim }
}
-\cs_new_protected:Npn \siunitx_table_print_S_reserved_exponent_aligned:
+\cs_new_protected:Npn \__siunitx_table_print_S_reserved_exponent_aligned:
{
- \hbox_set:Nn \l_siunitx_table_result_box
+ \hbox_set:Nn \l__siunitx_table_result_box
{
- \hbox_unpack:N \l_siunitx_table_result_box
- \hbox_to_wd:nn { \l_siunitx_table_fill_mid_dim } { \tex_hfil:D }
- \hbox_unpack:N \l_siunitx_tmp_box
+ \hbox_unpack:N \l__siunitx_table_result_box
+ \hbox_to_wd:nn { \l__siunitx_table_fill_mid_dim } { \tex_hfil:D }
+ \hbox_unpack:N \l__siunitx_tmp_box
}
- \dim_set:Nn \l_siunitx_table_fill_post_dim
+ \dim_set:Nn \l__siunitx_table_fill_post_dim
{
- \l_siunitx_table_exponent_dim
- - \box_wd:N \l_siunitx_tmp_box
+ \l__siunitx_table_exponent_dim
+ - \box_wd:N \l__siunitx_tmp_box
}
}
\cs_new_protected:Npn
- \siunitx_table_print_S_reserved_exponent_not_aligned:
+ \__siunitx_table_print_S_reserved_exponent_not_aligned:
{
- \hbox_set:Nn \l_siunitx_table_result_box
+ \hbox_set:Nn \l__siunitx_table_result_box
{
- \hbox_unpack:N \l_siunitx_table_result_box
- \hbox_unpack:N \l_siunitx_tmp_box
+ \hbox_unpack:N \l__siunitx_table_result_box
+ \hbox_unpack:N \l__siunitx_tmp_box
}
- \dim_set:Nn \l_siunitx_table_fill_post_dim
+ \dim_set:Nn \l__siunitx_table_fill_post_dim
{
- \l_siunitx_table_fill_mid_dim
- + \l_siunitx_table_exponent_dim
- - \box_wd:N \l_siunitx_tmp_box
+ \l__siunitx_table_fill_mid_dim
+ + \l__siunitx_table_exponent_dim
+ - \box_wd:N \l__siunitx_tmp_box
}
}
-\cs_new_protected:Npn \siunitx_table_print_S_direct:N #1
+\cs_new_protected:Npn \__siunitx_table_print_S_direct:N #1
{
#1
- \cs_set:Npn \peek_execute_branches:
+ \cs_set:Npn \__peek_execute_branches:
{
\if_catcode:w \exp_not:N \l_peek_token \c_group_begin_token
- \exp_after:wN \siunitx_table_print_S_direct_text:n
+ \exp_after:wN \__siunitx_table_print_S_direct_text:n
\else:
\m@th
- \exp_after:wN \siunitx_table_print_S_direct_main:
+ \exp_after:wN \__siunitx_table_print_S_direct_main:
\fi:
}
- \peek_after:Nw \peek_ignore_spaces_execute_branches:
+ \peek_after:Nw \__peek_ignore_spaces_execute_branches:
}
-\cs_new_protected:Npn \siunitx_table_print_S_direct_text:n #1
+\cs_new_protected:Npn \__siunitx_table_print_S_direct_text:n #1
{
- \siunitx_table_column_begin:n { \l_siunitx_table_text_align_skip }
+ \__siunitx_table_column_begin:n { \l__siunitx_table_text_align_skip }
#1
- \siunitx_table_column_end:n { \l_siunitx_table_text_align_skip }
+ \__siunitx_table_column_end:n { \l__siunitx_table_text_align_skip }
}
\char_set_catcode_active:N \@
-\cs_new_protected:Npn \siunitx_table_print_S_direct_centered:
- {
- \cs_set_eq:NN \siunitx_table_print:
- \siunitx_table_print_S_direct_centered_end:
- \hbox_set:Nn \l_siunitx_tmp_box
- { \ensuremath { \l_siunitx_output_decimal_tl } }
- \hbox_set_to_wd:Nnn \l_siunitx_table_post_box
- { \box_wd:N \l_siunitx_tmp_box }
+\cs_new_protected:Npn \__siunitx_table_print_S_direct_centered:
+ {
+ \cs_set_eq:NN \__siunitx_table_print:
+ \__siunitx_table_print_S_direct_centered_end:
+ \hbox_set:Nn \l__siunitx_tmp_box
+ { \ensuremath { \l__siunitx_output_decimal_tl } }
+ \hbox_set_to_wd:Nnn \l__siunitx_table_post_box
+ { \box_wd:N \l__siunitx_tmp_box }
{ \tex_hfil:D }
- \hbox_set:Nn \l_siunitx_table_pre_box
+ \hbox_set:Nn \l__siunitx_table_pre_box
\c_group_begin_token
\c_math_toggle_token
- \tl_map_function:NN \l_siunitx_input_decimal_tl
- \siunitx_table_print_S_direct_centered_aux:N
+ \tl_map_function:NN \l__siunitx_input_decimal_tl
+ \__siunitx_table_print_S_direct_centered_aux:N
}
-\cs_new_protected:Npn \siunitx_table_print_S_direct_centered_aux:N #1
+\cs_new_protected:Npn \__siunitx_table_print_S_direct_centered_aux:N #1
{
\char_set_lccode:nn { `\@ } { `#1 }
\char_set_mathcode:nn { `#1 } { 32768 }
@@ -6567,82 +6567,82 @@
{
\c_math_toggle_token
\c_group_end_token
- \hbox_set:Nn \l_siunitx_table_post_box
+ \hbox_set:Nn \l__siunitx_table_post_box
\c_group_begin_token
\c_math_toggle_token
- \l_siunitx_output_decimal_tl
+ \l__siunitx_output_decimal_tl
}
}
\char_set_catcode_letter:N \@
-\cs_new_protected:Npn \siunitx_table_print_S_direct_centered_end:
+\cs_new_protected:Npn \__siunitx_table_print_S_direct_centered_end:
{
\c_math_toggle_token
\c_group_end_token
\dim_compare:nNnTF
- { \box_wd:N \l_siunitx_table_pre_box } >
- { \box_wd:N \l_siunitx_table_post_box }
+ { \box_wd:N \l__siunitx_table_pre_box } >
+ { \box_wd:N \l__siunitx_table_post_box }
{
- \hbox_set_to_wd:Nnn \l_siunitx_table_post_box
- { \box_wd:N \l_siunitx_table_pre_box }
+ \hbox_set_to_wd:Nnn \l__siunitx_table_post_box
+ { \box_wd:N \l__siunitx_table_pre_box }
{
- \hbox_unpack:N \l_siunitx_table_post_box
+ \hbox_unpack:N \l__siunitx_table_post_box
\tex_hfil:D
}
}
{
- \hbox_set_to_wd:Nnn \l_siunitx_table_pre_box
- { \box_wd:N \l_siunitx_table_post_box }
+ \hbox_set_to_wd:Nnn \l__siunitx_table_pre_box
+ { \box_wd:N \l__siunitx_table_post_box }
{
\tex_hfil:D
- \hbox_unpack:N \l_siunitx_table_pre_box
+ \hbox_unpack:N \l__siunitx_table_pre_box
}
}
- \box_use:N \l_siunitx_table_pre_box
- \box_use:N \l_siunitx_table_post_box
+ \box_use:N \l__siunitx_table_pre_box
+ \box_use:N \l__siunitx_table_post_box
}
\char_set_catcode_active:N \@
-\cs_new_protected:Npn \siunitx_table_print_S_direct_reserved:
+\cs_new_protected:Npn \__siunitx_table_print_S_direct_reserved:
{
- \cs_set_eq:NN \siunitx_table_print:
- \siunitx_table_print_S_direct_reserved_end:
- \prop_get:NnNF \l_siunitx_table_model_prop { mantissa-integer }
- \l_siunitx_tmpa_tl
- { \tl_clear:N \l_siunitx_tmpa_tl }
- \hbox_set:Nn \l_siunitx_tmp_box
+ \cs_set_eq:NN \__siunitx_table_print:
+ \__siunitx_table_print_S_direct_reserved_end:
+ \prop_get:NnNF \l__siunitx_table_model_prop { mantissa-integer }
+ \l__siunitx_tmpa_tl
+ { \tl_clear:N \l__siunitx_tmpa_tl }
+ \hbox_set:Nn \l__siunitx_tmp_box
{
\ensuremath
{
- \prop_get:NnNT \l_siunitx_table_model_prop { mantissa-sign }
- \l_siunitx_tmpb_tl
- { \l_siunitx_tmpb_tl }
- \l_siunitx_tmpa_tl
+ \prop_get:NnNT \l__siunitx_table_model_prop { mantissa-sign }
+ \l__siunitx_tmpb_tl
+ { \l__siunitx_tmpb_tl }
+ \l__siunitx_tmpa_tl
}
}
- \dim_set:Nn \l_siunitx_table_integer_dim
- { \box_wd:N \l_siunitx_tmp_box }
- \prop_get:NnNF \l_siunitx_table_model_prop { mantissa-decimal }
- \l_siunitx_tmpa_tl
- { \tl_clear:N \l_siunitx_tmpa_tl }
- \hbox_set:Nn \l_siunitx_tmp_box
+ \dim_set:Nn \l__siunitx_table_integer_dim
+ { \box_wd:N \l__siunitx_tmp_box }
+ \prop_get:NnNF \l__siunitx_table_model_prop { mantissa-decimal }
+ \l__siunitx_tmpa_tl
+ { \tl_clear:N \l__siunitx_tmpa_tl }
+ \hbox_set:Nn \l__siunitx_tmp_box
{
\ensuremath
{
- \l_siunitx_output_decimal_tl
- \l_siunitx_tmpa_tl
+ \l__siunitx_output_decimal_tl
+ \l__siunitx_tmpa_tl
}
}
- \hbox_set_to_wd:Nnn \l_siunitx_table_post_box
- { \box_wd:N \l_siunitx_tmp_box }
+ \hbox_set_to_wd:Nnn \l__siunitx_table_post_box
+ { \box_wd:N \l__siunitx_tmp_box }
{ \tex_hfil:D }
- \hbox_set_to_wd:Nnn \l_siunitx_table_pre_box
- { \l_siunitx_table_integer_dim }
+ \hbox_set_to_wd:Nnn \l__siunitx_table_pre_box
+ { \l__siunitx_table_integer_dim }
\c_group_begin_token
\c_math_toggle_token
- \tl_map_function:NN \l_siunitx_input_decimal_tl
- \siunitx_table_print_S_direct_reserved_aux:N
+ \tl_map_function:NN \l__siunitx_input_decimal_tl
+ \__siunitx_table_print_S_direct_reserved_aux:N
\tex_hfill:D
}
-\cs_new_protected:Npn \siunitx_table_print_S_direct_reserved_aux:N #1
+\cs_new_protected:Npn \__siunitx_table_print_S_direct_reserved_aux:N #1
{
\char_set_lccode:nn { `\@ } { `#1 }
\char_set_mathcode:nn { `#1 } { 32768 }
@@ -6650,23 +6650,23 @@
{
\c_math_toggle_token
\c_group_end_token
- \hbox_set_to_wd:Nnn \l_siunitx_table_post_box
- { \box_wd:N \l_siunitx_tmp_box }
+ \hbox_set_to_wd:Nnn \l__siunitx_table_post_box
+ { \box_wd:N \l__siunitx_tmp_box }
\c_group_begin_token
\c_math_toggle_token
- \l_siunitx_output_decimal_tl
+ \l__siunitx_output_decimal_tl
}
}
\char_set_catcode_letter:N \@
-\cs_new_protected:Npn \siunitx_table_print_S_direct_reserved_end:
+\cs_new_protected:Npn \__siunitx_table_print_S_direct_reserved_end:
{
\c_math_toggle_token
\tex_hfil:D
\c_group_end_token
- \siunitx_table_align_left:n { \l_siunitx_table_number_align_skip }
- \box_use:N \l_siunitx_table_pre_box
- \box_use:N \l_siunitx_table_post_box
- \siunitx_table_align_right:n { \l_siunitx_table_number_align_skip }
+ \__siunitx_table_align_left:n { \l__siunitx_table_number_align_skip }
+ \box_use:N \l__siunitx_table_pre_box
+ \box_use:N \l__siunitx_table_post_box
+ \__siunitx_table_align_right:n { \l__siunitx_table_number_align_skip }
}
\keys_set:nn { siunitx }
{
@@ -6683,40 +6683,40 @@
table-figures-integer = 3
}
\keys_define:nn { siunitx }
- { redefine-symbols .bool_set:N = \l_siunitx_redefine_symbols_bool }
+ { redefine-symbols .bool_set:N = \l__siunitx_redefine_symbols_bool }
\keys_set:nn { siunitx } { redefine-symbols = true }
\AtBeginDocument
{
- \bool_if:NT \l_siunitx_redefine_symbols_bool
+ \bool_if:NT \l__siunitx_redefine_symbols_bool
{
\@ifpackageloaded { textcomp }
{
- \siunitx_option_unchanged:Nnn \l_siunitx_degree_math_tl
+ \__siunitx_option_unchanged:Nnn \l__siunitx_degree_math_tl
{ { } ^ { \circ } }
{ \text { \textdegree } }
- \siunitx_option_unchanged:Nnn \l_siunitx_degree_text_tl
+ \__siunitx_option_unchanged:Nnn \l__siunitx_degree_text_tl
{ \ensuremath { { } ^ { \circ } } }
{ \textdegree }
\@ifpackageloaded { mathptmx }
{ }
{
- \siunitx_option_unchanged:Nnn \l_siunitx_micro_text_tl
- { \c_siunitx_mu_tl }
+ \__siunitx_option_unchanged:Nnn \l__siunitx_micro_text_tl
+ { \c__siunitx_mu_tl }
{ \textmu }
\@ifpackageloaded { fourier }
{ }
{
- \siunitx_option_unchanged:Nnn \l_siunitx_ohm_text_tl
- { \ensuremath { \c_siunitx_omega_tl } }
+ \__siunitx_option_unchanged:Nnn \l__siunitx_ohm_text_tl
+ { \ensuremath { \c__siunitx_omega_tl } }
{ \textohm }
}
}
\str_if_eq:VnT \encodingdefault { OT1 }
{
- \siunitx_option_unchanged:Nnn \l_siunitx_angstrom_math_tl
+ \__siunitx_option_unchanged:Nnn \l__siunitx_angstrom_math_tl
{ \text { \AA } }
{ \text { \capitalring { A } } }
- \siunitx_option_unchanged:Nnn \l_siunitx_angstrom_text_tl
+ \__siunitx_option_unchanged:Nnn \l__siunitx_angstrom_text_tl
{ \AA }
{ \capitalring { A } }
}
@@ -6724,21 +6724,21 @@
{ }
\@ifpackageloaded { upgreek }
{
- \siunitx_option_unchanged:Nnn \l_siunitx_ohm_math_tl
- { \text { \ensuremath { \c_siunitx_omega_tl } } }
+ \__siunitx_option_unchanged:Nnn \l__siunitx_ohm_math_tl
+ { \text { \ensuremath { \c__siunitx_omega_tl } } }
{ \Upomega }
}
{ }
}
}
\keys_define:nn { siunitx } {
- math-angstrom .tl_set:N = \l_siunitx_angstrom_math_tl,
- math-arcminute .tl_set:N = \l_siunitx_arcminute_math_tl,
- math-arcsecond .tl_set:N = \l_siunitx_arcsecond_math_tl,
- math-celsius .tl_set:N = \l_siunitx_celsius_math_tl,
- math-degree .tl_set:N = \l_siunitx_degree_math_tl,
- math-micro .tl_set:N = \l_siunitx_micro_math_tl,
- math-ohm .tl_set:N = \l_siunitx_ohm_math_tl
+ math-angstrom .tl_set:N = \l__siunitx_angstrom_math_tl,
+ math-arcminute .tl_set:N = \l__siunitx_arcminute_math_tl,
+ math-arcsecond .tl_set:N = \l__siunitx_arcsecond_math_tl,
+ math-celsius .tl_set:N = \l__siunitx_celsius_math_tl,
+ math-degree .tl_set:N = \l__siunitx_degree_math_tl,
+ math-micro .tl_set:N = \l__siunitx_micro_math_tl,
+ math-ohm .tl_set:N = \l__siunitx_ohm_math_tl
}
\keys_set:nn { siunitx } {
math-angstrom = \text { \AA },
@@ -6746,17 +6746,17 @@
math-arcsecond = { } ^ { \prime \prime },
math-celsius = { } ^ { \circ } \kern - \scriptspace \mathrm { C },
math-degree = { } ^ { \circ },
- math-micro = \text { \c_siunitx_mu_tl },
- math-ohm = \text { \ensuremath { \c_siunitx_omega_tl } },
+ math-micro = \text { \c__siunitx_mu_tl },
+ math-ohm = \text { \ensuremath { \c__siunitx_omega_tl } },
}
\keys_define:nn { siunitx } {
- text-angstrom .tl_set:N = \l_siunitx_angstrom_text_tl,
- text-arcminute .tl_set:N = \l_siunitx_arcminute_text_tl,
- text-arcsecond .tl_set:N = \l_siunitx_arcsecond_text_tl,
- text-celsius .tl_set:N = \l_siunitx_celsius_text_tl,
- text-degree .tl_set:N = \l_siunitx_degree_text_tl,
- text-micro .tl_set:N = \l_siunitx_micro_text_tl,
- text-ohm .tl_set:N = \l_siunitx_ohm_text_tl,
+ text-angstrom .tl_set:N = \l__siunitx_angstrom_text_tl,
+ text-arcminute .tl_set:N = \l__siunitx_arcminute_text_tl,
+ text-arcsecond .tl_set:N = \l__siunitx_arcsecond_text_tl,
+ text-celsius .tl_set:N = \l__siunitx_celsius_text_tl,
+ text-degree .tl_set:N = \l__siunitx_degree_text_tl,
+ text-micro .tl_set:N = \l__siunitx_micro_text_tl,
+ text-ohm .tl_set:N = \l__siunitx_ohm_text_tl,
}
\keys_set:nn { siunitx } {
text-angstrom = \AA,
@@ -6765,151 +6765,151 @@
text-celsius =
\ensuremath { { } ^ { \circ } \kern - \scriptspace \text { C } },
text-degree = \ensuremath { { } ^ { \circ } },
- text-micro = \c_siunitx_mu_tl ,
- text-ohm = \ensuremath { \c_siunitx_omega_tl },
+ text-micro = \c__siunitx_mu_tl ,
+ text-ohm = \ensuremath { \c__siunitx_omega_tl },
}
-\cs_new_protected:Npn \siunitx_symbol_new:n #1 {
+\cs_new_protected:Npn \__siunitx_symbol_new:n #1 {
\cs_set_protected:cpn { SIUnitSymbol #1 }
{
\mode_if_math:TF
- { \tl_to_lowercase:n { \use:c { l_siunitx_ #1 _math_tl } } }
- { \tl_to_lowercase:n { \use:c { l_siunitx_ #1 _text_tl } } }
+ { \tl_to_lowercase:n { \use:c { l__siunitx_ #1 _math_tl } } }
+ { \tl_to_lowercase:n { \use:c { l__siunitx_ #1 _text_tl } } }
}
}
-\siunitx_symbol_new:n { Angstrom }
-\siunitx_symbol_new:n { Arcminute }
-\siunitx_symbol_new:n { Arcsecond }
-\siunitx_symbol_new:n { Celsius }
-\siunitx_symbol_new:n { Degree }
-\siunitx_symbol_new:n { Micro }
-\siunitx_symbol_new:n { Ohm }
+\__siunitx_symbol_new:n { Angstrom }
+\__siunitx_symbol_new:n { Arcminute }
+\__siunitx_symbol_new:n { Arcsecond }
+\__siunitx_symbol_new:n { Celsius }
+\__siunitx_symbol_new:n { Degree }
+\__siunitx_symbol_new:n { Micro }
+\__siunitx_symbol_new:n { Ohm }
\pdftex_if_engine:F
{
\AtBeginDocument
{
\@ifpackageloaded { fontspec }
{
- \int_const:Nn \c_siunitx_degree_int { 176 }
- \int_const:Nn \c_siunitx_micro_int { 181 }
- \int_const:Nn \c_siunitx_angstrom_int { 197 }
- \int_const:Nn \c_siunitx_ohm_int { 937 }
- \siunitx_option_unchanged:Nnn \l_siunitx_angstrom_math_tl
+ \int_const:Nn \c__siunitx_degree_int { 176 }
+ \int_const:Nn \c__siunitx_micro_int { 181 }
+ \int_const:Nn \c__siunitx_angstrom_int { 197 }
+ \int_const:Nn \c__siunitx_ohm_int { 937 }
+ \__siunitx_option_unchanged:Nnn \l__siunitx_angstrom_math_tl
{ \text { \AA } }
- { \tex_char:D \c_siunitx_angstrom_int }
- \siunitx_option_unchanged:Nnn \l_siunitx_celsius_math_tl
+ { \tex_char:D \c__siunitx_angstrom_int }
+ \__siunitx_option_unchanged:Nnn \l__siunitx_celsius_math_tl
{ { } ^ { \circ } \kern - \scriptspace \text { C } }
{
- \tex_char:D \c_siunitx_degree_int
+ \tex_char:D \c__siunitx_degree_int
C
}
- \siunitx_option_unchanged:Nnn \l_siunitx_degree_math_tl
+ \__siunitx_option_unchanged:Nnn \l__siunitx_degree_math_tl
{ { } ^ { \circ } }
- { \tex_char:D \c_siunitx_degree_int }
- \siunitx_option_unchanged:Nnn \l_siunitx_micro_math_tl
- { \text { \c_siunitx_mu_tl } }
- { \tex_char:D \c_siunitx_micro_int }
- \siunitx_option_unchanged:Nnn \l_siunitx_ohm_math_tl
- { \text { \ensuremath { \c_siunitx_omega_tl } } }
- { \tex_char:D \c_siunitx_ohm_int }
- \siunitx_option_unchanged:Nnn \l_siunitx_angstrom_text_tl
+ { \tex_char:D \c__siunitx_degree_int }
+ \__siunitx_option_unchanged:Nnn \l__siunitx_micro_math_tl
+ { \text { \c__siunitx_mu_tl } }
+ { \tex_char:D \c__siunitx_micro_int }
+ \__siunitx_option_unchanged:Nnn \l__siunitx_ohm_math_tl
+ { \text { \ensuremath { \c__siunitx_omega_tl } } }
+ { \tex_char:D \c__siunitx_ohm_int }
+ \__siunitx_option_unchanged:Nnn \l__siunitx_angstrom_text_tl
{ \AA }
- { \tex_char:D \c_siunitx_angstrom_int }
- \siunitx_option_unchanged:Nnn \l_siunitx_celsius_text_tl
+ { \tex_char:D \c__siunitx_angstrom_int }
+ \__siunitx_option_unchanged:Nnn \l__siunitx_celsius_text_tl
{
\ensuremath
{ { } ^ { \circ } \kern - \scriptspace \text { C } }
}
{
- \tex_char:D \c_siunitx_degree_int
+ \tex_char:D \c__siunitx_degree_int
C
}
- \siunitx_option_unchanged:Nnn \l_siunitx_degree_text_tl
+ \__siunitx_option_unchanged:Nnn \l__siunitx_degree_text_tl
{ \ensuremath { { } ^ { \circ } } }
- { \tex_char:D \c_siunitx_degree_int }
- \siunitx_option_unchanged:Nnn \l_siunitx_micro_text_tl
- { \c_siunitx_mu_tl }
- { \tex_char:D \c_siunitx_micro_int }
- \siunitx_option_unchanged:Nnn \l_siunitx_ohm_text_tl
- { \ensuremath { \c_siunitx_omega_tl } }
- { \tex_char:D \c_siunitx_ohm_int }
+ { \tex_char:D \c__siunitx_degree_int }
+ \__siunitx_option_unchanged:Nnn \l__siunitx_micro_text_tl
+ { \c__siunitx_mu_tl }
+ { \tex_char:D \c__siunitx_micro_int }
+ \__siunitx_option_unchanged:Nnn \l__siunitx_ohm_text_tl
+ { \ensuremath { \c__siunitx_omega_tl } }
+ { \tex_char:D \c__siunitx_ohm_int }
}
{ }
\@ifpackageloaded { unicode-math }
{
- \int_const:Nn \c_siunitx_arcminute_int { 8242 }
- \int_const:Nn \c_siunitx_arcsecond_int { 8243 }
- \siunitx_option_unchanged:Nnn \l_siunitx_arcminute_math_tl
+ \int_const:Nn \c__siunitx_arcminute_int { 8242 }
+ \int_const:Nn \c__siunitx_arcsecond_int { 8243 }
+ \__siunitx_option_unchanged:Nnn \l__siunitx_arcminute_math_tl
{ { } ^ { \prime } }
- { \ensuremath { \tex_char:D \c_siunitx_arcminute_int } }
- \siunitx_option_unchanged:Nnn \l_siunitx_arcsecond_math_tl
+ { \ensuremath { \tex_char:D \c__siunitx_arcminute_int } }
+ \__siunitx_option_unchanged:Nnn \l__siunitx_arcsecond_math_tl
{ { } ^ { \prime \prime } }
- { \ensuremath { \tex_char:D \c_siunitx_arcsecond_int } }
- \siunitx_option_unchanged:Nnn \l_siunitx_arcminute_text_tl
+ { \ensuremath { \tex_char:D \c__siunitx_arcsecond_int } }
+ \__siunitx_option_unchanged:Nnn \l__siunitx_arcminute_text_tl
{ \ensuremath { { } ^ { \prime } } }
- { \ensuremath { \tex_char:D \c_siunitx_arcminute_int } }
- \siunitx_option_unchanged:Nnn \l_siunitx_arcsecond_text_tl
+ { \ensuremath { \tex_char:D \c__siunitx_arcminute_int } }
+ \__siunitx_option_unchanged:Nnn \l__siunitx_arcsecond_text_tl
{ \ensuremath { { } ^ { \prime \prime } } }
- { \ensuremath { \tex_char:D \c_siunitx_arcsecond_int } }
+ { \ensuremath { \tex_char:D \c__siunitx_arcsecond_int } }
}
{ }
}
}
-\clist_new:N \l_siunitx_pgf_link_clist
-\cs_new_protected:Npn \siunitx_pgf_link: {
- \clist_clear:N \l_siunitx_pgf_link_clist
- \str_if_eq:VnT \l_siunitx_round_tl { figure }
+\clist_new:N \l__siunitx_pgf_link_clist
+\cs_new_protected:Npn \__siunitx_pgf_link: {
+ \clist_clear:N \l__siunitx_pgf_link_clist
+ \str_if_eq:VnT \l__siunitx_round_tl { figure }
{
- \clist_put_right:Nn \l_siunitx_pgf_link_clist { fixed }
- \clist_put_right:Nn \l_siunitx_pgf_link_clist
+ \clist_put_right:Nn \l__siunitx_pgf_link_clist { fixed }
+ \clist_put_right:Nn \l__siunitx_pgf_link_clist
{ fixed~zerofill = true }
}
- \clist_put_right:Nx \l_siunitx_pgf_link_clist
- { precision = \int_use:N \l_siunitx_process_precision_int }
- \clist_put_right:Nx \l_siunitx_pgf_link_clist
+ \clist_put_right:Nx \l__siunitx_pgf_link_clist
+ { precision = \int_use:N \l__siunitx_process_precision_int }
+ \clist_put_right:Nx \l__siunitx_pgf_link_clist
{
set~decimal~separator =
- { { \exp_not:V \l_siunitx_output_decimal_tl } }
+ { { \exp_not:V \l__siunitx_output_decimal_tl } }
}
- \clist_put_right:Nx \l_siunitx_pgf_link_clist
- { set~thousands~separator = { \exp_not:V \l_siunitx_group_sep_tl } }
- \clist_put_right:Nn \l_siunitx_pgf_link_clist
- { min~exponent~for~1000~sep = \int_use:N \l_siunitx_group_min_int }
+ \clist_put_right:Nx \l__siunitx_pgf_link_clist
+ { set~thousands~separator = { \exp_not:V \l__siunitx_group_sep_tl } }
+ \clist_put_right:Nn \l__siunitx_pgf_link_clist
+ { min~exponent~for~1000~sep = \int_use:N \l__siunitx_group_min_int }
\bool_if:nF
{
- \l_siunitx_group_decimal_bool ||
- \l_siunitx_group_integer_bool
+ \l__siunitx_group_decimal_bool ||
+ \l__siunitx_group_integer_bool
}
{
- \clist_put_right:Nn \l_siunitx_pgf_link_clist
+ \clist_put_right:Nn \l__siunitx_pgf_link_clist
{ min~exponent~for~1000~sep = 999 }
}
- \bool_if:NTF \l_siunitx_process_integer_zero_bool
+ \bool_if:NTF \l__siunitx_process_integer_zero_bool
{
- \clist_put_right:Nn \l_siunitx_pgf_link_clist
+ \clist_put_right:Nn \l__siunitx_pgf_link_clist
{ skip~0. = false }
}
{
- \clist_put_right:Nn \l_siunitx_pgf_link_clist
+ \clist_put_right:Nn \l__siunitx_pgf_link_clist
{ skip~0. = true }
}
- \str_if_eq:VnTF \l_siunitx_process_sign_tl { + }
+ \str_if_eq:VnTF \l__siunitx_process_sign_tl { + }
{
- \clist_put_right:Nn \l_siunitx_pgf_link_clist
+ \clist_put_right:Nn \l__siunitx_pgf_link_clist
{ showpos = true }
}
{
- \clist_put_right:Nn \l_siunitx_pgf_link_clist
+ \clist_put_right:Nn \l__siunitx_pgf_link_clist
{ showpos = false }
}
\group_begin:
- \cs_set:Npx \siunitx_tmp:w
+ \cs_set:Npx \__siunitx_tmp:w
{
\group_end:
\exp_not:N \pgfqkeys
{ /pgf/number~format }
- { \exp_not:V \l_siunitx_pgf_link_clist }
+ { \exp_not:V \l__siunitx_pgf_link_clist }
}
- \siunitx_tmp:w
+ \__siunitx_tmp:w
}
\msg_new:nnnn { siunitx } { bad-arc-sign }
{ Incorrect~use~of~sign~in~degree-minute-second~angle. }
@@ -7058,25 +7058,25 @@
in~the~preamble~to~load~the~appropriate~code.
}
\NewDocumentCommand \DeclareBinaryPrefix { m m m } {
- \siunitx_declare_prefix:Nnnn #1 {#2} { 2 } {#3}
+ \__siunitx_declare_prefix:Nnnn #1 {#2} { 2 } {#3}
}
\NewDocumentCommand \DeclareSIPostPower { m m } {
- \siunitx_declare_power_after:Nn #1 {#2}
+ \__siunitx_declare_power_after:Nn #1 {#2}
}
\NewDocumentCommand \DeclareSIPrefix { m m m } {
- \siunitx_declare_prefix:Nnnn #1 {#2} { 10 } {#3}
+ \__siunitx_declare_prefix:Nnnn #1 {#2} { 10 } {#3}
}
\NewDocumentCommand \DeclareSIPrePower { m m } {
- \siunitx_declare_power_before:Nn #1 {#2}
+ \__siunitx_declare_power_before:Nn #1 {#2}
}
\NewDocumentCommand \DeclareSIQualifier { m m } {
- \siunitx_declare_qualifier:Nn #1 {#2}
+ \__siunitx_declare_qualifier:Nn #1 {#2}
}
\NewDocumentCommand \DeclareSIUnit { O { } m m } {
- \siunitx_declare_unit:Nnn #2 {#3} {#1}
+ \__siunitx_declare_unit:Nnn #2 {#3} {#1}
}
\NewDocumentCommand \DeclareSIUnitWithOptions { m m m } {
- \siunitx_declare_unit:Nnn #1 {#2} {#3}
+ \__siunitx_declare_unit:Nnn #1 {#2} {#3}
}
\@onlypreamble \DeclareBinaryPrefix
\@onlypreamble \DeclareSIPostPower
@@ -7085,12 +7085,12 @@
\@onlypreamble \DeclareSIQualifier
\@onlypreamble \DeclareSIUnit
\@onlypreamble \DeclareSIUnitWithOptions
-\cs_new_protected:Npn \SendSettingsToPgf { \siunitx_pgf_link: }
+\cs_new_protected:Npn \SendSettingsToPgf { \__siunitx_pgf_link: }
\NewDocumentCommand \ang { o > { \SplitArgument { 2 } { ; } } m } {
\group_begin:
\IfNoValueF {#1}
{ \keys_set:nn { siunitx } {#1} }
- \siunitx_angle_output:nnn #2
+ \__siunitx_angle_output:nnn #2
\group_end:
}
\NewDocumentCommand \num { o m } {
@@ -7098,7 +7098,7 @@
\group_begin:
\IfNoValueF {#1}
{ \keys_set:nn { siunitx } {#1} }
- \siunitx_number_output:n {#2}
+ \__siunitx_number_output:n {#2}
\group_end:
}
\NewDocumentCommand \numlist { o > { \SplitList { ; } } m } {
@@ -7106,7 +7106,7 @@
\group_begin:
\IfNoValueF {#1}
{ \keys_set:nn { siunitx } {#1} }
- \siunitx_list_numbers:n {#2}
+ \__siunitx_list_numbers:n {#2}
\group_end:
}
\NewDocumentCommand \numrange { o m m } {
@@ -7114,17 +7114,17 @@
\group_begin:
\IfNoValueF {#1}
{ \keys_set:nn { siunitx } {#1} }
- \siunitx_range_numbers:nn {#2} {#3}
+ \__siunitx_range_numbers:nn {#2} {#3}
\group_end:
}
\NewDocumentCommand \SIlist { o > { \SplitList { ; } } m m } {
\leavevmode
\group_begin:
\IfNoValueTF {#1}
- { \siunitx_list_units:nnn {#2} {#3} { } }
+ { \__siunitx_list_units:nnn {#2} {#3} { } }
{
\keys_set:nn { siunitx } {#1}
- \siunitx_list_units:nnn {#2} {#3} {#1}
+ \__siunitx_list_units:nnn {#2} {#3} {#1}
}
\group_end:
}
@@ -7132,10 +7132,10 @@
\leavevmode
\group_begin:
\IfNoValueTF {#1}
- { \siunitx_range_unit:nnnn {#4} { } {#2} {#3} }
+ { \__siunitx_range_unit:nnnn {#4} { } {#2} {#3} }
{
\keys_set:nn { siunitx } {#1}
- \siunitx_range_unit:nnnn {#4} {#1} {#2} {#3}
+ \__siunitx_range_unit:nnnn {#4} {#1} {#2} {#3}
}
\group_end:
}
@@ -7143,10 +7143,10 @@
\leavevmode
\group_begin:
\IfNoValueTF {#1}
- { \siunitx_combined:nnnn { } {#2} {#3} {#4} }
+ { \__siunitx_combined:nnnn { } {#2} {#3} {#4} }
{
\keys_set:nn { siunitx } {#1}
- \siunitx_combined:nnnn {#1} {#2} {#3} {#4}
+ \__siunitx_combined:nnnn {#1} {#2} {#3} {#4}
}
\group_end:
}
@@ -7157,22 +7157,22 @@
\leavevmode
\IfNoValueF {#1}
{ \keys_set:nn { siunitx } {#1} }
- \bool_if:NTF \l_siunitx_number_parse_bool
+ \bool_if:NTF \l__siunitx_number_parse_bool
{
- \tl_set:Nn \l_siunitx_table_collect_tl {#2}
- \bool_set_false:N \l_siunitx_table_collect_pre_bool
- \siunitx_table_print_S:
+ \tl_set:Nn \l__siunitx_table_collect_tl {#2}
+ \bool_set_false:N \l__siunitx_table_collect_pre_bool
+ \__siunitx_table_print_S:
}
- { \siunitx_table_print_S_direct: #2 \siunitx_table_print: }
+ { \__siunitx_table_print_S_direct: #2 \__siunitx_table_print: }
}
\NewDocumentCommand \si { o m } {
\leavevmode
\group_begin:
\IfNoValueTF {#1}
- { \siunitx_unit_output:nn {#2} { } }
+ { \__siunitx_unit_output:nn {#2} { } }
{
\keys_set:nn { siunitx } {#1}
- \siunitx_unit_output:nn {#2} {#1}
+ \__siunitx_unit_output:nn {#2} {#1}
}
\group_end:
}
@@ -7185,13 +7185,13 @@
\cs_set_eq:NN \label \use_none:n
\cs_set_eq:NN \index \use_none:n
\cs_set_eq:NN \glossary \use_none:n
- \seq_map_inline:Nn \l_siunitx_declare_list_seq
- { \siunitx_contents_add:N ##1 }
+ \seq_map_inline:Nn \l__siunitx_declare_list_seq
+ { \__siunitx_contents_add:N ##1 }
}
{ \token_to_str:N \@writefile {#1} {#2} }
}
}
-\cs_new_protected:Npn \siunitx_contents_add:N #1
+\cs_new_protected:Npn \__siunitx_contents_add:N #1
{
\cs_set:Npn #1
{
@@ -7199,18 +7199,18 @@
\c_space_tl
}
}
-\cs_new_protected:Npn \siunitx_contents_bookmarks:
+\cs_new_protected:Npn \__siunitx_contents_bookmarks:
{
- \seq_map_inline:Nn \l_siunitx_declare_list_seq
- { \siunitx_unit_print_literal_aux:N ##1 }
+ \seq_map_inline:Nn \l__siunitx_declare_list_seq
+ { \__siunitx_unit_print_literal_aux:N ##1 }
\msg_redirect_name:nnn { xparse } { redefine-command } { none }
- \cs_set_eq:NN \num \siunitx_bookmark_num:w
- \cs_set_eq:NN \numrange \siunitx_bookmark_numrange:w
- \cs_set_eq:NN \si \siunitx_bookmark_si:w
- \cs_set_eq:NN \SI \siunitx_bookmark_SI:w
- \cs_set_eq:NN \SIrange \siunitx_bookmark_SIrange:w
- \cs_set_eq:NN \si \siunitx_bookmark_si:w
- \cs_set_eq:NN \siunitx_textsuperscript:n \use:n
+ \cs_set_eq:NN \num \__siunitx_bookmark_num:w
+ \cs_set_eq:NN \numrange \__siunitx_bookmark_numrange:w
+ \cs_set_eq:NN \si \__siunitx_bookmark_si:w
+ \cs_set_eq:NN \SI \__siunitx_bookmark_SI:w
+ \cs_set_eq:NN \SIrange \__siunitx_bookmark_SIrange:w
+ \cs_set_eq:NN \si \__siunitx_bookmark_si:w
+ \cs_set_eq:NN \__siunitx_textsuperscript:n \use:n
\cs_set:Npn \SIUnitSymbolAngstrom { \AA }
\cs_set:Npn \SIUnitSymbolArcminute { ' }
\cs_set:Npn \SIUnitSymbolArcsecond { '' }
@@ -7219,34 +7219,34 @@
\cs_set:Npn \SIUnitSymbolMicro { \textmu }
\cs_set:Npn \SIUnitSymbolOhm { [ohm] }
}
-\DeclareExpandableDocumentCommand \siunitx_bookmark_num:w { o m } {#2}
-\DeclareExpandableDocumentCommand \siunitx_bookmark_numrange:w { o m m }
- { #2 \l_siunitx_range_phrase_tl #3 }
-\DeclareExpandableDocumentCommand \siunitx_bookmark_SI:w { o m o m }
+\DeclareExpandableDocumentCommand \__siunitx_bookmark_num:w { o m } {#2}
+\DeclareExpandableDocumentCommand \__siunitx_bookmark_numrange:w { o m m }
+ { #2 \l__siunitx_range_phrase_tl #3 }
+\DeclareExpandableDocumentCommand \__siunitx_bookmark_SI:w { o m o m }
{ \IfNoValueF {#3} {#3} #2 ~ #4 }
-\DeclareExpandableDocumentCommand \siunitx_bookmark_SIlist:w
- { o m m } { \siunitx_bookmark_SIlist_map:nn {#1} {#2} }
-\DeclareExpandableDocumentCommand \siunitx_bookmark_SIrange:w
- { o m m m } { #2 ~ #4 \l_siunitx_range_phrase_tl #3 ~ #4 }
-\DeclareExpandableDocumentCommand \siunitx_bookmark_si:w { o m } {#2}
-\cs_new:Npn \siunitx_bookmark_SIlist_map:nn #1#2 {
- \siunitx_bookmark_SIlist_map_aux:nw {#2} #1 ; \q_recursion_tail ;
+\DeclareExpandableDocumentCommand \__siunitx_bookmark_SIlist:w
+ { o m m } { \__siunitx_bookmark_SIlist_map:nn {#1} {#2} }
+\DeclareExpandableDocumentCommand \__siunitx_bookmark_SIrange:w
+ { o m m m } { #2 ~ #4 \l__siunitx_range_phrase_tl #3 ~ #4 }
+\DeclareExpandableDocumentCommand \__siunitx_bookmark_si:w { o m } {#2}
+\cs_new:Npn \__siunitx_bookmark_SIlist_map:nn #1#2 {
+ \__siunitx_bookmark_SIlist_map_aux:nw {#2} #1 ; \q_recursion_tail ;
\q_recursion_tail ; \q_recursion_stop
}
-\cs_new:Npn \siunitx_bookmark_SIlist_map_aux:nw #1#2 ; #3 ; #4 {
+\cs_new:Npn \__siunitx_bookmark_SIlist_map_aux:nw #1#2 ; #3 ; #4 {
#2 ~ #1
\quark_if_recursion_tail_stop:n {#3}
\quark_if_recursion_tail_stop_do:nn {#4}
{
- \l_siunitx_list_separator_final_tl
+ \l__siunitx_list_separator_final_tl
#3 ~ #1
}
- \l_siunitx_list_separator_tl
- \siunitx_bookmark_SIlist_map_aux:nw {#1} #3 ; #4
+ \l__siunitx_list_separator_tl
+ \__siunitx_bookmark_SIlist_map_aux:nw {#1} #3 ; #4
}
\AtBeginDocument {
\@ifpackageloaded { hyperref }
- { \pdfstringdefDisableCommands { \siunitx_contents_bookmarks: } }
+ { \pdfstringdefDisableCommands { \__siunitx_contents_bookmarks: } }
{ }
}
\DeclareSIUnit \kilogram { \kilo \gram }
@@ -7369,7 +7369,7 @@
parse-units = true,
product-units = repeat
}
- \siunitx_strict_option:n
+ \__siunitx_strict_option:n
{
bracket-numbers ,
detect-family ,
@@ -7392,11 +7392,11 @@
}
}
}
-\siunitx_option_deactivate:n { strict }
-\cs_new_protected:Npn \siunitx_strict_option:n #1 {
- \clist_map_function:nN {#1} \siunitx_strict_option_aux:n
+\__siunitx_option_deactivate:n { strict }
+\cs_new_protected:Npn \__siunitx_strict_option:n #1 {
+ \clist_map_function:nN {#1} \__siunitx_strict_option_aux:n
}
-\cs_new_protected:Npn \siunitx_strict_option_aux:n #1 {
+\cs_new_protected:Npn \__siunitx_strict_option_aux:n #1 {
\keys_define:nn { siunitx }
{ #1 .code:n =
{ \msg_warning:nnx { siunitx } { option-not-available } {#1} }
@@ -7454,39 +7454,40 @@
range-phrase = { ~ \translate { to~(numerical~range) } ~ }
}
}
-\tl_const:Nn \c_siunitx_configuration_ext_tl { cfg }
+\tl_const:Nn \c__siunitx_configuration_ext_tl { cfg }
\keys_define:nn { siunitx }
{
abbreviations .choice:,
abbreviations /
- true .code:n = { \siunitx_load_abbreviations: },
+ true .code:n = { \__siunitx_load_abbreviations: },
abbreviations /
false .code:n =
- { \cs_set_eq:NN \siunitx_load_abbreviations: \prg_do_nothing: } ,
+ { \cs_set_eq:NN \__siunitx_load_abbreviations: \prg_do_nothing: } ,
abbreviations .default:n = true ,
binary-units .choice:,
binary-units /
- true .code:n = { \siunitx_load_binary: },
+ true .code:n = { \__siunitx_load_binary: },
binary-units /
- false .code:n = { } ,
+ false .code:n =
+ { \cs_set_eq:NN \__siunitx_load_binary: \prg_do_nothing: } ,
binary-units .default:n = true
}
-\cs_new_protected:Npn \siunitx_load_abbreviations:
+\cs_new_protected_nopar:Npn \__siunitx_load_abbreviations:
{
\@onefilewithoptions { siunitx-abbreviations } [ ] [ ]
- \c_siunitx_configuration_ext_tl
+ \c__siunitx_configuration_ext_tl
}
-\cs_new_protected:Npn \siunitx_load_binary:
+\cs_new_protected_nopar:Npn \__siunitx_load_binary:
{
\@onefilewithoptions { siunitx-binary } [ ] [ ]
- \c_siunitx_configuration_ext_tl
+ \c__siunitx_configuration_ext_tl
}
\AtBeginDocument
{
- \siunitx_load_abbreviations:
- \siunitx_load_binary:
+ \__siunitx_load_abbreviations:
+ \__siunitx_load_binary:
}
-\siunitx_option_deactivate:n { abbreviations , binary }
+\__siunitx_option_deactivate:n { abbreviations , binary }
\keys_define:nn { siunitx }
{
version-1-compatibility .choice: ,
@@ -7494,33 +7495,33 @@
true .code:n =
{
\@onefilewithoptions { siunitx-version-1 } [ ] [ ]
- \c_siunitx_configuration_ext_tl
+ \c__siunitx_configuration_ext_tl
},
version-1-compatibility /
false .code:n = { } ,
version-1-compatibility .default:n = true
}
-\siunitx_option_deactivate:n { version-1-compatibility }
+\__siunitx_option_deactivate:n { version-1-compatibility }
\keys_define:nn { siunitx } {
load-configurations .code:n =
{
\clist_if_in:nnT {#1} { version-1 }
{
\@onefilewithoptions { siunitx-version-1 } [ ] [ ]
- \c_siunitx_configuration_ext_tl
+ \c__siunitx_configuration_ext_tl
}
}
}
-\siunitx_option_deactivate:n { load-configurations }
-\file_if_exist:nT { siunitx . \c_siunitx_configuration_ext_tl }
+\__siunitx_option_deactivate:n { load-configurations }
+\file_if_exist:nT { siunitx . \c__siunitx_configuration_ext_tl }
{
\@onefilewithoptions { siunitx } [ ] [ ]
- \c_siunitx_configuration_ext_tl
+ \c__siunitx_configuration_ext_tl
}
\AtBeginDocument {
- \bool_if:NTF \l_siunitx_create_free_bool
- { \siunitx_unit_create_functions: }
- { \siunitx_unit_create_empty_functions: }
+ \bool_if:NTF \l__siunitx_create_free_bool
+ { \__siunitx_unit_create_functions: }
+ { \__siunitx_unit_create_empty_functions: }
}
\ProcessKeysOptions { siunitx }
%% Copyright (C) 2008-2012 by