| (addobj(r, class, fis, st)[r -- mkfs(class0, ty, fieldvar) ']) = refval(r1), fis .keys = instfields(class), validfieldinits(fis, st), is_obj(str, r, addobj(r, class, fis, st)), newref(r, st), mkfs(class0, ty, fieldvar) ' ∈ instfields(class), validrefs(str, r1 ' + refs, ty, addobj(r, class, fis, st)), ∀ fs, r0. fs ' × refval(r0) ∈ fis → ¬ junkref(str, r0, st) ∧ ¬ cyclic(str, r0, st) ⊦ r = jvmref, ¬ mkfs(class0, ty, fieldvar) ' ∈ fis ∧ mkfs(class0, ty, fieldvar) ' ≠ _type, ∃ fs. fs ' ∈ fis ∧ fs ' ∈ instfields(class) ∧ fis[fs '] = refval(r), r ≠ r1 ∧ ¬ r ∈ refs ∧ ¬ r1 ∈ refs ∧ ¬ dups(refs) |
(addobj(r, class, fis, st)[r -- mkfs(class0, ty, fieldvar) ']) = refval(r1), fis .keys = instfields(class), validfieldinits(fis, st), is_obj(str, r, addobj(r, class, fis, st)), newref(r, st), mkfs(class0, ty, fieldvar) ' ∈ instfields(class), validrefs(str, r1 ' + refs, ty, addobj(r, class, fis, st)), ∀ fs, r0. fs ' × refval(r0) ∈ fis → ¬ junkref(str, r0, st) ∧ ¬ cyclic(str, r0, st) ⊦ ¬ mkfs(class0, ty, fieldvar) ' ∈ fis, r = jvmref, ∃ fs. fs ' ∈ fis ∧ fs ' ∈ instfields(class) ∧ fis[fs '] = refval(r), r ≠ r1 ∧ ¬ r ∈ refs ∧ ¬ r1 ∈ refs ∧ ¬ dups(refs)
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ _type = mkfs(class1, ty, fieldvar) ' → class1 = `java.lang.Object' .class ∧ ty = void_type ∧ fieldvar = `type' .field], [CSIMPSEQ : ⊦ fis .keys = instfields(class) → ¬ _type ∈ fis], [CSIMPSEQ : ¬ _type ∈ fis ⊦ (addobj(r, class1, fis, st) [r -- _type ] ) = typeval(mkclasstype(class1))], [CSIMPSEQ : ⊦ refval(r) ≠ typeval(ty)])]]