Added all missing lincats in numerals grammars.

This commit is contained in:
bringert committed 2005-05-11 08:10:23 +00:00
1 parent 3645de0113
commit 6ad5b937bb
38 files changed
+88 -7

No files matched your search

+3
View File
@@ -23,10 +23,13 @@ param DForm = unit | teen | ten | hund ;
param ThForm = onlyone | lastone | twoorthreeorfour | fiveup ;
oper LinDigit = {s : DForm => Str; o : ThForm ; t : ThForm } ;
lincat Numeral = { s : Str } ;
lincat Digit = LinDigit ;
lincat Sub10 = {s : DForm => Str; o : ThForm ; t : ThForm } ;
lincat Sub100 = {s : Str; t : ThForm } ;
lincat Sub1000 = {s : Str; t : ThForm } ;
lincat Sub1000000 = { s : Str } ;
oper mkNum : Str -> Str -> Str -> Str -> ThForm -> LinDigit =
\dwa -> \dwanascie -> \dwadziescia -> \dwiescie -> \thform ->