| validFields(r, fis0, st0), r -- sk ∈ st0, r ∈ st0, ∀ r, st0. validFields(r, fis0, st0) → onlyModified(r, st0, update(r, fis0, st0)) ⊦ sk = _type, sk = _length, sk ∈ fis0, onlyModified(r, st0, update(r, fis0, st0)[r -- sk, val]) |
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ sk ≠ _type ∧ sk ≠ _length ∧ onlyModified(r, st, st0) ∧ r -- sk ∈ st → onlyModified (r, st, st0[r -- sk, val])])], [EXTRATERMS : (r, st0)]]