blob: 1e289d94fc0611fcb7c90ebd6ab73929964c67a4 (
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
|
; COMMAND-LINE: --finite-model-find --fmf-bound
; EXPECT: unsat
(set-logic ALL)
(set-info :status unsat)
(declare-sort U 0)
(declare-fun P (Int U) Bool)
(declare-fun S (U) (Set Int))
(declare-fun f (U) U)
(assert (forall ((x Int) (z U))
(=> (member x (S (f z)))
(P x z))))
; need model of U size 2 to satisfy these
(declare-fun a () U)
(assert (member 77 (S a)))
(assert (not (P 77 a)))
; unsat
(assert (forall ((x U) (y U)) (= x y)))
(check-sat)
|
