(************** Content-type: application/mathematica ************** CreatedBy='Mathematica 5.2' 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[ 390756, 5536]*) (*NotebookOutlinePosition[ 391438, 5559]*) (* CellTagsIndexPosition[ 391394, 5555]*) (*WindowFrame->Normal*) Notebook[{ Cell[CellGroupData[{ Cell["Graphics Primitives: Creating Diagrams", "Title"], Cell[CellGroupData[{ Cell["Introduction", "Section"], Cell[TextData[{ "Graphics primitives can be used to create 2D and 3D diagrams, including \ animated diagrams. They are described in The ", StyleBox["Mathematica", FontSlant->"Italic"], " Book, Section 2.9, Principles of ", StyleBox["Mathematica", FontSlant->"Italic"], " \[Rule] The Structure of Graphics and Sound. ", StyleBox["Mathematica", FontSlant->"Italic"], "'s various plot commands create graphics primitives before displaying the \ graph. For example, here is a graph of the standard parabola." }], "Text"], Cell[BoxData[ \(\(squarePlot = Plot[x\^2, {x, \(-2\), 2}, PlotDivision \[Rule] 2, PlotPoints \[Rule] 5];\)\)], "Input"], Cell[TextData[{ "The ", StyleBox["Mathematica", FontSlant->"Italic"], " kernel stores squarePlot in terms of graphics primitives, in this case, a \ ", StyleBox["Line", FontFamily->"Courier"], "." }], "Text"], Cell[BoxData[ \(InputForm[squarePlot]\)], "Input"], Cell[TextData[{ "The basic structure of 2D graphics are ", StyleBox["Graphics[", FontFamily->"Courier"], StyleBox["graphicsPrimatives", FontFamily->"Courier", FontSlant->"Italic"], StyleBox[", ", FontFamily->"Courier"], StyleBox["options", FontFamily->"Courier", FontSlant->"Italic"], StyleBox["]", FontFamily->"Courier"], " and the basic structure of 3D graphics are ", StyleBox["Graphics3D[", FontFamily->"Courier"], StyleBox["graphicsPrimitives", FontFamily->"Courier", FontSlant->"Italic"], StyleBox[", ", FontFamily->"Courier"], StyleBox["options", FontFamily->"Courier", FontSlant->"Italic"], StyleBox["]", FontFamily->"Courier"], "." }], "Text"] }, Closed]], Cell[CellGroupData[{ Cell["2D graphics primitives", "Section"], Cell[TextData[{ "The 2D graphics primitives are ", StyleBox["Line", FontFamily->"Courier"], " (connected line segments, called a polyline), ", StyleBox["Point", FontFamily->"Courier"], ", ", StyleBox["Rectangle", FontFamily->"Courier"], " (filled rectangle), ", StyleBox["Polygon", FontFamily->"Courier"], " (filled polygons), ", StyleBox["Circle", FontFamily->"Courier"], ", ", StyleBox["Disk", FontFamily->"Courier"], " (a filled circle), ", StyleBox["Raster", FontFamily->"Courier"], " (a rectangular arrays of gray level pixels), and ", StyleBox["Text", FontFamily->"Courier"], ". Let's look at some examples." }], "Text"], Cell[CellGroupData[{ Cell["Line", "Subsection"], Cell[TextData[{ "The argument to ", StyleBox["Line", FontFamily->"Courier"], " is a list of coordinates for points, ", StyleBox["Line[{{", FontFamily->"Courier"], Cell[BoxData[ FormBox[ RowBox[{ SubscriptBox[ StyleBox["xcoord", FontSlant->"Italic"], "1"], ",", " ", SubscriptBox[ StyleBox["ycoord", FontSlant->"Italic"], "1"]}], TraditionalForm]], FontFamily->"Courier"], StyleBox["}, {", FontFamily->"Courier"], Cell[BoxData[ FormBox[ RowBox[{ SubscriptBox[ StyleBox["xcoord", FontSlant->"Italic"], "2"], ",", " ", SubscriptBox[ StyleBox["ycoord", FontSlant->"Italic"], "2"]}], TraditionalForm]], FontFamily->"Courier"], StyleBox["}, {", FontFamily->"Courier"], Cell[BoxData[ FormBox[ RowBox[{ SubscriptBox[ StyleBox["xcoord", FontSlant->"Italic"], "3"], ",", " ", SubscriptBox[ StyleBox["ycoord", FontSlant->"Italic"], "3"]}], TraditionalForm]], FontFamily->"Courier"], StyleBox["}, \[Ellipsis], {", FontFamily->"Courier"], Cell[BoxData[ FormBox[ RowBox[{ SubscriptBox[ StyleBox["xcoord", FontSlant->"Italic"], "n"], ",", " ", SubscriptBox[ StyleBox["ycoord", FontSlant->"Italic"], "n"]}], TraditionalForm]], FontFamily->"Courier"], StyleBox["}}]", FontFamily->"Courier"], ". ", StyleBox["Line", FontFamily->"Courier"], " will connect these points with line segments. Here is a triangle. \ Notice that the graphics primitive had to be enclosed in a ", StyleBox["Graphics", FontFamily->"Courier"], " command." }], "Text"], Cell[BoxData[ \(triangle = Graphics[Line[{{0, 0}, {2, 0}, {1, 1}, {0, 0}}]]\)], "Input"], Cell[TextData[{ "You have to use ", StyleBox["Show", FontFamily->"Courier"], " to display the image." }], "Text"], Cell[BoxData[ \(\(Show[triangle];\)\)], "Input"] }, Closed]], Cell[CellGroupData[{ Cell["Point", "Subsection"], Cell[TextData[{ "The argument to ", StyleBox["Point", FontFamily->"Courier"], " is an ordered pair of coordinates for a point. The following example \ displays many points, so I need to create a list of objects of the form ", StyleBox["Point[{", FontFamily->"Courier"], StyleBox["xcoord", FontFamily->"Courier", FontSlant->"Italic"], StyleBox[", ", FontFamily->"Courier"], StyleBox["ycoord", FontFamily->"Courier", FontSlant->"Italic"], StyleBox["}]", FontFamily->"Courier"], "." }], "Text"], Cell[BoxData[ \(sinPoints = Table[Point[N[{x, Sin[x]}]], {x, 0, 2 \[Pi], \[Pi]\/32}]\)], "Input"], Cell[BoxData[ \(\(Show[Graphics[sinPoints]];\)\)], "Input"] }, Closed]], Cell[CellGroupData[{ Cell["Rectangle", "Subsection"], Cell[TextData[{ "The syntax for a filled rectangle is", StyleBox[" Rectangle[{", FontFamily->"Courier"], StyleBox["xmin", FontFamily->"Courier", FontSlant->"Italic"], StyleBox[", ", FontFamily->"Courier"], StyleBox["ymin", FontFamily->"Courier", FontSlant->"Italic"], StyleBox["}, {", FontFamily->"Courier"], StyleBox["xmax", FontFamily->"Courier", FontSlant->"Italic"], StyleBox[", ", FontFamily->"Courier"], StyleBox["ymax", FontFamily->"Courier", FontSlant->"Italic"], StyleBox["}]", FontFamily->"Courier"], ". The default fill color is black. If you don't want your rectangle to \ be filled with color, then use ", StyleBox["Line", FontFamily->"Courier"], " to create it. Here is one with perfect proportions, well at least the \ classical Greeks thought that it was perfect." }], "Text"], Cell[BoxData[ \(\(Show[ Graphics[Rectangle[{\(-GoldenRatio\), \(-1\)}, {GoldenRatio, 1}]], AspectRatio \[Rule] Automatic];\)\)], "Input"] }, Closed]], Cell[CellGroupData[{ Cell["Polygon", "Subsection"], Cell[TextData[{ "The syntax for a filled polygon is ", StyleBox["Polygon[{{", FontFamily->"Courier"], Cell[BoxData[ FormBox[ RowBox[{ SubscriptBox[ StyleBox["xcoord", FontSlant->"Italic"], "1"], ",", " ", SubscriptBox[ StyleBox["ycoord", FontSlant->"Italic"], "1"]}], TraditionalForm]], FontFamily->"Courier"], StyleBox["}, {", FontFamily->"Courier"], Cell[BoxData[ FormBox[ RowBox[{ SubscriptBox[ StyleBox["xcoord", FontSlant->"Italic"], "2"], ",", " ", SubscriptBox[ StyleBox["ycoord", FontSlant->"Italic"], "2"]}], TraditionalForm]], FontFamily->"Courier"], StyleBox["}, {", FontFamily->"Courier"], Cell[BoxData[ FormBox[ RowBox[{ SubscriptBox[ StyleBox["xcoord", FontSlant->"Italic"], "3"], ",", " ", SubscriptBox[ StyleBox["ycoord", FontSlant->"Italic"], "3"]}], TraditionalForm]], FontFamily->"Courier"], StyleBox["}, \[Ellipsis], {", FontFamily->"Courier"], Cell[BoxData[ FormBox[ RowBox[{ SubscriptBox[ StyleBox["xcoord", FontSlant->"Italic"], "n"], ",", " ", SubscriptBox[ StyleBox["ycoord", FontSlant->"Italic"], "n"]}], TraditionalForm]], FontFamily->"Courier"], StyleBox["}}]", FontFamily->"Courier"], ". " }], "Text"] }, Closed]], Cell[CellGroupData[{ Cell["Circle, Disk", "Subsection"], Cell[TextData[{ "The syntax for a circle is ", StyleBox["Circle[", FontFamily->"Courier"], StyleBox["{", FontFamily->"Courier"], Cell[BoxData[ FormBox[ RowBox[{ StyleBox["xcenter", FontSlant->"Italic"], ",", " ", StyleBox["ycenter", FontSlant->"Italic"]}], TraditionalForm]], FontFamily->"Courier"], StyleBox["}, ", FontFamily->"Courier"], StyleBox["radius", FontFamily->"Courier", FontSlant->"Italic"], StyleBox["]", FontFamily->"Courier"], ". You can create ellipses or arcs of circles or ellipses using additional \ arguments for ", StyleBox["Circle", FontFamily->"Courier"], ". See the Help Browser for details. ", StyleBox["Disk", FontFamily->"Courier"], " has the same syntax, but it creates a filled circle or ellipse. If you \ want your circles to look like circles, you have to set ", StyleBox["AspectRatio\[Rule]Automatic", FontFamily->"Courier"], " in the Show command." }], "Text"], Cell[BoxData[{ \(\(radius = 4;\)\), "\[IndentingNewLine]", \(\(Show[Graphics[{Disk[{0, 0}, radius], Circle[{0, 0}, 1.1\ radius]}], AspectRatio \[Rule] Automatic];\)\)}], "Input"], Cell[TextData[{ "In our example above, the argument to ", StyleBox["Graphics", FontFamily->"Courier"], " was a list of two graphics primitives, ", StyleBox["Disk", FontFamily->"Courier"], " and ", StyleBox["Circle", FontFamily->"Courier"], "." }], "Text"], Cell["\<\ Let's draw the tangent line to a curve and place a disk at the \ point of tangency.\ \>", "Text"], Cell[BoxData[{ \(\(xmin = \(-5\);\)\), "\[IndentingNewLine]", \(\(xmax = 5;\)\), "\[IndentingNewLine]", \(\(a = 2;\)\), "\[IndentingNewLine]", \(\(f[x_] = Sin[x\^2];\)\), "\[IndentingNewLine]", \(\(curvePlot = Plot[f[x], {x, xmin, xmax}, DisplayFunction \[Rule] Identity];\)\), "\[IndentingNewLine]", \(\(tangent[x_] = \(f'\)[a]\ \((x - a)\) + f[a];\)\), "\[IndentingNewLine]", \(\(tangentPlot = Plot[tangent[x], {x, xmin, xmax}, PlotStyle \[Rule] {{RGBColor[0, 0, 1]}}, DisplayFunction \[Rule] Identity];\)\), "\[IndentingNewLine]", \(\(tangentPoint = Graphics[ Disk[{a, f[a]}, .01 \((xmax - xmin)\)]];\)\), "\[IndentingNewLine]", \(\(Show[curvePlot, tangentPlot, tangentPoint, DisplayFunction \[Rule] $DisplayFunction];\)\)}], "Input"], Cell[TextData[{ "Notice that we used ", StyleBox["Show", FontFamily->"Courier"], " to combine graphics primitives with the results of ", StyleBox["Plot", FontFamily->"Courier"], " commands. Also, notice that xmin, xmax, a, and f are defined at the \ beginning, so that it would be easy to change any of these to create a new \ figure. We could package this as a function." }], "Text"], Cell[BoxData[{ \(Clear[tangentPlot]\), "\[IndentingNewLine]", \(tangentPlot[f_, a_, xmin_, xmax_, ymin_, ymax_] := Module[\[IndentingNewLine]{curvePlot, tangentPlot, tangentPoint}, \[IndentingNewLine]curvePlot = Plot[f[x], {x, xmin, xmax}, PlotRange \[Rule] {ymin, ymax}, DisplayFunction \[Rule] Identity]; \[IndentingNewLine]tangentPlot = Plot[\(f'\)[a]\ \((x - a)\) + f[a], {x, xmin, xmax}, PlotRange \[Rule] {ymin, ymax}, PlotStyle \[Rule] {{RGBColor[0, 0, 1]}}, DisplayFunction \[Rule] Identity]; \[IndentingNewLine]tangentPoint = Graphics[ Disk[{a, f[a]}, .01 \((xmax - xmin)\)]]; \[IndentingNewLine]Show[ curvePlot, tangentPlot, tangentPoint, DisplayFunction \[Rule] $DisplayFunction];\[IndentingNewLine]]\)}], \ "Input"], Cell[BoxData[{ \(\(f[x_] = \[ExponentialE]\^\(-x\^2\);\)\), "\[IndentingNewLine]", \(tangentPlot[f, 1, \(-2\), 2, \(- .5\), 2]\)}], "Input"], Cell[TextData[{ StyleBox["Exercise 12.1:", FontWeight->"Bold", FontColor->RGBColor[0, 0.500008, 0.250004]], " Construct an animation of the tangent line to ", StyleBox["y", FontSlant->"Italic"], " = ", Cell[BoxData[ \(\[ExponentialE]\^\(-x\^2\)\)]], " as the point of tangency moves along the curve from ", StyleBox["x", FontSlant->"Italic"], " = \[Dash]2 to ", StyleBox["x", FontSlant->"Italic"], " = 2." }], "Text", Background->GrayLevel[0.750011]] }, Closed]], Cell[CellGroupData[{ Cell["Text", "Subsection"], Cell[TextData[{ "The syntax for inserting text in a 2D graphic object is ", StyleBox["Text[", FontFamily->"Courier"], StyleBox["string", FontFamily->"Courier", FontSlant->"Italic"], StyleBox[", {", FontFamily->"Courier"], StyleBox["xcoord", FontFamily->"Courier", FontSlant->"Italic"], StyleBox[", ", FontFamily->"Courier"], StyleBox["ycoord", FontFamily->"Courier", FontSlant->"Italic"], StyleBox["}]", FontFamily->"Courier"], ", where ", StyleBox["string", FontSlant->"Italic"], " is the text to be displayed." }], "Text"], Cell[BoxData[ \(\(Show[ Graphics[{Circle[{0, 0}, 2], Text[\*"\"\<\!\(x\^2\)+ \!\(y\^2\) = 4\>\"", {1.5, 1.8}]}], AspectRatio \[Rule] Automatic];\)\)], "Input"], Cell["\<\ For a more complicated example, let's count the frequency of each \ letter within some text and then display each letter at the height of its \ frequency, similar to a bar chart.\ \>", "Text"], Cell[CellGroupData[{ Cell[BoxData[ \(\(string = "\";\)\)], "Input"], Cell[BoxData[ RowBox[{\(General::"spell1"\), \(\(:\)\(\ \)\), "\<\"Possible spelling \ error: new symbol name \\\"\\!\\(string\\)\\\" is similar to existing symbol \ \\\"\\!\\(String\\)\\\". \\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", \ ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ ButtonData:>\\\"General::spell1\\\"]\\)\"\>"}]], "Message"] }, Open ]], Cell[TextData[{ "We will need a few ", StyleBox["Mathematica", FontSlant->"Italic"], " functions for dealing with text strings and lists. ", StyleBox["Characters", FontFamily->"Courier"], " converts a string to a list of characters." }], "Text"], Cell[BoxData[ \(stringCharacters = Characters[string]\)], "Input"], Cell[TextData[{ "Now we extract all of the letters from among these characters, and we use \ ", StyleBox["ToUpperCase", FontFamily->"Courier"], " to convert them to capital letters." }], "Text"], Cell[BoxData[ \(stringLetters = ToUpperCase[Select[stringCharacters, LetterQ]]\)], "Input"], Cell["We can count the number of A's in the text.", "Text"], Cell[BoxData[ \(Count[stringLetters, "\"]\)], "Input"], Cell["\<\ We want to perform a count for all letters of the alphabet. We \ first construct a list of all letters of the alphabet.\ \>", "Text"], Cell[BoxData[ \(alphabet = CharacterRange["\", "\"]\)], "Input"], Cell[BoxData[ \(letterFreq = Table[{alphabet[\([i]\)], Count[stringLetters, alphabet[\([i]\)]]}, {i, 26}]\)], "Input"], Cell[TextData[{ "Now we will place each letter at an ", StyleBox["x", FontSlant->"Italic"], "-coordinate equal to its position in the alphabet and a ", StyleBox["y", FontSlant->"Italic"], "-coordinate equal to its frequency in this text." }], "Text"], Cell[BoxData[ \(letterFreqGraph = Table[Text[alphabet[\([i]\)], {i, letterFreq[\([i, 2]\)]}], {i, 26}]\)], "Input"], Cell["And, finally, here is the graph.", "Text"], Cell[BoxData[ \(\(Show[Graphics[letterFreqGraph]];\)\)], "Input"], Cell["What are the three most common letters in this text?", "Text"], Cell["\<\ Perform the same analysis with the text below. Does it have the \ same set of common letters and the same set of rare letters? Place the \ graphs one right after the other, so that you can see them both \ simultaneously. Do you notice any similarities? Any differences?\ \>", \ "Text"], Cell[BoxData[ \(\(string = "\";\)\)], "Input"], Cell[TextData[{ "Here is the Guatemala national anthem, if you want to try text from \ another language. ", StyleBox["Mathematica", FontSlant->"Italic"], " will count the accented characters along with the unaccented one. So, \ for example, ", StyleBox["\[NTilde]", FontSlant->"Italic"], " will count as an ", StyleBox["n", FontSlant->"Italic"], "." }], "Text"], Cell[BoxData[ \(\(string = "\<1 - \[DownExclamation]Guatemala feliz! que tus aras No \ profane jam\[AAcute]s el verdugo; Ni haya esclavos que laman el yugo Ni \ tiranos que escupan tu faz. Si ma\[NTilde]ana tu suelo sagrado Lo amenaza \ invasi\[OAcute]n extranjera, Libre al viento tu hermosa bandera A vencer o a \ morir llamar\[AAcute]. Libre al viento tu hermosa bandera A vencer o a \ morir llamar\[AAcute]. Que tu pueblo con \[AAcute]nima fiera Antes muerto que \ esclavo ser\[AAcute]. 2 - De tus viejas y duras cadenas T\[UAcute] \ forjaste con mano iracunda El arado que el suelo fecunda Y la espada que \ salva el honor. Nuestros padres lucharon un d\[IAcute]a Encendidos en \ patrio ardimiento Y lograron sin choque sangriento Colocarte en un trono de \ amor, Y lograron sin choque sangriento Colocarte en un trono de amor, Que \ de patria, en en\[EAcute]rgico acento, Dieron vida al ideal redentor. 3 - \ Es tu ense\[NTilde]a pedazo de cielo En que prende una nube su albura, Y ay \ de aquel que con ciega locura, Sus colores pretenda manchar! Pues tus hijos \ valientes y altivos, Que veneran la paz cual presea, Nunca esquivan la ruda \ pelea Si defienden su tierra y su hogar, Nunca esquivan la ruda pelea Si \ defienden su tierra y su hogar, Que es tan s\[OAcute]lo el honor su alma idea \ Y el altar de la patria su altar. 4 - Recostada en el ande soberbio, De \ dos mares al ruido sonoro, Bajo el ala de grana y de oro Te adormeces del \ bello quetzal. Ave indiana que vive en tu escudo Paladi\[OAcute]n que \ protege tu suelo; \[DownExclamation]Ojal\[AAcute] que remonte su vuelo, M\ \[AAcute]s que el c\[OAcute]ndor y el \[AAcute]guila real \ \[DownExclamation]Ojal\[AAcute] que remonte su vuelo, M\[AAcute]s que el c\ \[OAcute]ndor y el \[AAcute]guila real Y en sus alas levante hasta el cielo, \ Guatemala, tu nombre inmortal!\>";\)\)], "Input"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Graphics directives and options", "Section"], Cell[TextData[{ "There are two methods for modifying the appearance of graphics primitives. \ You can modify the individual graphics primitives using ", StyleBox["graphics directives", FontSlant->"Italic"], ", and you can set ", StyleBox["options", FontSlant->"Italic"], " in the Show command that effect the entire graph. We already used the ", StyleBox["AspectRatio", FontFamily->"Courier"], " option in the ", StyleBox["Show", FontFamily->"Courier"], " command to display circles properly. Let's turn our attention to \ graphics directives. The basic syntax for graphics directives is: ", StyleBox["Graphics[{{", FontFamily->"Courier"], Cell[BoxData[ \(TraditionalForm\`directive\_1, primitive\_\(1 a\), primitive\_\(1 b\), \[Ellipsis], \ primitive\_\(1 n\)\)], FontFamily->"Courier"], StyleBox["}, {", FontFamily->"Courier"], Cell[BoxData[ \(TraditionalForm\`directive\_2, primitive\_\(2 a\), primitive\_\(2 b\), \[Ellipsis], \ primitive\_\(2 n\)\)], FontFamily->"Courier"], StyleBox["}. \[Ellipsis], {", FontFamily->"Courier"], Cell[BoxData[ \(TraditionalForm\`directive\_m, primitive\_ma, primitive\_mb, \[Ellipsis], \ primitive\_mn\)], FontFamily->"Courier"], StyleBox["}}]", FontFamily->"Courier"] }], "Text"], Cell[TextData[{ "All of the graphics primitives allow you to specify a color as a graphics \ directive. Colors can be specified with ", StyleBox["RGBColor", FontFamily->"Courier"], ", ", StyleBox["GrayLevel", FontFamily->"Courier"], ", or ", StyleBox["Hue", FontFamily->"Courier"], ". Or you can load ", StyleBox["Graphics`Colors`", FontFamily->"Courier"], " and use English names for colors. For example," }], "Text"], Cell[BoxData[{ \(\(rectangle1 = {RGBColor[1, 0, 0], Rectangle[{\(-2\), \(-2\)}, {2, 2}]};\)\), "\[IndentingNewLine]", \(\(rectangle2 = {RGBColor[1, 0, 1], Rectangle[{\(-1\), \(-1\)}, {3, 3}]};\)\), "\[IndentingNewLine]", \(\(disk = {RGBColor[1, 1, 0], Disk[{2, 2}, 1]};\)\), "\[IndentingNewLine]", \(\(rectanglesAndCircle = Graphics[{rectangle1, rectangle2, disk}];\)\), "\[IndentingNewLine]", \(\(Show[rectanglesAndCircle, AspectRatio \[Rule] Automatic];\)\)}], "Input"], Cell["\<\ or here are all three graphics primitives combined into one \ statement.\ \>", "Text"], Cell[BoxData[{ \(\(rectanglesAndCircle = Graphics[{{RGBColor[1, 0, 0], Rectangle[{\(-2\), \(-2\)}, {2, 2}]}, {RGBColor[1, 0, 1], Rectangle[{\(-1\), \(-1\)}, {3, 3}]}, {RGBColor[1, 1, 0], Disk[{2, 2}, 1]}}];\)\), "\[IndentingNewLine]", \(\(Show[rectanglesAndCircle, AspectRatio \[Rule] Automatic];\)\)}], "Input"], Cell[TextData[{ "Other commonly used graphics directives are ", StyleBox["PointSize", FontFamily->"Courier"], " for the ", StyleBox["Point", FontFamily->"Courier"], " graphics primitive, and ", StyleBox["Dashing", FontFamily->"Courier"], " and ", StyleBox["Thickness", FontFamily->"Courier"], " for the Line graphics primitive. These are all described in The ", StyleBox["Mathematica", FontSlant->"Italic"], " Book, Section 2.9.3 Principles of Mathematica\[Rule]The Structure of \ Graphics and Sound\[Rule]Graphics Directives and Options. Read through this \ section in the Help Browser." }], "Text"], Cell[TextData[{ "In our next example, we will create an animation showing how a point on a \ rolling circle traces out a cycloid. We will create an animation similar to \ the one show on MathWorld's ", ButtonBox["cycloid", ButtonData:>{ URL[ "http://mathworld.wolfram.com/Cycloid.html"], None}, ButtonStyle->"Hyperlink"], " page. If ", StyleBox["t", FontSlant->"Italic"], " represents time, the radius of the circle is ", StyleBox["a", FontSlant->"Italic"], ", and the horizontal speed of the circle is ", StyleBox["a", FontSlant->"Italic"], ", then the center of the circle at time ", StyleBox["t", FontSlant->"Italic"], ", is at" }], "Text"], Cell[BoxData[{ \(Clear[center]\), "\[IndentingNewLine]", \(center[t_] := {a\ t, a}\)}], "Input"], Cell["\<\ Let's set the radius and the number of steps in our \ animation.\ \>", "Text"], Cell[BoxData[{ \(\(a = 2;\)\), "\[IndentingNewLine]", \(\(tsteps = 40;\)\), "\[IndentingNewLine]", \(\(tmax = 4 \[Pi]\ a;\)\)}], "Input"], Cell["Here are the circles moving from left to right.", "Text"], Cell[BoxData[{ \(Needs["\"]\), "\[IndentingNewLine]", \(\(circles = Table[Graphics[{Blue, Circle[center[t], a]}], {t, 0, tmax, tmax\/tsteps}];\)\), "\[IndentingNewLine]", \(\(circles = Table[Show[circles[\([i]\)], AspectRatio \[Rule] Automatic, PlotRange \[Rule] {{\(-1.1\) a, a\ tmax + a}, {\(- .2\) a, 2.2 a}}], {i, 1, Length[circles]}];\)\)}], "Input"], Cell["Now, let's add a point moving around the circle.", "Text"], Cell[BoxData[{ \(pointPath[t_] := center[t] - {a\ Sin[t], a\ Cos[t]}\), "\[IndentingNewLine]", \(\(points = Table[Graphics[{PointSize[ .015], Point[pointPath[t]]}], {t, 0, 4 \[Pi]\ a, tmax\/tsteps}];\)\), "\[IndentingNewLine]", \(\(points = Table[Show[points[\([i]\)], AspectRatio \[Rule] Automatic, PlotRange \[Rule] {{\(-1.1\) a, a\ tmax + a}, {\(- .2\) a, 2.2 a}}], {i, Length[points]}];\)\)}], "Input"], Cell["\<\ Now, combine the circles and points to be sure that the point is \ moving around the circle.\ \>", "Text"], Cell[BoxData[ \(\(Table[ Show[circles[\([i]\)], points[\([i]\)]], {i, Length[circles]}];\)\)], "Input"], Cell[TextData[{ "So far, so good! Now, let's show the trail of dots as the circle moves. \ At each step, ", StyleBox["i", FontSlant->"Italic"], ", we need to display the points for ", StyleBox["k", FontSlant->"Italic"], " = 1, 2, \[Ellipsis], ", StyleBox["i", FontSlant->"Italic"], ". These are the points that have been traced out up to that time step. \ After you evaluate the following Input cell, you may want to drag the \ bounding box of the first image in the list to make it bigger and then \ evaluate it again. This will increase the size of all of the images in the \ animation." }], "Text"], Cell[BoxData[{ \(\(trace = Table[Graphics[{circles[\([i]\)], Table[points[\([k]\)], {k, 1, i}]}], {i, Length[circles]}];\)\), "\[IndentingNewLine]", \(\(Table[ Show[{circles[\([i]\)], Table[points[\([k]\)], {k, 1, i}]}], {i, Length[trace]}];\)\)}], "Input"], Cell["\<\ example? : animated line segment from {0,0} to {1,a}. Can show \ previous lines as fainter gray or as dotted lines.\ \>", "Text"], Cell[TextData[{ StyleBox["Exercise 12.2:", FontWeight->"Bold", FontColor->RGBColor[0, 0.500008, 0.250004]], " Create an image of nested spiraled n-sided regular polygons. The \ polygons should share the same center. Each polygon should be a little \ larger than the one before and rotated by some small angle. All of these \ polygons should be displayed together in a single image. Suggestion: Start \ simple. Try to display a single n-sided polygon first. In fact, you could \ write this as an auxiliary function that you call from your main function." }], "Text", Background->GrayLevel[0.750011]], Cell[TextData[{ "Now that we know about the ", StyleBox["PointSize", FontFamily->"Courier"], " directive for ", StyleBox["Point", FontFamily->"Courier"], ", we can improve our tangent line example. The default size for Point is \ so small that we couldn't use it to mark the point of tangency on our graph. \ But with a larger ", StyleBox["PointSize", FontFamily->"Courier"], ", we can use ", StyleBox["Point", FontFamily->"Courier"], " instead of ", StyleBox["Disk", FontFamily->"Courier"], ". We can plot the point of tangency using ", StyleBox["Point", FontFamily->"Courier"], " instead of using ", StyleBox["Disk", FontFamily->"Courier"], ", since ", StyleBox["Disk", FontFamily->"Courier"], " does not maintain its proper aspect ratio. A ", StyleBox["Disk", FontFamily->"Courier"], " may be squashed into an ellipse if ", StyleBox["AspectRatio", FontFamily->"Courier"], " is not set to ", StyleBox["Automatic", FontFamily->"Courier"], "." }], "Text"], Cell[BoxData[{ \(Clear[tangentPlot]\), "\[IndentingNewLine]", \(tangentPlot[f_, a_, xmin_, xmax_, ymin_, ymax_] := Module[\[IndentingNewLine]{curvePlot, tangentPlot, tangentPoint}, \[IndentingNewLine]curvePlot = Plot[f[x], {x, xmin, xmax}, PlotRange \[Rule] {ymin, ymax}, DisplayFunction \[Rule] Identity]; \[IndentingNewLine]tangentPlot = Plot[\(f'\)[a]\ \((x - a)\) + f[a], {x, xmin, xmax}, PlotRange \[Rule] {ymin, ymax}, PlotStyle \[Rule] {{RGBColor[0, 0, 1]}}, DisplayFunction \[Rule] Identity]; \[IndentingNewLine]tangentPoint = Graphics[{PointSize[ .03], Point[{a, f[a]}]}]; \[IndentingNewLine]Show[curvePlot, tangentPlot, tangentPoint, DisplayFunction \[Rule] $DisplayFunction];\[IndentingNewLine]]\)}], \ "Input"], Cell[BoxData[{ \(\(f[x_] = \[ExponentialE]\^\(-x\^2\);\)\), "\[IndentingNewLine]", \(tangentPlot[f, 1, \(-2\), 2, \(- .5\), 2]\)}], "Input"] }, Closed]], Cell[CellGroupData[{ Cell["3D graphics primitives", "Section"], Cell[TextData[{ "The 3D graphics primitives are ", StyleBox["Point", FontFamily->"Courier"], ", ", StyleBox["Line", FontFamily->"Courier"], ", ", StyleBox["Polygon", FontFamily->"Courier"], ", ", StyleBox["Text", FontFamily->"Courier"], ", and ", StyleBox["Cuboid", FontFamily->"Courier"], ". The first four primitives are similar to their corresponding 2D \ primitives. Of course, you have to use three coordinates instead of two \ coordinates to specify points in the 3D primitives. ", StyleBox["Cuboid", FontFamily->"Courier"], " allows you to draw a rectangular box. Its syntax is given in the Help \ Browser. 2D graphics pirmitives must be enclosed in a ", StyleBox["Graphics", FontFamily->"Courier"], " command, while 3D graphics primitives must be enclosed in ", StyleBox["Graphics3D", FontFamily->"Courier"], "." }], "Text"], Cell[TextData[{ "Here is a bridge. It sometimes helps to draw a diagram by hand first, so \ that you can figure out the coordinates of the polygons' vertices. Since the \ bridge will have two similar supports, we will write it as a function and \ then call the function twice to create the two supports. We will use the \ parameter, ", StyleBox["xBegin", FontSlant->"Italic"], ", to specify the ", StyleBox["x", FontSlant->"Italic"], "-coordinate of the left side of the support's base. In the diagram below, \ ", StyleBox["xBegin", FontSlant->"Italic"], " is 0 and ", StyleBox["l ", FontSlant->"Italic"], "\[Dash] 2. By the way, I inserted the diagram in this ", StyleBox["Mathematica", FontSlant->"Italic"], " notebook by opening it in a graphics program (I used Adobe Photoshop), \ selecting the entire image, copying the image using Edit\[Rule]Copy, \ returning to my ", StyleBox["Mathematica", FontSlant->"Italic"], " notebook, and pasting the image between two cells." }], "Text"], Cell[GraphicsData["Metafile", "\<\ CF5dJ6E]HGAYHf4PEfU^I6mgLb15CDHPAVmbKF5d0@000n6d0@0006`00000000000000>P3000A0P00 00000000000m@`00S2<00215CDH00040]>4300d0000100000000000000000000P0L00;04001:0@00 cP00000000000000000001091@2`90<0AP0006c`0@1Pl040AdA9@`4008000`00J9hJW@000018l040 0@0900039?P000002_P00000100000<1200500002`8000001@0000`20P7X0@[h00133b00c0000081 j04000000P7X0@00000X0000j0400081000100P000000000000C2`004`/0000000000000d];>0 dP3>d/h0d/g<0cP3:c/h0c/[>0bP36c/h0b/[>0<[>bP3>b/X0a/[>0<[6cP36c/X0b/[:00a/40_/[:0<;6 bP36`/X0a/K60<[2aP3:a/80c/;20;k6bP32`/X0_/[60<;6aP36`/H0a/K20;k6aP32`/H0`/K20D09f=S`2:UiH0U8f>08f>SP2IQHH0Phn?08n6Q`25QXL0SH6307V:R@2AO7h0P8:308Mo O`1jPH00SGEg07mlO@24N7T0Ng]h07=mO@1lMG/0Q75e089cL01dMG/0RV]_07=jMP1lLg@0M7=d07Y^ K021J6X0JWAd07I/L01]K6`0M6QY07URI01SKFd0JVEV07]LGP1`HV80GfIU075KG@1XGf00H5mP06]G F01cDED0I5UK05QNGP1REE<0FeMG06A@E@1YBdh0CUUH05a@D`1GCTh0GdU;04MACP1?Bd`0ETM804]5 AP1G?D00BSm003i5A012>c/0ACMU9>KTi>KXYfCVI>CRXZKWI>ITiBDTiVDU9BITYVRVi>KWIBCRhF4Q8B;RhZ:QHYl QHF2Q8AjNX:5QHZ5RgemQ8:2Q8B4PWV2PWYlO8:4O7aiQ8AiLgU_NGYcO7f4Q7ecNGUiNGUiNGUiNGUi JFm`Kg1`JFUZL7UcLg=cNWUiKfUYG65XJ69`L71RJVUUHVQXJ69UIFQXJ71SHFQXKfm`J71XIEeXJ65L G5aEEF9`G5iLG69EGEeKCe]RFe]KIF9LEEELEE]KH69UG5]QFe]CEE]REEE@EEEMEEaUEEEEEE]RFeaE FeEEBEE6ATUDDE1KDE59BE5EFe]EFe]AEE5KEEE9BE5ED5=?FeEADDUEBE59ATU9BDU9FdUCRXjMTi>CU8jKTiB:RY^RThj;Ti>MTiVCRh^; QHZ4PHZ4Q8B:PX:4Q7b5QH:5QH:2Q7UiOHB;Q89jNHB;PWeiPWb4PWamOGYcLgYcNVmkQ7emQ7ajNW=m NGUjNW=jNFm_Lg=ZL71YNW=iNGU`J71iNG1cLfUUJFQUIG1_IFQ`J6EUIFQXIEaUIFEXJ6EUIF9YJEiU IF5RJW1XIEeEHUEEG69RG5aLKEiEEE]EEEaKHU]UHVEEEEaEHU]KHV9KJ5]RFe]RHU]KDEEKFeEEEEEK Fe]KD5a@Ff1REE19BDI6DDUED5a@ATIKFeEEEE]KFeEMDE]@D4UKEEEED51REE5ADUEEBDI6BDU9ATU9 ATI9BDI9BDU9ATI:D4U:BDU6ATI6BDI6EDU6BDI6FdIEEDUKDDUKDE56ATIED4I6AU5MC5eADE5KBDUE EEE:EE1@ATU9BDI6ATUKDdI9BDIED4U9EDI6BDIEG5]KEDYEDEE6ATI:BE]AC5EAFeE6ATI6EEE9FeEE EDU6AUEKFf9RDF9LGF:[[ZZ[[Z^[ZJFZZZZYZJVYZJZ[ZZFZZZVZXZZYYJFUYZVUX:VYZJ6LZJZZYJFU YJ:ZXZ:UVJ2IVIVRVJVRXZ:MVijCVi>CVI>CXYjUW9>MVI>CU9BKVi>NU9B>Ti>:RI>CSXjCTi>KSXj> WHjCTi>>SXB9ThF5Q8B4Q9B5PXAmNGb5PXF5PX:2PX9lPXJ;Q8Z;Q8AiOGUjNWYjOGemMGEeNGUiKgZ2 NGYiNGUcJW=iNW=cLh:2LfUcLg=_Kfm_NW=iKg1`L7YcL7YcL71iIFEUJFUXJ6UYIFUYHFQUG6EQJ6UL HFEXHV9KHV9QHFQUIF9RFe]KFe]MHVi`HU]LG5aRHUEEG5ELIEaBEE]KEEeUHEaRHEERFf9KDeaEEEaE FeEEBE]KFe=KFf9EBE]KFe5EBDI6EEEEFe]KG596ATUKHTI:BU19AUEUZZVP XJ6UZZZUW:2UYJFMZIfIViVPX9fHVIfCTiBHXYfKXYBLTj:RV9VCV9^YVhjIXZ:MTiRDU9V>SXZCTi>M Ti>CTi>>RiB8SY>>QHF2Q8B4PXB4SXJ5QHF2PWeiNH:;PXF4QHZ4SX:2Rh]lRXB4PWZ2QH9jLh:4OG=] JFmjNGUiO89iNFmcLg=cNGYcLgUiNGYcKgUcNFQ_LgajKfQQJG1`LgY_L71`L6QUJFU`L71`JFmYLfQX L6QQJFUXJ5]UJFUQHU]XHV5LIEaLG6ELEEELHV9KHVYUG5aKFf9REEaLEEEEEDIEEE]KD51KFe]LEF9K D65LEEERIE]KEE1:Fe]KG5ELG5a@EE]@EEE9ATYEBUEMFf9KATI6AU]AD51@FdU6EEE6BE5KEEE6ATI9 ATIEAU19AU56AU56ATI6C4I9ATIEG4YEEEE6DE56ATIEEEEBATUEATIADdI6AUE6C5eEEEEAEE]6AUEE ATIEEEELFeeMFf9RDDI6Fe5ADEEEEDHm?DI6DE5EBEENBTI6ATHmBDI6ATU9BDI6EEaEEE5AEE]EATIE EDI6ATIAHUEEEE5MVHbIWI^MSYBRV9^MWI>CWZ:VXZ:CSYfKThjD Th^>SY>KTi>CTi>;Thj2Rh^CQHF4Q8B;RXB:QHF4Q8F;OHAiQ8EjQHj4Q85lO8B5O8:2O8:2PX:2 PW=iPWUcLg=YLgYcNWUiPW=iKfmcLgY_LgUiNGU_NFm_JFecNGU`NGY]JFUXL71cNG1XLg=ZIG1XL6Q` L6EcNG1_Kg=YJ71_NFQRJ6mYHF5LHV9RIEaRIF5RJ65CFe]RJ69UHUaLFe]KFeERHU]?EE]ED5EEHU]@ D5]EEEEEHV9KHF9REEELEEE@EDYEEEELEEEED5aLFeEEBTI:EE]@EEE6EE]9ATIEEDU9De]KEEEEEDUA DDI6DDa>VIjRSXjMSXjIXZ:R TiBCTi>>RXZ5Ri>DU::CTi>CTiB>Thj;RWb4Q9>5SXB4Q8B5Q8B2Q8B0Q8^4PWb0O8:5QHYlO8AlQ8El NWf4PWajNWYcLgYiNGUcLgYiNG=cKgV2NVm_NGV2NWYiNFm_JFUiNFmYJFQiNG1_JFUYJW1iJG=_NFQY JG1XL6m_L6YZL7V4NFU_L71ZL6UUIFEXJ6EXJ5aXHV9REEaUJ6QKFeaRHUaUIEaMHU]EEF9LG65RFe]E G5]KHUEEFeEEG5]MEEEKFeEEHV9KD5EEEE]EDE5KFeEEBEE@EEEREE16ATIEFe59BDICBDUCVIBCTi^CWI^KTiVM SXj>Ti>ITi>CTi^>U9BDRXj>Ti>:RXZCTiBDSX^;Rh^4PhV4QHj5QX:2Q8:5Q8B4O7V5Q8B2PWV4Q8B6 QGb2PX:2PWaiQ7f5O7YjNWUiNGU_LfQcLg=iNG=cNWY_NGYmOGUcLgUcLgeXJG=`L71XNGU`L71UJFU` L6m]Lg=iKfQXJVYcLfUYJFQ`LgUYLg1`J6E`L69UJFUYJVQXIFYZG6QREFEUIEeKFeaUG5aRFe]KDE9E BUEKFe]RHU]KFe]KEEEEGEEEJ69AFe]QG5eMHV9EEE]@D4Y9Ff9KFe]CGF9KEEE6BTI9EEE@ATUAATmC HUEEFeEEDDU@BDU9DUE9EE5?ATU9CdUABDIABDU9EEE9BDI6AU1EEEEEC5]?Fcm9ATI6ATI:C4I9BDU@ EDUAGF9DTi>KV9BDThfCV9>DU8ZDThj:RY>5RY>CU8F4Rh^;RhAlQ8B:QHF4Q7b2Q7emQ8ElNGai PWYmOHF2Q8J6QHElQ89mP8B5QGemPWicPWYiNG=cNGU`NGV4NGYjKfU_KgUiNG=iLfUjNGUiJ6miNGU` L6UUJFQXIFQXJ6UjJFU_L6Q`LgUYIG1_L71cLW1cL71`J6QiJ6EUIFERG5aXJ6EMJ6QUIFEKHV9RGF9M HU]@Ff5EEEE9HV9KEE]RFdUEDeaLIEaEIE]KFeEKHUaKFe5EEEEEFeE@EDYAG5]EFe]RHUEBEDY9BDm@ ATI6BDU6Fe]KFeE@BU9EEE]ED5a@EEE9BDI6ATU?CdmKAU5ABE]KDDU?BDI6BDU>SY>HWIB>Th^CTi>:SYfCThj>Ti>CSXj>Rhf;PXF5PXF5QIB2QHZ4NHB4 Q7V2PXB4NhB2NGV4Q7V4Q8^:Q8^4NGV4PXF2OGeiMGEjLg=jNGUiLgUiNGUcKfmcNFQiNGYcLgUmNWYj NVQYKg=cLg=YJG1`Kg1XJ6QYL71_JFUcLfmiO7=cKfQ`KfmiNFmUJ71YJFmcIFEQG5]UHV5YIEaQJ69U HE1KHV9KFe]KFe1LHE]KFf9RFeaEEF9EEEaKEEaREEaQHV9KFfEUG5EAE5]KG5EEBTIEATaEBU16EEEC D5E@EE]9BEEAATI9ATI6AUEEEEE@DTIEEDUEEEE6AUEEEEEEFdmEBEEBEEEEEE56ATI9FdU9BDIMXYRCXZ:RTi>MWI>MVIBDVIfMWIBCSXZCS8Z>WIf>SXj;Ti>>SXF2QH^6QHB4PHZ: QXF5RXF6Q8B4NW=jO8B;PXF4O7V2PXJ4Q864Q89lO7b2NWV2NVUYNWUYNWYjNG=jNWUiL7=jNGYiKW9c Lg=_LWU_L7=_KgaiLfUcLfe]JFUYJ6QXL6YXJ7UcNG=YJFmcNGeiJ6Q`LfmiLfUYIFEUJF5UJ6QXHV9U JFUYG65UHVEUG65KFeaLHU]RHFERFeEKHV9RIE]RFeaLG69LIF9UIEEEG5]KHV9RDDUKFeaUFeE6AUaE EEEMG5EEBDU@D5]LFdUEFe5SYBKTiBIWI>CTi>>U9>CTi>KWHjCThZDQHjDQGYl Q8F2PX^5Q8:2QH^4O8F2O8AjNX:2PX9iQ81lNGUlNH:2PXB5NWajOGU_O89jNWYiNG=iNGUiNWYiNGUi NG=cLgU_NGYiNG=`JFmiLfYiLfUYLg=cLg=YJFQXL6QiJ71YLgYjJFU_Lg=iQ7UiLFmcJ65iKfUUIFEL IF9UIG1RHVEXIFEUJFEUHV9KFf9RG65KHU]RJ69KG5]RFe]QG5]KHUaLEEEUGF5QG5]EAU1KHV96AU]? FeaEEDUBDUEMEEaLEE]9EEE:G5]RFe]KEDI6EDI6BE19EDUKEDI6AUEKBDU6AU96ATIBEEE6EDIAFe1E EEEED4UKFeE6AU]EBTI9DTY:ATI6ATIEFdm9BDI6EDaCTif;Tj:CTiVRVi>CTiBCRX^CVi>IRY>D U8j5RiB:RX^;PXF2QHj4Q8B4Q8AlQ8B6QX:2PXB5O7YcNX:4Q8AiO8j4PX9iNGamNH:4Q7V2PWacMGYi LgYjNG1cLh9jLgYcKfmjNGUcLfUYLfmcJG=cLg1iLg=`Lg=YJ65`KfQXNG1`Lg1`NGa_Lg=mNG1iJFm_ HG5SIFEXIFEUIFeUGF9XI5]UJFUTIE]KFf9RHV9LG5]KEE]RGUEKEF9UGF5LEE]RHFEEDfQLIFEKEE56 EF9REE5AEE]CD5EEBEE6EEEMG5EAEE1ED51@Fe]KEEaLDDIABDIAEE1@EEE6BDU6EEE9EDUTiBDVI>CThZ>Ti>DWHjKXY>CVj:MWIfDU8Z5 SX^CSYB>Ti>5RhfCSXj>Rhj5QHF2RXBCQ8B4NXF4RH^2NXJ5Q8AlO7YjPX^4PX:2PXB2NWYjPX:2PWb4 O7>2NG>2NW=jNW=cNG=iNGUlNX9iNGUiLgUYJFU_JFU`L6eYKgUjLg1iLfQ`JG=iL71`Lg=cJG=cNWYc J6UYKgUYJFQYJ6QXJ71`JEaQIFQRIFALIFQYJEaUIF9RHV9RHV5LEF9RIF9EFe]KEEeMEE5MDEeYIEEK Ff9LHEEEBTUKFe5EGE5AEDU9BUEED4I@EEeREEE@ATI@BE]KFeaMDE59EE]9DE5MATIEGDI6ATIEDDI6 ATUEBDU@BE]EEE99BDU9BDU9DEEEEE5EG5]KBDI6AU5TiRRTi^C Ti>RXY>DSXjMTi>>SX^KTi>;Q8Z;SXF5RhB2QX:2Q8^>PXEnNW^5RhF2PXj5NWYmO7Z4Q7b2PWYjPX9j NWUiPX]jNX9iNGYcNH9iNGUcLfmjLgUiLgUiNGV2L7UiJVYcLgUcL7U`Lg=YLg=YMG=cJVYZJG1iL7=] JFmYJVYYJG1`LgYcLfmcLfQXIF5RL6EUJ6QUJ6EUHF5XIFYZHVEQIFEREEERHU]LEEEUHV9AEF9KG69E GEEEGEeRJ5aEGE9:D5E6BE]EDUEMC59EBEELEDI6D4U9BEEBEEE@G5E@G5aLG5EAD4UED4U9BE5AATI< ATIEAU56AU9EDDU6BE5KEDI6BDU9AU5?ATI6ATI6ATIEEDHfEEE9DDU6DTI9ATI6ATI6ATI6BDI6ATI6 DdU6ATI6ATHm=TU9EEE6ATI6ATI6ATI6ATI6ATI6ASlo=SI6AT0bATI6AUE6ATI6ATI6=dI:ATI6AU9< ATU6ATI6C5E6DUEEATIEDEEBATU9EEEEBDU6DU9BEE]MHU]KTj:KXZJVWifCTi>DTi>CVHj:RXF5SXj4RhJ6PXF9RhJ2NWijNHB2PX^CRh:2QWemO7aj O8F5PWb2O7YjPX:2OGUjNG1cNWYlPWZ2NFUcKgYjNH9`LgeiLgY`NG=ZLgYYL7UZMFYYLg=cLg=cLg=U IFYUL7E`L6YYJFE`JVY`L7=cLfY`J6EcJFUYG6EZHVEcL6QXJFEXJ5aUIFERG5aUIFERDF9KFeaLBU9R HUEBGEELGF9RGEeEEF9KEEeWIfRVJ2RXZ2MVi^Y XZJYYYfIU9fYWIfITifDWIfVWIfPYZ:TU9BCVhjKTifMTh^CRhj>RXB;Rh^>QHB;PWUmPX:2PXJ6Rh^: QHJ2OHAjNWb2Q8:2PWYiNX:;Rh:2NGUiNGUiLgajLgYjNX:2NWYjNVmcLgUjNWUcIFYcNVYiL7=YJVUY JG>2LfmjLg=cKG=eLfQXLg1UL71ZL7UiNVUYLfUXL71YHV9UIFEXKfUYJ6U`L6QRHVEUIF9RIEeUIF9M GEaKHU]EG69EDU9EG5iLG5]RGEeMEE]RFeEUEDIMYZJZ WJ:UZIfMWJVRXYfVVj:MTi>CVI^CWIf>VjJVYYfCSYBDThjMViR4Ti>DSXB5RhF4Q8B4Q8j5PX:2Q8B; Q89jPX^4SXF2PX9lO7YiOHB4Rh9lOGUiOHB2PWaiNGYjLgUiLg=_NWZ4RhB2PWYjLg=cLg=cJG=ZLg1i LfYYLgY_KfU_NGe`L71`NG1ULg=`L7=cJFU`LfmcPWUYJ6QcIFU`Lg1ZJW=RG65YJFYUJVYZGF9UHV9U IFERHVENG5eEEEaRFeaUHUEEBE5MDDaMHV9LHUeEGF9MEEEEATaBC4a6EFEUIFERHU5MGEiMFeEBDVYR IEaBEE]EEEEEC559EEEAC59CVj:CVhj>WIfITi>>U9BCTiB>RXBCWHj;PX^=Q8J5O8B; ThB4PXB4Q8AmPX::PX:5Q7Z2NGUmOGemNH:;PWUiPWZ2PX9jNGUiPW=_NGUcNFUjNHAmOGV2NWYcPW=Y LgY_Lg=cNFmYJW>2NVYYNW=cNG=cL7UiJ69ZIG1`L6ULJ6mcIG=iLg1XHfUZJ6UcLfmYJF9UIEaLIFYc JVERIF5MHVQXHF9XHV5MGEEBDUEMEE]BEE]9EEE9DE5KDeaLFe5KHV9REEE6BDa6ATIKHV9UFeEAATaE DU59EEERGEEEGEEKFe5EFdU6BDU6DU5ABDU:ATa9EEEADEEAAUE6ATIEATIEDEE6AU56AUEAGEEKDDI6 ATI6AS8m@3U6ATI6DU5DHo ATI6?Ce6ATaADDU9ATI6BDU9ATI9ATU9ATHfCTi>HVi>CU9BDU9BIThZDWI>CTiBDSYBDThJ6 SX^9Q8j5PHZCQ8B2QHF2PWYjO8:2O7alNWb4NGemNWUiO7aiQ7aiNGUiNGUcNHB2Lg=iKg=cLfUcOGUi Lg=iNGUcLg=cJFmcNGYjKg=YLgUcLg=cL71`Lg1XL7=MHVEUHW1`IFEcJFU`J6Q`J71YHF9RHG=`L6EU J6EMIEeUJ6EUIF9KEEELFe=KG6QXHEaLGEaEGEeLHE]EEEEEEE5AEE1@EEERDEEKFe=:EDU9ATI6ATUA GF9KEDI@ATI6BUEEFe]LG59NG69KE55EATI9BDUEFe]KBDUEBDUEEDU9C55ACdUAC4I6DF9RHUE6BTI6 EE]EDE5ClfATI6BDTf?dTo>C90ATICTi>MU9>RVI^CSY>CRi>>QHjCXY>C ThZ>SYB4Q8:4Q8B4Q8F4Rhf;Rh:2PWZ4PWYjNWf4NX9lPWYjOGb2OGeiNWYjOH9jNGUiKg>2Q7YcOGUi NGYjKgYlNG=cLg=iNFmcNGUYJFmiL7=iNFmcNG=`Kg=iKWU`J6QXJFEUJVEUL71ZJFm`JFUXJG=`JFYU Fe]RJ6UYIFQUIEiYIFEXIFEUHV9EHVELG5]RIFEKHEEMFeaREEERHUE@E5]BATILHEEEEEaEDU9LEEEE BDI6ATI9ATIEFeE@EDY6ATI:AUEEBE]KGEeEEF9RC4Y@BDU9BEE@FdU6ATToAU59BDI6ATU?BDI6ATIE GF9KFe1:EEEEEE96ATI6ATHo>Cdm=THoATI6ATa6ATIA?dI6ATI6?C8bCWIBDVIfDVI>4Rh^> RYB>TiB5Ti>CSX^:RXZ4PXF>RhB4RXB4Thj4P8:5O7b4OGUjO8:5Q7]kNGUiNX9iOHAlKfmiNX9iNGUc Lh9jJFmcLgUiNGUiNGUcLg=jLg=_NG=iKg=cJGYcL7UXKfmiLW=YHF5`NFUXJ7UYJ71RHFQXJ6QRJ7UY IFUcJFELIEaQHV9XJ6QZIF5QG6EYFeaUIEaUGEeQG5aEG6EUJ69UEE]KFe]EEEEAD51KD5E[]:j[ZJZZXZ:RZIV9b_R_TjJUZJ:MTiVKVIfD^O?6Y::IVIVMU9>KYIb>TifDWI^R XYfMTi>:SXj>WIBCU8FCRYB:RXFDSX:4RXJ6Q8F5Q8B5PXB4QHJ2NHAiNGV2QHB1NWf4NGUjNW=iQ7Y_ KgUjNW=mNGEcNWY_Kg=cNW=iNGV4NGUiLg=cNWY_JFUYLgUcKg1XKg=YI7=iLVEYIFQ_JFU`NFi`J6UY JG1XJ69`KfEXJFEUHU]QJEaRJ6EKHW1UHF=RIFERIEaUJ6UYJ6QLFe]RG6EUHV9LEE=LG5EEEDU9EDY: EE5AFeE9DDI9BDIDI6ATI6Fe]@BDI9ATI6ATI9DDI6ZZFUYJZY ZjZZ[:VYZJ:RZZFMWJVZYJFX`NCH]k>YXZZIWJVYWIR`mLJ>YZJMWIBDTiVNWZ2=hMnWViRKWHjCTi^Z _jB:U9^CTi^RViVCRXZ>Ti>KSXfCQ9>>RXF:PHZ5PXB4Q8B4SX:2Q7alQ8^4PX9iNGYjPX:CdfATI6AT16 CQ9BCTh^;Rh^=ThZ:RXB4PXF4Q8AlPXF5Q8J4OHBCSXElO7V2PWV2 NZ;EdZiiPXAmQ8:2NGUcNWYiNVmjKgUiNGaiNGUiNGYcJGUjKgYjNWYjKg1`L7V4NG=jLg=jNWY_J6EX J6QXJFAQKfQ`J6QYJFQ`JFmbL6UYLfEUIFQUIE]LG5aLIFEUIEaKG5ERJ6UYJF9RHV9KG65XHUeREEEK EEEEHU]LFeaEDEEKD4I6BUE6AU5KD4UKD5ELFdU6ATIEATI:EE5ABDIED519Fe]9ATI6ATI9BEEABDI6 BTIEBDI6AU56ATYEASe9AT0fASI9ATIEEDU6ATI6FdmADF9RHUEAEEE9ATU9ATU9ASdb?CLmASe6ATI6 ATI6BDI6@4HfSY>CTh^CTi>>QI>;Ri>;ThB4RX^4Q8B4QH:4Oi6d^Y>4 QHAiNH9jNGf2Q:KQjhQjQ8B2PWemOH:2LgUiNGUiNG=cLgUiNG=cPWYcL7YjNGYjNWUcOG1iL6m`L7Ue NWY_NVmQJ6QXJFUYKfmXJ6QYJVQUHVQ_KfQXJG=`G65YHFEXHV5LHV9XIEaKJ5]EEFE`Lg=YG5aMG6EL G6QXHVEMEE]EBE1LG5a:DU9ABEEEATILFe]6DDU6BEE9AU=9BDU9ATI6EDUEATa9BDI9D51KD4I6ATI6 ATI6AU59?DIAATI@BCI6BCm6ATI6ATI6ATI6ATI6D5]CCdU9?e5MFe]EDE5KDE59BDE9ATI6ATU6ATI6 /ScgVi?FdIAATI6ATHfobYiVQZZVRZJ:RVZbUW:6H^ORh SZ:RYJ6RU9fYXYbH^O:_SY^CZI>RWIB:Z?6lQIRIVIVDVI>ISY>CRhbCHa=THX;Zo]eUM9ATToATI6ATHf=TI6?clfASHgASI6ATHf AT0bYJVYZJ:YZZS1 m>O8ZI>`nL:>YZ:RXj>bZiVKVHc@gi2CVJFS/[:MSXjEk]V2TiBITi>DThj5U9BCTifMRX^=RH^4Q8B4 PX:;PWUlQHAo_O?Y[gYiO8AnNWYlQ7UjPX:1J;3idG=iQ8AiPWY_NVR/g/jgKG=iKg=cNGUiNG=jNGUj Kg5iNW=`NH9jNW=cLfUYJ7UiLg=XL6ibNG1XJFUUJ6QYJ6Q`Lg1YJFQ`JW=`J6EYHFEUL6QUGF9XHEaL GEEEGFEUHEaLG5aKJ5aEGF9UG69MGF9LEEEAFeEKHU]EATU6EEaKFeeBDE]KBDUk_nOahM>nWEDmBDI6 BEE6ATIEAUELBE59BDU9BDU9ATTbWnBoJ55KBU19AU5AATU6ATTfBDI6BDU6?gFn_f19ATI9Fe16ATI9 ATI6ATU9DDU9BDTmASHfkh^::R YJZ[ZJZXb_?YhO30U9[dhXRUYZ:`g_GcdJVMTkNaWJ:UV<7gmS9BMWHZIU9^MWifC V9>5QHB4RhB6PXB4QGN0Ol7hg7iiPX:2O7UiQ8B4Q7emNH9lH>[fUWilPX:2NgV2Lh_BkoOTY71WKgYm L7UiLfmjLgYjKgU_NWb4O7YaNG1cLfmiL71YNVUYJ7UXKfQcJFQQJFEUJFUcJ6UYKfmUIFEUIFQXIG1i J5aMG6EREEEEGEeMIEaXJ69LIF9KG69QHV9KFe=LIF9EEE]KEE]KBDU:AU5MFdURGDY:DE/`]O7caZe] DUeLEDI9Fe]9Fe56ATI6ATI6FdU9D4U9BDU6EEEAYnK5CdU6D516BFmX@dU6ATI6ATI6=S90;6GQ`e]E ATI?ATI6ATI6BDU6ATU9CdI6BCd/=S8f=cHfAS96]WQFTI9ATU6ATI6 ?dI6ASI0WYJ6Z[ZVUZ;WdhiJZf^:TRM;RR9jVV=kfe=__aXRRVIRUXY71ln_amZnCWIfC Ti>CWIfMWI>CSXJ5Q8^;SX:2PXB2O7o1m^=]PHZ2Q8VZZj>NO7V4OGf4PXIXaOZhJWUkOGe`NH:2LfF6 bO?HT7YjO7eiNGUcMGY_KgUiNFmjLj:[KfMiNFm_NG=YJFUYJFQiNG=_LgEUJ6Q`Lg=UHFQ`JFUcJF5X IEaUL6ETJ6QMIF9QIE]KBEELG5ELG5]PFe]LFe]UHU]KHV9RHF5KFe1@G51LGE96BE1@AUE9EEE:EE]D Ck_fiWDK;TI6ATI9AU59EEEKDDU6ATU9ATIAC4Y:BDU9BDUEEDT]/n^^@dUBAUDb`=^[FdI6ATI6BDHb K[/[TU0ATU6DDI6BClo=TI6DTU6ATTf=SHmAS8b;38f=RP`]=:gJS96AS96ATTm?DI62H ATI6ATI6?DI6BDI6VIVCZ>kYU[WfaXF4eOJ_ QI>MSY>ITi>CVi>CTi>;SXj4Q8BDRhB5PX:2Q8Ad_OS]UW>5QH9iXnkamO?F]jV0NGemPW2inL9BNWai Lg=jNH9jLg5Q]O76NWa_KfmcLg=iNGU`OGYcLgEcS=:kJG1YLgU_IFQ^L6mXJ71cLfYcKFEXL7U_JFEL JG=UKfULG6QXKfUYHEaQJEaKJ6EMFe]EEE]LD5ERG69REEaKFeeKFf9MHU]HEE]KFe]LG5EEAU9EFe=9 FeEMEEEKFdFHmMm0=TY_JDdI6BDI6@4I9BDI6ATIEDDI9?3I0ATI6=Sdb;2PXQCm6MX:2UTl7h^8j9_NB_SY>IVIRin>S8nJS7V9ThjKVi>>RX>5Q9>4S8AlPWZ4NjSdmZmcQHF6OGVHk_?Xm_Kel=O7^Zf5 NK3ge5ijNWUmNGekOG=cNGUihMR@PWUjLfUYLgU_J7V2NW=iNGUX^nbgJ7UjJ75_KVQ_J6Q`JFUYJVU` J6QYJFULIFEUJFEUIEaUJFYXJ6QXHFQXDemXG5aEEE]EFfQLG5aKHV9:EF9KFeeKFeEMFe]KG5EMFeEB DU1EDTaKFf9LDU]KDe=MDI6AT0fASe0AUETVJFRXYfC_ORlRYBSbl2; Ti>MUKWgaWZAc/b8QmGbUY>CThn`j_Caf[fbV9R:QXj5RXZ5Rgf4PWUmQ8Adf_g6HHB5O7f0PGVkllan Y;[Fi^_Vb;>;Q^_DKGajNXAiNG]mO7YiNFSEljMcNGYcLg=cNFQ_LgV2Lg1jKg=Xin1cLVQiLfQXJFAY Lg1`JFm`L6m`J71YJF9UHVQXL6EUL6QYJ6QLJ6QUL71UI6UUG5aKFe]KFeaUFe]MFe99Fe]KHV9LG5EL Fe]RG59EFe1LD5aNAUEEEEeMBE1CFdUPknM0FdU6AUE9C4aKY>CBHDHm?CI6AT16AUEEBE5` llJ5TjS_aX:CTif;/??2QXW5f:2?j^V8U8j;^OOno_koo_WdklNjU8RCRhF;Q8AiOH:;RXodlWj4Th9c O7alNW;Jn;IQNFUeSXEjRX]iaO6QIVCSXjEk]V2P<[]YjSce7V>SX^dh=gTk?WooOgooORfQ8jCRI>;SHB2PX]k ^OW?KHj;NGV2NWV4OJKdliIiO89lNWUkOGUeRgelMZSNmoGTYGYcNG^9j^R_IFmcOFj`eM^jKfmiLWUi NVUYFjci`5i_LgU`J6EcJ6mYJGUcLfU`NFmYJF9RIFUYJ6ATG5]YJFEMG6=XFfATHU]LEEaKFf5QFeaL G5EED5]MFe]EEEaEEEaUIEaEFeEEE5]LEE]EEEaRHUaEG5EEFe/f]OVfAU16EDI6BE19DdU0WoGePTU@ D5]KD59]J4U9ATI6ATJghNOBd/^dNDY6BDU6`il:5VIVDThW@kJAhaO:T^OJlNHjDRXYjLhJXm?o?^9 ThB4RhB4Q7CJn[acPX9mOGYjKgelLkGggEj0P7Z2QHB4PWYcNWVXm?SIcNKKPVmlNI_8`8Q_JGa^/?Cf l^^jNVmiNG=jLfUUOO7OGVUcNFEULg=cJ6QYLgUiL71cJFEUIFQUIFEYJ6QXHVEYHEaKJ69UJF5RFf5Q EE]KHF9RHE1LFf5LEEELEEEED5]KG6UUG4YLFe1KG69RGEEKHU]RFe=CEE]REBfcnKLbFdU6ATI9BEEE FdIIZIVC/?ODQK3P[h6>Ti>MQ:c/ggZmlZKJlYJ;Ti>CVhj=RgodoKa_ NGYjTif;QXF5Q8B4OHB5OnGh^725PWeiO7aiNGalHm3h^WV4O8:2Q8B4PW=iK=Gf]VEUTnC4LgUmNFEY QH]_L5[Um[Qn__6jIFQ`NH9_J6Qmg^e]IFUXJG=`JGYUHFUcLfQXL7=ZL6QXL6QXFf5RKVULG6QXG5aQ J6EUG5aLG69KFf9EG5aKEE]KG51LG5E@D51@FfERHEaLG519EEEEGEEAEEEQFe]EBE5RHUaB;Jkh^cIC FdU6?e56ATU@AV[[gLRUDdUEBE]ADTI6ATY6ATI]jmHf;D0iC396BDHbU?7Ce>bI/jA0ASIRiNCCikAC EBkAm8a9DDU6ATHoATI9=TI6ATI6ATHm?CHb5KKfdRQ6ASdfATI6=Rj_gN_i`a^A=THb?dI6AS8bCm6AZVQYJbYYJ:YYJFUYJFU YJVVZIVNV;gici2YWIfUZJ:9_OJnakZ8XZ:RXYfYVi^=_mR^b^:FU9>CThjCPCTiRR Ti>CUNkm_8ZCSYBDU8Z>Q8Z;Rh^;QHEdj_R_PX:2OG]lQ7]lQ8AgNnk/R8:2PWYkO8:2NVmfiMAUOGU` bN^fLh:2NGajNW=XZ?KDDVQmlMeBLg=cLfUXLW;Zl6eKJ6QYLg1QJFEXJ7=YLfmcLfUcJ6Q_J6QXHFQ_ J71iJ6Q`JFA_J5aLHE]RG5aLG5ELG5EEEEE@Fe]KBE1KDdIEAU]LG5EKDE]9DE5ABDI@D516DTI9DF9R FdY6ONo>Ddm9FdU9DDI9BDTmGNo4a=MgDf9KFe=KBC`l@cA6BDJTjlM7CdICU6BDToATU6ASm0ATI6=cdmATI6ASlbATI6ZJ^Z[:b/ ZJVYYJVLX:FUZIfRXZFRZ>kbYjFRX:VUVIVC^[N[Ti>MVJ:YZIVDTi^;[=OR_XZIThZDTiBDQTi>ARY>?j_g2SYfMWHj;QHF5Ti>;RhB5O7oZn;IcOH:2Q7alNWYlO7a^`OW8NWajO865QGb2 NZ?W`UacNW2HhM=nNWYiQ7UjOFR`mKaRNG2k_ZicLg1`Kfm`NNkXGVEQIFUXL6QUIFEYLg=_JG=iKfUX L7=YIFEUIFEYKfmXJ6mcKFUUHF9XFe]QG5aLG51@EEE@D5]KFe]6D5E?BEE6FdUKEE5EG4UMC4I9EDY: EDU6ATUKFe]9AU19eo6:ATU9BDU6BU56ASIBkClf<[?_kmg`k;U?DHm ?dJYZJF[ZJZYX:FRZJ2PYJ6UX:FUYJF9`OS2RZ6DWJ2MU9B>ZJVITiBDWJBPTi>CVi>C[[6MXZ:MTi>> U9BCPWf4/]72U8j>Ti^DRKgE^g_UolJ6WIB>SX^4Q8F2Rh^5Q8f4Nn[h[gV5O8B4O8F5NGUiO7fEm?>8 Mgb4Q7b1O89m[>NhG7UjNVS7hYI_Kgb4NGUmL;;e_6QjLWg5eXEcNGUiLg>4mMmBIFUYJFUZIFERKfU_ L6QQL71XNGUiIFEZJG1XL6UTJFmiJ6U_LfUQJ6EUJ69RFe]KFe=KAU1@HUaLFeEEEE=KEE]KFeEMDE=@ EEE6ATI6BEEMHTUAFe]KEDI6ECfTkk/mDDU6ATaEATHmAU;FdSJTk;A6G<3C]/SCcMgM_YA@ARk4i;M? BDI6AUDZ_^M^BH:gNDI6?D3CfdU6KMRacW?3dm3m6AS90=bQejo6>:YK=dWTgATJcSTa6;EgFjm?MbfQ6ATU9AU166[Sc/3E6 C4a6AR`/DI9 ?CdbATHg@4I6AZVYXJVYZJFLYJ:ZZJVYXINQW:VUXYRZlNV@VI:IX:VRVj:RXZFYWIbDU9>;RY^CU8j: VI^RVIBCTiBIVhj>Tj:odiJ:SY>;Ri>4`OWe[MGmaX:CVI>CThB;Q8Z;PXF4Q8AbeOZhLh1iQ89lP8Ai OGZ4Q6S5nL1jO7b4Q81iNW2Hl<9MNWYcJ;_TX6mjPX9iNGY`Q?CKkPHC;BhE]9DVYZC38^DUiN IE1EAUgMkj53ATI6ATJ8jk/[^^ajBDI6;/S/H3IBk;lX;M?gRTUKATU0ATI6;4I9@40m=R`b;C8b=ReB jnM9d:9K4RdHmATI6 AS8QU^fo Ti>=Vi>DTi^RTiVDSY>CTi>KYXj:VJjYThbCTh^5Ri67j_o[`oS?OY>CThZ:RXZ5QH:4PXF2O7Vimla] NGb4Q8^[^IUXNHB2NIGglgj2O8AiO89iNG_WgGYjO7abaM>8LfeeOGUjLfUXf^ajKhZ;aN^8L7=iLfU@ [?S4AUE6?dI6ATTfATI6dAE16;ZOHV4IKEDI6=UkX_c4a R>6RASe6CHbCVi>RVHj>WIfCSY>CSXjCTi>CTi>CSXj:Th^bmO__n/InTi>>RXZCU8F5QHB2 QXF5PXodjFf2PWalQ=GglLNZNGUlK^[f[gZ2PXAmNWUlNLGaajFdNY7G`WUcLg=iLGUcNVRimkaQOIS9 ggicNWacJDnin:mLKfi`JFUZL6EUIFERIFEZIFUUJFEUFfQRHVEQJ6Q_Kg=cIFUXJ6EUJ71UJ6ELHU]K BDILG519CdUEEE]EAU5MHU]KEE1?BDUEG5E6BTU6ATIMEEEKEDI9BE1@EE5A>LCa]e=AC5eUHE1EEDUU `b[^^N>>C;HlGU6ATI6?dI6 =TI6ASHbDHm?DI6ATH^f?5SG^3BAcdf?cHfATHg?A^fm[dfEDHZYnBiFdHb ASHaG^:oBBVhih]6ASTb?c8b=RkLhD8o>CTo=RdY:2`/;C4fCTi>KXZJMU9>RThZISY>CU9>KTi>>QHFCVi>`moWf_8jCThjC RXfCSXF4O8:2RhB2K]kfUW=iPWYiWK[KlO?H]8E^eORlLh:5QH9cLgYjV>c/d^6LbnRlLGYiNGUjL7Ui NH_UjhQ`_n_IKG=iKfmXE]GbOVUYKW1YIG1`IFEQJ6QQHFEUG5ELIF5LHf5LHEaTHFUYL71YIF9`IFEX HVEKEDaEEE]EIEa6ATUEHU]AEDY6FeeEEE]ED4m9BDIEATI@BDU6AUE@D4YECe5ADE5RDDU6GMO/[4UE EFEYD59EBDVfi:hodM9KFdI6AU19ATHgU;[KhM_Kk?>M3W D4U6AT0iC3e6ATU9BDHbATHoONHTI6CTb>DI6ASe6ASdfATH^ATHfATHf?cH];CI6?e59ZZZZZZZ[ZJVUYJ:UXJJKXZ:R XZVYYIjITj[4h:fITj:KXZ:IXZ:MU8ZCTj:RVI>CTi^KTi>RTiV>Tj:KU9VCSXj>Ti>CTif:Ri>RXXg@ n?RWQH^;SXjCRi>:QX^5SXB2NX5X_OW0IGb4Q7ajJ7:^bNccek_Cl[IiSX9mOGYjNXAiam_Qn=oR`Wii PX:2O7=`Kg5iTm[if9SQl[QcNGUcJG1dkmmNIFUUIG=_J65QIFUQIF9XL6UQHF5UG65QG6EXLFAcJEaU IFEUHUaLJ69RJ5]6EEaKHVEYG5E9D5EMG51@EE]KBDILHTIEFeE6BTI6ATmAATY@Ce]9BDm?Ce5KHV9E EEDiMNCGQ5]@DVUEDE5EAXkWdTVgiie9BE16ATI9BDIUMK?0b=78[dI6AS96ATI6=Ujnb5dbATI6AR6] i^26ATIMkmLfD4I6ASHoATI6BDa6ATI6ASI6=cLbARZ_mKLfATI6ATI9?c966[ceTaZll94f=dI6ATHm ASdX>]gPNc5LLfgM^dU9ATIDI6?C96AS8b4TYVMTj:RWIfRTiVDSY>KVi>CZ:j5Ti^IVj:CVIfVVj:CThj;RYBCThjC Ti>CU8jMWI?Na8^:QHZ5ThB;PHZ:RhZ5QGZ2PWfHmne]PXF;O7YiQ7YUO[kKf3PXU=ETfEADE5@A[OW]9g/[C96EDI6ATI?BDI6;BU6=RXbATHgATHmBDI6=S9< DDU6BCm6;ZfjT4I6DI6ATI6AT0fCTi>CV:SEkl^fSYVRVi>>YJVKVi>D U8j:S9>>SY>CVi>:RY>MV:RgWI>DSX^:QH:;RY>4Q8B:QH:5Q7_Un;IXO89lO8B4Q89jLgZ>RgV2Rgf4 O8:2NG]aNGV2T8IYL7YiQ7ejLgUjLg=cNGUUQ[?4]WEcLgUjIGUP_OJhG6UcL71`KfUYJV9RHV9RIFER HUaQJ69ZIF5LHEaLFfQ`J5aQJ6EKG5aEFe]EBE]UIF9QG5aLFe=EEDI@DDa^=TIEBDU6DTU6AU16AU]9ATI6ATI0 ASI6?DI6ATI9ATI6ATI6>CU6ATHQ_^acDI6ASlb ASINdk]9KNc3:4I6ATI6AS96?CeBhbAS8if=/fBClb:FU9bI U9>ITi^UVI>IU8Z>U9BDTi>?j_:WTi>CSXF>SXj:RX^4Q8^5PHZ;OKWgfEiiOGeiO8^2O7b2 QGalO8B4OH9lO8B4NVmlNVm_NWYiLgV;PW=lNFmjLfmcNFQYIEEKKfmXNGYYKf_NhXQTJ6QXJ71cL7=Y IEaRIFEUIE]UJ65QHVERHV5UG5]KH6QXHEaREEEMFeEBAUEKFfELFf5QIEaQD4Y@DTa6DE59BDI9Fe]K EEEKDEEBD4U6BE]ADE59BU19BDU6AUEEFdm9EEa9Fjk4_ZAEDEEEG5EAJ]SVk:@bAU1:ATI9ATI6BDU9 BDI6?DI6ASHm?DI6ATI6ATI6ATI6BDU6ATI6ARkCece6ATI6BC8iC8oASlbDX::7^lSGlOGg o?CknYXXjMXY^MVi^CTi>;QXBCTi>CTiBDRWoZlYJCVHF:QHj>QHZ;QH:2Q8F;SHB5NnGf]Wem Q7ajPWalQH:2O7YlNHB4NGUiPWYcNWYcO7aiOGecNGUiNG1iNFmaLg=cLg=YLg=cL7YjNW=?_OFlJFQX J6EZJG=`L6QXHFQMHVQRJ6URFeERFf9RIFEQFeaUG5aLEEeEEEaQG59:EE]KG5]KG5aQG5a:BTUCATUK BE1EEDUKFe]KEEEEBTI9CdE9BDY9BDY@BTU9ATI9AU]KD5EMG5EKATIND5]EBUE@EEDbY>KVMDI6BDIA DDU6ATI6ATU6ASdfBDU?ADUlHdTfC8bIVJ:RViVM Tk3[ckO:iOWno_Wjl[RDTjJMTi>CXYfMTi>KThj>SI>CTi>CU8F>Sn[bUYB:QHZ:SXF1Q8AlPXB;Q8f; QHii/_OOT8j2NGZ2OHB5QGYjPWeiO7YiOGUiNGUmNWV4Q7eiOGV2NGeiNGUiKgUiLgEeJG=cLg=jNWYj J6_NmYI_LfUYIG1YJFUXJ6QXHF5RHV9XIEaCHF5KHEaQIFQXHF9KG5aEFfEEEE]KEEaLEDIKFeaNDUaR HUa@FdU6ATI6D5ELDdm@EEEKFdU9ATI6ATI6BDI6DTI9DDILEEEEBTY:AU9BEEEEBDU9Fe1@EEeEBTI6 WJiEFdHmATU9AUE6ATI6ATI6BDU6BDlfLm^gCdI6ATI6ASm9ASHbATI6AS:T]ee6ATI6IFQhBCM6ATHl =Sdf=SLb?cHfARh/=SIBcM9G=TI6=bi6ATHbYo2iS^^e;DI6ATU6ATI6AT10ARUBO]>j=TU6ASL^Bi6ATI6>C8bATI0?dU9ZJFR[:j[ZjVRZZ:QVIfKVIfMX9VBWYfMWIVRXZJV YIbIVi^RWI^9g^VfV=G^o?okkoWjgJVCS8B=Q8jMVI>CU9BCThZCTi>CTi>DU8ZXm?:@Ti>>Ri>CQ8F6 Q7alNXB4Q8F5Q8A^bO2j[GYlO8:2Q8AlNWYjQ8B4PXAlO6miNGUjPXF:O7Y_NGUiNGZ2PVU_Kg=jNG=Y NGUiNGZ2SWe^]O3=JGUcKfUYJ6Q`IFQXJ65UJF5UHVULG6EUIFEUG6EUJ65QHE]QG5]KHUE9HU]LG5EK Fe]9BE]EEE]UEE1EATU3ATI9BEEKFeEEFe=9ATIBBTI@B4mKEDI:AU5KEEE@IEE9EEE9EEEDDDaMEEEE D51EFe5=SHf>Q;Wig8JC SY>KVh^5SX^5PX9jPXB4Q8:R]hB;bLR@NGb2PX:2NHB4Q8:4Q8AmOHAiLgUiKh:6PWajNVmjLfmcLg=Y JGYcKfmXLg1kNFmiLgV>Q[O[_7EcJFQ_KfUQJ6QXJ6QUHFQUIFQUIEaUJVEXHF5QJFELG6UYIF9UGF9K EFE`IEaLG69REDI6Fe]EEEELFdUABDI9ATUEBUaEEEEEEEE6DTICJ5]KJ5]EFdY@Fe]KEDUKEEaKHUAR HU5ADU96BDU9C51KDE5EEDI9DE]AATIEBE]DBDI6ATI6?cm6ATI6C2Z]lNOUJ5]XBDHbAU1ADDI6AUen T5dfATI6ARaiL2dY?cloClf?d0bIU9VCXZFMTiVCRMk]UZSgoooao?kloooko?gkno_eknoalNOB_kBd/ZZNS8V0 Ng]d^OWLKI>>RY>CQ8BCRhB2PX:2PXB4OJSB]8^MTgf4PX9lPX:2O8B5PX9lNH:2NFmYNGUjO89jLgUj NWYiJG=cLgYjLfmYL79cL71_JFU]NJJg^[Q]NG=ZIFUYJFEUG6E`L6QUIFEXIFULHF5MHVQUJ6QXHUaM J6mYIF9QGEEUJFEREEiRG5EBEEELFf9KEDI9BDUABDI6EEEBEE5EEEEKFeEED5]QGEEEATYEEDUEEEEK BE]EFe]AE5]EEE5BATIEEDUAEEEED4IEDEEEBDU9DTI9E556ATI6ATI6?dI6ATHbP[kemOBdG5]KBDIU IG1EATU6ATI9BDU6ATI6DI6?bR]h8@fASmZT7=6C96ATI6=SlmXZ:CU9f4b_JhON[oolKBnO_nn]Wan?Sflo?ioOgkno_l n_Wgm?7WinGKeKnmmnRDWXAmQ8B4NhB;Q8F6PX9lRi=k^OCalO3C8b;4I6ATHf?cTbCd/ DI6C3loATI6AU1AASHoIWJ:RWIBRVjJMThbilLIm_OkolkSZnOkb[jJc][>g ^/C8dMKPi^KVl?Ghn_[jnogmoOWlo?S_jn7QeKo3]jbNS7emJ6QiKVKEnOcjm^C0OWYlRhB5QHB4Q8F4 OH:2NWUmQ7eiO7UiNGUcLg=cLgYcLgU_Lg1`JGYiNG1_KgZ2PWYcIG1iNG=YI6AUIFUYJ71_J6UUJ7=X J69LG6mXG65EIFEBEEaUHVEUL6ELIFELHV9REFERHVQRGEEEEEaLEEEADE]@ATIKFeE@EEEBTfBCli=SHbDI6ASl];SI68Bdg;BdY8C8fC96=S4o;PXJ;SYfOT92Y/k>c/jfc_/C4iO[hkO?hn_[knoginOSaiM[Jc/k3`OOonn__llRDS8b9 NhAkNGU_I75kOGYiNHAmPX9jLgUiNGYcNWUiOG=cLg=cJFYcNFQXJ7=cKg=iNGUcL7UcL6U_I6UYKfQi LgU_JVUYKfEQIFEUJVYYG65XIEiLIFYXHVQXIEeLIFEUFf9MGF9RHUaNG69REEeRHV9MFe59FeaMGE96 BE5B`X ;CHf;SHoClo=RdfCTbAS8gMWI>MWJJOYYfDQH:CRhF2PWVigKaeZK>^/koAdmSVjo?hn_[knokoooon o?Oim^oelNcWfm[Jd];3_kB/WYR9RGUYJ6QXJ71iL7UcLgaiLgYiLfeYL6YcLfmYNW=cLg=iLfU`L6YZ JFmYJFY`L7=ZLfU_IFUYHW1YIFEZLfUQIFQUG6EUIFEUHUEMGEaLG5aQIFEQHEaQHUeLJ69EHF5LIEEN DUERFe5o]kBRO7b4NFikG4UXEDI9DHb;38^C8f=S8m=S8i>C8bATHo ?ce6BCHbAS8bRZJVMWIfD WJ:KTj:CTkGKe:fmnOoooo[egjnCWJVCTifMWJJVWIfKU9BDTi>MWIf>Q;g[_ZBVWH^>Q8F2QWF6QZJ] /k[8d_OjlOWno?_fj>_`k??fmOGfn?KelOGekncaimNo`k^[ZZZZTgUiJFQ`J71cLg=cJFUiNGacLgF2 Lg=ZJW=cJVe]JFUUL71iJFEYJG=cJEeXJ6EQHVQZIEaUJ69LHUeUGFELDUEEGEeMIEaRHV9UGEaEHUeK G5aXHUEMGEaEEE5ADDUKBE5EG55YJjaZHJ6LgfCLh]`GE9B:Jgei_?fmOSknNcBcLgMh^3`i?7cl?3/inCKinOBelO3`kNa ^kNYW:FARG5XH55RFcm9MNKemoWak>2b=TI9ATHiCHfCTbDI6ATI6ASm6ACm0@6g<]4m6=bhb;3@m>DHoDI6AS8iDI6CZJ:C Ti>RWIfIYIfRYZJKTifUZJjofl3Uo?onloS`c:BRWIBRZIfMWJ:CWIf>Ri>CSXjCWHj=]M?2QJ2CWJVI WHjCSXJ4PWUiLfR=in>_en7aomU]RhjV[Jf][K>_[KJja<_AgNK/lO?hn?KfmOSck>3Gd/No[ZbRQ7MS J7UiNFQXHW1`JF5ZJW1`Lg=YL6Q`L7U`J6UYL7UUIF5UIF9LIEeLDVEZGEaLIFELGEEEEEE@FeaUGEeU IFEEEEaKGE]LG5eMGE5EFe]EATaAEEEKFeEAAU5EEE5EEDaAHU]REDI9DEE:ATIAC5EEC5EMFdIEHUeK BU1MGDIEFf9EDDU6AU66]lSFa=7Hb<2gXY^6VeeEATHQ^_SFi?SagN3jkZ96DWF6MJf]]Zn__/W=gmob i^_`i^_/k?3ckN_/lNc`i>7Nfm;FbkoAmOSenNcMhK]9=TI6ASm6?clf?dI6DHbASe6 ASe6ATI6Clb@4I9BDU6ZJFUW:FRXZVVYZVVXYVIZZJK WIfIVIbIVIfCU9BIWIfKXZFPWI>MWI^MVjJoaTi>MSW_@ i;J4XY^MSY>CTh^>PXF6QHF;NkWc_9W5e^ooj8RCRhAiNGf4PW=jNGeiNFj2MGF;ZK>j`/SCgMg[io?f lOG_koC_inO[jn3Gal>o]j^[K[0gNCTgM:jZXa^CbRjm^37n?GA/o_i_DIEFdI6DVYM C4I0DGF6QXQnWjBT[KJ]/kJf^<2n_/34dm?Mh^K[h^Kbn?WiimOK`e]6AT0^ATI6BClo?clf=THm=S8b DI6ATI0@38h>KK4RCHY8E1C=THo>D10 ?c8b?bdbATI6IU::YYI^RXZFIVj:MWJFMU8ZRWH^Hg_ScgMOWgjfKVifISY>KSXj;RhB> WHj:U8jCRk_AX8ZDSY>>SX^;SXB4QHF5Q8]ob_:WLZ[Bim_`c8R:Rh^4Q8F;QX:2Q8B4Q8B2NGU`KeaN IFYUG6EiWjBM^m74f>3Vl>_`l_KeloSgmO?_knoWiNGGd/Nk^knk]j^ATIj0NFiDHU=KFe]KHU]KHU]X J69RHU]KEEEADF9RHVELHVEXHVELEEeEFf9EFe]KFe]9EEEEEEEADEE6ATU9BE1:EE]RFeEKFdU6AU59 AU96ATI9FdU9AT16AU5AATI6BDI6BU96DE19?DUDFdI6ATIKJVY]U[K4dnKalO7WbN7am>7inN77nOWU P51EATI6BDI6DDIAFe]9@EEUHU]9DCTZ:CU6Cm6ASHbIVIVKXZSNlnchi^KR_[jfTifC XZ:Q8:DWIfDThj;RhB2PX:4Q8B4Ri[Uhgj2NGUiL/G[`7Z5QGajPWaiNXEiOH:5 QH:5Q8AlNWZ2NWUcLgUcJG=iJ6mcJWeeMI26WjfD[K_4am?Mi^K/lo?flo?gmoKelnC_lnoWemOBd/Bo ^k>^ZjZCNG9iKW]aO8AiHe=RHW1XFeE@BE]KFe]3@dU9Fe]KBDU9BDmEEEaRFeAPDDIKDE]KBEEEBDUE EEEEEEEEEDI6BE56ATI9AU96DDI9BDU6ATU9BDILFQSH5=?C9H4IWJ:RYJFMVJ:CVJ:RTifMWJ:CV=GVeoGh i=_el[R;U9BDThV>RXF5U8jCSXZCVIB;PX^;Rh:2PXB4Q89i/>cDNWb4Q7f4SMG[/GZ4NGZ2 O7UlO7UmOH:2O8F4Q7ajLgYjNH9iNG=jPWUiPX:2NFmXNG=LKfAQDdUEEEEULhJ6R9nTY9nY[KK4aKVgN_[k?3[l?3ThN7Qin3Wi>3WhM_Ge]OGdKnn_l?;_k^d/[B[XZ:b/>k^kfi^Kfm^kB[Zj69RHb=NijNV81kNfiPFf=^Cdlia?Se nOce]ca3BDHf4bP[:b/aBCe9JB/CcHfDHbASlf=cI9BCnPXZ:MWJ:YXYfUXIjRXZ:RZIVRXYVDYJ:IVIfKTiRKVjJLW9fMVIVUWI>CV9^D VHjHaMS4fncelOOf^8jMRXZ;Ti>>Q8B4SXjCQ8^:Tj:CRhbCRh^4Q7f2QHF4Q8^2NW2il<9nPXF2PXF4 Z>GMUWeiNXF5Q8^4PWf4PX:5QH^5QGUiOGUlNGUiNGf2LgUjO8B4KgUmNG1iLgYcJG=cJ6QcLfERHVQR IF5KIFUUEDY9HVEMJW>5T:B^/k>f`;k4dlS8dlS0ac/G5`l?3alk3_l?:`l?5akfk]kno^kNb/K:b/[C3_ko4d/W4^/_B_ko7 d];Be]S7bmOKemOBamKKm__lnN3/n>Keo?_hn?Shn_[hmO7eloGhn?[hm_?emOGcl?7alNoalNo/jn_P hMkBemO`nO_lo?OGc/_5_k^k`knk^kNg/KNo^l>k^k^k^k^k]jFYZkBg[[Bg^k6a/K6^[ZjYTj:DNVUc G:gVfj=3ATI6>HSDfiQ?=SM6ASlje?Ri?4`]AY=K=SI6=THg=b`b@416CThB>SY>4Ri>CSX^;RhJ;SX^;ThZ6RhB4Q7V0O8:2PWUiK[gb ^7>4Q8AlQI=m]N_CHf>CVk?3`l>KVlno[jo7clo?cl>SVlo;`lo7`lo7`i_3`kNc/i^_`lO3[jo3/k>KV f=?Aem7=f>CMe]7Mh]SPkNKVjnCTh^;MgNcaloSMdnChn_?CbK`l?KimO?bn?Sclo?cmOKalNc/jnCPh^KMh>3Ti]gHh=gHgMgPfmKAe]KFa<2j^[>Y X:VMWIB2LhFOY;S]khm9AS`oMYZ:NXZVMYZJV YZ:RYIRRVifMVI^MTiVMWIfM[4Q8j>ThBCTi>4QHF>SXj>RX^:RXZ2Q8B4O8B4 Q89lNGUdeNVFNGf4Q8Z4Q8Am_n34NWagO89lQ7ajNGemO8B4QGaiLg=cNGUcLgYlNWYcLgUaNH9lNG1` LfmcNW=cKgY`L7=cKg1cKfQXJ6EUJG1XIFYRIF5UJFUXL6QXJFUXJ5aUG5aRL6EUJ6YUG5aLHF1QD5]6 ATU?DTI6BSe6ASdgATULBU9UD59NEFEUGUi]QXR5SXInKFf8QWi]JVYeOVe]KFYZGFeeMFYNGVe]R7Ee KFenOWEZGDaMG4Y6DU9MGDIBDVYBJVYNDTYMJUiBEC8iC5j8T59f/k>TUYJ@T:fc/kJj^[c0_/30^[k8 af]jf^Y8:2NGEnG[cfgVi9BDI6=QfhdIQ7ATHX[o34hCm6ATI6DUE9=S96?c96@4I6ATJUW::YYJ2YYYfIXZJYXY>MVi>CTifM WJ:PVJ:RYZ:RXYfPXZ:RVIBDTi>RWIBMWJ:RaMf]RkWKinogn=R_QI>CSXj>Rh^CRhB;RhZ>Th^5QHBC RhB4PX:4Rh^CPXF5Q9[_g6f5Q8B4QGf4Q8BSd^2_NHAlOH:5NWijLgUjQ7Z5PWYjNGUkNW=jNX:2NG1X NGYjQG=UJG1cLg=YLfUYJFQ`L71YJFe`J6Q_JFEYJ6QQIFEUI6EUJ6QTJFEZJFUiI5iLIF9RJVEUG5iL EEaUJ6QRHU]EFfQXIEaKHV9UHUaLHFQRIE1@FeeLD51KBDa6ATYMGDU9BDU6BE]9FdI6D4I9BDU6ATU9 ATI6?DU6ATI6ATU6BE]EEDU?BDY:DE59BEa6GE]KFdU6BE]9BE1@BE]ED4I9FeE0b?G[fi=ED5=KATU9 AT0bASe9FdU6AU5EAU16ATU:BTI6BDI6ATU6C90ATHb;S8f=S8/:BT]CVIBIVIf>YJ:MVIVRVIfYWIVMWI>CTifMSXj>ViS:hZN:Z/GWk>7in=BFRXj>T8j:ThB;Q8B4 TiRCRhF1RX^4Q8B4O8AmQ8F2QHEi^OG6JH^5O8B4Q8B;Rgfbfm>MNGYmNgejNW=iOGUlPXEiNVUiL7=i NWYjLg1iL6miOGUjLg=YLg=cJFUcLfmYJ6QXJ6U_JFUXJ6ETJG1XIF5YJ69UHFEUJFQLG7=`IFQXHU]X IE]RIFELG5]KFfEQFe]KHU]LJVQUIF9RHU]KFf9RIEaLD55EG5E6BF9KEEaLIFEKFe]KEEEEGEeLFeE: EE=KFe]9BE59D5=?EEeMEE]AFe]LEDa6BE5ADE5KFe5AFe]@EEEKBDIAGEEEEDUEBE]MG6QPG42gl>CK d5^a]5]6ATI6EDI9ADU6ATI6ATI6AT16DU16ATI9ATI9BEE6Q^NoC8b=S4f?dI9ATI6Cm6ATI6VJ:RYJ:R Vj:UZJ2YZJ:RVi>CTj:NVIVIWIfCXZ:RVj:RXZ:IWIf>RY>IU9>CSXjKSMGOUY>C/]3_iOCjl;R5RY2D Ti>5QHb4QH^;RXF4Q8B4Q7b;Q8B5O8:2PXF4Q7_1mKaYPWV2NHB9Q8^2PW_5l<9]NGUmNGUcNGejNW=i NGUjNW=cLgUcNWYiNGYcJG=cLgYiLgUbL6QYJFU`L6UULfmXJGYjJFmYIFUSJ6QZIFQUIFEYIFEYIEaU JVQXJ69UIFEKFf5UIF5QIFQXJ69REDYEFe]YIEaUHV9AFe]EHF1@Fe]EEEaLFdIEEF9KHV9RH6QKBE]E EEE:D59LHU1@De1CG51KEEEEEE16EE]EBE]CDe]EDEE9BE]KFe1@DEE@FdU6EE5@Fe]KATI6ATI6FeER IF9EAV[HkCADI6ATI6;Gjj[V8j f;m9BEg=dI=XATHf=Sdf?bdbMWHjCWI^CXZ:KXYfCVj:RTiBCTi>CTiB>SY>9eNVWWIV/]m;W koGhhZn2U8jCThF1PhbCSHf;Q8B;Q8B2NX:5PGYjO89lP8AmL/[b]W=lNXEjPX:2PWZ4OHgKkJmiKg5i NGUiNGUiNGUaKgemNGYjLfUcNWZ2NW=YJFUcNGUiLfQXNG=UJ6EUJFU_JFEYKgYYO6mYJF9RJVYXJFAY KfUUJ6QUGVEUL6QUG5aRIF5RIEaKG6EMHV1RHUeEBEaRHFUQFf1RFeeEG65LG5=CD51KG5]KFf9UIFQ` IFEKIE]EHUE@EDm9DUEKEEE6BU=CBDU6D51EDdUKEE1EDE]AEEEABDUKCf9:D5]KDUEEATU9C5EKEE1@ EDU6ATUEEE]MDDm?<[k`bKk;/LRRAUe6ATI6ATI0ATI6ATI9BDU9AUE?BDI6ATI6C4I6?IKa]CI6=cmB ][MKBDI0ATI6ATI6ATU9ATI6@38bC8a=Rd]CU9>CVIBDTi>CWI^CU8ZCThC5 j:NCWYRe^M_Zm??`b8R:SXZ5QHj:RXF4RXB9Q8Z4RhAlPX^4Q85lNGV0O7Uog^:8OH5lQHAlPWalO8Al Lk;KdIe`O7UiNGUiNGYmNGeiNGYjNWYcNG1iNGYcLg=XJ7YiL71YIG1`L6QQJFUcKfmYJ6UUL7UiJFQQ J6ELIFEUIG1YJFU`NGUUIF5XJ6QRHV9LHF5XFea:EEeRFe]EGEaKIFEQFf9RH5]KFe]RIFEEAU]KEEEE EEEEGFELJ6QKG6EKG5EEBE]EDDUKFe=9ATI6D4U9EDUEATI9DEeEFe]?FeE@BEE9FeE9FeEKFe]KBDI6 BDU9FeE6BUaEBDI9D59LFe16Ce4oT>OW^kkCa;AKBDI6ATHm?DI6@4I9ATI>WIVIWYVDVI>KWIBCTifMVIBD U9>;Q9>HRL7RYhjDSZbe_m[dlnC`c8FCSXF5SXj5QHF4Q8^5QHF;Q7]mQ9>4Q8:2PXAlL:Seg6f5Q7b5 Q7ajO7N0OGYcOKWP_7EjNHIiNGUiLgUiOGUiNWUiJGUiNGeiNG=iNFQ_NWUYJG1`J6QXJ6QYJFm`J6QX L71_L71ZJ6QiL6EUIFEULfQ`LfmiJFERHVQXHU]UHUaLJ69KG51EG5EEG51@EE]LG69RFfQXHEaEG69R HTUEFf9EEEEKD5]KFeaKFe]KAUE6EDUEEEE@BE]9BDU:ATI9BE1EEEE6D4U6IEeEEE]KEE1@D4Y6BE]K EDmEEE]9ATI@D5]9BEEKEEEABDmKAU19ATI:BDILa>C9S/CKag4m?Ce6ASddBDI6ATU6ATHoBDU6BCm6 ATI6=ce6=RZnlGTbASm6@5:h]U=9D4I9BDm9ASI6=S8fASe6?cI6BDHiASI6BDI6@410ATI6AS8f?e5L [LOFWE59ATI6ATI6BDI6IVJ:IXZ:RWI>CXY^KWHjDRYfRTifCTi>M Ti>CViVIU9BDTi>5U9>?_NRWRY>CTkNe`m[ak>of`X:;QHF>Rh:5O7UmOHF2Q8B4RHB2Ph1mQ8B4QGE` Z?GIKHF5Q8B4O8B5O7V4LgYiOL?M^7YiNWUiNH9cNGUiNWYiNG=cLgUiNGUcNW1ZKg=_Lg=YJ6UUHF=X J7=cL6QQJFmYLg1_JFUXJ7=YKfUQIFUUIFEYNG1XIFEZJ6QRHV9KFeERFeaQJ69EEEaLFeaLG5EKFe]K FfEUG65EG69KFeEEEE]KFe]KFe]KEE]KFdUKFdU6Fe]ABEEEDDI6D5EKDDIADDUCD5]KDDaMFeEEEEEE EE]@EDU?Fe]KD4UAEEEED5]9AUEKBDU9EEe9CeAADDI6DE5KFcn]h^N][]_KZcI6ASHoATHm?DI6D10CV9VCTi>CTi>CThZcMYh:5Rh^4QHJ5Q8B4Q8:6PX:4Q89l NGeiQ8AlNFjimL9cRXYlNhB2Q8AiPX9cNGUiSM;M[G=jLg=jNVmiNFm_KgU_KgYcNGUaNG1YJG=cLfQ` JFQXLfELFfQXIFUXJ65YLfQXL6mYIFQXL6UYHFEUIEaNIFUUJVYUJFQXHF5KFe]KEEEKHF5QFeaLG5aR HVENG5]KIEE9G6EEHU=CE61PAUEEHU]KFe]QIEaKFe]KBE]KFeEEFe]AATaT^XH]CU6BTI6=T16XZ:RXZ:RXZ:UX:FRXZ:IU9BD V::IWIVRXY^CV9RCTi^MU9>CVI>CSXj:ThZ;Ti>>RKgP]XF:VIfC[[;@fnOWk_?AOYB5Q8J2QHAmQ7ei O8:5PXIiNH:2PX9iO7YjK/7e_6Z4QHF4PX9iO7V2PWUiNGeiX]kAUW=jO7YcJGYiKfm_Kfm_JG=cNGU^ J65cLfQiJ6mcL6UXJ6EUJ6QUJF5UIFEXIFEXL6UYJ6QXIEeXL6QRJ6UYIEaYHF5LIFEUJE]MEEeRFeeR D4YRG5aLG69QI5aKEEELEEELFeaKFe]RFf9EGF9XEE1@Fe]LAUE@Fe]9De]EDUEKFe56ATa9ATI6ATI6 BDU6EDY@EEE9BE]9AUEKAUELFeE6EEE6D4U6D4a6ATI6ATI9EDY:DDToCdU:D4U6ATI6BDUEC;oTbi=e ^]:4BDI6ATI6ATI6EDI6BTI6BDU6ATU9BDI6?B`o=T[Cec56ATHg?DT]O/2RATIEATI6ATI9AS96KTiVCVj:KTi>RXY>DTifMU9:KXZ:CU8j>RXZMU8F4_NBfRhjCTiB[^K_Fa=OWlOG2OX61 PX9lOGUlOGUjPX:2PWUkNGV4PWYjNWUh`ORlIH:4RXF2NWaiLgYiQ7eiNGY^^N78NVmjNVeYNGUiNFmj NWUXJFUYJFQXIG=YJFU_JGUXHFQXJFEQJFUUIFEUJ6QUJ6QcJFUYJ71`HE]XJ65XLfUQHF5XJ6EXHEaQ EEERHV9RHUaEG5EEG5aUIEa@Fe]KG5aKFeaKFe]LG6EUHU]KFe]6BDUKCdU9EEEKFeE9EEeNDE]EEEEE BDU9DTI9BDU9ATI:BU9EFdU9EEE6EE]9DE5KFeE9BDUAFdUDHg=SI6?cHfATI6ASm6ATU9?I>R XZ:RXYfRXYfYYIVDVIfMTi^MVIfRXZ:KVj:RWIBCXZJMU9>HThZDU8Z>U8Z:RX31jkb2U9>RSY^g[[_7 dLOZnoRfNXB5PH65O7alO864Q7ajPWeiPXEiNWYiOGCJl:MiPXBCRgb4Q7UcNWV2OGEiNWV9d>BhJFmc LgYiNW=YKgUjNFQ`J6QXKfUYKfmYIFEUL6QYNG1XIFUYIFEUIFm_J65TKfUUJFYXJ6QKHFmXHFQUIFEY IF9RIFQXJFELG5aKJ6QREEa@EEELG6ELG5]KJ5aLFe]LHF9KFeaEG69RDDU9BDYEEEa9BE=LEE]EBTYE DE]AE5EEAU]?FdU6ATU9BDU6BTaEDE59BE=EEEE@ATUKEF9DFeEEDTI9BDI6ATU6ATI6ATIKFdU6D4Y9 BDU@ATI6EE]9ATIUa>3ALhFni:hmBDU6?DHo?cI6BDI6ASlo;SHmASHf?DI9ASI]k;l]ATI6?DI6@39n ^XA5BDTf=S8f=3LoRXYfMXZ:KVj:RXYfCTiBRWIf>U8j;Ti>CTh^>RY>;RKgR_8:H XZ:CSZjZ^M;A^;ogo>V8PX^1PHAlO8B:S8Z6O7MjNWb5PWUiO89mOnGSOXB2QHj6PXAlNGUcO7UcNX:2 NW>;d]fTJW=iNH1iLfUiNG=cJ71XIFQ`KfUYLg1XHFU_KfQXL6QUIFQXJFEYJFUYIEaXKf5TIF9YJFEY J6E`L6QUJ6QKHUeLHVQUIEaQHEERFf9KFe=CFdI6FeaRHVQREE9EFfQQIFULG5aLFe1BEDm9EEEDHbMWIfCXZ:RWYVITj:HVj2RTi>CSXjCSYBCThZ: SY>9^MflQI>IThj>V:Z/f]g8U=3inmUnTi>;Q8B;QHBCRhB4NGaiQ7eiLgV4Q7^`lN9]NWV2Q7emNGUj NGYjOGUiPWYlNFnZfmR8J7UlPWUiJ7U`NGU_L6UXJ6UjNW=_J7UXKfmjKfm`JFmXJ6QYJ6QYLgUXJ6mi L6ERJ6UQJVYRIFQXIEeLIEaLEEaLHE]RFe=KDE]KFdULG5a9EEaLFe]KHUE9D5ELJ6QRG5EEG5aKFe=K E519EDIACe]KEDU:EE5AD51:D4UCBDU9AT0mD4I6BE19CdU9D4U9BDU6ATY6ATI6ATU@ATI6BDU6ATI6 ATU6@dUDHm?CLY;Sm6=Rdf;3HX:BU6 ATHf:2PbIXZ:KVj:CYJVRVJ:HVj:KVj6IVi>NVi^CTi>CXYVDRY>CV9^I U9>CTi>CSX^>ThBehLJ6TiB5SX^C]jFkd/BaRNGnn:mlRh^4Q8f2QHZ4Q8AmNGUiNH9jNHB2L[Wee7=i NX:2PWUaLGYiNGYjNGUiNGUiLg31k<1cNG=eNVmiKg=iNFmcJVEXI6mjLfmYJFmiNH9YKfQYKfAYKfAT KfUiL7U_I65`IEaXKfEUJ69LHV9XG5aQHF5LG65LEE]KHF9RHU]DDF9KEEEEG5EEFeEEEEEED5EKFf1R G5]KFfQPDe1ED4mREDI@D5]EEDYEFeaKD4Y6AU59BDI6BEE:D5E6ATU6ATI@BDI6ATaAC4I6ATI9?Cdm ATIABDI6ATI9ATHmAU5ABD=6ATU9BDU9ATI6ATI9ADI6DDTfMM7MhIeN^/_7YDI6@38bATI6=TI6@4Hf =S8/MYI^MW9VDXZ:KU9>RXYfC U9BCTiRRTifCTiRHTiB>Ti>CRZcGe8R>QXFDQHB/]jSQh=_4[_CnkJN2QGb6RhB4Q7^4O7eiNGeiOGUl O7][`OG2LgUcNHAmNFmjNW=iNGYjNWUmNG=mL7S@jkIYNWUiKfmiOGUcNW=UJG1UIFEYJFUXL7UjJFe_ JFQQJ7UYJG=mLfQ_JFULIFEXHFUYJ6URHV5RJ69LJF5UGU9EG5aLFe]RJ6QUIE]RFe5AAUE@AU1LFdU: EEaRFe1KHUaLHE5KJ69KEEECE5]AEEEKD5]KFe]RFe]9ATU6ATI6C4IABDY6BDI6DTI6ATU6ATU6BE5< ATU9ATI9?DI6ATI6ATU6ATI9BDI6DEDmBDI6DEE6ASI6BEEAATU6ATI6BDU6/m7K_e:@`;[7U4I6ATI6 ATHfATI0Bd];2Ta=SHbNVJ:MZJJRX9fMWIfYWIbCU9fR V9fDWIVIXYfMTi>CXY^KWI>CThbCRXZ:ThZ;SMkRR8^;SXF2Q9RkZlWFdMg0_OOnlZN2QX:2QHF4Q7Ui OGV2QGUiNWalO7S:l[acOGUiNGf2LgUjKgUiLgYcLWUcNGU`L:KGdiIXKg=_KgUiLgYcJVYjJFUXJFm` L7U`L6mYNW=ZIFE`JFAYJG1`J6Q`J71UHVQXL6UUIEaLHF5RIFEQHVEREF9XIEaRJ6QXL69LIFQRBE]L EE1KDe]MTi>CWI>CXYVIWjJKVi>>RXF5QHj;QH^=b^VFO8jCQHJ>Q:Z/[QH^4O7amQ8AmNGUjQ7V2NmG][gUjPGajPXAiNGYcLgUjNVm`Lg=_NGUjNJcTdhETJGUiOH9cKg=c NW=cNFQXNGUXJ6mUIFmjJFYQJ6EUHFEUL6QUJ6QXJ65LIFEXJ5aLIE]LHF9XIF5UIE]XJ71XHUEQFe]K FeaLIF9KJ5E6EE]KD5E6D51CDEeLD5E9ATY@HE1LD5E9BDU9EDIEEE]KFe1EEEE:EDU6ATI9BDmEEEE@ ATHoBDToBDI6EDI6BDU:ATIAEDI@D4HmATU9ATI6ATI6ATI9BDI6ATI6ATU9ATI6BDY6ATI@ATI9ATHo @5:ne^2kA[ZkZLBkDcM6BDTfATU6ASlfAS96AS96ATI6AVgOiDI6ASHf=SLgCHX:2P]HVIVRXY>DWIfMVI>CTifKXYfCV9>CThZDSXJ;Tj:mhZMlQHB4Rh^:S:bCd=fn _lC3m?kf^8:;Q8F2O7alNW=lQ7^4O8AmNHB9eNf_PX9mNGYiNGUiNGYjNVm_NW=YKFeiQ89jNK_Pb6AX NWUiNWYcJGYcNW=iNG=jJFUYJFEYNGUYJ6QXIEaXJ6EUHVQYHUaQIFEUHF=XIFERG5aLHUeUJFUQEF5Y IFEKDe]EDU1@HF9KFeaLD51EFeaEBE=LG51AEEe9ATI:BUERFe1:ATI9FdU6ATUKFe]9ATY@D51LCdU@ ATI6CeEEBE59BDI6ATU9ATI6ATY9ATU9BDI?BDUCBCdm?dI6ATI6ATU6ATU9BDI6ATIKFdHbATU9ATI6 ATI6ATI6AS90:KOKfm9X[MR>]l^M?Ce6?cU6ATU6;4I6=SHb;3LbC8b;BdbC8Y:BPbCThbIXZ:KSY>RWI>CThjMRYBDRY>CVPXB4Q7^4Q8WJljN2Q7]lPWYcNW1`NGa_I6mjMG=cNWUi NgUmL[oW_VEiNVQcNG9iLfmYL7UiJ7=YKFU`J7=YL71cLg1UHFAQHUaRJ6UYIFQRHFEQF65UEEaQFeaU IFEXIFELHUeKFe]KD59BBUaKFeaQF69RD51EBUEAFeaLEDUADDU6C51EFeEKEEEKBEE@BDI6D5ARDEE@ D51@EEE9D4U9ATICWYVDSYB:VJ::SY>CTi>CThj:QHZA d>f_QXj5RhjCSH^R[[;Pdkjg]kGUnogIR8F5O7Z4O7Z2O8:4Rh]jO7amV>[]UX:2PX:2NGUiJ6U_NGU_ L7=cNGUiO7V4Q7UiQ=G[[G=iNG1`L7UiLfU`NGUXJFUUHFQXL6UYJG1`L6UYHE]RHV9XHEQTJ6EUIFEQ HFERHF5KHFEUHV9RHUaLFe]DHUa:G5EEG5aRJ5aLHV9@D516DTUEG5aEEEEEATI6EEEEEEEEDTm9DUE@ BE1@FdUabf:T`:U:a?C8^:BhY8Ba6;38fBh^;S8bSXjIU8jCU8Z: RX^KRhj;RXW5i:n4PXF>SXj:RY>Z[DI6?Bdb>C8bATHbRVIfMVIBC SYVKVi>DU8j5RYB>SXZ:SLGXYhB4PXj=RhZCVjbe[=[M_]78S/GdoNfWQHF;Q8:2O7aiO8:4OGaiNK;` cfelOGemPW=cNFmYKg=cKgU`NGUaNX9cLgYcLg=X`OOIR6miNG=_L6QYLg1YL71ZJVERJ6QXIFEQJFYR HF5LIFEUL71LG6UUJ6ELJFUXG69XFeaUFfQQFf9LG5eEG65QG5aKBEEEIE]KBU1KD4mPEEEEEEiLFe]R EE99BDm?Ff9KEE19EEE?AU16BE]EAUEEEEE6BDU@ATI6AU]EATUKCdU9DDU9ATI9BDIEBDI9CdU:ATU9 DdU6EE16ATm9ATI6ASLgATI9DEE9ATI6BDHfATHmASlfATI6ATI9BDI6=W37_]^gH/^kHFZg^X@mBTI6 C8^ATHfAS8i>J:MZJ:MVJ:KVIBIXYfIVi^IVIfVXZVYYZ:C WIVIU9fDU8jCXYfCRi>CThZDThZ5QHVE`nRhNH::U8B>Ti>CXZj=f_38]l2aZ]Ggn^:FNX:;QHF4Q7Ul QH9mOHAi^OGCSHf;U9B;RhZ>Rhfmjl9mTi>:QHB:ViB6X[G3flRf/kZU^N[lnmnF PX:5PWb1O8B4O7V2OFk1m[aZPWYiOGeiNHAcL7=iLh9iNGUjLfU_NX9iNFmXLgemd^NjJGYjKfUcNW1Y JFUTJFQbNG=XIFUYJ6QUG5aUJ7>2JFUQIF9RJ6ELIFQKFfERG65RJ69KEE]EG65AFeaKFe]LDUEED51K EEEKEEELG5aEC4UKFeEED4I6BDUEBDU@BDUKATIABDU9DE5EEDU?D51KE5]9ATI9BE1:D4U9?Ce9ATI: ATU6ATI6ASe6ATI9BE59BDI6ATI6ASm6ATE9ATI6ATI6ATU6@416ATI6AS8b@4I6=SHbASlm=ce6ATH^ [MS4h:jMdHDm=[?BZe0bATI6MWJ:VWIfMTi^CThZ:Ti>>SX^MSXj;SX^CNl7b_7f9ThB4Q8ZMRhJC^jk@fkjc /jVZ`OCln/anO8F2QHElPWemNG=iK/W`[GV2O7UmNFR/j]J8L7Y_Kh9mNGacNGYjNGUcMG1ePW2Cg^2F LfmYQ8]`JVYYIFALJFQXJFQQJFEUIFELIFEcKgYZIFUXFfEUIFALHV9LHUaLJ6QKIF5XEEEEEE]EEDUE G51ED5EEEE]EEEEEHUeLD4I6AU]EEDUCD4I6D69EBDI6BDU6BDI9D4I6DEEEEEEEATIEBDU9DDU9BTYK ATY6=dI6EEE6ATI6ATI9ATICdmATI9?C:4e[Nn^efn[THfA[kFU4I6@3Hf:C8b;2TbMSXj=Vif:SXjCRXV=Rh^9_O:lJHF;Q8B>Ri>: QXBRY[OGb;>cWJVbeOOlm[b5QHF5QGajO89iNWUoeO2FNGeiJ6EUKi>mm=m]NFmjNWUiLh9mPWUiO7YZ Lg=jNU^ilLa]G6UmXZU]L6UYJFEUJ6QXJ6UcIEaLGUeUJFE^NFUZJVELJ6UQHEaRHUaLEFEXIFYcHU]L G5E@De]MEE]KG5ELEEEKFeE6D5EAFe]KD5ECdgATI6AS8mATI9 AS8b=S8b@;JY=SLb8BPX:C8b:BT]:2TY;CH^:S96?clb>SYB:RI>6RhVii/Ic Ri>:S8j;RhZ;RXZ/]MO=]kN]TkC@k_WilZn2RhF2PXB4PX:2LgoUjFemLZc5h=fjU6RemKaUNWY_NFQ_ Lg=iNG>2NGb2Lg=jJFk3i;5ULg2HajAUJFmXJVUUJ71XIFUQIFELG6EXJ6mjIFYZJVEQJEeLHVEREFEL FeaNIFEKD5aEEEEKFeE@Ff9RFeaEEE]EEDI6EDIKFe]@BDUEBEEEAUEEFe]KFe]KBE19FeE6BDmKEDI9 D4I9BDUAATI6D4I9BE5ABDIEFe19D5=9ATI6DDI9CdU6ATI6BDm9ATI6ATI6ATI6ATI6ATHf;DI9CdU6 ?CHoASd/=SHbATY6ASI6ASm6ATI9Fe]9AZJk[MR^QMRd=TH/TRW9VCVi^IVJ:HV::CWIBCTi2MTi>CVi>CU8Z4 ThjKQ;;H`X:;SX^;Ti>CRXjMRjFeaM6j[KN5RL[dlOOhj:n6QHB2PXAmQ7aiUN7IMGS:m_KVdKj]QFS@ j:MYLg=`JFU`J6m_NWY`_mMnLfmjIGgAgJMYJFRoh6eUKfQ`J6QXJ71UIG1XJ6mUHVQXJFEUJFUXJ6QU IF9RIEaRHV9KG5aRHUaMIDIEFe]RG51LJ69UEE9EFeEEBDIEAUEEDDaAFeEEG5EEEE]RFeE9AUE?BDYL BEEKDE]EDU5AAUEEATIAATI6ATI6ATUC8o?dI9 AS8b;2TP8BP]3HX8B4Q:BTb :B4]Ti^CTjVMTi>DWI>K Vi>KTi>CSX:5SY>4/>72QXj;Q8V=Vh^>SX^KTjbbemRl]ZB4[>G_mOcje:B;PX:2PXF5NWfXklmDb_Sb [fQ`LgYjL:SW_VecNGUiL7U`L7=jKfRekleNLW1cJ9SFcGiNJG_Q_6U_IFQUIFQXHFEXL7=YIEaXKg1U HFE`L71UHU]RHV9MEE]EGEeEHU]XG69LEEEEG5iNG5ERIEaAEEaED5EKATUEBEEMDF9REEEMFeE6DE]9 BE16AU59ATI6Fee6BDU6GE5?BEE9BEE6BDUEATI9BDI6ATI6D4I6ATIEBE1@CdU9ATI6C4HmATI6ATU6 =ce6ASTiASHmBEA6ATHiATI6ASdo?c8b=Sm6MVJ:MXZFRVIfDVI^CVIBCS9>CTjJMU9VHYY^K WJ:HU9fDSXj>SXfCTifDRXB:Rh^XflIeSXJ2SI>CQHR>Vi^MZJcGjlRn[HIm^OC/mo_b`Wj4O7YjO89l K[We_;;glZMRRgUXJG=iH=[MOVmTJ71`KfmjNVeYLf;EmZMRL7UXJ;GP^UiZH/?PUVYYI6UUL6UUIFEU JEiLIFEUJFELHFUYJVEQG6EUJV9MG61XEEaUFf9MGEaLDU]UG5aEEFELHUeRHU1LEEEADE]KFeEEFe]E FeeKEE5MDDI@EDUEEE19AUEEGDU6BE59EEEEFdm9EEEEDTI6ATIBBTI6ATU6ATI6BDUAEEE9FdU9DDa< ATI6ATI6FdI6ASLbC8Y:BjF]e/];C8b;C4]=RdZ?cTbMThf=Ti^IVI>MWIB>RhB>WI>;TiB;Rhj;TjSBcgjCQX^:RhFDT8j=SXj:Z/GA_[ZcSXIib_C_nO_Y Yh]iOHJ6Q7eb`o:_eOS2GXim]L_2OVec/^N]J:V]GVU^J6QYLgUiJ:SefE9`L71_Lo6G6UY IG1XJFEXIFecJG=`IFEXJ65QJ6EZJEaQJFEUIEeRJ69EG5aKFe]MFf5EHV9RG5ELHFEXHVQRFeaEAU5M DE]RDEE6EE]LG5aKBEEADU9EEE9ED519HUaEGEEEDU9MAUEKEDI6C4a6AU]CBDI6ATI6ATI9ATI6ATa< C5EKATU9ATU6ASm6ATI6ASloATI6?cI9DDIBATI6ATI6@4Hb>CU0ATI0?cm6ASToATI6?da6EE56?hK4 YkCdaCTifIXXn` aN_cm^S8YifCTi>H^jnCWJ2PVJ:MTi>RZGj6Rh^>SXB4QI>>Z=OIR8^;SXj4Q8ZCTh^>Ti>R]M;H^[>T SXB`m?Gamo[O]X:4Rh:2Q7S@jH_ZlXQkNkWgn_SMOWUUdDI6?dI6ATI6ATI6ATI6 ATIBXQ8B4Y:BPX;BTQ6bT^>CTb=S8bDV=[`^7Z4RhB2SIfXd=nFQ8F2QXF5Q8^>RhZC QXZYaM;Kc;J>Q::ij_WenOK2Y8j5NWUmSnGRUOOSJWV9j_Jc_m>]LgVM/fRHi<9MOnkm`U9XEFUXX_Fh GVQYJVEK/]RhJVRbmJMLL6UULg=ZKfEQIG1XJ71`L65RJ6QUIFQXJ6EXJ6QUEE9EEEEEJ69EEEaLG6UR HVYLEEaLGUaLEDI6Ff9DHbAT0bASdmAS96BCm< ATa6ATI6ASI6?dI6ATI6[LAebCOm[bYhjIVI>CRYBK/>[f^7bCThj5PXjCSXo5hZN4QHB5 QH:4Rh^;Q8B;SYRmg^7H_9B4Q7Vbm?WinnS2Yhj2NWVXmMVbnMAMNJScfE9`_N2WLgYjNV;ElVfXloS] GZS:[FYPg]ANJ6QKNH9Lc^2gHXOc`TYcLfUUJVeYIEaUL6QYJFEUJFEUJ6EUJ6iXJV9ZL6EMEE]KG6EU JEaLEEEUJEaRL69EG6ELG5EEEDY:D4U6BEaEEEEEFeaEATIBDTIKCdUKCdIDI6=TbjZFQR=SHbC8Y8CHb;DH/O/B4:24f;RhY9_O>lSY^DTi>4RY=k^OWST8j5RXZ;QH^> QelQcM?CO@6UXJFUUJFmUG6EZIG=UJVEYJFYUIFEQJ65LHW1` G5ELFe]UG5aUG5ERFeaUIF9RIFEUHU]KFdU9FdI6BDI6BDm9AU1LG4U9DU9BAU1EEEE9AUEMDDI@BDI@ D5EKAU9EEFEEBDUEDDI6BUE9ATI9BDI6ATEABDUABDU6BUE9BDTo?cm6ATI6=TI6ATTfC8b]k=9=RdX=R4Z8BPX:RXQ8C8b;BXZ;C4bCRXV?j_R_ Q8Z:Th^4RhZ9_NB_NXB:SXF;QH9lPXF:Q8B9X/GMdL2nU:VIQGgJnOSen>:fNX]i^O2h/?S6KGV9k]gA QK3gfFejNWY_En[`Y=famlSQlo:FG76jT6R7m??Wn/JgeZekm=ljHEaLG6EXJ6YXHV9ULfYZL6Q_LeaQ J6QUG5a_L6UQG7UYEFELIF5@Ff9XFeaUIFEKG6EKHUE:D55ABDU9ATU?BEE6BU1EBE5AATU9FeEEBE19 BEEEATY9BDI6Fe16EE]KEE0mATmKBDI6BDU9BClo@396ATI6BDU9=TI6BTI6ATI6ATI6ATHmATI9BCdm ATHbATU9BC90AS8^:C8oATI6=S8gATI6ASHmASLg?DU6ATHg=cdfYDViGNn/9nXJ:RVi>CVi^RZ;g`_8^/flb8RY>C RXj;ThWEn;R2U9>CRhB>QHVmi[QiU9B>Th^CSXF2QHF;Q8:=]MK;e[ZDSZV>Rg_Eno?an^>FQ7;5ljN` n=a]O6k:nOZj[?ODOW1iLg=P_ORlfGkJi=_@m[QLKfUcJ9Sf_2gGlYJge[;afE9QG6EUHFQXLfUUJ6QY IF9ZJ6EUIFQXHUaMG6U_IEaKZLNaG5aLG5aQIFERHV9KIE1EJF9MG4Y6BTHmATU9ATI6EEE@D5E9DE]< AUEMFdU@ATUEDEE9De=@ATIEBUEKHTm6ASm6EE]9BDI9ATI9ATI6=dI6ASe6BDTmeaj2:S8j5SX^CQ;gfch:CRX^>Ri>>Q;WX^7V>SXjCSI>PWH:4Q8F5QHBRaM_H_[>2WHj;Q9GJmnca n=AnK][]UZSiheijNK;Nm?WQlmAnNGUcKfQ^g]W8R;3Mc;;a`U9UJW1RX^^lAY?4YfC;boKCQH:;ThZ6Z?CYR9>CTh]jSY>;Z=fhLhB;SXZ5NJJgQHB2Q8:2RW^iemS=_XR> SX:4OJcUmnCcll24d?2FZ??SOX9lO8WZoogbcfeiLfUYKfS5i<2DRLW8P];0^jeUL6Ebe/aYHjjlI9SN n;a@KfEUKfQYIFERJFmUJG=`L6UUJ5]QIE]RHU]LIF5UHE]K]nbjBVEUFe1@G5E6BTY@FeE@EEE@BDU6 AV5iD4I6EEeKFe]EEEELD4UAFe]EDEEEBDU9BE59BCe6BEE9BTY@ATY9BDHf>C8fATHmATU6ATI9ATI6 BDU9ATHfATI6?dI6ASe6=c96?dHi?cm6ATI6ASHmATU9=SI6BCm6?BPYOf<3BQBTm=THf=Rd^TTh^Q[Hj;SY>Xkn>8U9B9_LbWQ8V/f;QmQHF;Q862SKVjQHB:PXB5 PYS:d/c2[HFDRXF5Nkoelm_em/STkHREiO:WRXEjNm3_k>fhL6mcL79bL:cPc9Ibd]en`lO/k:mLKdnk kjMXaDI6=TU6ASHfnKQlX:2PQ:Rda;396CSY>CV=[ecHR5TjSQaYfDSXWEm^:T/>obaWV;RXemNH^C Z=:_PXF5PXF4NkgK`;jjR::>SXAiQ=[hlM_gmo?LR7SJn[acRXAlL72:[X9iJFU`L7UcL]3D[e?5j6g5 i=?Wl9ILJ6kQi:2ka7i=d?S<[FEXJFUQIFeYIFEYI65UJFELHF9RGh2j_Yf5NVEXG5aKHVQKhO=nE69P Fe]ED5]EHU]KFeE6ATI9BDULTmOA[DYABEEMFe]9AUE9BDU9BEFUYF59Fe]6ATUEATU6BEAEATHm?DI6 ASlf?Cm6ATHbATI9ASe6ATI6ATI6=THoASLb?dI6ATI:ATI6ASm9ATI6ATI6AS8bg:JC8e/MRceaWZ:[=JfU9BDRJZebMO5mo[? NXf9V;VjR7Z9aM>PO7b2Q8AmZ<_4dL:WTjVCRhAmZ>[ji>[noN=nL/7ng6f4QGUmNG1cLfU`NW=`LgY_ ]M6WL:ZfIL?``WWPj:m]J9SKe/34KEOUkKkAOV5YIFU]GVEXJ65QJ6EYG65UJ62binfj[K6[TfmKFe]P HU6ClMeNG5eEEE]KEEEMFeEAEE9@Fe]KEE0fVm_P^4YKFeEEBDU@BCe6BE1@AW6dZDI9BDI9BDU6BDI6 BDI6ATHm=cHoBDHm=TI6=TI6EDI6ATI6ATI6@4HfADU6=ce6ATHfATHbCdm=SHbKL1UMM79bI<]37BBdZJZC8dKk[knOT jnCBZdHX8A^jQQXQ8ABF[V0]:BXZ6a/Y:B4XKWI>CV][RZMkbUXB/_Zf>WIBC SHfXf_Ckn]n8RK3_n_W`^7ZXilI]Q8B4PX:4_m;KdkR>WI>5PX9k^OCei>kolWj4SnkfYgbCO7ajLgY_ JG1iNFm_KGYmU7YjL6QX/^2_Fg_9i;QTQ=3Pe:mEROCIU=JjJVYUIFEYIFQYG6EXHF5XIF9P_n_IR4IZ JW1iLeaKFe]KHSJmmZM6J7UYG5EED51@ATUKBTY@HUEEHV9AJC8b:CHm?DHbDI9=SHb=b`Yoe hC`[D8YjFcm9HTi>JiNUn`Nf_ RifRVi>DThb9Ri^im?cjmZMoiO[<_O7f[g_EjHR2PWb2PW^b`mOPaYJ2QIB2PXAk_OCaiocj_7=bb__2 LgemOGUcNGMiNGUiNgUYLfmjNW=`L7=`SW1iJFRMSVUXZKZcKE^/n<99]l^]I6EUIFQRJ6EUIFEUJ65R H;Gee59@G5]PJ6UUG5EREEaRAWSec4I?b]5NEE]ED5E9DEA9BE5KBU]KD58fVo74DI6=TU@BCe0ATI6ATI6ASdmBD16ASH`?DHf=SHb=SHgDI6ASHb=RPf;RTmC^OK?KHb>SXjC Ti[^hgj`h;R8Ti>HVi>CQ8VCWI[Zo?Omg;;fe6EbUNNlL;3e_6UmQ8:2Q8bgd=O7[HB4ZIf2OGUkg_Oe mOSbYgVXknVWOGelNGUiPW=cKg5iOG1^KgYcL71XL6UUL6m_JFQXJFUYJ6EcFkWbYeBHhcKeeLf;BTY50lD6B4J8B4X:1TI4;SKRC4?[nC5<20K`]I/=R`QG/bN 8BTf;BdJ2QDU8jCSn[bR;WaaWjCWIVCVIB;Ri>DV_ClnOkhh?J_NH^;[Zf6On[YKHB4OH9lNIjmbLBjQH6: SXB4PWVim?Wffo?IUVnbjmnWKgMjNGUiPWY_KfmiL6Q_NGUiNFQ_L6UQI6UcL6QYIG=iL71PdM=NHPIA]IFQUKg1]IFEXCkoc_4I_I6U^H69CFe5EEDmKFe`od?1]BFSK^4YCJ6A:JEE?EiALFeE:BUEE ECoQh3M@FdU9Fe]9ASe6BTI6AU1AFk_4DTYEATU6ASe9EDHoo_ m[f^9BI VJ:MU9BMV;g``XjRViV>Ti^?eO_2S=KSXB`m?Oino[kg7j2QXF5QH]bf_RWKgV2PXIl Rjboi=V_NXB>QGb2PXW1moKCi??DNWRmllJDRXF4LfmiNGUiJFYcKFUcNGUYJFQZJVEYJFmYI6EUJ7VD RZ;;UUE^iNJkc/kWmLINHVQcJ6UUGE]kkmmNJ6EXG7_Gin_A_[NYW9bDPUFZlII9=/GTKEoNjj1BAW_U m/Q:GDY6BTXfCn7A=e]9Fe/f:4U6ATU6ATI6ATTfRn6c=dHgATTmBDI6@4I6ATI6?Cm6ATI6BDU6;Te^o/ko7/BAX];BdE3eb:IFYLOZf]^[o4a^;B=/gWK2PQ:BTD8AXQ:2P];B4Y8C4;_=M? G^;Ah[l9cMgPeD8b:A^T[RPY:QXjfNc[f:/f:Bhb:2PQ5Gk[Zc`f;BdX;RdbDTi>KXYRinn>Vd/J5Pi:RVi>DWI>:Nl7ajoGfi_[IKHB6RXj4QGW1 n[acQ8:4QHF5Q;OGdl28Q8j5O8B:NK3dmO3HiORn`n7Tb8EmNG1_IfUcLfUcNG=cKgYmKfUQJVYUJ6UU L6QYJFQ`L::c_[5QDj?`_7odo?_onmILFfQUIFURBKOe_U9_J71A[?OcincTjn_[lm62IFRoX4Y6NNnj /_?fhU8mbOSQl9I6BTU6ASICjlP/@kCFjnBaG4ICBDUEATHmBDTod]]:?DI6ATI9ATHmASdbATHmATI6 ATI6ASHbDI6ATI6ATHgATHb=dHbfa6P/]o>@SDb:B4Q;RPQ:B4Q:BTI :26YZIVUVI>CWIRXk_:WTj:^[IVRYYS1l[b8U9BDVI>KXXoJn;[TaWjCVI>RWIVCTi=ob^o/l?:FeO>W Q8B4QH:2NKWjaUilQHB4Q8B4[/OFdJBCQHF>O85k^N7Wmo3UnOKanoK]e]6o_knk_ZjYX8ElU7YXKfQQ D5]PDe=XHVEXL6QQHW1`NXj5IFQC^O2OaOcnoo_Rj;I@HFEcJ61PenfTHFAUIE]iknA]PZJ/]k^_G5]R G4ILEEE9bLWFgl3cYe_UlX_e`4I@EDU9?DKT]Sg;n>cGknNnGTU9ATI6ATIEBCJgjj0fATI6ATTo=Se6 ATI6=dI9BDI6AS8m=cdg=c8i>CI6ATI6ATI6ATHf=SI6AS8bEFMTjSdi=o2QJ:CTiVDXYB>SWoJ kM;alYJXlmAeQ865PXAf^O[?GWb4PX:4OHBC_m_=[ifKRXAjO7_:imkgmoWilNoem_KemOWhloGelNO/ jnO[i=;QhMK4^[Nk];B^ZJfBMh6RKe1TFdUKFdo3jh;UmoWmljoA`UaUIFUXH9G_hVe_JFEUEDVkm]5B DEEEBDYQFe]UG5aLEDUkiOK=P_6fRO7<:^oP;Ua:ASe6EJeR_OSFi;8X:24J5AX];A@Q:BTQ:BTQ5Ek8WmRb6l3HfjY0dklf;BhY@2hb:2?D]c4b8A^_]cI6;BPZ5AgD k7@b:ATI:BhQ8BTY:2dQ8B4KXZ:RWI^CXYBIXXVdbkJg[Y>RTi^KX[o2Wi^MVIVCTi>CTk3WjKR>VHj> SXjKTi>KSm[OaOOfYfkElYJ4RXj;RgSEn;ajQ8AmO7emRh^ebLRn[JjCNH9iNLWH]Nkjm_7gmO?ci=gG ekZc_[k4_mO_ko3amOWemo[hn?OamoScmO?Kio7Pe]KEel2Q/^O]]OCkn_3ah:k8U6QUG65K/_OMEFm_ L5a9BG3Wm[Q0GFQXIE]KFeaQG5aKFc7Kn]<]d]6oliHQenI6EE9BEEaNEDGWkCXiASmR^[Y:AU19BE1K CdU6BM_M=ce0ATa6BUE6ATU@BDHm=dI6ATI6ASdo?dI6ASm9EEE9ASM9BCdb;ho?c563H];BdX:2P^h]8W:BPY :2dY:3HJU]nd7Rk]cNAbdY8B4X:B4Y;BT];2PY:B6DU:FPWIBMYZJIXYj//Z^PWIfMXZJC]KZMVIBCW9fDU9VI TkNkZIfDSY^RTiBMSY>7flRimoZhJ;3b^7Z9Q8^=V^[bYhB>O7emQ8^;PZK9e/R^[Yf6SX9kaLAbd??6 ^n[ekoGL/hA]J71`J6AXNhB;Rhj/VhBb^kjk_M;Ng^7PfnO/koShn?_nnoGam_3_nOknjoOf]^:fJ6=Q IE^inMe:JFUXG6EUE9_QlhQLJ6=QEEELG5aLD51@=[_fe2V/`n7]KC6ggFeEDUEKHF59Fo7I:E1KVi^RWJ2RZJ:MXZFHTi>M VJ:UXY^RXZ:RSY>RXYfCVi^DTi>KRi[NdkWgoLIiSn7IOXZ:RXBXknV8PXF2Q7f4Q8B2Q;gHfoP3dfIVIfRYIjITi>UWI^M WIVRVI>KWIVIXYfIVj:MVi^CSYfMTj:RVIBCRi>KUMODSoCmg8J9aN^_PX:5NkgfaWZ2QGb4O7b2PX:4 Z]OAb;jnRi>4V>2lPX^YWHAbd=_ZlnRWL7UiNWYcLg=iNG=iNGUmO71`KgYiPWYcNG1iKfUXH:cT_Ui5 _MfTCe[^n]nfa=RfJ6QXIFE?_O76BVUYIFEUHF9EE;of_UaKD5]QIEaEEE1:EEeDamm:J=OcgD1ARmND EE]EBEEBAScNl5i6Ff99d^Q]BE5EATU9ATI66^A:bTI:2Pa;BP/;E;4[SHD]^IkHXZFN XZ:MVJ:RViVPVI>MWIfRU9VIU9BRXYBMWIVRWI>CTiVITiVIXYR?fkb?k_[SYh2ijkacQHEdg_Z_NXF5 O7UlNX:4OGf4TkGF]YB5Q9>mjjmiU8B;Q8BSeN7Wl/9NNGV2O6UYJFQcJWY_NGUjJFQ`NGUcLgUiKfmi NG1^elfTQE^oiYACZ_?=GE]EDU]XHFURJ4W1nMUBHFQQJF5KFf5KFm;[UTU@HVEXFe]9D5aRG4K7kFe5 _n_CdmATXmAT16?C96ATU9BDTfATHb=R`m=Se61j:2[=i6hf:2PX:26Tjk8O:B4X;C8Y82`Y:ZBYBAU]kKT`L3PZdTfDU::IVIBMXYfMU9BDTiRHXZ^b^kg[b9SUnO:hN[3`^7>> PI[glWj4QH5lPWf2PXAlNGecTko4[gYlSmmZm6J6QZJVYUG6EQ@kgige9QHF5UJ6QQDe]9R^^hY]7H]cHQ8l/_4gNC[lm:b1hRYYVPXYVDVIfKVifDU9>CVIfMYIjCTifMT8jCU9fCTi>b`mGgno[fk?Ol nnRW/_2_Kh=deO[2L8B:SXj5PWYlQ7aiOGUc[=^fMGbB[:34f=S8X8BTb;Bk2f50:;K[``iPX8n35;BP^X7`/2k[WTbQ6RTj:CWIfDU9>CTi>MWI>C _NOanOSio_koooK[m]K;`;ggmWi`OGf2Q89lNHB4Q8AmQ7ZC_kj5NXWEb8F>QH:2O7b2NM3Wh>CR_Wii NGUaLG=_Kg=cL6UiNFQYLfUYL6YiJ6QYH7_GdfelJ9SV_5^7jmANJ6Q_J6QQIFURHTnXnN9:G5aLHIS3 inC/i>;T^SeQFf5LG5EKHEaED5]MJUeQBKg[[dI?ineNDJkWi[4mEDUKg_6jboGbY4I6D4I6BTI6ASJ4 mKhIBTY6=SHb?CI6=SdYASHf=TI6Ce]6ASlmBCe6DTHfARTi>CQ9FeEAASdmATI6ASHab; GNJc;Bd]:8STdTTb4a:2TD^[/a:1_6dD<]C=79Fc4]:Bhb ;2`X6@m0bMC:BTQ1bBCHfKXY^CV9VMTi^CTi>CX9VMXYRCViV: Tj:CTi^CRXVb_kG1k>C_o?koo?gfmOSenOkjjmg;a;Z[X8j4LFUcNGUmNGVHeMfWRM[CSXZ5PX9lPX9i /]_HanCM]WYjNGUlLfQYNVmYJFmXJVQ_L6QZJFEXKfUX[>C0J6mL]NbhA[We_5EXJ6UUIFEUJ6QUFgKd kEiRG5aLL::e]lCFa91RHFEKHEEEDe]KD5EEFea0G5/lRmJPAU_Pf4IKAW3BlkXgBTIi`m;PgKiMD51E DDU6=Se:BdbBh]=Rd]XZFYZJ:UWY^UW9VIWYfCTiRHXYfMThjCThZCTi>K WIfIV::KTi>CThfCTi>6Ti^;RiS>el7in^K_n;bM^l[gn=WPinohl_7cmN_Ph=K8a;NdZjcJnMn>g/f> QGY_KgUiPWYVd>CFemg7^YA_L6mcLfQ_L71cJ6ETJG1XJ65QIFUYG62of9I`NFRmh:AGeOJTG6=YIFEU HFQQFf9KF^[fUTURHV9LFe1LEDI6AUEMG5=KFe5KFeE@EE]KFdaEEEEEBE]RHZVMGE]KBDVnhK5:BCIA [DHf2o4bPY:1/Y =R`YGJUiG/cXimN<:bdY;S8X6SW4]bRWgN;B@bPX?c8]6Q/Y8BPJ6QXQ:B4Y8BP];B4I8B4Y:B4Q6bX] :2Pb=RPX:38YAS8X:2TDU]f=:c8^MSXjCRh^CSXjDTifDThf4`OcjaZKNf:eaZ??I[K>VZKNkbM_Kinoal?3ckoKe moOkln7_j=gPajm?0_]SM_XimLfUYHF9KJ7=XL6m_J7U_HE]XJVEUM=;6GVQ`L/CCKIST gfeUIFUUIFE`JF5LG6E9`ORh;VEXHUaRHVULFe]LFeEKFeaEEEaECeEBEDY@DE]9EEaLFe]REDUKDe1C D2f/bJe6ATHfBD=@EDI9Fe16ATUK?g[b_2YAATI9ATI6@416ASHb=cm6ATI9?DU6ATI6ATI6j=RTY=RPX8@lQASHX56gC j:/J;BP][THX8Ba6>SXjDTi>KTh^4RYBTi>HV9>MRW_1o_oDL<[`e:2kf8R4Ti>4NGUiHW1k Rh:4YZbe_lGEm?_ino_kn_;an??en?Gem_Ghn?Gcn?SekNOKf<_8_[N]X9B2NVUQJ6QLHfQRH6:9f;IE J69bd]=K^O3BR:b`f;BPX :BTY:BPa5JC[_c`X:2X]CTi>CVIB;RhZ:RY>CQHZCTi>>Ri>KThjCNl[ooma`f_?YcLRTQ8B4 PHZ;RhB4Ti>4Q8B;RhAiJkWdnOknm]?GaZjg[[^j]k^o_m3Wk>_=hOGXdMKThM_Ki>;Wi=_Hb=K4]ZfU ZJV4EK;PR5ELFiSQ`5?>j:mRJ6UYJ6UXIFAYIFEQHV35l:m6Fe]XHF9UG5aKHUaUG65KFe]RFe]@EE]K FdI@G5EEFf9RGEELD4YLEEE@EE59D4IEDDm6EEE6BU]AAU96BCG;acU6BDI6?cm6ATU6=SHf?DI6ATU6 ATHfATI6ATU9AS96ASlb?Cdm=SHb?DI6=SHb;RT/=3LfE9LBRP:R>ga]2PQCXZ:IWIfMVI^KVj:KVI>CRY>CTh^;Vif:QIBCSY>=Vi^>Q8]hb_kmg7Fi io3R`XR;Rh^4Q8B;Q8B4Q7f4PX:>Rh^?f_OamOWfa=?DKGUmNG=`NG1R[=OHe;IXf^BcNHB4RiR^^k_3 am_Kfn3Te]OQi>3HenRn^[J^]nbfS>OCDVEUI5aQHF5LG5aQHF9UHW;WdGi]NVEUJ5aMEEaKFeeRFeEE FfQMFeaEEDI6EEaEFf9LEDa:BE1:ATY:G51AATIEATIEBE1LBTYEBDI6AU56NMJ8?dI6DTI6=TI6ATHm =c8b?Ce9BDI6AS96ATI6BDHf=THm=S8b=SHf=S8bATHfAS8^=cLg?CHfSTbfPa=S8b:@^Fh:CXYVIU9BITi^CU9BMSXj>Ti>CTi>MTiB5SY>KTi>RThF6 Rg_1o_[LOXVij_?L[gj>SX^4RXF5PXB:Q8:2PXJ;ThoJjnoeo?KIc;MjQHJ6NWYjNWUkb]_=_6FZklb8 J6mXIF9RJ6QRJ6QiTj^^/[Fka=O/l>C/h>GUmNCGlngFdLC4]ZVCWIb5QGYWL6EL=YS9]i1BAVQXIFQR G6EUHV9LEEEKHV9RFea@AUELEE]KHEaKBDI9ATI6D51@EDI:BTU6ATI9Ce16BU96BDI6HF:na2e6ATI6 ?DTm=38oARhmRXY^KWYVIVIBCTiBDU8ZCTiBDTi>CTiRHWHj> Ti>CTiB:QH:5NkgnoMb@SXBmj_3O^8J;QHF4SXF4Q8F>RhB2OHB4Nl7/em[no?K2NXB2QGUcLgYjLg:b el2cKF;5j;a]JGYcLgUaLGU`KfmcL71XG5a?RM^lLifV[=Oaa>c]bMgAdMKAem;Bh=gKf=_HdLBj]kjj [X9YJ65UHE=LG5aXEF5REEEKFf1RG5]KDUE@DeaLFeaEEE1@AU5AFe]KATU9BDU6ATI9DDU9AU1ADDaU Zki]?Ce9EDHm?C@dATHi:BTg?DI6AU59=Sm6=TI6=dHfBDI6ATI<2aL34 ]eGCXZ:CTi^MU9fDTi>MWHjC Rh^CTj:MThj>QHjKThj:Rh]k_OkmhiJ>SXW1k>__JJcWf;IYKg=cLg=iNG1YKFecNG=cJ5^ei:eQIFEJ`lf9kl1MG5aZL8JV[Zja/k6g ^[ZnalO8dMSKem78bm78^Z^DPHE]IEa:EDU@Fe]BEEeBEE]KHEaEEF59Fe]KDEEEEDU6ATUEATI9BDI9 EDU:BTI6D5=RDSU6ATU9ATHmASdf=Sl];4I6?CL^ATI6CHf=2T/;Bd];BTY:2df;BT/;24Q:2dY:BTX:24X:BTQ4b4Y=S8b;2e< ajJOfgeS`_H_f[4_S`XCTi>CVi>KVi>C