% $Id: bx,v 1.2 2004/09/19 21:47:11 karl Exp $ % Public domain. vardef C.bx(expr n) = save p; picture p; p=nullpicture; addto p contour ((0,0)--(1,0)--(1,1)--(0,1)--cycle) scaled (fontsize n/2); p enddef;