summaryrefslogtreecommitdiff
path: root/test/regress/regress0/strings/unsound-0908.smt2
blob: 632c6713d1cae97b3cfd406771e5f2dbf1a931fd (plain) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14

; COMMAND-LINE: --strings-exp
; EXPECT: sat
(set-logic QF_SLIA)
(set-info :status sat)
(declare-const x String)
(assert (= (str.len x) 1))
;(assert (= x "X"))
(assert
    (or 
      (not (> (str.len x) 1))
      (= (str.at x 1) "Z")
    )
)
(check-sat)
generated by cgit on debian on lair
contact matthew@masot.net with questions or feedback