| ⊦ st[r -- _length] .intval = n→i(# bytes) → getbytearray(r, putByteArray(bytes, r, 0, st)) = bytes |
⊦ getbytearray(r, st) = getbytearray(r, 0, st[r -- _length] .intval, st)
⊦ (putByteArray(bytes, r, i, st)[r0 -- _length]) = st[r0 -- _length]
⊦ j = n→i(# bytes) → getbytearray(r, i, j, putByteArray(bytes, r, i, st)) = bytes
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (putByteArray(bytes, r, 0, st), r)]]