some fixes and extensions

This commit is contained in:
Herbert Lange
2019-10-31 13:15:29 +01:00
parent d960d0d361
commit 11a4d6ed12
4 changed files with 6 additions and 5 deletions

View File

@@ -90,7 +90,7 @@ concrete ExtendLat of Extend = CatLat ** open ResLat in {
-- EmbedPresPart : VP -> SC ; -- looking at Mary (is fun)
-- PastPartAP : VPSlash -> AP ; -- lost (opportunity) ; (opportunity) lost in space
PastPartAP vp = { s = vp.part ! VPassPerf } ;
PastPartAP vp = { s = \\ag => vp.part ! VPassPerf ! ag ++ vp.adv ++ vp.c.s} ; -- TODO
-- PastPartAgentAP : VPSlash -> NP -> AP ; -- (opportunity) lost by the company
-- -- this is a generalization of Verb.PassV2 and should replace it in the future.