additions and corrections to Dut,Fre,Ita needed for a dialogue system grammar

lib/src/french/ExtraFre.gf

@@ -82,6 +82,23 @@ concrete ExtraFre of ExtraFreAbs = ExtraRomanceFre **
     ExistsNP np = 
       mkClause "il" True False np.a (insertComplement (\\_ => (np.s ! Nom).ton) (predV (regV "exister"))) ;
 
+
+    EstcequeQuestCl cl = 
+    {s = \\t,a,p =>                             -- est-ce qu'il dort ?
+            let cls = cl.s ! DDir ! t ! a ! p 
+            in table {
+              QDir   => "est-ce" ++ elisQue ++ cls ! Indic ;
+              QIndir => subjIf ++ cls ! Indic
+              }
+      } ;
+    InvQuestCl cl = {s = \\t,a,p =>                             -- dort-il ?
+            let cls = cl.s ! DInv ! t ! a ! p 
+            in table {
+              QDir   => cls ! Indic ;
+              QIndir => subjIf ++ cls ! Indic
+              }
+      } ;
+
 --- in ExtraRomance
 --    PassAgentVPSlash vps np = passVPSlash 
 --      vps ("par" ++ (np.s ! Acc).ton) ;

lib/src/french/ExtraFreAbs.gf

@@ -48,5 +48,10 @@ abstract ExtraFreAbs = ExtraRomanceAbs - [ProDrop] ** {
 
     PNegNe : Pol ;
 
+-- alternative forms of questions
+
+    EstcequeQuestCl : Cl -> QCl ; -- est-ce qu'il dort
+    InvQuestCl : Cl -> QCl ;      -- dort-il
+
 
 }