From 6ad5b937bb35f6aea2c3ea6018e340bc9c376d44 Mon Sep 17 00:00:00 2001 From: bringert Date: Wed, 11 May 2005 08:10:23 +0000 Subject: Added all missing lincats in numerals grammars. --- examples/numerals/stieng.gf | 2 ++ 1 file changed, 2 insertions(+) (limited to 'examples/numerals/stieng.gf') diff --git a/examples/numerals/stieng.gf b/examples/numerals/stieng.gf index 549e9bd3f..f03e6a0f6 100644 --- a/examples/numerals/stieng.gf +++ b/examples/numerals/stieng.gf @@ -4,10 +4,12 @@ param Size = sg | belowten | moreten ; oper LinDigit = {s : Str ; size : Size} ; +lincat Numeral = { s : Str } ; lincat Digit = LinDigit ; lincat Sub10 = LinDigit ; lincat Sub100 = {s : Str ; s2 : Str ; size : Size} ; lincat Sub1000 = {s : Str ; s2 : Str ; size : Size} ; +lincat Sub1000000 = { s : Str } ; oper mkNum : Str -> LinDigit = \u -> {s = u ; size = belowten} ; -- cgit v1.2.3