summaryrefslogtreecommitdiff
path: root/test/regress/regress0/fmf/fmf-strange-bounds.smt2
blob: 7812c24313037f0926778306247c3d19335b2d77 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
; COMMAND-LINE: --fmf-bound
; EXPECT: sat
(set-logic ALL)
(set-info :status sat)
(declare-sort U 0)
(declare-fun P (Int Int U) Bool)

(declare-fun S () (Set Int))

(declare-fun f (Int) U)
(declare-fun g (Int) U)

(declare-fun h (U) Int)

(assert (member 77 S))
(assert (>= (h (f 77)) 3))
(assert (>= (h (g 77)) 2))
(assert (not (= (g 77) (f 77))))

(assert (forall ((x Int) (y Int) (z U)) (=> 
(or (= z (f x)) (= z (g x)))
(=> (member x S)
(=> (and (<= 0 y) (<= y (h z)))
(P x y z))))))


(declare-fun Q (U Int) Bool)
(declare-const a U)
(declare-const b U)
(declare-const c U)
(assert (distinct a b c))
(assert (forall ((x U) (y Int)) (=> (and (<= 3 y) (<= y 10) (or (= x c) (= x (f y)))) (Q x y))))
(assert (not (Q b 6)))

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