| okbytearray(r, st), is_obj(str, r0, putByteArray(bytes, r, i, st)), st[r0 -- _type] .type ≤ ty, ∀ i, bytes, ty, r0, str, st, r, refs. # refs < # [] → (okbytearray(r, st) ∧ validrefs(str, r0 ' + refs, ty, putByteArray(bytes, r, i, st)) → junkref(str, r0, st) ∨ validrefs(str, r0 ' + refs, ty, st)) ⊦ r0 = jvmref, junkref(str, r0, st), validrefs(str, r0 ', ty, st) |
⊦ validrefs(str, r ', ty, st) ↔ r = jvmref ∨ r ≠ jvmref ∧ is_valid_ref(str, r, st) ∧ st[r -- _type] .type ≤ ty
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ¬ is_valid_ref(str, r, st) ∧ r ≠ jvmref → junkref(str, r, st)])], [EXTRATERMS : (st, ty, r0, str)]]