%!PS-Adobe-2.0 EPSF-1.2 %%BoundingBox: 0 0 258 43 /frame { 1 sub 43 mul /o exch def gsave newpath o 0 translate 32 5 moveto 32 10 5 -90 0 arc 37 32 lineto 32 32 5 0 90 arc 10 37 lineto 10 32 5 90 180 arc 5 10 lineto 10 10 5 180 270 arc closepath stroke grestore } def /dot { /y exch def /x exch def 1 sub 43 mul /o exch def gsave newpath o 0 translate x 8 mul 5 add y 8 mul 5 add 3.5 0 360 arc closepath fill grestore } def 2 setlinewidth 0 setgray 1 1 6 { frame } for 2 1 6 { dup 1 2 3 { dup dot } for } for 1 2 5 { 2 2 dot } for 4 1 6 { dup 1 3 dot 3 1 dot } for 1 2 3 { 6 exch 2 dot } for