test/regress/regress0/rels/rels-sharing-simp.cvc.smt2


1
2
3
4
5
6
7
8
9
10
11
12

; EXPECT: sat
(set-option :incremental false)
(set-logic ALL)

(declare-fun w () (Set (Tuple Int Int)))
(declare-fun z () (Set (Tuple Int Int)))
(declare-fun x () Int)
(declare-fun y () Int)
(assert (member (mkTuple 1 x) w))
(assert (member (mkTuple y 2) z))
(assert (not (member (mkTuple 1 2) (join w z))))
(check-sat)