summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/fmtcount/fc-spanish.def
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/latex/fmtcount/fc-spanish.def')
-rw-r--r--Master/texmf-dist/tex/latex/fmtcount/fc-spanish.def140
1 files changed, 88 insertions, 52 deletions
diff --git a/Master/texmf-dist/tex/latex/fmtcount/fc-spanish.def b/Master/texmf-dist/tex/latex/fmtcount/fc-spanish.def
index 99d5f240631..1d59ac7ae85 100644
--- a/Master/texmf-dist/tex/latex/fmtcount/fc-spanish.def
+++ b/Master/texmf-dist/tex/latex/fmtcount/fc-spanish.def
@@ -7,7 +7,7 @@
%% fmtcount.dtx (with options: `fc-spanish.def,package')
%%
%% fmtcount.dtx
-%% Copyright 2013 Nicola Talbot and Vincent Belaïche
+%% Copyright 2014 Nicola Talbot and Vincent Belaïche
%%
%% This work may be distributed and/or modified under the
%% conditions of the LaTeX Project Public License, either version 1.3
@@ -21,7 +21,7 @@
%%
%% The Current Maintainer of this work is Nicola Talbot and Vincent Belaïche.
%%
-%% This work consists of the files fmtcount.dtx and fmtcount.ins and the derived files fcnumparser.sty, fcprefix.sty, fmtcount.sty, fc-american.def, fc-british.def, fc-english.def, fc-francais.def, fc-french.def, fc-frenchb.def, fc-german.def, fc-germanb.def, fc-italian.def, fc-ngerman.def, fc-ngermanb.def, fc-portuges.def, fc-spanish.def, fc-UKenglish.def, fc-USenglish.def.
+%% This work consists of the files fmtcount.dtx and fmtcount.ins and the derived files fcnumparser.sty, fcprefix.sty, fmtcount.sty, fc-american.def, fc-british.def, fc-english.def, fc-francais.def, fc-french.def, fc-frenchb.def, fc-german.def, fc-germanb.def, fc-italian.def, fc-ngerman.def, fc-ngermanb.def, fc-portuges.def, fc-portuguese.def, fc-spanish.def, fc-UKenglish.def, fc-USenglish.def.
%%
%% \CharacterTable
%% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
@@ -49,14 +49,16 @@
%%\cs{latinnumeralstringnum}\marg{number}\oarg{prefix options}
%%\end{definition}
\ProvidesFCLanguage{spanish}[2013/08/17]%
-\gdef\@ordinalMspanish#1{%
+\newcommand*\@ordinalMspanish[2]{%
\edef#2{\number#1\relax\noexpand\fmtord{o}}%
}%
-\gdef\@ordinalFspanish}[2]{%
+\global\let\@ordinalMspanish\@ordinalMspanish
+\newcommand{\@ordinalFspanish}[2]{%
\edef#2{\number#1\relax\noexpand\fmtord{a}}%
}%
+\global\let\@ordinalFspanish\@ordinalFspanish
\global\let\@ordinalNspanish\@ordinalMspanish
-\gdef\@@unitstringspanish#1{%
+\newcommand*\@@unitstringspanish[1]{%
\ifcase#1\relax
cero%
\or uno%
@@ -70,7 +72,8 @@
\or nueve%
\fi
}%
-\gdef\@@unitstringFspanish#1{%
+\global\let\@@unitstringspanish\@@unitstringspanish
+\newcommand*\@@unitstringFspanish[1]{%
\ifcase#1\relax
cera%
\or una%
@@ -84,7 +87,8 @@
\or nueve%
\fi
}%
-\gdef\@@tenstringspanish#1{%
+\global\let\@@unitstringFspanish\@@unitstringFspanish
+\newcommand*\@@tenstringspanish[1]{%
\ifcase#1\relax
\or diez%
\or veinte%
@@ -98,7 +102,8 @@
\or cien%
\fi
}%
-\gdef\@@teenstringspanish#1{%
+\global\let\@@tenstringspanish\@@tenstringspanish
+\newcommand*\@@teenstringspanish[1]{%
\ifcase#1\relax
diez%
\or once%
@@ -112,7 +117,8 @@
\or diecinueve%
\fi
}%
-\gdef\@@twentystringspanish#1{%
+\global\let\@@teenstringspanish\@@teenstringspanish
+\newcommand*\@@twentystringspanish[1]{%
\ifcase#1\relax
veinte%
\or veintiuno%
@@ -126,7 +132,8 @@
\or veintinueve%
\fi
}%
-\gdef\@@twentystringFspanish#1{%
+\global\let\@@twentystringspanish\@@twentystringspanish
+\newcommand*\@@twentystringFspanish[1]{%
\ifcase#1\relax
veinte%
\or veintiuna%
@@ -140,7 +147,8 @@
\or veintinueve%
\fi
}%
-\gdef\@@hundredstringspanish#1{%
+\global\let\@@twentystringFspanish\@@twentystringFspanish
+\newcommand*\@@hundredstringspanish[1]{%
\ifcase#1\relax
\or ciento%
\or doscientos%
@@ -153,7 +161,8 @@
\or novecientos%
\fi
}%
-\gdef\@@hundredstringFspanish#1{%
+\global\let\@@hundredstringspanish\@@hundredstringspanish
+\newcommand*\@@hundredstringFspanish[1]{%
\ifcase#1\relax
\or cienta%
\or doscientas%
@@ -166,7 +175,8 @@
\or novecientas%
\fi
}%
-\gdef\@@Unitstringspanish#1{%
+\global\let\@@hundredstringFspanish\@@hundredstringFspanish
+\newcommand*\@@Unitstringspanish[1]{%
\ifcase#1\relax
Cero%
\or Uno%
@@ -180,7 +190,8 @@
\or Nueve%
\fi
}%
-\gdef\@@UnitstringFspanish#1{%
+\global\let\@@Unitstringspanish\@@Unitstringspanish
+\newcommand*\@@UnitstringFspanish[1]{%
\ifcase#1\relax
Cera%
\or Una%
@@ -194,7 +205,8 @@
\or Nueve%
\fi
}%
-\gdef\@@Tenstringspanish#1{%
+\global\let\@@UnitstringFspanish\@@UnitstringFspanish
+\newcommand*\@@Tenstringspanish[1]{%
\ifcase#1\relax
\or Diez%
\or Veinte%
@@ -208,7 +220,8 @@
\or Cien%
\fi
}%
-\gdef\@@Teenstringspanish#1{%
+\global\let\@@Tenstringspanish\@@Tenstringspanish
+\newcommand*\@@Teenstringspanish[1]{%
\ifcase#1\relax
Diez%
\or Once%
@@ -222,7 +235,8 @@
\or Diecinueve%
\fi
}%
-\gdef\@@Twentystringspanish#1{%
+\global\let\@@Teenstringspanish\@@Teenstringspanish
+\newcommand*\@@Twentystringspanish[1]{%
\ifcase#1\relax
Veinte%
\or Veintiuno%
@@ -236,7 +250,8 @@
\or Veintinueve%
\fi
}%
-\gdef\@@TwentystringFspanish#1{%
+\global\let\@@Twentystringspanish\@@Twentystringspanish
+\newcommand*\@@TwentystringFspanish[1]{%
\ifcase#1\relax
Veinte%
\or Veintiuna%
@@ -250,7 +265,8 @@
\or Veintinueve%
\fi
}%
-\gdef\@@Hundredstringspanish#1{%
+\global\let\@@TwentystringFspanish\@@TwentystringFspanish
+\newcommand*\@@Hundredstringspanish[1]{%
\ifcase#1\relax
\or Ciento%
\or Doscientos%
@@ -263,7 +279,8 @@
\or Novecientos%
\fi
}%
-\gdef\@@HundredstringFspanish#1{%
+\global\let\@@Hundredstringspanish\@@Hundredstringspanish
+\newcommand*\@@HundredstringFspanish[1]{%
\ifcase#1\relax
\or Cienta%
\or Doscientas%
@@ -276,6 +293,7 @@
\or Novecientas%
\fi
}%
+\global\let\@@HundredstringFspanish\@@HundredstringFspanish
\DeclareRobustCommand{\@numberstringMspanish}[2]{%
\let\@unitstring=\@@unitstringspanish
\let\@teenstring=\@@teenstringspanish
@@ -364,7 +382,7 @@
}%
\global\let\@OrdinalstringFspanish\@OrdinalstringFspanish
\global\let\@OrdinalstringNspanish\@OrdinalstringMspanish
-\gdef\@@unitthstringspanish#1{%
+\newcommand*\@@unitthstringspanish[1]{%
\ifcase#1\relax
cero%
\or primero%
@@ -378,7 +396,8 @@
\or noveno%
\fi
}%
-\gdef\@@tenthstringspanish#1{%
+\global\let\@@unitthstringspanish\@@unitthstringspanish
+\newcommand*\@@tenthstringspanish[1]{%
\ifcase#1\relax
\or d\'ecimo%
\or vig\'esimo%
@@ -391,7 +410,8 @@
\or nonag\'esimo%
\fi
}%
-\gdef\@@teenthstringspanish#1{%
+\global\let\@@tenthstringspanish\@@tenthstringspanish
+\newcommand*\@@teenthstringspanish[1]{%
\ifcase#1\relax
d\'ecimo%
\or und\'ecimo%
@@ -405,7 +425,8 @@
\or decimonoveno%
\fi
}%
-\gdef\@@hundredthstringspanish#1{%
+\global\let\@@teenthstringspanish\@@teenthstringspanish
+\newcommand*\@@hundredthstringspanish[1]{%
\ifcase#1\relax
\or cent\'esimo%
\or ducent\'esimo%
@@ -418,7 +439,8 @@
\or noningent\'esimo%
\fi
}%
-\gdef\@@unitthstringFspanish#1{%
+\global\let\@@hundredthstringspanish\@@hundredthstringspanish
+\newcommand*\@@unitthstringFspanish[1]{%
\ifcase#1\relax
cera%
\or primera%
@@ -432,7 +454,8 @@
\or novena%
\fi
}%
-\gdef\@@tenthstringFspanish#1{%
+\global\let\@@unitthstringFspanish\@@unitthstringFspanish
+\newcommand*\@@tenthstringFspanish[1]{%
\ifcase#1\relax
\or d\'ecima%
\or vig\'esima%
@@ -445,7 +468,8 @@
\or nonag\'esima%
\fi
}%
-\gdef\@@teenthstringFspanish#1{%
+\global\let\@@tenthstringFspanish\@@tenthstringFspanish
+\newcommand*\@@teenthstringFspanish[1]{%
\ifcase#1\relax
d\'ecima%
\or und\'ecima%
@@ -459,7 +483,8 @@
\or decimonovena%
\fi
}%
-\gdef\@@hundredthstringFspanish#1{%
+\global\let\@@teenthstringFspanish\@@teenthstringFspanish
+\newcommand*\@@hundredthstringFspanish[1]{%
\ifcase#1\relax
\or cent\'esima%
\or ducent\'esima%
@@ -472,7 +497,8 @@
\or noningent\'esima%
\fi
}%
-\gdef\@@Unitthstringspanish#1{%
+\global\let\@@hundredthstringFspanish\@@hundredthstringFspanish
+\newcommand*\@@Unitthstringspanish[1]{%
\ifcase#1\relax
Cero%
\or Primero%
@@ -486,7 +512,8 @@
\or Noveno%
\fi
}%
-\gdef\@@Tenthstringspanish#1{%
+\global\let\@@Unitthstringspanish\@@Unitthstringspanish
+\newcommand*\@@Tenthstringspanish[1]{%
\ifcase#1\relax
\or D\'ecimo%
\or Vig\'esimo%
@@ -499,7 +526,8 @@
\or Nonag\'esimo%
\fi
}%
-\gdef\@@Teenthstringspanish#1{%
+\global\let\@@Tenthstringspanish\@@Tenthstringspanish
+\newcommand*\@@Teenthstringspanish[1]{%
\ifcase#1\relax
D\'ecimo%
\or Und\'ecimo%
@@ -513,7 +541,8 @@
\or Decimonoveno%
\fi
}%
-\gdef\@@Hundredthstringspanish#1{%
+\global\let\@@Teenthstringspanish\@@Teenthstringspanish
+\newcommand*\@@Hundredthstringspanish[1]{%
\ifcase#1\relax
\or Cent\'esimo%
\or Ducent\'esimo%
@@ -526,7 +555,8 @@
\or Noningent\'esimo%
\fi
}%
-\gdef\@@UnitthstringFspanish#1{%
+\global\let\@@Hundredthstringspanish\@@Hundredthstringspanish
+\newcommand*\@@UnitthstringFspanish[1]{%
\ifcase#1\relax
Cera%
\or Primera%
@@ -540,7 +570,8 @@
\or Novena%
\fi
}%
-\gdef\@@TenthstringFspanish#1{%
+\global\let\@@UnitthstringFspanish\@@UnitthstringFspanish
+\newcommand*\@@TenthstringFspanish[1]{%
\ifcase#1\relax
\or D\'ecima%
\or Vig\'esima%
@@ -553,7 +584,8 @@
\or Nonag\'esima%
\fi
}%
-\gdef\@@TeenthstringFspanish#1{%
+\global\let\@@TenthstringFspanish\@@TenthstringFspanish
+\newcommand*\@@TeenthstringFspanish[1]{%
\ifcase#1\relax
D\'ecima%
\or Und\'ecima%
@@ -567,7 +599,8 @@
\or Decimonovena%
\fi
}%
-\gdef\@@HundredthstringFspanish#1{%
+\global\let\@@TeenthstringFspanish\@@TeenthstringFspanish
+\newcommand*\@@HundredthstringFspanish[1]{%
\ifcase#1\relax
\or Cent\'esima%
\or Ducent\'esima%
@@ -580,7 +613,8 @@
\or Noningent\'esima%
\fi
}%
-\gdef\@@numberstringspanish#1#2{%
+\global\let\@@HundredthstringFspanish\@@HundredthstringFspanish
+\newcommand*\@@numberstringspanish[2]{%
\ifnum#1>99999
\PackageError{fmtcount}{Out of range}%
{This macro only works for values less than 100000}%
@@ -600,7 +634,7 @@ this number}%
\let\@@fc@numstr#2\relax
\edef#2{\@@fc@numstr\@tenstring{\@strctr}}%
\@strctr=#1 \divide\@strctr by 1000\relax
- \@modulo{\@strctr}{10}%
+ \@FCmodulo{\@strctr}{10}%
\ifnum\@strctr>0\relax
\let\@@fc@numstr#2\relax
\edef#2{\@@fc@numstr\ \@andname\ \@unitstring{\@strctr}}%
@@ -608,7 +642,7 @@ this number}%
\else
\@strctr=#1\relax
\divide\@strctr by 1000\relax
- \@modulo{\@strctr}{10}%
+ \@FCmodulo{\@strctr}{10}%
\let\@@fc@numstr#2\relax
\edef#2{\@@fc@numstr\@teenstring{\@strctr}}%
\fi
@@ -624,7 +658,7 @@ this number}%
\edef#2{\@@fc@numstr\@thousand}%
\fi
\fi
-\@strctr=#1\relax \@modulo{\@strctr}{1000}%
+\@strctr=#1\relax \@FCmodulo{\@strctr}{1000}%
\divide\@strctr by 100\relax
\ifnum\@strctr>0\relax
\ifnum#1>1000\relax
@@ -632,7 +666,7 @@ this number}%
\edef#2{\@@fc@numstr\ }%
\fi
\@tmpstrctr=#1\relax
- \@modulo{\@tmpstrctr}{1000}%
+ \@FCmodulo{\@tmpstrctr}{1000}%
\ifnum\@tmpstrctr=100\relax
\let\@@fc@numstr#2\relax
\edef#2{\@@fc@numstr\@tenstring{10}}%
@@ -641,7 +675,7 @@ this number}%
\edef#2{\@@fc@numstr\@hundredstring{\@strctr}}%
\fi
\fi
-\@strctr=#1\relax \@modulo{\@strctr}{100}%
+\@strctr=#1\relax \@FCmodulo{\@strctr}{100}%
\ifnum#1>100\relax
\ifnum\@strctr>0\relax
\let\@@fc@numstr#2\relax
@@ -652,7 +686,7 @@ this number}%
\divide\@strctr by 10\relax
\let\@@fc@numstr#2\relax
\edef#2{\@@fc@numstr\@tenstring{\@strctr}}%
- \@strctr=#1\relax \@modulo{\@strctr}{10}%
+ \@strctr=#1\relax \@FCmodulo{\@strctr}{10}%
\ifnum\@strctr>0\relax
\let\@@fc@numstr#2\relax
\edef#2{\@@fc@numstr\ \@andname\ \@unitstring{\@strctr}}%
@@ -670,18 +704,19 @@ this number}%
\fi
\else
\ifnum\@strctr>19\relax
- \@modulo{\@strctr}{10}%
+ \@FCmodulo{\@strctr}{10}%
\let\@@fc@numstr#2\relax
\edef#2{\@@fc@numstr\@twentystring{\@strctr}}%
\else
- \@modulo{\@strctr}{10}%
+ \@FCmodulo{\@strctr}{10}%
\let\@@fc@numstr#2\relax
\edef#2{\@@fc@numstr\@teenstring{\@strctr}}%
\fi
\fi
\fi
}%
-\gdef\@@ordinalstringspanish#1#2{%
+\global\let\@@numberstringspanish\@@numberstringspanish
+\newcommand*\@@ordinalstringspanish[2]{%
\@strctr=#1\relax
\ifnum#1>99999
\PackageError{fmtcount}{Out of range}%
@@ -700,7 +735,7 @@ this number}%
\ifnum\@strctr>9\relax
\@tmpstrctr=\@strctr
\ifnum\@strctr<20
- \@modulo{\@tmpstrctr}{10}%
+ \@FCmodulo{\@tmpstrctr}{10}%
\let\@@fc@ordstr#2\relax
\edef#2{\@@fc@ordstr\@teenthstring{\@tmpstrctr}}%
\else
@@ -708,7 +743,7 @@ this number}%
\let\@@fc@ordstr#2\relax
\edef#2{\@@fc@ordstr\@tenthstring{\@tmpstrctr}}%
\@tmpstrctr=\@strctr
- \@modulo{\@tmpstrctr}{10}%
+ \@FCmodulo{\@tmpstrctr}{10}%
\ifnum\@tmpstrctr>0\relax
\let\@@fc@ordstr#2\relax
\edef#2{\@@fc@ordstr\@unitthstring{\@tmpstrctr}}%
@@ -723,7 +758,7 @@ this number}%
\edef#2{\@@fc@ordstr\@thousandth}%
\fi
\@strctr=#1\relax
-\@modulo{\@strctr}{1000}%
+\@FCmodulo{\@strctr}{1000}%
\ifnum\@strctr>99\relax
\@tmpstrctr=\@strctr
\divide\@tmpstrctr by 100\relax
@@ -734,7 +769,7 @@ this number}%
\let\@@fc@ordstr#2\relax
\edef#2{\@@fc@ordstr\@hundredthstring{\@tmpstrctr}}%
\fi
-\@modulo{\@strctr}{100}%
+\@FCmodulo{\@strctr}{100}%
\ifnum#1>99\relax
\ifnum\@strctr>0\relax
\let\@@fc@ordstr#2\relax
@@ -747,14 +782,14 @@ this number}%
\let\@@fc@ordstr#2\relax
\edef#2{\@@fc@ordstr\@tenthstring{\@tmpstrctr}}%
\@tmpstrctr=\@strctr
- \@modulo{\@tmpstrctr}{10}%
+ \@FCmodulo{\@tmpstrctr}{10}%
\ifnum\@tmpstrctr>0\relax
\let\@@fc@ordstr#2\relax
\edef#2{\@@fc@ordstr\ \@unitthstring{\@tmpstrctr}}%
\fi
\else
\ifnum\@strctr>9\relax
- \@modulo{\@strctr}{10}%
+ \@FCmodulo{\@strctr}{10}%
\let\@@fc@ordstr#2\relax
\edef#2{\@@fc@ordstr\@teenthstring{\@strctr}}%
\else
@@ -772,6 +807,7 @@ this number}%
\fi
\fi
}%
+\global\let\@@ordinalstringspanish\@@ordinalstringspanish
\endinput
%%