From d947e7e2e2aef8def75b91ee78917f92b939f488 Mon Sep 17 00:00:00 2001
From: adelon <22380201+adelon@users.noreply.github.com>
Date: Tue, 21 Jul 2026 12:47:47 +0200
Subject: [PATCH] Fin: fix comparative and superlative adverbs

---
 src/finnish/StemFin.gf         | 2 +-
 src/finnish/stemmed/StemFin.gf | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/finnish/StemFin.gf b/src/finnish/StemFin.gf
index 5e02a9ad..52efc354 100644
--- a/src/finnish/StemFin.gf
+++ b/src/finnish/StemFin.gf
@@ -76,7 +76,7 @@ oper
     let
       tuoree = init (tuore.s ! NCase Sg Gen) ;
       tuoreesti  = tuoree + "sti" ;
-      tuoreemmin =  init tuoree ;
+      tuoreemmin = init tuoree + "in" ;
     in {s = table {
          AN f => tuore.s ! f ;
          AAdv => if_then_Str isPos tuoreesti tuoreemmin
diff --git a/src/finnish/stemmed/StemFin.gf b/src/finnish/stemmed/StemFin.gf
index 466bb797..3759e7f2 100644
--- a/src/finnish/stemmed/StemFin.gf
+++ b/src/finnish/stemmed/StemFin.gf
@@ -148,7 +148,7 @@ oper
     let 
       tuoree = tuore.s ! 1 ;
       tuoreesti  = tuoree + "sti" ; 
-      tuoreemmin =  init tuoree ;
+      tuoreemmin = init tuoree + "in" ;
     in {s = table {
          SAN f => tuore.s ! f ;
          SAAdv => if_then_Str isPos tuoreesti tuoreemmin