| st1 = (update(r0, fis, st0)[r0 -- sk, st1[r0 -- sk]]), # st0 = m + 1, st1 -- (r0 -- sk) = update(r0, fis, st0 -- (r0 -- sk)), r0 -- sk ∈ st1, r0 -- sk ∈ st0, (∀ rk. rk ∈ st0 ↔ rk ∈ st1) ∧ (∀ r1, sk. r1 ≠ r0 → st0[r1 -- sk] = st1[r1 -- sk]) ∧ (r0 -- _type ∈ st0 → st0[r0 -- _type] = st1[r0 -- _type]) ∧ (r0 -- _length ∈ st0 → st0[r0 -- _length] = st1[r0 -- _length]), r0 ∈ st1, r0 ∈ st0, validFields(r0, fis, st0 -- (r0 -- sk)), validFields(r0, fis, st0) ⊦ st0[r0 -- sk] = st1[r0 -- sk], st0 = ∅, ¬ sk ∈ fis ∧ sk ≠ _type ∧ sk ≠ _length |
st1 -- (r0 -- sk) = update(r0, fis, st0 -- (r0 -- sk)), # st0 = m + 1, st1 = (update(r0, fis, st0)[r0 -- sk, st1[r0 -- sk]]), validFields(r0, fis, st0), validFields(r0, fis, st0 -- (r0 -- sk)), r0 ∈ st0, r0 ∈ st1, r0 -- sk ∈ st0, r0 -- sk ∈ st1, r0 -- _length ∈ st0 → st0[r0 -- _length] = st1[r0 -- _length], r0 -- _type ∈ st0 → st0[r0 -- _type] = st1[r0 -- _type], ∀ r1, sk. r1 ≠ r0 → st0[r1 -- sk] = st1[r1 -- sk], ∀ rk. rk ∈ st0 ↔ rk ∈ st1 ⊦ st0 = ∅, st0[r0 -- sk] = st1[r0 -- sk], ¬ sk ∈ fis ∧ sk ≠ _type ∧ sk ≠ _length
[[CONCRETESIMPRULES : ()]]