-1 8 setxrange
-1 8 setyrange

/M0 {3.5 4} def

traceaxes
unites
axesarrow

medium setcourbelinewidth

M0 times2
M0 2 cercle
M0 3 cercle