msyds/gf-rgl
1
0
Fork 0
forked from GitHub/gf-rgl
Code Pull Requests Activity

(Fin) Create paradigm for lämmin-lämpimän, Sg Gen not covered by dSuurin

Browse Source
This commit is contained in:
Inari Listenmaa
2020-05-05 07:31:38 +02:00
parent 1cdc6cf774
commit 24073f3ba7
2 changed files with 12 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
src/finnish/MorphoFin.gf
View File

@@ -98,6 +98,17 @@ resource MorphoFin = ResFin ** open Prelude in {
(liittim + "in" + a) (liittim + "iss" + a) (liittim + "in" + a) (liittim + "iss" + a)
(liittim + "iin") ; (liittim + "iin") ;
dLämmin : (_,_ : Str) -> NForms = \lämmin,lämpimän ->
let -- NB. for sisin~sisimmän, use dSuurin
a = vowHarmony lämmin ;
lämpim = Predef.tk 2 lämpimän ;
in nForms10
lämmin lämpimän (lämmin + "t" + a)
(lämpim + a + "n" + a) (lämpim + a + a + "n")
(lämpim + "ien") (lämpim + "i" + a)
(lämpim + "in" + a) (lämpim + "iss" + a)
(lämpim + "iin") ;
dOnneton : Str -> NForms = \onneton -> dOnneton : Str -> NForms = \onneton ->
let let
a = vowHarmony onneton ; a = vowHarmony onneton ;

1
src/finnish/ParadigmsFin.gf
View File

@@ -595,6 +595,7 @@ mkVS = overload {
dSilakka ukko ukon ukkoja ; -- auto,auton dSilakka ukko ukon ukkoja ; -- auto,auton
<_ + "mpi", _ + ("emman" | "emmän")> => dSuurempi ukko ; <_ + "mpi", _ + ("emman" | "emmän")> => dSuurempi ukko ;
<_ + "in", _ + ("imman" | "immän")> => dSuurin ukko ; <_ + "in", _ + ("imman" | "immän")> => dSuurin ukko ;
<lämm + "in", lämpi + ("man"|"män")> => dLämmin ukko ukon ;
<terv + "e", terv2 + "een"> => -- was nonlinear <terv + "e", terv2 + "een"> => -- was nonlinear
dRae ukko ukon ; dRae ukko ukon ;
<taiv + ("as" | "äs"), taiv2 + ("aan" | "ään")> => -- was nonlinear <taiv + ("as" | "äs"), taiv2 + ("aan" | "ään")> => -- was nonlinear