summaryrefslogtreecommitdiff
path: root/test/regress/regress0/seq/seq-rewrites.smt2
blob: a8bd7c1f23a179850679510036a1c76213dda290 (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
36
37
38
39
40
41
42
43
44
(set-logic QF_UFSLIA)
(set-info :status unsat)
(declare-fun x () (Seq Int))
(declare-fun y () (Seq Int))
(declare-fun z () Int)

(assert 
(or

(not (=
(seq.replace (seq.++ (seq.unit 0) x) (seq.unit 1) (seq.unit 2))
(seq.++ (seq.unit 0) (seq.replace x (seq.unit 1) (seq.unit 2)))
))

(not (=
(seq.at (seq.++ x (seq.unit 14)) (seq.len x))
(seq.unit 14)
))

(not (=
(seq.at x z)
(seq.extract x z 1)
))

(not (=
(seq.contains (seq.++ x y) y)
true
))

(not (=
(seq.prefixof (seq.unit z) (seq.unit 4))
(seq.suffixof (seq.unit z) (seq.unit 4))
))

(not (=
(seq.rev (seq.++ (seq.unit 1) (seq.unit 2) (seq.unit 3)))
(seq.++ (seq.unit 3) (seq.unit 2) (seq.unit 1))
))

))



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