Fix ExistIP in IdiomCat + more smart paradigms for verbs in ParadigmsCat

This commit is contained in:
inari
2014-04-13 10:59:07 +00:00
parent 0c8538aed7
commit ede6ba462c
2 changed files with 50 additions and 22 deletions

View File

@@ -33,7 +33,7 @@ concrete IdiomCat of Idiom = CatCat **
ip.s ! Nom ++
(mkClause [] True False
(agrP3 Masc Sg)
(insertClit3 "hi" (insertComplement (\\_ => ip.s ! Acc) (predV haver_V))))
(insertClit3 "hi" (predV haver_V)))
.s ! DDir ! t ! a ! p ! Indic
} ;