/blank {initgraphics 0 0 moveto 2000 0 rlineto 0 2000 rlineto
-2000 0 rlineto closepath currentrgbcolor 0 setgray fill
setrgbcolor} def
blank
