> restart;
> x:=cos(t);
> y:=sin(t);
> m:=[x+t*sin(s),y+t*cos(s), s=0..2*Pi];
> t:=2*n*Pi/40;
> w:=evalf(m):
> plot([w$n=1..100],color=blue,axes=none,scaling=constrained);
>