blob: 2ce02619386e8abb3ca0f138b7fdce4a2c5b1a3b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
% --- 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;
|