changed CompoundCN to CompoundN with type N -> N -> N to reduce overgeneration and re-enable ambiguity

This commit is contained in:
aarne
2014-05-29 11:01:40 +00:00
parent 6275b9c46a
commit 0e554cf7df
25 changed files with 40 additions and 33 deletions

View File

@@ -33,7 +33,7 @@ lin
EmptyRelSlash = E.EmptyRelSlash ;
lin
CompoundCN noun cn = {
CompoundN noun cn = {
s = (\\n,c => noun.s ! Sg ! Nom ++ cn.s ! n ! c)
| (\\n,c => noun.s ! Pl ! Nom ++ cn.s ! n ! c)
| (\\n,c => noun.s ! Sg ! Nom ++ Predef.BIND ++ "-" ++ Predef.BIND ++ cn.s ! n ! c)