Step * 1 of Lemma cube-set-restriction-face-map


1. X1 L:(Cname List) ⟶ Type
2. X2 I:(Cname List) ⟶ J:(Cname List) ⟶ name-morph(I;J) ⟶ (X1 I) ⟶ (X1 J)
3. ∀I,J,K:Cname List. ∀f:name-morph(I;J). ∀g:name-morph(J;K).
     ((X2 (f g)) ((X2 g) (X2 f)) ∈ ((X1 I) ⟶ (X1 K)))
4. ∀I:Cname List. ((X2 1) x.x) ∈ ((X1 I) ⟶ (X1 I)))
5. Cname List
6. Cname List
7. name-morph(I;K)
8. X1 I
9. : ℕ2
10. name-morph-domain(f;I)
11. j ∈ nameset(K)
12. (X2 K-[f j] (f (f j:=c))) ((X2 K-[f j] (f j:=c)) (X2 f)) ∈ ((X1 I) ⟶ (X1 K-[f j]))
⊢ (f j:=c)(f(s)) f((j:=c)(s)) ∈ <X1, X2>(K-[f j])
BY
TACTIC:((ApFunToHypEquands `Z' ⌜s⌝ ⌜X1 K-[f j]⌝ (-1)⋅ THENA Auto) THEN RepUR ``compose`` -1 THEN Thin (-2)) }

1
1. X1 L:(Cname List) ⟶ Type
2. X2 I:(Cname List) ⟶ J:(Cname List) ⟶ name-morph(I;J) ⟶ (X1 I) ⟶ (X1 J)
3. ∀I,J,K:Cname List. ∀f:name-morph(I;J). ∀g:name-morph(J;K).
     ((X2 (f g)) ((X2 g) (X2 f)) ∈ ((X1 I) ⟶ (X1 K)))
4. ∀I:Cname List. ((X2 1) x.x) ∈ ((X1 I) ⟶ (X1 I)))
5. Cname List
6. Cname List
7. name-morph(I;K)
8. X1 I
9. : ℕ2
10. name-morph-domain(f;I)
11. j ∈ nameset(K)
12. (X2 K-[f j] (f (f j:=c)) s) (X2 K-[f j] (f j:=c) (X2 s)) ∈ (X1 K-[f j])
⊢ (f j:=c)(f(s)) f((j:=c)(s)) ∈ <X1, X2>(K-[f j])


Latex:


Latex:

1.  X1  :  L:(Cname  List)  {}\mrightarrow{}  Type
2.  X2  :  I:(Cname  List)  {}\mrightarrow{}  J:(Cname  List)  {}\mrightarrow{}  name-morph(I;J)  {}\mrightarrow{}  (X1  I)  {}\mrightarrow{}  (X1  J)
3.  \mforall{}I,J,K:Cname  List.  \mforall{}f:name-morph(I;J).  \mforall{}g:name-morph(J;K).
          ((X2  I  K  (f  o  g))  =  ((X2  J  K  g)  o  (X2  I  J  f)))
4.  \mforall{}I:Cname  List.  ((X2  I  I  1)  =  (\mlambda{}x.x))
5.  I  :  Cname  List
6.  K  :  Cname  List
7.  f  :  name-morph(I;K)
8.  s  :  X1  I
9.  c  :  \mBbbN{}2
10.  j  :  name-morph-domain(f;I)
11.  f  j  \mmember{}  nameset(K)
12.  (X2  I  K-[f  j]  (f  o  (f  j:=c)))  =  ((X2  K  K-[f  j]  (f  j:=c))  o  (X2  I  K  f))
\mvdash{}  (f  j:=c)(f(s))  =  f((j:=c)(s))


By


Latex:
TACTIC:((ApFunToHypEquands  `Z'  \mkleeneopen{}Z  s\mkleeneclose{}  \mkleeneopen{}X1  K-[f  j]\mkleeneclose{}  (-1)\mcdot{}  THENA  Auto)
                THEN  RepUR  ``compose``  -1
                THEN  Thin  (-2))




Home Index