From a6faaeb3519e0993f4ccca1f1e717a7d9bd80ea5 Mon Sep 17 00:00:00 2001 From: Inari Listenmaa Date: Mon, 30 Jan 2023 16:57:24 +0800 Subject: [PATCH] (Fin) d28: works for virsi-virren and kynsi-kynnen --- src/finnish/Kotus.gf | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/src/finnish/Kotus.gf b/src/finnish/Kotus.gf index 23bd8255..ccf325d9 100644 --- a/src/finnish/Kotus.gf +++ b/src/finnish/Kotus.gf @@ -102,7 +102,10 @@ oper d27 : Str -> NForms -- 23 vuosi = \s -> dArpi s (Predef.tk 2 s + "den") ; d28 : Str -> NForms -- 13 virsi - = \s -> dArpi s (Predef.tk 2 s + "ren") ; + = \s -> let vir : Str = Predef.tk 2 s ; + r : Str = last vir ; -- vi[r]si, ky[n]si + ren : Str = r + "en" ; -- vir[ren], kyn[nen] + in dArpi s (vir + ren) ; d28A : Str -> NForms -- 1 jälsi = \s -> dArpi s (Predef.tk 2 s + "len") ; d29 : Str -> NForms -- 1 lapsi