MathGroup Archive 1999

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: How to "Factorize" expanded derivatives

  • To: mathgroup at smc.vnet.net
  • Subject: [mg17178] Re: How to "Factorize" expanded derivatives
  • From: jf alcover <jfalcover at cepme.fr>
  • Date: Tue, 20 Apr 1999 01:20:54 -0400
  • Organization: cepme
  • References: <7f9evt$50m@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

Hemming,
this is what i propose, (but i dont know if its really
what you are looking for ! ) :

In[1]:=HoldIntegrate[expr_,x_]:=
Module[{integ,h1,h2},
  integ=Integrate[expr,x];
  h1[h2[integ,x]]/.h1->Hold/.h2->D
 ];

In[2]:=HoldIntegrate[g[x]f'[x]+f[x]g'[x],x]//InputForm
Out[2]:=Hold[D[f[x]*g[x], x]]

In[3]:=(%//Release)==g[x]f'[x]+f[x]g'[x]
Out[3]:=True


Regards

"Hemming A Schaeffer" wrote:

> Consider the operation
>
> D[f[x]g[x],x]=g[x]f'[x]+f[x]g'[x]
>
> Does anyone know how to make Mathematica perform the inverse operation.
 I
> guess what I am looking for is some kind of Simplify Function using
> differentiation rules. Something resembling the Factor Function would also
> be nice.
>
> Thanks for any tips
>
> Hemming


  • Prev by Date: Plotting different shadings in SphericalPlot3D
  • Next by Date: Re: Fibonacci [5,000,000] contains 1044938 decimal digits
  • Previous by thread: How to "Factorize" expanded derivatives
  • Next by thread: Re: How to "Factorize" expanded derivatives