From f59d6d42f7d5d6939d8f5046e690f86d61a81c49 Mon Sep 17 00:00:00 2001
From: Aarne Ranta <aarne@chalmers.se>
Date: Wed, 13 Dec 2017 09:36:21 +0200
Subject: [PATCH] added ExtraFre.quel_IComp

---
 src/french/ExtraFre.gf    | 5 +++++
 src/french/ExtraFreAbs.gf | 2 ++
 2 files changed, 7 insertions(+)

diff --git a/src/french/ExtraFre.gf b/src/french/ExtraFre.gf
index e27726fd8..8cf08fcb7 100644
--- a/src/french/ExtraFre.gf
+++ b/src/french/ExtraFre.gf
@@ -110,6 +110,11 @@ concrete ExtraFre of ExtraFreAbs = ExtraRomanceFre **
               }
       } ;
 
+    quel_IComp = {
+      s = aagrForms "quel" "quelle" "quels" "quelles" ;
+      cop = <> ;
+      } ;
+
 --- in ExtraRomance
 --    PassAgentVPSlash vps np = passVPSlash 
 --      vps ("par" ++ (np.s ! Acc).ton) ;
diff --git a/src/french/ExtraFreAbs.gf b/src/french/ExtraFreAbs.gf
index 046242a30..00b1d847e 100644
--- a/src/french/ExtraFreAbs.gf
+++ b/src/french/ExtraFreAbs.gf
@@ -58,5 +58,7 @@ abstract ExtraFreAbs = ExtraRomanceAbs - [ProDrop] ** {
     InvQuestCl : Cl -> QCl ;      -- dort-il
     InvQuestIAdvCl : IAdv -> Cl -> QCl ;      -- dort-il
 
+    quel_IComp : IComp ; -- quelle est votre nationalité
+
 
 }