| st[r1 -- sks] = refval(r2) ∧ is_referencevalue(st[r1 -- sks]), st[r -- mkfs(class, ty, fieldvar) '] = refval(r1), st[r1 -- sks0] = st[r1 -- sks], is_obj(str, r, st), fits(r1, sks0, st), fits(r1, sks, st), validrefs(str, r1 ' + refs1, st[r1 -- _type] .type, st), mkfs(class, ty, fieldvar) ' ∈ instfields(st[r -- _type] .type .class), validrefs(str, r1 ' + refs1, ty, st), ∀ st0, str, refs, r0. # (r0 ' + refs) < # (r ' + (r1 + refs1)) → (validrefs(str, r0 ' + refs, st0[r0 -- _type] .type, st0) → hasSharing(r0, st0) ∨ ¬ r0 ∈ refs ∧ ¬ dups(refs)) ⊦ r = jvmref, r2 = jvmref, sks = [], sks0 = [], sks0 = sks, r ∈ refs1, ∃ sks1, sks2. fits(r, sks1, st) ∧ fits(r, sks2, st) ∧ sks1 ≠ sks2 ∧ sks1 ≠ [] ∧ sks2 ≠ [] ∧ st[r -- sks1] .refval ≠ jvmref ∧ st[r -- sks1] = st[r -- sks2], ¬ r1 ∈ refs1 ∧ ¬ dups(refs1) |
st[r1 -- sks0] = refval(r2), st[r -- mkfs(class, ty, fieldvar) '] = refval(r1), st[r1 -- sks] = refval(r2), validrefs(str, r1 ' + refs1, ty, st), mkfs(class, ty, fieldvar) ' ∈ instfields(st[r -- _type] .type .class), validrefs(str, r1 ' + refs1, st[r1 -- _type] .type, st), fits(r1, sks, st), fits(r1, sks0, st), is_obj(str, r, st), ∀ st0, str, refs, r0. # (r0 ' + refs) < # (r ' + (r1 + refs1)) → (validrefs(str, r0 ' + refs, st0[r0 -- _type] .type, st0) → hasSharing(r0, st0) ∨ ¬ r0 ∈ refs ∧ ¬ dups(refs)) ⊦ sks0 = sks, sks0 = [], sks = [], r2 = jvmref, r = jvmref, r ∈ refs1, ¬ r1 ∈ refs1 ∧ ¬ dups(refs1), ∃ sks1, sks2. fits(r, sks1, st) ∧ fits(r, sks2, st) ∧ sks1 ≠ sks2 ∧ sks1 ≠ [] ∧ sks2 ≠ [] ∧ st[r -- sks1] .refval ≠ jvmref ∧ st[r -- sks1] = st[r -- sks2]
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ is_referencevalue(refval(r))])]]