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