blob: f109a484e925a68ffac3108913133e9fe844a5ca (
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
|
(set-info :smt-lib-version 2.5)
(set-logic QF_S)
(set-info :status sat)
(set-option :strings-exp true)
; this option requires user to check whether the constraint is in the fragment
; currently we do not provide only positive membership constraint checking
; if users use this option but the constraint is not in this fragment, the result will fail
(set-option :strings-inm true)
(declare-fun x () String)
(declare-fun y () String)
(assert (str.in.re x
(re.* (re.++ (re.* (str.to.re "a") ) (str.to.re "b") ))
))
(assert (str.in.re y
(re.* (re.++ (re.* (str.to.re "a") ) (str.to.re "b") ))
))
(assert (not (= x y)))
(assert (= (str.len x) (str.len y)))
(assert (= (str.len y) 3))
(check-sat)
|
