diff options
Diffstat (limited to 'examples/numerals/lithuanian.gf')
| -rw-r--r-- | examples/numerals/lithuanian.gf | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/examples/numerals/lithuanian.gf b/examples/numerals/lithuanian.gf index 703d8ca0d..f2d4f5c61 100644 --- a/examples/numerals/lithuanian.gf +++ b/examples/numerals/lithuanian.gf @@ -15,10 +15,12 @@ param DForm = unit | teen | ten ; oper LinDigit = {s : DForm => Str ; size : Size }; oper LinSub100 = {s : Str ; size : Size } ; +lincat Numeral = { s : Str } ; lincat Digit = LinDigit ; lincat Sub10 = LinDigit ; lincat Sub100 = LinSub100 ; lincat Sub1000 = LinSub100 ; +lincat Sub1000000 = { s : Str } ; oper mkNum : Str -> Str -> Str -> LinDigit = \tri -> \dvylika -> \tribase -> { s = table {unit => tri ; teen => dvylika ; ten => tribase + "des^imt" } ; size = pl}; |