This commit is contained in:
janna
2005-11-25 20:02:53 +00:00
parent 08d75593c3
commit 0b3d28f6d9
9 changed files with 683 additions and 56 deletions

View File

@@ -0,0 +1,206 @@
--# -path=.:../abstract:../../prelude
--# -val
concrete BasicRus of Basic = CategoriesRus ** open ParadigmsRus in {
flags
optimize=values ;
coding=utf8 ;
lin
airplane_N = nTelefon "самолет" ;
answer_V2S = mkV2S (caseV2 (regV "vastata") allative) ;
apartment_N = nMashina "квартир" ;
apple_N = nChislo "яблок" ;
art_N = nChislo "искусств" ;
ask_V2Q = mkV2Q (caseV2 (regV "kysyä") ablative) ;
baby_N = nMalush "малыш";
bad_ADeg = mkADeg (nLukko "paha") "pahempi" "pahin" ;
bank_N = nBank "банк" ;
beautiful_ADeg = mkADeg (regN "kaunis") "kauniimpi" "kaunein" ;
become_VA = mkVA (regV "tulla") translative ;
beer_N = nChislo "пив" ;
beg_V2V = mkV2V (caseV2 (reg2V "pyytää" "pyysi") partitive) ;
big_ADeg = mkADeg (sgpartN (nArpi "suuri") "suurta") "suurempi" "suurin" ;
bike_N = nTelefon "велосипед" ; --- for correct vowel harmony
bird_N = nEdinica "птиц" ;
black_ADeg = mkADeg (nLukko "musta") "mustempi" "mustin" ;
blue_ADeg = mkADeg (regN "sininen") "sinisempi" "sinisin" ;
boat_N = nMashina "лодк" ;
book_N = nMashina "книг" ;
boot_N = nBank "сапог" ;
boss_N = nStomatolog "начальник" ;
boy_N = nStomatolog "мальчик" ;
bread_N = nAdres "хлеб" ;
break_V2 = dirV2 (regV "rikkoa") ;
broad_ADeg = mkADeg (regN "leveä") "leveämpi" "levein" ;
brother_N2 = funGen (nBrat ",брат") ;
brown_ADeg = mkADeg (regN "ruskea") "ruskeampi" "ruskein" ;
butter_N = nChislo "масл";
buy_V2 = dirV2 (regV "ostaa") ;
camera_N = nMashina "kamer" ;
cap_N = nNoga "чашк" ; чаш-ек Pl-Gen
car_N = nMashina "машин" ;
carpet_N = mkN "ковёр" "ковра" "ковру" "ковёр" "ковром" "ковре" "ковры" "ковров" "коврам" "ковры" "коврами" "коврах" Masc Inanimate;
cat_N = nMashina "кошк" ;
ceiling_N = nPotolok"потол" ;
chair_N = nStul "стул" ;
cheese_N = nTelefon "сыр" ;
child_N = mkN "ребёнок" "ребёнка" "ребёнку" "ребёнка" "ребёнком" "ребёнке" "дети" "детей" "детям" "детей" "детьми" "детях" Masc Animate;
church_N = mkN "церковь" "церкви" "церкви" "церковь" "церковью" "церкви" "церкви" "церквей" "церквям" "церкви" "церквями" "церквях" Masc Inanimate;
city_N = nAdres "город" ;
clean_ADeg = regADeg "ren" ;
clever_ADeg = regADeg "klok" ;
close_V2 = dirV2 (mk2V "stänga" "stängde") ;
coat_N = mkIndeclinableNoun "пальто" Masc Inanimate ;
cold_ADeg = regADeg "kall" ;
come_V = (mkV "komma" "kommer" "kom" "kom" "kommit" "kommen") ;
computer_N = nTelefon "компьютер" ;
country_N = nMashina "стран" ;
cousin_N = nTelefon "кузен" ;
cow_N = nMashina "коров" ;
die_V = "" ;
dirty_ADeg = "" ;
doctor_N = nAdres "доктор" ;
dog_N = nNoga "собак" ;
door_N = nBol "двер" ;
drink_V2 = "" ;
eat_V2
enemy_N = nStomatolog "враг" ;
factory_N = nNoga "фабрик" ;
father_N = mkN "отец" "отца" "отцу" "отца" "отцом" "отце" "отцы" "отцов" "отцам" "отцов" "отцами" "отцах" Masc Animate;
fear_VS
find_V2
fish_N = nMashina "рыб" ;
floor_N = nTelefon "пол" ;
forget_V2
fridge_N = nBank "холодильник " ;
friend_N = mkN "друг" "друга" "другу" "друга" "другом" "друге" "друзья" "друзей" "друзьям" "друзей" "дузьями" "друзьях" Masc Animate;
fruit_N = nTelefon "фрукт" ;
garden_N = nTelefon "сад" ;
girl_N = nNoga "девочк" ;
glove_N = nNoga "перчатк" ;
gold_N = nChislo "золот" ;
good_ADeg
go_V
green_ADeg
harbour_N = nTelefon "залив" ;
hate_V2
hat_N = nMashina "шляп" ;
have_V2
hear_V2
hill_N = nTelefon "холм" ;
hope_VS
horse_N = nBol "лошад" ;
hot_ADeg
house_N = nAdres "дом" ;
important_ADeg
industry_N = nChislo "производств" ;
iron_N = nChislo "желез" ;
king_N = mkN "король" "короля" "королю" "короля" "королем" "короле" "короли" "королей" "королям" "королей" "королями" "королях" Masc Animate;
know_V2
lake_N = nChislo "озер" ;
lamp_N = nMashina "ламп" ;
learn_V2
leather_N = nEdinica "кож" ;
leave_V2
like_V2
listen_V2
live_V
long_ADeg
lose_V2
love_N = nBol "любов" ;
love_V2
man_N = nStomatolog "человек" ;
meat_N =nChislo "мяс" ;
milk_N = nChislo "молок" ;
moon_N = nMashina "лун" ;
mother_N = nMashina "мам" ;
mountain_N = nMashina "гор" ;
music_N = nNoga "музык" ;
narrow_ADeg
new_ADeg
newspaper_N = nMashina "газет" ;
oil_N = nBol "нефть" ;
old_ADeg
open_V2
paper_N = nNoga "бумаг" ;
peace_N = nTelefon "мир" ;
pen_N = nNoga "ручк" ;
planet_N = nMashina "планет" ;
plastic_N = nMashina "пластмасс" ;
play_V2
policeman_N = nTelefon "милиционер" ;
priest_N = nStomatolog "священник" ;
queen_N = nMashina "королев" ;
radio_N = mkIndeclinableNoun "радио" ;
read_V2
red_ADeg
religion_N = nMalyariya "религи" ;
restaurant_N = nTelefon "ресторан" ;
river_N = nNog "рек" ;
rock_N = nUroven "кам" ;
roof_N = nEdinica "крыш" ;
rubber_N = nMashina "резин" ;
run_V
say_VS
school_N = nMashina "школ" ;
science_N = nEdinica "наук" ;
sea_N = nProizvedenie "мор" ;
seek_V2
see_V2
sell_V3
send_V3
sheep_N = nMashina "овц" ;
ship_N = nNol "корабл" ;
shirt_N = nNoga "рубашк" ;
shoe_N = mkN "туфля" "туфли" "туфле" "туфлю" "туфлей" "туфле" "туфли" "туфель" "туфлям" "туфли" "туфлями" "туфлях" Masc Inanimate;
shop_N = nTelefon "магазин" ;
short_ADeg
silver_N = nChislo "серебр" ;
sister_N = nMashina "сестр" ;
sleep_V
small_ADeg
snake_N = nTetya"зме" ;
sock_N = nPotolok "нос" ;
speak_V2
star_N = nMashina "звезд" ;
steel_N = nBol "стал" ;
stone_N = nNol "камен" ;
stove_N = nBol "печ" ;
student_N = nTelefon "студент" ;
stupid_ADeg
sun_N = mkN "солнце" "солнца" "солнцу" "солнце" "солнцем" "солнце" "солнца" "солнц" "солнцам" "солнца" "солнцами" "солнцах" Neut Inanimate;
switch8off_V
switch8on_V
table_N = nTelefon "стол" ;
teacher_N = nNol "учител" ;
teach_V2
television_N = nProizvedenie "телевидени" ;
thick_ADeg
thin_ADeg
train_N = nAdres "поезд" ;
travel_V
tree_N = nChislo "дерев" ;
trousers_N = mkN "" "" "" "" "" "" "штаны" "штанов" "штанам" "штаны" "штанами" "штанах" Masc Inanimate;
ugly_ADeg
understand_V2
university_N = nTelefon "университет" ;
village_N = nMalyariya "деревн" ;
wait_V2
walk_V
warm_ADeg
war_N = nMashina "войн" ;
watch_V2
water_N = nMashina "вод" ;
white_ADeg
window_N = nChislo "окн" ;
wine_N = nChislo "вин" ;
win_V2
woman_N = nZhenchina "женщин" ;
wood_N = nChislo "дерев" ;