| st[r -- _type] = st1[r -- _type], junkrefs(str, r ' + refs0, ty, st1), unchanged(str, r, st, st1), is_valid_ref(str, r, st), st1[r -- _type] .type ≤ ty, unchangedNorec(r, st, st1), ∀ str, st, st1, ty. unchanged(str, refs0 .first, st, st1) ∧ ¬ junkrefs(str, refs0, ty, st) → ¬ junkrefs(str, refs0, ty, st1) ⊦ r = jvmref, junkrefs(str, r ' + refs0, ty, st) |
⊦ is_valid_ref(str, r, st) ↔ is_obj(str, r, st) ∨ is_array(str, r, st)
st[r -- _type] = st1[r -- _type], junkrefs(str, r ' + refs0, ty, st1), unchanged(str, r, st, st1), is_obj(str, r, st) ∨ is_array(str, r, st), st1[r -- _type] .type ≤ ty, unchangedNorec(r, st, st1), ∀ str, st, st1, ty. unchanged(str, refs0 .first, st, st1) ∧ ¬ junkrefs(str, refs0, ty, st) → ¬ junkrefs(str, refs0, ty, st1) ⊦ r = jvmref, junkrefs(str, r ' + refs0, ty, st)
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st, r, str)]]