test/regress/regress0/rels/join-eq-u-sat.cvc


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22

% EXPECT: sat
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);

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

t : INT;
ASSERT t > 0 AND t < 3;

ASSERT NOT (u, t ) IS_IN z;

CHECKSAT;