| ⊦ r = r0, okarray(refval(r), ty, i, st[r0 -- sk, val0]) ↔ okarray(refval(r), ty, i, st), is_classtype(ty), is_arraytype(ty) |
⊦ refval(rk .ref) ≠ val → (okarray(val, ty, i, st[rk, val0]) ↔ okarray(val, ty, i, st))
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (r -- sk) .ref = r], [CSIMPSEQ : ⊦ refval(r) = refval(r0) ↔ r = r0])], [EXTRATERMS : (val0, r0 -- sk, st, i, ty, refval(r))]]