%!

 
    15 15 scale
    10 30 translate
    0.01 setlinewidth

    newpath
    -8 0 moveto
    -8 -3 lineto
    8 -3 lineto
    8 0 lineto
    -5 0 lineto
    closepath
    0.5 0.5 1 setrgbcolor
    fill
    
   newpath
   0 10 10 220 320 arc
   0.5 0.5 1 setrgbcolor
   fill



5 -8 translate
0.7 setgray
0.1 setlinewidth

newpath
-5 -5 moveto
-5 8 lineto
closepath
stroke

newpath
-5 -5 0.7906 0 360 arc
fill


newpath
-5 -5 3.1622 0 360 arc
stroke

newpath
-5 -5 4.4721 0 360 arc
stroke 

newpath
-5 -5 5.4772 0 360 arc
stroke 

newpath
-5 -5 6.3245 0 360 arc
stroke

1 0.5 0.5 setrgbcolor

newpath
-5 -5 2.2361 0 360 arc
stroke
 
newpath
-5 -5 3.8730 0 360 arc
stroke 

newpath
-5 -5 5.0000 0 360 arc
stroke 
newpath
-5 -5 5.916 0 360 arc
stroke


        
stroke