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