• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1// ***************************************************************************
2// *
3// *   Copyright (C) 2004, International Business Machines
4// *   Corporation and others.  All Rights Reserved.
5// *
6// ***************************************************************************
7//
8
9fr_CH {
10    //------------------------------------------------------------
11    // Rule Based Number Format Support
12    //------------------------------------------------------------
13
14//         * Spellout rules for Swiss French.  Swiss French differs from French French
15//         * in that it does have words for 70, 80, and 90.  This rule set shows them,
16//         * and is simpler as a result.
17
18    // again, I'm missing information on negative numbers and decimals for
19    // these to rule sets.  Also, I'm not 100% sure about Swiss French.  Is
20    // this correct?  Is "onze cents" commonly used for 1,100 in both France
21    // and Switzerland?  Can someone fill me in on the rules for the other
22    // French-speaking countries?  I've heard conflicting opinions on which
23    // version is used in Canada, and I understand there's an alternate set
24    // of words for 70, 80, and 90 that is used somewhere, but I don't know
25    // what those words are or where they're used.
26
27    SpelloutRules {
28        "%main:\n"
29            "-x: moins >>;\n"
30            "x.x: << virgule >>;\n"
31            "z\u00e9ro; un; deux; trois; quatre; cinq; six; sept; huit; neuf;\n"
32            "dix; onze; douze; treize; quatorze; quinze; seize;\n"
33            "    dix-sept; dix-huit; dix-neuf;\n"
34            "20: vingt[->%%alt-ones>];\n"
35            "30: trente[->%%alt-ones>];\n"
36            "40: quarante[->%%alt-ones>];\n"
37            "50: cinquante[->%%alt-ones>];\n"
38            "60: soixante[->%%alt-ones>];\n"
39               // notice new words for 70, 80, and 90
40            "70: septante[->%%alt-ones>];\n"
41            "80: huitante[->%%alt-ones>];\n"
42            "90: nonante[->%%alt-ones>];\n"
43            "100: cent[ >>];\n"
44            "200: << cents[ >>];\n"
45            "1000: mille[ >>];\n"
46            "1100>: onze cents[ >>];\n"
47            "1200: mille >>;\n"
48            "2000: << mille[ >>];\n"
49            "1,000,000: << million[ >>];\n"
50            "1,000,000,000: << milliarde[ >>];\n"
51            "1,000,000,000,000: << billion[ >>];\n"
52            "1,000,000,000,000,000: =#,##0=;\n"
53        "%%alt-ones:\n"
54            "; et-un; =%main=;"
55    }
56
57}
58