| fis .keys = instfields(class), 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)), class+∃(str, class), newref(r, st), validFields(r, fis, addobj(r, class, fis, st)), is_obj(str, r, addobj(r, class, fis, st)), unique_al(fis) ⊦ r = jvmref, r0 ' + refs0 = jvmref ', is_abstract(class), is_reftype(ty0) |
⊦ is_obj(str, r, st) ↔ class+∃(str, st[r -- _type] .type .class) ∧ ¬ is_abstract(st[r -- _type] .type .class) ∧ is_obj(r, st)
fis .keys = instfields(class), 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)), class+∃(str, class), newref(r, st), validFields(r, fis, addobj(r, class, fis, st)), class+∃(str, (addobj(r, class, fis, st)[r -- _type]) .type .class) ∧ ¬ is_abstract((addobj(r, class, fis, st)[r -- _type]) .type .class) ∧ is_obj(r, addobj(r, class, fis, st)), unique_al(fis) ⊦ r = jvmref, r0 ' + refs0 = jvmref ', is_abstract(class), is_reftype(ty0)
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (addobj(r, class, fis, st), r, str)]]