| 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] |
⊦ r ≠ r0 → (putArray(vals, r, j, st)[r0 -- sk]) = st[r0 -- sk]
⊦ r ≠ r0 → (r0 -- sk ∈ putArray(vals, r, j, st) ↔ r0 -- sk ∈ st)
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (sk, r0, st0, i, r, vals)]]