summaryrefslogtreecommitdiff
path: root/test/regress/regress1/sets/issue2568.smt2
blob: 80bcf1619ab3dd76792efd46cc318614ae2522f4 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
; COMMAND-LINE: --incremental
; EXPECT: sat
; EXPECT: sat
(set-logic ALL)

(declare-datatypes ((Unit 0)) (((uu))))

(declare-fun y () Int)
(declare-fun b () Bool)
(declare-fun s () (Set Int))
(declare-fun u () Unit)

(assert (= s (set.insert y s)))
(assert (=> b (= uu u)))

(push 1)
(check-sat)
(pop 1)

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