| r -- sk = r1 -- fs ', is_bytevalue(st[r1 -- fs ']), fits(r, sk ', st) ⊦ (st[r1 -- fs ', byteval(by)][r -- sk]) = st[r -- sk], junkref(str, r, st) |
fits(r1, fs ' ', st), is_bytevalue(st[r1 -- fs ']) ⊦ byteval(by) = st[r1 -- fs '], junkref(str, r1, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (st[rk, val][rk]) = val], [CSIMPSEQ : ⊦ r -- sk = r0 -- sk0 ↔ r = r0 ∧ sk = sk0])]]