dev/latex/sources_MetaPost/bc-rosevents.mp

   1 prologues:=1;\r
   2 outputtemplate:="%j.mps";\r
   3 beginfig(1);\r
   4 linecap := butt;\r
   5 linejoin := mitered;\r
   6 pickup pencircle scaled 0.000001bp;%0.199253bp;\r
   7 draw (87.324203,711.479980)..controls (87.324203,715.234009) and (84.273399,718.281006)..(80.519501,718.281006)\r
   8     ..controls (76.765602,718.281006) and (73.718803,715.234009)..(73.718803,711.479980)\r
   9     ..controls (73.718803,707.726990) and (76.765602,704.676025)..(80.519501,704.676025)\r
  10     ..controls (84.273399,704.676025) and (87.324203,707.726990)..(87.324203,711.479980)\r
  11     --cycle;\r
  12 pickup pencircle scaled 0.000000bp;\r
  13 linejoin := rounded;\r
  14 fill (80.519501,712.331970)--(80.519501,711.479980)--(85.933601,716.890991)\r
  15     --(80.519501,713.179993)--cycle;\r
  16 pickup pencircle scaled 0.000001bp;\r
  17 draw (80.519501,712.331970)--(80.519501,711.479980)--(85.933601,716.890991)\r
  18     --(80.519501,713.179993)--cycle;\r
  19 drawoptions (withcolor (1.000000,1.000000,1.000000));\r
  20 pickup pencircle scaled 0.000000bp;\r
  21 fill (81.371101,711.479980)--(80.519501,711.479980)--(85.933601,716.890991)\r
  22     --(82.222702,711.479980)--cycle;\r
  23 drawoptions (withcolor (0.000000,0.000000,0.000000));\r
  24 pickup pencircle scaled 0.000001bp;\r
  25 draw (81.371101,711.479980)--(80.519501,711.479980)--(85.933601,716.890991)\r
  26     --(82.222702,711.479980)--cycle;\r
  27 pickup pencircle scaled 0.000000bp;\r
  28 fill (79.667999,711.479980)--(80.519501,711.479980)--(75.109398,716.890991)\r
  29     --(78.820297,711.479980)--cycle;\r
  30 pickup pencircle scaled 0.000001bp;\r
  31 draw (79.667999,711.479980)--(80.519501,711.479980)--(75.109398,716.890991)\r
  32     --(78.820297,711.479980)--cycle;\r
  33 drawoptions (withcolor (1.000000,1.000000,1.000000));\r
  34 pickup pencircle scaled 0.000000bp;\r
  35 fill (80.519501,712.331970)--(80.519501,711.479980)--(75.109398,716.890991)\r
  36     --(80.519501,713.179993)--cycle;\r
  37 drawoptions (withcolor (0.000000,0.000000,0.000000));\r
  38 pickup pencircle scaled 0.000001bp;\r
  39 draw (80.519501,712.331970)--(80.519501,711.479980)--(75.109398,716.890991)\r
  40     --(80.519501,713.179993)--cycle;\r
  41 pickup pencircle scaled 0.000000bp;\r
  42 fill (80.519501,710.629028)--(80.519501,711.479980)--(75.109398,706.065979)\r
  43     --(80.519501,709.776978)--cycle;\r
  44 pickup pencircle scaled 0.000001bp;\r
  45 draw (80.519501,710.629028)--(80.519501,711.479980)--(75.109398,706.065979)\r
  46     --(80.519501,709.776978)--cycle;\r
  47 drawoptions (withcolor (1.000000,1.000000,1.000000));\r
  48 pickup pencircle scaled 0.000000bp;\r
  49 fill (79.667999,711.479980)--(80.519501,711.479980)--(75.109398,706.065979)\r
  50     --(78.820297,711.479980)--cycle;\r
  51 drawoptions (withcolor (0.000000,0.000000,0.000000));\r
  52 pickup pencircle scaled 0.000001bp;\r
  53 draw (79.667999,711.479980)--(80.519501,711.479980)--(75.109398,706.065979)\r
  54     --(78.820297,711.479980)--cycle;\r
  55 pickup pencircle scaled 0.000000bp;\r
  56 fill (81.371101,711.479980)--(80.519501,711.479980)--(85.933601,706.065979)\r
  57     --(82.222702,711.479980)--cycle;\r
  58 pickup pencircle scaled 0.000001bp;\r
  59 draw (81.371101,711.479980)--(80.519501,711.479980)--(85.933601,706.065979)\r
  60     --(82.222702,711.479980)--cycle;\r
  61 drawoptions (withcolor (1.000000,1.000000,1.000000));\r
  62 pickup pencircle scaled 0.000000bp;\r
  63 fill (80.519501,710.629028)--(80.519501,711.479980)--(85.933601,706.065979)\r
  64     --(80.519501,709.776978)--cycle;\r
  65 drawoptions (withcolor (0.000000,0.000000,0.000000));\r
  66 pickup pencircle scaled 0.000001bp;\r
  67 draw (80.519501,710.629028)--(80.519501,711.479980)--(85.933601,706.065979)\r
  68     --(80.519501,709.776978)--cycle;\r
  69 pickup pencircle scaled 0.000000bp;\r
  70 fill (81.121101,712.081970)--(80.519501,711.479980)--(89.023399,711.479980)\r
  71     --(81.722702,712.684021)--cycle;\r
  72 pickup pencircle scaled 0.000001bp;\r
  73 draw (81.121101,712.081970)--(80.519501,711.479980)--(89.023399,711.479980)\r
  74     --(81.722702,712.684021)--cycle;\r
  75 drawoptions (withcolor (1.000000,1.000000,1.000000));\r
  76 pickup pencircle scaled 0.000000bp;\r
  77 fill (81.121101,710.879028)--(80.519501,711.479980)--(89.023399,711.479980)\r
  78     --(81.722702,710.276978)--cycle;\r
  79 drawoptions (withcolor (0.000000,0.000000,0.000000));\r
  80 pickup pencircle scaled 0.000001bp;\r
  81 draw (81.121101,710.879028)--(80.519501,711.479980)--(89.023399,711.479980)\r
  82     --(81.722702,710.276978)--cycle;\r
  83 pickup pencircle scaled 0.000000bp;\r
  84 fill (79.917999,712.081970)--(80.519501,711.479980)--(80.519501,719.984009)\r
  85     --(79.316399,712.684021)--cycle;\r
  86 pickup pencircle scaled 0.000001bp;\r
  87 draw (79.917999,712.081970)--(80.519501,711.479980)--(80.519501,719.984009)\r
  88     --(79.316399,712.684021)--cycle;\r
  89 drawoptions (withcolor (1.000000,1.000000,1.000000));\r
  90 pickup pencircle scaled 0.000000bp;\r
  91 fill (81.121101,712.081970)--(80.519501,711.479980)--(80.519501,719.984009)\r
  92     --(81.722702,712.684021)--cycle;\r
  93 drawoptions (withcolor (0.000000,0.000000,0.000000));\r
  94 pickup pencircle scaled 0.000001bp;\r
  95 draw (81.121101,712.081970)--(80.519501,711.479980)--(80.519501,719.984009)\r
  96     --(81.722702,712.684021)--cycle;\r
  97 pickup pencircle scaled 0.000000bp;\r
  98 fill (79.917999,710.879028)--(80.519501,711.479980)--(72.015602,711.479980)\r
  99     --(79.316399,710.276978)--cycle;\r
 100 pickup pencircle scaled 0.000001bp;\r
 101 draw (79.917999,710.879028)--(80.519501,711.479980)--(72.015602,711.479980)\r
 102     --(79.316399,710.276978)--cycle;\r
 103 drawoptions (withcolor (1.000000,1.000000,1.000000));\r
 104 pickup pencircle scaled 0.000000bp;\r
 105 fill (79.917999,712.081970)--(80.519501,711.479980)--(72.015602,711.479980)\r
 106     --(79.316399,712.684021)--cycle;\r
 107 drawoptions (withcolor (0.000000,0.000000,0.000000));\r
 108 pickup pencircle scaled 0.000001bp;\r
 109 draw (79.917999,712.081970)--(80.519501,711.479980)--(72.015602,711.479980)\r
 110     --(79.316399,712.684021)--cycle;\r
 111 pickup pencircle scaled 0.000000bp;\r
 112 fill (81.121101,710.879028)--(80.519501,711.479980)--(80.519501,702.976990)\r
 113     --(81.722702,710.276978)--cycle;\r
 114 pickup pencircle scaled 0.000001bp;\r
 115 draw (81.121101,710.879028)--(80.519501,711.479980)--(80.519501,702.976990)\r
 116     --(81.722702,710.276978)--cycle;\r
 117 drawoptions (withcolor (1.000000,1.000000,1.000000));\r
 118 pickup pencircle scaled 0.000000bp;\r
 119 fill (79.917999,710.879028)--(80.519501,711.479980)--(80.519501,702.976990)\r
 120     --(79.316399,710.276978)--cycle;\r
 121 drawoptions (withcolor (0.000000,0.000000,0.000000));\r
 122 pickup pencircle scaled 0.00000bp;\r
 123 draw (79.917999,710.879028)--(80.519501,711.479980)--(80.519501,702.976990)\r
 124     --(79.316399,710.276978)--cycle;\r
 125 z0=.5*urcorner(currentpicture)+.5*ulcorner(currentpicture);\r
 126 z1=.5*lrcorner(currentpicture)+.5*llcorner(currentpicture);\r
 127 draw (z0+(10.5,2));\r
 128 draw (z1-(10.5,2));\r
 129 clip currentpicture to ((z0-(9pt,0))--(z0+(8.5pt,0))--(z1+(8.5pt,0))--(z1-(9pt,0))--cycle);\r
 130 endfig;\r
 131 end\r