Step
*
of Lemma
rmul-int
∀[a,b:ℤ].  ((r(a) * r(b)) = r(a * b))
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) }
1
1. a : ℤ
2. b : ℤ
3. n : ℕ+@i
⊢ |(((2 * n * a) * 2 * n * b) ÷ 2 * n) - 2 * n * a * b| ≤ 0
Latex:
Latex:
\mforall{}[a,b:\mBbbZ{}].    ((r(a)  *  r(b))  =  r(a  *  b))
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)
Home
Index