| okbytearray(r2, st), ∀ r2, st, str, r, r1, i. okbytearray(r2, st) → (path∃(str, r, r1, putByteArray(bytes0, r2, i, st)) ↔ path∃(str, r, r1, st)) ⊦ path∃(str, r, r1, putByteArray(bytes0, r2, i + 1, st)[r2 -- i ', byteval(by)]) ↔ path∃(str, r, r1, st), okbytearray(r2, putByteArray(bytes0, r2, i + 1, st)) |
⊦ okbytearray(r, st) → okbytearray(r, putByteArray(bytes, r1, i, st))
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st, i + 1, r2, bytes0, r2)]]