path: root/test/regress/regress0/strings/repl-soundness-sem.smt2

; COMMAND-LINE: --strings-exp
; EXPECT: sat
(set-logic ALL)
(set-info :status sat)
(declare-fun x () String)
(declare-fun y () String)
(assert (and
(= (str.replace x x "abc") "")
(= (str.replace (str.++ x y) x "abc") (str.++ x y))
(= (str.replace (str.++ x y) (str.substr x 0 2) "abc") y)
))
(check-sat)