examples/sets-translate/sets-translate-example-input.smt2


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20

(set-logic ALL)
(declare-sort Atom 0)

(declare-fun k (Atom Atom) (Set Atom))

(declare-fun t0 () Atom)
(declare-fun t1 () Atom)
(declare-fun t2 () Atom)
(declare-fun v () Atom)
(declare-fun b2 () Atom)

(assert (forall ((b Atom)) (or 
(member v (k t0 b))
(member v (k t1 b))
) ))

(assert (not (member v (k t2 b2))))

(check-sat)