In UttVP add the transitive verb args

This commit is contained in:
krasimir
2008-03-13 07:20:03 +00:00
parent e0bffc2797
commit 418f841625

View File

@@ -12,7 +12,10 @@ concrete PhraseBul of Phrase = CatBul ** open Prelude, ResBul in {
UttIP ip = {s = ip.s ! RSubj} ;
UttIAdv iadv = {s = iadv.s1} ;
UttNP np = {s = np.s ! RSubj} ;
UttVP vp = {s = vp.ad ! False ++ "äà" ++ vp.s ! Pres ! Simul ! Pos ! {gn=GSg Masc; p=P1} ! False} ;
UttVP vp = {s = vp.ad ! False ++
"äà" ++
vp.s ! Pres ! Simul ! Pos ! {gn=GSg Masc; p=P1} ! False ++
vp.s2 ! {gn=GSg Masc; p=P1}} ;
UttAdv adv = adv ;
NoPConj = {s = []} ;