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

> G:='G':

> gpt := plots[textplot]([2/Pi,-.05,`G`]):
ag := plot([[0,0],[2/Pi,0]],color=magenta,thickness=3):

> plots[display]([sqr,gpt,ag,quad(1),qcirc],scaling=constrained);