concrete StructuralNor of Structural = CatNor ** open MorphoNor, ParadigmsNor, (X = ConstructX), IrregNor, Prelude in { flags optimize=all ; lin above_Prep = ss "ovenfor" ; after_Prep = ss "etter" ; by8agent_Prep = ss "av" ; all_Predet = {s = detForms "all" "alt" "alle" ; p = [] ; a = PNoAg} ; almost_AdA, almost_AdN = ss "nesten" ; although_Subj = ss ["selv om"] ; always_AdV = ss "altid" ; and_Conj = {s1 = [] ; s2 = "og" ; n = Pl} ; because_Subj = ss "fordi" ; before_Prep = ss "før" ; behind_Prep = ss "bakom" ; between_Prep = ss "mellom" ; both7and_DConj = sd2 "både" "og" ** {n = Pl} ; but_PConj = ss "men" ; by8means_Prep = ss "med" ; can8know_VV, can_VV = mkV "kunne" "kan" "kunn" "kunne" "kunnet" "kunnen" ** {c2 = mkComplement [] ; lock_VV = <>} ; during_Prep = ss "under" ; either7or_DConj = sd2 "enten" "eller" ** {n = Sg} ; everybody_NP = regNP "alle" "alles" Utr Pl ; 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 for_Prep = ss "for" ; from_Prep = ss "fra" ; he_Pron = MorphoNor.mkNP "han" "ham" "hans" "hans" "hans" Utr Sg P3 ; here_Adv = ss "her" ; here7to_Adv = ss "hit" ; here7from_Adv = ss "herfra" ; how_IAdv = ss "hvor" ; how8many_IDet = {s = \\_ => ["hur mange"] ; n = Pl ; det = DDef Indef} ; if_Subj = ss "hvis" ; in8front_Prep = ss "foran" ; i_Pron = MorphoNor.mkNP "jeg" "meg" (variants {"min" ; "mi"}) "mit" "mine" Utr Sg P1 ; --- mi in_Prep = ss "i" ; it_Pron = MorphoNor.regNP "det" "dets" Neutr Sg ; less_CAdv = X.mkCAdv "mindre" conjThan ; many_Det = {s,sp = \\_,_ => "mange" ; n = Pl ; det = DDef Indef} ; more_CAdv = X.mkCAdv "mer" conjThan ; 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" ** {c2 = mkComplement [] ; lock_VV = <>} ; no_Utt = ss ["nei"] ; on_Prep = ss "på" ; only_Predet = {s = \\_,_ => "kun" ; p = [] ; a = PNoAg} ; or_Conj = {s1 = [] ; s2 = "eller" ; n = Pl} ; otherwise_PConj = ss "annarledes" ; part_Prep = ss "av" ; please_Voc = ss "takk" ; --- possess_Prep = ss "av" ; quite_Adv = ss "temmelig" ; she_Pron = MorphoNor.mkNP "hun" "henne" "hennes" "hennes" "hennes" Utr Sg P3 ; 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 ; something_NP = regNP "noe" "noes" Neutr Sg ; somewhere_Adv = ss ["et eller annet sted"] ; ---- ? that_Quant = {s,sp = table { Sg => \\_,_ => genderForms ["den der"] ["det der"] ; Pl => \\_,_,_ => ["de der"] } ; det = DDef Indef } ; there_Adv = ss "der" ; there7to_Adv = ss "dit" ; there7from_Adv = ss "derfra" ; therefore_PConj = ss "derfor" ; they_Pron = MorphoNor.mkNP "de" "dem" "deres" "deres" "deres" Utr Pl P1 ; this_Quant = {s,sp = table { Sg => \\_,_ => genderForms ["denne"] ["dette"] ; Pl => \\_,_,_ => ["disse"] } ; det = DDef Def } ; through_Prep = ss "gjennom" ; too_AdA = ss "for" ; to_Prep = ss "til" ; under_Prep = ss "under" ; very_AdA = ss "mye" ; 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 ; whatSg_IP = {s = \\_ => "hva" ; g = Neutr ; n = Sg} ; ---- infl whatPl_IP = {s = \\_ => "hva" ; g = Neutr ; n = Pl} ; ---- infl when_IAdv = ss "når" ; when_Subj = ss "når" ; where_IAdv = ss "hver" ; which_IQuant = { s = table { Sg => genderForms "hvilken" "hvilket" ; Pl => \\_ => "hvilke" } ; det = DIndef } ; whoSg_IP = {s = vem.s ; g = Utr ; n = Sg} ; whoPl_IP = {s = \\_ => "hvilke" ; g = Utr ; n = Pl} ; why_IAdv = ss "hvorfor" ; without_Prep = ss "uten" ; with_Prep = ss "med" ; yes_Utt = ss ["ja"] ; youSg_Pron = MorphoNor.mkNP "du" "deg" (variants {"din" ; "di"}) "dit" "dine" Utr Sg P2 ; ---- youPl_Pron = MorphoNor.mkNP "dere" "dere" "deres" "deres" "deres" Utr Pl P2 ; youPol_Pron = MorphoNor.mkNP "Dere" "Dere" "Deres" "Deres" "Deres" Utr Sg P2 ; --- wrong in refl have_V2 = dirV2 IrregNor.ha_V ; -- Auxiliaries that are used repeatedly. oper vem = MorphoNor.mkNP "hvem" "hvem" "hvis" "hvis" "hvis" Utr Sg P3 ; lin language_title_Utt = ss "norsk" ; }