Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]
Groups > comp.soft-sys.math.mathematica > #2059
| From | dantimatter <google@dantimatter.com> |
|---|---|
| Newsgroups | comp.soft-sys.math.mathematica |
| Subject | anything faster than Solve[] for solving sets of polynomial equations symbolically? |
| Date | 2011-05-03 09:47 +0000 |
| Organization | Steven M. Christensen and Associates, Inc and MathTensor, Inc. |
| Message-ID | <ipoivv$g89$1@smc.vnet.net> (permalink) |
Hi Everyone,
I've got a set of equations and I'd really like to determine the number of real solutions in terms of the unspecified parameters. The equations are:
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};
where x1, x2, x3, and x4 are the variables I'd like to solve for and k1, k2, k3, k4, k5, k6, k7, and Xtot are real numbers that are greater than or equal to zero. I've tried doing
Solve[eqs, {x1, x2, x3, x4}, Reals]
but after days and days I still have no solution. Perhaps there's a faster or better way to do this?
Thanks,
Dan
Back to comp.soft-sys.math.mathematica | Previous | Next | Find similar | Unroll thread
anything faster than Solve[] for solving sets of polynomial equations symbolically? dantimatter <google@dantimatter.com> - 2011-05-03 09:47 +0000
csiph-web