> with(plottools);with(plots);

> pie := plottools[pieslice]([0,0],1,0..Pi/3,color=yellow):

> txt1 :=textplot({[.9,.6,`t`],[.62,.4,`y = sin(t)`],
[.4,.9,`dt`],[.55,.9,`dy`],[.4,.9,`dt`],[.45,1,`dx`]});

> plt := plot([[cos(Pi/3),sin(Pi/3)],[cos(Pi/3) ,0]],thickness=2,color=blue):

> plt2 := plot([[cos(Pi/3),sin(Pi/3)],[cos(Pi/3),sin(Pi/3)]+
.1*[0,sin(Pi/3)],
[cos(Pi/3),sin(Pi/3)]+.2*[-sin(Pi/3),cos(Pi/3)],
[cos(Pi/3),sin(Pi/3)]],thickness=2,color=blue):

>

> plots[display]([pie,txt1, plt,plt2],scaling=constrained);