---

Step * 7 2 1 of Lemma fps-deriv-mul


1. X : Type
2. valueall-type(X)
3. eq : EqDecider(X)
4. r : CRng
5. f : PowerSeries(X;r)
6. g : PowerSeries(X;r)
7. x : X
8. fps-ucont(X;eq;r;f.d(f*g)/dx)
9. fps-ucont(X;eq;r;f.((f*dg/dx)+(df/dx*g)))
10. ∀f,g@0:PowerSeries(X;r).  (d((f+g@0)*g)/dx = (d(f*g)/dx+d(g@0*g)/dx) ∈ PowerSeries(X;r))
11. ∀f,g@0:PowerSeries(X;r).
      ((((f+g@0)*dg/dx)+(d(f+g@0)/dx*g)) = (((f*dg/dx)+(df/dx*g))+((g@0*dg/dx)+(dg@0/dx*g))) ∈ PowerSeries(X;r))
12. ∀c:|r|. ∀f:PowerSeries(X;r).  (d((c)*f*g)/dx = (c)*d(f*g)/dx ∈ PowerSeries(X;r))
13. ∀c:|r|. ∀f:PowerSeries(X;r).  ((((c)*f*dg/dx)+(d(c)*f/dx*g)) = (c)*((f*dg/dx)+(df/dx*g)) ∈ PowerSeries(X;r))
14. b : bag(X)
15. fps-ucont(X;eq;r;f.d(<b>*f)/dx)
⊢ fps-ucont(X;eq;r;f.(<b>*df/dx))
BY
{ ((InstLemma `fps-ucont-composition` [⌜X⌝;⌜eq⌝;⌜r⌝;⌜λ2f.(<b>*f)⌝;⌜λ2f.df/dx⌝]⋅
   THENM (RepUR ``so_lambda compose so_apply`` -1 THEN Auto)
   )
   THENA Auto
   ) }

1
.....antecedent..... 
1. X : Type
2. valueall-type(X)
3. eq : EqDecider(X)
4. r : CRng
5. f : PowerSeries(X;r)
6. g : PowerSeries(X;r)
7. x : X
8. fps-ucont(X;eq;r;f.d(f*g)/dx)
9. fps-ucont(X;eq;r;f.((f*dg/dx)+(df/dx*g)))
10. ∀f,g@0:PowerSeries(X;r).  (d((f+g@0)*g)/dx = (d(f*g)/dx+d(g@0*g)/dx) ∈ PowerSeries(X;r))
11. ∀f,g@0:PowerSeries(X;r).
      ((((f+g@0)*dg/dx)+(d(f+g@0)/dx*g)) = (((f*dg/dx)+(df/dx*g))+((g@0*dg/dx)+(dg@0/dx*g))) ∈ PowerSeries(X;r))
12. ∀c:|r|. ∀f:PowerSeries(X;r).  (d((c)*f*g)/dx = (c)*d(f*g)/dx ∈ PowerSeries(X;r))
13. ∀c:|r|. ∀f:PowerSeries(X;r).  ((((c)*f*dg/dx)+(d(c)*f/dx*g)) = (c)*((f*dg/dx)+(df/dx*g)) ∈ PowerSeries(X;r))
14. b : bag(X)
15. fps-ucont(X;eq;r;f.d(<b>*f)/dx)
⊢ fps-ucont(X;eq;r;f.(<b>*f))

---

Latex:

---

Latex:

1.  X  :  Type
2.  valueall-type(X)
3.  eq  :  EqDecider(X)
4.  r  :  CRng
5.  f  :  PowerSeries(X;r)
6.  g  :  PowerSeries(X;r)
7.  x  :  X
8.  fps-ucont(X;eq;r;f.d(f*g)/dx)
9.  fps-ucont(X;eq;r;f.((f*dg/dx)+(df/dx*g)))
10.  \mforall{}f,g@0:PowerSeries(X;r).    (d((f+g@0)*g)/dx  =  (d(f*g)/dx+d(g@0*g)/dx))
11.  \mforall{}f,g@0:PowerSeries(X;r).
            ((((f+g@0)*dg/dx)+(d(f+g@0)/dx*g))  =  (((f*dg/dx)+(df/dx*g))+((g@0*dg/dx)+(dg@0/dx*g))))
12.  \mforall{}c:|r|.  \mforall{}f:PowerSeries(X;r).    (d((c)*f*g)/dx  =  (c)*d(f*g)/dx)
13.  \mforall{}c:|r|.  \mforall{}f:PowerSeries(X;r).    ((((c)*f*dg/dx)+(d(c)*f/dx*g))  =  (c)*((f*dg/dx)+(df/dx*g)))
14.  b  :  bag(X)
15.  fps-ucont(X;eq;r;f.d(<b>*f)/dx)
\mvdash{}  fps-ucont(X;eq;r;f.(<b>*df/dx))


By

---

Latex:
((InstLemma  `fps-ucont-composition`  [\mkleeneopen{}X\mkleeneclose{};\mkleeneopen{}eq\mkleeneclose{};\mkleeneopen{}r\mkleeneclose{};\mkleeneopen{}\mlambda{}\msubtwo{}f.(<b>*f)\mkleeneclose{};\mkleeneopen{}\mlambda{}\msubtwo{}f.df/dx\mkleeneclose{}]\mcdot{}
  THENM  (RepUR  ``so\_lambda  compose  so\_apply``  -1  THEN  Auto)
  )
  THENA  Auto
  )

---

Home Index