tex/src/package/dice.eps

   1 %!PS-Adobe-2.0 EPSF-1.2
   2 %%BoundingBox: 0 0 258 86
   3 /frame { /n exch def /xoffset n 1 sub 43 mul def gsave newpath
   4 xoffset yoffset translate 32 5 bw sub moveto 32 10 r -90 0 arc
   5 37 bw add 32 lineto 32 32 r 0 90 arc 10 37 bw add lineto
   6 10 32 r 90 180 arc 5 bw sub 10 lineto 10 10 r 180 270 arc closepath
   7 bw 0 eq { stroke } { fill } ifelse grestore } def
   8 /dot { /y exch def /x exch def /n exch def /xoffset n 1 sub 43
   9 mul def gsave newpath xoffset yoffset translate x 8 mul 5 add y 8 mul
  10 5 add 3.5 0 360 arc closepath bw setgray fill grestore } def
  11 2 setlinewidth 0 1 1 { /bw exch def /yoffset bw 43 mul def /r 5 bw
  12 add def 0 setgray 1 1 6 { frame } for 2 1 6 { dup 1 2 3 { dup dot }
  13 for } for 1 2 5 { 2 2 dot } for 4 1 6 { dup 1 3 dot 3 1 dot } for
  14 1 2 3 { 6 exch 2 dot } for } for
  15 %%EOF