From fff1c40f2482e4c8898253df6508d36c3f62cde6 Mon Sep 17 00:00:00 2001
From: Krasimir Angelov <kr.angelov@gmail.com>
Date: Thu, 6 Nov 2025 12:54:45 +0100
Subject: [PATCH] added UttNP

---
 src/gaelic/PhraseGla.gf | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/src/gaelic/PhraseGla.gf b/src/gaelic/PhraseGla.gf
index a89ad298..a267dd89 100644
--- a/src/gaelic/PhraseGla.gf
+++ b/src/gaelic/PhraseGla.gf
@@ -7,9 +7,11 @@ concrete PhraseGla of Phrase = CatGla ** open Prelude, ResGla in {
 
 {-
     UttQS qs = qs ;
-    UttIAdv iadv = iadv ;
-    UttNP np =
-    UttIP ip =
+    UttIAdv iadv = iadv ; -}
+
+    UttNP np = {s = linNP np} ;
+
+{-    UttIP ip =
     UttImpSg pol imp = { s = pol.s ++ imp.s ! Sg ! pol.p } ;
     UttImpPl pol imp =
     UttImpPol pol imp = {s = pol.s ++ imp.s ! Sg ! pol.p} ;