newpath x y moveto -6.5 mm 4.5 mm rmoveto
14 mm 0 rlineto 0 -14 mm rlineto -14 mm 0 rlineto closepath
gsave 0.8 setgray fill grestore stroke
/Helvetica-Oblique findfont 10 scalefont setfont
(put) cr
(stamp) cr
(here) cr
