diff --git a/lib/src/translator/todo/TopDictionaryFin.gf b/lib/src/translator/todo/TopDictionaryFin.gf index ba0279d93..e0d63117d 100644 --- a/lib/src/translator/todo/TopDictionaryFin.gf +++ b/lib/src/translator/todo/TopDictionaryFin.gf @@ -1,9 +1,9 @@ --# -path=.:src/finnish/stemmed:src/finnish:src/abstract:src/common:src/finnish/kotus:src/api ----- checked by IL till face_N in the BNC order +---- checked by IL till item_N in the BNC order concrete TopDictionaryFin of TopDictionary = CatFin ** open ParadigmsFin, (S = StructuralFin), (L = LexiconFin), - MorphoFin, ParadigmsFin, (E = ExtraFin), Kotus, WNKotus, StemFin, Prelude in { + MorphoFin, ParadigmsFin, Kotus, WNKotus, StemFin, Prelude in { flags coding=utf8 ; @@ -11,6 +11,20 @@ oper tehda_V = mkV (lin VK {s = c71 "tehdä"}) ; oper nahda_V = mkV (lin VK {s = c71 "nähdä"}) ; oper optProDrop : Pron -> Pron = \p -> p | E.ProDrop p ; + mika_NForms : R.NForm => Str = + let { + mi = snoun2nounBind (mkN "mi") + } in + table { + NCase Sg Nom => "mikä" ; + NCase Pl Nom => "mitkä" ; + NCase _ Gen => "minkä" ; + NCase _ Part => "mitä" ; + NCase _ Illat => "mihin" ; + c => mi.s ! c + } ; + + lin of_Prep = casePrep genitive ; --- lin and_Conj = S.and_Conj ; lin in_Prep = S.in_Prep ; @@ -516,7 +530,8 @@ 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" | mkN "naama" ; ---- plural "kasvot" also possible +lin face_N = mkN "kasvo" ; +---- checked by IL till face_N in the BNC order lin sit_VA = mkWVA (k53A "pitää") "istuntoa" ; --UNCHK lin sit_V2 = mkWV2 (k53A "pitää") "istuntoa" ; --UNCHK lin sit_V = L.sit_V ; @@ -524,19 +539,19 @@ lin market_N = mkN "markkina" ; lin market_1_N = mkN "tori" ; lin market_2_N = mkN "markkina" ; ---- plural only lin appear_VV = mkVV (mkV "näyttää") infPresPart ; -lin appear_VS = mkWVS (k67 "tulla") "näkyviin" ; --UNCHK +lin appear_VS = mkVS (mkV (mkV "näyttää") "siltä") ; lin appear_VA = mkVA (mkV "vaikuttaa") (casePrep ablative) ; --f53 -lin appear_V2 = mkWV2 (k67 "tulla") "näkyviin" ; --UNCHK +lin appear_V2 = mkV2 (mkV "ilmestyä") (mkPrep illative) ; ---- subcat lin appear_V = mkV "ilmestyä" ; -lin continue_VV = mkVV (mkV "jatkaa") ; ---??? *jatkaa kulkea -lin continue_VS = mkWVS (k52 "jatkua") ; --UNCHK -lin continue_V2 = mkV2 (mkV (lin VK {s = c56 "jatkaa"})) partitive ; -lin continue_V = mkWV (k52 "jatkua") ; --f262 -lin able_A = mkA "kykenevä" ; --C (lin AK {s = d41A "voimakas"}) ; -lin political_A = mkA (lin AK {s = d38 "poliittinen"}) ; -lin later_Adv = mkWAdv (k99 "sittemmin") ; --UNCHK +lin continue_VV = mkVV (mkV "jatkaa") ; --- add more Inf3 forms *jatkaa kulkea +lin continue_VS = mkVS (mkV "jatkaa") ; +lin continue_V2 = mkV2 (mkV "jatkaa") partitive ; +lin continue_V = mkV "jatkua" ; --f262 +lin able_A = mkA "kykenevä" ; +lin political_A = mkA "poliittinen" ; +lin later_Adv = mkAdv "myöhemmin" ; lin hour_N = mkN "tunti" ; -lin rate_N = mkN "kurssi" ; +lin rate_N = mkN "taso" | mkN "kurssi" ; lin law_N = mkN "laki" ; lin law_2_N = mkN "oikeustiede" ; lin law_1_N = mkN "laki" ; @@ -545,23 +560,23 @@ lin court_N = mkN "tuomioistuin" ; lin court_2_N = mkN "tuomioistuin" ; lin court_1_N = mkN "hovi" ; lin office_N = mkN "toimisto" ; -lin let_VS = mkVS (mkV "olettaa") ; ---- -lin let_V2V = mkWV2V (mkV "sallia") ; -lin let_V2 = mkWV2 (k63 "saada") ; --UNCHK +lin let_VS = mkVS (mkV "olettaa") ; ---- subcat +lin let_V2V = mkV2V (mkV "antaa") genitive infFirst ; +lin let_V2 = mkV2 (mkV "sallia") ; --- split mkV2 "vuokrata" lin let_V = mkV "sallia" ; lin war_N = L.war_N ; lin produce_V2 = mkV2 "tuottaa" partitive ; lin produce_V = mkV "tuottaa" ; lin reason_N = L.reason_N ; -lin less_Adv = mkWAdv (k99 "vähemmän") ; --UNCHK -lin minister_N = mkWN (k6 "ministeri") ; --f71 +lin less_Adv = mkAdv "vähemmän" ; --UNCHK +lin minister_N = mkN "ministeri" ; --f71 lin minister_2_N = mkN "pastori" ; 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" ; lin person_N = L.person_N ; -lin term_N = mkN (lin NK {s = d01A "ehto"}) ; ---ARB mkN "termi" +lin term_N = mkN "ehto" ; --- split mkN "termi" lin particular_A = mkA "yksittäinen" ; lin full_A = L.full_A ; lin involve_VS = mkVS "sisältää" ; --mkWVS (k58 "sotkea") ; @@ -569,29 +584,29 @@ lin involve_V2 = mkV2 "koskea" partitive ; lin involve_V = mkV "koskea" ; --f54 lin sort_N = mkWN (k5 "laji") ; --f75 lin require_VV = mkVV "vaatia" ; -lin require_VS = mkWVS (k58 "käskeä") ; --UNCHK -lin require_V2V = mkWV2V (k58 "käskeä") ; --f77 +lin require_VS = mkVS (mkV "vaatia") ; +lin require_V2V = mkV2V (mkV "vaatia") ; --f77 lin require_V2 = mkV2 "vaatia" ; lin require_V = mkV vOlla "vaatimuksena" ; --f55 -lin suggest_VS = mkWVS (k53A "ehdottaa") ; --f141 -lin suggest_V2 = mkWV2 (k53A "ehdottaa") ; -lin suggest_V = mkWV (k53A "ehdottaa") ; --UNCHK -lin far_A = mkWA (k38 "etäinen") ; --f383 +lin suggest_VS = mkVS (mkV "ehdottaa") ; --f141 +lin suggest_V2 = mkV2 (mkV "ehdottaa") ; +lin suggest_V = mkV "ehdottaa" ; +lin far_A = mkA "etäinen" | mkA "kaukainen" ; --f383 lin towards_Prep = mkPrep partitive "kohti" ; lin anything_NP = {s = \\c => S.mikaInt ! Sg ! (npform2case Sg c) ++ "tahansa" ; a = agrP3 Sg ; isPron, isNeg = False} ; lin period_N = mkN "ajanjakso" ; -lin period_3_N = mkN "kuukautinen" ; ----- plural only +lin period_3_N = mkN "kuukautinen" ; ---- plural only lin period_2_N = mkN "piste" ; lin period_1_N = mkN "ajanjakso" ; -lin consider_VV = mkVV "harkita" ; +lin consider_VV = mkVV "harkita" infPresPart ; lin consider_VS = mkVS (mkV "arvella" "arveli") ; lin consider_V3 = mkV3 (mkV "pitää") (mkPrep partitive) (mkPrep essive) ; lin consider_V2V = mkV2V (mkV "arvella" "alveli") genitive infPresPart ; lin consider_V2A = mkV2A (mkV "pitää") (mkPrep partitive) (mkPrep essive) ; lin consider_V2 = mkV2 "harkita" partitive ; lin consider_V = mkV vOlla "mieltä" ; --f67 -lin read_VS = mkVS "kuulua" ; --mkWVS (k73 "osata") ; -lin read_VA = mkWVA (k73 "osata") ; --UNCHK +lin read_VS = mkVS "kuulua" ; --käsky kuuluu, että XYZ ? +lin read_VA = mkVA (mkV "lukea") (mkPrep partitive) ; ---- subcat lin read_V2 = L.read_V2 ; lin read_V = mkV "lukea" ; lin change_V2 = mkV2 "muuttaa" ; @@ -600,32 +615,32 @@ lin society_N = mkN "yhteis" (mkN "kunta") ; --f53 lin process_N = mkN "prosessi" ; lin mother_N = mkN "äiti" ; lin offer_VV = mkVV "tarjoutua" infIllat ; -lin offer_VS = mkWVS (k74 "tarjota") ; --UNCHK -lin offer_V3 = mkWV3 (k74 "tarjota") ; --UNCHK -lin offer_V2V = mkWV2V (k74 "tarjota") ; --UNCHK -lin offer_V2 = mkWV2 (k74 "tarjota") ; --f358 -lin offer_V = mkWV (k74 "tarjota") ; --f141 +lin offer_VS = mkVS (mkV "tarjota") ; +lin offer_V3 = mkV3 (mkV "tarjota") ; +lin offer_V2V = mkV2V (mkV "tarjota") ; ---- subcat +lin offer_V2 = mkV2 (mkV "tarjota") ; --f358 +lin offer_V = mkV "tarjota" ; --f141 lin late_A = mkA "myöhäinen" ; -lin voice_N = mkWN (k26 "ääni") ; --f52 +lin voice_N = mkN "ääni" ; --f52 lin both_Adv = mkAdv "molemmat" ; ---- cat lin once_Adv = mkAdv "kerran" ; -lin police_N = mkWN (k6 "poliisi") ; --UNCHK -lin kind_N = mkN (lin NK {s = d05 "laji"}) ; +lin police_N = mkN "poliisi" ; +lin kind_N = mkN "laji" | mkN "tyyppi" ; lin lose_V2 = L.lose_V2 ; lin lose_V = mkV "hävitä" ; lin add_VS = mkVS (mkV "lisätä") ; lin add_V2 = mkV2 "lisätä" ; -lin add_V = mkWV (k73 "lisätä") ; --f184 +lin add_V = mkV "lisätä" ; --f184 lin probably_Adv = mkAdv "todennäköisesti" ; -lin expect_VV = mkVV (mkV "aikoa") ; --- -lin expect_VS = mkWVS (k53A "odottaa") ; --f73 +lin expect_VV = mkVV (mkV "aikoa") ; +lin expect_VS = mkVS (mkV "odottaa") ; --f73 lin expect_V2V = mkV2V (mkV "odottaa") (mkPrep genitive) infPresPart ; lin expect_V2 = mkV2 "odottaa" partitive ; lin expect_V = mkWV (k53A "odottaa") ; --f125 -lin ever_Adv = mkWAdv (k99 "alati") ; --UNCHK -lin available_A = mkA "saatavillaoleva" ; -lin price_N = mkN (lin NK {s = d09A "hinta"}) ; -lin little_A = mkA "vähäinen" ; +lin ever_Adv = mkAdv "aina" ; +lin available_A = mkA "saatavillaoleva" | mkA "vapaa" ; +lin price_N = mkN "hinta" ; +lin little_A = mkA "pieni" | mkA "vähäinen" ; lin action_N = mkN "toiminta" ; lin issue_N = mkN "ongelma" ; lin issue_2_N = mkN "numero" ; @@ -643,55 +658,55 @@ lin matter_1_N = mkN "materia" | mkN "aine" ; lin matter_2_N = mkN "ongelma" ; lin community_N = mkN "yhteisö" ; lin remain_VV = mkVV "jäädä" infIllat ; -lin remain_VS = mkWVS (k52 "pysyä") ; -lin remain_VA = mkVA (mkV "pysyä") (mkPrep elative) ; -lin remain_V2 = mkWV2 (k52 "pysyä") essive ; +lin remain_VS = mkVS (mkV (mkV "jäädä") "jäljelle") ; ---- +lin remain_VA = mkVA (mkV "pysyä") (mkPrep essive) ; +lin remain_V2 = mkV2 (mkV "pysyä") (mkPrep essive) ; lin remain_V = mkV "jäädä" ; -lin figure_N = mkWN (k3 "kuvio") ; --f245 ---ARB mkN "luku" +lin figure_N = mkN "kuvio" ; --f245 --- split already mkN "luku" lin figure_2_N = mkN "luku" ; lin figure_1_N = mkN "kuvio" ; lin type_N = mkN "tyyppi" ; -lin research_N = mkWN (k39 "tutkimus") ; --f268 +lin research_N = mkN "tutkimus" ; --f268 lin actually_Adv = mkAdv "itse asiassa" ; lin education_N = mkN "koulutus" | mkN "sivistys" ; lin fall_VA = mkVA (mkV "tulla") (mkPrep translative) ; lin fall_V2 = mkV2 "kaataa" ; lin fall_V = mkV "pudota" ; lin speak_V2 = L.speak_V2 ; -lin speak_V = mkWV (k56A "puhua") ; --f63 +lin speak_V = mkV "puhua" ; --f63 lin few_N = mkN "harva" ; lin today_Adv = L.today_Adv ; lin enough_Adv = mkAdv "tarpeeksi" ; lin open_V2 = L.open_V2 ; -lin open_V = mkV "avata" ; +lin open_V = mkV "aueta" "aukesi" ; lin bad_A = L.bad_A ; lin buy_V2 = L.buy_V2 ; lin buy_V = mkV "ostaa" ; -lin programme_N = mkWN (k10 "ohjelma") ; --UNCHK -lin minute_N = mkWN (k5A "minuutti") ; --f123 -lin moment_N = mkN (lin NK {s = d07 "hetki"}) ; +lin programme_N = mkN "ohjelma" ; +lin minute_N = mkN "minuutti" ; --- split mkN "muistiinpano" +lin moment_N = mkN "hetki" ; lin girl_N = L.girl_N ; -lin age_N = mkWN (k10A "ikä") ; +lin age_N = mkN "ikä" "iän" "ikää" "ikänä" "ikään" "ikien" "ikiä" "ikinä" "i'issä" "ikiin" ; lin centre_N = mkN "keskus" ; lin stop_VV = mkVV "lakata" infElat ; lin stop_V2 = mkV2 "lopettaa" ; lin stop_V = L.stop_V ; lin control_N = mkN "kontrolli" ; lin value_N = mkN "arvo" ; -lin send_VS = mkWVS (k53A "välittää") ; --UNCHK -lin send_V2V = mkWV2V (k53A "välittää") ; --UNCHK +lin send_VS = mkVS (mkV "lähettää") ; ---- subcat +lin send_V2V = mkV2V (mkV "lähettää") accusative infIllat ; lin send_V2 = mkV2 "lähettää" ; lin send_V = mkV "lähettää" ; --f84 lin health_N = mkWN (k40 "terveys") ; --f212 lin decide_VV = mkVV "päättää" ; -lin decide_VS = mkWVS (k66 "ratkaista") ; --f74 -lin decide_V2 = mkWV2 (k66 "ratkaista") ; --UNCHK -lin decide_V = mkWV (k66 "ratkaista") ; --f59 +lin decide_VS = mkVS (mkV "päättää") ; +lin decide_V2 = mkV2 (mkV "päättää") ; +lin decide_V = mkV "päättää" ; lin main_A = mkA "pääasiallinen" ; lin win_V2 = L.win_V2 ; lin win_V = mkV "voittaa" ; lin understand_VS = mkVS "ymmärtää" | mkWVS (k74 "älytä") ; -lin understand_V2V = mkWV2V (k74 "älytä") ; --UNCHK +lin understand_V2V = mkV2V (mkV "ymmärtää") genitive infPresPart ; lin understand_V2 = L.understand_V2 ; lin understand_V = mkV "ymmärtää" ; lin decision_N = mkN "päätös" ; @@ -703,86 +718,85 @@ lin receive_V2 = mkWV2 (compoundV "vastaan" (k53A "ottaa")) ; --f341 lin receive_V = mkWV (compoundV "vastaan" (k53A "ottaa")) ; --f73 lin back_N = L.back_N ; lin several_Det = mkDet Pl (mkN "usea") ; -lin return_V2V = mkWV2V (k52A "kääntyä") "takaisin" ; --UNCHK -lin return_V2 = mkV2 "palata" illative ; +lin return_V2V = mkV2V (mkV "palauttaa") accusative infIllat ; ---- subcat +lin return_V2 = mkV2 "palauttaa" ; lin return_V = mkV "palata" ; -lin build_V2 = mkV2 "rakentaa" ; +lin build_V2 = mkV2 "rakentaa" | mkV2 (mkV "rakentaa") partitive ; lin build_V = mkV "rakentaa" ; lin spend_V2 = mkV2 "kuluttaa" ; -lin spend_V = mkV "kuluttaa" ; +lin spend_V = mkV "kuluttaa" | mkV "kulua" ; lin force_N = mkN "voima" ; -lin condition_N = mkWN (k1A "ehto") ; --f171 +lin condition_N = mkN "ehto" ; --f171 lin condition_1_N = mkN "ehto" ; lin condition_2_N = mkN "olosuhde" ; lin paper_N = L.paper_N ; lin off_Prep = mkPrep "ulkopuolella" ; lin major_A = mkA "merkittävä" ; -lin describe_VS = mkWVS (k75 "nimetä") ; --UNCHK -lin describe_V2 = mkV2 (mkV "kuvata" "kuvasi") partitive ; -lin describe_V = mkWV (k75 "nimetä") ; --UNCHK -lin agree_VV = mkWVV (k52 "suostua") infIllat ; +lin describe_VS = mkVS (mkV "kuvailla") ; +lin describe_V2 = mkV2 (mkV "kuvailla") partitive | mkV2 (mkV "kuvata" "kuvasi") partitive ; +lin describe_V = mkV "kuvailla" | mkV "kuvata" | mkV "nimetä" ; +lin agree_VV = mkVV (mkV "suostua") infIllat ; lin agree_VS = mkVS (mkV "sopia") ; -lin agree_V2 = mkWV2 (k52 "suostua") ; --UNCHK +lin agree_V2 = mkV2 (mkV "suostua") (mkPrep illative) ; --- split mkV2 "kongruoida" lin agree_V = mkV olla_V "samaa mieltä" ; -lin economic_A = mkA (lin AK {s = d38 "taloudellinen"}) ; +lin economic_A = mkA "taloudellinen" ; lin increase_V2 = mkV2 "lisätä" partitive ; lin increase_V = mkV "kasvaa" ; lin upon_Prep = mkPrep "päällä" ; -lin learn_VV = mkWVV (k61A "oppia") infIllat ; -lin learn_VS = mkWVS (k61A "oppia") ; --UNCHK +lin learn_VV = mkVV (mkV "oppia") infIllat ; +lin learn_VS = mkVS (mkV "oppia") ; lin learn_V2 = L.learn_V2 ; -lin learn_V = mkWV (k61A "oppia") ; -lin general_A = mkWA (k38 "yleinen") ; --f417 +lin learn_V = mkV "oppia" ; +lin general_A = mkA "yleinen" ; --f417 lin century_N = mkN "vuosi" (mkN "sata") ; --f63 lin therefore_Adv = mkAdv "siksi" ; lin father_N = mkN "isä" ; -lin section_N = mkWN (k3 "sektio") ; +lin section_N = mkN "osasto" ; --- split mkN "sektio" | mkN "leikkaus" ; lin patient_N = mkWN "potilas" ; --f62 -lin around_Adv = mkWAdv (k99 "lähes") ; --f67 +lin around_Adv = mkAdv "suunnilleen" | mkAdv "lähes" ; --f67 lin activity_N = mkWN (k9A "toiminta") ; --f245 lin road_N = L.road_N ; lin table_N = L.table_N ; lin including_Prep = mkPrep "mukaanluettuna" nominative ; lin church_N = L.church_N ; -lin reach_VA = mkWVA (k53A "ottaa") "yhteyttä" ; --UNCHK -lin reach_V2V = mkWV2V (k53A "ottaa") "yhteyttä" ; --UNCHK +lin reach_VA = mkVA (mkV "saavuttaa") accusative ; ---- subcat +lin reach_V2V = mkV2V (mkV "saavuttaa") ; ---- subcat lin reach_V2 = mkV2 "saavuttaa" ; -lin reach_V = mkWV (k53A "ottaa") "yhteyttä" ; --f73 +lin reach_V = mkV "saavuttaa" ; lin real_A = mkA "todellinen" ; -lin lie_VS = mkWVS (k67A "valehdella") ; --UNCHK +lin lie_VS = mkVS (mkV "valehdella") ; lin lie_2_V = mkV "valehdella" ; lin lie_1_V = mkV "maata" ; lin mind_N = mkN "mieli" ; lin likely_A = mkWA (compoundA "toden" (k38 "näköinen")) ; --f272 lin among_Prep = postPrep genitive "joukossa" ; -lin team_N = mkN "ryhmä" ; -lin experience_N = mkWN (k39 "kokemus") ; --f69 +lin team_N = mkN "ryhmä" | mkN "joukkue" ; +lin experience_N = mkN "kokemus" ; --f69 lin death_N = mkN "kuolema" ; lin soon_Adv = mkAdv "pian" ; -lin act_N = mkWN (k25 "toimi") ; --f63 -lin sense_N = mkN "aisti" ; ---ARB mkN "järki" +lin act_N = mkWN (k25 "toimi") ; --- split mkN "näytös" +lin sense_N = mkN "aisti" ; --- split mkN "järki" lin staff_N = mkN "henkilökunta" ; lin staff_2_N = mkN "sauva" ; lin staff_1_N = mkN "henkilökunta" ; -lin certain_A = mkA (lin AK {s = d09 "varma"}) ; +lin certain_A = mkA (mkN "varma") "varmempi" "varmin" ; lin certain_2_A = mkA "tietty" ; -lin certain_1_A = mkA "varma" ; -lin student_N = mkN "opiskelija" ; -lin half_Predet = mkPredet "puoliksi" ; +lin certain_1_A = mkA "varma" ; +lin student_N = mkN "opiskelija" ; lin half_Predet = mkPredet "puoliksi" ; lin around_Prep = mkPrep "ympärillä" ; lin language_N = L.language_N ; lin walk_V2 = mkV2 "kävelyttää" partitive ; --mkWV2 (k63 "saada") "piste" ; lin walk_V = L.walk_V ; -lin die_V2 = mkWV2 (k67 "kuolla") ; --UNCHK +lin die_V2 = mkV2 L.die_V ; ---- subcat 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 department_N = mkN "osasto" ; +lin department_N = mkN "osasto" | mkN "laitos" ; lin management_N = mkN "johto" ; -lin morning_N = mkN (lin NK {s = d01 "aamu"}) ; +lin morning_N = mkN "aamu" ; lin draw_V2V = mkV2V "vetää" ; lin draw_V2 = mkV2 "vetää" ; lin draw_1_V2 = mkV2 "piirtää" ; @@ -790,9 +804,9 @@ lin draw_2_V2 = mkV2 "vetää" ; lin draw_V = mkV "vetää" ; lin hope_VV = mkVV (mkV "toivoa") infPresPartAgr ; lin hope_VS = L.hope_VS ; -lin hope_V = mkWV (k53A "yrittää") ; --UNCHK +lin hope_V = mkV "toivoa" ; lin across_Prep = mkPrep "poikki" ; -lin plan_N = mkN (lin NK {s = d10 "suunnitelma"}) ; +lin plan_N = mkN "suunnitelma" ; lin product_N = mkN "tuote" ; lin city_N = L.city_N ; lin early_Adv = mkAdv "aikaisin" ; @@ -803,76 +817,75 @@ lin ground_1_N = mkN "tontti" | mkN "perusta" ; lin letter_N = mkN "kirje" ; lin letter_2_N = mkN "kirjain" ; lin letter_1_N = mkN "kirje" ; -lin create_VV = mkWVV (k53A "aiheuttaa") ; --UNCHK +lin create_VV = mkVV (mkV "luoda") infIllat ; ---- subcat lin create_V2 = mkV2 "luoda" ; -lin create_V = mkV "luoda" ; --f56 +lin create_V = mkV "luoda" ; lin evidence_N = mkN "evidenssi" ; 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ä" ; +lin clear_A = mkA (mkN "selvä") "selvempi" "selvin" ; 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 food_N = mkWN (k10A "ruoka") ; --f232 -lin role_N = mkWN (k5 "rooli") ; --UNCHK +lin role_N = mkN "rooli" ; lin role_2_N = mkN "rooli" ; ---- sense lin role_1_N = mkN "rooli" ; lin practice_N = mkN "käytäntö" ; lin bank_N = L.bank_N ; lin else_Adv = mkAdv "muutoin" ; lin support_N = mkN (lin NK {s = d07A "tuki"}) ; -lin sell_VS = mkWVS (k63 "myydä") ; --UNCHK -lin sell_VA = mkWVA (k63 "myydä") ; --UNCHK -lin sell_V2 = mkWV2 (k63 "myydä") ; +lin sell_VS = mkVS (mkV "myydä") ; ---- subcat +lin sell_VA = mkVA (mkV "myydä") accusative ; ---- subcat +lin sell_V2 = mkV2 (mkV "myydä") ; lin sell_V = mkV "myydä" ; lin event_N = mkN "tapahtuma" ; lin building_N = mkN "rakennus" ; -lin range_N = mkN (lin NK {s = d10 "valikoima"}) ; +lin range_N = mkN "valikoima" ; --- split mkN "vuorijono" ; mkN "arvojoukko" ; mkN "kantama" lin behind_Prep = S.behind_Prep ; -lin sure_A = mkA (lin AK {s = d09 "varma"}) ; +lin sure_A = mkA "varma" ; lin report_VS = mkVS "raportoida" ; -lin report_V2V = mkWV2V (k53A "selvittää") ; --UNCHK +lin report_V2V = mkV2V "raportoida" ; ---- subcat lin report_V2 = mkV2 "raportoida" elative ; lin report_V = mkV "raportoida" ; -lin pass_V2 = mkWV2 (mkV (mkV "päästää") "läpi") ; -lin pass_V = mkWV (k52A "vaipua") ; --f70 +lin pass_V2 = mkWV2 (mkV (mkV "päästää") "läpi") ; --- split ohittaa ; ojentaa ; viettää +lin pass_V = mkV (mkV "päästä") "läpi" ; --- split mennä läpi ; vaipua lin black_A = L.black_A ; -lin stage_N = mkWN (k5A "etappi") ; --f57 -lin meeting_N = mkN (lin NK {s = d39 "kokous"}) ; -lin meeting_N = mkN (lin NK {s = d39 "kokous"}) ; -lin sometimes_Adv = mkWAdv (k99 "ajoittain") ; --f89 +lin stage_N = mkN "näyttämö" ; --- split mkWN (k5A "etappi") ; --f57 +lin meeting_N = mkN "kokous" ; +lin sometimes_Adv = mkAdv "joskus" | mkWAdv (k99 "ajoittain") ; --f89 lin thus_Adv = mkAdv "siten" ; -lin accept_VS = mkWVS (k53A "sietää") ; --UNCHK +lin accept_VS = mkVS (mkV "hyväksyä") ; lin accept_V2 = mkV2 "hyväksyä" ; -lin accept_V = mkWV (k53A "sietää") ; --UNCHK -lin town_N = mkN (lin NK {s = d05A "kaupunki"}) ; +lin accept_V = mkV "hyväksyä" ; +lin town_N = mkN "kaupunki" ; lin art_N = L.art_N ; lin further_Adv = mkAdv "pidemmälle" ; -lin club_N = mkWN (k5 "klubi") ; +lin club_N = mkN "klubi" ; lin club_2_N = mkN "maila" ; lin club_1_N = mkN "kerho" | mkN "klubi" ; -lin cause_VS = mkWVS (k53A "taivuttaa") ; --UNCHK -lin cause_V2V = mkWV2V (mkV "saada") ; +lin cause_VS = mkVS (mkV "aiheuttaa") ; +lin cause_V2V = mkV2V (mkV "saada") accusative infIllat ; lin cause_V2 = mkV2 "aiheuttaa" ; lin arm_N = mkN "käsi" ; --f62 lin arm_1_N = mkN "käsivarsi" | mkN "käsi" ; lin arm_2_N = mkN "ase" ; -lin history_N = mkN (lin NK {s = d12 "historia"}) ; +lin history_N = mkN "historia" ; lin parent_N = mkN "vanhempi" "vanhemman" "vanhempia" ; -lin land_N = mkWN (compoundN "maan" (k39 "viljelys")) ; --f88 +lin land_N = mkN "maa" ; lin trade_N = mkN "kauppa" ; -lin watch_VS = mkVS "seurata" ; -lin watch_V2V = mkV2V (mkV "katsella") (mkPrep partitive) infIness ; +lin watch_VS = mkVS "katsoa" | mkVS "seurata" ; +lin watch_V2V = mkV2V (mkV "katsoa") (mkPrep genitive) infPresPart | 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 white_A = L.white_A ; lin situation_N = mkN (lin NK {s = d48A "tilanne"}) ; -lin ago_Adv = mkAdv (lin AdvK {s = c99 "sitten"}) ; +lin ago_Adv = mkAdv "sitten" ; lin teacher_N = mkN "opettaja" ; lin record_N = mkN "ennätys" ; lin record_3_N = mkN "kirjanpito" ; @@ -880,7 +893,7 @@ lin record_2_N = mkN "levy" | mkN "äänilevy" ; lin record_1_N = mkN "ennätys" ; lin manager_N = mkN "johtaja" ; lin relation_N = mkWN (k48A "suhde") ; --f73 -lin common_A = mkWA (k38 "tavallinen") ; +lin common_A = mkA "tavallinen" ; lin common_2_A = mkA "yhteinen" ; lin common_1_A = mkA "tavallinen" ; lin strong_A = mkA "vahva" ; @@ -892,18 +905,18 @@ lin field_2_N = mkN "kenttä" ; lin field_1_N = mkN "pelto" ; lin free_A = mkA "vapaa" ; lin break_V2 = L.break_V2 ; -lin break_V = mkWV (k52A "murtua") ; --f94 -lin yesterday_Adv = mkWAdv (k99 "eilen") ; -lin support_VV = mkWVV (k53 "vahvistaa") ; --UNCHK +lin break_V = mkV "murtua" ; --f94 +lin yesterday_Adv = mkAdv "eilen" ; +lin support_VV = mkVV (mkV "kannattaa") ; ---- subcat lin support_V2 = mkV2 "kannattaa" partitive ; lin window_N = L.window_N ; lin account_N = mkN "selvitys" ; -lin explain_VS = mkWVS (k53A "selittää") ; --f54 +lin explain_VS = mkVS (mkV "selittää") ; --f54 lin explain_V2 = mkV2 "selittää" ; -lin stay_VS = mkWVS (k52 "pysyä") ; --UNCHK -lin stay_VA = mkWVA (k52 "pysyä") ; --UNCHK -lin stay_V2 = mkWV2 (k52 "pysyä") ; --UNCHK -lin stay_V = mkWV (k52 "pysyä") ; --f88 +lin stay_VS = mkWVS (k52 "pysyä") ; ---- subcat +lin stay_VA = mkVA (mkV "pysyä") (mkPrep essive) ; +lin stay_V2 = mkV2 (mkV "jäädä") (mkPrep illative) | mkV2 (mkV "pysyä") (mkPrep essive) ; +lin stay_V = mkV "jäädä" | mkV "pysyä" ; --f88 lin few_Det = S.few_Det ; lin wait_VV = mkVV "valmistautua" infIllat ; lin wait_V2 = L.wait_V2 ; @@ -913,53 +926,53 @@ lin difference_N = mkN "ero" ; lin material_N = mkN "materiaali" ; lin air_N = mkN "ilma" ; lin wife_N = L.wife_N ; -lin cover_VS = mkWVS (k52A "pukeutua") ; --UNCHK +lin cover_VS = mkVS (mkV "peittää") ; ---- subcat lin cover_V2 = mkV2 "peittää" ; lin apply_VV = mkVV "hakea" infIllat ; -lin apply_V2V = mkWV2V (k52A "soveltua") ; --UNCHK -lin apply_V2 = mkV2 "soveltaa" partitive ; --WV2 (k52A "soveltua") ; +lin apply_V2V = mkV2V (mkV "soveltaa") partitive infIllat ; +lin apply_V2 = mkV2 "soveltaa" partitive ; lin apply_1_V2 = mkV2 "soveltaa" partitive ; lin apply_2_V2 = mkV2 "hakea" partitive ; -lin apply_V = mkWV (k52A "soveltua") ; --f59 +lin apply_V = mkV "soveltua" ; --f59 lin project_N = mkN "projekti" "projektin" "projekteja" ; -lin raise_V2V = mkWV2V (k53A "herättää") "kuolleista" ; --UNCHK +lin raise_V2V = mkV2V (mkV "nostaa") accusative infIllat ; ---- subcat lin raise_V2 = mkV2 "nostaa" ; lin sale_N = mkN "myynti" ; lin relationship_N = mkWN (k48A "suhde") ; -lin indeed_Adv = mkAdv (lin AdvK {s = c99 "todella"}) ; +lin indeed_Adv = mkAdv "tosiaan" ; lin light_N = mkN "valo" ; -lin claim_VV = mkWVV (k61 "periä") ; --UNCHK +lin claim_VV = mkVV (mkV "väittää") infPresPartAgr ; lin claim_VS = mkVS (mkV "väittää") ; --f86 -lin claim_V2 = mkV2 (lin VK {s = c61A "vaatia"}) ; +lin claim_V2 = mkV2 "vaatia" ; lin claim_V = mkV (mkV "hakea") "korvausta" ; --mkWV (k61 "periä") ; -lin form_V2 = mkWV2 (k73 "muovata") ; --f63 -lin form_V = mkWV (k73 "muovata") ; --UNCHK -lin base_V2 = mkV2 (lin VK {s = c53 "perustaa"}) ; -lin base_V = mkWV (k52A "pohjautua") ; --f99 +lin form_V2 = mkV2 "muodostaa" | mkV2 "muovata" ; --f63 +lin form_V = mkV "muodostua" | mkV "muovautua" ; +lin base_V2 = mkV2 "perustaa" ; +lin base_V = mkV "pohjautua" ; --f99 lin care_N = mkN "hoito" ; lin someone_NP = S.somebody_NP ; --f73 lin everything_NP = S.everything_NP ; lin certainly_Adv = mkAdv "varmasti" ; lin rule_N = L.rule_N ; -lin home_Adv = mkAdv "kotiin" ; -lin cut_V2A = mkWV2A (k62 "editoida") ; --UNCHK +lin home_Adv = mkAdv "kotiin" ; --- split mkAdv "kotona" +lin cut_V2A = mkV2A (mkV "leikata") accusative (mkPrep translative) ; lin cut_V2 = L.cut_V2 ; lin cut_V = mkV "leikata" ; -lin grow_VS = mkWVS (k67 "tulla") ; --UNCHK -lin grow_VA = mkWVA (k67 "tulla") ; --UNCHK -lin grow_V2V = mkWV2V (k67 "tulla") ; --UNCHK +lin grow_VS = mkVS (mkV "kasvaa") ; ---- subcat +lin grow_VA = mkVA (mkV "kasvaa") (mkPrep translative) ; +lin grow_V2V = mkV2V (mkV "kasvattaa") accusative infIllat ; ---- subcat lin grow_V2 = mkV2 "kasvattaa" ; --f56 -lin grow_V = mkV (lin VK {s = c56 "kasvaa"}) ; +lin grow_V = mkV "kasvaa" ; lin similar_A = mkA "samanlainen" ; -lin story_N = mkN "tarina" ; ---ARB mkN "kerros" +lin story_N = mkN "tarina" ; --- split mkN "kerros" lin quality_N = mkN "laatu" ; lin tax_N = mkN "vero" ; lin worker_N = mkN "työläinen" ; -lin nature_N = mkN (lin NK {s = d01A "luonto"}) ; -lin structure_N = mkWN (k10 "rakennelma") ; --f87 +lin nature_N = mkN "luonto" ; +lin structure_N = mkN "rakenne" | mkN "rakennelma" ; --f87 lin data_N = mkN "data" ; lin necessary_A = mkA "välttämätön" ; -lin pound_N = mkN "punta" ; ---ARB mkN "pauna" | mkN "naula" +lin pound_N = mkN "punta" ; --- split mkN "pauna" | mkN "naula" lin method_N = mkN "menetelmä" ; lin unit_N = mkN "yksikkö" ; lin unit_6_N = mkN "yksikkö" ; @@ -968,14 +981,14 @@ lin unit_4_N = mkN "yksikkö" ; lin unit_3_N = mkN "yksikkö" ; lin unit_2_N = mkN "yksikkö" ; lin unit_1_N = mkN "yksikkö" ; -lin central_A = mkWA (k38 "keskeinen") ; --f86 +lin central_A = mkA "keskeinen" ; --f86 lin bed_N = mkN "sänky" | mkN "vuode" ; lin union_N = mkN (lin NK {s = d06 "unioni"}) ; lin movement_N = mkN "liike" ; -lin board_N = mkN (lin NK {s = d39 "hallitus"}) ; +lin board_N = mkN "hallitus" ; lin board_2_N = mkN "hallitus" | mkN "lautakunta" ; lin board_1_N = mkN "taulu" ; -lin true_A = mkA "tosi" ; +lin true_A = mkA (mkN "tosi" "toden" "tosia" "totta") "todempi" "tosin" ; lin well_Interj = mkInterj "no" ; lin simply_Adv = mkAdv "yksinkertaisesti" ; lin contain_V2 = mkV2 "sisältää" | mkV2 "pidätellä" ; ---- split @@ -985,25 +998,25 @@ lin short_A = L.short_A ; lin personal_A = mkA "henkilökohtainen" ; --f202 lin detail_N = mkN "yksityiskohta" ; 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 bear_V2 = mkV2 "kantaa" ; --- split mkV2 "sietää" partitive +lin bear_V = mkV "kantaa" ; +lin single_A = mkA "yksittäinen" ; --f102 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" ; lin reduce_V2 = mkV2 "vähentää" partitive ; -lin reduce_V = mkV "vähentää" ; --f56 +lin reduce_V = mkV "vähentää" | mkV "vähentyä" ; --f56 lin establish_V2 = mkWV2 (mkV "perustaa") ; -lin wall_N = mkN "seinä" ; ---ARB muuri -lin face_V2 = mkWV2 (mkV "kohdata") ; -lin face_V = mkWV (k73A "kohdata") ; +lin wall_N = mkN "seinä" ; --- split mkN "muuri" +lin face_V2 = mkV2 (mkV "kohdata") ; +lin face_V = mkV "kohdata" ; lin easy_A = mkA "helppo" ; -lin private_A = mkWA (k38 "yksityinen") ; +lin private_A = mkA "yksityinen" ; lin computer_N = L.computer_N ; lin hospital_N = mkWN (k13 "sairaala") ; --f66 lin chapter_N = mkWN (k1A "luku") ; --f58 -lin scheme_N = mkWN (k39 "luonnos") ; +lin scheme_N = mkN "luonnos" ; lin theory_N = mkWN (k12 "teoria") ; lin choose_VV = mkVV "päättää" ; lin choose_VS = mkVS "valita" ; @@ -1019,12 +1032,12 @@ 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 financial_A = mkA "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_1_A = mkA "köyhä" ; -lin officer_N = mkN "vastaava" ; ---ARB mkN "upseeri" +lin officer_N = mkN "vastaava" ; --- already split lin officer_3_N = mkN "poliisi" ; lin officer_2_N = mkN "upseeri" ; lin officer_1_N = mkN "vastaava" ; @@ -1032,32 +1045,32 @@ lin up_Prep = mkPrep "ylös" partitive ; lin charge_N = mkN "varaus" ; lin charge_2_N = mkN "syytös" ; lin charge_1_N = mkN "varaus" ; -lin director_N = mkN (lin NK {s = d10 "johtaja"}) ; +lin director_N = mkN "johtaja" ; lin drive_VS = mkVS "ajaa" ; lin drive_V2V = mkV2V "ajaa" ; -lin drive_V2 = mkV2 "ajaa" ; +lin drive_V2 = mkV2 "ajaa" partitive ; lin drive_V = mkV "ajaa" ; --f63 -lin deal_V2 = mkWV2 (k67 "tarkastella") ; --UNCHK -lin deal_V = mkWV (k67 "tarkastella") ; --f77 +lin deal_V2 = mkV2 "käsitellä" partitive ; --- split mkV2 "jakaa" +lin deal_V = mkV (mkV "käydä") "kauppaa" ; --- split mkV (mkV "tulla) "toimeen" lin place_V2 = mkV2 "sijoittaa" ; lin approach_N = mkN "lähestymis" (mkN "tapa") ; --f81 lin chance_N = mkN (lin NK {s = d40 "mahdollisuus"}) ; lin application_N = mkN "sovellus" ; --f63 -lin seek_VV = mkWVV (k54A "pyytää") ; +lin seek_VV = mkVV (mkV "pyytää") infIllat ; lin seek_V2 = L.seek_V2 ; -lin foreign_A = mkWA (k38 "ulkomainen") ; --f404 +lin foreign_A = mkA "ulkomainen" ; --f404 lin foreign_2_A = mkA "vieras" ; lin foreign_1_A = mkA "ulkomaalainen" | mkA "ulkomainen" ; lin along_Prep = mkPrep "pitkin" ; lin top_N = mkN "huippu" ; -lin amount_N = mkWN (k10 "summa") ; --f309 +lin amount_N = mkN "summa" ; --f309 lin son_N = mkN "poika" "pojan" "poikia" ; lin operation_N = mkN "operaatio" ; lin fail_VV = mkVV (mkV "epäonnistua") infIllat ; -lin fail_V2V = mkWV2V (k72A "heiketä") ; --UNCHK -lin fail_V2 = mkWV2 (k72A "heiketä") ; --UNCHK -lin fail_V = mkWV (k72A "heiketä") ; --f68 -lin human_A = mkWA (k38 "inhimillinen") ; --f69 +lin fail_V2V = mkV2V (mkV "epäonnistua") accusative infIllat ; ---- subcat +lin fail_V2 = mkV2 (mkV "epäonnistua") (mkPrep inessive) ; +lin fail_V = mkV "epäonnistua" ; +lin human_A = mkA "inhimillinen" ; --f69 lin opportunity_N = mkN (lin NK {s = d40 "tilaisuus"}) ; lin simple_A = mkA "yksinkertainen" ; lin leader_N = mkN (lin NK {s = d10 "johtaja"}) ; @@ -1065,54 +1078,54 @@ lin look_N = mkWN (k48 "katse") ; lin share_N = mkN "osuus" ; lin production_N = mkN "tuotanto" ; lin recent_A = mkA "viimeaikainen" ; -lin firm_N = mkN (lin NK {s = d39 "yritys"}) ; +lin firm_N = mkN "yritys" ; lin picture_N = mkN "kuva" ; lin source_N = mkN "lähde" ; lin security_N = mkWN (k40 "turvallisuus") ; -lin serve_VV = mkWVV (k53A "syöttää") ; --UNCHK -lin serve_VS = mkWVS (k53A "syöttää") ; --UNCHK +lin serve_VV = mkVV (mkV "palvella") ; ---- subcat +lin serve_VS = mkVS (mkV "palvella") ; ---- subcat lin serve_V2 = mkV2 "palvella" partitive ; -lin serve_V = mkWV (k53A "syöttää") ; --f82 +lin serve_V = mkV "palvella" ; lin according_to_Prep = postPrep genitive "mukaan" ; lin end_VA = mkVA (mkV "päätyä") (mkPrep translative) ; lin end_V2 = mkV2 "lopettaa" ; lin end_V = mkV "loppua" ; lin contract_N = mkN "sopimus" ; lin wide_A = L.wide_A ; -lin occur_V = mkWV (k65 "käydä") ; --f78 -lin agreement_N = mkN (lin NK {s = d39 "sopimus"}) ; +lin occur_V = mkV "käydä" ; --f78 +lin agreement_N = mkN "sopimus" ; lin better_Adv = mkAdv "paremmin" ; lin kill_V2 = L.kill_V2 ; -lin kill_V = mkWV (k67A "voidella") ; --UNCHK -lin act_VA = mkWVA (k67A "menetellä") ; --UNCHK -lin act_V2V = mkWV2V (k67A "menetellä") ; --UNCHK -lin act_V2 = mkWV2 (k67A "menetellä") ; --UNCHK -lin act_V = mkV "toimia" ; +lin kill_V = mkV "tappaa" ; +lin act_VA = mkVA (mkV "käyttäytyä") (mkPrep "tavalla") ; ---- subcat ; "käyttäytyy X:n tavalla", wtf is this supposed to be anyway :-P "acts bad"? +lin act_V2V = mkV2V "käyttäytyä" ; ---- subcat +lin act_V2 = mkV2 "näytellä" ; --- split +lin act_V = mkV "toimia" | mkV "käyttäytyä" ; lin site_N = mkN "sijaintipaikka" ; lin either_Adv = mkAdv "myöskään" ; lin labour_N = mkN "työ" ; -lin plan_VV = mkVV (mkV "suunnitella") ; -lin plan_VS = mkWVS (k67 "kaavailla") ; --UNCHK -lin plan_V2V = mkWV2V (k67 "kaavailla") ; --UNCHK +lin plan_VV = mkVV (mkV "suunnitella") infPresPartAgr | mkVV "aikoa" ; +lin plan_VS = mkVS (mkV "suunnitella") ; +lin plan_V2V = mkV2V (mkV "suunnitella") genitive infPresPart ; lin plan_V2 = mkV2 "suunnitella" partitive ; lin plan_V = mkV "suunnitella" ; lin various_A = mkA "erilainen" ; ---?? lin since_Prep = postPrep elative "lähtien" ; -lin test_N = mkN (lin NK {s = d05 "testi"}) ; +lin test_N = mkN "testi" ; lin eat_V2 = L.eat_V2 ; -lin eat_V = mkWV (k53A "ruostuttaa") ; --UNCHK +lin eat_V = mkV "syödä" ; lin loss_N = mkN "menetys" ; -lin close_VS = mkWVS (k52A "sulkeutua") ; --UNCHK -lin close_VA = mkWVA (k52A "sulkeutua") ; --UNCHK -lin close_V2V = mkWV2V (k52A "sulkeutua") ; --UNCHK +lin close_VS = mkVS "sulkea" ; ---- subcat +lin close_VA = mkVA (mkV "sulkea") (mkPrep translative) ; ---- subcat +lin close_V2V = mkV2V "sulkea" ; ---- subcat lin close_V2 = L.close_V2 ; lin close_V = mkV "sulkea" ; lin represent_V2 = mkV2 "edustaa" partitive ; -lin represent_V = mkWV (k69 "merkitä") ; --UNCHK +lin represent_V = mkV "edustaa" | mkV "merkitä" ; lin love_VV = mkVV "rakastaa" ; -lin love_V2V = mkWV2V (k63 "saada") ; --UNCHK +lin love_V2V = mkV2V "rakastaa" ; ---- subcat lin love_V2 = L.love_V2 ; -lin colour_N = mkWN (k5 "väri") ; --UNCHK +lin colour_N = mkN "väri" ; lin clearly_Adv = mkAdv "selvästi" ; lin shop_N = L.shop_N ; lin benefit_N = mkWN (k1A "hyöty") ; --f161 @@ -1123,22 +1136,22 @@ lin purpose_N = mkN "tarkoitus" ; lin standard_N = mkN "standardi" ; lin due_A = mkA "asianmukainen" ; lin secretary_N = mkWN (compoundN "kirjoitus" (k10A "pöytä")) ; --f95 -lin rise_VA = mkWVA (k66 "nousta") "ylös" ; --UNCHK -lin rise_V2 = mkV2 "nousta" ; -lin rise_V = mkV (lin VK {s = c66 "nousta"}) ; -lin date_N = mkN "päivämäärä" ; ---ARB mkWN (k6 "taateli") ; --f101 +lin rise_VA = mkWVA (k66 "nousta") "ylös" ; ---- subcat +lin rise_V2 = mkV2 "nousta" elative ; +lin rise_V = mkV "nousta" ; +lin date_N = mkN "päivämäärä" ; --- already split 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_A = mkA "kova" ; --- already split 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 ; -lin prepare_VS = mkWVS (k52A "varautua") ; --UNCHK -lin prepare_V2V = mkWV2V (k52A "varautua") ; --UNCHK +lin prepare_VS = mkWVS (k52A "varautua") ; +lin prepare_V2V = mkWV2V (k52A "varautua") ; lin prepare_V2 = mkV2 "valmistaa" ; lin prepare_V = mkV "valmistautua" ; lin factor_N = mkN "tekijä" ; @@ -1149,63 +1162,63 @@ lin manage_VV = mkVVf (mkV "onnistua") infIllat ; lin manage_V2 = mkV2 "johtaa" partitive ; lin manage_V = mkV "johtaa" ; lin piece_N = mkN "palanen" ; -lin discuss_VS = mkWVS (k61A "pohtia") ; --UNCHK +lin discuss_VS = mkVS "keskustella" ; lin discuss_V2 = mkV2 "keskustella" elative ; -lin prove_VS = mkWVS (k61 "tutkia") ; --UNCHK -lin prove_VA = mkVA (mkV "osoittautua") (casePrep translative) ; -lin prove_V2V = mkWV2V (k61 "tutkia") ; --UNCHK +lin prove_VS = mkVS "todistaa" ; +lin prove_VA = mkVA (mkV "osoittautua") (mkPrep translative) ; +lin prove_V2V = mkV2V (mkV "todistaa") genitive infPresPart ; lin prove_V2 = mkV2 "todistaa" ; -lin prove_V = mkWV (k61 "tutkia") ; --UNCHK +lin prove_V = mkV "todistaa" ; lin front_N = mkWN (compoundN "etu" (k26 "puoli")) ; lin evening_N = mkWN (k9A "ilta") ; -lin royal_A = mkWA (k38 "kuninkaallinen") ; --UNCHK +lin royal_A = mkWA (k38 "kuninkaallinen") ; lin tree_N = L.tree_N ; -lin population_N = mkN "asujaimisto" ; -lin fine_A = mkA "hieno" ; ---ARB mkWA (k43 "ohut") ; -lin plant_N = mkN "kasvi" ; ---ARB mkN "laitos" -lin pressure_N = mkN (lin NK {s = d48 "paine"}) ; +lin population_N = mkN "populaatio" | mkN "väestö" | mkN "kanta" ; +lin fine_A = mkA "hieno" ; --- split mkWA (k43 "ohut") ; +lin plant_N = mkN "kasvi" ; --- split mkN "laitos" +lin pressure_N = mkN "paine" ; lin response_N = mkN "vastaus" ; -lin catch_VS = mkWVS (k73A "napata") ; --UNCHK -lin catch_V2 = mkV2 (mkV (mkV "ottaa") "kiinni" ) ; -lin catch_V = mkV (mkV "ottaa") "kiinni" | mkWV (k73A "napata") ; +lin catch_VS = mkVS (mkV "ymmärtää") ; --ymmärsin että XYZ +lin catch_V2 = mkV2 (mkV (mkV "saada") "kiinni") | mkV2 (mkV (mkV "ottaa") "kiinni") ; +lin catch_V = mkV (mkV "ottaa") "kiinni" | mkV "napata" ; lin street_N = mkWN (k1A "katu") ; --f71 -lin pick_V2 = mkV2 "poimia" partitive ; -lin pick_V = mkWV (k61A "nyppiä") ; --f69 -lin performance_N = mkWN (k39 "suoritus") ; --f187 +lin pick_V2 = mkV2 "poimia" partitive | mkV2 "kerätä" partitive ; +lin pick_V = mkV "poimia" | mkV "kerätä" | mkV "valita" | mkV "nyppiä" ; --f69 +lin performance_N = mkN "suoritus" ; --f187 lin performance_2_N = mkN "esitys" ; lin performance_1_N = mkN "suoritus" (mkN "kyky") ; -lin knowledge_N = mkWN (k9A "tajunta") ; --UNCHK +lin knowledge_N = mkN "tieto" ; lin despite_Prep = postPrep elative "huolimatta" ; -lin design_N = mkN "muotoilu" ; -lin page_N = mkN (lin NK {s = d01 "sivu"}) ; -lin enjoy_VV = mkVV "pitää" infElat ; +lin design_N = mkN "muotoilu" | mkN "design" "designin" "designia" "designina" "designiin" "designien" "designeja" "designeina" "designeissa" "designeihin" ; +lin page_N = mkN "sivu" ; +lin enjoy_VV = mkVV "pitää" infElat ; --- tekemisestä ; add more Inf3s in ParadigmsFin lin enjoy_V2 = mkV2 (mkV "nauttia") partitive ; lin individual_N = mkN "yksilö" ; -lin suppose_VS = mkWVS (k73 "arvata") ; --UNCHK -lin suppose_V2V = mkWV2V (mkV "olettaa") ; -lin suppose_V2 = mkWV2 (k73 "arvata") ; --UNCHK +lin suppose_VS = mkVS "olettaa" ; +lin suppose_V2V = mkV2V (mkV "olettaa") genitive infPresPart ; +lin suppose_V2 = mkV2 "arvata" ; lin rest_N = mkWN (k1A "lepo") ; --f110 lin instead_Adv = mkAdv "sen sijaan" ; -lin wear_V2 = mkV2 "kuluttaa" ; ---ARB mkV2 (mkV (mkV "pitää") "päällä") ; -lin wear_V = mkWV (k53A "pitää") ; --UNCHK +lin wear_V2 = mkV2 "kuluttaa" ; --- split mkV2 (mkV (mkV "pitää") "päällä") ; +lin wear_V = mkV "kulua" ; lin basis_N = mkN "perusta" ; lin size_N = mkN "koko" ; -lin environment_N = mkWN (k1 "ympäristö") ; +lin environment_N = mkN "ympäristö" ; lin per_Prep = mkPrep "per" nominative ; -lin fire_N = mkN "tuli" ; +lin fire_N = mkN "tuli" "tulia" ; lin fire_2_N = mkN "tulipalo" | mkN "palo" ; lin fire_1_N = mkN "tuli" "tulia" ; lin series_N = mkWN (k9 "sarja") ; -lin success_N = mkWN (k39 "menestys") ; --f93 -lin natural_A = mkWA (k38 "luonnollinen") ; --f126 +lin success_N = mkN "menestys" ; --f93 +lin natural_A = mkA "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ää") ; --- -lin argue_V2 = mkWV2 (k67 "perustella") ; -lin argue_V = mkV "kiistellä" ; +lin list_N = mkN "lista" ; +lin argue_VS = mkVS (mkV "väittää") ; +lin argue_V2 = mkV2 "perustella" ; +lin argue_V = mkV "riidellä" | mkV "kiistellä" ; lin final_A = mkA "lopullinen" ; lin future_N = mkN "tulevaisuus" ; --- already split lin future_3_N = mkN "futuuri" ; @@ -1213,10 +1226,10 @@ 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 ; -lin enter_V = mkV (mkV "mennä") "sisään" ; +lin enter_V = mkV L.go_V "sisään" ; lin space_N = mkN "avaruus" ; -lin arrive_V2 = mkWV2 (k67 "tulla") "perille" ; --UNCHK -lin arrive_V = mkV "saapua" | mkWV (k67 "tulla") "perille" ; +lin arrive_V2 = mkV2 "saapua" illative | mkV2 (mkV (mkV "tulla") "perille") (mkPrep illative) ; +lin arrive_V = mkV "saapua" | mkV (mkV "tulla") "perille" ; lin ensure_VS = mkVS "varmistaa" ; lin ensure_V2 = mkV2 "varmistaa" ; lin ensure_V = mkV "varmistaa" ; @@ -1227,46 +1240,46 @@ lin attention_N = mkN (lin NK {s = d03 "huomio"}) ; lin love_N = L.love_N ; lin principle_N = mkN "periaate" ; lin pull_V2 = L.pull_V2 ; -lin pull_V = mkWV (k53A "vetää") "ulos" ; --f70 +lin pull_V = mkV "vetää" ; lin set_N = mkWN (k9 "sarja") ; --f72 lin set_2_N = mkN "joukko" ; 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" ; +lin choice_N = mkN "valinta" ; --f68 +lin refer_V2 = mkV2 (mkV "viitata") illative ; lin refer_V = mkV "viitata" ; --f55 -lin feature_N = mkN "piirre" ; ---ARB mkWN (compoundN "erikois" (k6 "artikkeli")) ; +lin feature_N = mkN "piirre" ; --- split mkWN (compoundN "erikois" (k6 "artikkeli")) ; lin couple_N = mkN "pari" ; --f87 lin step_N = mkN "askel" ; -lin following_A = mkWA (k10 "seuraava") ; --UNCHK +lin following_A = mkWA (k10 "seuraava") ; lin thank_V2 = mkV2 "kiittää" partitive ; -lin machine_N = mkN (lin NK {s = d48 "kone"}) ; +lin machine_N = mkN "kone" ; lin income_N = mkN "tulo" ; -lin training_N = mkWN (k39 "harjoitus") ; --f54 +lin training_N = mkN "harjoitus" ; --f54 lin present_V2 = mkV2 "esittää" ; -lin association_N = mkN "järjestö" | mkN "assosiaatio" ; ---- split +lin association_N = mkN "järjestö" ; --- split mkN "assosiaatio" ; lin film_N = mkN "elokuva" ; lin film_2_N = mkN "kalvo" ; lin film_1_N = mkN "filmi" | mkN "elo" (mkN "kuva") ; -lin region_N = mkWN (k48 "alue") ; +lin region_N = mkN "alue" ; lin effort_N = mkN "ponnistus" ; lin player_N = mkN "pelaaja" ; lin everyone_NP = S.everybody_NP ; -lin present_A = mkWA (k38 "nykyinen") ; ---ARB mkA "läsnäoleva" +lin present_A = mkA "nykyinen" ; --- split mkA "läsnäoleva" lin award_N = mkN "palkinto" ; lin village_N = L.village_N ; lin control_V2 = mkV2 "kontrolloida" partitive ; -lin control_V = mkWV (k69 "hallita") ; --UNCHK +lin control_V = mkV "hallita" ; lin organisation_N = mkN "organisaatio" ; -lin whatever_Det = mkDet Sg (mkN "vapaavalintainen") ; ---- mikä tahansa -lin news_N = mkN (lin NK {s = d38 "uutinen"}) ; -lin nice_A = mkWA (k10 "mukava") ; --UNCHK -lin difficulty_N = mkWN (k10 "ongelma") ; --f63 -lin modern_A = mkWA (compoundA "nyky" (k38 "aikainen")) ; -lin cell_N = mkWN (k1 "solu") ; --f65 +lin whatever_Det = mkDet Sg {s = table NForm {nf => mika_NForms ! nf ++ "tahansa"} ; h = Back} ; +lin news_N = mkN "uutinen" ; +lin nice_A = mkA "mukava" ; +lin difficulty_N = mkN "ongelma" ; --f63 +lin modern_A = mkA "moderni" | mkWA (compoundA "nyky" (k38 "aikainen")) ; +lin cell_N = mkN "solu" ; --f65 lin close_A = mkA "läheinen" ; lin current_A = mkA "nykyinen" ; -lin legal_A = mkA (lin AK {s = d38 "laillinen"}) ; +lin legal_A = mkA "laillinen" ; lin energy_N = mkN "energia" ; lin finally_Adv = mkAdv "lopuksi" | mkAdv "lopulta" ; ---- split lin degree_N = mkN "aste" ; ---- already split @@ -1274,51 +1287,51 @@ lin degree_3_N = mkN "aste" ; lin degree_2_N = mkN "oppiarvo" ; lin degree_1_N = mkN "aste" ; lin mile_N = mkWN (kH1 "maili") ; --f84 -lin means_N = mkWN (k5 "konsti") ; --UNCHK -lin growth_N = mkN (lin NK {s = d01 "kasvu"}) ; +lin means_N = mkN "keino" | mkWN (k5 "konsti") ; +lin growth_N = mkN "kasvu" ; lin treatment_N = mkWN (k2 "käsittely") ; -lin sound_N = mkWN (k26 "ääni") ; --UNCHK +lin sound_N = mkWN (k26 "ääni") ; lin above_Prep = S.above_Prep ; -lin task_N = mkWN (k25 "toimi") ; --f67 +lin task_N = mkN "tehtävä" | mkWN (k25 "toimi") ; --f67 lin provision_N = mkWN (k9A "hankinta") ; --f205 -lin affect_V2 = mkWV2 (k53A "vaikuttaa") illative ; -lin please_Adv = mkAdv "mielellään" ; ---- cat +lin affect_V2 = mkV2 "vaikuttaa" illative ; +lin please_Adv = mkAdv "ole hyvä" | mkAdv "mielellään" ; ---- cat lin red_A = L.red_A ; lin happy_A = mkA "onnellinen" ; lin behaviour_N = mkN "käyttäytyminen" | mkN "käytös" ; ---- split lin concerned_A = mkA "tarkoitettu" ; lin point_V2 = mkV2 "osoittaa" partitive ; --mkWV2 (k73 "saumata") ; lin point_V = mkV "osoittaa" ; --f80 -lin function_N = mkN "funktio" ; ---ARB mkN "tehtävä" ---ARB mkWN (k5 "rooli") ; -lin identify_V2 = mkWV2 (k53 "tunnistaa") ; -lin identify_V = mkWV (k53 "tunnistaa") ; --UNCHK +lin function_N = mkN "funktio" ; --- split mkN "tehtävä" ---ARB mkWN (k5 "rooli") ; +lin identify_V2 = mkV2 "tunnistaa" ; +lin identify_V = mkV "tunnistaa" ; lin resource_N = mkWN (k9 "vara") ; --f65 -lin defence_N = mkN (lin NK {s = d39 "puolustus"}) ; +lin defence_N = mkN "puolustus" ; lin garden_N = L.garden_N ; lin floor_N = L.floor_N ; -lin technology_N = mkN "tekniikka" ; ---ARB mkN "teknologia" +lin technology_N = mkN "tekniikka" ; --- split mkN "teknologia" lin style_N = mkN "tyyli" ; -lin feeling_N = mkN (lin NK {s = d48A "tunne"}) ; +lin feeling_N = mkN "tunne" ; lin science_N = L.science_N ; -lin relate_V2 = mkV2 "suhteuttaa" ; -lin relate_V = mkWV (k62 "assosioida") ; --f64 +lin relate_V2 = mkV2 "liittää" | mkV2 "suhteuttaa" ; +lin relate_V = mkV "liittyä" | mkV vOlla "yhteydessä" ; lin doubt_N = mkN "epäilys" ; lin horse_N = L.horse_N ; -lin force_VS = mkWVS "pakottaa" ; -lin force_V2V = mkWV2V "pakottaa" ; ---ARB (k53A "tyrkyttää") ; --f71 -lin force_V2 = mkWV2 "pakottaa" ; -lin force_V = mkWV "pakottaa" ; -lin answer_N = mkWN (k39 "vastaus") ; -lin compare_V2 = mkWV2 (k67 "vertailla") ; --f60 +lin force_VS = mkVS "pakottaa" ; +lin force_V2V = mkV2V (mkV "pakottaa") accusative infIllat ; ---ARB (k53A "tyrkyttää") ; --f71 +lin force_V2 = mkV2 "pakottaa" ; +lin force_V = mkV "pakottaa" ; +lin answer_N = mkN "vastaus" ; +lin compare_V2 = mkV2 "verrata" partitive | mkV2 "vertailla" partitive ; --f60 lin compare_V = mkV "verrata" ; lin suffer_V2 = mkV2 "kärsiä" ; lin suffer_V = mkV "kärsiä" ; --f62 lin individual_A = mkA "yksilöllinen" ; -lin forward_Adv = mkWAdv (k99 "edelleen") ; --UNCHK -lin announce_VS = mkWVS (k53A "kuuluttaa") ; --f61 +lin forward_Adv = mkAdv "edelleen" ; +lin announce_VS = mkVS "julkistaa" | mkVS "tiedottaa" ; lin announce_V2 = mkV2 "julkistaa" ; lin user_N = mkN "käyttäjä" ; -lin fund_N = mkWN (k2 "rahasto") ; +lin fund_N = mkN "rahasto" ; lin character_2_N = mkN "merkki" ; ---- sense ? lin character_1_N = mkN "luonne" ; ---- sense ? lin risk_N = mkN "riski" ; @@ -1326,25 +1339,25 @@ lin normal_A = mkWA (k6 "normaali") ; 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 obtain_V = mkWV (k61A "hankkia") ; lin quickly_Adv = mkAdv "nopeasti" ; -lin army_N = mkN "armeija" ; --WN (k9 "lauma") ; +lin army_N = mkN "armeija" ; lin indicate_VS = mkWVS (k53A "osoittaa") ; --f120 lin indicate_V2 = mkWV2 (k53A "osoittaa") ; --f75 -lin indicate_V = mkWV (k53A "osoittaa") ; --UNCHK -lin forget_VS = mkV "unohtaa" ; --UNCHK +lin indicate_V = mkWV (k53A "osoittaa") ; +lin forget_VS = mkV "unohtaa" ; lin forget_V2 = L.forget_V2 ; lin forget_V = mkV "unohtaa" ; lin station_N = mkWN (k10 "asema") ; --f121 lin glass_N = mkN "lasi" ; -lin cup_N = mkWN (k5A "kuppi") ; --UNCHK -lin previous_A = mkWA (k38 "edellinen") ; --f408 +lin cup_N = mkWN (k5A "kuppi") ; +lin previous_A = mkA "edellinen" ; --f408 lin husband_N = L.husband_N ; 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" ; @@ -1353,7 +1366,7 @@ lin capital_3_N = mkN "isokirjain" ; ---- iso kirjain : CN lin capital_2_N = mkN "pää" (mkN "oma") ; lin capital_1_N = mkN "pää" (mkN "kaupunki") ; lin either_Det = MorphoFin.mkDetPol False Sg {s = table NForm {nf => (snoun2nounBind (nforms2snoun (dSuurempi "kumpi"))).s ! nf ++ "tahansa"} ; h = Back} ; -lin note_N = mkN "huomautus" ; ---ARB mkN "nuotti" +lin note_N = mkN "huomautus" ; --- already split lin note_3_N = mkN "nuotti" ; lin note_2_N = mkN "huomautus" ; lin note_1_N = mkN "muistiin" (mkN "pano") ; @@ -1369,85 +1382,85 @@ lin economy_N = mkN "talous" "talouden" "talouksia" ; lin economy_2_N = mkN "säästö" ; 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_V2V = mkWV2V (k67 "taistella") ; ---- subcat lin fight_V2 = L.fight_V2 ; lin fight_V = mkWV (k67 "taistella") ; -lin train_V2V = mkWV2V (k67A "harjoitella") ; --UNCHK -lin train_V2 = mkWV2 (k67A "harjoitella") ; --UNCHK +lin train_V2V = mkV2V "valmentaa" | mkV2V "harjoittaa" ; --valmensin häntä taistelemaan +lin train_V2 = mkWV2 (k67A "harjoitella") ; lin train_V = mkWV (k67A "harjoitella") ; -lin maintain_VS = mkVS "vakuuttaa" ; ---- mkWVS (k53A "säilyttää") ; +lin maintain_VS = mkVS "vakuuttaa" ; lin maintain_V2 = mkV2 "ylläpitää" partitive ; -lin maintain_V = mkWV (k53A "säilyttää") ; +lin maintain_V = mkV "säilyä" | mkWV (k53A "säilyttää") ; lin attempt_N = mkN (lin NK {s = d39 "yritys"}) ; lin leg_N = L.leg_N ; lin investment_N = mkN (lin NK {s = d05A "investointi"}) ; lin save_V2 = mkV2 "pelastaa" ; lin save_V = mkV "säästää" ; lin throughout_Prep = mkPrep "läpi koko" genitive ; -lin design_V2V = mkWV2V (mkV "suunnitella") ; +lin design_V2V = mkV2V (mkV "suunnitella") accusative infIllat ; ---- subcat lin design_V2 = mkV2 "muotoilla" ; lin design_V = mkV "muotoilla" ; lin suddenly_Adv = mkAdv "yhtäkkiä" | mkAdv "äkkiä" ; lin brother_N = exceptNomN (mkN "velji" "veljen" "veljiä") "veli" ; -lin improve_V2 = mkWV2 (k52A "parantua") partitive ; +lin improve_V2 = mkV2 "parantaa" partitive ; lin improve_V = mkWV (k52A "parantua") ; --f72 -lin avoid_VV = mkWVV (k53A "välttää") ; --UNCHK +lin avoid_VV = mkVV (mkV "välttää") infElat ; lin avoid_V2 = mkWV2 (k53A "välttää") partitive ; lin wonder_VQ = L.wonder_VQ ; -lin wonder_V2 = mkWV2 (k67 "tiedustella") ; --UNCHK -lin wonder_V = mkWV (k67 "tiedustella") ; --UNCHK -lin tend_VV = mkVV (mkV "tapaa") ; -lin tend_V2 = mkWV2 (k53A "pitää") ; --UNCHK -lin tend_V = mkV "kallistua" ; --mkWV (k53A "pitää") ; +lin wonder_V2 = mkV2 "ihmetellä" partitive ; +lin wonder_V = mkV "ihmetellä" ; +lin tend_VV = mkVV (mkV "tavata") ; +lin tend_V2 = mkV2 "pitää" partitive | mkV2 "hoitaa" partitive ; +lin tend_V = mkV "kallistua" ; lin title_N = mkN "titteli" ; lin hotel_N = mkWN (k6 "hotelli") ; lin aspect_N = mkN "aspekti" ; lin increase_N = mkN "nousu" ; lin help_N = mkN "apu" ; -lin industrial_A = mkWA (k38 "teollinen") ; --f167 +lin industrial_A = mkA "teollinen" ; --f167 lin express_V2 = mkV2 "ilmaista" ; lin summer_N = mkN "kesä" ; lin determine_VV = mkVV "päättää" ; lin determine_VS = mkVS (mkV "päättää") ; -lin determine_V2V = mkWV2V (k66 "ratkaista") ; --UNCHK -lin determine_V2 = mkWV2 (mkV "määrätä") ; -lin determine_V = mkWV (k66 "ratkaista") ; --UNCHK +lin determine_V2V = mkV2V (mkV "päättää") genitive infPresPart ; +lin determine_V2 = mkV2 "päättää" | mkV2 "määrätä" ; --- split mkV2 "ratkaista" +lin determine_V = mkV "määrätä" | mkV "päättää" ; --mkV "ratkaista" ; lin generally_Adv = mkAdv "yleisesti" ; -lin daughter_N = mkN "tytär" ; --CHECKED -lin exist_V2V = mkWV2V (k67 "olla") ; --UNCHK +lin daughter_N = mkN "tytär" ; +lin exist_V2V = mkV2V exist_V ; ---- subcat lin exist_V = mkV vOlla "olemassa" ; lin share_V2 = mkWV2 (k56A "jakaa") ; -lin share_V = mkWV (k56A "jakaa") ; --UNCHK +lin share_V = mkWV (k56A "jakaa") ; lin baby_N = L.baby_N ; lin nearly_Adv = mkAdv "lähestulkoon" ; lin smile_V2 = mkWV2 (k67 "hymyillä") ; --UNCHK lin smile_V = mkWV (k67 "hymyillä") ; lin sorry_A = mkWA (k10 "oleva") "pahoillaan" ; lin sea_N = L.sea_N ; -lin skill_N = mkWN (k1A "tieto") ; --UNCHK +lin skill_N = mkN "taito" | mkN "kyky" ; lin claim_N = mkN "vaatimus" ; lin treat_V2 = mkWV2 (k53A "hoitaa") ; lin treat_V = mkV "hoitua" ; --mkWV (k53A "hoitaa") ; lin remove_V2 = mkV2 "poistaa" ; -lin remove_V = mkV "poistaa" ; +lin remove_V = mkV "poistua" ; lin concern_N = mkN "konserni" ; lin university_N = L.university_N ; -lin left_A = mkWA (k38 "vasemmistolainen") ; --UNCHK +lin left_A = mkA "vasemmistolainen" ; lin dead_A = mkWA (k47 "kuollut") ; lin discussion_N = mkN "keskustelu" ; lin specific_A = mkA "erityinen" ; lin customer_N = mkN "asiakas" ; lin box_N = mkN "laatikko" | mkWN (k41A "lipas") ; lin outside_Prep = mkPrep "ulkopuolella" ; -lin state_VS = mkWVS (k74A "todeta") ; --UNCHK +lin state_VS = mkWVS (k74A "todeta") | mkVS "lausua" ; lin state_V2 = mkWV2 (k74A "todeta") ; lin conference_N = mkN "konferenssi" ; -lin whole_N = mkWN (k40 "kokonaisuus") ; --UNCHK -lin total_A = mkWA (k38 "totaalinen") ; --f237 +lin whole_N = mkWN (k40 "kokonaisuus") ; +lin total_A = mkA "totaalinen" ; --f237 lin profit_N = mkN "voitto" ; lin division_N = mkN "osasto" ; lin division_3_N = mkN "jako" (mkN "lasku") ; @@ -1457,11 +1470,11 @@ lin throw_V2 = L.throw_V2 ; lin throw_V = mkV "heittää" ; lin procedure_N = mkWN (k2 "menettely") ; --f52 lin fill_V2 = mkV2 "täyttää" ; -lin fill_V = mkWV (k73A "paikata") ; --UNCHK +lin fill_V = mkV "täyttyä" ; lin king_N = L.king_N ; lin assume_VS = mkVS (mkV "olettaa") ; --f52 -lin assume_V2 = mkV2 "olettaa" ; -lin assume_V = mkWV (k52A "sonnustautua") ; --UNCHK +lin assume_V2 = mkV2 "olettaa" ; --- split omaksua, ottaa +lin assume_V = mkV "olettaa" ; lin image_N = mkN "mielikuva" ; lin oil_N = L.oil_N ; lin obviously_Adv = mkAdv "selvästi" | mkAdv "ilmeisesti" ; @@ -1470,37 +1483,37 @@ lin appropriate_A = mkA "sopiva" ; lin circumstance_N = mkN "olosuhde" ; lin military_A = mkA "sotilaallinen" ; lin proposal_N = mkN "ehdotus" ; -lin mention_VS = mkWVS (k73 "huomata") ; --UNCHK -lin mention_V2 = mkWV2 (k73 "huomata") ; --UNCHK -lin mention_V = mkWV (k73 "huomata") ; --UNCHK +lin mention_VS = mkVS "mainita" ; +lin mention_V2 = mkV2 "mainita" ; +lin mention_V = mkV "mainita" ; lin client_N = mkN (lin NK {s = d41A "asiakas"}) ; lin sector_N = mkN (lin NK {s = d06 "sektori"}) ; lin direction_N = mkWN (k39 "ohjaus") ; --f64 -lin admit_VS = mkWVS (k53 "tunnustaa") ; --UNCHK -lin admit_V2 = mkV2 "myöntää" ; -lin admit_V = mkWV (k53 "tunnustaa") ; --UNCHK +lin admit_VS = mkVS "myöntää" | mkWVS (k53 "tunnustaa") ; +lin admit_V2 = mkV2 "myöntää" | mkV2 "tunnustaa" ; +lin admit_V = mkV "myöntää" | mkWV (k53 "tunnustaa") ; lin though_Adv = mkWAdv (k99 "kuitenkin") ; --f64 -lin replace_VV = mkWVV (k56A "vaihtaa") ; --UNCHK +lin replace_VV = mkWVV (k56A "vaihtaa") ; ---- subcat lin replace_V2 = mkV2 "korvata" ; lin basic_A = mkA "perustava" ; --WA (k38 "perimmäinen") ; -lin hard_Adv = mkWAdv (k99 "kovasti") ; -lin instance_N = mkWN (k39 "tapaus") ; --UNCHK +lin hard_Adv = mkAdv "kovasti" ; +lin instance_N = mkN "tapaus" ; lin sign_N = mkN "merkki" ; lin original_A = mkA (mkN "alku" (mkN "peräinen")) ; lin successful_A = mkWA (k47 "onnistunut") ; --f91 -lin okay_Adv = mkWAdv (k99 "mukavasti") ; --UNCHK +lin okay_Adv = mkAdv "hyvin" | mkAdv "ihan hyvin" | mkWAdv (k99 "mukavasti") ; lin reflect_V2 = mkV2 "harkita" partitive ; -lin reflect_V = mkWV (k61 "tuumia") ; --UNCHK -lin aware_A = mkA "tietoinen" ; --mkWA (k10 "tietävä") ; -lin measure_N = mkN (lin NK {s = d01 "keino"}) ; +lin reflect_V = mkV "pohtia" | mkWV (k61 "tuumia") ; +lin aware_A = mkA "tietoinen" ; +lin measure_N = mkN "keino" ; lin attitude_N = mkN "asenne" ; lin disease_N = mkWN (k5A "tauti") ; lin exactly_Adv = mkAdv "täsmälleen" ; lin above_Adv = mkAdv "yläpuolella" ; lin commission_N = mkN (lin NK {s = d03 "komissio"}) ; lin intend_VV = mkVV (mkV "aikoa") ; -lin intend_V2V = mkWV2V "kaavailla" ; -lin intend_V2 = mkWV2 (k67A "ajatella") ; --UNCHK +lin intend_V2V = mkV2V "kaavailla" genitive infPresPart ; +lin intend_V2 = mkV2 "yrittää" | mkV2 "ajatella" ; lin intend_V = mkV "tarkoittaa" ; --mkWV (k67A "ajatella") ; lin beyond_Prep = mkPrep "saavuttamattomissa" ; lin seat_N = mkWN (k33 "istuin") ; --f102 @@ -1510,18 +1523,19 @@ lin encourage_V2 = mkWV2 (k66 "rohkaista") ; --f64 lin addition_N = mkWN (k39 "lisäys") ; --f55 lin goal_N = mkWN (kH1 "maali") ; --f96 lin round_Prep = mkPrep "ympärillä" ; -lin miss_V2 = mkV2 "menettää" ; ---ARB mkV2 "kaivata" partitive ---ARB mkWV2 (k73 "missata") ; +lin miss_V2 = mkV2 "menettää" ; --- split mkV2 "kaivata" partitive ; mkWV2 (k73 "missata") ; lin miss_V = mkV "puuttua" ; lin popular_A = mkWA (k1A "suosittu") ; --f81 -lin affair_N = mkWN (k1A "juttu") ; --f63 +lin affair_N = mkWN (k1A "juttu") ; --- split lin technique_N = mkN "tekniikka" ; -lin respect_N = mkWN (k39 "kunnioitus") ; --UNCHK +lin respect_N = mkWN (k39 "kunnioitus") ; lin drop_V2 = mkWV2 (k53A "pudottaa") ; lin drop_V = mkV "pudota" ; -lin professional_A = mkA "professionaalinen" ; +lin professional_A = mkA "ammattimainen" ; lin less_Det = mkDet Sg (exceptNomN (mkN "vähempä") "vähemmän") ; lin once_Subj = mkSubj "sitten kun" ; -lin item_N = mkN "kohta" ; +lin item_N = mkN "kohta" ; --- split mkN "esine" | mkN "objekti" +---- checked by IL till item_N in the BNC order lin fly_VS = mkWVS (k52A "haihtua") ; --UNCHK lin fly_V2 = mkV2 "lennättää" partitive ; --WV2 (k52A "haihtua") ; lin fly_V = L.fly_V ; @@ -3142,7 +3156,7 @@ lin mode_N = mkN "tapa" ; ---ARB --mkWN (k5 "tyyli") ; lin saving_N = mkN "säästö" ; --f79 lin comfortable_A = mkA "mukava" ; lin camp_N = mkWN (k5 "leiri") ; --UNCHK -lin trade_V2 = mkWV2 (k63 "myydä") ; --f95 +lin trade_V2 = mkWV2 (mkV "myydä") ; --f95 lin trade_V = mkV (lin VK {s = c73A "kaupata"}) ; lin export_N = mkWN (k5A "vienti") ; lin wake_V2 = mkWV2 (k52A "havahtua") ; --UNCHK @@ -7582,8 +7596,8 @@ lin damaging_A = mkWA (k38 "kielteinen") ; --UNCHK lin orbit_N = mkWN (k40 "ulottuvuus") ; --UNCHK lin mains_N = variants{} ; -- lin discard_V2 = mkWV2 (k73A "hylätä") ; -lin dine_V2 = mkWV2 (k74 "tarjota") "päivällinen" ; --UNCHK -lin dine_V = mkWV (k74 "tarjota") "päivällinen" ; --UNCHK +lin dine_V2 = mkV2 (mkV (mkV "syödä") "päivällistä") ; --UNCHK +lin dine_V = mkV (mkV "syödä") "päivällistä" ; --UNCHK lin compartment_N = mkWN (k2 "osasto") ; --UNCHK lin revised_A = variants{} ; -- lin privatization_N = mkWN (compoundN "yks" (k38 "ityistäminen")) ; --UNCHK