| 0 < i, ∀ st, val, r, r0, i0. i→n(i0) < i→n(i) → (0 < i0 → (newref(r0, addarray(r, val, i0, st)) ↔ r ≠ r0 ∧ newref(r0, st))) ⊦ newref(r0, addarray(r, val, i, st)) ↔ r ≠ r0 ∧ newref(r0, st) |
⊦ i > 0 → addarray(r, val, i, st) = (addarray(r, val, i - 1, st)[r -- (i - 1) ', val])
i > 0, 0 < i, ∀ st, val, r, r0, i0. i→n(i0) < i→n(i) → (0 < i0 → (newref(r0, addarray(r, val, i0, st)) ↔ r ≠ r0 ∧ newref(r0, st))) ⊦ newref(r0, addarray(r, val, i - 1, st)[r -- (i - 1) ', val]) ↔ r ≠ r0 ∧ newref(r0, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ i > j ↔ j < i], [CSIMPSEQ : ⊦ ¬ i < j ↔ j ≤ i], [CSIMPSEQ : ⊦ i < j → (¬ ¬ j ≤ i ↔ false)])], [EXTRATERMS : (st, i, val, r)]]