Robuta

https://www.wolfram.com/mathematica/new-in-8/new-and-improved-core-algorithms/solve-high-degree-real-polynomial-equations-numeri.html Solve High-Degree Real Polynomial Equations Numerically: New in Mathematica 8 real polynomialnew insolvehighdegree