Step
*
1
of Lemma
product_functionality_wrt_equipollent_right
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)
BY
{ (InstConcl [⌜λp.let x,y = p in <x, f y>⌝]⋅ THEN Auto) }
1
1. [A] : Type
2. [B] : Type
3. [C] : Type
4. f : A ⟶ B@i
5. Bij(A;B;f)@i
⊢ Bij(C × A;C × B;λp.let x,y = p 
                     in <x, f y>)
Latex:
Latex:
1.  [A]  :  Type
2.  [B]  :  Type
3.  [C]  :  Type
4.  f  :  A  {}\mrightarrow{}  B@i
5.  Bij(A;B;f)@i
\mvdash{}  \mexists{}f:(C  \mtimes{}  A)  {}\mrightarrow{}  (C  \mtimes{}  B).  Bij(C  \mtimes{}  A;C  \mtimes{}  B;f)
By
Latex:
(InstConcl  [\mkleeneopen{}\mlambda{}p.let  x,y  =  p  in  <x,  f  y>\mkleeneclose{}]\mcdot{}  THEN  Auto)
Home
Index