mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-11 05:49:31 -06:00
248 lines
9.2 KiB
Plaintext
248 lines
9.2 KiB
Plaintext
--# -path=.:../abstract:../../prelude
|
|
--# -val
|
|
|
|
concrete BasicFin of Basic = CategoriesFin ** open ParadigmsFin in {
|
|
|
|
flags
|
|
optimize=values ;
|
|
|
|
lin
|
|
|
|
airplane_N = regN "lentokone" ;
|
|
answer_V2S = mkV2S (caseV2 (regV "vastata") allative) ;
|
|
apartment_N = regN "asunto" ;
|
|
apple_N = nLukko "omena" ; --- omenia, not omenoita
|
|
art_N = regN "taide" ;
|
|
ask_V2Q = mkV2Q (caseV2 (regV "kysyä") ablative) ;
|
|
baby_N = nLukko "vauva" ;
|
|
bad_ADeg = mkADeg (nLukko "paha") "pahempi" "pahin" ;
|
|
bank_N = regN "pankki" ;
|
|
beautiful_ADeg = mkADeg (regN "kaunis") "kauniimpi" "kaunein" ;
|
|
become_VA = mkVA (regV "tulla") translative ;
|
|
beer_N = regN "olut" ;
|
|
beg_V2V = mkV2V (caseV2 (reg2V "pyytää" "pyysi") partitive) ;
|
|
big_ADeg = mkADeg (sgpartN (nArpi "suuri") "suurta") "suurempi" "suurin" ;
|
|
bike_N = nLukko "polkupyörä" ; --- for correct vowel harmony
|
|
bird_N = nLukko "lintu" ;
|
|
black_ADeg = mkADeg (nLukko "musta") "mustempi" "mustin" ;
|
|
blue_ADeg = mkADeg (regN "sininen") "sinisempi" "sinisin" ;
|
|
boat_N = regN "vene" ;
|
|
book_N = nLukko "kirja" ;
|
|
boot_N = regN "saapas" ;
|
|
boss_N = nLukko "pomo" ;
|
|
boy_N = nKukko "poika" "pojan" "poikia" ;
|
|
bread_N = nLukko "leipä" ;
|
|
break_V2 = dirV2 (regV "rikkoa") ;
|
|
broad_ADeg = mkADeg (regN "leveä") "leveämpi" "levein" ;
|
|
brother_N2 = genN2 (
|
|
mkN "veli" "veljen" "veljenä" "veljeä" "veljeen"
|
|
"veljinä" "veljissä" "veljien" "veljiä" "veljiin" human) ;
|
|
brown_ADeg = mkADeg (regN "ruskea") "ruskeampi" "ruskein" ;
|
|
butter_N = reg3N "voi" "voin" "voita" ; ---- errors in Part
|
|
buy_V2 = dirV2 (regV "ostaa") ;
|
|
camera_N = nLukko "kamera" ;
|
|
cap_N = regN "lakki" ;
|
|
car_N = reg3N "auto" "auton" "autoja" ; -- regN: audon
|
|
carpet_N = nLukko "matto" ;
|
|
cat_N = nLukko "kissa" ;
|
|
ceiling_N = nLukko "katto" ;
|
|
chair_N = regN "tuoli" ;
|
|
cheese_N = nLukko "juusto" ;
|
|
child_N = mkN "lapsi" "lapsen" "lapsena" "lasta" "lapseen"
|
|
"lapsina" "lapsissa" "lasten" "lapsia" "lapsiin" human ;
|
|
church_N = nLukko "kirkko" ;
|
|
city_N = regN "kaupunki" ;
|
|
clean_ADeg = regADeg "puhdas" ;
|
|
clever_ADeg = regADeg "viisas" ;
|
|
close_V2 = dirV2 (regV "sulkea") ;
|
|
coat_N = regN "takki" ;
|
|
cold_ADeg = mkADeg (nLukko "kylmä") "kylmempi" "kylmin" ;
|
|
come_V = regV "tulla" ;
|
|
computer_N = regN "tietokone" ;
|
|
country_N = regN "maa" ;
|
|
cousin_N = nLukko "serkku" ;
|
|
cow_N = nLukko "lehmä" ;
|
|
die_V = regV "kuolla" ;
|
|
dirty_ADeg = mkADeg (regN "likainen") "likaisempi" "likaisin" ;
|
|
distance_N3 = mkN3 (regN "etäisyys") elative illative ;
|
|
doctor_N = reg2N "tohtori" "tohtoreita" ;
|
|
dog_N = nLukko "koira" ;
|
|
door_N = nArpi "ovi" ;
|
|
drink_V2 = dirV2 (regV "juoda") ;
|
|
easy_A2V = mkA2V (mkA2 (mkA (nLukko "helppo")) (caseP allative)) ;
|
|
eat_V2 = dirV2 (regV "syödä") ;
|
|
empty_ADeg = mkADeg (nLukko "tyhjä") "tyhjempi" "tyhjin" ;
|
|
enemy_N = regN "vihollinen" ;
|
|
factory_N = regN "tehdas" ;
|
|
father_N2 = genN2 (nLukko "isä") ;
|
|
fear_VS = mkVS (reg2V "pelätä" "pelkäsi") ;
|
|
find_V2 = dirV2 (reg2V "löytää" "löysi") ;
|
|
fish_N = nLukko "kala" ;
|
|
floor_N = reg2N "lattia" "lattioita" ;
|
|
forget_V2 = dirV2 (regV "unohtaa") ;
|
|
fridge_N = regN "jääkaappi" ;
|
|
friend_N = nLukko "ystävä" ;
|
|
fruit_N = nLukko "hedelmä" ;
|
|
fun_AV = mkAV (mkA (nLukko "hauska")) ;
|
|
garden_N = nKukko "puutarha" "puutarhan" "puutarhoja" ;
|
|
girl_N = nLukko "tyttö" ;
|
|
glove_N = regN "käsine" ;
|
|
gold_N = nLukko "kulta" ;
|
|
good_ADeg = mkADeg (nLukko "hyvä") "parempi" "parhain" ; --- paras
|
|
go_V = regV "mennä" ;
|
|
green_ADeg = mkADeg (regN "vihreä") "vihreämpi" "vihrein" ;
|
|
harbour_N = nKukko "satama" "sataman" "satamia" ;
|
|
hate_V2 = dirV2 (regV "vihata") ;
|
|
hat_N = nLukko "hattu" ;
|
|
have_V2 = caseV2 (caseV adessive vOlla) nominative ;
|
|
hear_V2 = dirV2 (regV "kuulla") ;
|
|
hill_N = nLukko "kukkula" ;
|
|
hope_VS = mkVS (regV "toivoa") ;
|
|
horse_N = regN "hevonen" ;
|
|
hot_ADeg = mkADeg (nLukko "kuuma") "kuumempi" "kuumin" ;
|
|
house_N = nLukko "talo" ;
|
|
important_ADeg = mkADeg (regN "tärkeä") "tärkeämpi" "tärkein" ;
|
|
industry_N = regN "teollisuus" ;
|
|
iron_N = nLukko "rauta" ;
|
|
king_N = regN "kuningas" ;
|
|
know_V2 = dirV2 (reg2V "tietää" "tiesi") ; --- tuntea; gives tietänyt
|
|
lake_N = nSylki "järvi" ;
|
|
lamp_N = nLukko "lamppu" ;
|
|
learn_V2 =
|
|
dirV2 (mkV "oppia" "oppii" "opin" "oppivat" "oppikaa" "opitaan"
|
|
"oppi" "opin" "oppisi" "oppinut" "opittu" "opitun") ;
|
|
leather_N = nLukko "nahka" ; --- nahan
|
|
leave_V2 = dirV2 (regV "jättää") ;
|
|
like_V2 = caseV2 (regV "pitää") elative ;
|
|
listen_V2 = caseV2 (reg3V "kuunnella" "kuuntelen" "kuunteli") partitive ;
|
|
live_V = regV "elää" ;
|
|
long_ADeg = mkADeg (nLukko "pitkä") "pitempi" "pisin" ;
|
|
lose_V2 = dirV2 (regV "hävitä") ; --- hukata
|
|
love_N = reg3N "rakkaus" "rakkauden" "rakkauksia" ;
|
|
love_V2 = caseV2 (regV "rakastaa") partitive ;
|
|
man_N = mkN "mies" "miehen" "miehenä" "miestä" "mieheen"
|
|
"miehinä" "miehissä" "miesten" "miehiä" "miehiin" human ;
|
|
married_A2 = mkA2 (mkA (nRae "avioitunut" "avioituneena")) (postpP genitive "kanssa") ;
|
|
meat_N = nLukko "liha" ;
|
|
milk_N = nLukko "maito" ;
|
|
moon_N = regN "kuu" ;
|
|
mother_N2 = genN2 (regN "äiti") ;
|
|
mountain_N = nArpi "vuori" ;
|
|
music_N = regN "musiikki" ;
|
|
narrow_ADeg = mkADeg (regN "kapea") "kapeampi" "kapein" ;
|
|
new_ADeg = mkADeg (reg3N "uusi" "uuden" "uusia") "uudempi" "uusin" ;
|
|
newspaper_N = nSylki "sanomalehti" ; --- for correct vowel harmony
|
|
oil_N = nLukko "öljy" ;
|
|
old_ADeg = mkADeg (nLukko "vanha") "vanhempi" "vanhin" ;
|
|
open_V2 = dirV2 (regV "avata") ;
|
|
paint_V2A = mkV2A (dirV2 (regV "maalata")) translative ;
|
|
paper_N = reg2N "paperi" "papereita" ;
|
|
peace_N = nLukko "rauha" ;
|
|
pen_N = nLukko "kynä" ;
|
|
planet_N = nLukko "planeetta" ;
|
|
plastic_N = regN "muovi" ;
|
|
play_V2 = dirV2 (regV "pelata") ; --- leikkiä, soittaa
|
|
policeman_N = regN "poliisi" ;
|
|
priest_N = regN "pappi" ;
|
|
probable_AS = mkAS (mkA (nNainen "todennäköistä")) ; --- for vowel harmony
|
|
queen_N = regN "kuningatar" ;
|
|
radio_N = reg2N "radio" "radioita" ;
|
|
rain_V0 = mkV0 (reg2V "sataa" "satoi") ;
|
|
read_V2 = dirV2 (regV "lukea") ;
|
|
red_ADeg = regADeg "punainen" ;
|
|
religion_N = nLukko "uskonto" ;
|
|
restaurant_N = nLukko "ravintola" ;
|
|
river_N = nArpi "joki" ;
|
|
rock_N = reg2N "kallio" "kallioita" ;
|
|
roof_N = nLukko "katto" ;
|
|
rubber_N = regN "kumi" ;
|
|
run_V = reg2V "juosta" "juoksi" ;
|
|
say_VS = mkVS (regV "sanoa") ;
|
|
school_N = nLukko "koulu" ;
|
|
science_N = regN "tiede" ;
|
|
sea_N = nMeri "meri" ;
|
|
seek_V2 = dirV2 (regV "etsiä") ;
|
|
see_V2 = dirV2 (
|
|
mkV "nähdä" "näkee" "näen" "näkevät" "nähkää" "nähdään"
|
|
"näki" "näin" "näkisi" "nähnyt" "nähty" "nähdyn") ;
|
|
sell_V3 = dirV3 (regV "myydä") allative ;
|
|
send_V3 = dirV3 (regV "lähettää") allative ;
|
|
sheep_N = regN "lammas" ;
|
|
ship_N = nLukko "laiva" ;
|
|
shirt_N = nLukko "paita" ;
|
|
shoe_N = nLukko "kenkä" ;
|
|
shop_N = nLukko "kauppa" ;
|
|
short_ADeg = regADeg "lyhyt" ;
|
|
silver_N = regN "hopea" ;
|
|
sister_N = nLukko "sisko" ;
|
|
sleep_V = regV "nukkua" ;
|
|
small_ADeg = mkADeg (reg2N "pieni" "pieniä") "pienempi" "pienin" ;
|
|
snake_N = regN "käärme" ;
|
|
sock_N = nLukko "sukka" ;
|
|
speak_V2 = dirV2 (regV "puhua") ;
|
|
star_N = nSylki "tähti" ;
|
|
steel_N = regN "teräs" ;
|
|
stone_N = nSylki "kivi" ;
|
|
stove_N = reg3N "liesi" "lieden" "liesiä" ;
|
|
student_N = reg2N "opiskelija" "opiskelijoita" ;
|
|
stupid_ADeg = regADeg "tyhmä" ;
|
|
sun_N = nLukko "aurinko" ;
|
|
switch8off_V2 = dirV2 (regV "sammuttaa") ; ---
|
|
switch8on_V2 = dirV2 (regV "sytyttää") ; ---
|
|
table_N = nLukko "pöytä" ;
|
|
talk_V3 = mkV3 (regV "puhua") (caseP allative) (caseP elative) ;
|
|
teacher_N = nLukko "opettaja" ;
|
|
teach_V2 = dirV2 (regV "opettaa") ;
|
|
television_N = reg2N "televisio" "televisioita" ;
|
|
thick_ADeg = regADeg "paksu" ;
|
|
thin_ADeg = regADeg "ohut" ;
|
|
train_N = nLukko "juna" ;
|
|
travel_V = regV "matkustaa" ;
|
|
tree_N = regN "puu" ;
|
|
---- trousers_N = regN "trousers" ;
|
|
ugly_ADeg = mkADeg (nLukko "ruma") "rumempi" "rumin" ;
|
|
understand_V2 = dirV2 (reg3V "ymmärtää" "ymmärrän" "ymmärsi") ;
|
|
university_N = nLukko "yliopisto" ;
|
|
village_N = nLukko "kylä" ;
|
|
wait_V2 = caseV2 (regV "odottaa") partitive ;
|
|
walk_V = regV "kävellä" ;
|
|
warm_ADeg = mkADeg
|
|
(mkN "lämmin" "lämpimän" "lämpimänä" "lämmintä" "lämpimään"
|
|
"lämpiminä" "lämpimissä" "lämpimien" "lämpimiä" "lämpimiin"
|
|
nonhuman)
|
|
"lämpimämpi" "lämpimin" ;
|
|
war_N = nLukko "sota" ;
|
|
watch_V2 = dirV2 (regV "katsella") ;
|
|
water_N = reg3N "vesi" "veden" "vesiä" ;
|
|
white_ADeg = regADeg "valkoinen" ;
|
|
window_N = reg2N "ikkuna" "ikkunoita" ;
|
|
wine_N = regN "viini" ;
|
|
win_V2 = dirV2 (regV "voittaa") ;
|
|
woman_N = regN "nainen" ;
|
|
wonder_VQ = mkVQ (regV "ihmetellä") ;
|
|
wood_N = regN "puu" ;
|
|
write_V2 = dirV2 (regV "kirjoittaa") ;
|
|
yellow_ADeg = regADeg "keltainen" ;
|
|
young_ADeg = mkADeg (nArpi "nuori") "nuorempi" "nuorin" ;
|
|
|
|
do_V2 = dirV2 (
|
|
mkV "tehdä" "tekee" "teen" "tekevät" "tehkää" "tehdään"
|
|
"teki" "tein" "tekisi" "tehnyt" "tehty" "tehdyn") ;
|
|
|
|
now_Adv = mkAdv "nyt" ;
|
|
already_Adv = mkAdv "jo" ;
|
|
song_N = nLukko "laulu" ;
|
|
add_V3 = dirV3 (regV "lisätä") illative ;
|
|
number_N = reg2N "numero" "numeroita" ;
|
|
put_V2 = dirV2 (regV "panna") ;
|
|
stop_V = regV "pysähtyä" ;
|
|
jump_V = regV "hypätä" ;
|
|
here_Adv = mkAdv "täällä" ;
|
|
here7to_Adv = mkAdv "tänne" ;
|
|
here7from_Adv = mkAdv "täältä" ;
|
|
there_Adv = mkAdv "siellä" ; --- tuolla
|
|
there7to_Adv = mkAdv "sinne" ;
|
|
there7from_Adv = mkAdv "sieltä" ;
|
|
|
|
} ;
|