---

Step * of Lemma csm-glue-comp

No Annotations
∀[G:j⊢]. ∀[K:Top]. ∀[A:{G ⊢ _}]. ∀[psi:{G ⊢ _:𝔽}]. ∀[T:{G, psi ⊢ _}]. ∀[cA,cT,f,tau:Top].
  ((comp(Glue [psi ⊢→ (T, f)] A) )tau ~ comp(Glue [(psi)tau ⊢→ ((T)tau, (f)tau)] (A)tau) )
BY
{ (Intros
   THEN RepUR ``csm-comp-structure glue-comp`` 0
   THEN RepeatFor 6 (EqCD)
   THEN (RWO "csm-equiv-fun" 0 THENA Auto)
   THEN Try ((CsmUnfolding THEN Trivial))) }

---

Latex:

---

Latex:
No  Annotations
\mforall{}[G:j\mvdash{}].  \mforall{}[K:Top].  \mforall{}[A:\{G  \mvdash{}  \_\}].  \mforall{}[psi:\{G  \mvdash{}  \_:\mBbbF{}\}].  \mforall{}[T:\{G,  psi  \mvdash{}  \_\}].  \mforall{}[cA,cT,f,tau:Top].
    ((comp(Glue  [psi  \mvdash{}\mrightarrow{}  (T,  f)]  A)  )tau  \msim{}  comp(Glue  [(psi)tau  \mvdash{}\mrightarrow{}  ((T)tau,  (f)tau)]  (A)tau)  )


By

---

Latex:
(Intros
  THEN  RepUR  ``csm-comp-structure  glue-comp``  0
  THEN  RepeatFor  6  (EqCD)
  THEN  (RWO  "csm-equiv-fun"  0  THENA  Auto)
  THEN  Try  ((CsmUnfolding  THEN  Trivial)))

---

Home Index