Step * 1 of Lemma glue-term-constraint


1. Gamma CubicalSet{j}
2. phi {Gamma ⊢ _:𝔽}
3. {Gamma, phi ⊢ _}
4. {Gamma, phi ⊢ _:T}
5. Top
6. Top
7. fset(ℕ)
8. a1 Gamma, phi(I)
⊢ (t a1) (glue [phi ⊢→ t] a1) ∈ T(a1)
BY
((Assert a1 ∈ Gamma, phi(I) BY
          Auto)
   THEN RepUR ``context-subset`` -2
   THEN RepUR ``glue-term`` 0
   THEN (Subst' (phi(a1)==1) tt THENA Auto)
   THEN Reduce 0
   THEN Fold `cubical-term-at` 0
   THEN Auto) }


Latex:


Latex:

1.  Gamma  :  CubicalSet\{j\}
2.  phi  :  \{Gamma  \mvdash{}  \_:\mBbbF{}\}
3.  T  :  \{Gamma,  phi  \mvdash{}  \_\}
4.  t  :  \{Gamma,  phi  \mvdash{}  \_:T\}
5.  A  :  Top
6.  a  :  Top
7.  I  :  fset(\mBbbN{})
8.  a1  :  Gamma,  phi(I)
\mvdash{}  (t  I  a1)  =  (glue  [phi  \mvdash{}\mrightarrow{}  t]  a  I  a1)


By


Latex:
((Assert  a1  \mmember{}  Gamma,  phi(I)  BY
                Auto)
  THEN  RepUR  ``context-subset``  -2
  THEN  RepUR  ``glue-term``  0
  THEN  (Subst'  (phi(a1)==1)  \msim{}  tt  0  THENA  Auto)
  THEN  Reduce  0
  THEN  Fold  `cubical-term-at`  0
  THEN  Auto)




Home Index