% --- start of displayed preamble in the book ---
input boxes
% --- end of displayed preamble in the book ---
defaultfont:="ptmr8r";
warningcheck:=0;
beginfig(1)
boxjoin(a.se=b.nw-(10,-10));
boxit.one("One");  boxit.two("Two");
drawunboxed(one,two);
drawarrow one.n{dir 45}..two.n;
endfig;
end;