updated clefts in Idiom (now all except Russian)

This commit is contained in:
aarne
2006-06-01 14:02:49 +00:00
parent d631ee00d7
commit 4dcbfcdf75
14 changed files with 100 additions and 24 deletions

View File

@@ -13,7 +13,7 @@ concrete IdiomNor of Idiom = CatNor **
(insertObj (\\_ => np.s ! rs.c) (predV verbBe))) ;
CleftAdv ad s = mkClause "det" (agrP3 neutrum Sg)
(insertObj (\\_ => s.s ! Main)
(insertObj (\\_ => "som" ++ s.s ! Sub)
(insertObj (\\_ => ad.s) (predV verbBe))) ;
ExistNP np =