Step
*
of Lemma
lift-id-face_wf
∀[X:CubicalSet]. ∀[A:{X ⊢ _}]. ∀[a,b:{X ⊢ _:A}]. ∀[I:Cname List]. ∀[alpha:X(I)]. ∀[face:A-face(X;(Id_A a b);I;alpha)].
  (lift-id-face(X;A;I;alpha;face) ∈ A-face(X;A;I+;iota'(I)(alpha)))
BY
{ TACTIC:(Intros
          THEN Unhide
          THEN RepeatFor 2 (D -1)
          THEN RepUR ``lift-id-face A-face`` 0
          THEN Auto
          THEN RenameVar `w' (-1)) }
1
1. X : CubicalSet
2. A : {X ⊢ _}
3. a : {X ⊢ _:A}
4. b : {X ⊢ _:A}
5. I : Cname List
6. alpha : X(I)
7. x : nameset(I)
8. i : ℕ2
9. w : (Id_A a b)((x:=i)(alpha))
⊢ snd(set-path-name(X;A;I-[x];(x:=i)(alpha);fresh-cname(I);w)) ∈ A((x:=i)(iota'(I)(alpha)))
Latex:
Latex:
\mforall{}[X:CubicalSet].  \mforall{}[A:\{X  \mvdash{}  \_\}].  \mforall{}[a,b:\{X  \mvdash{}  \_:A\}].  \mforall{}[I:Cname  List].  \mforall{}[alpha:X(I)].
\mforall{}[face:A-face(X;(Id\_A  a  b);I;alpha)].
    (lift-id-face(X;A;I;alpha;face)  \mmember{}  A-face(X;A;I+;iota'(I)(alpha)))
By
Latex:
TACTIC:(Intros
                THEN  Unhide
                THEN  RepeatFor  2  (D  -1)
                THEN  RepUR  ``lift-id-face  A-face``  0
                THEN  Auto
                THEN  RenameVar  `w'  (-1))
Home
Index