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

Merge pull request #323 from inariksit/finnish-smart-paradigm

Browse Source 
(Fin) Pattern match all 3 arguments in 3-arg mkN
This commit is contained in:
Inari Listenmaa
2020-05-04 14:55:38 +02:00
committed by GitHub
parent 899ab19e78 1cdc6cf774
commit 4a21ce680a
1 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
src/finnish/ParadigmsFin.gf
View File

@@ -582,7 +582,10 @@ mkVS = overload {
ukk = init ukko ; ukk = init ukko ;
ukot = nForms2 ukko ukkoja ; ukot = nForms2 ukko ukkoja ;
in in
case <ukko,ukon> of { case <ukko,ukon,ukkoja> of {
<muk + "i", muk_ + "in",
muk__ + "ej" + ("a"|"ä")> -- don't match voi - voin - voita
=> dPaatti ukko ukon ; -- 1-arg paradigm forces consonant gradation
<_, _ + ":n"> => dSDP ukko ; <_, _ + ":n"> => dSDP ukko ;
<_ + ("aa" | "ee" | "ii" | "oo" | "uu" | "yy" | "ää" | "öö" | <_ + ("aa" | "ee" | "ii" | "oo" | "uu" | "yy" | "ää" | "öö" |
"ie" | "uo" | "yö" | "ea" | "eä" | "ie" | "uo" | "yö" | "ea" | "eä" |
@@ -598,9 +601,6 @@ mkVS = overload {
dRae ukko ukon ; dRae ukko ukon ;
<nukk + "e", nuk + "een"> => dRae ukko ukon ; <nukk + "e", nuk + "een"> => dRae ukko ukon ;
<arp + "i", arv + "en"> => dArpi ukko ukon ; <arp + "i", arv + "en"> => dArpi ukko ukon ;
<muk + "i", muk_ + "in",
muk__ + "ej" + ("a"|"ä")> => -- don't match voi - voin - voita
dPaatti ukko ukon ; -- 1-arg paradigm forces consonant gradation
<_ + ("us" | "ys"), _ + "den"> => dLujuus ukko ; <_ + ("us" | "ys"), _ + "den"> => dLujuus ukko ;
<laid + ("u"|"a"|"ä") + "n", laitu + "men"> <laid + ("u"|"a"|"ä") + "n", laitu + "men">
=> dLiitin ukko ukon ; -- laidun,hapan,sydän not caught in previous => dLiitin ukko ukon ; -- laidun,hapan,sydän not caught in previous