blob: 45dd29459d572515ff8dfb639d5789f334892864 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
(set-logic QF_ALL)
(set-info :status unsat)
(declare-heap (Int Int))
(declare-const w Int)
(declare-const w1 Int)
(declare-const w2 Int)
;------- f -------
(assert (= w1 (as sep.nil Int)))
(assert (= w2 (as sep.nil Int)))
;-----------------
(assert (pto w (as sep.nil Int)))
(assert (not (and (sep (and (_ emp Int Int) (= w2 (as sep.nil Int))) (pto w w1)) (sep (pto w w2) true))))
(check-sat)
;(get-model)
|