summaryrefslogtreecommitdiff
path: root/test/regress/regress1/bags/fold2.smt2
blob: 9863a11c66851ddbee5492e239ceb0cacd46eef6 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
(set-logic HO_ALL)
(set-info :status sat)
(set-option :fmf-bound true)
(set-option :uf-lazy-ll true)
(set-option :strings-exp true)
(define-fun min ((x String) (y String)) String (ite (str.< x y) x y))
(declare-fun A () (Bag String))
(declare-fun x () String)
(declare-fun minimum () String)
(assert (= minimum (bag.fold min "zzz" A)))
(assert (str.< "aaa" minimum ))
(assert (str.< minimum "zzz"))
(assert (distinct x minimum))
(assert (= (bag.count x A) 2))
(check-sat)
generated by cgit on debian on lair
contact matthew@masot.net with questions or feedback