| ∀ a, n0, nextl, nextj. ∃ lf, jj. lf(0) = a ' ∧ jj(0) = n0 ∧ (∀ n. n ≤ m0 → lf(n + 1) = nextl(jj(n), lf(n).last) ∧ jj(n + 1) = nextj(jj(n), lf(n).last)) ⊦ ∃ lf, jj. lf(0) = a ' ∧ jj(0) = n0 ∧ (∀ n. n ≤ m0 +1 → lf(n + 1) = nextl(jj(n), lf(n).last) ∧ jj(n + 1) = nextj(jj(n), lf(n).last)) |
∀ a, n0, nextl, nextj. ∃ lf, jj. lf(0) = a ' ∧ jj(0) = n0 ∧ (∀ n. n ≤ m0 → lf(n + 1) = nextl(jj(n), lf(n).last) ∧ jj(n + 1) = nextj(jj(n), lf(n).last)) ⊦ ∃ lf, jj. lf(0) = a ' ∧ jj(0) = n0 ∧ (∀ n. n ≤ m0 + 1 → lf(n + 1) = nextl(jj(n), lf(n).last) ∧ jj(n + 1) = nextj(jj(n), lf(n).last))
Used simplifier rules: succ: ⊦ m +1 = m + 1; from specification nat-basic2