Files
gf-rgl/src/rukiga/LexiconCgg.gf
2020-10-27 10:32:25 +01:00

413 lines
17 KiB
Plaintext

--# -path=.:../prelude:../abstract:../common
concrete LexiconCgg of Lexicon = CatCgg **
open ParadigmsCgg, ResCgg, Prelude in {
lin
--NOTE: Those commented out are not in the abstract
--burn_V = mkV "sya" ;
--die_V = mkV "fa" ;
--fly_V = mkV "guruka" ;
bird_N = mkN "ekinyonyi" KI_BI ;
boat_N = mkN "eryato" RI_MA ;
book_N = mkN "ekitabo" KI_BI ;
boy_N = mkN "omwojo" "abojo" MU_BA ;
bread_N = mkN "omugati" MU_MI;
car_N = mkN "emootoka" N_N ;
cat_N = mkN "enjangu" N_N ;
chair_N = mkN "entebbe" N_N ;
child_N = mkN "omwana" MU_BA ;
city_N = mkN "ekibúga" KI_BI; --orurêmbo pl endêmbo
cloud_N = mkN "ekikyu" KI_BI ;
computer_N = mkN "kanyabwêngye" ZERO_ZERO ; --kanyabwêngye, embiikabwengye, kompyuta
cow_N = mkN "ente" N_N ;
dog_N = mkN "embwa" N_N ;
person_N = mkN "omuntu" MU_BA ;
eye_N = mkN "eriisho" RI_MA;
fire_N = mkN "omuriro" MU_MI ;
fish_N = mkN "eky'ényanja" KI_BI ;
flower_N = mkN "ekimuri" KI_BI ;
friend_N = mkN "omunywâni" MU_MI ; -- omunywâni, omunyamukago, omugyenzi
girl_N = mkN "omwishiki" MU_BA ;
--shoe_N = mkN "ekaito" N_N ;
--table_N = mkN "emeza" N_N ;
--airplane_N = mkN "enyonyi" N_N ; -- mkN "endégye" N_N;
animal_N = mkN "enyamaishwa" N_N ;
apple_N = mkN "apple" ZERO_ZERO ;
baby_N = mkN "omwana" MU_BA ;
beer_N = mkN "amarwa" ZERO_MA ;
bike_N = mkN "egaari" N_N ;
bird_N = mkN "ekinyonyi" KI_BI ;
blood_N = mkN "eshágama" N_ZERO ;
grammar_N = mkN "enyómbeka y'órurími" "enyómbeka z'endími" ZERO_ZERO ; -- two words representing one word
horse_N = mkN "embaráàsi" N_N ;
house_N = mkN "enju" N_N ;
language_N = mkN "orurími" "endími" RU_N ;
meat_N = mkN "enyama" N_N;
man_N = mkN "omushaija" MU_BA ;
milk_N = mkN "amate" ZERO_MA ;
music_N = mkN "music" ZERO_ZERO ; -- I have not found the translation
rule_N = mkN "ekiragiro" KI_BI;
river_N = mkN "omugyera" MU_MI ; --omurîndi,
sea_N = mkN "enyanja" N_N ;
ship_N = mkN "ekyombo" KI_BI ; -- eméèri [NC_n_n]
star_N = mkN "enyonyóòzi" N_N ;
train_N = mkN "egaari y'omwika" N_N ; -- plural would be egáàri z'omwika
tree_N = mkN "omuti" MU_MI ;
water_N = mkN "amáìzi" ZERO_MA ;
wine_N = mkN "víìnyo" ZERO_ZERO ;
woman_N = mkN "omwishiki" MU_BA ;
reason_N = mkN "enshoonga" N_N;
sheep_N = mkN "entaama" N_N;
hat_N = mkN "enkofira" N_N;
--Proper Nouns
john_PN = mkPN "Yohana" (AgP3 Sg MU_BA) False;
paris_PN = mkPN "Paris" (AgP3 Sg N_N) True; --Noun class for places???
--Adjectives
bad_A = mkAdjective "bi" Post False False False; --False means the adjective is a stem and comes after the complete noun
big_A = mkAdjective "hango" Post False False False;
black_A = mkAdjective "kwirangura" Post False False False;
blue_A = mkAdjective "buuru" Post True True False ;
clean_A = mkAdjective "yonjo" Post False False False ; --: A ;
cold_A = mkAdjective "kufuka" Post False False False ; --: A ;
correct_A = mkAdjective "hikire" Post False False False; --: A ;
good_A =mkAdjective "rungi" Post False False False; --: A ;
heavy_A = mkAdjective "kuremeera" Post False False False; --: A ; --notice ri as a verb is
hot_A = mkAdjective "kwosya" Post False False False; -- rikutagata -- problematic words like hot we need a new set of clitics
new_A = mkAdjective "sya" Post False False False; --: A ;
old_A = mkAdjective "kúru" Post False False False; --: A ;
ready_A = mkAdjective "eteekateekire" Post False False False; --: A ;
red_A = mkAdjective "kutukura" Post False False False; --: A ;
small_A = mkAdjective "kye" Post False False False;
warm_A = mkAdjective "kutagata" Post False False False;--: A ;
white_A = mkAdjective "rikwera" Post False False False;--: A ;
yellow_A = mkAdjective "kinekye" Post True True False;--: A ; or yero, or kyenju
young_A = mkAdjective "to" Post False False False;--: A ;
green_A =mkAdjective "kijubwe" Post False True False;
thin_A = mkAdjective "kye" Post False False False;
--ditransitive verbs
bite_V2 = mkV2 "rum";
break_V2 = mkV2 "hen" "da" "zire"; --: V2 ;
buy_V2 = mkV2 "gur" ; --: V2 ;
close_V2 = mkV2 "king";
count_V2 = mkV2 "ba" "ra" "zire";
cut_V2 = mkV2 "sha" "ra" "zire";
do_V2 = mkV2 "ko" "ra" "zire";
drink_V2 = mkV2 "nyw";
eat_V2 = mkV2 "ry";
fear_V2 = mkV2 "tiin";
find_V2 = mkV2 "bon" ; --: V2 ; -- many words; kureeba, kubóna,kushanga, kumamya,kujumbura
kill_V2 = mkV2 "it"; --: V2 ;
love_V2 = mkV2 "kûnd" "da" "zire"; --: V2 ;
read_V2 = mkV2 "shom";--: V2 ;
see_V2 = mkV2 "reeb"; --: V2 ;
teach_V2 = mkV2 "shomes" ; --: V2 ; or kwegyesa
understand_V2 = mkV2 "étegyerez"; --: V2 ;
wait_V2 = mkV2 "tegyerez"; --: V2 ;
-- ditransitive verbs
add_V3 = mkV3 "gáìt";
give_V3 = mkV3 "héére" "za" "ize";
sell_V3 = mkV3 "gu" "za" "rize";
send_V3 = mkV3 "tum" ;
talk_V3 = mkV3 "gamb";
-- Intransitive verbs
come_V = mkV "ij";
die_V = mkV "f";
go_V = mkV "gyen" "da" "zire"; --: V ; -- Many words: kuza, kuraba,kutoora, kugyenda=go away, kushuma=go down
jump_V = mkV "guruk" ;
play_V = mkV "záàn"; --: V ;
live_V = mkV "tuur" ; --manyF: kutuura i.e. live somewhere, stay = kuráàra
run_V = mkV "íruk"; -- : V ;
sleep_V = mkV "gwejegyer" ; --: V ;--Kugwejegyera, kubyama
swim_V = mkV "og"; --: V ;
travel_V = mkV "gyen" "da" "zire" ;--: V ;
walk_V = mkV "ribá" "ta" "si"; --: V ; or kuribata Runynakore it is different
-- A verb whose complement is a sentence
fear_VS = mkVS (lin V (mkV "tin")); --: VS ;
hope_VS = mkVS (lin V (mkV "siga")); --: VS ; -- a bit complicated because what we normally use is nyine amatsiko i.e usin the noun. The verb should be kwesiga but this seems borrowed from Luganda
know_VS = mkVS (lin V (mkV "manya")); --: VS ;
say_VS = mkVS (lin V (mkV "gi" "ra" "zire"));--: VS ;
-- verbs whose complements are questions
know_VQ = mkVQ (lin V (mkV "many")); --: VQ ;
--wonder_VQ : VQ ;
-- Verb whose complement is an adjective
become_VA = mkVA (lin V mkBecome);--: VA ;
--Verbs that have a noun Phrase complement and a verb phrase complement (V2V)
--beg_V2V : V2V ;
--Adverbs
now_Adv = mkAdv "hati" AgrNo;
far_Adv = mkAdv "hare" AgrNo;
today_Adv = mkAdv "erizooba" AgrNo;
father_N2 = mkN2 (mkN "tata" ZERO_BAA) (lin Prep (mkPrep [] [] True)) ;
distance_N3 = mkN3 (mkN "orugyendo" ZERO_BU) (lin Prep (mkPrep "kurunga" "" False)) (lin Prep (mkPrep "mpáka" "" False)); --could orugyendo work in its place?
alas_Interj ={s="ryakareeba"; }; --: Interj ;
switch8off_V2 = mkV2 "raza" "za" "riize";
television_N = mkN "TV" N_N;
doctor_N = mkN "omushaho" MU_BA;
clever_A =mkAdjective "amagyezi" Post False True False;
laugh_V = mkV "shek";
beautiful_A = mkAdjective "rungi" Post False False False;
airplane_N = mkN "endegye" N_N;
year_N = mkN "omwaka" "emyaka" MU_MI;
-- New Lexicon
{-
Perhaps create an adverb form whose
surface realisation comes from verb tense e.g nagyenzire implies I have alredy gone.
-}
already_Adv = mkAdv "" AgrNo; -- Already is realized as a verb form
--answer_V2S = mkV2S (mkV "garu" "kamu" "kiremu") noPrep;
apartment_N = mkN "apatimenti" "apatimenti" N_N;
art_N = mkN "aati" "aati" N_N;
ashes_N = mkN "eiju" "eiju" N_N;
--ask_V2Q = mkV2Q (mkV2 "bunza" "za" "rize") noPrep;
back_N = mkN "omugongo" MU_MI;
bank_N = mkN "banka" "banka" N_N;
bark_N = mkN "ask for the Rukiga equivalent of bark" N_N; --TODO find actual word
beg_V2V = mkV2V (mkV "shab" "a" "ire") noPrep toP ;
belly_N = mkN "eibondo" "amabondo" I_MA ;
blow_V = mkV "hag" "a" "ire" ;
bone_N = mkN "eigufa" "amagufa" I_MA ;
boot_N = mkN "buuntu" "buuntu" N_N ;
boss_N = mkN "mukama" "bakama" MU_BA ;
breast_N = mkN "eibere" "amabere" I_MA ;
breathe_V = mkV "is" "a" "ire";
broad_A = mkAdjective "TODO : Ask for the right word for broad" Post False False False;
--Note: younger brother. mukuru and others
--brother_N2 = mkN2 (mkN "murumuna" "barumuna" MU_BA) (mkPrep "" "" True) ;
newspaper_N = mkN "eihurire" I_MA;
night_N = mkN "ekiro" N_ZERO;
nose_N = mkN "enyindo" N_N;
--number_N = mkN "enamba" N_N -- TODO look out for the correct word
oil_N = mkN "amajuta" N_N;
open_V2 = mkV2 "yingura" "ura" "wire";
brown_A = mkAdjective "TODO: Get the right word for brown" Post False True False;
burn_V = mkV "batur" "a" "ire";
butter_N = mkN "amajuta g'ente" "amajuta g'ente" N_N;
camera_N = mkN "kamera" "kamera" ZERO_ZERO;
cap_N = mkN "TODO-enkofiira" "enkofiira" N_N;
carpet_N = mkN "kapeti" "kapeti" ZERO_ZERO;
ceiling_N = mkN "TO-DO:silingi" "TO-DO:silingi" N_N;
cheese_N = mkN "TO-DO" "TO-DO" N_N;
church_N = mkN "ekelezia" "amakelezia" N_N;
coat_N = mkN "kabuti" "kabuti" ZERO_ZERO;
country_N = mkN "eihanga" "amahanga" I_MA;
cousin_N = mkN "munyanyako" "banyanyako" MU_BA;
day_N = mkN "eizooba" "amazoba" I_MA;
dig_V = mkV "hiing" "a" "ire";
dirty_A = mkAdjective "rofa" Post False False False;
door_N = mkN "orwigi" "enyigi" RU_N;
dry_A = mkAdjective "yoma" Post False False False;
dull_A = mkAdjective "TODO: find out word for dull" Post False False False;
dust_N = mkN "omucuucu" "omucuucu" ZERO_ZERO;
ear_N = mkN "okutu" "amatu" KU_MA;
earth_N = mkN "ensi" "ensi" N_N;
easy_A2V = mkA2V "yaguhi" Post False False False;
egg_N = mkN "eihuri" "amahuri" I_MA;
empty_A = mkAdjective "rimu busha" Post False True False;
enemy_N = mkN "TODO : cofirm omurabe" "TODO : cofirm abarabe" MU_BA;
factory_N = mkN "TODO : cofirm fakatore" "TODO : cofirm fakatore" N_N;
fall_V = mkV "gw" "a" "ire";
fat_N = mkN "ebishaju" "ebishaju" ZERO_ZERO;
feather_N = mkN "ekyoya" "ebyoya" KI_BI;
fight_V2 = mkV2 "rwan" "a" "ire";
fingernail_N = mkN "ekyara ky'engaro" "ebyara by'engaro" KI_BI;
--float_V
--floor_N
flow_V = mkV "TODO: confirm himintuk" "a" "ire";
fly_V = mkV "guruk" "a" "ire";
fog_N = mkN "TODO word for fog" "TODO word for fog" N_N;
foot_N = mkN "ekigyere" "ebigyere" KI_BI;
forest_N = mkN "eihamba" "amahamba" I_MA;
forget_V2 = mkV2 "yebw" "a" "ire";
freeze_V = mkV "kwat" "a" "sire";
fridge_N = mkN "firigi" "firigi" ZERO_ZERO;
fruit_N = mkN "ekijuma" "ebijuma" KI_BI;
full_A = mkAdjective "injwire" Post False True False;
--fun_AV = mkAdjective
garden_N = mkN "omusiri" "emisiri" MU_MI;
glove_N = mkN "gilavu" "gilavu" ZERO_ZERO;
gold_N = mkN "TODO:feza" "TODO:feza" ZERO_ZERO;
grass_N = mkN "akanyaasi" "obunyaasi" KA_BU;
guts_N = mkN "orubondo" "amabondo" RU_MA;
hair_N = mkN "eishokye" "eishokye" N_N;
hand_N = mkN "omukono" "emikono" MU_MI;
-- harbour_N
hate_V2 = mkV2 "kwag" "a" "ire";
head_N = mkN "omutwe" MU_MI;
hear_V2 = mkV2 "hurir" "a" "e";
heart_N = mkN "omutima" "emitima" MU_MI;
hill_N = mkN "orushozi" "enshozi" N_N;
hit_V2 = mkV2 "kangaa" "ta" "sire";
hold_V2 = mkV2 "kwa" "ta" "sire";
horn_N = mkN "eihembe" "amahembe" I_MA;
hunt_V2 = mkV2 "hiig" "a" "ire";
husband_N = mkN "iba" "biba" ZERO_ZERO;
-- ice_N
important_A = mkAdjective "omugasho" Post False True False;
--industry_N =
iron_N = mkN "ekyoma ebirikurunga omu butare" "ebyoma ebirikurunga omu butare" ZERO_ZERO;
king_N = mkN "omugabe" MU_BA;
knee_N = mkN "okuju" "amaju" KU_MA;
know_V2 = mkV2 "many" "a" "ire";
lake_N = mkN "enyanja" "enyanja" N_N;
lamp_N = mkN "entara" "entara" N_N;
leaf_N = mkN "ibabi" "amababi" I_MA;
learn_V2 = mkV2 "yeg" "a" "ire";
leather_N = mkN "oruhu" "empu" RU_N; --I think plural should be oruhu again
leave_V2 = mkV2 "rug" "a" "ire";
left_Ord = mkOrd "bumosho";
leg_N = mkN "okuguru" "amaguru" KU_MA;
lie_V = mkV "beih" "a" "ire";
like_V2 = mkV2 "kun" "da" "zire";
listen_V2 = mkV2 "huri" "iriza" "riize";
liver_N = mkN "ekine" "ebine" KI_BI;
long_A = mkAdjective "raingwa" Post False False False;
--lose_V2 = mkV2 ""
louse_N = mkN "omura" "emira" MU_MI;
love_N = mkN "rukundo" "rukundo" ZERO_ZERO;
-- married_A2
moon_N = mkN "okwezi" "emwezi" KU_MA;
--mother_N2 = mkN2 (mkN "mama" ZERO_BAA) (lin Prep (mkPrep [] [] True)) ;
--mountain_N = mkN
mouth_N = mkN "omunwa" "eminwa" MU_MI;
name_N = mkN "eiziina" "amaziina" I_MA;
narrow_A = mkAdjective "kye" Post False False False;
near_A = mkAdjective "hihi" Pre False True False; -- the preposition is "na"
neck_N = mkN "ebisya" "ebisya" ZERO_ZERO;
-- paint_V2A
paper_N = mkN "orupapura" "empapura" RU_N;
peace_N = mkN "obusingye" "obusingye" ZERO_BU;
pen_N = mkN "akacumu" "obucumu" KA_BU;
planet_N = mkN "ensi" "ensi" N_N;
plastic_N = mkN "pulasitika" "pulasitika" ZERO_ZERO;
play_V2 = mkV2 "zaan" "a" "ire";
policeman_N = mkN "omupolisi" "abapolisi" MU_BA;
priest_N = mkN "omuhongyerezi" "abahongyerezi" MU_BA;
-- probable_AS
pull_V2 = mkV2 "kuru" "ra" "ire";
push_V2 = mkV2 "sindik" "a" "ire";
put_V2 = mkV2 "t" "a" "ire";
queen_N = mkN "Kwini" "baakwini" ZERO_BAA;
question_N = mkN "ekibuzo" "ebibuzo" KI_BI;
radio_N = mkN "radiyo" "radiyo" ZERO_ZERO;
rain_N = mkN "enjura" "enjura" ZERO_N;
-- rain_V0
religion_N = mkN "endiini" "endiini" N_N;
restaurant_N = mkN "hooteeri" "hooteeri" ZERO_ZERO;
right_Ord = mkOrd "buryo";
road_N = mkN "orugundo" "engundo" RU_N;
-- rock_N
--roof_N = mkN ""
root_N = mkN "omuzi" "emizi" MU_MI;
rope_N = mkN "omuguha" "emiguha" MU_MI;
rotten_A = mkAdjective "njuzire" Post False False False;
-- round_A
rub_V2 = mkV2 "harabur" "a" "ire";
-- rubber_N
salt_N = mkN "omwonyo" "emyonyo" MU_MI;
sand_N = mkN "omushenyi" MU_MI;
school_N = mkN "eishomero" I_MA;
science_N = mkN "sayansi" "sayansi" ZERO_ZERO;
scratch_V2 = mkV2 "ha" "ra" "ire";
seed_N = mkN "ensingo" "ensigo" N_N;
seek_V2 = mkV2 "kyenuuz" "a" "ire";
sew_V = mkV "ruk" "a" "ire";
sharp_A = mkAdjective "shazire" Post False False False;
shirt_N = mkN "esaati" "esaati" ZERO_ZERO; --TODO: confirm this entry
shoe_N = mkN "enkaito" "enkaito" N_N; --TODO : confirm the existence of this entry
shop_N = mkN "eduuka" "eduuka" ZERO_ZERO;
short_A = mkAdjective "gufu" Post False False False;
--silver_N
sing_V = mkV "yeshogor" "ora" "wire"; --TODO : confirm this word and the conjugation
sister_N = mkN "munyanyazi" "banyanyanzi" MU_BA;
sit_V = mkV "shutam" "a" "ire";
--skin_N = mkN "omubiri" "emibiri" MU_MI; This is wrong
sky_N = mkN "eiguru" "eiguru" ZERO_ZERO;
smell_V = mkV "kag" "a" "ire";
smoke_N = mkN "omwika" "emyiika" MU_MI;
--smooth_A
snake_N = mkN "enjoka" "enjoka" N_N;
-- snow_N
sock_N = mkN "sitokisi" "sitokisi" ZERO_ZERO;
song_N = mkN "ekyeshongoro" "ebyeshongoro" KI_BI;
speak_V2 = mkV2 "gamba";
spit_V = mkV "cwer" "a" "ire";
split_V2 = mkV2 "gangabura";
squeeze_V2 =mkV2 "imat" "a" "si";
stab_V2 = mkV2 "cumi" "ta" "sire"; --edit for Runyankore
stand_V = mkV "yemerera" "ra" "ire";
-- steel_N
stick_N = mkN "omunyafu" "eminyafu" MU_MI;
stone_N = mkN "eibare" "amabara" I_MA;
stop_V = mkV "komya" "ya" "ize";
stove_N = mkN "sitoovu" "sitoovu" ZERO_ZERO;
straight_A = mkAdjective "gorwire" Post False False False;
student_N = mkN "omwana w'eishomero" "abaana b'eishomero" MU_BA;
stupid_A = mkAdjective "himbagire" Post False False False;
suck_V2 = mkV2 "komaguza" "za" "ize";
sun_N = mkN "omushana" "omushana" MU_ZERO;
swell_V = mkV "bimba";
switch8on_V2 = mkV2 "ya" "sya" "kise";
table_N = mkN "emeeza" "emeeza" N_N;
tail_N = mkN "omukira" "emikira" MU_MI;
teacher_N = mkN "omushomesa" "abashomesa" MU_BA;
-- thick_A
--think_V = mkV
throw_V2 = mkV2 "naga";
tie_V2 = mkV2 "siba";
tongue_N = mkN "orurimi" RU_N;
tooth_N = mkN "erino" "amino" RI_MA;
turn_V = mkV "hinduka";
ugly_A = mkAdjective "bi" Post False False False; --I think I should add another boolean for copulative version
uncertain_A = mkAdjective "manyirwe" Post False False True; -- we need to investigate the place of negative adjectives i.e those that come from positive words
university_N = mkN "yunivasite" "yunivasite" ZERO_ZERO;
village_N = mkN "ekyalo" "ebyalo" KI_BI;
vomit_V = mkV "tanaka";
war_N = mkN "orutaro" "entaro" RU_N;
wash_V2 = mkV2 "yozya" "zya" "yogize";
watch_V2 = mkV2 "reeba";
wet_A = mkAdjective "jubire" Post False False False;
wide_A = mkAdjective "hango" Post False False False;
wife_N = mkN "omukyara" "abakyara" MU_BA;
win_V2 = mkV2 "singa";
wind_N = mkN "omuyaga" "emiyaga" MU_MI;
window_N = mkN "eidirisa" "eidirisa" N_N;
wing_N = mkN "eipapa" "amapapa" I_MA;
wipe_V2 = mkV2 "sim" "ura" "wire";
--wonder_VQ = mkV2Q (mkV2 "tanga" "ara" "ire") noPrep;
wood_N = mkN "ekiti" "ebiti" KI_BI;
--worm_N
write_V2 = mkV2 "handika";
-- End of New Lexicon
oper
aboutP = mkPrep "TODO : find rukiga equivalent of about" "" False ;
atP = mkPrep "TODO : find rukiga equivalent of at" "" False ;
forP = mkPrep "TODO : find rukiga equivalent of for" "" False;
fromP = mkPrep "kurunga" "" False;
inP = mkPrep "omu" "omuri" False;
onP = mkPrep "aha" "ahari" False;
toP = mkPrep ("ku" ++ Predef.BIND) [] False;
--noPrep = mkPrep [] [] False;
}