PassAgentVPSlash for Eng, Swe, Fin, Fre

2026-05-10 03:32:51 -06:00 · 2013-12-06 08:32:53 +00:00
parent 39fff9318d
commit 376ed50c2e
12 changed files with 73 additions and 34 deletions
--- a/lib/src/french/ExtraFre.gf
+++ b/lib/src/french/ExtraFre.gf
@@ -77,4 +77,8 @@ concrete ExtraFre of ExtraFreAbs = ExtraRomanceFre **
    ExistsNP np = 
      mkClause "il" True False np.a (insertComplement (\\_ => (np.s ! Nom).ton) (predV (regV "exister"))) ;

+
+    PassAgentVPSlash vps np = passVPSlash 
+      vps ("par" ++ (np.s ! Acc).ton) ;
+
 }