/inch {72 mul} def

/rack {
    gsave
	      
	newpath
	moveto
	1 setlinewidth
	0 0.5 inch rlineto
	0.5 inch 0 rlineto
	0 -0.5 inch rlineto
	closepath
	0 26 rmoveto
	0.5 inch 0 rlineto
	-35 2 rmoveto
	/Courier findfont 8 scalefont setfont
	show
	stroke

    grestore
}def

(Foo) 72 72 rack

showpage % Page is done, print it.