summaryrefslogtreecommitdiff
path: root/test/regress/regress1/sets/comp-intersect.smt2
blob: 60d9046bd1832e3e4b75507b9d1bd9edb01de34b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
; COMMAND-LINE: --sets-ext
; EXPECT: unsat
(set-logic ALL)
(set-info :status unsat)

(declare-fun x () (Set Int))
(declare-fun y () (Set Int))

(assert (= x (set.comprehension ((z Int)) (> z 4) (* 5 z))))
(assert (= y (set.comprehension ((z Int)) (< z 10) (+ (* 5 z) 1))))

(assert (not (= (set.intersection x y) (as set.empty (Set Int)))))

(check-sat)
generated by cgit on debian on lair
contact matthew@masot.net with questions or feedback