added pot5art and fixed inflection for large numerals
This commit is contained in:
1 parent
b72ea1e2f1
commit
28afb4d0dc
4 files changed
+31
-5
No files matched your search
@@ -86,6 +86,10 @@ lin pot5 n = {
|
||||
s = \\d,o,c => n.s ! d ! NCard ! Nom ++ pot51.s ! True ! o ! c ;
|
||||
n = Pl
|
||||
} ;
|
||||
lin pot5art = {
|
||||
s = \\d,o,c => case d of {True => []; False => artIndef};
|
||||
n = Sg
|
||||
} ;
|
||||
lin pot5plus n1 n2 = {
|
||||
s = \\d,o,c => n1.s ! d ! NCard ! Nom ++ pot51.s ! True ! NCard ! Nom ++ "and" ++ n2.s ! True ! o ! c;
|
||||
n = Pl
|
||||
|
||||
Reference in new issue
Block a user