> restart;

> plot([[k*cos(t),k*sin(t),t=0..2*Pi]$k=1..20],color=gold,scaling=constrained,axes=none);