| st ⊆ addobj(r, class, fis, st) ∧ ¬ junkref(str, r0, st), fis[sk] = refval(r0), st[r0 -- sks] = refval(r1), fis .keys = instfields(class), st[r0 -- sks0] = refval(r1), sk ∈ instfields(class), validfieldinits(str, fis, st), newref(r, st), fits(r0, sks0, st), fits(r0, sks, st), sk ∈ fis ⊦ r0 = jvmref, r = jvmref, r1 = jvmref, sks = [], sks0 = [], sks0 = sks, junkref(str, r, addobj(r, class, fis, st)), dups(fis .vals .nonnullrefs), fits(r0, sks, st) ∧ fits(r0, sks0, addobj(r, class, fis, st)) ∧ (addobj(r, class, fis, st)[r -- (sk ' + sks)]) .refval ≠ jvmref ∧ (addobj(r, class, fis, st)[r -- (sk ' + sks)]) = (addobj(r, class, fis, st)[r -- (sk ' + sks0)]) |
fis[sk] = refval(r0), st[r0 -- sks] = refval(r1), fis .keys = instfields(class), st[r0 -- sks0] = refval(r1), sk ∈ instfields(class), validfieldinits(str, fis, st), newref(r, st), fits(r0, sks0, st), fits(r0, sks, st), sk ∈ fis ⊦ r0 = jvmref, r = jvmref, r1 = jvmref, sks = [], sks0 = [], sks0 = sks, junkref(str, r, addobj(r, class, fis, st)), dups(fis .vals .nonnullrefs), junkref(str, r0, st), fits(r0, sks0, addobj(r, class, fis, st)) ∧ (addobj(r, class, fis, st)[r -- (sk ' + sks)]) .refval ≠ jvmref ∧ (addobj(r, class, fis, st)[r -- (sk ' + sks)]) = (addobj(r, class, fis, st)[r -- (sk ' + sks0)])
[[CONCRETESIMPRULES : ([CSIMPNAMEDSEQ : store, javastore, sub-ref, ⊦ st ⊆ st], [CSIMPNAMEDSEQ : addfuns, , stsubset-addobj, ⊦ newref(r, st) → ( st ⊆ addobj (r, class1, fis, st0) ↔ st ⊆ st0)])]]