diff options
Diffstat (limited to 'examples/numerals/english.gf')
| -rw-r--r-- | examples/numerals/english.gf | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/examples/numerals/english.gf b/examples/numerals/english.gf index d4aa3e3de..270b0c9d6 100644 --- a/examples/numerals/english.gf +++ b/examples/numerals/english.gf @@ -2,8 +2,12 @@ include numerals.Abs.gf ; param DForm = unit | teen | ten ; +lincat Numeral = { s : Str } ; lincat Digit = {s : DForm => Str} ; lincat Sub10 = {s : DForm => Str} ; +lincat Sub100 = { s : Str } ; +lincat Sub1000 = { s : Str } ; +lincat Sub1000000 = { s : Str } ; oper mkNum : Str -> Str -> Str -> Lin Digit = \two -> \twelve -> \twenty -> |