| st[r -- _type] = typeval(mkclasstype(class0)), maxpath(str, r, st) = 1, st[r -- mkfs(class, ty, fieldvar) '] = refval(r0), r ∈ st, is_obj(str, r, st), mkfs(class, ty, fieldvar) ' ∈ instfields(class0), validrefs(str, r ', mkclasstype(class0), st), 1 ≤ maxpath(str, r0, st), ∀ sk. sk ∈ instfields(class0) → goodfieldandtype(r, sk, st), r -- _type ∈ st ⊦ maxpath(str, r0, st) = 0, # validrefset(str, r, st) = 0, validrefset(str, r, st) = ∅, r = jvmref, is_reftype(ty), cyclic(str, r, st), junkref(str, r, st) |
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ goodfieldandtype (r, mkfs(class1, ty, fieldvar) ', st) ↔ r -- mkfs(class1, ty, fieldvar) ' ∈ st ∧ okval (st[ r -- mkfs (class1, ty, fieldvar) '], ty)], [CSIMPSEQ : ⊦ okval(refval(r), ty) ↔ ty = void_type ∨ is_reftype(ty)], [CSIMPSEQ : ⊦ ¬ mkfs (class0, void_type, fieldvar) ' ∈ instfields(class)])], [EXTRATERMS : (mkfs(class, ty, fieldvar) ')]]