> x:=rho*sin(t); > y:=rho*cos(t); > z:=sin(Pi*t)/2; > rho:=sin(t)*(cos(Pi*t))^2; x := rho sin(t) y := rho cos(t) z := 1/2 sin(t Pi) 2 rho := sin(t) cos(t Pi) > with(plots): > spacecurve([x,y,z],t=0..40*Pi,numpoints=1000, > axes=normal,orientation=[45,75]);