Step
*
of Lemma
fps-compose-sub
∀[X:Type]
  ∀[eq:EqDecider(X)]. ∀[r:CRng]. ∀[x:X]. ∀[g,f,h:PowerSeries(X;r)].
    ((g-h)(x:=f) = (g(x:=f)-h(x:=f)) ∈ PowerSeries(X;r)) 
  supposing valueall-type(X)
BY
{ (Auto THEN Unfold `fps-sub` 0 THEN RWW "fps-compose-add fps-compose-neg" 0 THEN Auto) }
Latex:
Latex:
\mforall{}[X:Type]
    \mforall{}[eq:EqDecider(X)].  \mforall{}[r:CRng].  \mforall{}[x:X].  \mforall{}[g,f,h:PowerSeries(X;r)].
        ((g-h)(x:=f)  =  (g(x:=f)-h(x:=f))) 
    supposing  valueall-type(X)
By
Latex:
(Auto  THEN  Unfold  `fps-sub`  0  THEN  RWW  "fps-compose-add  fps-compose-neg"  0  THEN  Auto)
Home
Index