fixed the order of Fre.mkA. It should always be: SgMasc,(SgMascVoc,)SgFem,PlMasc,PlFem,Adv

This commit is contained in:
Aarne Ranta
2019-09-19 10:33:01 +02:00
parent 04d022c7f0
commit 55dac61fe5
3 changed files with 6 additions and 6 deletions
+1 -1
View File
@@ -394,7 +394,7 @@ oper
} ;
mk4A masc fem mascpl aa = mk5A masc masc fem mascpl aa ;
mk5A masc masc fem mascpl aa = compADeg {s = \\_ => (mkAdj' masc masc mascpl fem aa).s ; isPre = False ; copTyp = serCopula ; lock_A = <>} ;
mk5A masc mascv fem mascpl aa = compADeg {s = \\_ => (mkAdj' masc mascv fem mascpl aa).s ; isPre = False ; copTyp = serCopula ; lock_A = <>} ;
regA a = compADeg {s = \\_ => (mkAdjReg a).s ; isPre = False ; copTyp = serCopula ; lock_A = <>} ;
prefA a = {s = a.s ; isPre = True ; copTyp = a.copTyp ; lock_A = <>} ;
adjCopula a cop = a ** {copTyp = cop} ;