%!
newpath
/X {moveto currentlinewidth 1 setlinewidth 5 5 rmoveto -10 -10 rlineto 10 0 rmoveto -10 10 rlineto stroke setlinewidth} def
/Times-Roman findfont 20 scalefont setfont
50 50 moveto (lines3.ps    91-03-20 02:02) show
100 100 translate
2 setlinewidth
9 -2 moveto 107 387 193 387 290 -2 curveto stroke
-9 2 moveto 92 412 208 412 309 2 curveto stroke
9 -2 X 107 387 X 193 387 X 290 -2 X
-9 2 X 92 412 X 208 412 X 309 2 X
showpage