summaryrefslogtreecommitdiff
path: root/test/regress/regress0/fmf/array_card.smt2
blob: 42293e2248ae9ed36c2a30873c11d88f4760438b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
; COMMAND-LINE: --finite-model-find
; EXPECT: sat
(set-logic AUFLIA)
(set-option :produce-models true)
(declare-sort U 0)
(declare-fun f () (Array U U))
(declare-fun a () U)
(declare-fun b () U)
(declare-fun c () U)

(assert (distinct a b c))

(assert (distinct (select f a) (select f b)))

(assert (forall ((x U)) (or (= (select f x) c) (= (select f x) b))))

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