Step
*
2
of Lemma
context-subset-subtype
.....set predicate..... 
1. Gamma : CubicalSet{j}
2. phi1 : {Gamma ⊢ _:𝔽}
3. phi2 : {Gamma ⊢ _:𝔽}
4. A : I:fset(ℕ) ⟶ Gamma, phi1(I) ⟶ Type
5. x1 : I:fset(ℕ) ⟶ J:fset(ℕ) ⟶ f:J ⟶ I ⟶ a:Gamma, phi1(I) ⟶ (A I a) ⟶ (A J f(a))
6. (∀I:fset(ℕ). ∀a:Gamma, phi1(I). ∀u:A I a.  ((x1 I I 1 a u) = u ∈ (A I a)))
∧ (∀I,J,K:fset(ℕ). ∀f:J ⟶ I. ∀g:K ⟶ J. ∀a:Gamma, phi1(I). ∀u:A I a.
     ((x1 I K f ⋅ g a u) = (x1 J K g f(a) (x1 I J f a u)) ∈ (A K f ⋅ g(a))))
7. ∀I:fset(ℕ). (Gamma, phi2(I) ⊆r Gamma, phi1(I))
⊢ let A,F = <A, x1> 
  in (∀I:fset(ℕ). ∀a:Gamma, phi2(I). ∀u:A I a.  ((F I I 1 a u) = u ∈ (A I a)))
     ∧ (∀I,J,K:fset(ℕ). ∀f:J ⟶ I. ∀g:K ⟶ J. ∀a:Gamma, phi2(I). ∀u:A I a.
          ((F I K f ⋅ g a u) = (F J K g f(a) (F I J f a u)) ∈ (A K f ⋅ g(a))))
BY
{ (Reduce 0
   THEN RepeatFor 2 (ParallelOp -2)
   THEN RepeatFor 6 (ParallelLast)
   THEN (RWO "context-subset-restriction" (-1) THENA Auto)
   THEN (RWO "context-subset-restriction" 0 THENA Auto)
   THEN Eq) }
Latex:
Latex:
.....set  predicate..... 
1.  Gamma  :  CubicalSet\{j\}
2.  phi1  :  \{Gamma  \mvdash{}  \_:\mBbbF{}\}
3.  phi2  :  \{Gamma  \mvdash{}  \_:\mBbbF{}\}
4.  A  :  I:fset(\mBbbN{})  {}\mrightarrow{}  Gamma,  phi1(I)  {}\mrightarrow{}  Type
5.  x1  :  I:fset(\mBbbN{})  {}\mrightarrow{}  J:fset(\mBbbN{})  {}\mrightarrow{}  f:J  {}\mrightarrow{}  I  {}\mrightarrow{}  a:Gamma,  phi1(I)  {}\mrightarrow{}  (A  I  a)  {}\mrightarrow{}  (A  J  f(a))
6.  (\mforall{}I:fset(\mBbbN{}).  \mforall{}a:Gamma,  phi1(I).  \mforall{}u:A  I  a.    ((x1  I  I  1  a  u)  =  u))
\mwedge{}  (\mforall{}I,J,K:fset(\mBbbN{}).  \mforall{}f:J  {}\mrightarrow{}  I.  \mforall{}g:K  {}\mrightarrow{}  J.  \mforall{}a:Gamma,  phi1(I).  \mforall{}u:A  I  a.
          ((x1  I  K  f  \mcdot{}  g  a  u)  =  (x1  J  K  g  f(a)  (x1  I  J  f  a  u))))
7.  \mforall{}I:fset(\mBbbN{}).  (Gamma,  phi2(I)  \msubseteq{}r  Gamma,  phi1(I))
\mvdash{}  let  A,F  =  <A,  x1> 
    in  (\mforall{}I:fset(\mBbbN{}).  \mforall{}a:Gamma,  phi2(I).  \mforall{}u:A  I  a.    ((F  I  I  1  a  u)  =  u))
          \mwedge{}  (\mforall{}I,J,K:fset(\mBbbN{}).  \mforall{}f:J  {}\mrightarrow{}  I.  \mforall{}g:K  {}\mrightarrow{}  J.  \mforall{}a:Gamma,  phi2(I).  \mforall{}u:A  I  a.
                    ((F  I  K  f  \mcdot{}  g  a  u)  =  (F  J  K  g  f(a)  (F  I  J  f  a  u))))
By
Latex:
(Reduce  0
  THEN  RepeatFor  2  (ParallelOp  -2)
  THEN  RepeatFor  6  (ParallelLast)
  THEN  (RWO  "context-subset-restriction"  (-1)  THENA  Auto)
  THEN  (RWO  "context-subset-restriction"  0  THENA  Auto)
  THEN  Eq)
Home
Index