---

Step * 1 1 1 1 of Lemma functor-is-isomorphism


1. A : SmallCategory
2. B : SmallCategory
3. f : Functor(A;B)@i
4. g : Functor(B;A)@i
5. functor-comp(f;g) = 1 ∈ Functor(A;A)
6. functor-comp(g;f) = 1 ∈ Functor(B;B)
7. ∀a:cat-ob(A). ((g (f a)) = a ∈ cat-ob(A))
8. ∀b:cat-ob(B). ((f (g b)) = b ∈ cat-ob(B))
9. a1 : cat-ob(A)@i
10. a2 : cat-ob(A)@i
11. (f a1) = (f a2) ∈ cat-ob(B)
⊢ a1 = a2 ∈ cat-ob(A)
BY
{ ((ApFunToHypEquands `Z' ⌜g Z⌝ ⌜cat-ob(A)⌝ (-1)⋅ THENA Auto) THEN NthHypEq (-1) THEN EqCDA THEN Auto) }

---

Latex:

---

Latex:

1.  A  :  SmallCategory
2.  B  :  SmallCategory
3.  f  :  Functor(A;B)@i
4.  g  :  Functor(B;A)@i
5.  functor-comp(f;g)  =  1
6.  functor-comp(g;f)  =  1
7.  \mforall{}a:cat-ob(A).  ((g  (f  a))  =  a)
8.  \mforall{}b:cat-ob(B).  ((f  (g  b))  =  b)
9.  a1  :  cat-ob(A)@i
10.  a2  :  cat-ob(A)@i
11.  (f  a1)  =  (f  a2)
\mvdash{}  a1  =  a2


By

---

Latex:
((ApFunToHypEquands  `Z'  \mkleeneopen{}g  Z\mkleeneclose{}  \mkleeneopen{}cat-ob(A)\mkleeneclose{}  (-1)\mcdot{}  THENA  Auto)  THEN  NthHypEq  (-1)  THEN  EqCDA  THEN  Auto)

---

Home Index