From 346f089946d9a0f93d4ab717d4ee8c516c86da60 Mon Sep 17 00:00:00 2001
From: Aarne Ranta <aarne@chalmers.se>
Date: Thu, 8 Feb 2018 17:37:53 +0100
Subject: [PATCH] fixed definiteness of Dan Def+Num (de tre konger)

---
 src/scandinavian/NounScand.gf | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/src/scandinavian/NounScand.gf b/src/scandinavian/NounScand.gf
index 51dd56806..f5efada50 100644
--- a/src/scandinavian/NounScand.gf
+++ b/src/scandinavian/NounScand.gf
@@ -81,7 +81,10 @@ incomplete concrete NounScand of Noun =
       sp = \\b,g => quant.sp ! num.n ! b ! md b ! g ++ 
                     num.s ! g ;
       n = num.n ;
-      det = quant.det
+      det = case <quant.det,num.isDet> of {
+        <DDef Def,True> => DDef detDef ;
+        <d,_> => d
+        }
       } ;
 
     DetNP det =