---

Step * 2 1 of Lemma unary-almost-full-has-strict-inc


1. A : ℕ ⟶ ℙ
2. ∀s:StrictInc. ⇃(∃n:ℕ. A[s n])
3. ∀m:ℕ. ⇃(∃n:ℕ. (m < n ∧ A[n]))
4. ⇃(∃f:ℕ ⟶ ℕ. ∀n:ℕ. (n < f n ∧ A[f n]))
⊢ ⇃(∃s:StrictInc. ∀n:ℕ. A[s n])
BY
{ (MoveToConcl (-1) THEN (BLemma `implies-quotient-true` THENA Auto) THEN (D 0 THENA Auto)) }

1
1. A : ℕ ⟶ ℙ
2. ∀s:StrictInc. ⇃(∃n:ℕ. A[s n])
3. ∀m:ℕ. ⇃(∃n:ℕ. (m < n ∧ A[n]))
4. ∃f:ℕ ⟶ ℕ. ∀n:ℕ. (n < f n ∧ A[f n])
⊢ ∃s:StrictInc. ∀n:ℕ. A[s n]

---

Latex:

---

Latex:

1.  A  :  \mBbbN{}  {}\mrightarrow{}  \mBbbP{}
2.  \mforall{}s:StrictInc.  \00D9(\mexists{}n:\mBbbN{}.  A[s  n])
3.  \mforall{}m:\mBbbN{}.  \00D9(\mexists{}n:\mBbbN{}.  (m  <  n  \mwedge{}  A[n]))
4.  \00D9(\mexists{}f:\mBbbN{}  {}\mrightarrow{}  \mBbbN{}.  \mforall{}n:\mBbbN{}.  (n  <  f  n  \mwedge{}  A[f  n]))
\mvdash{}  \00D9(\mexists{}s:StrictInc.  \mforall{}n:\mBbbN{}.  A[s  n])


By

---

Latex:
(MoveToConcl  (-1)  THEN  (BLemma  `implies-quotient-true`  THENA  Auto)  THEN  (D  0  THENA  Auto))

---

Home Index