Added all missing lincats in numerals grammars.

This commit is contained in:
bringert
2005-05-11 08:10:23 +00:00
parent c8de5fc0da
commit 9699fe1651
38 changed files with 88 additions and 7 deletions

View File

@@ -6,10 +6,13 @@ param DSize = sg | r2 | r3 | r4 | r5 | r6 | r7 | r8 | r9 ;
param Size = sing | less100 | more100 ;
oper LinDigit = {s : DForm => Str ; size : DSize} ;
lincat Numeral = { s : Str } ;
lincat Digit = LinDigit ;
lincat Sub10 = {s : DForm => Str ; size : DSize} ;
lincat Sub100 = {s : Str ; size : Size} ;
lincat Sub1000 = {s : Str ; s2 : Str ; size : Size } ;
lincat Sub1000000 = { s : Str } ;
lin num x0 =
{s = "/&" ++ x0.s ++ "&/"} ; -- the Devana:gari environment