eq:a*x^2+b*x+c = 0;
sol:solve(eq,x);
quad(a,b,c) := ev([rhs(sol[1]),rhs(sol[2])]);