Step
*
of Lemma
cubical-fiber-subset-adjoin
∀[X,T,A,B,w,a,phi:Top].  (X, phi.B ⊢ Fiber(w;a) ~ X.B ⊢ Fiber(w;a))
BY
{ ((UnivCD THENA Auto) THEN RepUR ``cubical-fiber cubical-sigma`` 0 THEN RWO "path-type-subset-adjoin2" 0 THEN Auto) }
Latex:
Latex:
\mforall{}[X,T,A,B,w,a,phi:Top].    (X,  phi.B  \mvdash{}  Fiber(w;a)  \msim{}  X.B  \mvdash{}  Fiber(w;a))
By
Latex:
((UnivCD  THENA  Auto)
  THEN  RepUR  ``cubical-fiber  cubical-sigma``  0
  THEN  RWO  "path-type-subset-adjoin2"  0
  THEN  Auto)
Home
Index