summaryrefslogtreecommitdiff
path: root/info/examples/lgc2/3-2-6.mp
blob: 42cae6014af10e81c015c4ee8fb90e1dd9f1b981 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
% --- start of displayed preamble in the book ---

% --- end of displayed preamble in the book ---
defaultfont:="ptmr8r";
warningcheck:=0;
beginfig(1)
draw fullcircle scaled 2cm;
picture savepic;
savepic=currentpicture;
currentpicture:=nullpicture;
draw savepic scaled .5;
draw savepic scaled .5 shifted (3cm,0);
endfig;
end;