summaryrefslogtreecommitdiff
path: root/test/regress/regress0/sets/union-1b-flip.smt2
blob: e2b19b31a066db52e2dd2cd08f45584907507952 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
; COMMAND-LINE: --incremental
; EXPECT: unsat
; EXPECT: sat

; x not in A U B => x not in A
(set-logic ALL_SUPPORTED)
(define-sort SetInt () (Set Int))
(declare-fun A () (Set Int))
(declare-fun B () (Set Int))
(declare-fun x () Int)
(assert (member x B))
(push 1)
(assert (not (member x (union A B))))
(check-sat)
(pop 1)
(check-sat)
generated by cgit on debian on lair
contact matthew@masot.net with questions or feedback