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`)) 0 THENA Auto))⋅ THEN RWO "rmul-distrib1" 0 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