>

> restart;

> m:=[(1-t)*cos(s),t*sin(s),s=0..2*Pi];

> t:=0.05*n;

> plot([m$n=0..20],axes=none,scaling=constrained,color=green);

>