mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-06-27 20:06:29 -06:00
(Romance) Attributive and predicative adjective forms (#93)
* (Fre,Por) accomodate changes to Romance adjectives - to support Spanish buen/bueno, gran/grande and catalan bo/bon * (Cat) Update paradigms to allow predicative and attributive forms of adj * (Spa) fix argument order in Spanish adjective paradigms * (Eng) fix missing paradigm invarA * (Spa) Flip order of args in mkAdj constructor
This commit is contained in:
+11
-6
@@ -72,14 +72,19 @@ oper
|
||||
-- Adjectives are conveniently seen as gender-dependent nouns.
|
||||
-- Here are some patterns. First one that describes the worst case.
|
||||
|
||||
mkAdj : (_,_,_,_ : Str) -> Adj = \vieux,vieuxs,vieille,vieillement ->
|
||||
{s = table {
|
||||
AF Masc n => numForms vieux vieuxs ! n ;
|
||||
AF Fem n => nomReg vieille ! n ;
|
||||
AA => vieillement
|
||||
}
|
||||
mkAdj' : (_,_,_,_,_ : Str) -> Adj ;
|
||||
mkAdj' vieux vieil vieuxs vieille vieillement = {
|
||||
s = table {
|
||||
ASg Masc _ => pre {#voyelle => vieil ; "h" => vieil ; _ => vieux} ;
|
||||
ASg Fem _ => vieille ;
|
||||
APl g => genForms vieuxs (vieille + "s") ! g ;
|
||||
AA => vieillement
|
||||
}
|
||||
} ;
|
||||
|
||||
mkAdj : (_,_,_,_ : Str) -> Adj ;
|
||||
mkAdj bleu bleus bleue bleuement = mkAdj' bleu bleu bleus bleue bleuement ;
|
||||
|
||||
-- Then the regular and invariant patterns.
|
||||
|
||||
adjReg : Str -> Gender => Number => Str = \bu -> table {
|
||||
|
||||
Reference in New Issue
Block a user