---

Step * 1 of Lemma nc-p-s-commute


1. I : fset(ℕ)
2. i : ℕ
3. j : ℕ
4. z : Point(dM(I))
5. x : names(I+i)
6. (i/z) ∈ I+j ⟶ I+i+j
7. x = i ∈ ℤ
⊢ (dM-lift(I+j;I;s) z) = (dM-lift(I+j;I+i+j;(i/z)) <x>) ∈ Point(dM(I+j))
BY
{ (Assert (dM-lift(I+j;I;s) z) = ((i/z) x) ∈ Point(dM(I+j)) BY
         ((RepUR ``nc-p`` 0⋅ THEN AutoSplit) THEN BLemma `dM-lift-is-id2` THEN Auto THEN MemTypeCD THEN EAuto 1)) }

1
1. I : fset(ℕ)
2. i : ℕ
3. j : ℕ
4. z : Point(dM(I))
5. x : names(I+i)
6. (i/z) ∈ I+j ⟶ I+i+j
7. x = i ∈ ℤ
8. (dM-lift(I+j;I;s) z) = ((i/z) x) ∈ Point(dM(I+j))
⊢ (dM-lift(I+j;I;s) z) = (dM-lift(I+j;I+i+j;(i/z)) <x>) ∈ Point(dM(I+j))

---

Latex:

---

Latex:

1.  I  :  fset(\mBbbN{})
2.  i  :  \mBbbN{}
3.  j  :  \mBbbN{}
4.  z  :  Point(dM(I))
5.  x  :  names(I+i)
6.  (i/z)  \mmember{}  I+j  {}\mrightarrow{}  I+i+j
7.  x  =  i
\mvdash{}  (dM-lift(I+j;I;s)  z)  =  (dM-lift(I+j;I+i+j;(i/z))  <x>)


By

---

Latex:
(Assert  (dM-lift(I+j;I;s)  z)  =  ((i/z)  x)  BY
              ((RepUR  ``nc-p``  0\mcdot{}  THEN  AutoSplit)
                THEN  BLemma  `dM-lift-is-id2`
                THEN  Auto
                THEN  MemTypeCD
                THEN  EAuto  1))

---

Home Index