concrete StructuralDan of Structural = CatDan ** 
  open MorphoDan, ParadigmsDan, Prelude in {

  flags optimize=all ;

  lin
  above_Prep = ss "ovenfor" ;
  after_Prep = ss "efter" ;
  by8agent_Prep = ss "af" ;
  all_Predet = {s = gennumForms "all" "alt" "alle"} ;
  almost_AdA, almost_AdN = ss "næsten" ;
  although_Subj = ss ["selv om"] ;
  always_AdV = ss "altid" ;
  and_Conj = ss "og" ** {n = Pl} ;
  because_Subj = ss "fordi" ;
  before_Prep = ss "før" ;
  behind_Prep = ss "bag" ;
  between_Prep = ss "mellem" ;
  both7and_DConj = sd2 "både" "og" ** {n = Pl} ;
  but_PConj = ss "men" ;
  by8means_Prep = ss "med" ;
  can8know_VV, can_VV = 
    mkV "kunne" "kan" "kan" "kunne" "kunnet" "kan" **
    {c2 = [] ; lock_VV = <>} ;
  during_Prep = ss "under" ;
  either7or_DConj = sd2 "enten" "eller" ** {n = Sg} ;
  everybody_NP = regNP "alle" "alles" Plg ;
  every_Det = {s = \\_,_ => "hver" ; n = Sg ; det = DDef Indef} ;
  everything_NP = regNP "alt" "alts" SgNeutr ;
  everywhere_Adv = ss "overalt" ;
  few_Det  = {s = \\_,_ => "få" ; n = Pl ; det = DDef Indef} ;
---  first_Ord = {s = "første" ; isDet = True} ;
  for_Prep = ss "for" ;
  from_Prep = ss "fra" ;
  he_Pron = MorphoDan.mkNP "han"  "ham"  "hans" "hans" "hans"  SgUtr 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 = 
    MorphoDan.mkNP "jeg" "mig" "min" "mit" "mine"  SgUtr P1 ;
  in_Prep = ss "i" ;
  it_Pron = MorphoDan.regNP "det" "dets" SgNeutr ;
  less_CAdv = ss "mindre" ;
  many_Det = {s = \\_,_ => "mange" ; n = Pl ; det = DDef Indef} ;
  more_CAdv = ss "mer" ;
  most_Predet = {s = gennumForms ["den meste"] ["det meste"] ["de fleste"]} ;
  much_Det = {s = \\_,_ => "meget" ; n = Pl ; det = DDef Indef} ;
  must_VV = 
    mkV "måtte" "må" "må" "måtte" "måttet" "mått" ** {c2 = [] ; lock_VV = <>} ;
  no_Phr = ss ["Nej"] ;
  on_Prep = ss "på" ;
---  one_Quant = {s = \\_ => genderForms ["en"] ["et"] ; n = Sg ; det = DIndef} ; --- ei
  only_Predet = {s = \\_ => "kun"} ;
  or_Conj = ss "eller" ** {n = Sg} ;
  otherwise_PConj = ss "anderledes" ;
  part_Prep = ss "af" ;
  please_Voc = ss "tak" ; ---
  possess_Prep = ss "af" ;
  quite_Adv = ss "temmelig" ;
  she_Pron = MorphoDan.mkNP "hun" "hende" "hendes" "hendes" "hendes"  SgUtr P3 ;
  so_AdA = ss "så" ;
  someSg_Det = {s = \\_ => genderForms "nogen" "noget" ; n = Sg ; det = DIndef} ;
  somePl_Det = {s = \\_,_ => "nogle" ; n = Pl ; det = DIndef} ;
  somebody_NP = regNP "nogen" "nogens" SgUtr ;
  something_NP = regNP "noget" "nogets" SgNeutr ;
  somewhere_Adv = ss ["et eller annet sted"] ; ---- ?
  that_Quant = 
    {s = table {
       Sg => \\_ => genderForms ["den der"] ["det der"] ; 
       Pl => \\_,_ => ["de der"]
       } ;
     det = DDef Indef
    } ;
  that_NP = regNP ["det der"] ["det ders"] SgNeutr ;
  there_Adv = ss "der" ;
  there7to_Adv = ss "dit" ;
  there7from_Adv = ss "derfra" ;
  therefore_PConj = ss "derfor" ;
  these_NP = regNP ["disse"] ["disses"] Plg ;
  they_Pron = MorphoDan.mkNP "de" "dem" "deres" "deres" "deres" Plg P1 ;
  this_Quant = 
    {s = table {
       Sg => \\_ => genderForms ["denne"] ["dette"] ; 
       Pl => \\_,_ => ["disse"]
       } ;
     det = DDef Indef
    } ;
  this_NP = regNP ["dette"] ["dettes"] SgNeutr ;
  those_NP = regNP ["de der"] ["de ders"] Plg ;
  through_Prep = ss "gennem" ;
  too_AdA = ss "for" ;
  to_Prep = ss "til" ;
  under_Prep = ss "under" ;
  very_AdA = ss "meget" ;
  want_VV = 
    mkV "ville" "vil" "vil" "ville" "villet" "villed" ** 
    {c2 = [] ; lock_VV = <>} ;
  we_Pron = MorphoDan.mkNP "vi"  "os"  "vores" "vores" "vores"  Plg P1 ;
  whatSg_IP = {s = \\_ => "hvad" ; gn = SgUtr} ; ---- infl
  whatPl_IP = {s = \\_ => "hvilke" ; gn = Plg} ; ---- infl
  when_IAdv = ss "hvornår" ;
  when_Subj = ss "når" ;
  where_IAdv = ss "hver" ;
  whichPl_IDet = {s = \\_ => "hvilke" ; n = Pl ; det = DIndef} ;
  whichSg_IDet = {s = genderForms "hvilken" "hvilket" ; n = Sg ; det = DIndef} ;
  whoSg_IP = {s = vem.s ; gn = SgUtr} ;
  whoPl_IP = {s = \\_ => "hvilke" ; gn = Plg} ;
  why_IAdv = ss "hvorfor" ;
  without_Prep = ss "uden" ;
  with_Prep = ss "med" ;
  yes_Phr = ss ["ja"] ;
  youSg_Pron = 
    MorphoDan.mkNP "du" "dig" "din" "dit" "dine" SgUtr P2 ; ----
  youPl_Pron = MorphoDan.mkNP "i" "jer" "jeres" "jeres" "jeres"  Plg P2 ;
  youPol_Pron = MorphoDan.mkNP "Dere" "Dere" "Deres" "Deres" "Deres"  SgUtr P2 ; --- wrong in refl

-- Auxiliaries that are used repeatedly.

  oper
    vem = MorphoDan.mkNP "hvem" "hvem" "hvis" "hvis" "hvis" SgUtr P3 ;

}