| ⊦ sk ≠ _type ∧ sk ≠ _length ∧ onlyModified(r, st, st0) ∧ r -- sk ∈ st → onlyModified(r, st, st0[r -- sk, val]) |
onlyModified(r, st, st0), r -- sk ∈ st, r ∈ st ⊦ sk = _length, sk = _type, onlyModified(r, st, st0[r -- sk, val])
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ r -- sk ∈ st → r ∈ st])]]