> tubeplot({[0,3*sin(2*Pi/10*t),t,t=0..10],[0, t, -2*abs(t-10)+10, t=5..15],[0, t, 5, t=8..12], [0,t, -.5*(t-24)*(t-18)*(t-21)^2, t =18..24]},numpoints=20, radius=1,axes=normal,scaling=constrained,orientation=[44, 86]);