ExistsNP in Extra for Cat,Eng,Fre,Ita,Spa

This commit is contained in:
aarne
2013-05-22 14:25:15 +00:00
parent 007df17175
commit 6f3a81617b
9 changed files with 29 additions and 5 deletions

View File

@@ -73,4 +73,7 @@ concrete ExtraFre of ExtraFreAbs = ExtraRomanceFre **
PNegNe = {s = [] ; p = RNeg True} ;
ExistsNP np =
mkClause "il" True False np.a (insertComplement (\\_ => (np.s ! Nom).ton) (predV (regV "exister"))) ;
}