Carlos's Sombrero:

This space curve was produced using the following Maple commands:

> x:=t*cos(3*t);
> y:=t*sin(3*t);
> z:=cos(1/20*t);

                           x := t cos(3 t)


                           y := t sin(3 t)


                           z := cos(1/20 t)

> spacecurve([x,y,z],t=0..25*Pi,numpoints=1000,
>   axes='FRAMED');