dev/latex/sources_MetaPost/brace.mp

   1 % Converted from PostScript(TM) to MetaPost by pstoedit
   2 % MetaPost backend contributed by Scott Pakin <scott+ps2ed_AT_pakin.org>
   3 % pstoedit is Copyright (C) 1993 - 2009 Wolfgang Glunz <wglunz35_AT_pstoedit.net>
   4
   5 % Generate structured PostScript
   6 prologues := 1;
   7
   8 % Display a given string with its *baseline* at a given location
   9 % and with a given rotation angle
  10 vardef showtext(expr origin)(expr angle)(expr string) =
  11   draw string infont defaultfont scaled defaultscale
  12     rotated angle shifted origin;
  13 enddef;
  14 outputtemplate:="%j.mps";
  15 beginfig(1);
  16 linecap := butt;
  17 fill (10.371100,82.296898)..controls (2.140630,82.296898) and (10.371100,41.148399)..(2.140630,41.148399)
  18     ..controls (10.371100,41.148399) and (2.140630,0.000000)..(10.371100,0.000000)
  19     ..controls (2.140630,0.000000) and (16.042999,41.148399)..(2.140630,41.148399)
  20     ..controls (16.042999,41.148399) and (2.140630,82.296898)..(10.371100,82.296898)
  21     --cycle;
  22 pickup pencircle scaled 0.100000bp;
  23 draw (10.371100,82.296898)..controls (2.140630,82.296898) and (10.371100,41.148399)..(2.140630,41.148399)
  24     ..controls (10.371100,41.148399) and (2.140630,0.000000)..(10.371100,0.000000)
  25     ..controls (2.140630,0.000000) and (16.042999,41.148399)..(2.140630,41.148399)
  26     ..controls (16.042999,41.148399) and (2.140630,82.296898)..(10.371100,82.296898);
  27 endfig;
  28 end