| sk0 = _length, st[r -- _length] = st1[r -- _length], st[r0 -- sk] = st1[r0 -- sk], r1 -- sk0 ∈ st, r1 -- sk0 ∈ st1, r1 ∈ st, r1 ∈ st1, ∀ rk0. rk0 ∈ st ↔ rk0 ∈ st1, ∀ r2, sk1. r2 ≠ r → (((r2 = r1 ∧ sk1 = sk0) ⊃ val; st[r2 -- sk1])) = st1[r2 -- sk1], r ≠ r1 ∨ _length ≠ sk0 ⊦ sk = sk0, st1[r1 -- sk0] = val, r -- _type ∈ st |
st[r -- _length] = st1[r -- _length], st[r0 -- sk] = st1[r0 -- sk], r1 -- _length ∈ st, r1 -- _length ∈ st1, r1 ∈ st, r1 ∈ st1, ∀ rk0. rk0 ∈ st ↔ rk0 ∈ st1, ∀ r2, sk1. r2 ≠ r → (((r2 = r1 ∧ sk1 = _length) ⊃ val; st[r2 -- sk1])) = st1[r2 -- sk1] ⊦ sk = _length, st1[r1 -- _length] = val, r = r1, r -- _type ∈ st
[[CONCRETESIMPRULES : ()]]