(************** Content-type: application/mathematica ************** 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[ 730512, 21463]*) (*NotebookOutlinePosition[ 731177, 21486]*) (* CellTagsIndexPosition[ 731133, 21482]*) (*WindowFrame->Normal*) Notebook[{ Cell[CellGroupData[{ Cell["Shapes in 2D Statistics", "Subtitle"], Cell["\<\ Ivan Cnop Vrije universiteit Brussel icnop@vub.ac.be\ \>", "Subsubtitle"], Cell[CellGroupData[{ Cell["Initialisation", "Subsection"], Cell[BoxData[ \(Off[Solve::ifun]\)], "Input", InitializationCell->True], Cell[BoxData[ \(<< Graphics`ArgColors`\)], "Input", InitializationCell->True], Cell[BoxData[ \(<< Graphics`ComplexMap`\)], "Input", InitializationCell->True], Cell[BoxData[ \(coords[z_] := {Re[z], Im[z]}\)], "Input", InitializationCell->True], Cell[CellGroupData[{ Cell["Define Spirograph", "Subsubsection"], Cell[BoxData[ RowBox[{ RowBox[{\(spirograph[f_, \[CurlyPhi]_, opts___]\), ":=", "\n", "\t", RowBox[{"ParametricPlot", "[", RowBox[{\({Re[f], Im[f]}\), ",", \({\[CurlyPhi], \(-\ \[Pi]\), \ \[Pi]}\), ",", "\n", "\t\t", StyleBox["opts", FontColor->GrayLevel[0.500008]], StyleBox[",", FontColor->GrayLevel[0.500008]], "\n", "\t\t", StyleBox[\(PlotRange \[Rule] All\), FontColor->GrayLevel[0.500008]], StyleBox[",", FontColor->GrayLevel[0.500008]], StyleBox[\(AspectRatio \[Rule] Automatic\), FontColor->GrayLevel[0.500008]], StyleBox[",", FontColor->GrayLevel[0.500008]], StyleBox[\(Frame \[Rule] True\), FontColor->GrayLevel[0.500008]], StyleBox[",", FontColor->GrayLevel[0.500008]], StyleBox[\(Axes \[Rule] False\), FontColor->GrayLevel[0.500008]], StyleBox[",", FontColor->GrayLevel[0.500008]], StyleBox[\(FrameTicks \[Rule] None\), FontColor->GrayLevel[0.500008]], StyleBox[",", FontColor->GrayLevel[0.500008]], StyleBox[\(PlotPoints \[Rule] 250\), FontColor->GrayLevel[0.500008]]}], "]"}]}], ";"}]], "InputOnly",\ InitializationCell->True] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Arbitrary data sets", "Section"], Cell[TextData[{ "We no longer require the set of points to be similar to the boundary of a \ starlike domain.\n", StyleBox["Here is some arbitrary graphical input:", FontWeight->"Plain"] }], "Text", FontWeight->"Bold"], Cell[CellGroupData[{ Cell[BoxData[ \(Plot[0, {x, \(-2\), 2}, PlotRange -> {\(-2\), 2}, AspectRatio \[Rule] Automatic, GridLines \[Rule] Automatic]\)], "Input"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .95238 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.238095 0.476191 0.238095 [ [.02381 .46369 -6 -9 ] [.02381 .46369 6 0 ] [.2619 .46369 -6 -9 ] [.2619 .46369 6 0 ] [.7381 .46369 -3 -9 ] [.7381 .46369 3 0 ] [.97619 .46369 -3 -9 ] [.97619 .46369 3 0 ] [.4875 0 -12 -4.5 ] [.4875 0 0 4.5 ] [.4875 .11905 -24 -4.5 ] [.4875 .11905 0 4.5 ] [.4875 .2381 -12 -4.5 ] [.4875 .2381 0 4.5 ] [.4875 .35714 -24 -4.5 ] [.4875 .35714 0 4.5 ] [.4875 .59524 -18 -4.5 ] [.4875 .59524 0 4.5 ] [.4875 .71429 -6 -4.5 ] [.4875 .71429 0 4.5 ] [.4875 .83333 -18 -4.5 ] [.4875 .83333 0 4.5 ] [.4875 .95238 -6 -4.5 ] [.4875 .95238 0 4.5 ] [ 0 0 0 0 ] [ 1 .95238 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 0 .5 r .25 Mabswid [ ] 0 setdash .02381 0 m .02381 .95238 L s .2619 0 m .2619 .95238 L s .5 0 m .5 .95238 L s .7381 0 m .7381 .95238 L s .97619 0 m .97619 .95238 L s 0 0 m 1 0 L s 0 .11905 m 1 .11905 L s 0 .2381 m 1 .2381 L s 0 .35714 m 1 .35714 L s 0 .47619 m 1 .47619 L s 0 .59524 m 1 .59524 L s 0 .71429 m 1 .71429 L s 0 .83333 m 1 .83333 L s 0 .95238 m 1 .95238 L s 0 g .02381 .47619 m .02381 .48244 L s [(-2)] .02381 .46369 0 1 Mshowa .2619 .47619 m .2619 .48244 L s [(-1)] .2619 .46369 0 1 Mshowa .7381 .47619 m .7381 .48244 L s [(1)] .7381 .46369 0 1 Mshowa .97619 .47619 m .97619 .48244 L s [(2)] .97619 .46369 0 1 Mshowa .125 Mabswid .07143 .47619 m .07143 .47994 L s .11905 .47619 m .11905 .47994 L s .16667 .47619 m .16667 .47994 L s .21429 .47619 m .21429 .47994 L s .30952 .47619 m .30952 .47994 L s .35714 .47619 m .35714 .47994 L s .40476 .47619 m .40476 .47994 L s .45238 .47619 m .45238 .47994 L s .54762 .47619 m .54762 .47994 L s .59524 .47619 m .59524 .47994 L s .64286 .47619 m .64286 .47994 L s .69048 .47619 m .69048 .47994 L s .78571 .47619 m .78571 .47994 L s .83333 .47619 m .83333 .47994 L s .88095 .47619 m .88095 .47994 L s .92857 .47619 m .92857 .47994 L s .25 Mabswid 0 .47619 m 1 .47619 L s .5 0 m .50625 0 L s [(-2)] .4875 0 1 0 Mshowa .5 .11905 m .50625 .11905 L s [(-1.5)] .4875 .11905 1 0 Mshowa .5 .2381 m .50625 .2381 L s [(-1)] .4875 .2381 1 0 Mshowa .5 .35714 m .50625 .35714 L s [(-0.5)] .4875 .35714 1 0 Mshowa .5 .59524 m .50625 .59524 L s [(0.5)] .4875 .59524 1 0 Mshowa .5 .71429 m .50625 .71429 L s [(1)] .4875 .71429 1 0 Mshowa .5 .83333 m .50625 .83333 L s [(1.5)] .4875 .83333 1 0 Mshowa .5 .95238 m .50625 .95238 L s [(2)] .4875 .95238 1 0 Mshowa .125 Mabswid .5 .02381 m .50375 .02381 L s .5 .04762 m .50375 .04762 L s .5 .07143 m .50375 .07143 L s .5 .09524 m .50375 .09524 L s .5 .14286 m .50375 .14286 L s .5 .16667 m .50375 .16667 L s .5 .19048 m .50375 .19048 L s .5 .21429 m .50375 .21429 L s .5 .2619 m .50375 .2619 L s .5 .28571 m .50375 .28571 L s .5 .30952 m .50375 .30952 L s .5 .33333 m .50375 .33333 L s .5 .38095 m .50375 .38095 L s .5 .40476 m .50375 .40476 L s .5 .42857 m .50375 .42857 L s .5 .45238 m .50375 .45238 L s .5 .5 m .50375 .5 L s .5 .52381 m .50375 .52381 L s .5 .54762 m .50375 .54762 L s .5 .57143 m .50375 .57143 L s .5 .61905 m .50375 .61905 L s .5 .64286 m .50375 .64286 L s .5 .66667 m .50375 .66667 L s .5 .69048 m .50375 .69048 L s .5 .7381 m .50375 .7381 L s .5 .7619 m .50375 .7619 L s .5 .78571 m .50375 .78571 L s .5 .80952 m .50375 .80952 L s .5 .85714 m .50375 .85714 L s .5 .88095 m .50375 .88095 L s .5 .90476 m .50375 .90476 L s .5 .92857 m .50375 .92857 L s .25 Mabswid .5 0 m .5 .95238 L s 0 0 m 1 0 L 1 .95238 L 0 .95238 L closepath clip newpath .5 Mabswid .02381 .47619 m .06244 .47619 L .10458 .47619 L .14415 .47619 L .18221 .47619 L .22272 .47619 L .26171 .47619 L .30316 .47619 L .34309 .47619 L .3815 .47619 L .42237 .47619 L .46172 .47619 L .49955 .47619 L .53984 .47619 L .57861 .47619 L .61984 .47619 L .65954 .47619 L .69774 .47619 L .73838 .47619 L .77751 .47619 L .81909 .47619 L .85916 .47619 L .89771 .47619 L .93871 .47619 L .97619 .47619 L s % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 274.25}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHg?ooool00ol0003ooooo ooooo`04ooooo`03o`000?oooooooooo03oooooo00?o001oooooooooool0?oooool00ol007oooooo ooooo`0:ooooo`002oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo03Oooooo0_l0 0006ooooo`03o`000?oooooooooo03oooooo00?o001oooooooooool0?oooool00ol007oooooooooo o`0:ooooo`002oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo03Sooooo00?o0000 ooooooooool01?ooool00ol0003oooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o001o ooooooooool02_ooool000_ooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0ooooo o`03o`000?oooooooooo03oooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0:oooo o`002oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o0000oooooooo ool0?oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00 Oooooooooooo03oooooo00?o001oooooooooool0?oooool2o`00043ooooo00?o001oooooooooool0 ?oooool00ol007ooooooooooo`0:ooooo`002oooool00ol007ooooooooooo`0oooooo`03o`00Oooo oooooooo03oooooo00?o0000ooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`00Oooo oooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool0?oooool0 0ol0003oooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool02_ooool0 00_ooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`000?oooooooooo 03oooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0:ooooo`002oooool00ol007oo ooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o0000ooooooooool0?oooool00ol007oo ooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oooooo 00?o001oooooooooool0?oooool00ol0003oooooooooo`0oooooo`03o`00Oooooooooooo03oooooo 00?o001oooooooooool02_ooool000_ooooo00?o001oooooooooool0?oooool00ol007oooooooooo o`0oooooo`03o`000?oooooooooo03oooooo00?o001oooooooooool0?oooool00ol007oooooooooo o`0:ooooo`002oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo03oooooo0_l00010 ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool02_ooool000_ooooo00?o001ooooo ooooool0?oooool00ol007ooooooooooo`0oooooo`03o`000?oooooooooo03oooooo00?o001ooooo ooooool0?oooool00ol007ooooooooooo`0:ooooo`002oooool00ol007ooooooooooo`0oooooo`03 o`00Oooooooooooo03oooooo00?o0000ooooooooool0?oooool00ol007ooooooooooo`0oooooo`03 o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool0 ?oooool00ol0003oooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool0 2_ooool000_ooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`000?oo oooooooo03oooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0:ooooo`002oooool0 0ol007ooooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o0000ooooooooool0?oooool0 0ol007ooooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooooooo 03oooooo00?o001oooooooooool0?oooool00ol0003oooooooooo`0oooooo`03o`00Oooooooooooo 03oooooo00?o001oooooooooool02_ooool000_ooooo00?o001oooooooooool0?oooool00ol007oo ooooooooo`0oooooo`;o0000@?ooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo00[o oooo000;ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool0?oooool00ol0003ooooo ooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool02_ooool000_ooooo00?o 001oooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`000?oooooooooo03oooooo00?o 001oooooooooool0?oooool00ol007ooooooooooo`0:ooooo`002oooool00ol007ooooooooooo`0o ooooo`03o`00Oooooooooooo03oooooo00?o0000ooooooooool0?oooool00ol007ooooooooooo`0o ooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oooooo00?o001ooooo ooooool0?oooool00ol0003oooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o001ooooo ooooool02_ooool000_ooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0oooooo`03 o`000?oooooooooo03oooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0:ooooo`00 2oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo03oooooo0_l00010ooooo`03o`00 Oooooooooooo03oooooo00?o001oooooooooool02_ooool000_ooooo00?o001oooooooooool0?ooo ool00ol007ooooooooooo`0oooooo`03o`000?oooooooooo03oooooo00?o001oooooooooool0?ooo ool00ol007ooooooooooo`0:ooooo`002oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooo oooo03oooooo00?o0000ooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooo oooo00[ooooo000;ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool0?oooool00ol0 003oooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool02_ooool000_o oooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0/ooooo`;o00001?ooool00ol0003o ooooooooo`02ooooo`?o00001Oooool00ol0003oooooooooo`0oooooo`03o`00Oooooooooooo03oo oooo00?o001oooooooooool02_ooool000_ooooo00?o001oooooooooool0?oooool00ol007oooooo ooooo`0[ooooo`04o`000?ooooooooooo`0000Oooooo00Go0000ooooooooooooooooo`000004oooo o`03o`000?oooooooooo03oooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0:oooo o`002oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo02Cooooo1Ol00002ooooo`04 o`000?ooooooooooo`0000_ooooo00?o0000ooooooooool00_ooool00ol0003oooooooooo`0ooooo o`03o`00Oooooooooooo03oooooo00?o001oooooooooool02_ooool000CoooooMol007l01?l0003o 001oo`00Ool0000;o`00O`03o`000?l007oo001o00;o001o0ol00029o`00O`Gooooo000;ooooo`03 o`00Oooooooooooo03oooooo00?o001oooooooooool0:oooool01?l0003oooooooooool00007oooo o`Co00001Oooool00ol0003oooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o001ooooo ooooool02_ooool000_ooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0[ooooo`04 o`000?ooooooooooo`0000Oooooo00?o0000ooooooooool01_ooool00ol0003oooooooooo`0ooooo o`03o`00Oooooooooooo03oooooo00?o001oooooooooool02_ooool000_ooooo00?o001ooooooooo ool0?oooool00ol007ooooooooooo`0/ooooo`;o00002?ooool5o`0000Cooooo00?o0000oooooooo ool0?oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00 Oooooooooooo03oooooo00?o001oooooooooool0?oooool00ol0003oooooooooo`0oooooo`03o`00 Oooooooooooo03oooooo00?o001oooooooooool02_ooool000_ooooo00?o001oooooooooool0?ooo ool00ol007ooooooooooo`0oooooo`03o`000?oooooooooo03oooooo00?o001oooooooooool0?ooo ool00ol007ooooooooooo`0:ooooo`002oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooo oooo03oooooo0_l00010ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool02_ooool0 00_ooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`000?oooooooooo 03oooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0:ooooo`002oooool00ol007oo ooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o0000ooooooooool0?oooool00ol007oo ooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oooooo 00?o001oooooooooool0?oooool00ol0003oooooooooo`0oooooo`03o`00Oooooooooooo03oooooo 00?o001oooooooooool02_ooool000_ooooo00?o001oooooooooool0?oooool00ol007oooooooooo o`0oooooo`03o`000?oooooooooo03oooooo00?o001oooooooooool0?oooool00ol007oooooooooo o`0:ooooo`002oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o0000 ooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo000;oooo o`03o`00Oooooooooooo03oooooo00?o001oooooooooool0?oooool00ol0003oooooooooo`0ooooo o`03o`00Oooooooooooo03oooooo00?o001oooooooooool02_ooool000_ooooo00?o001ooooooooo ool0?oooool00ol007ooooooooooo`0oooooo`;o0000@?ooool00ol007ooooooooooo`0oooooo`03 o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool0 ?oooool00ol0003oooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool0 2_ooool000_ooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`000?oo oooooooo03oooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0:ooooo`002oooool0 0ol007ooooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o0000ooooooooool0?oooool0 0ol007ooooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooooooo 03oooooo00?o001oooooooooool0?oooool00ol0003oooooooooo`0oooooo`03o`00Oooooooooooo 03oooooo00?o001oooooooooool02_ooool000_ooooo00?o001oooooooooool0?oooool00ol007oo ooooooooo`0oooooo`03o`000?oooooooooo03oooooo00?o001oooooooooool0?oooool00ol007oo ooooooooo`0:ooooo`002oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo03oooooo 00?o0000ooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo 000;ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool0?oooool2o`00043ooooo00?o 001oooooooooool0?oooool00ol007ooooooooooo`0:ooooo`002oooool5o`0003gooooo00Co001o o`000?l0003o0000?_ooool00ol0003oooooooooo`0mooooo`?o0000?_ooool5o`0000_ooooo000; ooooo`05o`00Ool0003oooooooooool00000?Oooool00ol007ooooooo`00000oooooo`03o`000?oo oooooooo03kooooo00?o0000o`00Ooooool0?_ooool01?l0003oooooo`00Ool0000;ooooo`001Ooo ool5o`000004ooooool007ooooooo`0003Wooooo1Ol000001?oooooo001oooooool0000oooooo`03 o`000?oooooooooo03kooooo00?o0000o`00Ooooool0?oooool00ol0003o001oooooo`0;ooooo`00 2oooool01?l007ooooooooooool0000nooooo`03o`00Oooooooo000003oooooo00?o0000oooooooo ool0?_ooool00ol0003o001oooooo`10ooooo`03o`000?oooooooooo00[ooooo000;ooooo`05o`00 0?ooooooooooooooool00000?Oooool00ol007ooooooo`00000oooooo`03o`000?oooooooooo03ko oooo00?o0000o`00Ooooool0?Oooool01Ol0003oooooooooool007oo000000_ooooo000;ooooo`05 o`000?ooooooooooooooool00000?Oooool00ol007oo0000o`00000oooooo`;o0000?_ooool2o`00 0003o`00Oooooooooooo03cooooo00Go0000oooooooooooo001oo`00000;ooooo`002oooool01?l0 07oo0000o`000?l0000nooooo`03o`00Oooooooo000003oooooo00?o0000ooooooooool0?_ooool0 0ol0003o001oooooo`0nooooo`?o00003?ooool000_ooooo00?o001oooooooooool0?oooool00ol0 07ooooooooooo`0oooooo`03o`000?oooooooooo03oooooo00?o001oooooooooool0?oooool00ol0 07ooooooooooo`0:ooooo`002oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo03oo oooo00?o0000ooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo00[o oooo000;ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool0?oooool00ol0003ooooo ooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool02_ooool000_ooooo00?o 001oooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`000?oooooooooo03oooooo00?o 001oooooooooool0?oooool00ol007ooooooooooo`0:ooooo`002oooool00ol007ooooooooooo`0o ooooo`03o`00Oooooooooooo03oooooo00?o0000ooooooooool0?oooool00ol007ooooooooooo`0o ooooo`03o`00Oooooooooooo00[ooooo0004oooooooo00006?l00005ooooo`002oooool00ol0003o ooooooooo`0:ooooo`03o`000?oooooooooo00[ooooo00?o0000ooooooooool02oooool00ol0003o ooooooooo`0:ooooo`03o`000?oooooooooo00[ooooo00?o0000ooooooooool02_ooool00ol0003o ooooooooo`0:ooooo`03o`000?oooooooooo00_ooooo00?o0000ooooooooool02_ooool00ol0003o ooooooooo`0:ooooo`03o`000?oooooooooo00[ooooo00?o0000ooooooooool02_ooool00ol0003o ooooooooo`0;ooooo`03o`000?oooooooooo00[ooooo00?o0000ooooooooool02_ooool00ol0003o ooooooooo`0:ooooo`03o`000?oooooooooo00[ooooo00?o0000ooooooooool02oooool00ol0003o ooooooooo`0:ooooo`03o`000?oooooooooo00[ooooo00?o0000ooooooooool02_ooool000_ooooo 00?o0000ooooooooool0?oooool00ol0003oooooooooo`0oooooo`03o`000?oooooooooo03oooooo 00?o0000ooooooooool0?oooool00ol0003oooooooooo`0:ooooo`002oooool00ol007oooooooooo o`0oooooo`03o`00Oooooooooooo03oooooo00?o0000ooooooooool0?oooool00ol007oooooooooo o`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oooooo00?o001o ooooooooool0?oooool00ol0003oooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o001o ooooooooool02_ooool000_ooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0ooooo o`03o`000?oooooooooo03oooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0:oooo o`002oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo03oooooo0_l00010ooooo`03 o`00Oooooooooooo03oooooo00?o001oooooooooool02_ooool000_ooooo00?o001oooooooooool0 ?oooool00ol007ooooooooooo`0oooooo`03o`000?oooooooooo03oooooo00?o001oooooooooool0 ?oooool00ol007ooooooooooo`0:ooooo`002oooool00ol007ooooooooooo`0oooooo`03o`00Oooo oooooooo03oooooo00?o0000ooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`00Oooo oooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool0?oooool0 0ol0003oooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool02_ooool0 00_ooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`000?oooooooooo 03oooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0:ooooo`002oooool00ol007oo ooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o0000ooooooooool0?oooool00ol007oo ooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oooooo 00?o001oooooooooool0?oooool00ol0003oooooooooo`0oooooo`03o`00Oooooooooooo03oooooo 00?o001oooooooooool02_ooool000_ooooo00?o001oooooooooool0?oooool00ol007oooooooooo o`0oooooo`;o0000@?ooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo000; ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool0?oooool00ol0003oooooooooo`0o ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool02_ooool000_ooooo00?o001ooooo ooooool0?oooool00ol007ooooooooooo`0oooooo`03o`000?oooooooooo03oooooo00?o001ooooo ooooool0?oooool00ol007ooooooooooo`0:ooooo`002oooool00ol007ooooooooooo`0oooooo`03 o`00Oooooooooooo03oooooo00?o0000ooooooooool0?oooool00ol007ooooooooooo`0oooooo`03 o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool0 ?oooool00ol0003oooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool0 2_ooool000_ooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`000?oo oooooooo03oooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0:ooooo`002oooool0 0ol007ooooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o0000ooooooooool0?oooool0 0ol007ooooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooooooo 03oooooo00?o001oooooooooool0?oooool2o`00043ooooo00?o001oooooooooool0?oooool00ol0 07ooooooooooo`0:ooooo`002oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo03oo oooo00?o0000ooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo00[o oooo000;ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool0?oooool00ol0003ooooo ooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool02_ooool000_ooooo00?o 001oooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`000?oooooooooo03oooooo00?o 001oooooooooool0?oooool00ol007ooooooooooo`0:ooooo`002oooool00ol007ooooooooooo`0o ooooo`03o`00Oooooooooooo03oooooo00?o0000ooooooooool0?oooool00ol007ooooooooooo`0o ooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oooooo00?o001ooooo ooooool0?oooool00ol0003oooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o001ooooo ooooool02_ooool000_ooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0oooooo`;o 0000@?ooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00 Oooooooooooo03oooooo00?o001oooooooooool0?oooool00ol0003oooooooooo`0oooooo`03o`00 Oooooooooooo03oooooo00?o001oooooooooool02_ooool000_ooooo00?o001oooooooooool0?ooo ool00ol007ooooooooooo`0oooooo`03o`000?oooooooooo03oooooo00?o001oooooooooool0?ooo ool00ol007ooooooooooo`0:ooooo`002oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooo oooo03oooooo00?o0000ooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooo oooo00[ooooo000;ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool0;?ooool2o`00 00Cooooo00?o0000ooooooooool00_ooool3o`0000Gooooo00?o0000ooooooooool0?oooool00ol0 07ooooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oo oooo00?o001oooooooooool0:oooool01?l0003oooooooooool00007ooooo`05o`000?oooooooooo ooooool000001?ooool00ol0003oooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o001o ooooooooool02_ooool000_ooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0[oooo o`04o`000?ooooooooooo`0000_ooooo00?o0000ooooooooool00_ooool00ol0003oooooooooo`0o ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool02_ooool000CoooooMol007l01?l0 003o001oo`00Ool0000;o`00O`03o`000?l007oo001o00;o001o0ol00029o`00O`Gooooo000;oooo o`03o`00Oooooooooooo03oooooo00?o001oooooooooool0:oooool01?l0003oooooooooool00007 ooooo`Co00001Oooool00ol0003oooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o001o ooooooooool02_ooool000_ooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0[oooo o`04o`000?ooooooooooo`0000Oooooo00?o0000ooooooooool01_ooool00ol0003oooooooooo`0o ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool02_ooool000_ooooo00?o001ooooo ooooool0?oooool00ol007ooooooooooo`0/ooooo`;o00002?ooool5o`0000Cooooo00?o0000oooo ooooool0?oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03 o`00Oooooooooooo03oooooo00?o001oooooooooool0?oooool00ol0003oooooooooo`0oooooo`03 o`00Oooooooooooo03oooooo00?o001oooooooooool02_ooool000_ooooo00?o001oooooooooool0 ?oooool00ol007ooooooooooo`0oooooo`03o`000?oooooooooo03oooooo00?o001oooooooooool0 ?oooool00ol007ooooooooooo`0:ooooo`002oooool00ol007ooooooooooo`0oooooo`03o`00Oooo oooooooo03oooooo00?o0000ooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`00Oooo oooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool0?oooool2 o`00043ooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0:ooooo`002oooool00ol0 07ooooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o0000ooooooooool0?oooool00ol0 07ooooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oo oooo00?o001oooooooooool0?oooool00ol0003oooooooooo`0oooooo`03o`00Oooooooooooo03oo oooo00?o001oooooooooool02_ooool000_ooooo00?o001oooooooooool0?oooool00ol007oooooo ooooo`0oooooo`03o`000?oooooooooo03oooooo00?o001oooooooooool0?oooool00ol007oooooo ooooo`0:ooooo`002oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o 0000ooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo000; ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool0?oooool00ol0003oooooooooo`0o ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool02_ooool000_ooooo00?o001ooooo ooooool0?oooool00ol007ooooooooooo`0oooooo`;o0000@?ooool00ol007ooooooooooo`0ooooo o`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oooooo00?o001ooooooooo ool0?oooool00ol0003oooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o001ooooooooo ool02_ooool000_ooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`00 0?oooooooooo03oooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0:ooooo`002ooo ool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o0000ooooooooool0?ooo ool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooo oooo03oooooo00?o001oooooooooool0?oooool00ol0003oooooooooo`0oooooo`03o`00Oooooooo oooo03oooooo00?o001oooooooooool02_ooool000_ooooo00?o001oooooooooool0?oooool00ol0 07ooooooooooo`0oooooo`03o`000?oooooooooo03oooooo00?o001oooooooooool0?oooool00ol0 07ooooooooooo`0:ooooo`002oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo03oo oooo00?o0000ooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo00[o oooo000;ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool0?oooool2o`00043ooooo 00?o001oooooooooool0?oooool00ol007ooooooooooo`0:ooooo`002oooool00ol007oooooooooo o`0oooooo`03o`00Oooooooooooo03oooooo00?o0000ooooooooool0?oooool00ol007oooooooooo o`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oooooo00?o001o ooooooooool0?oooool00ol0003oooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o001o ooooooooool02_ooool000_ooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0ooooo o`03o`000?oooooooooo03oooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0:oooo o`002oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o0000oooooooo ool0?oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00 Oooooooooooo03oooooo00?o001oooooooooool0?oooool00ol0003oooooooooo`0oooooo`03o`00 Oooooooooooo03oooooo00?o001oooooooooool02_ooool000_ooooo00?o001oooooooooool0?ooo ool00ol007ooooooooooo`0oooooo`;o0000@?ooool00ol007ooooooooooo`0oooooo`03o`00Oooo oooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool0?oooool0 0ol0003oooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool02_ooool0 00_ooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`000?oooooooooo 03oooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0:ooooo`002oooool00ol007oo ooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o0000ooooooooool0?oooool00ol007oo ooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oooooo 00?o001oooooooooool0=oooool3o`0000Gooooo00?o0000ooooooooool0?oooool00ol007oooooo ooooo`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oooooo00?o 001oooooooooool0>?ooool00ol0003oooooooooo`04ooooo`03o`000?oooooooooo03oooooo00?o 001oooooooooool0?oooool00ol007ooooooooooo`0:ooooo`002oooool00ol007ooooooooooo`0o ooooo`03o`00Oooooooooooo03Sooooo00?o0000ooooooooool01?ooool00ol0003oooooooooo`0o ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool02_ooool000CoooooQ?l007l00ol0 003o001oo`00O`04o`00O`?o0000ROl007l5ooooo`002oooool00ol007ooooooooooo`0oooooo`03 o`00Oooooooooooo03Sooooo00?o0000ooooooooool01?ooool00ol0003oooooooooo`0oooooo`03 o`00Oooooooooooo03oooooo00?o001oooooooooool02_ooool000_ooooo00?o001oooooooooool0 ?oooool00ol007ooooooooooo`0gooooo`;o00001_ooool00ol0003oooooooooo`0oooooo`03o`00 Oooooooooooo03oooooo00?o001oooooooooool02_ooool000_ooooo00?o001oooooooooool0?ooo ool00ol007ooooooooooo`0hooooo`03o`000?oooooooooo00Cooooo00?o0000ooooooooool0?ooo ool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooo oooo03oooooo00?o001oooooooooool0?oooool00ol0003oooooooooo`0oooooo`03o`00Oooooooo oooo03oooooo00?o001oooooooooool02_ooool000_ooooo00?o001oooooooooool0?oooool00ol0 07ooooooooooo`0oooooo`03o`000?oooooooooo03oooooo00?o001oooooooooool0?oooool00ol0 07ooooooooooo`0:ooooo`002oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo03oo oooo00?o0000ooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo00[o oooo000;ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool0?oooool2o`00043ooooo 00?o001oooooooooool0?oooool00ol007ooooooooooo`0:ooooo`002oooool00ol007oooooooooo o`0oooooo`03o`00Oooooooooooo03oooooo00?o0000ooooooooool0?oooool00ol007oooooooooo o`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oooooo00?o001o ooooooooool0?oooool00ol0003oooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o001o ooooooooool02_ooool000_ooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0ooooo o`03o`000?oooooooooo03oooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0:oooo o`002oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o0000oooooooo ool0?oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00 Oooooooooooo03oooooo00?o001oooooooooool0?oooool00ol0003oooooooooo`0oooooo`03o`00 Oooooooooooo03oooooo00?o001oooooooooool02_ooool000_ooooo00?o001oooooooooool0?ooo ool00ol007ooooooooooo`0oooooo`;o0000@?ooool00ol007ooooooooooo`0oooooo`03o`00Oooo oooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool0?oooool0 0ol0003oooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool02_ooool0 00_ooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`000?oooooooooo 03oooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0:ooooo`002oooool00ol007oo ooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o0000ooooooooool0?oooool00ol007oo ooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oooooo 00?o001oooooooooool0?oooool00ol0003oooooooooo`0oooooo`03o`00Oooooooooooo03oooooo 00?o001oooooooooool02_ooool000_ooooo00?o001oooooooooool0?oooool00ol007oooooooooo o`0oooooo`03o`000?oooooooooo03oooooo00?o001oooooooooool0?oooool00ol007oooooooooo o`0:ooooo`002oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o0000 ooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo000;oooo o`03o`00Oooooooooooo03oooooo00?o001oooooooooool0?oooool2o`00043ooooo00?o001ooooo ooooool0?oooool00ol007ooooooooooo`0:ooooo`002oooool00ol007ooooooooooo`0oooooo`03 o`00Oooooooooooo03oooooo00?o0000ooooooooool0?oooool00ol007ooooooooooo`0oooooo`03 o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool0 ?oooool00ol0003oooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool0 2_ooool000_ooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`000?oo oooooooo03oooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0:ooooo`002oooool0 0ol007ooooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o0000ooooooooool0?oooool0 0ol007ooooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooooooo 03oooooo00?o001oooooooooool0?oooool00ol0003oooooooooo`0oooooo`03o`00Oooooooooooo 03oooooo00?o001oooooooooool02_ooool000_ooooo00?o001oooooooooool0?oooool00ol007oo ooooooooo`0oooooo`;o0000@?ooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo00[o oooo000;ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool0?oooool00ol0003ooooo ooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool02_ooool000_ooooo00?o 001oooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`000?oooooooooo03oooooo00?o 001oooooooooool0?oooool00ol007ooooooooooo`0:ooooo`002oooool00ol007ooooooooooo`0o ooooo`03o`00Oooooooooooo03oooooo00?o0000ooooooooool0?oooool00ol007ooooooooooo`0o ooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oooooo00?o001ooooo ooooool0:oooool3o`0000Cooooo00?o0000ooooooooool00_ooool3o`0000Gooooo00?o0000oooo ooooool0?oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03 o`00Oooooooooooo03oooooo00?o001oooooooooool0;?ooool00ol0003oooooooooo`07ooooo`05 o`000?ooooooooooooooool000001?ooool00ol0003oooooooooo`0oooooo`03o`00Oooooooooooo 03oooooo00?o001oooooooooool02_ooool000_ooooo00?o001oooooooooool0?oooool00ol007oo ooooooooo`0/ooooo`03o`000?oooooooooo00_ooooo00?o0000ooooooooool00_ooool00ol0003o ooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool02_ooool000Cooooo N?l007l00ol0003o001oo`00O`0;o`00O`03o`000?l007oo001o00;o001o0ol00029o`00O`Gooooo 000;ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool0;?ooool00ol0003ooooooooo o`07ooooo`Co00001Oooool00ol0003oooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o 001oooooooooool02_ooool000_ooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0[ ooooo`;o00002Oooool00ol0003oooooooooo`06ooooo`03o`000?oooooooooo03oooooo00?o001o ooooooooool0?oooool00ol007ooooooooooo`0:ooooo`002oooool00ol007ooooooooooo`0ooooo o`03o`00Oooooooooooo02cooooo00?o0000ooooooooool01oooool5o`0000Cooooo00?o0000oooo ooooool0?oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03 o`00Oooooooooooo03oooooo00?o001oooooooooool0?oooool00ol0003oooooooooo`0oooooo`03 o`00Oooooooooooo03oooooo00?o001oooooooooool02_ooool000_ooooo00?o001oooooooooool0 ?oooool00ol007ooooooooooo`0oooooo`03o`000?oooooooooo03oooooo00?o001oooooooooool0 ?oooool00ol007ooooooooooo`0:ooooo`002oooool00ol007ooooooooooo`0oooooo`03o`00Oooo oooooooo03oooooo00?o0000ooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`00Oooo oooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool0?oooool2 o`00043ooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0:ooooo`002oooool00ol0 07ooooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o0000ooooooooool0?oooool00ol0 07ooooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oo oooo00?o001oooooooooool0?oooool00ol0003oooooooooo`0oooooo`03o`00Oooooooooooo03oo oooo00?o001oooooooooool02_ooool000_ooooo00?o001oooooooooool0?oooool00ol007oooooo ooooo`0oooooo`03o`000?oooooooooo03oooooo00?o001oooooooooool0?oooool00ol007oooooo ooooo`0:ooooo`002oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o 0000ooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo000; ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool0?oooool00ol0003oooooooooo`0o ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool02_ooool000_ooooo00?o001ooooo ooooool0?oooool00ol007ooooooooooo`0oooooo`;o0000@?ooool00ol007ooooooooooo`0ooooo o`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oooooo00?o001ooooooooo ool0?oooool00ol0003oooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o001ooooooooo ool02_ooool000_ooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`00 0?oooooooooo03oooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0:ooooo`002ooo ool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o0000ooooooooool0?ooo ool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooo oooo03oooooo00?o001oooooooooool0?oooool00ol0003oooooooooo`0oooooo`03o`00Oooooooo oooo03oooooo00?o001oooooooooool02_ooool000_ooooo00?o001oooooooooool0?oooool00ol0 07ooooooooooo`0oooooo`03o`000?oooooooooo03oooooo00?o001oooooooooool0?oooool00ol0 07ooooooooooo`0:ooooo`002oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo03oo oooo00?o0000ooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo00[o oooo000;ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool0?oooool2o`00043ooooo 00?o001oooooooooool0?oooool00ol007ooooooooooo`0:ooooo`002oooool00ol007oooooooooo o`0oooooo`03o`00Oooooooooooo03oooooo00?o0000ooooooooool0?oooool00ol007oooooooooo o`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oooooo00?o001o ooooooooool0?oooool00ol0003oooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o001o ooooooooool02_ooool000_ooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0ooooo o`03o`000?oooooooooo03oooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0:oooo o`002oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o0000oooooooo ool0?oooool00ol007ooooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00 Oooooooooooo03oooooo00?o001oooooooooool0?oooool00ol0003oooooooooo`0oooooo`03o`00 Oooooooooooo03oooooo00?o001oooooooooool02_ooool000_ooooo00?o001oooooooooool0?ooo ool00ol007ooooooooooo`0oooooo`;o0000@?ooool00ol007ooooooooooo`0oooooo`03o`00Oooo oooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool0?oooool0 0ol0003oooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool02_ooool0 00_ooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0oooooo`03o`000?oooooooooo 03oooooo00?o001oooooooooool0?oooool00ol007ooooooooooo`0:ooooo`002oooool00ol007oo ooooooooo`0oooooo`03o`00Oooooooooooo03oooooo00?o0000ooooooooool0?oooool00ol007oo ooooooooo`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oooooo 00?o001oooooooooool0=_ooool5o`0000Cooooo00?o0000ooooooooool0?oooool00ol007oooooo ooooo`0oooooo`03o`00Oooooooooooo00[ooooo000;ooooo`03o`00Oooooooooooo03oooooo00?o 001oooooooooool0=oooool01?l0003oooooooooool00004ooooo`03o`000?oooooooooo03oooooo 00?o001oooooooooool0?oooool00ol007ooooooooooo`0:ooooo`002oooool00ol007oooooooooo o`0oooooo`03o`00Oooooooooooo03Sooooo00?o0000ooooooooool01?ooool00ol0003ooooooooo o`0oooooo`03o`00Oooooooooooo03oooooo00?o001oooooooooool02_ooool000CoooooQOl007l0 0ol0003o001oo`00O`03o`00O`?o0000ROl007l5ooooo`00Q_ooool01Ol0003ooooooooooooooooo 000009Gooooo0026ooooo`05o`000?ooooooooooooooool00000UOooool008Oooooo0ol0002Foooo o`00oooooolQooooo`00\ \>"], ImageRangeCache->{{{0, 287}, {273.25, 0}} -> {-2.17221, -2.06814, \ 0.0151373, 0.0151373}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Closed]], Cell[BoxData[ \(\(pts = {{\(-0.930951\), 0.175965}, {\(-0.65848\), 0.297063}, {\(-0.613068\), 0.357612}, {\(-0.174086\), 0.327338}, {\(-1.03691\), \(-0.217605\)}, {\(-0.582793\), 0.0397289}, {\(-0.446558\), 0.236514}, {\(-0.174086\), 0.508985}, {\(-0.113537\), 0.569535}, {0.219483, 0.796594}, {0.431406, 0.842006}, {0.719014, 0.796594}, {0.189209, 0.508985}, {0.507092, 0.781457}, {0.597916, 1.22044}, {1.11258, 0.53926}, {0.900662, 0.357612}, {0.280033, 0.524122}, {0.446543, 0.357612}, {0.552504, 0.115416}, {0.446543, \(-0.293292\)}, {0.628191, \(-0.323566\)}, \ {0.401131, \(-0.00568295\)}, {0.280033, \(-0.232742\)}, {0.143797, \ \(-0.323566\)}, {0.128659, \(-0.384115\)}, {\(-0.0378506\), \(-0.717136\)}, {\ \(-0.325459\), \(-0.520351\)}, {\(-0.310322\), \(-0.384115\)}, \ {\(-0.673617\), \(-0.5809\)}, {\(-0.749304\), \(-0.656587\)}, {\(-0.88554\), \ \(-0.686861\)}, {\(-0.915814\), \(-0.626312\)}, {\(-0.49197\), \ \(-0.141919\)}, {\(-0.204361\), \(-0.308429\)}, {\(-0.355734\), \ \(-0.263017\)}, {\(-0.416283\), \(-0.24788\)}, {\(-0.537382\), \ \(-0.293292\)}, {\(-0.597931\), \(-0.293292\)}, {\(-0.734167\), \ \(-0.263017\)}, {\(-1.06719\), \(-0.323566\)}, {\(-1.09746\), \(-0.41439\)}, \ {\(-1.1126\), \(-0.474939\)}, {\(-1.12774\), \(-0.565763\)}, {\(-1.14287\), \ \(-0.626312\)}, {\(-1.18829\), \(-0.747411\)}, {\(-1.38507\), \(-1.2318\)}, {\ \(-1.29425\), \(-1.24694\)}, {\(-0.174086\), \(-1.00474\)}, {\(-0.128675\), \ \(-0.898784\)}, {0.340582, \(-0.64145\)}, {0.401131, \(-0.611175\)}, \ {0.507092, \(-0.535488\)}, {0.582779, \(-0.474939\)}, {0.658465, \ \(-0.429527\)}, {0.719014, \(-0.399253\)}, {1.26396, 0.251651}, {1.32451, 0.493848}, {1.33964, 0.569535}, {1.41533, 0.93283}, {1.41533, 0.993379}, {1.35478, 1.05393}, {0.491955, 1.17503}, {\(-0.280048\), 0.963104}, {\(-0.507107\), 1.00852}, {\(-0.88554\), 0.826869}, {\(-1.26397\), 0.720907}, {\(-1.29425\), \(-0.126781\)}, {\(-0.794716\), \ \(-0.959333\)}, {0.749289, \(-0.959333\)}, {0.885525, \(-0.717136\)}, \ {1.30937, \(-0.490077\)}, {1.33964, \(-0.429527\)}, {1.38506, \(-0.368978\)}, \ {1.41533, \(-0.232742\)}, {1.41533, \(-0.172193\)}, {1.41533, \ \(-0.0662322\)}, {1.26396, 1.05393}, {1.24882, 1.11448}, {1.21855, 1.19016}, {1.20341, 1.28099}, {1.20341, 1.34154}, {0.522229, 1.52318}};\)\)], "Input"], Cell[CellGroupData[{ Cell[BoxData[ \(Length[pts]\)], "Input"], Cell[BoxData[ \(83\)], "Output"] }, Closed]], Cell[CellGroupData[{ Cell[BoxData[ \(ListPlot[pts, PlotRange \[Rule] {{\(-2\), 2}, {\(-2\), 2}}, AspectRatio \[Rule] Automatic]\)], "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.25 0.5 0.25 [ [0 .4875 -6 -9 ] [0 .4875 6 0 ] [.125 .4875 -12 -9 ] [.125 .4875 12 0 ] [.25 .4875 -6 -9 ] [.25 .4875 6 0 ] [.375 .4875 -12 -9 ] [.375 .4875 12 0 ] [.625 .4875 -9 -9 ] [.625 .4875 9 0 ] [.75 .4875 -3 -9 ] [.75 .4875 3 0 ] [.875 .4875 -9 -9 ] [.875 .4875 9 0 ] [1 .4875 -3 -9 ] [1 .4875 3 0 ] [.4875 0 -12 -4.5 ] [.4875 0 0 4.5 ] [.4875 .125 -24 -4.5 ] [.4875 .125 0 4.5 ] [.4875 .25 -12 -4.5 ] [.4875 .25 0 4.5 ] [.4875 .375 -24 -4.5 ] [.4875 .375 0 4.5 ] [.4875 .625 -18 -4.5 ] [.4875 .625 0 4.5 ] [.4875 .75 -6 -4.5 ] [.4875 .75 0 4.5 ] [.4875 .875 -18 -4.5 ] [.4875 .875 0 4.5 ] [.4875 1 -6 -4.5 ] [.4875 1 0 4.5 ] [ 0 0 0 0 ] [ 1 1 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash 0 .5 m 0 .50625 L s [(-2)] 0 .4875 0 1 Mshowa .125 .5 m .125 .50625 L s [(-1.5)] .125 .4875 0 1 Mshowa .25 .5 m .25 .50625 L s [(-1)] .25 .4875 0 1 Mshowa .375 .5 m .375 .50625 L s [(-0.5)] .375 .4875 0 1 Mshowa .625 .5 m .625 .50625 L s [(0.5)] .625 .4875 0 1 Mshowa .75 .5 m .75 .50625 L s [(1)] .75 .4875 0 1 Mshowa .875 .5 m .875 .50625 L s [(1.5)] .875 .4875 0 1 Mshowa 1 .5 m 1 .50625 L s [(2)] 1 .4875 0 1 Mshowa .125 Mabswid .025 .5 m .025 .50375 L s .05 .5 m .05 .50375 L s .075 .5 m .075 .50375 L s .1 .5 m .1 .50375 L s .15 .5 m .15 .50375 L s .175 .5 m .175 .50375 L s .2 .5 m .2 .50375 L s .225 .5 m .225 .50375 L s .275 .5 m .275 .50375 L s .3 .5 m .3 .50375 L s .325 .5 m .325 .50375 L s .35 .5 m .35 .50375 L s .4 .5 m .4 .50375 L s .425 .5 m .425 .50375 L s .45 .5 m .45 .50375 L s .475 .5 m .475 .50375 L s .525 .5 m .525 .50375 L s .55 .5 m .55 .50375 L s .575 .5 m .575 .50375 L s .6 .5 m .6 .50375 L s .65 .5 m .65 .50375 L s .675 .5 m .675 .50375 L s .7 .5 m .7 .50375 L s .725 .5 m .725 .50375 L s .775 .5 m .775 .50375 L s .8 .5 m .8 .50375 L s .825 .5 m .825 .50375 L s .85 .5 m .85 .50375 L s .9 .5 m .9 .50375 L s .925 .5 m .925 .50375 L s .95 .5 m .95 .50375 L s .975 .5 m .975 .50375 L s .25 Mabswid 0 .5 m 1 .5 L s .5 0 m .50625 0 L s [(-2)] .4875 0 1 0 Mshowa .5 .125 m .50625 .125 L s [(-1.5)] .4875 .125 1 0 Mshowa .5 .25 m .50625 .25 L s [(-1)] .4875 .25 1 0 Mshowa .5 .375 m .50625 .375 L s [(-0.5)] .4875 .375 1 0 Mshowa .5 .625 m .50625 .625 L s [(0.5)] .4875 .625 1 0 Mshowa .5 .75 m .50625 .75 L s [(1)] .4875 .75 1 0 Mshowa .5 .875 m .50625 .875 L s [(1.5)] .4875 .875 1 0 Mshowa .5 1 m .50625 1 L s [(2)] .4875 1 1 0 Mshowa .125 Mabswid .5 .025 m .50375 .025 L s .5 .05 m .50375 .05 L s .5 .075 m .50375 .075 L s .5 .1 m .50375 .1 L s .5 .15 m .50375 .15 L s .5 .175 m .50375 .175 L s .5 .2 m .50375 .2 L s .5 .225 m .50375 .225 L s .5 .275 m .50375 .275 L s .5 .3 m .50375 .3 L s .5 .325 m .50375 .325 L s .5 .35 m .50375 .35 L s .5 .4 m .50375 .4 L s .5 .425 m .50375 .425 L s .5 .45 m .50375 .45 L s .5 .475 m .50375 .475 L s .5 .525 m .50375 .525 L s .5 .55 m .50375 .55 L s .5 .575 m .50375 .575 L s .5 .6 m .50375 .6 L s .5 .65 m .50375 .65 L s .5 .675 m .50375 .675 L s .5 .7 m .50375 .7 L s .5 .725 m .50375 .725 L s .5 .775 m .50375 .775 L s .5 .8 m .50375 .8 L s .5 .825 m .50375 .825 L s .5 .85 m .50375 .85 L s .5 .9 m .50375 .9 L s .5 .925 m .50375 .925 L s .5 .95 m .50375 .95 L s .5 .975 m .50375 .975 L s .25 Mabswid .5 0 m .5 1 L s 0 0 m 1 0 L 1 1 L 0 1 L closepath clip newpath .008 w .26726 .54399 Mdot .33538 .57427 Mdot .34673 .5894 Mdot .45648 .58183 Mdot .24077 .4456 Mdot .3543 .50993 Mdot .38836 .55913 Mdot .45648 .62725 Mdot .47162 .64238 Mdot .55487 .69915 Mdot .60785 .7105 Mdot .67975 .69915 Mdot .5473 .62725 Mdot .62677 .69536 Mdot .64948 .80511 Mdot .77815 .63482 Mdot .72517 .5894 Mdot .57001 .63103 Mdot .61164 .5894 Mdot .63813 .52885 Mdot .61164 .42668 Mdot .65705 .41911 Mdot .60028 .49858 Mdot .57001 .44181 Mdot .53595 .41911 Mdot .53216 .40397 Mdot .49054 .32072 Mdot .41864 .36991 Mdot .42242 .40397 Mdot .3316 .35478 Mdot .31267 .33585 Mdot .27862 .32828 Mdot .27105 .34342 Mdot .37701 .46452 Mdot .44891 .42289 Mdot .41107 .43425 Mdot .39593 .43803 Mdot .36565 .42668 Mdot .35052 .42668 Mdot .31646 .43425 Mdot .2332 .41911 Mdot .22563 .3964 Mdot .22185 .38127 Mdot .21807 .35856 Mdot .21428 .34342 Mdot .20293 .31315 Mdot .15373 .19205 Mdot .17644 .18827 Mdot .45648 .24882 Mdot .46783 .2753 Mdot .58515 .33964 Mdot .60028 .34721 Mdot .62677 .36613 Mdot .64569 .38127 Mdot .66462 .39262 Mdot .67975 .40019 Mdot .81599 .56291 Mdot .83113 .62346 Mdot .83491 .64238 Mdot .85383 .73321 Mdot .85383 .74834 Mdot .8387 .76348 Mdot .62299 .79376 Mdot .42999 .74078 Mdot .37322 .75213 Mdot .27862 .70672 Mdot .18401 .68023 Mdot .17644 .4683 Mdot .30132 .26017 Mdot .68732 .26017 Mdot .72138 .32072 Mdot .82734 .37748 Mdot .83491 .39262 Mdot .84627 .40776 Mdot .85383 .44181 Mdot .85383 .45695 Mdot .85383 .48344 Mdot .81599 .76348 Mdot .81221 .77862 Mdot .80464 .79754 Mdot .80085 .82025 Mdot .80085 .83539 Mdot .63056 .8808 Mdot % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 288}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCacheValid->False], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Closed]], Cell[BoxData[ \(d[{a_, b_}] := Sqrt[a\^2 + b\^2]\)], "Input", AnimationDisplayTime->6.65416], Cell[BoxData[ \(angle[{a_, b_}] := If[a \[GreaterEqual] 0, t /. First[NSolve[Tan[t] \[Equal] b/a, {t}]], If[b \[GreaterEqual] 0, \[Pi] - t /. First[NSolve[Tan[t] \[Equal] \(-b\)/a, {t}]], \(-\[Pi]\) + t /. First[NSolve[Tan[t] \[Equal] b/a, {t}]]]]\)], "Input", AnimationDisplayTime->6.65416], Cell[BoxData[ \(\(Map[d, pts];\)\)], "Input", AnimationDisplayTime->6.65416], Cell[CellGroupData[{ Cell[BoxData[ \(\(angles = Flatten[Map[angle, pts]];\)\)], "Input", AnimationDisplayTime->6.65416], Cell[BoxData[ \(General::"spell1" \(\(:\)\(\ \)\) "Possible spelling error: new symbol name \"\!\(angles\)\" is similar \ to existing symbol \"\!\(angle\)\"."\)], "Message"] }, Closed]], Cell["\<\ Remark: for data points with a and b equal 0 , we do not obtain an \ angle. This rarely happens in the case of graphical inputs. \ \>", "Text"], Cell[BoxData[ \(\(comp = Map[d, pts]\ \[ExponentialE]\^\(\[ImaginaryI]\ angles\);\)\)], "Input",\ AnimationDisplayTime->6.65416], Cell[CellGroupData[{ Cell[BoxData[ \(Show[ Graphics[Transpose[{Map[ArgColor, comp], Map[Point, Map[coords, comp]]}], PlotRange \[Rule] {{\(-2\), 2}, {\(-2\), 2}}, AspectRatio \[Rule] Automatic]]\)], "Input", AnimationDisplayTime->6.65416], 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.25 0.5 0.25 [ [ 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 1 .822 r .008 w .26726 .54399 Mdot 0 1 .595 r .33538 .57427 Mdot 0 1 .496 r .34673 .5894 Mdot .033 1 0 r .45648 .58183 Mdot 0 .802 1 r .24077 .4456 Mdot 0 1 .935 r .3543 .50993 Mdot 0 1 .535 r .38836 .55913 Mdot .185 1 0 r .45648 .62725 Mdot .312 1 0 r .47162 .64238 Mdot .757 1 0 r .55487 .69915 Mdot .952 1 0 r .60785 .7105 Mdot 1 .799 0 r .67975 .69915 Mdot .84 1 0 r .5473 .62725 Mdot 1 .95 0 r .62677 .69536 Mdot .935 1 0 r .64948 .80511 Mdot 1 .431 0 r .77815 .63482 Mdot 1 .361 0 r .72517 .5894 Mdot .969 1 0 r .57001 .63103 Mdot 1 .645 0 r .61164 .5894 Mdot 1 .197 0 r .63813 .52885 Mdot 1 0 .555 r .61164 .42668 Mdot 1 0 .454 r .65705 .41911 Mdot 1 0 .014 r .60028 .49858 Mdot 1 0 .662 r .57001 .44181 Mdot .899 0 1 r .53595 .41911 Mdot .809 0 1 r .53216 .40397 Mdot .45 0 1 r .49054 .32072 Mdot 0 .034 1 r .41864 .36991 Mdot 0 .149 1 r .42242 .40397 Mdot 0 .32 1 r .3316 .35477 Mdot 0 .313 1 r .31267 .33585 Mdot 0 .37 1 r .27862 .32828 Mdot 0 .427 1 r .27105 .34342 Mdot 0 .732 1 r .37701 .46452 Mdot 0 .059 1 r .44891 .42289 Mdot 0 .392 1 r .41107 .43425 Mdot 0 .487 1 r .39593 .43803 Mdot 0 .523 1 r .36565 .42668 Mdot 0 .565 1 r .35052 .42668 Mdot 0 .671 1 r .31646 .43425 Mdot 0 .719 1 r .2332 .41911 Mdot 0 .655 1 r .22563 .3964 Mdot 0 .615 1 r .22185 .38127 Mdot 0 .556 1 r .21807 .35856 Mdot 0 .521 1 r .21428 .34342 Mdot 0 .464 1 r .20293 .31315 Mdot 0 .306 1 r .15373 .19205 Mdot 0 .268 1 r .17644 .18827 Mdot .336 0 1 r .45648 .24882 Mdot .364 0 1 r .46783 .2753 Mdot .966 0 1 r .58515 .33964 Mdot 1 0 .945 r .60028 .34721 Mdot 1 0 .776 r .62677 .36613 Mdot 1 0 .653 r .64569 .38127 Mdot 1 0 .552 r .66462 .39262 Mdot 1 0 .484 r .67975 .40019 Mdot 1 .188 0 r .81599 .56291 Mdot 1 .341 0 r .83113 .62346 Mdot 1 .384 0 r .83491 .64238 Mdot 1 .556 0 r .85383 .73321 Mdot 1 .584 0 r .85383 .74834 Mdot 1 .631 0 r .8387 .76348 Mdot .879 1 0 r .62299 .79376 Mdot .23 1 0 r .42999 .74078 Mdot .055 1 0 r .37322 .75213 Mdot 0 1 .283 r .27861 .70672 Mdot 0 1 .505 r .18401 .68023 Mdot 0 .907 1 r .17644 .4683 Mdot 0 .161 1 r .30132 .26017 Mdot 1 0 .867 r .68732 .26017 Mdot 1 0 .65 r .72138 .32072 Mdot 1 0 .342 r .82734 .37748 Mdot 1 0 .296 r .83491 .39262 Mdot 1 0 .249 r .84627 .40776 Mdot 1 0 .156 r .85383 .44181 Mdot 1 0 .116 r .85383 .45695 Mdot 1 0 .045 r .85383 .48344 Mdot 1 .664 0 r .81599 .76348 Mdot 1 .696 0 r .81221 .77862 Mdot 1 .739 0 r .80464 .79754 Mdot 1 .78 0 r .80085 .82025 Mdot 1 .802 0 r .80085 .83539 Mdot .815 1 0 r .63056 .8808 Mdot % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 288}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgOooool2o`1fonGooooo000iooooo`;o07KoiOooool008cooooo0_mc0?m0ooooo`;o o`2VD?ooool008cooooo0_mc0?m0ooooo`;oo`2VD?ooool004oooooo0_l0G_o?ooooo`00Coooool2 o`1Noloooooo003oooooob7ooooo001Iooooo`;o053oaOooool005Wooooo0_l0D?m_ooool2ool0aV_ooooo001gooooo`;o00SoYoooool00>cooooo0_oo05Lbooooo`00k?oo ool2ool0Ec;ooooo000oooooo`;o09goMoooool2ool0YfKooooo000oooooo`;o09goMoooool2ool0 YfKooooo003oooooob7ooooo002nooooo`;oo`2=;_ooool2ool0Bc3ooooo0010ooooo`;o0:OoO?oo ool2ool0SBkooooo0_oo04/`ooooo`00@?ooool2o`2Woh3ooooo0_oo07]Looooo`00N?ooool2o`0V oakooooo0_o?0?lXooooo`;oo`1kG?ooool007Sooooo0_l09_lNooooo`;oc`3oF?ooool2ool0?bco oooo003booooo`;oo`0o;?ooool00?oooooo8Oooool004;ooooo0_l0^?mEooooo`;oiP3o8?ooool2 ool0M6?ooooo0012ooooo`;o0;So??ooool2o`0?oaOooooo0_oV0?lPooooo`;oo`1dHoooool0083o oooo0_l03onNooooo`00Hoooool2o`2@o`?ooooo0_l0QOm4ooooo`;oo`2>L?ooool006?ooooo0_l0 T?l3ooooo`;o08GoA?ooool2ool0SW3ooooo001Jooooo`;o0:_o6Oooool2o`1TojWooooo001Joooo o`;o0:_o5Oooool2o`1lo`;ooooo0_l0I?nYooooo`00LOooool2o`1loboooooo0_oo0:U@ooooo`;o o`0W:_ooool004Cooooo0_l0cOmLooooo`;oo`2YD?ooool2ool09b[ooooo0014ooooo`;o0Sok?ooool00?oo oooo8Oooool00?oooooo8Oooool00?Cooooo0_oo00/Zooooo`00m?ooool2ool02b[ooooo003ooooo ob7ooooo003oooooob7ooooo002[ooooo`;oo`03Loooool00:_ooooo0_oo00=cooooo`00oooooolQ ooooo`00IOooool2o`3okkWooooo001Uooooo`;o0?o_^Oooool00?oooooo8Oooool00?oooooo8Ooo ool00?oooooo8Oooool00?oooooo8Oooool00;Kooooo0_oo02[ooooo001jooooo`;o>_l0 Y?ooool007[ooooo0_ljo`2Tooooo`00m?ooool2oonE02[ooooo001Zooooo`;o3_l0R?ooool2oonE 02[ooooo001Zooooo`;o3_l0]?ooool00?oooooo8Oooool00>Wooooo0_ooZ@05ooooo`;ooj40;_oo ool00>Wooooo0_ooZ@05ooooo`;ooj40;_ooool00?oooooo8Oooool00?oooooo8Oooool00?oooooo 8Oooool00>Sooooo0_oo/P0fooooo`00j?ooool2oonb03Kooooo003oooooob7ooooo003oooooob7o oooo002booooo`;ohOl0K?ooool00;;ooooo0_oQo`0booooo`;ookd0>?ooool00>Kooooo0_oo_@0h ooooo`00^Oooool2onoo06Gooooo002iooooo`;okol0IOooool00?oooooo8Oooool00?oooooo8Ooo ool00?oooooo8Oooool00>Gooooo0_ooa`0iooooo`00iOooool2ooo703Wooooo003oooooob7ooooo 003oooooob7ooooo003Uooooo`;oold0>Oooool00>Gooooo0_ooc@0iooooo`00oooooolQooooo`00 oooooolQooooo`00oooooolQooooo`00oooooolQooooo`00oooooolQooooo`00oooooolQooooo`00 oooooolQooooo`00oooooolQooooo`00oooooolQooooo`00oooooolQooooo`00oooooolQooooo`00 ]?ooool2om3o06[ooooo002dooooo`;od?l0J_ooool00?oooooo8Oooool00?oooooo8Oooool00?oo oooo8Oooool00?oooooo8Oooool00?oooooo8Oooool00?oooooo8Oooool00?oooooo8Oooool00?oo oooo8Oooool00?oooooo8Oooool00?oooooo8Oooool00?oooooo8Oooool00?oooooo8Oooool00?oo oooo8Oooool00?oooooo8Oooool00?oooooo8Oooool00?oooooo8Oooool00?oooooo8Oooool00?oo oooo8Oooool00?oooooo8Oooool00?oooooo8Oooool00?oooooo8Oooool00?oooooo8Oooool00?oo oooo8Oooool00?oooooo8Oooool00?oooooo8Oooool00?oooooo8Oooool00?oooooo8Oooool00?oo oooo8Oooool00?oooooo8Oooool00?oooooo8Oooool00?oooooo8Oooool00?oooooo8Oooool00?oo oooo8Oooool00001\ \>"], ImageRangeCache->{{{0, 287}, {287, 0}} -> {-2.00002, -2.00002, 0.0139374, \ 0.0139374}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Closed]], Cell[CellGroupData[{ Cell["Coloring values according to directions (optional)", "Subsubsection"], Cell[CellGroupData[{ Cell[BoxData[ \(Take[ Table[StyleBox[ToBoxes[d[pts[\([i]\)]]], Background \[Rule] \(Map[ArgColor, comp]\)[\([i]\)]], {i, Length[pts]}], Floor[Length[pts]/2]] // DisplayForm\)], "Input"], Cell[BoxData[ TagBox[ RowBox[{"{", RowBox[{ StyleBox["0.9474351933646966`", Background->RGBColor[0, 1, 0.821607]], ",", StyleBox["0.7223865560549974`", Background->RGBColor[0, 1, 0.5953]], ",", StyleBox["0.7097455284593204`", Background->RGBColor[0, 1, 0.495735]], ",", StyleBox["0.37075072709301593`", Background->RGBColor[0.0332494, 1, 0]], ",", StyleBox["1.05949718457625`", Background->RGBColor[1, 0, 0]], ",", StyleBox["0.5841455865999589`", Background->RGBColor[0, 1, 0.934997]], ",", StyleBox["0.5053245685299697`", Background->RGBColor[0, 1, 0.534874]], ",", StyleBox["0.5379327705401484`", Background->RGBColor[0.185306, 1, 0]], ",", StyleBox["0.5807415660980364`", Background->RGBColor[0.312093, 1, 0]], ",", StyleBox["0.8262776701115673`", Background->RGBColor[0.756741, 1, 0]], ",", StyleBox["0.9460894465493207`", Background->RGBColor[0.952148, 1, 0]], ",", StyleBox["1.0730997777616023`", Background->RGBColor[1, 0.79884, 0]], ",", StyleBox["0.5430154472075357`", Background->RGBColor[0.839872, 1, 0]], ",", StyleBox["0.9315671416022573`", Background->RGBColor[1, 0.950332, 0]], ",", StyleBox["1.35903544348777`", Background->RGBColor[0.935012, 1, 0]], ",", StyleBox["1.2363800402788778`", Background->RGBColor[1, 0.430991, 0]], ",", StyleBox["0.9690605661092602`", Background->RGBColor[1, 0.360937, 0]], ",", StyleBox["0.5942409881293952`", Background->RGBColor[0.968582, 1, 0]], ",", StyleBox["0.5720900221057872`", Background->RGBColor[1, 0.644816, 0]], ",", StyleBox["0.5644302641354377`", Background->RGBColor[1, 0.196658, 0]], ",", StyleBox["0.5342479275701498`", Background->RGBColor[1, 0, 0]], ",", StyleBox["0.7066249987348311`", Background->RGBColor[1, 0, 0]], ",", StyleBox["0.40117125405704546`", Background->RGBColor[1, 0, 0]], ",", StyleBox["0.3641254174772753`", Background->RGBColor[1, 0, 0]], ",", StyleBox["0.35407984066450326`", Background->RGBColor[1, 0, 0]], ",", StyleBox["0.40508946111445554`", Background->RGBColor[1, 0, 0]], ",", StyleBox["0.7181341869152033`", Background->RGBColor[1, 0, 0]], ",", StyleBox["0.6137497241400602`", Background->RGBColor[1, 0, 0]], ",", StyleBox["0.4938057076512988`", Background->RGBColor[1, 0, 0]], ",", StyleBox["0.8894968649124065`", Background->RGBColor[1, 0, 0]], ",", StyleBox["0.9962745469924442`", Background->RGBColor[1, 0, 0]], ",", StyleBox["1.1206958217647642`", Background->RGBColor[1, 0, 0]], ",", StyleBox["1.1094962838784093`", Background->RGBColor[1, 0, 0]], ",", StyleBox["0.5120307446443035`", Background->RGBColor[1, 0, 0]], ",", StyleBox["0.3699890084340344`", Background->RGBColor[1, 0, 0]], ",", StyleBox["0.4424077542776573`", Background->RGBColor[1, 0, 0]], ",", StyleBox["0.4844956454799156`", Background->RGBColor[1, 0, 0]], ",", StyleBox["0.6122087970521168`", Background->RGBColor[1, 0, 0]], ",", StyleBox["0.6659892476797205`", Background->RGBColor[1, 0, 0]], ",", StyleBox["0.7798584013639912`", Background->RGBColor[1, 0, 0]], ",", StyleBox["1.115163419618847`", Background->RGBColor[1, 0, 0]]}], "}"}], DisplayForm]], "Output"] }, Closed]] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Correcting the mean", "Section"], Cell["\<\ For statistical purposes it is often convenient to have a drawing \ that is balanced with respect to the origin. One can hope approximation is better if the initial data do not protrude more \ in some directions. \ \>", "Text"], Cell[CellGroupData[{ Cell[BoxData[ \(Length[pts]\)], "Input"], Cell[BoxData[ \(83\)], "Output"] }, Closed]], Cell[BoxData[ \(mean[pts_] := Plus @@ pts/Length[pts]\)], "Input"], Cell[CellGroupData[{ Cell[BoxData[ \(mean[pts]\)], "Input"], Cell[BoxData[ \({0.11644037831325298`, 0.035352237951807274`}\)], "Output"] }, Closed]], Cell[BoxData[ \(\(pts - Table[mean[pts], {Length[pts]}];\)\)], "Input"], Cell["Take these as new points", "Text"], Cell[BoxData[ \(\(pts = %;\)\)], "Input"] }, Closed]], Cell[CellGroupData[{ Cell["High order shape", "Section"], Cell[BoxData[ \(d[{a_, b_}] := Sqrt[a\^2 + b\^2]\)], "Input", AnimationDisplayTime->6.65416], Cell[BoxData[ \(angle[{a_, b_}] := If[a \[GreaterEqual] 0, t /. First[NSolve[Tan[t] \[Equal] b/a, {t}]], If[b \[GreaterEqual] 0, \[Pi] - t /. First[NSolve[Tan[t] \[Equal] \(-b\)/a, {t}]], \(-\[Pi]\) + t /. First[NSolve[Tan[t] \[Equal] b/a, {t}]]]]\)], "Input", AnimationDisplayTime->6.65416], Cell[BoxData[ \(\(Map[d, pts];\)\)], "Input", AnimationDisplayTime->6.65416], Cell[BoxData[ \(\(angles = Flatten[Map[angle, pts]];\)\)], "Input", AnimationDisplayTime->6.65416], Cell[BoxData[ \(\(comp = Map[d, pts]\ \[ExponentialE]\^\(\[ImaginaryI]\ angles\);\)\)], "Input",\ AnimationDisplayTime->6.65416], Cell[CellGroupData[{ Cell[BoxData[ \(Show[ Graphics[Transpose[{Map[ArgColor, comp], Map[Point, Map[coords, comp]]}], PlotRange \[Rule] {{\(-2\), 2}, {\(-2\), 2}}, AspectRatio \[Rule] Automatic]]\)], "Input", AnimationDisplayTime->6.65416], 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.25 0.5 0.25 [ [ 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 1 .873 r .008 w .23815 .53515 Mdot 0 1 .689 r .30627 .56543 Mdot 0 1 .603 r .31762 .58056 Mdot 0 1 .248 r .42737 .573 Mdot 0 .794 1 r .21166 .43676 Mdot 0 1 .994 r .32519 .50109 Mdot 0 1 .672 r .35925 .55029 Mdot 0 1 .025 r .42737 .61841 Mdot .112 1 0 r .44251 .63355 Mdot .628 1 0 r .52576 .69031 Mdot .855 1 0 r .57874 .70166 Mdot 1 .861 0 r .65064 .69031 Mdot .646 1 0 r .51819 .61841 Mdot .961 1 0 r .59766 .68653 Mdot .869 1 0 r .62037 .79627 Mdot 1 .447 0 r .74903 .62598 Mdot 1 .372 0 r .69606 .58056 Mdot .808 1 0 r .5409 .62219 Mdot 1 .739 0 r .58253 .58056 Mdot 1 .173 0 r .60902 .52002 Mdot 1 0 .748 r .58253 .41784 Mdot 1 0 .584 r .62794 .41027 Mdot 1 0 .137 r .57117 .48974 Mdot 1 0 .977 r .5409 .43298 Mdot .573 0 1 r .50684 .41027 Mdot .528 0 1 r .50305 .39513 Mdot .307 0 1 r .46143 .31188 Mdot 0 .142 1 r .38953 .36107 Mdot 0 .258 1 r .39331 .39513 Mdot 0 .367 1 r .30249 .34594 Mdot 0 .356 1 r .28356 .32702 Mdot 0 .404 1 r .2495 .31945 Mdot 0 .456 1 r .24194 .33458 Mdot 0 .729 1 r .3479 .45568 Mdot 0 .217 1 r .4198 .41405 Mdot 0 .462 1 r .38196 .42541 Mdot 0 .533 1 r .36682 .42919 Mdot 0 .555 1 r .33654 .41784 Mdot 0 .588 1 r .32141 .41784 Mdot 0 .678 1 r .28735 .42541 Mdot 0 .719 1 r .20409 .41027 Mdot 0 .661 1 r .19652 .38756 Mdot 0 .624 1 r .19274 .37243 Mdot 0 .57 1 r .18895 .34972 Mdot 0 .538 1 r .18517 .33458 Mdot 0 .484 1 r .17382 .30431 Mdot 0 .331 1 r .12462 .18321 Mdot 0 .295 1 r .14733 .17943 Mdot .24 0 1 r .42737 .23998 Mdot .255 0 1 r .43872 .26647 Mdot .805 0 1 r .55604 .3308 Mdot .896 0 1 r .57117 .33837 Mdot 1 0 .927 r .59766 .35729 Mdot 1 0 .793 r .61658 .37243 Mdot 1 0 .677 r .63551 .38378 Mdot 1 0 .597 r .65064 .39135 Mdot 1 .178 0 r .78688 .55407 Mdot 1 .346 0 r .80202 .61462 Mdot 1 .393 0 r .8058 .63355 Mdot 1 .577 0 r .82472 .72437 Mdot 1 .607 0 r .82472 .73951 Mdot 1 .657 0 r .80958 .75464 Mdot .804 1 0 r .59388 .78492 Mdot .114 1 0 r .40088 .73194 Mdot 0 1 .044 r .34411 .74329 Mdot 0 1 .362 r .2495 .69788 Mdot 0 1 .56 r .1549 .67139 Mdot 0 .891 1 r .14733 .45947 Mdot 0 .208 1 r .27221 .25133 Mdot 1 0 .959 r .65821 .25133 Mdot 1 0 .74 r .69227 .31188 Mdot 1 0 .396 r .79823 .36864 Mdot 1 0 .347 r .8058 .38378 Mdot 1 0 .295 r .81715 .39892 Mdot 1 0 .194 r .82472 .43298 Mdot 1 0 .151 r .82472 .44811 Mdot 1 0 .075 r .82472 .4746 Mdot 1 .693 0 r .78688 .75464 Mdot 1 .727 0 r .78309 .76978 Mdot 1 .772 0 r .77553 .7887 Mdot 1 .815 0 r .77174 .81141 Mdot 1 .837 0 r .77174 .82655 Mdot .754 1 0 r .60145 .87196 Mdot % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 288}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHg0?m1ooooo`;oo`2mF?ooool008?ooooo0_m>0?m1oooo o`;oo`2mF?ooool004Kooooo0_l0IooHooooo`00A_ooool2o`1WomSooooo001@ooooo`;o05_oc_oo ool0053ooooo0_l0Fomooooo`;o07CoF?ooool2olh0 oh3ooooo000dooooo`;o08Wo3_ooool2o`1doegooooo0_oU0?mkooooo`00Xoooool2onD0og_ooooo 001Fooooo`;o05gob?ooool003Gooooo0_l0TOlOooooo`;o05gob?ooool003Gooooo0_l0TOoYoooo o`00oooooolQooooo`00Z_ooool2ool0kGCooooo001_ooooo`;o02Co>Oooool2ool0kGCooooo001_ ooooo`;o02Co[oooool00>Cooooo0_oo06Djooooo`00=_ooool2o`2OogSooooo0_oo0_ooool003Kooooo0_l0Womhooooo`;oo`3;K_ooool00?oooooo8Oooool00;Gooooo0_oo0:d_ ooooo`;oo`1H>?ooool003Oooooo0_l0ZOmlooooo`;oo`2];oooool2ool0F3Sooooo000gooooo`;o 0:WoPOooool2ool0V6Cooooo002jooooo`;oo`2HI?ooool0073ooooo0_l0@_lMooooo`;oQ`3oSooo ool0073ooooo0_l0@_lMooooo`;oQ`3oF?ooool2ool0BcGooooo003Yooooo`;oo`1;=Oooool00?oo oooo8Oooool003Wooooo0_l0^?mEooooo`;oTP3o8Oooool2ool0UF_ooooo000iooooo`;o0;So??oo ool2o`0goaOooooo0_nB0?lQooooo`;oo`2EJoooool005_ooooo0_l0U_l2ooooo`;o08ko5_ooool2 o`0gobgooooo0_oo0;mhooooo`00Foooool2o`2Fo`;ooooo0_l0S_m5ooooo`;oo`2oN?ooool0057o oooo0_l0[OlIooooo`;o07Ko/_ooool0057ooooo0_l0[OlEooooo`;o08So0_ooool2o`1fok;ooooo 001Xooooo`;o08Socooooo0_oo01o`0jooooo`;oog80B?ooool00=Kooooo0_ooLP18ooooo`00O_ooool2oaco06Ko oooo0_ooI00hooooo`00O_ooool2oaco06Kooooo0_ooI00hooooo`00oooooolQooooo`00oooooolQ ooooo`00oooooolQooooo`00oooooolQooooo`00oooooolQooooo`00oooooolQooooo`00oooooolQ ooooo`00oooooolQooooo`00oooooolQooooo`00:oooool2o`3oSo?ooooo000[ooooo`;o0?n?looo ool00?oooooo8Oooool00?oooooo8Oooool00:[ooooo0_ofo`1dooooo`00U_ooool2oj3o01;ooooo 0_ofo`0>ooooo`;oom`0I?ooool009Kooooo0_nPo`0Rooooo`;oom`0I?ooool004Kooooo0_l0oecH ooooo`00A_ooool2o`3oG5gooooo0_oJo`1iooooo`00YOooool2om[o07Wooooo003oooooob7ooooo 003oooooob7ooooo003oooooob7ooooo003oooooob7ooooo003oooooob7ooooo003/ooooo`;ooi<0 <_ooool00>cooooo0_ooT`0booooo`00L_ooool2oago0:cooooo001booooo`;o7Ol0[?ooool00>co oooo0_ooV`0booooo`00H_ooool2o`3o2hSooooo0_ooV`0booooo`00H_ooool2o`3o2kcooooo003o ooooob7ooooo003oooooob7ooooo003Qooooo`;ook401?ooool2oonX03Oooooo003Qooooo`;ook40 1?ooool2oonX03Oooooo003oooooob7ooooo003oooooob7ooooo003Pooooo`;ookX0?_ooool00>3o oooo0_oo^P0nooooo`00oooooolQooooo`00oooooolQooooo`00ZOooool2olgo07Gooooo002Yoooo o`;ocOl0<_ooool2ooo5047ooooo003Mooooo`;oolD0@Oooool00?oooooo8Oooool00;7ooooo0_oN o`1]ooooo`00/Oooool2omko06gooooo003oooooob7ooooo003oooooob7ooooo003Looooo`;oom00 @_ooool00=cooooo0_ood012ooooo`00oooooolQooooo`00oooooolQooooo`00g?ooool2oooF04;o oooo003Looooo`;oomH0@_ooool00?oooooo8Oooool00?oooooo8Oooool00?oooooo8Oooool00?oo oooo8Oooool00?oooooo8Oooool00?oooooo8Oooool00?oooooo8Oooool00?oooooo8Oooool00?oo oooo8Oooool00?oooooo8Oooool00?oooooo8Oooool00:_ooooo0_o1o`1cooooo`00Zoooool2ol7o 07?ooooo003oooooob7ooooo003oooooob7ooooo003oooooob7ooooo003oooooob7ooooo003ooooo ob7ooooo003oooooob7ooooo003oooooob7ooooo003oooooob7ooooo003oooooob7ooooo003ooooo ob7ooooo003oooooob7ooooo003oooooob7ooooo003oooooob7ooooo003oooooob7ooooo003ooooo ob7ooooo003oooooob7ooooo003oooooob7ooooo003oooooob7ooooo003oooooob7ooooo003ooooo ob7ooooo003oooooob7ooooo003oooooob7ooooo003oooooob7ooooo003oooooob7ooooo003ooooo ob7ooooo003oooooob7ooooo003oooooob7ooooo003oooooob7ooooo003oooooob7ooooo003ooooo ob7ooooo003oooooob7ooooo003oooooob7ooooo003oooooob7ooooo003oooooob7ooooo003ooooo ob7ooooo003oooooob7ooooo0000\ \>"], ImageRangeCache->{{{0, 287}, {287, 0}} -> {-2.00002, -2.00002, 0.0139374, \ 0.0139374}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Closed]], Cell[CellGroupData[{ Cell["Polynomial approximation", "Subsection"], Cell[CellGroupData[{ Cell[BoxData[ \(standard = Flatten[{Cos[Range[0, 6]\ x], Sin[Range[6]\ x]}]\)], "Input"], Cell[BoxData[ \({1, Cos[x], Cos[2\ x], Cos[3\ x], Cos[4\ x], Cos[5\ x], Cos[6\ x], Sin[x], Sin[2\ x], Sin[3\ x], Sin[4\ x], Sin[5\ x], Sin[6\ x]}\)], "Output"] }, Closed]], Cell[CellGroupData[{ Cell[BoxData[ \(f[x_] = Fit[Transpose[{Flatten[Map[angle, pts]], Map[d, pts]}], standard, x]\)], "Input"], Cell[BoxData[ \(\(\(0.94570890080903`\)\(\[InvisibleSpace]\)\) + 0.04260992726095394`\ Cos[x] + 0.16170788057358645`\ Cos[2\ x] - 0.006790962679380697`\ Cos[3\ x] - 0.10261904692363763`\ Cos[4\ x] - 0.025050205828141464`\ Cos[5\ x] - 0.022952092911329505`\ Cos[6\ x] + 0.07974461722132636`\ Sin[x] + 0.17077332520259644`\ Sin[2\ x] + 0.0024645361323843147`\ Sin[3\ x] - 0.04678829610548248`\ Sin[4\ x] - 0.06269364314228769`\ Sin[5\ x] - 0.05535794961166847`\ Sin[6\ x]\)], "Output"] }, Closed]], Cell[CellGroupData[{ Cell[BoxData[ \(ListPlot[Transpose[{Flatten[Map[angle, pts]], Map[d, pts]}], PlotRange \[Rule] {0, 2}]\)], "Input"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .61803 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.491641 0.154545 0 0.309017 [ [.02801 -0.0125 -6 -9 ] [.02801 -0.0125 6 0 ] [.18255 -0.0125 -6 -9 ] [.18255 -0.0125 6 0 ] [.3371 -0.0125 -6 -9 ] [.3371 -0.0125 6 0 ] [.64619 -0.0125 -3 -9 ] [.64619 -0.0125 3 0 ] [.80073 -0.0125 -3 -9 ] [.80073 -0.0125 3 0 ] [.95528 -0.0125 -3 -9 ] [.95528 -0.0125 3 0 ] [.47914 .07725 -24 -4.5 ] [.47914 .07725 0 4.5 ] [.47914 .15451 -18 -4.5 ] [.47914 .15451 0 4.5 ] [.47914 .23176 -24 -4.5 ] [.47914 .23176 0 4.5 ] [.47914 .30902 -6 -4.5 ] [.47914 .30902 0 4.5 ] [.47914 .38627 -24 -4.5 ] [.47914 .38627 0 4.5 ] [.47914 .46353 -18 -4.5 ] [.47914 .46353 0 4.5 ] [.47914 .54078 -24 -4.5 ] [.47914 .54078 0 4.5 ] [.47914 .61803 -6 -4.5 ] [.47914 .61803 0 4.5 ] [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash .02801 0 m .02801 .00625 L s [(-3)] .02801 -0.0125 0 1 Mshowa .18255 0 m .18255 .00625 L s [(-2)] .18255 -0.0125 0 1 Mshowa .3371 0 m .3371 .00625 L s [(-1)] .3371 -0.0125 0 1 Mshowa .64619 0 m .64619 .00625 L s [(1)] .64619 -0.0125 0 1 Mshowa .80073 0 m .80073 .00625 L s [(2)] .80073 -0.0125 0 1 Mshowa .95528 0 m .95528 .00625 L s [(3)] .95528 -0.0125 0 1 Mshowa .125 Mabswid .05892 0 m .05892 .00375 L s .08983 0 m .08983 .00375 L s .12073 0 m .12073 .00375 L s .15164 0 m .15164 .00375 L s .21346 0 m .21346 .00375 L s .24437 0 m .24437 .00375 L s .27528 0 m .27528 .00375 L s .30619 0 m .30619 .00375 L s .36801 0 m .36801 .00375 L s .39891 0 m .39891 .00375 L s .42982 0 m .42982 .00375 L s .46073 0 m .46073 .00375 L s .52255 0 m .52255 .00375 L s .55346 0 m .55346 .00375 L s .58437 0 m .58437 .00375 L s .61528 0 m .61528 .00375 L s .6771 0 m .6771 .00375 L s .708 0 m .708 .00375 L s .73891 0 m .73891 .00375 L s .76982 0 m .76982 .00375 L s .83164 0 m .83164 .00375 L s .86255 0 m .86255 .00375 L s .89346 0 m .89346 .00375 L s .92437 0 m .92437 .00375 L s .98618 0 m .98618 .00375 L s .25 Mabswid 0 0 m 1 0 L s .49164 .07725 m .49789 .07725 L s [(0.25)] .47914 .07725 1 0 Mshowa .49164 .15451 m .49789 .15451 L s [(0.5)] .47914 .15451 1 0 Mshowa .49164 .23176 m .49789 .23176 L s [(0.75)] .47914 .23176 1 0 Mshowa .49164 .30902 m .49789 .30902 L s [(1)] .47914 .30902 1 0 Mshowa .49164 .38627 m .49789 .38627 L s [(1.25)] .47914 .38627 1 0 Mshowa .49164 .46353 m .49789 .46353 L s [(1.5)] .47914 .46353 1 0 Mshowa .49164 .54078 m .49789 .54078 L s [(1.75)] .47914 .54078 1 0 Mshowa .49164 .61803 m .49789 .61803 L s [(2)] .47914 .61803 1 0 Mshowa .125 Mabswid .49164 .01545 m .49539 .01545 L s .49164 .0309 m .49539 .0309 L s .49164 .04635 m .49539 .04635 L s .49164 .0618 m .49539 .0618 L s .49164 .09271 m .49539 .09271 L s .49164 .10816 m .49539 .10816 L s .49164 .12361 m .49539 .12361 L s .49164 .13906 m .49539 .13906 L s .49164 .16996 m .49539 .16996 L s .49164 .18541 m .49539 .18541 L s .49164 .20086 m .49539 .20086 L s .49164 .21631 m .49539 .21631 L s .49164 .24721 m .49539 .24721 L s .49164 .26266 m .49539 .26266 L s .49164 .27812 m .49539 .27812 L s .49164 .29357 m .49539 .29357 L s .49164 .32447 m .49539 .32447 L s .49164 .33992 m .49539 .33992 L s .49164 .35537 m .49539 .35537 L s .49164 .37082 m .49539 .37082 L s .49164 .40172 m .49539 .40172 L s .49164 .41717 m .49539 .41717 L s .49164 .43262 m .49539 .43262 L s .49164 .44807 m .49539 .44807 L s .49164 .47898 m .49539 .47898 L s .49164 .49443 m .49539 .49443 L s .49164 .50988 m .49539 .50988 L s .49164 .52533 m .49539 .52533 L s .49164 .55623 m .49539 .55623 L s .49164 .57168 m .49539 .57168 L s .49164 .58713 m .49539 .58713 L s .49164 .60258 m .49539 .60258 L s .25 Mabswid .49164 0 m .49164 .61803 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath .008 w .95653 .32657 Mdot .92682 .25275 Mdot .91287 .24645 Mdot .85539 .12728 Mdot .03949 .36488 Mdot .97619 .21608 Mdot .92412 .18475 Mdot .81943 .1717 Mdot .79723 .17972 Mdot .71361 .23738 Mdot .67687 .2676 Mdot .63092 .30001 Mdot .71084 .14808 Mdot .65986 .26025 Mdot .67476 .39528 Mdot .56402 .34497 Mdot .5519 .262 Mdot .68448 .15927 Mdot .61116 .14256 Mdot .5197 .137 Mdot .3706 .14394 Mdot .39712 .19316 Mdot .46952 .08888 Mdot .33356 .09705 Mdot .26064 .11123 Mdot .25338 .12968 Mdot .21763 .23737 Mdot .14506 .2194 Mdot .12617 .18491 Mdot .1085 .30963 Mdot .11033 .34248 Mdot .10264 .38168 Mdot .09422 .37889 Mdot .04994 .19583 Mdot .13285 .1453 Mdot .09322 .1726 Mdot .08164 .18644 Mdot .07811 .22613 Mdot .07276 .24299 Mdot .05826 .27855 Mdot .05163 .38221 Mdot .06096 .40003 Mdot .06694 .41123 Mdot .07568 .42699 Mdot .08089 .43959 Mdot .08964 .47018 Mdot .11445 .60714 Mdot .12014 .58911 Mdot .20679 .33371 Mdot .20923 .29844 Mdot .29831 .22031 Mdot .31299 .2183 Mdot .34163 .21375 Mdot .36331 .21362 Mdot .38208 .22066 Mdot .39507 .22958 Mdot .52043 .36085 Mdot .5477 .3993 Mdot .55527 .41246 Mdot .58508 .48787 Mdot .58985 .49875 Mdot .59802 .49549 Mdot .68521 .3708 Mdot .79682 .31177 Mdot .82247 .35716 Mdot .87383 .39458 Mdot .90592 .47628 Mdot .02381 .4388 Mdot .13427 .41684 Mdot .33645 .36431 Mdot .37195 .3325 Mdot .42752 .40281 Mdot .43551 .40437 Mdot .44396 .41145 Mdot .46018 .40984 Mdot .46715 .40647 Mdot .47958 .4026 Mdot .60383 .47415 Mdot .6093 .48337 Mdot .61663 .49329 Mdot .62352 .51087 Mdot .62714 .52511 Mdot .69325 .47656 Mdot % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 177.938}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgooooo`;o00000_ooool2o`0000Oooooo00?o0000ooooooooool0 3Oooool2o`00087ooooo000`ooooo`;o0000Foooool2o`00097ooooo002=ooooo`03o`000?oooooo oooo093ooooo000Qooooo`;o0000J_ooool00ol0003oooooooooo`2@ooooo`008Oooool2o`0006[o oooo00?o0000ooooooooool0T?ooool008gooooo0_l0002Aooooo`004oooool2o`0000gooooo0_l0 001Yooooo`03o`000?oooooooooo093ooooo000Cooooo`;o00003Oooool2o`0006Wooooo00?o0000 ooooooooool0T?ooool008gooooo00?o0000ooooooooool0T?ooool008gooooo0_l0002Aooooo`00 NOooool3o`0000Cooooo00?o0000ooooooooool00_ooool3o`0000Gooooo00?o0000ooooooooool0 T?ooool007[ooooo00?o0000ooooooooool01oooool01Ol0003ooooooooooooooooo000000Cooooo 00?o0000ooooooooool0T?ooool007[ooooo00?o0000ooooooooool02oooool00ol0003ooooooooo o`02ooooo`03o`000?oooooooooo093ooooo001jooooo`03o`000?oooooooooo00_ooooo00?o0000 ooooooooool00_ooool2o`00097ooooo000Tooooo`;o0000E?ooool00ol0003oooooooooo`07oooo o`Co00001Oooool00ol0003oooooooooo`2@ooooo`009?ooool2o`0005?ooooo0_l00009ooooo`03 o`000?oooooooooo00Kooooo00?o0000ooooooooool06Oooool2o`0007Gooooo001jooooo`03o`00 0?oooooooooo00Oooooo1Ol00004ooooo`03o`000?oooooooooo01Wooooo0_l0000Fooooo`;o0000 =Oooool2o`0002Kooooo002=ooooo`;o0000<_ooool2o`0003Gooooo0_l0000Vooooo`00SOooool0 0ol0003oooooooooo`0Kooooo`;o0000Loooool008gooooo00?o0000ooooooooool05Oooool2o`00 00Cooooo0_l0001cooooo`00SOooool00ol0003oooooooooo`0Eooooo`;o00001_ooool2o`00077o oooo002=ooooo`;o00006Oooool2o`0000?ooooo0_l0001aooooo`00SOooool00ol0003ooooooooo o`0Fooooo`Co0000M_ooool008gooooo00?o0000ooooooooool05_ooool2o`0007Sooooo002=oooo o`03o`000?oooooooooo093ooooo002=ooooo`;o00008?ooool2o`0006oooooo002=ooooo`03o`00 0?oooooooooo01oooooo0_l0001_ooooo`00SOooool00ol0003oooooooooo`2@ooooo`00SOooool0 0ol0003oooooooooo`0Oooooo`;o0000Koooool008gooooo0_l0000Pooooo`;o0000Koooool007?o oooo0ol00004ooooo`03o`000?oooooooooo00?ooooo00?o0000ooooooooool00_ooool3o`0000Go oooo00?o0000ooooooooool0T?ooool007Cooooo00?o0000ooooooooool02Oooool01Ol0003ooooo oooooooooooo000000?ooooo00?o0000ooooooooool00_ooool00ol0003oooooooooo`2@ooooo`00 M?ooool00ol0003oooooooooo`0:ooooo`03o`000?oooooooooo00Cooooo00?o0000ooooooooool0 0_ooool00ol0003oooooooooo`2@ooooo`00M?ooool00ol0003oooooooooo`0:ooooo`03o`000?oo oooooooo00Cooooo00?o0000ooooooooool00_ooool2o`00097ooooo001dooooo`03o`000?oooooo oooo00_ooooo00?o0000ooooool000000ol00005ooooo`03o`000?oooooooooo093ooooo001coooo o`;o00002Oooool01ol0003ooooooooooooooooo0000ooooool000002?ooool00ol0003ooooooooo o`2@ooooo`00M?ooool00ol0003oooooooooo`07ooooo`Go000000?oooooo`000?l000000ol00004 ooooo`03o`000?oooooooooo093ooooo002=ooooo`;o0000TOooool008gooooo00?o0000oooooooo ool0T?ooool008gooooo00?o0000ooooooooool0T?ooool008gooooo00?o0000ooooooooool0T?oo ool008gooooo0_l0002Aooooo`00SOooool00ol0003oooooooooo`2@ooooo`00SOooool00ol0003o ooooooooo`2@ooooo`00SOooool00ol0003oooooooooo`2@ooooo`00;?ooool2o`0005oooooo0_l0 002Aooooo`00;?ooool2o`0005oooooo00?o0000ooooooooool0T?ooool008gooooo00?o0000oooo ooooool0T?ooool008gooooo00?o0000ooooooooool0T?ooool008gooooo0_l0002Aooooo`00:ooo ool2o`0005Oooooo1Ol00004ooooo`03o`000?oooooooooo093ooooo000[ooooo`;o0000F?ooool0 1?l0003oooooooooool00004ooooo`03o`000?oooooooooo093ooooo0026ooooo`03o`000?oooooo oooo00Cooooo00?o0000ooooooooool0T?ooool008Oooooo00?o0000ooooooooool00oooool2o`00 097ooooo0024ooooo`05o`000?ooooooooooooooool00000Uoooool008Cooooo00Go0000oooooooo ooooooooo`00002Gooooo`00QOooool3o`0009Sooooo003oooooob7ooooo0000\ \>"], ImageRangeCache->{{{0, 287}, {176.938, 0}} -> {-3.52816, -0.152823, \ 0.0249634, 0.0124846}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Closed]], Cell["Remark: modify PlotRange to see more detail", "Text", FontWeight->"Bold"], Cell[CellGroupData[{ Cell[BoxData[ \(Show[{%, Plot[f[x], {x, \(-\[Pi]\), \[Pi]}]}, PlotRange \[Rule] {0.8, 1.5}]\)], "Input"], Cell[CellGroupData[{ Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .61803 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.151576 -0.39483 0.69777 [ [.04527 .29044 -6 -9 ] [.04527 .29044 6 0 ] [.19685 .29044 -6 -9 ] [.19685 .29044 6 0 ] [.34842 .29044 -6 -9 ] [.34842 .29044 6 0 ] [.65158 .29044 -3 -9 ] [.65158 .29044 3 0 ] [.80315 .29044 -3 -9 ] [.80315 .29044 3 0 ] [.95473 .29044 -3 -9 ] [.95473 .29044 3 0 ] [.4875 .02383 -18 -4.5 ] [.4875 .02383 0 4.5 ] [.4875 .16339 -18 -4.5 ] [.4875 .16339 0 4.5 ] [.4875 .44249 -18 -4.5 ] [.4875 .44249 0 4.5 ] [.4875 .58205 -18 -4.5 ] [.4875 .58205 0 4.5 ] [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash .04527 .30294 m .04527 .30919 L s [(-3)] .04527 .29044 0 1 Mshowa .19685 .30294 m .19685 .30919 L s [(-2)] .19685 .29044 0 1 Mshowa .34842 .30294 m .34842 .30919 L s [(-1)] .34842 .29044 0 1 Mshowa .65158 .30294 m .65158 .30919 L s [(1)] .65158 .29044 0 1 Mshowa .80315 .30294 m .80315 .30919 L s [(2)] .80315 .29044 0 1 Mshowa .95473 .30294 m .95473 .30919 L s [(3)] .95473 .29044 0 1 Mshowa .125 Mabswid .07559 .30294 m .07559 .30669 L s .1059 .30294 m .1059 .30669 L s .13622 .30294 m .13622 .30669 L s .16653 .30294 m .16653 .30669 L s .22716 .30294 m .22716 .30669 L s .25748 .30294 m .25748 .30669 L s .28779 .30294 m .28779 .30669 L s .31811 .30294 m .31811 .30669 L s .37874 .30294 m .37874 .30669 L s .40905 .30294 m .40905 .30669 L s .43937 .30294 m .43937 .30669 L s .46968 .30294 m .46968 .30669 L s .53032 .30294 m .53032 .30669 L s .56063 .30294 m .56063 .30669 L s .59095 .30294 m .59095 .30669 L s .62126 .30294 m .62126 .30669 L s .68189 .30294 m .68189 .30669 L s .71221 .30294 m .71221 .30669 L s .74252 .30294 m .74252 .30669 L s .77284 .30294 m .77284 .30669 L s .83347 .30294 m .83347 .30669 L s .86378 .30294 m .86378 .30669 L s .8941 .30294 m .8941 .30669 L s .92441 .30294 m .92441 .30669 L s .01496 .30294 m .01496 .30669 L s .98504 .30294 m .98504 .30669 L s .25 Mabswid 0 .30294 m 1 .30294 L s .5 .02383 m .50625 .02383 L s [(0.6)] .4875 .02383 1 0 Mshowa .5 .16339 m .50625 .16339 L s [(0.8)] .4875 .16339 1 0 Mshowa .5 .44249 m .50625 .44249 L s [(1.2)] .4875 .44249 1 0 Mshowa .5 .58205 m .50625 .58205 L s [(1.4)] .4875 .58205 1 0 Mshowa .125 Mabswid .5 .05872 m .50375 .05872 L s .5 .09361 m .50375 .09361 L s .5 .1285 m .50375 .1285 L s .5 .19827 m .50375 .19827 L s .5 .23316 m .50375 .23316 L s .5 .26805 m .50375 .26805 L s .5 .33783 m .50375 .33783 L s .5 .37272 m .50375 .37272 L s .5 .4076 m .50375 .4076 L s .5 .47738 m .50375 .47738 L s .5 .51227 m .50375 .51227 L s .5 .54716 m .50375 .54716 L s .5 .61694 m .50375 .61694 L s .25 Mabswid .5 0 m .5 .61803 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath .5 Mabswid .02381 .28276 m .02605 .28335 L .02846 .2842 L .03279 .28633 L .03543 .28804 L .03793 .28994 L .04262 .29429 L .05212 .30625 L .06244 .32349 L .0829 .36477 L .09409 .38608 L .09957 .39479 L .10458 .40134 L .10688 .40381 L .10938 .40609 L .11178 .40783 L .11395 .40902 L .11525 .40956 L .11648 .40993 L .11777 .4102 L .1185 .41028 L .11917 .41032 L .1203 .4103 L .12153 .41014 L .12282 .40984 L .12403 .40943 L .12536 .40882 L .1268 .40798 L .12943 .40597 L .13199 .40341 L .13436 .40053 L .13974 .39218 L .14545 .38068 L .16492 .32501 L .1832 .26061 L .20167 .19859 L .21214 .16902 L .22188 .14611 L .24192 .1115 L .26302 .08512 L .28176 .06169 L .30207 .03466 L .30746 .02822 L .31318 .02236 L .31805 .01845 L .32082 .01677 L .32342 .01563 L .32466 .01524 L .32532 .01507 L .32602 .01493 L Mistroke .3273 .01476 L .32849 .01472 L .32975 .01478 L .33093 .01496 L .33199 .01522 L .33313 .01561 L .33439 .01617 L .33578 .01694 L .33857 .01903 L .34116 .02162 L .34357 .02462 L .34859 .03277 L .35405 .04456 L .36396 .07378 L .37361 .11106 L .38253 .15161 L .40282 .25312 L .41275 .29968 L .42185 .33597 L .43072 .36313 L .43518 .37318 L .43769 .37769 L .44005 .3812 L .44263 .38417 L .44497 .3861 L .44628 .38688 L .44748 .38739 L .44812 .38758 L .44881 .38773 L .44953 .38783 L .45021 .38786 L .45143 .38776 L .45259 .3875 L .45363 .38713 L .45476 .38658 L .45599 .38581 L .4573 .3848 L .45965 .38253 L .46453 .37602 L .469 .3682 L .4791 .34602 L .49737 .30293 L .5021 .29406 L .5047 .28995 L .50715 .28664 L .50944 .28412 L .51065 .28303 L .51193 .28204 L .513 .28137 L .51419 .28078 L Mistroke .51526 .2804 L .51627 .28017 L .51755 .28008 L .51827 .28011 L .51894 .28021 L .52017 .28055 L .52148 .28113 L .52276 .28193 L .52397 .28289 L .52624 .28524 L .52892 .28895 L .53139 .29326 L .53696 .30608 L .54166 .32012 L .54671 .33817 L .5558 .37734 L .57647 .48224 L .58665 .53102 L .59202 .55325 L .59772 .57314 L .60269 .58677 L .60552 .59281 L .60818 .59728 L .60936 .59889 L .61061 .60031 L .61168 .60132 L .61283 .60218 L .61407 .60284 L .61523 .6032 L .61594 .6033 L .6166 .60332 L .61785 .60313 L .619 .6027 L .62024 .60197 L .62141 .60102 L .62248 .59993 L .6251 .59641 L .62758 .59193 L .63251 .57983 L .63788 .56206 L .64746 .51984 L .65633 .47114 L .67518 .3523 L .69554 .23083 L .70673 .17845 L .71163 .15984 L .717 .14267 L .72175 .13032 L .72683 .11997 L .72964 .11547 L Mistroke .73219 .1121 L .73457 .10957 L .73719 .10741 L .73839 .10663 L .73968 .10594 L .7408 .10546 L .74202 .10506 L .74273 .10488 L .74339 .10475 L .74469 .10459 L .74588 .10456 L .74714 .10464 L .74833 .10482 L .74962 .10511 L .75084 .10549 L .75196 .10592 L .75633 .10825 L .76114 .11186 L .76643 .11679 L .77711 .12857 L .81752 .17222 L .85642 .21273 L .87622 .23891 L .88666 .25285 L .89776 .26619 L .9076 .27572 L .91319 .2799 L .91845 .28292 L .92079 .28398 L .92326 .2849 L .92539 .28555 L .92766 .28609 L .92895 .28632 L .93012 .2865 L .9313 .28663 L .93241 .28673 L .9337 .2868 L .9349 .28683 L .93621 .28682 L .93687 .2868 L .9376 .28677 L .93884 .28669 L .93998 .28659 L .94258 .28628 L .94488 .28592 L .94732 .28547 L .9562 .2836 L .9588 .28308 L .9616 .28261 L .96289 .28243 L Mistroke .96425 .28226 L .96542 .28215 L .96669 .28206 L .96793 .28201 L .96906 .282 L .97037 .28202 L .97161 .28209 L .97275 .28219 L .9738 .28232 L .97496 .28251 L .97619 .28276 L Mfstroke % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 177.938}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgooooo`00Soooool00ol0003oooooooooo`2>ooooo`00Soooool00ol0003o ooooooooo`2>ooooo`00Soooool00ol0003oooooooooo`2>ooooo`00G?ooool5o`0001[ooooo0_l0 0004ooooo`03o`000?oooooooooo00;ooooo0ol00006ooooo`03o`000?oooooooooo08kooooo001K ooooo`03o`000?oooooooooo00?ooooo00?o0000ooooooooool05_ooool01?l0003oooooooooool0 0007ooooo`05o`000?ooooooooooooooool000001Oooool00ol0003oooooooooo`2>ooooo`00F_oo ool00ol0003oooooooooo`05ooooo`03o`000?oooooooooo01Gooooo00Co0000oooooooooooo0000 1oooool01Ol0003ooooooooooooooooo000000Gooooo0ol0002>ooooo`00FOooool00ol0003ooooo ooooo`06ooooo`03o`000?oooooooooo01Gooooo00Co0000oooooooooooo00001oooool4o`0000Ko oooo00?o0000ooooooooool0S_ooool005Oooooo0_l0000:ooooo`03o`000?oooooooooo01Cooooo 00Co0000oooooooooooo00001oooool00ol0003oooooooooo`07ooooo`03o`000?oooooooooo08ko oooo001Fooooo`03o`000?oooooooooo00_ooooo00?o0000ooooooooool04oooool01?l0003ooooo ooooool00008ooooo`03o`000?oooooooooo00Kooooo00?o0000ooooooooool0S_ooool005Kooooo 00?o0000ooooooooool02oooool00ol0003oooooooooo`0Dooooo`;o00002_ooool2o`0000Kooooo 00?o0000ooooooooool0S_ooool005Gooooo00?o0000ooooooooool03Oooool00ol0003ooooooooo o`0Wooooo`03o`000?oooooooooo08kooooo001Dooooo`03o`000?oooooooooo00kooooo00?o0000 ooooooooool09oooool00ol0003oooooooooo`2>ooooo`00E?ooool00ol0003oooooooooo`0>oooo o`03o`000?oooooooooo02Oooooo00?o0000ooooooooool0S_ooool005?ooooo00?o0000oooooooo ool04?ooool00ol0003oooooooooo`0Vooooo`03o`000?oooooooooo08kooooo001Cooooo`03o`00 0?oooooooooo013ooooo00?o0000ooooooooool09_ooool00ol0003oooooooooo`2>ooooo`00D_oo ool00ol0003oooooooooo`0Aooooo`03o`000?oooooooooo02Kooooo0_l0002?ooooo`00DOooool0 0ol0003oooooooooo`0Cooooo`03o`000?oooooooooo02Gooooo00?o0000ooooooooool0S_ooool0 057ooooo00?o0000ooooooooool04oooool00ol0003oooooooooo`0Uooooo`03o`000?oooooooooo 08kooooo001@ooooo`03o`000?oooooooooo01Cooooo00?o0000ooooooooool09Oooool00ol0003o ooooooooo`2>ooooo`00Coooool00ol0003oooooooooo`0Fooooo`03o`000?oooooooooo02Cooooo 00?o0000ooooooooool0S_ooool004kooooo00?o0000ooooooooool05oooool00ol0003ooooooooo o`0Tooooo`03o`000?oooooooooo08kooooo001=ooooo`03o`000?oooooooooo01Sooooo00?o0000 ooooooooool09?ooool00ol0003oooooooooo`2>ooooo`00C?ooool00ol0003oooooooooo`0Ioooo o`03o`000?oooooooooo02Cooooo00?o0000ooooooooool0S_ooool004_ooooo00?o0000oooooooo ool06oooool00ol0003oooooooooo`0Sooooo`03o`000?oooooooooo08kooooo001;ooooo`03o`00 0?oooooooooo01_ooooo00?o0000ooooooooool08oooool00ol0003oooooooooo`2>ooooo`00B_oo ool00ol0003oooooooooo`0Looooo`03o`000?oooooooooo02?ooooo0_l0002?ooooo`00BOooool0 0ol0003oooooooooo`0Nooooo`03o`000?oooooooooo02;ooooo00?o0000ooooooooool0S_ooool0 04Sooooo00?o0000ooooooooool07oooool00ol0003oooooooooo`0Rooooo`03o`000?oooooooooo 08kooooo0017ooooo`03o`000?oooooooooo023ooooo00?o0000ooooooooool08_ooool00ol0003o ooooooooo`13ooooo`03o`000?oooooooooo04Sooooo0016ooooo`03o`000?oooooooooo02;ooooo 00?o0000ooooooooool08Oooool00ol0003oooooooooo`11ooooo`Go0000B?ooool004Gooooo00?o 0000ooooooooool08oooool00ol0003oooooooooo`0Qooooo`03o`000?oooooooooo043ooooo00?o 0000ooooooooool00oooool2o`0004Kooooo0015ooooo`03o`000?oooooooooo02?ooooo00?o0000 ooooooooool08Oooool00ol0003oooooooooo`0oooooo`03o`000?oooooooooo00Kooooo00?o0000 ooooooooool0@oooool004Cooooo00?o0000ooooooooool09?ooool00ol0003oooooooooo`0Qoooo o`03o`000?oooooooooo03oooooo00?o0000ooooooooool01oooool00ol0003oooooooooo`12oooo o`00@oooool00ol0003oooooooooo`0Uooooo`03o`000?oooooooooo027ooooo00?o0000oooooooo ool0?_ooool00ol0003oooooooooo`09ooooo`03o`000?oooooooooo047ooooo0013ooooo`03o`00 0?oooooooooo02Kooooo00?o0000ooooooooool08?ooool00ol0003oooooooooo`0nooooo`03o`00 0?oooooooooo00[ooooo00?o0000ooooooooool0@?ooool004;ooooo00?o0000ooooooooool09ooo ool00ol0003oooooooooo`0Pooooo`;o0000?_ooool00ol0003oooooooooo`0oooool00ol0003o ooooooooo`0@ooooo`03o`000?oooooooooo03gooooo0010ooooo`03o`000?oooooooooo02Wooooo 00?o0000ooooooooool08?ooool00ol0003oooooooooo`0kooooo`03o`000?oooooooooo017ooooo 00?o0000ooooooooool0??ooool003oooooo00?o0000ooooooooool0:oooool00ol0003ooooooooo o`0Oooooo`03o`000?oooooooooo03_ooooo00?o0000ooooooooool04_ooool00ol0003ooooooooo o`0kooooo`00?oooool00ol0003oooooooooo`0[ooooo`03o`000?oooooooooo01oooooo00?o0000 ooooooooool0>oooool00ol0003oooooooooo`0Cooooo`03o`000?oooooooooo03[ooooo000ooooo o`03o`000?oooooooooo02_ooooo00?o0000ooooooooool07oooool00ol0003oooooooooo`0joooo o`03o`000?oooooooooo01Gooooo00?o0000ooooooooool0>Oooool003kooooo00?o0000oooooooo ool0;?ooool00ol0003oooooooooo`0;ooooo`;o00001?ooool00ol0003oooooooooo`02ooooo`?o 00001_ooool00ol0003oooooooooo`0jooooo`03o`000?oooooooooo01Kooooo00?o0000oooooooo ool0>?ooool003kooooo00?o0000ooooooooool0;?ooool00ol0003oooooooooo`0:ooooo`04o`00 0?ooooooooooo`0000Oooooo00Go0000ooooooooooooooooo`000005ooooo`03o`000?oooooooooo 03[ooooo00?o0000ooooooooool05oooool00ol0003oooooooooo`0gooooo`00?_ooool00ol0003o ooooooooo`0]ooooo`03o`000?oooooooooo00Wooooo00Co0000oooooooooooo00001oooool01Ol0 003ooooooooooooooooo000000Gooooo0ol0000jooooo`03o`000?oooooooooo01Sooooo00?o0000 ooooooooool0=_ooool003gooooo00?o0000ooooooooool0;_ooool00ol0003oooooooooo`09oooo o`04o`000?ooooooooooo`0000Sooooo0ol00006ooooo`03o`000?oooooooooo03Wooooo00?o0000 ooooooooool06_ooool00ol0003oooooooooo`0eooooo`00?Oooool00ol0003oooooooooo`0^oooo o`03o`000?oooooooooo00Wooooo00Co0000oooooooooooo00001oooool01Ol0003ooooooooooooo oooo000000Gooooo00?o0000ooooooooool0>Oooool00ol0003oooooooooo`0Kooooo`03o`000?oo oooooooo03Cooooo000mooooo`03o`000?oooooooooo02kooooo00?o0000ooooooooool02Oooool0 1?l0003oooooooooool00007ooooo`05o`000?ooooooooooooooool000001Oooool00ol0003ooooo ooooo`0iooooo`03o`000?oooooooooo01cooooo00?o0000ooooooooool0?ooool00ol0003oooooooooo`0Nooooo`03o`000?oooooooooo03;ooooo000l ooooo`03o`000?oooooooooo033ooooo00?o0000ooooooooool07Oooool00ol0003oooooooooo`0h ooooo`03o`000?oooooooooo01oooooo00?o0000ooooooooool0oooool00ol0003oooooooooo`0aooooo`03 o`000?oooooooooo01gooooo00?o0000ooooooooool0>?ooool00ol0003oooooooooo`0Qooooo`03 o`000?oooooooooo02oooooo000kooooo`03o`000?oooooooooo037ooooo00?o0000ooooooooool0 7Oooool00ol0003oooooooooo`0gooooo`03o`000?oooooooooo02?ooooo00?o0000ooooooooool0 ;_ooool003_ooooo00?o0000ooooooooool0_ooool0 0ol0003oooooooooo`0cooooo`03o`000?oooooooooo01cooooo0_l0000hooooo`03o`000?oooooo oooo02Gooooo00?o0000ooooooooool0;?ooool003[ooooo00?o0000ooooooooool0Oooool00ol0003oooooooooo`0dooooo`03o`000?oooooooooo01co oooo00?o0000ooooooooool0=oooool00ol0003oooooooooo`0Wooooo`03o`000?oooooooooo02[o oooo000iooooo`03o`000?oooooooooo03Cooooo00?o0000ooooooooool07?ooool00ol0003ooooo ooooo`0fooooo`03o`000?oooooooooo02Wooooo00?o0000ooooooooool0:Oooool003Wooooo00?o 0000ooooooooool0=?ooool00ol0003oooooooooo`0Looooo`03o`000?oooooooooo03Kooooo00?o 0000ooooooooool0:_ooool00ol0003oooooooooo`0Xooooo`00>?ooool00ol0003oooooooooo`0f ooooo`03o`000?oooooooooo01_ooooo00?o0000ooooooooool0=_ooool00ol0003oooooooooo`0Z ooooo`03o`000?oooooooooo02Sooooo000hooooo`03o`000?oooooooooo03Kooooo00?o0000oooo ooooool06oooool00ol0003oooooooooo`0fooooo`03o`000?oooooooooo02_ooooo00?o0000oooo ooooool09oooool003Sooooo00?o0000ooooooooool0=_ooool00ol0003oooooooooo`0Kooooo`03 o`000?oooooooooo03Kooooo00?o0000ooooooooool0;?ooool00ol0003oooooooooo`0Vooooo`00 =oooool00ol0003oooooooooo`0gooooo`03o`000?oooooooooo01_ooooo00?o0000ooooooooool0 =Oooool00ol0003oooooooooo`0^ooooo`03o`000?oooooooooo02Gooooo000gooooo`03o`000?oo oooooooo03Oooooo00?o0000ooooooooool06oooool00ol0003oooooooooo`0eooooo`03o`000?oo oooooooo02kooooo00?o0000ooooooooool09Oooool003Oooooo00?o0000ooooooooool0>?ooool0 0ol0003oooooooooo`0Jooooo`;o0000=_ooool00ol0003oooooooooo`0_ooooo`03o`000?oooooo oooo02Cooooo000fooooo`03o`000?oooooooooo03Wooooo00?o0000ooooooooool06_ooool00ol0 003oooooooooo`0eooooo`03o`000?oooooooooo033ooooo00?o0000ooooooooool08oooool003Ko oooo00?o0000ooooooooool0>Oooool00ol0003oooooooooo`0Jooooo`03o`000?oooooooooo03Go oooo00?o0000ooooooooool0oooool00ol0003oooooooooo`0I ooooo`03o`000?oooooooooo03Cooooo00?o0000ooooooooool0=?ooool00ol0003oooooooooo`0P ooooo`00=Oooool00ol0003oooooooooo`0kooooo`03o`000?oooooooooo01Wooooo00?o0000oooo ooooool0=?ooool00ol0003oooooooooo`0eooooo`03o`000?oooooooooo01oooooo000dooooo`03 o`000?oooooooooo03cooooo00?o0000ooooooooool06Oooool00ol0003oooooooooo`0dooooo`03 o`000?oooooooooo03Gooooo00?o0000ooooooooool07oooool003Cooooo00?o0000ooooooooool0 ??ooool00ol0003oooooooooo`0Iooooo`03o`000?oooooooooo03Cooooo00?o0000ooooooooool0 =_ooool00ol0003oooooooooo`0Nooooo`003_ooool3o`0002?ooooo00Co0000oooooooooooooooo 1Ol0000Xooooo`?o00003?ooool00ol0003oooooooooo`0Hooooo`03o`000?oooooooooo02Kooooo 0ol0000:ooooo`03o`000?oooooooooo01_ooooo1Ol0000Hooooo`03o`000?oooooooooo00cooooo 0ol0000>ooooo`003Oooool01Ol0003ooooooooooooooooo000002;ooooo00?o0000ooooooooool0 0_ooool01?l0003oooooooooool0000Yooooo`03o`000?oooooooooo00_ooooo00?o0000oooooooo ool06?ooool2o`0002Sooooo00?o0000ooooooooool02Oooool00ol0003oooooooooo`0Looooo`04 o`000?ooooooooooo`0001Wooooo0_l0000;ooooo`05o`000?ooooooooooooooool000003Oooool0 00Oooooo1Ol00005ooooo`03o`000?oooooooooo01kooooo1Ol00003ooooo`03o`000?oooooooooo 027ooooo1Ol00003ooooo`03o`000?oooooooooo00_ooooo00?o0000ooooooooool06?ooool00ol0 003oooooooooo`0Wooooo`03o`000?oooooooooo00Wooooo00?o0000ooooooooool07Oooool00ol0 003oooooooooo`0Kooooo`03o`000?oooooooooo00cooooo00?o0000ooooooooool02oooool000oo oooo0_l0000Rooooo`03o`000?oooooooooo00Gooooo00?o0000ooooooooool0:?ooool00ol0003o ooooooooo`0;ooooo`03o`000?oooooooooo01Sooooo00?o0000ooooooooool09oooool00ol0003o ooooooooo`09ooooo`03o`000?oooooooooo01kooooo00?o0000ooooooooool06oooool00ol0003o ooooooooo`09ooooo`;o00003_ooool0017ooooo00?o0000ooooooooool07oooool00ol0003ooooo ooooo`02ooooo`05o`000?ooooooooooooooool00000:Oooool00ol0003oooooooooo`0ooooo`03o`00 0?oooooooooo04oooooo00?o0000ooooooooool01oooool00ol0003oooooooooo`06ooooo`;o0000 3Oooool00ol0003oooooooooo`0Oooooo`03o`000?oooooooooo05gooooo000Iooooo`03o`000?oo oooooooo00kooooo00?o0000ooooooooool0Coooool00ol0003oooooooooo`06ooooo`03o`000?oo oooooooo00Oooooo00?o0000ooooooooool03Oooool00ol0003oooooooooo`0Nooooo`03o`000?oo oooooooo05gooooo000Jooooo`03o`000?oooooooooo00gooooo00?o0000ooooooooool0D?ooool0 0ol0003oooooooooo`04ooooo`03o`000?oooooooooo00Sooooo00?o0000ooooooooool03Oooool0 0ol0003oooooooooo`0Nooooo`03o`000?oooooooooo05gooooo000Jooooo`03o`000?oooooooooo 00cooooo00?o0000ooooooooool0D_ooool00ol0003oooooooooo`02ooooo`03o`000?oooooooooo 00Wooooo00?o0000ooooooooool03Oooool00ol0003oooooooooo`0Nooooo`03o`000?oooooooooo 05gooooo000Kooooo`03o`000?oooooooooo00_ooooo00?o0000ooooooooool0Doooool5o`0000_o oooo00?o0000ooooooooool03Oooool00ol0003oooooooooo`0Nooooo`03o`000?oooooooooo05go oooo000Kooooo`03o`000?oooooooooo00[ooooo00?o0000ooooooooool0EOooool2o`0000gooooo 00?o0000ooooooooool03_ooool00ol0003oooooooooo`0Looooo`03o`000?oooooooooo05kooooo 000Looooo`03o`000?oooooooooo00Wooooo00?o0000ooooooooool0I?ooool00ol0003ooooooooo o`0>ooooo`03o`000?oooooooooo01cooooo00?o0000ooooooooool0G_ooool001cooooo0_l00009 ooooo`03o`000?oooooooooo06Gooooo00?o0000ooooooooool03_ooool00ol0003oooooooooo`0L ooooo`03o`000?oooooooooo05kooooo000Nooooo`03o`000?oooooooooo00Gooooo00?o0000oooo ooooool0I_ooool00ol0003oooooooooo`0>ooooo`03o`000?oooooooooo01cooooo00?o0000oooo ooooool0G_ooool001kooooo00?o0000ooooooooool01Oooool00ol0003oooooooooo`1Vooooo`03 o`000?oooooooooo00kooooo00?o0000ooooooooool07?ooool00ol0003oooooooooo`1Nooooo`00 7oooool2o`0000?ooooo0_l0001Yooooo`;o00004?ooool00ol0003oooooooooo`0Kooooo`03o`00 0?oooooooooo05kooooo000Pooooo`Go0000J_ooool00ol0003oooooooooo`0?ooooo`03o`000?oo oooooooo01_ooooo00?o0000ooooooooool0G_ooool008oooooo00?o0000ooooooooool03oooool0 0ol0003oooooooooo`0Jooooo`03o`000?oooooooooo05oooooo002?ooooo`03o`000?oooooooooo 00oooooo00?o0000ooooooooool06_ooool00ol0003oooooooooo`1Oooooo`00Soooool00ol0003o ooooooooo`0?ooooo`03o`000?oooooooooo01[ooooo00?o0000ooooooooool0Goooool008oooooo 00?o0000ooooooooool04?ooool00ol0003oooooooooo`0Iooooo`03o`000?oooooooooo05oooooo 002?ooooo`03o`000?oooooooooo013ooooo00?o0000ooooooooool06Oooool00ol0003ooooooooo o`1Oooooo`00Soooool00ol0003oooooooooo`0@ooooo`03o`000?oooooooooo01Wooooo00?o0000 ooooooooool0Goooool007[ooooo0ol00004ooooo`04o`000?ooooooooooooooo`Go00001Oooool0 0ol0003oooooooooo`0@ooooo`03o`000?oooooooooo01Wooooo00?o0000ooooooooool0Goooool0 07_ooooo00?o0000ooooooooool02?ooool01?l0003oooooooooool00005ooooo`03o`000?oooooo oooo013ooooo00?o0000ooooooooool06?ooool00ol0003oooooooooo`1Pooooo`00Noooool00ol0 003oooooooooo`09ooooo`03o`000?oooooooooo00Gooooo0ol0000Aooooo`03o`000?oooooooooo 01Oooooo00?o0000ooooooooool0H?ooool007_ooooo00?o0000ooooooooool02_ooool00ol0003o ooooooooo`04ooooo`03o`000?oooooooooo017ooooo00?o0000ooooooooool05oooool00ol0003o ooooooooo`1Pooooo`00Noooool00ol0003oooooooooo`07ooooo`05o`000?ooooooooooooooool0 00001Oooool00ol0003oooooooooo`0Aooooo`03o`000?oooooooooo01Oooooo00?o0000oooooooo ool0H?ooool007[ooooo0_l00009ooooo`05o`000?ooooooooooooooool000001Oooool00ol0003o ooooooooo`0Aooooo`03o`000?ooo