MakeStructural.mkDet in Ita and Por

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

View File

@@ -61,7 +61,14 @@ oper
} ;
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 {
s,sp = \\_,_ => piu ;
spn = \\_ => piu ;
@@ -69,7 +76,7 @@ oper
s2 = \\g => [] ;
isNeg = False
} ;
-- Inflects for number
-- Inflects for gender
mkDet : Str -> Str -> Number -> Det = \alcuni,alcune,n -> lin Det {
s,sp = table {
Masc => \\_ => alcuni ;

View File

@@ -19,4 +19,34 @@ oper
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
} ;
} ;
} ;