| x = [], path(ce.nxt ' + x, H[r, ce]), ce.nxt ∈ H, (ce.nxt ' + x).last ∈ H ⊦ ce.nxt = null, r = (ce.nxt ' + x).last, r = null, reachable(r, (ce.nxt ' + x).last, H[r, ce]) |
ce.nxt ∈ H ⊦ r = null, ce.nxt = null, r = ce.nxt, reachable(r, ce.nxt, H[r, ce])
Used simplifier rules: path-one: ⊦ path(r ', H) ↔ ¬ ¬(r ∈ H ∧ r ≠ null);%in-neq: ⊦ r ≠ r0 → (r ∈ H[r0, ce] ↔ r ∈ H); from specification store[linheap]%l: ⊦ r '.last = r; from specification list-last[reflist]%a: ⊦ (x0 + x1) + x2 = x0 + x1 + x2; from specification list[reflist]%app: ⊦ x0 + [] = x0; from specification list[reflist]