From d5ba0733eca2005289c653028cfff1d75ad0690e Mon Sep 17 00:00:00 2001
From: Inari Listenmaa <inari.listenmaa@gmail.com>
Date: Mon, 7 May 2018 16:31:38 +0200
Subject: [PATCH] (Dut) Inflection of willen_V

---
 src/dutch/IrregDut.gf      | 2 +-
 src/dutch/IrregDutAbs.gf   | 1 +
 src/dutch/StructuralDut.gf | 4 ++--
 3 files changed, 4 insertions(+), 3 deletions(-)

diff --git a/src/dutch/IrregDut.gf b/src/dutch/IrregDut.gf
index e129a59e..4464452a 100644
--- a/src/dutch/IrregDut.gf
+++ b/src/dutch/IrregDut.gf
@@ -169,7 +169,7 @@ lin weven_V = mkV "weven" "weefde" "weefden" "geweven" ;
 lin wijken_V = mkZijnV "wijken" "week" "weken" "geweken" ;
 lin wijten_V = mkV "wijten" "weet" "weten" "geweten" ;
 lin wijzen_V = mkV "wijzen" "wees" "wezen" "gewezen" ;
-lin willen_V = mkV "wil" "wilt" "wil" "willen" "wou" "wou" "wouden" "gewild" ;
+lin willen_V = mkV "wil" "wilt" "wil" "willen" "wilde" "wilde" "wilden" "gewild" ; -- mkV "wil" "wilt" "wil" "willen" "wou" "wou" "wouden" "gewild" ;
 lin winden_V = mkV "winden" "wond" "wonden" "gewonden" ;
 lin winnen_V = mkV "winnen" "won" "wonnen" "gewonnen" ;
 lin worden_V = mkV "worden" "werd" "werden" "geworden" ;
diff --git a/src/dutch/IrregDutAbs.gf b/src/dutch/IrregDutAbs.gf
index 48803472..85a38952 100644
--- a/src/dutch/IrregDutAbs.gf
+++ b/src/dutch/IrregDutAbs.gf
@@ -168,6 +168,7 @@ fun weven_V : V ; -- to weave
 fun wijken_V : V ; -- to give way, to disappear
 fun wijten_V : V ; -- to blame (something) on
 fun wijzen_V : V ; -- to point
+fun willen_V : V ; -- to want
 fun winden_V : V ; -- to wind
 fun winnen_V : V ; -- to win
 fun worden_V : V ; -- to become
diff --git a/src/dutch/StructuralDut.gf b/src/dutch/StructuralDut.gf
index 3de8d3ba..cadf5f3b 100644
--- a/src/dutch/StructuralDut.gf
+++ b/src/dutch/StructuralDut.gf
@@ -1,6 +1,6 @@
 concrete StructuralDut of Structural = CatDut, Prelude ** 
 
-  open ParadigmsDut, ResDut, (X = ConstructX) in
+  open ParadigmsDut, ResDut, (X = ConstructX), IrregDut in
 {
 
 
@@ -87,7 +87,7 @@ concrete StructuralDut of Structural = CatDut, Prelude **
   to_Prep = mkPrep "naar" ;
   under_Prep = mkPrep "onder" ;
   very_AdA = ss "erg" ;
-  want_VV = auxVV (mkV "wil" "wilt" "wil" "willen" "wou" "wou" "wouden" "gewild") ;
+  want_VV = auxVV IrregDut.willen_V ;
 
   we_Pron = mkPronoun "we" "ons" "ons" "wij" "ons" "onze" "onze" Utr Pl P1 ;