Romance almost complete

lib/resource/french/SyntaxFre.gf

@@ -50,19 +50,10 @@ oper
   npGenPossNum = \nu,ton,mec ->
     \\c => prepCase c ++ ton.s ! Poss Pl mec.g ++ nu.s ! mec.g ++ mec.s ! Pl ;
 
----- We miss "il y en a"
-
   existNounPhrase = \unemaison -> 
-    predVerbGroupClause
-      pronImpers
-      (predClauseGroup 
-        verbAvoir
-        (complTransVerbGen 
-          (mkTransVerbCas verbAvoir dative)
-          pronY
-          (\\_,_,_ => unemaison.s ! Ton Acc)
-        )
-      ) ;
+    sats2clause (
+      insertObject (mkSatsObject pronImpers (mkTransVerbCas verbAvoir dative) pronY) 
+        accusative [] unemaison) ;
 
   reflPron : Number => Person => NPFormA => Str = \\n,p => 
     case p of {

lib/resource/italian/SyntaxIta.gf

@@ -39,6 +39,8 @@ oper
 
   npGenPossNum = \nu,ton,mec ->
     \\c => artDef mec.g Pl c ++ ton.s ! Poss Pl mec.g ++ nu.s ! mec.g ++ mec.s ! Pl ; 
+
+  existNounPhrase = variants {} ; ----
 {- ----
   existNounPhrase = \delvino -> {
     s = \\m => 

lib/resource/romance/RulesRomance.gf

@@ -117,7 +117,7 @@ lin
     s = \\c => np.s ! case2pform c ;
     g = pgen2gen np.g ;
     n = np.n
-    };
+    } ;
   FunIP = funIntPron ;
 
   QuestCl = questClause ;
@@ -178,8 +178,8 @@ lin
 
   OneNP = nounPhraseOn ;
 
------  ExistCN A = existNounPhrase (indefNounPhrase Sg A) ;
+  ExistCN A = existNounPhrase (indefNounPhrase Sg A) ;
 
------  ExistNumCN nu A = existNounPhrase (indefNounPhraseNum nu A) ;
+  ExistNumCN nu A = existNounPhrase (indefNounPhraseNum nu A) ;
 
 }

lib/resource/spanish/SyntaxSpa.gf

@@ -11,6 +11,8 @@ oper
 
   nounPhraseOn = mkNameNounPhrase "se" Masc ; --- can be plural dep. on object
 
+  pronImpers = pronIl ; ---- should be [] ?
+
   partitiveNounPhrase = \n,vino ->
     normalNounPhrase 
       (table {
@@ -35,6 +37,7 @@ oper
   npGenPossNum = \nu,ton,mec ->
     \\c => artDef mec.g Pl c ++ ton.s ! Poss Pl mec.g ++ nu.s ! mec.g ++ mec.s ! Pl ; 
 
+  existNounPhrase = variants {} ;
 {- ----
   existNounPhrase = \delvino -> {
     s = \\m =>