Construct a falling hair
home
p1:=plot::Curve2d([cos(3*t),sin(t^(1/2)+q)],t=0..2*PI,q=0..PI)
plot(p1,Axes=None,Scaling=Constrained);