1
0
forked from GitHub/gf-rgl

Merge pull request #142 from odanoburu/fix

(Por) correct examples
This commit is contained in:
Inari Listenmaa
2019-01-15 16:59:34 +01:00
committed by GitHub
2 changed files with 6 additions and 6 deletions

View File

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

View File

@@ -105,7 +105,7 @@ oper
-- for which heuristic).
mkN = overload {
mkN : (luz : Str) -> N -- predictable nouns
mkN : (revolução : Str) -> N -- predictable nouns
= regN ;
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
= \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
} ;
@@ -256,7 +256,7 @@ oper
mkA : (blanco : A) -> (hueso : Str) -> A -- noninflecting component after the adjective
= 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 ;
} ;