| path(r ' + x, H), reachable((r ' + x).last, r1, H), (r ' + x).last ∈ H, r1 ∈ H ⊦ reachable(r1, (r ' + x).last, H), reachable(r, (r ' + x).last, H[r1, ce]) |
⊦ reachable(r, r0, H) ↔ (∃ x. path(r ' + x, H) ∧ (r ' + x).last = r0)
path(r ' + x, H), reachable((r ' + x).last, r1, H), (r ' + x).last ∈ H, r1 ∈ H ⊦ reachable(r1, (r ' + x).last, H), ∃ x0. path(r ' + x0, H[r1, ce]) ∧ (r ' + x0).last = (r ' + x).last
Used terms: H[r1, ce], (r ' + x).last, r