---

Step * of Lemma rmul-one

∀[x:ℝ]. ((x * r1) = x)
BY
{ (Auto
   THEN (BLemma `req-iff-bdd-diff` THENA Auto)
   THEN (RWO "rmul-bdd-diff-reg-seq-mul" 0 THENA Auto)
   THEN RepUR ``reg-seq-mul int-to-real bdd-diff`` 0⋅
   THEN With ⌜0⌝ (D 0)⋅
   THEN Auto
   THEN RW IntNormC 0
   THEN Auto) }

1
1. x : ℝ
2. n : ℕ+@i
⊢ |((-1) * (x n)) + ((2 * n * (x n)) ÷ 2 * n)| ≤ 0

---

Latex:

---

Latex:
\mforall{}[x:\mBbbR{}].  ((x  *  r1)  =  x)


By

---

Latex:
(Auto
  THEN  (BLemma  `req-iff-bdd-diff`  THENA  Auto)
  THEN  (RWO  "rmul-bdd-diff-reg-seq-mul"  0  THENA  Auto)
  THEN  RepUR  ``reg-seq-mul  int-to-real  bdd-diff``  0\mcdot{}
  THEN  With  \mkleeneopen{}0\mkleeneclose{}  (D  0)\mcdot{}
  THEN  Auto
  THEN  RW  IntNormC  0
  THEN  Auto)

---

Home Index