diff options
| author | aarne <aarne@cs.chalmers.se> | 2008-11-15 11:24:22 +0000 |
|---|---|---|
| committer | aarne <aarne@cs.chalmers.se> | 2008-11-15 11:24:22 +0000 |
| commit | 79c9ec116a0f5580a7965247e045ecfe59281e20 (patch) | |
| tree | 2c57c90833ab20240bfb7fb6a8c519bf4aceb015 /next-lib/src/danish | |
| parent | 3ff57f6184963acde7f3cc2dcf0638c0e819929a (diff) | |
new CAdv type in Dan and Nor
Diffstat (limited to 'next-lib/src/danish')
| -rw-r--r-- | next-lib/src/danish/StructuralDan.gf | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/next-lib/src/danish/StructuralDan.gf b/next-lib/src/danish/StructuralDan.gf index f401bfdd4..b7b3836e9 100644 --- a/next-lib/src/danish/StructuralDan.gf +++ b/next-lib/src/danish/StructuralDan.gf @@ -1,5 +1,5 @@ concrete StructuralDan of Structural = CatDan ** - open MorphoDan, ParadigmsDan, Prelude in { + open MorphoDan, ParadigmsDan, (X = ConstructX), Prelude in { flags optimize=all ; @@ -44,9 +44,9 @@ concrete StructuralDan of Structural = CatDan ** MorphoDan.mkNP "jeg" "mig" "min" "mit" "mine" SgUtr P1 ; in_Prep = ss "i" ; it_Pron = MorphoDan.regNP "det" "dets" SgNeutr ; - less_CAdv = ss "mindre" ; + less_CAdv = X.mkCAdv "mindre" conjThan ; many_Det = {s = \\_,_ => "mange" ; n = Pl ; det = DDef Indef} ; - more_CAdv = ss "mer" ; + more_CAdv = X.mkCAdv "mer" conjThan ; most_Predet = {s = gennumForms ["den meste"] ["det meste"] ["de fleste"]} ; much_Det = {s = \\_,_ => "meget" ; n = Pl ; det = DDef Indef} ; must_VV = |