Step
*
of Lemma
arrow_prod_lemma
∀y,x,B,A:Top.  (cat-arrow(A × B) x y ~ cat-arrow(A) (fst(x)) (fst(y)) × (cat-arrow(B) (snd(x)) (snd(y))))
BY
{ ((UnivCD THENA Auto) THEN RepUR ``cat-arrow product-cat`` 0 THEN Auto) }
Latex:
Latex:
\mforall{}y,x,B,A:Top.
    (cat-arrow(A  \mtimes{}  B)  x  y  \msim{}  cat-arrow(A)  (fst(x))  (fst(y))  \mtimes{}  (cat-arrow(B)  (snd(x))  (snd(y))))
By
Latex:
((UnivCD  THENA  Auto)  THEN  RepUR  ``cat-arrow  product-cat``  0  THEN  Auto)
Home
Index