Chinese verbal adjective predication and repeated verb questions

This commit is contained in:
aarne
2013-10-08 14:19:16 +00:00
parent 227b9ef0a8
commit 0e14ae92e8
7 changed files with 53 additions and 19 deletions

View File

@@ -54,10 +54,14 @@ concrete VerbChi of Verb = CatChi ** open ResChi, Prelude in {
PassV2 v = insertAdv (mkNP passive_s) (predV v v.part) ; ----
CompAP ap = insertObj (mkNP (ap.s ++ de_s)) (predV copula []) ;
{-
CompAP ap = case ap.hasAdA of {
True => insertObj (mkNP ap.s) (predV nocopula []) ;
False => insertObj (mkNP (ap.s ++ de_s)) (predV copula [])
} ;
-}
CompNP np = insertObj np (predV copula []) ; ----