fix the gender agreement in DetQuantOrd

src/russian/CatRus.gf

@@ -72,13 +72,12 @@ lincat
   Det, DAP = {
     s : DetTable ;
     type : DetType ; -- main purpose is to avoid emptiness of articles, but can be reused later for something else
-    g : Gender ;
     c : Case ;
     size : NumSize
     } ;
   Predet = ResRus.Adjective ** {size : NumSize} ;
   IQuant = ResRus.Adjective ** {g: Gender; c: Case} ;
-  Quant = ResRus.Adjective ** {g: Gender; c: Case; type: DetType} ;
+  Quant = ResRus.Adjective ** {c: Case; type: DetType} ;
   Numeral = NumeralForms ;
   Num = NumDet ;
   Card = NumDet ;

src/russian/ConjunctionRus.gf

@@ -15,7 +15,6 @@ concrete ConjunctionRus of Conjunction =
       preferShort : ShortFormPreference
       } ;
     [DAP] = {s1,s2 : DetTable ;
-      g : Gender ;
       c : Case ;
       size : NumSize
       } ;
@@ -67,7 +66,6 @@ concrete ConjunctionRus of Conjunction =
 
     -- : DAP -> DAP -> ListDAP ;       --
     BaseDAP x y = twoTable3 Gender Animacy Case x y ** {
-      g = conjGender x.g y.g ;
       c = y.c ;
       size = conjSize x.size y.size ;  -- different genders -> plural?
       } ;

src/russian/ExtendRus.gf

@@ -218,7 +218,7 @@ lin
       } ;
 
   UseDAP det =
-    let g = det.g in {
+    let g = Neut in {
       s=case det.type of {
         EmptyIndef => \\cas => a_Det.s ! g ! Inanimate ! cas ++ det.s ! g ! Inanimate ! cas ;
         EmptyDef => \\cas => the_Det.s ! g ! Inanimate ! cas ++ det.s ! g ! Inanimate ! cas ;

src/russian/NounRus.gf

@@ -45,7 +45,7 @@ lin
 
   -- : Det -> NP ;        -- these five
   DetNP det =
-    let g = det.g in {
+    let g = Neut in {
       s=case det.type of {
         EmptyIndef => \\cas => a_Det.s ! g ! Inanimate ! cas ++ det.s ! g ! Inanimate ! cas ;
         EmptyDef => \\cas => the_Det.s ! g ! Inanimate ! cas ++ det.s ! g ! Inanimate ! cas ;
@@ -102,7 +102,7 @@ lin
   DetQuantOrd quant num ord = {
     s=\\g,a,cas => num.s ! g ! a ! cas
       ++ quant.s ! (gennum g (numSizeNumber num.size)) ! a ! cas
-      ++ (adjFormsAdjective ord).s ! gennum quant.g (animNumSizeNum Inanimate cas num.size) ! Inanimate ! numSizeCase cas num.size ;
+      ++ (adjFormsAdjective ord).s ! gennum g (animNumSizeNum Inanimate cas num.size) ! Inanimate ! numSizeCase cas num.size ;
     type=quant.type ;
     g=quant.g ;
     c=quant.c ;
@@ -139,7 +139,6 @@ lin
     s=mkPronTable pron.poss ;
     type=NormalDet ;
     short=\\a=>[] ;
-    g=Neut ;
     c=Nom ;
     preferShort=PreferFull
     } ;
@@ -226,7 +225,6 @@ lin
     type=EmptyDef ;
     short=\\a=>[] ;
     c=Nom ;
-    g=Neut ;
     size=Num1 ;
     preferShort=PreferFull
     } ;
@@ -236,7 +234,6 @@ lin
     type=EmptyIndef ;
     short=\\a=>[] ;
     c=Nom ;
-    g=Neut ;
     size=Num1 ;
     preferShort=PreferFull
     } ;

src/russian/StructuralRus.gf

@@ -27,21 +27,18 @@ lin
   this_Quant = (adjFormsAdjective this_forms) ** {
     type=NormalDet ;
     preferShort=PreferFull ;
-    g=Neut ;
     c=Nom
     } ;
   -- : Quant ;
   that_Quant = (adjFormsAdjective that_forms) ** {
     type=NormalDet ;
     preferShort=PreferFull ;
-    g=Neut ;
     c=Nom
     } ;
   -- : Quant ;
   no_Quant = (adjFormsAdjective (makeAdjectiveForms "никакой" "" "3b" PreferFull)) ** {
     type=NormalDet ;
     preferShort=PreferFull ;
-    g=Neut ;
     c=Nom
     } ;