1
0
forked from GitHub/gf-rgl

bugfix for phrasal verbs

This commit is contained in:
Krasimir Angelov
2018-07-05 09:12:28 +02:00
parent fa966ab212
commit c456ea3b11

View File

@@ -6,10 +6,10 @@ concrete SentenceBul of Sentence = CatBul ** open Prelude, ResBul in {
flags optimize=all_subs ; flags optimize=all_subs ;
lin lin
PredVP np vp = mkClause (np.s ! (case vp.vtype of { PredVP np vp = mkClause (case vp.vtype of {
VNormal => RSubj ; VNormal => np.s ! RSubj ;
VMedial _ => RSubj ; VMedial _ => np.s ! RSubj ;
VPhrasal c => RObj c})) np.gn np.p vp ; VPhrasal c => linCase c (personPol np.p) ++ np.s ! RObj CPrep}) np.gn np.p vp ;
PredSCVP sc vp = mkClause (sc.s ! {gn=GSg Masc; p=P3}) (GSg Masc) (NounP3 Pos) vp ; PredSCVP sc vp = mkClause (sc.s ! {gn=GSg Masc; p=P3}) (GSg Masc) (NounP3 Pos) vp ;