| st[r -- _type] .type = mkarraytype(ty), is_array(r, st) ⊦ ∀ rk. (rk ∈ addarray(r, ty, getarray(r, st), st) ↔ rk ∈ st) ∧ (addarray(r, ty, getarray(r, st), st)[rk]) = st[rk] |
⊦ rk ∈ st → rk ∈ addarray(r, ty, vals, st)
st[r -- _type] .type = mkarraytype(ty), is_array(r, st) ⊦ (rk ∈ addarray(r, ty, getarray(r, st), st) → rk ∈ st) ∧ (addarray(r, ty, getarray(r, st), st)[rk]) = st[rk]
[[CONCRETESIMPRULES : ()]]