summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/latex/ppower4/edemo/matrixb2e.mp
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/doc/latex/ppower4/edemo/matrixb2e.mp')
-rw-r--r--Master/texmf-dist/doc/latex/ppower4/edemo/matrixb2e.mp508
1 files changed, 508 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/latex/ppower4/edemo/matrixb2e.mp b/Master/texmf-dist/doc/latex/ppower4/edemo/matrixb2e.mp
new file mode 100644
index 00000000000..2e45d76395d
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/ppower4/edemo/matrixb2e.mp
@@ -0,0 +1,508 @@
+%
+% fig2dev (version 3.2.4-beta1) -L (m)mp version 0.06 --- Preamble
+%
+
+%
+% mp output driver options:
+% -L mp
+%
+
+% +MP-ADDITIONAL-HEADER
+verbatimtex
+%&latex
+\documentclass{article}
+\begin{document}
+etex
+% -MP-ADDITIONAL-HEADER
+
+
+%SetFigFont macros for latex
+verbatimtex
+%
+\begingroup\makeatletter\ifx\SetFigFont\undefined%
+\gdef\SetFigFont#1#2#3#4#5{%
+ \reset@font\fontsize{#1}{#2pt}%
+ \fontfamily{#3}\fontseries{#4}\fontshape{#5}%
+ \selectfont}%
+\fi\endgroup%
+\ifx\SetFigFontSize\undefined%
+\gdef\SetFigFontSize#1#2{%
+ \fontsize{#1}{#2pt}%
+ \selectfont}%
+\fi%
+etex
+
+% 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;
+
+
+% Now draw the figure
+beginfig(0)
+% Some reasonable defaults
+ ahlength:=7;
+ ahangle:=30;
+ labeloffset:=0;
+ truecorners:=1;
+ bboxmargin:=0;
+% Begin ellipse object
+ pickup pencircle scaled 0.90;
+ path c;
+ c = fullcircle scaled 12.72 yscaled 1.00
+ rotated 0.00 shifted (135.00,738.00);
+ draw c withcolor (0.00,0.69,0.00);
+% End ellipse object
+% Begin text object
+ picture q;
+ verbatimtex
+ \def\mpsetfnt{%
+ \SetFigFontSize{10}{13.0}%
+ }%
+ etex;
+ q = btex \mpsetfnt $*$ etex;
+ picture p;
+ p = q rotated 0.00;
+ label.urt(p,((135.00,735.30))+xpart (lrcorner q - llcorner q)*(-cosd 0.00,-sind 0.00)/2+llcorner p) withcolor (0.00,0.00,0.00);
+% End text object
+% Begin ellipse object
+ pickup pencircle scaled 0.90;
+ path c;
+ c = fullcircle scaled 12.72 yscaled 1.00
+ rotated 0.00 shifted (135.00,756.00);
+ draw c withcolor (0.00,0.69,0.00);
+% End ellipse object
+% Begin text object
+ picture q;
+ verbatimtex
+ \def\mpsetfnt{%
+ \SetFigFontSize{10}{13.0}%
+ }%
+ etex;
+ q = btex \mpsetfnt $*$ etex;
+ picture p;
+ p = q rotated 0.00;
+ label.urt(p,((135.00,753.30))+xpart (lrcorner q - llcorner q)*(-cosd 0.00,-sind 0.00)/2+llcorner p) withcolor (0.00,0.00,0.00);
+% End text object
+% Begin ellipse object
+ pickup pencircle scaled 0.90;
+ path c;
+ c = fullcircle scaled 12.72 yscaled 1.00
+ rotated 0.00 shifted (90.00,693.00);
+ draw c withcolor (0.00,0.69,0.00);
+% End ellipse object
+% Begin text object
+ picture q;
+ verbatimtex
+ \def\mpsetfnt{%
+ \SetFigFontSize{10}{13.0}%
+ }%
+ etex;
+ q = btex \mpsetfnt $*$ etex;
+ picture p;
+ p = q rotated 0.00;
+ label.urt(p,((90.00,690.30))+xpart (lrcorner q - llcorner q)*(-cosd 0.00,-sind 0.00)/2+llcorner p) withcolor (0.00,0.00,0.00);
+% End text object
+% Begin ellipse object
+ pickup pencircle scaled 0.90;
+ path c;
+ c = fullcircle scaled 12.72 yscaled 1.00
+ rotated 0.00 shifted (72.00,693.00);
+ draw c withcolor (0.00,0.69,0.00);
+% End ellipse object
+% Begin text object
+ picture q;
+ verbatimtex
+ \def\mpsetfnt{%
+ \SetFigFontSize{10}{13.0}%
+ }%
+ etex;
+ q = btex \mpsetfnt $*$ etex;
+ picture p;
+ p = q rotated 0.00;
+ label.urt(p,((72.00,690.30))+xpart (lrcorner q - llcorner q)*(-cosd 0.00,-sind 0.00)/2+llcorner p) withcolor (0.00,0.00,0.00);
+% End text object
+% Begin ellipse object
+ pickup pencircle scaled 0.90;
+ path c;
+ c = fullcircle scaled 12.72 yscaled 1.00
+ rotated 0.00 shifted (153.00,711.00);
+ draw c withcolor (0.00,0.69,0.00);
+% End ellipse object
+% Begin text object
+ picture q;
+ verbatimtex
+ \def\mpsetfnt{%
+ \SetFigFontSize{10}{13.0}%
+ }%
+ etex;
+ q = btex \mpsetfnt $*$ etex;
+ picture p;
+ p = q rotated 0.00;
+ label.urt(p,((153.00,708.30))+xpart (lrcorner q - llcorner q)*(-cosd 0.00,-sind 0.00)/2+llcorner p) withcolor (0.00,0.00,0.00);
+% End text object
+% Begin ellipse object
+ pickup pencircle scaled 0.90;
+ path c;
+ c = fullcircle scaled 12.00 yscaled 1.00
+ rotated 0.00 shifted (117.00,711.00);
+ draw c withcolor (0.00,0.00,0.69);
+% End ellipse object
+% Begin text object
+ picture q;
+ verbatimtex
+ \def\mpsetfnt{%
+ \SetFigFontSize{10}{13.0}%
+ }%
+ etex;
+ q = btex \mpsetfnt $*$ etex;
+ picture p;
+ p = q rotated 0.00;
+ label.urt(p,((117.00,708.30))+xpart (lrcorner q - llcorner q)*(-cosd 0.00,-sind 0.00)/2+llcorner p) withcolor (0.00,0.00,0.00);
+% End text object
+% Begin ellipse object
+ pickup pencircle scaled 0.90;
+ path c;
+ c = fullcircle scaled 12.00 yscaled 1.00
+ rotated 0.00 shifted (117.00,693.00);
+ draw c withcolor (0.00,0.00,0.69);
+% End ellipse object
+% Begin text object
+ picture q;
+ verbatimtex
+ \def\mpsetfnt{%
+ \SetFigFontSize{10}{13.0}%
+ }%
+ etex;
+ q = btex \mpsetfnt $*$ etex;
+ picture p;
+ p = q rotated 0.00;
+ label.urt(p,((117.00,690.30))+xpart (lrcorner q - llcorner q)*(-cosd 0.00,-sind 0.00)/2+llcorner p) withcolor (0.00,0.00,0.00);
+% End text object
+% Begin ellipse object
+ pickup pencircle scaled 0.90;
+ path c;
+ c = fullcircle scaled 12.72 yscaled 1.00
+ rotated 0.00 shifted (135.00,711.00);
+ draw c withcolor (0.00,0.69,0.00);
+% End ellipse object
+% Begin text object
+ picture q;
+ verbatimtex
+ \def\mpsetfnt{%
+ \SetFigFontSize{10}{13.0}%
+ }%
+ etex;
+ q = btex \mpsetfnt $*$ etex;
+ picture p;
+ p = q rotated 0.00;
+ label.urt(p,((135.00,708.30))+xpart (lrcorner q - llcorner q)*(-cosd 0.00,-sind 0.00)/2+llcorner p) withcolor (0.00,0.00,0.00);
+% End text object
+% Begin ellipse object
+ pickup pencircle scaled 0.90;
+ path c;
+ c = fullcircle scaled 12.00 yscaled 1.00
+ rotated 0.00 shifted (135.00,693.00);
+ draw c withcolor (0.00,0.00,0.69);
+% End ellipse object
+% Begin text object
+ picture q;
+ verbatimtex
+ \def\mpsetfnt{%
+ \SetFigFontSize{10}{13.0}%
+ }%
+ etex;
+ q = btex \mpsetfnt $*$ etex;
+ picture p;
+ p = q rotated 0.00;
+ label.urt(p,((135.00,690.30))+xpart (lrcorner q - llcorner q)*(-cosd 0.00,-sind 0.00)/2+llcorner p) withcolor (0.00,0.00,0.00);
+% End text object
+% Begin ellipse object
+ pickup pencircle scaled 0.90;
+ path c;
+ c = fullcircle scaled 12.72 yscaled 1.00
+ rotated 0.00 shifted (153.00,693.00);
+ draw c withcolor (0.00,0.69,0.00);
+% End ellipse object
+% Begin text object
+ picture q;
+ verbatimtex
+ \def\mpsetfnt{%
+ \SetFigFontSize{10}{13.0}%
+ }%
+ etex;
+ q = btex \mpsetfnt $*$ etex;
+ picture p;
+ p = q rotated 0.00;
+ label.urt(p,((153.00,690.30))+xpart (lrcorner q - llcorner q)*(-cosd 0.00,-sind 0.00)/2+llcorner p) withcolor (0.00,0.00,0.00);
+% End text object
+% Begin ellipse object
+ pickup pencircle scaled 0.90;
+ path c;
+ c = fullcircle scaled 12.72 yscaled 1.00
+ rotated 0.00 shifted (153.00,738.00);
+ draw c withcolor (0.00,0.69,0.00);
+% End ellipse object
+% Begin text object
+ picture q;
+ verbatimtex
+ \def\mpsetfnt{%
+ \SetFigFontSize{10}{13.0}%
+ }%
+ etex;
+ q = btex \mpsetfnt $*$ etex;
+ picture p;
+ p = q rotated 0.00;
+ label.urt(p,((153.00,735.30))+xpart (lrcorner q - llcorner q)*(-cosd 0.00,-sind 0.00)/2+llcorner p) withcolor (0.00,0.00,0.00);
+% End text object
+% Begin ellipse object
+ pickup pencircle scaled 0.90;
+ path c;
+ c = fullcircle scaled 12.72 yscaled 1.00
+ rotated 0.00 shifted (153.00,756.00);
+ draw c withcolor (0.00,0.69,0.00);
+% End ellipse object
+% Begin text object
+ picture q;
+ verbatimtex
+ \def\mpsetfnt{%
+ \SetFigFontSize{10}{13.0}%
+ }%
+ etex;
+ q = btex \mpsetfnt $*$ etex;
+ picture p;
+ p = q rotated 0.00;
+ label.urt(p,((153.00,753.30))+xpart (lrcorner q - llcorner q)*(-cosd 0.00,-sind 0.00)/2+llcorner p) withcolor (0.00,0.00,0.00);
+% End text object
+% Begin ellipse object
+ pickup pencircle scaled 0.90;
+ path c;
+ c = fullcircle scaled 12.00 yscaled 1.00
+ rotated 0.00 shifted (117.00,738.00);
+ draw c withcolor (0.00,0.00,0.69);
+% End ellipse object
+% Begin text object
+ picture q;
+ verbatimtex
+ \def\mpsetfnt{%
+ \SetFigFontSize{10}{13.0}%
+ }%
+ etex;
+ q = btex \mpsetfnt $*$ etex;
+ picture p;
+ p = q rotated 0.00;
+ label.urt(p,((117.00,735.30))+xpart (lrcorner q - llcorner q)*(-cosd 0.00,-sind 0.00)/2+llcorner p) withcolor (0.00,0.00,0.00);
+% End text object
+% Begin ellipse object
+ pickup pencircle scaled 0.90;
+ path c;
+ c = fullcircle scaled 12.00 yscaled 1.00
+ rotated 0.00 shifted (117.00,756.00);
+ draw c withcolor (0.00,0.00,0.69);
+% End ellipse object
+% Begin text object
+ picture q;
+ verbatimtex
+ \def\mpsetfnt{%
+ \SetFigFontSize{10}{13.0}%
+ }%
+ etex;
+ q = btex \mpsetfnt $*$ etex;
+ picture p;
+ p = q rotated 0.00;
+ label.urt(p,((117.00,753.30))+xpart (lrcorner q - llcorner q)*(-cosd 0.00,-sind 0.00)/2+llcorner p) withcolor (0.00,0.00,0.00);
+% End text object
+% Begin ellipse object
+ pickup pencircle scaled 0.90;
+ path c;
+ c = fullcircle scaled 12.72 yscaled 1.00
+ rotated 0.00 shifted (90.00,711.00);
+ draw c withcolor (0.00,0.69,0.00);
+% End ellipse object
+% Begin text object
+ picture q;
+ verbatimtex
+ \def\mpsetfnt{%
+ \SetFigFontSize{10}{13.0}%
+ }%
+ etex;
+ q = btex \mpsetfnt $*$ etex;
+ picture p;
+ p = q rotated 0.00;
+ label.urt(p,((90.00,708.30))+xpart (lrcorner q - llcorner q)*(-cosd 0.00,-sind 0.00)/2+llcorner p) withcolor (0.00,0.00,0.00);
+% End text object
+% Begin ellipse object
+ pickup pencircle scaled 0.90;
+ path c;
+ c = fullcircle scaled 12.72 yscaled 1.00
+ rotated 0.00 shifted (72.00,711.00);
+ draw c withcolor (0.00,0.69,0.00);
+% End ellipse object
+% Begin text object
+ picture q;
+ verbatimtex
+ \def\mpsetfnt{%
+ \SetFigFontSize{10}{13.0}%
+ }%
+ etex;
+ q = btex \mpsetfnt $*$ etex;
+ picture p;
+ p = q rotated 0.00;
+ label.urt(p,((72.00,708.30))+xpart (lrcorner q - llcorner q)*(-cosd 0.00,-sind 0.00)/2+llcorner p) withcolor (0.00,0.00,0.00);
+% End text object
+% Begin ellipse object
+ pickup pencircle scaled 0.90;
+ path c;
+ c = fullcircle scaled 10.80 yscaled 1.00
+ rotated 0.00 shifted (72.00,711.00);
+ draw c withcolor (0.00,0.00,0.69);
+% End ellipse object
+% Begin ellipse object
+ pickup pencircle scaled 0.90;
+ path c;
+ c = fullcircle scaled 10.80 yscaled 1.00
+ rotated 0.00 shifted (90.00,711.00);
+ draw c withcolor (0.00,0.00,0.69);
+% End ellipse object
+% Begin ellipse object
+ pickup pencircle scaled 0.90;
+ path c;
+ c = fullcircle scaled 10.80 yscaled 1.00
+ rotated 0.00 shifted (90.00,693.00);
+ draw c withcolor (0.00,0.00,0.69);
+% End ellipse object
+% Begin ellipse object
+ pickup pencircle scaled 0.90;
+ path c;
+ c = fullcircle scaled 10.80 yscaled 1.00
+ rotated 0.00 shifted (72.00,693.00);
+ draw c withcolor (0.00,0.00,0.69);
+% End ellipse object
+% Begin ellipse object
+ pickup pencircle scaled 0.90;
+ path c;
+ c = fullcircle scaled 10.80 yscaled 1.00
+ rotated 0.00 shifted (135.00,738.00);
+ draw c withcolor (0.00,0.00,0.69);
+% End ellipse object
+% Begin ellipse object
+ pickup pencircle scaled 0.90;
+ path c;
+ c = fullcircle scaled 10.80 yscaled 1.00
+ rotated 0.00 shifted (135.00,756.00);
+ draw c withcolor (0.00,0.00,0.69);
+% End ellipse object
+% Begin polyline object
+ linecap:=0;
+ linejoin:=0;
+ pickup pencircle scaled 0.90;
+ path p;
+ p = (58.50, 724.50)
+ --(103.50, 724.50)
+ --(103.50, 679.50)
+ --(58.50, 679.50)
+ --(58.50, 724.50)--cycle;
+ draw p withcolor (0.00,0.00,0.00);
+% End polyline object
+% Begin polyline object
+ linecap:=0;
+ linejoin:=0;
+ pickup pencircle scaled 0.90;
+ path p;
+ p = (103.50, 679.50)
+ --(166.50, 679.50)
+ --(166.50, 724.50)
+ --(103.50, 724.50)
+ --(103.50, 679.50)--cycle;
+ draw p withcolor (0.00,0.00,0.00);
+% End polyline object
+% Begin polyline object
+ linecap:=0;
+ linejoin:=0;
+ pickup pencircle scaled 0.90;
+ path p;
+ p = (166.50, 724.50)
+ --(103.50, 724.50)
+ --(103.50, 769.50)
+ --(166.50, 769.50)
+ --(166.50, 724.50)--cycle;
+ draw p withcolor (0.00,0.00,0.00);
+% End polyline object
+% Begin text object
+ picture q;
+ verbatimtex
+ \def\mpsetfnt{%
+ \SetFigFontSize{10}{13.0}%
+ }%
+ etex;
+ q = btex \mpsetfnt $A$ etex;
+ picture p;
+ p = q rotated 0.00;
+ label.urt(p,((54.00,702.00))+xpart (lrcorner q - llcorner q)*(-cosd 0.00,-sind 0.00)+llcorner p) withcolor (0.00,0.00,0.00);
+% End text object
+% Begin text object
+ picture q;
+ verbatimtex
+ \def\mpsetfnt{%
+ \SetFigFontSize{10}{13.0}%
+ }%
+ etex;
+ q = btex \mpsetfnt $C$ etex;
+ picture p;
+ p = q rotated 0.00;
+ label.urt(p,((171.00,702.00))+llcorner p) withcolor (0.00,0.00,0.00);
+% End text object
+% Begin text object
+ picture q;
+ verbatimtex
+ \def\mpsetfnt{%
+ \SetFigFontSize{10}{13.0}%
+ }%
+ etex;
+ q = btex \mpsetfnt $B$ etex;
+ picture p;
+ p = q rotated 0.00;
+ label.urt(p,((99.00,742.50))+xpart (lrcorner q - llcorner q)*(-cosd 0.00,-sind 0.00)+llcorner p) withcolor (0.00,0.00,0.00);
+% End text object
+% Begin text object
+ picture q;
+ verbatimtex
+ \def\mpsetfnt{%
+ \SetFigFontSize{10}{13.0}%
+ }%
+ etex;
+ q = btex \mpsetfnt using algorithm $A_2$ etex;
+ picture p;
+ p = q rotated 0.00;
+ label.urt(p,((112.50,639.00))+xpart (lrcorner q - llcorner q)*(-cosd 0.00,-sind 0.00)/2+llcorner p) withcolor (0.00,0.69,0.00);
+% End text object
+% Begin text object
+ picture q;
+ verbatimtex
+ \def\mpsetfnt{%
+ \SetFigFontSize{10}{13.0}%
+ }%
+ etex;
+ q = btex \mpsetfnt using algorithm $A_1$ etex;
+ picture p;
+ p = q rotated 0.00;
+ label.urt(p,((112.50,657.00))+xpart (lrcorner q - llcorner q)*(-cosd 0.00,-sind 0.00)/2+llcorner p) withcolor (0.00,0.00,0.69);
+% End text object
+endfig;
+end