Step
*
1
1
3
of Lemma
set-path-name_wf
.....wf..... 
1. X : CubicalSet@i'
2. A : {X ⊢ _}@i'
3. a : {X ⊢ _:A}@i
4. b : {X ⊢ _:A}@i
5. I : Cname List@i
6. alpha : X(I)@i
7. I-path(X;A;a;b;I;alpha) ⊆r cubical-path(X;A;a;b;I;alpha)
8. x : {x:Cname| ¬(x ∈ I)} 
9. named-path(X;A;a;b;I;1(alpha);x) ⊆r A(iota(x)(alpha))
10. p : cubical-path(X;A;a;b;I;alpha)@i
11. q : I-path(X;A;a;b;I;alpha)
⊢ ((fst(q)) = x ∈ Cname) ∧ (q = p ∈ cubical-path(X;A;a;b;I;alpha)) ∈ Type
BY
{ TACTIC:(Auto THEN DoSubsume THEN Auto) }
Latex:
Latex:
.....wf..... 
1.  X  :  CubicalSet@i'
2.  A  :  \{X  \mvdash{}  \_\}@i'
3.  a  :  \{X  \mvdash{}  \_:A\}@i
4.  b  :  \{X  \mvdash{}  \_:A\}@i
5.  I  :  Cname  List@i
6.  alpha  :  X(I)@i
7.  I-path(X;A;a;b;I;alpha)  \msubseteq{}r  cubical-path(X;A;a;b;I;alpha)
8.  x  :  \{x:Cname|  \mneg{}(x  \mmember{}  I)\} 
9.  named-path(X;A;a;b;I;1(alpha);x)  \msubseteq{}r  A(iota(x)(alpha))
10.  p  :  cubical-path(X;A;a;b;I;alpha)@i
11.  q  :  I-path(X;A;a;b;I;alpha)
\mvdash{}  ((fst(q))  =  x)  \mwedge{}  (q  =  p)  \mmember{}  Type
By
Latex:
TACTIC:(Auto  THEN  DoSubsume  THEN  Auto)
Home
Index