| ⊦ n ≠ 0 → mklist(a, n) = mklist(a, n -1) + a ' |
⊦ n = 0, mklist(a, n) = a ' + mklist(a, n - 1)
Used simplifier rules: mk-last: ⊦ mklist(a, n) + a ' = a ' + mklist(a, n);%a: ⊦ (x + y) + z = x + y + z; from specification list%pred-03: ⊦ n -1 = n - 1; from specification nat