r0 -- sk ∈ st, r0 ∈ st ⊦ r0 -- sk ∈ addarray(r, val, i, st)
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ r -- sk ∈ st → r ∈ st])]]