| a ' + mklist(a, n) = z1 + b ' + z, mklist(a, n + 1) = z1 + a0 ' + z0, a ∈ z1 ∨ a = b ∨ a ∈ z ⊦ z1 = [], a0 = b, mklist(a, n + 1) = a ' + mklist(a, n) |
mklist(a, n + 1) = z1 + a0 ' + z0, a ' + mklist(a, n) = z1 + b ' + z, a ∈ z1 ⊦ mklist(a, n + 1) = a ' + mklist(a, n), a0 = b, z1 = []
Used simplifier rules: a: ⊦ (x + y) + z = x + y + z; from specification list%inapp-02: ⊦ ¬ a ∈ y → (y + c ' + z = a ' + z0 ↔ y = [] ∧ c = a ∧ z = z0); from specification list