simplified VP lincat in German and Romance

2008-06-21 16:56:18 +00:00
parent 8c71cc884b
commit 2ee2d8d29e
20 changed files with 114 additions and 43 deletions
--- a/lib/resource-1.4/french/IdiomFre.gf
+++ b/lib/resource-1.4/french/IdiomFre.gf
@@ -33,7 +33,7 @@ concrete IdiomFre of Idiom = CatFre **
        (\\a => "en" ++ "train" ++ elisDe ++ infVP vp a) 
        (predV copula) ;

-    ImpPl1 vp = {s =
+    ImpPl1 vpr = let vp = useVP vpr in {s =
      (mkImperative False P1 vp).s ! Pos ! {n = Pl ; g = Masc} --- fem
      } ;