| ⊦ (st[r -- (sk ' + sk0 '), val][st[r -- sk] .refval -- (sk0 ' + sk1 ')]) = (st[r -- (sk ' + sk0 '), val][val .refval -- sk1 ']) |
⊦ st[r -- sk '] = st[r -- sk]
⊦ (st[r -- (sk ' + sk0 '), val][st[r -- sk] .refval -- (sk0 ' + sk1 ')]) = (st[r -- (sk ' + sk0 '), val][val .refval -- sk1])
[[CONCRETESIMPRULES : ()]]