| ⊦ fs ' = _length, fs ' = _type, okarray(r, byte_type, st[r0 -- fs ', val]) ↔ okarray(r, byte_type, st) |
⊦ r ≠ r1 → (okarray(r, ty, st[r1 -- sk, val]) ↔ okarray(r, ty, st))
¬ r ≠ r0 ⊦ fs ' = _length, fs ' = _type, okarray(r, byte_type, st[r0 -- fs ', val]) ↔ okarray(r, byte_type, st)
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (val, fs ', r0, st, byte_type, r)]]