From 11314bdc4166edd5af4b0eac7f8773495a0f0f88 Mon Sep 17 00:00:00 2001
From: krangelov <kr.angelov@gmail.com>
Date: Mon, 4 Mar 2019 20:39:04 +0100
Subject: [PATCH] added dummy implementations for DAP and DetDAP

---
 src/finnish/CatFin.gf  | 2 +-
 src/finnish/NounFin.gf | 1 +
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/finnish/CatFin.gf b/src/finnish/CatFin.gf
index e6e8f174..e22517c7 100644
--- a/src/finnish/CatFin.gf
+++ b/src/finnish/CatFin.gf
@@ -51,7 +51,7 @@ concrete CatFin of Cat = CommonX ** open ResFin, StemFin, Prelude in {
     CN   = {s : NForm => Str ; h : Harmony} ;
     Pron = {s : NPForm => Str ; a : Agr ; hasPoss : Bool ; poss : Str} ;
     NP   = {s : NPForm => Str ; a : Agr ; isPron : Bool ; isNeg : Bool} ;
-    Det  = {
+    DAP, Det = {
       s1 : Case => Str ;       -- minun kolme
       s2 : Harmony => Str ;    -- -ni (Front for -nsä, Back for -nsa)
       sp : Case => Str ;       -- se   (substantival form)
diff --git a/src/finnish/NounFin.gf b/src/finnish/NounFin.gf
index 7daa3e62..ea54a868 100644
--- a/src/finnish/NounFin.gf
+++ b/src/finnish/NounFin.gf
@@ -264,6 +264,7 @@ concrete NounFin of Noun = CatFin ** open ResFin, MorphoFin, StemFin, Prelude in
         isPron = False ; isNeg = det.isNeg
       } ;
 
+    DetDAP d = d ;
 
   oper
     numN : NForm -> Number = \nf -> case nf of {