| ⊦ putByteArray(bytes + by ', r, i, st) = (putByteArray(bytes, r, i, st)[r -- (i + n→i(# bytes)) ', byteval(by)]) |
⊦ putByteArray([] + by ', r, i, st) = (putByteArray([], r, i, st)[r -- (i + n→i(# [])) ', byteval(by)])
∀ by, r, i, st. putByteArray(bytes0 + by ', r, i, st) = (putByteArray(bytes0, r, i, st)[r -- (i + n→i(# bytes0)) ', byteval(by)]) ⊦ putByteArray((by0 + bytes0) + by ', r, i, st) = (putByteArray(by0 + bytes0, r, i, st)[r -- (i + n→i(# (by0 + bytes0))) ', byteval(by)])
[[CONCRETESIMPRULES : ([CSIMPGEN : bytelist generated by [], +;])]]