| okarray(refval(r), byte_type, st[r -- _length] .intval, putByteArray(bytes0, r, i + 1, st)), okarray(refval(r), byte_type, st[r -- _length] .intval, st) ⊦ r = jvmref, okarray(r, byte_type, putByteArray(bytes0, r, i + 1, st)[r -- i ', byteval(by)]) |
⊦ ¬ okarray(val .refval, ty, st) → ¬ okarray(val, ty, i, st)
⊦ okarray(r, byte_type, st) → okarray(r, byte_type, st[r0 -- i ', byteval(by)])
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ refval(r) .refval = r], [CSIMPSEQ : ⊦ i + j = j + i])], [EXTRATERMS : (putByteArray(bytes0, r, i + 1, st), st[r -- _length] .intval, byte_type, refval(r))]]