summaryrefslogtreecommitdiff
path: root/test/regress/regress1/rels/join-eq-structure-and.cvc
blob: 177410b1e7851c6ef8a6c7cd17614f591f9b800e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
% EXPECT: unsat
OPTION "logic" "ALL_SUPPORTED";
IntPair: TYPE = [INT, INT];
x : SET OF IntPair;
y : SET OF IntPair;
DATATYPE unit = u END;
IntUPair: TYPE = [INT, unit];
UIntPair: TYPE = [unit, INT];
w : SET OF IntUPair;
z : SET OF UIntPair;

ASSERT  (x JOIN y) = (w JOIN z) AND (x JOIN y ) = TRANSPOSE(w JOIN z);

ASSERT (0,1) IS_IN (x JOIN y);

t : INT;
ASSERT t >= 0 AND t <=1;
s : INT;
ASSERT s >= 0 AND s <=1;

ASSERT s+t = 1;

ASSERT ( s ,u ) IS_IN w;
ASSERT NOT ( u, t ) IS_IN z;

CHECKSAT;
generated by cgit on debian on lair
contact matthew@masot.net with questions or feedback