| ⊦ restn(m, mklist(a, m) + mklist(a, n)) = mklist(a, n) |
⊦ n ≤ # x → restn(n, x + y) = restn(n, x) + y
Used simplifier rules: rest-mklist-04: ⊦ restn(m, mklist(a, m)) = [];%Nil: ⊦ [] + x = x; from specification list%a: ⊦ (x + y) + z = x + y + z; from specification list%mk-inj-01: ⊦ mklist(a, m) = mklist(a, n) ↔ m = n; from specification list-last%mk-len: ⊦ # mklist(a, n) = n; from specification list-last%lels-01: ⊦ ¬ m ≤ n ↔ n < m; from specification nat%ref-1: ⊦ ¬ n < n; from specification nat-basic1 Used terms: mklist(a, n), mklist(a, m), m