| ∀ st, r0, sk, val, r. (st[r0 -- sk, val][r -- sks0]) ≠ st[r -- sks0] → (∃ sks2, sks1. sks0 = sks2 + (sk + sks1) ∧ st[r -- sks2] .refval = r0), (st[r0 -- sk, val][r -- (sk0 + sks0)]) ≠ st[r -- (sk0 + sks0)] ⊦ ∃ sks2, sks1. sk0 + sks0 = sks2 + (sk + sks1) ∧ st[r -- sks2] .refval = r0 |
∀ st0, r1, sk1, val0, r2. (st0[r1 -- sk1, val0][r2 -- sks0]) ≠ st0[r2 -- sks0] → (∃ sks, sks1. sks0 = sks + sk1 ' + sks1 ∧ st0[r2 -- sks] .refval = r1) ⊦ (st[r0 -- sk, val][r -- (sk0 ' + sks0)]) = st[r -- (sk0 ' + sks0)], ∃ sks, sks1. sk0 ' + sks0 = sks + sk ' + sks1 ∧ st[r -- sks] .refval = r0
[[CONCRETESIMPRULES : ([CSIMPNAMEDSEQ : list, storekeys, c, ⊦ sk + sks = sk ' + sks])]]