2 outputtemplate:="%j.mps";
\r
4 drawoptions (withcolor (1.000000,0.000000,0.000000));
\r
7 fill (0.539063,2.386720)..controls (0.062500,3.054690) and (0.417969,3.679690)..(3.828130,9.566410)
\r
8 ..controls (7.230470,15.437500) and (7.667970,16.332001)..(8.425780,16.332001)
\r
9 ..controls (9.203130,16.332001) and (9.546880,15.644500)..(12.906300,9.839840)
\r
10 ..controls (16.246099,4.074220) and (16.789101,3.378910)..(16.304701,2.550780)
\r
11 ..controls (15.828100,1.730470) and (14.902300,1.925780)..(8.371090,1.906250)
\r
12 ..controls (1.863280,1.886720) and (1.015630,1.726560)..(0.539063,2.386720)
\r
14 drawoptions (withcolor (0.976471,0.976471,0.976471));
\r
15 fill (14.859400,3.312500)--(2.042970,3.312500)--(8.449220,14.281300)
\r
17 drawoptions (withcolor (0.000000,0.000000,0.000000));
\r
19 pickup pencircle scaled 1.117530bp;
\r
20 linejoin := mitered;
\r
21 draw (7.164060,9.410160)..controls (9.523440,9.652340) and (9.851560,9.390630)..(10.046900,9.023440)
\r
22 ..controls (10.632800,7.937500) and (6.195310,6.769530)..(6.410160,5.710940)
\r
23 ..controls (6.621090,4.656250) and (8.519530,5.039060)..(10.906300,5.105470);
\r
24 pickup pencircle scaled 0.000000bp;
\r
25 fill (7.226560,9.800780)..controls (7.023440,9.886720) and (6.460940,9.441410)..(6.457030,9.382810)
\r
26 ..controls (6.457030,9.312500) and (7.023440,8.921880)..(7.226560,9.027340)
\r
27 ..controls (7.429690,9.132810) and (7.429690,9.710940)..(7.226560,9.800780)
\r
29 pickup pencircle scaled 0.223506bp;
\r
30 draw (7.226560,9.800780)..controls (7.023440,9.886720) and (6.460940,9.441410)..(6.457030,9.382810)
\r
31 ..controls (6.457030,9.312500) and (7.023440,8.921880)..(7.226560,9.027340)
\r
32 ..controls (7.429690,9.132810) and (7.429690,9.710940)..(7.226560,9.800780)
\r
34 pickup pencircle scaled 0.01bp;
\r
35 draw (14.859400,3.312500)--(2.042970,3.312500)--(8.449220,14.281300)
\r
37 draw (0.539063,2.386720)..controls (0.062500,3.054690) and (0.417969,3.679690)..(3.828130,9.566410)
\r
38 ..controls (7.230470,15.437500) and (7.667970,16.332001)..(8.425780,16.332001)
\r
39 ..controls (9.203130,16.332001) and (9.546880,15.644500)..(12.906300,9.839840)
\r
40 ..controls (16.246099,4.074220) and (16.789101,3.378910)..(16.304701,2.550780)
\r
41 ..controls (15.828100,1.730470) and (14.902300,1.925780)..(8.371090,1.906250)
\r
42 ..controls (1.863280,1.886720) and (1.015630,1.726560)..(0.539063,2.386720)
\r
44 r:=17pt/(xpart(urcorner(currentpicture))-xpart(ulcorner(currentpicture)));
\r
46 pic:=currentpicture;
\r
47 currentpicture:=nullpicture;
\r
50 z0=.5*urcorner(currentpicture)+.5*ulcorner(currentpicture);
\r
51 z1=.5*lrcorner(currentpicture)+.5*llcorner(currentpicture);
\r
54 clip currentpicture to ((z0-(8.5pt,0))--(z0+(8.5pt,0))--(z1+(8.5pt,-1pt))--(z1-(8.5pt,1pt))--cycle);
\r