Step
*
1
of Lemma
glue-term-constraint
1. Gamma : CubicalSet{j}
2. phi : {Gamma ⊢ _:𝔽}
3. T : {Gamma, phi ⊢ _}
4. t : {Gamma, phi ⊢ _:T}
5. A : Top
6. a : Top
7. I : fset(ℕ)
8. a1 : Gamma, phi(I)
⊢ (t I a1) = (glue [phi ⊢→ t] a I 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 0 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