| ¬ r ≠ r0, okbytearray(r, st), is_array(str, r0, st[r -- i ', byteval(by)]), st[r0 -- _type] .type ≤ ty, ∀ by, i, ty, str, st, r, refs1. # refs1 < # (r0 ' + []) → (okbytearray(r, st) ∧ validrefs(str, refs1, ty, st[r -- i ', byteval(by)]) → validrefs(str, refs1, ty, st)) ⊦ r0 = jvmref, is_obj(str, r0, st), is_array(str, r0, st) |
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ okbytearray(r, st) → is_array(str, r, st)], [CSIMPSEQ : ⊦ typeval(ty) .type = ty], [CSIMPSEQ : ⊦ okbytearray(r, st) → st[r -- _type] = typeval(mkarraytype(byte_type))])]]