---

Step * of Lemma r-comp-r

∀[I:fset(ℕ)]. ∀[i:ℕ].  (r_i ⋅ r_i = 1 ∈ I+i ⟶ I+i)
BY
{ (Auto
   THEN Unfold `names-hom` 0
   THEN FunExt
   THEN Auto
   THEN RepUR ``nh-id`` 0
   THEN (RWO "nh-comp-sq" 0 THENA Auto)
   THEN Reduce 0) }

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

---

Latex:

---

Latex:
\mforall{}[I:fset(\mBbbN{})].  \mforall{}[i:\mBbbN{}].    (r\_i  \mcdot{}  r\_i  =  1)


By

---

Latex:
(Auto
  THEN  Unfold  `names-hom`  0
  THEN  FunExt
  THEN  Auto
  THEN  RepUR  ``nh-id``  0
  THEN  (RWO  "nh-comp-sq"  0  THENA  Auto)
  THEN  Reduce  0)

---

Home Index