| r -- i ' ≠ r -- i0 ', 0 ≤ i0, r -- i ' ∈ addarray(r, val, i0, st), i < 0 ∨ i0 < i, ∀ st, val, r, i, j0. i→n(j0) < i→n(i0 + 1) → (true → (i < 0 ∨ j0 ≤ i → (r -- i ' ∈ addarray(r, val, j0, st) ↔ r -- i ' ∈ st))) ⊦ r -- i ' ∈ st |
0 ≤ i0, r -- i ' ∈ addarray(r, val, i0, st), r ∈ addarray(r, val, i0, st), i < 0 ∨ i0 < i, ∀ st, val, r, i, j0. i→n(j0) < i→n(i0 + 1) → (true → (i < 0 ∨ j0 ≤ i → (r -- i ' ∈ addarray(r, val, j0, st) ↔ r -- i ' ∈ st))) ⊦ i = i0, r -- i ' ∈ st
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ r -- sk ∈ st → r ∈ st], [CSIMPSEQ : ⊦ i ' = i0 ' ↔ i = i0], [CSIMPSEQ : ⊦ r -- sk = r0 -- sk0 ↔ ¬ ¬ (r = r0 ∧ sk = sk0)])]]