| ⊦ putArray(vals, r, addarray(r, ty, n→i(# vals), st)) = addarray(r, ty, vals, st) |
⊦ st1 = st2 ↔ (∀ rk. (rk ∈ st1 ↔ rk ∈ st2) ∧ st1[rk] = st2[rk])
⊦ ∀ rk. (rk ∈ putArray(vals, r, addarray(r, ty, n→i(# vals), st)) ↔ rk ∈ addarray(r, ty, vals, st)) ∧ (putArray(vals, r, addarray(r, ty, n→i(# vals), st))[rk]) = (addarray(r, ty, vals, st)[rk])
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (addarray(r, ty, vals, st), putArray(vals, r, addarray(r, ty, n→i(# vals), st)))]]