% --- 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;