| (r -- _type) .ref ≠ r0, st[r -- _type] .type ≤ ty, newref(r0, st), junkrefs(str, r ' + acc, ty, addarray(r0, ty0, vals, st)), is_obj(str, r, st), ∀ str, ty, r0, ty0, vals, st. junkrefs(str, acc, ty, addarray(r0, ty0, vals, st)) ∧ newref(r0, st) → r0 = jvmref ∨ junkrefs(str, acc, ty, st) ⊦ r0 = jvmref, r = jvmref, junkrefs(str, r ' + acc, ty, st), is_obj(str, r, addarray(r0, ty0, vals, st)) ∧ st[r -- _type] .type ≤ ty |
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ r ≠ r0 → ( is_obj (str, r, addarray(r0, ty0, vals, st)) ↔ is_obj(str, r, st))], [CSIMPSEQ : ⊦ (r -- sk) .ref = r])]]