% --- start of displayed preamble in the book ---

% --- start of displayed preamble in the book ---
input metaobj
% --- end of displayed preamble in the book ---
% graphic converted to gray in book using 'color2gray'
defaultfont:="ptmr8r";
warningcheck:=0;
beginfig(1)
newRandomBox.a(1cm,5mm,2mm,-1mm)
"framed(true)", "framewidth(1mm)",
"framecolor(green)",
"filled(true)",
"fillcolor(red)";
a.c=origin; drawObj(a);
endfig;
end;