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