Shaun's Decaying Loopy Spiral:

This space curve was produced using the following Maple
commands:
> x:=rho*cos(t);
> y:=rho*sin(t);
> z:=t/2/Pi/10;
> rho:=(sin(2*t/Pi))*exp(-t/30);
x := rho cos(t)
y := rho sin(t)
t
z := 1/20 ----
Pi
t
rho := sin(2 ----) exp(- 1/30 t)
Pi
> with(plots):
> spacecurve([x,y,z],t=0..40*Pi,numpoints=1000,
> axes='NORMAL',scaling='CONSTRAINED',
> thickness=2,orientation=[45,75]);
SFU /
Math & Stats /
~hebron /
math252 /
assignments /
sol03 /
studentcurves /
shaun.html
Revised 11 Feburary 1999 by
John Hebron.