(************** Content-type: application/mathematica ************** CreatedBy='Mathematica 5.0' Mathematica-Compatible Notebook This notebook can be used with any Mathematica-compatible application, such as Mathematica, MathReader or Publicon. The data for the notebook starts with the line containing stars above. To get the notebook into a Mathematica-compatible application, do one of the following: * Save the data starting with the line of stars above into a file with a name ending in .nb, then open the file inside the application; * Copy the data starting with the line of stars above to the clipboard, then use the Paste menu command inside the application. Data for notebooks contains only printable 7-bit ASCII and can be sent directly in email or through ftp in text mode. Newlines can be CR, LF or CRLF (Unix, Macintosh or MS-DOS style). NOTE: If you modify the data for this notebook not in a Mathematica- compatible application, you must delete the line below containing the word CacheID, otherwise Mathematica-compatible applications may try to use invalid cache data. For more information on notebooks and Mathematica-compatible applications, contact Wolfram Research: web: http://www.wolfram.com email: info@wolfram.com phone: +1-217-398-0700 (U.S.) Notebook reader applications are available free of charge from Wolfram Research. *******************************************************************) (*CacheID: 232*) (*NotebookFileLineBreakTest NotebookFileLineBreakTest*) (*NotebookOptionsPosition[ 178675, 4470]*) (*NotebookOutlinePosition[ 179655, 4505]*) (* CellTagsIndexPosition[ 179580, 4499]*) (*WindowFrame->Normal*) Notebook[{ Cell[CellGroupData[{ Cell["Transformations in the plane", "Subtitle", CellAutoOverwrite->False], Cell["\<\ Ivan Cnop Vrije universiteit Brussel icnop@vub.ac.be\ \>", "Subsubtitle"], Cell[TextData[{ "Recall that \n", StyleBox["//MatrixForm", FontWeight->"Bold"], "\nwill convert a double list into a traditional rectangular matrix and\n", StyleBox["//ColumnForm", FontWeight->"Bold"], "\nwill convert a list or double list into a column." }], "Text", CellAutoOverwrite->False], Cell[CellGroupData[{ Cell["Images of basis vectors", "Section", CellAutoOverwrite->False], Cell["Write all vertices of the unit square:", "Text"], Cell[CellGroupData[{ Cell[BoxData[ \(\(begin = Flatten[Union[\n\t\t\t{Table[{0, 1 - j}, {j, 0, 1}], Table[{1, j}, {j, 0, 1}]}], 1];\)\)], "Input", InitializationCell->True, CellAutoOverwrite->False], Cell[BoxData[ \(General::"spell1" \(\(:\)\(\ \)\) "Possible spelling error: new symbol name \"\!\(begin\)\" is similar to \ existing symbol \"\!\(Begin\)\"."\)], "Message"] }, Closed]], Cell[CellGroupData[{ Cell[BoxData[ \(basisBlock = Polygon[begin]\)], "Input", InitializationCell->True, CellAutoOverwrite->False], Cell[BoxData[ \(Polygon[{{0, 1}, {0, 0}, {1, 0}, {1, 1}}]\)], "Output"] }, Closed]], Cell[CellGroupData[{ Cell[BoxData[ \(Show[Graphics[{GrayLevel[ .5], basisBlock}]\n, AspectRatio -> Automatic\n\t, Axes -> Automatic\n\t, PlotRange -> {{\(-3\), 3}, {\(-3\), 3}}]\)], "Input", CellAutoOverwrite->False], 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.166667 0.5 0.166667 [ [0 .4875 -6 -9 ] [0 .4875 6 0 ] [.16667 .4875 -6 -9 ] [.16667 .4875 6 0 ] [.33333 .4875 -6 -9 ] [.33333 .4875 6 0 ] [.66667 .4875 -3 -9 ] [.66667 .4875 3 0 ] [.83333 .4875 -3 -9 ] [.83333 .4875 3 0 ] [1 .4875 -3 -9 ] [1 .4875 3 0 ] [.4875 0 -12 -4.5 ] [.4875 0 0 4.5 ] [.4875 .16667 -12 -4.5 ] [.4875 .16667 0 4.5 ] [.4875 .33333 -12 -4.5 ] [.4875 .33333 0 4.5 ] [.4875 .66667 -6 -4.5 ] [.4875 .66667 0 4.5 ] [.4875 .83333 -6 -4.5 ] [.4875 .83333 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 [(-3)] 0 .4875 0 1 Mshowa .16667 .5 m .16667 .50625 L s [(-2)] .16667 .4875 0 1 Mshowa .33333 .5 m .33333 .50625 L s [(-1)] .33333 .4875 0 1 Mshowa .66667 .5 m .66667 .50625 L s [(1)] .66667 .4875 0 1 Mshowa .83333 .5 m .83333 .50625 L s [(2)] .83333 .4875 0 1 Mshowa 1 .5 m 1 .50625 L s [(3)] 1 .4875 0 1 Mshowa .125 Mabswid .03333 .5 m .03333 .50375 L s .06667 .5 m .06667 .50375 L s .1 .5 m .1 .50375 L s .13333 .5 m .13333 .50375 L s .2 .5 m .2 .50375 L s .23333 .5 m .23333 .50375 L s .26667 .5 m .26667 .50375 L s .3 .5 m .3 .50375 L s .36667 .5 m .36667 .50375 L s .4 .5 m .4 .50375 L s .43333 .5 m .43333 .50375 L s .46667 .5 m .46667 .50375 L s .53333 .5 m .53333 .50375 L s .56667 .5 m .56667 .50375 L s .6 .5 m .6 .50375 L s .63333 .5 m .63333 .50375 L s .7 .5 m .7 .50375 L s .73333 .5 m .73333 .50375 L s .76667 .5 m .76667 .50375 L s .8 .5 m .8 .50375 L s .86667 .5 m .86667 .50375 L s .9 .5 m .9 .50375 L s .93333 .5 m .93333 .50375 L s .96667 .5 m .96667 .50375 L s .25 Mabswid 0 .5 m 1 .5 L s .5 0 m .50625 0 L s [(-3)] .4875 0 1 0 Mshowa .5 .16667 m .50625 .16667 L s [(-2)] .4875 .16667 1 0 Mshowa .5 .33333 m .50625 .33333 L s [(-1)] .4875 .33333 1 0 Mshowa .5 .66667 m .50625 .66667 L s [(1)] .4875 .66667 1 0 Mshowa .5 .83333 m .50625 .83333 L s [(2)] .4875 .83333 1 0 Mshowa .5 1 m .50625 1 L s [(3)] .4875 1 1 0 Mshowa .125 Mabswid .5 .03333 m .50375 .03333 L s .5 .06667 m .50375 .06667 L s .5 .1 m .50375 .1 L s .5 .13333 m .50375 .13333 L s .5 .2 m .50375 .2 L s .5 .23333 m .50375 .23333 L s .5 .26667 m .50375 .26667 L s .5 .3 m .50375 .3 L s .5 .36667 m .50375 .36667 L s .5 .4 m .50375 .4 L s .5 .43333 m .50375 .43333 L s .5 .46667 m .50375 .46667 L s .5 .53333 m .50375 .53333 L s .5 .56667 m .50375 .56667 L s .5 .6 m .50375 .6 L s .5 .63333 m .50375 .63333 L s .5 .7 m .50375 .7 L s .5 .73333 m .50375 .73333 L s .5 .76667 m .50375 .76667 L s .5 .8 m .50375 .8 L s .5 .86667 m .50375 .86667 L s .5 .9 m .50375 .9 L s .5 .93333 m .50375 .93333 L s .5 .96667 m .50375 .96667 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 .5 g .5 .66667 m .5 .5 L .66667 .5 L .66667 .66667 L F % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 288}, ImageMargins->{{62, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHg"], ImageRangeCache->{{{0, 287}, {287, 0}} -> {-3.12952, -3.09715, 0.0215829, \ 0.0215829}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Closed]], Cell["What does a matrix do with such a square?", "Text"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"A", "=", RowBox[{"(", GridBox[{ {"1", \(-0.2\)}, {\(- .5\), ".9"} }], ")"}]}]], "Input", CellAutoOverwrite->False], Cell[BoxData[ \({{1, \(-0.2`\)}, {\(-0.5`\), 0.9`}}\)], "Output"] }, Closed]], Cell[BoxData[ \(image[{x_, y_}] := A . {x, y}\)], "Input", InitializationCell->True, CellAutoOverwrite->False], Cell[CellGroupData[{ Cell[BoxData[ \(Show[{Graphics[{GrayLevel[ .5], basisBlock}], Graphics[{Hue[0], Polygon[Map[image, begin]]}]}\n, AspectRatio -> Automatic\n\t, Axes -> Automatic\n\t, PlotRange -> {{\(-3\), 3}, {\(-3\), 3}}\n\t]\)], "Input", CellAutoOverwrite->False], 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.166667 0.5 0.166667 [ [0 .4875 -6 -9 ] [0 .4875 6 0 ] [.16667 .4875 -6 -9 ] [.16667 .4875 6 0 ] [.33333 .4875 -6 -9 ] [.33333 .4875 6 0 ] [.66667 .4875 -3 -9 ] [.66667 .4875 3 0 ] [.83333 .4875 -3 -9 ] [.83333 .4875 3 0 ] [1 .4875 -3 -9 ] [1 .4875 3 0 ] [.4875 0 -12 -4.5 ] [.4875 0 0 4.5 ] [.4875 .16667 -12 -4.5 ] [.4875 .16667 0 4.5 ] [.4875 .33333 -12 -4.5 ] [.4875 .33333 0 4.5 ] [.4875 .66667 -6 -4.5 ] [.4875 .66667 0 4.5 ] [.4875 .83333 -6 -4.5 ] [.4875 .83333 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 [(-3)] 0 .4875 0 1 Mshowa .16667 .5 m .16667 .50625 L s [(-2)] .16667 .4875 0 1 Mshowa .33333 .5 m .33333 .50625 L s [(-1)] .33333 .4875 0 1 Mshowa .66667 .5 m .66667 .50625 L s [(1)] .66667 .4875 0 1 Mshowa .83333 .5 m .83333 .50625 L s [(2)] .83333 .4875 0 1 Mshowa 1 .5 m 1 .50625 L s [(3)] 1 .4875 0 1 Mshowa .125 Mabswid .03333 .5 m .03333 .50375 L s .06667 .5 m .06667 .50375 L s .1 .5 m .1 .50375 L s .13333 .5 m .13333 .50375 L s .2 .5 m .2 .50375 L s .23333 .5 m .23333 .50375 L s .26667 .5 m .26667 .50375 L s .3 .5 m .3 .50375 L s .36667 .5 m .36667 .50375 L s .4 .5 m .4 .50375 L s .43333 .5 m .43333 .50375 L s .46667 .5 m .46667 .50375 L s .53333 .5 m .53333 .50375 L s .56667 .5 m .56667 .50375 L s .6 .5 m .6 .50375 L s .63333 .5 m .63333 .50375 L s .7 .5 m .7 .50375 L s .73333 .5 m .73333 .50375 L s .76667 .5 m .76667 .50375 L s .8 .5 m .8 .50375 L s .86667 .5 m .86667 .50375 L s .9 .5 m .9 .50375 L s .93333 .5 m .93333 .50375 L s .96667 .5 m .96667 .50375 L s .25 Mabswid 0 .5 m 1 .5 L s .5 0 m .50625 0 L s [(-3)] .4875 0 1 0 Mshowa .5 .16667 m .50625 .16667 L s [(-2)] .4875 .16667 1 0 Mshowa .5 .33333 m .50625 .33333 L s [(-1)] .4875 .33333 1 0 Mshowa .5 .66667 m .50625 .66667 L s [(1)] .4875 .66667 1 0 Mshowa .5 .83333 m .50625 .83333 L s [(2)] .4875 .83333 1 0 Mshowa .5 1 m .50625 1 L s [(3)] .4875 1 1 0 Mshowa .125 Mabswid .5 .03333 m .50375 .03333 L s .5 .06667 m .50375 .06667 L s .5 .1 m .50375 .1 L s .5 .13333 m .50375 .13333 L s .5 .2 m .50375 .2 L s .5 .23333 m .50375 .23333 L s .5 .26667 m .50375 .26667 L s .5 .3 m .50375 .3 L s .5 .36667 m .50375 .36667 L s .5 .4 m .50375 .4 L s .5 .43333 m .50375 .43333 L s .5 .46667 m .50375 .46667 L s .5 .53333 m .50375 .53333 L s .5 .56667 m .50375 .56667 L s .5 .6 m .50375 .6 L s .5 .63333 m .50375 .63333 L s .5 .7 m .50375 .7 L s .5 .73333 m .50375 .73333 L s .5 .76667 m .50375 .76667 L s .5 .8 m .50375 .8 L s .5 .86667 m .50375 .86667 L s .5 .9 m .50375 .9 L s .5 .93333 m .50375 .93333 L s .5 .96667 m .50375 .96667 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 .5 g .5 .66667 m .5 .5 L .66667 .5 L .66667 .66667 L F 1 0 0 r .46667 .65 m .5 .5 L .66667 .41667 L .63333 .56667 L F % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 288}, ImageMargins->{{62, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgool006;ooooo002A ooooo`03o`000?oooooooooo01[ooooo3ooo001Sooooo`00TOooool00ol0003oooooooooo`0Hoooo oa7oo`00Hoooool0097ooooo00?o0000ooooooooool05_oooolCool006?ooooo0007ooooo`?o0000 :_ooool5o`0002[ooooo0ol0000[ooooo`03o`000?oooooooooo01Cooooo5Ooo0003o`0002[ooooo 1Ol0000[ooooo`?o00000oooool000Kooooo00Go0000ooooooooooooooooo`00000Zooooo`04o`00 0?ooooooooooo`0002_ooooo00?o0000ooooooooool0:_ooool00ol0003oooooooooo`0BoooooaOo o`0000?oooooo`000?ooool0:oooool01?l0003oooooooooool0000Zooooo`05o`000?oooooooooo ooooool000000_ooool000Go00001Oooool00ol0003oooooooooo`0Qooooo`Go00000oooool00ol0 003oooooooooo`0Sooooo`Go00000oooool00ol0003oooooooooo`0Zooooo`;o00004OoooolHool0 00;ooooo00?o0000ooooooooool0:oooool00ol0003oooooooooo`0^ooooo`7o00000Oooool1oooo o`002?ooool2o`0002gooooo00?o0000ooooooooool0:_ooool00ol0003oooooooooo`0Zooooo`03 o`000?oooooooooo00kooooo6_oo0002ooooo`03o`000?oooooooooo02cooooo00?o0000oooooooo ool0:oooool2o`0000?ooooo000:ooooo`03o`000?oooooooooo02Oooooo00Go0000oooooooooooo ooooo`00000[ooooo`03o`000?oooooooooo02[ooooo00?o0000ooooooooool03?oooolLool000;o oooo00?o0000ooooooooool0:Oooool01Ol0003ooooooooooooooooo000002kooooo0Ol00001oooo o`7ooooo0006ooooo`05o`000?ooooooooooooooool00000:Oooool01Ol0003ooooooooooooooooo 000002[ooooo0_l0000/ooooo`03o`000?oooooooooo00[ooooo7_oo00000ooooooo0000o`00000[ ooooo`05o`000?ooooooooooooooool00000:_ooool01Ol0003ooooooooooooooooo000000;ooooo 0007ooooo`?o0000:oooool3o`0002cooooo00?o0000ooooooooool0:_ooool00ol0003ooooooooo o`08oooooaooo`000oooool00ol0003oooooooooo`0Zooooo`?o0000;?ooool3o`0000?ooooo002A ooooo`03o`000?oooooooooo00Kooooo8Ooo001Uooooo`00TOooool00ol0003oooooooooo`04oooo ob?oo`00IOooool0097ooooo00?o0000ooooooooool00_oooolUool006Gooooo002Aooooo`03o`00 0?oooooooooo02Ooo`00IOooool000KoooooS?l0000Xool006?o00000oooool000Kooooo00?o0000 ooooooooool01_ooool00ol0003oooooooooo`06ooooo`03o`000?oooooooooo00Kooooo00?o0000 ooooooooool01oooool00ol0003oooooooooo`06ooooo`03o`000?oooooooooo00Kooooo00?o0000 ooooooooool01_ooool00ol0003oooooooooo`07ooooo`03o`000?oooooooooo00Kooooo00?o0000 ooooooooool01_ooool00ol0003oooooooooo`06ooooo`03o`000?oooooooooo00Oooooo00?o0000 ooooooooool01_ooool00ol0003oooooooooo`06ooooo`03o`000?oooooooooo00Oooooo:Ooo0005 ogmoO`03o`000?oooooooooo00Kooooo00?o0000ooooooooool01_ooool00ol0003oooooooooo`07 ooooo`03o`000?oooooooooo00Kooooo00?o0000ooooooooool01_ooool00ol0003oooooooooo`06 ooooo`03o`000?oooooooooo00Oooooo00?o0000ooooooooool01_ooool00ol0003oooooooooo`06 ooooo`03o`000?oooooooooo00Oooooo00?o0000ooooooooool00Oooool000Kooooo00?o0000oooo ooooool0:oooool00ol0003oooooooooo`0[ooooo`03o`000?oooooooooo02cooooo:Ooo0005ogmo O`03o`000?oooooooooo02_ooooo00?o0000ooooooooool0;?ooool00ol0003oooooooooo`01oooo o`00TOoooolYool000GoOgmoHOooool0093ooooo:_oo0005ogmoOf7ooooo002@ooooobWoo`001_mo OgmQooooo`00T?oooolYool000KoOgmoHOooool0093ooooo:Ooo0006ogmoOf7ooooo002?ooooob[o o`001_moOgmQooooo`00SooooolYool000OoOgmoHOooool008oooooo:Ooo0007ogmoOf7ooooo002? ooooobWoo`001omoOgmQooooo`00S_oooolZool000OoOgmoHOooool008kooooo:_oo0007ogmoOf7o oooo002>ooooobWoo`002?moOgmQooooo`00S_oooolYool000SoOgmoHOooool008kooooo:Ooo0008 ogmoOf7ooooo002=ooooob[oo`002?moOgmQooooo`00SOoooolZool000SoOgmoHOooool008gooooo :Ooo0009ogmoOf7ooooo002=ooooobSoo`002_moOgmQooooo`00S?oooolWool000coOgmoHOooool0 08cooooo9Ooo000>ogmoOf7ooooo002"], ImageRangeCache->{{{0, 287}, {287, 0}} -> {-3.12952, -3.09715, 0.0215829, \ 0.0215829}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Closed]], Cell["\<\ The images of the basis vectors are precisely the columns of the \ matrix A:\ \>", "Text", CellAutoOverwrite->False], Cell[BoxData[ \(image[{1, 0}] // ColumnForm\)], "Input", CellAutoOverwrite->False], Cell[BoxData[ \(image[{0, 1}] // ColumnForm\)], "Input", CellAutoOverwrite->False], Cell[BoxData[ \(A // MatrixForm\)], "Input", CellAutoOverwrite->False], Cell["For later use we include a parameter in the matrix", "Text"], Cell[BoxData[ \(Clear[images]\)], "Input", CellAutoOverwrite->False], Cell[CellGroupData[{ Cell[BoxData[ \(\(\(images[ a_] := {{GrayLevel[ .5], basisBlock}, {Hue[0], Polygon[Map[A . # &, begin]]}}\)\(\n\) \)\)], "Input", InitializationCell->True, CellAutoOverwrite->False], Cell[BoxData[ \(General::"spell1" \(\(:\)\(\ \)\) "Possible spelling error: new symbol name \"\!\(images\)\" is similar \ to existing symbol \"\!\(image\)\"."\)], "Message"] }, Closed]], Cell[CellGroupData[{ Cell["Try this again", "Subsubsection"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"A", "=", RowBox[{"(", GridBox[{ {"1", "1.7"}, {\(- .5\), ".9"} }], ")"}]}]], "Input", CellAutoOverwrite->False], Cell[BoxData[ \({{1, 1.7`}, {\(-0.5`\), 0.9`}}\)], "Output"] }, Closed]], Cell[BoxData[ \(image[{x_, y_}] := A . {x, y}\)], "Input", InitializationCell->True, CellAutoOverwrite->False], Cell[CellGroupData[{ Cell[BoxData[ \(Show[{Graphics[{GrayLevel[ .5], basisBlock}], Graphics[{Hue[0], Polygon[Map[image, begin]]}]}\n, AspectRatio -> Automatic\n\t, Axes -> Automatic\n\t, PlotRange -> {{\(-3\), 3}, {\(-3\), 3}}\n\t]\)], "Input", CellAutoOverwrite->False], 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.166667 0.5 0.166667 [ [0 .4875 -6 -9 ] [0 .4875 6 0 ] [.16667 .4875 -6 -9 ] [.16667 .4875 6 0 ] [.33333 .4875 -6 -9 ] [.33333 .4875 6 0 ] [.66667 .4875 -3 -9 ] [.66667 .4875 3 0 ] [.83333 .4875 -3 -9 ] [.83333 .4875 3 0 ] [1 .4875 -3 -9 ] [1 .4875 3 0 ] [.4875 0 -12 -4.5 ] [.4875 0 0 4.5 ] [.4875 .16667 -12 -4.5 ] [.4875 .16667 0 4.5 ] [.4875 .33333 -12 -4.5 ] [.4875 .33333 0 4.5 ] [.4875 .66667 -6 -4.5 ] [.4875 .66667 0 4.5 ] [.4875 .83333 -6 -4.5 ] [.4875 .83333 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 [(-3)] 0 .4875 0 1 Mshowa .16667 .5 m .16667 .50625 L s [(-2)] .16667 .4875 0 1 Mshowa .33333 .5 m .33333 .50625 L s [(-1)] .33333 .4875 0 1 Mshowa .66667 .5 m .66667 .50625 L s [(1)] .66667 .4875 0 1 Mshowa .83333 .5 m .83333 .50625 L s [(2)] .83333 .4875 0 1 Mshowa 1 .5 m 1 .50625 L s [(3)] 1 .4875 0 1 Mshowa .125 Mabswid .03333 .5 m .03333 .50375 L s .06667 .5 m .06667 .50375 L s .1 .5 m .1 .50375 L s .13333 .5 m .13333 .50375 L s .2 .5 m .2 .50375 L s .23333 .5 m .23333 .50375 L s .26667 .5 m .26667 .50375 L s .3 .5 m .3 .50375 L s .36667 .5 m .36667 .50375 L s .4 .5 m .4 .50375 L s .43333 .5 m .43333 .50375 L s .46667 .5 m .46667 .50375 L s .53333 .5 m .53333 .50375 L s .56667 .5 m .56667 .50375 L s .6 .5 m .6 .50375 L s .63333 .5 m .63333 .50375 L s .7 .5 m .7 .50375 L s .73333 .5 m .73333 .50375 L s .76667 .5 m .76667 .50375 L s .8 .5 m .8 .50375 L s .86667 .5 m .86667 .50375 L s .9 .5 m .9 .50375 L s .93333 .5 m .93333 .50375 L s .96667 .5 m .96667 .50375 L s .25 Mabswid 0 .5 m 1 .5 L s .5 0 m .50625 0 L s [(-3)] .4875 0 1 0 Mshowa .5 .16667 m .50625 .16667 L s [(-2)] .4875 .16667 1 0 Mshowa .5 .33333 m .50625 .33333 L s [(-1)] .4875 .33333 1 0 Mshowa .5 .66667 m .50625 .66667 L s [(1)] .4875 .66667 1 0 Mshowa .5 .83333 m .50625 .83333 L s [(2)] .4875 .83333 1 0 Mshowa .5 1 m .50625 1 L s [(3)] .4875 1 1 0 Mshowa .125 Mabswid .5 .03333 m .50375 .03333 L s .5 .06667 m .50375 .06667 L s .5 .1 m .50375 .1 L s .5 .13333 m .50375 .13333 L s .5 .2 m .50375 .2 L s .5 .23333 m .50375 .23333 L s .5 .26667 m .50375 .26667 L s .5 .3 m .50375 .3 L s .5 .36667 m .50375 .36667 L s .5 .4 m .50375 .4 L s .5 .43333 m .50375 .43333 L s .5 .46667 m .50375 .46667 L s .5 .53333 m .50375 .53333 L s .5 .56667 m .50375 .56667 L s .5 .6 m .50375 .6 L s .5 .63333 m .50375 .63333 L s .5 .7 m .50375 .7 L s .5 .73333 m .50375 .73333 L s .5 .76667 m .50375 .76667 L s .5 .8 m .50375 .8 L s .5 .86667 m .50375 .86667 L s .5 .9 m .50375 .9 L s .5 .93333 m .50375 .93333 L s .5 .96667 m .50375 .96667 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 .5 g .5 .66667 m .5 .5 L .66667 .5 L .66667 .66667 L F 1 0 0 r .78333 .65 m .5 .5 L .66667 .41667 L .95 .56667 L F % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 288}, ImageMargins->{{62, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgoooo o`00TOooool00ol0003oooooooooo`0Fooooob[oo`00C?ooool000Oooooo0ol0000Zooooo`Go0000 :_ooool3o`0002_ooooo00?o0000ooooooooool05?ooool^ool001Cooooo1Ol0000[ooooo`?o0000 0oooool000Kooooo00Go0000ooooooooooooooooo`00000Zooooo`04o`000?ooooooooooo`0002_o oooo00?o0000ooooooooool0:_ooool00ol0003oooooooooo`0Boooooc;oo`004oooool01?l0003o ooooooooool0000Zooooo`05o`000?ooooooooooooooool000000_ooool000Go00001Oooool00ol0 003oooooooooo`0Qooooo`Go00000oooool00ol0003oooooooooo`0Sooooo`Go00000oooool00ol0 003oooooooooo`0Zooooo`;o00004Oooooleool001?ooooo00?o0000ooooooooool0;_ooool1o`00 007ooooo0Oooool000Sooooo0_l0000]ooooo`03o`000?oooooooooo02[ooooo00?o0000oooooooo ool0:_ooool00ol0003oooooooooo`0>ooooocWoo`004_ooool00ol0003oooooooooo`0[ooooo`;o 00000oooool000[ooooo00?o0000ooooooooool09oooool01Ol0003ooooooooooooooooo000002_o oooo00?o0000ooooooooool0:_ooool00ol0003oooooooooo`0?oo000Sooooo`00TOooool^ogmoO`Sooooo =?oo000Uooooo`00TOooool^ogmoO`[ooooo"], ImageRangeCache->{{{0, 287}, {287, 0}} -> {-3.12952, -3.09715, 0.0215829, \ 0.0215829}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Closed]], Cell[CellGroupData[{ Cell[BoxData[ \(image[{1, 0}] // ColumnForm\)], "Input", CellAutoOverwrite->False], Cell[BoxData[ InterpretationBox[GridBox[{ {"1.`"}, {\(-0.5`\)} }, GridBaseline->{Baseline, {1, 1}}, ColumnAlignments->{Left}], ColumnForm[ {1.0, -0.5}], Editable->False]], "Output"] }, Closed]], Cell[CellGroupData[{ Cell[BoxData[ \(image[{0, 1}] // ColumnForm\)], "Input", CellAutoOverwrite->False], Cell[BoxData[ InterpretationBox[GridBox[{ {"1.7`"}, {"0.9`"} }, GridBaseline->{Baseline, {1, 1}}, ColumnAlignments->{Left}], ColumnForm[ {1.7, 0.90000000000000002}], Editable->False]], "Output"] }, Closed]], Cell[CellGroupData[{ Cell[BoxData[ \(A // MatrixForm\)], "Input", CellAutoOverwrite->False], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"1", "1.7`"}, {\(-0.5`\), "0.9`"} }], "\[NoBreak]", ")"}], Function[ BoxForm`e$, MatrixForm[ BoxForm`e$]]]], "Output"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Input your own matrix", "Subsubsection"], Cell[BoxData[ RowBox[{"A", "=", RowBox[{"(", GridBox[{ {"\[FilledSmallSquare]", "\[FilledSmallSquare]"}, {"\[FilledSmallSquare]", "\[FilledSmallSquare]"} }], ")"}]}]], "Input", CellAutoOverwrite->False] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Special cases", "Section"], Cell[CellGroupData[{ Cell["Vertical projection ", "Subsubsection", CellAutoOverwrite->False], Cell[BoxData[{\(a =. \), "\n", RowBox[{"A", "=", RowBox[{"(", GridBox[{ {"1", "0"}, {"0", "a"} }], ")"}]}]}], "Input", CellAutoOverwrite->False], Cell["Does not preserve area (unless a= 1 or -1):", "Text", CellAutoOverwrite->False], Cell[BoxData[ \(Det[A]\)], "Input", CellAutoOverwrite->False], Cell["\<\ Animate the action for different values of a (best is a circular \ animation):\ \>", "Text"], Cell[BoxData[ \(Do[Show[Graphics[images[a]]\n, AspectRatio -> Automatic\n\t, Axes -> Automatic\n\t, PlotRange -> {{\(-3\), 3}, {\(-3\), 3}}]\n, {a, 1, 0, \(- .1\)}]\)], "Input", CellAutoOverwrite->False] }, Closed]], Cell[CellGroupData[{ Cell["Horizontal projection ", "Subsubsection", CellAutoOverwrite->False], Cell[BoxData[{\(a =. \), "\n", RowBox[{"A", "=", RowBox[{"(", GridBox[{ {"a", "0"}, {"0", "1"} }], ")"}]}]}], "Input", CellAutoOverwrite->False], Cell["Does not preserve area (unless a= 1 or -1):", "Text", CellAutoOverwrite->False], Cell[BoxData[ \(Det[A]\)], "Input", CellAutoOverwrite->False], Cell["\<\ Animate the action for different values of a (best is a circular \ animation):\ \>", "Text"], Cell[BoxData[ \(Do[Show[Graphics[images[a]]\n, AspectRatio -> Automatic\n\t, Axes -> Automatic\n\t, PlotRange -> {{\(-3\), 3}, {\(-3\), 3}}]\n, {a, 1, 0, \(- .1\)}]\)], "Input", CellAutoOverwrite->False] }, Closed]], Cell[CellGroupData[{ Cell["Homotetical image", "Subsubsection", CellAutoOverwrite->False], Cell[BoxData[{\(a =. \), "\n", RowBox[{"A", "=", RowBox[{"(", GridBox[{ {"a", "0"}, {"0", "a"} }], ")"}]}]}], "Input", CellAutoOverwrite->False], Cell["Does not preserve area (unless a= 1 or -1):", "Text", CellAutoOverwrite->False], Cell[BoxData[ \(Det[A]\)], "Input", CellAutoOverwrite->False], Cell["\<\ Animate the action for different values of a (best is a circular \ animation):\ \>", "Text"], Cell[BoxData[ \(Do[Show[Graphics[images[a]]\n, AspectRatio -> Automatic\n\t, Axes -> Automatic\n\t, PlotRange -> {{\(-3\), 3}, {\(-3\), 3}}]\n, {a, 1, \(- .8\), \(- .2\)}]\)], "Input", CellAutoOverwrite->False] }, Closed]], Cell[CellGroupData[{ Cell["Reflection about the y-axis .", "Subsubsection", CellAutoOverwrite->False], Cell[BoxData[{\(a =. \), "\n", RowBox[{"A", "=", RowBox[{"(", GridBox[{ {\(-1\), "0"}, {"0", "1"} }], ")"}]}]}], "Input", CellAutoOverwrite->False], Cell["Does preserve area:", "Text", CellAutoOverwrite->False], Cell[BoxData[ \(Det[A]\)], "Input", CellAutoOverwrite->False], Cell[BoxData[ \(Do[Show[Graphics[images[a]]\n, AspectRatio -> Automatic\n\t, Axes -> Automatic\n\t, PlotRange -> {{\(-3\), 3}, {\(-3\), 3}}]\n, {a, 1, 1, .1}]\)], "Input", CellAutoOverwrite->False] }, Closed]], Cell[CellGroupData[{ Cell["Exercise", "Subsubsection"], Cell["Repeat this for a reflection about the x-axis", "Text", CellAutoOverwrite->False] }, Closed]], Cell[CellGroupData[{ Cell["Schear", "Subsubsection", CellAutoOverwrite->False], Cell[BoxData[{\(a =. \), "\n", RowBox[{"A", "=", RowBox[{"(", GridBox[{ {"1", "0"}, {"a", "1"} }], ")"}]}]}], "Input", CellAutoOverwrite->False], Cell["\<\ Animate the action for different values of a (best is a circular \ animation):\ \>", "Text"], Cell[BoxData[ \(Do[Show[Graphics[images[a]]\n, AspectRatio -> Automatic\n\t, Axes -> Automatic\n\t, PlotRange -> {{\(-3\), 3}, {\(-3\), 3}}]\n, {a, 0, 1, .1}]\)], "Input", CellAutoOverwrite->False], Cell["They do preserve area:", "Text", CellAutoOverwrite->False], Cell[BoxData[ \(Det[A]\)], "Input", CellAutoOverwrite->False] }, Closed]], Cell[CellGroupData[{ Cell["Rotation", "Subsubsection", CellAutoOverwrite->False], Cell[BoxData[{\(a =. \), "\n", RowBox[{"A", "=", RowBox[{"(", GridBox[{ {\(Cos[a]\), \(-Sin[a]\)}, {\(Sin[a]\), \(Cos[a]\)} }], ")"}]}]}], "Input", CellAutoOverwrite->False], Cell["Does preserve area:", "Text", CellAutoOverwrite->False], Cell[BoxData[ \(Det[A]\)], "Input", CellAutoOverwrite->False], Cell[BoxData[ \(Simplify[%] \[Equal] 1\)], "Input"], Cell["\<\ Animate the action for different values of a (best is a circular \ animation):\ \>", "Text"], Cell[BoxData[ \(Do[Show[Graphics[images[a]]\n, AspectRatio -> Automatic\n\t, Axes -> Automatic\n\t, PlotRange -> {{\(-3\), 3}, {\(-3\), 3}}]\n, {a, 0, 2 Pi, Pi/12}]\)], "Input", CellAutoOverwrite->False] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell["A marketing problem", "Section", CellAutoOverwrite->False], Cell[CellGroupData[{ Cell["Problem", "Subsubsection"], Cell["\<\ Suppose computer manufacturer X loses 7% of his clients to \ computer manufacturer Y each year, and 5 % of computer Y users \ convert to X computers . \ \>", "Text", CellAutoOverwrite->False] }, Closed]], Cell[CellGroupData[{ Cell["Modeling", "Subsubsection"], Cell["\<\ Horizontal axis stands for computer X users and vertical axis \ counts computer Y users. Here is the matrix that models the transition over a single year.\ \>", "Text",\ CellAutoOverwrite->False], Cell[BoxData[ RowBox[{"A", "=", RowBox[{"(", GridBox[{ {".93", ".05"}, {".07", ".95"} }], ")"}]}]], "Input", CellAutoOverwrite->False], Cell[BoxData[ \(A // MatrixForm\)], "Input", CellAutoOverwrite->False], Cell[BoxData[ \(image[{x_, y_}] := A . {x, y}\)], "Input", CellAutoOverwrite->False], Cell[BoxData[ \(image[pts_List] := Map[image, pts]\)], "Input", CellAutoOverwrite->False], Cell[BoxData[ \(figure[j_] := Nest[image, begin, j]\)], "Input", CellAutoOverwrite->False], Cell[BoxData[ \(figure[3]\)], "Input", CellAutoOverwrite->False], Cell[BoxData[ \(Do[Show[Graphics[{Hue[j/20], Polygon[figure[j]]}]\n\t, AspectRatio -> Automatic\n\t, Axes -> Automatic\n\t, PlotRange -> {{\(-3\), 3}, {\(-3\), 3}}]\n, {j, 0, 12}]\)], "Input", CellAutoOverwrite->False], Cell["\<\ Conclusion: even in the cases where we start from either 100% HP (the first basis vector) or in the case of 100% Dell (the second \ basis vector) the situation will evolve to a stable proportion of about 40 % HP, 60 % Dell. \ Let us zoom in to see the exact value:\ \>", "Text", CellAutoOverwrite->False], Cell[BoxData[ \(Do[Show[Graphics[{Hue[j/20], Polygon[figure[j]]}]\n\t, AspectRatio -> Automatic\n\t, Axes -> Automatic, AxesLabel \[Rule] {HP, Dell}\n\t, PlotRange -> {{\(-1.3\), 1.3}, {\(-1.3\), 1.3}}]\n, {j, 0, 16}]\)], "Input", CellAutoOverwrite->False], Cell["From a starting point in the middle 50 - 50 market share", "Text"], Cell[BoxData[ \(A . { .5, .5}\)], "Input", CellAutoOverwrite->False], Cell[BoxData[ \(A . %\)], "Input"], Cell[BoxData[ \(A . %\)], "Input"], Cell[BoxData[ \(A . %\)], "Input"], Cell[TextData[{ "Repeating the application of a matrix many times is written in shorthand \ using NestList and #&", StyleBox[" :", FontFamily->"Courier New"] }], "Text"], Cell[BoxData[ \(\(NestList[A . # &, { .5, .5}, 100];\)\)], "Input", CellAutoOverwrite->False], Cell[BoxData[ \(ListPlot[%, \ PlotRange \[Rule] \ {{ .4, .5}, { .5, .6}}, \ AspectRatio \[Rule] Automatic]\)], "Input", CellAutoOverwrite->False], Cell["\<\ Find the value graphically and compare with the final value from \ the NestList line\ \>", "Text"], Cell[BoxData[ \(Nest[A . # &, { .5, .5}, 100]\)], "Input", CellAutoOverwrite->False], Cell["\<\ Remark: convergence to this value is rather fast (exponentially in \ the number of years)\ \>", "Text", CellAutoOverwrite->False], Cell["Even from the extreme situation", "Text"], Cell[BoxData[ \(\(NestList[A . # &, {0, 1}, 100];\)\)], "Input", CellAutoOverwrite->False], Cell[BoxData[ \(ListPlot[%, PlotRange -> {{0, 1}, {0, 1}}, AspectRatio \[Rule] Automatic]\)], "Input", CellAutoOverwrite->False], Cell["For later use we compute", "Text", CellAutoOverwrite->False], Cell[BoxData[ \(Eigenvalues[A]\)], "Input", CellAutoOverwrite->False], Cell[BoxData[ \(Eigenvectors[A]\)], "Input", CellAutoOverwrite->False], Cell["Load a package", "Text"], Cell[BoxData[ \(<< Graphics`Arrow`\)], "Input", InitializationCell->True], Cell["and make shure your arrows start from the origin:", "Text"], Cell[CellGroupData[{ Cell[BoxData[ \(arrow[{a_, b_}] := Arrow[{0, 0}, {a, b}]\)], "Input"], Cell[BoxData[ \(General::"spell1" \(\(:\)\(\ \)\) "Possible spelling error: new symbol name \"\!\(arrow\)\" is similar to \ existing symbol \"\!\(Arrow\)\"."\)], "Message"] }, Closed]], Cell["Here is the last figure again:", "Text"], Cell[BoxData[ \(Show[Graphics[{Hue[16/20], Polygon[figure[16]]}]\n\t, AspectRatio -> Automatic\n\t, Axes -> Automatic, AxesLabel \[Rule] {HP, Dell}\n\t, PlotRange -> {{\(-1.3\), 1.3}, {\(-1.3\), 1.3}}]\)], "Input"], Cell["\<\ We see that compression is tending to one arrow and that it has \ happened in the direction of the other arrow \ \>", "Text"], Cell[BoxData[ \(Show[ Graphics[Map[arrow, \(-Eigenvectors[A]\)]\[IndentingNewLine], AspectRatio -> Automatic\[IndentingNewLine], Axes -> Automatic\[IndentingNewLine], AxesLabel \[Rule] {HP, Dell}\n\t, PlotRange -> {{\(-1.3\), 1.3}, {\(-1.3\), 1.3}}]]\)], "Input"], Cell["The first vector is a fixed point (eigenvalue = 1)", "Text", CellAutoOverwrite->False], Cell[BoxData[ \(A . First[Eigenvectors[A]]\)], "Input", CellAutoOverwrite->False], Cell[BoxData[ \(% == First[Eigenvectors[A]]\)], "Input"] }, Closed]], Cell[CellGroupData[{ Cell["\<\ Exercise: work this problem with slightly different \ percentages\ \>", "Subsubsection", CellAutoOverwrite->False], Cell["e.g. 4 and 12 %", "Text"] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell["Epilogue: action of a matrix on directions", "Section"], Cell[CellGroupData[{ Cell["\<\ Show[Graphics[ Table[{Hue[x/(2\[Pi])],arrow[{Cos[x], Sin[x]}]}, {x, 0, 2 \[Pi], .3}] ],AspectRatio->Automatic ,Axes->Automatic, PlotRange -> All]\ \>", "Input", CellTags->"S5.27.1"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: 1.00184 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.497605 0.478585 0.500603 0.478585 [ [.01902 .4881 -6 -9 ] [.01902 .4881 6 0 ] [.25831 .4881 -12 -9 ] [.25831 .4881 12 0 ] [.7369 .4881 -9 -9 ] [.7369 .4881 9 0 ] [.97619 .4881 -3 -9 ] [.97619 .4881 3 0 ] [.48511 .02202 -12 -4.5 ] [.48511 .02202 0 4.5 ] [.48511 .26131 -24 -4.5 ] [.48511 .26131 0 4.5 ] [.48511 .7399 -18 -4.5 ] [.48511 .7399 0 4.5 ] [.48511 .97919 -6 -4.5 ] [.48511 .97919 0 4.5 ] [ 0 0 0 0 ] [ 1 1.00184 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash .01902 .5006 m .01902 .50685 L s [(-1)] .01902 .4881 0 1 Mshowa .25831 .5006 m .25831 .50685 L s [(-0.5)] .25831 .4881 0 1 Mshowa .7369 .5006 m .7369 .50685 L s [(0.5)] .7369 .4881 0 1 Mshowa .97619 .5006 m .97619 .50685 L s [(1)] .97619 .4881 0 1 Mshowa .125 Mabswid .06688 .5006 m .06688 .50435 L s .11474 .5006 m .11474 .50435 L s .1626 .5006 m .1626 .50435 L s .21045 .5006 m .21045 .50435 L s .30617 .5006 m .30617 .50435 L s .35403 .5006 m .35403 .50435 L s .40189 .5006 m .40189 .50435 L s .44975 .5006 m .44975 .50435 L s .54546 .5006 m .54546 .50435 L s .59332 .5006 m .59332 .50435 L s .64118 .5006 m .64118 .50435 L s .68904 .5006 m .68904 .50435 L s .78476 .5006 m .78476 .50435 L s .83261 .5006 m .83261 .50435 L s .88047 .5006 m .88047 .50435 L s .92833 .5006 m .92833 .50435 L s .25 Mabswid 0 .5006 m 1 .5006 L s .49761 .02202 m .50386 .02202 L s [(-1)] .48511 .02202 1 0 Mshowa .49761 .26131 m .50386 .26131 L s [(-0.5)] .48511 .26131 1 0 Mshowa .49761 .7399 m .50386 .7399 L s [(0.5)] .48511 .7399 1 0 Mshowa .49761 .97919 m .50386 .97919 L s [(1)] .48511 .97919 1 0 Mshowa .125 Mabswid .49761 .06988 m .50136 .06988 L s .49761 .11773 m .50136 .11773 L s .49761 .16559 m .50136 .16559 L s .49761 .21345 m .50136 .21345 L s .49761 .30917 m .50136 .30917 L s .49761 .35703 m .50136 .35703 L s .49761 .40489 m .50136 .40489 L s .49761 .45274 m .50136 .45274 L s .49761 .54846 m .50136 .54846 L s .49761 .59632 m .50136 .59632 L s .49761 .64418 m .50136 .64418 L s .49761 .69204 m .50136 .69204 L s .49761 .78775 m .50136 .78775 L s .49761 .83561 m .50136 .83561 L s .49761 .88347 m .50136 .88347 L s .49761 .93133 m .50136 .93133 L s .25 Mabswid .49761 0 m .49761 1.00184 L s % Start of user PostScript /mathtops { gsave MBeginOrig moveto MEndOrig currentpoint grestore } bind def /MAtocoords { mathtops 4 2 roll mathtops 4 copy pop pop 3 -1 roll sub /arry exch def exch sub /arrx exch def arrx dup mul arry dup mul add sqrt /arrl exch def translate } bind def /MAarrowhead1 { gsave MAtocoords arrl 0. eq { 0 0 Mdot } { [ arrx arrl div arry arrl div -1 arry mul arrl div arrx arrl div 0 0 ] concat -0.05 0.0125 moveto 0 0 lineto -0.05 -0.0125 lineto fill -0.05 0.0125 moveto 0 0 lineto -0.05 -0.0125 lineto -0.05 0.0125 lineto stroke } ifelse grestore } def % End of user PostScript 1 0 0 r .5 Mabswid .49761 .5006 m .97619 .5006 L s % Start of user PostScript 0 0 1. 0 MAarrowhead1 % End of user PostScript 1 .286 0 r .49761 .5006 m .95482 .64203 L s % Start of user PostScript 0 0 0.955336 0.29552 MAarrowhead1 % End of user PostScript 1 .573 0 r .49761 .5006 m .8926 .77083 L s % Start of user PostScript 0 0 0.825336 0.564642 MAarrowhead1 % End of user PostScript 1 .859 0 r .49761 .5006 m .7951 .87549 L s % Start of user PostScript 0 0 0.62161 0.783327 MAarrowhead1 % End of user PostScript .854 1 0 r .49761 .5006 m .67102 .94666 L s % Start of user PostScript 0 0 0.362358 0.932039 MAarrowhead1 % End of user PostScript .568 1 0 r .49761 .5006 m .53146 .97799 L s % Start of user PostScript 0 0 0.0707372 0.997495 MAarrowhead1 % End of user PostScript .281 1 0 r .49761 .5006 m .38887 .96667 L s % Start of user PostScript 0 0 -0.227202 0.973848 MAarrowhead1 % End of user PostScript 0 1 .005 r .49761 .5006 m .25599 .91372 L s % Start of user PostScript 0 0 -0.504846 0.863209 MAarrowhead1 % End of user PostScript 0 1 .292 r .49761 .5006 m .1447 .82387 L s % Start of user PostScript 0 0 -0.737394 0.675463 MAarrowhead1 % End of user PostScript 0 1 .578 r .49761 .5006 m .06493 .70514 L s % Start of user PostScript 0 0 -0.904072 0.42738 MAarrowhead1 % End of user PostScript 0 1 .865 r .49761 .5006 m .02381 .56814 L s % Start of user PostScript 0 0 -0.989992 0.14112 MAarrowhead1 % End of user PostScript 0 .849 1 r .49761 .5006 m .02501 .42511 L s % Start of user PostScript 0 0 -0.98748 -0.157746 MAarrowhead1 % End of user PostScript 0 .562 1 r .49761 .5006 m .06843 .28882 L s % Start of user PostScript 0 0 -0.896758 -0.44252 MAarrowhead1 % End of user PostScript 0 .276 1 r .49761 .5006 m .15018 .17145 L s % Start of user PostScript 0 0 -0.725932 -0.687766 MAarrowhead1 % End of user PostScript .011 0 1 r .49761 .5006 m .26297 .08348 L s % Start of user PostScript 0 0 -0.490261 -0.871576 MAarrowhead1 % End of user PostScript .297 0 1 r .49761 .5006 m .39672 .03277 L s % Start of user PostScript 0 0 -0.210796 -0.97753 MAarrowhead1 % End of user PostScript .584 0 1 r .49761 .5006 m .53948 .02385 L s % Start of user PostScript 0 0 0.087499 -0.996165 MAarrowhead1 % End of user PostScript .87 0 1 r .49761 .5006 m .6785 .05752 L s % Start of user PostScript 0 0 0.377978 -0.925815 MAarrowhead1 % End of user PostScript 1 0 .843 r .49761 .5006 m .80136 .13077 L s % Start of user PostScript 0 0 0.634693 -0.772764 MAarrowhead1 % End of user PostScript 1 0 .557 r .49761 .5006 m .89709 .23705 L s % Start of user PostScript 0 0 0.834713 -0.550686 MAarrowhead1 % End of user PostScript 1 0 .27 r .49761 .5006 m .95713 .36688 L s % Start of user PostScript 0 0 0.96017 -0.279415 MAarrowhead1 % End of user PostScript 0 0 m 1 0 L 1 1.00184 L 0 1.00184 L closepath clip newpath % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 288.5}, ImageMargins->{{62, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgooooo`00Soooool00ol0003oooooooooo`2>ooooo`00Soooool00ol0003o ooooooooo`2>ooooo`00Soooool00ol0003oooooooooo`2>ooooo`00Q_ooool3o`0000Kooooo00?o 0000ooooooooool0S_ooool008Oooooo00?o0000ooooooooool01Oooool00ol0003oooooooooo`2> ooooo`00Ooooool5o`0000?ooooo00?o0000ooooooooool01Oooool00ol0003oooooooooo`2>oooo o`00Qoooool00ol0003oooooooooo`05ooooo`;o00002_ooool00onE0?ooooooooooo`22ooooo`00 Qoooool00ol0003oooooooooo`05ooooo`03o`000?oooooooooo00Wooooo00?oU@3oooooooooool0 P_ooool008Kooooo0_l00007ooooo`03o`000?oooooooooo00Sooooo0_nE0?n4ooooo`00L_ooool0 0om<0?ooooooooooo`0Booooo`03o`000?oooooooooo00Gooooo00?o0000ooooooooool02?ooool2 oiD0ohCooooo001booooo`03od`0oooooooooooo01[ooooo00?o0000ooooooooool02?ooool2oiD0 ohCooooo001booooo`;oC03o6oooool00ol0003oooooooooo`07ooooo`CoU@3oPoooool007;ooooo 0_m<0?lKooooo`03o`000?oooooooooo00Oooooo1?nE0?n3ooooo`00L_ooool3od`0oa[ooooo00?o 0000ooooooooool01oooool4oiD0oh?ooooo001booooo`?oC03o6_ooool00ol0003oooooooooo`06 ooooo`GoU@3oPoooool007;ooooo1?m<0?lIooooo`03o`000?oooooooooo00Kooooo1OnE0?n3oooo o`00L_ooool4od`0oaWooooo00?o0000ooooooooool01_ooool5oiD0obGooooo00?ogP3ooooooooo ool0Foooool0077ooooo1Om<0?lIooooo`03o`000?oooooooooo00Gooooo1_nE0?lUooooo`03omh0 oooooooooooo05_ooooo001aooooo`KoC03o6?ooool00ol0003oooooooooo`05ooooo`OoU@3o8ooo ool2omh0oegooooo001aooooo`KoC03o6?ooool2o`0000Kooooo1onE0?lRooooo`?ogP3oGOooool0 077ooooo1om<0?lGooooo`03o`000?oooooooooo00Cooooo2?nE0?lRooooo`;ogP3oG_ooool0077o oooo1om<0?lGooooo`03o`000?oooooooooo00Sooooo1?nE0?lQooooo`?ogP3oG_ooool0077ooooo 2?m<0?lFooooo`03o`000?oooooooooo00Sooooo00?oU@3oooooooooool08Oooool4omh0oekooooo 001;ooooo`03o`80oooooooooooo02?ooooo1Om<0?lIooooo`03o`000?oooooooooo00Sooooo00?o U@3oooooooooool08Oooool4omh0oekooooo001;ooooo`;o0P3o:?ooool00om<0?ooooooooooo`0G ooooo`03o`000?oooooooooo00Oooooo00?oU@3oooooooooool08Oooool5omh0oekooooo001;oooo o`?o0P3o9oooool00om<0?ooooooooooo`0Gooooo`03o`000?oooooooooo00Oooooo00?oU@3ooooo ooooool08?ooool6omh0oekooooo001ooooo`So0P3o8Oooool00om<0?ooooooooooo`0Eooooo`;o00002?ooool00onE0?oooooo ooooo`0Oooooo`03omh0oooooooooooo06;ooooo001>ooooo`Wo0P3o8?ooool00om<0?oooooooooo o`0Eooooo`03o`000?oooooooooo00Oooooo00?oU@3oooooooooool07oooool00ooN0?oooooooooo o`1Rooooo`00C_ooool7o`80ob?ooooo00?oC03oooooooooool05?ooool00ol0003oooooooooo`07 ooooo`03oiD0oooooooooooo01oooooo00?ogP3oooooooooool0H_ooool004oooooo1?l20?lUoooo o`03od`0oooooooooooo01Cooooo00?o0000ooooooooool01_ooool00onE0?ooooooooooo`0Ooooo o`03omh0oooooooooooo06?ooooo001?ooooo`05o`80ooooooooooooooooool20?l09?ooool00om< 0?ooooooooooo`0Dooooo`03o`000?oooooooooo00Kooooo00?oU@3oooooooooool07oooool00ooN 0?ooooooooooo`0Xooooo`;oo`3G>Oooool005?ooooo00?o0P3oooooooooool08_ooool00om<0?oo ooooooooo`0Dooooo`03o`000?oooooooooo00Kooooo00?oU@3oooooooooool07_ooool00ooN0?oo ooooooooo`0Xooooo`?oo`3G>Oooool005Cooooo00?o0P3oooooooooool08Oooool00om<0?oooooo ooooo`0Dooooo`03o`000?oooooooooo00Kooooo00?oU@3oooooooooool07_ooool00ooN0?oooooo ooooo`0Wooooo`?oo`3G>_ooool005Cooooo00?o0P3oooooooooool08_ooool00om<0?oooooooooo o`0Cooooo`03o`000?oooooooooo00Kooooo00?oU@3oooooooooool07_ooool00ooN0?oooooooooo o`0Uooooo`Goo`3G>_ooool005Gooooo00?o0P3oooooooooool08Oooool00om<0?ooooooooooo`0C ooooo`03o`000?oooooooooo00Kooooo00?oU@3oooooooooool07Oooool00ooN0?ooooooooooo`0U ooooo`Goo`3G>oooool005Gooooo00?o0P3oooooooooool08Oooool00om<0?ooooooooooo`0Coooo o`03o`000?oooooooooo00Kooooo00?oU@3oooooooooool07Oooool00ooN0?ooooooooooo`0Toooo o`Koo`3G>oooool005Kooooo00?o0P3oooooooooool08?ooool00om<0?ooooooooooo`0Cooooo`03 o`000?oooooooooo00Kooooo00?oU@3oooooooooool07?ooool00ooN0?ooooooooooo`0Sooooo`Oo o`3G??ooool005Oooooo00?o0P3oooooooooool07oooool00om<0?ooooooooooo`0Cooooo`03o`00 0?oooooooooo00Kooooo00?oU@3oooooooooool07?ooool00ooN0?ooooooooooo`0Rooooo`Ooo`3G ?Oooool005Oooooo00?o0P3oooooooooool08?ooool00om<0?ooooooooooo`0Booooo`03o`000?oo oooooooo00Kooooo00?oU@3oooooooooool07?ooool00ooN0?ooooooooooo`0Qooooo`Soo`3G?Ooo ool005Sooooo00?o0P3oooooooooool07oooool00om<0?ooooooooooo`0Booooo`03o`000?oooooo oooo00Kooooo00?oU@3oooooooooool06oooool00ooN0?ooooooooooo`0Qooooo`Soo`3G?_ooool0 05Sooooo00?o0P3oooooooooool07oooool00om<0?ooooooooooo`0Booooo`;o00001_ooool00onE 0?ooooooooooo`0Looooo`03omh0oooooooooooo02?ooooo1_oo0=Lnooooo`00:oooool2o`16obco oooo00?o0P3oooooooooool07_ooool00om<0?ooooooooooo`0Booooo`03o`000?oooooooooo00Go oooo00?oU@3oooooooooool06oooool00ooN0?ooooooooooo`0Uooooo`Coo`3G?oooool002_ooooo 0ol0A_l[ooooo`03o`80oooooooooooo01oooooo00?oC03oooooooooool04Oooool00ol0003ooooo ooooo`05ooooo`03oiD0oooooooooooo01_ooooo00?ogP3oooooooooool09Oooool4ool0ecoooooo 000/ooooo`Co04Ko:_ooool00ol20?ooooooooooo`0Nooooo`03od`0oooooooooooo017ooooo00?o 0000ooooooooool01Oooool00onE0?ooooooooooo`0Kooooo`03omh0oooooooooooo02Cooooo00Co o`3Gooooooooooooo`3G@?ooool002gooooo1Ol0A_lYooooo`03o`80oooooooooooo01gooooo00?o C03oooooooooool04Oooool00ol0003oooooooooo`05ooooo`03oiD0oooooooooooo01[ooooo00?o gP3oooooooooool09?ooool00ooo0=Ooooooooooo`12ooooo`00;Oooool6o`16obSooooo00?o0P3o ooooooooool07Oooool00om<0?ooooooooooo`0Aooooo`03o`000?oooooooooo00Gooooo00?oU@3o ooooooooool06_ooool00ooN0?ooooooooooo`0Sooooo`03ool0eooooooooooo04?ooooo000^oooo o`Oo04Ko9oooool00ol20?ooooooooooo`0Looooo`03od`0oooooooooooo017ooooo00?o0000oooo ooooool01Oooool00onE0?ooooooooooo`0Iooooo`03omh0oooooooooooo02?ooooo00?oo`3Goooo ooooool0A?ooool002kooooo2Ol0A_lUooooo`03o`80oooooooooooo01gooooo00?oC03ooooooooo ool04?ooool00ol0003oooooooooo`05ooooo`03oiD0oooooooooooo01Wooooo00?ogP3ooooooooo ool08_ooool00ooo0=Ooooooooooo`15ooooo`00;oooool9o`16obGooooo00?o0P3oooooooooool0 7?ooool00om<0?ooooooooooo`0@ooooo`03o`000?oooooooooo00Gooooo00?oU@3oooooooooool0 6Oooool00ooN0?ooooooooooo`0Rooooo`03ool0eooooooooooo04Gooooo000`ooooo`Wo04Ko9?oo ool00ol20?ooooooooooo`0Looooo`03od`0oooooooooooo013ooooo00?o0000ooooooooool01Ooo ool00onE0?ooooooooooo`0Hooooo`03omh0oooooooooooo02;ooooo00?oo`3Gooooooooool0A_oo ool0033ooooo2?l0A_lVooooo`03o`80oooooooooooo01_ooooo00?oC03oooooooooool04?ooool0 0ol0003oooooooooo`05ooooo`03oiD0oooooooooooo01Sooooo00?ogP3oooooooooool08Oooool0 0ooo0=Ooooooooooo`17ooooo`00_ooool00ol0A_ooooooooooo`0Tooooo`03o`80oooooooo oooo01Wooooo00?oC03oooooooooool03oooool00ol0003oooooooooo`04ooooo`03oiD0oooooooo oooo01Oooooo00?ogP3oooooooooool07oooool00ooo0=Ooooooooooo`1;ooooo`00>oooool00ol0 A_ooooooooooo`0Sooooo`03o`80oooooooooooo01[ooooo00?oC03oooooooooool03_ooool00ol0 003oooooooooo`04ooooo`03oiD0oooooooooooo01Kooooo00?ogP3oooooooooool07oooool00ooo 0=Ooooooooooo`1ooooo`00?_ooool00ol0A_ooooooooooo`0Rooooo`03o`80oooooooooooo01Sooooo00?o C03oooooooooool03_ooool00ol0003oooooooooo`04ooooo`03oiD0oooooooooooo01Gooooo00?o gP3oooooooooool07_ooool00ooo0=Ooooooooooo`1>ooooo`00?oooool2o`16ob?ooooo00?o0P3o ooooooooool05oooool00om<0?ooooooooooo`0>ooooo`03o`000?oooooooooo00Cooooo00?oU@3o ooooooooool05Oooool00ooN0?ooooooooooo`0Mooooo`03ool0eooooooooooo02oooooo0_oo08hN ooooo`00@Oooool00ol0A_ooooooooooo`0Pooooo`03o`80oooooooooooo01Sooooo00?oC03ooooo ooooool03Oooool00ol0003oooooooooo`04ooooo`03oiD0oooooooooooo01Cooooo00?ogP3ooooo ooooool07Oooool00ooo0=Ooooooooooo`0]ooooo`Goo`2>7_ooool004;ooooo00?o04Kooooooooo ool08?ooool00ol20?ooooooooooo`0Gooooo`03od`0oooooooooooo00gooooo00?o0000oooooooo ool01?ooool00onE0?ooooooooooo`0Dooooo`03omh0oooooooooooo01cooooo00?oo`3Goooooooo ool0:oooool7ool0SQoooooo0013ooooo`03o`16oooooooooooo01oooooo00?o0P3oooooooooool0 5oooool00om<0?ooooooooooo`0=ooooo`03o`000?oooooooooo00?ooooo00?oU@3oooooooooool0 5Oooool00ooN0?ooooooooooo`0Kooooo`03ool0eooooooooooo02Wooooo2Ooo08hPooooo`00A?oo ool00ol0A_ooooooooooo`0Oooooo`03o`80oooooooooooo01Kooooo00?oC03oooooooooool03Ooo ool00ol0003oooooooooo`03ooooo`03oiD0oooooooooooo01Cooooo00?ogP3oooooooooool07?oo ool00ooo0=Ooooooooooo`0Vooooo`_oo`2>8Oooool004Gooooo00?o04Koooooooooool07_ooool0 0ol20?ooooooooooo`0Booooo`;o00000oooool00om<0?oo0000ooooo`03ooooo`?o00001_ooool0 0ol0003oooooooooo`03ooooo`03oiD0oooooooooooo01Cooooo00?ogP3oooooooooool06oooool0 0ooo0=Ooooooooooo`0Vooooo`_oo`2>8_ooool004Kooooo00?o04Koooooooooool07_ooool00ol2 0?ooooooooooo`0@ooooo`04o`000?ooooooooooo`0000;ooooo00?oC03oooooooooool00_ooool0 1Ol0003ooooooooooooooooo000000Gooooo00?o0000ooooooooool00oooool00onE0?oooooooooo o`0Cooooo`03omh0oooooooooooo01_ooooo00?oo`3Gooooooooool09oooool:ool0SR?ooooo0017 ooooo`03o`16oooooooooooo01kooooo00?o0P3oooooooooool02?ooool5o`0000;ooooo00Co0000 oooooooooooo00000_ooool00om<0?ooooooooooo`06ooooo`03o`000?oooooooooo00?ooooo0_l0 0004ooooo`03oiD0oooooooooooo01?ooooo00?ogP3oooooooooool06_ooool00ooo0=Oooooooooo o`0Yooooo`Soo`2>9?ooool004Sooooo00?o04Koooooooooool07Oooool00ol20?ooooooooooo`0? ooooo`04o`000?ooooooooooo`0000;ooooo00?oC03oooooooooool01_ooool00ol0003ooooooooo o`03ooooo`03o`000?oooooooooo00?ooooo00?oU@3oooooooooool04oooool00ooN0?oooooooooo o`0Iooooo`03ool0eooooooooooo02[ooooo1ooo08hUooooo`00BOooool00ol0A_ooooooooooo`0M ooooo`03o`80oooooooooooo00kooooo00Co0000oooooooooooo00000_ooool00om<0?oooooooooo o`02ooooo`Co00001_ooool00ol0003oooooooooo`03ooooo`03oiD0oooooooooooo01;ooooo00?o gP3oooooooooool06Oooool00ooo0=Ooooooooooo`0Zooooo`03ool0S_ooooooo`2>00Coo`2>9_oo ool004[ooooo00?o04Koooooooooool07?ooool00ol20?ooooooooooo`0>ooooo`04o`000?oooooo ooooo`0000?ooooo00GoC03oooooooooooooooooo`000009ooooo`03o`000?oooooooooo00?ooooo 00?oU@3oooooooooool04_ooool00ooN0?ooooooooooo`0Iooooo`03ool0eooooooooooo02Sooooo 0_oo08h3ooooo`?oo`2>9oooool004_ooooo00?o04Koooooooooool07?ooool00ol20?oooooooooo o`0>ooooo`;o00001?ooool01?m<0?ooooooooooooooool5o`0000Gooooo00?o0000ooooooooool0 0oooool00onE0?ooooooooooo`0Aooooo`03omh0oooooooooooo01Wooooo00?oo`3Gooooooooool0 :?ooool00ooo08koooooooooo`04ooooo`03ool0S_oooooooooo02Kooooo001ooooo`03o`16oooooooooooo01_ooooo00?o0P3oooooooooool04_ooool00om< 0?ooooooooooo`0;ooooo`03o`000?oooooooooo00;ooooo00?oU@3oooooooooool04Oooool00ooN 0?ooooooooooo`0Gooooo`03ool0eooooooooooo02Kooooo0_oo08hcooooo`005?ooool3o`2?ocSo oooo00?o04Koooooooooool06_ooool00ol20?ooooooooooo`0Cooooo`03od`0oooooooooooo00[o oooo00?o0000ooooooooool00_ooool00onE0?ooooooooooo`0Aooooo`03omh0oooooooooooo01Ko oooo00?oo`3Gooooooooool09_ooool00ooo08koooooooooo`0cooooo`005_ooool6o`2?ocCooooo 00?o04Koooooooooool06_ooool00ol20?ooooooooooo`0Booooo`03od`0oooooooooooo00[ooooo 00?o0000ooooooooool00_ooool00onE0?ooooooooooo`0@ooooo`03omh0oooooooooooo01Oooooo 00?oo`3Gooooooooool09?ooool2ool0SSKooooo000Gooooo`[o08oo>Oooool001Wooooo2_l0Sol`ooooo`;o04Ko6Oooool00ol20?ooooooooooo`0Boooo o`03od`0oooooooooooo00Wooooo00?o0000ooooooooool00_ooool00onE0?ooooooooooo`0?oooo o`03omh0oooooooooooo01Gooooo00?oo`3Gooooooooool08oooool00ooo08koooooooooo`0ioooo o`006_ooool8o`2?oc?ooooo00?o04Koooooooooool05oooool00ol20?ooooooooooo`0Aooooo`03 od`0oooooooooooo00Wooooo00?o0000ooooooooool00_ooool00onE0?ooooooooooo`0?ooooo`03 omh0oooooooooooo01Cooooo00?oo`3Gooooooooool08_ooool2ool0SScooooo000Kooooo`Oo08oo =?ooool00ol0A_ooooooooooo`0Gooooo`03o`80oooooooooooo013ooooo00?oC03oooooooooool0 2Oooool2o`0000?ooooo00?oU@3oooooooooool03_ooool00ooN0?ooooooooooo`0Eooooo`03ool0 eooooooooooo027ooooo00?oo`2>ooooooooool0??ooool001cooooo1Ol0Sol00ooooooo08ooo`2? o`0cooooo`03o`16oooooooooooo01Kooooo00?o0P3oooooooooool04?ooool00om<0?oooooooooo o`09ooooo`03o`000?oooooooooo00;ooooo00?oU@3oooooooooool03_ooool00ooN0?oooooooooo o`0Dooooo`03ool0eooooooooooo023ooooo0_oo08hoooooo`007Oooool4o`2?o`?ooooo0_l0Solb ooooo`03o`16oooooooooooo01Kooooo00?o0P3oooooooooool03oooool00om<0?ooooooooooo`09 ooooo`03o`000?oooooooooo00;ooooo00?oU@3oooooooooool03Oooool00ooN0?ooooooooooo`0D ooooo`03ool0eooooooooooo023ooooo00?oo`2>ooooooooool0?oooool001kooooo0ol0Sol5oooo o`;o08oo@_ooool001oooooo00?o08oooooooooo ool01_ooool2o`2?oc3ooooo00?o04Koooooooooool05Oooool00ol20?ooooooooooo`0?ooooo`03 od`0oooooooooooo00Sooooo00?o0000ooooooooool00_ooool00onE0?ooooooooooo`0=ooooo`03 omh0oooooooooooo01;ooooo00?oo`3Gooooooooool07oooool00ooo08koooooooooo`12ooooo`00 :_ooool2o`2?oboooooo00?o04Koooooooooool05?ooool00ol20?ooooooooooo`0?ooooo`03od`0 oooooooooooo00Sooooo00Go0000oooooooooooooooooiD0o`0?ooooo`03omh0oooooooooooo01;o oooo00?oo`3Gooooooooool07_ooool2ool0STGooooo000/ooooo`;o08oo;_ooool00ol0A_oooooo ooooo`0Dooooo`03o`80oooooooooooo00kooooo00?oC03oooooooooool02?ooool01Ol0003ooooo ooooooooooooU@3o00oooooo00?ogP3oooooooooool04_ooool00ooo0=Ooooooooooo`0Mooooo`03 ool0S_oooooooooo04Gooooo000^ooooo`;o08oo;Oooool00ol0A_ooooooooooo`0Dooooo`03o`80 oooooooooooo00kooooo00?oC03oooooooooool01oooool01Ol0003oooooooooooooooooU@3o00ko oooo00?ogP3oooooooooool04_ooool00ooo0=Ooooooooooo`0Looooo`;oo`2>B?ooool0033ooooo 0_l0Sol/ooooo`03o`16oooooooooooo01?ooooo00?o0P3oooooooooool03_ooool00om<0?oooooo ooooo`07ooooo`05o`000?oooooooooooooooonE0?l03_ooool00ooN0?ooooooooooo`0Aooooo`03 ool0eooooooooooo01cooooo00?oo`2>ooooooooool0B?ooool003;ooooo0_l0Sol[ooooo`03o`16 oooooooooooo01?ooooo00?o0P3oooooooooool03Oooool00om<0?ooooooooooo`07ooooo`05o`00 0?oooooooooooooooonE0?l03_ooool00ooN0?ooooooooooo`0@ooooo`03ool0eooooooooooo01_o oooo0_oo08i;ooooo`00=?ooool2o`2?ob[ooooo00?o04Koooooooooool04_ooool00ol20?oooooo ooooo`0=ooooo`03od`0oooooooooooo00Oooooo00Go0000oooooooooooooooooiD0o`0=ooooo`03 omh0oooooooooooo013ooooo00?oo`3Gooooooooool06oooool00ooo08koooooooooo`1;ooooo`00 =_ooool2o`2?obWooooo00?o04Koooooooooool04_ooool00ol20?ooooooooooo`0DOooool003cooooo 0_l0SolVooooo`03o`16oooooooooooo013ooooo00?o0P3oooooooooool03?ooool00om<0?oooooo ooooo`06ooooo`;o00000_ooool00onE0?ooooooooooo`0:ooooo`03omh0oooooooooooo00kooooo 00?oo`3Gooooooooool06?ooool00ooo08koooooooooo`1Aooooo`00?_ooool2o`2?obGooooo00?o 04Koooooooooool04?ooool00ol20?ooooooooooo`0;ooooo`03od`0oooooooooooo00Kooooo00Go 0000oooooooooooooooooiD0o`0;ooooo`03omh0oooooooooooo00kooooo00?oo`3Gooooooooool0 5oooool2ool0SUCooooo0010ooooo`;o08oo9?ooool00ol0A_ooooooooooo`0@ooooo`03o`80oooo oooooooo00[ooooo00?oC03oooooooooool01_ooool01?l0003ooooooooooonE0?looooo`03ool0 eooooooooooo01Gooooo0_oo08hjooooo`koo`153oooool004Cooooo0_l0SolSooooo`03o`16oooo oooooooo00kooooo00?o0P3oooooooooool02_ooool00om<0?ooooooooooo`05ooooo`04o`000?oo oooooooooiD0o`_ooooo00?ogP3oooooooooool03Oooool00ooo0=Ooooooooooo`0Eooooo`03ool0 S_oooooooooo03[ooooo3Ooo04D@ooooo`00A_ooool2o`2?ob;ooooo00?o04Koooooooooool03Ooo ool00ol20?ooooooooooo`0:ooooo`03od`0oooooooooooo00Gooooo00Co0000ooooooooooooU@3o 2oooool00ooN0?ooooooooooo`0ooooooooool0>Oooool4ool0A@Cooooo1Ooo04DGooooo`00C_oo ool2o`2?oakooooo00?o04Koooooooooool03?ooool00ol20?ooooooooooo`08ooooo`03od`0oooo oooooooo00Cooooo00Co0000ooooooooooooU@3o2Oooool00ooN0?ooooooooooo`0;ooooo`03ool0 eooooooooooo017ooooo0_oo08hiooooo`?oo`152Oooool2ool0AAWooooo001@ooooo`?o08oo7?oo ool00ol0A_ooooooooooo`0;ooooo`03o`80oooooooooooo00Sooooo00?oC03oooooooooool01?oo ool01?l0003ooooooooooonE0?l9ooooo`03omh0oooooooooooo00[ooooo00?oo`3Gooooooooool0 4Oooool00ooo08koooooooooo`0eooooo`Coo`153?ooool00ooo04Goooooooooo`0Hooooo`00Dooo ool2o`2?oa_ooooo00?o04Koooooooooool02oooool00ol20?ooooooooooo`07ooooo`03od`0oooo oooooooo00Cooooo00Co0000ooooooooooooU@3o2?ooool00ooN0?ooooooooooo`0:ooooo`03ool0 eooooooooooo013ooooo0_oo08heooooo`?oo`15:oooool005Gooooo0_l0SolJooooo`03o`16oooo oooooooo00[ooooo00?o0P3oooooooooool02?ooool00om<0?ooooooooooo`03ooooo`04o`000?oo oooooooooiD0o`Sooooo00?ogP3oooooooooool02Oooool00ooo0=Ooooooooooo`0@ooooo`03ool0 S_oooooooooo03;ooooo0ooo04D^ooooo`00Eoooool2o`2?oaWooooo00?o04Koooooooooool02_oo ool00ol20?ooooooooooo`07ooooo`03od`0oooooooooooo00?ooooo0_l000000onE0?oooooooooo o`06ooooo`03omh0oooooooooooo00Wooooo00?oo`3Gooooooooool03oooool2ool0SS7ooooo1?oo 04Daooooo`00FOooool2o`2?oaSooooo00?o04Koooooooooool02Oooool00ol20?ooooooooooo`07 ooooo`03od`0oooooooooooo00?ooooo00?o0000oooooonE0?l02?ooool00ooN0?ooooooooooo`09 ooooo`03ool0eooooooooooo00kooooo00?oo`2>ooooooooool0;_ooool3ool0ACGooooo001Koooo o`;o08oo5oooool00ol0A_ooooooooooo`09ooooo`03o`80oooooooooooo00Kooooo00?oC03ooooo ooooool00oooool00ol0003ooooooiD0o`08ooooo`03omh0oooooooooooo00Sooooo00?oo`3Goooo ooooool03Oooool2ool0SRkooooo0ooo04Dhooooo`00GOooool2o`2?oaKooooo00?o04Kooooooooo ool02Oooool00ol20?ooooooooooo`05ooooo`03od`0oooooooooooo00?ooooo00?o0000oooooonE 0?l01oooool00ooN0?ooooooooooo`08ooooo`03ool0eooooooooooo00gooooo00?oo`2>oooooooo ool0:_ooool4ool0AC_ooooo001Oooooo`;o08oo5Oooool00ol0A_ooooooooooo`08ooooo`03o`80 oooooooooooo00Kooooo00?oC03oooooooooool00_ooool00ol0003ooooooiD0o`07ooooo`03omh0 oooooooooooo00Oooooo00?oo`3Gooooooooool03?ooool2ool0SR[ooooo0ooo04Doooooo`003ooo ool8o`3Iod[ooooo0_l0SolDooooo`03o`16oooooooooooo00Sooooo00?o0P3oooooooooool01Ooo ool00om<0?ooooooooooo`02ooooo`03o`000?ooooooU@3o00Kooooo00?ogP3oooooooooool01ooo ool00ooo0=Ooooooooooo`09_ooool4ool0ADGooooo0009ooooo`ko0=WoC_ooool2o`2? oa;ooooo00?o04Koooooooooool01oooool00ol20?ooooooooooo`04ooooo`03od`0oooooooooooo 00;ooooo00?o0000oooooonE0?l01_ooool00ooN0?ooooooooooo`06ooooo`03ool0eooooooooooo 00[ooooo00?oo`2>ooooooooool08oooool3ool0ADWooooo000 7oooool3ool0AE?ooooo000Cooooo`?o0=Wo3_ooool6o`3Iod?ooooo0_l0Sol?ooooo`03o`16oooo oooooooo00Cooooo00?o0P3oooooooooool00oooool01om<0?oooooooooooooooooo0000oooooonE 0?l01?ooool00ooN0?ooooooooooo`04ooooo`03ool0eooooooooooo00Sooooo00?oo`2>oooooooo ool06oooool4ool0AEKooooo000Eooooo`03o`3Ioooooooooooo01;ooooo1_l0fOloooooo`;o08oo 3_ooool00ol0A_ooooooooooo`04ooooo`03o`80oooooooooooo00;ooooo00KoC03ooooooooooooo ooooo`000?nE0?l5ooooo`03omh0oooooooooooo00Cooooo00?oo`3Gooooooooool01_ooool2ool0 SQ_ooooo0ooo04EJooooo`005oooool4ool0AF3ooooo000mooooo`Ko0=Wo<_ooool2o`2?o`_o oooo00?o04Koooooooooool00_ooool00ol20?ooooooooooo`02ooooo`05od`0ooooooooooooo`00 0?nE0?l00oooool00ooN0?ooooooooooo`03ooooo`03ool0eooooooooooo00Gooooo00?oo`2>oooo ooooool05?ooool3ool0AFCooooo0007ooooo`?o0000>Oooool6o`3Io`?ooooo00?o0000oooooooo ool00_ooool3o`0002?ooooo0_l0Sol:ooooo`03o`16oooooooooooo00;ooooo00Go0P3ooooooooo oooooooood`0o`02ooooo`03o`000?nE0?oooooo00;ooooo00?ogP3oooooooooool00_ooool00ooo 0=Ooooooooooo`04ooooo`;oo`2>5?ooool3ool0AA?ooooo0_l00004ooooo`03o`000?oooooooooo 00;ooooo0ol0000looooo`?o00001oooool000Sooooo00?o0000ooooooooool0>_ooool01?l0003o ooooooooool00006o`3Io`03ooooool0003ooooo00;ooooo00?o0000ooooooooool08_ooool2o`2? o`Wooooo00Go04Koooooooooooooooooo`80o`04ooooo`04od`0oooooooo0000oiD0o`?ooooo00Go gP3oooooooooooooooooool0e`06ooooo`03ool0S_oooooooooo013ooooo1?oo04DEooooo`04o`00 0?ooooooooooo`0000Oooooo00Go0000ooooooooooooooooo`00000looooo`03o`000?oooooooooo 00Kooooo0005o`0000?ooooo00?o0000ooooooooool0_ooool00ol0003oooooooooo`06ooooo`002?ooool00ol0003oooooooooo`0jooooo`04o`000?oo ooooooooo`0000_ooooo00?o0000o`3Iool0fOl01?l0fOlRooooo`;o08oo1oooool01Ol0A_oooooo oooooooooooo0P3o00;ooooo00CoC03oooooool0003oU@3o0_ooool01OoN0?oooooooooooooooooo o`3G00Cooooo00?oo`2>ooooooooool03Oooool3ool0AAcooooo00Co0000oooooooooooo00002ooo ool00ol0003oooooooooo`0jooooo`03o`000?oooooooooo00Kooooo0008ooooo`03o`000?oooooo oooo03[ooooo00Co0000oooooooooooo00001oooool4o`0000Oooooo1ol0fOlMooooo`;o08oo1_oo ool01?l0A_ooooooooooool20?l2ooooo`06od`0oooooooo0000oiD0oooooooogP3o0oooool01?oo 0=Ooooooooooooooool2ool0SPcooooo1?oo04DOooooo`04o`000?ooooooooooo`0000Oooooo1?l0 000mooooo`03o`000?oooooooooo00Kooooo0007ooooo`;o0000??ooool01?l0003oooooooooool0 0007ooooo`03o`000?oooooooooo00oooooo1_l0fOlIooooo`;o08oo1Oooool02ol0A_oooooooooo ool20?oooooood`0oooooooo0000oiD0oooooooogP3o00;ooooo00Goo`3Gooooooooooooooooool0 SP0;ooooo`?oo`158oooool01?l0003oooooooooool00007ooooo`03o`000?oooooooooo03gooooo 0_l00008ooooo`002?ooool00ol0003oooooooooo`0kooooo`;o00002?ooool5o`0001?ooooo1_l0 fOlEooooo`;o08oo1?ooool00ol0A_ooooooo`80o`02ooooo`07od`0ool0003oU@3ooooooooN0?oo ooooool0e`02ooooo`;oo`2>2?ooool4ool0ABOooooo0_l00008ooooo`Go0000??ooool00ol0003o ooooooooo`06ooooo`00K_ooool6o`3Ioa7ooooo0_l0Sol3ooooo`08o`16oooooooo0P3ooooooom< 0?ooU@3ooooooooN0?l2ooooo`03ool0eoooooooo`2>00Oooooo0ooo04Eoooooo`00M?ooool6o`3I o`gooooo0_l0Sol2ooooo`09o`16ool20?oooooood`0oonE0?ooooooomh0ooooooooo`3G00;oo`2> 1Oooool3ool0AF_ooooo0ooo000Dooooo`00N_ooool7o`3Io`Sooooo0_l0Sol02Ooooooo04Koo`80 oom<0?ooU@3oomh0ooooooooo`3Gool0SP03ooooo`Coo`15K_ooool7ool0013ooooo0021ooooo`Ko 0=Wo1?ooool2o`2?o`04o`16oom<0?ooU@3oomh0o`;oo`2>00Coooooool0AOoo04Goo`15L_ooool: ool000gooooo0027ooooo`Ko0=Wo00Co08ooo`80oonE0?ooo`2>0ooo04Eeooooo`koo`002Oooool0 08_o00000_l0omd2o`3Io`;oo`1500?oodT0ool00?oo0000QOoo0007o`0000001_ooool00ol0003o ooooooooo`0:ooooo`03o`000?oooooooooo00_ooooo00?o0000ooooooooool02oooool00ol0003o ooooooooo`0:ooooo`03o`000?oooooooooo00_ooooo00?o0000ooooooooool02oooool00ol0003o ooooooooo`0:ooooo`03o`000?oooooooooo00_ooooo00?o0000ooooooooool02oooool00ol0003o ooooooooo`07o`3og@07ooooool0oi?o0?nCooooool0o`7ooooooonB0003oom900Oooooo00?o0000 ooooooooool02oooool00ol0003oooooooooo`0;ooooo`03o`000?oooooooooo00[ooooo00?o0000 ooooooooool02oooool00ol0003oooooooooo`0;ooooo`03o`000?oooooooooo00_ooooo00?o0000 ooooooooool02_ooool00ol0003oooooooooo`0:ooooo`goo`000_ooool00ol0003oooooooooo`05 ooooo`00OOooool7o`3og@Kooooo0_l0oi<01_l0od[oooooo`3o0Om7o`3of_l0ooooo`;ooi8000Co oooooom90?ooB@3oodT0LOooool8ool000oooooo001fooooo`Oo0?oM2oooool2o`3oT`08ooooool0 od[oooooooooool0o`7oTOl0om[o0?oof`02ooooo`04oonB0?ooooooooooooooo`?oodT0K_ooool3 ool001Cooooo001_ooooo`Oo0?oM3oooool3o`3oT`;ooooo00Wo0?m:oooooooooooo0?l1odOo0?nA o`3of_l0oooooooof`000_ooool2oonB00Cooooo1?ooB@21ooooo`00J?ooool7o`3ogACooooo0_l0 oi<4ooooo`0;o`3oB_ooooooooooo`3o0OooooooAol0oi7o0?oooooof_l0oooooooof`000oooool0 0oooTP3oooooooooo`05ooooo`?oodT0O_ooool0063ooooo2?l0omdIooooo`;o0?nC1Oooool03?l0 od[ooooooooooooooooo0?l1oooooom7o`3oTOl0oooooooJo`3ooooooooK00Cooooo0_ooTP08oooo o`?oodT0Noooool005Wooooo1ol0omdOooooo`;o0?nC1_ooool02Ol0od[ooooooooooooooooo0?l1 oooooom7o`3ooooooi7o0002ooooo`03om[o0?ooooooom/000Gooooo00?ooi80ooooooooool02?oo ool4oom907Oooooo001Booooo`Oo0?oM9?ooool2o`3oT`Oooooo00?o0?m:ooooooooool00_ooool0 1Ol0o`7oooooodOo0?ooooooTOl000;ooooo00Cof_l0ooooooooooooom/01Oooool00oooTP3ooooo ooooo`0;ooooo`?oodT0M?ooool004_ooooo1ol0omdYooooo`;o0?nC2?ooool00ol0od[ooooooooo o`02ooooo`09o`3o0OooooooooooodOo0?oooooo0000oi7o0?oooooof_l000?ooooo00?oom/0oooo ooooool00oooool2oonB00kooooo0oooB@1aooooo`00A?ooool7o`3ogBkooooo0_l0oi<8ooooo`;o 0?m:1?ooool02?l0o`7oooooooooooooooooAol0ooooool0003oTOl00_ooool01OoJo`3ooooooooo ooooooooom/000Kooooo00?ooi80ooooooooool03_ooool3oom906kooooo000mooooo`Oo0?oM<_oo ool3o`3oT`Wooooo00?o0?m:ooooooooool01?ooool01?l0o`7ooooooooooom7o`02ooooo`05o`00 0?nAo`3ooooooooooooJo`000oooool00ooof`3oooooooooo`05ooooo`;ooi804Oooool4oom906[o oooo000fooooo`Oo0?oM=oooool2o`3oT`_ooooo00?o0?m:ooooooooool01?ooool01Ol0o`7ooooo ooooooooooooAol000;ooooo00Go0000oi7o0?ooooooooooom[o0004ooooo`03oooK0?oooooooooo 00Kooooo00?ooi80ooooooooool04_ooool3oom906Oooooo000Dooooo`;o0?oM6?ooool8o`3ogCco oooo0_l0oi<ooooo`03o`3o0Ooooooooooo00Sooooo00?oAol0ooooooooool01Oooool0 0ol0003ooooooi7o0009ooooo`03om[o0?oooooooooo00[ooooo00?oom/0ooooooooool04oooool2 oonB03Oooooo0oooB@0Vooooo`00Aoooool3o`3oTb3ooooo00?o0?m:ooooooooool03oooool00ol0 o`7oooooooooo`08ooooo`03odOo0?oooooooooo00Gooooo00?o0000oooooonAo`002_ooool00ooJ o`3oooooooooo`0:ooooo`03oooK0?oooooooooo01Cooooo00?ooi80ooooooooool0=oooool4oom9 00Oooooo0_ooB@0Iooooo`00AOooool2o`3oTb;ooooo00?o0?m:ooooooooool03oooool00ol0o`7o ooooooooo`09ooooo`03odOo0?oooooooooo00Gooooo00?o0000oooooonAo`002_ooool00ooJo`3o ooooooooo`0;ooooo`03oooK0?oooooooooo01Cooooo0_ooTP0kooooo`?oodT01?ooool4oom901Oo oooo0013ooooo`;o0?nC8oooool00ol0od[oooooooooo`0@ooooo`03o`3o0Ooooooooooo00Wooooo 00?oAol0ooooooooool01Oooool00ol0003ooooooi7o000:ooooo`03om[o0?oooooooooo00_ooooo 00?oom/0ooooooooool05_ooool00oooTP3oooooooooo`0kooooo`[oodT05Oooool0047ooooo0_l0 oi_ooool=oom9013ooooo000kooooo`;o 0?nC9oooool00ol0od[oooooooooo`0Aooooo`03o`3o0Ooooooooooo00_ooooo00?oAol0oooooooo ool01_ooool01?l0003ooooooooooonAo`0;ooooo`03om[o0?oooooooooo00gooooo00?oom/0oooo ooooool06?ooool00oooTP3oooooooooo`0gooooo`ooodT03_ooool003Sooooo0ol0oiooooo`03odOo0?oooooooooo00Wooooo00Co0000ooooooooooooTOl03oooool00ooJo`3o ooooooooo`0Aooooo`03oooK0?oooooooooo01kooooo0_ooTP17ooooo`007?ooool3o`3oT`Cooooo 0_l0oiooooo`03o`3oB_oo oooooooo01_ooooo00?o0?l1ooooooooool04_ooool00om7o`3oooooooooo`0;ooooo`05o`000?oo oooooooooooooonAo`004_ooool00ooJo`3oooooooooo`0Dooooo`03oooK0?oooooooooo02Kooooo 00?ooi80ooooooooool0=oooool004gooooo00?o0?m:ooooooooool07?ooool00ol0o`7ooooooooo o`0Booooo`03odOo0?oooooooooo00_ooooo00Go0000oooooooooooooooooi7o000Booooo`03om[o 0?oooooooooo01Gooooo00?oom/0ooooooooool09_ooool2oonB03Oooooo001;ooooo`;o0?m:7_oo ool00ol0o`7oooooooooo`0Booooo`03odOo0?oooooooooo00cooooo00Go0000oooooooooooooooo oi7o000Booooo`03om[o0?oooooooooo01Kooooo00?oom/0ooooooooool09oooool00oooTP3ooooo ooooo`0dooooo`00B_ooool00ol0od[oooooooooo`0Nooooo`03o`3o0Ooooooooooo01;ooooo00?o Aol0ooooooooool03?ooool01Ol0003oooooooooooooooooTOl001?ooooo00?of_l0ooooooooool0 5_ooool00ooof`3oooooooooo`0Wooooo`;ooi80=?ooool004Wooooo00?o0?m:ooooooooool07_oo ool00ol0o`7oooooooooo`0Cooooo`03odOo0?oooooooooo00cooooo00Go0000oooooooooooooooo oi7o000Cooooo`03om[o0?oooooooooo01Oooooo00?oom/0ooooooooool0:?ooool00oooTP3ooooo ooooo`0aooooo`00B?ooool00ol0od[oooooooooo`0Nooooo`03o`3o0Ooooooooooo01Cooooo00?o Aol0ooooooooool03?ooool01Ol0003oooooooooooooooooTOl001Cooooo00?of_l0ooooooooool0 5_ooool00ooof`3oooooooooo`0Yooooo`;ooi80oooool00ol0od[oooooooooo`0Tooooo`03o`3o0Ooooooooooo01So oooo00?oAol0ooooooooool03oooool00ol0003oooooooooo`02ooooo`03oi7o0?oooooooooo01Go oooo00?of_l0ooooooooool07?ooool00ooof`3oooooooooo`0_ooooo`?ooi808?ooool003[ooooo 00?o0?m:ooooooooool09Oooool00ol0o`7oooooooooo`0Hooooo`03odOo0?oooooooooo00oooooo 00?o0000ooooooooool00_ooool00onAo`3oooooooooo`0Fooooo`03om[o0?oooooooooo01cooooo 00?oom/0ooooooooool0Oooool00ol0od[ooooooooo o`0Uooooo`03o`3o0Ooooooooooo01Sooooo00?oAol0ooooooooool04?ooool00ol0003ooooooooo o`02ooooo`03oi7o0?oooooooooo01Kooooo00?of_l0ooooooooool07Oooool00ooof`3ooooooooo o`1@ooooo`00>?ooool00ol0od[oooooooooo`0Uooooo`03o`3o0Ooooooooooo01Wooooo00?oAol0 ooooooooool04?ooool00ol0003oooooooooo`02ooooo`03oi7o0?oooooooooo01Kooooo00?of_l0 ooooooooool07Oooool00ooof`3oooooooooo`1@ooooo`00<_ooool00ol0od[oooooooooo`02oooo o`03o`3oB_oooooooooo02Kooooo00?o0?l1ooooooooool06Oooool00om7o`3oooooooooo`0@oooo o`03o`000?oooooooooo00;ooooo00?oTOl0ooooooooool05oooool00ooJo`3oooooooooo`0Moooo o`03oooK0?oooooooooo04oooooo000booooo`05o`3oB_ooooooooooooooool0odX0:?ooool00ol0 o`7oooooooooo`0Jooooo`03odOo0?oooooooooo013ooooo00?o0000ooooooooool00_ooool00onA o`3oooooooooo`0Gooooo`03om[o0?oooooooooo01kooooo00?oom/0ooooooooool0C_ooool0037o oooo1Ol0odXYooooo`03o`3o0Ooooooooooo01Wooooo00?oAol0ooooooooool04Oooool2o`0000?o oooo00?oTOl0ooooooooool05oooool00ooJo`3oooooooooo`0Oooooo`03oooK0?oooooooooo04go oooo000`ooooo`Go0?m::Oooool00ol0o`7oooooooooo`0Jooooo`03odOo0?oooooooooo017ooooo 00?o0000ooooooooool00_ooool00onAo`3oooooooooo`0Hooooo`03om[o0?oooooooooo01oooooo 00?oom/0ooooooooool0C?ooool0033ooooo1_l0odXWooooo`03o`3o0Ooooooooooo01_ooooo00?o Aol0ooooooooool04Oooool00ol0003oooooooooo`03ooooo`03oi7o0?oooooooooo01Oooooo00?o f_l0ooooooooool07oooool00ooof`3oooooooooo`1ooooo`;o0?l10_ooool00ol0o`7oooooooooo`0Qooooo`03odOo0?oooooooooo01Kooooo 00?o0000ooooooooool01?ooool00onAo`3oooooooooo`0Nooooo`03om[o0?oooooooooo02Kooooo 0ooof`0mooooo`00C_ooool4o`3o0BCooooo00?oAol0ooooooooool05_ooool00ol0003ooooooooo o`04ooooo`03oi7o0?oooooooooo01kooooo00?of_l0ooooooooool0:?ooool2oooK03cooooo001= ooooo`Oo0?l18_ooool00om7o`3oooooooooo`0Fooooo`03o`000?oooooooooo00Cooooo00?oTOl0 ooooooooool07oooool00ooJo`3oooooooooo`0Xooooo`03oooK0?oooooooooo03[ooooo001=oooo o`So0?l18?ooool00om7o`3oooooooooo`0Gooooo`03o`000?oooooooooo00Cooooo00?oTOl0oooo ooooool07oooool00ooJo`3oooooooooo`0Yooooo`03oooK0?oooooooooo03Wooooo001=ooooo`Oo 0?l18Oooool00om7o`3oooooooooo`0Gooooo`03o`000?oooooooooo00Cooooo00?oTOl0oooooooo ool07oooool00ooJo`3oooooooooo`1Uooooo`00C?ooool7o`3o0B;ooooo00?oAol0ooooooooool0 5oooool2o`0000Gooooo00?oTOl0ooooooooool08?ooool00ooJo`3oooooooooo`1Tooooo`00C?oo ool6o`3o0B?ooooo00?oAol0ooooooooool05oooool00ol0003oooooooooo`04ooooo`03oi7o0?oo oooooooo023ooooo00?of_l0ooooooooool0I?ooool004cooooo1Ol0o`4Sooooo`03odOo0?oooooo oooo01Sooooo00?o0000ooooooooool01?ooool00onAo`3oooooooooo`0Qooooo`03om[o0?oooooo oooo06?ooooo001;ooooo`Go0?l19?ooool00om7o`3oooooooooo`0Hooooo`03o`000?oooooooooo 00Cooooo00?oTOl0ooooooooool08Oooool00ooJo`3oooooooooo`1Sooooo`00Boooool4o`3o0BGo oooo00?oAol0ooooooooool06?ooool00ol0003oooooooooo`04ooooo`03oi7o0?oooooooooo027o oooo00?of_l0ooooooooool00_oJo`1Qooooo`00Boooool3o`3o0BKooooo00?oAol0ooooooooool0 6?ooool00ol0003oooooooooo`05ooooo`03oi7o0?oooooooooo023ooooo1OoJo`1Qooooo`00B_oo ool3o`3o0BKooooo00?oAol0ooooooooool06Oooool00ol0003oooooooooo`05ooooo`03oi7o0?oo oooooooo01kooooo1ooJo`1Qooooo`00B_ooool2o`3o0BOooooo00?oAol0ooooooooool06Oooool0 0ol0003oooooooooo`05ooooo`03oi7o0?oooooooooo01kooooo1ooJo`1Qooooo`00B_ooool00ol0 o`7oooooooooo`0Vooooo`03odOo0?oooooooooo01Wooooo00?o0000ooooooooool01Oooool00onA o`3oooooooooo`0Oooooo`Oof_l0H?ooool004Wooooo00?o0?l1ooooooooool08oooool3odOo0003 oooooom7o`3ooooo01[ooooo00?o0000ooooooooool01Oooool00onAo`3oooooooooo`0Pooooo`Ko f_l0H?ooool006oooooo1_m7o`0Jooooo`03o`000?oooooooooo00Gooooo00?oTOl0ooooooooool0 8?ooool6om[o063ooooo001_ooooo`SoAol06?ooool00ol0003oooooooooo`05ooooo`03oi7o0?oo oooooooo027ooooo1OoJo`1Pooooo`00Koooool8odOo01Sooooo00?o0000ooooooooool01Oooool0 0onAo`3oooooooooo`0Rooooo`Cof_l0H?ooool006oooooo1om7o`0Iooooo`03o`000?oooooooooo 00;ooooo2?nAo`0Pooooo`Cof_l0H?ooool006oooooo1om7o`0Iooooo`;o00000oooool8oi7o027o oooo0ooJo`1Pooooo`00Koooool6odOo01[ooooo00?o0000ooooooooool00_ooool8oi7o02;ooooo 0ooJo`1Oooooo`00Koooool6odOo01[ooooo00?o0000ooooooooool00oooool6oi7o02?ooooo0ooJ o`1Oooooo`00Koooool5odOo01_ooooo00?o0000ooooooooool00oooool6oi7o02Cooooo0_oJo`1O ooooo`00Koooool4odOo01cooooo00?o0000ooooooooool00oooool6oi7o02Gooooo00?of_l0oooo ooooool0GOooool006oooooo1?m7o`0Looooo`03o`000?oooooooooo00Cooooo1OnAo`25ooooo`00 Koooool3odOo01gooooo00?o0000ooooooooool01?ooool5oi7o08Gooooo001_ooooo`?oAol07Ooo ool00ol0003oooooooooo`04ooooo`CoTOl0Q_ooool006oooooo0_m7o`0Nooooo`03o`000?oooooo oooo00Cooooo1?nAo`26ooooo`00Koooool2odOo01kooooo00?o0000ooooooooool01Oooool3oi7o 08Kooooo001_ooooo`03odOo0?oooooooooo01gooooo00?o0000ooooooooool01Oooool3oi7o08Ko oooo0026ooooo`?o00001_ooool00ol0003oooooooooo`05ooooo`?oTOl0Q_ooool008Oooooo00?o 0000ooooooooool01Oooool00ol0003oooooooooo`06ooooo`03oi7o0?oooooooooo08Gooooo0027 ooooo`03o`000?oooooooooo00Gooooo00?o0000ooooooooool01_ooool00onAo`3oooooooooo`25 ooooo`00Qoooool00ol0003oooooooooo`05ooooo`;o0000Soooool008Oooooo00?o0000oooooooo ool01Oooool00ol0003oooooooooo`2>ooooo`00Q_ooool2o`0000Oooooo00?o0000ooooooooool0 S_ooool008Oooooo00?o0000ooooooooool01Oooool00ol0003oooooooooo`2>ooooo`00Soooool0 0ol0003oooooooooo`2>ooooo`00Soooool00ol0003oooooooooo`2>ooooo`00Soooool00ol0003o ooooooooo`2>ooooo`00\ \>"], ImageRangeCache->{{{0, 287}, {287.5, 0}} -> {-1.04378, -1.04793, \ 0.00729456, 0.00729456}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Closed]], Cell["Applying A once to these arrows gives", "Text"], Cell[BoxData[ \(\(Table[A . {Cos[x], Sin[x]}, {x, 0, 2\ \[Pi], .3}];\)\)], "Input"], Cell[CellGroupData[{ Cell["\<\ Show[Graphics[ Map[arrow,%] ],AspectRatio->Automatic ,Axes->Automatic, PlotRange -> All]\ \>", "Input", CellTags->"S5.27.1"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .522 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.499915 0.242045 0.261095 0.242045 [ [.01582 .2486 -6 -9 ] [.01582 .2486 6 0 ] [.25787 .2486 -6 -9 ] [.25787 .2486 6 0 ] [.74196 .2486 -3 -9 ] [.74196 .2486 3 0 ] [.98401 .2486 -3 -9 ] [.98401 .2486 3 0 ] [.48741 .01905 -12 -4.5 ] [.48741 .01905 0 4.5 ] [.48741 .14007 -24 -4.5 ] [.48741 .14007 0 4.5 ] [.48741 .38212 -18 -4.5 ] [.48741 .38212 0 4.5 ] [.48741 .50314 -6 -4.5 ] [.48741 .50314 0 4.5 ] [ 0 0 0 0 ] [ 1 .522 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash .01582 .2611 m .01582 .26735 L s [(-2)] .01582 .2486 0 1 Mshowa .25787 .2611 m .25787 .26735 L s [(-1)] .25787 .2486 0 1 Mshowa .74196 .2611 m .74196 .26735 L s [(1)] .74196 .2486 0 1 Mshowa .98401 .2611 m .98401 .26735 L s [(2)] .98401 .2486 0 1 Mshowa .125 Mabswid .06423 .2611 m .06423 .26485 L s .11264 .2611 m .11264 .26485 L s .16105 .2611 m .16105 .26485 L s .20946 .2611 m .20946 .26485 L s .30628 .2611 m .30628 .26485 L s .35469 .2611 m .35469 .26485 L s .4031 .2611 m .4031 .26485 L s .45151 .2611 m .45151 .26485 L s .54832 .2611 m .54832 .26485 L s .59673 .2611 m .59673 .26485 L s .64514 .2611 m .64514 .26485 L s .69355 .2611 m .69355 .26485 L s .79037 .2611 m .79037 .26485 L s .83878 .2611 m .83878 .26485 L s .88719 .2611 m .88719 .26485 L s .9356 .2611 m .9356 .26485 L s .25 Mabswid 0 .2611 m 1 .2611 L s .49991 .01905 m .50616 .01905 L s [(-1)] .48741 .01905 1 0 Mshowa .49991 .14007 m .50616 .14007 L s [(-0.5)] .48741 .14007 1 0 Mshowa .49991 .38212 m .50616 .38212 L s [(0.5)] .48741 .38212 1 0 Mshowa .49991 .50314 m .50616 .50314 L s [(1)] .48741 .50314 1 0 Mshowa .125 Mabswid .49991 .04325 m .50366 .04325 L s .49991 .06746 m .50366 .06746 L s .49991 .09166 m .50366 .09166 L s .49991 .11587 m .50366 .11587 L s .49991 .16428 m .50366 .16428 L s .49991 .18848 m .50366 .18848 L s .49991 .21269 m .50366 .21269 L s .49991 .23689 m .50366 .23689 L s .49991 .2853 m .50366 .2853 L s .49991 .3095 m .50366 .3095 L s .49991 .33371 m .50366 .33371 L s .49991 .35791 m .50366 .35791 L s .49991 .40632 m .50366 .40632 L s .49991 .43053 m .50366 .43053 L s .49991 .45473 m .50366 .45473 L s .49991 .47894 m .50366 .47894 L s .25 Mabswid .49991 0 m .49991 .522 L s % Start of user PostScript /mathtops { gsave MBeginOrig moveto MEndOrig currentpoint grestore } bind def /MAtocoords { mathtops 4 2 roll mathtops 4 copy pop pop 3 -1 roll sub /arry exch def exch sub /arrx exch def arrx dup mul arry dup mul add sqrt /arrl exch def translate } bind def /MAarrowhead1 { gsave MAtocoords arrl 0. eq { 0 0 Mdot } { [ arrx arrl div arry arrl div -1 arry mul arrl div arrx arrl div 0 0 ] concat -0.05 0.0125 moveto 0 0 lineto -0.05 -0.0125 lineto fill -0.05 0.0125 moveto 0 0 lineto -0.05 -0.0125 lineto -0.05 0.0125 lineto stroke } ifelse grestore } def % End of user PostScript .5 Mabswid .49991 .2611 m .91139 .47894 L s % Start of user PostScript 0 0 1.7 0.9 MAarrowhead1 % End of user PostScript .49991 .2611 m .96454 .43344 L s % Start of user PostScript 0 0 1.91959 0.712043 MAarrowhead1 % End of user PostScript .49991 .2611 m .97619 .37255 L s % Start of user PostScript 0 0 1.96771 0.460481 MAarrowhead1 % End of user PostScript .49991 .2611 m .94529 .30171 L s % Start of user PostScript 0 0 1.84006 0.167786 MAarrowhead1 % End of user PostScript .49991 .2611 m .87461 .22723 L s % Start of user PostScript 0 0 1.54805 -0.139898 MAarrowhead1 % End of user PostScript .49991 .2611 m .77046 .15579 L s % Start of user PostScript 0 0 1.11775 -0.435084 MAarrowhead1 % End of user PostScript .49991 .2611 m .64214 .09374 L s % Start of user PostScript 0 0 0.587604 -0.691406 MAarrowhead1 % End of user PostScript .49991 .2611 m .50112 .04665 L s % Start of user PostScript 0 0 0.00497099 -0.885966 MAarrowhead1 % End of user PostScript .49991 .2611 m .35999 .01871 L s % Start of user PostScript 0 0 -0.578106 -1.00139 MAarrowhead1 % End of user PostScript .49991 .2611 m .23136 .01243 L s % Start of user PostScript 0 0 -1.10954 -1.02735 MAarrowhead1 % End of user PostScript .49991 .2611 m .12671 .02836 L s % Start of user PostScript 0 0 -1.54187 -0.961553 MAarrowhead1 % End of user PostScript .49991 .2611 m .05541 .06507 L s % Start of user PostScript 0 0 -1.83646 -0.809859 MAarrowhead1 % End of user PostScript .49991 .2611 m .02381 .1193 L s % Start of user PostScript 0 0 -1.96701 -0.585822 MAarrowhead1 % End of user PostScript .49991 .2611 m .03474 .18619 L s % Start of user PostScript 0 0 -1.92185 -0.309456 MAarrowhead1 % End of user PostScript .49991 .2611 m .08722 .25978 L s % Start of user PostScript 0 0 -1.70502 -0.00544685 MAarrowhead1 % End of user PostScript .49991 .2611 m .17657 .33348 L s % Start of user PostScript 0 0 -1.33588 0.299049 MAarrowhead1 % End of user PostScript .49991 .2611 m .2948 .40071 L s % Start of user PostScript 0 0 -0.847416 0.576831 MAarrowhead1 % End of user PostScript .49991 .2611 m .43135 .45548 L s % Start of user PostScript 0 0 -0.283253 0.803087 MAarrowhead1 % End of user PostScript .49991 .2611 m .57403 .49288 L s % Start of user PostScript 0 0 0.306213 0.957606 MAarrowhead1 % End of user PostScript .49991 .2611 m .71009 .50957 L s % Start of user PostScript 0 0 0.868326 1.02658 MAarrowhead1 % End of user PostScript .49991 .2611 m .82737 .50407 L s % Start of user PostScript 0 0 1.35287 1.00386 MAarrowhead1 % End of user PostScript 0 0 m 1 0 L 1 .522 L 0 .522 L closepath clip newpath % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 150.312}, ImageMargins->{{62, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgooooo`00:_ooool:o`0001Gooooo1_l0000Kooooo`Oo00007oooool00ol0003ooooooooo o`2=ooooo`00:oooool8o`0001Oooooo0ol00002ooooo`03o`000?oooooooooo01Sooooo2?l0000N ooooo`03o`000?oooooooooo08gooooo000/ooooo`So00005oooool00ol0003oooooooooo`02oooo o`;o00006Oooool8o`0001gooooo00?o0000ooooooooool0SOooool002gooooo1Ol00002ooooo`03 o`000?oooooooooo01_ooooo00?o0000ooooooooool05_ooool6o`0001kooooo0ol0002>ooooo`00 ;_ooool3o`0000Cooooo0_l0000Looooo`03o`000?oooooooooo01Gooooo1Ol0000Oooooo`?o0000 S_ooool0017ooooo1Ol0000Iooooo`03o`000?oooooooooo00Gooooo00?o0000ooooooooool06_oo ool00ol0003oooooooooo`0Eooooo`;o000000?oooooo`000?ooool07_ooool3o`0008kooooo000C ooooo`[o00006oooool2o`0001_ooooo00?o0000ooooooooool05?ooool01Ol0003ooooooooooooo oooo000001gooooo1Ol0002=ooooo`005?ooooloooo o`03o`000?oooooooooo00_ooooo00Co0000ooooool0003o00001oooool4o`0000Kooooo00?o0000 ooooooooool06Oooool00ol0003oooooooooo`1aooooo`009Oooool4o`0001kooooo0ol0000Coooo o`;o00003oooool00ol0003oooooooooo`0:ooooo`04o`000?oooooo0000o`0000Oooooo00?o0000 ooooooooool01oooool00ol0003oooooooooo`0Hooooo`03o`000?oooooooooo07;ooooo000Yoooo o`?o00007_ooool2o`0001?ooooo00?o0000ooooooooool03Oooool00ol0003oooooooooo`0:oooo o`?o00001oooool5o`0000Gooooo00?o0000ooooooooool05oooool00ol0003oooooooooo`1coooo o`00;?ooool3o`0001gooooo0_l0000Booooo`;o00003_ooool00ol0003oooooooooo`0;ooooo`03 o`000?oooooooooo00oooooo00?o0000ooooooooool05_ooool00ol0003oooooooooo`0]ooooo`Go 0000@_ooool002oooooo0ol0000Looooo`;o00004_ooool00ol0003oooooooooo`0ooooo`03o`000?oooooooooo01kooooo0ol0001Kooooo`00 4Oooool9o`000003ooooool0003o000000Co0000;oooool4o`00017ooooo0_l0000;ooooo`03o`00 0?oooooooooo00Oooooo00?o0000ooooooooool01_ooool00ol0003oooooooooo`08ooooo`03o`00 0?oooooooooo00gooooo00?o0000ooooooooool07?ooool3o`0005kooooo000Dooooo`Ko00001ooo ool6o`0002gooooo0ol0000@ooooo`;o00002_ooool2o`0000Sooooo00?o0000ooooooooool01Ooo ool00ol0003oooooooooo`08ooooo`03o`000?oooooooooo00cooooo00?o0000ooooooooool06ooo ool2o`00067ooooo000Fooooo`?o00003_ooool6o`0002[ooooo0ol0000?ooooo`?o00002Oooool2 o`0000Oooooo00?o0000ooooooooool01Oooool00ol0003oooooooooo`07ooooo`03o`000?oooooo oooo00cooooo00?o0000ooooooooool06?ooool3o`0006?ooooo000Hooooo`03o`000?oooooooooo 01;ooooo1_l0000Wooooo`Co00003_ooool2o`0000Wooooo00?o0000ooooooooool01Oooool00ol0 003oooooooooo`04ooooo`03o`000?oooooooooo00Oooooo00?o0000ooooooooool02oooool00ol0 003oooooooooo`0Gooooo`;o0000I_ooool003?ooooo1_l0000Uooooo`?o00003Oooool2o`0000So oooo0_l00006ooooo`03o`000?oooooooooo00Cooooo00?o0000ooooooooool01_ooool00ol0003o ooooooooo`0:ooooo`03o`000?oooooooooo01Gooooo0ol0001Xooooo`00>Oooool6o`0002;ooooo 0ol0000ooooo`Ko00006Oooool006Kooooo1?l0000Hooooo`03 o`000?oooooooooo00Sooooo00Co0000oooooooooooo00000_ooool01Ol0003ooooooooooooooooo 000000Cooooo0_l00003ooooo`;o00001Oooool3o`0000[ooooo1?l0000jooooo`co00000_ooool: o`0001Gooooo001Qooooo`Go00006oooool00ol0003oooooooooo`09ooooo`04o`000?oooooooooo o`0000;ooooo00?o0000ooooooooool00_ooool00ol0003oooooooooo`03ooooo`03o`000?oooooo oooo00;ooooo0_l00006ooooo`;o00003?ooool5o`00047ooooo3ol0000Booooo`00GOooool4o`00 01kooooo0_l0000;ooooo`05o`000?ooooooooooooooool000000_ooool00ol0003oooooooooo`03 ooooo`03o`000?oooooooooo00?ooooo0_l00004ooooo`;o00001_ooool3o`0000kooooo1?l0000n oooooa3o00004?ooool005Wooooo1?l0000Qooooo`03o`000?oooooooooo00_ooooo00Go0000oooo ooooooooooooo`000003ooooo`03o`000?oooooooooo00?ooooo00?o0000ooooooooool01?ooool0 0ol0003oooooooooo`03ooooo`;o00001oooool3o`0000oooooo1?l0000jooooo`go00004oooool0 05Cooooo1Ol0000Sooooo`;o00003Oooool00ol0003oooooooooo`02ooooo`05o`000?oooooooooo ooooool000001_ooool00ol0003oooooooooo`04ooooo`03o`000?oooooooooo00Cooooo00?o0000 ooooooooool01oooool2o`00017ooooo1?l0000fooooo`So00006?ooool0043ooooo0_l0000>oooo o`Co00009oooool00ol0003oooooooooo`0=ooooo`03o`000?oooooooooo00;ooooo0_l00002oooo o`03o`000?oooooooooo00Cooooo00?o0000ooooooooool01Oooool2o`0000Gooooo0_l00009oooo o`?o00004_ooool5o`00037ooooo0ol0000Mooooo`00?_ooool4o`0000Wooooo1Ol0000Yooooo`;o 00004?ooool00ol0003oooooooooo`02ooooo`03o`000?oooooooooo00;ooooo00?o0000oooooooo ool01?ooool00ol0003oooooooooo`06ooooo`03o`000?oooooooooo00Cooooo0_l0000:ooooo`?o 00005?ooool4o`0004gooooo000looooo`Ko00001Oooool4o`0002gooooo00?o0000ooooooooool0 3oooool00ol0003oooooooooo`03ooooo`03o`000?oooooooooo00;ooooo00?o0000ooooooooool0 1Oooool00ol0003oooooooooo`06ooooo`03o`000?oooooooooo00Gooooo0_l0000;ooooo`;o0000 5_ooool4o`0004Wooooo000jooooo`go0000;oooool2o`0001;ooooo00?o0000ooooooooool00ooo ool00ol0003oooooooooo`02ooooo`03o`000?oooooooooo00Kooooo00?o0000ooooooooool01_oo ool2o`0000Oooooo0_l0000;ooooo`?o00005oooool4o`0004Gooooo000hooooo`_o0000<_ooool0 0ol0003oooooooooo`0Booooo`03o`000?oooooooooo00?ooooo00?o0000ooooooooool00oooool0 0ol0003oooooooooo`06ooooo`03o`000?oooooooooo00Oooooo00?o0000ooooooooool01_ooool2 o`0000cooooo0ol0000Hooooo`Go0000@?ooool003Kooooo3Ol0000`ooooo`;o00005?ooool00ol0 003oooooooooo`04ooooo`03o`000?oooooooooo00?ooooo00?o0000ooooooooool01oooool00ol0 003oooooooooo`07ooooo`03o`000?oooooooooo00Oooooo0_l0000=ooooo`?o00006_ooool4o`00 03cooooo000dooooo`oo0000;oooool00ol0003oooooooooo`0Dooooo`03o`000?oooooooooo00Co oooo00?o0000ooooooooool00oooool00ol0003oooooooooo`07ooooo`03o`000?oooooooooo00So oooo0_l00009ooooo`;o00003_ooool2o`0001cooooo1?l0000hooooo`00ooooo`?o00007_ooool5o`0002oooooo001] ooooo`;o00006Oooool00ol0003oooooooooo`05ooooo`03o`000?oooooooooo00Cooooo00?o0000 ooooooooool02Oooool00ol0003oooooooooo`09ooooo`;o00002_ooool2o`00017ooooo0_l0000Q ooooo`Co0000:oooool006cooooo00?o0000ooooooooool06?ooool00ol0003oooooooooo`06oooo o`03o`000?oooooooooo00Cooooo00?o0000ooooooooool02_ooool00ol0003oooooooooo`0:oooo o`03o`000?oooooooooo00Wooooo0_l0000Aooooo`?o00008_ooool4o`0002Oooooo001Zooooo`;o 00006oooool00ol0003oooooooooo`06ooooo`03o`000?oooooooooo00Gooooo00?o0000oooooooo ool02_ooool00ol0003oooooooooo`0:ooooo`03o`000?oooooooooo00[ooooo0_l0000Booooo`?o 00008oooool4o`0000kooooo0_l0000Cooooo`00JOooool00ol0003oooooooooo`0Kooooo`03o`00 0?oooooooooo00Kooooo00?o0000ooooooooool01Oooool00ol0003oooooooooo`0;ooooo`03o`00 0?oooooooooo00[ooooo0_l0000ooooo`;o00005Oooool2o`0002[ooooo2_l0000ooooo`03o`000?oooooooooo01Go oooo0ol0000Sooooo`oo00002?ooool005gooooo1Ol0000Jooooo`;o00001?ooool01Ol0003ooooo ooooool0003ooooo00?o00001_ooool00ol0003oooooooooo`07ooooo`03o`000?oooooooooo00ko oooo00?o0000ooooooooool03Oooool2o`0000oooooo0_l0000Hooooo`?o00008?ooool@o`0000Oo oooo001Looooo`Ko00006Oooool01?l0003oooooooooool00005ooooo`03o`000?oooooo000000?o oooo00?o0000ooooooooool00oooool00ol0003oooooooooo`07ooooo`03o`000?oooooooooo00ko oooo00?o0000ooooooooool03oooool00ol0003oooooooooo`0>ooooo`;o00006Oooool2o`0003Go oooo001Kooooo`So00006?ooool01?l0003oooooooooool00005ooooo`03o`000?oooooooooo00?o oooo00?o0000ooooooooool00oooool3o`0000Sooooo00?o0000ooooooooool03_ooool00ol0003o ooooooooo`0?ooooo`;o00004?ooool2o`0001Wooooo0ol0000booooo`00F_ooool:o`0001Oooooo 00Co0000oooooooooooo00001?ooool00ol0003oooooooooo`04ooooo`03o`000?oooooooooo00?o oooo00?o0000ooooooooool02?ooool00ol0003oooooooooo`0?ooooo`03o`000?oooooooooo013o oooo00?o0000ooooooooool03oooool2o`0001[ooooo0ol0000_ooooo`00FOooool9o`0001Wooooo 00Co0000oooooooooooo00001?ooool00ol0003oooooooooo`04o`0000Kooooo00?o0000oooooooo ool02?ooool00ol0003oooooooooo`0@ooooo`03o`000?oooooooooo013ooooo00?o0000oooooooo ool04?ooool2o`0001_ooooo0_l0000]ooooo`00F?ooool7o`0001cooooo00Co0000oooooooooooo 00001?ooool01?l0003oooooooooool00009ooooo`03o`000?oooooooooo00Wooooo00?o0000oooo ooooool04?ooool00ol0003oooooooooo`0@ooooo`;o00004_ooool2o`0001_ooooo0ol0000Zoooo o`00Eoooool5o`00023ooooo0_l00004ooooo`04o`000?ooooooooooooooo`Go00001Oooool00ol0 003oooooooooo`09ooooo`03o`000?oooooooooo017ooooo00?o0000ooooooooool04Oooool00ol0 003oooooooooo`0Aooooo`;o00007?ooool3o`0002Oooooo001Fooooo`?o0000:Oooool00ol0003o ooooooooo`0;ooooo`03o`000?oooooooooo00Wooooo00?o0000ooooooooool04_ooool00ol0003o ooooooooo`0Aooooo`03o`000?oooooooooo01;ooooo0_l0000Mooooo`;o00009Oooool005Gooooo 00?o0000ooooooooool0:_ooool00ol0003oooooooooo`0;ooooo`03o`000?oooooooooo00[ooooo 00?o0000ooooooooool04Oooool00ol0003oooooooooo`0Booooo`;o00005?ooool00ol0003ooooo ooooo`0Looooo`?o00008_ooool007kooooo1?l0000>ooooo`;o00002oooool00ol0003ooooooooo o`0Booooo`03o`000?oooooooooo01?ooooo00?o0000ooooooooool04_ooool2o`0001oooooo0ol0 0007ooooo`;o00005_ooool007kooooo1_l0000ooooo`;o00003Oooool00ol0003oooooooooo`0Fooooo`03o`000?oooooooooo 01Kooooo00?o0000ooooooooool05oooool2o`0001Wooooo3_l0000?ooool00ol0003o ooooooooo`1Booooo`00Qoooool2o`0000Oooooo00?o0000ooooooooool0>Oooool00ol0003ooooo ooooo`1Aooooo`00R?ooool00ol0003oooooooooo`05ooooo`03o`000?oooooooooo08gooooo002@ ooooo`03o`000?oooooooooo08gooooo002@ooooo`03o`000?oooooooooo08gooooo0000\ \>"], ImageRangeCache->{{{0, 287}, {149.312, 0}} -> {-2.08686, -1.08069, \ 0.0144703, 0.0144703}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Closed]], Cell["Applying A twice to these arrows gives", "Text"], Cell[BoxData[ \(\(Table[A . A . {Cos[x], Sin[x]}, {x, 0, 2\ \[Pi], .3}];\)\)], "Input"], Cell[CellGroupData[{ Cell["\<\ Show[Graphics[ Map[arrow,%] ],AspectRatio->Automatic ,Axes->Automatic, PlotRange -> All]\ \>", "Input", CellTags->"S5.27.1"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .29384 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.49876 0.147811 0.147484 0.147811 [ [.05533 .13498 -6 -9 ] [.05533 .13498 6 0 ] [.20314 .13498 -6 -9 ] [.20314 .13498 6 0 ] [.35095 .13498 -6 -9 ] [.35095 .13498 6 0 ] [.64657 .13498 -3 -9 ] [.64657 .13498 3 0 ] [.79438 .13498 -3 -9 ] [.79438 .13498 3 0 ] [.94219 .13498 -3 -9 ] [.94219 .13498 3 0 ] [.48626 .03663 -30 -4.5 ] [.48626 .03663 0 4.5 ] [.48626 .07358 -24 -4.5 ] [.48626 .07358 0 4.5 ] [.48626 .11053 -30 -4.5 ] [.48626 .11053 0 4.5 ] [.48626 .18444 -24 -4.5 ] [.48626 .18444 0 4.5 ] [.48626 .22139 -18 -4.5 ] [.48626 .22139 0 4.5 ] [.48626 .25834 -24 -4.5 ] [.48626 .25834 0 4.5 ] [ 0 0 0 0 ] [ 1 .29384 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash .05533 .14748 m .05533 .15373 L s [(-3)] .05533 .13498 0 1 Mshowa .20314 .14748 m .20314 .15373 L s [(-2)] .20314 .13498 0 1 Mshowa .35095 .14748 m .35095 .15373 L s [(-1)] .35095 .13498 0 1 Mshowa .64657 .14748 m .64657 .15373 L s [(1)] .64657 .13498 0 1 Mshowa .79438 .14748 m .79438 .15373 L s [(2)] .79438 .13498 0 1 Mshowa .94219 .14748 m .94219 .15373 L s [(3)] .94219 .13498 0 1 Mshowa .125 Mabswid .08489 .14748 m .08489 .15123 L s .11445 .14748 m .11445 .15123 L s .14401 .14748 m .14401 .15123 L s .17358 .14748 m .17358 .15123 L s .2327 .14748 m .2327 .15123 L s .26226 .14748 m .26226 .15123 L s .29182 .14748 m .29182 .15123 L s .32139 .14748 m .32139 .15123 L s .38051 .14748 m .38051 .15123 L s .41007 .14748 m .41007 .15123 L s .43964 .14748 m .43964 .15123 L s .4692 .14748 m .4692 .15123 L s .52832 .14748 m .52832 .15123 L s .55788 .14748 m .55788 .15123 L s .58745 .14748 m .58745 .15123 L s .61701 .14748 m .61701 .15123 L s .67613 .14748 m .67613 .15123 L s .7057 .14748 m .7057 .15123 L s .73526 .14748 m .73526 .15123 L s .76482 .14748 m .76482 .15123 L s .82394 .14748 m .82394 .15123 L s .85351 .14748 m .85351 .15123 L s .88307 .14748 m .88307 .15123 L s .91263 .14748 m .91263 .15123 L s .02576 .14748 m .02576 .15123 L s .97176 .14748 m .97176 .15123 L s .25 Mabswid 0 .14748 m 1 .14748 L s .49876 .03663 m .50501 .03663 L s [(-0.75)] .48626 .03663 1 0 Mshowa .49876 .07358 m .50501 .07358 L s [(-0.5)] .48626 .07358 1 0 Mshowa .49876 .11053 m .50501 .11053 L s [(-0.25)] .48626 .11053 1 0 Mshowa .49876 .18444 m .50501 .18444 L s [(0.25)] .48626 .18444 1 0 Mshowa .49876 .22139 m .50501 .22139 L s [(0.5)] .48626 .22139 1 0 Mshowa .49876 .25834 m .50501 .25834 L s [(0.75)] .48626 .25834 1 0 Mshowa .125 Mabswid .49876 .00706 m .50251 .00706 L s .49876 .01445 m .50251 .01445 L s .49876 .02184 m .50251 .02184 L s .49876 .02923 m .50251 .02923 L s .49876 .04402 m .50251 .04402 L s .49876 .05141 m .50251 .05141 L s .49876 .0588 m .50251 .0588 L s .49876 .06619 m .50251 .06619 L s .49876 .08097 m .50251 .08097 L s .49876 .08836 m .50251 .08836 L s .49876 .09575 m .50251 .09575 L s .49876 .10314 m .50251 .10314 L s .49876 .11792 m .50251 .11792 L s .49876 .12531 m .50251 .12531 L s .49876 .1327 m .50251 .1327 L s .49876 .14009 m .50251 .14009 L s .49876 .15487 m .50251 .15487 L s .49876 .16226 m .50251 .16226 L s .49876 .16966 m .50251 .16966 L s .49876 .17705 m .50251 .17705 L s .49876 .19183 m .50251 .19183 L s .49876 .19922 m .50251 .19922 L s .49876 .20661 m .50251 .20661 L s .49876 .214 m .50251 .214 L s .49876 .22878 m .50251 .22878 L s .49876 .23617 m .50251 .23617 L s .49876 .24356 m .50251 .24356 L s .49876 .25095 m .50251 .25095 L s .49876 .26573 m .50251 .26573 L s .49876 .27312 m .50251 .27312 L s .49876 .28051 m .50251 .28051 L s .49876 .2879 m .50251 .2879 L s .25 Mabswid .49876 0 m .49876 .29384 L s % Start of user PostScript /mathtops { gsave MBeginOrig moveto MEndOrig currentpoint grestore } bind def /MAtocoords { mathtops 4 2 roll mathtops 4 copy pop pop 3 -1 roll sub /arry exch def exch sub /arrx exch def arrx dup mul arry dup mul add sqrt /arrl exch def translate } bind def /MAarrowhead1 { gsave MAtocoords arrl 0. eq { 0 0 Mdot } { [ arrx arrl div arry arrl div -1 arry mul arrl div arrx arrl div 0 0 ] concat -0.05 0.0125 moveto 0 0 lineto -0.05 -0.0125 lineto fill -0.05 0.0125 moveto 0 0 lineto -0.05 -0.0125 lineto -0.05 0.0125 lineto stroke } ifelse grestore } def % End of user PostScript .5 Mabswid .49876 .14748 m .97619 .14157 L s % Start of user PostScript 0 0 3.23 -0.04 MAarrowhead1 % End of user PostScript .49876 .14748 m .96142 .10034 L s % Start of user PostScript 0 0 3.13006 -0.318958 MAarrowhead1 % End of user PostScript .49876 .14748 m .90532 .06332 L s % Start of user PostScript 0 0 2.75053 -0.569424 MAarrowhead1 % End of user PostScript .49876 .14748 m .8129 .03381 L s % Start of user PostScript 0 0 2.1253 -0.769025 MAarrowhead1 % End of user PostScript .49876 .14748 m .69243 .01446 L s % Start of user PostScript 0 0 1.31022 -0.899931 MAarrowhead1 % End of user PostScript .49876 .14748 m .55465 .007 L s % Start of user PostScript 0 0 0.378105 -0.95045 MAarrowhead1 % End of user PostScript .49876 .14748 m .41188 .01208 L s % Start of user PostScript 0 0 -0.587786 -0.916067 MAarrowhead1 % End of user PostScript .49876 .14748 m .27687 .02926 L s % Start of user PostScript 0 0 -1.50117 -0.799855 MAarrowhead1 % End of user PostScript .49876 .14748 m .16168 .05699 L s % Start of user PostScript 0 0 -2.28046 -0.612194 MAarrowhead1 % End of user PostScript .49876 .14748 m .0766 .09282 L s % Start of user PostScript 0 0 -2.85605 -0.369848 MAarrowhead1 % End of user PostScript .49876 .14748 m .02924 .13352 L s % Start of user PostScript 0 0 -3.17651 -0.0944643 MAarrowhead1 % End of user PostScript .49876 .14748 m .02381 .17547 L s % Start of user PostScript 0 0 -3.21322 0.189358 MAarrowhead1 % End of user PostScript .49876 .14748 m .06081 .21492 L s % Start of user PostScript 0 0 -2.96291 0.456265 MAarrowhead1 % End of user PostScript .49876 .14748 m .13693 .24835 L s % Start of user PostScript 0 0 -2.44793 0.682415 MAarrowhead1 % End of user PostScript .49876 .14748 m .24537 .27277 L s % Start of user PostScript 0 0 -1.71428 0.847607 MAarrowhead1 % End of user PostScript .49876 .14748 m .37645 .286 L s % Start of user PostScript 0 0 -0.8275 0.937085 MAarrowhead1 % End of user PostScript .49876 .14748 m .51845 .28685 L s % Start of user PostScript 0 0 0.133197 0.942856 MAarrowhead1 % End of user PostScript .49876 .14748 m .65869 .27525 L s % Start of user PostScript 0 0 1.082 0.864405 MAarrowhead1 % End of user PostScript .49876 .14748 m .78465 .25224 L s % Start of user PostScript 0 0 1.93414 0.708739 MAarrowhead1 % End of user PostScript .49876 .14748 m .88507 .21988 L s % Start of user PostScript 0 0 2.61352 0.489763 MAarrowhead1 % End of user PostScript .49876 .14748 m .95098 .18104 L s % Start of user PostScript 0 0 3.05944 0.227038 MAarrowhead1 % End of user PostScript 0 0 m 1 0 L 1 .29384 L 0 .29384 L closepath clip newpath % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 84.625}, ImageMargins->{{62, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgooooo`00Soooool00ol0003oooooooooo`2>ooooo`00Soooool2o`0000ko oooo00?o0000ooooooooool0O_ooool007Kooooo0_l0000Gooooo`03o`000?oooooooooo00gooooo 00?o0000ooooooooool0O_ooool007Kooooo0ol0000Fooooo`;o00003Oooool2o`0002Gooooo0_l0 001Iooooo`00Moooool3o`0001Gooooo00?o0000ooooooooool02oooool3o`0002;ooooo1Ol0001I ooooo`00Moooool4o`0001Cooooo0_l0000;ooooo`?o00008?ooool7o`0005[ooooo001gooooo`Go 00004oooool00ol0003oooooooooo`0:ooooo`?o00007Oooool9o`0005_ooooo001@ooooo`?o0000 8_ooool2o`000003ooooool0003o000000?o00001?ooool00ol0003oooooooooo`02ooooo`?o0000 1_ooool2o`0000[ooooo1?l0000Jooooo`_o0000G?ooool0057ooooo1Ol0000Nooooo`03o`000?oo oooooooo00Oo00000oooool01Ol0003ooooooooooooooooo000000?ooooo00?o0000ooooooooool0 0oooool00ol0003oooooooooo`08ooooo`Go00006Oooool;o`00027ooooo1Ol0000gooooo`00D_oo ool8o`0001?ooooo1Ol00002ooooo`03o`000?oooooooooo00So00000oooool00ol0003ooooooooo o`04ooooo`03o`000?oooooooooo00?ooooo0_l00008ooooo`Ko00006Oooool:o`0001_ooooo2_l0 000iooooo`00Doooool:o`0001Oooooo00Go0000oooooooooooo0000ooooo`07o`0000;ooooo00?o 0000ooooooooool01?ooool00ol0003oooooooooo`03ooooo`03o`000?oooooooooo00Oooooo1_l0 000Jooooo`So00006?ooool=o`0003[ooooo001Dooooo`_o00005Oooool01Ol0003oooooooooool0 003ooooo00So00000_ooool00ol0003oooooo`000003o`0000Kooooo0_l00007ooooo`Oo00006ooo ool6o`0001Wooooo3?l0000kooooo`00EOooool:o`0001Gooooo00Go0000oooooooooooo0000oooo o`09o`000004ooooool0003oooooo`0000Wooooo00?o0000ooooooooool01Oooool7o`0001[ooooo 1ol0000Kooooo`Wo0000?Oooool005Kooooo2?l0000Gooooo`;o00000oooool:o`000003ooooool0 003o000000?o00001Oooool00ol0003oooooooooo`04ooooo`So00006Oooool01?l0003ooooooooo ooooool3o`0001_ooooo2Ol0000nooooo`00Eoooool8o`0001_ooooo1Ol0000@ooooo`;o00002?oo ool5o`0001Oooooo0_l00005ooooo`03o`000?oooooooooo01Oooooo0ol00002ooooo`Ko0000?ooo ool002oooooo3ol0000Jooooo`Go00000_ooool2o`0001Wooooo0ol000000ooooooo0000ooooo`0? ooooo`03o`000?oooooooooo00Sooooo00Co0000ooooool0003o00005_ooool00ol0003ooooooooo o`0Mooooo`;o00001Oooool4o`00047ooooo000aooooo`go00006oooool3o`0000Gooooo0_l0000H ooooo`05o`000?ooooooooooooooool000003oooool2o`0000Sooooo00?o0000ooooooooool05_oo ool2o`0001gooooo0ol00007ooooo`?o00005_ooool8o`0002Cooooo000cooooo`_o00007?ooool0 0ol0003oooooooooo`06ooooo`03o`000?oooooooooo01Gooooo0_l00002ooooo`03o`000?oooooo 000000Cooooo0ol00006ooooo`03o`000?oooooooooo00Oooooo00?o0000ooooooooool05Oooool0 0ol0003oooooooooo`0Jooooo`?o00002oooool00ol0003oooooooooo`0Eooooo`oo00007Oooool0 03Gooooo2Ol0000Vooooo`;o00005?ooool01?l0003oooooooooool00002ooooo`03o`000?oooooo oooo00;ooooo00Go0000ooooooooooooooooo`000005ooooo`;o00001oooool00ol0003ooooooooo o`0Eooooo`03o`000?oooooooooo01Wooooo0_l0000Vooooo`go00007oooool003Oooooo2_l0000U ooooo`;o00002oooool5o`0000;ooooo00Co0000oooooooooooo00000oooool00ol0003ooooooooo o`05ooooo`03o`000?oooooooooo00?ooooo00?o0000ooooooooool01_ooool00ol0003ooooooooo o`0Cooooo`;o00006Oooool3o`0002Sooooo2ol0000Qooooo`00>?ooool5o`0000Cooooo0ol0000T ooooo`;o00004?ooool01?l0003oooooooooool00003ooooo`03o`000?oooooooooo00Gooooo00?o 0000ooooooooool00oooool2o`0000Oooooo00?o0000ooooooooool04_ooool00ol0003ooooooooo o`0Fooooo`?o0000:?ooool ooooo`04o`000?ooooooooooo`0000Cooooo00?o0000ooooooooool01?l00006ooooo`03o`000?oo oooooooo00Gooooo00?o0000ooooooooool04Oooool2o`0001Oooooo0_l0000Vooooo`Go00001?oo ool5o`0002Kooooo000looooo`03o`000?oooooooooo00Wooooo1?l0000Pooooo`;o00003?ooool0 1?l0003oooooooooool00005ooooo`03o`000?oooooo000000Wooooo0_l00006ooooo`03o`000?oo oooooooo013ooooo00?o0000ooooooooool05?ooool3o`0002Cooooo1?l00009ooooo`?o0000:?oo ool004cooooo0ol0000Oooooo`;o00002oooool2o`0000Kooooo00?o0000ooooool000001?l00005 ooooo`03o`000?oooooooooo00Cooooo00?o0000ooooooooool03oooool2o`0001Cooooo0ol0000R ooooo`Go00003Oooool00ol0003oooooooooo`0Xooooo`007_ooool8o`0002Wooooo1?l0000Moooo o`03o`000?oooooooooo017ooooo00?o0000ooooooooool02?ooool2o`0000Gooooo00?o0000oooo ooooool03_ooool00ol0003oooooooooo`0Aooooo`?o00008?ooool5o`0003gooooo000Gooooo`oo 0000;Oooool4o`0001[ooooo0_l0000Aooooo`03o`000?oooooooooo00Sooooo00?o0000oooooooo ool01?ooool00ol0003oooooooooo`0o`0000[ooooo000?ooooo`Wo00009?oooolRo`0001oooooo2?l00002oooo o`?o000000Goooooo`000?l0003o0000ooooo`0Oooool7o`0001Kooooo1?l00003ooooo`04o`000?ooooooooooo`0000Co oooo0_l00002ooooo`0:o`000?ooooooooooo`000?oooooo0000ooooool0003oooooo`0000Gooooo 0_l0000:ooooo`03o`000?oooooooooo00Wooooo0ol0000Eooooo`Go0000?Oooool?o`00013ooooo 000@ooooo`Oo0000ooooo`04o`000?oooooo0000o`0000Oooooo00Ko0000ooooooooooooooooo`000?ooool4 o`0000Kooooo0_l0000=ooooo`;o00003oooool3o`0001gooooo1_l0000/ooooo`;o00007Oooool0 01oooooo0_l0000Eooooo`Oo00008_ooool4o`00017ooooo0_l000000ooooooo0000ooooo`06oooo o`04o`000?ooooooooooooooo`?o00002Oooool00ol0003oooooo`00000>ooooo`03o`000?oooooo oooo00oooooo0_l0000Qooooo`Go0000A_ooool001cooooo1Ol0000?ooooo`Ko00009Oooool4o`00 01?ooooo0_l000000ooooooo0000o`000009ooooo`Co000000?oooooo`000?l000000ol00005oooo o`03o`000?oooooo000000oooooo00?o0000ooooooooool04?ooool3o`0002?ooooo1_l0000?oooo o`;o0000;oooool001[ooooo1ol00008ooooo`Oo0000:?ooool3o`0001Gooooo0_l0000@ooooo`03 o`000?oooooooooo00[ooooo0ol0000@ooooo`03o`000?oooooooooo01;ooooo0ol0000Vooooo`Go 00002_ooool5o`0002cooooo000Hooooo`Wo000000?oooooo`000?l000001Ol0000[ooooo`Co0000 5_ooool2o`00017ooooo00?o0000ooooooooool02oooool00ol0003oooooo`00000Aooooo`;o0000 5Oooool3o`0002Sooooo1_l00004ooooo`Oo0000:_ooool001Gooooo3Ol0000_ooooo`?o00006?oo ool2o`0001;ooooo00?o0000ooooooooool03?ooool3o`0001?ooooo00?o0000ooooooooool05Ooo ool2o`0002cooooo3Ol0000Xooooo`004oooool?o`0002_ooooo1?l0000Iooooo`;o00003oooool2 o`0000;ooooo00?o0000ooooool000001?ooool3o`0000Kooooo00?o0000ooooool000005?ooool0 0ol0003oooooooooo`0Fooooo`?o0000;?ooool=o`0002Gooooo000Boooooa3o0000:?ooool3o`00 01_ooooo0_l0000@ooooo`03o`000?oooooooooo00;o00001_ooool01Ol0003ooooooooooooooooo 000000Gooooo0ol0000Eooooo`03o`000?oooooooooo01Sooooo0ol0000Yooooo`oo00008oooool0 01_ooooo1ol0000Tooooo`Co00007?ooool2o`0001;ooooo00Co0000oooooooooooo00002oooool0 0ol0003oooooooooo`03ooooo`03o`000?oooooo000001Kooooo0_l0000Kooooo`;o00009oooool@ o`0002;ooooo000cooooo`;o00003_ooool3o`0001kooooo0_l0000Dooooo`04o`000?oooooooooo o`0000_ooooo00?o0000ooooooooool00oooool2o`000003ooooool0003ooooo01Kooooo00?o0000 ooooooooool06_ooool3o`0000[ooooo0_l0000Hooooo`So0000:_ooool003;ooooo0ol0000:oooo o`Co00007oooool2o`0001Kooooo00Co0000ooooool0003o00001oooool4o`0000Kooooo00Co0000 oooooooooooo00006?ooool00ol0003oooooooooo`0Looooo`?o00001oooool3o`0004Wooooo000` ooooo`Go00001oooool3o`00027ooooo0_l0000Hooooo`;o000000?oooooo`000?ooool01_ooool0 0ol0003oooooooooo`07ooooo`;o000000?oooooo`000?ooool06?ooool00ol0003oooooooooo`0N ooooo`;o00001?ooool5o`0004Sooooo000_ooooo`Oo00000_ooool4o`0002;ooooo0_l0000Joooo o`?o00002?ooool5o`0000Gooooo00Co0000oooooooooooo00006_ooool2o`00023ooooo0ol00000 0ooooooo0000o`000005o`0004Kooooo000]ooooo`_o00009?ooool2o`0001_ooooo00?o0000oooo ooooool04oooool2o`000003ooooool0003o000000?o00006?ooool01Ol0003ooooooooooooooooo 000001kooooo2Ol00015ooooo`00;?ooool:o`0001_ooooo0_l00007ooooo`;o00005oooool00ol0 003oooooooooo`02ooooo`03o`000?oooooooooo01Cooooo2?l0000Iooooo`04o`000?oooooooooo o`0001kooooo2_l00014ooooo`00:_ooool=o`0001Wooooo0ol00005ooooo`;o00006Oooool2o`00 00;ooooo00?o0000ooooooooool05Oooool8o`0001[ooooo1?l0000Mooooo`co0000@_ooool002Wo oooo3_l0000Hooooo`Go00000_ooool2o`0001[ooooo1Ol0000Hooooo`So00006_ooool5o`0001_o oooo3_l00011ooooo`00:?ooool7o`0001oooooo2?l0000Looooo`Go00001?ooool00ol0003ooooo ooooo`03ooooo`03o`000?oooooooooo00;ooooo0ol00006ooooo`So00006Oooool7o`0001oooooo 2_l00010ooooo`00COooool8o`0001cooooo1ol00009ooooo`05o`000?ooooooooooooooool00000 0oooool00ol0003oooooooooo`03ooooo`Oo00006Oooool9o`0002Gooooo1?l0000oooooo`00C?oo ool9o`0001cooooo2?l00009ooooo`03o`000?oooooooooo00Cooooo00?o0000ooooooooool00ooo ool7o`0001_ooooo2?l0001Wooooo`00Boooool;o`0001[ooooo2?l0000:ooooo`03o`000?oooooo oooo00Cooooo00?o0000ooooooooool00oooool00ol0003oooooo`000004o`0001gooooo1_l0001W ooooo`00B_ooool9o`0001cooooo1ol000000ooooooo0000ooooo`0:ooooo`03o`000?oooooo0000 00?o00001_ooool7o`0001oooooo1Ol0001Vooooo`00BOooool7o`0001oooooo1_l00002ooooo`03 o`000?oooooooooo00Gooooo00Oo0000ooooooooooooooooo`000?oooooo000000Wooooo00?o0000 ooooooooool01?l0000Rooooo`?o0000IOooool004Sooooo1?l0000Rooooo`Go00000_ooool2o`00 00Sooooo1Ol000000ooooooo0000o`000003o`0000Gooooo00?o0000ooooooooool01?l0000Toooo o`;o0000I?ooool004Oooooo0_l0000Uooooo`?o00007_ooool2o`000003ooooool0003o000000;o 00009_ooool00ol0003oooooooooo`1Qooooo`00KOooool3o`0001oooooo00Co0000oooooooooooo oooo0_l0002;ooooo`00KOooool00ol0003oooooooooo`0Oooooo`;o00000_ooool2o`0008_ooooo 001/ooooo`03o`000?oooooooooo023ooooo00Co0000oooooooooooooooo0_l0002;ooooo`00Sooo ool2o`0000?ooooo00?o0000ooooooooool0ROooool008oooooo00?o0000ooooooooool0S_ooool0 0001\ \>"], ImageRangeCache->{{{0, 287}, {83.625, 0}} -> {-3.40295, -0.997798, \ 0.0237724, 0.0237724}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output"] }, Closed]] }, Closed]] }, Open ]] }, FrontEndVersion->"5.0 for Macintosh", ScreenRectangle->{{0, 1115}, {0, 746}}, AutoGeneratedPackage->None, ScreenStyleEnvironment->"Working", WindowSize->{849, 695}, WindowMargins->{{5, Automatic}, {Automatic, 3}}, Magnification->1 ] (******************************************************************* Cached data follows. If you edit this Notebook file directly, not using Mathematica, you must remove the line containing CacheID at the top of the file. The cache data will then be recreated when you save this file from within Mathematica. *******************************************************************) (*CellTagsOutline CellTagsIndex->{ "S5.27.1"->{ Cell[66882, 2050, 207, 7, 98, "Input", CellTags->"S5.27.1"], Cell[125063, 3100, 140, 6, 82, "Input", CellTags->"S5.27.1"], Cell[155616, 3790, 140, 6, 82, "Input", CellTags->"S5.27.1"]} } *) (*CellTagsIndex CellTagsIndex->{ {"S5.27.1", 179339, 4488} } *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[1776, 53, 76, 1, 52, "Subtitle"], Cell[1855, 56, 83, 4, 64, "Subsubtitle"], Cell[1941, 62, 313, 9, 104, "Text"], Cell[CellGroupData[{ Cell[2279, 75, 70, 1, 69, "Section"], Cell[2352, 78, 54, 0, 32, "Text"], Cell[CellGroupData[{ Cell[2431, 82, 209, 5, 43, "Input", InitializationCell->True], Cell[2643, 89, 183, 3, 46, "Message"] }, Closed]], Cell[CellGroupData[{ Cell[2863, 97, 116, 3, 24, "Input", InitializationCell->True], Cell[2982, 102, 75, 1, 36, "Output"] }, Closed]], Cell[CellGroupData[{ Cell[3094, 108, 215, 4, 72, "Input"], Cell[3312, 114, 15808, 431, 296, 3202, 271, "GraphicsData", "PostScript", \ "Graphics"], Cell[19123, 547, 130, 3, 36, "Output"] }, Closed]], Cell[19268, 553, 57, 0, 29, "Text"], Cell[CellGroupData[{ Cell[19350, 557, 186, 6, 41, "Input"], Cell[19539, 565, 69, 1, 36, "Output"] }, Closed]], Cell[19623, 569, 118, 3, 24, "Input", InitializationCell->True], Cell[CellGroupData[{ Cell[19766, 576, 278, 5, 91, "Input"], Cell[20047, 583, 16519, 445, 296, 3265, 277, "GraphicsData", "PostScript", \ "Graphics"], Cell[36569, 1030, 130, 3, 36, "Output"] }, Closed]], Cell[36714, 1036, 128, 4, 29, "Text"], Cell[36845, 1042, 88, 2, 27, "Input"], Cell[36936, 1046, 88, 2, 27, "Input"], Cell[37027, 1050, 76, 2, 27, "Input"], Cell[37106, 1054, 66, 0, 32, "Text"], Cell[37175, 1056, 74, 2, 27, "Input"], Cell[CellGroupData[{ Cell[37274, 1062, 212, 6, 43, "Input", InitializationCell->True], Cell[37489, 1070, 184, 3, 46, "Message"] }, Closed]], Cell[CellGroupData[{ Cell[37710, 1078, 39, 0, 22, "Subsubsection"], Cell[CellGroupData[{ Cell[37774, 1082, 183, 6, 54, "Input"], Cell[37960, 1090, 64, 1, 36, "Output"] }, Closed]], Cell[38039, 1094, 118, 3, 36, "Input", InitializationCell->True], Cell[CellGroupData[{ Cell[38182, 1101, 278, 5, 136, "Input"], Cell[38463, 1108, 16253, 442, 296, 3262, 277, "GraphicsData", "PostScript", \ "Graphics"], Cell[54719, 1552, 130, 3, 36, "Output"] }, Closed]], Cell[CellGroupData[{ Cell[54886, 1560, 88, 2, 30, "Input"], Cell[54977, 1564, 243, 8, 55, "Output"] }, Closed]], Cell[CellGroupData[{ Cell[55257, 1577, 88, 2, 30, "Input"], Cell[55348, 1581, 256, 8, 55, "Output"] }, Closed]], Cell[CellGroupData[{ Cell[55641, 1594, 76, 2, 30, "Input"], Cell[55720, 1598, 239, 7, 69, "Output"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[56008, 1611, 46, 0, 22, "Subsubsection"], Cell[56057, 1613, 251, 6, 54, "Input"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[56357, 1625, 32, 0, 39, "Section"], Cell[CellGroupData[{ Cell[56414, 1629, 73, 1, 28, "Subsubsection"], Cell[56490, 1632, 194, 6, 76, "Input"], Cell[56687, 1640, 87, 1, 42, "Text"], Cell[56777, 1643, 67, 2, 36, "Input"], Cell[56847, 1647, 103, 3, 42, "Text"], Cell[56953, 1652, 236, 5, 116, "Input"] }, Closed]], Cell[CellGroupData[{ Cell[57226, 1662, 75, 1, 22, "Subsubsection"], Cell[57304, 1665, 194, 6, 76, "Input"], Cell[57501, 1673, 87, 1, 42, "Text"], Cell[57591, 1676, 67, 2, 36, "Input"], Cell[57661, 1680, 103, 3, 42, "Text"], Cell[57767, 1685, 236, 5, 116, "Input"] }, Closed]], Cell[CellGroupData[{ Cell[58040, 1695, 70, 1, 22, "Subsubsection"], Cell[58113, 1698, 194, 6, 76, "Input"], Cell[58310, 1706, 87, 1, 42, "Text"], Cell[58400, 1709, 67, 2, 36, "Input"], Cell[58470, 1713, 103, 3, 42, "Text"], Cell[58576, 1718, 243, 5, 116, "Input"] }, Closed]], Cell[CellGroupData[{ Cell[58856, 1728, 82, 1, 22, "Subsubsection"], Cell[58941, 1731, 197, 6, 76, "Input"], Cell[59141, 1739, 63, 1, 42, "Text"], Cell[59207, 1742, 67, 2, 36, "Input"], Cell[59277, 1746, 231, 5, 116, "Input"] }, Closed]], Cell[CellGroupData[{ Cell[59545, 1756, 33, 0, 22, "Subsubsection"], Cell[59581, 1758, 89, 1, 42, "Text"] }, Closed]], Cell[CellGroupData[{ Cell[59707, 1764, 59, 1, 22, "Subsubsection"], Cell[59769, 1767, 194, 6, 76, "Input"], Cell[59966, 1775, 102, 3, 42, "Text"], Cell[60071, 1780, 231, 5, 116, "Input"], Cell[60305, 1787, 66, 1, 42, "Text"], Cell[60374, 1790, 67, 2, 36, "Input"] }, Closed]], Cell[CellGroupData[{ Cell[60478, 1797, 61, 1, 22, "Subsubsection"], Cell[60542, 1800, 223, 6, 76, "Input"], Cell[60768, 1808, 63, 1, 42, "Text"], Cell[60834, 1811, 67, 2, 36, "Input"], Cell[60904, 1815, 55, 1, 36, "Input"], Cell[60962, 1818, 102, 3, 42, "Text"], Cell[61067, 1823, 237, 5, 116, "Input"] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell[61353, 1834, 66, 1, 69, "Section"], Cell[CellGroupData[{ Cell[61444, 1839, 32, 0, 28, "Subsubsection"], Cell[61479, 1841, 219, 5, 64, "Text"] }, Closed]], Cell[CellGroupData[{ Cell[61735, 1851, 33, 0, 22, "Subsubsection"], Cell[61771, 1853, 211, 6, 64, "Text"], Cell[61985, 1861, 183, 6, 54, "Input"], Cell[62171, 1869, 76, 2, 36, "Input"], Cell[62250, 1873, 90, 2, 36, "Input"], Cell[62343, 1877, 95, 2, 36, "Input"], Cell[62441, 1881, 96, 2, 36, "Input"], Cell[62540, 1885, 70, 2, 36, "Input"], Cell[62613, 1889, 242, 4, 116, "Input"], Cell[62858, 1895, 317, 8, 108, "Text"], Cell[63178, 1905, 298, 6, 116, "Input"], Cell[63479, 1913, 72, 0, 42, "Text"], Cell[63554, 1915, 75, 2, 36, "Input"], Cell[63632, 1919, 38, 1, 36, "Input"], Cell[63673, 1922, 38, 1, 36, "Input"], Cell[63714, 1925, 38, 1, 36, "Input"], Cell[63755, 1928, 181, 5, 44, "Text"], Cell[63939, 1935, 100, 2, 36, "Input"], Cell[64042, 1939, 160, 3, 36, "Input"], Cell[64205, 1944, 112, 3, 42, "Text"], Cell[64320, 1949, 91, 2, 36, "Input"], Cell[64414, 1953, 141, 4, 42, "Text"], Cell[64558, 1959, 47, 0, 42, "Text"], Cell[64608, 1961, 96, 2, 36, "Input"], Cell[64707, 1965, 141, 3, 36, "Input"], Cell[64851, 1970, 68, 1, 42, "Text"], Cell[64922, 1973, 75, 2, 36, "Input"], Cell[65000, 1977, 76, 2, 36, "Input"], Cell[65079, 1981, 30, 0, 42, "Text"], Cell[65112, 1983, 79, 2, 36, "Input", InitializationCell->True], Cell[65194, 1987, 65, 0, 42, "Text"], Cell[CellGroupData[{ Cell[65284, 1991, 73, 1, 36, "Input"], Cell[65360, 1994, 183, 3, 46, "Message"] }, Closed]], Cell[65558, 2000, 46, 0, 42, "Text"], Cell[65607, 2002, 239, 4, 96, "Input"], Cell[65849, 2008, 135, 3, 42, "Text"], Cell[65987, 2013, 309, 6, 116, "Input"], Cell[66299, 2021, 94, 1, 42, "Text"], Cell[66396, 2024, 87, 2, 36, "Input"], Cell[66486, 2028, 60, 1, 36, "Input"] }, Closed]], Cell[CellGroupData[{ Cell[66583, 2034, 126, 4, 22, "Subsubsection"], Cell[66712, 2040, 35, 0, 42, "Text"] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell[66796, 2046, 61, 0, 69, "Section"], Cell[CellGroupData[{ Cell[66882, 2050, 207, 7, 98, "Input", CellTags->"S5.27.1"], Cell[67092, 2059, 57654, 1026, 297, 6040, 384, "GraphicsData", "PostScript", \ "Graphics"], Cell[124749, 3087, 130, 3, 36, "Output"] }, Closed]], Cell[124894, 3093, 53, 0, 42, "Text"], Cell[124950, 3095, 88, 1, 36, "Input"], Cell[CellGroupData[{ Cell[125063, 3100, 140, 6, 82, "Input", CellTags->"S5.27.1"], Cell[125206, 3108, 30088, 667, 159, 5798, 363, "GraphicsData", "PostScript", \ "Graphics"], Cell[155297, 3777, 130, 3, 36, "Output"] }, Closed]], Cell[155442, 3783, 54, 0, 42, "Text"], Cell[155499, 3785, 92, 1, 36, "Input"], Cell[CellGroupData[{ Cell[155616, 3790, 140, 6, 82, "Input", CellTags->"S5.27.1"], Cell[155759, 3798, 22743, 662, 93, 7189, 465, "GraphicsData", "PostScript", \ "Graphics"], Cell[178505, 4462, 130, 3, 36, "Output"] }, Closed]] }, Closed]] }, Open ]] } ] *) (******************************************************************* End of Mathematica Notebook file. *******************************************************************)