1
0
forked from GitHub/gf-core

swadesh fixes; bug fix in i -old

This commit is contained in:
aarne
2005-03-14 16:40:08 +00:00
parent 623521c70b
commit 4ca5d0b507
3 changed files with 11 additions and 6 deletions

View File

@@ -66,9 +66,9 @@ lin
Fly = PresV fly_V ;
Walk = PresV walk_V ;
Come = PresV come_V ;
Lie = PresV lie_V ;
Sit = PresV sit_V ;
Stand = PresV stand_V ;
Lie = PresReflV lie_V ;
Sit = PresReflV sit_V ;
Stand = PresReflV stand_V ;
Turn = PresV turn_V ;
Fall = PresV fall_V ;
Sing = PresV sing_V ;

View File

@@ -8,6 +8,10 @@ oper
PresCl (insertObject (mkSatsObject s v o) v.c3 v.s3 r) ;
PresVasV2 : V -> NP -> NP -> Phr = \ v -> PresV2 (dirV2 v) ;
PresReflV : V -> NP -> Phr = \v,s ->
PresCl (insertObject (mkSats s v) accusative.p1 []
(reflPronNounPhrase (pgen2gen s.g) s.n s.p)) ;
PresCl : Sats -> Phr = \c ->
{s = (UseCl (PosTP TPresent ASimul)
(sats2clause c ** {lock_Cl = <>})