# convert radian to degree; todegree(x_) := 180/3.141592653589793*x*degree; todegree(polar(r_,x_)):=polar(r,180/3.141592653589793*x*degree);