| ∀ r1, st0, r2, sk1, val0. r1 = st0[r2 -- sks0] .refval ∨ (st0[r2 -- (sks0 + sk1 '), val0][r1 -- sk1]) = st0[r1 -- sk1] ⊦ sks0 = [], (st[st[r -- sk] .refval -- (sks0 + sk0 '), val][st[st[r -- sk] .refval -- sks0] .refval -- sk0]) = st[st[st[r -- sk] .refval -- sks0] .refval -- sk0], st[st[r -- sk] .refval -- sks0] .refval = st[r -- (sk ' + sks0)] .refval |
⊦ sks ≠ [] → st[r -- (sk ' + sks)] = st[st[r -- sk] .refval -- sks]
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (sks0, sk, r, st)]]