summaryrefslogtreecommitdiff
path: root/test/regress/regress1/sets/is_singleton1.smt2
blob: a6f1961cd6b7c0ad7977c5dcac8e81c45f76cda1 (plain) 
1
2
3
4
5
6
7
8
9
10
11

; COMMAND-LINE:
; EXPECT: sat
(set-logic ALL)
(set-info :status sat)
(declare-fun S () (Set Int))
(declare-fun x () Int)
(assert (= (choose (singleton x)) 5))
(assert (= (singleton x) S))
(assert (is_singleton S))
(assert (is_singleton (singleton 3)))
(check-sat)
generated by cgit on debian on lair
contact matthew@masot.net with questions or feedback