summaryrefslogtreecommitdiff
path: root/test/regress/regress1/rels/joinImg_0_2.cvc
blob: e15920804c1572f6c1b04d7dfba428288bdff9c3 (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
27
28
29
30
31
32
33
34
35
36
37
38
39
% EXPECT: sat
OPTION "sets-ext";
OPTION "logic" "ALL_SUPPORTED";
IntPair: TYPE = [INT, INT];
x : SET OF IntPair;
y : SET OF IntPair;
r : SET OF IntPair;

t : SET OF [INT];
u : SET OF [INT];
univ : SET OF [INT];

z : IntPair;
ASSERT z = (1,2);
zt : IntPair;
ASSERT zt = (2,1);
s : IntPair;
ASSERT s = (1,1);
a : IntPair;
ASSERT a = (1,5);
b: INT;

ASSERT (1, 7) IS_IN x;
ASSERT z IS_IN x;

ASSERT (7, 5) IS_IN y;

ASSERT t = (x JOIN_IMAGE 2);
ASSERT univ = (x JOIN_IMAGE 0);
ASSERT TUPLE(100) IS_IN t;

ASSERT NOT (TUPLE(3) IS_IN univ);

ASSERT u = (x JOIN_IMAGE 1);

ASSERT TUPLE(4) IS_IN (x JOIN_IMAGE 2);

ASSERT TUPLE(b) IS_IN (x JOIN_IMAGE 1);
CHECKSAT;
generated by cgit on debian on lair
contact matthew@masot.net with questions or feedback