Ivan's Space Bird:

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