Step
*
of Lemma
Kan-cubical-identity_wf
∀[X:CubicalSet]. ∀[A:{X ⊢ _(Kan)}]. ∀[a,b:{X ⊢ _:Kan-type(A)}].  (Kan(Id_A a b) ∈ {X ⊢ _(Kan)})
BY
{ (Auto
   THEN RepUR ``Kan-cubical-identity`` 0
   THEN (GenConclTerm ⌜Kan_id_filler(X;A;a;b)⌝⋅ THENA Auto)
   THEN D -2
   THEN MemTypeCD
   THEN Reduce 0
   THEN Auto
   THEN RevHypSubst'  (-2) 0
   THEN Auto) }
Latex:
Latex:
\mforall{}[X:CubicalSet].  \mforall{}[A:\{X  \mvdash{}  \_(Kan)\}].  \mforall{}[a,b:\{X  \mvdash{}  \_:Kan-type(A)\}].    (Kan(Id\_A  a  b)  \mmember{}  \{X  \mvdash{}  \_(Kan)\})
By
Latex:
(Auto
  THEN  RepUR  ``Kan-cubical-identity``  0
  THEN  (GenConclTerm  \mkleeneopen{}Kan\_id\_filler(X;A;a;b)\mkleeneclose{}\mcdot{}  THENA  Auto)
  THEN  D  -2
  THEN  MemTypeCD
  THEN  Reduce  0
  THEN  Auto
  THEN  RevHypSubst'    (-2)  0
  THEN  Auto)
Home
Index