% --- start of displayed preamble in the book --- input metaobj % --- end of displayed preamble in the book --- defaultfont:="ptmr8r"; warningcheck:=0; beginfig(1) t:=_T(new_Circle(btex foo etex)) (_T(new_HFan_(1cm,0) ("filled(true)", "fillcolor(blue)", "fanlinearc(1mm)" ) ) (TC,new_HFan_(1cm,0) ("fanlinestyle(dashed evenly)"))); Obj(t).c=origin; draw_Obj(t); endfig; end;