To_Poly_Solve_1

var("x") 
       
x
solve(x^x == 7, x, to_poly_solve=True) 
       
[x=log⁡(7)W⁡(log⁡(7))]
solve(x^3 + x^2 - x - 5 == 0, x, to_poly_solve=True) 
       
[x=−12(29353+6227)13(i3+1)+2i3−29(29353+6227)13−13,x=−12(29353+6227)13(−i3+1)+−2i3−29(29353+6227)13−13,x=(29353+6227)13+49(29353+6227)13−13]
z1(x) = x^5 
       
z2(x) = 5^x 
       
solve(z1(x) == z2(x), x, to_poly_solve=True) 
       
[x=−5W⁡(−1205log⁡(5)−120i25+10log⁡(5)+120log⁡(5))log⁡(5),x=−5W⁡(1205log⁡(5)−120i−25+10log⁡(5)+120log⁡(5))log⁡(5),x=−5W⁡(1205log⁡(5)+120i−25+10log⁡(5)+120log⁡(5))log⁡(5),x=−5W⁡(−1205log⁡(5)+120i25+10log⁡(5)+120log⁡(5))log⁡(5),x=−5W⁡(−15log⁡(5))log⁡(5)]