---

Step * 1 of Lemma MP+truncated-KS-imply-truncated-LEM


1. ∀P:ℕ ⟶ ℙ. ((∀n:ℕ. Dec(P[n])) ⇒ (¬(∀n:ℕ. (¬P[n]))) ⇒ (∃n:ℕ. P[n]))
2. ∀A:ℙ. ⇃(∃a:ℕ ⟶ ℕ. (A ⇐⇒ ∃n:ℕ. ((a n) = 1 ∈ ℤ)))
3. P : ℙ
⊢ ⇃(P ∨ (¬P))
BY
{ ((InstHyp [⌜⇃(P ∨ (¬P))⌝] (-2)⋅ THENA Auto)
   THEN MoveToConcl (-1)
   THEN (BLemma `implies-quotient-true2` THENA Auto)
   THEN (D 0 THENA Auto)
   THEN ExRepD
   THEN (InstLemma `not-not-excluded-middle-quot-true` [⌜P⌝]⋅ THENA Auto)) }

1
1. ∀P:ℕ ⟶ ℙ. ((∀n:ℕ. Dec(P[n])) ⇒ (¬(∀n:ℕ. (¬P[n]))) ⇒ (∃n:ℕ. P[n]))
2. ∀A:ℙ. ⇃(∃a:ℕ ⟶ ℕ. (A ⇐⇒ ∃n:ℕ. ((a n) = 1 ∈ ℤ)))
3. P : ℙ
4. a : ℕ ⟶ ℕ
5. ⇃(P ∨ (¬P)) ⇐⇒ ∃n:ℕ. ((a n) = 1 ∈ ℤ)
6. ¬¬⇃(P ∨ (¬P))
⊢ ⇃(P ∨ (¬P))

---

Latex:

---

Latex:

1.  \mforall{}P:\mBbbN{}  {}\mrightarrow{}  \mBbbP{}.  ((\mforall{}n:\mBbbN{}.  Dec(P[n]))  {}\mRightarrow{}  (\mneg{}(\mforall{}n:\mBbbN{}.  (\mneg{}P[n])))  {}\mRightarrow{}  (\mexists{}n:\mBbbN{}.  P[n]))
2.  \mforall{}A:\mBbbP{}.  \00D9(\mexists{}a:\mBbbN{}  {}\mrightarrow{}  \mBbbN{}.  (A  \mLeftarrow{}{}\mRightarrow{}  \mexists{}n:\mBbbN{}.  ((a  n)  =  1)))
3.  P  :  \mBbbP{}
\mvdash{}  \00D9(P  \mvee{}  (\mneg{}P))


By

---

Latex:
((InstHyp  [\mkleeneopen{}\00D9(P  \mvee{}  (\mneg{}P))\mkleeneclose{}]  (-2)\mcdot{}  THENA  Auto)
  THEN  MoveToConcl  (-1)
  THEN  (BLemma  `implies-quotient-true2`  THENA  Auto)
  THEN  (D  0  THENA  Auto)
  THEN  ExRepD
  THEN  (InstLemma  `not-not-excluded-middle-quot-true`  [\mkleeneopen{}P\mkleeneclose{}]\mcdot{}  THENA  Auto))

---

Home Index