| by ' + bytes ≠ [], 0 ≤ j ⊦ putByteArray(bytes, r, j + 1, st[r -- j ', byteval(by)]) = (putByteArray((by ' + bytes) .rest, r, j + 1, st)[r -- j ', byteval((by ' + bytes) .first)]) |
0 ≤ j ⊦ putByteArray(bytes, r, j + 1, st[r -- j ', byteval(by)]) = (putByteArray(bytes, r, j + 1, st)[r -- j ', byteval(by)])
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ by ' + bytes ≠ []], [CSIMPSEQ : ⊦ (by ' + bytes) .first = by], [CSIMPSEQ : ⊦ (bytes + bytes0) + bytes1 = bytes + bytes0 + bytes1], [CSIMPSEQ : ⊦ (by ' + bytes) .rest = bytes])]]