⊦ mklist(a, 2) = a ' + a '
Used simplifier rules: mk-zero: ⊦ mklist(a, 0) = [];% ⊦ x + [] = x; (s)%a: ⊦ (x + y) + z = x + y + z; from specification list% ⊦ [] + x = x; (s)