| ∀ m. # x0 = m + 1 → x0[m] = x0.last ∨ x0 = [] ⊦ (a ' + x0)[# x0] = (a ' + x0).last |
∀ m. # x0 = m + 1 → x0[m] = x0.last ∨ x0 = [] ⊦ x0 = [], (a ' + x0)[# x0] = (a ' + x0).last
Used simplifier rules: one-03: ⊦ a '[0] = a;%app: ⊦ x + [] = x; from specification list%a: ⊦ (x + y) + z = x + y + z; from specification list%size-01: ⊦ # [] = 0; from specification list-data%l: ⊦ a '.last = a; from specification list-last Used formulas: x0 = []