(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 10.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 57860, 1257] NotebookOptionsPosition[ 55823, 1179] NotebookOutlinePosition[ 56170, 1194] CellTagsIndexPosition[ 56127, 1191] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["\<\ Como usar o m\[OAcute]dulo de ajuste de par\[AHat]metros de fun\[CCedilla]\ \[OTilde]es n\[ATilde]o-lineares\ \>", "Title", CellChangeTimes->{{3.621183484003786*^9, 3.6211835077399054`*^9}}], Cell["2/10/2014, Vito", "Text", CellChangeTimes->{{3.621183549284396*^9, 3.6211835542222595`*^9}}], Cell[BoxData[ RowBox[{" ", RowBox[{ RowBox[{"f", "[", RowBox[{"t_", ",", "a_", ",", "\[Omega]_", ",", "\[Gamma]_"}], "]"}], ":=", RowBox[{"a", " ", RowBox[{"Exp", "[", RowBox[{ RowBox[{"-", "\[Gamma]"}], " ", "t"}], "]"}], RowBox[{"Cos", "[", RowBox[{"\[Omega]", " ", "t"}], "]"}]}]}]}]], "Input", CellChangeTimes->{ 3.6211853160347247`*^9, {3.621185465801283*^9, 3.621185466832608*^9}, { 3.6211855048478074`*^9, 3.6211855574248104`*^9}}], Cell[CellGroupData[{ Cell["Leitura e visualiza\[CCedilla]\[ATilde]o dos dados", "Section", CellChangeTimes->{{3.6211879710041943`*^9, 3.6211879786453805`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"SetDirectory", "[", " ", RowBox[{"NotebookDirectory", "[", "]"}], " ", "]"}]], "Input", CellChangeTimes->{{3.6211880990090714`*^9, 3.6211881145883446`*^9}}], Cell[BoxData["\<\"H:\\\\TEDFE_2014\\\\aulaMath\"\>"], "Output", CellChangeTimes->{{3.6211881156665444`*^9, 3.6211881318442626`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"dados", " ", "=", " ", RowBox[{"Import", "[", " ", "\"\\"", "]"}]}]], "Input", CellChangeTimes->{{3.6211869875007052`*^9, 3.6211870214875765`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0.`", ",", "9.8`", ",", "0.6`"}], "}"}], ",", RowBox[{"{", RowBox[{"0.8`", ",", "3.5`", ",", "0.4`"}], "}"}], ",", RowBox[{"{", RowBox[{"1.6`", ",", RowBox[{"-", "6.4`"}], ",", "0.5`"}], "}"}], ",", RowBox[{"{", RowBox[{"2.4`", ",", RowBox[{"-", "6.`"}], ",", "0.5`"}], "}"}], ",", RowBox[{"{", RowBox[{"3.2`", ",", "2.1`", ",", "0.4`"}], "}"}], ",", RowBox[{"{", RowBox[{"4.`", ",", "6.4`", ",", "0.5`"}], "}"}], ",", RowBox[{"{", RowBox[{"4.8`", ",", "2.`", ",", "0.4`"}], "}"}], ",", RowBox[{"{", RowBox[{"5.6`", ",", RowBox[{"-", "4.4`"}], ",", "0.5`"}], "}"}], ",", RowBox[{"{", RowBox[{"6.4`", ",", RowBox[{"-", "4.2`"}], ",", "0.5`"}], "}"}], ",", RowBox[{"{", RowBox[{"7.2`", ",", "1.7`", ",", "0.4`"}], "}"}], ",", RowBox[{"{", RowBox[{"8.`", ",", "4.7`", ",", "0.5`"}], "}"}], ",", RowBox[{"{", RowBox[{"8.8`", ",", "1.5`", ",", "0.4`"}], "}"}], ",", RowBox[{"{", RowBox[{"9.6`", ",", RowBox[{"-", "2.8`"}], ",", "0.4`"}], "}"}]}], "}"}]], "Output", CellChangeTimes->{{3.6211870080959644`*^9, 3.621187022081368*^9}, 3.621188084867407*^9, 3.621188131906767*^9}] }, Open ]], Cell[BoxData[ RowBox[{"Needs", "[", "\"\\"", "]"}]], "Input", CellChangeTimes->{{3.6211877518330183`*^9, 3.621187762110011*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"plotDados", "=", RowBox[{"ErrorListPlot", "[", "dados", "]"}]}]], "Input", CellChangeTimes->{{3.621187768203455*^9, 3.621187790908248*^9}}], Cell[BoxData[ GraphicsBox[{{}, {{}, {RGBColor[0.368417, 0.506779, 0.709798], PointSize[0.019444444444444445`], AbsoluteThickness[1.6], PointBox[{{0., 9.8}, {0.8, 3.5}, {1.6, -6.4}, {2.4, -6.}, {3.2, 2.1}, { 4., 6.4}, {4.8, 2.}, {5.6, -4.4}, {6.4, -4.2}, {7.2, 1.7}, {8., 4.7}, { 8.8, 1.5}, { 9.6, -2.8}}], {{LineBox[{{0., 10.4}, {0., 9.200000000000001}}], LineBox[{Offset[{1.5, 0}, {0., 10.4}], Offset[{-1.5, 0}, {0., 10.4}]}], LineBox[{ Offset[{1.5, 0}, {0., 9.200000000000001}], Offset[{-1.5, 0}, {0., 9.200000000000001}]}]}, { LineBox[{{0.8, 3.9}, {0.8, 3.1}}], LineBox[{Offset[{1.5, 0}, {0.8, 3.9}], Offset[{-1.5, 0}, {0.8, 3.9}]}], LineBox[{ Offset[{1.5, 0}, {0.8, 3.1}], Offset[{-1.5, 0}, {0.8, 3.1}]}]}, { LineBox[{{1.6, -5.9}, {1.6, -6.9}}], LineBox[{ Offset[{1.5, 0}, {1.6, -5.9}], Offset[{-1.5, 0}, {1.6, -5.9}]}], LineBox[{ Offset[{1.5, 0}, {1.6, -6.9}], Offset[{-1.5, 0}, {1.6, -6.9}]}]}, { LineBox[{{2.4, -5.5}, {2.4, -6.5}}], LineBox[{ Offset[{1.5, 0}, {2.4, -5.5}], Offset[{-1.5, 0}, {2.4, -5.5}]}], LineBox[{ Offset[{1.5, 0}, {2.4, -6.5}], Offset[{-1.5, 0}, {2.4, -6.5}]}]}, { LineBox[{{3.2, 2.5}, {3.2, 1.7000000000000002`}}], LineBox[{Offset[{1.5, 0}, {3.2, 2.5}], Offset[{-1.5, 0}, {3.2, 2.5}]}], LineBox[{ Offset[{1.5, 0}, {3.2, 1.7000000000000002`}], Offset[{-1.5, 0}, {3.2, 1.7000000000000002`}]}]}, { LineBox[{{4., 6.9}, {4., 5.9}}], LineBox[{Offset[{1.5, 0}, {4., 6.9}], Offset[{-1.5, 0}, {4., 6.9}]}], LineBox[{ Offset[{1.5, 0}, {4., 5.9}], Offset[{-1.5, 0}, {4., 5.9}]}]}, { LineBox[{{4.8, 2.4}, {4.8, 1.6}}], LineBox[{Offset[{1.5, 0}, {4.8, 2.4}], Offset[{-1.5, 0}, {4.8, 2.4}]}], LineBox[{ Offset[{1.5, 0}, {4.8, 1.6}], Offset[{-1.5, 0}, {4.8, 1.6}]}]}, { LineBox[{{5.6, -3.9000000000000004`}, {5.6, -4.9}}], LineBox[{ Offset[{1.5, 0}, {5.6, -3.9000000000000004`}], Offset[{-1.5, 0}, {5.6, -3.9000000000000004`}]}], LineBox[{ Offset[{1.5, 0}, {5.6, -4.9}], Offset[{-1.5, 0}, {5.6, -4.9}]}]}, { LineBox[{{6.4, -3.7}, {6.4, -4.7}}], LineBox[{ Offset[{1.5, 0}, {6.4, -3.7}], Offset[{-1.5, 0}, {6.4, -3.7}]}], LineBox[{ Offset[{1.5, 0}, {6.4, -4.7}], Offset[{-1.5, 0}, {6.4, -4.7}]}]}, { LineBox[{{7.2, 2.1}, {7.2, 1.2999999999999998`}}], LineBox[{Offset[{1.5, 0}, {7.2, 2.1}], Offset[{-1.5, 0}, {7.2, 2.1}]}], LineBox[{ Offset[{1.5, 0}, {7.2, 1.2999999999999998`}], Offset[{-1.5, 0}, {7.2, 1.2999999999999998`}]}]}, { LineBox[{{8., 5.2}, {8., 4.2}}], LineBox[{Offset[{1.5, 0}, {8., 5.2}], Offset[{-1.5, 0}, {8., 5.2}]}], LineBox[{ Offset[{1.5, 0}, {8., 4.2}], Offset[{-1.5, 0}, {8., 4.2}]}]}, { LineBox[{{8.8, 1.9}, {8.8, 1.1}}], LineBox[{Offset[{1.5, 0}, {8.8, 1.9}], Offset[{-1.5, 0}, {8.8, 1.9}]}], LineBox[{ Offset[{1.5, 0}, {8.8, 1.1}], Offset[{-1.5, 0}, {8.8, 1.1}]}]}, { LineBox[{{9.6, -2.4}, {9.6, -3.1999999999999997`}}], LineBox[{ Offset[{1.5, 0}, {9.6, -2.4}], Offset[{-1.5, 0}, {9.6, -2.4}]}], LineBox[{ Offset[{1.5, 0}, {9.6, -3.1999999999999997`}], Offset[{-1.5, 0}, {9.6, -3.1999999999999997`}]}]}}}, {}}, {}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], Method->{}, PlotRange->{{0, 9.6}, {-6.4, 9.8}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", CellChangeTimes->{{3.621187775094584*^9, 3.6211877915801697`*^9}, 3.621188085164304*^9, 3.621188132031776*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"\[Sigma]", "=", RowBox[{"dados", "[", RowBox[{"[", RowBox[{"All", ",", "3"}], "]"}], "]"}]}]], "Input", CellChangeTimes->{{3.6211870282536993`*^9, 3.6211870389107323`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ "0.6`", ",", "0.4`", ",", "0.5`", ",", "0.5`", ",", "0.4`", ",", "0.5`", ",", "0.4`", ",", "0.5`", ",", "0.5`", ",", "0.4`", ",", "0.5`", ",", "0.4`", ",", "0.4`"}], "}"}]], "Output", CellChangeTimes->{3.621187039988937*^9, 3.621188085195557*^9, 3.621188132031776*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Ajuste", "Section", CellChangeTimes->{{3.6211879900368423`*^9, 3.6211879910837946`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"fit", "=", RowBox[{"NonlinearModelFit", "[", RowBox[{ RowBox[{"dados", "[", RowBox[{"[", RowBox[{"All", ",", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}]}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"f", "[", RowBox[{"t", ",", "a", ",", "w", ",", "g"}], "]"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "10"}], "}"}], ",", RowBox[{"{", RowBox[{"w", ",", "1.5"}], "}"}], ",", RowBox[{"{", RowBox[{"g", ",", "0.1"}], "}"}]}], "}"}], ",", "t", ",", RowBox[{"Weights", "\[Rule]", RowBox[{"1", "/", RowBox[{"\[Sigma]", "^", "2"}]}]}], ",", RowBox[{"VarianceEstimatorFunction", "\[Rule]", RowBox[{"(", RowBox[{"1", "&"}], ")"}]}]}], "]"}]}]], "Input", CellChangeTimes->{{3.621187044798031*^9, 3.6211871517689295`*^9}, { 3.6211871843299093`*^9, 3.621187238987976*^9}, {3.6211872691776977`*^9, 3.6211873062371798`*^9}}], Cell[BoxData[ TagBox[ RowBox[{"FittedModel", "[", TagBox[ PanelBox[ TagBox[ RowBox[{"9.744587248479698`", " ", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "0.09920461271002903`"}], " ", "t"}]], " ", RowBox[{"Cos", "[", RowBox[{"1.566762290419991`", " ", "t"}], "]"}]}], Short[#, 2]& ], FrameMargins->5], Editable -> False], "]"}], InterpretTemplate[ FittedModel[{ "Nonlinear", {$CellContext`a -> 9.744587248479698, $CellContext`w -> 1.566762290419991, $CellContext`g -> 0.09920461271002903}, {{$CellContext`t}, {$CellContext`a E^(-$CellContext`g $CellContext`t) Cos[$CellContext`t $CellContext`w]}}}, {{2.7777777777777777`, 6.249999999999999, 4., 4., 6.249999999999999, 4., 6.249999999999999, 4., 4., 6.249999999999999, 4., 6.249999999999999, 6.249999999999999}}, {{0., 9.8}, {0.8, 3.5}, {1.6, -6.4}, {2.4, -6.}, {3.2, 2.1}, {4., 6.4}, {4.8, 2.}, {5.6, -4.4}, {6.4, -4.2}, {7.2, 1.7}, {8., 4.7}, {8.8, 1.5}, { 9.6, -2.8}}, Function[Null, Internal`LocalizedBlock[{$CellContext`a, $CellContext`g, $CellContext`t, \ $CellContext`w}, #], {HoldAll}], VarianceEstimatorFunction -> (1& )]& ], Editable->False, SelectWithContents->True, Selectable->True]], "Output", CellChangeTimes->{ 3.621187152456477*^9, {3.621187188095809*^9, 3.621187307284129*^9}, 3.621188085320567*^9, 3.621188132063029*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Testes obrigat\[OAcute]rios", "Section", CellChangeTimes->{{3.621188005767972*^9, 3.6211880106745825`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"fit", "[", "\"\\"", "]"}]], "Input", CellChangeTimes->{{3.6211873097061853`*^9, 3.6211873171911097`*^9}}], Cell[BoxData[ StyleBox[ TagBox[GridBox[{ {"\<\"\"\>", "\<\"Estimate\"\>", "\<\"Standard Error\"\>", "\<\"t\ \[Hyphen]Statistic\"\>", "\<\"P\[Hyphen]Value\"\>"}, {"a", "9.744587248479698`", "0.43189685192373234`", "22.562302098466027`", "6.584747075239349`*^-10"}, {"w", "1.566762290419991`", "0.005958275950289746`", "262.95564413121895`", "1.555921784867489`*^-20"}, {"g", "0.09920461271002903`", "0.010312469078055546`", "9.619870077587125`", "2.2648276206151714`*^-6"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxDividers->{ "ColumnsIndexed" -> {2 -> GrayLevel[0.7]}, "RowsIndexed" -> {2 -> GrayLevel[0.7]}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{ "ColumnsIndexed" -> {2 -> 1}, "RowsIndexed" -> {2 -> 0.75}}], "Grid"], "DialogStyle", StripOnInput->False]], "Output", CellChangeTimes->{3.6211873177536507`*^9, 3.621188085320567*^9, 3.621188132063029*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"chi2", "=", RowBox[{"Total", "[", " ", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"fit", "[", "\"\\"", "]"}], "/", "\[Sigma]"}], ")"}], "^", "2"}], "]"}]}]], "Input", CellChangeTimes->{{3.62118750325301*^9, 3.621187531564788*^9}}], Cell[BoxData["5.088637201756448`"], "Output", CellChangeTimes->{3.6211875325804844`*^9, 3.621188085320567*^9, 3.6211881320786543`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"\[Alpha]", "=", RowBox[{"Round", "[", " ", RowBox[{ RowBox[{"100", RowBox[{"(", RowBox[{"1", "-", RowBox[{"CDF", "[", RowBox[{ RowBox[{"ChiSquareDistribution", "[", RowBox[{ RowBox[{"Length", "[", "dados", "]"}], "-", "3"}], "]"}], ",", "chi2"}], "]"}]}], ")"}]}], ",", "0.1"}], "]"}]}]], "Input", CellChangeTimes->{{3.6211875400654087`*^9, 3.6211875934385653`*^9}}], Cell[BoxData["88.5`"], "Output", CellChangeTimes->{{3.6211875843910227`*^9, 3.6211875942042465`*^9}, 3.621188085414324*^9, 3.62118813209428*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ListPlot", "[", RowBox[{ RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{ RowBox[{"dados", "[", RowBox[{"[", RowBox[{"All", ",", "1"}], "]"}], "]"}], ",", RowBox[{ RowBox[{"fit", "[", "\"\\"", "]"}], "/", "\[Sigma]"}]}], "}"}], "]"}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}]}], "]"}]], "Input", CellChangeTimes->{{3.621187603236161*^9, 3.6211876361292024`*^9}, { 3.6211876750984755`*^9, 3.621187709845557*^9}}], Cell[BoxData[ GraphicsBox[{{}, {{}, {RGBColor[0.368417, 0.506779, 0.709798], PointSize[0.019444444444444445`], AbsoluteThickness[1.6], PointBox[{{0., 0.09235458586717075}, {0.8, 1.72722648610523}, {1.6, 0.589556771485162}, {2.4, 0.5133442473800969}, { 3.2, -0.012272651336233675`}, {4., -0.30390809169627886`}, {4.8, 0.04613912891533123}, {5.6, 0.09572408801295396}, {6.4, 0.11023070180188022`}, {7.2, 0.895580337971264}, {8., 0.5916387279788129}, {8.8, 0.26403799954057283`}, {9.6, 0.3846127004683808}}]}, {}}, {}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{ FormBox["\"t\"", TraditionalForm], FormBox["\"residuo normalizado\"", TraditionalForm]}, AxesOrigin->{0, 0}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], Method->{}, PlotRange->{{0, 9.6}, {-0.30390809169627886`, 1.72722648610523}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", CellChangeTimes->{ 3.6211876368323765`*^9, {3.6211876815051975`*^9, 3.621187711064395*^9}, 3.6211880857737246`*^9, 3.621188132109907*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ListPlot", "[", RowBox[{ RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{ RowBox[{"dados", "[", RowBox[{"[", RowBox[{"All", ",", "2"}], "]"}], "]"}], ",", RowBox[{ RowBox[{"fit", "[", "\"\\"", "]"}], "/", "\[Sigma]"}]}], "}"}], "]"}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}]}], "]"}]], "Input", CellChangeTimes->{{3.621187732487846*^9, 3.621187736785037*^9}}], Cell[BoxData[ GraphicsBox[{{}, {{}, {RGBColor[0.368417, 0.506779, 0.709798], PointSize[0.019444444444444445`], AbsoluteThickness[1.6], PointBox[{{9.8, 0.09235458586717075}, {3.5, 1.72722648610523}, {-6.4, 0.589556771485162}, {-6., 0.5133442473800969}, { 2.1, -0.012272651336233675`}, {6.4, -0.30390809169627886`}, {2., 0.04613912891533123}, {-4.4, 0.09572408801295396}, {-4.2, 0.11023070180188022`}, {1.7, 0.895580337971264}, {4.7, 0.5916387279788129}, {1.5, 0.26403799954057283`}, {-2.8, 0.3846127004683808}}]}, {}}, {}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{ FormBox["\"y\"", TraditionalForm], FormBox["\"residuo normalizado\"", TraditionalForm]}, AxesOrigin->{0, 0}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], Method->{}, PlotRange->{{-6.4, 9.8}, {-0.30390809169627886`, 1.72722648610523}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", CellChangeTimes->{3.6211877376132193`*^9, 3.6211880862112565`*^9, 3.621188132125533*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Visualiza\[CCedilla]\[ATilde]o dos resultados do ajuste", "Section", CellChangeTimes->{{3.621188019878384*^9, 3.621188026753889*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"plotFit", "=", RowBox[{"Plot", "[", RowBox[{ RowBox[{"fit", "[", "t", "]"}], ",", RowBox[{"{", RowBox[{"t", ",", "0", ",", "10"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.6211877983153024`*^9, 3.6211878373783875`*^9}}], Cell[BoxData[ GraphicsBox[{{}, {}, {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[ 1.], LineBox[CompressedData[" 1:eJwdV3k8VO/3t6/DzDA7ZoYRikghJPekIlpFhSgkVPYlRCJFhOxUSCopSVp8 UPFYUkQprWizZV+yJOvvfn/zz7zer/Pcs7zf5zz3HkVn771HBfjwnyAf3//+ c8KdRbRdLhq/bEyNMjzNg1y7YcMD3GNY6peh9bdDefB1Z5wflxuCBXXnp86E 8CDIzFZamBuLYbd6HTae5MGzA93By26XsB+lBh06ATzgf1w2sfA5BaOZnFYg +vHAtB7s/3IuYzP2GMnDkwfuzeeTpzZnY6SuH62jx3lw8UNTw4TbNexRxaOT 1u643e8uY+ZzPqb+nZz2ypkHxWd1osY5dzCtykapfft5UCXyWWGs9C62K+/f 6NheHrTGhZSPbL6HvWQMLXru5sGflKqRQbcSzOBIRLPsNh5kWyrf+/P5IaaS eMdcVJ8HN1MD/03kPcKCSv48frYO9/+xwXTi2GMsrUL++j4t3L/tsV9j808w m7pnamtVePDL6T5thFOB2azs0MuU4cHgjeUjw/0VWLFd2cAxKTxe757SodJK TH7TzCmuGA+Ejk9uH9z8DOOk+R43WFQCFT/9yN9u1djank9dcn1KwGjf4ubP QJhXu8GI9E8lkA8dkZoMQ9gdr4qNfV+VQPm58cE/W2uwdTV9vze1KIHepl/T 459rsYqnWQP3HyqBYVdsto9RHUY87XrvRZESGEet3TyeV4dxf4up1txUArMX UUljx+qxwq7UM64ZSmBjrqI+Ov8CO/mlyt0jWAlCLU84DnEasWyBFxN+65Vg KUqP+SO+ERtcV+OipKkEEWX879//a8SadgfMPFRWgnNyWZsr25qwlrITb4LI SpDYW68SG9OMObjXNKQMKEJeCHtEZewt1iN5VUspTRHIn6b2Smm2YhaHA61G LyjCXm87rRiXVkzt7jnpnNOK8PH6iv5T71qxXRkKJfmuitAu8szWuegdFqRb 6mq5XhG6W/uNtA+3YeKP/hZbtXFB+fguZlF6G3ay4HvwvgYuuAo+nlZubsOO 9FVEbajgQr/umfsMgw/Yvq11jY9zuTB8hcrlk/2IVW4k6Rx258KMi4ng24ZP 2J87geO2IxwQ/3e10UOzHcsOydfl52ODfszXUxZO7VjqGiufB78UwJ1K11BL a8fqesfGdesUoEE7JbH7Xzs2krg2u/68Apw7fsHK7kUHlv7qT9KMmALwdQZ8 M7P/hr02kz3wTVQeQn8UBJO3/sSSTwav2jLABN/aM/HDft1Yh1G4T6QZFTRv pr57fH8Ay7olY9S5RgR6d7nL/9Afx+Ye6n89uVBXncmKVrjuOIntck3q9tIS QTPdb27v8prE+Fa96uadF0HWxfS1C6GTmAsr4u31dhEkA3dMD2ROYpoFSaoz 50RR/NFmb6k3k5jZvyS1iU9iKOKBTG3Ihiksb8PX6Mfeksjd9JrrXto0Fhj9 OHy/Pgk1EPvHl3nT2KLnxmz9wyS04uua0GLtaUzuUvbtmfMk1HWi9pLYzmmM Jn8lVriNhOyTe8uroqaxKEZoptsJMtrTqS6pPjGN3eQE1oikyyADv/ISweYZ TMRnxySpiYJalzcc8v06g82UPj7rMERBrgnVhB99M5jqItkggkBFKYUNxyr5 /2IGsh/3mO2iosHvH3i+6/9iuVZhFZ/eUlH29onM7/l/sWNUnb63TTS0pLwq oiJkFvM4lX23P5eB0h4Wa6rGzGJZIfFhuZUMtAq0v6WlzWLLg6yXyp8YaP9B fUOfklnMfhefaj6BiUqSTadUemexkAcCzQeDmMhxydk9bc8/bJLy8MadzSxU 9/nqHm/VOSz6WA2xskwOpTnvm5peN4dx4jcef9Ukh1xHpLPCYA7bsb6+5M53 OSQhePZHrO0c1kRfkdcjLI/2aLp73bw4h23Mt71hsFcefT+nE/91DPfX5xu7 s0sePSCOajkuzGH0D/1uEZPy6OyV2219YvNYRsd41zkhBbTiAUtuSnEeK7UX PCqgooA8OvjuSlvPYwo7bW+1uCqgOe2Wl5vL57G8ggD3jB8KqPlZ9Imm+nlM KvmnUMeIAso1A6Llu3mM+dZSf3xeAW1yeLT/0OA8pp44rhFPZ6MLFy73Bssv YAdvLH69sION7GStYpfVFrAia6+KPbZspJFLWB2tu4CleVW96j/KRm8fnQlI 3bWADeT83hYbzka0H0cF70csYEsGS9lxxWzUf4xzWydhAdM2FXr5vpyNKqe+ WDy9vIDt4po2D9axkYPEjpRXDxewlMP3Nsd9ZaObumsVu3twbHxh6rwAB51E Q/XHJhYwlfxBoR0EDjLbfst9fHEBEwrxuf+LykGDjowHi7RFrNbZvjRUjYO0 45eMGeaL2NfalQ3HtnPQ2mMLLsX7F7ECWxMpe2sO0jGdizNxWcR+NDutpTpw kB7fzCePM4uYqU/+cocnB+l/m1zgT1jEFG0NcwYCOcigckIp88oiNnGmQbDq NAcZBYx41TxZxF7tIso9jecgY8uhtP11i5h/QWB9dyoHYZoDlUOti9jgeZ5a 2xUOMunvEaENL2LNLVIUkUIO2mbfmXtcaQk7NhSy41k1B1kYtNcvay1hMqL3 U1kvOGg77ctg2sYlDEuYicOaOGhXa5tetc0SNj1uGP+tjYP2FL+zt3ZdwnIm vbP2f+Egy7i3Zwf8l7Cec+q2GZ0cZL3l9RvZS0vYGgFh/uM9HLRfsXGqMHsJ O5wRM7L4m4MOLDWwjO8uYY3fbC/bDHGQTUc9tP23hJUy1cVOjXKQXXmtq/uL JcwigWjsPMFB9ukofvH9EhZ2NAIjT3GQg1/Vw5SfS9jItYPkmBkOOrT72RfV 0SXMY6K7vG6Wgxw1KpeezS9hV4vQhpdzHOQsXq68V3wZW7q+eC15gYOO9D2x +E1bxrZLSw4rLXGQS90jnzDlZYwV8FwldJmDXPNKM8hrl7HhmgL1nXxc5H66 5FkBtowlLxWZIBwfsyvu2rBzGVv3yquTxs9Fx9cXib2zW8b6Dysu7sGxB+WO pqv7Mvbmh+odLxx7TRRYzwcuY52rGL3eOPZ+c/NUUtQyZttZ8cQaxz5F+Xkr kpcx/vUiXAUc+13Ia6jMXcY+yKqtbMTj+R/NHd59bxlLbA39ZIPjAJNsmd6K ZawwlH0wC8/3JOeK/qmXy9gIc7O7KV5P0ELmIeLHZWzylOnPp3i9wV/Tz93s WsbcKB5vZ3E+TpWl3jUYx+u/Z2uyiPMVmprc+mZxGRvUpps24nwal5vNlwrz gV6GdL89znd1gWliGIEPfG9I6pXjekD6VkUzWT7Q/7DBuAPXa5PfZrNOLh9s FWj7L7ifg2odTdoLVPmgaDjUbBLX32T3Jk9fTT7wDO9o0f3FQVs0sFQRIz7Y wO+5LPOVg16wjFXemfBB5Z3fr4s/cJCp+MaKq+Z88I5w9x2pFZ+3PsMfaw7w wejayrdaDbg+bR+GYxz4wLaoX8eshoPOIa+570f4AD7xG2k+46CaK/nUBB8+ KLm4zutEKQdt2C2xYyCWD5KtmSo3L+P9ZXTTFpL4ABNVsTfE5yV4pbFbZgYf xOwY/i8Pn6cngn5nt97gg4h331S/h3OQVvnX8uvP+KDshuuQghM+D7f8G2Zr 8fgxDrvX23KQR4rUh92NfND0rcRL0ZKD7nhsGlv8yAeHHX213IGDeIp3VtiN 8YHDg4nZGnkOoscFp8go8UONpv7FimY20guSyTumxg+q666l99ewkbXLvWKk yQ9aSZ8rB8rYKNn45yuvDfywhA2WOeexkeSk2XKTNT9MjIRorPVlo+WDdI+o GH5w8qzKcZBgI7Z5aUh7Aj/8DqaZVC4oICO97THaafxwLmr0xuCoAgohncn/ kccP+idKyC/fK6DJ+r4vGypxf937q3yzFNDv1WVbp4b5oV2m37dQTgEpnfY8 qj7JDwJWWyOuSyog+2bl887/+MFOsfOD77w8aj2eWt8qLAAD05ZNWe3yqPK2 z+ZitgCM+dRtFcyUR/GK6ptc9wiA8lLtalcxeaRNzTP68kgAFLbnr9nxhoU8 XA7YEysFwPNw8JBHBQsVPJIOM0UC0NRoyzl2k4VYe08/fdwsAOml0+enQlhI 6JKdYXKvAAjvUThykMdCn8So+hZ0QVibK5IT581EoQux656dEoRSS4mAs6N0 9CbgSNqpSEE42/Dgln4bHXFHjKb1LwhCoJJraeN/dFT/bazsSbogaNeuXHM6 go4I1fsMSx4Igl+w/UstEh3lRipuyu8ThIeYz9ikGg3ViFTsurBXCNyiXU1i NlGQKLn/mPUqYTB7eOfGgBwJCbcIm0k+F4GkEPHxZ7yl6vk3xR4pvmKw+uTT uWs6vzD2O6erW4LFYK/pb1Ntxy7MpI3aNBMuBvOliON7sRuL+3xa9WC8GITP HMqe+tmLMX7u7OLdFoNb5ZPTbTGDmN7EyIEnnWKg7mvpn/drAvOR1dz8xUwc TgTyxf03MYf1HrjPZLMlINS8rcePIQIFNou19soSEFJfmsHaLwLutjs8rq6S gLrNhjqZqSIwaDdYxVgvAad7xDqlpEVh3EHFRXaPBAycl0v7zScGC0dy74ud lQCuwBVbwe/iIOuTuHmyVwJKzD915vtLwQefb8PawxJg5ea9ZVuRFGT4amT4 /JEAyqn7UeVdUsDwb+ofWcLjJ4U6zO6RBvZJkcR+uiTE7pFwGllFhFVh4V++ mUvCmPfqYL3jJNh0wcvzVbEkjL+zEh9eJAPr4Y8DiY8l4cTcxIW1DBmY6thj Yv1UEtrO+Ny1XisDBVrr6D9fScLNBtV16q4yQPj8F/3tlgTPklZJhWYZ+LQi kqLKIkDeaifzP0myULL7z9IwlwAq/wSqfxbKwoWQIwMPVQmwuqwoqBDJwoaW rVXGugQov31UuW5MFvICJNz37yHAPkOlbMUdFDhRl/r0fDQBLv10jTy6SIEt I0IF2xMIsDGUvvKLDBXY9JNJ5DQCRHzct6yoRoXW4zZHc64TQJT//TPDvVTQ k1EgPnlGAHcH9trTN6nA51Tg3POHAI0/BCs0NtEgfalcfPNhKTjPuy8QZkcH guoLr/SjUsAfLCKccIwO53a/a/t9QgquKmy7FRRMB7+8gZz4YCnY/los7Gs6 HXaZsNZ+SpaClryU/1re0EEkOtTuWL0UUDwFOo4bMOD0/Zjqp01SoK8QbiVt yoCpT6nK0u+kIHmTZHDcXgZ0qd4bffhNCoKfHU8mnGBAdWPn2YUZKWhvO3Zb 7woDgqWMiy6tlAb+sVqMMcGAMV0LUpeWNATHGvTCPANcD+0P1NGThkJOSNQm YSZYl3hhX02koU1JPrqJwQRty2ttSvbSEOJj9HhuIxMKQ4r0A52l4WxkvGaX KRO4+f/lvHSXBskf1w5f380E6cm3bh6B0hAt+LyxwJEJg2l8C08SpeH6Bxvh lggmOD0nOImlS8NeleRQ3wtM+NLLaLC7Kg1zN3afHLnEhAY97aTl29Kw22y8 50QuE/K/OCmb1+D4cfSKsxVMYPJ7xV59KQ223xeMuqqZkLTy1OhIizQkrDpX xmxgQviplPKUdmno6jGok37PhIPydTs6J6XBPGrdP1I/no/nxJ8nc9LQXvCf buYIE4KrOZcv8RNBWjOnaOQPEzKcw3pNiERolG7YKLnIhBWP716UpxEBri0d eM/PgsfCX7Vn5IkQ9fvs7WMiLHhfqBt+B58LJoHUJ0ZkgdPcEeUobSLwh9R8 JMmyYHx7SpO9PhGO5xEX+mkskB4bpZFMicB7EDMhzmZBDig8H9hBhMgrkvV7 FVmgkbL9SJ0VEbS5P9tOKLPAQrew5KQTEcinfj6RXsWCr9Gf9u1xJwIrgZqY pcEC9y9CCyu9iSCbXFzyR5MFf1euyxc8SYR3FlFsBW0WRIc6bfsWRoQr/C+/ 09exgNpyabQsigi0Y0tTXTosuMmuSkuKI0JWnJBruB4L1vkMGx5PJkJ3sfj6 wfUsqK1h/dqcRYSdm1I9VQxYYClrHqNwjQjba0KJ6wxZ8NMlaPXfW0QIuPZH ibSBBd5lt9pa7+HPq4Xdf47jJdEPIXcfEUHUY6J8gxELEmwFuOcqifBdIcI8 DsfyRWsaHGqIcCv8rtsdHBctHPJY/4oInRvN5C7j2HBXggz5LRE6HCI9bHHc eO1p+eBHItyjfTkyiPu3mRg4VN9JhBPlbIkdOO4zYQjnduN8JYS5h+P5BaaZ FgUNEuFGhceFSDx/ob4AS8sJIrxnV/nv02dByvobf1fNEkHKIFVnDq9fMfZd jtAyEQT5nD966+L+R5YVxwRIcOHFpGMZzh+XRp8+KEKCv7JHu1pwfn8ba756 JU6CfxdXHC3TYsF9t61XdaVI0FDzd8p7NQtOJtl75ZNI0MScyJnD9TOu8N9E pJDg6c0Qj/1qLBDuiqOE0UlgML/dM2oFC9LWVVTuY5NgRtfa0JLDAnv71oRa RRJ8yb+i+EeOBbzzvx21VpBwHrb7ujBY8PATVVRcgwRd5NSo5yQWnFrWaA/U IoH//ldHbhJYsEltS3HXWhLcC771216MBa0hflbPDEgQimSYm5eZkJUfq7Jy Iwmm+5v6fOaYcPh13r90IMG2a6eyfKaZMCr/9pq3GQkyN8QM9Q4ygYDUh5X2 keCPj4XR3TYmdF22fHXGhgRKar350S1M+M8/6GbnQRLEa8Uprn/JBGfVOvsM ZxIkeIQ8oFTi9kS7FnEfEtj3pKvW5zAh3j3ijqs/CdbOqh3enIGfNyk4X3eS BIhlaJ6ZiMebmdh4+jQJuPo+Mc/DcbtD7P3xOBJMHJNcEnZggv76kridiSRo FQtkrrZmghT5o+vdZBIcmmpNXbmdCeX1XI5LFgkGvnTy3dDH7Rrllz7fIsHh /4R2XCHj9rk+nypEgmK33WIPnjIg8QNhp1w9CYgNFw/qP2DAkftrVwa/JMHw L/LVzJsMkHYO/6X9hgQn4Pr2jnjc3kjde6uDBNH7f4ecOojbs7asi58hQbnP lJz2BB16fI8TB/6RQMFwNEi3mw4V25OGti7iekYnJMl8pIPLcseNZUEyPCi8 HnCgnA6Vrv4UfzIZ1vizIoin6XBUN3/aVoMMxRUrtfYt0yAukUo8rUWGb1tl pqTHaXD/9wW1vLVkCNtmtr/wJw1mLnsf7NMnw+LbrS6namhwYcmoxm8rGewy ic25kTS4+/Jz/MVDZDh46895gQUqjNpKKT9PIsP1p2s0Ce0UkHkUsfFnKhku 5bZ9nWyggB5har9gJhlqrijxVz+iwJmq9ljzHDJMPqeZ8yVQgMQrHPt4hwxa nBa/tcYUWDts8nS0lgzuTUQL/6uyEBQevJc7TYbNLk+1D5vIgNpwGCFmlgwT wyUatFUy8MU2smFkngwiM8E9D8gyoK8bZ/hUQAbEhS9vT/lJhtmhq0r7STIQ pnN5m8RpMpyyrf5zUV0GakFfZO4BCcJ1RFL/OsmAdcTwZl+CNJwfTG1780YG PO/z3YFuEdixilhIuCILUavXX3zVMo4lFOuhHU4UmFbRs45X7q9WcVRzKnah QNbKxiQV5kB1lQxLQNqdAq3U7eiE1GD1eNDi5rdeFOh4VXh6fGqo2tqk/qVl GAU2ra0yL6seq5b/bPl2fyYF3p0o9HW9Pll9j8/zu2MLBdzbLiTIzs1VN1nd WAgwoIKA7yad5hNC6OH5rvarRlSoUfelUXOE0JX/FCtqMSqM2eo803sjhI7L 5QWSTKlA775uLLhGGIl3Z48W4d8hrZYLNyomhNE2v4yfXSeokKkSJOLkKYpe JMXW78mlws17MXrvN0uge7Wv8oOuU2FJ1c7lkbcESpsSjczFv1vER2q3Hr0q gVxsojcO36VCkvM3XcM/EkiIG1UW8x8V8vb9OpSfI4lMSsIKq1rxfFPvnzUY IiDU4h2vIUiDBr7yaX5HItKhgGSmCA3WShz6XHKBiArtSHH8EjSoV01WZ5cS 0aXfD2I+kWhw3dz8Sg4fCR3i/3M2gk0DvqpLZP3dJLSgExDywYAGpsxNE9v6 SMgndMus8Ubcn8uZM+mzJNRTQwm6AzT4V5kfiCTI6PWuJwHhZjTAKGKapZpk dMV9xlttHw3UfuYNzwWQkUF2sGuYDw30R+EIc56M7nVt6+3zp8GwY6k9SMog 7kqmi2UQDRxWp63eIieDxMoqnFTCaTBHLZr7ZSiDvryds2+9SAPx8yVt/sEy 6KTgaSvl2zTIOHZ96NuwDBo03/k+8S4Nxpz9Nr6ak0GHkhQs/xXToM90FzNR TBZtVaja9eYxPncfFVfc48kiyvpl8+BaGlipqWRo2ciih8cjofkbDVY0dolu rZRFOs6Or1R+0WBP+tWZOy9kUZkttieyB/cfpFI72CqLKrYtHtYbosH6s2KV y32yCKmEnMmbpYHXk4S6QDIFmbBtROfnabDJ5/rqcjkKqqOuv/T/90JhC/HT CgpqEJrOlRChwxbNfumbBhTU0uVTFSBLh4CzFS9jDlPQrvbdpm9pdHjVbI9u ulNQ6zvNNytZdCieK+rM9qWgD2j423cuHWZof+zYURTUnuu+uE2TDguLwyeP 3qSgfjtHIwVzOqy6xrVY/EFBx/di9UE76CDW6HjzVR8FDZuzd7zfTYfI14l3 vUYoaEy/82DMfjr0lj69ZTFHQTM0m9CJI7i/rO73m2SoKFh6veAONzpMzlmK dNGp6J8w7WLBcTpoCh+ttVegooWptisHfemQRC19+UuVigTbdle+CKfDRvWK pys3UNG5Jk0T7lk6uFva/c7BqEikVqrp1Hn8Xj3z+MLwZiqSKH39VSueDiVm f1WZO6govvCuU9wlOuin6ij/3U1FUnmxAz0pdDDU+5BSYkVFpEtm/y5fpoOb 64OGEjsqSolWiZzKpoPaBYv4vw5URAkXFt+dR4cdFIEXTCcqonvWMYRu4+f1 d6eOuFJRlkt+3qG7dJDsMVe/doyKWPaRahXFdPhPVGODugcVsbdj+l6P6bDG xqDpvQ8VjdacWEz8D9fnxCfN135UVK2fVVtSSYfLqQZT+QFUlFRSH9P6nA5P bYvk7U5SkaPKxI4JRIc7xFt3x4OoaE2OgoxMPR2y61vzXEOoiJ9i8XntSzrk GogLPDtFRe/jTmZbNeHvlY+278ZDqSif/4ZTQAsdXl9eIgufpiK/4Lcq6a10 UKG4vJzF8eax+aEnbXT4bKU6/Tocr9dVrfTTJzo86aBeCz9DRT2d1if/fqUD O311IymCip5YRW5gfMP3mtrsoLM4jm4q5jP4SQfziZr7bTjev6n9hS3+3js4 rO4vFElFquUiF0/10UGr+HIjBcezmuv2XB2gg+/OubL/2V/dOkx9NkwHyqwH fMCfvywf3945RgfldjgRhePjqeXXFv/ge5PstJEMjg0lel3YMzifBfpPI/D8 JCPJq7B/dLB1Hxx6g+ff+Xfj2OEFOixNMD4u4PXd8zr+OGKZDhEJAqclcBzW mxFyXYABl1Sog39xfnba1xnXCjNA0WBU6QXOH7ttTLBbjAF0ZKfph/M7ai7f KEhgQC7vgOwyzn8V2paoTGSAhSrx6wlcn0vrA622yjBg/vO36HJcvzUr3nyL ZjDAx59eMYHrzZc9l39bjgGamPLO715U9E5G1f0VmwHPrC7238X7w48v4o/4 Cvw75PGD/T1uuB5B9/5bpcYAZ50LhpZHcT1Gv4RtV2fA9w3DZrnOOP8d2qIJ 2gwIC0wQ/GqP87/3UHOxDp7PHZv6Bluc/8a45DfrGVC/sbktbT/Od1m3HMmY ATfkGoTf4/1vmJK+JtWCAd5rWt69A3xexGunH+1kwBXXw0p1RlTUcWa08sMe BtRKhlDS9XG+PM220g4w4P15ukSHFl7/tn+2l48wQGUjCh+Xp6LE6hWcSlcG XNwrxe7H5/mw3t6e9mMMILkoP0f4vPMpF3nJ+zDg6VO11VQxvL5l+6hrYQyw zkrDdkxQUF4ca0AwggE7dfYYNw1S0AL1yy73KAZcGF65VbmHgso0rFjacQw4 caThoccnClKzMy+tzWRAE7eOaFlBQed6ReiqVxnwX1nP7tJSCvrlUx92MZcB BTsdV4/eoaArMdg261s43+f9iUuXKYjwRPdH70MGZG6yKQgOpiB3mNxiUcaA fTUzwsibgl68fnD3fgXODxK+3eNKQeFd6ieDEANiLn8UbLCmoHGikpT4Gwb8 +hecPKSJ35/HpTdoDDAgT6OY/1OnLFoz8zovaZgBSjF9UgvvZFFCZKzI9BgD Bn0+vuF7KYtMs4TeP59hwBuKaVvBA1lU/mLOfbcQE15nB5W6nZVF2dzfGX4c JjjuC3/dxpFFLp+q/5TvY8Kd3q8BjM0yiPSrKb3bhgn15NlyU10Z9HToo760 PRN01CwlD6rKIBn+4fAjzkw4naGwSQ9/H1arMySlvZkgPv/uRcU7MmJF+vCO 4Hu49nDcDoIdGb1TV7SWesqEy8UlxGs2JGQcefaJE5cFGU1iObWqBPTXKNsp jMcCT6uRA7f5CejB7BOpTBUW5Fc3OLl3SCKez8DRZnwvvaIVfjAiURKJHd5D W4/vXV822CPpSQnUZsQOIuxlQahGdH7nE3HkPluh/18UC847ttgt80RRivfE U8JvfE99cLq85wE/6oq41XetSg50NWxPHZbsqR46WuFSGyMPVhUBF9S9hzBC k8mlVRfloeq0QF2w3jCmodlckZIoD9m303t9F4cxj5nv0kfS5UHSbyLBOW4U G44WqhC8IQ8JNwWUCa3j2PDt3VJbq+Shwtfu4ufOSWx0oPfJyyl58E/Tbtn8 5h8mvcv7p9asPPyslXnqqj6HaT6clcialwfqYx3V7RfmMK9Tko7uAgrgXfCb sH/TPDYqoS0hTlIAQRtXrSMPFrAx9bBDFuoK4GQWXvoxchkb95QRbXFSAKOB G9fFggTgsOWA17yLAoyHzIfY5ArAGx30aaW7AlSXFbPOvxCAe/OeBdFeCnCy y/Wzv6wguMc2boVQBdAWlDe6XiwIP29GnHuUpgAHZMSCCR1C8LZjlP/KSwUQ e8+7Xs4QBePqF8deNSlASNK/JcMNonAvP/vdTIsCeLx9UZbqIApxxyyuW31Q AI59WfDL66Jg+vcWSP1SgKwomu46NTGoknE4EzGnAG+5MDepIQ73zV8vuK5m g62L4PERiiSof3/geX4NG8zTBJ5ba0tCoV/G9xvr2BDU+Wgscack5F91Qj8N 2LD2trFb6HlJSB/5G2VnyobLgWc/rJmUhLBkZcldh9mgsvDUdPwFAf6tkAjz cGbD3o01dwJ/EOBk5dhw3FE2TN40b389SwCf7so3L0+w4fPqlJWDq6TgiK5l yqZgNpxm2BgMxUuBxdfTTN1kNlR3WbT3mknDS88jcVZpbHiy+ajD8UPSsEXA fN43kw36Vqa/nwdIg7E65dv9HDb4JWkVvsuTBu3Td/PU7rJh1/FDCndmpIGh +FlVvo4Nn6p/NAlcJkL6k2dZhg1sEHq+c4vHPSLIWOSL2zaywdJaefuNaiIQ /D2H0t+yQe6tZ3FILxGW6wVLiJ1s6BrWbXDG9/w+9zV6gtNs2D46HNqD78lj 5NtmR2fZsLriam2JCwlmKxVsX86zQcTWucjekwTiUpJhFwU4ELypwPBgOAk0 SntrZEkc2OO4GgZzSaBrZ98WKMsBv7dG0TUFJDAWbOv5TOPAyp5fSqfuk2DP PiSarcABIWNz40vPSeD/78pOZXUO9Afps7e1kyAsn3w4WpMD74Pl9Vf+IsG5 7Rd8+rU5oEibPD70mwQZOYGp9/Q5kLrUwCc7TYLKTXu+6phyID3VwXhUigx1 gw2DGeYccFe85f1ZlgzNqRsXZndwYOMIL+46E99Te1dxnltxYDVb0u2LMhn4 4oSPbnXigG57jEmrARnE14WdvO3CAfkUSWNkTAaZzj8x4u4c6FgzzZe8mQw8 zZ93W7w48NVlbeuHHWTQ+Lz/mZYfBx6Qiz+ZWZJBJ6KlJTmQA8bNHVlX95HB 9H3l+L4wDpQWiZj1OpBhd6i2QPkZDjTp92l2OJHBRrlQlhXFgfwsaCo9Sobj J9P1vsdyYFtdIpXfkwwJLJ8w10z8/N2WX6qnyJBR15fw6goHyncYmfHw/TPX w+HaqlwOrKLS7ZbP4Ht7lUXt6E0O2Aoqx9qeJ0OFW03bnkIOfDx9rOBzDBlq Sfq9D4s4MP5ok79eHBk+OK8QC3rIgcUaTW5GIs6PZDbz6xMO0E2Jgpn4Ht73 WEZ9QwUHXjYwrwankGHUIdYo5xkH0mw3DhqmkeGvCN+u5WoO9HZf+/MtHefz wcnDTnUc+CeVW+aE7+litiM+dQ24Prqv9RuyyEAWcDm7ookDux0nQiWvkIFV 1J4a08KBgNXkKO2rZPBry+0qaeXA40+0OtVsMjTOO2t/aeOA/+DtNgF8z+cq q0bwfeZA9rMn/9XiOHjH0Bu1dg4+X3Z+brlkaA0oUbD8xoHvah0iEzhWy/H3 CPnJgYnzN4IPXyNDxIv1T693c0CPZPH6IY4/j8yLN/VxAJtIEBjCsSYN2fwZ wP3ZHlASyyNDtPG526wRDnAC/9OUwPF3120zJuN4P9j3q0/g5/UuEbaemMTr k9zJfo7jxP9aU1NnOPB3t6+EF457f6R1Pf3HActq8WlBHBuJ2Wr3LHBg6fZk Vzien0WWNIjwcSFJUPfrd7yek/d83K7wc+GJ+0InD8f56H2ipiAXhhbyJnfi fLz5oFNWK8SFP0fzlRxwvub6M77tF+GC0NNCb0ucT5XFWaEhUS58CDz3c9Vl MuwlH9Q4I86FrUc0QwdwPe4YcEJvE7iQteOyKQ3X68POyPwN0lz4Mk05dy4V 18+5u/EtkQvWhA9CX5Lx/oy7zZiV4YJpgMWQJt4f53LFIZ7ChdyEhUNr4/F+ e3jCjUvjgsjZ39pyeD+JdWiVbWNyIR+Tlc3B+09nLPlbJ4sLv1/Hr9GLIoOj 4JSQrzweP/3B68cRZChXL7e6zOHCQWm5q86hZOjBWKGrFbmwGvv0IzmYDCTr sPwaJS7su6hcVxBIBrcwmBhYwYXoIZkLkd5kSEnKZ4SrciGvzzHUzIMMVTeF QGYlF5pv5KyZdCcDreVVoqEGF8a2DQkv4PPWoGCpcXEtF56viHb7sJcMf7Qf WXF0uHDAuz+gcRcZ2KbU0Ee6XJDeoJty04IMgV5fGzv0ubDi7lEVKRMyKFc7 uWlgXGCbHOgq1CJDlKNffst2nB958USKCBmmluSvRO3kwrW3n5uml0ngmvMy 2WA3F7ZNfzlR8Y8EFu3ykbf2cmF382O5/mESyFi/PHzalgsTfbdEet+RIM9M XmG1Gxcc5m5t98jA7X0NlG53Lqz1/PwlNBG/D8/5Ei4f50JyWmuvVzQJ3Goa 5oW8uBB4oKR5OZAEmht82zsDuODjVPj3jRUJnms2ZMaf5UKa0+c7OhK4vcXn ksk5LoyH04rP8+HxTsjFzJ7ngr7Xlb8nR4hwrtDnpEssF67LP71T9IIIO5Tk 9hklcSFundDPS/5EaKf6yAzncKEvR+iwxwtp+LvATNhewYVdBuO3WkykYHxy e+y/Sjw/P9gSvFIK+gdPn7/9jAt+ZRZeU0QpaP/y67QgwuvLVtRz7iRA1eM7 Xk8buEAfC7dh+hPgnIfBHvUPuP7LrYPKWZJA6rSRlRzjQvZj3TXra8VB7Wnm 5SZlRTh06vnOzTeE4ZWvz+ODKorQf/HnEb+zwuCuZv52WFURErMXCdFOwnAn fU6IqK4ImzUCxw9yhGGVj4OPlbYimFrkjLy8LATqK3hmnRsV4dtEaWlrrCBo Xro/NbJfEbK3ufSssuEH3SMvdpNjFYGafHD/csA/DGVTGc3TihD0LPuMypZ3 mBqixu06qARfkgcbM9eOVhsxj2Z12ivBC+K6Cr/60WpLv8cFxw8pwXDcMxvx /WPVp5St6qKdlGCP/eL6dUbj1c0Xkhaq3JQgqcnuVY/9RLWvpaS3VoAS9FnE zULmZHVlF581KUEJWDPMwRUjf6vfbNjjnJuoBPT1KTOS2rPV3WnXfDSSlMBN pDaqLmC2mmBmnLAtVQk6Cvvv3JqfrT5cFNoQcVkJfBQ3zquLzlULBczoT9xS AvuDIWHjlIXqncLDCu+rlGC/aFJzgBAfKuyPWohESpCaGFNfu4IPCTTLdWjX KsFrm86OUVM+VJ6yPSv5BR7/3nTGzwt8SIlbJGPZrASDXxxSlCX50YzhcdHW r0oQxnnHFhAXQLk+/eMtU0oQGpRuWtUviGatIt6enlECh6z0j97CQshqPeP+ 6lkluPuPduafohASWzI7kTCvBAcjzwWk2Qkhv4u3e3cI8OBUvL1xT6MQMitw bX9N5IHaM7m5hjxhNN7RU9e4igfZiQIfozVF0Z9wXo29Bg9ohoPBh7aIoilF 56qx1TyoaDJfQ7QTRbNuP8qp2jxIXpHsOX9OFPFNfS12Ws+DlrucjQtfRBGJ 8Dbz32YeDFTw2i+EiCGZEqn0+K08OI1tyuiNF0OUvTtSOGY8eJ8d2cbME0OM rMb4rRY8CHIsCxRrEENc5frI5D08ODJ3sHeeKI7WGFWcWOnAg/g9ZsVq2eJo 7Y+/7s8O8eCHQc2WyXviSOesnutuRx5ITvoQ0p6LI/1XjxwDj/CAeXj7rwPf xRFY399Xc4wHZ5ujrvcpSKA9Hjcw25N4Pl9YDuR0CbSX2GU0HITbfe0f692Q QNYPuYZnQngw9atotXapBLKZzdG5FcaDrPfKO241SyDHc1krJ87yQEF9VckF fknknZ0gG3uJB41G/dfXHJFEzfzKYxbJPMhn192e9JZEq9wqmwipPLCd/7El IkwS9Wj/jkzK4MHej88lZ9Ikkc1LGM/M4cG2dGurvXWS6InG59e213A+Im9k Or6RRDIpnrflrvOgrr9cUv+rJGqxv3Lo2k38fPTBAyajksjkz2RzQREPmu89 d6yjEtC1A3GF7sU8CDXPEGJxCGjhGffcqhIe/FtpftFAjYD+i9m54f5DHqzJ uqvUZkBAGgq37zyp4IHcrpRKbzsCij278XzQUx4s6V58RHAmoL7fbY4Gz3nQ scjn4HeMgK4/5GM8RzwovkJ5kBlEQLRtdtH1L3ng29o9ZZ5MQP7F407RjTwI b+ohaGQSUKtMzMZtr/H+E415/imbgC5+ezT1+g3Or+DVnvO3CajfxKI1oZUH f85K2MXdIyDTwp9Fu9/zgHid5nqglID4/KWOtH3kwWxrzJbtlQTk8OWGcfpn HpzP1GX6VRFQ5UZD1oGvPLixkRzrVEtAjBut04wOHiQObM1gNhBQoJjbu/ZO HliUu22+0khA7z0X72V/54FNgX9qdzMBrWlLvXDoJw9+Bb2NnX5LQIM5COvq 5sFtFWaI/0cCMhM8IHezlwf1l76d+vGZgG66j8wc/c2D9qpcHUo7AQm8iXqv OsCD0Y7mInInAR1ex7o/MMiDbj3o+/yNgJ5lPYgtGuaB3iqDQdcfBMRaMj3q OcrD7/3DVVU/CSjoyDfQGueBUH39sR+/COjDK3/5iQkeRJr8mHzVRUDamhKz Dyd5cLUx0SW0m4ASU/PaAqZ5EEhn1c/geHhWr0TvLw+8dLXkNvQQkPmhlrjZ WXye93X7bcNxQd0R18o5HsSWPPzAxrHQyrlNYQs82GgfYVGFP++UmKRgvMSD YO2M7yo4rppU+be8zAP97JtXbfD4/wcXC3JM "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], Method->{"DefaultBoundaryStyle" -> Automatic, "ScalingFunctions" -> None}, PlotRange->{{0, 10}, {-8.002806815338253, 9.744587051191855}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", CellChangeTimes->{{3.6211878273463984`*^9, 3.621187838300328*^9}, 3.6211880863987694`*^9, 3.6211881322349153`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"plotDados", ",", "plotFit"}], "]"}]], "Input", CellChangeTimes->{{3.621187841581822*^9, 3.6211878517856965`*^9}}], Cell[BoxData[ GraphicsBox[{{{}, {{}, {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ 0.019444444444444445`], AbsoluteThickness[1.6], PointBox[{{0., 9.8}, {0.8, 3.5}, {1.6, -6.4}, {2.4, -6.}, {3.2, 2.1}, { 4., 6.4}, {4.8, 2.}, {5.6, -4.4}, {6.4, -4.2}, {7.2, 1.7}, {8., 4.7}, { 8.8, 1.5}, { 9.6, -2.8}}], {{LineBox[{{0., 10.4}, {0., 9.200000000000001}}], LineBox[{ Offset[{1.5, 0}, {0., 10.4}], Offset[{-1.5, 0}, {0., 10.4}]}], LineBox[{ Offset[{1.5, 0}, {0., 9.200000000000001}], Offset[{-1.5, 0}, {0., 9.200000000000001}]}]}, { LineBox[{{0.8, 3.9}, {0.8, 3.1}}], LineBox[{ Offset[{1.5, 0}, {0.8, 3.9}], Offset[{-1.5, 0}, {0.8, 3.9}]}], LineBox[{ Offset[{1.5, 0}, {0.8, 3.1}], Offset[{-1.5, 0}, {0.8, 3.1}]}]}, { LineBox[{{1.6, -5.9}, {1.6, -6.9}}], LineBox[{ Offset[{1.5, 0}, {1.6, -5.9}], Offset[{-1.5, 0}, {1.6, -5.9}]}], LineBox[{ Offset[{1.5, 0}, {1.6, -6.9}], Offset[{-1.5, 0}, {1.6, -6.9}]}]}, { LineBox[{{2.4, -5.5}, {2.4, -6.5}}], LineBox[{ Offset[{1.5, 0}, {2.4, -5.5}], Offset[{-1.5, 0}, {2.4, -5.5}]}], LineBox[{ Offset[{1.5, 0}, {2.4, -6.5}], Offset[{-1.5, 0}, {2.4, -6.5}]}]}, { LineBox[{{3.2, 2.5}, {3.2, 1.7000000000000002`}}], LineBox[{ Offset[{1.5, 0}, {3.2, 2.5}], Offset[{-1.5, 0}, {3.2, 2.5}]}], LineBox[{ Offset[{1.5, 0}, {3.2, 1.7000000000000002`}], Offset[{-1.5, 0}, {3.2, 1.7000000000000002`}]}]}, { LineBox[{{4., 6.9}, {4., 5.9}}], LineBox[{Offset[{1.5, 0}, {4., 6.9}], Offset[{-1.5, 0}, {4., 6.9}]}], LineBox[{ Offset[{1.5, 0}, {4., 5.9}], Offset[{-1.5, 0}, {4., 5.9}]}]}, { LineBox[{{4.8, 2.4}, {4.8, 1.6}}], LineBox[{ Offset[{1.5, 0}, {4.8, 2.4}], Offset[{-1.5, 0}, {4.8, 2.4}]}], LineBox[{ Offset[{1.5, 0}, {4.8, 1.6}], Offset[{-1.5, 0}, {4.8, 1.6}]}]}, { LineBox[{{5.6, -3.9000000000000004`}, {5.6, -4.9}}], LineBox[{ Offset[{1.5, 0}, {5.6, -3.9000000000000004`}], Offset[{-1.5, 0}, {5.6, -3.9000000000000004`}]}], LineBox[{ Offset[{1.5, 0}, {5.6, -4.9}], Offset[{-1.5, 0}, {5.6, -4.9}]}]}, { LineBox[{{6.4, -3.7}, {6.4, -4.7}}], LineBox[{ Offset[{1.5, 0}, {6.4, -3.7}], Offset[{-1.5, 0}, {6.4, -3.7}]}], LineBox[{ Offset[{1.5, 0}, {6.4, -4.7}], Offset[{-1.5, 0}, {6.4, -4.7}]}]}, { LineBox[{{7.2, 2.1}, {7.2, 1.2999999999999998`}}], LineBox[{ Offset[{1.5, 0}, {7.2, 2.1}], Offset[{-1.5, 0}, {7.2, 2.1}]}], LineBox[{ Offset[{1.5, 0}, {7.2, 1.2999999999999998`}], Offset[{-1.5, 0}, {7.2, 1.2999999999999998`}]}]}, { LineBox[{{8., 5.2}, {8., 4.2}}], LineBox[{Offset[{1.5, 0}, {8., 5.2}], Offset[{-1.5, 0}, {8., 5.2}]}], LineBox[{ Offset[{1.5, 0}, {8., 4.2}], Offset[{-1.5, 0}, {8., 4.2}]}]}, { LineBox[{{8.8, 1.9}, {8.8, 1.1}}], LineBox[{ Offset[{1.5, 0}, {8.8, 1.9}], Offset[{-1.5, 0}, {8.8, 1.9}]}], LineBox[{ Offset[{1.5, 0}, {8.8, 1.1}], Offset[{-1.5, 0}, {8.8, 1.1}]}]}, { LineBox[{{9.6, -2.4}, {9.6, -3.1999999999999997`}}], LineBox[{ Offset[{1.5, 0}, {9.6, -2.4}], Offset[{-1.5, 0}, {9.6, -2.4}]}], LineBox[{ Offset[{1.5, 0}, {9.6, -3.1999999999999997`}], Offset[{-1.5, 0}, { 9.6, -3.1999999999999997`}]}]}}}, {}}, {}}, {{}, {}, {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[ 1.], LineBox[CompressedData[" 1:eJwdV3k8VO/3t6/DzDA7ZoYRikghJPekIlpFhSgkVPYlRCJFhOxUSCopSVp8 UPFYUkQprWizZV+yJOvvfn/zz7zer/Pcs7zf5zz3HkVn771HBfjwnyAf3//+ c8KdRbRdLhq/bEyNMjzNg1y7YcMD3GNY6peh9bdDefB1Z5wflxuCBXXnp86E 8CDIzFZamBuLYbd6HTae5MGzA93By26XsB+lBh06ATzgf1w2sfA5BaOZnFYg +vHAtB7s/3IuYzP2GMnDkwfuzeeTpzZnY6SuH62jx3lw8UNTw4TbNexRxaOT 1u643e8uY+ZzPqb+nZz2ypkHxWd1osY5dzCtykapfft5UCXyWWGs9C62K+/f 6NheHrTGhZSPbL6HvWQMLXru5sGflKqRQbcSzOBIRLPsNh5kWyrf+/P5IaaS eMdcVJ8HN1MD/03kPcKCSv48frYO9/+xwXTi2GMsrUL++j4t3L/tsV9j808w m7pnamtVePDL6T5thFOB2azs0MuU4cHgjeUjw/0VWLFd2cAxKTxe757SodJK TH7TzCmuGA+Ejk9uH9z8DOOk+R43WFQCFT/9yN9u1djank9dcn1KwGjf4ubP QJhXu8GI9E8lkA8dkZoMQ9gdr4qNfV+VQPm58cE/W2uwdTV9vze1KIHepl/T 459rsYqnWQP3HyqBYVdsto9RHUY87XrvRZESGEet3TyeV4dxf4up1txUArMX UUljx+qxwq7UM64ZSmBjrqI+Ov8CO/mlyt0jWAlCLU84DnEasWyBFxN+65Vg KUqP+SO+ERtcV+OipKkEEWX879//a8SadgfMPFRWgnNyWZsr25qwlrITb4LI SpDYW68SG9OMObjXNKQMKEJeCHtEZewt1iN5VUspTRHIn6b2Smm2YhaHA61G LyjCXm87rRiXVkzt7jnpnNOK8PH6iv5T71qxXRkKJfmuitAu8szWuegdFqRb 6mq5XhG6W/uNtA+3YeKP/hZbtXFB+fguZlF6G3ay4HvwvgYuuAo+nlZubsOO 9FVEbajgQr/umfsMgw/Yvq11jY9zuTB8hcrlk/2IVW4k6Rx258KMi4ng24ZP 2J87geO2IxwQ/3e10UOzHcsOydfl52ODfszXUxZO7VjqGiufB78UwJ1K11BL a8fqesfGdesUoEE7JbH7Xzs2krg2u/68Apw7fsHK7kUHlv7qT9KMmALwdQZ8 M7P/hr02kz3wTVQeQn8UBJO3/sSSTwav2jLABN/aM/HDft1Yh1G4T6QZFTRv pr57fH8Ay7olY9S5RgR6d7nL/9Afx+Ye6n89uVBXncmKVrjuOIntck3q9tIS QTPdb27v8prE+Fa96uadF0HWxfS1C6GTmAsr4u31dhEkA3dMD2ROYpoFSaoz 50RR/NFmb6k3k5jZvyS1iU9iKOKBTG3Ihiksb8PX6Mfeksjd9JrrXto0Fhj9 OHy/Pgk1EPvHl3nT2KLnxmz9wyS04uua0GLtaUzuUvbtmfMk1HWi9pLYzmmM Jn8lVriNhOyTe8uroqaxKEZoptsJMtrTqS6pPjGN3eQE1oikyyADv/ISweYZ TMRnxySpiYJalzcc8v06g82UPj7rMERBrgnVhB99M5jqItkggkBFKYUNxyr5 /2IGsh/3mO2iosHvH3i+6/9iuVZhFZ/eUlH29onM7/l/sWNUnb63TTS0pLwq oiJkFvM4lX23P5eB0h4Wa6rGzGJZIfFhuZUMtAq0v6WlzWLLg6yXyp8YaP9B fUOfklnMfhefaj6BiUqSTadUemexkAcCzQeDmMhxydk9bc8/bJLy8MadzSxU 9/nqHm/VOSz6WA2xskwOpTnvm5peN4dx4jcef9Ukh1xHpLPCYA7bsb6+5M53 OSQhePZHrO0c1kRfkdcjLI/2aLp73bw4h23Mt71hsFcefT+nE/91DPfX5xu7 s0sePSCOajkuzGH0D/1uEZPy6OyV2219YvNYRsd41zkhBbTiAUtuSnEeK7UX PCqgooA8OvjuSlvPYwo7bW+1uCqgOe2Wl5vL57G8ggD3jB8KqPlZ9Imm+nlM KvmnUMeIAso1A6Llu3mM+dZSf3xeAW1yeLT/0OA8pp44rhFPZ6MLFy73Bssv YAdvLH69sION7GStYpfVFrAia6+KPbZspJFLWB2tu4CleVW96j/KRm8fnQlI 3bWADeT83hYbzka0H0cF70csYEsGS9lxxWzUf4xzWydhAdM2FXr5vpyNKqe+ WDy9vIDt4po2D9axkYPEjpRXDxewlMP3Nsd9ZaObumsVu3twbHxh6rwAB51E Q/XHJhYwlfxBoR0EDjLbfst9fHEBEwrxuf+LykGDjowHi7RFrNbZvjRUjYO0 45eMGeaL2NfalQ3HtnPQ2mMLLsX7F7ECWxMpe2sO0jGdizNxWcR+NDutpTpw kB7fzCePM4uYqU/+cocnB+l/m1zgT1jEFG0NcwYCOcigckIp88oiNnGmQbDq NAcZBYx41TxZxF7tIso9jecgY8uhtP11i5h/QWB9dyoHYZoDlUOti9jgeZ5a 2xUOMunvEaENL2LNLVIUkUIO2mbfmXtcaQk7NhSy41k1B1kYtNcvay1hMqL3 U1kvOGg77ctg2sYlDEuYicOaOGhXa5tetc0SNj1uGP+tjYP2FL+zt3ZdwnIm vbP2f+Egy7i3Zwf8l7Cec+q2GZ0cZL3l9RvZS0vYGgFh/uM9HLRfsXGqMHsJ O5wRM7L4m4MOLDWwjO8uYY3fbC/bDHGQTUc9tP23hJUy1cVOjXKQXXmtq/uL JcwigWjsPMFB9ukofvH9EhZ2NAIjT3GQg1/Vw5SfS9jItYPkmBkOOrT72RfV 0SXMY6K7vG6Wgxw1KpeezS9hV4vQhpdzHOQsXq68V3wZW7q+eC15gYOO9D2x +E1bxrZLSw4rLXGQS90jnzDlZYwV8FwldJmDXPNKM8hrl7HhmgL1nXxc5H66 5FkBtowlLxWZIBwfsyvu2rBzGVv3yquTxs9Fx9cXib2zW8b6Dysu7sGxB+WO pqv7Mvbmh+odLxx7TRRYzwcuY52rGL3eOPZ+c/NUUtQyZttZ8cQaxz5F+Xkr kpcx/vUiXAUc+13Ia6jMXcY+yKqtbMTj+R/NHd59bxlLbA39ZIPjAJNsmd6K ZawwlH0wC8/3JOeK/qmXy9gIc7O7KV5P0ELmIeLHZWzylOnPp3i9wV/Tz93s WsbcKB5vZ3E+TpWl3jUYx+u/Z2uyiPMVmprc+mZxGRvUpps24nwal5vNlwrz gV6GdL89znd1gWliGIEPfG9I6pXjekD6VkUzWT7Q/7DBuAPXa5PfZrNOLh9s FWj7L7ifg2odTdoLVPmgaDjUbBLX32T3Jk9fTT7wDO9o0f3FQVs0sFQRIz7Y wO+5LPOVg16wjFXemfBB5Z3fr4s/cJCp+MaKq+Z88I5w9x2pFZ+3PsMfaw7w wejayrdaDbg+bR+GYxz4wLaoX8eshoPOIa+570f4AD7xG2k+46CaK/nUBB8+ KLm4zutEKQdt2C2xYyCWD5KtmSo3L+P9ZXTTFpL4ABNVsTfE5yV4pbFbZgYf xOwY/i8Pn6cngn5nt97gg4h331S/h3OQVvnX8uvP+KDshuuQghM+D7f8G2Zr 8fgxDrvX23KQR4rUh92NfND0rcRL0ZKD7nhsGlv8yAeHHX213IGDeIp3VtiN 8YHDg4nZGnkOoscFp8go8UONpv7FimY20guSyTumxg+q666l99ewkbXLvWKk yQ9aSZ8rB8rYKNn45yuvDfywhA2WOeexkeSk2XKTNT9MjIRorPVlo+WDdI+o GH5w8qzKcZBgI7Z5aUh7Aj/8DqaZVC4oICO97THaafxwLmr0xuCoAgohncn/ kccP+idKyC/fK6DJ+r4vGypxf937q3yzFNDv1WVbp4b5oV2m37dQTgEpnfY8 qj7JDwJWWyOuSyog+2bl887/+MFOsfOD77w8aj2eWt8qLAAD05ZNWe3yqPK2 z+ZitgCM+dRtFcyUR/GK6ptc9wiA8lLtalcxeaRNzTP68kgAFLbnr9nxhoU8 XA7YEysFwPNw8JBHBQsVPJIOM0UC0NRoyzl2k4VYe08/fdwsAOml0+enQlhI 6JKdYXKvAAjvUThykMdCn8So+hZ0QVibK5IT581EoQux656dEoRSS4mAs6N0 9CbgSNqpSEE42/Dgln4bHXFHjKb1LwhCoJJraeN/dFT/bazsSbogaNeuXHM6 go4I1fsMSx4Igl+w/UstEh3lRipuyu8ThIeYz9ikGg3ViFTsurBXCNyiXU1i NlGQKLn/mPUqYTB7eOfGgBwJCbcIm0k+F4GkEPHxZ7yl6vk3xR4pvmKw+uTT uWs6vzD2O6erW4LFYK/pb1Ntxy7MpI3aNBMuBvOliON7sRuL+3xa9WC8GITP HMqe+tmLMX7u7OLdFoNb5ZPTbTGDmN7EyIEnnWKg7mvpn/drAvOR1dz8xUwc TgTyxf03MYf1HrjPZLMlINS8rcePIQIFNou19soSEFJfmsHaLwLutjs8rq6S gLrNhjqZqSIwaDdYxVgvAad7xDqlpEVh3EHFRXaPBAycl0v7zScGC0dy74ud lQCuwBVbwe/iIOuTuHmyVwJKzD915vtLwQefb8PawxJg5ea9ZVuRFGT4amT4 /JEAyqn7UeVdUsDwb+ofWcLjJ4U6zO6RBvZJkcR+uiTE7pFwGllFhFVh4V++ mUvCmPfqYL3jJNh0wcvzVbEkjL+zEh9eJAPr4Y8DiY8l4cTcxIW1DBmY6thj Yv1UEtrO+Ny1XisDBVrr6D9fScLNBtV16q4yQPj8F/3tlgTPklZJhWYZ+LQi kqLKIkDeaifzP0myULL7z9IwlwAq/wSqfxbKwoWQIwMPVQmwuqwoqBDJwoaW rVXGugQov31UuW5MFvICJNz37yHAPkOlbMUdFDhRl/r0fDQBLv10jTy6SIEt I0IF2xMIsDGUvvKLDBXY9JNJ5DQCRHzct6yoRoXW4zZHc64TQJT//TPDvVTQ k1EgPnlGAHcH9trTN6nA51Tg3POHAI0/BCs0NtEgfalcfPNhKTjPuy8QZkcH guoLr/SjUsAfLCKccIwO53a/a/t9QgquKmy7FRRMB7+8gZz4YCnY/los7Gs6 HXaZsNZ+SpaClryU/1re0EEkOtTuWL0UUDwFOo4bMOD0/Zjqp01SoK8QbiVt yoCpT6nK0u+kIHmTZHDcXgZ0qd4bffhNCoKfHU8mnGBAdWPn2YUZKWhvO3Zb 7woDgqWMiy6tlAb+sVqMMcGAMV0LUpeWNATHGvTCPANcD+0P1NGThkJOSNQm YSZYl3hhX02koU1JPrqJwQRty2ttSvbSEOJj9HhuIxMKQ4r0A52l4WxkvGaX KRO4+f/lvHSXBskf1w5f380E6cm3bh6B0hAt+LyxwJEJg2l8C08SpeH6Bxvh lggmOD0nOImlS8NeleRQ3wtM+NLLaLC7Kg1zN3afHLnEhAY97aTl29Kw22y8 50QuE/K/OCmb1+D4cfSKsxVMYPJ7xV59KQ223xeMuqqZkLTy1OhIizQkrDpX xmxgQviplPKUdmno6jGok37PhIPydTs6J6XBPGrdP1I/no/nxJ8nc9LQXvCf buYIE4KrOZcv8RNBWjOnaOQPEzKcw3pNiERolG7YKLnIhBWP716UpxEBri0d eM/PgsfCX7Vn5IkQ9fvs7WMiLHhfqBt+B58LJoHUJ0ZkgdPcEeUobSLwh9R8 JMmyYHx7SpO9PhGO5xEX+mkskB4bpZFMicB7EDMhzmZBDig8H9hBhMgrkvV7 FVmgkbL9SJ0VEbS5P9tOKLPAQrew5KQTEcinfj6RXsWCr9Gf9u1xJwIrgZqY pcEC9y9CCyu9iSCbXFzyR5MFf1euyxc8SYR3FlFsBW0WRIc6bfsWRoQr/C+/ 09exgNpyabQsigi0Y0tTXTosuMmuSkuKI0JWnJBruB4L1vkMGx5PJkJ3sfj6 wfUsqK1h/dqcRYSdm1I9VQxYYClrHqNwjQjba0KJ6wxZ8NMlaPXfW0QIuPZH ibSBBd5lt9pa7+HPq4Xdf47jJdEPIXcfEUHUY6J8gxELEmwFuOcqifBdIcI8 DsfyRWsaHGqIcCv8rtsdHBctHPJY/4oInRvN5C7j2HBXggz5LRE6HCI9bHHc eO1p+eBHItyjfTkyiPu3mRg4VN9JhBPlbIkdOO4zYQjnduN8JYS5h+P5BaaZ FgUNEuFGhceFSDx/ob4AS8sJIrxnV/nv02dByvobf1fNEkHKIFVnDq9fMfZd jtAyEQT5nD966+L+R5YVxwRIcOHFpGMZzh+XRp8+KEKCv7JHu1pwfn8ba756 JU6CfxdXHC3TYsF9t61XdaVI0FDzd8p7NQtOJtl75ZNI0MScyJnD9TOu8N9E pJDg6c0Qj/1qLBDuiqOE0UlgML/dM2oFC9LWVVTuY5NgRtfa0JLDAnv71oRa RRJ8yb+i+EeOBbzzvx21VpBwHrb7ujBY8PATVVRcgwRd5NSo5yQWnFrWaA/U IoH//ldHbhJYsEltS3HXWhLcC771216MBa0hflbPDEgQimSYm5eZkJUfq7Jy Iwmm+5v6fOaYcPh13r90IMG2a6eyfKaZMCr/9pq3GQkyN8QM9Q4ygYDUh5X2 keCPj4XR3TYmdF22fHXGhgRKar350S1M+M8/6GbnQRLEa8Uprn/JBGfVOvsM ZxIkeIQ8oFTi9kS7FnEfEtj3pKvW5zAh3j3ijqs/CdbOqh3enIGfNyk4X3eS BIhlaJ6ZiMebmdh4+jQJuPo+Mc/DcbtD7P3xOBJMHJNcEnZggv76kridiSRo FQtkrrZmghT5o+vdZBIcmmpNXbmdCeX1XI5LFgkGvnTy3dDH7Rrllz7fIsHh /4R2XCHj9rk+nypEgmK33WIPnjIg8QNhp1w9CYgNFw/qP2DAkftrVwa/JMHw L/LVzJsMkHYO/6X9hgQn4Pr2jnjc3kjde6uDBNH7f4ecOojbs7asi58hQbnP lJz2BB16fI8TB/6RQMFwNEi3mw4V25OGti7iekYnJMl8pIPLcseNZUEyPCi8 HnCgnA6Vrv4UfzIZ1vizIoin6XBUN3/aVoMMxRUrtfYt0yAukUo8rUWGb1tl pqTHaXD/9wW1vLVkCNtmtr/wJw1mLnsf7NMnw+LbrS6namhwYcmoxm8rGewy ic25kTS4+/Jz/MVDZDh46895gQUqjNpKKT9PIsP1p2s0Ce0UkHkUsfFnKhku 5bZ9nWyggB5har9gJhlqrijxVz+iwJmq9ljzHDJMPqeZ8yVQgMQrHPt4hwxa nBa/tcYUWDts8nS0lgzuTUQL/6uyEBQevJc7TYbNLk+1D5vIgNpwGCFmlgwT wyUatFUy8MU2smFkngwiM8E9D8gyoK8bZ/hUQAbEhS9vT/lJhtmhq0r7STIQ pnN5m8RpMpyyrf5zUV0GakFfZO4BCcJ1RFL/OsmAdcTwZl+CNJwfTG1780YG PO/z3YFuEdixilhIuCILUavXX3zVMo4lFOuhHU4UmFbRs45X7q9WcVRzKnah QNbKxiQV5kB1lQxLQNqdAq3U7eiE1GD1eNDi5rdeFOh4VXh6fGqo2tqk/qVl GAU2ra0yL6seq5b/bPl2fyYF3p0o9HW9Pll9j8/zu2MLBdzbLiTIzs1VN1nd WAgwoIKA7yad5hNC6OH5rvarRlSoUfelUXOE0JX/FCtqMSqM2eo803sjhI7L 5QWSTKlA775uLLhGGIl3Z48W4d8hrZYLNyomhNE2v4yfXSeokKkSJOLkKYpe JMXW78mlws17MXrvN0uge7Wv8oOuU2FJ1c7lkbcESpsSjczFv1vER2q3Hr0q gVxsojcO36VCkvM3XcM/EkiIG1UW8x8V8vb9OpSfI4lMSsIKq1rxfFPvnzUY IiDU4h2vIUiDBr7yaX5HItKhgGSmCA3WShz6XHKBiArtSHH8EjSoV01WZ5cS 0aXfD2I+kWhw3dz8Sg4fCR3i/3M2gk0DvqpLZP3dJLSgExDywYAGpsxNE9v6 SMgndMus8Ubcn8uZM+mzJNRTQwm6AzT4V5kfiCTI6PWuJwHhZjTAKGKapZpk dMV9xlttHw3UfuYNzwWQkUF2sGuYDw30R+EIc56M7nVt6+3zp8GwY6k9SMog 7kqmi2UQDRxWp63eIieDxMoqnFTCaTBHLZr7ZSiDvryds2+9SAPx8yVt/sEy 6KTgaSvl2zTIOHZ96NuwDBo03/k+8S4Nxpz9Nr6ak0GHkhQs/xXToM90FzNR TBZtVaja9eYxPncfFVfc48kiyvpl8+BaGlipqWRo2ciih8cjofkbDVY0dolu rZRFOs6Or1R+0WBP+tWZOy9kUZkttieyB/cfpFI72CqLKrYtHtYbosH6s2KV y32yCKmEnMmbpYHXk4S6QDIFmbBtROfnabDJ5/rqcjkKqqOuv/T/90JhC/HT CgpqEJrOlRChwxbNfumbBhTU0uVTFSBLh4CzFS9jDlPQrvbdpm9pdHjVbI9u ulNQ6zvNNytZdCieK+rM9qWgD2j423cuHWZof+zYURTUnuu+uE2TDguLwyeP 3qSgfjtHIwVzOqy6xrVY/EFBx/di9UE76CDW6HjzVR8FDZuzd7zfTYfI14l3 vUYoaEy/82DMfjr0lj69ZTFHQTM0m9CJI7i/rO73m2SoKFh6veAONzpMzlmK dNGp6J8w7WLBcTpoCh+ttVegooWptisHfemQRC19+UuVigTbdle+CKfDRvWK pys3UNG5Jk0T7lk6uFva/c7BqEikVqrp1Hn8Xj3z+MLwZiqSKH39VSueDiVm f1WZO6govvCuU9wlOuin6ij/3U1FUnmxAz0pdDDU+5BSYkVFpEtm/y5fpoOb 64OGEjsqSolWiZzKpoPaBYv4vw5URAkXFt+dR4cdFIEXTCcqonvWMYRu4+f1 d6eOuFJRlkt+3qG7dJDsMVe/doyKWPaRahXFdPhPVGODugcVsbdj+l6P6bDG xqDpvQ8VjdacWEz8D9fnxCfN135UVK2fVVtSSYfLqQZT+QFUlFRSH9P6nA5P bYvk7U5SkaPKxI4JRIc7xFt3x4OoaE2OgoxMPR2y61vzXEOoiJ9i8XntSzrk GogLPDtFRe/jTmZbNeHvlY+278ZDqSif/4ZTQAsdXl9eIgufpiK/4Lcq6a10 UKG4vJzF8eax+aEnbXT4bKU6/Tocr9dVrfTTJzo86aBeCz9DRT2d1if/fqUD O311IymCip5YRW5gfMP3mtrsoLM4jm4q5jP4SQfziZr7bTjev6n9hS3+3js4 rO4vFElFquUiF0/10UGr+HIjBcezmuv2XB2gg+/OubL/2V/dOkx9NkwHyqwH fMCfvywf3945RgfldjgRhePjqeXXFv/ge5PstJEMjg0lel3YMzifBfpPI/D8 JCPJq7B/dLB1Hxx6g+ff+Xfj2OEFOixNMD4u4PXd8zr+OGKZDhEJAqclcBzW mxFyXYABl1Sog39xfnba1xnXCjNA0WBU6QXOH7ttTLBbjAF0ZKfph/M7ai7f KEhgQC7vgOwyzn8V2paoTGSAhSrx6wlcn0vrA622yjBg/vO36HJcvzUr3nyL ZjDAx59eMYHrzZc9l39bjgGamPLO715U9E5G1f0VmwHPrC7238X7w48v4o/4 Cvw75PGD/T1uuB5B9/5bpcYAZ50LhpZHcT1Gv4RtV2fA9w3DZrnOOP8d2qIJ 2gwIC0wQ/GqP87/3UHOxDp7PHZv6Bluc/8a45DfrGVC/sbktbT/Od1m3HMmY ATfkGoTf4/1vmJK+JtWCAd5rWt69A3xexGunH+1kwBXXw0p1RlTUcWa08sMe BtRKhlDS9XG+PM220g4w4P15ukSHFl7/tn+2l48wQGUjCh+Xp6LE6hWcSlcG XNwrxe7H5/mw3t6e9mMMILkoP0f4vPMpF3nJ+zDg6VO11VQxvL5l+6hrYQyw zkrDdkxQUF4ca0AwggE7dfYYNw1S0AL1yy73KAZcGF65VbmHgso0rFjacQw4 caThoccnClKzMy+tzWRAE7eOaFlBQed6ReiqVxnwX1nP7tJSCvrlUx92MZcB BTsdV4/eoaArMdg261s43+f9iUuXKYjwRPdH70MGZG6yKQgOpiB3mNxiUcaA fTUzwsibgl68fnD3fgXODxK+3eNKQeFd6ieDEANiLn8UbLCmoHGikpT4Gwb8 +hecPKSJ35/HpTdoDDAgT6OY/1OnLFoz8zovaZgBSjF9UgvvZFFCZKzI9BgD Bn0+vuF7KYtMs4TeP59hwBuKaVvBA1lU/mLOfbcQE15nB5W6nZVF2dzfGX4c JjjuC3/dxpFFLp+q/5TvY8Kd3q8BjM0yiPSrKb3bhgn15NlyU10Z9HToo760 PRN01CwlD6rKIBn+4fAjzkw4naGwSQ9/H1arMySlvZkgPv/uRcU7MmJF+vCO 4Hu49nDcDoIdGb1TV7SWesqEy8UlxGs2JGQcefaJE5cFGU1iObWqBPTXKNsp jMcCT6uRA7f5CejB7BOpTBUW5Fc3OLl3SCKez8DRZnwvvaIVfjAiURKJHd5D W4/vXV822CPpSQnUZsQOIuxlQahGdH7nE3HkPluh/18UC847ttgt80RRivfE U8JvfE99cLq85wE/6oq41XetSg50NWxPHZbsqR46WuFSGyMPVhUBF9S9hzBC k8mlVRfloeq0QF2w3jCmodlckZIoD9m303t9F4cxj5nv0kfS5UHSbyLBOW4U G44WqhC8IQ8JNwWUCa3j2PDt3VJbq+Shwtfu4ufOSWx0oPfJyyl58E/Tbtn8 5h8mvcv7p9asPPyslXnqqj6HaT6clcialwfqYx3V7RfmMK9Tko7uAgrgXfCb sH/TPDYqoS0hTlIAQRtXrSMPFrAx9bBDFuoK4GQWXvoxchkb95QRbXFSAKOB G9fFggTgsOWA17yLAoyHzIfY5ArAGx30aaW7AlSXFbPOvxCAe/OeBdFeCnCy y/Wzv6wguMc2boVQBdAWlDe6XiwIP29GnHuUpgAHZMSCCR1C8LZjlP/KSwUQ e8+7Xs4QBePqF8deNSlASNK/JcMNonAvP/vdTIsCeLx9UZbqIApxxyyuW31Q AI59WfDL66Jg+vcWSP1SgKwomu46NTGoknE4EzGnAG+5MDepIQ73zV8vuK5m g62L4PERiiSof3/geX4NG8zTBJ5ba0tCoV/G9xvr2BDU+Wgscack5F91Qj8N 2LD2trFb6HlJSB/5G2VnyobLgWc/rJmUhLBkZcldh9mgsvDUdPwFAf6tkAjz cGbD3o01dwJ/EOBk5dhw3FE2TN40b389SwCf7so3L0+w4fPqlJWDq6TgiK5l yqZgNpxm2BgMxUuBxdfTTN1kNlR3WbT3mknDS88jcVZpbHiy+ajD8UPSsEXA fN43kw36Vqa/nwdIg7E65dv9HDb4JWkVvsuTBu3Td/PU7rJh1/FDCndmpIGh +FlVvo4Nn6p/NAlcJkL6k2dZhg1sEHq+c4vHPSLIWOSL2zaywdJaefuNaiIQ /D2H0t+yQe6tZ3FILxGW6wVLiJ1s6BrWbXDG9/w+9zV6gtNs2D46HNqD78lj 5NtmR2fZsLriam2JCwlmKxVsX86zQcTWucjekwTiUpJhFwU4ELypwPBgOAk0 SntrZEkc2OO4GgZzSaBrZ98WKMsBv7dG0TUFJDAWbOv5TOPAyp5fSqfuk2DP PiSarcABIWNz40vPSeD/78pOZXUO9Afps7e1kyAsn3w4WpMD74Pl9Vf+IsG5 7Rd8+rU5oEibPD70mwQZOYGp9/Q5kLrUwCc7TYLKTXu+6phyID3VwXhUigx1 gw2DGeYccFe85f1ZlgzNqRsXZndwYOMIL+46E99Te1dxnltxYDVb0u2LMhn4 4oSPbnXigG57jEmrARnE14WdvO3CAfkUSWNkTAaZzj8x4u4c6FgzzZe8mQw8 zZ93W7w48NVlbeuHHWTQ+Lz/mZYfBx6Qiz+ZWZJBJ6KlJTmQA8bNHVlX95HB 9H3l+L4wDpQWiZj1OpBhd6i2QPkZDjTp92l2OJHBRrlQlhXFgfwsaCo9Sobj J9P1vsdyYFtdIpXfkwwJLJ8w10z8/N2WX6qnyJBR15fw6goHyncYmfHw/TPX w+HaqlwOrKLS7ZbP4Ht7lUXt6E0O2Aoqx9qeJ0OFW03bnkIOfDx9rOBzDBlq Sfq9D4s4MP5ok79eHBk+OK8QC3rIgcUaTW5GIs6PZDbz6xMO0E2Jgpn4Ht73 WEZ9QwUHXjYwrwankGHUIdYo5xkH0mw3DhqmkeGvCN+u5WoO9HZf+/MtHefz wcnDTnUc+CeVW+aE7+litiM+dQ24Prqv9RuyyEAWcDm7ookDux0nQiWvkIFV 1J4a08KBgNXkKO2rZPBry+0qaeXA40+0OtVsMjTOO2t/aeOA/+DtNgF8z+cq q0bwfeZA9rMn/9XiOHjH0Bu1dg4+X3Z+brlkaA0oUbD8xoHvah0iEzhWy/H3 CPnJgYnzN4IPXyNDxIv1T693c0CPZPH6IY4/j8yLN/VxAJtIEBjCsSYN2fwZ wP3ZHlASyyNDtPG526wRDnAC/9OUwPF3120zJuN4P9j3q0/g5/UuEbaemMTr k9zJfo7jxP9aU1NnOPB3t6+EF457f6R1Pf3HActq8WlBHBuJ2Wr3LHBg6fZk Vzien0WWNIjwcSFJUPfrd7yek/d83K7wc+GJ+0InD8f56H2ipiAXhhbyJnfi fLz5oFNWK8SFP0fzlRxwvub6M77tF+GC0NNCb0ucT5XFWaEhUS58CDz3c9Vl MuwlH9Q4I86FrUc0QwdwPe4YcEJvE7iQteOyKQ3X68POyPwN0lz4Mk05dy4V 18+5u/EtkQvWhA9CX5Lx/oy7zZiV4YJpgMWQJt4f53LFIZ7ChdyEhUNr4/F+ e3jCjUvjgsjZ39pyeD+JdWiVbWNyIR+Tlc3B+09nLPlbJ4sLv1/Hr9GLIoOj 4JSQrzweP/3B68cRZChXL7e6zOHCQWm5q86hZOjBWKGrFbmwGvv0IzmYDCTr sPwaJS7su6hcVxBIBrcwmBhYwYXoIZkLkd5kSEnKZ4SrciGvzzHUzIMMVTeF QGYlF5pv5KyZdCcDreVVoqEGF8a2DQkv4PPWoGCpcXEtF56viHb7sJcMf7Qf WXF0uHDAuz+gcRcZ2KbU0Ee6XJDeoJty04IMgV5fGzv0ubDi7lEVKRMyKFc7 uWlgXGCbHOgq1CJDlKNffst2nB958USKCBmmluSvRO3kwrW3n5uml0ngmvMy 2WA3F7ZNfzlR8Y8EFu3ykbf2cmF382O5/mESyFi/PHzalgsTfbdEet+RIM9M XmG1Gxcc5m5t98jA7X0NlG53Lqz1/PwlNBG/D8/5Ei4f50JyWmuvVzQJ3Goa 5oW8uBB4oKR5OZAEmht82zsDuODjVPj3jRUJnms2ZMaf5UKa0+c7OhK4vcXn ksk5LoyH04rP8+HxTsjFzJ7ngr7Xlb8nR4hwrtDnpEssF67LP71T9IIIO5Tk 9hklcSFundDPS/5EaKf6yAzncKEvR+iwxwtp+LvATNhewYVdBuO3WkykYHxy e+y/Sjw/P9gSvFIK+gdPn7/9jAt+ZRZeU0QpaP/y67QgwuvLVtRz7iRA1eM7 Xk8buEAfC7dh+hPgnIfBHvUPuP7LrYPKWZJA6rSRlRzjQvZj3TXra8VB7Wnm 5SZlRTh06vnOzTeE4ZWvz+ODKorQf/HnEb+zwuCuZv52WFURErMXCdFOwnAn fU6IqK4ImzUCxw9yhGGVj4OPlbYimFrkjLy8LATqK3hmnRsV4dtEaWlrrCBo Xro/NbJfEbK3ufSssuEH3SMvdpNjFYGafHD/csA/DGVTGc3TihD0LPuMypZ3 mBqixu06qARfkgcbM9eOVhsxj2Z12ivBC+K6Cr/60WpLv8cFxw8pwXDcMxvx /WPVp5St6qKdlGCP/eL6dUbj1c0Xkhaq3JQgqcnuVY/9RLWvpaS3VoAS9FnE zULmZHVlF581KUEJWDPMwRUjf6vfbNjjnJuoBPT1KTOS2rPV3WnXfDSSlMBN pDaqLmC2mmBmnLAtVQk6Cvvv3JqfrT5cFNoQcVkJfBQ3zquLzlULBczoT9xS AvuDIWHjlIXqncLDCu+rlGC/aFJzgBAfKuyPWohESpCaGFNfu4IPCTTLdWjX KsFrm86OUVM+VJ6yPSv5BR7/3nTGzwt8SIlbJGPZrASDXxxSlCX50YzhcdHW r0oQxnnHFhAXQLk+/eMtU0oQGpRuWtUviGatIt6enlECh6z0j97CQshqPeP+ 6lkluPuPduafohASWzI7kTCvBAcjzwWk2Qkhv4u3e3cI8OBUvL1xT6MQMitw bX9N5IHaM7m5hjxhNN7RU9e4igfZiQIfozVF0Z9wXo29Bg9ohoPBh7aIoilF 56qx1TyoaDJfQ7QTRbNuP8qp2jxIXpHsOX9OFPFNfS12Ws+DlrucjQtfRBGJ 8Dbz32YeDFTw2i+EiCGZEqn0+K08OI1tyuiNF0OUvTtSOGY8eJ8d2cbME0OM rMb4rRY8CHIsCxRrEENc5frI5D08ODJ3sHeeKI7WGFWcWOnAg/g9ZsVq2eJo 7Y+/7s8O8eCHQc2WyXviSOesnutuRx5ITvoQ0p6LI/1XjxwDj/CAeXj7rwPf xRFY399Xc4wHZ5ujrvcpSKA9Hjcw25N4Pl9YDuR0CbSX2GU0HITbfe0f692Q QNYPuYZnQngw9atotXapBLKZzdG5FcaDrPfKO241SyDHc1krJ87yQEF9VckF fknknZ0gG3uJB41G/dfXHJFEzfzKYxbJPMhn192e9JZEq9wqmwipPLCd/7El IkwS9Wj/jkzK4MHej88lZ9Ikkc1LGM/M4cG2dGurvXWS6InG59e213A+Im9k Or6RRDIpnrflrvOgrr9cUv+rJGqxv3Lo2k38fPTBAyajksjkz2RzQREPmu89 d6yjEtC1A3GF7sU8CDXPEGJxCGjhGffcqhIe/FtpftFAjYD+i9m54f5DHqzJ uqvUZkBAGgq37zyp4IHcrpRKbzsCij278XzQUx4s6V58RHAmoL7fbY4Gz3nQ scjn4HeMgK4/5GM8RzwovkJ5kBlEQLRtdtH1L3ng29o9ZZ5MQP7F407RjTwI b+ohaGQSUKtMzMZtr/H+E415/imbgC5+ezT1+g3Or+DVnvO3CajfxKI1oZUH f85K2MXdIyDTwp9Fu9/zgHid5nqglID4/KWOtH3kwWxrzJbtlQTk8OWGcfpn HpzP1GX6VRFQ5UZD1oGvPLixkRzrVEtAjBut04wOHiQObM1gNhBQoJjbu/ZO HliUu22+0khA7z0X72V/54FNgX9qdzMBrWlLvXDoJw9+Bb2NnX5LQIM5COvq 5sFtFWaI/0cCMhM8IHezlwf1l76d+vGZgG66j8wc/c2D9qpcHUo7AQm8iXqv OsCD0Y7mInInAR1ex7o/MMiDbj3o+/yNgJ5lPYgtGuaB3iqDQdcfBMRaMj3q OcrD7/3DVVU/CSjoyDfQGueBUH39sR+/COjDK3/5iQkeRJr8mHzVRUDamhKz Dyd5cLUx0SW0m4ASU/PaAqZ5EEhn1c/geHhWr0TvLw+8dLXkNvQQkPmhlrjZ WXye93X7bcNxQd0R18o5HsSWPPzAxrHQyrlNYQs82GgfYVGFP++UmKRgvMSD YO2M7yo4rppU+be8zAP97JtXbfD4/wcXC3JM "]]}}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], Method->{}, PlotRange->{{0, 9.6}, {-6.4, 9.8}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", CellChangeTimes->{3.621187852316983*^9, 3.621188086430022*^9, 3.6211881322349153`*^9}] }, Open ]] }, Open ]] }, Open ]] }, WindowSize->{767, 852}, WindowMargins->{{Automatic, 568}, {44, Automatic}}, FrontEndVersion->"10.0 for Microsoft Windows (64-bit) (September 9, 2014)", StyleDefinitions->"Default.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[580, 22, 201, 4, 166, "Title"], Cell[784, 28, 99, 1, 30, "Text"], Cell[886, 31, 488, 13, 31, "Input"], Cell[CellGroupData[{ Cell[1399, 48, 139, 1, 70, "Section"], Cell[CellGroupData[{ Cell[1563, 53, 184, 3, 31, "Input"], Cell[1750, 58, 133, 1, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[1920, 64, 194, 3, 31, "Input"], Cell[2117, 69, 1283, 35, 92, "Output"] }, Open ]], Cell[3415, 107, 147, 2, 31, "Input"], Cell[CellGroupData[{ Cell[3587, 113, 167, 3, 31, "Input"], Cell[3757, 118, 4212, 90, 233, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[8006, 213, 209, 5, 31, "Input"], Cell[8218, 220, 322, 7, 31, "Output"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[8589, 233, 95, 1, 70, "Section"], Cell[CellGroupData[{ Cell[8709, 238, 1011, 28, 72, "Input"], Cell[9723, 268, 1468, 35, 51, "Output"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[11240, 309, 114, 1, 70, "Section"], Cell[CellGroupData[{ Cell[11379, 314, 147, 2, 31, "Input"], Cell[11529, 318, 1055, 23, 88, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[12621, 346, 295, 8, 31, "Input"], Cell[12919, 356, 138, 2, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[13094, 363, 473, 13, 31, "Input"], Cell[13570, 378, 149, 2, 31, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[13756, 385, 606, 17, 52, "Input"], Cell[14365, 404, 1460, 35, 225, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[15862, 444, 553, 16, 52, "Input"], Cell[16418, 462, 1417, 34, 249, "Output"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[17884, 502, 140, 1, 70, "Section"], Cell[CellGroupData[{ Cell[18049, 507, 274, 7, 31, "Input"], Cell[18326, 516, 16892, 287, 233, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[35255, 808, 162, 3, 31, "Input"], Cell[35420, 813, 20363, 361, 233, "Output"] }, Open ]] }, Open ]] }, Open ]] } ] *) (* End of internal cache information *)