--- texpower-0.2.orig/contrib/multitest.mmp
+++ texpower-0.2/contrib/multitest.mmp
@@ -0,0 +1,125 @@
+%
+% fig2dev -L (m)mp version 0.03 --- Preamble
+%
+
+% Make arrowheads mitered by default
+% NOTE: subject to change (edited from plain.mp)
+    def forwarr(text t) expr p =
+      _apth:=p;_finarrf(t)
+    enddef;
+    def backarr(text t) expr p =
+      _apth:=p;_finarrb(t)
+    enddef;
+    def _finarrf(text s) text t =
+      if (s=0):fill arrowhead _apth  t withcolor white
+      else: fill arrowhead _apth  t fi;
+      linejoin:=0;
+      draw arrowhead _apth  t
+    enddef;
+    def _finarrb(text s) text t =
+      if (s=0):fill arrowhead reverse _apth  t withcolor white
+      else: fill arrowhead reverse _apth  t fi;
+      linejoin:=0;
+      draw arrowhead reverse _apth  t
+    enddef;
+
+
+path allbounds;
+allbounds = (39.78,725.22)--(278.82,725.22)--(278.82,564.12)--(39.78,564.12)--cycle;
+% Some reasonable defaults
+  ahlength:=7;
+  ahangle:=30;
+  labeloffset:=0;
+  truecorners:=0;
+  bboxmargin:=0;
+% Now draw objects of depth: 50
+beginfig(0)
+% Begin text object
+  picture p;
+  verbatimtex
+    \font\cmrAA=cmr10 at 10.80pt
+    \font\tenrm=cmr10 at 10.80pt \font\sevenrm=cmr7 at 7.56pt
+    \font\fiverm=cmr5 at 5.40pt \font\teni=cmmi10 at 10.80pt
+    \font\seveni=cmmi7 at 7.56pt \font\fivei=cmmi5 at 5.40pt
+    \font\tensy=cmsy10 at 10.80pt \font\sevensy=cmsy7 at 7.56pt
+    \font\fivesy=cmsy5 at 5.40pt \textfont0\tenrm
+    \scriptfont0\sevenrm \scriptscriptfont0\fiverm
+    \textfont1\teni \scriptfont1\seveni \scriptscriptfont1\fivei
+    \textfont2\tensy \scriptfont2\sevensy \scriptscriptfont2\fivesy
+  etex;
+  p = btex \cmrAA begin test etex
+    rotated 0.00;
+  label.urt(p,(67.50,638.10)) withcolor (0.00,0.00,0.00);
+% End text object
+setbounds currentpicture to allbounds;
+endfig;
+% Now draw objects of depth: 48
+beginfig(1)
+% Begin polyline object
+  linecap:=0;
+  linejoin:=0;
+  pickup pencircle scaled 0.90;
+  path p;
+  p = (45.90, 678.60)
+    --(213.30, 678.60)
+    --(213.30, 589.50)
+    --(45.90, 589.50)
+    --(45.90, 678.60)--cycle;
+  draw p withcolor (0.00,0.00,0.00);
+% End polyline object
+setbounds currentpicture to allbounds;
+endfig;
+% Now draw objects of depth: 46
+beginfig(2)
+% Begin ellipse object
+  pickup pencircle scaled 0.90;
+  path c;
+  c = fullcircle scaled 49.80 yscaled 1.00
+         rotated 0.00 shifted (213.30,589.50);
+ fill c withcolor ((0.00,0.00,1.00) + 0.00white);
+  draw c withcolor (0.00,0.00,1.00);
+% End ellipse object
+setbounds currentpicture to allbounds;
+endfig;
+% Now draw objects of depth: 44
+beginfig(3)
+% Begin polyline object
+  linecap:=0;
+  linejoin:=1;
+  pickup pencircle scaled 0.90;
+  path p,pb,sw,nw,ne,se;
+  pair ll,ul,ur,lr;
+  p = (278.10,581.40)--(40.50,724.50);
+  ur = urcorner p; ll = llcorner p;
+  ul = ulcorner p; lr = lrcorner p;
+  sw = fullcircle scaled 12.60 shifted (ll+(6.30,6.30));
+  nw = fullcircle scaled 12.60 shifted (ul+(6.30,-6.30));
+  ne = fullcircle rotated 180 scaled 12.60 shifted (ur+(-6.30,-6.30));
+  se = fullcircle rotated 180 scaled 12.60 shifted (lr+(-6.30,6.30));
+  pb = buildcycle(sw,ll--ul,nw,ul--ur,ne,ur--lr,se,lr--ll);
+  draw pb withcolor (0.00,0.00,0.00);
+% End polyline object
+setbounds currentpicture to allbounds;
+endfig;
+% Now draw objects of depth: 42
+beginfig(4)
+% Begin text object
+  picture p;
+  verbatimtex
+    \font\cmrAB=cmr10 at 10.80pt
+    \font\tenrm=cmr10 at 10.80pt \font\sevenrm=cmr7 at 7.56pt
+    \font\fiverm=cmr5 at 5.40pt \font\teni=cmmi10 at 10.80pt
+    \font\seveni=cmmi7 at 7.56pt \font\fivei=cmmi5 at 5.40pt
+    \font\tensy=cmsy10 at 10.80pt \font\sevensy=cmsy7 at 7.56pt
+    \font\fivesy=cmsy5 at 5.40pt \textfont0\tenrm
+    \scriptfont0\sevenrm \scriptscriptfont0\fiverm
+    \textfont1\teni \scriptfont1\seveni \scriptscriptfont1\fivei
+    \textfont2\tensy \scriptfont2\sevensy \scriptscriptfont2\fivesy
+  etex;
+  p = btex \cmrAB end test etex
+    rotated 90.00;
+  label.urt(p,(240.30,646.20)) withcolor (0.00,0.00,0.00);
+% End text object
+setbounds currentpicture to allbounds;
+endfig;
+end