| st[r0 -- sk] = (putArray(vals, r, i, st0)[r0 -- sk]), r0 -- sk ∈ st, r0 -- sk ∈ putArray(vals, r, i, st0) ⊦ r ∈ st, r0 -- sk ∈ st0 ∧ st[r0 -- sk] = st0[r0 -- sk] |
st[r0 -- sk] = (putArray(vals, r, i, st0)[r0 -- sk]), r0 -- sk ∈ st, r0 -- sk ∈ putArray(vals, r, i, st0), r0 ∈ st, r0 ∈ putArray(vals, r, i, st0) ⊦ r ∈ st, r0 -- sk ∈ st0 ∧ (putArray(vals, r, i, st0)[r0 -- sk]) = st0[r0 -- sk]
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ r -- sk ∈ st → r ∈ st])]]