checked more in DictionaryFin

This commit is contained in:
aarne
2014-06-14 09:25:08 +00:00
parent fd2a8a2ccf
commit f010b4a572
2 changed files with 132 additions and 131 deletions

View File

@@ -1,5 +1,5 @@
--# -path=.:src/finnish/stemmed:src/finnish:src/abstract:src/common:src/finnish/kotus:src/api
---- checked by AR till expression_N in the BNC order
---- checked by AR till beginning_N in the BNC order
concrete TopDictionaryFin of TopDictionary = CatFin ** open ParadigmsFin,
(S = StructuralFin),
(L = LexiconFin),
@@ -33,7 +33,7 @@ lin have_VV = S.must_VV ;
lin have_V2 = S.have_V2 ;
lin have_V = lin V S.have_V2 ;
lin it_Pron = S.it_Pron ;
lin to_Prep = S.to_Prep ;
lin to_Prep = S.to_Prep | mkPrep "luo" | mkPrep "luokse" | mkPrep "tykö" ; ---- split
lin for_Prep = S.for_Prep ;
lin i_Pron = optProDrop S.i_Pron ;
lin iFem_Pron = optProDrop S.i_Pron ;
@@ -42,10 +42,10 @@ lin he_Pron = S.he_Pron ;
lin on_Prep = S.on_Prep ;
lin with_Prep = S.with_Prep ;
lin do_V2 = mkV2 tehda_V ;
lin at_Prep = casePrep inessive ; ---
lin at_Prep = casePrep inessive | casePrep adessive | mkPrep "luona" | mkPrep "tykönä" ; ---- split
lin by_Prep = postPrep genitive "kautta" ;
lin but_Conj = mkConj "mutta" ;
lin from_Prep = S.from_Prep ;
lin from_Prep = casePrep elative | casePrep ablative | mkPrep "luota" | mkPrep "tyköä" ; ---- split
lin they_Pron = S.they_Pron ;
lin theyFem_Pron = S.they_Pron ;
lin she_Pron = S.she_Pron ;
@@ -1617,112 +1617,112 @@ lin otherwise_Adv = mkWAdv (k99 "muuten") ;
lin railway_N = mkN "rautatie" | mkWN (k9A "rata") ;
lin directly_Adv = mkAdv "suoraan" ;
lin supply_N = mkN "tarjonta" ;
lin expression_N = mkN "ilmaisu" | mkN "ilmaus" ; ---- AR checked
lin expression_N = mkN "ilmaisu" | mkN "ilmaus" ;
lin owner_N = mkN (lin NK {s = d10 "omistaja"}) ;
lin associate_V2 = mkWV2 (k62 "assosioida") ;
lin associate_V = mkV "assosioitua" ; --mkWV (k62 "assosioida") ;
lin corner_N = mkWN (k10 "kulma") ; --UNCHK
lin associate_V = mkV "assosioitua" ;
lin corner_N = mkWN (k10 "kulma") ;
lin past_A = mkA "entinen" ;
lin match_N = mkN "vastine" ; ---ARB --mkN "ottelu" ; --mkN "tulitikku" ;
lin match_3_N = mkN "yhteensopivuus" ;
lin match_N = mkN "vastine" ;
lin match_3_N = mkN "yhteensopivuus" | mkN "vastine" ;
lin match_2_N = mkN "tuli" (mkN "tikku") ;
lin match_1_N = mkN "ottelu" | mkN "matsi" ;
lin sport_N = mkN "urheilu" ; --f88
lin sport_N = mkN "urheilu" ;
lin status_N = mkN "asema" ;
lin beautiful_A = L.beautiful_A ;
lin offer_N = mkN "tarjous" ;
lin marriage_N = mkN "avioliitto" ;
lin hang_V2 = mkWV2 (k53A "riiputtaa") ; --UNCHK
lin hang_V = mkWV (k53A "riiputtaa") ; --UNCHK
lin hang_V2 = mkV2 "ripustaa" | mkWV2 (k53A "riiputtaa") | mkV2 "hirttää" ; ---- split
lin hang_V = mkV "riippua" | mkV "roikkua" ;
lin civil_A = mkA "siviili" ; ---
lin perform_V2 = mkWV2 (k71 "tehdä") ; --UNCHK
lin perform_V2 = mkV2 "suorittaa" ;
lin perform_V = mkV "esittää" ;
lin sentence_N = mkN "lause" ; ---ARB mkWN (k3 "tuomio") ;
lin crime_N = mkWN (k39 "rikos") ; --f93
lin ball_N = mkWN (k1A "syöttö") ; --UNCHK
lin sentence_N = mkN "lause" | mkWN (k3 "tuomio") ; --- split
lin crime_N = mkWN (k39 "rikos") ;
lin ball_N = mkN "pallo" ;
lin marry_V2 = mkV2 "naida" ;
lin marry_V = mkV L.go_V "naimisiin" ;
lin marry_V = mkV L.go_V "naimisiin" | mkV "avioitua" ;
lin wind_N = L.wind_N ;
lin truth_N = mkWN (k40 "totuus") ; --UNCHK
lin protect_V2 = mkWV2 (k67 "suojella") ; --f94
lin protect_V = mkWV (k67 "suojella") ; --UNCHK
lin truth_N = mkWN (k40 "totuus") ;
lin protect_V2 = mkV2 "suojella" partitive ;
lin protect_V = mkWV (k67 "suojella") ;
lin safety_N = mkN "turvallisuus" ;
lin partner_N = mkWN (k6 "partneri") ; --f196
lin partner_N = mkWN (k6 "partneri") | mkN "kumppani" ;
lin completely_Adv = mkAdv "täysin" ;
lin copy_N = mkN "kopio" ;
lin balance_N = mkN "tasapaino" ;
lin copy_N = mkN "kopio" | mkN "jäljennös" ;
lin balance_N = mkN "tasapaino" | mkN "balanssi" ;
lin sister_N = L.sister_N ;
lin reader_N = mkN "lukija" ; ---ARB lukemisto
lin below_Adv = mkAdv "alapuolella" ; --WAdv (k99 "alle") ;
lin trial_N = mkWN (k5 "testi") ; --f112
lin reader_N = mkN "lukija" | mkN "lukemisto" ; ---- split
lin below_Adv = mkAdv "alapuolella" ;
lin trial_N = mkWN (k5 "testi") ;
lin rock_N = L.rock_N ;
lin damage_N = mkN "vahinko" ;
lin adopt_V2 = mkV2 "omaksua" ; --f87 ---ARB ; adoptoida ; liittyä jhk
lin adopt_V2 = mkV2 "omaksua" ;
lin newspaper_N = L.newspaper_N ;
lin meaning_N = mkN "merkitys" ;
lin light_A = mkWA (k10 "valoisa") ; --f68
lin light_A = mkA "kevyt" | mkWA (k10 "valoisa") ; ---- split
lin essential_A = mkA "olennainen" ;
lin obvious_A = mkWA (kH1 "ilmeinen") ;
lin nation_N = mkN "kansa" (mkN "kunta") ;
lin confirm_VS = mkVS (mkV "vahvistaa") ;
lin confirm_V2 = mkV2 "vahvistaa" ; --f62
lin south_N = mkWN (k10 "etelä") ; --UNCHK
lin length_N = mkWN (k40 "pituus") ; --UNCHK
lin branch_N = mkWN (k9 "haara") ; --f94
lin deep_A = mkWA (k10 "syvä") ; --f66
lin confirm_V2 = mkV2 "vahvistaa" | mkV2 "varmistaa" ;
lin south_N = mkWN (k10 "etelä") ;
lin length_N = mkWN (k40 "pituus") ;
lin branch_N = mkWN (k9 "haara") | mkN "oksa" ; ---- split
lin deep_A = mkWA (k10 "syvä") | mkA "syvällinen" ; ---- split ?
lin none_NP = S.nothing_NP ;
lin planning_N = mkWN (k2 "suunnittelu") ; --UNCHK
lin planning_N = mkWN (k2 "suunnittelu") ;
lin trust_N = mkN (lin NK {s = d39 "luottamus"}) ;
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 pain_N = mkWN (k1A "särky") | mkN "kipu" ;
lin studio_N = mkWN (k3 "studio") ;
lin positive_A = mkA "positiivinen" | mkA "myönteinen" ; ---- split
lin spirit_N = mkWN (k1 "sielu") ; --f55
lin college_N = mkWN (k8 "college") ; --f73
lin spirit_N = mkN "henki" ;
lin college_N = mkWN (k8 "college") ; ---- yliopisto
lin accident_N = mkN "onnettomuus" | mkN "sattuma" ; ---- split
lin star_V2 = mkWV2 (k69 "merkitä") "asteriskilla" ; --UNCHK
lin hope_N = mkWN (k1 "toivo") ; --f88
lin mark_V3 = mkWV3 (k53A "pilkuttaa") ; --UNCHK
lin mark_V2 = mkWV2 (k53A "merkitä") ; --f64
lin works_N = mkWN (compoundN "suur" (k19 "työ")) ; --UNCHK
lin league_N = mkWN (k1A "liitto") ; --UNCHK
lin star_V2 = mkV2 "esiintyä" inessive ; ---- sense
lin hope_N = mkWN (k1 "toivo") ;
lin mark_V3 = mkV2 "merkitä" accusative allative ; ---- sense
lin mark_V2 = mkWV2 (k53A "merkitä") ;
lin works_N = mkN "laitos" | mkWN (compoundN "suur" (k19 "työ")) ; ---- split: water works ; collected words
lin league_N = mkWN (k1A "liitto") ;
lin league_2_N = mkN "liiga" ;
lin league_1_N = mkN "liiga" ;
lin clear_V2 = mkWV2 (k53 "puhdistaa") ;
lin clear_V = mkWV (k53 "puhdistaa") ; --UNCHK
lin imagine_VS = mkWVS (k73 "arvata") ;
lin imagine_V2 = mkWV2 (k73 "arvata") ; --UNCHK
lin imagine_V = mkWV (k73 "arvata") ; --UNCHK
lin through_Adv = mkWAdv (k99 "läpikotaisin") ; --UNCHK
lin clear_V = mkV "selkeytyä" ;
lin imagine_VS = mkVS (mkV "kuvitella") ;
lin imagine_V2 = mkV2 "kuvitella" ;
lin imagine_V = mkV "kuvitella" ;
lin through_Adv = mkV "läpi" ;
lin cash_N = mkN "käteinen" ;
lin normally_Adv = mkAdv "normaalisti" ;
lin play_N = mkN "näytelmä" ; --WN (k2 "miekkailu") ;
lin play_N = mkN "näytelmä" ;
lin strength_N = mkN "vahvuus" ;
lin train_N = L.train_N ;
lin travel_V2 = mkV2 "matkustaa" illative ; --mkWV2 (k52A "siirtyä") ;
lin travel_V2 = mkV2 "matkustaa" illative ;
lin travel_V = L.travel_V ;
lin target_N = mkN "maalitaulu" ;
lin target_N = mkN "maalitaulu" | mkN "kohde" ; ---- split concrete vs. abstract
lin very_A = mkA "nimenomainen" ;
lin pair_N = mkWN (kH1 "pari") ;
lin male_A = mkA "miespuolinen" | mkA "urospuolinen" ;
lin gas_N = mkWN (k1 "kaasu") ;
lin gas_N = mkWN (k1 "kaasu") | mkN "bensiini" | mkN "bensa" ; ---- split liquid or gas ; gasoline
lin issue_V2 = mkV2 "julkaista" ;
lin issue_V = mkWV (k67 "tulla") "esiin" ; --f53
lin contribution_N = mkWN (k40 "panos") ; --f64
lin issue_V = mkWV (k67 "tulla") "esiin" ; ---- sense
lin contribution_N = mkWN (k40 "panos") ;
lin complex_A = mkA "monimutkainen" ;
lin supply_V2 = mkV2 "tarjota" ;
lin beat_V2 = mkWV2 (k52A "takoa") ; --UNCHK
lin beat_V = mkWV (k52A "takoa") ; --UNCHK
lin supply_V2 = mkV2 "tarjota" partitive ;
lin beat_V2 = mkV2 "hakata" partitive | mkV2 "lyödä" partitive ;
lin beat_V = mkWV (k52A "takoa") ;
lin artist_N = mkN "taiteilija" | mkWN (k5 "artisti") ;
lin agentMasc_N = mkN "agentti" | mkN "edustaja" ;
lin presence_N = mkN "läsnäolo" ;
lin along_Adv = mkAdv "mukana" ; ---ARB mkWAdv (compoundAdv "eteen" (k99 "päin")) ;
lin along_Adv = mkAdv "mukana" | mkAdv "mukaan" ; ---- split be along ; go along
lin environmental_A = mkA (separateN "ympäristöä" (mkN "koskeva")) ;
lin strike_V2 = mkWV2 (k73 "tasata") ; --UNCHK
lin strike_V2 = mkV2 "iskeä" allative ;
lin strike_V = mkV "iskeä" ;
lin contact_N = mkWN (k40 "yhteys") ;
lin contact_N = mkN "kontakti" | mkWN (k40 "yhteys") ;
lin protection_N = mkN "suojelu" ;
lin beginning_N = mkN "alku" ;
lin beginning_N = mkN "alku" ; ---- END checked AR
lin demand_VS = mkWVS (k61A "vaatia") ;
lin demand_V2 = mkWV2 (k61A "vaatia") ; --f52
lin media_N = mkN "media" ;