fixed Danish superlatives and a couple of verb inflections

This commit is contained in:
aarne
2010-05-15 11:31:35 +00:00
parent 047b22f674
commit 333ea7814a
3 changed files with 4 additions and 4 deletions

View File

@@ -33,8 +33,8 @@ concrete IrregDan of IrregDanAbs = CatDan ** open Prelude, ParadigmsDan in {
gnide_V = irregV "gnide" "gned" "gnidd" ;--
gøre_V = irregV "gøre" "gjorde" "gjort" ;
have_V = mkV "have" "har" "havde" "haft" "havd" "hav" ;
hede_V = mkV "hede" "hed" "hedes" "hedde" "hett" "hed" ; ----
hente_V = irregV "hente" "hentet" "hendt" ;--
-- hete_V = irregV "hete" (variants {"het" ;-- "hette"}) "hett" ;--
-- hjelpe_V = irregV "hjelpe" "hjalp" "hjulpet" ;--
holde_V = irregV "holde" "holdt" "holdt" ;--
komme_V = irregV "komme" "kom" "kommet" ;
@@ -65,7 +65,7 @@ concrete IrregDan of IrregDanAbs = CatDan ** open Prelude, ParadigmsDan in {
-- treffe_V = irregV "treffe" "traff" "truffet" ;--
-- trives_V = irregV "trives" "trivdes" (variants {"trives" ;-- "trivs"}) ;--
tælle_V = irregV "tælle" "talte" "talt" ;
vide_V = irregV "vide" "vidste" "vidst" ;
vide_V = mkV "vide" "ved" "vedes" "vidste" "vidst" "ved" ; ----
}

View File

@@ -29,7 +29,7 @@ abstract IrregDanAbs = Cat ** {
gřre_V : V ;
have_V : V ;
hente_V : V ;
-- hete_V : V ;
hede_V : V ;
-- hjelpe_V : V ;
holde_V : V ;
komme_V : V ;

View File

@@ -51,7 +51,7 @@ incomplete concrete NounScand of Noun =
sp = \\b,g => quant.s ! num.n ! b ! True ! g ++
num.s ! g ++ ord.s ;
n = num.n ;
det = quant.det
det = DDef detDef ---- quant.det
} ;
DetQuant quant num =