⊦ okbytearray(r, st) ↔ okarray(r, byte_type, st)
okarray(r, byte_type, st) ⊦ r -- _length ∈ st
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st, r)]]