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