prologues:=1; outputtemplate:="%j.mps"; beginfig(1); linecap := butt; pickup pencircle scaled(0.3bp); draw (5.812500,6.164060)..controls (6.117190,6.468750) and (6.488280,6.718750)..(6.917970,6.718750) ..controls (7.347660,6.718750) and (7.722660,6.468750)..(8.027340,6.164060) ..controls (8.027340,6.164060) and (13.082000,1.105470)..(13.085900,1.105470) ..controls (13.386700,0.804688) and (13.636700,0.429688)..(13.636700,0.000000) ..controls (13.636700,-0.429688) and (13.386700,-0.804688)..(13.085900,-1.105470) ..controls (13.082000,-1.105470) and (8.027340,-6.164060)..(8.027340,-6.164060) ..controls (7.722660,-6.468750) and (7.347660,-6.718750)..(6.917970,-6.718750) ..controls (6.488280,-6.718750) and (6.117190,-6.468750)..(5.812500,-6.164060) ..controls (5.812500,-6.164060) and (0.753906,-1.105470)..(0.753906,-1.105470) ..controls (0.449219,-0.804688) and (0.199219,-0.429688)..(0.199219,0.000000) ..controls (0.199219,0.429688) and (0.449219,0.804688)..(0.753906,1.105470) ..controls (0.753906,1.105470) and (5.812500,6.164060)..(5.812500,6.164060) --cycle; linecap := rounded; draw (6.363280,6.582030)--(6.363280,7.750000)--(7.472660,7.750000) --(7.472660,6.582030); draw (6.363280,-6.582030)--(6.363280,-10.757800); draw (7.472660,-6.582030)--(7.472660,-10.757800); draw (2.492190,-10.757800)--(11.347700,-10.757800); fill (8.855470,2.390630)..controls (9.726560,2.390630) and (9.699220,3.757810)..(8.855470,3.734380) ..controls (8.007810,3.734380) and (8.007810,2.390630)..(8.855470,2.390630) --cycle; fill (7.824220,2.929690)..controls (7.824220,2.929690) and (5.546880,1.433590)..(5.335940,1.199220) ..controls (5.148440,0.968750) and (4.937500,0.734375)..(4.937500,0.164063) ..controls (4.937500,-0.402344) and (5.679690,-1.179690)..(6.074220,-1.644530) --(6.074220,-3.738280)--(7.453130,-3.738280)--(6.660160,-3.480470) --(6.660160,-1.386720)..controls (6.660160,-1.281250) and (5.863280,-0.195313)..(5.812500,-0.042969) ..controls (5.785160,0.140625) and (5.757810,0.398438)..(5.890630,0.500000) ..controls (6.023440,0.632813) and (8.273440,2.257810)..(8.246090,2.285160) --cycle; fill (5.097660,0.269531)--(2.820310,-2.136720)--(4.144530,-3.218750) --(3.562500,-2.339840)--(5.468750,-0.222656)--cycle; fill (7.585940,-0.945313)--(7.585940,2.699220)--(5.757810,2.699220) --(6.394530,1.742190)--(5.812500,1.304690)..controls (5.812500,1.304690) and (5.125000,2.234380)..(5.125000,2.441410) ..controls (5.125000,2.648440) and (5.097660,2.906250)..(5.281250,3.085940) ..controls (5.468750,3.292970) and (5.546880,3.449220)..(5.945310,3.449220) --(6.894530,3.449220)..controls (7.347660,3.449220) and (7.425780,3.371090)..(7.558590,3.242190) ..controls (7.664060,3.136720) and (8.246090,2.285160)..(8.246090,2.285160) --(8.246090,-0.582031)--cycle; fill (6.074220,0.863281)--(7.953130,-1.980470)--(7.398440,-2.417970) --(8.351560,-3.738280)--(9.382810,-3.738280)--(9.808590,-2.675780) --(8.878910,-1.359380)--(8.296880,-1.722660)--(6.445310,1.148440) --cycle; picture pic; pic:=currentpicture; currentpicture:=nullpicture; drawoptions(); draw pic scaled(1.217); z0=.5*urcorner(currentpicture)+.5*ulcorner(currentpicture); z1=.5*lrcorner(currentpicture)+.5*llcorner(currentpicture); draw (z0+(10.5,2)); draw (z1-(10.5,3)); clip currentpicture to ((z0-(8.5pt,0))--(z0+(8.5pt,0))--(z1+(8.5pt,-3pt))--(z1-(8.5pt,3pt))--cycle); endfig; end