| by ' + bytes0 ≠ [], okarray(refval(r), byte_type, st[r -- _length] .intval, st), ∀ r, st, i. okarray(refval(r), byte_type, st[r -- _length] .intval, st) → r = jvmref ∨ okarray(refval(r), byte_type, st[r -- _length] .intval, putByteArray(bytes0, r, i, st)) ⊦ r = jvmref, okarray(refval(r), byte_type, st[r -- _length] .intval, putByteArray((by ' + bytes0) .rest, r, i + 1, st)[r -- i ', byteval((by ' + bytes0) .first)]) |
okarray(refval(r), byte_type, st[r -- _length] .intval, st), ∀ r, st, i. okarray(refval(r), byte_type, st[r -- _length] .intval, st) → r = jvmref ∨ okarray(refval(r), byte_type, st[r -- _length] .intval, putByteArray(bytes0, r, i, st)) ⊦ r = jvmref, okarray(refval(r), byte_type, st[r -- _length] .intval, putByteArray(bytes0, r, i + 1, st)[r -- i ', byteval(by)])
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (by ' + bytes) .first = by], [CSIMPSEQ : ⊦ (by ' + bytes) .rest = bytes], [CSIMPSEQ : ⊦ (bytes + bytes0) + bytes1 = bytes + bytes0 + bytes1], [CSIMPSEQ : ⊦ by ' + bytes ≠ []])]]