---

Step * 1 1 1 of Lemma poset-functor-extends-box-faces-1

.....antecedent..... 
1. G : Groupoid
2. I : Cname List
3. J : nameset(I) List
4. x : nameset(I)
5. i : ℕ2
6. bx : open_box(cubical-nerve(cat(G));I;J;x;i)
7. ¬↑null(J)
8. (∀j'∈J.j' = hd(J) ∈ Cname)
9. i1 : ℕ||bx||
10. ∀f:name-morph(I-[dimension(bx[i1])];[]). (((dimension(bx[i1]):=direction(bx[i1])) o f) ∈ name-morph(I;[]))
11. f : name-morph(I-[dimension(bx[i1])];[])
12. ((dimension(bx[i1]):=direction(bx[i1])) o f) ∈ name-morph(I;[])
⊢ direction(bx[i1]) = (((dimension(bx[i1]):=direction(bx[i1])) o f) dimension(bx[i1])) ∈ ℕ2
BY
{ TACTIC:(RepUR ``name-comp face-map`` 0
          THEN (Subst' (dimension(bx[i1]) =z dimension(bx[i1])) ~ tt 0 THENA Auto)
          THEN RepUR ``uext`` 0
          THEN Subst' isname(direction(bx[i1])) ~ ff 0
          THEN Reduce 0
          THEN Auto
          THEN (GenConclTerm ⌜direction(bx[i1])⌝⋅ THEN Auto)
          THEN IntSegCases (-2)
          THEN RepUR ``isname`` 0
          THEN Auto) }

---

Latex:

---

Latex:
.....antecedent..... 
1.  G  :  Groupoid
2.  I  :  Cname  List
3.  J  :  nameset(I)  List
4.  x  :  nameset(I)
5.  i  :  \mBbbN{}2
6.  bx  :  open\_box(cubical-nerve(cat(G));I;J;x;i)
7.  \mneg{}\muparrow{}null(J)
8.  (\mforall{}j'\mmember{}J.j'  =  hd(J))
9.  i1  :  \mBbbN{}||bx||
10.  \mforall{}f:name-morph(I-[dimension(bx[i1])];[])
            (((dimension(bx[i1]):=direction(bx[i1]))  o  f)  \mmember{}  name-morph(I;[]))
11.  f  :  name-morph(I-[dimension(bx[i1])];[])
12.  ((dimension(bx[i1]):=direction(bx[i1]))  o  f)  \mmember{}  name-morph(I;[])
\mvdash{}  direction(bx[i1])  =  (((dimension(bx[i1]):=direction(bx[i1]))  o  f)  dimension(bx[i1]))


By

---

Latex:
TACTIC:(RepUR  ``name-comp  face-map``  0
                THEN  (Subst'  (dimension(bx[i1])  =\msubz{}  dimension(bx[i1]))  \msim{}  tt  0  THENA  Auto)
                THEN  RepUR  ``uext``  0
                THEN  Subst'  isname(direction(bx[i1]))  \msim{}  ff  0
                THEN  Reduce  0
                THEN  Auto
                THEN  (GenConclTerm  \mkleeneopen{}direction(bx[i1])\mkleeneclose{}\mcdot{}  THEN  Auto)
                THEN  IntSegCases  (-2)
                THEN  RepUR  ``isname``  0
                THEN  Auto)

---

Home Index