| st[refs[i→n(i)] -- sks1] = refval(r0), st[refs[i→n(i)] -- sks] = refval(r0), i < n→i(# refs), refs[i→n(i)] -- sks1 ∈ st, newref(r, st), validreflist(str, mkjavavalues(refs), ty, st), disjoint(str, refs, st), fits(refs[i→n(i)], sks1, st), fits(refs[i→n(i)], sks, st), 0 ≤ i, i→n(i) < # refs, is_referencevalue(addarray(r, ty, mkjavavalues(refs), st)[r -- (i ' ' + sks)]), is_referencevalue(addarray(r, ty, mkjavavalues(refs), st)[r -- (i ' ' + sks1)]), st ⊆ addarray(r, ty, mkjavavalues(refs), st), refs[i→n(i)] -- sks ∈ st ⊦ r0 = jvmref, refs = [], r = jvmref, sks = sks1, dups(refs), junkref(str, refs[i→n(i)], st), hasSharing(refs[i→n(i)], st) |
⊦ hasSharing(r, st) ↔ (∃ sks1, sks2. fits(r, sks1, st) ∧ fits(r, sks2, st) ∧ sks1 ≠ sks2 ∧ st[r -- sks1] .refval ≠ jvmref ∧ st[r -- sks1] = st[r -- sks2])
st[refs[i→n(i)] -- sks1] = refval(r0), st[refs[i→n(i)] -- sks] = refval(r0), i < n→i(# refs), refs[i→n(i)] -- sks1 ∈ st, newref(r, st), validreflist(str, mkjavavalues(refs), ty, st), disjoint(str, refs, st), fits(refs[i→n(i)], sks1, st), fits(refs[i→n(i)], sks, st), 0 ≤ i, i→n(i) < # refs, is_referencevalue(addarray(r, ty, mkjavavalues(refs), st)[r -- (i ' ' + sks)]), is_referencevalue(addarray(r, ty, mkjavavalues(refs), st)[r -- (i ' ' + sks1)]), st ⊆ addarray(r, ty, mkjavavalues(refs), st), refs[i→n(i)] -- sks ∈ st ⊦ r0 = jvmref, refs = [], r = jvmref, sks = sks1, dups(refs), junkref(str, refs[i→n(i)], st), ∃ sks1, sks2. fits(refs[i→n(i)], sks1, st) ∧ fits(refs[i→n(i)], sks2, st) ∧ sks1 ≠ sks2 ∧ st[refs[i→n(i)] -- sks1] .refval ≠ jvmref ∧ st[refs[i→n(i)] -- sks1] = st[refs[i→n(i)] -- sks2]
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st, refs[i→n(i)])]]