Step * of Lemma cubical-sigma_wf

[X:CubicalSet]. ∀[A:{X ⊢ _}]. ∀[B:{X.A ⊢ _}].  X ⊢ Σ B
BY
(Auto THEN Unfold `cubical-sigma` THEN MemTypeCD THEN Try (MemCD) THEN Reduce THEN Auto) }

1
1. CubicalSet
2. {X ⊢ _}
3. {X.A ⊢ _}
4. Cname List
5. X(I)
6. u:A(a) × B((a;u))
⊢ <(fst(u) 1), (snd(u) (a;fst(u)) 1)> u ∈ (u:A(a) × B((a;u)))

2
1. CubicalSet
2. {X ⊢ _}
3. {X.A ⊢ _}
4. ∀I:Cname List. ∀a:X(I). ∀u:u:A(a) × B((a;u)).  (<(fst(u) 1), (snd(u) (a;fst(u)) 1)> u ∈ (u:A(a) × B((a;u))))
5. Cname List
6. Cname List
7. Cname List
8. name-morph(I;J)
9. name-morph(J;K)
10. X(I)
11. u:A(a) × B((a;u))
⊢ <(fst(u) (f g)), (snd(u) (a;fst(u)) (f g))>
= <((fst(u) f) f(a) g), ((snd(u) (a;fst(u)) f) (f(a);(fst(u) f)) g)>
∈ (u:A((f g)(a)) × B(((f g)(a);u)))


Latex:


Latex:
\mforall{}[X:CubicalSet].  \mforall{}[A:\{X  \mvdash{}  \_\}].  \mforall{}[B:\{X.A  \mvdash{}  \_\}].    X  \mvdash{}  \mSigma{}  A  B


By


Latex:
(Auto  THEN  Unfold  `cubical-sigma`  0  THEN  MemTypeCD  THEN  Try  (MemCD)  THEN  Reduce  0  THEN  Auto)




Home Index