---

Step * 1 1 2 of Lemma equipollent-singleton-domain2


1. [S] : Type
2. u : S
3. ∀a':S. (a' = u ∈ S)
4. [A] : Type
5. b : S ⟶ A
⊢ ∃a:A. ((λx.a) = b ∈ (S ⟶ A))
BY
{ ((D 0 With ⌜b u⌝  THEN Auto) THEN FunExt THEN Reduce 0 THEN Auto) }

---

Latex:

---

Latex:

1.  [S]  :  Type
2.  u  :  S
3.  \mforall{}a':S.  (a'  =  u)
4.  [A]  :  Type
5.  b  :  S  {}\mrightarrow{}  A
\mvdash{}  \mexists{}a:A.  ((\mlambda{}x.a)  =  b)


By

---

Latex:
((D  0  With  \mkleeneopen{}b  u\mkleeneclose{}    THEN  Auto)  THEN  FunExt  THEN  Reduce  0  THEN  Auto)

---

Home Index