%!PS
%%BoundingBox: -40 -40 40 40
%%Creator: cgl (inspired  by Guy Shaw)
%%CreationDate: 1996.05.23:1858
%%Pages: 1
%%EndProlog
%%Page: 1 1
%Essential part
%300 500 translate
25  34 moveto currentpoint
0  -68 rlineto currentpoint%down
 -120 rotate
25  34 lineto%preserve symmetry
  120 rotate currentpoint
17  20 lineto currentpoint
-17.6 0 lineto currentpoint
%labels
/Courier findfont 8 scalefont setfont
moveto -5 -3 rmoveto (5) show
moveto 1 1 rmoveto (4) show
moveto 2 -5 rmoveto (3) show
moveto 2 0 rmoveto (2) show
moveto 2 0 rmoveto (1) show
stroke
showpage