From 632ec843564816b7ca0ef531e960de73c7a8ec46 Mon Sep 17 00:00:00 2001 From: Aarne Ranta Date: Thu, 8 Feb 2018 15:32:11 +0100 Subject: [PATCH] fixed Danish mkA for -ig adjectives --- src/danish/MorphoDan.gf | 3 +++ src/danish/ParadigmsDan.gf | 1 + 2 files changed, 4 insertions(+) diff --git a/src/danish/MorphoDan.gf b/src/danish/MorphoDan.gf index 74d262216..94b469d4b 100644 --- a/src/danish/MorphoDan.gf +++ b/src/danish/MorphoDan.gf @@ -66,6 +66,9 @@ oper aRask : Str -> Adj = \rask -> mkAdject rask rask (rask + "e") (rask + "ere") (rask + "est") ; + + aDejlig : Str -> Adj = \dejlig -> + mkAdject dejlig (dejlig+"t") (dejlig + "e") (dejlig + "ere") (dejlig + "st") ; -- verbs diff --git a/src/danish/ParadigmsDan.gf b/src/danish/ParadigmsDan.gf index d1fec5b2d..df5211657 100644 --- a/src/danish/ParadigmsDan.gf +++ b/src/danish/ParadigmsDan.gf @@ -368,6 +368,7 @@ oper regADeg a = case Predef.dp 2 a of { "sk" => aRask a ; + "ig" => aDejlig a ; _ => case last a of { "t" => aAbstrakt a ; _ => aRod a