| ∀ sks2. sks2 + sk ' ⊑ sks → st[st[r -- sk0] .refval -- sks2] .refval ≠ st[st[r -- sk0] .refval -- sks] .refval, r ≠ st[st[r -- sk] .refval -- sks] .refval ∨ sk0 ≠ sk ⊦ (st[st[st[r -- sk0] .refval -- sks] .refval -- sk, val][st[r -- sk0] .refval -- (sks + sk ' + sks1)]) = st[st[r -- sk0] .refval -- (sks + sk ' + sks1)], sk0 ' + sks + sk ' + sks1 = (sk0 ' + sks) + sk ' + sks1 ∧ st[r -- (sk0 ' + sks)] .refval = st[st[r -- sk0] .refval -- sks] .refval ∧ (∀ sks3. sks3 + sk ' ⊑ sk0 ' + sks → st[r -- sks3] .refval ≠ st[r -- (sk0 ' + sks)] .refval), ∃ sks2, sks3. sk0 ' + sks + sk ' + sks1 = sks2 + sk ' + sks3 ∧ st[r -- sks2] .refval = st[st[r -- sk0] .refval -- sks] .refval ∧ (∀ sks3. sks3 + sk ' ⊑ sks2 → st[r -- sks3] .refval ≠ st[r -- sks2] .refval) |
∀ sks2. sks2 + sk ' ⊑ sks → st[st[r -- sk0] .refval -- sks2] .refval ≠ st[st[r -- sk0] .refval -- sks] .refval, r ≠ st[st[r -- sk] .refval -- sks] .refval ∨ sk0 ≠ sk ⊦ (st[st[st[r -- sk0] .refval -- sks] .refval -- sk, val][st[r -- sk0] .refval -- (sks + sk ' + sks1)]) = st[st[r -- sk0] .refval -- (sks + sk ' + sks1)], ∃ sks2, sks3. sk0 ' + sks + sk ' + sks1 = sks2 + sk ' + sks3 ∧ st[r -- sks2] .refval = st[st[r -- sk0] .refval -- sks] .refval ∧ (∀ sks3. sks3 + sk ' ⊑ sks2 → st[r -- sks3] .refval ≠ st[r -- sks2] .refval), st[r -- (sk0 ' + sks)] .refval = st[st[r -- sk0] .refval -- sks] .refval ∧ (sks0 + sk ' ⊑ sk0 ' + sks → st[r -- sks0] .refval ≠ st[r -- (sk0 ' + sks)] .refval)
[[CONCRETESIMPRULES : ([CSIMPNAMEDSEQ : list, storekeys, a, ⊦ (sks + sks0) + sks1 = sks + sks0 + sks1])]]