Re: Separating functions
- To: mathgroup at smc.vnet.net
- Subject: [mg128469] Re: Separating functions
- From: carlos at colorado.edu
- Date: Tue, 23 Oct 2012 00:55:17 -0400 (EDT)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- Delivered-to: l-mathgroup@wolfram.com
- Delivered-to: mathgroup-newout@smc.vnet.net
- Delivered-to: mathgroup-newsend@smc.vnet.net
- References: <k603ld$7lp$1@smc.vnet.net>
Here is an example script:
F=(2-4*x+5*y+x^2+y^2); g=(1+t+t^2+Cos[20*t]); F=f*g;
G=Simplify[D[F,t]/F]; Print["F=",F," G=",G];
H=Simplify[Integrate[G,t]]; H=Simplify[Exp[H]]; Print["H=",H];
Plot[H,{t,0,1}]; Plot[g,{t,0,1}];