---

Step * of Lemma int-rsub-req

∀[k:ℤ]. ∀[x:ℝ].  (k - x = (r(k) - x))
BY
{ (Auto
   THEN Unfold `rsub` 0
   THEN (BLemma `req-iff-bdd-diff` THENA Auto)
   THEN (RWO "radd-bdd-diff" 0 THENA Auto)
   THEN BLemma `bdd-diff_weakening`
   THEN Auto
   THEN (FunExt THENW Auto)
   THEN RepUR ``int-rsub int-to-real rminus`` 0
   THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[k:\mBbbZ{}].  \mforall{}[x:\mBbbR{}].    (k  -  x  =  (r(k)  -  x))


By

---

Latex:
(Auto
  THEN  Unfold  `rsub`  0
  THEN  (BLemma  `req-iff-bdd-diff`  THENA  Auto)
  THEN  (RWO  "radd-bdd-diff"  0  THENA  Auto)
  THEN  BLemma  `bdd-diff\_weakening`
  THEN  Auto
  THEN  (FunExt  THENW  Auto)
  THEN  RepUR  ``int-rsub  int-to-real  rminus``  0
  THEN  Auto)

---

Home Index