---

Step * of Lemma p-first-singleton

∀[A,B:Type]. ∀[f:A ⟶ (B + Top)].  (p-first([f]) = f ∈ (A ⟶ (B + Top)))
BY
{ (Auto THEN Ext THEN Auto THEN Unfold `p-first` 0 THEN Reduce 0 THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[A,B:Type].  \mforall{}[f:A  {}\mrightarrow{}  (B  +  Top)].    (p-first([f])  =  f)


By

---

Latex:
(Auto  THEN  Ext  THEN  Auto  THEN  Unfold  `p-first`  0  THEN  Reduce  0  THEN  Auto)

---

Home Index