| 0 ≤ i, i + n→i(# vals) ≤ n→i(# vals0) ⊦ r -- i0 ' ∈ addarray(r, ty, vals0, st) ∨ i ≤ i0 ∧ i0 < i + n→i(# vals) ↔ r -- i0 ' ∈ st ∨ ¬ i0 < 0 ∧ ¬ i + n→i(# vals) + n→i(# restn(i→n(i) + # vals, vals0)) ≤ i0 |
n ≤ # vals ⊦ # restn(n, vals) = # vals - n
¬ i→n(i) + # vals ≤ # vals0, 0 ≤ i, i + n→i(# vals) ≤ n→i(# vals0) ⊦ r -- i0 ' ∈ addarray(r, ty, vals0, st) ∨ i ≤ i0 ∧ i0 < i + n→i(# vals) ↔ r -- i0 ' ∈ st ∨ ¬ i0 < 0 ∧ ¬ i + n→i(# vals) + n→i(# restn(i→n(i) + # vals, vals0)) ≤ i0
i→n(i) + # vals ≤ # vals0, 0 ≤ i, i + n→i(# vals) ≤ n→i(# vals0) ⊦ r -- i0 ' ∈ addarray(r, ty, vals0, st) ∨ i ≤ i0 ∧ i0 < i + n→i(# vals) ↔ r -- i0 ' ∈ st ∨ ¬ i0 < 0 ∧ ¬ i + n→i(# vals) + n→i(# vals0 - i→n(i) + # vals) ≤ i0
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (vals0, i→n(i) + # vals)]]