| m < # refs ⊦ (addarray(r, ty, vals, st)[refs[m] -- sk]) = st[refs[m] -- sk], refs = [], r ∈ refs |
⊦ r ≠ r0 → (addarray(r, ty, vals, st)[r0 -- sk]) = st[r0 -- sk]
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ m < # refs → (¬ refs[m] ∈ refs ↔ false)])], [EXTRATERMS : (sk, refs[m], st, vals, ty, r)]]