---

Step * of Lemma unit-cube-map-id

∀I:Cname List. (unit-cube-map(1) = 1(unit-cube(I)) ∈ unit-cube(I) ⟶ unit-cube(I))
BY
{ ((Auto THEN InstLemma `cubical-set-is-functor` [])
   THEN RepUR ``cube-set-map`` 0
   THEN Symmetry
   THEN BLemma `nat-trans-equal`
   THEN Try (Fold `cube-set-map` 0)
   THEN Auto) }

1
1. I : Cname List
2. CubicalSet ≡ Functor(NameCat;TypeCat)
⊢ 1(unit-cube(I))
= unit-cube-map(1)
∈ (A:cat-ob(NameCat) ⟶ (cat-arrow(TypeCat) (ob(unit-cube(I)) A) (ob(unit-cube(I)) A)))

---

Latex:

---

Latex:
\mforall{}I:Cname  List.  (unit-cube-map(1)  =  1(unit-cube(I)))


By

---

Latex:
((Auto  THEN  InstLemma  `cubical-set-is-functor`  [])
  THEN  RepUR  ``cube-set-map``  0
  THEN  Symmetry
  THEN  BLemma  `nat-trans-equal`
  THEN  Try  (Fold  `cube-set-map`  0)
  THEN  Auto)

---

Home Index