| ⊦ instore(r, class, (sk × val) ' + fis, st) ↔ r -- sk ∈ st ∧ st[r -- sk] = val ∧ instore(r, class, fis, st) |
⊦ instore(r, class, (sk × val) ' + fis, st) ↔ (r -- sk) × val ∈ st ∧ instore(r, class, fis, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ rk × val ∈ st ↔ rk ∈ st ∧ st[rk] = val])], [EXTRATERMS : (st, fis, val, sk, class, r)]]