| lfgen(0)(0) = a ', ∀ n. lfgen(n)(0) = a ' ∧ (∀ m. m < n → lfgen(n)(m + 1) = nextl(m, lfgen(n)(m).last) ∧ lfgen(n)(m) ≠ []), ∀ n, a. nextl(n, a) ≠ [] ⊦ ∀ m, n1, n2. m ≤ n1 ∧ n1 ≤ n2 → lfgen(n1)(m) = lfgen(n2)(m), lfgen(n + 1)(n + 1) = nextl(n, lfgen(n)(n).last) ∧ lfgen(n)(n) ≠ [] |
lfgen(0)(0) = a ', m ≤ n1, n1 ≤ n0, m ≤ n0, ∀ n. lfgen(n)(0) = a ' ∧ (∀ m. m < n → lfgen(n)(m + 1) = nextl(m, lfgen(n)(m).last) ∧ lfgen(n)(m) ≠ []), ∀ n, a. nextl(n, a) ≠ [] ⊦ lfgen(n1)(m) = lfgen(n0)(m), lfgen(n + 1)(n + 1) = nextl(n, lfgen(n)(n).last) ∧ lfgen(n)(n) ≠ []
Used simplifier rules: let: ⊦ n ≤ n0 ∧ n0 ≤ n1 → n ≤ n1; (forward) from specification nat