| ⊦ r ≠ r0 → (r -- sk ∈ addarray(r0, vals, j, st) ↔ r -- sk ∈ st) |
⊦ rk ∈ st → rk ∈ addarray(r, vals, j, st)
⊦ r ≠ r0 → (r ∈ addarray(r0, vals, j, st) ↔ r ∈ st)
r -- sk ∈ addarray(r0, vals, j, st), r ∈ st ⊦ r = r0, r -- sk ∈ st
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ r -- sk ∈ st → r ∈ st])]]