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