| ⊦ restn(# x, a ' + x) = (a ' + x).last ' |
⊦ x = [], restn(# x, a ' + x) = (a ' + x).last '
Used simplifier rules: restN-zero: ⊦ restn(0, x) = x;%size-01: ⊦ # [] = 0; from specification list-data%app: ⊦ x + [] = x; from specification list%a: ⊦ (x + y) + z = x + y + z; from specification list%l: ⊦ a '.last = a; from specification list-last%c-04: ⊦ a ' = b ' ↔ a = b; from specification list Used formulas: x = []