---

Step * of Lemma product_functionality_wrt_equipollent_right

∀[A,B,C:Type].  (A ~ B ⇒ C × A ~ C × B)
BY
{ ((Unfold `equipollent` 0 THEN Auto) THEN ExRepD) }

1
1. [A] : Type
2. [B] : Type
3. [C] : Type
4. f : A ⟶ B@i
5. Bij(A;B;f)@i
⊢ ∃f:(C × A) ⟶ (C × B). Bij(C × A;C × B;f)

---

Latex:

---

Latex:
\mforall{}[A,B,C:Type].    (A  \msim{}  B  {}\mRightarrow{}  C  \mtimes{}  A  \msim{}  C  \mtimes{}  B)


By

---

Latex:
((Unfold  `equipollent`  0  THEN  Auto)  THEN  ExRepD)

---

Home Index