For reference, here is the finished code for the circle and line:

> with(plottools):with(plots):

> c:=circle([0,0],1):

> l:=display(seq(line([0, 0], [cos(t/100), sin(t/100)], color=red), t=0..200*evalf(Pi, 3)), insequence=true):

> display(c, l, scaling=constrained);

 

 

Solutions

Back to Content