2 outputtemplate:="%j.mps";
5 filldraw fullcircle scaled(600);
6 filldraw fullcircle scaled(550) withcolor(241/256,205/256,67/256);
7 filldraw fullcircle scaled(100);
8 p1:=fullcircle scaled(500);
9 p2:=p1 cutafter (point(4/3) of(p1));
10 p3:=fullcircle scaled(150);
11 p4:=p3 cutafter (point(4/3) of(p3));
12 p10:=(75,0)--(250,0)..p2--reverse(p4)..cycle;
14 filldraw (p10 rotated(120));
15 filldraw (p10 rotated(240));
17 r:=17pt/(xpart(urcorner(currentpicture))-xpart(ulcorner(currentpicture)));
20 currentpicture:=nullpicture;
23 z0=.5*urcorner(currentpicture)+.5*ulcorner(currentpicture);
24 z1=.5*lrcorner(currentpicture)+.5*llcorner(currentpicture);
27 clip currentpicture to ((z0-(8.5pt,0))--(z0+(8.5pt,0))--(z1+(8.5pt,0))--(z1-(8.5pt,0))--cycle);