% --- start of displayed preamble in the book --- input metaobj % --- end of displayed preamble in the book --- defaultfont:="ptmr8r"; warningcheck:=0; beginfig(1) newPolygon.a(btex Box A etex,5) "fit(false)","polymargin(5mm)"; newBox.b(btex Box B etex scaled \magstep3); newHRazor.ba(1cm); newPolygon.c(btex Box C etex scaled \magstep2,11) "polymargin(3mm)"; newHBox.h(a,b,ba,c) "align(center)","hsep(3mm)"; h.c=origin; drawObj(h); endfig; end;