Dictionary edits by Inari and others

This commit is contained in:
aarne
2014-04-24 06:18:48 +00:00
parent 5d3a843d4b
commit a460747b73
19 changed files with 4125 additions and 4093 deletions

View File

@@ -3,13 +3,13 @@
concrete TopDictionaryFin of TopDictionary = CatFin ** open ParadigmsFin,
(S = StructuralFin),
(L = LexiconFin),
MorphoFin, ParadigmsFin, Kotus, WNKotus, StemFin, Prelude in {
MorphoFin, ParadigmsFin, (E = ExtraFin), Kotus, WNKotus, StemFin, Prelude in {
flags coding=utf8 ;
oper
tehda_V = mkV (lin VK {s = c71 "tehdä"}) ;
nahda_V = mkV (lin VK {s = c71 "nähdä"}) ;
oper tehda_V = mkV (lin VK {s = c71 "tehdä"}) ;
oper nahda_V = mkV (lin VK {s = c71 "hdä"}) ;
oper optProDrop : Pron -> Pron = \p -> p | E.ProDrop p ;
lin of_Prep = casePrep genitive ; ---
lin and_Conj = S.and_Conj ;
@@ -22,7 +22,8 @@ lin have_V = lin V S.have_V2 ;
lin it_Pron = S.it_Pron ;
lin to_Prep = S.to_Prep ;
lin for_Prep = S.for_Prep ;
lin i_Pron = S.i_Pron ;
lin i_Pron = optProDrop S.i_Pron ;
lin iFem_Pron = optProDrop S.i_Pron ;
lin that_Subj = S.that_Subj ;
lin he_Pron = S.he_Pron ;
lin on_Prep = S.on_Prep ;
@@ -34,10 +35,12 @@ lin by_Prep = postPrep genitive "kautta" ;
lin but_Conj = mkConj "mutta" ;
lin from_Prep = S.from_Prep ;
lin they_Pron = S.they_Pron ;
lin theyFem_Pron = S.they_Pron ;
lin she_Pron = S.she_Pron ;
lin or_Conj = S.or_Conj ;
lin as_Subj = mkSubj "kun" ;
lin we_Pron = S.we_Pron ;
lin we_Pron = optProDrop S.we_Pron ;
lin weFem_Pron = optProDrop S.we_Pron ;
lin say_VV = mkVV (mkV "sanoa") infPresPart ;
lin say_VS = L.say_VS ;
lin say_VA = mkVA (mkV "sanoa") (mkPrep translative) ;
@@ -45,11 +48,11 @@ lin say_V2 = mkV2 "sanoa" ;
lin say_V = mkV "sanoa" ;
lin if_Subj = S.if_Subj ;
lin go_VV = mkVV (mkV "aikoa") ; ---- subcat
lin go_VS = mkVS "sanoa" ;
lin go_VS = mkVS "sanoa" ;
lin go_VA = mkVA (mkV "käydä") (casePrep translative) ;
lin go_V2 = mkV2 (mkV "tulla") (mkPrep translative) ; ---- subcat
lin go_V = L.go_V ;
lin get_VV = mkVV "päätyä" infIllat ;
lin get_VV = mkVV "päätyä" infIllat ;
lin get_VS = mkVS (mkV "ymmärtää") ;
lin get_VA = mkVA (mkV "tulla") (mkPrep translative) ;
lin get_V2V = mkV2V (mkV "saada") accusative infIllat ;
@@ -76,16 +79,16 @@ lin know_VS = L.know_VS ;
lin know_VQ = L.know_VQ ;
lin know_V2V = mkV2V (mkV "tietää") genitive infPresPart ; --tiedän hänen tekevän
lin know_V2 = L.know_V2 ;
lin know_V = mkV "tietää" ;
lin know_V = mkV "tietää" ;
lin time_N = mkN "aika" "ajan" "aikoja" ;
lin time_2_N = mkN "kerta" ;
lin time_1_N = mkN "aika" "ajan" "aikoja" ;
lin take_VA = mkVA (mkV "ottaa") (mkPrep essive) ;
lin take_V2V = mkV2V (mkV "viedä") accusative ; --vien hänet tanssimaan
lin take_V2V = mkV2V (mkV "viedä") accusative ; --vien hänet tanssimaan
lin take_V2A = mkV2A tehda_V accusative (mkPrep translative) ; ---- subcat
lin take_V2 = mkV2 "ottaa" ;
lin take_V = mkV "ottaa" ;
lin so_Adv = mkAdv "niin" ;
lin so_Adv = mkAdv "niin" ;
lin year_N = L.year_N ;
lin into_Prep = casePrep illative ;
lin then_Adv = mkAdv "silloin" ; -- mkAdv "siinä tapauksessa"
@@ -99,7 +102,7 @@ lin come_VA = mkVA (mkV "tulla") (mkPrep translative) ;
lin come_V2 = mkWV2 (k67 "tulla") illative ;
lin come_V = L.come_V ;
lin than_Subj = mkSubj "kuin" ;
lin more_Adv = mkWAdv (k99 "enemmän") ;
lin more_Adv = mkWAdv (k99 "enemmän") ;
lin about_Prep = casePrep elative ;
lin now_Adv = L.now_Adv ;
lin last_A = mkA "viimeinen" ;
@@ -124,7 +127,7 @@ lin look_VA = mkVA (mkV "näyttää") (mkPrep ablative) ;
lin look_V2V = mkV2V (mkV "katsoa") genitive infPresPart ;
lin look_V2 = mkV2 (mkV "näyttää") (mkPrep ablative) ;
lin look_V = mkV "katsoa" ;
lin like_Prep = postPrep genitive "tavalla" | mkPrep nominative "kuin" ;
lin like_Prep = postPrep genitive "tavalla" | mkPrep nominative "kuin" ;
lin use_VV = mkVV "tavata" ;
lin use_V2V = mkV2V (mkV "käyttää") ;
lin use_V2 = mkV2 "käyttää" partitive ;
@@ -159,7 +162,7 @@ lin tell_1_V3 = mkV3 (mkV "kertoa") accusative (mkPrep allative) ;
lin tell_2_V3 = mkV3 (mkV "erottaa") accusative (mkPrep elative) ;
lin tell_V2V = mkV2V (mkV "kertoa") genitive infPresPart ;
lin tell_V2S = mkV2S (mkV "kertoa") (mkPrep allative) ;
lin tell_V2Q = mkV2Q (mkV "kysyä") (mkPrep ablative) ;
lin tell_V2Q = mkV2Q (mkV "kysyä") (mkPrep ablative) ;
lin tell_V2 = mkV2 "kertoa" ;
lin tell_V = mkV "kertoa" ;
lin through_Prep = S.through_Prep ;
@@ -169,17 +172,17 @@ lin child_N = L.child_N ;
lin here_Adv = mkAdv "täällä" ;
lin over_Prep = postPrep genitive "yli" ;
lin too_Adv = mkAdv "myös" ; --split sense: mkAdv "liikaa" ;
lin put_VS = mkWVS (k53A "määrittää") ;
lin put_VS = mkWVS (k53A "määrittää") ;
lin put_V2V = mkV2V (mkV "panna") accusative infIllat ;
lin put_V2 = L.put_V2 ;
lin put_V = mkV "panna" ;
lin put_V = mkV "panna" ;
lin on_Adv = mkAdv "päällä" ; -- mkAdv "eteenpäin" ;
lin no_Interj = mkInterj "ei" ;
lin work_VV = mkVV (mkV "toimia") infIness ; --rather choose Inf3Adess, but it's not in ParadigmsFin
lin work_V2 = mkV2 "työstää" ;
lin work_V2 = mkV2 "työstää" ;
lin work_V = mkV "toimia" ;
lin work_2_V = mkV "toimia" ;
lin work_1_V = mkV "työskennellä" ;
lin work_2_V = mkV "toimia" ;
lin work_1_V = mkV "työskennellä" ;
lin become_VS = mkVS (mkV "tulla") ;
lin become_VA = L.become_VA ;
lin become_V2 = mkV2 "tulla" translative ;
@@ -210,6 +213,7 @@ lin seem_V2 = mkV2 (mkV "vaikuttaa") ablative ;
lin seem_V = mkV "vaikuttaa" ;
lin work_N = mkN "työ" ;
lin need_VV = mkVV (caseV genitive (mkV "tarvita")) ;
lin need_VV = mkVV (caseV genitive (mkV "tarvita")) ;
lin need_VS = mkVS (mkV "vaatia") ;
lin need_V2V = mkV2V (mkV "vaatia") ;
lin need_V2 = mkV2 (mkV "tarvita") partitive ;
@@ -232,7 +236,7 @@ lin ask_V = mkV "kysyä" ;
lin group_N = mkN "ryhmä" ;
lin number_N = mkN "luku" ; --- split already
lin number_3_N = mkN "luku" ;
lin number_2_N = mkN "luku" (mkN "määrä") | mkN "määrä" ;
lin number_2_N = mkN "luku" (mkN "määrä") | mkN "määrä" ;
lin number_1_N = mkN "luku" ;
lin yes_Interj = mkInterj "kyllä" ;
lin however_Adv = mkAdv "kuitenkin" ;
@@ -250,12 +254,12 @@ lin show_VS = mkVS (mkV "osoittaa") ;
lin show_VQ = mkVQ (mkV "vahvistaa") ; ---- subcat
lin show_V2V = mkV2V (mkV "näyttää") genitive infPresPart ;
lin show_V2 = mkV2 "näyttää" ;
lin show_V = mkV "näyttää" ;
lin show_V = mkV "näyttää" ;
lin course_N = mkN "kurssi" ;
lin company_2_N = mkN "seura" ;
lin company_1_N = mkN "yhtiö" ;
lin under_Prep = S.under_Prep ;
lin problem_N = mkN "ongelma" ;
lin problem_N = mkN "ongelma" ;
lin against_Prep = postPrep partitive "vastaan" ;
lin never_Adv = mkAdv "koskaan" | mkAdv "ei koskaan" ; ---- will look weird in sentences
lin most_Adv = mkAdv "suurin osa" ;
@@ -268,11 +272,11 @@ lin call_V3 = mkV3 (mkV "kutsua") (mkPrep partitive) (mkPrep translative) ;
lin call_V2V = mkV2V (mkV "kutsua") accusative ;
lin call_V2A = mkV2A (mkV "kutsua") (mkPrep partitive) (mkPrep translative) ;
lin call_V2 = mkV2 (mkV "soittaa") (casePrep allative) ; --f53
lin call_V = mkV "soittaa" ; --mkV "kutsua" ;
lin call_V = mkV "soittaa" ; --mkV "kutsua" ;
lin hand_N = L.hand_N ;
lin party_N = mkN "puolue" ;
lin party_2_N = mkN "puolue" ;
lin party_1_N = mkN "juhla" ;
lin party_1_N = mkN "juhla" ;
lin high_A = mkA "korkea" ;
lin about_Adv = mkAdv "suunnilleen" ;
lin something_NP = S.something_NP ;
@@ -295,7 +299,7 @@ lin keep_V2 = mkV2 "pitää" ;
lin keep_V = mkV "pysyä" ;
lin point_N = mkN "piste" ;
lin point_2_N = mkN "pointti" ;
lin point_1_N = mkN "piste" ;
lin point_1_N = mkN "piste" ;
lin house_N = L.house_N ;
lin different_A = mkA "erilainen" ;
lin country_N = L.country_N ;
@@ -329,7 +333,7 @@ lin local_A = mkA "paikallinen" ; --f227
lin where_Subj = mkSubj "missä" ;
lin during_Prep = S.during_Prep ;
lin bring_V3 = mkV3 (mkV "saattaa") accusative (mkPrep illative) ; --saattaa hänet vankilaan
lin bring_V2V = mkV2V (mkV "saada") accusative infIllat ; --saa hänet tekemään
lin bring_V2V = mkV2V (mkV "saada") accusative infIllat ; --saa hänet tekemään
lin bring_V2 = mkV2 "tuoda" ;
lin most_Det = mkDet Pl (mkN "usein" "useimman" "useimpia") ;
lin word_N = mkN "sana" ;
@@ -358,12 +362,12 @@ lin quite_Adv = S.quite_Adv ;
lin both_Det = mkDet Pl (mkN "molempi" "molemman" "molempia") ;
lin start_V2 = mkV2 "aloittaa" ;
lin start_V = mkV "aloittaa" ;
lin run_VS = mkVS (mkV (mkV "mennä") "niin") ; ---ARB
lin run_VS = mkVS (mkV (mkV "mennä") "niin") ; ---ARB
lin run_V2 = mkV2 (mkV "suorittaa") accusative ; --- split
lin run_V = L.run_V ;
lin long_A = L.long_A ;
lin right_Adv = mkAdv "oikein" ;
lin right_2_Adv = mkAdv "oikealle" | mkAdv "oikealla" ; --- split
lin right_Adv = mkAdv "oikein" ;
lin right_2_Adv = mkAdv "oikealle" | mkAdv "oikealla" ; --- split
lin right_1_Adv = mkAdv "oikeassa" ;
lin set_VV = mkVV (mkV "valmistautua") infIllat ;
lin set_VS = mkVS (mkV "asettaa") ; ---- subcat
@@ -400,10 +404,10 @@ lin change_N = mkN "muutos" ;
lin move_VV = mkVV "siirtyä" infIllat ;
lin move_V2V = mkV2V (mkV "siirtää") accusative infIllat ;
lin move_V2A = mkV2A (mkV "muuttaa") accusative (mkPrep translative) ;
lin move_V2 = mkV2 "siirtää" | mkV2 "liikuttaa" ;
lin move_V2 = mkV2 "siirtää" | mkV2 "liikuttaa" ;
lin move_V = mkV "liikkua" ;
lin move_2_V = mkV "muuttaa" ;
lin move_1_V = mkV "liikkua" ;
lin move_1_V = mkV "liikkua" ;
lin interest_N = mkN "korko" ;
lin interest_4_N = mkN "kiinnostus" ; ---- sense
lin interest_2_N = mkN "korko" ;
@@ -431,7 +435,7 @@ lin form_N = mkWN (k1A "muoto") ; --f132
lin car_N = L.car_N ;
lin other_N = mkN "toinen" ;
lin yet_Adv = mkAdv "vielä" ; --f176
lin yet_2_Adv = mkAdv "kuitenkin" ;
lin yet_2_Adv = mkAdv "kuitenkin" ;
lin yet_1_Adv = mkAdv "vielä" ;
lin perhaps_Adv = mkAdv "ehkä" ;
lin meet_V2V = mkV2V (mkV "tavata") ; ---- subcat
@@ -512,8 +516,7 @@ lin after_Subj = lin Subj (ss "sen jälkeen kun") ;
lin only_Predet = S.only_Predet ;
lin before_Subj = lin Subj (ss "ennen kuin") ;
lin bit_N = mkN "palanen" ; --- split mkN "bitti"
lin face_N = mkN "kasvo" ;
---- checked by IL till face_N in the BNC order
lin face_N = mkN "kasvo" | mkN "naama" ; ---- plural "kasvot" also possible
lin sit_VA = mkWVA (k53A "pitää") "istuntoa" ; --UNCHK
lin sit_V2 = mkWV2 (k53A "pitää") "istuntoa" ; --UNCHK
lin sit_V = L.sit_V ;
@@ -553,7 +556,7 @@ lin reason_N = L.reason_N ;
lin less_Adv = mkWAdv (k99 "vähemmän") ; --UNCHK
lin minister_N = mkWN (k6 "ministeri") ; --f71
lin minister_2_N = mkN "pastori" ;
lin minister_1_N = mkN "ministeri" ;
lin minister_1_N = mkN "ministeri" ;
lin subject_N = mkWN (k48 "aihe") ; --f66
lin subject_2_N = mkN "subjekti" ;
lin subject_1_N = mkN "aihe" ;
@@ -625,7 +628,7 @@ lin price_N = mkN (lin NK {s = d09A "hinta"}) ;
lin little_A = mkA "vähäinen" ;
lin action_N = mkN "toiminta" ;
lin issue_N = mkN "ongelma" ;
lin issue_2_N = mkN "numero" ;
lin issue_2_N = mkN "numero" ;
lin issue_1_N = mkN "ongelma" ;
lin far_Adv = L.far_Adv ;
lin remember_VS = mkVS "muistaa" ;
@@ -656,7 +659,7 @@ lin fall_V2 = mkV2 "kaataa" ;
lin fall_V = mkV "pudota" ;
lin speak_V2 = L.speak_V2 ;
lin speak_V = mkWV (k56A "puhua") ; --f63
lin few_N = mkN "harva" ;
lin few_N = mkN "harva" ;
lin today_Adv = L.today_Adv ;
lin enough_Adv = mkAdv "tarpeeksi" ;
lin open_V2 = L.open_V2 ;
@@ -763,8 +766,8 @@ lin staff_2_N = mkN "sauva" ;
lin staff_1_N = mkN "henkilökunta" ;
lin certain_A = mkA (lin AK {s = d09 "varma"}) ;
lin certain_2_A = mkA "tietty" ;
lin certain_1_A = mkA "varma" ;
lin student_N = mkN "opiskelija" ;
lin certain_1_A = mkA "varma" ;
lin student_N = mkN "opiskelija" ;
lin half_Predet = mkPredet "puoliksi" ;
lin half_Predet = mkPredet "puoliksi" ;
lin around_Prep = mkPrep "ympärillä" ;
@@ -776,7 +779,7 @@ lin die_V = L.die_V ;
lin special_A = mkA "erityinen" ;
lin difficult_A = mkA "vaikea" ;
lin international_A = mkWA (compoundA "kansain" (k38 "välinen")) ;
lin particularly_Adv = mkAdv "erityisesti" ;
lin particularly_Adv = mkAdv "erityisesti" ;
lin department_N = mkN "osasto" ;
lin management_N = mkN "johto" ;
lin morning_N = mkN (lin NK {s = d01 "aamu"}) ;
@@ -795,7 +798,7 @@ lin city_N = L.city_N ;
lin early_Adv = mkAdv "aikaisin" ;
lin committee_N = mkN "komitea" "komiteoita" ;
lin ground_N = mkN "perusta" ;
lin ground_2_N = mkN "peruste" ;
lin ground_2_N = mkN "peruste" ;
lin ground_1_N = mkN "tontti" | mkN "perusta" ;
lin letter_N = mkN "kirje" ;
lin letter_2_N = mkN "kirjain" ;
@@ -804,7 +807,7 @@ lin create_VV = mkWVV (k53A "aiheuttaa") ; --UNCHK
lin create_V2 = mkV2 "luoda" ;
lin create_V = mkV "luoda" ; --f56
lin evidence_N = mkN "evidenssi" ;
lin evidence_2_N = mkN "selvyys" ;
lin evidence_2_N = mkN "selvyys" ;
lin evidence_1_N = mkN "todiste" | mkN "evidenssi" ;
lin foot_N = L.foot_N ;
lin clear_A = mkA "selvä" ;
@@ -812,7 +815,7 @@ lin boy_N = L.boy_N ;
lin game_N = mkWN (k5 "peli") ;
lin game_3_N = mkN "riista" ;
lin game_2_N = mkN "leikki" ;
lin game_1_N = mkN "peli" ;
lin game_1_N = mkN "peli" ;
lin food_N = mkWN (k10A "ruoka") ; --f232
lin role_N = mkWN (k5 "rooli") ; --UNCHK
lin role_2_N = mkN "rooli" ; ---- sense
@@ -866,7 +869,7 @@ lin watch_V2V = mkV2V (mkV "katsella") (mkPrep partitive) infIness ;
lin watch_V2 = L.watch_V2 ;
lin watch_1_V2 = mkV2 "vartioida" partitive ;
lin watch_2_V2 = mkV2 "katsella" partitive ;
lin watch_V = mkV "katsella" ;
lin watch_V = mkV "katsella" ;
lin white_A = L.white_A ;
lin situation_N = mkN (lin NK {s = d48A "tilanne"}) ;
lin ago_Adv = mkAdv (lin AdvK {s = c99 "sitten"}) ;
@@ -884,7 +887,7 @@ lin strong_A = mkA "vahva" ;
lin whole_A = mkA "kokonainen" ;
lin field_N = mkN "kenttä" ;
lin field_4_N = mkN "kunta" ;
lin field_3_N = mkN "kenttä" ;
lin field_3_N = mkN "kenttä" ;
lin field_2_N = mkN "kenttä" ;
lin field_1_N = mkN "pelto" ;
lin free_A = mkA "vapaa" ;
@@ -985,7 +988,7 @@ lin model_N = mkN "malli" ;
lin bear_V2 = mkV2 "kantaa" ;
lin bear_V = mkV "kääntyä" ; --mkWV (k53A "pitää") ;
lin single_A = mkWA (k38 "yksittäinen") ; --f102
lin single_2_A = mkA "naimaton" | mkA "sinkku" ;
lin single_2_A = mkA "naimaton" | mkA "sinkku" ;
lin single_1_A = mkA "yksittäinen" ;
lin join_V2 = mkV2 "liittyä" illative ;
lin join_V = mkV (mkV "tulla") "mukaan" ;
@@ -1012,17 +1015,17 @@ lin wish_VS = mkVS "toivoa" ;
lin wish_V2V = mkV2V (mkV "toivoa") genitive infPresPart ;
lin wish_V2 = mkV2 "toivoa" | mkV2 "toivottaa" partitive ;
lin wish_V = mkV "toivoa" ;
lin property_N = mkN "omaisuus" ; ---- already split
lin property_N = mkN "omaisuus" ; ---- already split
lin property_2_N = mkN "ominaisuus" ;
lin property_1_N = mkN "omaisuus" ;
lin achieve_V2 = mkV2 "saavuttaa" ;
lin financial_A = mkWA (k38 "taloudellinen") ;
lin poor_A = mkA "köyhä" ;
lin poor_3_A = mkA "kehno" | mkA "surkea" ;
lin poor_2_A = mkA "säälittävä" | mkA "raukka" | mkA "parka" ; ---- position
lin poor_2_A = mkA "säälittävä" | mkA "raukka" | mkA "parka" ; ---- position
lin poor_1_A = mkA "köyhä" ;
lin officer_N = mkN "vastaava" ; ---ARB mkN "upseeri"
lin officer_3_N = mkN "poliisi" ;
lin officer_3_N = mkN "poliisi" ;
lin officer_2_N = mkN "upseeri" ;
lin officer_1_N = mkN "vastaava" ;
lin up_Prep = mkPrep "ylös" partitive ;
@@ -1126,10 +1129,11 @@ lin rise_V = mkV (lin VK {s = c66 "nousta"}) ;
lin date_N = mkN "päivämäärä" ; ---ARB mkWN (k6 "taateli") ; --f101
lin date_7_N = mkN "taateli" ;
lin date_3_N = mkN "tapaaminen" ;
lin date_3_N = mkN "tapaaminen" ;
lin date_1_N = mkN "päivä" (mkN "määrä") ;
lin hard_A = mkA (lin AK {s = d10 "kova"}) ; --- already split
lin hard_2_A = mkA "vaikea" ;
lin hard_1_A = mkA "kova" ;
lin hard_2_A = mkA "vaikea" ;
lin hard_1_A = mkA "kova" ;
lin music_N = L.music_N ;
lin hair_N = L.hair_N ;
lin prepare_VV = mkVV (mkV "varautua") infIllat ;
@@ -1196,7 +1200,7 @@ lin success_N = mkWN (k39 "menestys") ; --f93
lin natural_A = mkWA (k38 "luonnollinen") ; --f126
lin wrong_A = mkWA (k10 "väärä") ;
lin near_Prep = postPrep genitive "lähellä" ;
lin round_Adv = mkWAdv (k99 "ympäri") ;
lin round_Adv = mkWAdv (k99 "ympäri") ;
lin thought_N = mkN "ajatus" | mkN "ajattelu" ;
lin list_N = mkN (lin NK {s = d09 "lista"}) ;
lin argue_VS = mkVS (mkV "väittää") ; ---
@@ -1205,7 +1209,7 @@ lin argue_V = mkV "kiistellä" ;
lin final_A = mkA "lopullinen" ;
lin future_N = mkN "tulevaisuus" ; --- already split
lin future_3_N = mkN "futuuri" ;
lin future_1_N = mkN "tulevaisuus" ;
lin future_1_N = mkN "tulevaisuus" ;
lin introduce_V2 = mkV2 "esitellä" ;
lin analysis_N = mkN "analyysi" | mkWN (k2 "tarkastelu") ;
lin enter_V2 = mkV2 (mkV L.go_V "sisään") illative ;
@@ -1226,7 +1230,7 @@ lin pull_V2 = L.pull_V2 ;
lin pull_V = mkWV (k53A "vetää") "ulos" ; --f70
lin set_N = mkWN (k9 "sarja") ; --f72
lin set_2_N = mkN "joukko" ;
lin set_1_N = mkN "setti" | mkN "sarja" ;
lin set_1_N = mkN "setti" | mkN "sarja" ;
lin doctor_N = L.doctor_N ;
lin choice_N = mkWN (k9A "valinta") ; --f68
lin refer_V2 = mkV2 (mkV "viitata") illative ; --mkWV2 (k58A "lukea") "kuuluvaksi" ;
@@ -1323,7 +1327,7 @@ lin nor_Conj = mkConj "eikä" ;
lin dog_N = L.dog_N ;
lin obtain_V2 = mkWV2 (k61A "hankkia") ; --f81
lin obtain_V = mkWV (k61A "hankkia") ; --UNCHK
lin quickly_Adv = mkAdv "nopeasti" ;
lin quickly_Adv = mkAdv "nopeasti" ;
lin army_N = mkN "armeija" ; --WN (k9 "lauma") ;
lin indicate_VS = mkWVS (k53A "osoittaa") ; --f120
lin indicate_V2 = mkWV2 (k53A "osoittaa") ; --f75
@@ -1340,10 +1344,10 @@ lin recently_Adv = mkAdv "äskettäin" | mkAdv "hiljattain" ;
lin publish_V2 = mkWV2 (k66 "julkaista") ; --f65
lin publish_V = mkWV (k66 "julkaista") ; --f74
lin serious_A = mkWA (k10 "vakava") ; --f132
lin anyway_Adv = mkWAdv (k99 "joka tapauksessa") ;
lin anyway_Adv = mkWAdv (k99 "joka tapauksessa") ;
lin visit_V2V = mkWV2V (k73A "kohdata") ; --UNCHK
lin visit_V2 = mkV2 "vierailla" inessive ;
lin visit_V = mkV "vierailla" ;
lin visit_V = mkV "vierailla" ;
lin capital_N = mkN "pää" (mkN "oma") ;
lin capital_3_N = mkN "isokirjain" ; ---- iso kirjain : CN
lin capital_2_N = mkN "pää" (mkN "oma") ;
@@ -1363,11 +1367,11 @@ lin deal_N = mkN "jako" ;
lin prime_A = mkA (mkN "ensi" (mkN "sijainen")) ; --f63
lin economy_N = mkN "talous" "talouden" "talouksia" ;
lin economy_2_N = mkN "säästö" ;
lin economy_1_N = mkN "talous" ;
lin economy_1_N = mkN "talous" ;
lin element_N = mkN "alku" (mkN "aine") ;
lin finish_VA = mkWVA (k53A "lopettaa") ;
lin finish_V2 = mkWV2 (k53A "lopettaa") ;
lin finish_V = mkWV (k53A "lopettaa") ;
lin finish_VA = mkWVA (k53A "lopettaa") ;
lin finish_V2 = mkWV2 (k53A "lopettaa") ;
lin finish_V = mkWV (k53A "lopettaa") ;
lin duty_N = mkN (lin NK {s = d40 "velvollisuus"}) ;
lin fight_V2V = mkWV2V (k67 "taistella") ; --UNCHK
lin fight_V2 = L.fight_V2 ;
@@ -1583,8 +1587,8 @@ lin text_N = mkWN (k5 "teksti") ; --UNCHK
lin parliament_N = mkWN (k9 "kiusa") ; --UNCHK
lin cause_N = mkN "syy" ; --f58
lin terms_N = mkN "ehto" ; ---- plural only
lin bar_N = mkN "baari" ;
lin bar_2_N = mkN "tanko" ;
lin bar_N = mkN "baari" ;
lin bar_2_N = mkN "tanko" ;
lin bar_1_N = mkN "baari" ;
lin attack_N = mkN "hyökkäys" ;
lin effective_A = mkA "toimiva" ;
@@ -1595,7 +1599,7 @@ lin fish_N = L.fish_N ;
lin future_A = mkWA (k10 "tuleva") ;
lin visit_N = mkN "vierailu" ;
lin little_Adv = mkAdv "vähän" ;
lin easily_Adv = mkAdv "helposti" ;
lin easily_Adv = mkAdv "helposti" ;
lin attempt_VV = mkWVV (k74A "ruveta") infIllat ;
lin attempt_V2 = mkV2 "yrittää" partitive ; --WV2 (k74A "ruveta") ;
lin enable_VS = mkWVS (k71 "tehdä") "mahdolliseksi" ; --UNCHK
@@ -1665,8 +1669,8 @@ lin return_N = mkWN (k17 "paluu") ; --f281
lin medical_A = mkWA (k38 "lääkinnällinen") ; --f87
lin hot_A = L.hot_A ;
lin recognize_VS = mkWVS (k54A "myöntää") ; --UNCHK
lin recognize_4_V2 = mkV2 "tunnistaa" ; ---- sense ?
lin recognize_1_V2 = mkV2 "tuntea" ; ---- sense ?
lin recognize_4_V2 = mkV2 "tunnistaa" ; ---- sense ?
lin recognize_1_V2 = mkV2 "tuntea" ; ---- sense ?
lin talk_N = mkN "puhe" ;
lin budget_N = mkWN (k5A "budjetti") ;
lin river_N = L.river_N ;
@@ -1818,10 +1822,10 @@ lin deep_A = mkWA (k10 "syvä") ; --f66
lin none_NP = S.nothing_NP ;
lin planning_N = mkWN (k2 "suunnittelu") ; --UNCHK
lin trust_N = mkN (lin NK {s = d39 "luottamus"}) ;
lin working_A = mkA "toimiva" | mkA "työtätekevä" ; ---- split
lin working_A = mkA "toimiva" | mkA "työtätekevä" ; ---- split
lin pain_N = mkWN (k1A "särky") ; --UNCHK
lin studio_N = mkWN (k3 "studio") ; --f69
lin positive_A = mkA "positiivinen" | mkA "myönteinen" ; ---- split
lin positive_A = mkA "positiivinen" | mkA "myönteinen" ; ---- split
lin spirit_N = mkWN (k1 "sielu") ; --f55
lin college_N = mkWN (k8 "college") ; --f73
lin accident_N = mkN "onnettomuus" | mkN "sattuma" ; ---- split
@@ -1851,7 +1855,7 @@ lin travel_V = L.travel_V ;
lin target_N = mkN "maalitaulu" ;
lin very_A = mkA "nimenomainen" ;
lin pair_N = mkWN (kH1 "pari") ;
lin male_A = mkA "miespuolinen" | mkA "urospuolinen" ;
lin male_A = mkA "miespuolinen" | mkA "urospuolinen" ;
lin gas_N = mkWN (k1 "kaasu") ;
lin issue_V2 = mkV2 "julkaista" ;
lin issue_V = mkWV (k67 "tulla") "esiin" ; --f53
@@ -1926,13 +1930,13 @@ lin aim_V2 = mkV2 (mkV "tähdätä") (casePrep illative) ; --f71
lin aim_V = mkV "tähdätä" ;
lin danger_N = mkWN (kH1 "vaara") ;
lin credit_N = mkN "luotto" ;
lin usual_A = mkWA (k38 "tavallinen") ;
lin usual_A = mkWA (k38 "tavallinen") ;
lin link_V2 = mkV2 "yhdistää" ;
lin link_V = mkV "yhdistää" ;
lin candidate_N = mkN "ehdokas" ;
lin track_N = mkN "ura" ;
lin safe_A = mkWA (k38 "turvallinen") ; --f70
lin interested_A = mkA ("kiinnostunut") ;
lin interested_A = mkA ("kiinnostunut") ;
lin assessment_N = mkWN (k3 "arvio") ;
lin path_N = mkN "polku" ;
lin merely_Adv = mkAdv "pelkästään" | mkAdv "ainoastaan" ;
@@ -2361,6 +2365,9 @@ lin acid_N = mkWN (k1A "happo") ;
lin spring_N = mkN "kevät" "kevään" "keväitä" ; ---AR mkWN (k39 "hyppäys") ; --f97
lin birth_N = mkWN (k10 "syntymä") ; --UNCHK
lin ear_N = L.ear_N ;
lin recognize_VS = mkWVS (k54A "myöntää") ; --UNCHK
lin recognize_4_V2 = mkV2 "tunnistaa" ; ---- sense ?
lin recognize_1_V2 = mkV2 "tuntea" ; ---- sense ?
lin recommend_V2V = variants{}; -- mkV2 "suositella" ; --f53
lin recommend_V2 = mkV2 "suositella" ; --f53
lin module_N = mkWN (k6 "moduuli") ; --UNCHK
@@ -2512,7 +2519,7 @@ lin bottom_N = mkN "pohja" ;
lin initial_A = mkA "alustava" ;
lin theme_N = mkN "teema" ;
lin characteristic_N = mkWN (compoundN "tunto" (k5A "merkki")) ; --UNCHK
lin pretty_Adv = mkAdv "aika" ; ---- cat : should be AdA
lin pretty_Adv = mkAdv "aika" ; ---- cat : should be AdA
lin empty_A = L.empty_A ;
lin display_N = mkN "näyttö" ; ---ARB mkWN (k2 "näyttely") ;
lin combination_N = mkN "yhdistelmä" ; --WN (k3 "kombinaatio") ;
@@ -3347,30 +3354,30 @@ lin guy_N = mkN "kaveri" ; --f62
lin feature_V2 = mkV2 "esittää" ;
lin furniture_N = mkWN (compoundN "huone" (k1 "kalu")) ;
lin administrative_A = mkWA (k38 "hallinnollinen") ;
lin wooden_A = mkA "puinen" ; --mkWA (k10 "puiseva") ;
lin input_N = mkWN (k39 "panos") ;
lin wooden_A = mkA "puinen" ;
lin input_N = mkN "syöte" ;
lin phenomenon_N = mkWN (k3 "ilmiö") ; --UNCHK
lin surprising_A = mkWA (k10 "yllättävä") ; --f69
lin jacket_N = mkWN (k1 "kruunu") ; --UNCHK
lin jacket_N = mkN "pusakka" ;
lin actor_N = mkWN (k12 "näyttelijä") ;
lin actor_2_N = variants{} ; --
lin actor_1_N = variants{} ; --
lin kick_V2 = mkWV2 (k66 "nurista") ; --UNCHK
lin kick_V = mkWV (k66 "nurista") ; --UNCHK
lin actor_2_N = mkWN (k12 "näyttelijä") ;
lin actor_1_N = mkWN (k12 "näyttelijä") ;
lin kick_V2 = mkV2 (mkV "potkaista") partitive ;
lin kick_V = mkV "potkia" ;
lin producer_N = mkN (lin NK {s = d10 "tuottaja"}) ;
lin hearing_N = mkN "kuulustelu" ;
lin chip_N = mkN "hippu" ;
lin equation_N = mkWN (compoundN "yhtä" (k38 "läistäminen")) ; --UNCHK
lin equation_N = mkN "yhtälö" ;
lin certificate_N = mkN (lin NK {s = d39 "todistus"}) ;
lin hello_Interj = mkInterj "terve" ;
lin remarkable_A = mkWA (k34A "tavaton") ; --UNCHK
lin alliance_N = mkN "allianssi" ;
lin smoke_V2 = mkWV2 (k68 "tupakoida") ; --UNCHK
lin hello_Interj = mkInterj "terve" | mkInterj "hei" | mkInterj "moro" | mkInterj "moi" ;
lin remarkable_A = mkA "huomattava" ;
lin alliance_N = mkN "allianssi" | mkN "liitto" ;
lin smoke_V2 = mkV2 "savustaa" | mkV2 "polttaa" ; --- split -- | smoke fish -- | smoke a cigarette
lin smoke_V = mkWV (k68 "tupakoida") ;
lin awareness_N = mkN "tietoisuus" ; --mkWN (k9A "tajunta") ;
lin throat_N = mkWN (k1 "nielu") ; --UNCHK
lin discovery_N = mkWN (compoundN "keksi" (k38 "minen")) ; --UNCHK
lin festival_N = mkWN (k10 "juhla") ; --UNCHK
lin awareness_N = mkN "tietoisuus" ;
lin throat_N = mkN "kurkku" ;
lin discovery_N = mkN "löytö" ;
lin festival_N = mkN "festivaali" ;
lin dance_N = mkWN (k5 "tanssi") ; --UNCHK
lin promise_N = mkN "lupaus" ;
lin rose_N = mkWN (k10 "roosa") ; --UNCHK
@@ -5370,9 +5377,9 @@ lin poster_N = mkN "juliste" ; ---ARB --mkWN (compoundN "kyyti" (k38 "hevonen"))
lin hitherto_Adv = mkWAdv (k99 "vielä") ; --UNCHK
lin mature_A = mkA "kypsä" ; --mkWA (compoundA "lentoky" (k38 "kyinen")) ;
lin cooking_N = mkWN (compoundN "ruuan" (k39 "valmistus")) ; --UNCHK
lin head_A = variants{} ; --
lin wealthy_A = mkWA (k41A "rikas") ; --UNCHK
lin fucking_A = variants{} ; --
lin head_A = mkA "johtava" ;
lin wealthy_A = mkA "varakas" ;
lin fucking_A = mkA "vittumainen" ; ----
lin confess_VS = mkWVS (k54A "myöntää") ; --UNCHK
lin confess_V2 = mkWV2 (k54A "myöntää") ; --UNCHK
lin confess_V = mkWV (k54A "myöntää") ; --UNCHK
@@ -6339,8 +6346,8 @@ lin outbreak_N = mkWN (k39 "purkaus") ; --UNCHK
lin comparatively_Adv = variants{} ; --
lin pump_V2 = mkV2 "pumpata" partitive ; --WV2 (k54 "lypsää") ;
lin pump_V = mkWV (k54 "lypsää") ; --UNCHK
lin fuck_V2 = mkV2 "naida" partitive ; --UNCHK
lin fuck_V = mkV "naida" ; --UNCHK
lin fuck_V2 = mkV2 "naida" partitive | mkV2 "panna" partitive ;
lin fuck_V = mkV "naida" | mkV "nussia" ;
lin forecast_VS = mkWVS (k53 "ennustaa") ; --UNCHK
lin forecast_V2 = mkWV2 (k53 "ennustaa") ; --UNCHK
lin forecast_V = mkWV (k53 "ennustaa") ; --UNCHK