| is_obj(str, r, st), refs1 = [] ∨ mkfs(class, ty, fieldvar) ' ∈ instfields(st[r -- _type] .type .class) ∧ is_referencevalue(st[r -- mkfs(class, ty, fieldvar) ']) ∧ refs1 .first = st[r -- mkfs(class, ty, fieldvar) '] .refval ∧ validrefs(str, refs1, ty, st) ⊦ r = jvmref, validrefs(str, r ' + refs1, mkclasstype(`java.lang.Object' .class), st), st[r -- _type] .type ≤ mkclasstype(`java.lang.Object' .class), ¬ r ∈ refs1 ∧ ¬ dups(refs1) |
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ is_obj(str, r, st) → st[r -- _type] .type ≤ mkclasstype (`java.lang.Object' .class)], [CSIMPELIM : is_referencevalue(val) ⊦ r = val .refval ↔ val = refval(r)])], [EXTRATERMS : (st[r -- mkfs(class, ty, fieldvar) '], r0)]]