| ¬ ¬ (∃ sks2, sks1. sks0 = sks2 + (i ' + sks1) ∧ st[r -- sks2] .refval = r3 ∧ (∀ sks3. sks3 + i ' ⊑ sks2 → st[r -- sks3] .refval ≠ r3)), (st[r3 -- i ', refval(r4)][r -- sks0]) = refval(r1), st[r3 -- _type] .type = mkarraytype(ty), (st[r3 -- i ', refval(r4)][r4 -- sks3]) = refval(r1), st[r -- sks1] = refval(r3), is_referencevalue(st[r3 -- i ', refval(r4)][r3 -- (i ' ' + sks3)]), fits(r, sks0, st), validref(str, r4, ty, st), disjoint(str, r ' + r4 ', st), fits(r, sks1, st), fits(r4, sks3, st[r3 -- i ', refval(r4)]), i < st[r3 -- _length] .intval, 0 ≤ i, 0 < st[r3 -- _length] .intval, r4 = jvmref → is_reftype(ty) ⊦ sks1 = [], sks0 = sks1 + i ' ' + sks3, sks0 = [], r1 = jvmref, r = r4, r3 = jvmref, hasSharing(r, st), hasSharing(r4, st), junkref(str, r, st), ∃ sks2. ¬ (sks2 + i ' ' ⊑ sks1 → st[r -- sks2] .refval ≠ r3), ∃ sks, sks2. sks1 = sks + i ' ' + sks2 ∧ st[r -- sks] .refval = r3 ∧ (∀ sks4. sks4 + i ' ' ⊑ sks → st[r -- sks4] .refval ≠ st[r -- sks] .refval), ∃ sks, sks2. sks0 = sks + i ' ' + sks2 ∧ st[r -- sks] .refval = r3 ∧ (∀ sks4. sks4 + i ' ' ⊑ sks → st[r -- sks4] .refval ≠ st[r -- sks] .refval) |
st[st[r -- sks2] .refval -- _type] .type = mkarraytype(ty), (st[st[r -- sks2] .refval -- i ', refval(r4)][r4 -- sks3]) = refval(r1), st[r -- sks1] = refval(st[r -- sks2] .refval), (st[st[r -- sks2] .refval -- i ', refval(r4)][r -- (sks2 + i ' ' + sks)]) = refval(r1), validref(str, r4, ty, st), disjoint(str, r ' + r4 ', st), fits(r, sks1, st), fits(r4, sks3, st[st[r -- sks2] .refval -- i ', refval(r4)]), i < st[st[r -- sks2] .refval -- _length] .intval, 0 ≤ i, is_referencevalue(st[st[r -- sks2] .refval -- i ', refval(r4)][st[r -- sks2] .refval -- (i ' ' + sks3)]), fits(r, sks2 + i ' ' + sks, st), 0 < st[st[r -- sks2] .refval -- _length] .intval, r4 = jvmref → is_reftype(ty), ∀ sks0. sks0 + i ' ' ⊑ sks2 → st[r -- sks0] .refval ≠ st[r -- sks2] .refval ⊦ r1 = jvmref, r = r4, st[r -- sks2] .refval = jvmref, sks1 = [], sks2 + i ' ' + sks = sks1 + i ' ' + sks3, hasSharing(r, st), hasSharing(r4, st), junkref(str, r, st), ∃ sks. ¬ (sks + i ' ' ⊑ sks1 → st[r -- sks] .refval ≠ st[r -- sks2] .refval), ∃ sks, sks0. sks1 = sks + i ' ' + sks0 ∧ st[r -- sks] .refval = st[r -- sks2] .refval ∧ (∀ sks4. sks4 + i ' ' ⊑ sks → st[r -- sks4] .refval ≠ st[r -- sks] .refval), ∃ sks0, sks5. sks2 + i ' ' + sks = sks0 + i ' ' + sks5 ∧ st[r -- sks0] .refval = st[r -- sks2] .refval ∧ (∀ sks4. sks4 + i ' ' ⊑ sks0 → st[r -- sks4] .refval ≠ st[r -- sks0] .refval)
[[CONCRETESIMPRULES : ([CSIMPNAMEDFORWARD : int-abs, , forward-le-05, ⊦ i < j ∧ 0 ≤ i → 0 < j], [CSIMPNAMEDSEQ : list, storekeys, Last, ⊦ sks + sk = sks + sk '], [CSIMPNAMEDSEQ : list, storekeys, e-03, ⊦ sks + sk ' + sks0 ≠ []], [CSIMPNAMEDSEQ : list, storekeys, a, ⊦ (sks + sks0) + sks1 = sks + sks0 + sks1], [CSIMPNAMEDSEQ : list, storekeys, c, ⊦ sk + sks = sk ' + sks])]]