From 4c06e1e664d8e0e5912fe85b78c8134bb1d37607 Mon Sep 17 00:00:00 2001
From: aarne <aarne@chalmers.se>
Date: Thu, 16 Apr 2015 06:52:59 +0000
Subject: [PATCH] Dutch mkA morpheme -en added to those not duplicating end
 consonant

---
 src/dutch/ResDut.gf | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/src/dutch/ResDut.gf b/src/dutch/ResDut.gf
index df27e652f..f85706cb2 100644
--- a/src/dutch/ResDut.gf
+++ b/src/dutch/ResDut.gf
@@ -83,8 +83,7 @@ resource ResDut = ParamX ** open Prelude, Predef in {
     regAdjective : Str -> Adjective = \s ->  ----
       let 
         se : Str = case s of {
-          _ + "er"      => s + "e" ; ---- 
-	  _ + "ig"      => s + "e" ;
+          _ + ("er"|"en"|"ig")  => s + "e" ; --- for unstressed adjective suffixes 
           _ + ("i"|"u"|"ij") => endCons s + "e" ;
           b + v@("aa"|"ee"|"oo"|"uu") + c@?             => b + shortVoc v c + "e" ;
           b + ("ei"|"eu"|"oe"|"ou"|"ie"|"ij"|"ui") + ?  => endCons s + "e" ;