Step
*
of Lemma
path-eq_wf
∀[X:CubicalSet]. ∀[A:{X ⊢ _}]. ∀[a,b:{X ⊢ _:A}]. ∀[I:Cname List]. ∀[alpha:X(I)]. ∀[p,q:I-path(X;A;a;b;I;alpha)].
  (path-eq(X;A;I;alpha;p;q) ∈ ℙ)
BY
{ (Intros
   THEN Unhide
   THEN D -2
   THEN D -3
   THEN D -2
   THEN D -1
   THEN D -2
   THEN D -1
   THEN RepUR ``path-eq`` 0
   THEN MemCD
   THEN Try ((InferEqualType THEN Auto THEN BLemma `rename-one-iota` THEN Auto))
   THEN Auto) }
Latex:
Latex:
\mforall{}[X:CubicalSet].  \mforall{}[A:\{X  \mvdash{}  \_\}].  \mforall{}[a,b:\{X  \mvdash{}  \_:A\}].  \mforall{}[I:Cname  List].  \mforall{}[alpha:X(I)].
\mforall{}[p,q:I-path(X;A;a;b;I;alpha)].
    (path-eq(X;A;I;alpha;p;q)  \mmember{}  \mBbbP{})
By
Latex:
(Intros
  THEN  Unhide
  THEN  D  -2
  THEN  D  -3
  THEN  D  -2
  THEN  D  -1
  THEN  D  -2
  THEN  D  -1
  THEN  RepUR  ``path-eq``  0
  THEN  MemCD
  THEN  Try  ((InferEqualType  THEN  Auto  THEN  BLemma  `rename-one-iota`  THEN  Auto))
  THEN  Auto)
Home
Index