mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-05-27 08:58:55 -06:00
Cleanup
This commit is contained in:
committed by
Roman Suzi
parent
6661bdff95
commit
42fb9fd465
@@ -1107,8 +1107,6 @@ oper
|
||||
ptr=com + "тев";
|
||||
asp=asp;
|
||||
refltran = reflTran refl tran ;
|
||||
-- refl=refl;
|
||||
-- tran=tran
|
||||
} ;
|
||||
|
||||
makeVerbBezhat6 : Aspect -> Transitivity -> Str -> VerbForms
|
||||
@@ -1138,8 +1136,6 @@ oper
|
||||
ptr=com + "жав";
|
||||
asp=asp;
|
||||
refltran = reflTran refl tran ;
|
||||
-- refl=refl;
|
||||
-- tran=tran
|
||||
} ;
|
||||
|
||||
makeVerbEst : Aspect -> Transitivity -> Str -> VerbForms
|
||||
@@ -1169,8 +1165,6 @@ oper
|
||||
ptr=com + "в";
|
||||
asp=asp;
|
||||
refltran = reflTran refl tran ;
|
||||
-- refl=refl;
|
||||
-- tran=tran
|
||||
} ;
|
||||
|
||||
makeVerbDat6 : Aspect -> Transitivity -> Str -> VerbForms
|
||||
@@ -1199,8 +1193,6 @@ oper
|
||||
ptr=com + "в";
|
||||
asp=asp;
|
||||
refltran = reflTran refl tran ;
|
||||
-- refl=refl;
|
||||
-- tran=tran
|
||||
} ;
|
||||
|
||||
makeVerbByt6 : Aspect -> Transitivity -> Str -> VerbForms
|
||||
@@ -1230,8 +1222,6 @@ oper
|
||||
ptr=com + "ыв";
|
||||
asp=asp;
|
||||
refltran = reflTran refl tran ;
|
||||
-- refl=refl;
|
||||
-- tran=tran
|
||||
} ;
|
||||
|
||||
makeVerbJti: Aspect -> Transitivity -> Str -> Str -> VerbForms
|
||||
@@ -1262,7 +1252,5 @@ oper
|
||||
ptr=[];
|
||||
asp=asp;
|
||||
refltran = reflTran refl tran ;
|
||||
-- refl=refl;
|
||||
-- tran=tran
|
||||
} ;
|
||||
}
|
||||
|
||||
@@ -102,8 +102,6 @@ oper
|
||||
fut : SpecialFuture ;
|
||||
asp : Aspect ;
|
||||
refltran : ReflTran ;
|
||||
-- refl : Reflexivity ;
|
||||
-- tran : Transitivity
|
||||
} ;
|
||||
ComplementCase : Type = {s : Str ; c : Case ; hasPrep : Bool} ;
|
||||
VerbForms2 : Type = VerbForms ** {c : ComplementCase} ;
|
||||
|
||||
@@ -662,9 +662,7 @@ oper
|
||||
prtr="будучи";
|
||||
ptr="быв";
|
||||
asp=Imperfective;
|
||||
refltran = Intrans ;
|
||||
-- refl=NonReflexive;
|
||||
-- tran=Intransitive
|
||||
refltran = Intrans ; -- used to be refl=NonReflexive; tran=Intransitive
|
||||
} ;
|
||||
|
||||
-- normal copula require Nom in Pres. So this is Ins-friendly substitute.
|
||||
@@ -729,9 +727,7 @@ oper
|
||||
prtr="могши"; --*
|
||||
ptr="могши";
|
||||
asp=Imperfective;
|
||||
refltran = Intrans ;
|
||||
-- refl=NonReflexive;
|
||||
-- tran=Intransitive
|
||||
refltran = Intrans ; -- used to be refl=NonReflexive; tran=Intransitive
|
||||
} ;
|
||||
|
||||
want : VerbForms
|
||||
@@ -755,9 +751,7 @@ oper
|
||||
prtr="хотя";
|
||||
ptr="хотев";
|
||||
asp=Imperfective;
|
||||
refltran = Trans ;
|
||||
-- refl=NonReflexive;
|
||||
-- tran=Transitive
|
||||
refltran = Trans ; -- used to be refl=NonReflexive; tran=Transitive
|
||||
} ;
|
||||
|
||||
nullVerb : VerbForms
|
||||
@@ -770,9 +764,7 @@ oper
|
||||
prtr, ptr ="";
|
||||
fut=NullFuture ;
|
||||
asp=Imperfective;
|
||||
refltran = Trans ;
|
||||
-- refl=NonReflexive;
|
||||
-- tran=Transitive
|
||||
refltran = Trans ; -- used to be refl=NonReflexive; tran=Transitive
|
||||
} ;
|
||||
|
||||
verbPastAgree : VerbForms -> Agr -> Str -> Str
|
||||
|
||||
Reference in New Issue
Block a user