---

Step * of Lemma s-comp-s

∀[I:fset(ℕ)]. ∀[i,j:ℕ].  (s ⋅ s = s ∈ I+i+j ⟶ I)
BY
{ (Auto
   THEN RepUR ``nh-comp nc-s nc-0 nh-id names-hom dma-lift-compose`` 0
   THEN (FunExt THENA Auto)
   THEN Reduce 0
   THEN Fold `dM` 0
   THEN Fold `dM-lift` 0) }

1
1. I : fset(ℕ)
2. i : ℕ
3. j : ℕ
4. x : names(I)
⊢ (dM-lift(I+i+j;I+i;λx.<x>) <x>) = <x> ∈ Point(dM(I+i+j))

---

Latex:

---

Latex:
\mforall{}[I:fset(\mBbbN{})].  \mforall{}[i,j:\mBbbN{}].    (s  \mcdot{}  s  =  s)


By

---

Latex:
(Auto
  THEN  RepUR  ``nh-comp  nc-s  nc-0  nh-id  names-hom  dma-lift-compose``  0
  THEN  (FunExt  THENA  Auto)
  THEN  Reduce  0
  THEN  Fold  `dM`  0
  THEN  Fold  `dM-lift`  0)

---

Home Index