⊦ r1 -- sk0 = r -- sk, r = r0, (st[r -- sk, val] -- r0)[r1 -- sk0] = (st -- r0)[r1 -- sk0]
[[CONCRETESIMPRULES : ([CSIMPGEN : refkey generated by --;])]]