| # ints1 = # ints2, n < # ints2, ∀ n. ¬ # ints2 < n → (i0 ' + ints1)[n] = (i0 ' + ints2)[n] ⊦ ints1[n] = ints2[n], Σ ints1 = Σ ints2, ints2 = [] |
Used simplifier rules: s: ⊦ m < n + 1 ↔ ¬ n < m; from specification nat-basic2%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic2%c: ⊦ m + n = n + m; from specification nat-basic2%get-succ: ⊦ (i ' + ints)[n + 1] = ints[n]; from specification list-del[intlista]%a: ⊦ (ints + ints0) + ints1 = ints + ints0 + ints1; from specification list[intlista] Used terms: n + 1