Step * 2 of Lemma csm-adjoin_wf


1. Gamma CubicalSet
2. Delta CubicalSet
3. {Gamma ⊢ _}
4. sigma Delta ⟶ Gamma
5. {Delta ⊢ _:(A)sigma}
6. Cname List
7. Cname List
8. name-morph(I;J)
⊢ s.g(<(sigma)s, s>)) s.<(sigma)g(s), g(s)>) ∈ (Delta(I) ⟶ Gamma.A(J))
BY
(Fold `cc-adjoin-cube` THEN EqCD THEN Auto) }

1
.....subterm..... T:t
2:n
1. Gamma CubicalSet
2. Delta CubicalSet
3. {Gamma ⊢ _}
4. sigma Delta ⟶ Gamma
5. {Delta ⊢ _:(A)sigma}
6. Cname List
7. Cname List
8. name-morph(I;J)
9. Delta(I)
⊢ (u (sigma)s g) (u g(s)) ∈ A(g((sigma)s))


Latex:


Latex:

1.  Gamma  :  CubicalSet
2.  Delta  :  CubicalSet
3.  A  :  \{Gamma  \mvdash{}  \_\}
4.  sigma  :  Delta  {}\mrightarrow{}  Gamma
5.  u  :  \{Delta  \mvdash{}  \_:(A)sigma\}
6.  I  :  Cname  List
7.  J  :  Cname  List
8.  g  :  name-morph(I;J)
\mvdash{}  (\mlambda{}s.g(<(sigma)s,  u  I  s>))  =  (\mlambda{}s.<(sigma)g(s),  u  J  g(s)>)


By


Latex:
(Fold  `cc-adjoin-cube`  0  THEN  EqCD  THEN  Auto)




Home Index