| a ' + x0 ≠ [] ∧ m ≠ 0, m ≤ # x0, ∀ m. m < # x0 → x0 = [] ∨ x0[m] ∈ x0 ⊦ (a ' + x0).rest[m - 1] = a, (a ' + x0).rest[m - 1] ∈ x0 |
m ≤ # x0, ∀ m. m < # x0 → x0 = [] ∨ x0[m] ∈ x0 ⊦ m = 0, x0[m - 1] = a, x0[m - 1] ∈ x0
Used simplifier rules: e-01: ⊦ a ' + x ≠ []; from specification list%a: ⊦ (x + y) + z = x + y + z; from specification list%c-07: ⊦ (a ' + x).rest = x; from specification list