| ⊦ rk ≠ rk0 → (st[(rk × val) ' + rkvs][rk0]) = (st[rkvs][rk0]) |
⊦ st[(rk × val) ' + rkvs] = (st[rk, val][rkvs])
⊦ rk = rk0, (st[rk, val][rkvs][rk0]) = (st[rkvs][rk0])
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (rkvs + rkvs0) + rkvs1 = rkvs + rkvs0 + rkvs1])]]