#!/bin/sh
# include common script
. "`dirname $0`/common"

# European Style (hundred, thousand, -illion/-illiard)

echo "... be (Belarusian)" # short scale

test_phon be "n'ul; adz;'in dv'a tr'i\" ts.at'i\"ri\" p;'ats; s.'Es;ts; s;'Em v'Os;Em dz;'Ev;ats;" "0 1 2 3 4 5 6 7 8 9" "units"
test_phon be "dz;'Es;ats; adz;'inats:ats; dvan'ats:ats; tri\"n'ats:ats; ts.at'i\"rnats:ats; p;atn'ats:ats; s.asn'ats:ats; s;amn'ats:ats; vas;amn'ats:ats; dz;Ev;atn'ats:ats;" "10 11 12 13 14 15 16 17 18 19" "teens"
test_phon be "dv'ats:ats; adz;'in tr'i\"ts:ats; s'Orak p;adz;:Es;'at s.Ezdz;:Es;'at s;'Emdz;Es;at v'Os;Emdz;Es;at dz;Ev;an'Osta" "21 30 40 50 60 70 80 90" "tens"
test_phon be "st'O adz;'inats:ats; dz;v;'Es;ts;E dv'ats:ats; dv'a tr'i\"sta ts.at'i\"ri\"sta p;ats;s'Ot s.Es;ts;s'Ot s;Ems'Ot v,Os;Ems'Ot dz;Ev;ats;s'Ot" "111 222 300 400 500 600 700 800 900" "hundreds"
test_phon be "adna t'i\"s;ats.a dz;v;'Es;ts;E tr'i\"ts:ats; ts.at'i\"ri\" dz;v;'E t'i\"s;ats.i\" tr'i\"sta s'Orak tr'i\" t'i\"s;ats.i\" ts.at'i\"ri\"sta ts.at'i\"ri\" t'i\"s;ats.i\" p;'ats; t'i\"s;ats. dz;'Es;ats; t'i\"s;ats. dz;'Es;ats; t'i\"s;ats._! adz;'in" "1234 2340 3400 4000 5000 10000 10001" "thousands"

echo "... en (English)" # short scale

test_phon en "z'i@roU w'0n t'u: Tr'i: f'o@ f'aIv s'Iks s'Ev@n 'eIt n'aIn" "0 1 2 3 4 5 6 7 8 9" "units"
test_phon en "t'En Il'Ev@n tw'Elv T'3:ti:n f'o@ti:n f'Ifti:n s'Iksti:n s'Ev@nt,i:n 'eIti:n n'aInti:n" "10 11 12 13 14 15 16 17 18 19" "teens"
test_phon en "t'En tw'Enti T'3:ti f'o@ti f'Ifti s'Iksti s'Ev@nti; 'eIti n'aInti" "10 20 30 40 50 60 70 80 90" "tens"
test_phon en-GB "Tr'i:h'VndrI2d@n s'Iksti f'aIv" "365" "hundreds"
test_phon en-US "Tr'i:h'VndrI2d s'Iksti f'aIv" "365" "hundreds"
test_phon en "w'0nh'VndrI2d w'0n T'aUz@nd w'0n m'Ili@n w'0n b'Ili@n w'0n tr'Ili@n w'0n kw0dr'Ili@n w'0n kwInt'Ili@n w'0n sEkst'Ili@n w'0n sEpt'Ili@n w'0n 0kt'Ili@n w'0n n0n'Ili@n t'En n0n'Ili@n n'aInti n'aIn n0n'Ili@n_! n'aInh'VndrI2d@n n'aInti n'aIn 0kt'Ili@n_! n'aInh'VndrI2d@n n'aInti n'aIn sEpt'Ili@n_! n'aInh'VndrI2d@n n'aInti n'aIn sEkst'Ili@n_! n'aInh'VndrI2d@n n'aInti n'aIn kwInt'Ili@n_! n'aInh'VndrI2d@n n'aInti n'aIn kw0dr'Ili@n_! n'aInh'VndrI2d@n n'aInti n'aIn tr'Ili@n_! n'aInh'VndrI2d@n n'aInti n'aIn b'Ili@n_! n'aInh'VndrI2d@n n'aInti n'aIn m'Ili@n_! n'aInh'VndrI2d@n n'aInti n'aIn T'aUz@nd_! n'aInh'VndrI2d@n n'aInti n'aIn w'0nz'i@roU_!z'i@roUz'i@roU_!z'i@roUz'i@roU_!z'i@roUz'i@roU_!z'i@roUz'i@roU_!z'i@roUz'i@roU_!z'i@roUz'i@roU_!z'i@roUz'i@roU_!z'i@roUz'i@roU_!z'i@roUz'i@roU_!z'i@roUz'i@roU_!z'i@roUz'i@roU_!z'i@roUz'i@roU_!z'i@roUz'i@roU_!z'i@roUz'i@roU_!z'i@r" "100 1000 1000000 1000000000 1000000000000 1000000000000000 1000000000000000000 1000000000000000000000 1000000000000000000000000 1000000000000000000000000000 1000000000000000000000000000000 10000000000000000000000000000000 99999999999999999999999999999999 100000000000000000000000000000000" "large" # 10^2 10^3 10^6 10^9 10^12 10^15 10^18 10^21 10^24 10^27 10^30 10^31 10^32
test_phon en "f'aIv s'Iksti f'o@ w'0nh'VndrI2d@n tw'Enti Tr'i: f'o@ T'aUz@nd Tr'i:h'VndrI2d@n f'Ifti s'Ev@n f'o@ti:n T'aUz@nd_! s'Iksh'VndrI2d@n 'eIti Tr'i: s'Ev@nh'VndrI2d@n f'o@ti t'u: T'aUz@nd_! Tr'i:h'VndrI2d@n f'Ifti n'aIn s'Iks m'Ili@n_! f'o@h'VndrI2d@n s'Ev@nti f'aIv T'aUz@nd_! Tr'i:h'VndrI2d@n tw'Enti; 'eIt" "5 64 123 4357 14683 742359 6475328" "mixed"

echo "... lv (Latvian)" # short scale

test_phon lv "n'ulle v'iens d'ivi tR'i:s tS'etRi p'ietsi s'eSi s'eptin^i_ 'astuon^i d'evin^i" "0 1 2 3 4 5 6 7 8 9" "units"
test_phon lv "d'esmit v'ienpadsmit d'ivpadsmit tR'i:spadsmit tS'etRpadsmit p'ietspadsmit s'eSpadsmit s'eptin^padsmit 'astuon^padsmit d'evin^padsmit" "10 11 12 13 14 15 16 17 18 19" "teens"
test_phon lv "d'esmit d'ivdesmit tR'i:sdesmit tS'etRdesmit p'ietsd,esmit s'eSdesmit s'eptin^desmit 'astuon^desmit d'evin^desmit" "10 20 30 40 50 60 70 80 90" "tens"
test_phon lv "s'imts s'imts v'iens d'ivi s'imti d'ivi tR'i:s s'imti s'eSdesmit p'ietsi" "100 101 202 365" "hundreds"
test_phon lv "s'imts t'u:kstuo:tis m'iljo:ns m'iljaRds tR'iljons kv'adRiljo:ns kv'intiljo:ns s'ekstiljo:ns s'eptiljo:ns 'oktiljo:ns n'oniljo:ns" "100 1000 1000000 1000000000 1000000000000 1000000000000000 1000000000000000000 1000000000000000000000 1000000000000000000000000 1000000000000000000000000000 1000000000000000000000000000000" "large" # 10^2 10^3 10^6 10^9 10^12 10^15 10^18 10^21 10^24 10^27 10^30
test_phon lv "p'ietsi s'eSdesmit tS'etRi s'imts d'ivdesmit tR'i:s tS'etRi t'u:kstuo:Si tR'i:s s'imti p'ietsd,esmit s'eptin^i tS'etRpadsmit t'u:kstuo:Si_! s'eSi s'imti_ 'astuon^desmit tR'i:s s'eptin^i s'imti tS'etRdesmit d'ivi t'u:kstuo:Si_! tR'i:s s'imti p'ietsd,esmit d'evin^i s'eSi m'iljo:ni_! tS'etRi s'imti s'eptin^desmit p'ietsi t'u:kstuo:Si_! tR'i:s s'imti d'ivdesmit 'astuon^i" "5 64 123 4357 14683 742359 6475328" "mixed"
test_phon it "dz'E*o_| 'items" "0 items" "NUM_SINGLE_VOWEL"