polarplot(r_,t_,tmin_,tmax_,rmin_,rmax_) := parametricplot(r_*cos(t_),r_*sin(t_),t_,tmin_,tmax_,rmin_,rmax_,100);
polarplot(r_,t_,tmin_,tmax_) := parametricplot(r_*cos(t_),r_*sin(t_),t_,tmin_,tmax_,(-10),10,100);
polarplot(r_,t_) := parametricplot(r_*cos(t_),r_*sin(t_),t_,0,6.28,(-10),10,100);
polarplot(r_) := parametricplot(r_*cos(x),r_*sin(x),x,0,6.28,(-10),10,100);