| m < n, m < # x, n ≤ # x ⊦ (x to n)[m] = x[m], x = [] |
m < #(a + x0), m < n, n ≤ #(a + x0), ∀ m, n. m < n ∧ m < # x0 ∧ n ≤ # x0 → (x0 to n)[m] = x0[m] ∨ x0 = [] ⊦ a + x0 = [], (a + x0 to n)[m] = (a + x0)[m]
Used simplifier rules: list freely generated by [], +;;