Groups > comp.soft-sys.math.mathematica > #2101

Re: anything faster than Solve[] for solving sets of polynomial equations symbolically?

Path	csiph.com!x330-a1.tempe.blueboxinc.net!newsfeed.hal-mli.net!feeder1.hal-mli.net!nx02.iad01.newshosting.com!newshosting.com!newspump.sol.net!posts.news.twtelecom.net!nnrp3.twtelecom.net!not-for-mail
From	dantimatter <google@dantimatter.com>
Newsgroups	comp.soft-sys.math.mathematica
Subject	Re: anything faster than Solve[] for solving sets of polynomial equations symbolically?
Date	Wed, 4 May 2011 23:47:29 +0000 (UTC)
Organization	Steven M. Christensen and Associates, Inc and MathTensor, Inc.
Sender	steve@smc.vnet.net
Approved	Steven M. Christensen <steve@smc.vnet.net>, Moderator
Message-ID	<ipsoih$8at$1@smc.vnet.net> (permalink)
Lines	17
NNTP-Posting-Date	04 May 2011 22:48:19 GMT
NNTP-Posting-Host	dd96ef00.news.twtelecom.net
X-Trace	DXC=k=]8:[R<FEj[aEn11>@JieC_A=>8kQj6mY;@_o827nGccmZ:nPZKL0iEFiONJ7[GofEjlIGWM^Udk
X-Complaints-To	abuse@twtelecom.net
Xref	x330-a1.tempe.blueboxinc.net comp.soft-sys.math.mathematica:2101

Show key headers only | View raw

Hi Bobby,

> eqs = {-k5 x1 x3 + k6 x4 == 0,
>     k1 x1 - k4 x2 - 2 k2 x2^2 + 2 k3 x3 + k7 x4 == 0,
>     k2 x2^2 - k3 x3 - k5 x1 x3 + k6 x4 == 0, x1 + x4 - Xtot == 0};
> nonNeg = Thread[{k1, k2, k3, k4, k5, k6, k7, Xtot} >= 0];
> real = Element[vars = {x1, x2, x3, x4}, Reals];
> problem = Flatten@{eqs, nonNeg};
> Solve[problem, Reals] // FullSimplify

I'm getting an error message that 'Xtot >= 0 is not a well-formed equation'.  Is this something that you encountered as well?  Also, is your Solve[] function call missing a reference to the variables, or am I just confused?

Thanks!
Dan

Back to comp.soft-sys.math.mathematica | Previous | Next | Find similar | Unroll thread

Thread

Re: anything faster than Solve[] for solving sets of polynomial equations symbolically? dantimatter <google@dantimatter.com> - 2011-05-04 23:47 +0000

csiph-web