% --- start of displayed preamble in the book --- input metaobj % Circles produced as before % --- end of displayed preamble in the book --- newCircle.a(btex start etex); newCircle.b(btex end etex); a.c=origin; b.c-a.c=(3cm,1cm); defaultfont:="ptmr8r"; warningcheck:=0; beginfig(1) ncarc(a)(b) "linecolor(blue)"; ncarc(b)(a) "linecolor(blue)"; ncarc(a)(b) "arcangleA(50)"; ncarc(b)(a) "arcangleA(-90)","arcangleB(-110)", "linestyle(dashed evenly)"; drawObj(a,b); endfig; end;