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

Merge pull request #142 from odanoburu/fix

Browse Source 
(Por) correct examples
This commit is contained in:
Inari Listenmaa
2019-01-15 16:59:34 +01:00
committed by GitHub
parent 6dc0269c1d 162d010c1c
commit 738091d170
2 changed files with 6 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/portuguese/MorphoPor.gf
View File

@@ -116,8 +116,8 @@ oper
mkNoun (nomFalcao vinho) Masc ; mkNoun (nomFalcao vinho) Masc ;
-- problema, carro, maracujá -- problema, carro, maracujá
proble + ("ma"|"o"|"á") => -- proble + ("ma"|"o"|"á") =>
mkNoun (nomVinho vinho) Masc ; -- mkNoun (nomVinho vinho) Masc ;
ma + ("r"|"z"|"n") => mkNoun (nomRapaz vinho) Masc ; ma + ("r"|"z"|"n") => mkNoun (nomRapaz vinho) Masc ;
@@ -134,7 +134,7 @@ oper
ônibu + "s" => mkNoun (nomAreia vinho) Masc ; ônibu + "s" => mkNoun (nomAreia vinho) Masc ;
urub + "u" => mkNoun (nomVinho vinho) Masc ; --urub + "u" => mkNoun (nomVinho vinho) Masc ;
-- tórax/Masc, xerox/Fem -- tórax/Masc, xerox/Fem
tóra + "x" => mkNoun (nomAreia vinho) Masc ; tóra + "x" => mkNoun (nomAreia vinho) Masc ;

6
src/portuguese/ParadigmsPor.gf
View File

@@ -105,7 +105,7 @@ oper
-- for which heuristic). -- for which heuristic).
mkN = overload { mkN = overload {
mkN : (luz : Str) -> N -- predictable nouns mkN : (revolução : Str) -> N -- predictable nouns
= regN ; = regN ;
mkN : (alemão, alemães : Str) -> N -- force noun plural, guess gender mkN : (alemão, alemães : Str) -> N -- force noun plural, guess gender
@@ -114,7 +114,7 @@ oper
mkN : (mapa : Str) -> Gender -> N -- force gender, guess plural mkN : (mapa : Str) -> Gender -> N -- force gender, guess plural
= \s,g -> regN s ** {g = g} ; = \s,g -> regN s ** {g = g} ;
mkN : (bastão,bastões : Str) -> Gender -> N -- the worst case demands two forms (singular + plural) and the gender. mkN : (mão,mãos : Str) -> Gender -> N -- the worst case demands two forms (singular + plural) and the gender.
= mk2N = mk2N
} ; } ;
@@ -256,7 +256,7 @@ oper
mkA : (blanco : A) -> (hueso : Str) -> A -- noninflecting component after the adjective mkA : (blanco : A) -> (hueso : Str) -> A -- noninflecting component after the adjective
= mkNonInflectA ; = mkNonInflectA ;
mkA : A -> CopulaType -> A -- force copula type, e.g. "João está doente", "João é doente". Choose among ``serCopula``, ``estarCopula``, and ``ficarCopula`` mkA : A -> CopulaType -> A -- force copula type, e.g. "João está doente" instead of "João é doente". Choose among ``serCopula``, ``estarCopula``, and ``ficarCopula``.
= adjCopula ; = adjCopula ;
} ; } ;