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

MakeStructural.mkDet in Ita and Por

Browse Source
This commit is contained in:
Aarne Ranta
2024-07-25 11:55:55 +02:00
parent 23ccacf222
commit 71f3b2dc78
2 changed files with 39 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
src/italian/MakeStructuralIta.gf
View File

@@ -61,7 +61,14 @@ oper
} ; } ;
mkDet = overload { mkDet = overload {
-- Does not inflect for number -- singular, does not inflect for gender
mkDet : Str -> Det = \piu -> lin Det {
s,sp = \\_,_ => piu ;
spn = \\_ => piu ;
n = Sg ;
s2 = \\g => [] ;
isNeg = False
} ;
mkDet : Str -> Number -> Det = \piu,n -> lin Det { mkDet : Str -> Number -> Det = \piu,n -> lin Det {
s,sp = \\_,_ => piu ; s,sp = \\_,_ => piu ;
spn = \\_ => piu ; spn = \\_ => piu ;
@@ -69,7 +76,7 @@ oper
s2 = \\g => [] ; s2 = \\g => [] ;
isNeg = False isNeg = False
} ; } ;
-- Inflects for number -- Inflects for gender
mkDet : Str -> Str -> Number -> Det = \alcuni,alcune,n -> lin Det { mkDet : Str -> Str -> Number -> Det = \alcuni,alcune,n -> lin Det {
s,sp = table { s,sp = table {
Masc => \\_ => alcuni ; Masc => \\_ => alcuni ;

30
src/portuguese/MakeStructuralPor.gf
View File

@@ -19,4 +19,34 @@ oper
a = if_then_else PAgr p (PAg Sg) PNoAg ---- e,g, "chacun de"; other possibilities? a = if_then_else PAgr p (PAg Sg) PNoAg ---- e,g, "chacun de"; other possibilities?
} ; } ;
mkDet = overload {
-- singular, does not inflect for gender
mkDet : Str -> Det = \piu -> lin Det {
s,sp = \\_,_ => piu ;
spn = \\_ => piu ;
n = Sg ;
s2 = \\g => [] ;
isNeg = False
} ;
mkDet : Str -> Number -> Det = \piu,n -> lin Det {
s,sp = \\_,_ => piu ;
spn = \\_ => piu ;
n = n ;
s2 = \\g => [] ;
isNeg = False
} ;
-- Inflects for gender
mkDet : Str -> Str -> Number -> Det = \alcuni,alcune,n -> lin Det {
s,sp = table {
Masc => \\_ => alcuni ;
Fem => \\_ => alcune
} ;
spn = \\_ => alcuni ;
n = n ;
s2 = \\g => [] ;
isNeg = False
} ;
} ;
} ; } ;