Step * 1 2 1 1 of Lemma uniform-Kan-filler_wf

.....assertion..... 
1. CubicalSet
2. filler I:(Cname List) ⟶ J:(nameset(I) List) ⟶ x:nameset(I) ⟶ i:ℕ2 ⟶ open_box(X;I;J;x;i) ⟶ X(I)
3. Cname List
4. nameset(I) List
5. nameset(I)
6. : ℕ2
7. bx open_box(X;I;J;x;i)
8. Cname List
9. name-morph(I;K)
10. ∀i:nameset(I). ((i ∈ J)  (↑isname(f i)))
11. ↑isname(f x)
12. x ∈ nameset(K)
13. {x:Cname| (x ∈ J)}  List
14. L ∈ ({x:Cname| (x ∈ J)}  List)
⊢ f ∈ {x:Cname| (x ∈ J)}  ⟶ nameset(K)
BY
((FunExt THENA Auto) THEN -1 THEN DVar `bx' THEN BLemma `assert-isname` THEN Auto) }


Latex:


Latex:
.....assertion..... 
1.  X  :  CubicalSet
2.  filler  :  I:(Cname  List)
{}\mrightarrow{}  J:(nameset(I)  List)
{}\mrightarrow{}  x:nameset(I)
{}\mrightarrow{}  i:\mBbbN{}2
{}\mrightarrow{}  open\_box(X;I;J;x;i)
{}\mrightarrow{}  X(I)
3.  I  :  Cname  List
4.  J  :  nameset(I)  List
5.  x  :  nameset(I)
6.  i  :  \mBbbN{}2
7.  bx  :  open\_box(X;I;J;x;i)
8.  K  :  Cname  List
9.  f  :  name-morph(I;K)
10.  \mforall{}i:nameset(I).  ((i  \mmember{}  J)  {}\mRightarrow{}  (\muparrow{}isname(f  i)))
11.  \muparrow{}isname(f  x)
12.  f  x  \mmember{}  nameset(K)
13.  L  :  \{x:Cname|  (x  \mmember{}  J)\}    List
14.  J  =  L
\mvdash{}  f  \mmember{}  \{x:Cname|  (x  \mmember{}  J)\}    {}\mrightarrow{}  nameset(K)


By


Latex:
((FunExt  THENA  Auto)  THEN  D  -1  THEN  DVar  `bx'  THEN  BLemma  `assert-isname`  THEN  Auto)




Home Index