---

Step * 1 of Lemma csm-is-cubical-equiv

.....subterm..... T:t
3:n
1. X : CubicalSet{j}
2. T : {X ⊢ _}
3. A : {X ⊢ _}
4. w : {X ⊢ _:(T ⟶ A)}
5. Z : CubicalSet{j}
6. s : Z j⟶ X
⊢ (Contractible(Fiber((w)p;q)))(s o p;q) = Z.(A)s ⊢ Contractible(Fiber(((w)s)p;q)) ∈ {Z.(A)s ⊢ _}
BY
{ ((InstLemmaIJ `csm-contractible-type` [⌜X.A⌝;⌜Fiber((w)p;q)⌝;⌜Z.(A)s⌝;⌜(s o p;q)⌝]⋅ THENA Auto)
   THEN NthHypEqGen (-1)
   THEN RepeatFor 2 ((EqCD THEN Auto))) }

1
.....subterm..... T:t
2:n
1. X : CubicalSet{j}
2. T : {X ⊢ _}
3. A : {X ⊢ _}
4. w : {X ⊢ _:(T ⟶ A)}
5. Z : CubicalSet{j}
6. s : Z j⟶ X
7. (Contractible(Fiber((w)p;q)))(s o p;q) = Z.(A)s ⊢ Contractible((Fiber((w)p;q))(s o p;q)) ∈ {Z.(A)s ⊢ _}
⊢ Z.(A)s ⊢ Fiber(((w)s)p;q) = (Fiber((w)p;q))(s o p;q) ∈ {Z.(A)s ⊢ _}

---

Latex:

---

Latex:
.....subterm.....  T:t
3:n
1.  X  :  CubicalSet\{j\}
2.  T  :  \{X  \mvdash{}  \_\}
3.  A  :  \{X  \mvdash{}  \_\}
4.  w  :  \{X  \mvdash{}  \_:(T  {}\mrightarrow{}  A)\}
5.  Z  :  CubicalSet\{j\}
6.  s  :  Z  j{}\mrightarrow{}  X
\mvdash{}  (Contractible(Fiber((w)p;q)))(s  o  p;q)  =  Z.(A)s  \mvdash{}  Contractible(Fiber(((w)s)p;q))


By

---

Latex:
((InstLemmaIJ  `csm-contractible-type`  [\mkleeneopen{}X.A\mkleeneclose{};\mkleeneopen{}Fiber((w)p;q)\mkleeneclose{};\mkleeneopen{}Z.(A)s\mkleeneclose{};\mkleeneopen{}(s  o  p;q)\mkleeneclose{}]\mcdot{}  THENA  Auto)
  THEN  NthHypEqGen  (-1)
  THEN  RepeatFor  2  ((EqCD  THEN  Auto)))

---

Home Index