short imperative Utt in Eng

2010-06-22 10:53:58 +00:00
parent 5b9f3ad75d
commit ed751c43ab
2 changed files with 7 additions and 0 deletions
@@ -129,4 +129,6 @@ concrete ExtraEng of ExtraEngAbs = CatEng **
    AdvAP ap adv = {s = \\a => ap.s ! a ++ adv.s ; isPre = False} ;

    UseCopula = predAux auxBe ;
+
+    UttVPShort vp = {s = infVP True vp (agrP3 Sg)} ;
 }