| validrefs(str, r ' + refs1, st[r -- _type] .type, st) ⊦ validrefs(str, r ' + refs1, mkclasstype(`java.lang.Object' .class), st), st[r -- _type] .type ≤ mkclasstype(`java.lang.Object' .class) |
⊦ r ≠ jvmref ∧ (¬ is_valid_ref(str, r, st) ∨ ¬ st[r -- _type] .type ≤ ty) → ¬ validrefs(str, r ' + refs, ty, st)
⊦ validrefs(str, jvmref ' + refs, ty, st) ↔ refs = []
⊦ ¬ is_valid_ref(str, r, st) → (validrefs(str, r ' + refs, ty, st) ↔ r = jvmref ∧ refs = [])
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (refs + refs0) + refs1 = refs + refs0 + refs1], [CSIMPSEQ : ⊦ ty ≤ ty], [CSIMPSEQ : ⊦ is_valid_ref(str, r, st) ∧ r ≠ jvmref → st[r -- _type] .type ≤ mkclasstype (`java.lang.Object' .class)])], [EXTRATERMS : (st, st[r -- _type] .type, refs1, r, str)]]