mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-09 13:09:33 -06:00
In UttVP add the transitive verb args
This commit is contained in:
@@ -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 = []} ;
|
||||
|
||||
Reference in New Issue
Block a user