%!
%%BoundingBox: 95 95 195 195
gsave
100 100 translate
10 setlinewidth
1 setlinejoin
0 setgray
newpath
0 0 moveto
50 0 lineto
50 90 lineto
0 90 lineto
0 0 lineto
closepath
gsave stroke grestore
fill
newpath
50 20 moveto
90 10
90 80
50 70 curveto
stroke
showpage
grestore