| okbytearray(r1, st) ⊦ okarray(r1, byte_type, st[r1 -- i ', byteval(by)]) |
⊦ okbytearray(r, st) ↔ okarray(r, byte_type, st)
⊦ okarray(r, byte_type, st) → okarray(r, byte_type, st[r0 -- i ', byteval(by)])
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st, r1)]]