summaryrefslogtreecommitdiff
path: root/info/examples/lgc2/3-5-27.mp
blob: fbb53adcfdb11567440bd3936bde7d65f36d9525 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
% --- start of displayed preamble in the book ---
input metaobj
% Circle produced as before

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

  newCircle.a(btex start etex);
  a.c=origin;

defaultfont:="ptmr8r";
warningcheck:=0;
beginfig(1)
nccircle(a) "angleA(0)",
  "linecolor(blue)","linewidth(1pt)";
drawObj(a);
endfig;
end;