| ∀ n, a. nextl(n, a) ≠ [] ⊦ ∃ lf. lf(0) = a ' ∧ (∀ m. m < n → lf(m + 1) = nextl(m, lf(m).last) ∧ lf(m) ≠ []) |
∀ n, a. nextl(n, a) ≠ [] ⊦ ∃ lf. lf(0) = a ' ∧ (∀ m. m < 0 → lf(m + 1) = nextl(m, lf(m).last) ∧ lf(m) ≠ [])
∀ nextl, a. (∀ n, a. nextl(n, a) ≠ []) → (∃ lf. lf(0) = a ' ∧ (∀ m. m < n0 → lf(m + 1) = nextl(m, lf(m).last) ∧ lf(m) ≠ [])), ∀ n, a. nextl(n, a) ≠ [] ⊦ ∃ lf. lf(0) = a ' ∧ (∀ m. m < n0 +1 → lf(m + 1) = nextl(m, lf(m).last) ∧ lf(m) ≠ [])
Used simplifier rules: nat freely generated by 0, +1;;