Step
*
of Lemma
neg_inv_fps
∀[X:Type]. ∀[r:CRng]. ∀[a:PowerSeries(X;r)].  (-(-(a)) = a ∈ PowerSeries(X;r))
BY
{ (Auto
   THEN RepUR ``fps-add fps-neg fps-zero power-series fps-coeff`` 0
   THEN Ext
   THEN Reduce 0
   THEN Auto
   THEN RW RngNormC 0
   THEN Auto) }
Latex:
Latex:
\mforall{}[X:Type].  \mforall{}[r:CRng].  \mforall{}[a:PowerSeries(X;r)].    (-(-(a))  =  a)
By
Latex:
(Auto
  THEN  RepUR  ``fps-add  fps-neg  fps-zero  power-series  fps-coeff``  0
  THEN  Ext
  THEN  Reduce  0
  THEN  Auto
  THEN  RW  RngNormC  0
  THEN  Auto)
Home
Index