| sks0 = sk + sks, (addarray(r, ty, mkjavavalues(refs), st)[r -- (i ' ' + sks1)]) = refval(r0), (addarray(r, ty, mkjavavalues(refs), st)[r -- sks0]) = refval(r0), (addarray(r, ty, mkjavavalues(refs), st)[r -- i ']) = refval(r1), 0 ≤ i, newref(r, st), validreflist(str, mkjavavalues(refs), ty, st), disjoint(str, refs, st), fits(r1, sks1, addarray(r, ty, mkjavavalues(refs), st)), is_referencevalue(addarray(r, ty, mkjavavalues(refs), st)[r -- sk]), fits((addarray(r, ty, mkjavavalues(refs), st)[r -- sk]) .refval, sks, addarray(r, ty, mkjavavalues(refs), st)), i < n→i(# refs), is_indexkey(sk), sk .index < n→i(# refs), 0 ≤ sk .index ⊦ sks0 = i ' ' + sks1, r0 = jvmref, refs = [], r = jvmref, sks0 = [], hasSharing(refs, st), dups(refs) |
(addarray(r, ty, mkjavavalues(refs), st)[r -- i ']) = refval(r1), (addarray(r, ty, mkjavavalues(refs), st)[r -- (i ' ' + sks1)]) = refval(r0), (addarray(r, ty, mkjavavalues(refs), st)[r -- (sk ' + sks)]) = refval(r0), 0 ≤ i, newref(r, st), validreflist(str, mkjavavalues(refs), ty, st), disjoint(str, refs, st), fits(r1, sks1, addarray(r, ty, mkjavavalues(refs), st)), is_referencevalue(addarray(r, ty, mkjavavalues(refs), st)[r -- sk]), fits((addarray(r, ty, mkjavavalues(refs), st)[r -- sk]) .refval, sks, addarray(r, ty, mkjavavalues(refs), st)), i < n→i(# refs), is_indexkey(sk), sk .index < n→i(# refs), 0 ≤ sk .index ⊦ r0 = jvmref, refs = [], r = jvmref, sk ' + sks = i ' ' + sks1, hasSharing(refs, st), dups(refs)
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ i ≤ j ∧ 0 ≤ i → 0 ≤ j], [CSIMPSEQ : ⊦ (sks + sks0) + sks1 = sks + sks0 + sks1], [CSIMPSEQ : ⊦ sk ' + sks ≠ []], [CSIMPSEQ : ⊦ sk + sks = sk ' + sks])]]