---

Step * 1 1 1 of Lemma get_face-dimension


1. X : CubicalSet
2. I : Cname List
3. J : Cname List
4. x : nameset(I)
5. i : ℕ2
6. box : open_box(X;I;J;x;i)
7. y : nameset(J)
8. c : ℕ2
9. x1 : nameset(I)
10. v2 : ℕ2
11. v3 : X(I-[x1])
12. [%2] : (<x1, v2, v3> ∈ box) ∧ (face-name(<x1, v2, v3>) = <y, c> ∈ (nameset(I) × ℕ2))
13. get_face(y;c;box) = <x1, v2, v3> ∈ {f:I-face(X;I)| (f ∈ box) ∧ (face-name(f) = <y, c> ∈ (nameset(I) × ℕ2))} 
14. <x1, v2> = <y, c> ∈ (nameset(I) × ℕ2)
⊢ x1 ~ y
BY
{ TACTIC:(EqHD (-1) THEN All Reduce  THEN Auto) }

---

Latex:

---

Latex:

1.  X  :  CubicalSet
2.  I  :  Cname  List
3.  J  :  Cname  List
4.  x  :  nameset(I)
5.  i  :  \mBbbN{}2
6.  box  :  open\_box(X;I;J;x;i)
7.  y  :  nameset(J)
8.  c  :  \mBbbN{}2
9.  x1  :  nameset(I)
10.  v2  :  \mBbbN{}2
11.  v3  :  X(I-[x1])
12.  [\%2]  :  (<x1,  v2,  v3>  \mmember{}  box)  \mwedge{}  (face-name(<x1,  v2,  v3>)  =  <y,  c>)
13.  get\_face(y;c;box)  =  <x1,  v2,  v3>
14.  <x1,  v2>  =  <y,  c>
\mvdash{}  x1  \msim{}  y


By

---

Latex:
TACTIC:(EqHD  (-1)  THEN  All  Reduce    THEN  Auto)

---

Home Index