---

Step * 2 2 1 of Lemma Peirce-subtype-dneg-elim

.....subterm..... T:t
1:n
1. P : ℙ
2. x : ((P ⇒ Void) ⇒ P) ⇒ P
⊢ x ∈ (¬¬P) ⇒ P
BY
{ (Unfold `implies` 0 THEN FunExt THEN Auto) }

---

Latex:

---

Latex:
.....subterm.....  T:t
1:n
1.  P  :  \mBbbP{}
2.  x  :  ((P  {}\mRightarrow{}  Void)  {}\mRightarrow{}  P)  {}\mRightarrow{}  P
\mvdash{}  x  \mmember{}  (\mneg{}\mneg{}P)  {}\mRightarrow{}  P


By

---

Latex:
(Unfold  `implies`  0  THEN  FunExt  THEN  Auto)

---

Home Index