mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-05-28 01:18:57 -06:00
@@ -25472,7 +25472,7 @@ lin madera_tierna_N = mkAN madera_N "tierna" ; -- to-check segmentation
|
|||||||
lin madoqua_N = mkN "madoqua" ;
|
lin madoqua_N = mkN "madoqua" ;
|
||||||
lin madrastra_N = mkN "madrastra" ;
|
lin madrastra_N = mkN "madrastra" ;
|
||||||
lin madraza_N = mkN "madraza" ;
|
lin madraza_N = mkN "madraza" ;
|
||||||
lin madre_N = mkN "madre" ;
|
lin madre_N = mkN "madre" feminine ;
|
||||||
lin madre_patria_N = mkAN madre_N "patria" ; -- to-check segmentation
|
lin madre_patria_N = mkAN madre_N "patria" ; -- to-check segmentation
|
||||||
lin madre_politica_N = mkAN madre_N "politica" ; -- to-check segmentation
|
lin madre_politica_N = mkAN madre_N "politica" ; -- to-check segmentation
|
||||||
lin madreselva_N = mkN "madreselva" ;
|
lin madreselva_N = mkN "madreselva" ;
|
||||||
@@ -27581,7 +27581,7 @@ lin mugriento_A = mkA "mugriento" ;
|
|||||||
lin mugriento_N = mkN "mugriento" ;
|
lin mugriento_N = mkN "mugriento" ;
|
||||||
lin mugroso_A = mkA "mugroso" ;
|
lin mugroso_A = mkA "mugroso" ;
|
||||||
lin muitú_N = mkN "muitú" ;
|
lin muitú_N = mkN "muitú" ;
|
||||||
lin mujer_N = mkN "mujer" ;
|
lin mujer_N = mkN "mujer" feminine ;
|
||||||
lin mujer_de_negocios_N = mkN mujer_N "de negocios" ;
|
lin mujer_de_negocios_N = mkN mujer_N "de negocios" ;
|
||||||
lin mujer_del_jeque_N = mkN mujer_N "del jeque" ;
|
lin mujer_del_jeque_N = mkN mujer_N "del jeque" ;
|
||||||
lin mujer_fatal_N = mkAN mujer_N "fatal" ; -- to-check segmentation
|
lin mujer_fatal_N = mkAN mujer_N "fatal" ; -- to-check segmentation
|
||||||
|
|||||||
@@ -156,7 +156,7 @@ oper
|
|||||||
|
|
||||||
-- Some adjectives need the feminine form separately.
|
-- Some adjectives need the feminine form separately.
|
||||||
|
|
||||||
mkA : (espanol,espanola : Str) -> A ;
|
mkA : (español,española : Str) -> A ;
|
||||||
|
|
||||||
-- One-place adjectives compared with "mas" need five forms in the worst
|
-- One-place adjectives compared with "mas" need five forms in the worst
|
||||||
-- case (masc and fem singular, masc plural, adverbial).
|
-- case (masc and fem singular, masc plural, adverbial).
|
||||||
@@ -182,6 +182,8 @@ oper
|
|||||||
|
|
||||||
prefixA : A -> A ; -- adjective before noun (default after noun)
|
prefixA : A -> A ; -- adjective before noun (default after noun)
|
||||||
|
|
||||||
|
invarA : Str -> A -- invariable adjective
|
||||||
|
= \s -> mkA s s s s s ;
|
||||||
|
|
||||||
--3 Two-place adjectives
|
--3 Two-place adjectives
|
||||||
--
|
--
|
||||||
|
|||||||
@@ -10,7 +10,7 @@ lin
|
|||||||
-- have_not_V3
|
-- have_not_V3
|
||||||
|
|
||||||
above_Prep = mkPrep "sobre" ;
|
above_Prep = mkPrep "sobre" ;
|
||||||
after_Prep = {s = ["despues"] ; c = MorphoSpa.genitive ; isDir = False} ;
|
after_Prep = mkPrep "después" genitive ;
|
||||||
all_Predet = {
|
all_Predet = {
|
||||||
s = \\a,c => prepCase c ++ aagrForms "todo" "toda" "todos" "todas" ! a ;
|
s = \\a,c => prepCase c ++ aagrForms "todo" "toda" "todos" "todas" ! a ;
|
||||||
c = Nom ;
|
c = Nom ;
|
||||||
@@ -178,4 +178,3 @@ lin
|
|||||||
|
|
||||||
lin language_title_Utt = ss "español" ;
|
lin language_title_Utt = ss "español" ;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user