Step * 1 of Lemma equipollent-product-assoc


1. [A] Type
2. [B] Type
3. [C] Type
⊢ Bij(A × B × C;A × B × C;λx.let a,b,c in 
                             <<a, b>c>)
BY
(RepeatFor ((D THEN Reduce THEN Auto))
   THEN Try ((DVar `a1' THEN DVar `a4' THEN DVar `a2' THEN DVar `a8' THEN All Reduce THEN Auto))
   }

1
1. [A] Type
2. [B] Type
3. [C] Type
4. A × B × C@i
⊢ ∃a:A × B × C. (let a,b,c in <<a, b>c> b ∈ (A × B × C))


Latex:


Latex:

1.  [A]  :  Type
2.  [B]  :  Type
3.  [C]  :  Type
\mvdash{}  Bij(A  \mtimes{}  B  \mtimes{}  C;A  \mtimes{}  B  \mtimes{}  C;\mlambda{}x.let  a,b,c  =  x  in 
                                                          <<a,  b>,  c>)


By


Latex:
(RepeatFor  2  ((D  0  THEN  Reduce  0  THEN  Auto))
  THEN  Try  ((DVar  `a1'  THEN  DVar  `a4'  THEN  DVar  `a2'  THEN  DVar  `a8'  THEN  All  Reduce  THEN  Auto))
  )




Home Index