romance bug fix ; postfixes in clt slides

This commit is contained in:
aarne
2006-03-08 21:35:28 +00:00
parent 1ce8ef0ba9
commit dd1adef3ca
5 changed files with 117 additions and 28 deletions

View File

@@ -21,7 +21,8 @@ incomplete concrete AdjectiveRomance of Adjective =
ReflA2 adj = {
s = \\af =>
adj.s ! Posit ! af ++ adj.c2.s ++ reflPron Sg P3 adj.c2.c ; --- agr
adj.s ! Posit ! af ++ adj.c2.s ++
adj.c2.s ++ prepCase adj.c2.c ++ reflPron Sg P3 Nom ; --- agr
isPre = False
} ;

View File

@@ -19,7 +19,7 @@ incomplete concrete SentenceRomance of Sentence =
SlashVVV2 np vv v2 =
mkClause
(np.s ! Aton Nom) np.a
(insertComplement (\\a => prepCase vv.c2.c ++ v2.s ! VInfin) (predV v2)) **
(insertComplement (\\a => prepCase vv.c2.c ++ v2.s ! VInfin) (predV vv)) **
{c2 = v2.c2} ;
AdvSlash slash adv = {