% file "file.ps",  demo for \file  hv 2007-01-01
newpath 20  20 moveto   0 50 rlineto 50 0 rlineto
0 -50 rlineto -50 0 rlineto closepath
2 setlinejoin 7.5 setlinewidth stroke