⊦ okbytearray(r, st) ↔ okarray(r, byte_type, st)
⊦ ¬ is_array(r, st) → ¬ okarray(r, ty, st)
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st, r)]]