20 setxunit
-2 2.5 setxrange
-2 2 setyrange
usecolor
/fillstyle {grey85 fill} def
0 setlinewidth
0 0 2 cercle*
/fillstyle {blanc fill} def
0.5 setlinewidth
2 0 0.5 cercle*
2 0 point1
0 0 point1
0 0 2 cercle