summaryrefslogtreecommitdiff
path: root/examples/numerals/croatian.gf
diff options
context:
space:
mode:
Diffstat (limited to 'examples/numerals/croatian.gf')
-rw-r--r--examples/numerals/croatian.gf3
1 files changed, 3 insertions, 0 deletions
diff --git a/examples/numerals/croatian.gf b/examples/numerals/croatian.gf
index bcc3d50c4..85bd4fe6b 100644
--- a/examples/numerals/croatian.gf
+++ b/examples/numerals/croatian.gf
@@ -9,10 +9,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 ->