| st1[r -- _type] .type ≤ ty, is_valid_ref(str, r, st1), junkrefs(str, r ' + refs0, ty, st), unchanged(str0, r, st, st1), level⊆(str, str0), ∀ str0, st, st1, str, ty. unchanged(str0, refs0 .first, st, st1) ∧ junkrefs(str, refs0, ty, st) ∧ level⊆(str, str0) → junkrefs(str, refs0, ty, st1) ⊦ r = jvmref, is_valid_ref(str0, r, st1), junkrefs(str, r ' + refs0, ty, st1), is_valid_ref(str0, r, st) |
⊦ level⊆(str, str0) ∧ is_valid_ref(str, r, st) → is_valid_ref(str0, r, st)
[[CONCRETESIMPRULES : ([CSIMPNAMEDSEQ : list, references, a, ⊦ (refs + refs0) + refs1 = refs + refs0 + refs1])], [EXTRATERMS : (str, str0, r, st1)]]