diff --git a/examples/stoneage/StoneageNor.gf b/examples/stoneage/StoneageNor.gf index 3fe4d87ea..2e84a0978 100644 --- a/examples/stoneage/StoneageNor.gf +++ b/examples/stoneage/StoneageNor.gf @@ -31,12 +31,10 @@ lin Hear = PresVasV2 hear_V ; Know = PresVasV2 know_V ; Think = PresVasV2 think_V ; - Smell s o = PresCl (SPredV2 s (dirV2 kenne_V) (DefOneNP - (AdvCN (UseN (mk2N "lukt" "lukten")) - (PrepNP possess_Prep o)))) ; + Smell = PresV2 (mkV2 (regV "lukte") "på") ; Fear = PresVasV2 fear_V ; Kill = PresVasV2 kill_V ; - Fight s o = PresCl (AdvCl (SPredV s fight_V) (AdvPP (PrepNP with_Prep o))) ; + Fight s o = PresCl (AdvCl (SPredV s slåss_V) (AdvPP (PrepNP with_Prep o))) ; Hunt = PresVasV2 hunt_V ; Hit = PresVasV2 hit_V ; Cut = PresVasV2 cut_V ; diff --git a/lib/resource/MkLexicon.hs b/lib/resource/MkLexicon.hs index f0f2e8f16..750e94880 100644 --- a/lib/resource/MkLexicon.hs +++ b/lib/resource/MkLexicon.hs @@ -106,3 +106,15 @@ prQuot s = "\"" ++ s ++ "\"" isConsonant = not . isVowel isVowel = flip elem "aeiouyäöå" + +-- Norwegian 13/3 + +groupLines :: [String] -> [String] +groupLines ss = [unwords [a, b, c] | [a,_,b,c,_] <- grps ss] where + grps ls = let (g,rest) = splitAt 5 ls in g:grps rest + +lin2fun s = case words s of + _:fun:_:_ -> " fun " ++ fun ++ " : " ++ cat fun ++ " ;" + _ -> s + where + cat fun = reverse (takeWhile (/='_') (reverse fun)) diff --git a/lib/resource/english/MkVerbs.hs b/lib/resource/english/MkVerbs.hs index 0efd9a923..734dec32a 100644 --- a/lib/resource/english/MkVerbs.hs +++ b/lib/resource/english/MkVerbs.hs @@ -11,13 +11,15 @@ import List -- parameters, depending on language -infile = "verbs.txt" -outfile = "VerbsEng.gf" -preamble = +infile = "norwegian/web2.txt" +outfile = "Verbs.gf" +preamble = "" +{- "resource VerbsEng = open ResourceEng, MorphoEng in {\n" ++ " oper vIrreg : Str -> Str -> Str -> V = \\x,y,z ->\n" ++ " mkVerbIrreg x y z ** {s1 = [] ; lock_V = <>} ;\n\n" -oper = "vIrreg" +-} +oper = "irregV" cat = "V" name s = s ++ "_V" @@ -34,7 +36,8 @@ notComment = (/="--") . take 2 mkOne :: [String] -> String mkOne ws@(v:_) = - " oper " ++ name v ++ " : " ++ cat ++ " = " ++ + " fun " ++ name v ++ " : " ++ cat ++ " ;\n" ++ + " lin " ++ name v ++ " : " ++ cat ++ " = " ++ oper ++ " " ++ unwords (map arg ws) ++ " ;\n" where arg w = case variants w of diff --git a/lib/resource/norwegian/BasicNor.gf b/lib/resource/norwegian/BasicNor.gf index ea2fe00c0..8fddea764 100644 --- a/lib/resource/norwegian/BasicNor.gf +++ b/lib/resource/norwegian/BasicNor.gf @@ -1,6 +1,6 @@ --# -path=.:../scandinavian:../abstract:../../prelude -concrete BasicNor of Basic = CategoriesNor ** open ParadigmsNor in { +concrete BasicNor of Basic = CategoriesNor ** open ParadigmsNor,VerbsNor in { flags startcat=Phr ; lexer=textlit ; parser=chart ; unlexer=text ; optimize=values ; @@ -33,7 +33,7 @@ lin boy_N = regN "gutt" masculine ; bread_N = regN "brød" neutrum ; break_V2 = dirV2 (mk2V "knuse" "knuste") ; - broad_ADeg = mkADeg "bred" ; + broad_ADeg = regADeg "bred" ; brother_N2 = mkN2 ( (mkN "bror" "broren" "brødre" "brødrene")) "til" ; brown_ADeg = regADeg "brun" ; butter_N = regN "smør" neutrum ; @@ -74,11 +74,11 @@ lin find_V2 = dirV2 (irregV "finne" "fann" "funnet") ; fish_N = mk2N "fisk" "fisken" ; floor_N = regN "golv" neutrum ; - forget_V2 = dirV2 (mkV "glemme" "glemmer" "glemte" "glemt" "glem") ; + forget_V2 = dirV2 (mkV "glemme" "glemmer" "glemmes" "glemte" "glemt" "glem") ; fridge_N = regN "kjøleskap" neutrum ; friend_N = mkN "venn" "vennen" "venner" "vennene" ; fruit_N = mk2N "frukt" "frukten" ; - fun_AV = mkAV (mk3A "morsom" "morsomt" "morsomme") ; + fun_AV = mkAV (mkA "morsom" "morsomt" "morsomme") ; garden_N = regN "hage" masculine ; girl_N = regN "jente" feminine ; glove_N = regN "hanske" masculine ; @@ -89,7 +89,7 @@ lin harbour_N = regN "havn" feminine; hate_V2 = dirV2 (regV "hate") ; hat_N = regN "hatt" masculine ; - have_V2 = dirV2 have_V ; + have_V2 = dirV2 ha_V ; hear_V2 = dirV2 (mk2V "høre" "hørte") ; hill_N = regN "haug" masculine ; hope_VS = mkVS (regV "håpe") ; @@ -149,7 +149,7 @@ lin roof_N = regN "tak" neutrum ; rubber_N = mk2N "gummi" "gummien" ; run_V = springe_V ; - say_VS = mkVS sie_V ; + say_VS = mkVS si_V ; school_N = regN "skole" feminine; science_N = mk2N "vitenskap" "vitenskapen" ; sea_N = mk2N "sjø" "sjøen" ; @@ -164,7 +164,7 @@ lin shop_N = mk2N "butikk" "butikken" ; short_ADeg = regADeg "kort" ; silver_N = mk2N "sølv" "sølvet"; - sister_N = mk2N "søster" "søsteren" "søstrer" "søstrene" ; + sister_N = mkN "søster" "søsteren" "søstrer" "søstrene" ; sleep_V = irregV "sove" "sov" "sovet" ; small_ADeg = mkADeg "liten" "lite" "små" "mindre" "minst" ; ---- lille snake_N = regN "orm" masculine ; diff --git a/lib/resource/norwegian/SwadeshLexNor.gf b/lib/resource/norwegian/SwadeshLexNor.gf index 71f3f045a..618d1280b 100644 --- a/lib/resource/norwegian/SwadeshLexNor.gf +++ b/lib/resource/norwegian/SwadeshLexNor.gf @@ -68,9 +68,9 @@ concrete SwadeshLexNor of SwadeshLex = CategoriesNor cold_ADeg = cold_ADeg ; correct_ADeg = regADeg "riktig" ; dirty_ADeg = dirty_ADeg ; - dry_ADeg = regADeg "torr" ; - dull_ADeg = regADeg "slø" ; - far_ADeg = regADeg "avlegsen" ; + dry_ADeg = mk2ADeg "tørr" "tørt" ; + dull_ADeg = regADeg "sløv" ; + far_ADeg = regADeg "fjern" ; full_ADeg = regADeg "full" ; good_ADeg = good_ADeg ; green_ADeg = green_ADeg ; @@ -78,25 +78,24 @@ concrete SwadeshLexNor of SwadeshLex = CategoriesNor left_A = mkA "venstre" "venstre" "venstre" ; long_ADeg = long_ADeg ; narrow_ADeg = narrow_ADeg ; - near_ADeg = mkADeg "nere" "nere" "nere" - "nermare" "nermast" ; + near_ADeg = irregADeg "nære" "nærmere" "nærmest" ; new_ADeg = new_ADeg ; old_ADeg = old_ADeg ; red_ADeg = red_ADeg ; - right_A = mkA "høgre" "høgre" "høgre" ; - rotten_ADeg = mk3ADeg "rutten" "ruttet" "ruttne" ; + right_A = mkA "høyre" "høyre" "høyre" ; + rotten_ADeg = mk3ADeg "råtten" "råttent" "råtne" ; round_ADeg = regADeg "rund" ; - sharp_ADeg = regADeg "vass" ; + sharp_ADeg = mk2ADeg "kvass" "kvast" ; short_ADeg = short_ADeg ; small_ADeg = small_ADeg ; - smooth_ADeg = regADeg "slet" ; + smooth_ADeg = mk2ADeg "slett" "slett" ; straight_ADeg = regADeg "rak" ; thick_ADeg = thick_ADeg ; thin_ADeg = thin_ADeg ; warm_ADeg = warm_ADeg ; wet_ADeg = regADeg "våt" ; white_ADeg = white_ADeg ; - wide_ADeg = mk2ADeg "bred" "brett" ; + wide_ADeg = regADeg "bred" ; yellow_ADeg = yellow_ADeg ; @@ -108,34 +107,36 @@ concrete SwadeshLexNor of SwadeshLex = CategoriesNor bark_N = mk2N "bark" "barken" ; belly_N = mk2N "mage" "magen" ; bird_N = bird_N ; - blood_N = mk2N "blod" "blod" ; - bone_N = mk2N "ben" "ben" ; - breast_N = mk2N "brøst" "brøst" ; + blood_N = mk2N "blod" "blodet" ; + bone_N = mk2N "bein" "beinet" ; + breast_N = mk2N "bryst" "brystet" ; child_N = child_N ; - cloud_N = mk2N "moln" "moln" ; + cloud_N = mk2N "sky" "skya" ; day_N = mk2N "dag" "dagen" ; dog_N = dog_N ; - dust_N = mk2N "damm" "damm" ; - ear_N = mkN "øre" "ørat" "øron" "øronen" ; - earth_N = mk2N "jord" "jorden" ; - egg_N = mk2N "egg" "egg" ; - eye_N = mkN "øge" "øgat" "øgon" "øgonen" ; - fat_N = mk2N "fett" "fett" ; - father_N = mkN "far" "fadern" "feder" "federne" ; + dust_N = mk2N "støv" "støvet" ; + ear_N = mk2N "øre" "øret" ; + earth_N = mk2N "jord" "jorda" ; + egg_N = mk2N "egg" "egget" ; + eye_N = mkN "øye" "øyet" "øyne" "øynene" ; + fat_N = mk2N "fett" "fettet" ; + father_N = mkN "far" "faren" "fedre" "fedrene" ; -- father_N = UseN2 father_N2 ; - feather_N = mk2N "fjeder" "fjedren" ; - fingernail_N = mk2N "nagel" "naglen" ; - fire_N = mk2N "eld" "elden" ; + feather_N = mk2N "fjør" "fjøra" ; + fingernail_N = mk2N "negl" "neglen" ; + fire_N = mk2N "ild" "ilden" ; fish_N = fish_N ; - flower_N = mk2N "blomme" "blomma" ; - fog_N = mk2N "dimme" "dimma" ; + flower_N = mk2N "blomst" "blomsten" ; + fog_N = mk2N "tåke" "tåka" ; foot_N = mk2N "fot" "føtter" ; forest_N = mk2N "skog" "skogen" ; fruit_N = fruit_N ; - grass_N = mk2N "gres" "gres" ; - guts_N = mk2N "inelve" "inelva" ; - hair_N = mk2N "hår" "hår" ; - hand_N = mk2N "hand" "hender" ; + grass_N = mk2N "gras" "graset" ; + guts_N = mk2N "tarm" "tarmen" ; ---- involler + hair_N = mk2N "hår" "håret" ; + hand_N = mk2N "hånd" "hånden" ; + +---- fixed till here AR head_N = mkN "huvud" "huvudet" "huvuden" "huvudene" ; heart_N = mkN "hjerte" "hjertat" "hjertan" "hjertane" ; horn_N = mk2N "horn" "horn" ; @@ -191,62 +192,62 @@ concrete SwadeshLexNor of SwadeshLex = CategoriesNor -- Verbs - bite_V = bite_V ; + bite_V = VerbsNor.bite_V ; blow_V = mk2V "blåse" "blåste" ; breathe_V = depV (regV "ande") ; - burn_V = brinne_V ; -- FIXME: brenna? + burn_V = brenne_V ; come_V = komme_V ; count_V = regV "rekne" ; - cut_V = skere_V ; + cut_V = skjære_V ; die_V = dø_V ; dig_V = mk2V "greve" "grevde" ; drink_V = drikke_V ; - eat_V = ete_V ; + eat_V = mk2V "spise" "spiste" ; ---- ete fall_V = falle_V ; fear_V = regV "frukte" ; -- FIXME: passive forms are very strange fight_V = mkV "slåss" "slåss" "slåss" "slogs" "slagits" "slagen" ; float_V = flyte_V ; - flow_V = rinne_V ; - fly_V = flyge_V ; + flow_V = renne_V ; + fly_V = fly_V ; freeze_V = fryse_V ; - give_V = give_V ; + give_V = gi_V ; hear_V = mk2V "høre" "hørde" ; hit_V = slå_V; - hold_V = hålle_V ; + hold_V = holde_V ; hunt_V = regV "jage" ; kill_V = regV "døde" ; - know_V = vete_V ; + know_V = vite_V ; laugh_V = regV "skratte" ; lie_V = ligge_V ; - live_V = leve_V ; + live_V = mk2V "leve" "levde" ; play_V = mk2V "leke" "lekte" ; - pull_V = trekke_V ; + pull_V = dra_V ; push_V = mk2V "trykke" "trykte" ; - rub_V = gnide_V ; - say_V = sege_V ; + rub_V = gni_V ; + say_V = si_V ; scratch_V = regV "klie" ; see_V = se_V ; - sew_V = sy_V ; + sew_V = mk2V "sy" "sydde" ; sing_V = synge_V ; sit_V = sitte_V ; sleep_V = sove_V ; smell_V = regV "lukte" ; spit_V = regV "spotte" ; - split_V = klyve_V ; - squeeze_V = klemme_V ; + split_V = mk2V "kløyve" "kløyvde" ; + squeeze_V = mk2V "klemme" "klemte" ; stab_V = stikke_V ; stand_V = stå_V ; suck_V = suge_V ; - swell_V = svelle_V ; + swell_V = partV (regV "hovne") "opp" ; swim_V = regV "simme" ; think_V = mk2V "tenke" "tenkte" ; throw_V = regV "kaste" ; - tie_V = knyte_V ; - turn_V = vende_V ; - vomit_V = mk2V "spy" "spydde" ; + tie_V = regV "knytte" ; + turn_V = mk2V "vende" "vendte" ; + vomit_V = partV (regV "kaste") "opp" ; walk_V = gå_V ; wash_V = regV "vaske" ; - wipe_V = regV "torke" ; + wipe_V = regV "tørke" ; } \ No newline at end of file diff --git a/lib/resource/norwegian/VerbsNor.gf b/lib/resource/norwegian/VerbsNor.gf index 81a7e6a3e..3d79bea84 100644 --- a/lib/resource/norwegian/VerbsNor.gf +++ b/lib/resource/norwegian/VerbsNor.gf @@ -1,185 +1,71 @@ --# -path=.:../scandinavian:../abstract:../../prelude +-- see: http://frodo.bruderhof.com/norskklassen/commonverbs.htm + concrete VerbsNor of VerbsNorAbs = CategoriesNor ** open ParadigmsNor in { ---- rough-translated from Swedish by AR 11/3/2005. To be fixed soon. - flags optimize=values ; - lin - anfalle_V = irregV "anfalle" "anføll" "anfallet" ; - angive_V = irregV "angive" "angav" "angivet" ; - angripe_V = irregV "angripe" "angrep" "angripet" ; - anhålle_V = irregV "anhålle" "anhell" "anhållet" ; - antage_V = irregV "antage" "antog" "antaget" ; - ete_V = irregV "ete" "åt" "etet" ; - återfinne_V = irregV "återfinne" "återfann" "återfunnet" ; - avbryte_V = irregV "avbryte" "avbrøt" "avbrutet" ; - avfalle_V = irregV "avfalle" "avføll" "avfallet" ; - avhugge_V = irregV "avhugge" "avhøgg" "avhugget" ; - avlede_V = irregV "avlede" "avlad" "avlidet" ; - avlide_V = irregV "avlide" "avled" "avlidet" ; - avnyte_V = irregV "avnyte" "avnjøt" "avnytet" ; - avsitte_V = irregV "avsitte" "avsatt" "avsuttet" ; - avskrive_V = irregV "avskrive" "avskrev" "avskrivet" ; - avstige_V = irregV "avstige" "avsteg" "avstiget" ; - bere_V = irregV "bere" "bar" "buret" ; - bedrage_V = irregV "bedrage" "bedrog" "bedraget" ; - bedrive_V = irregV "bedrive" "bedrev" "bedrivet" ; - befinne_V = irregV "befinne" "befann" "befunnet" ; - begrave_V = irregV "begrave" "begrov" "begravet" ; - behålle_V = irregV "behålle" "behøll" "behållet" ; - belyge_V = irregV "belyge" "beljøg" "belyget" ; - beride_V = irregV "beride" "bered" "beridet" ; - besitte_V = irregV "besitte" "besatt" "besuttet" ; - beskrive_V = irregV "beskrive" "beskrev" "beskrivet" ; - beslute_V = irregV "beslute" "besløt" "beslutet" ; - bestige_V = irregV "bestige" "besteg" "bestiget" ; - bestride_V = irregV "bestride" "bestred" "bestridet" ; - bidrage_V = irregV "bidrage" "bidrog" "bidraget" ; - bifalle_V = irregV "bifalle" "biføll" "bifallet" ; - binde_V = irregV "binde" "band" "bundet" ; - bite_V = irregV "bite" "bet" "bitet" ; - byde_V = irregV "byde" "bjød" "bydet" ; - blive_V = irregV "bli" "blev" "blivet" ; - borttage_V = irregV "borttage" "borttog" "borttaget" ; - brinne_V = irregV "brinne" "brann" "brunnet" ; - briste_V = irregV "briste" "brast" "brustet" ; - bryte_V = irregV "bryte" "brøt" "brutet" ; - dø_V = irregV "dø" "dog" "døtt" ; - drikke_V = irregV "drikke" "drakk" "drukket" ; - drive_V = irregV "drive" "drev" "drivet" ; - drype_V = irregV "drype" "drøp" "drupet" ; - duge_V = irregV "duge" "døg" "duget" ; - dyke_V = irregV "dyke" "døk" "duket" ; - erbyde_V = irregV "erbyde" "erbjød" "erbydet" ; - erfare_V = irregV "erfare" "erfor" "erfaret" ; - erhålle_V = irregV "erhålle" "erhøll" "erhållet" ; - falle_V = irregV "falle" "føll" "fallet" ; - fånge_V = irregV "fånge" "feng" "fånget" ; - fare_V = irregV "fare" "for" "faret" ; - finne_V = irregV "finne" "fann" "funnet" ; - flyge_V = irregV "flyge" "fløg" "fluget" ; - flyte_V = irregV "flyte" "fløt" "flutet" ; - førbehålle_V = irregV "førbehålle" "førbehøll" "førbehållet" ; - førbinde_V = irregV "førbinde" "førband" "førbundet" ; - førbyde_V = irregV "førbyde" "førbjød" "førbydet" ; - førdrive_V = irregV "førdrive" "førdrev" "førdrivet" ; - føreskrive_V = irregV "føreskrive" "føreskrev" "føreskrivet" ; - føretage_V = irregV "føretage" "føretog" "føretaget" ; - førfryse_V = irregV "førfryse" "førfrøs" "førfruset" ; - førlåte_V = irregV "førlåte" "førlet" "førlåtet" ; - førnimme_V = irregV "førnimme" "førnamm" "førnummet" ; - førsitte_V = irregV "førsitte" "førsatt" "førsuttet" ; - førsvinne_V = irregV "førsvinne" "førsvann" "førsvunnet" ; - førtige_V = irregV "førtige" "førteg" "førtiget" ; - fryse_V = irregV "fryse" "frøs" "fruset" ; - gå_V = irregV "gå" "gikk" "gått" ; - genomdrive_V = irregV "genomdrive" "genomdrev" "genomdrivet" ; - gille_V = irregV "gille" "gall" "gillet" ; - give_V = irregV "ge" "gav" "givet" ; - gyte_V = irregV "gyte" "gjøt" "gytet" ; - glide_V = irregV "glide" "gled" "glidet" ; - gnide_V = irregV "gnide" "gned" "gnidet" ; - gråte_V = irregV "gråte" "gret" "gråtet" ; - gripe_V = irregV "gripe" "grep" "gripet" ; - hålle_V = irregV "hålle" "høll" "hållet" ; - hinne_V = irregV "hinne" "hann" "hunnet" ; - hugge_V = irregV "hugge" "høgg" "hugget" ; - iakttage_V = irregV "iakttage" "iakttog" "iakttaget" ; - inbegripe_V = irregV "inbegripe" "inbegrep" "inbegripet" ; - inbyde_V = irregV "inbyde" "inbjød" "inbydet" ; - indrage_V = irregV "indrage" "indrog" "indraget" ; - inneslute_V = irregV "inneslute" "innesløt" "inneslutet" ; - inskrive_V = irregV "inskrive" "inskrev" "inskrivet" ; - intage_V = irregV "intage" "intog" "intaget" ; - kenne_V = irregV "kenne" "kende" "kent" ; - klemme_V = irregV "klemme" "klemde" "klemt" ; - klive_V = irregV "klive" "klev" "klivet" ; - klyve_V = irregV "klyve" "kløv" "kluvet" ; - knipe_V = irregV "knipe" "knep" "knipet" ; - knyte_V = irregV "knyte" "knøt" "knutet" ; - komme_V = irregV "komme" "kom" "kommet" ; - krype_V = irregV "krype" "krøp" "krupet" ; - kunne_V = mkV "kunne" "kan" "kan" "kunde" "kunnet" "kunn" ; - kvide_V = irregV "kvide" "kved" "kvidet" ; - låte_V = irregV "låte" "let" "låtet" ; - leve_V = irregV "leve" "levde" "levt" ; - ligge_V = irregV "ligge" "låg" "legat" ; - lyde_V = irregV "lyde" "ljød" "lydet" ; - lyge_V = irregV "lyge" "ljøg" "lyget" ; - lyte_V = irregV "lyte" "ljøt" "lytet" ; - mottage_V = irregV "mottage" "mottog" "mottaget" ; - nerstige_V = irregV "nerstige" "nersteg" "nerstiget" ; - nige_V = irregV "nige" "neg" "niget" ; - nyte_V = irregV "nyte" "njøt" "nytet" ; - omgive_V = irregV "omgive" "omgav" "omgivet" ; - øverfalle_V = irregV "øverfalle" "øverføll" "øverfallet" ; - øvergive_V = irregV "øvergive" "øvergav" "øvergivet" ; - pipe_V = irregV "pipe" "pep" "pipet" ; - ride_V = irregV "ride" "red" "ridet" ; - rinne_V = irregV "rinne" "rann" "runnet" ; - rive_V = irregV "rive" "rev" "rivet" ; - ryte_V = irregV "ryte" "røt" "rutet" ; - sege_V = irregV "sege" "sade" "sagt" ; - se_V = irregV "se" "såg" "sett" ; - sitte_V = irregV "sitte" "satt" "suttet" ; - syde_V = irregV "syde" "sjød" "sydet" ; - synge_V = irregV "synge" "sjøng" "synget" ; - synke_V = irregV "synke" "sjønk" "synket" ; - skere_V = mkV "skere" "sker" "sker" "skar" "skurit" "sker" ; - skine_V = irregV "skine" "sken" "skinet" ; - skite_V = irregV "skite" "sket" "skitet" ; - skyte_V = irregV "skyte" "skjøt" "skytet" ; - skride_V = irregV "skride" "skred" "skridet" ; - skrike_V = irregV "skrike" "skrek" "skriket" ; - skrive_V = irregV "skrive" "skrev" "skrivet" ; - skryte_V = irregV "skryte" "skrøt" "skrutet" ; - slå_V = irregV "slå" "slog" "slaget" ; - slinke_V = irregV "slinke" "slank" "slunket" ; - slippe_V = irregV "slippe" "slapp" "sluppet" ; - slite_V = irregV "slite" "slet" "slitet" ; - slute_V = irregV "slute" "sløt" "slutet" ; - smørje_V = irregV "smørje" "smorjde" "smort" ; - smite_V = irregV "smite" "smet" "smitet" ; - snyte_V = irregV "snyte" "snøt" "snutet" ; - sove_V = irregV "sove" "sov" "sovet" ; - spinne_V = irregV "spinne" "spann" "spunnet" ; - sprikke_V = irregV "sprikke" "sprakk" "sprukket" ; - spride_V = irregV "spride" "spred" "spridet" ; - springe_V = irregV "springe" "sprang" "sprunget" ; - stå_V = irregV "stå" "stod" "stått" ; - stikke_V = irregV "stikke" "stakk" "stukket" ; - stige_V = irregV "stige" "steg" "stiget" ; - stinke_V = irregV "stinke" "stank" "stunket" ; - stride_V = irregV "stride" "stred" "stridet" ; - strype_V = irregV "strype" "strøp" "strupet" ; - suge_V = irregV "suge" "søg" "suget" ; - supe_V = irregV "supe" "søp" "supet" ; - svelle_V = irregV "svelle" "svellde" "svellt" ; - svide_V = irregV "svide" "sved" "svidet" ; - svike_V = irregV "svike" "svek" "sviket" ; - sy_V = irregV "sy" "sydde" "sytt" ; - tage_V = irregV "tage" "tog" "taget" ; - tige_V = irregV "tige" "teg" "tiget" ; - tillåte_V = irregV "tillåte" "tillet" "tillåtet" ; - tillslute_V = irregV "tillslute" "tillsløt" "tillslutet" ; - tyte_V = irregV "tyte" "tjøt" "tytet" ; - trekke_V = irregV "trekke" "trakk" "trukket" ; ---- - tryte_V = irregV "tryte" "trøt" "trutet" ; - tvinge_V = irregV "tvinge" "tvang" "tvunget" ; - uppfinne_V = irregV "uppfinne" "uppfann" "uppfunnet" ; - uppgive_V = irregV "uppgive" "uppgav" "uppgivet" ; - upplåte_V = irregV "upplåte" "upplet" "upplåtet" ; - uppstige_V = irregV "uppstige" "uppsteg" "uppstiget" ; - upptage_V = irregV "upptage" "upptog" "upptaget" ; - utbyde_V = irregV "utbyde" "utbjød" "utbydet" ; - utbriste_V = irregV "utbriste" "utbrast" "utbrustet" ; - uteslute_V = irregV "uteslute" "utesløt" "uteslutet" ; - utskrive_V = irregV "utskrive" "utskrev" "utskrivet" ; - vete_V = mkV "vete" "vet" "vet" "visste" "vetat" "vet" ; - vende_V = irregV "vende" "vende" "vent" ; - vine_V = irregV "vine" "ven" "vinet" ; - vinne_V = irregV "vinne" "vann" "vunnet" ; - vride_V = irregV "vride" "vred" "vridet" ; + lin be_V = irregV "be" "bad" "bedt" ; + lin bite_V = irregV "bite" (variants {"bet" ; "beit"}) "bitt" ; + lin bli_V = irregV "bli" (variants {"ble" ; "blei"}) "blitt" ; + lin brenne_V = irregV "brenne" (variants {"brant" ; "brente"}) "brent" ; + lin bringe_V = irregV "bringe" "brakte" "brakt" ; + lin burde_V = irregV "burde" "burde" "burdet" ; + lin bære_V = irregV "bære" "bar" "båret" ; + lin dra_V = irregV "dra" "drog" (variants {"dradd" ; "dratt"}) ; + lin drikke_V = irregV "drikke" "drakk" "drukket" ; + lin drive_V = irregV "drive" (variants {"drev" ; "dreiv"}) "drevet" ; + lin dø_V = irregV "dø" (variants {"dødde" ; "døde"}) "dødd" ; + lin eie_V = irregV "eie" (variants {"eide" ; "åtte"}) (variants {"eid" ; "ått"}) ; + lin falle_V = irregV "falle" "falt" "falt" ; + lin finne_V = irregV "finne" "fant" "funnet" ; + lin fly_V = irregV "fly" (variants {"fløy" ; "flaug"}) (variants {"fløyet" ; "flydd"}) ; lin flyte_V = irregV "flyte" (variants {"fløte" ; "flaut"}) "flytt" ; + lin foretrekke_V = irregV "foretrekke" "foretrakk" "foretrukket" ; + lin forlate_V = irregV "forlate" "forlot" "forlatt" ; + lin forstå_V = irregV "forstå" "forstod" "forstått" ; + lin fortelle_V = irregV "fortelle" "fortalte" "fortalt" ; + lin fryse_V = irregV "fryse" "frøs" "frosset" ; + lin få_V = irregV "få" "fikk" "fått" ; + lin gi_V = irregV "gi" "gav" "gitt" ; + lin gjelde_V = irregV "gjelde" (variants {"gjaldt" ; "galdt"}) "gjeldt" ; + lin gjøre_V = irregV "gjøre" "gjorde" "gjort" ; + lin gni_V = irregV "gni" (variants {"gned" ; "gnei" ; "gnidde"}) "gnidd" ; + lin gå_V = irregV "gå" "gikk" "gått" ; + lin ha_V = irregV "ha" "hadde" "hatt" ; + lin hente_V = irregV "hente" "hentet" "hendt" ; + lin hete_V = irregV "hete" (variants {"het" ; "hette"}) "hett" ; + lin hjelpe_V = irregV "hjelpe" "hjalp" "hjulpet" ; + lin holde_V = irregV "holde" "holdt" "holdt" ; + lin komme_V = irregV "komme" "kom" "kommet" ; + lin kunne_V = irregV "kunne" "kunne" "kunnet" ; + lin la_V = irregV "la" "lot" "latt" ; + lin legge_V = irregV "legge" "la" "lagt" ; + lin ligge_V = irregV "ligge" "lå" "ligget" ; + lin løpe_V = irregV "løpe" "løp" (variants {"løpt" ; "løpet"}) ; + lin måtte_V = irregV "måtte" "måtte" "måttet" ; + lin renne_V = irregV "renne" "rant" "rent" ; + lin se_V = irregV "se" "så" "sett" ; + lin selge_V = irregV "selge" "solgte" "solgt" ; + lin sette_V = irregV "sette" "satte" "satt" ; + lin si_V = irregV "si" "sa" "sagt" ; + lin sitte_V = irregV "sitte" "satt" "sittet" ; + lin skjære_V = irregV "skjære" "skar" "skåret" ; + lin skrive_V = irregV "skrive" "skrev" "skrevet" ; + lin skulle_V = irregV "skulle" "skulle" "skullet" ; + lin slå_V = irregV "slå" "slo" "slått" ; + lin slåss_V = irregV "slåss" "sloss" "slåss" ; + lin sove_V = irregV "sove" "sov" "sovet" ; + lin springe_V = irregV "springe" "sprang" "sprunget" ; + lin spørre_V = irregV "spørre" "spurte" "spurt" ; + lin stikke_V = irregV "stikke" "stakk" "stukket" ; + lin stå_V = irregV "stå" "stod" "stått" ; + lin suge_V = irregV "suge" (variants {"sugde" ; "saug"}) "sugd" ; + lin synes_V = irregV "synes" "syntes" (variants {"synes" ; "syns"}) ; + lin synge_V = irregV "synge" "sang" "sunget" ; + lin ta_V = irregV "ta" "tok" "tatt" ; + lin treffe_V = irregV "treffe" "traff" "truffet" ; + lin trives_V = irregV "trives" "trivdes" (variants {"trives" ; "trivs"}) ; + lin ville_V = irregV "ville" "ville" "villet" ; + lin vite_V = irregV "vite" "visste" "visst" ; } diff --git a/lib/resource/norwegian/VerbsNorAbs.gf b/lib/resource/norwegian/VerbsNorAbs.gf index a24407128..1d89a0d5d 100644 --- a/lib/resource/norwegian/VerbsNorAbs.gf +++ b/lib/resource/norwegian/VerbsNorAbs.gf @@ -1,178 +1,65 @@ abstract VerbsNorAbs = Categories ** { - fun - anfalle_V : V ; - angive_V : V ; - angripe_V : V ; - anhålle_V : V ; - antage_V : V ; - ete_V : V ; - återfinne_V : V ; - avbryte_V : V ; - avfalle_V : V ; - avhugge_V : V ; - avlede_V : V ; - avlide_V : V ; - avnyte_V : V ; - avsitte_V : V ; - avskrive_V : V ; - avstige_V : V ; - bere_V : V ; - bedrage_V : V ; - bedrive_V : V ; - befinne_V : V ; - begrave_V : V ; - behålle_V : V ; - belyge_V : V ; - beride_V : V ; - besitte_V : V ; - beskrive_V : V ; - beslute_V : V ; - bestige_V : V ; - bestride_V : V ; - bidrage_V : V ; - bifalle_V : V ; - binde_V : V ; - bite_V : V ; - byde_V : V ; - blive_V : V ; - borttage_V : V ; - brinne_V : V ; - briste_V : V ; - bryte_V : V ; - dø_V : V ; - drikke_V : V ; - drive_V : V ; - drype_V : V ; - duge_V : V ; - dyke_V : V ; - erbyde_V : V ; - erfare_V : V ; - erhålle_V : V ; - falle_V : V ; - fånge_V : V ; - fare_V : V ; - finne_V : V ; - flyge_V : V ; - flyte_V : V ; - førbehålle_V : V ; - førbinde_V : V ; - førbyde_V : V ; - førdrive_V : V ; - føreskrive_V : V ; - føretage_V : V ; - førfryse_V : V ; - førlåte_V : V ; - førnimme_V : V ; - førsitte_V : V ; - førsvinne_V : V ; - førtige_V : V ; - fryse_V : V ; - gå_V : V ; - genomdrive_V : V ; - gille_V : V ; - give_V : V ; - gyte_V : V ; - glide_V : V ; - gnide_V : V ; - gråte_V : V ; - gripe_V : V ; - hålle_V : V ; - hinne_V : V ; - hugge_V : V ; - iakttage_V : V ; - inbegripe_V : V ; - inbyde_V : V ; - indrage_V : V ; - inneslute_V : V ; - inskrive_V : V ; - intage_V : V ; - kenne_V : V ; - klemme_V : V ; - klive_V : V ; - klyve_V : V ; - knipe_V : V ; - knyte_V : V ; - komme_V : V ; - krype_V : V ; - kunne_V : V ; - kvide_V : V ; - låte_V : V ; - leve_V : V ; - ligge_V : V ; - lyde_V : V ; - lyge_V : V ; - lyte_V : V ; - mottage_V : V ; - nerstige_V : V ; - nige_V : V ; - nyte_V : V ; - omgive_V : V ; - øverfalle_V : V ; - øvergive_V : V ; - pipe_V : V ; - ride_V : V ; - rinne_V : V ; - rive_V : V ; - ryte_V : V ; - sege_V : V ; - se_V : V ; - sitte_V : V ; - syde_V : V ; - synge_V : V ; - synke_V : V ; - skere_V : V ; - skine_V : V ; - skite_V : V ; - skyte_V : V ; - skride_V : V ; - skrike_V : V ; - skrive_V : V ; - skryte_V : V ; - slå_V : V ; - slinke_V : V ; - slippe_V : V ; - slite_V : V ; - slute_V : V ; - smørje_V : V ; - smite_V : V ; - snyte_V : V ; - sove_V : V ; - spinne_V : V ; - sprikke_V : V ; - spride_V : V ; - springe_V : V ; - stå_V : V ; - stikke_V : V ; - stige_V : V ; - stinke_V : V ; - stride_V : V ; - strype_V : V ; - suge_V : V ; - supe_V : V ; - svelle_V : V ; - svide_V : V ; - svike_V : V ; - sy_V : V ; - tage_V : V ; - tige_V : V ; - tillåte_V : V ; - tillslute_V : V ; - trekke_V : V ; - tyte_V : V ; - tryte_V : V ; - tvinge_V : V ; - uppfinne_V : V ; - uppgive_V : V ; - upplåte_V : V ; - uppstige_V : V ; - upptage_V : V ; - utbyde_V : V ; - utbriste_V : V ; - uteslute_V : V ; - utskrive_V : V ; - vende_V : V ; - vete_V : V ; - vine_V : V ; - vinne_V : V ; - vride_V : V ; + fun be_V : V ; + fun bite_V : V ; + fun bli_V : V ; + fun brenne_V : V ; + fun bringe_V : V ; + fun burde_V : V ; + fun bære_V : V ; + fun dra_V : V ; + fun drikke_V : V ; + fun drive_V : V ; + fun dø_V : V ; + fun eie_V : V ; + fun falle_V : V ; + fun finne_V : V ; + fun fly_V : V ; + fun flyte_V : V ; + fun foretrekke_V : V ; + fun forlate_V : V ; + fun forstå_V : V ; + fun fortelle_V : V ; + fun fryse_V : V ; + fun få_V : V ; + fun gi_V : V ; + fun gjelde_V : V ; + fun gjøre_V : V ; + fun gni_V : V ; + fun gå_V : V ; + fun ha_V : V ; + fun hente_V : V ; + fun hete_V : V ; + fun hjelpe_V : V ; + fun holde_V : V ; + fun komme_V : V ; + fun kunne_V : V ; + fun la_V : V ; + fun legge_V : V ; + fun ligge_V : V ; + fun løpe_V : V ; + fun måtte_V : V ; + fun renne_V : V ; + fun se_V : V ; + fun selge_V : V ; + fun sette_V : V ; + fun si_V : V ; + fun sitte_V : V ; + fun skjære_V : V ; + fun skrive_V : V ; + fun skulle_V : V ; + fun slå_V : V ; + fun slåss_V : V ; + fun sove_V : V ; + fun springe_V : V ; + fun spørre_V : V ; + fun stikke_V : V ; + fun stå_V : V ; + fun suge_V : V ; + fun synes_V : V ; + fun synge_V : V ; + fun ta_V : V ; + fun treffe_V : V ; + fun trives_V : V ; + fun ville_V : V ; + fun vite_V : V ; } diff --git a/lib/resource/swedish/BasicSwe.gf b/lib/resource/swedish/BasicSwe.gf index 5ce59b305..d5ddb8407 100644 --- a/lib/resource/swedish/BasicSwe.gf +++ b/lib/resource/swedish/BasicSwe.gf @@ -131,7 +131,7 @@ lin peace_N = regN "fred" utrum ; ---- ar? pen_N = regN "penna" utrum ; planet_N = mk2N "planet" "planeter" ; - plastic_N = mk2N "plastic" "plastiker" ; + plastic_N = mk2N "plast" "plaster" ; play_V2 = dirV2 (regV "spela") ; policeman_N = mk2N "polis" "poliser" ; priest_N = mk2N "präst" "präster" ;