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é
+
 
 }