Remove lots of ununsed noun stuff from MorphoRus.

lib/resource-1.4/russian/ExtraLexRus.gf

@@ -7,7 +7,24 @@ lin
 ---  bridge_N = mkN "мост" ;
 ---  candle_N = nSvecha "свеч" ; -- +++ MG_UR: added +++
 ---  citizen_N = nGrazhdanin "господ" ; -- +++ MG_UR: added +++
----  daughter_N = nDoch "доч" ; -- +++ MG_UR: added +++
+  daughter_N = 
+  {s = table {
+      SF Sg Nom => "дочь" ;
+      SF Sg Gen => "дочери" ;
+      SF Sg Dat => "дочери" ;
+      SF Sg Acc => "дочь" ;
+      SF Sg Inst => "дочерью" ;
+      SF Sg (Prepos _) => "дочери" ;
+      SF Pl Nom => "дочери" ;
+      SF Pl Gen => "дочерей" ;
+      SF Pl Dat => "дочерям" ;
+      SF Pl Acc => "дочерей" ;
+      SF Pl Inst => "дочерьми" ;
+      SF Pl (Prepos _) => "дочерях"
+    } ;
+     g = Fem    ; anim = Animate
+  } ;
+
 ---  desk_N = nStol "стол" ;
 ---  dictionary_N = nSlovar "словар" ;
 ---  fellow_N = nTovarish "товарищ" ; -- +++ MG_UR: added +++
@@ -16,9 +33,42 @@ lin
 ---  museum_N = nMusej "музе" ; -- +++ MG_UR: added +++
 --  name_N = mkN "имя" "имени" "имени" "имя" "именем" "имени" "имени" "имена" "имён" "именам" "имена" "именами" "именах" neuter inanimate ;
 ---  ocean_N = nMorje "мор" ; -- +++ MG_UR: added +++
----  son_N = nSyn "сын" ; -- +++ MG_UR: added +++
+ son_N = 
+  {s  =  table
+      { SF Sg Nom =>  syn ;
+        SF Sg Gen => syn+"а" ;
+        SF Sg Dat => syn+"у" ;
+        SF Sg Acc => syn +"а";
+        SF Sg Inst => syn+"ом" ;
+        SF Sg (Prepos _) => syn+"е" ;
+        SF Pl Nom => syn+"ья" ;
+        SF Pl Gen => syn+"ьев" ;
+        SF Pl Dat => syn+"ьям" ;
+        SF Pl Acc => syn +"ьев";
+        SF Pl Inst => syn+"ьями" ;
+        SF Pl (Prepos _) => syn+"ьяах"
+    } ;
+    g = Masc   ; anim = Animate
+  } ;
 ---  time_N = nVremja "вре" ; -- +++ MG_UR: added +++
 ---  vocationalschool_N = nUchilishe "училищ" ; -- +++ MG_UR: added +++
----  way_N = nPut "пут" ; -- +++ MG_UR: added +++
+  way_N = 
+  {s  =  table
+      { SF Sg  Nom =>  put+"ь" ;
+        SF Sg Gen => put+"и" ;
+        SF Sg Dat => put+"и" ;
+        SF Sg Acc => put+"ь" ;
+        SF Sg Inst => put+"ём" ;
+        SF Sg (Prepos _) => put+"и" ;
+        SF Pl  Nom => put+"и" ;
+        SF Pl Gen => put+"ей" ;
+        SF Pl Dat => put+"ям" ;
+        SF Pl Acc => put+"и" ;
+        SF Pl Inst => put+"ями" ;
+        SF Pl (Prepos _) => put+"ях"
+       } ;
+    g = Masc ; anim = Inanimate
+  } ;
+
 ---  word_N = nSlovo "слов" ; -- +++ MG_UR: added +++
 }

lib/resource-1.4/russian/LexiconRus.gf

@@ -55,7 +55,7 @@ lin
   carpet_N = mkN "ковёр"; -- vowel change
   cat_N = mkN "кошка" animate ; -- vowel change
   ceiling_N = mkN "потолок" ; -- vowel change
-  chair_N = mkN "стул" ;
+  chair_N = mkN "стул" ; -- irregular
   cheese_N = mkN "сыр" ;
 ---  child2_N = nRebenok "реб" ; -- Achtung: Hier 'child' im Sinne von "junge Lebewesen" (dann keine Suppletivformen(?))!
   child_N = mkN "ребёнок" "ребёнка" "ребёнку" "ребёнка" "ребёнком" "ребёнке" "ребёнке" "дети" "детей" "детям" "детей" "детьми" "детях"  masculine animate ;
@@ -150,7 +150,7 @@ lin
   hold_V2 = dirV2 (regV imperfective second "держ" "у" "держал" "держи" "держать" );
   hope_VS= regV imperfective first "наде" "ю" "надеял" "надей" "надеять" ;
   horn_N = mkN "рог" ;
-  horse_N = mkN "лошадь" animate;
+  horse_N = mkN "лошадь" animate; -- irregular
   hot_A = AKhoroshij "горяч" "горячее" ;
   house_N = mkN "дом" ;
   hunt_V2 = dirV2 (regV imperfective second "охоч" "у" "охотил" "охоть" "охотить" ) ;
@@ -189,7 +189,7 @@ lin
   meat_N = mkN "мясо" ;
   milk_N = mkN "молоко" ;
   moon_N = mkN "луна" ;
-  mother_N2 = mkN2 (mkN "мама") ;
+  mother_N2 = mkN2 (mkN "мать" "матери" "матери" "мать" "матерью" "матери" "матери" "матери" "матерей" "матерям" "матерей" "матерями" "матерях" feminine animate) ;
   mountain_N = mkN "гора" ;
   mouth_N = mkN "рот" "рта" "рту" "рот" "ртом" "рте" "рте" "рты" "ртов" "ртам" "рты" "ртами" "ртах" masculine inanimate ;
   music_N = mkN "музыка" ;