Re: Re: solve and simplify. force left hand side to be 0==

*To*: mathgroup at smc.vnet.net*Subject*: [mg51196] Re: [mg51182] Re: [mg51152] solve and simplify. force left hand side to be 0==*From*: Richard Palmer <mapsinc at bellatlantic.net>*Date*: Fri, 8 Oct 2004 02:54:43 -0400 (EDT)*Sender*: owner-wri-mathgroup at wolfram.com

Thanks! That was the clue I needed. Richard On 10/7/04 5:26 AM, "DrBob" <drbob at bigfoot.com> wrote: > sde = {0 == > v1 - d1 e[ > 0] + k2 es[0] - k1 e[0] s[0], 0 == -k2 es[0] - k3 es[ > 0] + k1 e[0] s[0], 0 == k3 > es[0] - d3 p[0], 0 == v2 + k2 es[0] - d2 s[0] - k1 e[0] s[0]}; > sde1 = sde /. First@Solve[sde[[1]], e[0]]; > 0 == HoldForm[Evaluate@Simplify@Last@#] & /@ sde1 > > Bobby > > On Wed, 6 Oct 2004 04:34:39 -0400 (EDT), sean kim <sean_incali at yahoo.com> > wrote: > >> >> consider a system such as, >> >> sde = { >> 0==v1-d1 e[0]+k2 es[0]-k1 e[0] s[0], >> 0==-k2 es[0]-k3 es[0]+k1 e[0] s[0], >> 0==k3 es[0]-d3 p[0], >> 0==v2+k2 es[0]-d2 s[0]-k1 e[0] s[0]}; >> >> sv = {e[0],es[0],p[0],s[0]}; >> >> Solve[sde[[1]], e[0]] >> >> sde1= sde/.% >> >> %//Simplify >> >> shows once I simplify the solution, the structure of >> 0== stuff... is lost. >> >> is there anyway to force Simplify to keep the >> structure so that left hand side is always 0== stuff? >> >> thanks in advance for any insights. >> >> >> sean >> >> >> __________________________________________________ >> Do You Yahoo!? >> Tired of spam? Yahoo! Mail has the best spam protection around >> http://mail.yahoo.com >> >> >> >> > >