| st[r2 -- sks] = refval(r), (st[r -- i ', refval(r2)][r2 -- (sks + i ' ' + sks0)]) = refval(r1), st[r -- _type] .type = mkarraytype(ty), (st[r -- i ', refval(r2)][r2 -- sks3]) = refval(r1), validref(str, r2, ty, st), disjoint(str, r ' + r2 ', st), fits(r2, sks3, st[r -- i ', refval(r2)]), 0 ≤ i, i < st[r -- _length] .intval, fits((st[r -- i ', refval(r2)][r2 -- sks]) .refval, i ' ' + sks0, st[r -- i ', refval(r2)]), fits(r2, sks, st[r -- i ', refval(r2)]), is_referencevalue(st[r -- i ', refval(r2)][r -- (i ' ' + sks + i ' ' + sks0)]), 0 < st[r -- _length] .intval ⊦ sks + i ' ' + sks0 = sks3, sks3 = [], r2 = jvmref, r1 = jvmref, r = r2, r = jvmref, hasSharing(r, st), hasSharing(r2, st), junkref(str, r, st), ∃ sks2. ¬ (sks2 + i ' ' ⊑ sks → st[r2 -- sks2] .refval ≠ r) |
⊦ fits(jvmref, sks, st) ↔ sks = []
(st[r -- i ', refval(r2)][r2 -- sks]) = refval(r0) ∧ is_referencevalue(st[r -- i ', refval(r2)][r2 -- sks]), st[r2 -- sks] = refval(r), (st[r -- i ', refval(r2)][r2 -- (sks + i ' ' + sks0)]) = refval(r1), st[r -- _type] .type = mkarraytype(ty), (st[r -- i ', refval(r2)][r2 -- sks3]) = refval(r1), validref(str, r2, ty, st), disjoint(str, r ' + r2 ', st), fits(r2, sks3, st[r -- i ', refval(r2)]), 0 ≤ i, i < st[r -- _length] .intval, fits(r0, i ' ' + sks0, st[r -- i ', refval(r2)]), fits(r2, sks, st[r -- i ', refval(r2)]), is_referencevalue(st[r -- i ', refval(r2)][r -- (i ' ' + sks + i ' ' + sks0)]), 0 < st[r -- _length] .intval ⊦ sks + i ' ' + sks0 = sks3, sks3 = [], r2 = jvmref, r1 = jvmref, r = r2, r = jvmref, hasSharing(r, st), hasSharing(r2, st), junkref(str, r, st), ∃ sks2. ¬ (sks2 + i ' ' ⊑ sks → st[r2 -- sks2] .refval ≠ r)
[[CONCRETESIMPRULES : ([CSIMPNAMEDSEQ : valuefuns, , refval-xtra, ⊦ ¬ is_referencevalue(val) → val .refval = jvmref], [CSIMPNAMEDSEQ : list, storekeys, app-02-ant, ⊦ ¬ sks + sks0 ≠ [] ↔ sks = [] ∧ sks0 = []], [CSIMPNAMEDSEQ : list, storekeys, e, ⊦ sk ' ≠ []], [CSIMPNAMEDSEQ : list, storekeys, a, ⊦ (sks + sks0) + sks1 = sks + sks0 + sks1], [CSIMPELIM : is_referencevalue(val) ⊦ r = val .refval ↔ val = refval(r)])], [EXTRATERMS : (st[r -- i ', refval(r2)][r2 -- sks], r0)]]