Step * of Lemma rminus-radd

[r,s:ℝ].  (-(r s) ((r(-1) s) (r(-1) r)))
BY
((Auto THEN (RW (AddrC [1] (LemmaC `rminus-as-rmul`)) THENA Auto))⋅ THEN RWO "rmul-distrib1" THEN Auto) }


Latex:


Latex:
\mforall{}[r,s:\mBbbR{}].    (-(r  +  s)  =  ((r(-1)  *  s)  +  (r(-1)  *  r)))


By


Latex:
((Auto  THEN  (RW  (AddrC  [1]  (LemmaC  `rminus-as-rmul`))  0  THENA  Auto))\mcdot{}
  THEN  RWO  "rmul-distrib1"  0
  THEN  Auto)




Home Index