| fis .keys = instfields(class), unique_al(fis), validrefs(str, r0 ' + refs0, ty, st), mkfs(class0, ty0, fieldvar) ' ∈ instfields(class), mkfs(class0, ty0, fieldvar) ' × refval(r0) ∈ fis, validref(str, r, mkclasstype(class), addobj(r, class, fis, st)), newref(r, st), validFields(r, fis, addobj(r, class, fis, st)), class+∃(str, class), is_obj(r, class, addobj(r, class, fis, st)) ⊦ r0 ' + refs0 = jvmref ', r = jvmref, is_reftype(ty0), is_abstract(class) |
⊦ is_obj(r, class, st) ↔ r ≠ jvmref ∧ (r -- _type) × typeval(mkclasstype(class)) ∈ st ∧ goodfieldsandtypes(r, instfields(class), st)
fis .keys = instfields(class), unique_al(fis), validrefs(str, r0 ' + refs0, ty, st), mkfs(class0, ty0, fieldvar) ' ∈ instfields(class), mkfs(class0, ty0, fieldvar) ' × refval(r0) ∈ fis, validref(str, r, mkclasstype(class), addobj(r, class, fis, st)), newref(r, st), validFields(r, fis, addobj(r, class, fis, st)), class+∃(str, class), r ≠ jvmref ∧ (r -- _type) × typeval(mkclasstype(class)) ∈ addobj(r, class, fis, st) ∧ goodfieldsandtypes(r, instfields(class), addobj(r, class, fis, st)) ⊦ r0 ' + refs0 = jvmref ', r = jvmref, is_reftype(ty0), is_abstract(class)
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (addobj(r, class, fis, st), class, r)]]