forked from GitHub/gf-core
coding of ExtraSwe
This commit is contained in:
@@ -8,7 +8,7 @@ lin
|
||||
agr = np.a ;
|
||||
vps = vp.s ! VPFinite t a ;
|
||||
verb = case <<t,a> : ParamX.Tense * Anteriority> of {
|
||||
<Pres,Simul> => {fin = "gör" ; inf = vps.inf}
|
||||
<Pres,Simul> => {fin = "gör" ; inf = vps.inf}
|
||||
; --# notpresent
|
||||
<Past,Simul> => {fin = "gjorde" ; inf = vps.inf} ; --# notpresent
|
||||
_ => vps --# notpresent
|
||||
|
||||
Reference in New Issue
Block a user