1
0
forked from GitHub/gf-rgl

added a contruction; fixed negation

This commit is contained in:
EkaterinaVoloshina
2024-11-26 21:26:54 +01:00
parent 3dae1cf820
commit 6b5df036e3
15 changed files with 107 additions and 35 deletions
+5 -2
View File
@@ -102,8 +102,11 @@ concrete ConjunctionRus of Conjunction =
ConjAdv = conjunctDistrSS ;
-- : Conj -> ListIAdv -> IAdv ; -- where or why
ConjIAdv = conjunctDistrSS ;
-- : Conj -> ListAdV -> AdV ; -- always or sometimes
ConjAdV = conjunctDistrSS ;
-- : Conj -> ListAdV -> AdV ; -- always or sometimes;
ConjAdV conj xs = {
s = conj.s1 ++ xs.s1 ++ conj.s2 ++ xs.s2 ;
p = Pos
} ;
-- : Conj -> ListAP -> AP ; -- cold and warm
ConjAP conj xs = conjunctDistrTable3 GenNum Animacy Case conj xs ** {