| okbytearray(r, st), is_array(str, r0, putByteArray(bytes, r, i, st)), st[r0 -- _type] .type ≤ ty, refs0 = [] ∨ 0 ≤ i0 ∧ i0 < st[r0 -- _length] .intval ∧ is_referencevalue(st[r0 -- i0 ']) ∧ refs0 .first = st[r0 -- i0 '] .refval ∧ validrefs(str, refs0, st[r0 -- _type] .type .type, putByteArray(bytes, r, i, st)), ∀ i, bytes, ty, r0, str, st, r, refs. # refs < # refs0 → (okbytearray(r, st) ∧ validrefs(str, r0 ' + refs, ty, putByteArray(bytes, r, i, st)) → junkref(str, r0, st) ∨ validrefs(str, r0 ' + refs, ty, st)) ⊦ r0 = r, r0 = jvmref, validrefs(str, r0 ' + refs0, ty, st), junkref(str, r0, st), is_array(str, r0, st) |
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ¬ is_array(str, r, st) ∧ okbytearray(r1, st) → ¬ is_array (str, r, putByteArray(bytes, r1, i, st))], [CSIMPELIM : is_referencevalue(val) ⊦ r = val .refval ↔ val = refval(r)])], [EXTRATERMS : (st[r0 -- i0 '], r1)]]