summaryrefslogtreecommitdiff
path: root/test/regress/regress0/sets/sets-union.smt2
blob: b794633e39acee5a9ef72576eb4e4379ce9568b9 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
; COMMAND-LINE: --incremental
; EXPECT: sat
; EXPECT: unsat
(set-logic ALL)
(define-sort SetInt () (Set Int))
(declare-fun a () (Set Int))
(declare-fun b () (Set Int))
(declare-fun x () Int)
(assert (not (member x a)))
(assert (member x (union a b)))
(check-sat)
;(get-model)
(assert (not (member x b)))
(check-sat)
(exit)
generated by cgit on debian on lair
contact matthew@masot.net with questions or feedback