⊦ 0 < n → mklist(a, n)[0] = a
∀ n, a. m0 < n → mklist(a, n)[m0] = a ⊦ m0 +1 < n → mklist(a, n)[m0 +1] = a
Used simplifier rules: nat freely generated by 0, +1;;