dev/latex/sources_MetaPost/bc-info.mp

   1 prologues:=1;\r
   2 outputtemplate:="%j.mps";\r
   3 beginfig(1);\r
   4 drawoptions (withcolor (1.000000,0.309804,0.380392));\r
   5 linecap := butt;\r
   6 linejoin := mitered;\r
   7 fill (12.683600,7.140630)..controls (12.683600,3.925780) and (10.074200,1.316410)..(6.859370,1.316410)\r
   8     ..controls (3.648440,1.316410) and (1.039060,3.925780)..(1.039060,7.140630)\r
   9     ..controls (1.039060,10.351600) and (3.648440,12.960900)..(6.859370,12.960900)\r
  10     ..controls (10.074200,12.960900) and (12.683600,10.351600)..(12.683600,7.140630)\r
  11     --cycle;\r
  12 drawoptions (withcolor (0.000000,0.000000,0.000000));\r
  13 pickup pencircle scaled 0.392320bp;\r
  14 linecap := rounded;\r
  15 linejoin := rounded;\r
  16 draw (12.683600,7.140630)..controls (12.683600,3.925780) and (10.074200,1.316410)..(6.859370,1.316410)\r
  17     ..controls (3.648440,1.316410) and (1.039060,3.925780)..(1.039060,7.140630)\r
  18     ..controls (1.039060,10.351600) and (3.648440,12.960900)..(6.859370,12.960900)\r
  19     ..controls (10.074200,12.960900) and (12.683600,10.351600)..(12.683600,7.140630)\r
  20     --cycle;\r
  21 drawoptions (withcolor (0.968628,0.725490,0.000000));\r
  22 pickup pencircle scaled 0.000000bp;\r
  23 linecap := butt;\r
  24 linejoin := mitered;\r
  25 fill (12.304700,7.140630)..controls (12.304700,4.132810) and (9.867190,1.695310)..(6.859370,1.695310)\r
  26     ..controls (3.855470,1.695310) and (1.417970,4.132810)..(1.417970,7.140630)\r
  27     ..controls (1.417970,10.144500) and (3.855470,12.582000)..(6.859370,12.582000)\r
  28     ..controls (9.867190,12.582000) and (12.304700,10.144500)..(12.304700,7.140630)\r
  29     --cycle;\r
  30 drawoptions (withcolor (1.000000,1.000000,1.000000));\r
  31 pickup pencircle scaled 0.366751bp;\r
  32 linecap := rounded;\r
  33 linejoin := rounded;\r
  34 draw (12.304700,7.140630)..controls (12.304700,4.132810) and (9.867190,1.695310)..(6.859370,1.695310)\r
  35     ..controls (3.855470,1.695310) and (1.417970,4.132810)..(1.417970,7.140630)\r
  36     ..controls (1.417970,10.144500) and (3.855470,12.582000)..(6.859370,12.582000)\r
  37     ..controls (9.867190,12.582000) and (12.304700,10.144500)..(12.304700,7.140630)\r
  38     --cycle;\r
  39 drawoptions (withcolor (1.000000,0.803922,0.003922));\r
  40 pickup pencircle scaled 0.000000bp;\r
  41 linecap := butt;\r
  42 linejoin := mitered;\r
  43 fill (6.843750,12.378900)..controls (4.171880,12.378900) and (1.960940,10.339800)..(1.605470,7.691410)\r
  44     ..controls (2.890630,6.210940) and (4.750000,5.265630)..(6.820310,5.234380)\r
  45     ..controls (6.859380,5.234380) and (6.898440,5.230470)..(6.933590,5.230470)\r
  46     ..controls (8.968750,5.230470) and (10.804700,6.113280)..(12.105500,7.519530)\r
  47     ..controls (11.824200,10.250000) and (9.574220,12.378900)..(6.843750,12.378900)\r
  48     --cycle;\r
  49 drawoptions (withcolor (1.000000,1.000000,1.000000));\r
  50 fill (6.859380,11.457000)..controls (6.121090,11.457000) and (5.523440,10.839800)..(5.523440,10.082000)\r
  51     ..controls (5.523440,9.320310) and (6.121090,8.703130)..(6.859380,8.703130)\r
  52     ..controls (7.597660,8.703130) and (8.199220,9.320310)..(8.199220,10.082000)\r
  53     ..controls (8.199220,10.839800) and (7.597660,11.457000)..(6.859380,11.457000)\r
  54     --cycle;\r
  55 fill (6.210940,7.996090)..controls (5.828130,7.996090) and (5.523440,7.679690)..(5.523440,7.285160)\r
  56     --(5.523440,3.531250)..controls (5.523440,3.140630) and (5.828130,2.820310)..(6.210940,2.820310)\r
  57     --(7.507810,2.820310)..controls (7.890630,2.820310) and (8.199220,3.140630)..(8.199220,3.531250)\r
  58     --(8.199220,7.285160)..controls (8.199220,7.679690) and (7.890630,7.996090)..(7.507810,7.996090)\r
  59     --cycle;\r
  60 drawoptions (withcolor (0.000000,0.000000,0.000000));\r
  61 pickup pencircle scaled 0.380348bp;\r
  62 linecap := rounded;\r
  63 linejoin := rounded;\r
  64 draw (6.859380,11.457000)..controls (6.121090,11.457000) and (5.523440,10.839800)..(5.523440,10.082000)\r
  65     ..controls (5.523440,9.320310) and (6.121090,8.703130)..(6.859380,8.703130)\r
  66     ..controls (7.597660,8.703130) and (8.199220,9.320310)..(8.199220,10.082000)\r
  67     ..controls (8.199220,10.839800) and (7.597660,11.457000)..(6.859380,11.457000)\r
  68     --cycle;\r
  69 draw (6.210940,7.996090)..controls (5.828130,7.996090) and (5.523440,7.679690)..(5.523440,7.285160)\r
  70     --(5.523440,3.531250)..controls (5.523440,3.140630) and (5.828130,2.820310)..(6.210940,2.820310)\r
  71     --(7.507810,2.820310)..controls (7.890630,2.820310) and (8.199220,3.140630)..(8.199220,3.531250)\r
  72     --(8.199220,7.285160)..controls (8.199220,7.679690) and (7.890630,7.996090)..(7.507810,7.996090)\r
  73     --cycle;\r
  74 picture pic;\r
  75 pic:=currentpicture;\r
  76 currentpicture:=nullpicture;\r
  77 drawoptions();\r
  78 draw pic scaled(1.3);\r
  79 z0=.5*urcorner(currentpicture)+.5*ulcorner(currentpicture);\r
  80 z1=.5*lrcorner(currentpicture)+.5*llcorner(currentpicture);\r
  81 draw (z0+(10.5,2));\r
  82 draw (z1-(10.5,2));\r
  83 clip currentpicture to ((z0-(8.5pt,0))--(z0+(8.5pt,0))--(z1+(8.5pt,-1pt))--(z1-(8.5pt,1pt))--cycle);\r
  84 endfig;\r
  85 end\r