From 444bf51e09df5cd8b8427b1c1aba8be08f6b6607 Mon Sep 17 00:00:00 2001
From: Inari Listenmaa <inari.listenmaa@gmail.com>
Date: Wed, 3 Aug 2022 08:01:25 +0200
Subject: [PATCH] (Fin) Add linearisation for UttAccNP

---
 src/finnish/ExtendFin.gf | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/src/finnish/ExtendFin.gf b/src/finnish/ExtendFin.gf
index 970d473e..7750f63a 100644
--- a/src/finnish/ExtendFin.gf
+++ b/src/finnish/ExtendFin.gf
@@ -8,6 +8,7 @@ concrete ExtendFin of Extend =
     ,CompoundN, GenNP, GenIP, AdvIsNP, EmbedSSlash
     ,PassVPSlash, PassAgentVPSlash
     ,CardCNCard
+    ,UttAccNP
     ]
   with
     (Grammar = GrammarFin) **
@@ -17,6 +18,7 @@ concrete ExtendFin of Extend =
     ResFin,
     StemFin,
     (S=StemFin),
+    (P=PhraseFin),
     IdiomFin,
     Coordination,
     Prelude,
@@ -234,4 +236,6 @@ lin CardCNCard card cn = {
   n = Pl
   } ;
 
+lin UttAccNP np = {s = P.addNegation np.isNeg ++ np.s ! NPAcc} ;
+
 }