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

2013-05-22 14:25:15 +00:00
parent a0c874da06
commit bb0f5cf6a8
9 changed files with 29 additions and 5 deletions
--- a/src/french/ExtraFre.gf
+++ b/src/french/ExtraFre.gf
@@ -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"))) ;
+
 }