summaryrefslogtreecommitdiff
path: root/test/regress/regress1/bags/fuzzy1.smt2
blob: 79ccc4b82ba9f8a78d75120958ad5fd3701f547b (plain)
1
2
3
4
5
6
7
8
9
10
(set-logic ALL)
(set-info :status sat)
(declare-fun a () (Bag (Tuple Int Int)))
(declare-fun b () (Bag (Tuple Int Int)))
(declare-fun c () Int) ; c here is zero
(assert
  (and
    (= b (bag.difference_subtract b a)) ; b is empty
    (= a (bag (tuple c 0) 1)))) ; a = {|(<0, 0>, 1)|}
(check-sat)
generated by cgit on debian on lair
contact matthew@masot.net with questions or feedback