| ⊦ getbytearray(r, 0, 2, st[r -- _type, typeval(mkarraytype(byte_type))][r -- _length, intval(2)][r -- 0 ', byteval(by)][r -- 1 ', byteval(by0)]) = by ' + by0 ' |
⊦ 0 < j → getbytearray(r, i, j, st) = st[r -- i '] .byteval + getbytearray(r, i + 1, j - 1, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (st[rk0, val][rk]) = ((rk = rk0 ⊃ val; st[rk]))], [CSIMPSEQ : ⊦ r -- sk = r0 -- sk0 ↔ ¬ ¬ (r = r0 ∧ sk = sk0)], [CSIMPSEQ : ⊦ i ' = i0 ' ↔ i = i0], [CSIMPSEQ : ⊦ byteval(by) .byteval = by], [CSIMPSEQ : ⊦ getbytearray(r, i, 1, st) = st[r -- i '] .byteval '], [CSIMPSEQ : ⊦ by + bytes = by ' + bytes], [CSIMPSEQ : ⊦ bytes + bytes0 = bytes + bytes1 ↔ bytes0 = bytes1], [CSIMPSEQ : ⊦ (bytes + bytes0) + bytes1 = bytes + bytes0 + bytes1])], [EXTRATERMS : (st[r -- _type, typeval(mkarraytype(byte_type))] [r -- _length, intval(2) ] [r -- 0 ', byteval(by) ] [r -- 1 ', byteval(by0) ], 2, 0, r)]]