| st[r0 -- _type] .type = mkclasstype(class), st[r -- _type] .type ≤ ty, validrefs(str, r ' + acc, ty, st), ∀ st, r0, str, ty, fs, val. is_classtype(st[r0 -- _type] .type) ∧ validrefs(str, acc, ty, st) → fs ' = _type ∨ acc = [] ∨ junkref(str, acc .first, st) ∨ fs ' ∈ instfields(st[r0 -- _type] .type .class) ∨ dups(acc .butlast) ∨ validrefs(str, acc, ty, st[r0 -- fs ', val]), is_obj(str, r, st) ∨ is_array(str, r, st) ⊦ r = jvmref, fs ' = _type, validrefs(str, r ' + acc, ty, st[r0 -- fs ', val]), dups((r ' + acc) .butlast), fs ' ∈ instfields(class), junkref(str, r, st), junkref(str, r, st[r0 -- fs ', val]) |
⊦ r ≠ jvmref ∧ ¬ is_valid_ref(str, r, st) → junkref(str, r, st)
¬ (r ≠ jvmref ∧ ¬ is_valid_ref(str, r, st[r0 -- fs ', val])), st[r0 -- _type] .type = mkclasstype(class), st[r -- _type] .type ≤ ty, validrefs(str, r ' + acc, ty, st), ∀ st, r0, str, ty, fs, val. is_classtype(st[r0 -- _type] .type) ∧ validrefs(str, acc, ty, st) → fs ' = _type ∨ acc = [] ∨ junkref(str, acc .first, st) ∨ fs ' ∈ instfields(st[r0 -- _type] .type .class) ∨ dups(acc .butlast) ∨ validrefs(str, acc, ty, st[r0 -- fs ', val]), is_obj(str, r, st) ∨ is_array(str, r, st) ⊦ r = jvmref, fs ' = _type, validrefs(str, r ' + acc, ty, st[r0 -- fs ', val]), dups((r ' + acc) .butlast), fs ' ∈ instfields(class), junkref(str, r, st), junkref(str, r, st[r0 -- fs ', val])
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st[r0 -- fs ', val], r, str)]]