X-Git-Url: https://melusine.eu.org/syracuse/G/git/?p=bclogo.git;a=blobdiff_plain;f=dev%2Flatex%2Fsources_MetaPost%2Fbc-dallemagne.mp;fp=dev%2Flatex%2Fsources_MetaPost%2Fbc-dallemagne.mp;h=7585432ddca40552f7bb65041222e3177f7b2da1;hp=7f2528f8eb39dcd0b98308e42adfb627b02591f4;hb=c1f1ac00f2c0cc73bc3be6baa3dbd3482a36d189;hpb=f5b81d9a9dd19118b5bc05f9fc898a50165e2b49 diff --git a/dev/latex/sources_MetaPost/bc-dallemagne.mp b/dev/latex/sources_MetaPost/bc-dallemagne.mp index 7f2528f..7585432 100644 --- a/dev/latex/sources_MetaPost/bc-dallemagne.mp +++ b/dev/latex/sources_MetaPost/bc-dallemagne.mp @@ -1,160 +1,160 @@ -prologues:=1; -outputtemplate:="%j.mps"; -beginfig(1); -linecap := butt; -fill (0.000000,24.800800)--(0.507813,24.859400)--(0.984375,24.906300) - --(1.441410,24.937500)--(1.867190,24.953100)--(2.273440,24.953100) - --(2.660160,24.945299)--(3.023440,24.921900)--(3.367190,24.890600) - --(3.695310,24.847700)--(4.003910,24.796900)--(4.300780,24.742201) - --(4.582030,24.675800)--(4.847660,24.605499)--(5.105470,24.527300) - --(5.351560,24.449200)--(5.589840,24.367201)--(5.820310,24.281300) - --(6.042970,24.195299)--(6.261720,24.109400)--(6.476560,24.023399) - --(6.691410,23.937500)--(6.902340,23.855499)--(7.117190,23.777300) - --(7.328130,23.703100)--(7.546880,23.632799)--(7.765630,23.570299) - --(7.992190,23.511700)--(8.226560,23.464800)--(8.468750,23.425800) - --(8.718750,23.394501)--(8.980470,23.378901)--(9.253910,23.371099) - --(9.542970,23.375000)--(9.843750,23.394501)--(10.160200,23.429701) - --(10.496100,23.476601)--(10.847700,23.542999)--(11.218800,23.625000) - --(11.613300,23.726601)--(12.031300,23.843800)--(12.472700,23.984400) - --(12.937500,24.144501)--(13.425800,24.328100)--(13.945300,24.535200) - --(14.492200,24.761700)--(15.070300,25.015600)--(15.679700,25.292999) - --(16.324200,25.601601)--(17.000000,25.933599)--(17.000000,22.191401) - --(16.324200,21.859400)--(15.679700,21.554701)--(15.070300,21.277300) - --(14.492200,21.023399)--(13.945300,20.792999)--(13.425800,20.589800) - --(12.937500,20.406300)--(12.472700,20.246099)--(12.031300,20.105499) - --(11.613300,19.984400)--(11.218800,19.886700)--(10.847700,19.804701) - --(10.496100,19.738300)--(10.160200,19.687500)--(9.843750,19.656300) - --(9.542970,19.636700)--(9.253910,19.628901)--(8.980470,19.636700) - --(8.718750,19.656300)--(8.468750,19.687500)--(8.226560,19.726601) - --(7.992190,19.773399)--(7.765630,19.828100)--(7.546880,19.894501) - --(7.328130,19.960899)--(7.117190,20.035200)--(6.902340,20.117201) - --(6.691410,20.199200)--(6.476560,20.281300)--(6.261720,20.367201) - --(6.042970,20.453100)--(5.820310,20.542999)--(5.589840,20.625000) - --(5.351560,20.710899)--(5.105470,20.789101)--(4.847660,20.863300) - --(4.582030,20.933599)--(4.300780,21.000000)--(4.003910,21.058599) - --(3.695310,21.109400)--(3.367190,21.148399)--(3.023440,21.183599) - --(2.660160,21.203100)--(2.273440,21.214800)--(1.867190,21.210899) - --(1.441410,21.195299)--(0.984375,21.164101)--(0.507813,21.121099) - --(0.000000,21.058599)--cycle; -drawoptions (withcolor (208/256,0,0)); -fill (0.000000,21.058599)--(0.507813,21.121099)--(0.984375,21.164101) - --(1.441410,21.195299)--(1.867190,21.210899)--(2.273440,21.214800) - --(2.660160,21.203100)--(3.023440,21.183599)--(3.367190,21.148399) - --(3.695310,21.109400)--(4.003910,21.058599)--(4.300780,21.000000) - --(4.582030,20.933599)--(4.847660,20.863300)--(5.105470,20.789101) - --(5.351560,20.710899)--(5.589840,20.625000)--(5.820310,20.542999) - --(6.042970,20.453100)--(6.261720,20.367201)--(6.476560,20.281300) - --(6.691410,20.199200)--(6.902340,20.117201)--(7.117190,20.035200) - --(7.328130,19.960899)--(7.546880,19.894501)--(7.765630,19.828100) - --(7.992190,19.773399)--(8.226560,19.726601)--(8.468750,19.687500) - --(8.718750,19.656300)--(8.980470,19.636700)--(9.253910,19.628901) - --(9.542970,19.636700)--(9.843750,19.656300)--(10.160200,19.687500) - --(10.496100,19.738300)--(10.847700,19.804701)--(11.218800,19.886700) - --(11.613300,19.984400)--(12.031300,20.105499)--(12.472700,20.246099) - --(12.937500,20.406300)--(13.425800,20.589800)--(13.945300,20.792999) - --(14.492200,21.023399)--(15.070300,21.277300)--(15.679700,21.554701) - --(16.324200,21.859400)--(17.000000,22.191401)--(17.000000,18.339800) - --(16.324200,18.007799)--(15.679700,17.703100)--(15.070300,17.421900) - --(14.492200,17.167999)--(13.945300,16.941401)--(13.425800,16.734400) - --(12.937500,16.550800)--(12.472700,16.390600)--(12.031300,16.253901) - --(11.613300,16.132799)--(11.218800,16.031300)--(10.847700,15.949200) - --(10.496100,15.882800)--(10.160200,15.835900)--(9.843750,15.800800) - --(9.542970,15.781300)--(9.253910,15.777300)--(8.980470,15.785200) - --(8.718750,15.804700)--(8.468750,15.832000)--(8.226560,15.871100) - --(7.992190,15.921900)--(7.765630,15.976600)--(7.546880,16.039101) - --(7.328130,16.109400)--(7.117190,16.183599)--(6.902340,16.261700) - --(6.691410,16.343800)--(6.476560,16.429701)--(6.261720,16.515600) - --(6.042970,16.601601)--(5.820310,16.687500)--(5.589840,16.773399) - --(5.351560,16.855499)--(5.105470,16.937500)--(4.847660,17.011700) - --(4.582030,17.082001)--(4.300780,17.148399)--(4.003910,17.203100) - --(3.695310,17.253901)--(3.367190,17.296900)--(3.023440,17.328100) - --(2.660160,17.351601)--(2.273440,17.359400)--(1.867190,17.359400) - --(1.441410,17.343800)--(0.984375,17.312500)--(0.507813,17.269501) - --(0.000000,17.207001)--cycle; -drawoptions (withcolor (1,206/256,0)); -fill (0.000000,17.207001)--(0.507813,17.269501)--(0.984375,17.312500) - --(1.441410,17.343800)--(1.867190,17.359400)--(2.273440,17.359400) - --(2.660160,17.351601)--(3.023440,17.328100)--(3.367190,17.296900) - --(3.695310,17.253901)--(4.003910,17.203100)--(4.300780,17.148399) - --(4.582030,17.082001)--(4.847660,17.011700)--(5.105470,16.937500) - --(5.351560,16.855499)--(5.589840,16.773399)--(5.820310,16.687500) - --(6.042970,16.601601)--(6.261720,16.515600)--(6.476560,16.429701) - --(6.691410,16.343800)--(6.902340,16.261700)--(7.117190,16.183599) - --(7.328130,16.109400)--(7.546880,16.039101)--(7.765630,15.976600) - --(7.992190,15.921900)--(8.226560,15.871100)--(8.468750,15.832000) - --(8.718750,15.804700)--(8.980470,15.785200)--(9.253910,15.777300) - --(9.542970,15.781300)--(9.843750,15.800800)--(10.160200,15.835900) - --(10.496100,15.882800)--(10.847700,15.949200)--(11.218800,16.031300) - --(11.613300,16.132799)--(12.031300,16.253901)--(12.472700,16.390600) - --(12.937500,16.550800)--(13.425800,16.734400)--(13.945300,16.941401) - --(14.492200,17.167999)--(15.070300,17.421900)--(15.679700,17.703100) - --(16.324200,18.007799)--(17.000000,18.339800)--(17.000000,14.601600) - --(16.324200,14.265600)--(15.679700,13.960900)--(15.070300,13.683600) - --(14.492200,13.429700)--(13.945300,13.199200)--(13.425800,12.996100) - --(12.937500,12.812500)--(12.472700,12.652300)--(12.031300,12.511700) - --(11.613300,12.394500)--(11.218800,12.293000)--(10.847700,12.210900) - --(10.496100,12.144500)--(10.160200,12.093800)--(9.843750,12.062500) - --(9.542970,12.043000)--(9.253910,12.039100)--(8.980470,12.043000) - --(8.718750,12.062500)--(8.468750,12.093800)--(8.226560,12.132800) - --(7.992190,12.179700)--(7.765630,12.234400)--(7.546880,12.300800) - --(7.328130,12.367200)--(7.117190,12.441400)--(6.902340,12.523400) - --(6.691410,12.605500)--(6.476560,12.687500)--(6.261720,12.773400) - --(6.042970,12.863300)--(5.820310,12.949200)--(5.589840,13.031300) - --(5.351560,13.117200)--(5.105470,13.195300)--(4.847660,13.269500) - --(4.582030,13.343800)--(4.300780,13.406300)--(4.003910,13.464800) - --(3.695310,13.515600)--(3.367190,13.558600)--(3.023440,13.589800) - --(2.660160,13.609400)--(2.273440,13.621100)--(1.867190,13.617200) - --(1.441410,13.601600)--(0.984375,13.574200)--(0.507813,13.527300) - --(0.000000,13.464800)--cycle; -drawoptions (withcolor (0.000000,0.000000,0.000000)); -pickup pencircle scaled 0.200000bp; -draw (0.000000,24.800800)--(0.507813,24.859400)--(0.984375,24.906300) - --(1.441410,24.937500)--(1.867190,24.953100)--(2.273440,24.953100) - --(2.660160,24.945299)--(3.023440,24.921900)--(3.367190,24.890600) - --(3.695310,24.847700)--(4.003910,24.796900)--(4.300780,24.742201) - --(4.582030,24.675800)--(4.847660,24.605499)--(5.105470,24.527300) - --(5.351560,24.449200)--(5.589840,24.367201)--(5.820310,24.281300) - --(6.042970,24.195299)--(6.261720,24.109400)--(6.476560,24.023399) - --(6.691410,23.937500)--(6.902340,23.855499)--(7.117190,23.777300) - --(7.328130,23.703100)--(7.546880,23.632799)--(7.765630,23.570299) - --(7.992190,23.511700)--(8.226560,23.464800)--(8.468750,23.425800) - --(8.718750,23.394501)--(8.980470,23.378901)--(9.253910,23.371099) - --(9.542970,23.375000)--(9.843750,23.394501)--(10.160200,23.429701) - --(10.496100,23.476601)--(10.847700,23.542999)--(11.218800,23.625000) - --(11.613300,23.726601)--(12.031300,23.843800)--(12.472700,23.984400) - --(12.937500,24.144501)--(13.425800,24.328100)--(13.945300,24.535200) - --(14.492200,24.761700)--(15.070300,25.015600)--(15.679700,25.292999) - --(16.324200,25.601601)--(17.000000,25.933599)--(17.000000,14.601600) - --(16.324200,14.265600)--(15.679700,13.960900)--(15.070300,13.683600) - --(14.492200,13.429700)--(13.945300,13.199200)--(13.425800,12.996100) - --(12.937500,12.812500)--(12.472700,12.652300)--(12.031300,12.511700) - --(11.613300,12.394500)--(11.218800,12.293000)--(10.847700,12.210900) - --(10.496100,12.144500)--(10.160200,12.093800)--(9.843750,12.062500) - --(9.542970,12.043000)--(9.253910,12.039100)--(8.980470,12.043000) - --(8.718750,12.062500)--(8.468750,12.093800)--(8.226560,12.132800) - --(7.992190,12.179700)--(7.765630,12.234400)--(7.546880,12.300800) - --(7.328130,12.367200)--(7.117190,12.441400)--(6.902340,12.523400) - --(6.691410,12.605500)--(6.476560,12.687500)--(6.261720,12.773400) - --(6.042970,12.863300)--(5.820310,12.949200)--(5.589840,13.031300) - --(5.351560,13.117200)--(5.105470,13.195300)--(4.847660,13.269500) - --(4.582030,13.343800)--(4.300780,13.406300)--(4.003910,13.464800) - --(3.695310,13.515600)--(3.367190,13.558600)--(3.023440,13.589800) - --(2.660160,13.609400)--(2.273440,13.621100)--(1.867190,13.617200) - --(1.441410,13.601600)--(0.984375,13.574200)--(0.507813,13.527300) - --(0.000000,13.464800)--cycle; -pickup pencircle scaled 0.8bp; -draw (0.000000,5.00000)--(0.000000,26); -r:=17pt/(xpart(urcorner(currentpicture))-xpart(ulcorner(currentpicture))); -picture pic; -pic:=currentpicture; -currentpicture:=nullpicture; -drawoptions(); -draw pic scaled(r); -%draw pic scaled(1); -z0=.5*urcorner(currentpicture)+.5*ulcorner(currentpicture); -z1=.5*lrcorner(currentpicture)+.5*llcorner(currentpicture); -draw (z0+(10.5,2)); -draw (z1-(10.5,2)); -clip currentpicture to ((z0-(8.5pt,0))--(z0+(8.5pt,0))--(z1+(8.5pt,0))--(z1-(8.5pt,0))--cycle); -endfig; -end +prologues:=1; +outputtemplate:="%j.mps"; +beginfig(1); +linecap := butt; +fill (0.000000,24.800800)--(0.507813,24.859400)--(0.984375,24.906300) + --(1.441410,24.937500)--(1.867190,24.953100)--(2.273440,24.953100) + --(2.660160,24.945299)--(3.023440,24.921900)--(3.367190,24.890600) + --(3.695310,24.847700)--(4.003910,24.796900)--(4.300780,24.742201) + --(4.582030,24.675800)--(4.847660,24.605499)--(5.105470,24.527300) + --(5.351560,24.449200)--(5.589840,24.367201)--(5.820310,24.281300) + --(6.042970,24.195299)--(6.261720,24.109400)--(6.476560,24.023399) + --(6.691410,23.937500)--(6.902340,23.855499)--(7.117190,23.777300) + --(7.328130,23.703100)--(7.546880,23.632799)--(7.765630,23.570299) + --(7.992190,23.511700)--(8.226560,23.464800)--(8.468750,23.425800) + --(8.718750,23.394501)--(8.980470,23.378901)--(9.253910,23.371099) + --(9.542970,23.375000)--(9.843750,23.394501)--(10.160200,23.429701) + --(10.496100,23.476601)--(10.847700,23.542999)--(11.218800,23.625000) + --(11.613300,23.726601)--(12.031300,23.843800)--(12.472700,23.984400) + --(12.937500,24.144501)--(13.425800,24.328100)--(13.945300,24.535200) + --(14.492200,24.761700)--(15.070300,25.015600)--(15.679700,25.292999) + --(16.324200,25.601601)--(17.000000,25.933599)--(17.000000,22.191401) + --(16.324200,21.859400)--(15.679700,21.554701)--(15.070300,21.277300) + --(14.492200,21.023399)--(13.945300,20.792999)--(13.425800,20.589800) + --(12.937500,20.406300)--(12.472700,20.246099)--(12.031300,20.105499) + --(11.613300,19.984400)--(11.218800,19.886700)--(10.847700,19.804701) + --(10.496100,19.738300)--(10.160200,19.687500)--(9.843750,19.656300) + --(9.542970,19.636700)--(9.253910,19.628901)--(8.980470,19.636700) + --(8.718750,19.656300)--(8.468750,19.687500)--(8.226560,19.726601) + --(7.992190,19.773399)--(7.765630,19.828100)--(7.546880,19.894501) + --(7.328130,19.960899)--(7.117190,20.035200)--(6.902340,20.117201) + --(6.691410,20.199200)--(6.476560,20.281300)--(6.261720,20.367201) + --(6.042970,20.453100)--(5.820310,20.542999)--(5.589840,20.625000) + --(5.351560,20.710899)--(5.105470,20.789101)--(4.847660,20.863300) + --(4.582030,20.933599)--(4.300780,21.000000)--(4.003910,21.058599) + --(3.695310,21.109400)--(3.367190,21.148399)--(3.023440,21.183599) + --(2.660160,21.203100)--(2.273440,21.214800)--(1.867190,21.210899) + --(1.441410,21.195299)--(0.984375,21.164101)--(0.507813,21.121099) + --(0.000000,21.058599)--cycle; +drawoptions (withcolor (208/256,0,0)); +fill (0.000000,21.058599)--(0.507813,21.121099)--(0.984375,21.164101) + --(1.441410,21.195299)--(1.867190,21.210899)--(2.273440,21.214800) + --(2.660160,21.203100)--(3.023440,21.183599)--(3.367190,21.148399) + --(3.695310,21.109400)--(4.003910,21.058599)--(4.300780,21.000000) + --(4.582030,20.933599)--(4.847660,20.863300)--(5.105470,20.789101) + --(5.351560,20.710899)--(5.589840,20.625000)--(5.820310,20.542999) + --(6.042970,20.453100)--(6.261720,20.367201)--(6.476560,20.281300) + --(6.691410,20.199200)--(6.902340,20.117201)--(7.117190,20.035200) + --(7.328130,19.960899)--(7.546880,19.894501)--(7.765630,19.828100) + --(7.992190,19.773399)--(8.226560,19.726601)--(8.468750,19.687500) + --(8.718750,19.656300)--(8.980470,19.636700)--(9.253910,19.628901) + --(9.542970,19.636700)--(9.843750,19.656300)--(10.160200,19.687500) + --(10.496100,19.738300)--(10.847700,19.804701)--(11.218800,19.886700) + --(11.613300,19.984400)--(12.031300,20.105499)--(12.472700,20.246099) + --(12.937500,20.406300)--(13.425800,20.589800)--(13.945300,20.792999) + --(14.492200,21.023399)--(15.070300,21.277300)--(15.679700,21.554701) + --(16.324200,21.859400)--(17.000000,22.191401)--(17.000000,18.339800) + --(16.324200,18.007799)--(15.679700,17.703100)--(15.070300,17.421900) + --(14.492200,17.167999)--(13.945300,16.941401)--(13.425800,16.734400) + --(12.937500,16.550800)--(12.472700,16.390600)--(12.031300,16.253901) + --(11.613300,16.132799)--(11.218800,16.031300)--(10.847700,15.949200) + --(10.496100,15.882800)--(10.160200,15.835900)--(9.843750,15.800800) + --(9.542970,15.781300)--(9.253910,15.777300)--(8.980470,15.785200) + --(8.718750,15.804700)--(8.468750,15.832000)--(8.226560,15.871100) + --(7.992190,15.921900)--(7.765630,15.976600)--(7.546880,16.039101) + --(7.328130,16.109400)--(7.117190,16.183599)--(6.902340,16.261700) + --(6.691410,16.343800)--(6.476560,16.429701)--(6.261720,16.515600) + --(6.042970,16.601601)--(5.820310,16.687500)--(5.589840,16.773399) + --(5.351560,16.855499)--(5.105470,16.937500)--(4.847660,17.011700) + --(4.582030,17.082001)--(4.300780,17.148399)--(4.003910,17.203100) + --(3.695310,17.253901)--(3.367190,17.296900)--(3.023440,17.328100) + --(2.660160,17.351601)--(2.273440,17.359400)--(1.867190,17.359400) + --(1.441410,17.343800)--(0.984375,17.312500)--(0.507813,17.269501) + --(0.000000,17.207001)--cycle; +drawoptions (withcolor (1,206/256,0)); +fill (0.000000,17.207001)--(0.507813,17.269501)--(0.984375,17.312500) + --(1.441410,17.343800)--(1.867190,17.359400)--(2.273440,17.359400) + --(2.660160,17.351601)--(3.023440,17.328100)--(3.367190,17.296900) + --(3.695310,17.253901)--(4.003910,17.203100)--(4.300780,17.148399) + --(4.582030,17.082001)--(4.847660,17.011700)--(5.105470,16.937500) + --(5.351560,16.855499)--(5.589840,16.773399)--(5.820310,16.687500) + --(6.042970,16.601601)--(6.261720,16.515600)--(6.476560,16.429701) + --(6.691410,16.343800)--(6.902340,16.261700)--(7.117190,16.183599) + --(7.328130,16.109400)--(7.546880,16.039101)--(7.765630,15.976600) + --(7.992190,15.921900)--(8.226560,15.871100)--(8.468750,15.832000) + --(8.718750,15.804700)--(8.980470,15.785200)--(9.253910,15.777300) + --(9.542970,15.781300)--(9.843750,15.800800)--(10.160200,15.835900) + --(10.496100,15.882800)--(10.847700,15.949200)--(11.218800,16.031300) + --(11.613300,16.132799)--(12.031300,16.253901)--(12.472700,16.390600) + --(12.937500,16.550800)--(13.425800,16.734400)--(13.945300,16.941401) + --(14.492200,17.167999)--(15.070300,17.421900)--(15.679700,17.703100) + --(16.324200,18.007799)--(17.000000,18.339800)--(17.000000,14.601600) + --(16.324200,14.265600)--(15.679700,13.960900)--(15.070300,13.683600) + --(14.492200,13.429700)--(13.945300,13.199200)--(13.425800,12.996100) + --(12.937500,12.812500)--(12.472700,12.652300)--(12.031300,12.511700) + --(11.613300,12.394500)--(11.218800,12.293000)--(10.847700,12.210900) + --(10.496100,12.144500)--(10.160200,12.093800)--(9.843750,12.062500) + --(9.542970,12.043000)--(9.253910,12.039100)--(8.980470,12.043000) + --(8.718750,12.062500)--(8.468750,12.093800)--(8.226560,12.132800) + --(7.992190,12.179700)--(7.765630,12.234400)--(7.546880,12.300800) + --(7.328130,12.367200)--(7.117190,12.441400)--(6.902340,12.523400) + --(6.691410,12.605500)--(6.476560,12.687500)--(6.261720,12.773400) + --(6.042970,12.863300)--(5.820310,12.949200)--(5.589840,13.031300) + --(5.351560,13.117200)--(5.105470,13.195300)--(4.847660,13.269500) + --(4.582030,13.343800)--(4.300780,13.406300)--(4.003910,13.464800) + --(3.695310,13.515600)--(3.367190,13.558600)--(3.023440,13.589800) + --(2.660160,13.609400)--(2.273440,13.621100)--(1.867190,13.617200) + --(1.441410,13.601600)--(0.984375,13.574200)--(0.507813,13.527300) + --(0.000000,13.464800)--cycle; +drawoptions (withcolor (0.000000,0.000000,0.000000)); +pickup pencircle scaled 0.200000bp; +draw (0.000000,24.800800)--(0.507813,24.859400)--(0.984375,24.906300) + --(1.441410,24.937500)--(1.867190,24.953100)--(2.273440,24.953100) + --(2.660160,24.945299)--(3.023440,24.921900)--(3.367190,24.890600) + --(3.695310,24.847700)--(4.003910,24.796900)--(4.300780,24.742201) + --(4.582030,24.675800)--(4.847660,24.605499)--(5.105470,24.527300) + --(5.351560,24.449200)--(5.589840,24.367201)--(5.820310,24.281300) + --(6.042970,24.195299)--(6.261720,24.109400)--(6.476560,24.023399) + --(6.691410,23.937500)--(6.902340,23.855499)--(7.117190,23.777300) + --(7.328130,23.703100)--(7.546880,23.632799)--(7.765630,23.570299) + --(7.992190,23.511700)--(8.226560,23.464800)--(8.468750,23.425800) + --(8.718750,23.394501)--(8.980470,23.378901)--(9.253910,23.371099) + --(9.542970,23.375000)--(9.843750,23.394501)--(10.160200,23.429701) + --(10.496100,23.476601)--(10.847700,23.542999)--(11.218800,23.625000) + --(11.613300,23.726601)--(12.031300,23.843800)--(12.472700,23.984400) + --(12.937500,24.144501)--(13.425800,24.328100)--(13.945300,24.535200) + --(14.492200,24.761700)--(15.070300,25.015600)--(15.679700,25.292999) + --(16.324200,25.601601)--(17.000000,25.933599)--(17.000000,14.601600) + --(16.324200,14.265600)--(15.679700,13.960900)--(15.070300,13.683600) + --(14.492200,13.429700)--(13.945300,13.199200)--(13.425800,12.996100) + --(12.937500,12.812500)--(12.472700,12.652300)--(12.031300,12.511700) + --(11.613300,12.394500)--(11.218800,12.293000)--(10.847700,12.210900) + --(10.496100,12.144500)--(10.160200,12.093800)--(9.843750,12.062500) + --(9.542970,12.043000)--(9.253910,12.039100)--(8.980470,12.043000) + --(8.718750,12.062500)--(8.468750,12.093800)--(8.226560,12.132800) + --(7.992190,12.179700)--(7.765630,12.234400)--(7.546880,12.300800) + --(7.328130,12.367200)--(7.117190,12.441400)--(6.902340,12.523400) + --(6.691410,12.605500)--(6.476560,12.687500)--(6.261720,12.773400) + --(6.042970,12.863300)--(5.820310,12.949200)--(5.589840,13.031300) + --(5.351560,13.117200)--(5.105470,13.195300)--(4.847660,13.269500) + --(4.582030,13.343800)--(4.300780,13.406300)--(4.003910,13.464800) + --(3.695310,13.515600)--(3.367190,13.558600)--(3.023440,13.589800) + --(2.660160,13.609400)--(2.273440,13.621100)--(1.867190,13.617200) + --(1.441410,13.601600)--(0.984375,13.574200)--(0.507813,13.527300) + --(0.000000,13.464800)--cycle; +pickup pencircle scaled 0.8bp; +draw (0.000000,5.00000)--(0.000000,26); +r:=17pt/(xpart(urcorner(currentpicture))-xpart(ulcorner(currentpicture))); +picture pic; +pic:=currentpicture; +currentpicture:=nullpicture; +drawoptions(); +draw pic scaled(r); +%draw pic scaled(1); +z0=.5*urcorner(currentpicture)+.5*ulcorner(currentpicture); +z1=.5*lrcorner(currentpicture)+.5*llcorner(currentpicture); +draw (z0+(10.5,2)); +draw (z1-(10.5,2)); +clip currentpicture to ((z0-(8.5pt,0))--(z0+(8.5pt,0))--(z1+(8.5pt,0))--(z1-(8.5pt,0))--cycle); +endfig; +end