# convert to Complex a+b*i;

tocomplex(polar(x_,y_)):=x*cis(y);
tocomplex(point(x_,y_)):=x+y*i;
tocomplex(vector(x_,y_)):=x+y*i;