| (addarray(r, ty, mkjavavalues(refs), st)[refs[i→n(i0)] -- sks]) = refval(r0), (addarray(r, ty, mkjavavalues(refs), st)[refs[i→n(i)] -- sks1]) = refval(r0), is_referencevalue(addarray(r, ty, mkjavavalues(refs), st)[r -- (i ' ' + sks1)]), is_referencevalue(addarray(r, ty, mkjavavalues(refs), st)[r -- (i0 ' ' + sks)]), i→n(i) < # refs, 0 ≤ i0, fits(refs[i→n(i0)], sks, addarray(r, ty, mkjavavalues(refs), st)), fits(refs[i→n(i)], sks1, addarray(r, ty, mkjavavalues(refs), st)), disjoint(str, refs, st), newref(r, st), 0 ≤ i, i→n(i0) < # refs, i0 < n→i(# refs), i < n→i(# refs), junkref(str, refs[i→n(i0)], st) ⊦ i0 ' ' + sks = i ' ' + sks1, r = jvmref, refs = [], r0 = jvmref, dups(refs), hasSharing(refs, st), refval(refs[i→n(i0)]) ∈ 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(i0)]))]]