From fe28bea8ece27cf022fcf75f0c5c08fa8bee2775 Mon Sep 17 00:00:00 2001
From: aarneranta <aarne@chalmers.se>
Date: Fri, 19 Mar 2021 17:34:27 +0100
Subject: [PATCH] added ParadigmsFin.invarA, not shown in the API

---
 src/finnish/ParadigmsFin.gf | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/src/finnish/ParadigmsFin.gf b/src/finnish/ParadigmsFin.gf
index a1ffcc44b..51a0f41a8 100644
--- a/src/finnish/ParadigmsFin.gf
+++ b/src/finnish/ParadigmsFin.gf
@@ -635,6 +635,9 @@ mkVS = overload {
             ukon ++ ukkoja ++ ukkoa)
       } ;
 
+--- this is a paradigm hidden from the API. It should not be used without caution
+  invarN : Str -> N = \s -> <lin N {s = \\_ => s ; h = Back} : N> ;
+  
   mkN2 = overload {
     mkN2 : N -> N2 = \n -> mmkN2 n (casePrep genitive) ;
     mkN2 : N -> Prep -> N2 = mmkN2