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

Merge branch 'hungarian' of github.com:inariksit/gf-rgl into hungarian

Browse Source
This commit is contained in:
Inari Listenmaa
2020-04-21 20:52:16 +02:00
parent 9c980f5fdf 53516a689f
commit 40871688fb
3 changed files with 14 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
src/hungarian/NounMorphoHun.gf
View File

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

4
src/hungarian/unittest/determiners.gftest
View File

@@ -32,8 +32,8 @@ LangHun: én látok néhányat
Lang: PhrUtt NoPConj (UttS (UseCl (TTAnt TPres ASimul) PPos (PredVP (UsePron i_Pron) (ComplSlash (SlashV2a see_V2) (DetCN few_Det (AdjCN (PositA red_A) (UseN apple_N))))))) NoVoc Lang: PhrUtt NoPConj (UttS (UseCl (TTAnt TPres ASimul) PPos (PredVP (UsePron i_Pron) (ComplSlash (SlashV2a see_V2) (DetCN few_Det (AdjCN (PositA red_A) (UseN apple_N))))))) NoVoc
LangEng: I see few red apples LangEng: I see few red apples
LangHun: én látom kevés piros almát LangHun: én látok kevés piros almát
Lang: PhrUtt NoPConj (UttS (UseCl (TTAnt TPres ASimul) PPos (PredVP (UsePron i_Pron) (ComplSlash (SlashV2a see_V2) (DetCN many_Det (AdjCN (PositA red_A) (UseN apple_N))))))) NoVoc Lang: PhrUtt NoPConj (UttS (UseCl (TTAnt TPres ASimul) PPos (PredVP (UsePron i_Pron) (ComplSlash (SlashV2a see_V2) (DetCN many_Det (AdjCN (PositA red_A) (UseN apple_N))))))) NoVoc
LangEng: I see many red apples LangEng: I see many red apples
LangHun: én látom sok piros almát LangHun: én látok sok piros almát

10
src/hungarian/unittest/inflection/tó.gftest
View File

@@ -2,22 +2,22 @@ Lang: MassNP (UseN lake_N)
LangHun: tó LangHun: tó
Lang: PredVP (UsePron i_Pron) (ComplSlash (SlashV2a see_V2) (DetCN (DetQuant IndefArt NumSg) (UseN lake_N))) Lang: PredVP (UsePron i_Pron) (ComplSlash (SlashV2a see_V2) (DetCN (DetQuant IndefArt NumSg) (UseN lake_N)))
LangHun: én látok egy tovat LangHun: én látok egy tavat
Lang: PrepNP on_Prep (DetCN (DetQuant IndefArt NumSg) (UseN lake_N)) Lang: PrepNP on_Prep (DetCN (DetQuant IndefArt NumSg) (UseN lake_N))
LangHun: egy tovon LangHun: egy tavon
Lang: DetCN (DetQuant IndefArt NumPl) (UseN lake_N) Lang: DetCN (DetQuant IndefArt NumPl) (UseN lake_N)
LangHun: tovak LangHun: tavak
Lang: PredVP (UsePron i_Pron) (ComplSlash (SlashV2a see_V2) (DetCN (DetQuant IndefArt NumPl) (UseN lake_N))) Lang: PredVP (UsePron i_Pron) (ComplSlash (SlashV2a see_V2) (DetCN (DetQuant IndefArt NumPl) (UseN lake_N)))
LangHun: én látok tovakat LangHun: én látok tavakat
Lang: PrepNP to_Prep (DetCN (DetQuant IndefArt NumSg) (UseN lake_N)) Lang: PrepNP to_Prep (DetCN (DetQuant IndefArt NumSg) (UseN lake_N))
LangHun: egy tóhoz LangHun: egy tóhoz
Lang: PrepNP to_Prep (DetCN (DetQuant IndefArt NumPl) (UseN lake_N)) Lang: PrepNP to_Prep (DetCN (DetQuant IndefArt NumPl) (UseN lake_N))
LangHun: tovakhoz LangHun: tavakhoz
Lang: DetCN (DetQuant (PossPron i_Pron) NumSg) (UseN lake_N) Lang: DetCN (DetQuant (PossPron i_Pron) NumSg) (UseN lake_N)
LangHun: TODO LangHun: TODO