20 setxunit
-2 2 setxrange
-2 2 setyrange
usecolor
/fillstyle {grey85 fill} def
0 setlinewidth
0 0 2 cercle*
/fillstyle {blanc fill} def
1.2 0.4 0.6 cercle*
0 0 point1
1.2 0.4 point1
[0 0 1.2 0.4 1.78 0.25] ligne