---

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


1. A : SmallCategory
2. B : SmallCategory
3. f : Functor(A;B)
4. g : Functor(B;A)
5. functor-comp(f;g) = 1 ∈ Functor(A;A)
6. functor-comp(g;f) = 1 ∈ Functor(B;B)
7. ∀a:cat-ob(A). ((ob(g) (ob(f) a)) = a ∈ cat-ob(A))
8. ∀b:cat-ob(B). ((ob(f) (ob(g) b)) = b ∈ cat-ob(B))
9. a1 : cat-ob(A)
10. a2 : cat-ob(A)
11. (ob(f) a1) = (ob(f) a2) ∈ cat-ob(B)
⊢ a1 = a2 ∈ cat-ob(A)
BY
{ ((ApFunToHypEquands `Z' ⌜ob(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)
4.  g  :  Functor(B;A)
5.  functor-comp(f;g)  =  1
6.  functor-comp(g;f)  =  1
7.  \mforall{}a:cat-ob(A).  ((ob(g)  (ob(f)  a))  =  a)
8.  \mforall{}b:cat-ob(B).  ((ob(f)  (ob(g)  b))  =  b)
9.  a1  :  cat-ob(A)
10.  a2  :  cat-ob(A)
11.  (ob(f)  a1)  =  (ob(f)  a2)
\mvdash{}  a1  =  a2


By

---

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

---

Home Index