(Spa) Implement AForm+related opers in DiffSpa

This commit is contained in:
Inari Listenmaa committed 2021-10-20 10:57:40 +02:00
1 parent 354990319d
commit 3c27bbd125
2 files changed
+19 -6

No files matched your search

+3 -6
View File
@@ -60,12 +60,9 @@ oper
mkAdj : (x1,_,_,_,_,_,x7 : Str) -> Adj = \buen,solo,gran,sola,solos,solas,solamente ->
{s = table {
ASg Masc AAttr => buen ;
ASg Masc APred => solo ;
ASg Fem AAttr => gran ;
ASg Fem APred => sola ;
APl Masc => solos ;
APl Fem => solas ;
AAttr g => genForms buen gran ! g ; -- un buen amigo, una gran idea
AF g Sg => genForms solo sola ! g ;
AF g Pl => genForms solos solas ! g ;
AA => solamente
}
} ;