% --- start of displayed preamble in the book --- input metaobj % --- end of displayed preamble in the book --- defaultfont:="ptmr8r"; warningcheck:=0; beginfig(1) newRecursiveBox.a(8); scaleObj(a,.3); a.c=origin; drawObj(a); endfig; end;