russian: new paradigms for adjectives, including overloaded smart paradigm. moved declension stuff to MorphoRus. changes LexiconRus to use new mkA.

lib/resource-1.4/russian/LexiconRus.gf

@@ -17,22 +17,22 @@ lin
   ask_V2Q = dirV2 (regV imperfective first "спрашива" "ю" "спрашивал" "спрашивай" "спрашивать") ;
   baby_N = mkN "малыш" animate;
   back_N = mkN "спина" ;
-  bad_A = AKakoj_Nibud "плох" "" "хуже";
+  bad_A = mkA "плохой" "хуже";
   bank_N = mkN "банк" ;
   bark_N = mkN "кора";
-  beautiful_A = AStaruyj "красив" "красивее";
+  beautiful_A = mkA "красивый";
   become_VA = regV perfective second "станов" "лю" "стал" "стань" "стать" ;
   beer_N = mkN "пиво" ;
   beg_V2V = dirV2 (mkV imperfective "прошу" "просишь" "просит" "просим" "просите" "просят" "просил" "проси" "просить" );
   belly_N = mkN "живот" ;
-  big_A = AKakoj_Nibud "больш" "" "больше" ;
+  big_A = mkA "большой" "больше" ;
   bike_N = mkN "велосипед" ;
   bird_N = mkN "птица" animate;
   bite_V2 = dirV2 (regV imperfective first "куса" "ю" "кусал" "кусай" "кусать");
-  black_A = AStaruyj "чёрн" "чернее";
+  black_A = mkA "чёрный";
   blood_N = mkN "кровь" ;
   blow_V = regV imperfective first "ду" "ю" "дул" "дуй" "дуть" ;
-  blue_A = AMolodoj "голуб" "голубее";
+  blue_A = mkA "голубой" ;
   boat_N = mkN "лодка" ;
   bone_N = mkN "кость" ;
   book_N = mkN "книга" ;
@@ -43,9 +43,9 @@ lin
   break_V2 = dirV2 (regV imperfective first "прерыва" "ю" "прерывал" "прерывай" "прерывать" );
   breast_N = mkN "грудь" ;
   breathe_V = regV imperfective second "дыш" "у" "дышал" "дыши" "дышать" ;
-  broad_A = AMalenkij "широк" "шире";
+  broad_A = mkA "широкий" "шире";
   brother_N2 = mkN2 (mkN "брат" animate) ; -- FIXME: special case
-  brown_A = AStaruyj "коричнев" "коричневее";
+  brown_A = mkA "коричневый";
   burn_V = regV imperfective second "гор" "ю" "горел" "гори" "гореть" ;
   butter_N = mkN "масло";
   buy_V2 = dirV2 (regV imperfective first "покупа" "ю" "покупал" "покупай" "покупать" );
@@ -61,15 +61,15 @@ lin
   child_N = mkN "ребёнок" "ребёнка" "ребёнку" "ребёнка" "ребёнком" "ребёнке" "ребёнке" "дети" "детей" "детям" "детей" "детьми" "детях"  masculine animate ;
   church_N = mkN "церковь" "церкви" "церкви" "церковь" "церковью" "церкви" "церкви" "церкви" "церквей" "церквям" "церкви" "церквями" "церквях"  masculine inanimate ;
   city_N = mkN "город" ;
-  clean_A = AStaruyj "чист" "чище"; 
-  clever_A = AStaruyj "умн" "умнее";
+  clean_A = mkA "чистый" "чище"; 
+  clever_A = mkA "умный";
   close_V2= dirV2 (regV imperfective first "закрыва" "ю" "закрывал" "закрывай" "закрывать" );
   cloud_N = mkN "облако" ; -- irregular
   coat_N = mkIndeclinableNoun "пальто" masculine inanimate ;
-  cold_A = AStaruyj "холодн" "холоднее";
+  cold_A = mkA "холодный";
   come_V = regV imperfective first "прихо" "жу" "приходил" "приходи" "приходить" ;
   computer_N = mkN "компьютер" ;
-  correct_A = AStaruyj "правильн" "правильнее"; 
+  correct_A = mkA "правильный" ; 
   count_V2 = dirV2 (regV imperfective first "счита" "ю" "считал" "считай" "считать" ) ;
   country_N = mkN "страна" ;
   cousin_N = mkN "кузен" ; -- FIXME: is this really correct? can't find it in the dictionary
@@ -78,22 +78,22 @@ lin
   day_N = mkN "день" "дня" "дню" "день" "днём" "дне" "дне" "дни" "дней" "дням" "дни" "днями" "днях" masculine inanimate ;
   die_V = regV imperfective first "умира" "ю" "умирал" "умирай" "умирать" ;
   dig_V = regV imperfective first "копа" "ю" "копал" "копай" "копать" ;
-  dirty_A = AStaruyj "грязн" "грязнее" ;
+  dirty_A = mkA "грязный" ;
   distance_N3 = mkN3 (mkN "расстояние") from_Prep to_Prep ;
   do_V2 = dirV2 (regV imperfective first "дела" "ю" "делал" "делай" "делать" );
   doctor_N = mkN "доктор" animate ;
   dog_N = mkN "собака" animate;
   door_N = mkN "дверь" ;
   drink_V2 = dirV2 (regV imperfective firstE "пь" "ю" "пил" "пей" "пить" );
-  dry_A = AMolodoj "сух" "суше";
-  dull_A = AStaruyj "скучн" "скучнее";
+  dry_A = mkA "сухой" "суше";
+  dull_A = mkA "скучный" ;
   dust_N = mkN "пыль" ;
   ear_N = mkN "ухо" ;
   earth_N = mkN "земля" ;
-  easy_A2V = mkA2 (AMalenkij "лёгк" "легче") "для" genitive ;
+  easy_A2V = mkA2 (mkA "лёгкий" "легче") "для" genitive ;
   eat_V2 = dirV2 (regV imperfective first "куша" "ю" "кушал" "кушай" "кушать" );
   egg_N = mkN "яйцо" ;
-  empty_A = AMolodoj "пуст" "пустее";
+  empty_A = mkA "пустой" ;
   enemy_N = mkN "враг" animate ;
   eye_N = mkN "глаз" ; -- FIXME: Pl -a
   factory_N = mkN "фабрика" ;
@@ -122,18 +122,18 @@ lin
   fridge_N = mkN "холодильник" ;
   friend_N = mkN "друг" "друга" "другу" "друга" "другом" "друге" "друге" "друзья" "друзей" "друзьям" "друзей" "дузьями" "друзьях" masculine animate ;
   fruit_N = mkN "фрукт" ;
-  full_A = AStaruyj "полн" "полнее";
-  fun_AV = AStaruyj "весёл" "веселее";
+  full_A = mkA "полный";
+  fun_AV = mkA "весёлый";
   garden_N = mkN "сад" ;
   girl_N = mkN "девочка" animate; -- vowel change
   give_V3 = tvDirDir (regV imperfective firstE "да" "ю" "давал" "давай" "давать" ) ;
   glove_N = mkN "перчатка" ; -- vowel change
   go_V= regV imperfective second "хо" "жу" "ходил" "ходи" "ходить" ;
   gold_N = mkN "золото" ;
-  good_A = AKhoroshij "хорош" "лучше" ; 
+  good_A = mkA "хороший" "лучше" ; 
   grammar_N = mkN "грамматикa";
   grass_N = mkN "трава";
-  green_A = AStaruyj "зелен" "зеленее" ;
+  green_A = mkA "зелёный" ;
   guts_N = mkN "внутренность" ;
   hair_N = mkN "волос" ; -- FIXME: always plural?
   hand_N = mkN "рука" ;
@@ -144,19 +144,19 @@ lin
   head_N = mkN "голова" ;
   hear_V2= dirV2 (regV imperfective first "слуша" "ю" "слушал" "слушай" "слушать" );
   heart_N = mkN "сердце" "сердца" "сердцу" "сердца" "сердцем" "сердце" "сердце" "сердца" "сердец" "сердцам" "сердец" "сердцами" "сердцах"  neuter inanimate ;
-  heavy_A = AStaruyj "тяжел" "тяжелее";
+  heavy_A = mkA "тяжёлый" ;
   hill_N = mkN "холм" ;
   hit_V2 = dirV2 (regV imperfective first "ударя" "ю" "ударял" "ударяй" "ударять" );
   hold_V2 = dirV2 (regV imperfective second "держ" "у" "держал" "держи" "держать" );
   hope_VS= regV imperfective first "наде" "ю" "надеял" "надей" "надеять" ;
   horn_N = mkN "рог" ;
   horse_N = mkN "лошадь" animate; -- irregular
-  hot_A = AKhoroshij "горяч" "горячее" ;
+  hot_A = mkA "горячий" ;
   house_N = mkN "дом" ;
   hunt_V2 = dirV2 (regV imperfective second "охоч" "у" "охотил" "охоть" "охотить" ) ;
   husband_N = mkN "муж" "мужа" "мужу" "мужа" "мужем" "муже" "муже" "мужья" "мужей" "мужьям" "мужей" "мужьями" "мужьях" masculine animate ;
   ice_N = mkN "лёд" "льда" "льду" "льда" "льдом" "льде" "льде" "льды" "льдов" "льдам" "льдов" "льдами" "льдах" masculine inanimate ;
-  important_A = AStaruyj "важн" "важнее" ;
+  important_A = mkA "важный" ;
   industry_N = mkN "промышленность" ; 
   iron_N = mkN "железо" ;
   jump_V = regV imperfective first "прыга" "ю" "прыгал" "прыгай" "прыгать" ;
@@ -179,13 +179,13 @@ lin
   listen_V2= dirV2 (regV imperfective first "слуша" "ю" "слушал" "слушай" "слушать" );
   live_V= regV imperfective firstE "жив" "у" "жил" "живи" "жить" ;
   liver_N = mkN "печень" ;
-  long_A = AStaruyj "длинн" "длиннее" ;
+  long_A = mkA "длинный" ;
   lose_V2 = dirV2 (regV imperfective first "теря" "ю" "терял" "теряй" "терять" );
   louse_N = mkN "вошь" "вши" "вши" "вошь" "вошью" "вше" "вше" "вши" "вшей" "вшам" "вшей" "вшами" "вшах" feminine animate ;
   love_N = mkN "любовь" ; -- vowel change
   love_V2= dirV2 (regV imperfective second "люб" "лю" "любил" "люби" "любить" );
   man_N = mkN "человек" ; -- null gen pl
-  married_A2 = mkA2 (adjInvar "замужем") "за" instructive ;
+  married_A2 = mkA2 (mkA "замужем") "за" instructive ;
   meat_N = mkN "мясо" ;
   milk_N = mkN "молоко" ;
   moon_N = mkN "луна" ;
@@ -194,17 +194,17 @@ lin
   mouth_N = mkN "рот" "рта" "рту" "рот" "ртом" "рте" "рте" "рты" "ртов" "ртам" "рты" "ртами" "ртах" masculine inanimate ;
   music_N = mkN "музыка" ;
   name_N = mkN "имя" ;
-  narrow_A = AStaruyj "узк" "уже" ;
-  near_A = AMalenkij "близк" "ближе";
+  narrow_A = mkA "узкий" "уже" ;
+  near_A = mkA "близкий" "ближе";
   neck_N = mkN "шея" ;
-  new_A = AStaruyj "нов" "новее" ;
+  new_A = mkA "новый" ;
   newspaper_N = mkN "газета" ;
   night_N = mkN "ночь" ;
   nose_N = mkN "нос" ;
   now_Adv = mkAdv "сейчас" ;
   number_N = mkN "число" ; -- gen pl "чисел"
   oil_N = mkN "нефть" ;
-  old_A = AStaruyj "стар" "старше" ;
+  old_A = mkA "старый" "старше" ;
   open_V2= dirV2 (regV imperfective first "открыва" "ю" "открывал" "открывай" "открывать" );
 ---  organise_V2 = dirV2 (regV imperfective foreign "организу" "ю" "организовал" "организуй" "организовать" ); -- +++ MG_UR: added +++
   paint_V2A = dirV2 (regV imperfective first "рису" "ю" "рисовал" "рисуй" "рисовать" ) ;
@@ -220,7 +220,7 @@ lin
   play_V2 = mkV2 (regV imperfective first "игра" "ю" "играл" "играй" "играть" ) "c" instructive;
   policeman_N = mkN "милиционер" animate ;
   priest_N = mkN "священник" animate;
-  probable_AS = AStaruyj "возможн" "возможнее";
+  probable_AS = mkA "возможный" ;
   pull_V2 = dirV2 (regV imperfective first "тян" "у" "тянул" "тяни" "тянуть" ) ;
   push_V2 = dirV2 (regV imperfective first "толка" "ю" "толкал" "толкай" "толкать" );
   put_V2 = dirV2 (regV imperfective firstE "клад" "у" "клал" "клади" "класть" );
@@ -232,7 +232,7 @@ lin
   read_V2 = dirV2 (regV imperfective first "чита" "ю" "читал" "читай" "читать" );
 -- ready_A = ;
   reason_N = mkN "причина";
-  red_A = AStaruyj "красн" "краснее" ;
+  red_A = mkA "красный" ;
   religion_N = mkN "религия" ;
   restaurant_N = mkN "ресторан" ;
   right_Ord = (uy_j_EndDecl "прав") ** {lock_A = <>} ;
@@ -242,8 +242,8 @@ lin
   roof_N = mkN "крыша" ;
   root_N = mkN "корень" ;
   rope_N = mkN "верёвка" ;
-  rotten_A = AMolodoj "гнил" "гнилее";
-  round_A = AStaruyj "кругл" "круглее";
+  rotten_A = mkA "гнилой";
+  round_A = mkA "круглый";
   rub_V2 = dirV2 (regV imperfective firstE "тр" "у" "тёр" "три" "тереть" );
   rubber_N = mkN "резина" ;
   rule_N = mkN "правило" ;
@@ -261,13 +261,13 @@ lin
   sell_V3 = tvDirDir (regV imperfective firstE "прода" "ю" "продавал" "продавай" "продавать" );
   send_V3 = tvDirDir (regV imperfective first "посыла" "ю" "посылал" "посылай" "посылать" );
   sew_V = regV imperfective firstE "шь" "ю" "шил" "шей" "шить" ;
-  sharp_A = AStaruyj "остр" "острее";
+  sharp_A = mkA "острый";
   sheep_N = mkN "овца" animate ;
   ship_N = mkN "корабль" ;
   shirt_N = mkN "рубашка" ;
   shoe_N = mkN "туфля" "туфли" "туфле" "туфлю" "туфлей" "туфле" "туфле" "туфли" "туфель" "туфлям" "туфли" "туфлями" "туфлях"  masculine inanimate ;
   shop_N = mkN "магазин" ;
-  short_A = AMalenkij "коротк" "короче" ;
+  short_A = mkA "короткий" "короче" ;
   silver_N = mkN "серебро" ;
   sing_V = regV imperfective firstE "по" "ю" "пел" "пой" "петь" ;
   sister_N = mkN "сестра" animate ;
@@ -275,10 +275,10 @@ lin
   skin_N = mkN "кожа" ;
   sky_N = mkN "небо" "неба" "небу" "небо" "небом" "небе" "небе" "небеса" "небес" "небесам" "небес" "небесами" "небесах" neuter inanimate ;
   sleep_V = regV imperfective second "сп" "лю" "спал" "спи" "спать" ;
-  small_A = AMalenkij "маленьк" "меньше" ;
+  small_A = mkA "маленький" "меньше" ;
   smell_V = regV imperfective first "пахн" "у" "пахнул" "пахни" "пахнуть" ;
   smoke_N = mkN "дым" ;
-  smooth_A = AMalenkij "гладк" "глаже";
+  smooth_A = mkA "гладкий" "глаже";
   snake_N = mkN "змея" animate ;
   snow_N = mkN "снег" ;
   sock_N = mkN "носок" ;
@@ -296,9 +296,9 @@ lin
   stone_N = mkN "камень" ;
   stop_V = regV imperfective first "останавлива" "ю" "останавливал" "останавливай" "останавливать";
   stove_N = mkN "печь" ;
-  straight_A = AMolodoj "прям" "прямее";
+  straight_A = mkA "прямой" ;
   student_N = mkN "студент" animate ;
-  stupid_A = AMolodoj "тупой" "тупее" ;
+  stupid_A = mkA "тупой" "тупее" ;
   suck_V2 = dirV2 (regV imperfective firstE "сос" "у" "сосал" "соси" "сосать") ;
   sun_N = mkN "солнце" "солнца" "солнцу" "солнце" "солнцем" "солнце" "солнце" "солнца" "солнц" "солнцам" "солнца" "солнцами" "солнцах"  neuter inanimate ;
   swell_V = regV imperfective first "опуха" "ю" "опухал" "опухай" "опухать" ;
@@ -311,8 +311,8 @@ lin
   teach_V2 = dirV2 (regV imperfective second "уч" "у" "учил" "учи" "учить" );
   teacher_N = mkN "учитель" animate ;
   television_N = mkN "телевидение" ; -- FIXME: televizor?
-  thick_A = AStaruyj "толст" "толще" ;
-  thin_A = AMalenkij "тонк" "тоньше" ;
+  thick_A = mkA "толстый" "толще" ;
+  thin_A = mkA "тонкий" "тоньше" ;
   think_V = regV imperfective first "дума" "ю" "думал" "думай" "думать" ;
   throw_V2 = dirV2 (regV imperfective first "броса" "ю" "бросал" "бросай" "бросать" ) ;
   tie_V2 = dirV2 (regV imperfective first "вяж" "у" "вязал" "вяжи" "вязать") ;
@@ -323,7 +323,7 @@ lin
   travel_V = regV imperfective first "путешеству" "ю" "путешествовал" "путешествуй" "путешествовать" ;
   tree_N = mkN "дерево" ; -- irregular
   turn_V = regV imperfective first "поворачива" "ю" "поворачивал" "поворачивай" "поворачивать" ;
-  ugly_A = AStaruyj "некрасив" "некрасивее" ;
+  ugly_A = mkA "некрасивый" ;
 --  uncertain_A = ;
   understand_V2 = dirV2 (regV imperfective first "понима" "ю" "понимал" "понимай" "понимать" );
   university_N = mkN "университет" ;
@@ -333,13 +333,13 @@ lin
   walk_V = regV imperfective first "гуля" "ю" "гулял" "гуляй" "гулять" ;
 ---  want_V2 = dirV2 (regV imperfective mixed "хо" "чу" "хотел" "хоти" "хотеть" );
   war_N = mkN "война" ;
-  warm_A = AStaruyj "тёпл" "теплее" ;
+  warm_A = mkA "тёплый" ;
   wash_V2 = dirV2 (regV imperfective first "мо" "ю" "мыл" "мой" "мыть" ) ;
   watch_V2 = dirV2 (regV imperfective second "смотр" "ю" "смотрел" "смотри" "смотреть" );
   water_N = mkN "вода" ;
-  wet_A = AStaruyj "мокр" "мокрее";
-  white_A = AStaruyj "бел" "белее" ;
-  wide_A = AMalenkij "широк" "шире";
+  wet_A = mkA "мокрый" ;
+  white_A = mkA "белый" ;
+  wide_A = mkA "широкий" "шире";
   wife_N = mkN "жена" animate ;
   win_V2 = dirV2 (regV imperfective first "выигрыва" "ю" "выигрывал" "выигрывай" "выигрывать" );
   wind_N = mkN "ветер" "ветра" "ветру" "ветер" "ветром" "ветра" "ветра" "ветров" "ветра" "ветрам" "ветров" "ветрами" "ветрах" masculine inanimate ;
@@ -353,6 +353,6 @@ lin
   worm_N = mkN "черв" ;
   write_V2 = dirV2 (regV imperfective first "пиш" "у" "писал" "пиши" "писать" );
   year_N = mkN "годь" ;
-  yellow_A = AStaruyj "жёлт" "желтее" ;
-  young_A = AMolodoj "молод" "моложе";
+  yellow_A = mkA "жёлтый" ;
+  young_A = mkA "молодой" "моложе";
 }