1
0
forked from GitHub/gf-rgl

dLó cases

This commit is contained in:
Julia Jansson
2020-04-21 20:51:41 +02:00
parent 2049d0379b
commit 53516a689f

View File

@@ -45,6 +45,7 @@ oper
} ;
-- NB. arguments are Sg Nom, Pl Nom
-- handles words like: falu, daru, tetű -> falvak, darvak, tetvek
dFalu : (nomsg : Str) -> (nompl : Str) -> Noun = \falu,falvak ->
let falva = init falvak ;
nFalva = mkNoun falva ;
@@ -138,9 +139,15 @@ regNounNomAcc : (nom : Str) -> (acc : Str) -> Noun = \n,a ->
<_ + "ó", -- ló, lovat
_ + "o" + #c + #v + "t">
|<_ + "ó", -- tó, tavat
_ + "a" + #c + #v + "t">
|<_ + "ő", -- kő, követ
_ + "ö" + #c + #v + "t">
|<_ + "ű", -- fű, füvet
_ + "ü" + #c + #v + "t">
|<_ + "é", -- lé, levet
_ + "e" + #c + #v + "t"> => dLó n a ;