| (a ' + x0)[m] = (a ' + x0)[n], m = 0, n ≤ # x0, m ≤ # x0, ∀ m0, n0. x0[m0] = x0[n0] ∧ m0 < # x0 ∧ n0 < # x0 → m0 = n0 ∨ x0 = [] ⊦ m = n, dups(x0), a ∈ x0 |
a = (a ' + x0)[n], n ≤ # x0, ∀ m0, n0. x0[m0] = x0[n0] ∧ m0 < # x0 ∧ n0 < # x0 → m0 = n0 ∨ x0 = [] ⊦ 0 = n, dups(x0), a ∈ x0
Used simplifier rules: get-zero-01: ⊦ (a ' + x)[0] = a;% ⊦ 0 ≤ m; (s)%a: ⊦ (x + y) + z = x + y + z; from specification list