| okbytearray(r, st), ∀ r, st, i. okbytearray(r, st) → okbytearray(r, putByteArray(bytes0, r, i, st)) ⊦ okbytearray(r, putByteArray(bytes0, r, i + 1, st)[r -- i ', byteval(by)]) |
⊦ okbytearray(r, st) ↔ okarray(r, byte_type, st)
okbytearray(r, st), ∀ r, st, i. okbytearray(r, st) → okbytearray(r, putByteArray(bytes0, r, i, st)) ⊦ okarray(r, byte_type, putByteArray(bytes0, r, i + 1, st)[r -- i ', byteval(by)])
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (putByteArray(bytes0, r, i + 1, st) [r -- i ', byteval(by) ], r)]]