---

Step * 3 2 of Lemma yoneda-embedding_wf

.....antecedent..... 
1. C : SmallCategory
2. X : cat-ob(C)@i
3. Y : cat-ob(C)@i
4. z : cat-ob(C)@i
5. f : cat-arrow(C) X Y@i
6. g : cat-arrow(C) Y z@i
⊢ ∀A,B:cat-ob(op-cat(C)). ∀g1:cat-arrow(op-cat(C)) A B.
    ((cat-comp(TypeCat) (rep-pre-sheaf(C;X) A) (rep-pre-sheaf(C;z) A) (rep-pre-sheaf(C;z) B) 
      (λg@0.(cat-comp(C) A X z g@0 (cat-comp(C) X Y z f g))) 
      (rep-pre-sheaf(C;z) A B g1))
    = (cat-comp(TypeCat) (rep-pre-sheaf(C;X) A) (rep-pre-sheaf(C;X) B) (rep-pre-sheaf(C;z) B) 
       (rep-pre-sheaf(C;X) A B g1) 
       (λg@0.(cat-comp(C) B X z g@0 (cat-comp(C) X Y z f g))))
    ∈ (cat-arrow(TypeCat) (rep-pre-sheaf(C;X) A) (rep-pre-sheaf(C;z) B)))
BY
{ ((Intros THEN (All (RWO "cat_ob_op_lemma op-cat-arrow") THENA Auto))
   THEN RepUR ``type-cat rep-pre-sheaf functor-ob functor-arrow`` 0
   THEN (FunExt THENA Auto)
   THEN RW CatNormC 0
   THEN Auto) }

---

Latex:

---

Latex:
.....antecedent..... 
1.  C  :  SmallCategory
2.  X  :  cat-ob(C)@i
3.  Y  :  cat-ob(C)@i
4.  z  :  cat-ob(C)@i
5.  f  :  cat-arrow(C)  X  Y@i
6.  g  :  cat-arrow(C)  Y  z@i
\mvdash{}  \mforall{}A,B:cat-ob(op-cat(C)).  \mforall{}g1:cat-arrow(op-cat(C))  A  B.
        ((cat-comp(TypeCat)  (rep-pre-sheaf(C;X)  A)  (rep-pre-sheaf(C;z)  A)  (rep-pre-sheaf(C;z)  B) 
            (\mlambda{}g@0.(cat-comp(C)  A  X  z  g@0  (cat-comp(C)  X  Y  z  f  g))) 
            (rep-pre-sheaf(C;z)  A  B  g1))
        =  (cat-comp(TypeCat)  (rep-pre-sheaf(C;X)  A)  (rep-pre-sheaf(C;X)  B)  (rep-pre-sheaf(C;z)  B) 
              (rep-pre-sheaf(C;X)  A  B  g1) 
              (\mlambda{}g@0.(cat-comp(C)  B  X  z  g@0  (cat-comp(C)  X  Y  z  f  g)))))


By

---

Latex:
((Intros  THEN  (All  (RWO  "cat\_ob\_op\_lemma  op-cat-arrow")  THENA  Auto))
  THEN  RepUR  ``type-cat  rep-pre-sheaf  functor-ob  functor-arrow``  0
  THEN  (FunExt  THENA  Auto)
  THEN  RW  CatNormC  0
  THEN  Auto)

---

Home Index