(************** Content-type: application/mathematica ************** CreatedBy='Mathematica 5.0' Mathematica-Compatible Notebook This notebook can be used with any Mathematica-compatible application, such as Mathematica, MathReader or Publicon. The data for the notebook starts with the line containing stars above. To get the notebook into a Mathematica-compatible application, do one of the following: * Save the data starting with the line of stars above into a file with a name ending in .nb, then open the file inside the application; * Copy the data starting with the line of stars above to the clipboard, then use the Paste menu command inside the application. Data for notebooks contains only printable 7-bit ASCII and can be sent directly in email or through ftp in text mode. Newlines can be CR, LF or CRLF (Unix, Macintosh or MS-DOS style). NOTE: If you modify the data for this notebook not in a Mathematica- compatible application, you must delete the line below containing the word CacheID, otherwise Mathematica-compatible applications may try to use invalid cache data. For more information on notebooks and Mathematica-compatible applications, contact Wolfram Research: web: http://www.wolfram.com email: info@wolfram.com phone: +1-217-398-0700 (U.S.) Notebook reader applications are available free of charge from Wolfram Research. *******************************************************************) (*CacheID: 232*) (*NotebookFileLineBreakTest NotebookFileLineBreakTest*) (*NotebookOptionsPosition[ 885543, 27446]*) (*NotebookOutlinePosition[ 886482, 27475]*) (* CellTagsIndexPosition[ 886438, 27471]*) (*WindowFrame->Normal*) Notebook[{ Cell["The Poincare Model", "Title"], Cell["W. Goldman, 11 July 2004", "Subtitle"], Cell["\<\ This graphics package draws objects in the hyperbolic plane using the Poincare model. The pictures are drawn in the unit disc, but the calculations occur in the upper half plane, where the isometry group is PSL(2,R).\ \>", "Subsubtitle"], Cell["Calculations in the hyperbolic plane", "Section"], Cell[BoxData[{ \(Off[General::"\"]\ \), "\[IndentingNewLine]", \(Off[Power::"\"]\), "\[IndentingNewLine]", \(Off[General::"\"]\)}], "Input"], Cell["Draw in the unit disc.", "Subsection"], Cell[BoxData[{ \(\(UnitCircle = Circle[{0, 0}, 1];\)\), "\n", \(ShowP[l_] := Show[Graphics[Prepend[l, UnitCircle]], PlotRange \[Rule] {{\(-1.1\), 1.1}, {\(-1.1\), 1.1}}, AspectRatio \[Rule] 1]\)}], "Input"], Cell[CellGroupData[{ Cell[BoxData[ \(\(ShowP[{}];\)\)], "Input"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: 1 MathPictureStart /Mabs { Mgmatrix idtransform Mtmatrix dtransform } bind def /Mabsadd { Mabs 3 -1 roll add 3 1 roll add exch } bind def %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.5 0.454545 0.5 0.454545 [ [ 0 0 0 0 ] [ 1 1 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 m 1 0 L 1 1 L 0 1 L closepath clip newpath 0 g .5 Mabswid [ ] 0 setdash newpath .5 .5 .45455 0 365.73 arc s % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 288}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCacheValid->False] }, Open ]], Cell["Compute in the upper half plane.", "Subsection"], Cell[CellGroupData[{ Cell[BoxData[{\(ToCircle[ r_] := {2 r\ /\((\ r^2\ + 1)\), \((\ r^2\ - 1)\)/\((\ r^2 + 1)\)}\), "\n", \(ToCircle[ComplexInfinity] := {0, 1}\), "\[IndentingNewLine]", RowBox[{\(ToCircle::usage\), "=", "\"\16]\)\!\(\* StyleBox[\" \",\nFontSize->16]\)\[DoubleStruckCapitalR] \[Union] \ {\[Infinity]}.\nHere 0 is at the bottom, \[Infinity] on top, -1 to to left \ and 1 to right.\>\""}]}], "Input"], Cell[BoxData["\<\"ToCircle[r] gives the point on the unit circle \ corresponding to r \\!\\(\\* \ StyleBox[\\\"\[Element]\\\",\\nFontSize->16]\\)\\!\\(\\* StyleBox[\\\" \ \\\",\\nFontSize->16]\\)\[DoubleStruckCapitalR] \[Union] {\[Infinity]}. Here \ 0 is at the bottom, \[Infinity] on top, -1 to to left and 1 to right.\"\>"], \ "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ \(\(ToUnitDisc[ComplexInfinity] = I;\)\), "\n", \(\(ToUnitDisc[\(-I\)] = ComplexInfinity;\)\), "\n", \(ToUnitDisc[ z_] := \ \((z - I)\)/\((\(-I\)\ z\ + \ 1)\)\), "\[IndentingNewLine]", \(ToUnitDisc::usage = "\"\)}], "Input"], Cell[BoxData[ \("ToUnitDisc[z] maps the point z in the upper half plane to the \ corresponding point w in the unit disc. When z is real, this agrees with \ ToCircle[z]."\)], "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ \(ToR2[z_] := {Re[z], Im[z]}\), "\[IndentingNewLine]", \(ToR2::usage = \*"\"\\""\)}], "Input"], Cell[BoxData[ \("ToR2[w] gives the point in \!\(\[DoubleStruckCapitalR]\^2\) whose \ coordinates are the real and imaginary parts of w."\)], "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ \(NormSquared[{x_, y_}] := x^2\ + \ y^2\), "\n", \(InvertInUnitCircle[v_] := \ 1/NormSquared[v]\ v\), "\[IndentingNewLine]", \(NormSquared::usage = \*"\"\\""\)}], \ "Input"], Cell[BoxData[ \("NormSquared[v] gives the square of the Euclidean norm of a vector in \ \!\(\[DoubleStruckCapitalR]\^2\)."\)], "Output"], Cell["Drawing Geodesics", "Section"], Cell["\<\ When the geodesic from z1 to z2 passes through i, the corresponding geodesic in the unit disc passes through 0 and is \ represented by a Euclidean line segment, a diameter of the unit disc.\ \>", \ "Subsection"], Cell[CellGroupData[{ Cell[BoxData[{ \(LinearDependentQ[z1_, z2_] := \((Chop[Im[z1\ \ Conjugate[z2]]] \[Equal] 0)\)\), "\[IndentingNewLine]", \(LinearDependentQ::usage = "\"\)}], "Input"], Cell[BoxData[ \("LinearDependentQ[z1,z2] tests whether complex numbers z1 and z2 are \ linearly dependent over \[DoubleStruckCapitalR]."\)], "Output"] }, Open ]], Cell[BoxData[ \(\(\(PGSegment[{z1_, z2_}] := \ Module[{w1 = ToUnitDisc[z1], w2 = ToUnitDisc[z2]}, Line[{ToR2[w1], ToR2[w2]}] /; LinearDependentQ[w1, w2]]\)\(\[IndentingNewLine]\) \)\)], "Input"], Cell["\<\ The general case is more complicated. First we find the endpoints of the Poincare geodesic between two points z1, z2 in the upper half plane.\ \>", "Subsection"], Cell[CellGroupData[{ Cell[BoxData[ \(\(\(MidpointEndpointsPGeodesic[z1_, z2_] := Re[\((z1\ + \ z2)\)/2\ - \ I/2\ \((Im[z1 + z2]/ Re[z1 - z2]\ \((z1 - z2)\))\)]\[IndentingNewLine] MidpointEndpointsPGeodesic::usage = "\"\)\(\ \)\)\)], "Input"], Cell[BoxData[ \("MidpointEndpointsPGeodesic[z1,z2] gives the midpoint of the pair of \ endpoints of the Poincare geodesic containing points z1 and z2 in the upper \ half plane."\)], "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ \(EndpointsPGeodesic[z1_, z2_] := Module[{distance, midpoint = MidpointEndpointsPGeodesic[z1, z2]}, \[IndentingNewLine]distance = Abs[z1 - midpoint]; \[IndentingNewLine]{midpoint - distance, midpoint + distance}]\), "\n", \(EndpointsPGeodesic[z1_, z2_] := {Re[z1], ComplexInfinity} /; \((Re[z1] == Re[z2])\)\), "\[IndentingNewLine]", \(EndpointsPGeodesic[z_, ComplexInfinity] := {Re[z], ComplexInfinity}\), "\[IndentingNewLine]", \(EndpointsPGeodesic[ComplexInfinity, z_] := {Re[z], ComplexInfinity}\), "\[IndentingNewLine]", \(EndpointsPGeodesic::usage = "\"\)}], "Input"], Cell[BoxData[ \("EndpointsPGeodesic[z1,z2] gives the endpoints of the Poincare geodesic \ containing z1 and z2 in the upper half plane."\)], "Output"] }, Open ]], Cell["Now we transform to the unit disc.", "Subsection"], Cell[CellGroupData[{ Cell[BoxData[{ \(xxParam[r1_, r2_] := \((ToCircle[r1] + ToCircle[r2])\)/ 2\), "\[IndentingNewLine]", \(xxParam::usage = "\"\), "\n", \(LengthxxParam[r1_, r2_] := Sqrt[NormSquared[xxParam[r1, r2]]]\), "\n", \(LengthxxParam::usage = "\"\)}], "Input"], Cell[BoxData[ \("xxParam[r1,r2] gives the midpoint of the Euclidean line segment \ joining the points on the unit circle corresponding to r1,r2 \[Element] \ \[DoubleStruckCapitalR] \[Union] {\[Infinity]}."\)], "Output"], Cell[BoxData[ \("LengthxxParam[r1,r2] gives the length of the vector to the midpoint of \ the Euclidean line segment joining the points on the unit circle \ corresponding to r1,r2 \[Element] \[DoubleStruckCapitalR] \[Union] {\ \[Infinity]}."\)], "Output"] }, Open ]], Cell["\<\ Now we can determine the center and radius of the circle containing \ the Poincare geodesic passing through the points w1 and w2 in the unit \ disc.\ \>", "Subsection"], Cell[CellGroupData[{ Cell[BoxData[{ \(RadiusPGeodesic[r1_, r2_] := Module[{x = LengthxxParam[r1, r2]}, Re[Sqrt[1 - x^2]/Abs[x]]]\), "\n", \(CenterPGeodesic[r1_, r2_] := Module[{v = xxParam[r1, r2]}, InvertInUnitCircle[v]]\), "\n", \(InclinationAngle[v_] := Apply[ArcTan, v]\), "\[IndentingNewLine]", \(RadiusPGeodesic::usage = "\"\), "\ \[IndentingNewLine]", \(CenterPGeodesic::usage = "\"\)}], "Input"], Cell[BoxData[ \("RadiusPGeodesic[r1,r2] gives the radius of the circle representing the \ Poincare geodesic with endpoints corresponding to r1,r2 \[Element] \ \[DoubleStruckCapitalR] \[Union] {\[Infinity]}."\)], "Output"], Cell[BoxData[ \("CenterPGeodesic[r1,r2] gives the center of the circle representing the \ Poincare geodesic with endpoints corresponding to r1,r2 \[Element] \ \[DoubleStruckCapitalR] \[Union] {\[Infinity]}."\)], "Output"] }, Open ]], Cell[TextData[{ "The angular interval needed for ", StyleBox["Mathematica", FontSlant->"Italic"], "'s graphics object Circle must be specified in numeric order. Furthermore \ the angular interval corresponding to a Poincare geodesic must be < \[Pi]. \ The output of ", StyleBox["Mathematica's ", FontSlant->"Italic"], " ArcTan", StyleBox[" ", FontSlant->"Italic"], "function, lies in the interval ", StyleBox["(-\[Pi], \[Pi]] .\n", FontWeight->"Plain"], "For this reason, we need a routine to prepare the input\nto use Circle to \ draw a circular arc." }], "Subsection"], Cell[CellGroupData[{ Cell[BoxData[{ \(ArcSort[l_] := \ Module[{sorted = Sort[l]}, \[IndentingNewLine]If[ sorted[\([2]\)] - sorted[\([1]\)] > \ Pi, \[IndentingNewLine]{sorted[\([2]\)], 2\ Pi\ + \ sorted[\([1]\)]}, \[IndentingNewLine]sorted]\ \ \ \[IndentingNewLine]\ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ ]\), "\ \[IndentingNewLine]", \(ArcSort::usage = "\"\)}], "Input"], Cell[BoxData[ \("ArcSort[l] takes a list l of two angles (residue classes modulo \ 2\[Pi]) and puts them in increasing order, such that their difference is < \ \[Pi]."\)], "Output"] }, Open ]], Cell[BoxData[ \(PGSegment[{z1_, z2_}] := \ Module[{w1 = ToUnitDisc[z1], w2 = ToUnitDisc[z2], \[IndentingNewLine]endpoints, r1, r2}, endpoints = EndpointsPGeodesic[z1, z2]; r1 = endpoints[\([1]\)]; r2 = endpoints[\([2]\)]; \[IndentingNewLine]center = CenterPGeodesic[r1, r2]; radius = RadiusPGeodesic[r1, r2]; \[IndentingNewLine]Circle[\(ToR2[center]\)[\([1]\)], radius, ArcSort[\[IndentingNewLine]Map[ Apply[ArcTan, ToR2[#] - center] &, {w1, w2}]\[IndentingNewLine]]\ \ \ \ \ \ \ \ \ \ \ ]\ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ ]\)], "Input"], Cell["Test for roundoff error:", "Text"], Cell[CellGroupData[{ Cell[BoxData[{ \(\(PGSegment[{E^\((I\ N[Pi]/5)\), E^\((I\ 4\ N[Pi]/5)\)}] // Chop;\)\), "\n", \(\(PGSegment[{E^\((I\ N[Pi]/5)\), .000000001\ + E^\((I\ 4\ N[Pi]/5)\)}] // Chop;\)\)}], "Input"], Cell[CellGroupData[{ Cell[BoxData[{ StyleBox[\(Affine[l_] := Drop[l, \(-1\)]/Last[l]\), FontWeight->"Bold"], "\[IndentingNewLine]", StyleBox[\(Affine::usage = "\"\), FontWeight->"Bold"]}], "Input", FontWeight->"Plain"], Cell[BoxData[ \("Affine[l] gives the inhomogeneous coordinates of the list of \ homogeneous coordinates of a point in projective space,"\)], "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ \(IdealFixedPoints[M_] := Map[\(Affine[#]\)[\([1]\)] &, Eigenvectors[M]]\), "\[IndentingNewLine]", \(IdealFixedPoints::usage = "\"\)}], "Input"], Cell[BoxData[ \("IdealFixedPoints[M} gives extended real numbers, representing the \ attracting fixed point, then the repelling fixed point of the linear \ fractional transformation represented by the 2x2 matrix M."\)], "Output"] }, Open ]], Cell["Generalized Triangle Groups", "Section"], Cell[TextData[{ "We use Fricke's parametrization of ", StyleBox["SL(2) ", FontWeight->"Bold"], " of a rank two free group by traces.\nHere the group has a presentation \ ", StyleBox["< A, B, C | A B C = 1 >", FontWeight->"Bold"], " and the Fricke\nparameters are the traces ", StyleBox["a, b, c ", FontWeight->"Bold"], "of ", StyleBox["A, B, C", FontWeight->"Bold"], " respectively." }], "Text"], Cell["Generators of the free group", "Subsection", FontWeight->"Plain"], Cell[BoxData[{ \(AMatrix[a_, b_, c_] := \ {{a, \(-1\)}, {1, 0}}\), "\n", \(BMatrix[a_, b_, c_] := \ {{0, cc1[c]}, {\(-cc2[c]\), b}}\)}], "Input"], Cell["\<\ Going from traces to representations (the slice) involves one \ quadratic extension:\ \>", "Text"], Cell[BoxData[{ \(\(cc1[c_] := \ \((c\ - Sqrt[c^2\ - \ 4])\)/2;\)\), "\n", \(\(cc2[c_] := \ \((c\ + \ Sqrt[c^2\ - 4])\)/2;\)\), "\n", \(CMatrix[a_, b_, c_] := \ {{cc1[c], \(-a\)\ cc1[c] + b}, {0, cc2[c]}}\)}], "Input"], Cell[BoxData[ \(ABCMatrices[a_, b_, c_] := {AMatrix[a, b, c], BMatrix[a, b, c], CMatrix[a, b, c]}\)], "Input"], Cell[CellGroupData[{ Cell[BoxData[ \(Map[MatrixForm, ABCMatrices[a, b, c]] // Simplify\)], "Input"], Cell[BoxData[ RowBox[{"{", RowBox[{ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"a", \(-1\)}, {"1", "0"} }], "\[NoBreak]", ")"}], Function[ BoxForm`e$, MatrixForm[ BoxForm`e$]]], ",", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", \(1\/2\ \((c - \@\(\(-4\) + c\^2\))\)\)}, {\(1\/2\ \((\(-c\) - \@\(\(-4\) + c\^2\))\)\), "b"} }], "\[NoBreak]", ")"}], Function[ BoxForm`e$, MatrixForm[ BoxForm`e$]]], ",", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {\(1\/2\ \((c - \@\(\(-4\) + c\^2\))\)\), \(b + 1\/2\ a\ \((\(-c\) + \@\(\(-4\) + c\^2\))\)\)}, {"0", \(1\/2\ \((c + \@\(\(-4\) + c\^2\))\)\)} }], "\[NoBreak]", ")"}], Function[ BoxForm`e$, MatrixForm[ BoxForm`e$]]]}], "}"}]], "Output"] }, Open ]], Cell["Involutions", "Section"], Cell[CellGroupData[{ Cell[BoxData[{ \(InvolutionFixing[z1_, z2_] := 1/\((z1\ - \ z2)\)\ {\ {z1\ + \ z2, \ \(-2\)\ z1\ z2}, {2, \ \(-\((z1\ + \ z2)\)\)}}\), "\[IndentingNewLine]", \(InvolutionFixing[z_, ComplexInfinity] := {{\(-1\), 2\ z}, {0, 1}}\), "\[IndentingNewLine]", \(InvolutionFixing[ComplexInfinity, z_] := {{\(-1\), 2\ z}, {0, 1}}\), "\[IndentingNewLine]", \(InvolutionFixing::usage = "\"\)}], \ "Input"], Cell[BoxData[ \("InvolutionFixing[z1,z2] gives the 2x2 matrix representing an \ involution fixing complex numbers z1, z2. It is normalized to have \ determinant -1."\)], "Output"] }, Open ]], Cell[BoxData[ \(Clear[M, a, b, c, d]\)], "Input"], Cell[CellGroupData[{ Cell[BoxData[ \(InvolutionFixing[3, ComplexInfinity]\)], "Input"], Cell[BoxData[ \({{\(-1\), 6}, {0, 1}}\)], "Output"] }, Open ]], Cell[BoxData[{ \(Projective[z_] := {z, 1}\), "\[IndentingNewLine]", \(Projective[ComplexInfinity] := {1, 0}\)}], "Input"], Cell[BoxData[{ \(ApplyLinearFracTransf[M_, r_] := \ \(Affine[ M . Projective[r]]\)[\([1]\)]\), "\[IndentingNewLine]", \(\(ApplyLinearFracTransf::usage = "\";\)\)}], "Input"], Cell[CellGroupData[{ Cell[BoxData[ \(ApplyLinearFracTransf[InvolutionFixing[3, ComplexInfinity], ComplexInfinity]\)], "Input"], Cell[BoxData[ \(ComplexInfinity\)], "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ \(Traceless[M_]\ := \ M\ - \ Tr[M]/2\ IdentityMatrix[2]\), "\[IndentingNewLine]", \(Traceless::usage = "\"\)}], "Input"], Cell[BoxData[ \("Traceless[M] gives the orthogonal projection of a 2x2 matrix M to the \ Lie algebra of traceless matrices."\)], "Output"], Cell[CellGroupData[{ Cell[BoxData[{ \(Lie[A_, B_]\ := \ A . B\ - \ B . A\), "\[IndentingNewLine]", \(Lie::usage = "\"\)}], "Input"], Cell[BoxData[ \("Lie[A,B] gives the Lie product (additive commutator) of matrices A, \ B."\)], "Output"] }, Open ]] }, Open ]], Cell[BoxData[ \(SLNormalize[M_] := M/Sqrt[Det[M]]\)], "Input"], Cell[BoxData[ \(UpperHalfPlaneQ[z_] := \((Im[z] > 0)\)\)], "Input"], Cell[CellGroupData[{ Cell[BoxData[{ \(EllipticQ[ M_] := \ \((Det[M] \[NotEqual] 0)\) && \ \((Tr[M]^2/Det[M] < 4)\)\), "\[IndentingNewLine]", \(EllipticQ::usage = "\"\)}], "Input"], Cell[BoxData[ \("EllipticQ[M] tests whether M represents an elliptic \ transformation."\)], "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ \(FixedPointOfElliptic[ M_] := \(Select[Flatten[Map[Affine, Eigenvectors[SLNormalize[M]]]]\ , UpperHalfPlaneQ]\)[\([1]\)] /; EllipticQ[M]\), "\[IndentingNewLine]", \(FixedPointOfElliptic::usage = "\"\)}], "Input"], Cell[BoxData[ \("FixedPointOfElliptic[M] gives the fixed point (in the upper half \ plane) of the isometry determined by M, which is assumed to be elliptic."\)], \ "Output"] }, Open ]], Cell[BoxData[ \(EllipticQ[ M_] := \ \((Det[M] \[NotEqual] 0)\) && \ \((Tr[M]^2/Det[M] < 4)\)\)], "Input"], Cell[CellGroupData[{ Cell[BoxData[{ \(CommonOrthogonalSegment[A1_, A2_] := Module[{lie12 = Lie[A1, A2]}, Map[FixedPointOfElliptic[lie12 . Traceless[#]] &, {A1, A2}]\ ]\), "\[IndentingNewLine]", \(CommonOrthogonalSegment::usage = "\"\)}], "Input"], Cell[BoxData[ \("CommonOrthogonalSegment[A1,A2] gives the shortest segment from the \ invariant axis of A1 to the invariant axis of A2."\)], "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ \(\(ShowP[{PGSegment[{ComplexInfinity, 1/Sqrt[3. ]}], \[IndentingNewLine]PGSegment[{1/ Sqrt[3. ], \(-1\)/Sqrt[3. ]}], PGSegment[{\(-1\)/Sqrt[3. ], ComplexInfinity}]}];\)\)], "Input"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: 1 MathPictureStart /Mabs { Mgmatrix idtransform Mtmatrix dtransform } bind def /Mabsadd { Mabs 3 -1 roll add 3 1 roll add exch } bind def %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.5 0.454545 0.5 0.454545 [ [ 0 0 0 0 ] [ 1 1 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 m 1 0 L 1 1 L 0 1 L closepath clip newpath 0 g .5 Mabswid [ ] 0 setdash newpath .5 .5 .45455 0 365.73 arc s newpath 1.2873 .95455 .7873 -180 -120 arc s newpath .5 -0.40909 .7873 60 120 arc s newpath -0.2873 .95455 .7873 -60 0 arc s % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 288}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgool00`00ooooo`1oool00`00 ooooo`1=ool004coo`8008?oo`8004goo`00B_oo0P00Qooo0P00Booo0018ool2002;ool20019ool0 04Ooo`03003ooooo08goo`8004Ooo`00A_oo00<00?ooool0T?oo00<00?ooool0A?oo0014ool2002D ool00`00ooooo`13ool004?oo`03003ooooo09Goo`03003ooooo04;oo`00@Ooo0P00VOoo0P00@_oo 0010ool00`00ooooo`2Kool00`00ooooo`0oool003ooo`03003ooooo09goo`03003ooooo03koo`00 ?_oo00<00?ooool0Wooo00<00?ooool0?Ooo000lool2002Sool2000mool003_oo`03003ooooo0:Go o`03003ooooo03[oo`00>_oo00<00?ooool0Yooo00<00?ooool0>Ooo000iool00`00ooooo`2Yool0 0`00ooooo`0hool003Ooo`800:goo`8003Soo`00=_oo00<00?ooool0[ooo00<00?ooool0=Ooo000e ool00`00ooooo`2aool00`00ooooo`0dool003Goo`03003ooooo0;7oo`03003ooooo03Coo`00=?oo 00<00?ooool0/ooo00<00?ooool0?oo00<00?ooool0 _oo00<0 0?ooool0POoo00<00?ooool0>_oo00<00?ooool03ooo000?ool00`00ooooo`0lool00`00ooooo`1o ool00`00ooooo`0kool00`00ooooo`0?ool000ooo`03003ooooo03goo`03003ooooo07goo`03003o oooo03goo`03003ooooo00koo`003ooo00<00?ooool0?_oo00<00?ooool0Nooo00<00?ooool0?_oo 00<00?ooool03_oo000?ool00`00ooooo`0oool00`00ooooo`1iool00`00ooooo`0oool00`00oooo o`0>ool000ooo`03003ooooo043oo`03003ooooo07Ooo`03003ooooo043oo`03003ooooo00koo`00 3ooo00<00?ooool0@Ooo00<00?ooool0MOoo00<00?ooool0@Ooo00<00?ooool03_oo000>ool00`00 ooooo`12ool00`00ooooo`1eool00`00ooooo`11ool00`00ooooo`0>ool000koo`03003ooooo04?o o`03003ooooo07?oo`03003ooooo04?oo`03003ooooo00goo`003_oo00<00?ooool0A?oo0P00LOoo 0P00A_oo00<00?ooool03Ooo000>ool00`00ooooo`16ool00`00ooooo`1]ool00`00ooooo`16ool0 0`00ooooo`0=ool000koo`03003ooooo04Ooo`03003ooooo06_oo`03003ooooo04Ooo`03003ooooo 00goo`003_oo00<00?ooool0Aooo00<00?ooool0Jooo00<00?ooool0Aooo00<00?ooool03Ooo000> ool00`00ooooo`18ool00`00ooooo`1Yool00`00ooooo`18ool00`00ooooo`0=ool000goo`03003o oooo04[oo`03003ooooo06Ooo`03003ooooo04[oo`03003ooooo00coo`003Ooo00<00?ooool0Booo 00<00?ooool0IOoo00<00?ooool0Booo00<00?ooool03?oo000=ool00`00ooooo`1ool00`00ooooo`1Oool00`00ooooo`1>ool00`00 ooooo`0ooo00<00?ooool0Gooo00<00?oo ool03Ooo000>ool00`00ooooo`1Pool00`00ooooo`0iool00`00ooooo`1Pool00`00ooooo`0=ool0 00koo`03003ooooo063oo`03003ooooo03Soo`03003ooooo067oo`03003ooooo00goo`003_oo00<0 0?ooool0HOoo00<00?ooool0=ooo00<00?ooool0HOoo00<00?ooool03Ooo000>ool00`00ooooo`1Q ool00`00ooooo`0fool00`00ooooo`1Rool00`00ooooo`0=ool000koo`03003ooooo06;oo`03003o oooo03Goo`03003ooooo06;oo`03003ooooo00goo`003ooo00<00?ooool0HOoo00<00?ooool0=Ooo 00<00?ooool0H_oo00<00?ooool03Ooo000?ool00`00ooooo`1Qool00`00ooooo`0dool00`00oooo o`1Rool00`00ooooo`0>ool000ooo`03003ooooo06;oo`03003ooooo03?oo`03003ooooo06;oo`03 003ooooo00koo`003ooo00<00?ooool0H_oo00<00?ooool0<_oo00<00?ooool0Hooo00<00?ooool0 3_oo000?ool00`00ooooo`1Sool00`00ooooo`0aool00`00ooooo`1Sool00`00ooooo`0>ool000oo o`03003ooooo06Coo`03003ooooo02ooo`03003ooooo06Coo`03003ooooo00koo`004?oo00<00?oo ool0Hooo00<00?ooool0;_oo00<00?ooool0IOoo00<00?ooool03_oo000@ool00`00ooooo`1Tool0 0`00ooooo`0]ool00`00ooooo`1Tool00`00ooooo`0?ool0013oo`03003ooooo06Coo`03003ooooo 02coo`03003ooooo06Goo`03003ooooo00ooo`004?oo00<00?ooool0IOoo00<00?ooool0:ooo00<0 0?ooool0IOoo00<00?ooool03ooo000Aool00`00ooooo`1Uool00`00ooooo`0Yool00`00ooooo`1U ool00`00ooooo`0@ool0017oo`03003ooooo06Goo`03003ooooo02Woo`03003ooooo06Goo`03003o oooo013oo`004Ooo00<00?ooool0IOoo00<00?ooool0:Ooo00<00?ooool0IOoo00<00?ooool04?oo 000Aool00`00ooooo`1Uool00`00ooooo`0Xool00`00ooooo`1Vool00`00ooooo`0@ool001;oo`03 003ooooo06Goo`03003ooooo02Ooo`03003ooooo06Koo`03003ooooo013oo`004_oo00<00?ooool0 I_oo00<00?ooool09Ooo00<00?ooool0I_oo00<00?ooool04Ooo000Bool00`00ooooo`1Vool00`00 ooooo`0Tool00`00ooooo`1Wool00`00ooooo`0Aool001?oo`03003ooooo06Koo`03003ooooo02?o o`03003ooooo06Ooo`03003ooooo017oo`004ooo00<00?ooool0I_oo00<00?ooool08ooo00<00?oo ool0I_oo00<00?ooool04_oo000Cool00`00ooooo`1Vool00`00ooooo`0Sool00`00ooooo`1Vool0 0`00ooooo`0Bool001?oo`03003ooooo06Ooo`03003ooooo027oo`03003ooooo06Ooo`03003ooooo 01;oo`005?oo00<00?ooool0I_oo00<00?ooool08?oo00<00?ooool0Iooo00<00?ooool04ooo000D ool00`00ooooo`1Wool00`00ooooo`0Oool00`00ooooo`1Wool00`00ooooo`0Cool001Coo`03003o oooo06Ooo`03003ooooo01ooo`03003ooooo06Ooo`03003ooooo01?oo`005Ooo00<00?ooool0Iooo 00<00?ooool07_oo00<00?ooool0I_oo00<00?ooool05?oo000Fool00`00ooooo`1Vool00`00oooo o`0Mool00`00ooooo`1Wool00`00ooooo`0Dool001Koo`03003ooooo06Koo`03003ooooo01coo`03 003ooooo06Ooo`03003ooooo01Goo`005_oo00<00?ooool0Iooo00<00?ooool06ooo00<00?ooool0 Iooo00<00?ooool05Ooo000Gool00`00ooooo`1Vool00`00ooooo`0Jool00`00ooooo`1Wool00`00 ooooo`0Fool001Ooo`03003ooooo06Ooo`03003ooooo01Woo`03003ooooo06Ooo`03003ooooo01Ko o`005ooo00<00?ooool0Iooo00<00?ooool06Ooo00<00?ooool0Iooo00<00?ooool05_oo000Hool0 0`00ooooo`1Vool00`00ooooo`0Iool00`00ooooo`1Vool00`00ooooo`0Gool001Soo`03003ooooo 06Ooo`03003ooooo01Ooo`03003ooooo06Ooo`03003ooooo01Ooo`006?oo00<00?ooool0Iooo00<0 0?ooool05ooo00<00?ooool0Iooo00<00?ooool05ooo000Iool00`00ooooo`1Vool00`00ooooo`0G ool00`00ooooo`1Vool00`00ooooo`0Hool001Woo`03003ooooo06Koo`03003ooooo01Koo`03003o oooo06Ooo`03003ooooo01Soo`006_oo00<00?ooool0I_oo00<00?ooool05Ooo00<00?ooool0I_oo 00<00?ooool06Ooo000Kool00`00ooooo`1Uool00`00ooooo`0Dool00`00ooooo`1Wool00`00oooo o`0Iool001_oo`03003ooooo06Koo`03003ooooo01?oo`03003ooooo06Koo`03003ooooo01[oo`00 7?oo00<00?ooool0IOoo00<00?ooool04ooo00<00?ooool0I_oo00<00?ooool06_oo000Lool00`00 ooooo`1Uool00`00ooooo`0Bool00`00ooooo`1Vool00`00ooooo`0Kool001goo`03003ooooo06Go o`03003ooooo017oo`03003ooooo06Goo`03003ooooo01coo`007Ooo00<00?ooool0IOoo00<00?oo ool04Ooo00<00?ooool0IOoo00<00?ooool07?oo000Nool00`00ooooo`1Tool00`00ooooo`0Aool0 0`00ooooo`1Tool00`00ooooo`0Mool001ooo`03003ooooo06?oo`03003ooooo013oo`03003ooooo 06Coo`03003ooooo01koo`007ooo00<00?ooool0I?oo00<00?ooool03ooo00<00?ooool0I?oo00<0 0?ooool07_oo000Pool00`00ooooo`1Sool00`00ooooo`0?ool00`00ooooo`1Sool00`00ooooo`0O ool0023oo`03003ooooo06?oo`03003ooooo00koo`03003ooooo06Coo`03003ooooo01ooo`008Ooo 00<00?ooool0Hooo00<00?ooool03Ooo00<00?ooool0Hooo00<00?ooool08?oo000Qool00`00oooo o`1Sool00`00ooooo`0=ool00`00ooooo`1Sool00`00ooooo`0Pool002;oo`03003ooooo06;oo`03 003ooooo00goo`03003ooooo06;oo`03003ooooo027oo`008ooo00<00?ooool0HOoo00<00?ooool0 3?oo00<00?ooool0H_oo00<00?ooool08_oo000Tool00`00ooooo`1Qool00`00ooooo`0;ool00`00 ooooo`1Qool00`00ooooo`0Sool002Coo`03003ooooo067oo`03003ooooo00_oo`03003ooooo067o o`03003ooooo02?oo`009Ooo00<00?ooool0H?oo00<00?ooool02ooo00<00?ooool0H?oo00<00?oo ool09?oo000Vool00`00ooooo`1Pool00`00ooooo`09ool00`00ooooo`1Pool00`00ooooo`0Uool0 02Koo`03003ooooo063oo`03003ooooo00Woo`03003ooooo063oo`03003ooooo02Goo`009ooo00<0 0?ooool0Gooo00<00?ooool02Ooo00<00?ooool0Gooo00<00?ooool09_oo000Xool00`00ooooo`1N ool00`00ooooo`08ool00`00ooooo`1Oool00`00ooooo`0Wool002Woo`03003ooooo05koo`03003o oooo00Ooo`03003ooooo05koo`03003ooooo02Soo`00:_oo00<00?ooool0GOoo00<00?ooool01ooo 00<00?ooool0GOoo00<00?ooool0:Ooo000Zool00`00ooooo`1Mool00`00ooooo`07ool00`00oooo o`1Mool00`00ooooo`0Yool002_oo`03003ooooo05coo`03003ooooo00Ooo`03003ooooo05coo`03 003ooooo02[oo`00;?oo00<00?ooool0Fooo00<00?ooool01ooo00<00?ooool0Fooo00<00?ooool0 :ooo000]ool00`00ooooo`1Kool00`00ooooo`05ool00`00ooooo`1Kool00`00ooooo`0/ool002ko o`03003ooooo05[oo`03003ooooo00Goo`03003ooooo05[oo`03003ooooo02goo`00;_oo00<00?oo ool0F_oo00<00?ooool01Ooo00<00?ooool0F_oo00<00?ooool0;Ooo000_ool00`00ooooo`1Iool0 0`00ooooo`05ool00`00ooooo`1Iool00`00ooooo`0^ool0033oo`8005Woo`03003ooooo00Goo`03 003ooooo05Ooo`80037oo`00<_oo00<00?ooool0E_oo00<00?ooool01?oo00<00?ooool0Eooo00<0 0?ooool0Ooo00<00?ooool0DOoo00D00?ooooooo`0005?oo`03003ooooo03Soo`00>_oo00<0 0?ooool0D?oo00D00?ooooooo`0005;oo`03003ooooo03Woo`00>ooo00<00?ooool0Cooo00D00?oo ooooo`00057oo`03003ooooo03[oo`00??oo0P00Cooo00D00?ooooooo`0004ooo`8003goo`00?_oo 00<00?ooool0C?oo00D00?ooooooo`0004koo`03003ooooo03goo`00?ooo00<00?ooool0Booo00D0 0?ooooooo`0004goo`03003ooooo03koo`00@?oo00<00?ooool0B_oo00@00?ooool004goo`03003o oooo03ooo`00@Ooo0P00Booo00<00?oo0000Booo0P00@_oo0013ool00`00ooooo`18ool00`00ool0 001:ool00`00ooooo`12ool004Coo`8004Soo`03003oo`0004Soo`8004Goo`00A_oo00<00?ooool0 AOoo00<00?oo0000Aooo00<00?ooool0AOoo0017ool00`00ooooo`14ool00`00ool00016ool00`00 ooooo`16ool004Soo`8004Coo`03003oo`0004Coo`8004Woo`00B_oo0P00@_oo00<00?oo0000@_oo 0P00Booo001Ooo 00<00?ooool0=ooo0P00EOoo001Fool2000gool00`00ooooo`0eool2001Gool005Soo`<003Coo`03 003ooooo03;oo`<005Woo`00Fooo0`00"], ImageRangeCache->{{{0, 287}, {287, 0}} -> {-1.10001, -1.10001, 0.00766559, \ 0.00766559}}] }, Open ]], Cell[BoxData[{ \(AxesP[M_] := PGSegment[IdealFixedPoints[M]]\), "\[IndentingNewLine]", \(ShowAxesP[l_] := ShowP[Map[AxesP, l]]\)}], "Input"], Cell[BoxData[ \(ShowAxesP[l_] := ShowP[Join[OrthogonalSegments, MoreOrthogonalSegments, Map[AxesP, l]]]\)], "Input"], Cell[BoxData[ \(Straighten[a_, b_, c_] := \(Module[{ABCs = ABCMatrices[a, b, c], eigen, r1, r2}, \[IndentingNewLine]eigen = Map[Eigenvectors, ABCs]; \[IndentingNewLine]r1 = \(Affine[ eigen[\([1, 1]\)]\ \ \ \ ]\)[\([1]\)]; \[IndentingNewLine]r2 = \ \(Affine[eigen[\([2, \ 1]\)]\ \ \ \ ]\)[\([1]\)]; \[IndentingNewLine]{{x, y}, {0, 1}} /. Solve[{x\ \ r1\ + \ y\ \[Equal] \ 1/Sqrt[3], \ x\ r2\ + \ y\ == \ \(-1\)/Sqrt[3]}, {x, y}]\ \ \ \ ]\)[\([1]\)]\)], "Input"], Cell[BoxData[ \(NewABCMatrices[a_, b_, c_] := \ Module[{ABCs, straighten, invstraighten}, \[IndentingNewLine]ABCs = ABCMatrices[a, b, c]; \[IndentingNewLine]straighten = Straighten[a, b, c]; \[IndentingNewLine]invstraighten = Inverse[straighten]; \[IndentingNewLine]Map[ straighten . # . invstraighten &, ABCs]]\)], "Input"], Cell[BoxData[ \(OrthoSegments[A_, B_, C_] := Map[PGSegment[Apply[CommonOrthogonalSegment, #]] &, {{A, B}, {B, C}, {C, A}, {A, B . A}, {B, B . A}, {B, C . B}, {C, C . B}, {C, A . C}, {A, A . C}}]\)], "Input"], Cell[CellGroupData[{ Cell[BoxData[ \(\(ShowP[ Apply[OrthoSegments, NewABCMatrices[\(-2.1\), \(-2.3\), \(-2.1\)]]];\)\)], "Input"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: 1 MathPictureStart /Mabs { Mgmatrix idtransform Mtmatrix dtransform } bind def /Mabsadd { Mabs 3 -1 roll add 3 1 roll add exch } bind def %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.5 0.454545 0.5 0.454545 [ [ 0 0 0 0 ] [ 1 1 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 m 1 0 L 1 1 L 0 1 L closepath clip newpath 0 g .5 Mabswid [ ] 0 setdash newpath .5 .5 .45455 0 365.73 arc s newpath .17091 -0.40819 .85235 49.7831 87.3642 arc s newpath .031 1.06743 .57907 -72.9131 -21.743 arc s newpath 1.38997 .74033 .80199 172.422 216.403 arc s newpath .58055 -0.02225 .26949 62.6834 150.217 arc s newpath .11632 .16764 .22597 -13.2852 69.1567 arc s newpath .06291 .73095 .19436 -55.3432 30.0695 arc s newpath .37871 .98374 .2052 -133.164 -35.2788 arc s newpath .8499 .87032 .23013 -173.873 -85.5214 arc s newpath 1.01277 .38496 .26373 120.901 203.531 arc s % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 288}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgool00`00ooooo`1oool00`00 ooooo`1=ool004coo`8008?oo`8004goo`00B_oo0P005ooo00<00?ooool0KOoo0P00Booo0018ool2 000Fool01@00oooooooo0000L?oo0P00BOoo0017ool00`00ooooo`0Fool00`00ooooo`02ool00`00 ooooo`1_ool20017ool004Koo`03003ooooo01Soo`05003oooooool0001cool00`00ooooo`14ool0 04Coo`8001_oo`03003ooooo00;oo`03003ooooo077oo`03003ooooo04?oo`00@ooo00<00?ooool0 6ooo00<00?ooool00ooo00<00?ooool0LOoo00<00?ooool0@_oo0011ool2000Nool00`00ooooo`03 ool00`00ooooo`1bool20012ool0043oo`03003ooooo01koo`03003ooooo00Coo`03003ooooo07?o o`03003ooooo03ooo`00?ooo00<00?ooool07ooo00<00?ooool01?oo00<00?ooool0M?oo00<00?oo ool0?_oo000nool00`00ooooo`0Pool00`00ooooo`05ool00`00ooooo`1dool00`00ooooo`0mool0 03coo`8002?oo`03003ooooo00Koo`03003ooooo07Coo`8003goo`00>ooo00<00?ooool09?oo00<0 0?ooool01_oo00<00?ooool0MOoo00<00?ooool0>_oo000jool00`00ooooo`0Uool00`00ooooo`07 ool00`00ooooo`1eool00`00ooooo`0iool003Woo`03003ooooo02Koo`03003ooooo00Soo`03003o oooo07Goo`03003ooooo03Soo`00=ooo0P00:Ooo00<00?ooool02Ooo00<00?ooool0MOoo0P00>?oo 000fool00`00ooooo`0Yool00`00ooooo`0:ool00`00ooooo`1fool00`00ooooo`0eool003Goo`03 003ooooo02[oo`03003ooooo00_oo`03003ooooo07Koo`03003ooooo03Coo`00=Ooo00<00?ooool0 :_oo00<00?ooool03?oo00<00?ooool0MOoo00<00?ooool0=?oo000dool00`00ooooo`0[ool00`00 ooooo`0=ool00`00ooooo`1eool00`00ooooo`0cool003?oo`03003ooooo02coo`03003ooooo00ko o`03003ooooo07Goo`03003ooooo03;oo`00<_oo00<00?ooool0;Ooo00<00?ooool03ooo00<00?oo ool0MOoo00<00?ooool0ooo 0P00_oo00<00?ooool0 9?oo000Tool00`00ooooo`0hool00`00ooooo`0_ool4000Sool3000oool00`00ooooo`0Sool002?o o`03003ooooo03Soo`03003ooooo03Coo`D001Soo`H001Ooo`03003ooooo02Soo`03003ooooo02?o o`008_oo00<00?ooool0>Ooo00<00?ooool0>Ooo60007?oo00<00?ooool0:_oo00<00?ooool08_oo 000Rool00`00ooooo`0iool00`00ooooo`1[ool2000^ool00`00ooooo`0Qool0027oo`03003ooooo 03Woo`03003ooooo06_oo`03003ooooo02ooo`03003ooooo023oo`008Ooo00<00?ooool0>Ooo00<0 0?ooool0J_oo00<00?ooool0Ooo00<00?ooool0J?oo00<00?oo ool03?oo00<00?ooool09ooo00<00?ooool07_oo000Oool00`00ooooo`0hool00`00ooooo`1Wool2 000>ool00`00ooooo`0Xool00`00ooooo`0Nool001koo`03003ooooo03Woo`03003ooooo06Koo`03 003ooooo00koo`03003ooooo02Woo`03003ooooo01goo`007Ooo00<00?ooool0>_oo00<00?ooool0 IOoo00<00?ooool03_oo00<00?ooool0:ooo00<00?ooool07?oo000Mool00`00ooooo`0iool00`00 ooooo`1Tool2000@ool00`00ooooo`08ool00`00ooooo`0Qool00`00ooooo`0Lool001coo`03003o oooo03[oo`03003ooooo06?oo`03003ooooo00ooo`03003ooooo00Soo`03003ooooo02?oo`03003o oooo01_oo`006ooo00<00?ooool0>_oo00<00?ooool0Hooo00<00?ooool03ooo00<00?ooool02?oo 00<00?ooool09?oo00<00?ooool06ooo000Kool00`00ooooo`0iool00`00ooooo`1Rool2000Aool0 0`00ooooo`09ool00`00ooooo`0Uool00`00ooooo`0Jool001[oo`03003ooooo03[oo`03003ooooo 067oo`03003ooooo017oo`03003ooooo00Woo`03003ooooo02Goo`03003ooooo01[oo`006_oo00<0 0?ooool0>Ooo00<00?ooool0H?oo0P004ooo00<00?ooool02_oo00<00?ooool09_oo00<00?ooool0 6Ooo000Iool00`00ooooo`0iool00`00ooooo`1Oool2000Eool00`00ooooo`09ool00`00ooooo`0X ool00`00ooooo`0Hool001Woo`03003ooooo03Woo`03003ooooo05goo`8001Koo`03003ooooo00[o o`03003ooooo02Soo`03003ooooo01Soo`006?oo00<00?ooool0>Ooo00<00?ooool0GOoo00<00?oo ool05Ooo00<00?ooool02ooo00<00?ooool0:Ooo00<00?ooool05ooo000Hool00`00ooooo`0hool0 0`00ooooo`1Mool00`00ooooo`0Fool00`00ooooo`0:ool00`00ooooo`0Zool00`00ooooo`0Gool0 01Soo`03003ooooo03Ooo`03003ooooo05coo`8001Soo`03003ooooo00_oo`03003ooooo02[oo`03 003ooooo01Ooo`005ooo00<00?ooool0=ooo00<00?ooool0Fooo0P006Ooo00<00?ooool03?oo00<0 0?ooool0:ooo00<00?ooool05_oo000Gool00`00ooooo`0fool00`00ooooo`1Kool00`00ooooo`0I ool00`00ooooo`0;ool00`00ooooo`0/ool00`00ooooo`0Fool001Koo`03003ooooo03Koo`03003o oooo05_oo`03003ooooo01Woo`03003ooooo00coo`03003ooooo02coo`03003ooooo01Koo`005_oo 00<00?ooool0=Ooo00<00?ooool0F_oo0P007?oo00<00?ooool03?oo00<00?ooool0;Ooo00<00?oo ool05Ooo000Fool00`00ooooo`0dool00`00ooooo`1Iool2000Mool00`00ooooo`0=ool00`00oooo o`0]ool00`00ooooo`0Eool001Goo`03003ooooo03Coo`03003ooooo05Ooo`<001ooo`03003ooooo 00goo`03003ooooo02goo`03003ooooo01Goo`005Ooo00<00?ooool0?oo00<00?ooool05Ooo00<00?ooool0=?oo00<00?oo ool03ooo000@ool00`00ooooo`1_ool2000kool00`00ooooo`0Eool00`00ooooo`0dool00`00oooo o`0?ool0013oo`03003ooooo06[oo`D003coo`03003ooooo01Koo`03003ooooo03Coo`03003ooooo 00ooo`003ooo00<00?ooool0JOoo0P00@Ooo00<00?ooool05_oo00<00?ooool0=?oo00<00?ooool0 3ooo000?ool00`00ooooo`1Vool30012ool00`00ooooo`0Gool00`00ooooo`0eool00`00ooooo`0> ool000ooo`03003ooooo06;oo`@004Coo`03003ooooo01Soo`03003ooooo03Goo`03003ooooo00ko o`003ooo00<00?ooool0Gooo0`00B?oo00<00?ooool06?oo00<00?ooool0=Ooo00<00?ooool03_oo 000?ool00`00ooooo`1Jool5001;ool00`00ooooo`0Hool00`00ooooo`0eool00`00ooooo`0>ool0 00ooo`03003ooooo05Soo`8004ooo`03003ooooo01Woo`03003ooooo03Goo`03003ooooo00koo`00 3_oo00<00?ooool0E?oo1@00DOoo00<00?ooool06Ooo00<00?ooool0=Ooo00<00?ooool03_oo000> ool00`00ooooo`1?ool5001Eool00`00ooooo`0Kool00`00ooooo`0eool00`00ooooo`0=ool000ko o`03003ooooo04Soo`L005[oo`03003ooooo01_oo`03003ooooo03Goo`03003ooooo00goo`003_oo 00<00?ooool0@ooo1@00HOoo00<00?ooool06ooo00<00?ooool0=Ooo00<00?ooool03Ooo000>ool0 0`00ooooo`0kool8001Uool00`00ooooo`0Lool00`00ooooo`0eool00`00ooooo`0=ool000koo`03 003ooooo02ooo``006goo`03003ooooo01coo`03003ooooo03Goo`03003ooooo00goo`003_oo00<0 0?ooool0:ooo1000N?oo00<00?ooool07Ooo00<00?ooool0=Ooo00<00?ooool03Ooo000=ool00`00 ooooo`2Xool00`00ooooo`0Nool00`00ooooo`0eool00`00ooooo`0?oo00<00?ooool09?oo00<00?ooool03Ooo000>ool00`00ooooo`18ool2001Cool0 0`00ooooo`0iool00`00ooooo`0Sool00`00ooooo`0=ool000koo`03003ooooo04[oo`80057oo`03 003ooooo03[oo`03003ooooo02;oo`03003ooooo00goo`003_oo00<00?ooool08?oo00<00?ooool0 :Ooo0P00Cooo00<00?ooool0>ooo00<00?ooool08Ooo00<00?ooool03Ooo000>ool00`00ooooo`0Q ool00`00ooooo`0Zool2001ool000ooo`03003ooooo02Goo`03003ooooo 02_oo`8004Goo`03003ooooo04;oo`8001coo`03003ooooo00koo`003ooo00<00?ooool09_oo00<0 0?ooool0;?oo00<00?ooool0@_oo00<00?ooool0A?oo00<00?ooool06Ooo00<00?ooool03_oo000? ool00`00ooooo`0Wool00`00ooooo`0/ool00`00ooooo`11ool00`00ooooo`15ool2000Iool00`00 ooooo`0>ool0013oo`03003ooooo02Ooo`03003ooooo02coo`80047oo`03003ooooo04Ooo`03003o oooo01Koo`03003ooooo00koo`004?oo00<00?ooool0:?oo00<00?ooool0;Ooo0P00?ooo00<00?oo ool0B?oo00<00?ooool05?oo00<00?ooool03ooo000@ool00`00ooooo`0Yool00`00ooooo`0^ool0 0`00ooooo`0kool00`00ooooo`1:ool00`00ooooo`0Cool00`00ooooo`0?ool0013oo`03003ooooo 02[oo`03003ooooo02goo`03003ooooo03_oo`03003ooooo04_oo`8001?oo`03003ooooo00ooo`00 4Ooo00<00?ooool0:Ooo00<00?ooool0;_oo0P00>ooo00<00?ooool0COoo00<00?ooool03ooo00<0 0?ooool04?oo000Aool00`00ooooo`0Zool00`00ooooo`0_ool00`00ooooo`0hool00`00ooooo`1O ool00`00ooooo`0@ool0017oo`03003ooooo02_oo`03003ooooo02ooo`03003ooooo03Ooo`03003o oooo05ooo`03003ooooo013oo`004Ooo00<00?ooool0;?oo00<00?ooool0;ooo0P00=ooo00<00?oo ool0Gooo00<00?ooool04?oo000Bool00`00ooooo`0[ool00`00ooooo`0aool00`00ooooo`0dool0 0`00ooooo`1Oool00`00ooooo`0@ool001;oo`03003ooooo02coo`03003ooooo037oo`03003ooooo 03?oo`03003ooooo05koo`03003ooooo017oo`004_oo00<00?ooool0;Ooo00<00?ooool0_oo20007?oo00<00?ooool04_oo000Cool0 0`00ooooo`0^ool00`00ooooo`0dool00`00ooooo`0/ool00`00ooooo`0eool5000Tool00`00oooo o`0Bool001Coo`03003ooooo02goo`03003ooooo03Coo`03003ooooo02coo`03003ooooo037oo`@0 02Soo`03003ooooo01?oo`005?oo00<00?ooool0;_oo00<00?ooool0=?oo0P00;?oo00<00?ooool0 ;ooo0P00;?oo00<00?ooool04ooo000Dool00`00ooooo`0^ool00`00ooooo`0fool00`00ooooo`0Y ool00`00ooooo`0]ool2000^ool00`00ooooo`0Cool001Goo`03003ooooo02koo`03003ooooo03Ko o`03003ooooo02Ooo`03003ooooo02goo`03003ooooo02goo`03003ooooo01Coo`005_oo00<00?oo ool0;Ooo00<00?ooool0=ooo00<00?ooool09_oo00<00?ooool0:_oo0`00?oo00<00?ooool0 9?oo00<00?ooool09Ooo00<00?ooool0ooo00<00?ooool08Ooo00<00?ooool08?oo 0P00>?oo00<00?ooool05ooo000Hool00`00ooooo`0]ool00`00ooooo`0kool00`00ooooo`0Pool0 0`00ooooo`0Nool2000jool00`00ooooo`0Gool001Soo`03003ooooo02goo`03003ooooo03_oo`03 003ooooo023oo`03003ooooo01goo`03003ooooo03[oo`03003ooooo01Ooo`006Ooo00<00?ooool0 ;?oo00<00?ooool0??oo00<00?ooool07ooo00<00?ooool07?oo00<00?ooool0>_oo00<00?ooool0 6?oo000Iool00`00ooooo`0/ool00`00ooooo`0mool00`00ooooo`0Nool00`00ooooo`0Lool00`00 ooooo`0jool00`00ooooo`0Hool001[oo`03003ooooo02_oo`03003ooooo03koo`03003ooooo01go o`03003ooooo01_oo`03003ooooo03[oo`03003ooooo01Woo`006ooo00<00?ooool0:ooo00<00?oo ool0?_oo00<00?ooool07?oo00<00?ooool06_oo00<00?ooool0>ooo00<00?ooool06Ooo000Kool0 0`00ooooo`0[ool00`00ooooo`0oool00`00ooooo`0Jool00`00ooooo`0Jool00`00ooooo`0kool0 0`00ooooo`0Jool001coo`03003ooooo02[oo`03003ooooo043oo`03003ooooo01Woo`03003ooooo 01Soo`8003koo`03003ooooo01[oo`007?oo00<00?ooool0:_oo00<00?ooool0@?oo00<00?ooool0 6Ooo00<00?ooool05ooo00<00?ooool0?Ooo00<00?ooool06ooo000Mool00`00ooooo`0Yool00`00 ooooo`11ool00`00ooooo`0Hool00`00ooooo`0Fool00`00ooooo`0mool00`00ooooo`0Lool001go o`03003ooooo02Woo`03003ooooo04;oo`03003ooooo01Ooo`03003ooooo01Goo`03003ooooo03ko o`03003ooooo01coo`007_oo00<00?ooool0:?oo00<00?ooool0@ooo00<00?ooool05_oo00<00?oo ool05?oo00<00?ooool0?_oo00<00?ooool07Ooo000Oool00`00ooooo`0Wool00`00ooooo`13ool0 0`00ooooo`0Fool00`00ooooo`0Dool00`00ooooo`0mool00`00ooooo`0Nool001ooo`03003ooooo 02Ooo`03003ooooo04Coo`03003ooooo01Goo`03003ooooo01?oo`03003ooooo03koo`03003ooooo 01koo`008?oo00<00?ooool09_oo00<00?ooool0A?oo00<00?ooool05Ooo00<00?ooool04_oo00<0 0?ooool0?_oo00<00?ooool07ooo000Pool00`00ooooo`0Vool00`00ooooo`15ool00`00ooooo`0D ool00`00ooooo`0Bool00`00ooooo`0nool00`00ooooo`0Oool0027oo`03003ooooo02Goo`03003o oooo04Koo`03003ooooo01?oo`03003ooooo017oo`03003ooooo03koo`03003ooooo023oo`008Ooo 00<00?ooool09Ooo00<00?ooool0Aooo00<00?ooool04_oo00<00?ooool04?oo00<00?ooool0?ooo 00<00?ooool08?oo000Rool00`00ooooo`0Tool00`00ooooo`18ool00`00ooooo`0Aool00`00oooo o`0@ool00`00ooooo`0nool00`00ooooo`0Qool002?oo`03003ooooo02?oo`03003ooooo04Soo`03 003ooooo017oo`03003ooooo00ooo`03003ooooo03koo`03003ooooo02;oo`009?oo00<00?ooool0 8_oo00<00?ooool0BOoo00<00?ooool04?oo00<00?ooool03ooo00<00?ooool0?Ooo00<00?ooool0 8ooo000Tool00`00ooooo`0Rool00`00ooooo`19ool00`00ooooo`0@ool00`00ooooo`0>ool00`00 ooooo`0nool00`00ooooo`0Sool002Goo`03003ooooo027oo`03003ooooo04[oo`03003ooooo00oo o`03003ooooo00koo`03003ooooo03goo`03003ooooo02Coo`009_oo00<00?ooool07ooo00<00?oo ool0C?oo00<00?ooool03_oo00<00?ooool03Ooo00<00?ooool0?Ooo00<00?ooool09Ooo000Vool0 0`00ooooo`0Oool00`00ooooo`1=ool00`00ooooo`0=ool00`00ooooo`0=ool00`00ooooo`0mool0 0`00ooooo`0Uool002Ooo`03003ooooo01koo`03003ooooo04goo`03003ooooo00koo`03003ooooo 00_oo`03003ooooo03goo`03003ooooo02Koo`00:?oo00<00?ooool07Ooo00<00?ooool06ooo3`00 9?oo00<00?ooool03Ooo00<00?ooool02ooo00<00?ooool0??oo00<00?ooool09ooo000Yool00`00 ooooo`0Lool00`00ooooo`0Cool8000?ool5000Oool00`00ooooo`0=ool00`00ooooo`0:ool00`00 ooooo`0lool00`00ooooo`0Xool002[oo`03003ooooo01[oo`03003ooooo017oo`<001coo`<001go o`03003ooooo00coo`03003ooooo00[oo`03003ooooo03_oo`03003ooooo02Woo`00:_oo00<00?oo ool06_oo00<00?ooool03_oo0`008_oo0`006_oo00<00?ooool03?oo00<00?ooool02Ooo00<00?oo ool0??oo00<00?ooool0:Ooo000[ool00`00ooooo`0Hool00`00ooooo`0_oo00<00?ooool0;?oo000^ool00`00 ooooo`0Dool00`00ooooo`08ool2000fool2000Bool00`00ooooo`0:ool00`00ooooo`08ool00`00 ooooo`0iool00`00ooooo`0]ool002koo`03003ooooo01Coo`03003ooooo00Koo`8003[oo`03003o oooo00ooo`03003ooooo00[oo`03003ooooo00Soo`03003ooooo03Woo`03003ooooo02goo`00;ooo 00<00?ooool04_oo00<00?ooool01Ooo0P00?Ooo0P004?oo00<00?ooool02Ooo00<00?ooool01ooo 00<00?ooool0>Ooo00<00?ooool0;_oo000`ool2000Bool00`00ooooo`04ool00`00ooooo`0oool2 000>ool00`00ooooo`09ool00`00ooooo`07ool00`00ooooo`0gool2000aool003;oo`03003ooooo 00ooo`03003ooooo00?oo`03003ooooo04;oo`03003ooooo00coo`03003ooooo00Soo`03003ooooo 00Ooo`03003ooooo03Koo`03003ooooo037oo`00?oo000iool00`00ooooo`1Jool00`00ooooo`08ool00`00ooooo`06ool00`00oooo o`05ool00`00ooooo`0`ool00`00ooooo`0hool003[oo`03003ooooo05[oo`03003ooooo00Soo`03 003ooooo00Goo`03003ooooo00Goo`03003ooooo02ooo`03003ooooo03Woo`00>ooo00<00?ooool0 F_oo00<00?ooool01ooo00<00?ooool0?_oo00<00?ooool0>_oo000lool2001Kool00`00ooooo`07 ool00`00ooooo`0kool2000mool003koo`03003ooooo05Woo`03003ooooo04?oo`03003ooooo03go o`00?ooo00<00?ooool0FOoo00<00?ooool0@Ooo00<00?ooool0?_oo0010ool00`00ooooo`1Hool0 0`00ooooo`10ool00`00ooooo`0oool0047oo`8005Woo`03003ooooo03goo`8004;oo`00@ooo00<0 0?ooool0UOoo00<00?ooool0@_oo0014ool2002Cool20015ool004Koo`03003ooooo08ooo`03003o oooo04Goo`00Aooo00<00?ooool0SOoo00<00?ooool0A_oo0018ool2002;ool20019ool004[oo`80 08Ooo`8004_oo`00C?oo0P00Pooo0P00COoo001>ool00`00ooooo`1oool00`00ooooo`1=ool004oo o`8007goo`80053oo`00DOoo00<00?ooool0N?oo0P00D_oo001Bool2001gool00`00ooooo`1Bool0 05Coo`8007?oo`8005Goo`00E_oo0P00Kooo0P00Eooo001Hool3001Yool3001Iool005_oo`<006?o o`<005coo`00G_oo0P00G_oo0`00Gooo001Pool2001Kool00`00ooooo`1Pool006;oo`<005Goo`<0 06?oo`00IOoo0`00C_oo1000I_oo001Xool30018ool3001Zool006_oo`D003ooo`@006goo`00L?oo 0`00>?oo1000LOoo001cool6000/ool6001eool007Woo`L001ooo`H007_oo`00P?oo7`00POoo003o oolQool00?ooob7oo`00oooo8Ooo003ooolQool00?ooob7oo`00oooo8Ooo003ooolQool00?ooob7o o`00oooo8Ooo003ooolQool00?ooob7oo`00oooo8Ooo003ooolQool00001\ \>"], ImageRangeCache->{{{0, 287}, {287, 0}} -> {-1.10001, -1.10001, 0.00766559, \ 0.00766559}}] }, Open ]], Cell[BoxData[ \(DrawPicture1[a_, b_, c_] := Module[{ABCs = NewABCMatrices[a, b, c], A, B, C}, \[IndentingNewLine]A = ABCs[\([1]\)]; \[IndentingNewLine]B = ABCs[\([2]\)]; \[IndentingNewLine]C = ABCs[\([3]\)]; \[IndentingNewLine]ShowP[ Join[Apply[OrthoSegments, ABCs], Map[AxesP, {A, B, C, B . A, C . B, A . C}]]]]\)], "Input"], Cell[CellGroupData[{ Cell[BoxData[ \(\(DrawPicture1[\(-2.1\), \(-2.1\), \(-2.1\)];\)\)], "Input"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: 1 MathPictureStart /Mabs { Mgmatrix idtransform Mtmatrix dtransform } bind def /Mabsadd { Mabs 3 -1 roll add 3 1 roll add exch } bind def %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.5 0.454545 0.5 0.454545 [ [ 0 0 0 0 ] [ 1 1 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 m 1 0 L 1 1 L 0 1 L closepath clip newpath 0 g .5 Mabswid [ ] 0 setdash newpath .5 .5 .45455 0 365.73 arc s newpath .27086 -0.34711 .75066 51.7469 97.9805 arc s newpath -0.11904 1.122 .75066 -68.2531 -22.0195 arc s newpath 1.34819 .72511 .75066 171.747 217.98 arc s newpath .61838 -0.00123 .24215 64.9944 156.604 arc s newpath .14508 .1268 .24215 -6.87628 84.733 arc s newpath .00673 .64809 .24215 -55.0056 36.6036 arc s newpath .35426 .99397 .24215 -126.876 -35.267 arc s newpath .87489 .85314 .24215 -175.006 -83.3964 arc s newpath 1.00066 .37923 .24215 113.124 204.733 arc s newpath .83217 .16625 .12295 60 209.727 arc s newpath .04487 .37921 .12295 -60 89.7274 arc s newpath .62295 .95455 .12295 -180 -30.2726 arc s newpath .38089 .05966 .03842 -10.3045 160.032 arc s newpath .17821 .82332 .03842 -130.305 40.0319 arc s newpath .9409 .61702 .03842 109.695 280.032 arc s % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 288}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgool3001Iool005Koo`8000koo`03003ooooo00[oo`03003ooooo057oo`8005Oo o`00EOoo00<00?ooool03ooo0P002_oo00<00?ooool0Dooo0P00EOoo001Cool2000Dool20004ool4 001Hool2001Cool0057oo`8001Soo`@000?oo`03003ooooo05Soo`03003ooooo053oo`00Cooo0P00 7Ooo00<00?ooool00_oo00<00?ooool0F?oo0P00D?oo001>ool00`00ooooo`0Mool00`00ooooo`02 ool00`00ooooo`1Jool00`00ooooo`1=ool004coo`80023oo`03003ooooo00;oo`03003ooooo05Wo o`04003oo`00001=ool004[oo`8002;oo`03003ooooo00?oo`03003ooooo05Ooo`03003ooooo00;o o`8004_oo`00B?oo0P009Ooo00<00?ooool00_oo00<00?ooool0Eooo00<00?ooool01?oo0P00BOoo 0017ool00`00ooooo`0Uool00`00ooooo`03ool00`00ooooo`1Eool00`00ooooo`07ool20017ool0 04Koo`03003ooooo02Koo`03003ooooo00?oo`03003ooooo05Goo`03003ooooo00Woo`03003ooooo 04Coo`00A?oo0P00:Ooo00<00?ooool01?oo00<00?ooool0E?oo00<00?ooool02_oo00<00?ooool0 @ooo0013ool00`00ooooo`0Yool00`00ooooo`05ool00`00ooooo`1Bool00`00ooooo`0Ooo00<00?ooool0<_oo00<00?ooool03?oo00<00?ooool0Booo 00<00?ooool05ooo00<00?ooool0>?oo000gool2000eool00`00ooooo`0=ool00`00ooooo`1:ool0 0`00ooooo`0Hool2000hool003Koo`03003ooooo03Goo`03003ooooo00koo`03003ooooo04Woo`03 003ooooo01[oo`03003ooooo03Goo`00=Ooo00<00?ooool0=_oo00<00?ooool03ooo00<00?ooool0 B?oo00<00?ooool06ooo00<00?ooool0=?oo000eool00`00ooooo`0fool00`00ooooo`0@ool00`00 ooooo`17ool00`00ooooo`0Kool00`00ooooo`0dool003Coo`03003ooooo03Koo`03003ooooo01;o o`03003ooooo04Koo`03003ooooo01coo`03003ooooo03?oo`00_oo00<0 0?ooool05ooo00<00?ooool0@ooo00<00?ooool08?oo00<00?ooool0;_oo000^ool00`00ooooo`0k ool00`00ooooo`0Hool20013ool00`00ooooo`0Qool00`00ooooo`0]ool002koo`03003ooooo03_o o`03003ooooo01[oo`03003ooooo043oo`03003ooooo027oo`03003ooooo02goo`00;Ooo00<00?oo ool0>ooo00<00?ooool07?oo0P00@Ooo00<00?ooool08Ooo00<00?ooool0;?oo000/ool00`00oooo o`0lool00`00ooooo`0Nool00`00ooooo`0nool00`00ooooo`0Rool00`00ooooo`0[ool002_oo`03 003ooooo03goo`03003ooooo01ooo`8003ooo`03003ooooo02;oo`03003ooooo02[oo`00:_oo00<0 0?ooool0?Ooo00<00?ooool08_oo00<00?ooool0??oo00<00?ooool08ooo00<00?ooool0:Ooo000Z ool00`00ooooo`0mool00`00ooooo`0Sool3000kool00`00ooooo`0Sool00`00ooooo`0Yool002Wo o`03003ooooo03koo`03003ooooo02Koo`8003Woo`8002Goo`03003ooooo02Soo`00:?oo00<00?oo ool0?_oo00<00?ooool0:Ooo0`00=?oo0P0000?oo`00ool09Ooo00<00?ooool09ooo000Wool00`00 ooooo`0oool00`00ooooo`0/ool00`00ooooo`0^ool30004ool00`00ooooo`0Tool00`00ooooo`0V ool002Koo`03003ooooo03ooo`03003ooooo02koo`@002Woo`<000Ooo`03003ooooo02Goo`03003o oooo02Goo`009_oo00<00?ooool0?ooo00<00?ooool0<_oo0`008_oo10002ooo00<00?ooool09?oo 00<00?ooool09Ooo000Uool00`00ooooo`10ool00`00ooooo`0eool5000Hool5000?ool00`00oooo o`0Uool00`00ooooo`0Tool002Coo`03003ooooo043oo`03003ooooo03_oo`L000[oo`L001Goo`03 003ooooo02Goo`03003ooooo02?oo`008ooo00<00?ooool0@?oo00<00?ooool0@ooo2P007Ooo00<0 0?ooool09?oo00<00?ooool08ooo000Rool00`00ooooo`11ool00`00ooooo`1Xool3000Wool00`00 ooooo`0Rool002;oo`03003ooooo043oo`03003ooooo06Ooo`8000?oo`03003ooooo02Goo`03003o oooo027oo`008Ooo00<00?ooool0@?oo00<00?ooool0Iooo00<00?ooool01?oo00<00?ooool09Ooo 00<00?ooool08?oo000Qool00`00ooooo`10ool00`00ooooo`1Vool00`00ooooo`06ool2000Uool0 0`00ooooo`0Pool0023oo`03003ooooo043oo`03003ooooo06Koo`03003ooooo00Woo`03003ooooo 02?oo`03003ooooo01ooo`008?oo00<00?ooool0?ooo00<00?ooool0I_oo00<00?ooool02ooo00<0 0?ooool08_oo00<00?ooool07ooo000Oool00`00ooooo`10ool00`00ooooo`1Tool2000=ool00`00 ool0000Tool00`00ooooo`0Nool001ooo`03003ooooo03ooo`03003ooooo06Coo`03003ooooo00co o`05003oooooool0000Sool00`00ooooo`0Nool001koo`80043oo`03003ooooo06?oo`8000koo`03 003ooooo00?oo`80027oo`8001ooo`007Ooo00@00?ooool003ooo`03003ooooo067oo`8000ooo`03 003ooooo00Koo`<001_oo`<000;oo`03003ooooo01coo`007Ooo00@00?ooooooo`8003coo`03003o oooo067oo`03003ooooo00ooo`03003ooooo00Ooo`@001Ooo`8000Goo`03003ooooo01coo`007?oo 00<00?ooool01?oo00<00?ooool0>?oo00<00?ooool0HOoo00<00?ooool03ooo00<00?ooool02?oo 00@00?ooooooo`<0017oo`<000Soo`03003ooooo01_oo`006ooo00<00?ooool01_oo00<00?ooool0 =_oo00<00?ooool0H?oo0P004_oo00<00?ooool01ooo00<00?ooool01Ooo4@002ooo00<00?ooool0 6ooo000Kool00`00ooooo`07ool00`00ooooo`0dool00`00ooooo`1Oool2000Cool00`00ooooo`08 ool00`00ooooo`0Rool00`00ooooo`0Jool001[oo`03003ooooo00Woo`03003ooooo03?oo`03003o oooo05goo`8001Coo`03003ooooo00Woo`03003ooooo02;oo`03003ooooo01[oo`006_oo00<00?oo ool02_oo00<00?ooool0ool00`00ooooo`0]ool00`00ooooo`0Cool0 01Coo`03003ooooo01Soo`03003ooooo01?oo`<005Koo`<002Ooo`03003ooooo00ooo`03003ooooo 02goo`03003ooooo01?oo`005?oo00<00?ooool06?oo00<00?ooool04Ooo0P00Eooo0P00:_oo00<0 0?ooool03ooo00<00?ooool0;Ooo00<00?ooool04ooo000Cool00`00ooooo`0Iool00`00ooooo`0> ool3001Fool3000[ool00`00ooooo`0@ool00`00ooooo`0^ool00`00ooooo`0Bool001?oo`03003o oooo01Woo`03003ooooo00[oo`@005Ooo`8002koo`03003ooooo00ooo`03003ooooo02ooo`03003o oooo01;oo`004ooo00<00?ooool06Ooo00<00?ooool01ooo0`00F?oo0`00;ooo00<00?ooool04?oo 00<00?ooool0;ooo00<00?ooool04_oo000Bool00`00ooooo`0Jool00`00ooooo`02ool5001Hool3 000bool00`00ooooo`0@ool00`00ooooo`0_ool00`00ooooo`0Bool001;oo`03003ooooo01_oo`@0 05_oo`8003Coo`03003ooooo017oo`03003ooooo033oo`03003ooooo017oo`004_oo00<00?ooool0 6ooo00<00?ooool0Eooo1@00=Ooo00<00?ooool04_oo00<00?ooool0ool000ooo`03003ooooo01coo`03003o oooo08koo`03003ooooo01Soo`03003ooooo03;oo`03003ooooo00koo`003ooo00<00?ooool07?oo 00<00?ooool0SOoo00<00?ooool06Ooo00<00?ooool0<_oo00<00?ooool03_oo000?ool00`00oooo o`0Lool00`00ooooo`2=ool00`00ooooo`0Iool00`00ooooo`0bool00`00ooooo`0>ool000ooo`03 003ooooo01coo`03003ooooo08goo`03003ooooo01Woo`03003ooooo03;oo`03003ooooo00koo`00 3_oo00<00?ooool07?oo0P00S_oo00<00?ooool06_oo00<00?ooool0<_oo00<00?ooool03_oo000> ool00`00ooooo`0Lool00`00ool00002002;ool00`00ooooo`0Jool00`00ooooo`0cool00`00oooo o`0=ool000koo`03003ooooo01coo`03003ooooo00;oo`03003ooooo08Ooo`03003ooooo01coo`03 003ooooo03;oo`03003ooooo00goo`003_oo00<00?ooool06ooo00<00?ooool01?oo0P00Qooo00<0 0?ooool07?oo00<00?ooool0<_oo00<00?ooool03Ooo000>ool00`00ooooo`0Jool00`00ooooo`07 ool20025ool00`00ooooo`0Lool00`00ooooo`0bool00`00ooooo`0=ool000koo`03003ooooo01[o o`03003ooooo00Woo`8008;oo`03003ooooo01koo`03003ooooo037oo`03003ooooo00goo`003_oo 00<00?ooool06Ooo00<00?ooool03?oo0`00Oooo00<00?ooool07_oo00<00?ooool0_oo00<00?oo ool08?oo00<00?ooool03?oo000>ool00`00ooooo`0aool00`00ooooo`0Uool00`00ooooo`13ool0 0`00ooooo`0lool00`00ooooo`0Nool00`00ooooo`0=ool000koo`03003ooooo037oo`03003ooooo 02Koo`8004?oo`03003ooooo03goo`8001koo`03003ooooo00goo`003_oo00<00?ooool0 ool00`00ooooo`0aool00`00ooooo`0Yool00`00ooooo`0oool00`00ooooo`10ool00`00ooooo`0J ool00`00ooooo`0=ool000koo`03003ooooo03;oo`03003ooooo02Woo`03003ooooo03koo`03003o oooo043oo`03003ooooo01[oo`03003ooooo00goo`003_oo00<00?ooool0Ooo00<00?ooool0Aooo0P00 3Ooo00<00?ooool01?oo00<00?ooool03_oo000?ool00`00ooooo`0cool00`00ooooo`0/ool00`00 ooooo`0hool00`00ooooo`19ool2000:ool00`00ooooo`05ool00`00ooooo`0>ool000ooo`03003o oooo03?oo`03003ooooo02goo`03003ooooo03Ooo`03003ooooo04_oo`03003ooooo00Koo`03003o oooo00Koo`03003ooooo00koo`003ooo00<00?ooool0Ooo0`005ooo00<00?ooool01ooo00<00?ooool04?oo000Aool00`00ooooo`0c ool00`00ooooo`0dool00`00ooooo`0/ool00`00ooooo`0eool4000Jool00`00ooooo`07ool00`00 ooooo`0@ool001;oo`03003ooooo03;oo`03003ooooo03Goo`03003ooooo02_oo`03003ooooo03;o o`<001koo`03003ooooo00Ooo`03003ooooo013oo`004_oo00<00?ooool0<_oo00<00?ooool0=Ooo 00<00?ooool0:ooo00<00?ooool0?oo00<00?ooool09ooo00<00?ooool0:ooo0P00:Ooo00<00?ooool0 0ooo00<00?ooool04_oo000Cool00`00ooooo`0aool00`00ooooo`0iool00`00ooooo`0Vool00`00 ooooo`0Zool00`00ooooo`0Zool00`00ooooo`02ool00`00ooooo`0Bool001?oo`03003ooooo037o o`03003ooooo03[oo`03003ooooo02Goo`03003ooooo02Ooo`<002goo`03003ooooo00;oo`03003o oooo01;oo`005?oo00<00?ooool0ooo00<00?ooool09?oo00<00?ooool09Ooo 0P00?oo00<00?ooool05Ooo000Gool00`00 ooooo`0/ool00`00ooooo`12ool00`00ooooo`0Nool00`00ooooo`0Mool00`00ooooo`0hool00`00 ooooo`0Fool001Ooo`03003ooooo02coo`03003ooooo04;oo`03003ooooo01goo`03003ooooo01go o`03003ooooo03Woo`03003ooooo01Koo`005ooo00<00?ooool0;?oo00<00?ooool0@ooo00<00?oo ool07?oo00<00?ooool07?oo00<00?ooool0>_oo00<00?ooool05_oo000Hool00`00ooooo`0[ool0 0`00ooooo`13ool00`00ooooo`0Lool00`00ooooo`0Kool00`00ooooo`0jool00`00ooooo`0Gool0 01Soo`03003ooooo02_oo`03003ooooo04Coo`03003ooooo01_oo`03003ooooo01[oo`03003ooooo 03_oo`03003ooooo01Ooo`006?oo00<00?ooool0:ooo00<00?ooool0AOoo00<00?ooool06_oo00<0 0?ooool06Ooo00<00?ooool0??oo00<00?ooool05ooo000Iool00`00ooooo`0Zool00`00ooooo`15 ool00`00ooooo`0Jool00`00ooooo`0Hool00`00ooooo`0lool00`00ooooo`0Hool001Woo`03003o oooo02Woo`03003ooooo04Ooo`03003ooooo01Woo`03003ooooo01Ooo`03003ooooo03goo`03003o oooo01Soo`006_oo00<00?ooool0:?oo00<00?ooool0B?oo00<00?ooool06?oo00<00?ooool05_oo 00<00?ooool0?Ooo00<00?ooool06Ooo000Kool00`00ooooo`0Wool00`00ooooo`19ool00`00oooo o`0Gool00`00ooooo`0Fool00`00ooooo`0mool00`00ooooo`0Iool001_oo`03003ooooo02Ooo`03 003ooooo04Woo`03003ooooo01Ooo`03003ooooo01Goo`03003ooooo03goo`03003ooooo01[oo`00 7?oo00<00?ooool09_oo00<00?ooool0B_oo00<00?ooool05_oo00<00?ooool05?oo00<00?ooool0 ?_oo00<00?ooool06_oo000Lool00`00ooooo`0Uool00`00ooooo`1;ool00`00ooooo`0Fool00`00 ooooo`0Dool00`00ooooo`0mool00`00ooooo`0Kool001goo`03003ooooo02Coo`03003ooooo04co o`03003ooooo01Goo`03003ooooo01?oo`03003ooooo03goo`03003ooooo01coo`007Ooo00<00?oo ool09?oo00<00?ooool0COoo00<00?ooool05?oo00<00?ooool04_oo00<00?ooool0?_oo00<00?oo ool07?oo000Nool00`00ooooo`0Sool00`00ooooo`1=ool00`00ooooo`0Dool00`00ooooo`0Bool0 0`00ooooo`0mool00`00ooooo`0Mool001ooo`03003ooooo027oo`03003ooooo04ooo`03003ooooo 01?oo`03003ooooo017oo`03003ooooo03goo`03003ooooo01koo`007ooo00<00?ooool08?oo00<0 0?ooool0DOoo00<00?ooool04_oo00<00?ooool04?oo00<00?ooool0?_oo00<00?ooool07_oo000P ool00`00ooooo`0Oool00`00ooooo`1Aool00`00ooooo`0Bool00`00ooooo`0@ool00`00ooooo`0m ool00`00ooooo`0Oool0023oo`03003ooooo01ooo`03003ooooo05;oo`03003ooooo017oo`03003o oooo00ooo`03003ooooo03koo`03003ooooo01ooo`008Ooo00<00?ooool07Ooo00<00?ooool0Dooo 00<00?ooool04Ooo00<00?ooool03_oo00<00?ooool0?_oo00<00?ooool08?oo000Qool00`00oooo o`0Mool00`00ooooo`1Dool00`00ooooo`0@ool00`00ooooo`0>ool00`00ooooo`0nool00`00oooo o`0Pool002;oo`03003ooooo01_oo`03003ooooo01goo`d002_oo`03003ooooo013oo`03003ooooo 00koo`03003ooooo03goo`03003ooooo027oo`008ooo00<00?ooool06_oo00<00?ooool05_oo1`00 3Ooo1P009_oo00<00?ooool03ooo00<00?ooool03Ooo00<00?ooool0?Ooo00<00?ooool08_oo000T ool00`00ooooo`0Iool00`00ooooo`0Aool5000Jool4000Sool00`00ooooo`0>ool00`00ooooo`0= ool00`00ooooo`0lool00`00ooooo`0Sool002Coo`03003ooooo01Soo`03003ooooo00ooo`<002?o o`D001koo`03003ooooo00koo`03003ooooo00coo`03003ooooo03goo`03003ooooo02?oo`009Ooo 00<00?ooool05_oo00<00?ooool03Ooo0`00:ooo00<00?ooool07?oo00<00?ooool03Ooo00<00?oo ool03?oo00<00?ooool0??oo00<00?ooool09?oo000Vool00`00ooooo`0Eool00`00ooooo`0;ool2 000_ool4000Jool00`00ooooo`0=ool00`00ooooo`0Ooo0`005ooo00<00?ooool03?oo00<00?ooool02_oo00<00?ooool0??oo00<00?ooool0 9_oo000Xool00`00ooooo`0Aool00`00ooooo`07ool00`00ooooo`0lool2000Fool00`00ooooo`0; ool00`00ooooo`0:ool00`00ooooo`0kool00`00ooooo`0Wool002Woo`03003ooooo00ooo`03003o oooo00Goo`<0047oo`03003ooooo01?oo`03003ooooo00coo`03003ooooo00Woo`03003ooooo03[o o`03003ooooo02Soo`00:_oo00<00?ooool00_oo20000ooo00<00?ooool01?oo0P00AOoo0P005?oo 00<00?ooool02ooo00<00?ooool02Ooo00<00?ooool0>Ooo00<00?ooool0:Ooo000Zool00`00oooo o`020008ool200000ooo003oo`03ool20019ool00`00ooooo`0Aool00`00ooooo`0;ool00`00oooo o`08ool00`00ooooo`0jool00`00ooooo`0Yool002_oo`8000coo`03003ooooo00;oo`03003ooooo 04[oo`8001;oo`03003ooooo00[oo`03003ooooo00Soo`03003ooooo03Woo`03003ooooo02[oo`00 ;?oo00<00?ooool02ooo00@00?oo000004ooo`03003ooooo013oo`03003ooooo00Woo`03003ooooo 00Soo`03003ooooo03Soo`03003ooooo02_oo`00;Ooo00<00?ooool02ooo00<00?ooool0D?oo0P00 4?oo00<00?ooool02Ooo00<00?ooool02?oo00<00?ooool0=ooo00<00?ooool0;?oo000^ool00`00 ooooo`0;ool00`00ooooo`1Aool00`00ooooo`0>ool00`00ooooo`08ool00`00ooooo`08ool00`00 ooooo`0fool00`00ooooo`0]ool002koo`03003ooooo00coo`03003ooooo057oo`03003ooooo00go o`03003ooooo00Soo`03003ooooo00Ooo`03003ooooo03Ooo`03003ooooo02goo`00;ooo00<00?oo ool02ooo00<00?ooool0D_oo00<00?ooool03?oo00<00?ooool02Ooo00<00?ooool01_oo00<00?oo ool0=_oo00<00?ooool0;_oo000`ool2000;ool00`00ooooo`1Cool2000=ool00`00ooooo`08ool0 0`00ooooo`06ool00`00ooooo`0dool2000aool003;oo`03003ooooo00Soo`03003ooooo05Goo`03 003ooooo00[oo`03003ooooo00Soo`03003ooooo00Koo`03003ooooo03?oo`03003ooooo037oo`00 ooo00<00?ooool0Gooo00D00?ooooooo`0002;oo`80 01goo`03003ooooo03[oo`00??oo0P00Gooo00@00?oo000002Goo`03003ooooo01Soo`8003goo`00 ?_oo00<00?ooool0G?oo0P00:?oo00<00?ooool05_oo00<00?ooool0?Ooo000oool00`00ooooo`1J ool00`00ooooo`0Yool00`00ooooo`0Dool00`00ooooo`0nool0043oo`03003ooooo05Soo`03003o oooo02_oo`03003ooooo01;oo`03003ooooo03ooo`00@Ooo0P00Eooo00<00?ooool0;Ooo0P004?oo 0P00@_oo0013ool00`00ooooo`1Cool00`00ooooo`0`ool00`00ooooo`0?oo00<00?ooool00P00Booo001?oo0P00D?oo001Aool00`00ooooo`0nool00`00ooooo`0gool2001Bool005;oo`80 03koo`03003ooooo03Koo`03003ooooo05;oo`00E?oo0P00??oo00<00?ooool0=?oo0P00EOoo001F ool2000iool00`00ooooo`0cool2001Gool005Soo`<003Koo`03003ooooo033oo`<005Woo`00Fooo 0`00"], ImageRangeCache->{{{0, 287}, {287, 0}} -> {-1.10001, -1.10001, 0.00766559, \ 0.00766559}}] }, Open ]], Cell[BoxData[ \(DrawPicture2[a_, b_, c_] := Module[{ABCs = NewABCMatrices[a, b, c], A, B, C, Ai, Bi, Ci, kAB, kBC, kCA}, \[IndentingNewLine]A = ABCs[\([1]\)]; \[IndentingNewLine]B = ABCs[\([2]\)]; \[IndentingNewLine]C = ABCs[\([3]\)]; \[IndentingNewLine]Ai = Inverse[A]; \[IndentingNewLine]Bi = Inverse[B]; \[IndentingNewLine]Ci = Inverse[C]; \[IndentingNewLine]kAB = A . B . Ai . Bi; \[IndentingNewLine]kBC = B . C . Bi . Ci; \[IndentingNewLine]kCA = C . A . Ci . Ai; \[IndentingNewLine]ShowP[ Join[Apply[OrthoSegments, ABCs], Map[AxesP, {A, B, C, B . A, C . B, A . C, \[IndentingNewLine]kAB, kBC, kCA, Ai . kAB . A, Bi . kBC . B, Ci . kCA . C}]]]]\)], "Input"], Cell[CellGroupData[{ Cell[BoxData[ \(\(DrawPicture2[\(-4.9\), \(-2.1\), \(-2.04\)];\)\)], "Input"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: 1 MathPictureStart /Mabs { Mgmatrix idtransform Mtmatrix dtransform } bind def /Mabsadd { Mabs 3 -1 roll add 3 1 roll add exch } bind def %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.5 0.454545 0.5 0.454545 [ [ 0 0 0 0 ] [ 1 1 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 m 1 0 L 1 1 L 0 1 L closepath clip newpath 0 g .5 Mabswid [ ] 0 setdash newpath .5 .5 .45455 0 365.73 arc s newpath .1666 .13434 .19556 35.1865 100.404 arc s newpath -0.28068 1.16164 .91685 -63.6156 -20.4334 arc s newpath 2.16093 .51394 1.59759 168.353 186.243 arc s newpath .21521 .1436 .03894 47.5078 128.719 arc s newpath .12536 .22907 .08454 -40 85.5127 arc s newpath .02823 .45215 .13506 -47.8808 31.9657 arc s newpath .25539 1.01943 .35076 -94.0492 -29.0469 arc s newpath 1.03616 .81232 .42237 177.04 253.374 arc s newpath .91434 .27667 .12224 90.1374 161.369 arc s newpath .63013 -0.1837 .52703 60 141.553 arc s newpath .08057 .31738 .05156 -60 107.056 arc s newpath .62058 .95455 .12058 180 330.286 arc s newpath .18669 .17064 .00534 -42.8966 135.758 arc s newpath .04351 .6828 .18759 -89.3974 45.7517 arc s newpath .9442 .39898 .03016 80.9834 253.392 arc s newpath .94955 -0.64537 1.1434 89.7497 133.109 arc s newpath -0.17998 .47949 .50614 -40.1987 43.6532 arc s newpath .10535 -1.45327 1.94021 65.3922 91.7627 arc s newpath .16849 .18331 .05984 -38.81 126.192 arc s newpath .01723 .72406 .27688 -83.5498 33.7561 arc s newpath 1.01743 .49711 .24724 118.223 241.137 arc s % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 288}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgool00`00ooooo`1oool00`00 ooooo`1=ool004coo`8008?oo`8004goo`00B_oo0P00Qooo0P00Booo0018ool2002;ool20019ool0 04Ooo`03003ooooo08goo`8004Ooo`00A_oo00<00?ooool0T?oo00<00?ooool0A?oo0014ool2002D ool00`00ooooo`13ool004?oo`03003ooooo09Goo`03003ooooo04;oo`00@Ooo0P00VOoo0P00@_oo 0010ool00`00ooooo`2Kool00`00ooooo`0oool003ooo`03003ooooo09goo`03003ooooo03koo`00 ?Ooo0P00XOoo00<00?ooool0?Ooo000lool4002Qool2000mool003_oo`06003ooooo003oo`00X_oo 00<00?ooool0>_oo000jool00`00ool00002ool00`00ool0002Rool00`00ooooo`0iool003Woo`04 003ooooo0002ool00`00ool0002Sool00`00ooooo`0hool003Ooo`8000Coo`06003ooooo003oo`00 Xooo0P00>?oo000fool00`00ooooo`05ool00`00ool00002ool00`00ooooo`2Rool00`00ooooo`0e ool003Goo`8000Ooo`03003oo`0000;oo`03003ooooo0:?oo`03003ooooo03Coo`00=Ooo0P002?oo 00<00?oo00000_oo0P00Xooo00<00?ooool0=?oo000dool40008ool400000ooo0000002Sool00`00 ooooo`0cool003?oo`04003oooooool40006ool00`00ooooo`03ool00`00ooooo`2Qool00`00oooo o`0bool003;oo`03003ooooo00?oo`03003ooooo00P000Goo`03003ooooo0:7oo`03003ooooo037o o`00ool200000ooo0000000;ool0 0`00ooooo`07ool00`00ooooo`2Pool00`00ooooo`0Wool002Ooo`03003ooooo017oo`8000coo`03 003ooooo00Soo`800:7oo`03003ooooo02Koo`009_oo00<00?ooool04_oo0P003Ooo00<00?ooool0 2Ooo00<00?ooool0Wooo00<00?ooool09Ooo000Vool00`00ooooo`0Aool01000ool000003Ooo00<0 0?ooool02Ooo00<00?ooool0W_oo00<00?ooool09Ooo000Uool00`00ool0000@ool20002ool00`00 ool0000ool00`00ooooo`02ool00`00ooooo`07ool00`00ooooo`0:ool00`00oooo o`2Fool00`00ooooo`0Nool001ooo`03003ooooo01Ooo`03003ooooo00ooo`8000?oo`03003ooooo 00Goo`03003ooooo00coo`8009Koo`03003ooooo01koo`007_oo0P006?oo00<00?ooool04_oo00@0 0?ooool000Goo`80017oo`03003ooooo09?oo`8001ooo`007Ooo00@00?ooool001Koo`03003ooooo 01Coo`04003ooooo0003ool00`00ooooo`0Bool2002Aool20002ool00`00ooooo`0Lool001goo`05 003oooooool0000Dool00`00ooooo`0Fool00`00ool00002ool00`00ooooo`0Eool2002=ool20004 ool00`00ooooo`0Lool001coo`03003ooooo00?oo`03003ooooo013oo`03003ooooo01Soo`@001[o o`8008[oo`03003ooooo00;oo`800003ool00?oo01coo`006ooo00<00?ooool01Ooo00<00?ooool0 3ooo00<00?ooool06_oo00<00?ooool06ooo0P00Q_oo0P000ooo0P000ooo00<00?ooool06ooo000K ool00`00ooooo`06ool00`00ooooo`0=ool00`00ooooo`0Iool200000ooo0000000Mool20022ool2 0004ool00`00ooooo`04ool00`00ooooo`0Jool001[oo`03003ooooo00Ooo`03003ooooo00coo`03 003ooooo01Soo`8000?oo`03003oo`0001koo`8007koo`8000Goo`03003ooooo00Goo`03003ooooo 01[oo`006_oo00<00?ooool02?oo00<00?ooool02_oo00<00?ooool06?oo00<00?ooool00ooo00<0 0?ooool00P007_oo0`00Mooo10001Ooo0P002Ooo00<00?ooool06Ooo000Iool00`00ooooo`09ool0 0`00ooooo`08ool2000Iool20007ool01000oooooooo0P007ooo0P00M?oo00<00?ooool01_oo00<0 0?ooool02_oo00<00?ooool06?oo000Iool00`00ooooo`09ool00`00ooooo`05ool3000Iool20009 ool00`00ooooo`03ool00`00ooooo`0Nool3001^ool30008ool00`00ooooo`0;ool00`00ooooo`0H ool001Soo`03003ooooo00[oo`03003ooooo00?oo`8001[oo`8000_oo`03003ooooo00?oo`03003o oooo027oo`03003ooooo06Woo`8000[oo`03003ooooo00goo`03003ooooo01Ooo`006?oo00<00?oo ool02_oo1P006ooo00<00?ooool03?oo00<00?ooool00ooo0P008_oo0`00IOoo0`002ooo00<00?oo ool03Ooo0P006Ooo000Hool00`00ooooo`0:ool00`00ooooo`0Lool2000?ool00`00ooooo`05ool2 000Sool4001Nool3000=ool00`00ooooo`0:ool400000ooo003oo`0Hool001Ooo`03003ooooo00_o o`03003ooooo01Soo`@001;oo`03003ooooo00Koo`03003ooooo02Coo`<005Soo`<00003ool00?oo 00_oo`8000_oo`8000Koo`03003ooooo01Koo`005ooo00<00?ooool02ooo00<00?ooool05_oo0P00 5_oo00<00?ooool01ooo0P009ooo0`00DOoo10001Ooo00<00?ooool02?oo00<00?ooool02Ooo0P00 2?oo00<00?ooool05_oo000Fool00`00ooooo`0 ool3000?ool00`00ooooo`03ool00`00ooooo`0@ool0017oo`03003ooooo01Koo`03003ooooo00oo o`03003ooooo01coo`03003ooooo02Koo`8001goo`03003ooooo02Goo`@001Goo`03003ooooo017o o`8000goo`03003ooooo00?oo`03003ooooo013oo`004?oo00<00?ooool05ooo00<00?ooool04?oo 0P007?oo00<00?ooool0:?oo00<00?ooool06Ooo00<00?ooool09?oo0P006?oo00<00?ooool05?oo 0`002Ooo00<00?ooool01Ooo00<00?ooool03ooo000@ool00`00ooooo`0Hool00`00ooooo`0Aool2 000Jool00`00ooooo`0Yool2000Iool00`00ooooo`0Pool4000Jool00`00ooooo`0Gool20007ool0 0`00ooooo`05ool00`00ooooo`0?ool0013oo`03003ooooo01Soo`03003ooooo01?oo`03003ooooo 01Ooo`03003ooooo02_oo`8001Ooo`03003ooooo01coo`@001goo`03003ooooo01[oo`P000Ooo`03 003ooooo00ooo`003ooo00<00?ooool06Ooo00<00?ooool05?oo0P005ooo00<00?ooool0;Ooo0`00 5?oo00<00?ooool06_oo0P008Ooo00<00?ooool08Ooo00<00?ooool01Ooo00<00?ooool03ooo000? ool00`00ooooo`0Jool00`00ooooo`0Eool00`00ooooo`0Dool00`00ooooo`0`ool2000Bool00`00 ooooo`0Gool3000Rool00`00ooooo`0Rool00`00ooooo`06ool00`00ooooo`0>ool000ooo`03003o oooo01[oo`03003ooooo01Koo`03003ooooo01Coo`03003ooooo037oo`80013oo`03003ooooo01?o o`@002Goo`03003ooooo01ooo`@000Soo`03003ooooo00koo`003ooo00<00?ooool06_oo00<00?oo ool05ooo00<00?ooool04ooo00<00?ooool0ool000ooo`03003ooooo01_oo`03003ooooo 01Woo`80017oo`03003ooooo03Soo`@000Ooo`03003ooooo00Ooo`@0033oo`03003ooooo01Woo`<0 00Woo`8000Goo`03003ooooo00koo`003_oo00<00?ooool07?oo00<00?ooool06ooo00<00?ooool0 3_oo00<00?ooool0??oo0P001Ooo00<00?ooool00ooo1000=?oo00<00?ooool05ooo0P003_oo0P00 0ooo00<00?ooool03_oo000>ool00`00ooooo`0Mool00`00ooooo`0Kool2000>ool00`00ooooo`0n ool30002ool00`00ool00003000hool00`00ooooo`0Eool2000Bool20002ool00`00ooooo`0=ool0 00koo`03003ooooo01goo`03003ooooo01goo`03003ooooo00_oo`03003ooooo047oo`@003_oo`03 003ooooo01?oo`<001Koo`<000ooo`003_oo00<00?ooool07Ooo00<00?ooool07_oo00<00?ooool0 2_oo00<00?ooool0?_oo100000?oo`0000000P00>Ooo00<00?ooool04Ooo0P006ooo00<00?ooool0 3Ooo000>ool00`00ooooo`0Mool00`00ooooo`0Oool00`00ooooo`0:ool00`00ooooo`0iool40005 ool01000oooooooo0P00=_oo00<00?ooool04?oo0P007Ooo00<00?ooool03Ooo000>ool00`00oooo o`0Mool00`00ooooo`0Pool2000:ool00`00ooooo`0eool40009ool00`00ooooo`03ool3000cool0 0`00ooooo`0>ool2000Oool00`00ooooo`0=ool000koo`03003ooooo01goo`03003ooooo02;oo`03 003ooooo00Ooo`03003ooooo02ooo`H000goo`03003ooooo00Koo`@002ooo`03003ooooo00coo`80 027oo`03003ooooo00goo`003Ooo0P007ooo00<00?ooool08ooo00<00?ooool01_oo00<00?ooool0 :ooo10004ooo00<00?ooool02_oo0P00;Ooo00<00?ooool02ooo00<00?ooool08_oo00<00?ooool0 3?oo000=ool00`00ool00004000Jool00`00ooooo`0Tool00`00ooooo`05ool00`00ooooo`0Uool6 000Gool00`00ooooo`0ool3000=ool00`00 ooooo`0Xool01@00oooooooo00005Ooo20009_oo00<00?ooool06?oo10007Ooo00<00?ooool01Ooo 00<00?ooool0:Ooo00<00?ooool03?oo000=ool00`00ooooo`0Aool2000;ool00`00ooooo`0Yool0 1000ooooo`003ooo1P00;_oo00<00?ooool07?oo10006Ooo00<00?ooool01?oo00<00?ooool0:_oo 00<00?ooool03?oo000=ool00`00ooooo`0Cool20009ool00`00ooooo`0Zool00`00ool00008ool7 000dool00`00ooooo`0Pool3000Fool00`00ooooo`02ool2000]ool00`00ooooo`0ool000goo`03003ooooo00Koo`@001;oo`03003o oooo00Coo`8002Soo`03003ooooo00Goo`03003ooooo03Woo`03003ooooo03?oo`03003ooooo00?o o`03003ooooo037oo`03003ooooo00coo`003Ooo00<00?ooool02_oo10003_oo00<00?ooool01_oo 00<00?ooool09Ooo00<00?ooool01_oo00<00?ooool0>?oo00<00?ooool0<_oo00<00?ooool01?oo 00<00?ooool0ool40009ool00`00ooooo`08ool0 0`00ooooo`0Tool00`00ooooo`07ool00`00ooooo`0gool00`00ooooo`0aool00`00ooooo`05ool0 0`00ooooo`0aool00`00ooooo`0ool00`00ooooo`0aool00`00ooooo`0[ool0 0`00ooooo`0;ool00`00ooooo`0aool00`00ooooo`0ool00`00ooooo`0`ool00`00 ooooo`0ool00`00ooooo`0Sool00`00ooooo`0= ool00`00ooooo`0Dool00`00ooooo`0Gool2000Zool00`00ooooo`0Tool00`00ooooo`0Dool00`00 ooooo`0^ool00`00ooooo`0=ool000koo`03003ooooo02Coo`03003ooooo00goo`03003ooooo01?o o`03003ooooo01Woo`03003ooooo02Ooo`03003ooooo02?oo`03003ooooo01Goo`03003ooooo02ko o`03003ooooo00goo`003_oo00<00?ooool09Ooo00<00?ooool03?oo00<00?ooool04ooo00<00?oo ool06_oo00<00?ooool09_oo00<00?ooool08_oo00<00?ooool05_oo00<00?ooool0;_oo00<00?oo ool03Ooo000>ool00`00ooooo`0Vool00`00ooooo`0ool000ooo`03003ooooo02Ooo`03003o oooo00goo`03003ooooo00koo`03003ooooo01koo`03003ooooo02Coo`03003ooooo01koo`03003o oooo01_oo`03003ooooo02_oo`03003ooooo00koo`003ooo00<00?ooool0:?oo00<00?ooool03?oo 00<00?ooool03_oo00<00?ooool07_oo00<00?ooool09?oo00<00?ooool07Ooo00<00?ooool07?oo 00<00?ooool0:ooo00<00?ooool03_oo000?ool00`00ooooo`0Xool00`00ooooo`0=ool00`00oooo o`0ool000ooo`03003ooooo02Woo`03003ooooo00coo`03003ooooo00coo`03 003ooooo027oo`03003ooooo02;oo`03003ooooo01coo`03003ooooo01koo`03003ooooo02[oo`03 003ooooo00koo`004?oo00<00?ooool0:?oo00<00?ooool03Ooo00<00?ooool02ooo00<00?ooool0 8_oo00<00?ooool08Ooo00<00?ooool06ooo00<00?ooool08?oo00<00?ooool0:Ooo00<00?ooool0 3_oo000@ool00`00ooooo`0Yool00`00ooooo`0ool2000hool00`00ooooo`0Dool00`00ooooo`0Bool0 0`00ooooo`0dool00`00ooooo`0Gool00`00ooooo`0Dool001Koo`03003ooooo02Woo`03003ooooo 00T000Coo`8003Woo`03003ooooo01?oo`03003ooooo017oo`03003ooooo03Koo`03003ooooo01Go o`03003ooooo01Goo`005_oo00<00?ooool0:Ooo0`002Ooo2`00=?oo00<00?ooool05?oo00<00?oo ool04?oo00<00?ooool0=ooo00<00?ooool05?oo00<00?ooool05Ooo000Gool00`00ooooo`0Xool0 0`00ooooo`0=ool20005ool5000`ool00`00ooooo`0Cool00`00ooooo`0?ool00`00ooooo`0iool0 0`00ooooo`0Bool00`00ooooo`0Fool001Ooo`03003ooooo02Soo`03003ooooo00goo`8000[oo`D0 02_oo`03003ooooo01?oo`03003ooooo00ooo`03003ooooo03[oo`03003ooooo017oo`03003ooooo 01Koo`005ooo00<00?ooool0:?oo00<00?ooool03?oo00<00?oo00003ooo1000:?oo00<00?ooool0 4_oo00<00?ooool03ooo00<00?ooool0>ooo00<00?ooool04?oo00<00?ooool05_oo000Hool00`00 ooooo`0Wool00`00ooooo`0 ool00`00ooooo`0mool00`00ooooo`0>ool00`00ooooo`0Gool001Soo`03003ooooo02Ooo`03003o oooo00_oo`04003ooooo000Fool2000Uool00`00ooooo`0@ool00`00ooooo`0>ool00`00ooooo`0n ool00`00ooooo`0=ool00`00ooooo`0Gool001Soo`03003ooooo02Ooo`03003ooooo00_oo`04003o oooo000Hool3000Rool00`00ooooo`0@ool00`00ooooo`0=ool00`00ooooo`10ool2000=ool00`00 ooooo`0Gool001Woo`03003ooooo02Koo`03003ooooo00[oo`05003oooooool0000Kool2000Qool0 0`00ooooo`0?ool00`00ooooo`0=ool00`00ooooo`12ool00`00ooooo`09ool00`00ooooo`0Hool0 01Woo`03003ooooo02Koo`03003ooooo00[oo`03003ooooo00;oo`03003ooooo01[oo`<001koo`03 003ooooo00ooo`03003ooooo00goo`03003ooooo04?oo`03003ooooo00Soo`03003ooooo01Soo`00 6_oo00<00?ooool09Ooo00<00?ooool02Ooo00<00?ooool00ooo00<00?ooool07Ooo0P007Ooo00<0 0?ooool03_oo00<00?ooool03Ooo00<00?ooool0A?oo0P001ooo00<00?ooool06Ooo000Kool00`00 ooooo`0Tool00`00ooooo`09ool00`00ooooo`03ool00`00ooooo`0Oool00`00ooooo`0Jool00`00 ooooo`0>ool00`00ooooo`0=ool00`00ooooo`16ool20005ool00`00ooooo`0Iool001_oo`03003o oooo02?oo`03003ooooo00Woo`03003ooooo00Coo`03003ooooo023oo`8001_oo`03003ooooo00ko o`03003ooooo00_oo`03003ooooo04Woo`05003oooooool0000Lool001coo`03003ooooo02;oo`03 003ooooo00Woo`03003ooooo00Coo`03003ooooo02;oo`<001Woo`03003ooooo00goo`03003ooooo 00_oo`03003ooooo04[oo`04003ooooo000Lool001coo`03003ooooo02;oo`03003ooooo00Soo`03 003ooooo00Goo`03003ooooo02Goo`03003ooooo01Koo`03003ooooo00goo`03003ooooo00_oo`03 003ooooo04_oo`8001goo`007Ooo00<00?ooool08Ooo00<00?ooool02?oo00<00?ooool01Ooo00<0 0?ooool09_oo0P005ooo00<00?ooool03?oo00<00?ooool02ooo00<00?ooool0Booo00<00?ooool0 7?oo000Mool00`00ooooo`0Qool00`00ooooo`07ool00`00ooooo`06ool00`00ooooo`0Xool00`00 ooooo`0Dool00`00ooooo`0ool00`00ooooo`0:ool00`00ooooo`08ool00`00ooooo`19ool00`00ooooo`0Pool0027o o`03003ooooo01[oo`03003ooooo00Koo`03003ooooo00[oo`03003ooooo03;oo`03003ooooo00go o`03003ooooo00[oo`03003ooooo00Soo`03003ooooo04Woo`03003ooooo023oo`008_oo00<00?oo ool06Ooo00<00?ooool01Ooo00<00?ooool02_oo00<00?ooool0ool00`00ooooo`08ool0 0`00ooooo`08ool00`00ooooo`17ool00`00ooooo`0Rool002Coo`03003ooooo01Ooo`03003ooooo 00Coo`03003ooooo00_oo`03003ooooo03Goo`8000koo`03003ooooo00Woo`03003ooooo00Ooo`03 003ooooo04Koo`03003ooooo02?oo`009?oo00<00?ooool05_oo00<00?ooool01Ooo00<00?ooool0 2ooo00<00?ooool0=ooo00<00?ooool03?oo00<00?ooool02?oo00<00?ooool01_oo00<00?ooool0 Aooo00<00?ooool08ooo000Uool00`00ooooo`0Eool00`00ooooo`04ool00`00ooooo`0_oo00<00?oo ool02_oo00<00?ooool01ooo00<00?ooool01_oo00<00?ooool0AOoo00<00?ooool09Ooo000Wool0 0`00ooooo`0Aool00`00ooooo`04ool00`00ooooo`0>ool00`00ooooo`0kool00`00ooooo`09ool0 0`00ooooo`07ool00`00ooooo`06ool00`00ooooo`14ool00`00ooooo`0Vool002Soo`03003ooooo 00ooo`03003ooooo00Coo`03003ooooo00koo`03003ooooo03goo`03003ooooo00Woo`03003ooooo 00Ooo`03003ooooo00Goo`03003ooooo04?oo`03003ooooo02Ooo`00:Ooo00<00?ooool03_oo00<0 0?ooool01?oo00<00?ooool03_oo00<00?ooool0?_oo00<00?ooool02?oo00<00?ooool01ooo00<0 0?ooool01Ooo00<00?ooool0@_oo00<00?ooool0:?oo000Zool00`00ooooo`0Ooo00<00?ooool0?oo00<0 0?ooool0<_oo000dool00`00ool0000Hool00`00ooooo`1:ool00`00ooooo`04ool00`00ooooo`04 ool00`00ooooo`03ool00`00ooooo`0gool00`00ooooo`0cool003Goo`03003ooooo01Ooo`03003o oooo04_oo`03003ooooo00Coo`03003ooooo00?oo`03003ooooo00?oo`03003ooooo03Koo`03003o oooo03Coo`00=Ooo00<00?ooool05_oo00<00?ooool0COoo00<00?ooool00ooo00<00?ooool00ooo 00<00?ooool00ooo00<00?ooool0=_oo00<00?ooool0=?oo000fool00`00ooooo`0Eool00`00oooo o`1=ool00`00ooooo`04ool00`00ooooo`03ool>000_ool00`00ooooo`0eool003Ooo`8001Coo`03 003ooooo04ooo`03003ooooo00?oo`03003ooooo00@000goo`<002[oo`8003Soo`00>Ooo00<00?oo ool04Ooo00<00?ooool0Cooo00<00?ooool00ooo0`005?oo0P009ooo00<00?ooool0>?oo000jool0 0`00ooooo`0?ool00`00ooooo`1Aool00`00ooooo`02000Iool3000Sool00`00ooooo`0iool003_o o`03003ooooo00koo`03003ooooo05;oo`8001koo`<001ooo`03003ooooo03[oo`00??oo0P003Ooo 00<00?ooool0DOoo0P008ooo00<00?ooool06_oo0P00?Ooo000nool00`00ooooo`09ool00`00oooo o`1Aool00`00ooooo`0Tool00`00ooooo`0Hool00`00ooooo`0mool003ooo`03003ooooo00Soo`03 003ooooo04ooo`8002Soo`03003ooooo01Koo`03003ooooo03koo`00@?oo00<00?ooool01_oo00<0 0?ooool0Cooo00<00?ooool0:Ooo0P005Ooo00<00?ooool0?ooo0011ool20006ool00`00ooooo`1> ool00`00ooooo`0/ool2000Aool20012ool004?oo`03003ooooo00;oo`03003ooooo04koo`03003o oooo02ooo`03003ooooo00goo`03003ooooo04;oo`00A?oo0P000_oo00<00?ooool0COoo00<00?oo ool0?oo0P00D?oo001Aool00`00ooooo`0oool00`00ooooo`0fool2001Bool005;oo`8003koo`03 003ooooo03Koo`03003ooooo05;oo`00E?oo0P00??oo00<00?ooool0=?oo0P00EOoo001Fool2000i ool00`00ooooo`0cool2001Gool005Soo`<003Koo`03003ooooo033oo`<005Woo`00Fooo0`00"], ImageRangeCache->{{{0, 287}, {287, 0}} -> {-1.10001, -1.10001, 0.00766559, \ 0.00766559}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ \(\(DrawPicture2[\(-3. \), \(-3. \), \(-3. \)];\)\)], "Input"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: 1 MathPictureStart /Mabs { Mgmatrix idtransform Mtmatrix dtransform } bind def /Mabsadd { Mabs 3 -1 roll add 3 1 roll add exch } bind def %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.5 0.454545 0.5 0.454545 [ [ 0 0 0 0 ] [ 1 1 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 m 1 0 L 1 1 L 0 1 L closepath clip newpath 0 g .5 Mabswid [ ] 0 setdash newpath .5 .5 .45455 0 365.73 arc s newpath .05989 -0.06818 .5567 35.4437 69.0338 arc s newpath .228 1.16524 .5567 -84.5563 -50.9662 arc s newpath 1.21212 .40294 .5567 155.444 189.034 arc s newpath .34795 .0496 .13918 55.9556 119.364 arc s newpath .10192 .24017 .13918 -14.8867 48.5219 arc s newpath .18597 .85688 .13918 -64.0444 -0.6358 arc s newpath .47403 .97466 .13918 -134.887 -71.4781 arc s newpath .96609 .59352 .13918 175.956 239.364 arc s newpath .92406 .28516 .13918 105.113 168.522 arc s newpath .7176 -0.03219 .35209 60 164.478 arc s newpath -0.06969 .57765 .35209 -60 44.4775 arc s newpath .85209 .95455 .35209 180 284.478 arc s newpath .21833 .13636 .07042 -28.955 133.433 arc s newpath .32592 .92575 .07042 -148.955 13.4325 arc s newpath .95575 .43788 .07042 91.045 253.433 arc s newpath 1.04401 -0.83048 1.36364 93.8038 130.674 arc s newpath -0.92423 .69411 1.36364 -26.1962 10.6737 arc s newpath 1.38022 1.63636 1.36364 -146.196 -109.326 arc s newpath .20659 .12121 .15152 -19.3263 123.804 arc s newpath .31866 .94349 .15152 -139.326 3.80381 arc s newpath .97474 .4353 .15152 100.674 243.804 arc s % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 288}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgool2001Oool005_oo`<000Ooo`03003ooooo00Koo`03003ooooo 053oo`<005coo`00F?oo0`002_oo00<00?ooool01_oo00<00?ooool0Dooo0`00FOoo001Fool2000= ool00`00ooooo`07ool00`00ooooo`1Eool2001Gool005Goo`03003ooooo00koo`03003ooooo00Ko o`03003ooooo05Ooo`8005Goo`00Dooo0`004?oo00<00?ooool01ooo00<00?ooool0F?oo0P00Dooo 001Aool20003ool00`00ooooo`0=ool00`00ooooo`07ool00`00ooooo`1Jool00`00ooooo`1@ool0 04ooo`8000Koo`03003ooooo00coo`03003ooooo00Ooo`03003ooooo05_oo`80053oo`00C_oo00@0 0?ooool000Goo`03003ooooo00coo`03003ooooo00Soo`03003ooooo05coo`03003ooooo04goo`00 C?oo0P000ooo00<00?ooool01?oo00<00?ooool02ooo00<00?ooool02?oo00<00?ooool0GOoo0P00 COoo001:ool20005ool00`00ooooo`04ool00`00ooooo`0;ool00`00ooooo`09ool00`00ooooo`1N ool2001;ool004Soo`8000Ooo`03003ooooo00Goo`03003ooooo00[oo`03003ooooo00Woo`03003o oooo063oo`8004Woo`00Aooo00<00?ooool02?oo00<00?ooool01?oo00<00?ooool02_oo00<00?oo ool02Ooo00<00?ooool0H_oo0P00Aooo0016ool00`00ooooo`09ool00`00ooooo`05ool00`00oooo o`09ool00`00ooooo`0:ool00`00ooooo`1Sool00`00ooooo`14ool004Coo`8000coo`03003ooooo 00Goo`03003ooooo00Woo`03003ooooo00[oo`03003ooooo06Coo`03003ooooo04?oo`00@ooo00<0 0?ooool03?oo00<00?ooool01Ooo00<00?ooool02Ooo00<00?ooool02ooo00<00?ooool0I?oo00<0 0?ooool0@_oo0011ool2000?ool00`00ooooo`06ool00`00ooooo`08ool00`00ooooo`0;ool00`00 ooooo`1Uool20012ool0043oo`03003ooooo00ooo`03003ooooo00Koo`03003ooooo00Soo`03003o oooo00coo`03003ooooo06Koo`03003ooooo03ooo`00?ooo00<00?ooool04?oo00<00?ooool01ooo 00<00?ooool01ooo00<00?ooool03Ooo00<00?ooool0I_oo00<00?ooool0?_oo000nool00`00oooo o`0Aool00`00ooooo`07ool00`00ooooo`07ool00`00ooooo`0=ool00`00ooooo`1Wool00`00oooo o`0mool003coo`8001Coo`03003ooooo00Soo`03003ooooo00Koo`03003ooooo00koo`03003ooooo 06Ooo`8003goo`00>ooo00<00?ooool05?oo00<00?ooool02?oo00<00?ooool01Ooo00<00?ooool0 3ooo00<00?ooool0JOoo00<00?ooool0>_oo000jool00`00ooooo`0Eool00`00ooooo`09ool00`00 ooooo`04ool00`00ooooo`0@ool00`00ooooo`1Yool00`00ooooo`0iool003Woo`03003ooooo01Ko o`03003ooooo00Woo`03003ooooo00Coo`03003ooooo017oo`03003ooooo06Woo`03003ooooo03So o`00=ooo0P006?oo00<00?ooool02_oo00<00?ooool01?oo00<00?ooool04Ooo00<00?ooool0J_oo 0P00>?oo000fool00`00ooooo`0Hool00`00ooooo`0;ool00`00ooooo`02ool00`00ooooo`0Bool2 001]ool00`00ooooo`0eool003Goo`03003ooooo01Soo`03003ooooo00coo`03003ooooo00;oo`03 003ooooo013oo`8000;oo`03003ooooo06_oo`03003ooooo03Coo`00=Ooo00<00?ooool05ooo0P00 3ooo00D00?ooooooo`00017oo`03003ooooo00;oo`03003ooooo06_oo`03003ooooo03Coo`00=?oo 00<00?ooool05ooo00<00?ooool00`003?oo00@00?ooool0013oo`8000Koo`03003ooooo06_oo`03 003ooooo03?oo`00ool00`00ooooo`0>ool00`00ooooo`0Sool00`00ooooo`1Zool00`00 ooooo`0Sool002?oo`03003ooooo01?oo`8000[oo`03003ooooo00goo`03003ooooo013oo`03003o oooo02?oo`03003ooooo06Woo`03003ooooo02?oo`008_oo0P005ooo00<00?ooool01ooo00<00?oo ool03?oo00<00?ooool04Ooo00<00?ooool09?oo0P00J_oo00<00?ooool08_oo000Rool00`00ool0 000Gool00`00ooooo`06ool00`00ooooo`0:ool2000Dool00`00ooooo`0Vool00`00ooooo`1Xool0 0`00ooooo`0Qool0027oo`05003oooooool0000Gool00`00ooooo`05ool00`00ooooo`07ool3000F ool00`00ooooo`0Wool00`00ooooo`1Xool00`00ooooo`0Pool0027oo`03003ooooo00;oo`8001Ko o`03003ooooo00Coo`03003ooooo00Koo`03003ooooo01Soo`03003ooooo02Ooo`03003ooooo06Oo o`03003ooooo023oo`008?oo00<00?ooool01Ooo0`005?oo0P000ooo00<00?ooool01Ooo0P006ooo 00<00?ooool09_oo00@00?oo000006Soo`03003ooooo01ooo`008?oo00<00?ooool02?oo0P005?oo 0P0000?oo`00ool00ooo0`007_oo00<00?ooool09?oo00<00?ooool00_oo0P00I_oo00<00?ooool0 7ooo000Oool00`00ooooo`0;ool3000Cool200001?oo000000008Ooo00<00?ooool08ooo00<00?oo ool01Ooo00<00?ooool0I?oo00<00?ooool07_oo000Oool00`00ooooo`0>ool70008ool7000Tool0 0`00ooooo`0Rool00`00ooooo`07ool2001Tool00`00ooooo`0Nool001koo`8001Ooo`P000Goo`80 02Coo`03003ooooo02;oo`03003ooooo00Woo`8006;oo`8001ooo`007Ooo00@00?ooool002;oo`04 003ooooo000Tool00`00ooooo`0Pool00`00ooooo`0ool00`00ooooo`0J ool001[oo`03003ooooo00coo`03003ooooo01Goo`03003ooooo00_oo`8001coo`03003ooooo01Wo o`03003ooooo01goo`<004?oo`<001;oo`03003ooooo01Woo`006Ooo00<00?ooool03_oo00<00?oo ool05?oo00<00?ooool03Ooo00<00?ooool06Ooo00<00?ooool06?oo00<00?ooool08Ooo0P00?ooo 0P004ooo0P0000?oo`00ool06Ooo000Iool00`00ooooo`0?ool00`00ooooo`0Bool00`00ooooo`0? ool00`00ooooo`0Hool00`00ooooo`0Gool00`00ooooo`0Tool3000iool3000Dool01@00oooooooo 00006_oo000Hool00`00ooooo`0Aool00`00ooooo`0Aool00`00ooooo`0@ool00`00ooooo`0Hool0 0`00ooooo`0Eool00`00ooooo`0Xool6000]ool6000Eool20005ool00`00ooooo`0Gool001Soo`03 003ooooo01;oo`03003ooooo00ooo`03003ooooo01;oo`8001Soo`03003ooooo01Coo`03003ooooo 02ooo`8002Woo`8001[oo`03003ooooo00Goo`03003ooooo01Ooo`006?oo00<00?ooool04ooo0P00 3_oo00<00?ooool05Ooo0P005_oo00<00?ooool05?oo00<00?ooool0