(Fin) Add linearisation to AdjAsCN, AdjAsNP

This commit is contained in:
Inari Listenmaa
2022-09-12 13:25:34 +02:00
committed by GitHub
parent 67d5bb9714
commit 2340a98507

View File

@@ -9,6 +9,7 @@ concrete ExtendFin of Extend =
,PassVPSlash, PassAgentVPSlash ,PassVPSlash, PassAgentVPSlash
,CardCNCard ,CardCNCard
,UttAccNP ,UttAccNP
,AdjAsCN, AdjAsNP
] ]
with with
(Grammar = GrammarFin) ** (Grammar = GrammarFin) **
@@ -237,5 +238,6 @@ lin CardCNCard card cn = {
} ; } ;
lin UttAccNP np = {s = P.addNegation np.isNeg ++ np.s ! NPAcc} ; lin UttAccNP np = {s = P.addNegation np.isNeg ++ np.s ! NPAcc} ;
lin AdjAsCN ap = {s = ap.s ! True ; postmod = \\_ => ap.p ; h = Back} ; ---- Harmony just a guess
lin AdjAsNP ap = MassNP (AdjAsCN ap) ;
} }