---

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

.....assertion..... 
1. X : CubicalSet
2. A : {X ⊢ _}
3. filler : I:(Cname List)
⟶ alpha:X(I)
⟶ J:(nameset(I) List)
⟶ x:nameset(I)
⟶ i:ℕ2
⟶ A-open-box(X;A;I;alpha;J;x;i)
⟶ A(alpha)
4. I : Cname List
5. alpha : X(I)
6. J : nameset(I) List
7. x : nameset(I)
8. i : ℕ2
9. bx : A-open-box(X;A;I;alpha;J;x;i)
10. K : Cname List
11. f : name-morph(I;K)
12. ∀i:nameset(I). ((i ∈ J) ⇒ (↑isname(f i)))
13. ↑isname(f x)
14. f x ∈ nameset(K)
15. nameset([x / J]) ⊆r name-morph-domain(f;I)
16. L : {x:Cname| (x ∈ J)}  List
17. J = L ∈ ({x:Cname| (x ∈ J)}  List)
⊢ f ∈ {x:Cname| (x ∈ J)}  ⟶ nameset(K)
BY
{ ((FunExt THENA Auto) THEN D -1 THEN DVar `bx' THEN BLemma `assert-isname` THEN Auto) }

---

Latex:

---

Latex:
.....assertion..... 
1.  X  :  CubicalSet
2.  A  :  \{X  \mvdash{}  \_\}
3.  filler  :  I:(Cname  List)
{}\mrightarrow{}  alpha:X(I)
{}\mrightarrow{}  J:(nameset(I)  List)
{}\mrightarrow{}  x:nameset(I)
{}\mrightarrow{}  i:\mBbbN{}2
{}\mrightarrow{}  A-open-box(X;A;I;alpha;J;x;i)
{}\mrightarrow{}  A(alpha)
4.  I  :  Cname  List
5.  alpha  :  X(I)
6.  J  :  nameset(I)  List
7.  x  :  nameset(I)
8.  i  :  \mBbbN{}2
9.  bx  :  A-open-box(X;A;I;alpha;J;x;i)
10.  K  :  Cname  List
11.  f  :  name-morph(I;K)
12.  \mforall{}i:nameset(I).  ((i  \mmember{}  J)  {}\mRightarrow{}  (\muparrow{}isname(f  i)))
13.  \muparrow{}isname(f  x)
14.  f  x  \mmember{}  nameset(K)
15.  nameset([x  /  J])  \msubseteq{}r  name-morph-domain(f;I)
16.  L  :  \{x:Cname|  (x  \mmember{}  J)\}    List
17.  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