% --- start of displayed preamble in the book ---
input metaobj;
show_empty_boxes:=true;
% --- end of displayed preamble in the book ---
defaultfont:="ptmr8r";
warningcheck:=0;
beginfig(1)
newRandomBox.a(2cm,1cm,2mm,-1mm) "framed(true)";
a.c=origin; drawObj(a);
endfig;
end;
