; COMMAND-LINE: --strings-exp
; EXPECT: unsat
(set-logic ALL)
(set-info :status unsat)
(declare-fun x () String)
(declare-fun z () String)
(assert (= (str.len z) 0))
(assert (= (str.replace "ab" z "c") x))
(declare-fun y () String)
(assert (= x (str.++ "c" y)))
(check-sat)