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)+2i329(29353+6227)1313,x=12(29353+6227)13(i3+1)+2i329(29353+6227)1313,x=(29353+6227)13+49(29353+6227)1313]
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)120i25+10log(5)+120log(5))log(5),x=5W(1205log(5)+120i25+10log(5)+120log(5))log(5),x=5W(1205log(5)+120i25+10log(5)+120log(5))log(5),x=5W(15log(5))log(5)]