Step * 1 2 of Lemma csm-cubical-sigma


1. CubicalSet
2. Delta CubicalSet
3. A1 I:(Cname List) ⟶ X(I) ⟶ Type
4. A2 I:(Cname List) ⟶ J:(Cname List) ⟶ f:name-morph(I;J) ⟶ a:X(I) ⟶ (A1 a) ⟶ (A1 f(a))
5. (∀I:Cname List. ∀a:X(I). ∀u:A1 a.  ((A2 u) u ∈ (A1 a)))
∧ (∀I,J,K:Cname List. ∀f:name-morph(I;J). ∀g:name-morph(J;K). ∀a:X(I). ∀u:A1 a.
     ((A2 (f g) u) (A2 f(a) (A2 u)) ∈ (A1 (f g)(a))))
6. I:(Cname List) ⟶ X.<A1, A2>(I) ⟶ Type
7. B1 I:(Cname List) ⟶ J:(Cname List) ⟶ f:name-morph(I;J) ⟶ a:X.<A1, A2>(I) ⟶ (A a) ⟶ (A f(a))
8. (∀I:Cname List. ∀a:X.<A1, A2>(I). ∀u:A a.  ((B1 u) u ∈ (A a)))
∧ (∀I,J,K:Cname List. ∀f:name-morph(I;J). ∀g:name-morph(J;K). ∀a:X.<A1, A2>(I). ∀u:A a.
     ((B1 (f g) u) (B1 f(a) (B1 u)) ∈ (A (f g)(a))))
9. A:cat-ob(NameCat) ⟶ (cat-arrow(TypeCat) (Delta A) (X A))
10. ∀A,B:cat-ob(NameCat). ∀g:cat-arrow(NameCat) B.
      ((cat-comp(TypeCat) (Delta A) (X A) (X B) (s A) (X g))
      (cat-comp(TypeCat) (Delta A) (Delta B) (X B) (Delta g) (s B))
      ∈ (cat-arrow(TypeCat) (Delta A) (X B)))
11. X ⊢ <A1, A2>
12. X.<A1, A2> ⊢ <A, B1>
13. s ∈ Delta ⟶ X
14. Cname List
15. Cname List
16. name-morph(I;J)
17. Delta(I)
18. A1 (s)a
19. x1 ((s)a;u)
⊢ <A2 (s)a u, B1 ((s)a;u) x1>
= <A2 (s)a u, B1 ((s p;q))(a;u) x1>
∈ (u:A1 (s)f(a) × (A ((s)f(a);u)))
BY
EqCD }

1
.....subterm..... T:t
1:n
1. CubicalSet
2. Delta CubicalSet
3. A1 I:(Cname List) ⟶ X(I) ⟶ Type
4. A2 I:(Cname List) ⟶ J:(Cname List) ⟶ f:name-morph(I;J) ⟶ a:X(I) ⟶ (A1 a) ⟶ (A1 f(a))
5. (∀I:Cname List. ∀a:X(I). ∀u:A1 a.  ((A2 u) u ∈ (A1 a)))
∧ (∀I,J,K:Cname List. ∀f:name-morph(I;J). ∀g:name-morph(J;K). ∀a:X(I). ∀u:A1 a.
     ((A2 (f g) u) (A2 f(a) (A2 u)) ∈ (A1 (f g)(a))))
6. I:(Cname List) ⟶ X.<A1, A2>(I) ⟶ Type
7. B1 I:(Cname List) ⟶ J:(Cname List) ⟶ f:name-morph(I;J) ⟶ a:X.<A1, A2>(I) ⟶ (A a) ⟶ (A f(a))
8. (∀I:Cname List. ∀a:X.<A1, A2>(I). ∀u:A a.  ((B1 u) u ∈ (A a)))
∧ (∀I,J,K:Cname List. ∀f:name-morph(I;J). ∀g:name-morph(J;K). ∀a:X.<A1, A2>(I). ∀u:A a.
     ((B1 (f g) u) (B1 f(a) (B1 u)) ∈ (A (f g)(a))))
9. A:cat-ob(NameCat) ⟶ (cat-arrow(TypeCat) (Delta A) (X A))
10. ∀A,B:cat-ob(NameCat). ∀g:cat-arrow(NameCat) B.
      ((cat-comp(TypeCat) (Delta A) (X A) (X B) (s A) (X g))
      (cat-comp(TypeCat) (Delta A) (Delta B) (X B) (Delta g) (s B))
      ∈ (cat-arrow(TypeCat) (Delta A) (X B)))
11. X ⊢ <A1, A2>
12. X.<A1, A2> ⊢ <A, B1>
13. s ∈ Delta ⟶ X
14. Cname List
15. Cname List
16. name-morph(I;J)
17. Delta(I)
18. A1 (s)a
19. x1 ((s)a;u)
⊢ (A2 (s)a u) (A2 (s)a u) ∈ (A1 (s)f(a))

2
.....subterm..... T:t
2:n
1. CubicalSet
2. Delta CubicalSet
3. A1 I:(Cname List) ⟶ X(I) ⟶ Type
4. A2 I:(Cname List) ⟶ J:(Cname List) ⟶ f:name-morph(I;J) ⟶ a:X(I) ⟶ (A1 a) ⟶ (A1 f(a))
5. (∀I:Cname List. ∀a:X(I). ∀u:A1 a.  ((A2 u) u ∈ (A1 a)))
∧ (∀I,J,K:Cname List. ∀f:name-morph(I;J). ∀g:name-morph(J;K). ∀a:X(I). ∀u:A1 a.
     ((A2 (f g) u) (A2 f(a) (A2 u)) ∈ (A1 (f g)(a))))
6. I:(Cname List) ⟶ X.<A1, A2>(I) ⟶ Type
7. B1 I:(Cname List) ⟶ J:(Cname List) ⟶ f:name-morph(I;J) ⟶ a:X.<A1, A2>(I) ⟶ (A a) ⟶ (A f(a))
8. (∀I:Cname List. ∀a:X.<A1, A2>(I). ∀u:A a.  ((B1 u) u ∈ (A a)))
∧ (∀I,J,K:Cname List. ∀f:name-morph(I;J). ∀g:name-morph(J;K). ∀a:X.<A1, A2>(I). ∀u:A a.
     ((B1 (f g) u) (B1 f(a) (B1 u)) ∈ (A (f g)(a))))
9. A:cat-ob(NameCat) ⟶ (cat-arrow(TypeCat) (Delta A) (X A))
10. ∀A,B:cat-ob(NameCat). ∀g:cat-arrow(NameCat) B.
      ((cat-comp(TypeCat) (Delta A) (X A) (X B) (s A) (X g))
      (cat-comp(TypeCat) (Delta A) (Delta B) (X B) (Delta g) (s B))
      ∈ (cat-arrow(TypeCat) (Delta A) (X B)))
11. X ⊢ <A1, A2>
12. X.<A1, A2> ⊢ <A, B1>
13. s ∈ Delta ⟶ X
14. Cname List
15. Cname List
16. name-morph(I;J)
17. Delta(I)
18. A1 (s)a
19. x1 ((s)a;u)
⊢ (B1 ((s)a;u) x1) (B1 ((s p;q))(a;u) x1) ∈ (A ((s)f(a);A2 (s)a u))

3
.....eq aux..... 
1. CubicalSet
2. Delta CubicalSet
3. A1 I:(Cname List) ⟶ X(I) ⟶ Type
4. A2 I:(Cname List) ⟶ J:(Cname List) ⟶ f:name-morph(I;J) ⟶ a:X(I) ⟶ (A1 a) ⟶ (A1 f(a))
5. (∀I:Cname List. ∀a:X(I). ∀u:A1 a.  ((A2 u) u ∈ (A1 a)))
∧ (∀I,J,K:Cname List. ∀f:name-morph(I;J). ∀g:name-morph(J;K). ∀a:X(I). ∀u:A1 a.
     ((A2 (f g) u) (A2 f(a) (A2 u)) ∈ (A1 (f g)(a))))
6. I:(Cname List) ⟶ X.<A1, A2>(I) ⟶ Type
7. B1 I:(Cname List) ⟶ J:(Cname List) ⟶ f:name-morph(I;J) ⟶ a:X.<A1, A2>(I) ⟶ (A a) ⟶ (A f(a))
8. (∀I:Cname List. ∀a:X.<A1, A2>(I). ∀u:A a.  ((B1 u) u ∈ (A a)))
∧ (∀I,J,K:Cname List. ∀f:name-morph(I;J). ∀g:name-morph(J;K). ∀a:X.<A1, A2>(I). ∀u:A a.
     ((B1 (f g) u) (B1 f(a) (B1 u)) ∈ (A (f g)(a))))
9. A:cat-ob(NameCat) ⟶ (cat-arrow(TypeCat) (Delta A) (X A))
10. ∀A,B:cat-ob(NameCat). ∀g:cat-arrow(NameCat) B.
      ((cat-comp(TypeCat) (Delta A) (X A) (X B) (s A) (X g))
      (cat-comp(TypeCat) (Delta A) (Delta B) (X B) (Delta g) (s B))
      ∈ (cat-arrow(TypeCat) (Delta A) (X B)))
11. X ⊢ <A1, A2>
12. X.<A1, A2> ⊢ <A, B1>
13. s ∈ Delta ⟶ X
14. Cname List
15. Cname List
16. name-morph(I;J)
17. Delta(I)
18. A1 (s)a
19. x1 ((s)a;u)
20. u1 A1 (s)f(a)
⊢ istype(A ((s)f(a);u1))


Latex:


Latex:

1.  X  :  CubicalSet
2.  Delta  :  CubicalSet
3.  A1  :  I:(Cname  List)  {}\mrightarrow{}  X(I)  {}\mrightarrow{}  Type
4.  A2  :  I:(Cname  List)  {}\mrightarrow{}  J:(Cname  List)  {}\mrightarrow{}  f:name-morph(I;J)  {}\mrightarrow{}  a:X(I)  {}\mrightarrow{}  (A1  I  a)  {}\mrightarrow{}  (A1  J  f(a))
5.  (\mforall{}I:Cname  List.  \mforall{}a:X(I).  \mforall{}u:A1  I  a.    ((A2  I  I  1  a  u)  =  u))
\mwedge{}  (\mforall{}I,J,K:Cname  List.  \mforall{}f:name-morph(I;J).  \mforall{}g:name-morph(J;K).  \mforall{}a:X(I).  \mforall{}u:A1  I  a.
          ((A2  I  K  (f  o  g)  a  u)  =  (A2  J  K  g  f(a)  (A2  I  J  f  a  u))))
6.  A  :  I:(Cname  List)  {}\mrightarrow{}  X.<A1,  A2>(I)  {}\mrightarrow{}  Type
7.  B1  :  I:(Cname  List)
{}\mrightarrow{}  J:(Cname  List)
{}\mrightarrow{}  f:name-morph(I;J)
{}\mrightarrow{}  a:X.<A1,  A2>(I)
{}\mrightarrow{}  (A  I  a)
{}\mrightarrow{}  (A  J  f(a))
8.  (\mforall{}I:Cname  List.  \mforall{}a:X.<A1,  A2>(I).  \mforall{}u:A  I  a.    ((B1  I  I  1  a  u)  =  u))
\mwedge{}  (\mforall{}I,J,K:Cname  List.  \mforall{}f:name-morph(I;J).  \mforall{}g:name-morph(J;K).  \mforall{}a:X.<A1,  A2>(I).  \mforall{}u:A  I  a.
          ((B1  I  K  (f  o  g)  a  u)  =  (B1  J  K  g  f(a)  (B1  I  J  f  a  u))))
9.  s  :  A:cat-ob(NameCat)  {}\mrightarrow{}  (cat-arrow(TypeCat)  (Delta  A)  (X  A))
10.  \mforall{}A,B:cat-ob(NameCat).  \mforall{}g:cat-arrow(NameCat)  A  B.
            ((cat-comp(TypeCat)  (Delta  A)  (X  A)  (X  B)  (s  A)  (X  A  B  g))
            =  (cat-comp(TypeCat)  (Delta  A)  (Delta  B)  (X  B)  (Delta  A  B  g)  (s  B)))
11.  X  \mvdash{}  <A1,  A2>
12.  X.<A1,  A2>  \mvdash{}  <A,  B1>
13.  s  \mmember{}  Delta  {}\mrightarrow{}  X
14.  I  :  Cname  List
15.  J  :  Cname  List
16.  f  :  name-morph(I;J)
17.  a  :  Delta(I)
18.  u  :  A1  I  (s)a
19.  x1  :  A  I  ((s)a;u)
\mvdash{}  <A2  I  J  f  (s)a  u,  B1  I  J  f  ((s)a;u)  x1>  =  <A2  I  J  f  (s)a  u,  B1  I  J  f  ((s  o  p;q))(a;u)  x1>


By


Latex:
EqCD




Home Index