| # st0 = m + 1, st1[r0 -- sk0] = (st0 -- (r0 -- sk))[r0 -- sk0], r0 -- sk ∈ st1, r0 -- sk ∈ st0, onlyModified(r0, st0, st1), r0 ∈ st1, r0 ∈ st0, validFields(r0, fis, st0 -- (r0 -- sk)), ∀ rk. (rk ∈ st1 -- (r0 -- sk) ↔ rk ∈ update(r0, fis, st0 -- (r0 -- sk))) ∧ (st1 -- (r0 -- sk))[rk] = (update(r0, fis, st0 -- (r0 -- sk))[rk]), r0 -- sk0 ≠ r0 -- sk ∧ r0 -- sk0 ∈ st0 → r0 -- sk0 ∈ st1 ⊦ sk0 = sk, st1[r0 -- sk0] = st0[r0 -- sk0], st0[r0 -- sk] = st1[r0 -- sk], st0 = ∅, sk0 ∈ fis |
# st0 = m + 1, st1[r0 -- sk0] = (st0 -- (r0 -- sk))[r0 -- sk0], r0 -- sk ∈ st1, r0 -- sk ∈ st0, onlyModified(r0, st0, st1), r0 ∈ st1, r0 ∈ st0, validFields(r0, fis, st0 -- (r0 -- sk)), ∀ rk. (rk ∈ st1 -- (r0 -- sk) ↔ rk ∈ update(r0, fis, st0 -- (r0 -- sk))) ∧ (st1 -- (r0 -- sk))[rk] = (update(r0, fis, st0 -- (r0 -- sk))[rk]), r0 -- sk0 ∈ st0 → r0 -- sk0 ∈ st1 ⊦ sk0 = sk, st1[r0 -- sk0] = st0[r0 -- sk0], st0[r0 -- sk] = st1[r0 -- sk], st0 = ∅, sk0 ∈ fis
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ r -- sk = r0 -- sk0 ↔ r = r0 ∧ sk = sk0])]]