%%
%% This is file `fc-french.def',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% fmtcount.dtx  (with options: `fc-french.def,package')
%% Copyright (C) 2007 Nicola Talbot, all rights reserved.
%% If you modify this file, you must change its name first.
%% You are NOT ALLOWED to distribute this file alone. You are NOT
%% ALLOWED to take money for the distribution or use of either this
%% file or a changed version, except for a nominal charge for copying
%% etc.
%% \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
%%   Lower-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
%%   Digits        \0\1\2\3\4\5\6\7\8\9
%%   Exclamation   \!     Double quote  \"     Hash (number) \#
%%   Dollar        \$     Percent       \%     Ampersand     \&
%%   Acute accent  \'     Left paren    \(     Right paren   \)
%%   Asterisk      \*     Plus          \+     Comma         \,
%%   Minus         \-     Point         \.     Solidus       \/
%%   Colon         \:     Semicolon     \;     Less than     \<
%%   Equals        \=     Greater than  \>     Question mark \?
%%   Commercial at \@     Left bracket  \[     Backslash     \\
%%   Right bracket \]     Circumflex    \^     Underscore    \_
%%   Grave accent  \`     Left brace    \{     Vertical bar  \|
%%   Right brace   \}     Tilde         \~}
\ProvidesFile{fc-french.def}[2005/04/29]
\newcommand{\@@unitstringfrench}[1]{%
\ifcase#1\relax
zero%
\or un%
\or deux%
\or trois%
\or quatre%
\or cinq%
\or six%
\or sept%
\or huit%
\or neuf%
\fi
}

\newcommand{\@@unitstringFfrench}[1]{%
\ifnum#1=1\relax
une%
\else\@@unitstringfrench{#1}%
\fi
}

\newcommand{\@@tenstringfrench}[1]{%
\ifcase#1\relax
\or dix%
\or vingt%
\or trente%
\or quarante%
\or cinquante%
\or soixante%
\or septente%
\or huitante%
\or nonente%
\or cent%
\fi
}

\newcommand{\@@teenstringfrench}[1]{%
\ifcase#1\relax
dix%
\or onze%
\or douze%
\or treize%
\or quatorze%
\or quinze%
\or seize%
\or dix-sept%
\or dix-huit%
\or dix-neuf%
\fi
}

\newcommand{\@@seventiesfrench}[1]{%
\@tenstring{6}%
\ifnum#1=1\relax
\ \@andname\
\else
-%
\fi
\@teenstring{#1}%
}

\newcommand{\@@eightiesfrench}[1]{%
\@unitstring{4}-\@tenstring{2}%
\ifnum#1>0
-\@unitstring{#1}%
\else
s%
\fi
}

\newcommand{\@@ninetiesfrench}[1]{%
\@unitstring{4}-\@tenstring{2}-\@teenstring{#1}%
}

\newcommand{\@@seventiesfrenchswiss}[1]{%
\@tenstring{7}%
\ifnum#1=1\ \@andname\ \fi
\ifnum#1>1-\fi
\ifnum#1>0\@unitstring{#1}\fi
}

\newcommand{\@@eightiesfrenchswiss}[1]{%
\@tenstring{8}%
\ifnum#1=1\ \@andname\ \fi
\ifnum#1>1-\fi
\ifnum#1>0\@unitstring{#1}\fi
}

\newcommand{\@@ninetiesfrenchswiss}[1]{%
\@tenstring{9}%
\ifnum#1=1\ \@andname\ \fi
\ifnum#1>1-\fi
\ifnum#1>0\@unitstring{#1}\fi
}

\newcommand{\@@Unitstringfrench}[1]{%
\ifcase#1\relax
Zero%
\or Un%
\or Deux%
\or Trois%
\or Quatre%
\or Cinq%
\or Six%
\or Sept%
\or Huit%
\or Neuf%
\fi
}

\newcommand{\@@UnitstringFfrench}[1]{%
\ifnum#1=1\relax
Une%
\else \@@Unitstringfrench{#1}%
\fi
}

\newcommand{\@@Tenstringfrench}[1]{%
\ifcase#1\relax
\or Dix%
\or Vingt%
\or Trente%
\or Quarante%
\or Cinquante%
\or Soixante%
\or Septente%
\or Huitante%
\or Nonente%
\or Cent%
\fi
}

\newcommand{\@@Teenstringfrench}[1]{%
\ifcase#1\relax
Dix%
\or Onze%
\or Douze%
\or Treize%
\or Quatorze%
\or Quinze%
\or Seize%
\or Dix-Sept%
\or Dix-Huit%
\or Dix-Neuf%
\fi
}

\newcommand{\@numberstringMfrenchswiss}[1]{%
\let\@unitstring=\@@unitstringfrench
\let\@teenstring=\@@teenstringfrench
\let\@tenstring=\@@tenstringfrench
\let\@seventies=\@@seventiesfrenchswiss
\let\@eighties=\@@eightiesfrenchswiss
\let\@nineties=\@@ninetiesfrenchswiss
\def\@hundred{cent}\def\@thousand{mille}%
\def\@andname{et}%
\@@numberstringfrench{#1}}

\newcommand{\@numberstringMfrenchfrance}[1]{%
\let\@unitstring=\@@unitstringfrench
\let\@teenstring=\@@teenstringfrench
\let\@tenstring=\@@tenstringfrench
\let\@seventies=\@@seventiesfrench
\let\@eighties=\@@eightiesfrench
\let\@nineties=\@@ninetiesfrench
\def\@hundred{cent}\def\@thousand{mille}%
\def\@andname{et}%
\@@numberstringfrench{#1}}

\newcommand{\@numberstringMfrenchbelgian}[1]{%
\let\@unitstring=\@@unitstringfrench
\let\@teenstring=\@@teenstringfrench
\let\@tenstring=\@@tenstringfrench
\let\@seventies=\@@seventiesfrenchswiss
\let\@eighties=\@@eightiesfrench
\let\@nineties=\@@ninetiesfrench
\def\@hundred{cent}\def\@thousand{mille}%
\def\@andname{et}%
\@@numberstringfrench{#1}}

\let\@numberstringMfrench=\@numberstringMfrenchfrance

\newcommand{\@numberstringFfrenchswiss}[1]{%
\let\@unitstring=\@@unitstringFfrench
\let\@teenstring=\@@teenstringfrench
\let\@tenstring=\@@tenstringfrench
\let\@seventies=\@@seventiesfrenchswiss
\let\@eighties=\@@eightiesfrenchswiss
\let\@nineties=\@@ninetiesfrenchswiss
\def\@hundred{cent}\def\@thousand{mille}%
\def\@andname{et}%
\@@numberstringfrench{#1}}

\newcommand{\@numberstringFfrenchfrance}[1]{%
\let\@unitstring=\@@unitstringFfrench
\let\@teenstring=\@@teenstringfrench
\let\@tenstring=\@@tenstringfrench
\let\@seventies=\@@seventiesfrench
\let\@eighties=\@@eightiesfrench
\let\@nineties=\@@ninetiesfrench
\def\@hundred{cent}\def\@thousand{mille}%
\def\@andname{et}%
\@@numberstringfrench{#1}}

\newcommand{\@numberstringFfrenchbelgian}[1]{%
\let\@unitstring=\@@unitstringFfrench
\let\@teenstring=\@@teenstringfrench
\let\@tenstring=\@@tenstringfrench
\let\@seventies=\@@seventiesfrenchswiss
\let\@eighties=\@@eightiesfrench
\let\@nineties=\@@ninetiesfrench
\def\@hundred{cent}\def\@thousand{mille}%
\def\@andname{et}%
\@@numberstringfrench{#1}}

\let\@numberstringFfrench=\@numberstringFfrenchfrance

\newcommand{\@NumberstringMfrenchswiss}[1]{%
\let\@unitstring=\@@Unitstringfrench
\let\@teenstring=\@@Teenstringfrench
\let\@tenstring=\@@Tenstringfrench
\let\@seventies=\@@seventiesfrenchswiss
\let\@eighties=\@@eightiesfrenchswiss
\let\@nineties=\@@ninetiesfrenchswiss
\def\@hundred{Cent}\def\@thousand{Mille}%
\def\@andname{et}%
\@@numberstringfrench{#1}}

\newcommand{\@NumberstringMfrenchfrance}[1]{%
\let\@unitstring=\@@Unitstringfrench
\let\@teenstring=\@@Teenstringfrench
\let\@tenstring=\@@Tenstringfrench
\let\@seventies=\@@seventiesfrench
\let\@eighties=\@@eightiesfrench
\let\@nineties=\@@ninetiesfrench
\def\@hundred{Cent}\def\@thousand{Mille}%
\def\@andname{et}%
\@@numberstringfrench{#1}}

\newcommand{\@NumberstringMfrenchbelgian}[1]{%
\let\@unitstring=\@@Unitstringfrench
\let\@teenstring=\@@Teenstringfrench
\let\@tenstring=\@@Tenstringfrench
\let\@seventies=\@@seventiesfrenchswiss
\let\@eighties=\@@eightiesfrench
\let\@nineties=\@@ninetiesfrench
\def\@hundred{Cent}\def\@thousand{Mille}%
\def\@andname{et}%
\@@numberstringfrench{#1}}

\let\@NumberstringMfrench=\@NumberstringMfrenchfrance

\newcommand{\@NumberstringFfrenchswiss}[1]{%
\let\@unitstring=\@@UnitstringFfrench
\let\@teenstring=\@@Teenstringfrench
\let\@tenstring=\@@Tenstringfrench
\let\@seventies=\@@seventiesfrenchswiss
\let\@eighties=\@@eightiesfrenchswiss
\let\@nineties=\@@ninetiesfrenchswiss
\def\@hundred{Cent}\def\@thousand{Mille}%
\def\@andname{et}%
\@@numberstringfrench{#1}}

\newcommand{\@NumberstringFfrenchfrance}[1]{%
\let\@unitstring=\@@UnitstringFfrench
\let\@teenstring=\@@Teenstringfrench
\let\@tenstring=\@@Tenstringfrench
\let\@seventies=\@@seventiesfrench
\let\@eighties=\@@eightiesfrench
\let\@nineties=\@@ninetiesfrench
\def\@hundred{Cent}\def\@thousand{Mille}%
\def\@andname{et}%
\@@numberstringfrench{#1}}

\newcommand{\@NumberstringFfrenchbelgian}[1]{%
\let\@unitstring=\@@UnitstringFfrench
\let\@teenstring=\@@Teenstringfrench
\let\@tenstring=\@@Tenstringfrench
\let\@seventies=\@@seventiesfrenchswiss
\let\@eighties=\@@eightiesfrench
\let\@nineties=\@@ninetiesfrench
\def\@hundred{Cent}\def\@thousand{Mille}%
\def\@andname{et}%
\@@numberstringfrench{#1}}

\let\@NumberstringFfrench=\@NumberstringFfrenchfrance

\newcommand{\@ordinalstringMfrenchswiss}[1]{%
\ifnum#1=1\relax
premier%
\else
\let\@unitthstring=\@@unitthstringfrench
\let\@unitstring=\@@unitstringfrench
\let\@teenthstring=\@@teenthstringfrench
\let\@teenstring=\@@teenstringfrench
\let\@tenthstring=\@@tenthstringfrench
\let\@tenstring=\@@tenstringfrench
\let\@seventieths=\@@seventiethsfrenchswiss
\let\@eightieths=\@@eightiethsfrenchswiss
\let\@ninetieths=\@@ninetiethsfrenchswiss
\let\@seventies=\@@seventiesfrenchswiss
\let\@eighties=\@@eightiesfrenchswiss
\let\@nineties=\@@ninetiesfrenchswiss
\def\@hundredth{centi\`eme}\def\@hundred{cent}%
\def\@thousandth{mili\`eme}\def\@thousand{mille}%
\def\@andname{et}%
\@@ordinalstringfrench{#1}%
\fi}

\newcommand{\@ordinalstringMfrenchfrance}[1]{%
\ifnum#1=1\relax
premier%
\else
\let\@unitthstring=\@@unitthstringfrench
\let\@unitstring=\@@unitstringfrench
\let\@teenthstring=\@@teenthstringfrench
\let\@teenstring=\@@teenstringfrench
\let\@tenthstring=\@@tenthstringfrench
\let\@tenstring=\@@tenstringfrench
\let\@seventieths=\@@seventiethsfrench
\let\@eightieths=\@@eightiethsfrench
\let\@ninetieths=\@@ninetiethsfrench
\let\@seventies=\@@seventiesfrench
\let\@eighties=\@@eightiesfrench
\let\@nineties=\@@ninetiesfrench
\let\@teenstring=\@@teenstringfrench
\def\@hundredth{centi\`eme}\def\@hundred{cent}%
\def\@thousandth{mili\`eme}\def\@thousand{mille}%
\def\@andname{et}%
\@@ordinalstringfrench{#1}%
\fi}

\newcommand{\@ordinalstringMfrenchbelgian}[1]{%
\ifnum#1=1\relax
premier%
\else
\let\@unitthstring=\@@unitthstringfrench
\let\@unitstring=\@@unitstringfrench
\let\@teenthstring=\@@teenthstringfrench
\let\@teenstring=\@@teenstringfrench
\let\@tenthstring=\@@tenthstringfrench
\let\@tenstring=\@@tenstringfrench
\let\@seventieths=\@@seventiethsfrenchswiss
\let\@eightieths=\@@eightiethsfrench
\let\@ninetieths=\@@ninetiethsfrenchswiss
\let\@seventies=\@@seventiesfrench
\let\@eighties=\@@eightiesfrench
\let\@nineties=\@@ninetiesfrench
\let\@teenstring=\@@teenstringfrench
\def\@hundredth{centi\`eme}\def\@hundred{cent}%
\def\@thousandth{mili\`eme}\def\@thousand{mille}%
\def\@andname{et}%
\@@ordinalstringfrench{#1}%
\fi}

\let\@ordinalstringMfrench=\@ordinalstringMfrenchfrance

\newcommand{\@ordinalstringFfrenchswiss}[1]{%
\ifnum#1=1\relax
premi\`ere%
\else
\let\@unitthstring=\@@unitthstringfrench
\let\@unitstring=\@@unitstringFfrench
\let\@teenthstring=\@@teenthstringfrench
\let\@teenstring=\@@teenstringfrench
\let\@tenthstring=\@@tenthstringfrench
\let\@tenstring=\@@tenstringfrench
\let\@seventieths=\@@seventiethsfrenchswiss
\let\@eightieths=\@@eightiethsfrenchswiss
\let\@ninetieths=\@@ninetiethsfrenchswiss
\let\@seventies=\@@seventiesfrenchswiss
\let\@eighties=\@@eightiesfrenchswiss
\let\@nineties=\@@ninetiesfrenchswiss
\def\@hundredth{centi\`eme}\def\@hundred{cent}%
\def\@thousandth{mili\`eme}\def\@thousand{mille}%
\def\@andname{et}%
\@@ordinalstringfrench{#1}%
\fi}

\newcommand{\@ordinalstringFfrenchfrance}[1]{%
\ifnum#1=1\relax
premi\`ere%
\else
\let\@unitthstring=\@@unitthstringfrench
\let\@unitstring=\@@unitstringFfrench
\let\@teenthstring=\@@teenthstringfrench
\let\@teenstring=\@@teenstringfrench
\let\@tenthstring=\@@tenthstringfrench
\let\@tenstring=\@@tenstringfrench
\let\@seventieths=\@@seventiethsfrench
\let\@eightieths=\@@eightiethsfrench
\let\@ninetieths=\@@ninetiethsfrench
\let\@seventies=\@@seventiesfrench
\let\@eighties=\@@eightiesfrench
\let\@nineties=\@@ninetiesfrench
\let\@teenstring=\@@teenstringfrench
\def\@hundredth{centi\`eme}\def\@hundred{cent}%
\def\@thousandth{mili\`eme}\def\@thousand{mille}%
\def\@andname{et}%
\@@ordinalstringfrench{#1}%
\fi}

\newcommand{\@ordinalstringFfrenchbelgian}[1]{%
\ifnum#1=1\relax
premi\`ere%
\else
\let\@unitthstring=\@@unitthstringfrench
\let\@unitstring=\@@unitstringFfrench
\let\@teenthstring=\@@teenthstringfrench
\let\@teenstring=\@@teenstringfrench
\let\@tenthstring=\@@tenthstringfrench
\let\@tenstring=\@@tenstringfrench
\let\@seventieths=\@@seventiethsfrenchswiss
\let\@eightieths=\@@eightiethsfrench
\let\@ninetieths=\@@ninetiethsfrench
\let\@seventies=\@@seventiesfrench
\let\@eighties=\@@eightiesfrench
\let\@nineties=\@@ninetiesfrench
\let\@teenstring=\@@teenstringfrench
\def\@hundredth{centi\`eme}\def\@hundred{cent}%
\def\@thousandth{mili\`eme}\def\@thousand{mille}%
\def\@andname{et}%
\@@ordinalstringfrench{#1}%
\fi}

\let\@ordinalstringFfrench=\@ordinalstringFfrenchfrance

\newcommand{\@OrdinalstringMfrenchswiss}[1]{%
\ifnum#1=1\relax
Premi\`ere%
\else
\let\@unitthstring=\@@Unitthstringfrench
\let\@unitstring=\@@Unitstringfrench
\let\@teenthstring=\@@Teenthstringfrench
\let\@teenstring=\@@Teenstringfrench
\let\@tenthstring=\@@Tenthstringfrench
\let\@tenstring=\@@Tenstringfrench
\let\@seventieths=\@@seventiethsfrenchswiss
\let\@eightieths=\@@eightiethsfrenchswiss
\let\@ninetieths=\@@ninetiethsfrenchswiss
\let\@seventies=\@@seventiesfrenchswiss
\let\@eighties=\@@eightiesfrenchswiss
\let\@nineties=\@@ninetiesfrenchswiss
\def\@hundredth{Centi\`eme}\def\@hundred{Cent}%
\def\@thousandth{Mili\`eme}\def\@thousand{Mille}%
\def\@andname{et}%
\@@ordinalstringfrench{#1}%
\fi}

\newcommand{\@OrdinalstringMfrenchfrance}[1]{%
\ifnum#1=1\relax
Premi\`ere%
\else
\let\@unitthstring=\@@Unitthstringfrench
\let\@unitstring=\@@Unitstringfrench
\let\@teenthstring=\@@Teenthstringfrench
\let\@teenstring=\@@Teenstringfrench
\let\@tenthstring=\@@Tenthstringfrench
\let\@tenstring=\@@Tenstringfrench
\let\@seventieths=\@@seventiethsfrench
\let\@eightieths=\@@eightiethsfrench
\let\@ninetieths=\@@ninetiethsfrench
\let\@seventies=\@@seventiesfrench
\let\@eighties=\@@eightiesfrench
\let\@nineties=\@@ninetiesfrench
\let\@teenstring=\@@Teenstringfrench
\def\@hundredth{Centi\`eme}\def\@hundred{Cent}%
\def\@thousandth{Mili\`eme}\def\@thousand{Mille}%
\def\@andname{et}%
\@@ordinalstringfrench{#1}%
\fi}

\newcommand{\@OrdinalstringMfrenchbelgian}[1]{%
\ifnum#1=1\relax
Premi\`ere%
\else
\let\@unitthstring=\@@Unitthstringfrench
\let\@unitstring=\@@Unitstringfrench
\let\@teenthstring=\@@Teenthstringfrench
\let\@teenstring=\@@Teenstringfrench
\let\@tenthstring=\@@Tenthstringfrench
\let\@tenstring=\@@Tenstringfrench
\let\@seventieths=\@@seventiethsfrenchswiss
\let\@eightieths=\@@eightiethsfrench
\let\@ninetieths=\@@ninetiethsfrench
\let\@seventies=\@@seventiesfrench
\let\@eighties=\@@eightiesfrench
\let\@nineties=\@@ninetiesfrench
\let\@teenstring=\@@Teenstringfrench
\def\@hundredth{Centi\`eme}\def\@hundred{Cent}%
\def\@thousandth{Mili\`eme}\def\@thousand{Mille}%
\def\@andname{et}%
\@@ordinalstringfrench{#1}%
\fi}

\let\@OrdinalstringMfrench=\@OrdinalstringMfrenchfrance

\newcommand{\@OrdinalstringFfrenchswiss}[1]{%
\ifnum#1=1\relax
Premi\`ere%
\else
\let\@unitthstring=\@@Unitthstringfrench
\let\@unitstring=\@@UnitstringFfrench
\let\@teenthstring=\@@Teenthstringfrench
\let\@teenstring=\@@Teenstringfrench
\let\@tenthstring=\@@Tenthstringfrench
\let\@tenstring=\@@Tenstringfrench
\let\@seventieths=\@@seventiethsfrenchswiss
\let\@eightieths=\@@eightiethsfrenchswiss
\let\@ninetieths=\@@ninetiethsfrenchswiss
\let\@seventies=\@@seventiesfrenchswiss
\let\@eighties=\@@eightiesfrenchswiss
\let\@nineties=\@@ninetiesfrenchswiss
\def\@hundredth{Centi\`eme}\def\@hundred{Cent}%
\def\@thousandth{Mili\`eme}\def\@thousand{Mille}%
\def\@andname{et}%
\@@ordinalstringfrench{#1}%
\fi}

\newcommand{\@OrdinalstringFfrenchfrance}[1]{%
\ifnum#1=1\relax
Premi\`ere%
\else
\let\@unitthstring=\@@Unitthstringfrench
\let\@unitstring=\@@UnitstringFfrench
\let\@teenthstring=\@@Teenthstringfrench
\let\@teenstring=\@@Teenstringfrench
\let\@tenthstring=\@@Tenthstringfrench
\let\@tenstring=\@@Tenstringfrench
\let\@seventieths=\@@seventiethsfrench
\let\@eightieths=\@@eightiethsfrench
\let\@ninetieths=\@@ninetiethsfrench
\let\@seventies=\@@seventiesfrench
\let\@eighties=\@@eightiesfrench
\let\@nineties=\@@ninetiesfrench
\let\@teenstring=\@@Teenstringfrench
\def\@hundredth{Centi\`eme}\def\@hundred{Cent}%
\def\@thousandth{Mili\`eme}\def\@thousand{Mille}%
\def\@andname{et}%
\@@ordinalstringfrench{#1}%
\fi}

\newcommand{\@OrdinalstringFfrenchbelgian}[1]{%
\ifnum#1=1\relax
Premi\`ere%
\else
\let\@unitthstring=\@@Unitthstringfrench
\let\@unitstring=\@@UnitstringFfrench
\let\@teenthstring=\@@Teenthstringfrench
\let\@teenstring=\@@Teenstringfrench
\let\@tenthstring=\@@Tenthstringfrench
\let\@tenstring=\@@Tenstringfrench
\let\@seventieths=\@@seventiethsfrenchswiss
\let\@eightieths=\@@eightiethsfrench
\let\@ninetieths=\@@ninetiethsfrench
\let\@seventies=\@@seventiesfrench
\let\@eighties=\@@eightiesfrench
\let\@nineties=\@@ninetiesfrench
\let\@teenstring=\@@Teenstringfrench
\def\@hundredth{Centi\`eme}\def\@hundred{Cent}%
\def\@thousandth{Mili\`eme}\def\@thousand{Mille}%
\def\@andname{et}%
\@@ordinalstringfrench{#1}%
\fi}

\let\@OrdinalstringFfrench=\@OrdinalstringFfrenchfrance

\newcommand{\@ordinalMfrench}[1]{%
\iffmtord@abbrv
#1\fmtord{e}%
\else
#1\ifnum#1=1\fmtord{er}\else\fmtord{eme}\fi
\fi}

\newcommand{\@ordinalFfrench}[1]{%
\iffmtord@abbrv
#1\fmtord{e}%
\else
#1\ifnum#1=1\fmtord{ere}\else\fmtord{eme}\fi
\fi}

\newcommand{\@@unitthstringfrench}[1]{%
\ifcase#1\relax
zero%
\or uni\`eme%
\or deuxi\`eme%
\or troisi\`eme%
\or quatri\`eme%
\or cinqui\`eme%
\or sixi\`eme%
\or septi\`eme%
\or huiti\`eme%
\or neuvi\`eme%
\fi
}

\newcommand{\@@tenthstringfrench}[1]{%
\ifcase#1\relax
\or dixi\`eme%
\or vingti\`eme%
\or trentri\`eme%
\or quaranti\`eme%
\or cinquanti\`eme%
\or soixanti\`eme%
\or septenti\`eme%
\or huitanti\`eme%
\or nonenti\`eme%
\fi
}

\newcommand{\@@teenthstringfrench}[1]{%
\ifcase#1\relax
dixi\`eme%
\or onzi\`eme%
\or douzi\`eme%
\or treizi\`eme%
\or quatorzi\`eme%
\or quinzi\`eme%
\or seizi\`eme%
\or dix-septi\`eme%
\or dix-huiti\`eme%
\or dix-neuvi\`eme%
\fi
}

\newcommand{\@@seventiethsfrenchswiss}[1]{%
\ifcase#1\relax
\@tenthstring{7}%
\or
\@tenstring{7} \@andname\ \@unitthstring{1}%
\else
\@tenstring{7}-\@unitthstring{#1}%
\fi}

\newcommand{\@@eightiethsfrenchswiss}[1]{%
\ifcase#1\relax
\@tenthstring{8}%
\or
\@tenstring{8} \@andname\ \@unitthstring{1}%
\else
\@tenstring{8}-\@unitthstring{#1}%
\fi}

\newcommand{\@@ninetiethsfrenchswiss}[1]{%
\ifcase#1\relax
\@tenthstring{9}%
\or
\@tenstring{9} \@andname\ \@unitthstring{1}%
\else
\@tenstring{9}-\@unitthstring{#1}%
\fi}

\newcommand{\@@seventiethsfrench}[1]{%
\ifnum#1=0\relax
\@tenstring{6}%
-%
\else
\@tenstring{6}%
\ \@andname\
\fi
\@teenthstring{#1}%
}

\newcommand{\@@eightiethsfrench}[1]{%
\ifnum#1>0\relax
\@unitstring{4}-\@tenstring{2}%
-\@unitthstring{#1}%
\else
\@unitstring{4}-\@tenthstring{2}%
\fi
}

\newcommand{\@@ninetiethsfrench}[1]{%
\@unitstring{4}-\@tenstring{2}-\@teenthstring{#1}%
}

\newcommand{\@@Unitthstringfrench}[1]{%
\ifcase#1\relax
Zero%
\or Uni\`eme%
\or Deuxi\`eme%
\or Troisi\`eme%
\or Quatri\`eme%
\or Cinqui\`eme%
\or Sixi\`eme%
\or Septi\`eme%
\or Huiti\`eme%
\or Neuvi\`eme%
\fi
}

\newcommand{\@@Tenthstringfrench}[1]{%
\ifcase#1\relax
\or Dixi\`eme%
\or Vingti\`eme%
\or Trentri\`eme%
\or Quaranti\`eme%
\or Cinquanti\`eme%
\or Soixanti\`eme%
\or Septenti\`eme%
\or Huitanti\`eme%
\or Nonenti\`eme%
\fi
}

\newcommand{\@@Teenthstringfrench}[1]{%
\ifcase#1\relax
Dixi\`eme%
\or Onzi\`eme%
\or Douzi\`eme%
\or Treizi\`eme%
\or Quatorzi\`eme%
\or Quinzi\`eme%
\or Seizi\`eme%
\or Dix-Septi\`eme%
\or Dix-Huiti\`eme%
\or Dix-Neuvi\`eme%
\fi
}

\newcommand{\@@numberstringfrench}[1]{%
\ifnum#1>99999
\PackageError{fmtcount}{Out of range}%
{This macro only works for values less than 100000}%
\else
\ifnum#1<0
\PackageError{fmtcount}{Negative numbers not permitted}%
{This macro does not work for negative numbers, however
you can try typing "minus" first, and then pass the modulus of
this number}%
\fi
\fi
\@strctr=#1\relax \divide\@strctr by 1000\relax
\ifnum\@strctr>9
  \@tmpstrctr=\@strctr
  \divide\@strctr by 10
  \ifnum\@strctr>1
    \ifthenelse{\(\@strctr>6\)\and\(\@strctr<10\)}{%
      \@modulo{\@tmpstrctr}{10}%
      \ifnum\@strctr<8\relax
        \@seventies{\@tmpstrctr}%
      \else
        \ifnum\@strctr<9\relax
          \@eighties{\@tmpstrctr}%
        \else
          \ifnum\@strctr<10\@nineties{\@tmpstrctr}\fi
        \fi
      \fi
    }{%
      \@tenstring{\@strctr}%
      \@strctr=#1\relax
      \divide\@strctr by 1000\relax
      \@modulo{\@strctr}{10}%
      \ifnum\@strctr>0\relax
        \ \@unitstring{\@strctr}%
      \fi
    }%
  \else
    \@strctr=#1\relax
    \divide\@strctr by 1000
    \@modulo{\@strctr}{10}%
    \@teenstring{\@strctr}%
  \fi
  \ \@thousand%
\else
  \ifnum\@strctr>0
    \ifnum\@strctr>1\@unitstring{\@strctr}\ \fi
    \@thousand
  \fi
\fi
\@strctr=#1\relax \@modulo{\@strctr}{1000}%
\divide\@strctr by 100
\ifnum\@strctr>0\relax
  \ifnum#1>1000 \ \fi
  \@tmpstrctr=#1\relax
  \@modulo{\@tmpstrctr}{1000}\relax
  \ifnum\@tmpstrctr=100\relax
    \@tenstring{10}\relax
  \else
    \ifnum\@strctr>1\@unitstring{\@strctr}\ \fi
    \@hundred
  \fi
\fi
\@strctr=#1\relax \@modulo{\@strctr}{100}%
\ifnum#1>100\relax
  \ifnum\@strctr>0\relax
\ %    \ \@andname\
  \else
  \ifnum\@tmpstrctr>0s\fi%
  \fi
\fi
\ifnum\@strctr>19
\@tmpstrctr=\@strctr
\divide\@strctr by 10
\ifthenelse{\@strctr>6}{%
\@modulo{\@tmpstrctr}{10}%
\ifnum\@strctr<8
\@seventies{\@tmpstrctr}%
\else
\ifnum\@strctr<9
\@eighties{\@tmpstrctr}%
\else
\@nineties{\@tmpstrctr}%
\fi
\fi
}{%
\@tenstring{\@strctr}%
\@strctr=#1\relax \@modulo{\@strctr}{10}%
\ifnum\@strctr>0\relax
 \ifnum\@strctr=1\ \@andname\ \else-\fi
 \@unitstring{\@strctr}%
\fi
}%
\else
\ifnum\@strctr<10
\ifnum\@strctr=0
\ifnum#1<100 \@unitstring{\@strctr}\fi
\else%(>0,<10)
\@unitstring{\@strctr}%
\fi
\else%>10
\@modulo{\@strctr}{10}%
\@teenstring{\@strctr}%
\fi
\fi
}
\newcommand{\@@ordinalstringfrench}[1]{%
\ifnum#1>99999
\PackageError{fmtcount}{Out of range}%
{This macro only works for values less than 100000}%
\else
\ifnum#1<0
\PackageError{fmtcount}{Negative numbers not permitted}%
{This macro does not work for negative numbers, however
you can try typing "minus" first, and then pass the modulus of
this number}%
\fi
\fi
\@strctr=#1\relax \divide\@strctr by 1000\relax
\ifnum\@strctr>9
  \@tmpstrctr=\@strctr
  \divide\@strctr by 10\relax
  \ifnum\@strctr>1\relax
    \ifthenelse{\@strctr>6}{%
      \@modulo{\@tmpstrctr}{10}%
      \ifnum\@strctr=7\relax
        \@seventies{\@tmpstrctr}%
      \else
        \ifnum\@strctr=8\relax
          \@eighties{\@tmpstrctr}%
        \else
          \@nineties{\@tmpstrctr}%
        \fi
      \fi
    }{%
      \@tenstring{\@strctr}%
      \@strctr=#1\relax
      \divide\@strctr by 1000\relax
      \@modulo{\@strctr}{10}%
      \ifnum\@strctr=1\ \@andname\fi
      \ifnum\@strctr>0\ \@unitstring{\@strctr}\fi
    }%
  \else
    \@strctr=#1\relax
    \divide\@strctr by 1000\relax
    \@modulo{\@strctr}{10}%
    \@teenstring{\@strctr}%
  \fi
  \@strctr=#1\relax \@modulo{\@strctr}{1000}%
  \ifnum\@strctr=0\ \@thousandth\else\ \@thousand \fi
\else
  \ifnum\@strctr>0\relax
    \@unitstring{\@strctr}%
    \@strctr=#1\relax \@modulo{\@strctr}{1000}%
    \ifnum\@strctr=0\ \@thousandth\else\ \@thousand\fi
  \fi
\fi
\@strctr=#1\relax \@modulo{\@strctr}{1000}%
\divide\@strctr by 100
\ifnum\@strctr>0
\ifnum#1>1000 \ \fi\@unitstring{\@strctr}%
\@strctr=#1\relax \@modulo{\@strctr}{100}%
\ifnum\@strctr=0\ \@hundredth\else\ \@hundred\fi
\fi
\@tmpstrctr=\@strctr
\@strctr=#1\relax \@modulo{\@strctr}{100}%
\ifnum#1>100\relax
\ifnum\@strctr>0\ \@andname\ \fi\fi
\ifnum\@strctr>19
\@tmpstrctr=\@strctr
\divide\@strctr by 10
\@modulo{\@tmpstrctr}{10}%
\ifthenelse{\@strctr>6}{%
\ifnum\@strctr=7\relax
\@seventieths{\@tmpstrctr}%
\else
\ifnum\@strctr=8\relax
\@eightieths{\@tmpstrctr}%
\else
\@ninetieths{\@tmpstrctr}%
\fi
\fi
}{%
\ifnum\@tmpstrctr=0\relax
  \@tenthstring{\@strctr}%
\else
  \@tenstring{\@strctr}%
\fi
\@strctr=#1\relax \@modulo{\@strctr}{10}%
\ifnum\@strctr=1\ \@andname\fi
\ifnum\@strctr>0
\ \@unitthstring{\@strctr}%
\fi
}%
\else
\ifnum\@strctr<10
\ifnum\@strctr=0
\ifnum#1<100 \@unitthstring{\@strctr}\fi
\else
\@unitthstring{\@strctr}%
\fi
\else
\@modulo{\@strctr}{10}%
\@teenthstring{\@strctr}%
\fi
\fi
}
\endinput
%%
%% End of file `fc-french.def'.