| 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)]) |
⊦ okarray(r, byte_type, st) → okarray(r, byte_type, st[r0 -- i ', byteval(by)])
¬ okarray(r, byte_type, putByteArray(bytes0, r, i + 1, 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 : (by, i, r, putByteArray(bytes0, r, i + 1, st), r)]]