mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-06 09:42:50 -06:00
Convert many RGL modules from Latin-1 to UTF-8 to speed up compilation
Also add flags coding=utf8 to silence warnings.
This commit is contained in:
hallgren
@@ -1,5 +1,5 @@
|
||||
--# -coding=latin1
|
||||
instance DiffNor of DiffScand = open CommonScand, Prelude in {
|
||||
flags coding=utf8 ;
|
||||
|
||||
-- Parameters.
|
||||
|
||||
@@ -33,7 +33,7 @@ instance DiffNor of DiffScand = open CommonScand, Prelude in {
|
||||
conjThan = "enn" ;
|
||||
conjAnd = "og" ;
|
||||
compMore = "mere" ;
|
||||
infMark = "å" ;
|
||||
infMark = "å" ;
|
||||
|
||||
subjIf = "hvis" ;
|
||||
|
||||
@@ -48,7 +48,7 @@ instance DiffNor of DiffScand = open CommonScand, Prelude in {
|
||||
mkVerb9 "ha" "har" "ha" "hadde" "hatt" "haven" "havet" "havne" "havende"
|
||||
** {part = [] ; isVaere = False} ;
|
||||
verbBe =
|
||||
mkVerb9 "være" "er" "var" "var" "vært" "væren" "været" "værne" "værende"
|
||||
mkVerb9 "være" "er" "var" "var" "vært" "væren" "været" "værne" "værende"
|
||||
** {part = [] ; isVaere = False} ;
|
||||
verbBecome =
|
||||
mkVerb9 "bli" "blir" "bli" "ble" "blitt" "bliven" "blivet" "blivne" "blivende"
|
||||
@@ -79,7 +79,7 @@ instance DiffNor of DiffScand = open CommonScand, Prelude in {
|
||||
RPrep _ => gennumForms "hvilken" "hvilket" "hvilke" ! gennum g n
|
||||
} ;
|
||||
|
||||
pronSuch = gennumForms "sådan" "sådant" "sådanne" ;
|
||||
pronSuch = gennumForms "sådan" "sådant" "sådanne" ;
|
||||
|
||||
reflPron : Agr -> Str = \a -> case <a.n,a.p> of {
|
||||
<Pl,P1> => "oss" ;
|
||||
|
||||
@@ -1,8 +1,8 @@
|
||||
--# -coding=latin1
|
||||
concrete IdiomNor of Idiom = CatNor **
|
||||
open MorphoNor, ParadigmsNor, IrregNor, Prelude in {
|
||||
|
||||
flags optimize=all_subs ;
|
||||
coding=utf8 ;
|
||||
|
||||
lin
|
||||
|
||||
@@ -32,7 +32,7 @@ concrete IdiomNor of Idiom = CatNor **
|
||||
} ;
|
||||
|
||||
ProgrVP vp =
|
||||
insertObj (\\a => ["ved å"] ++ infVP vp a) (predV verbBe) ;
|
||||
insertObj (\\a => ["ved å"] ++ infVP vp a) (predV verbBe) ;
|
||||
|
||||
ImpPl1 vp = {s = ["lat oss"] ++ infVP vp {g = Utr ; n = Pl ; p = P1}} ;
|
||||
|
||||
|
||||
@@ -1,11 +1,11 @@
|
||||
--# -path=.:../scandinavian:../common:../abstract:../../prelude
|
||||
--# -coding=latin1
|
||||
|
||||
-- see: http://frodo.bruderhof.com/norskklassen/commonverbs.htm
|
||||
|
||||
concrete IrregNor of IrregNorAbs = CatNor ** open ParadigmsNor in {
|
||||
|
||||
flags optimize=values ;
|
||||
coding=utf8 ;
|
||||
|
||||
lin be_V = mkV "be" "ber" "bes" "bad" "bedt" "be" ;
|
||||
lin bite_V = irregV "bite" (variants {"bet" ; "beit"}) "bitt" ;
|
||||
@@ -14,27 +14,27 @@ concrete IrregNor of IrregNorAbs = CatNor ** open ParadigmsNor in {
|
||||
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 bære_V = irregV "bære" "bar" "båret" ;
|
||||
lin dra_V = mkV "dra" "drar" "dras" "drog" (variants {"dradd" ; "dratt"}) "dra" ;
|
||||
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 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 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 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 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 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 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" ;
|
||||
@@ -44,25 +44,25 @@ concrete IrregNor of IrregNorAbs = CatNor ** open ParadigmsNor in {
|
||||
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 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 = mkV "se" "ser" "ses" "så" "sett" "se" ;
|
||||
lin se_V = mkV "se" "ser" "ses" "så" "sett" "se" ;
|
||||
lin selge_V = irregV "selge" "solgte" "solgt" ;
|
||||
lin sette_V = irregV "sette" "satte" "satt" ;
|
||||
lin si_V = mkV "si" "sier" "sies" "sa" "sagt" "sagd" ;
|
||||
lin sitte_V = irregV "sitte" "satt" "sittet" ;
|
||||
lin skjære_V = irregV "skjære" "skar" "skåret" ;
|
||||
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 = mkV "slåss" "slåss" "slåss" "sloss" "slåss" "slåss" ;
|
||||
lin slå_V = irregV "slå" "slo" "slått" ;
|
||||
lin slåss_V = mkV "slåss" "slåss" "slåss" "sloss" "slåss" "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 spørre_V = irregV "spørre" "spurte" "spurt" ;
|
||||
lin stikke_V = irregV "stikke" "stakk" "stukket" ;
|
||||
lin stå_V = irregV "stå" "stod" "stått" ;
|
||||
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" ;
|
||||
|
||||
@@ -1,16 +1,16 @@
|
||||
--# -coding=latin1
|
||||
abstract IrregNorAbs = Cat ** {
|
||||
flags coding=utf8 ;
|
||||
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 bære_V : V ;
|
||||
fun dra_V : V ;
|
||||
fun drikke_V : V ;
|
||||
fun drive_V : V ;
|
||||
fun dř_V : V ;
|
||||
fun dø_V : V ;
|
||||
fun eie_V : V ;
|
||||
fun falle_V : V ;
|
||||
fun finne_V : V ;
|
||||
@@ -18,15 +18,15 @@ abstract IrregNorAbs = Cat ** {
|
||||
fun flyte_V : V ;
|
||||
fun foretrekke_V : V ;
|
||||
fun forlate_V : V ;
|
||||
fun forstĺ_V : V ;
|
||||
fun forstå_V : V ;
|
||||
fun fortelle_V : V ;
|
||||
fun fryse_V : V ;
|
||||
fun fĺ_V : V ;
|
||||
fun få_V : V ;
|
||||
fun gi_V : V ;
|
||||
fun gjelde_V : V ;
|
||||
fun gjřre_V : V ;
|
||||
fun gjøre_V : V ;
|
||||
fun gni_V : V ;
|
||||
fun gĺ_V : V ;
|
||||
fun gå_V : V ;
|
||||
fun ha_V : V ;
|
||||
fun hente_V : V ;
|
||||
fun hete_V : V ;
|
||||
@@ -37,24 +37,24 @@ abstract IrregNorAbs = Cat ** {
|
||||
fun la_V : V ;
|
||||
fun legge_V : V ;
|
||||
fun ligge_V : V ;
|
||||
fun lřpe_V : V ;
|
||||
fun mĺtte_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 skjære_V : V ;
|
||||
fun skrive_V : V ;
|
||||
fun skulle_V : V ;
|
||||
fun slĺ_V : V ;
|
||||
fun slĺss_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 spørre_V : V ;
|
||||
fun stikke_V : V ;
|
||||
fun stĺ_V : V ;
|
||||
fun stå_V : V ;
|
||||
fun suge_V : V ;
|
||||
fun synes_V : V ;
|
||||
fun synge_V : V ;
|
||||
|
||||
@@ -1,10 +1,10 @@
|
||||
--# -path=.:../scandinavian:../common:../abstract:../../prelude
|
||||
--# -coding=latin1
|
||||
|
||||
concrete LexiconNor of Lexicon = CatNor **
|
||||
open Prelude, ParadigmsNor, IrregNor in {
|
||||
|
||||
flags startcat=Phr ; lexer=textlit ; unlexer=text ;
|
||||
coding=utf8 ;
|
||||
optimize=values ;
|
||||
|
||||
lin
|
||||
@@ -13,31 +13,31 @@ lin
|
||||
apartment_N = mk2N "leilighet" "leiligheten" ;
|
||||
apple_N = mk2N "eple" "eplet" ;
|
||||
art_N = mk2N "kunst" "kunsten" ;
|
||||
ask_V2Q = mkV2Q spørre_V noPrep ;
|
||||
ask_V2Q = mkV2Q spørre_V noPrep ;
|
||||
baby_N = mk2N "baby" "babyen" ;
|
||||
bad_A = regADeg "dårlig" ; ----
|
||||
bad_A = regADeg "dårlig" ; ----
|
||||
bank_N = mk2N "bank" "banken" ;
|
||||
beautiful_A = mk3ADeg "vakker" "vakkert" "vakre" ;
|
||||
become_VA = mkVA (vaereV bli_V) ;
|
||||
beer_N = regGenN "øl" neutrum ;
|
||||
beg_V2V = mkV2V be_V noPrep (mkPrep "å") ;
|
||||
big_A = irregADeg "stor" "større" "størst";
|
||||
beer_N = regGenN "øl" neutrum ;
|
||||
beg_V2V = mkV2V be_V noPrep (mkPrep "å") ;
|
||||
big_A = irregADeg "stor" "større" "størst";
|
||||
bike_N = mkN "sykkel" "sykkelen" "sykler" "syklene" ;
|
||||
bird_N = mk2N "fugl" "fuglen" ;
|
||||
black_A = mk2ADeg "svart" "svart" ;
|
||||
blue_A = mk2ADeg "blå" "blått";
|
||||
boat_N = regGenN "båt" masculine ;
|
||||
book_N = mkN "bok" "boka" "bøker" "bøkene" ;
|
||||
boot_N = mkN "støvel" "støvelen" "støvler" "støvlene" ;
|
||||
blue_A = mk2ADeg "blå" "blått";
|
||||
boat_N = regGenN "båt" masculine ;
|
||||
book_N = mkN "bok" "boka" "bøker" "bøkene" ;
|
||||
boot_N = mkN "støvel" "støvelen" "støvler" "støvlene" ;
|
||||
boss_N = mk2N "sjef" "sjefen" ;
|
||||
boy_N = regGenN "gutt" masculine ;
|
||||
bread_N = regGenN "brød" neutrum ;
|
||||
bread_N = regGenN "brød" neutrum ;
|
||||
break_V2 = dirV2 (mk2V "knuse" "knuste") ;
|
||||
broad_A = regADeg "bred" ;
|
||||
brother_N2 = mkN2 ( (mkN "bror" "broren" "brødre" "brødrene")) (mkPrep "til") ;
|
||||
brother_N2 = mkN2 ( (mkN "bror" "broren" "brødre" "brødrene")) (mkPrep "til") ;
|
||||
brown_A = regADeg "brun" ;
|
||||
butter_N = regGenN "smør" neutrum ;
|
||||
buy_V2 = dirV2 (mk2V "kjøpe" "kjøpte") ;
|
||||
butter_N = regGenN "smør" neutrum ;
|
||||
buy_V2 = dirV2 (mk2V "kjøpe" "kjøpte") ;
|
||||
camera_N = mk2N "kamera" "kameraen" ; ----
|
||||
cap_N = mk2N "lue" "lua" ;
|
||||
car_N = regGenN "bil" masculine ;
|
||||
@@ -59,12 +59,12 @@ lin
|
||||
country_N = mk2N "land" "landet" ;
|
||||
cousin_N = mk2N "fetter" "fetteren" ; ----
|
||||
cow_N = mkN "ku" "kua" "kyr" "kyrne" ; ----
|
||||
die_V = vaereV IrregNor.dø_V ;
|
||||
die_V = vaereV IrregNor.dø_V ;
|
||||
dirty_A = mk3ADeg "skitten" "skittent" "skitne" ; ----
|
||||
distance_N3 = mkN3 (regGenN "avstand" masculine) (mkPrep "fra") (mkPrep "til") ;
|
||||
doctor_N = mk2N "lege" "legen" ;
|
||||
dog_N = regGenN "hund" masculine ;
|
||||
door_N = regGenN "dør" feminine ;
|
||||
door_N = regGenN "dør" feminine ;
|
||||
drink_V2 = dirV2 IrregNor.drikke_V ;
|
||||
easy_A2V = mkA2V (regA "grei") (mkPrep "for") ;
|
||||
eat_V2 = dirV2 (mk2V "spise" "spiste") ;
|
||||
@@ -77,7 +77,7 @@ lin
|
||||
fish_N = mk2N "fisk" "fisken" ;
|
||||
floor_N = regGenN "golv" neutrum ;
|
||||
forget_V2 = dirV2 (mkV "glemme" "glemmer" "glemmes" "glemte" "glemt" "glem") ;
|
||||
fridge_N = regGenN "kjøleskap" neutrum ;
|
||||
fridge_N = regGenN "kjøleskap" neutrum ;
|
||||
friend_N = mkN "venn" "vennen" "venner" "vennene" ;
|
||||
fruit_N = mk2N "frukt" "frukten" ;
|
||||
fun_AV = mkAV (mkA "morsom" "morsomt" "morsomme") ;
|
||||
@@ -86,14 +86,14 @@ lin
|
||||
glove_N = regGenN "hanske" masculine ;
|
||||
gold_N = regGenN "gull" neutrum ;
|
||||
good_A = mkADeg "god" "godt" "gode" "bedre" "best" ;
|
||||
go_V = vaereV IrregNor.gå_V ;
|
||||
green_A = mk2ADeg "grønn" "grønt" ;
|
||||
go_V = vaereV IrregNor.gå_V ;
|
||||
green_A = mk2ADeg "grønn" "grønt" ;
|
||||
harbour_N = regGenN "havn" feminine;
|
||||
hate_V2 = dirV2 (regV "hate") ;
|
||||
hat_N = regGenN "hatt" masculine ;
|
||||
hear_V2 = dirV2 (mk2V "høre" "hørte") ;
|
||||
hear_V2 = dirV2 (mk2V "høre" "hørte") ;
|
||||
hill_N = regGenN "haug" masculine ;
|
||||
hope_VS = mkVS (regV "håpe") ;
|
||||
hope_VS = mkVS (regV "håpe") ;
|
||||
horse_N = regGenN "hest" masculine ;
|
||||
hot_A = regADeg "heit" ;
|
||||
house_N = regGenN "hus" neutrum ;
|
||||
@@ -107,22 +107,22 @@ lin
|
||||
know_VS = mkVS IrregNor.vite_V ;
|
||||
lake_N = regGenN "vann" neutrum ;
|
||||
lamp_N = regGenN "lampe" feminine ;
|
||||
learn_V2 = dirV2 (mk2V "lære" "lærte") ;
|
||||
leather_N = regGenN "lær" neutrum ;
|
||||
learn_V2 = dirV2 (mk2V "lære" "lærte") ;
|
||||
leather_N = regGenN "lær" neutrum ;
|
||||
leave_V2 = dirV2 forlate_V ;
|
||||
like_V2 = dirV2 (mk2V "like" "likte") ;
|
||||
listen_V2 = dirV2 (regV "lytte") ;
|
||||
live_V = mk2V "leve" "levde" ;
|
||||
long_A = irregADeg "lang" "lengre" "lengst" ;
|
||||
lose_V2 = dirV2 (mk2V "tape" "tapte") ;
|
||||
love_N = regGenN "kjærlighet" masculine ;
|
||||
love_N = regGenN "kjærlighet" masculine ;
|
||||
love_V2 = dirV2 (regV "elske") ;
|
||||
man_N = (mkN "mann" "mannen" "menn" "mennen") ;
|
||||
married_A2 = mkA2 (mk2A "gift" "gift") (mkPrep "med") ;
|
||||
meat_N = regGenN "kjøtt" neutrum ;
|
||||
meat_N = regGenN "kjøtt" neutrum ;
|
||||
milk_N = regGenN "melk" masculine ;
|
||||
moon_N = regGenN "måne" masculine ;
|
||||
mother_N2 = mkN2 (mkN "mor" "moren" "mødre" "mødrene") (mkPrep "til") ; ---- fem
|
||||
moon_N = regGenN "måne" masculine ;
|
||||
mother_N2 = mkN2 (mkN "mor" "moren" "mødre" "mødrene") (mkPrep "til") ; ---- fem
|
||||
mountain_N = regGenN "fjell" neutrum ;
|
||||
music_N = mk2N "musikk" "musikken" ;
|
||||
narrow_A = regADeg "smal" ;
|
||||
@@ -130,7 +130,7 @@ lin
|
||||
newspaper_N = regGenN "avis" feminine ;
|
||||
oil_N = regGenN "olje" masculine ;
|
||||
old_A = mkADeg "gammel" "gammelt" "gamle" "eldre" "eldst" ;
|
||||
open_V2 = dirV2 (regV "åpne") ;
|
||||
open_V2 = dirV2 (regV "åpne") ;
|
||||
paint_V2A = mkV2A (regV "male") noPrep ;
|
||||
paper_N = regGenN "papir" neutrum ; ----
|
||||
paris_PN = regGenPN "Paris" neutrum ;
|
||||
@@ -146,7 +146,7 @@ lin
|
||||
radio_N = regGenN "radio" masculine ;
|
||||
rain_V0 = mkV0 (regV "regne") ;
|
||||
read_V2 = dirV2 (mk2V "lese" "leste") ;
|
||||
red_A = regADeg "rød" ;
|
||||
red_A = regADeg "rød" ;
|
||||
religion_N = mk2N "religion" "religionen" ;
|
||||
restaurant_N = mk2N "restaurant" "restauranten" ;
|
||||
river_N = mk2N "elv" "elva" ;
|
||||
@@ -157,53 +157,53 @@ lin
|
||||
say_VS = mkVS si_V ;
|
||||
school_N = regGenN "skole" feminine;
|
||||
science_N = mk2N "vitenskap" "vitenskapen" ;
|
||||
sea_N = mk2N "sjø" "sjøen" ;
|
||||
sea_N = mk2N "sjø" "sjøen" ;
|
||||
seek_V2 = mkV2 (mk2V "lete" "lette") (mkPrep "etter") ;
|
||||
see_V2 = dirV2 se_V ;
|
||||
sell_V3 = dirV3 selge_V (mkPrep "til") ;
|
||||
send_V3 = dirV3 (mk2V "sende" "sendte") (mkPrep "til") ;
|
||||
sheep_N = mk2N "får" "fåret" ;
|
||||
sheep_N = mk2N "får" "fåret" ;
|
||||
ship_N = regGenN "skip" neutrum ;
|
||||
shirt_N = regGenN "skjorte" feminine ;
|
||||
shoe_N = regGenN "sko" masculine ;
|
||||
shop_N = mk2N "butikk" "butikken" ;
|
||||
short_A = regADeg "kort" ;
|
||||
silver_N = mk2N "sølv" "sølvet";
|
||||
sister_N = mkN "søster" "søsteren" "søstrer" "søstrene" ;
|
||||
silver_N = mk2N "sølv" "sølvet";
|
||||
sister_N = mkN "søster" "søsteren" "søstrer" "søstrene" ;
|
||||
sleep_V = irregV "sove" "sov" "sovet" ;
|
||||
small_A = mkADeg "liten" "lite" "små" "mindre" "minst" ; ---- lille
|
||||
small_A = mkADeg "liten" "lite" "små" "mindre" "minst" ; ---- lille
|
||||
snake_N = regGenN "orm" masculine ;
|
||||
sock_N = regGenN "strømpe" masculine ;
|
||||
sock_N = regGenN "strømpe" masculine ;
|
||||
speak_V2 = dirV2 (regV "snakke") ;
|
||||
star_N = regGenN "stjerne" feminine ;
|
||||
steel_N = regGenN "stål" neutrum ;
|
||||
steel_N = regGenN "stål" neutrum ;
|
||||
stone_N = regGenN "stein" masculine ;
|
||||
stove_N = regGenN "komfyr" masculine ;
|
||||
student_N = mk2N "student" "studenten" ;
|
||||
stupid_A = mk3ADeg "dum" "dumt" "dumme" ;
|
||||
sun_N = regGenN "sol" feminine ;
|
||||
switch8off_V2 = dirV2 (partV (irregV "slå" "slo" "slått") "av") ;
|
||||
switch8on_V2 = dirV2 (partV (irregV "slå" "slo" "slått") "på") ;
|
||||
switch8off_V2 = dirV2 (partV (irregV "slå" "slo" "slått") "av") ;
|
||||
switch8on_V2 = dirV2 (partV (irregV "slå" "slo" "slått") "på") ;
|
||||
table_N = regGenN "bord" neutrum ;
|
||||
talk_V3 = mkV3 (regV "snakke") (mkPrep "til") (mkPrep "om") ;
|
||||
teacher_N = mkN "lærer" "læreren" "lærere" "lærerne" ;
|
||||
teacher_N = mkN "lærer" "læreren" "lærere" "lærerne" ;
|
||||
teach_V2 = dirV2 (mk2V "undervise" "underviste") ;
|
||||
television_N = mk2N "fjernsyn" "fjernsynet" ;
|
||||
thick_A = mk2ADeg "tykk" "tykt" ;
|
||||
thin_A = mk2ADeg "tynn" "tynt" ;
|
||||
train_N = regGenN "tog" neutrum ;
|
||||
travel_V = vaereV (mk2V "reise" "reiste") ;
|
||||
tree_N = mkN "tre" "treet" "trær" "træne" ;
|
||||
tree_N = mkN "tre" "treet" "trær" "træne" ;
|
||||
---- trousers_N = regGenN "trousers" ; ---- pl t !
|
||||
ugly_A = mk2ADeg "stygg" "stygt" ;
|
||||
understand_V2 = dirV2 (irregV "forstå" "forstod" "forstått") ;
|
||||
understand_V2 = dirV2 (irregV "forstå" "forstod" "forstått") ;
|
||||
university_N = regGenN "universitet" neutrum ;
|
||||
village_N = mk2N "grend" "grenda" ;
|
||||
wait_V2 = mkV2 (regV "vente") (mkPrep "på") ;
|
||||
walk_V = vaereV IrregNor.gå_V ;
|
||||
wait_V2 = mkV2 (regV "vente") (mkPrep "på") ;
|
||||
walk_V = vaereV IrregNor.gå_V ;
|
||||
warm_A = regADeg "varm" ;
|
||||
war_N = regGenN "krig" masculine ;
|
||||
watch_V2 = mkV2 se_V (mkPrep "på") ;
|
||||
watch_V2 = mkV2 se_V (mkPrep "på") ;
|
||||
water_N = mk2N "vatn" "vatnet" ;
|
||||
white_A = regADeg "hvit" ;
|
||||
window_N = mkN "vindu" "vinduet" "vinduer" "vinduene" ; ---- er?
|
||||
@@ -211,13 +211,13 @@ lin
|
||||
win_V2 = dirV2 (irregV "vinne" "vant" "vunnet") ;
|
||||
woman_N = regGenN "kvinne" feminine ; ---- kvinnen
|
||||
wonder_VQ = mkVQ (regV "undre") ; ---- seg
|
||||
wood_N = mkN "tre" "treet" "trær" "træne" ;
|
||||
wood_N = mkN "tre" "treet" "trær" "træne" ;
|
||||
write_V2 = dirV2 (irregV "skrive" "skrev" "skrevet") ;
|
||||
yellow_A = regADeg "gul" ;
|
||||
young_A = irregADeg "ung" "yngre" "yngst" ;
|
||||
|
||||
do_V2 = dirV2 (irregV "gjøre" "gjorde" "gjort") ;
|
||||
now_Adv = mkAdv "nå" ;
|
||||
do_V2 = dirV2 (irregV "gjøre" "gjorde" "gjort") ;
|
||||
now_Adv = mkAdv "nå" ;
|
||||
already_Adv = mkAdv "allerede" ;
|
||||
song_N = mk2N "sang" "sangen" ;
|
||||
add_V3 = mkV3 (partV (irregV "legge" "la" "lagt") "til") noPrep (mkPrep "til") ;
|
||||
@@ -227,20 +227,20 @@ lin
|
||||
jump_V = regV "hoppe" ;
|
||||
|
||||
left_Ord = {s = "venstre" ; isDet = True} ;
|
||||
right_Ord = {s = "høyre" ; isDet = True} ;
|
||||
right_Ord = {s = "høyre" ; isDet = True} ;
|
||||
far_Adv = mkAdv "fjern" ;
|
||||
correct_A = regA "riktig" ;
|
||||
dry_A = mk2A "tørr" "tørt" ;
|
||||
dull_A = regA "sløv" ;
|
||||
dry_A = mk2A "tørr" "tørt" ;
|
||||
dull_A = regA "sløv" ;
|
||||
full_A = regA "full" ;
|
||||
heavy_A = irregADeg "tung" "tyngre" "tyngst" ;
|
||||
near_A = mkADeg "nære" "nære" "nære" "nærmere" "nærmest" ;
|
||||
rotten_A = mk3ADeg "råtten" "råttent" "råtne" ;
|
||||
near_A = mkADeg "nære" "nære" "nære" "nærmere" "nærmest" ;
|
||||
rotten_A = mk3ADeg "råtten" "råttent" "råtne" ;
|
||||
round_A = regA "rund" ;
|
||||
sharp_A = mk2A "kvass" "kvast" ;
|
||||
smooth_A = mk2A "slett" "slett" ;
|
||||
straight_A = regA "rak" ;
|
||||
wet_A = regA "våt" ;
|
||||
wet_A = regA "våt" ;
|
||||
wide_A = regA "bred" ;
|
||||
animal_N = mk2N "dyr" "dyret" ;
|
||||
ashes_N = mk2N "aske" "aska" ;
|
||||
@@ -252,30 +252,30 @@ lin
|
||||
breast_N = mk2N "bryst" "brystet" ;
|
||||
cloud_N = mk2N "sky" "skya" ;
|
||||
day_N = mk2N "dag" "dagen" ;
|
||||
dust_N = mk2N "støv" "støvet" ;
|
||||
ear_N = mk2N "øre" "øret" ;
|
||||
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" ;
|
||||
eye_N = mkN "øye" "øyet" "øyne" "øynene" ;
|
||||
fat_N = mk2N "fett" "fettet" ;
|
||||
feather_N = mk2N "fjør" "fjøra" ;
|
||||
feather_N = mk2N "fjør" "fjøra" ;
|
||||
fingernail_N = mk2N "negl" "neglen" ;
|
||||
fire_N = mk2N "ild" "ilden" ;
|
||||
flower_N = mk2N "blomst" "blomsten" ;
|
||||
fog_N = mk2N "tåke" "tåka" ;
|
||||
foot_N = mk2N "fot" "føtter" ;
|
||||
fog_N = mk2N "tåke" "tåka" ;
|
||||
foot_N = mk2N "fot" "føtter" ;
|
||||
forest_N = mk2N "skog" "skogen" ;
|
||||
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" ;
|
||||
hair_N = mk2N "hår" "håret" ;
|
||||
hand_N = mk2N "hånd" "hånden" ;
|
||||
head_N = mk2N "hode" "hodet" ;
|
||||
heart_N = mk2N "hjerte" "hjertet" ;
|
||||
horn_N = mk2N "horn" "hornet" ;
|
||||
husband_N = mkN "ektemann" "ektemannen" "ektemenn" "ektemennen" ;
|
||||
ice_N = mk2N "is" "isen" ;
|
||||
knee_N = mkN "kne" "kneet" "knær" "knæne" ;
|
||||
leaf_N = mk2N "løv" "løvet" ;
|
||||
knee_N = mkN "kne" "kneet" "knær" "knæne" ;
|
||||
leaf_N = mk2N "løv" "løvet" ;
|
||||
leg_N = mk2N "bein" "beinet" ;
|
||||
liver_N = mkN "lever" "leveren" "levrer" "levrene" ;
|
||||
louse_N = mk2N "lus" "lusa" ;
|
||||
@@ -287,15 +287,15 @@ lin
|
||||
person_N = mk2N "person" "personen" ;
|
||||
rain_N = mk2N "regn" "regnet" ;
|
||||
road_N = mk2N "vei" "veien" ;
|
||||
root_N = mkN "rot" "rota" "røtter" "røttene" ;
|
||||
root_N = mkN "rot" "rota" "røtter" "røttene" ;
|
||||
rope_N = mk2N "tau" "tauet" ;
|
||||
salt_N = mk2N "salt" "saltet" ;
|
||||
sand_N = mk2N "sand" "sanden" ;
|
||||
seed_N = mk2N "frø" "frøet" ;
|
||||
seed_N = mk2N "frø" "frøet" ;
|
||||
skin_N = mk2N "skinn" "skinnet" ;
|
||||
sky_N = mkN "himmel" "himmelen" "himler" "himlene" ;
|
||||
smoke_N = mk2N "røyk" "røyken" ;
|
||||
snow_N = mk2N "snø" "snøen" ;
|
||||
smoke_N = mk2N "røyk" "røyken" ;
|
||||
snow_N = mk2N "snø" "snøen" ;
|
||||
stick_N = mk2N "pinne" "pinnen" ;
|
||||
tail_N = mk2N "hale" "halen" ;
|
||||
tongue_N = mk2N "tunge" "tunga" ;
|
||||
@@ -304,22 +304,22 @@ lin
|
||||
wind_N = mk2N "vind" "vinden" ;
|
||||
wing_N = mk2N "vinge" "vingen" ;
|
||||
worm_N = mk2N "mark" "marken" ;
|
||||
year_N = mk2N "år" "året" ;
|
||||
year_N = mk2N "år" "året" ;
|
||||
bite_V2 = dirV2 (IrregNor.bite_V) ;
|
||||
blow_V = mk2V "blåse" "blåste" ;
|
||||
blow_V = mk2V "blåse" "blåste" ;
|
||||
burn_V = brenne_V ;
|
||||
count_V2 = dirV2 (regV "regne") ;
|
||||
cut_V2 = dirV2 (skjære_V) ;
|
||||
cut_V2 = dirV2 (skjære_V) ;
|
||||
dig_V = mk2V "grave" "gravde" ;
|
||||
fall_V = vaereV falle_V ;
|
||||
fear_V2 = dirV2 (regV "frykte") ;
|
||||
fight_V2 = dirV2 (slåss_V) ;
|
||||
fight_V2 = dirV2 (slåss_V) ;
|
||||
float_V = flyte_V ;
|
||||
flow_V = renne_V ;
|
||||
fly_V = vaereV IrregNor.fly_V ;
|
||||
freeze_V = fryse_V ;
|
||||
give_V3 = dirV3 gi_V (mkPrep "til");
|
||||
hit_V2 = dirV2 (slå_V) ;
|
||||
hit_V2 = dirV2 (slå_V) ;
|
||||
hold_V2 = dirV2 (holde_V) ;
|
||||
hunt_V2 = dirV2 (regV "jakte") ;
|
||||
kill_V2 = dirV2 (mk2V "drepe" "drepte") ;
|
||||
@@ -327,18 +327,18 @@ lin
|
||||
lie_V = ligge_V ;
|
||||
play_V = mk2V "leke" "lekte" ;
|
||||
pull_V2 = dirV2 (dra_V) ;
|
||||
push_V2 = dirV2 (irregV "skyve" "skjøv" "skjøvet") ;
|
||||
push_V2 = dirV2 (irregV "skyve" "skjøv" "skjøvet") ;
|
||||
rub_V2 = dirV2 (gni_V) ;
|
||||
scratch_V2 = dirV2 (regV "klø") ;
|
||||
scratch_V2 = dirV2 (regV "klø") ;
|
||||
sew_V = mk2V "sy" "sydde" ;
|
||||
sing_V = synge_V ;
|
||||
sit_V = sitte_V ;
|
||||
smell_V = regV "lukte" ;
|
||||
spit_V = regV "spytte" ;
|
||||
split_V2 = dirV2 (mk2V "kløyve" "kløyvde") ;
|
||||
split_V2 = dirV2 (mk2V "kløyve" "kløyvde") ;
|
||||
squeeze_V2 = dirV2 (mk2V "klemme" "klemte") ;
|
||||
stab_V2 = dirV2 (stikke_V) ;
|
||||
stand_V = vaereV stå_V ;
|
||||
stand_V = vaereV stå_V ;
|
||||
suck_V2 = dirV2 (suge_V) ;
|
||||
swell_V = partV (regV "hovne") "opp" ;
|
||||
swim_V = regV "simme" ;
|
||||
@@ -348,23 +348,23 @@ lin
|
||||
turn_V = mk2V "vende" "vendte" ;
|
||||
vomit_V = partV (regV "kaste") "opp" ;
|
||||
wash_V2 = dirV2 (regV "vaske") ;
|
||||
wipe_V2 = dirV2 (regV "tørke") ;
|
||||
wipe_V2 = dirV2 (regV "tørke") ;
|
||||
breathe_V = regV "puste" ;
|
||||
|
||||
|
||||
grammar_N = regN "grammatikk" ;
|
||||
language_N = mk2N "språk" "språket" ;
|
||||
language_N = mk2N "språk" "språket" ;
|
||||
rule_N = mkN "regel" "regelen" "regler" "reglene" ;
|
||||
|
||||
question_N = mk2N "spørsmål" "spørsmålet" ;
|
||||
---- ready_A = regA "färdig" ;
|
||||
question_N = mk2N "spørsmål" "spørsmålet" ;
|
||||
---- ready_A = regA "färdig" ;
|
||||
---- reason_N = regN "anledning" ;
|
||||
today_Adv = mkAdv "idag" ;
|
||||
---- uncertain_A = mk3A "osäker" "osäkert" "osäkra" ;
|
||||
---- uncertain_A = mk3A "osäker" "osäkert" "osäkra" ;
|
||||
|
||||
} ;
|
||||
|
||||
-- a" -> e" 86
|
||||
-- ö -> ø 66
|
||||
-- ö -> ø 66
|
||||
-- ck -> kk 20
|
||||
-- ä -> e 44
|
||||
-- ä -> e 44
|
||||
|
||||
@@ -1,4 +1,3 @@
|
||||
--# -coding=latin1
|
||||
--1 A Simple Norwegian Resource Morphology
|
||||
--
|
||||
-- Aarne Ranta 2002
|
||||
@@ -10,6 +9,7 @@
|
||||
-- We use the parameter types and word classes defined for morphology.
|
||||
|
||||
resource MorphoNor = CommonScand, ResNor ** open Prelude, Predef in {
|
||||
flags coding=utf8 ;
|
||||
|
||||
-- genders
|
||||
|
||||
@@ -160,9 +160,9 @@ oper
|
||||
|
||||
|
||||
mkTal : (x1,_,_,_,x5 : Str) -> LinDigit =
|
||||
\två, tolv, tjugo, andra, tolfte ->
|
||||
\två, tolv, tjugo, andra, tolfte ->
|
||||
{s = table {
|
||||
ental => cardOrd två andra ;
|
||||
ental => cardOrd två andra ;
|
||||
ton => cardOrd tolv tolfte ;
|
||||
tiotal => cardReg tjugo
|
||||
}
|
||||
|
||||
@@ -1,5 +1,5 @@
|
||||
--# -coding=latin1
|
||||
concrete NumeralNor of Numeral = CatNor ** open MorphoNor in {
|
||||
flags coding=utf8 ;
|
||||
|
||||
lincat
|
||||
Digit = {s : DForm => CardOrd => Str} ;
|
||||
@@ -12,17 +12,17 @@ lin
|
||||
|
||||
n2 = mkTal "to" "tolv" "tjue" "andre" "tolfte" ;
|
||||
n3 = mkTal "tre" "tretten" "tretti" "tredje" "trettende" ;
|
||||
n4 = mkTal "fire" "fjorten" "førti" "fjerde" "fjortende" ;
|
||||
n4 = mkTal "fire" "fjorten" "førti" "fjerde" "fjortende" ;
|
||||
n5 = mkTal "fem" "femten" "femti" "femte" "femtende" ;
|
||||
n6 = mkTal "seks" "seksten" "seksti" "sjette" "sextende" ;
|
||||
n7 = mkTal "sju" "sytten" "sytti" "syvende" "syttende" ;
|
||||
n8 = mkTal "åtte" "atten" "åtti" "åttende" "attende" ;
|
||||
n8 = mkTal "åtte" "atten" "åtti" "åttende" "attende" ;
|
||||
n9 = mkTal "ni" "nitten" "nitti" "niende" "nittende" ;
|
||||
|
||||
pot01 = {
|
||||
s = \\f => table {
|
||||
NCard g => case g of {NNeutr => "ett" ; NUtr _ => "en"} ; ---- ei ?
|
||||
_ => "første"
|
||||
_ => "første"
|
||||
} ;
|
||||
n = Sg
|
||||
} ;
|
||||
|
||||
@@ -1,5 +1,4 @@
|
||||
--# -path=.:../scandinavian:../common:../abstract:../../prelude
|
||||
--# -coding=latin1
|
||||
|
||||
--1 Norwegian Lexical Paradigms
|
||||
--
|
||||
@@ -8,7 +7,7 @@
|
||||
-- This is an API for the user of the resource grammar
|
||||
-- for adding lexical items. It gives functions for forming
|
||||
-- expressions of open categories: nouns, adjectives, verbs.
|
||||
-- It covers the "bokmål" variant of Norwegian.
|
||||
-- It covers the "bokmål" variant of Norwegian.
|
||||
--
|
||||
-- Closed categories (determiners, pronouns, conjunctions) are
|
||||
-- accessed through the resource syntax API, $Structural$.
|
||||
@@ -35,6 +34,7 @@ resource ParadigmsNor =
|
||||
MorphoNor,
|
||||
CatNor in {
|
||||
|
||||
flags coding=utf8 ;
|
||||
--2 Parameters
|
||||
--
|
||||
-- To abstract over gender names, we define the following identifiers.
|
||||
@@ -203,11 +203,11 @@ oper
|
||||
|
||||
|
||||
|
||||
--3 Verbs with 'være' as auxiliary
|
||||
--3 Verbs with 'være' as auxiliary
|
||||
--
|
||||
-- By default, the auxiliary is "have". This function changes it to "være".
|
||||
-- By default, the auxiliary is "have". This function changes it to "være".
|
||||
|
||||
vaereV : V -> V ; -- force "være" as auxiliary (default "have")
|
||||
vaereV : V -> V ; -- force "være" as auxiliary (default "have")
|
||||
|
||||
|
||||
|
||||
@@ -415,7 +415,7 @@ oper
|
||||
mkV0 v = v ** {lock_V0 = <>} ;
|
||||
mkVS v = v ** {lock_VS = <>} ;
|
||||
mkV2S v p = mk2V2 v p ** {lock_V2S = <>} ;
|
||||
mkVV v = v ** {c2 = mkComplement "å" ; lock_VV = <>} ;
|
||||
mkVV v = v ** {c2 = mkComplement "å" ; lock_VV = <>} ;
|
||||
mkV2V v p t = mk2V2 v p ** {c3 = mkComplement t.s ; lock_V2V = <>} ;
|
||||
mkVA v = v ** {lock_VA = <>} ;
|
||||
mkV2A v p = mk2V2 v p ** {lock_V2A = <>} ;
|
||||
|
||||
@@ -1,8 +1,8 @@
|
||||
--# -coding=latin1
|
||||
concrete StructuralNor of Structural = CatNor **
|
||||
open MorphoNor, ParadigmsNor, (X = ConstructX), IrregNor, Prelude in {
|
||||
|
||||
flags optimize=all ;
|
||||
coding=utf8 ;
|
||||
|
||||
lin
|
||||
above_Prep = ss "ovenfor" ;
|
||||
@@ -14,10 +14,10 @@ concrete StructuralNor of Structural = CatNor **
|
||||
always_AdV = ss "altid" ;
|
||||
and_Conj = {s1 = [] ; s2 = "og" ; n = Pl} ;
|
||||
because_Subj = ss "fordi" ;
|
||||
before_Prep = ss "før" ;
|
||||
before_Prep = ss "før" ;
|
||||
behind_Prep = ss "bakom" ;
|
||||
between_Prep = ss "mellom" ;
|
||||
both7and_DConj = sd2 "både" "og" ** {n = Pl} ;
|
||||
both7and_DConj = sd2 "både" "og" ** {n = Pl} ;
|
||||
but_PConj = ss "men" ;
|
||||
by8means_Prep = ss "med" ;
|
||||
can8know_VV, can_VV =
|
||||
@@ -29,8 +29,8 @@ concrete StructuralNor of Structural = CatNor **
|
||||
every_Det = {s = \\_,_ => "hver" ; sp = \\_,_ =>"enhver" ; n = Sg ; det = DDef Indef} ;
|
||||
everything_NP = regNP "alt" "alts" Neutr Sg ;
|
||||
everywhere_Adv = ss "overalt" ;
|
||||
few_Det = {s,sp = \\_,_ => "få" ; n = Pl ; det = DDef Indef} ;
|
||||
--- first_Ord = {s = "første" ; isDet = True} ; DEPREC
|
||||
few_Det = {s,sp = \\_,_ => "få" ; n = Pl ; det = DDef Indef} ;
|
||||
--- first_Ord = {s = "første" ; isDet = True} ; DEPREC
|
||||
for_Prep = ss "for" ;
|
||||
from_Prep = ss "fra" ;
|
||||
he_Pron = MorphoNor.mkNP "han" "ham" "hans" "hans" "hans" Utr Sg P3 ;
|
||||
@@ -52,10 +52,10 @@ concrete StructuralNor of Structural = CatNor **
|
||||
most_Predet = {s = detForms ["den meste"] ["det meste"] ["de fleste"] ; p = [] ; a = PNoAg} ;
|
||||
much_Det = {s,sp = \\_,_ => "mye" ; n = Pl ; det = DDef Indef} ;
|
||||
must_VV =
|
||||
mkV "måtte" "må" "må" "måtte" "måttet" "mått" **
|
||||
mkV "måtte" "må" "må" "måtte" "måttet" "mått" **
|
||||
{c2 = mkComplement [] ; lock_VV = <>} ;
|
||||
no_Utt = ss ["nei"] ;
|
||||
on_Prep = ss "på" ;
|
||||
on_Prep = ss "på" ;
|
||||
|
||||
only_Predet = {s = \\_,_ => "kun" ; p = [] ; a = PNoAg} ;
|
||||
or_Conj = {s1 = [] ; s2 = "eller" ; n = Pl} ;
|
||||
@@ -65,7 +65,7 @@ concrete StructuralNor of Structural = CatNor **
|
||||
possess_Prep = ss "av" ;
|
||||
quite_Adv = ss "temmelig" ;
|
||||
she_Pron = MorphoNor.mkNP "hun" "henne" "hennes" "hennes" "hennes" Utr Sg P3 ;
|
||||
so_AdA = ss "så" ;
|
||||
so_AdA = ss "så" ;
|
||||
someSg_Det = {s,sp = \\_ => genderForms "noen" "noe" ; n = Sg ; det = DIndef} ;
|
||||
somePl_Det = {s,sp = \\_,_ => "noen" ; n = Pl ; det = DIndef} ;
|
||||
somebody_NP = regNP "noen" "noens" Utr Sg ;
|
||||
@@ -98,11 +98,11 @@ concrete StructuralNor of Structural = CatNor **
|
||||
want_VV =
|
||||
mkV "ville" "vil" "vill" "ville" "villet" "villed" **
|
||||
{c2 = mkComplement [] ; lock_VV = <>} ;
|
||||
we_Pron = MorphoNor.mkNP "vi" "oss" "vår" "vårt" "våre" Utr Pl P1 ;
|
||||
we_Pron = MorphoNor.mkNP "vi" "oss" "vår" "vårt" "våre" Utr Pl P1 ;
|
||||
whatSg_IP = {s = \\_ => "hva" ; g = Neutr ; n = Sg} ; ---- infl
|
||||
whatPl_IP = {s = \\_ => "hvilke" ; g = Neutr ; n = Pl} ; ---- infl
|
||||
when_IAdv = ss "når" ;
|
||||
when_Subj = ss "når" ;
|
||||
when_IAdv = ss "når" ;
|
||||
when_Subj = ss "når" ;
|
||||
where_IAdv = ss "hvor" ;
|
||||
which_IQuant = {
|
||||
s = table {
|
||||
|
||||
Reference in New Issue
Block a user