20 setxunit
1.9 12.1 setxrange
1.9 8.1 setyrange
usecolor
/fillstyle {grey85 fill} def

1 setlinewidth

[2 5 2 3 3 2 5 2 7 2 8 4 9 4 10 4 10 3.5 11 3.5 12 3.5 12 4 12 5 12 6 10 8 7 8 4 8 2 7 2 5] bezier_curve*

1 setlinewidth

11 3.5 point