| okarray(refval(r), byte_type, (addbytearray(r, ints, st)[r -- _length]) .intval, addbytearray(r, ints, st)) ⊦ (addbytearray(r, ints, st)[r -- _length]) .intval = n→i(# ints), r = jvmref |
⊦ addbytearray(r, ints, st) = addarray(r, byte_type, mkjavavalues(is2bs(ints)), st)
⊦ (addarray(r, ty, vals, st)[r -- _length]) = intval(n→i(# vals))
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ # mkjavavalues(bytes) = # bytes], [CSIMPSEQ : ⊦ # is2bs(ints) = # ints], [CSIMPSEQ : ⊦ intval(i) .intval = i], [CSIMPSEQ : ⊦ n→i(m) = n→i(n) ↔ m = n])], [EXTRATERMS : (st, ints, r)]]