| is_referencevalue(st[r -- fs0 ']), fs0 ' ∈ instfields(st[r -- _type] .type .class), st[r -- _type] .type ≤ ty, is_reftype(fs .type), is_obj(str, r, st), fs ' ∈ instfields(st[r -- _type] .type .class), validrefs(str, st[r -- fs0 '] .refval ' + refs, fs0 .type, st) ⊦ r = jvmref, _type = fs ', validrefs(str, r ' + jvmref ', ty, st[r -- fs ', refval(jvmref)]), is_obj(str, r, st[r -- fs ', refval(jvmref)]) |
fs = mkfs(class, ty0, fieldvar), is_referencevalue(st[r -- fs0 ']), fs0 ' ∈ instfields(st[r -- _type] .type .class), st[r -- _type] .type ≤ ty, is_reftype(ty0), is_obj(str, r, st), fs ' ∈ instfields(st[r -- _type] .type .class), validrefs(str, st[r -- fs0 '] .refval ' + refs, fs0 .type, st) ⊦ r = jvmref, _type = fs ', validrefs(str, r ' + jvmref ', ty, st[r -- fs ', refval(jvmref)]), is_obj(str, r, st[r -- fs ', refval(jvmref)])
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ class = fs .class ∧ ty = fs .type ∧ fieldvar = fs .field ↔ fs = mkfs(class, ty, fieldvar)])], [EXTRATERMS : (fs, class, ty0, fieldvar)]]