| true, ∀ st, val, r, i, j0. i→n(j0) < i→n(j) → (true → (i < 0 ∨ j0 ≤ i → (r -- i ' ∈ addarray(r, val, j0, st) ↔ r -- i ' ∈ st))) ⊦ i < 0 ∨ j ≤ i → (r -- i ' ∈ addarray(r, val, j, st) ↔ r -- i ' ∈ st) |
⊦ rk ∈ st → rk ∈ addarray(r, val, i, st)
r -- i ' ∈ addarray(r, val, j, st), r ∈ addarray(r, val, j, st), i < 0 ∨ j ≤ i, ∀ st, val, r, i, j0. i→n(j0) < i→n(j) → (true → (i < 0 ∨ j0 ≤ i → (r -- i ' ∈ addarray(r, val, j0, st) ↔ r -- i ' ∈ st))) ⊦ r -- i ' ∈ st
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ r -- sk ∈ st → r ∈ st])]]