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