| ∀ S0, n, n0, S, S1, source, dest, done0. m0 = # S0 ∧ 0 = n - n0 ∧ INVR(S0, S, S1, n0, n, source, dest) ∧ INV(S0, S, S1, n0, source) ∧ (done0 → dest ∈ S0) ∧ (S0 = ∅ → S = ∅) → ⟪while S0 ≠ ∅ ∧ ¬ done0 do { choose v with v ∈ S0 in if v = dest then done0 := true else { S0 := S0 -- v ; ADD(succ(v); S1, S) } ; if S0 = ∅ then S0 := S, S := ∅, n0 := n0 + 1 }⟫ ⟪norfail0 := (done0 ⊃ some(n0); fail)⟫ norfail0 = some(n), 0 = n - n0, m0 + 1 = # S0, S0 ≠ ∅, v ≠ dest, INVR(S0, S, S1, n0, n, source, dest), INV(S0, S, S1, n0, source), v ∈ S0 ⊦ ⟪ADD(succ(v); S1, S)⟫ ⟪S0 := S0 -- v ; if S0 = ∅ then S0 := S, S := ∅, n0 := n0 + 1⟫ ⟪done0 := false ; while S0 ≠ ∅ ∧ ¬ done0 do { choose v with v ∈ S0 in if v = dest then done0 := true else { S0 := S0 -- v ; ADD(succ(v); S1, S) } ; if S0 = ∅ then S0 := S, S := ∅, n0 := n0 + 1 }⟫ ⟪norfail0 := (done0 ⊃ some(n0); fail)⟫ norfail0 = some(n) |
INV(C, N, V, n, source), v ∈ C, INVR(C, N, V, n, n0, source, dest), v ≠ dest ⊦ ⟪ADD(succ(v); V, N)⟫ (INV(C -- v, N, V, n, source) ∧ INVR(C -- v, N, V, n, n0, source, dest))
⟪ADD(succ(v); S1, S)⟫ (INV(S0 -- v, S, S1, n0, source) ∧ INVR(S0 -- v, S, S1, n0, n, source, dest)), ∀ S0, n, n0, S, S1, source, dest, done0. m0 = # S0 ∧ 0 = n - n0 ∧ INVR(S0, S, S1, n0, n, source, dest) ∧ INV(S0, S, S1, n0, source) ∧ (done0 → dest ∈ S0) ∧ (S0 = ∅ → S = ∅) → ⟪while S0 ≠ ∅ ∧ ¬ done0 do { choose v with v ∈ S0 in if v = dest then done0 := true else { S0 := S0 -- v ; ADD(succ(v); S1, S) } ; if S0 = ∅ then S0 := S, S := ∅, n0 := n0 + 1 }⟫ ⟪norfail0 := (done0 ⊃ some(n0); fail)⟫ norfail0 = some(n), 0 = n - n0, m0 + 1 = # S0, S0 ≠ ∅, v ≠ dest, INVR(S0, S, S1, n0, n, source, dest), INV(S0, S, S1, n0, source), v ∈ S0 ⊦ ⟪ADD(succ(v); S1, S)⟫ ⟪S0 := S0 -- v ; if S0 = ∅ then S0 := S, S := ∅, n0 := n0 + 1⟫ ⟪done0 := false ; while S0 ≠ ∅ ∧ ¬ done0 do { choose v with v ∈ S0 in if v = dest then done0 := true else { S0 := S0 -- v ; ADD(succ(v); S1, S) } ; if S0 = ∅ then S0 := S, S := ∅, n0 := n0 + 1 }⟫ ⟪norfail0 := (done0 ⊃ some(n0); fail)⟫ norfail0 = some(n)
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (S0, S, S1, n0, source, v, n, dest)]]