diff options
Diffstat (limited to 'examples/numerals/kulung.gf')
| -rw-r--r-- | examples/numerals/kulung.gf | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/examples/numerals/kulung.gf b/examples/numerals/kulung.gf index f5eda8634..3ae2db724 100644 --- a/examples/numerals/kulung.gf +++ b/examples/numerals/kulung.gf @@ -8,10 +8,12 @@ param Scale = reg | lakh ; -- Expanded in Jadranka Gvozdanovic' (ed.) Numeral Types and Changes -- Worldwide, 1999 +lincat Numeral = { s : Str } ; lincat Digit = {s : DForm => Str} ; lincat Sub10 = {s : DForm => Str ; size : Size} ; lincat Sub100 = {s : Str ; size : Size} ; -lincat Sub1000 = {s : Scale => Str ; size : Size} ; +lincat Sub1000 = {s : Scale => Str ; size : Size} +lincat Sub1000000 = { s : Str } ; oper mkNum : Str -> Str -> Str -> Str -> Lin Digit = \two -> \two2 -> \twenty -> \twenty2 -> |