Hi guys!
I'm going to plot:
plote1 := spacecurve(e1(theta),theta=a1..b1,color=red):
plote1p := plot(e1plan(theta),theta=Pi/4..Pi/2,color=red):
plote2 := spacecurve(e2(theta),theta=a2..b2,color=blue):
plote2p := plot(e2plan(theta),theta=0..Pi,color=blue):
plote3 := spacecurve(e3(theta),theta=a3..b3,color=yellow):
plote3p := plot(e3plan(theta),theta=0..3*Pi/2,color=yellow):
A := array(1..2):
A[1] := display(C,plote3,plote1,plote2,orientation=[60,75],axes=box):