| by ' + bytes0 ≠ [], okbytearray(r1, st), ∀ r1, st, str, r, i. okbytearray(r1, st) → (cyclic(str, r, putByteArray(bytes0, r1, i, st)) ↔ cyclic(str, r, st)) ⊦ cyclic(str, r, putByteArray((by ' + bytes0) .rest, r1, i + 1, st)[r1 -- i ', byteval((by ' + bytes0) .first)]) ↔ cyclic(str, r, st) |
okbytearray(r1, st), ∀ r1, st, str, r, i. okbytearray(r1, st) → (cyclic(str, r, putByteArray(bytes0, r1, i, st)) ↔ cyclic(str, r, st)) ⊦ cyclic(str, r, putByteArray(bytes0, r1, i + 1, st)[r1 -- i ', byteval(by)]) ↔ cyclic(str, r, st)
[[CONCRETESIMPRULES : ([CSIMPNAMEDSEQ : list, bytelist, e-01, ⊦ by ' + bytes ≠ []], [CSIMPNAMEDSEQ : list, bytelist, c-08, ⊦ (by ' + bytes) .first = by], [CSIMPNAMEDSEQ : list, bytelist, a, ⊦ (bytes + bytes0) + bytes1 = bytes + bytes0 + bytes1], [CSIMPNAMEDSEQ : list, bytelist, c-07, ⊦ (by ' + bytes) .rest = bytes])]]