msyds/gf-rgl
1
0
Fork 0
forked from GitHub/gf-rgl
Code Pull Requests Activity

fixed Danish mkA for -ig adjectives

Browse Source
This commit is contained in:
Aarne Ranta
2018-02-08 15:32:11 +01:00
parent a87a16b19f
commit 632ec84356
2 changed files with 4 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
src/danish/MorphoDan.gf
View File

@@ -66,6 +66,9 @@ oper
aRask : Str -> Adj = \rask -> aRask : Str -> Adj = \rask ->
mkAdject rask rask (rask + "e") (rask + "ere") (rask + "est") ; mkAdject rask rask (rask + "e") (rask + "ere") (rask + "est") ;
aDejlig : Str -> Adj = \dejlig ->
mkAdject dejlig (dejlig+"t") (dejlig + "e") (dejlig + "ere") (dejlig + "st") ;
-- verbs -- verbs

1
src/danish/ParadigmsDan.gf
View File

@@ -368,6 +368,7 @@ oper
regADeg a = case Predef.dp 2 a of { regADeg a = case Predef.dp 2 a of {
"sk" => aRask a ; "sk" => aRask a ;
"ig" => aDejlig a ;
_ => case last a of { _ => case last a of {
"t" => aAbstrakt a ; "t" => aAbstrakt a ;
_ => aRod a _ => aRod a