| ∀ st, r, sk. st[r -- (sks0 + sk ')] = st[st[r -- sks0] .refval -- sk] ⊦ st[st[r -- sk0] .refval -- (sks0 + sk ')] = st[st[r -- (sk0 ' + sks0)] .refval -- sk], sks0 = [] |
⊦ sks ≠ [] → st[r -- (sk ' + sks)] = st[st[r -- sk] .refval -- sks]
sks0 ≠ [], ∀ st, r, sk. st[r -- (sks0 + sk ')] = st[st[r -- sks0] .refval -- sk] ⊦ st[st[r -- sk0] .refval -- (sks0 + sk ')] = st[st[st[r -- sk0] .refval -- sks0] .refval -- sk], sks0 = []
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (sks0, sk0, r, st)]]