Services & ResourcesWolfram ForumsMathGroup Archive

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

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

• To: mathgroup at smc.vnet.net
• Subject: [mg51182] Re: [mg51152] solve and simplify. force left hand side to be 0==
• From: DrBob <drbob at bigfoot.com>
• Date: Thu, 7 Oct 2004 05:26:12 -0400 (EDT)
• References: <200410060834.EAA24236@smc.vnet.net>
• Reply-to: drbob at bigfoot.com
• Sender: owner-wri-mathgroup at wolfram.com

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
>
>
>
>



-- 
DrBob at bigfoot.com
www.eclecticdreams.net

• References:
  • solve and simplify. force left hand side to be 0==
    • From: sean kim <sean_incali@yahoo.com>