(Dut) make APs depend on agreement -- needed for reflexives

This commit is contained in:
Inari Listenmaa
2018-02-15 14:38:24 +01:00
parent 38dac3de60
commit 6fa7524c32
8 changed files with 41 additions and 34 deletions
+2 -2
View File
@@ -35,7 +35,7 @@ concrete NounDut of Noun = CatDut ** open ResDut, Prelude in {
PPartNP np v2 = np ** heavyNP {
s = \\c => np.s ! c ++ v2.s ! VPerf ; -- invar part
a = np.a
a = np.a ;
} ;
AdvNP np adv = np ** heavyNP {
@@ -163,7 +163,7 @@ concrete NounDut of Noun = CatDut ** open ResDut, Prelude in {
in {
s = \\a,n =>
preOrPost ap.isPre
(ap.s ! agrAdj g a n)
(ap.s ! agrP3 Sg ! agrAdj g a n)
(cn.s ! a ! n) ;
g = g
} ;