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