---

Step * 2 of Lemma equipollent-one-iff


1. [A] : Type
2. ∃z:A. ∀x:A. (x = z ∈ A)
⊢ A ~ ℕ1
BY
{ ((With ⌜λx.0⌝ (D 0)⋅ THEN Auto) THEN RepeatFor 2 (D 0) THEN Reduce 0 THEN Auto) }

1
1. A : Type
2. ∃z:A. ∀x:A. (x = z ∈ A)
3. a1 : A
4. a2 : A
5. 0 = 0 ∈ ℕ1
⊢ a1 = a2 ∈ A

---

Latex:

---

Latex:

1.  [A]  :  Type
2.  \mexists{}z:A.  \mforall{}x:A.  (x  =  z)
\mvdash{}  A  \msim{}  \mBbbN{}1


By

---

Latex:
((With  \mkleeneopen{}\mlambda{}x.0\mkleeneclose{}  (D  0)\mcdot{}  THEN  Auto)  THEN  RepeatFor  2  (D  0)  THEN  Reduce  0  THEN  Auto)

---

Home Index