summaryrefslogtreecommitdiff
path: root/test/regress/regress0/strings/rewrites-v2.smt2
blob: 7e285b51a7be1472474914be3d59f2ec82b5f4f5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
; COMMAND-LINE: --strings-exp
; EXPECT: unsat
(set-logic SLIA)
(set-info :status unsat)
(declare-fun x () String)
(declare-fun y () String)
(declare-fun z () Int)

; these should all rewrite to false
(assert (or
(str.contains "abcdef0ghij1abced" (str.++ "g" (int.to.str z) x "a" y (int.to.str (+ z 1))))
(str.contains "abc23cd" (str.++ (int.to.str z) (int.to.str z) (int.to.str z)))
(not (str.contains (str.++ x "ab" y) (str.++ "b" (str.substr y 0 4))))
(not (str.contains (str.++ x "ab" y) (str.++ (str.substr x 5 (str.len x)) "a")))
(str.contains (str.++ x y) (str.++ x "a" y))
(str.contains (str.++ x y) (str.++ y x x y "a"))
)
) 

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