test/regress/regress0/rels/iden_0.cvc


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
27
28

% EXPECT: unsat
OPTION "logic" "ALL_SUPPORTED";
Atom: TYPE;
IntPair: TYPE = [INT, INT];
x : SET OF IntPair;
id : SET OF IntPair;

t : SET OF [INT];

z : IntPair;
ASSERT z = (1,2);
zt : IntPair;
ASSERT zt = (2,1);
v : IntPair;
ASSERT v = (1,1);
a : IntPair;
ASSERT a = (1,5);

ASSERT TUPLE(1) IS_IN t;
ASSERT TUPLE(2) IS_IN t;
ASSERT z IS_IN x;
ASSERT zt IS_IN x;
ASSERT v IS_IN x;
ASSERT a IS_IN x;
ASSERT id = IDEN(t);
ASSERT NOT ((1, 1) IS_IN (id & x));

CHECKSAT;