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

% --- end of displayed preamble in the book ---
defaultfont:="ptmr8r";
warningcheck:=0;
beginfig(1)
  numeric u;
  u=3cm;
  special("0 0.5 dtransform truncate " &
          "idtransform setlinewidth pop []");
  special("0 setdash");
  special("1 setlinecap 1 setlinejoin ");
  special("10 setmiterlimit");
  special("newpath 0 0 moveto");
  special("-67.28128 56.4566 28.58275 " &
          "152.32063 85.03935 85.03935 curveto");
  special("138.11453 21.78784 18.75612 " &
          "-37.89137 0 42.51967");
  special("curveto stroke");
  setbounds currentpicture
      to ((-24,-1)--(256,-1)
          --(256,109)--(-24,109)--cycle);
endfig;
end;