Terence's Doodle:

This space curve was produced using the following Maple commands:

> x:=100*cos(t)+100*sin(3*Pi*t);
> y:=100*sin(t)-100*cos(3*Pi*t);
> z:=500*sin(t)*cos(5*Pi*t) + 500*cos(t);

                  x := 100 cos(t) + 100 sin(3 Pi t)


                  y := 100 sin(t) - 100 cos(3 Pi t)


               z := 500 sin(t) cos(5 Pi t) + 500 cos(t)

> with(plots):
> spacecurve([x,y,z],t=1..40*Pi,numpoints=5000,
>   axes='NORMAL',orientation=[45,75]);