From 41ed127e239fba40041f66fc9d0df9b1b623cf8b Mon Sep 17 00:00:00 2001
From: Karl Berry <karl@freefriends.org>
Date: Sat, 17 Aug 2013 22:59:41 +0000
Subject: fmtcount (17aug13)

git-svn-id: svn://tug.org/texlive/trunk@31456 c570f23f-e606-0410-a88d-b1316a301751
---
 .../texmf-dist/tex/latex/fmtcount/fc-spanish.def   | 1028 ++++++++++----------
 1 file changed, 529 insertions(+), 499 deletions(-)

(limited to 'Master/texmf-dist/tex/latex/fmtcount/fc-spanish.def')

diff --git a/Master/texmf-dist/tex/latex/fmtcount/fc-spanish.def b/Master/texmf-dist/tex/latex/fmtcount/fc-spanish.def
index d8087791f72..99d5f240631 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 2012 Nicola Talbot and Vincent Belaïche
+%%  Copyright 2013 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
@@ -48,509 +48,539 @@
 %%\begin{definition}[\DescribeMacro{\latinnumeralstringnum}]
 %%\cs{latinnumeralstringnum}\marg{number}\oarg{prefix options}
 %%\end{definition}
-\ProvidesFCLanguage{spanish}[2012/06/18]
-\newcommand{\@ordinalMspanish}[2]{%
-\edef#2{\number#1\relax\noexpand\fmtord{o}}}
-\newcommand{\@ordinalFspanish}[2]{%
-\edef#2{\number#1\relax\noexpand\fmtord{a}}}
-\let\@ordinalNspanish\@ordinalMspanish
-\newcommand{\@@unitstringspanish}[1]{%
-\ifcase#1\relax
-cero%
-\or uno%
-\or dos%
-\or tres%
-\or cuatro%
-\or cinco%
-\or seis%
-\or siete%
-\or ocho%
-\or nueve%
-\fi
-}
-\newcommand{\@@unitstringFspanish}[1]{%
-\ifcase#1\relax
-cera%
-\or una%
-\or dos%
-\or tres%
-\or cuatro%
-\or cinco%
-\or seis%
-\or siete%
-\or ocho%
-\or nueve%
-\fi
-}
-\newcommand{\@@tenstringspanish}[1]{%
-\ifcase#1\relax
-\or diez%
-\or veinte%
-\or treinta%
-\or cuarenta%
-\or cincuenta%
-\or sesenta%
-\or setenta%
-\or ochenta%
-\or noventa%
-\or cien%
-\fi
-}
-\newcommand{\@@teenstringspanish}[1]{%
-\ifcase#1\relax
-diez%
-\or once%
-\or doce%
-\or trece%
-\or catorce%
-\or quince%
-\or diecis\'eis%
-\or diecisiete%
-\or dieciocho%
-\or diecinueve%
-\fi
-}
-\newcommand{\@@twentystringspanish}[1]{%
-\ifcase#1\relax
-veinte%
-\or veintiuno%
-\or veintid\'os%
-\or veintitr\'es%
-\or veinticuatro%
-\or veinticinco%
-\or veintis\'eis%
-\or veintisiete%
-\or veintiocho%
-\or veintinueve%
-\fi}
-\newcommand{\@@twentystringFspanish}[1]{%
-\ifcase#1\relax
-veinte%
-\or veintiuna%
-\or veintid\'os%
-\or veintitr\'es%
-\or veinticuatro%
-\or veinticinco%
-\or veintis\'eis%
-\or veintisiete%
-\or veintiocho%
-\or veintinueve%
-\fi}
-\newcommand{\@@hundredstringspanish}[1]{%
-\ifcase#1\relax
-\or ciento%
-\or doscientos%
-\or trescientos%
-\or cuatrocientos%
-\or quinientos%
-\or seiscientos%
-\or setecientos%
-\or ochocientos%
-\or novecientos%
-\fi}
-\newcommand{\@@hundredstringFspanish}[1]{%
-\ifcase#1\relax
-\or cienta%
-\or doscientas%
-\or trescientas%
-\or cuatrocientas%
-\or quinientas%
-\or seiscientas%
-\or setecientas%
-\or ochocientas%
-\or novecientas%
-\fi}
-\newcommand{\@@Unitstringspanish}[1]{%
-\ifcase#1\relax
-Cero%
-\or Uno%
-\or Dos%
-\or Tres%
-\or Cuatro%
-\or Cinco%
-\or Seis%
-\or Siete%
-\or Ocho%
-\or Nueve%
-\fi
-}
-\newcommand{\@@UnitstringFspanish}[1]{%
-\ifcase#1\relax
-Cera%
-\or Una%
-\or Dos%
-\or Tres%
-\or Cuatro%
-\or Cinco%
-\or Seis%
-\or Siete%
-\or Ocho%
-\or Nueve%
-\fi
-}
-\newcommand{\@@Tenstringspanish}[1]{%
-\ifcase#1\relax
-\or Diez%
-\or Veinte%
-\or Treinta%
-\or Cuarenta%
-\or Cincuenta%
-\or Sesenta%
-\or Setenta%
-\or Ochenta%
-\or Noventa%
-\or Cien%
-\fi
-}
-\newcommand{\@@Teenstringspanish}[1]{%
-\ifcase#1\relax
-Diez%
-\or Once%
-\or Doce%
-\or Trece%
-\or Catorce%
-\or Quince%
-\or Diecis\'eis%
-\or Diecisiete%
-\or Dieciocho%
-\or Diecinueve%
-\fi
-}
-\newcommand{\@@Twentystringspanish}[1]{%
-\ifcase#1\relax
-Veinte%
-\or Veintiuno%
-\or Veintid\'os%
-\or Veintitr\'es%
-\or Veinticuatro%
-\or Veinticinco%
-\or Veintis\'eis%
-\or Veintisiete%
-\or Veintiocho%
-\or Veintinueve%
-\fi}
-\newcommand{\@@TwentystringFspanish}[1]{%
-\ifcase#1\relax
-Veinte%
-\or Veintiuna%
-\or Veintid\'os%
-\or Veintitr\'es%
-\or Veinticuatro%
-\or Veinticinco%
-\or Veintis\'eis%
-\or Veintisiete%
-\or Veintiocho%
-\or Veintinueve%
-\fi}
-\newcommand{\@@Hundredstringspanish}[1]{%
-\ifcase#1\relax
-\or Ciento%
-\or Doscientos%
-\or Trescientos%
-\or Cuatrocientos%
-\or Quinientos%
-\or Seiscientos%
-\or Setecientos%
-\or Ochocientos%
-\or Novecientos%
-\fi}
-\newcommand{\@@HundredstringFspanish}[1]{%
-\ifcase#1\relax
-\or Cienta%
-\or Doscientas%
-\or Trescientas%
-\or Cuatrocientas%
-\or Quinientas%
-\or Seiscientas%
-\or Setecientas%
-\or Ochocientas%
-\or Novecientas%
-\fi}
+\ProvidesFCLanguage{spanish}[2013/08/17]%
+\gdef\@ordinalMspanish#1{%
+  \edef#2{\number#1\relax\noexpand\fmtord{o}}%
+}%
+\gdef\@ordinalFspanish}[2]{%
+  \edef#2{\number#1\relax\noexpand\fmtord{a}}%
+}%
+\global\let\@ordinalNspanish\@ordinalMspanish
+\gdef\@@unitstringspanish#1{%
+  \ifcase#1\relax
+    cero%
+    \or uno%
+    \or dos%
+    \or tres%
+    \or cuatro%
+    \or cinco%
+    \or seis%
+    \or siete%
+    \or ocho%
+    \or nueve%
+  \fi
+}%
+\gdef\@@unitstringFspanish#1{%
+  \ifcase#1\relax
+    cera%
+    \or una%
+    \or dos%
+    \or tres%
+    \or cuatro%
+    \or cinco%
+    \or seis%
+    \or siete%
+    \or ocho%
+    \or nueve%
+  \fi
+}%
+\gdef\@@tenstringspanish#1{%
+  \ifcase#1\relax
+    \or diez%
+    \or veinte%
+    \or treinta%
+    \or cuarenta%
+    \or cincuenta%
+    \or sesenta%
+    \or setenta%
+    \or ochenta%
+    \or noventa%
+    \or cien%
+  \fi
+}%
+\gdef\@@teenstringspanish#1{%
+  \ifcase#1\relax
+    diez%
+    \or once%
+    \or doce%
+    \or trece%
+    \or catorce%
+    \or quince%
+    \or diecis\'eis%
+    \or diecisiete%
+    \or dieciocho%
+    \or diecinueve%
+  \fi
+}%
+\gdef\@@twentystringspanish#1{%
+  \ifcase#1\relax
+    veinte%
+    \or veintiuno%
+    \or veintid\'os%
+    \or veintitr\'es%
+    \or veinticuatro%
+    \or veinticinco%
+    \or veintis\'eis%
+    \or veintisiete%
+    \or veintiocho%
+    \or veintinueve%
+  \fi
+}%
+\gdef\@@twentystringFspanish#1{%
+  \ifcase#1\relax
+    veinte%
+    \or veintiuna%
+    \or veintid\'os%
+    \or veintitr\'es%
+    \or veinticuatro%
+    \or veinticinco%
+    \or veintis\'eis%
+    \or veintisiete%
+    \or veintiocho%
+    \or veintinueve%
+  \fi
+}%
+\gdef\@@hundredstringspanish#1{%
+  \ifcase#1\relax
+    \or ciento%
+    \or doscientos%
+    \or trescientos%
+    \or cuatrocientos%
+    \or quinientos%
+    \or seiscientos%
+    \or setecientos%
+    \or ochocientos%
+    \or novecientos%
+  \fi
+}%
+\gdef\@@hundredstringFspanish#1{%
+  \ifcase#1\relax
+    \or cienta%
+    \or doscientas%
+    \or trescientas%
+    \or cuatrocientas%
+    \or quinientas%
+    \or seiscientas%
+    \or setecientas%
+    \or ochocientas%
+    \or novecientas%
+  \fi
+}%
+\gdef\@@Unitstringspanish#1{%
+  \ifcase#1\relax
+    Cero%
+    \or Uno%
+    \or Dos%
+    \or Tres%
+    \or Cuatro%
+    \or Cinco%
+    \or Seis%
+    \or Siete%
+    \or Ocho%
+    \or Nueve%
+  \fi
+}%
+\gdef\@@UnitstringFspanish#1{%
+  \ifcase#1\relax
+    Cera%
+    \or Una%
+    \or Dos%
+    \or Tres%
+    \or Cuatro%
+    \or Cinco%
+    \or Seis%
+    \or Siete%
+    \or Ocho%
+    \or Nueve%
+  \fi
+}%
+\gdef\@@Tenstringspanish#1{%
+  \ifcase#1\relax
+    \or Diez%
+    \or Veinte%
+    \or Treinta%
+    \or Cuarenta%
+    \or Cincuenta%
+    \or Sesenta%
+    \or Setenta%
+    \or Ochenta%
+    \or Noventa%
+    \or Cien%
+  \fi
+}%
+\gdef\@@Teenstringspanish#1{%
+  \ifcase#1\relax
+    Diez%
+    \or Once%
+    \or Doce%
+    \or Trece%
+    \or Catorce%
+    \or Quince%
+    \or Diecis\'eis%
+    \or Diecisiete%
+    \or Dieciocho%
+    \or Diecinueve%
+  \fi
+}%
+\gdef\@@Twentystringspanish#1{%
+  \ifcase#1\relax
+    Veinte%
+    \or Veintiuno%
+    \or Veintid\'os%
+    \or Veintitr\'es%
+    \or Veinticuatro%
+    \or Veinticinco%
+    \or Veintis\'eis%
+    \or Veintisiete%
+    \or Veintiocho%
+    \or Veintinueve%
+  \fi
+}%
+\gdef\@@TwentystringFspanish#1{%
+  \ifcase#1\relax
+    Veinte%
+    \or Veintiuna%
+    \or Veintid\'os%
+    \or Veintitr\'es%
+    \or Veinticuatro%
+    \or Veinticinco%
+    \or Veintis\'eis%
+    \or Veintisiete%
+    \or Veintiocho%
+    \or Veintinueve%
+  \fi
+}%
+\gdef\@@Hundredstringspanish#1{%
+  \ifcase#1\relax
+    \or Ciento%
+    \or Doscientos%
+    \or Trescientos%
+    \or Cuatrocientos%
+    \or Quinientos%
+    \or Seiscientos%
+    \or Setecientos%
+    \or Ochocientos%
+    \or Novecientos%
+  \fi
+}%
+\gdef\@@HundredstringFspanish#1{%
+  \ifcase#1\relax
+    \or Cienta%
+    \or Doscientas%
+    \or Trescientas%
+    \or Cuatrocientas%
+    \or Quinientas%
+    \or Seiscientas%
+    \or Setecientas%
+    \or Ochocientas%
+    \or Novecientas%
+  \fi
+}%
 \DeclareRobustCommand{\@numberstringMspanish}[2]{%
-\let\@unitstring=\@@unitstringspanish
-\let\@teenstring=\@@teenstringspanish
-\let\@tenstring=\@@tenstringspanish
-\let\@twentystring=\@@twentystringspanish
-\let\@hundredstring=\@@hundredstringspanish
-\def\@hundred{cien}\def\@thousand{mil}%
-\def\@andname{y}%
-\@@numberstringspanish{#1}{#2}}
+  \let\@unitstring=\@@unitstringspanish
+  \let\@teenstring=\@@teenstringspanish
+  \let\@tenstring=\@@tenstringspanish
+  \let\@twentystring=\@@twentystringspanish
+  \let\@hundredstring=\@@hundredstringspanish
+  \def\@hundred{cien}\def\@thousand{mil}%
+  \def\@andname{y}%
+  \@@numberstringspanish{#1}{#2}%
+}%
+\global\let\@numberstringMspanish\@numberstringMspanish
 \DeclareRobustCommand{\@numberstringFspanish}[2]{%
-\let\@unitstring=\@@unitstringFspanish
-\let\@teenstring=\@@teenstringspanish
-\let\@tenstring=\@@tenstringspanish
-\let\@twentystring=\@@twentystringFspanish
-\let\@hundredstring=\@@hundredstringFspanish
-\def\@hundred{cien}\def\@thousand{mil}%
-\def\@andname{b}%
-\@@numberstringspanish{#1}{#2}}
-\let\@numberstringNspanish\@numberstringMspanish
+  \let\@unitstring=\@@unitstringFspanish
+  \let\@teenstring=\@@teenstringspanish
+  \let\@tenstring=\@@tenstringspanish
+  \let\@twentystring=\@@twentystringFspanish
+  \let\@hundredstring=\@@hundredstringFspanish
+  \def\@hundred{cien}\def\@thousand{mil}%
+  \def\@andname{b}%
+  \@@numberstringspanish{#1}{#2}%
+}%
+\global\let\@numberstringFspanish\@numberstringFspanish
+\global\let\@numberstringNspanish\@numberstringMspanish
 \DeclareRobustCommand{\@NumberstringMspanish}[2]{%
-\let\@unitstring=\@@Unitstringspanish
-\let\@teenstring=\@@Teenstringspanish
-\let\@tenstring=\@@Tenstringspanish
-\let\@twentystring=\@@Twentystringspanish
-\let\@hundredstring=\@@Hundredstringspanish
-\def\@andname{y}%
-\def\@hundred{Cien}\def\@thousand{Mil}%
-\@@numberstringspanish{#1}{#2}}
+  \let\@unitstring=\@@Unitstringspanish
+  \let\@teenstring=\@@Teenstringspanish
+  \let\@tenstring=\@@Tenstringspanish
+  \let\@twentystring=\@@Twentystringspanish
+  \let\@hundredstring=\@@Hundredstringspanish
+  \def\@andname{y}%
+  \def\@hundred{Cien}\def\@thousand{Mil}%
+  \@@numberstringspanish{#1}{#2}%
+}%
+\global\let\@NumberstringMspanish\@NumberstringMspanish
 \DeclareRobustCommand{\@NumberstringFspanish}[2]{%
-\let\@unitstring=\@@UnitstringFspanish
-\let\@teenstring=\@@Teenstringspanish
-\let\@tenstring=\@@Tenstringspanish
-\let\@twentystring=\@@TwentystringFspanish
-\let\@hundredstring=\@@HundredstringFspanish
-\def\@andname{b}%
-\def\@hundred{Cien}\def\@thousand{Mil}%
-\@@numberstringspanish{#1}{#2}}
-\let\@NumberstringNspanish\@NumberstringMspanish
+  \let\@unitstring=\@@UnitstringFspanish
+  \let\@teenstring=\@@Teenstringspanish
+  \let\@tenstring=\@@Tenstringspanish
+  \let\@twentystring=\@@TwentystringFspanish
+  \let\@hundredstring=\@@HundredstringFspanish
+  \def\@andname{b}%
+  \def\@hundred{Cien}\def\@thousand{Mil}%
+  \@@numberstringspanish{#1}{#2}%
+}%
+\global\let\@NumberstringFspanish\@NumberstringFspanish
+\global\let\@NumberstringNspanish\@NumberstringMspanish
 \DeclareRobustCommand{\@ordinalstringMspanish}[2]{%
-\let\@unitthstring=\@@unitthstringspanish
-\let\@unitstring=\@@unitstringspanish
-\let\@teenthstring=\@@teenthstringspanish
-\let\@tenthstring=\@@tenthstringspanish
-\let\@hundredthstring=\@@hundredthstringspanish
-\def\@thousandth{mil\'esimo}%
-\@@ordinalstringspanish{#1}{#2}}
+  \let\@unitthstring=\@@unitthstringspanish
+  \let\@unitstring=\@@unitstringspanish
+  \let\@teenthstring=\@@teenthstringspanish
+  \let\@tenthstring=\@@tenthstringspanish
+  \let\@hundredthstring=\@@hundredthstringspanish
+  \def\@thousandth{mil\'esimo}%
+  \@@ordinalstringspanish{#1}{#2}%
+}%
+\global\let\@ordinalstringMspanish\@ordinalstringMspanish
 \DeclareRobustCommand{\@ordinalstringFspanish}[2]{%
-\let\@unitthstring=\@@unitthstringFspanish
-\let\@unitstring=\@@unitstringFspanish
-\let\@teenthstring=\@@teenthstringFspanish
-\let\@tenthstring=\@@tenthstringFspanish
-\let\@hundredthstring=\@@hundredthstringFspanish
-\def\@thousandth{mil\'esima}%
-\@@ordinalstringspanish{#1}{#2}}
-\let\@ordinalstringNspanish\@ordinalstringMspanish
+  \let\@unitthstring=\@@unitthstringFspanish
+  \let\@unitstring=\@@unitstringFspanish
+  \let\@teenthstring=\@@teenthstringFspanish
+  \let\@tenthstring=\@@tenthstringFspanish
+  \let\@hundredthstring=\@@hundredthstringFspanish
+  \def\@thousandth{mil\'esima}%
+  \@@ordinalstringspanish{#1}{#2}%
+}%
+\global\let\@ordinalstringFspanish\@ordinalstringFspanish
+\global\let\@ordinalstringNspanish\@ordinalstringMspanish
 \DeclareRobustCommand{\@OrdinalstringMspanish}[2]{%
-\let\@unitthstring=\@@Unitthstringspanish
-\let\@unitstring=\@@Unitstringspanish
-\let\@teenthstring=\@@Teenthstringspanish
-\let\@tenthstring=\@@Tenthstringspanish
-\let\@hundredthstring=\@@Hundredthstringspanish
-\def\@thousandth{Mil\'esimo}%
-\@@ordinalstringspanish{#1}{#2}}
-\DeclareRobustCommand{\@OrdinalstringFspanish}[2]{%
-\let\@unitthstring=\@@UnitthstringFspanish
-\let\@unitstring=\@@UnitstringFspanish
-\let\@teenthstring=\@@TeenthstringFspanish
-\let\@tenthstring=\@@TenthstringFspanish
-\let\@hundredthstring=\@@HundredthstringFspanish
-\def\@thousandth{Mil\'esima}%
-\@@ordinalstringspanish{#1}{#2}}
-\let\@OrdinalstringNspanish\@OrdinalstringMspanish
-\newcommand{\@@unitthstringspanish}[1]{%
-\ifcase#1\relax
-cero%
-\or primero%
-\or segundo%
-\or tercero%
-\or cuarto%
-\or quinto%
-\or sexto%
-\or s\'eptimo%
-\or octavo%
-\or noveno%
-\fi
-}
-\newcommand{\@@tenthstringspanish}[1]{%
-\ifcase#1\relax
-\or d\'ecimo%
-\or vig\'esimo%
-\or trig\'esimo%
-\or cuadrag\'esimo%
-\or quincuag\'esimo%
-\or sexag\'esimo%
-\or septuag\'esimo%
-\or octog\'esimo%
-\or nonag\'esimo%
-\fi
-}
-\newcommand{\@@teenthstringspanish}[1]{%
-\ifcase#1\relax
-d\'ecimo%
-\or und\'ecimo%
-\or duod\'ecimo%
-\or decimotercero%
-\or decimocuarto%
-\or decimoquinto%
-\or decimosexto%
-\or decimos\'eptimo%
-\or decimoctavo%
-\or decimonoveno%
-\fi
+  \let\@unitthstring=\@@Unitthstringspanish
+  \let\@unitstring=\@@Unitstringspanish
+  \let\@teenthstring=\@@Teenthstringspanish
+  \let\@tenthstring=\@@Tenthstringspanish
+  \let\@hundredthstring=\@@Hundredthstringspanish
+  \def\@thousandth{Mil\'esimo}%
+  \@@ordinalstringspanish{#1}{#2}%
 }
-\newcommand{\@@hundredthstringspanish}[1]{%
-\ifcase#1\relax
-\or cent\'esimo%
-\or ducent\'esimo%
-\or tricent\'esimo%
-\or cuadringent\'esimo%
-\or quingent\'esimo%
-\or sexcent\'esimo%
-\or septing\'esimo%
-\or octingent\'esimo%
-\or noningent\'esimo%
-\fi}
-\newcommand{\@@unitthstringFspanish}[1]{%
-\ifcase#1\relax
-cera%
-\or primera%
-\or segunda%
-\or tercera%
-\or cuarta%
-\or quinta%
-\or sexta%
-\or s\'eptima%
-\or octava%
-\or novena%
-\fi
-}
-\newcommand{\@@tenthstringFspanish}[1]{%
-\ifcase#1\relax
-\or d\'ecima%
-\or vig\'esima%
-\or trig\'esima%
-\or cuadrag\'esima%
-\or quincuag\'esima%
-\or sexag\'esima%
-\or septuag\'esima%
-\or octog\'esima%
-\or nonag\'esima%
-\fi
-}
-\newcommand{\@@teenthstringFspanish}[1]{%
-\ifcase#1\relax
-d\'ecima%
-\or und\'ecima%
-\or duod\'ecima%
-\or decimotercera%
-\or decimocuarta%
-\or decimoquinta%
-\or decimosexta%
-\or decimos\'eptima%
-\or decimoctava%
-\or decimonovena%
-\fi
-}
-\newcommand{\@@hundredthstringFspanish}[1]{%
-\ifcase#1\relax
-\or cent\'esima%
-\or ducent\'esima%
-\or tricent\'esima%
-\or cuadringent\'esima%
-\or quingent\'esima%
-\or sexcent\'esima%
-\or septing\'esima%
-\or octingent\'esima%
-\or noningent\'esima%
-\fi}
-\newcommand{\@@Unitthstringspanish}[1]{%
-\ifcase#1\relax
-Cero%
-\or Primero%
-\or Segundo%
-\or Tercero%
-\or Cuarto%
-\or Quinto%
-\or Sexto%
-\or S\'eptimo%
-\or Octavo%
-\or Noveno%
-\fi
-}
-\newcommand{\@@Tenthstringspanish}[1]{%
-\ifcase#1\relax
-\or D\'ecimo%
-\or Vig\'esimo%
-\or Trig\'esimo%
-\or Cuadrag\'esimo%
-\or Quincuag\'esimo%
-\or Sexag\'esimo%
-\or Septuag\'esimo%
-\or Octog\'esimo%
-\or Nonag\'esimo%
-\fi
-}
-\newcommand{\@@Teenthstringspanish}[1]{%
-\ifcase#1\relax
-D\'ecimo%
-\or Und\'ecimo%
-\or Duod\'ecimo%
-\or Decimotercero%
-\or Decimocuarto%
-\or Decimoquinto%
-\or Decimosexto%
-\or Decimos\'eptimo%
-\or Decimoctavo%
-\or Decimonoveno%
-\fi
-}
-\newcommand{\@@Hundredthstringspanish}[1]{%
-\ifcase#1\relax
-\or Cent\'esimo%
-\or Ducent\'esimo%
-\or Tricent\'esimo%
-\or Cuadringent\'esimo%
-\or Quingent\'esimo%
-\or Sexcent\'esimo%
-\or Septing\'esimo%
-\or Octingent\'esimo%
-\or Noningent\'esimo%
-\fi}
-\newcommand{\@@UnitthstringFspanish}[1]{%
-\ifcase#1\relax
-Cera%
-\or Primera%
-\or Segunda%
-\or Tercera%
-\or Cuarta%
-\or Quinta%
-\or Sexta%
-\or S\'eptima%
-\or Octava%
-\or Novena%
-\fi
-}
-\newcommand{\@@TenthstringFspanish}[1]{%
-\ifcase#1\relax
-\or D\'ecima%
-\or Vig\'esima%
-\or Trig\'esima%
-\or Cuadrag\'esima%
-\or Quincuag\'esima%
-\or Sexag\'esima%
-\or Septuag\'esima%
-\or Octog\'esima%
-\or Nonag\'esima%
-\fi
-}
-\newcommand{\@@TeenthstringFspanish}[1]{%
-\ifcase#1\relax
-D\'ecima%
-\or Und\'ecima%
-\or Duod\'ecima%
-\or Decimotercera%
-\or Decimocuarta%
-\or Decimoquinta%
-\or Decimosexta%
-\or Decimos\'eptima%
-\or Decimoctava%
-\or Decimonovena%
-\fi
-}
-\newcommand{\@@HundredthstringFspanish}[1]{%
-\ifcase#1\relax
-\or Cent\'esima%
-\or Ducent\'esima%
-\or Tricent\'esima%
-\or Cuadringent\'esima%
-\or Quingent\'esima%
-\or Sexcent\'esima%
-\or Septing\'esima%
-\or Octingent\'esima%
-\or Noningent\'esima%
-\fi}
-\newcommand{\@@numberstringspanish}[2]{%
+\global\let\@OrdinalstringMspanish\@OrdinalstringMspanish
+\DeclareRobustCommand{\@OrdinalstringFspanish}[2]{%
+  \let\@unitthstring=\@@UnitthstringFspanish
+  \let\@unitstring=\@@UnitstringFspanish
+  \let\@teenthstring=\@@TeenthstringFspanish
+  \let\@tenthstring=\@@TenthstringFspanish
+  \let\@hundredthstring=\@@HundredthstringFspanish
+  \def\@thousandth{Mil\'esima}%
+  \@@ordinalstringspanish{#1}{#2}%
+}%
+\global\let\@OrdinalstringFspanish\@OrdinalstringFspanish
+\global\let\@OrdinalstringNspanish\@OrdinalstringMspanish
+\gdef\@@unitthstringspanish#1{%
+  \ifcase#1\relax
+    cero%
+    \or primero%
+    \or segundo%
+    \or tercero%
+    \or cuarto%
+    \or quinto%
+    \or sexto%
+    \or s\'eptimo%
+    \or octavo%
+    \or noveno%
+  \fi
+}%
+\gdef\@@tenthstringspanish#1{%
+  \ifcase#1\relax
+    \or d\'ecimo%
+    \or vig\'esimo%
+    \or trig\'esimo%
+    \or cuadrag\'esimo%
+    \or quincuag\'esimo%
+    \or sexag\'esimo%
+    \or septuag\'esimo%
+    \or octog\'esimo%
+    \or nonag\'esimo%
+  \fi
+}%
+\gdef\@@teenthstringspanish#1{%
+  \ifcase#1\relax
+    d\'ecimo%
+    \or und\'ecimo%
+    \or duod\'ecimo%
+    \or decimotercero%
+    \or decimocuarto%
+    \or decimoquinto%
+    \or decimosexto%
+    \or decimos\'eptimo%
+    \or decimoctavo%
+    \or decimonoveno%
+  \fi
+}%
+\gdef\@@hundredthstringspanish#1{%
+  \ifcase#1\relax
+    \or cent\'esimo%
+    \or ducent\'esimo%
+    \or tricent\'esimo%
+    \or cuadringent\'esimo%
+    \or quingent\'esimo%
+    \or sexcent\'esimo%
+    \or septing\'esimo%
+    \or octingent\'esimo%
+    \or noningent\'esimo%
+  \fi
+}%
+\gdef\@@unitthstringFspanish#1{%
+  \ifcase#1\relax
+    cera%
+    \or primera%
+    \or segunda%
+    \or tercera%
+    \or cuarta%
+    \or quinta%
+    \or sexta%
+    \or s\'eptima%
+    \or octava%
+    \or novena%
+  \fi
+}%
+\gdef\@@tenthstringFspanish#1{%
+  \ifcase#1\relax
+    \or d\'ecima%
+    \or vig\'esima%
+    \or trig\'esima%
+    \or cuadrag\'esima%
+    \or quincuag\'esima%
+    \or sexag\'esima%
+    \or septuag\'esima%
+    \or octog\'esima%
+    \or nonag\'esima%
+  \fi
+}%
+\gdef\@@teenthstringFspanish#1{%
+  \ifcase#1\relax
+    d\'ecima%
+    \or und\'ecima%
+    \or duod\'ecima%
+    \or decimotercera%
+    \or decimocuarta%
+    \or decimoquinta%
+    \or decimosexta%
+    \or decimos\'eptima%
+    \or decimoctava%
+    \or decimonovena%
+  \fi
+}%
+\gdef\@@hundredthstringFspanish#1{%
+  \ifcase#1\relax
+    \or cent\'esima%
+    \or ducent\'esima%
+    \or tricent\'esima%
+    \or cuadringent\'esima%
+    \or quingent\'esima%
+    \or sexcent\'esima%
+    \or septing\'esima%
+    \or octingent\'esima%
+    \or noningent\'esima%
+  \fi
+}%
+\gdef\@@Unitthstringspanish#1{%
+  \ifcase#1\relax
+    Cero%
+    \or Primero%
+    \or Segundo%
+    \or Tercero%
+    \or Cuarto%
+    \or Quinto%
+    \or Sexto%
+    \or S\'eptimo%
+    \or Octavo%
+    \or Noveno%
+  \fi
+}%
+\gdef\@@Tenthstringspanish#1{%
+  \ifcase#1\relax
+    \or D\'ecimo%
+    \or Vig\'esimo%
+    \or Trig\'esimo%
+    \or Cuadrag\'esimo%
+    \or Quincuag\'esimo%
+    \or Sexag\'esimo%
+    \or Septuag\'esimo%
+    \or Octog\'esimo%
+    \or Nonag\'esimo%
+  \fi
+}%
+\gdef\@@Teenthstringspanish#1{%
+  \ifcase#1\relax
+    D\'ecimo%
+    \or Und\'ecimo%
+    \or Duod\'ecimo%
+    \or Decimotercero%
+    \or Decimocuarto%
+    \or Decimoquinto%
+    \or Decimosexto%
+    \or Decimos\'eptimo%
+    \or Decimoctavo%
+    \or Decimonoveno%
+  \fi
+}%
+\gdef\@@Hundredthstringspanish#1{%
+  \ifcase#1\relax
+    \or Cent\'esimo%
+    \or Ducent\'esimo%
+    \or Tricent\'esimo%
+    \or Cuadringent\'esimo%
+    \or Quingent\'esimo%
+    \or Sexcent\'esimo%
+    \or Septing\'esimo%
+    \or Octingent\'esimo%
+    \or Noningent\'esimo%
+  \fi
+}%
+\gdef\@@UnitthstringFspanish#1{%
+  \ifcase#1\relax
+    Cera%
+    \or Primera%
+    \or Segunda%
+    \or Tercera%
+    \or Cuarta%
+    \or Quinta%
+    \or Sexta%
+    \or S\'eptima%
+    \or Octava%
+    \or Novena%
+  \fi
+}%
+\gdef\@@TenthstringFspanish#1{%
+  \ifcase#1\relax
+    \or D\'ecima%
+    \or Vig\'esima%
+    \or Trig\'esima%
+    \or Cuadrag\'esima%
+    \or Quincuag\'esima%
+    \or Sexag\'esima%
+    \or Septuag\'esima%
+    \or Octog\'esima%
+    \or Nonag\'esima%
+  \fi
+}%
+\gdef\@@TeenthstringFspanish#1{%
+  \ifcase#1\relax
+    D\'ecima%
+    \or Und\'ecima%
+    \or Duod\'ecima%
+    \or Decimotercera%
+    \or Decimocuarta%
+    \or Decimoquinta%
+    \or Decimosexta%
+    \or Decimos\'eptima%
+    \or Decimoctava%
+    \or Decimonovena%
+  \fi
+}%
+\gdef\@@HundredthstringFspanish#1{%
+  \ifcase#1\relax
+    \or Cent\'esima%
+    \or Ducent\'esima%
+    \or Tricent\'esima%
+    \or Cuadringent\'esima%
+    \or Quingent\'esima%
+    \or Sexcent\'esima%
+    \or Septing\'esima%
+    \or Octingent\'esima%
+    \or Noningent\'esima%
+  \fi
+}%
+\gdef\@@numberstringspanish#1#2{%
 \ifnum#1>99999
 \PackageError{fmtcount}{Out of range}%
 {This macro only works for values less than 100000}%
@@ -650,8 +680,8 @@ this number}%
     \fi
   \fi
 \fi
-}
-\newcommand{\@@ordinalstringspanish}[2]{%
+}%
+\gdef\@@ordinalstringspanish#1#2{%
 \@strctr=#1\relax
 \ifnum#1>99999
 \PackageError{fmtcount}{Out of range}%
@@ -741,7 +771,7 @@ this number}%
 \fi
 \fi
 \fi
-}
+}%
 
 \endinput
 %%
-- 
cgit v1.2.3

