(* Content-type: application/vnd.wolfram.cdf.text *) (*** Wolfram CDF File ***) (* http://www.wolfram.com/cdf *) (* CreatedBy='Mathematica 8.0' *) (*************************************************************************) (* *) (* The Mathematica License under which this file was created prohibits *) (* restricting third parties in receipt of this file from republishing *) (* or redistributing it by any means, including but not limited to *) (* rights management or terms of use, without the express consent of *) (* Wolfram Research, Inc. *) (* *) (*************************************************************************) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 835, 17] NotebookDataLength[ 186805, 3796] NotebookOptionsPosition[ 183533, 3669] NotebookOutlinePosition[ 183889, 3685] CellTagsIndexPosition[ 183846, 3682] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["\<\ A simple 2-box model of the atmosphere\ \>", "Title", CellChangeTimes->{{3.524827625822689*^9, 3.524827632548259*^9}, { 3.524832480237392*^9, 3.524832481349123*^9}}], Cell[CellGroupData[{ Cell["\<\ Fossil fuel emissions updated to 2010\ \>", "Section", CellChangeTimes->{{3.524828058126039*^9, 3.5248280770596943`*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"z", "=", RowBox[{ "Import", "[", "\"\\"", "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.524827638116988*^9, 3.5248276429216213`*^9}, { 3.524827677270685*^9, 3.5248276818072*^9}, 3.524924972152946*^9}], Cell["The data are in MtC/yr", "Text", CellChangeTimes->{{3.524828092438076*^9, 3.524828097815938*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ListPlot", "[", RowBox[{"z", ",", RowBox[{"Joined", "\[Rule]", "True"}], ",", RowBox[{"Filling", "\[Rule]", "0"}], ",", RowBox[{"PlotRange", "\[Rule]", "All"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "None", ",", "\"\\""}], "}"}]}]}], "]"}]], "Input", CellChangeTimes->{{3.5248276846210413`*^9, 3.524827699656104*^9}, { 3.524828103657043*^9, 3.52482816418294*^9}, 3.52492497826202*^9}], Cell[BoxData[ FormBox[ GraphicsBox[GraphicsComplexBox[CompressedData[" 1:eJxd2GFI43Ucx/F1WOcDoRFy7MEemEiMWLFCyMBqVx55tGjVqBHrWuZdI6xW jG51RqukVq2wsmNxlutulHnWrbJaJbXABz7wgQ98sAdCPjAykJCQMPBB1Of9 Pejrk7cvfr//7/f7//9DxStHnrzn+IFAIHDZJYHAv/3vK3Mmrm861azzqHPO ecw571xwLjqPO5ecJ5zLzhXnSecp56rztHPNue486zxvDqoN5wXnpvOic8t5 yXnZecV51XnN3K22ndedN5w3nbect513nHed95z3zSE6/X93OHc6dzkHnbvN YTXkHHbuMfeofc4Rc58aNfeqMed+5wF3/aBz3HnIedg5Yb5KTTqnnNPOGXNE zZqvVkfNUTXnPOacdy44F83XquPmmFpynjBfp5adK+br1UnnKeeqeUCdNt+g 1pzrbv6s87z5RrVhvkldcG6ab1YXzbeoLVyKq0s2flhdNt+qrth8vGq+TV0z H1Hbzuu23u3qho3jTRs/qm6Z71C3nXfs+oS6a75T3cPxu9V93MKBD+i9ageO 405cwl24lVKD5vvUbvP9asjWS6th2+8BtcecUfvs+gfViO1/TI3aelk1hjdw v13/sDqAsyPqoK33COvg2nF1yM7zqDps6zGesOsZT9r+OGXny6lpm48zNv4Y 57Lxx9VRO+8Tas7Ok1fHzE+peRzDBZzERTyJx3H+afY1F9QJ57Kd9xm1Yj7J unZePIV7cBXv4Gmb/6xas/M/p9bteZxSZ3HweXUeN16g5pK6YOd7UW3aOF7E wy+rLdsPL+HmhLqMQ6+oKza/rK7a83pVXcNlxtu4+pq6bs/ndXUDF99QN81v qlv2/pi/bc8L7+BIRd3Fba7fs+eB9+16zhP4kPMw3oFDjHfiHPt14eRbatDm 425cxCHcxGFcnWRfXMd9ePNt7gsXGI/iLOeN2X6crx9v8TwH7PzsP4i7WC+O Z9lvyPZ/Rx3GbcYTuMZ4Eiem1JTNx2m8hzN48T3uA0/jUXsfrJ/D6XfVMdxi fh7vnlYLOIqL9nzeV8dtP/4OLNnz4PfCBLbfg2VsP5creHtGncQHPlKn7P5w FfefZV873zm1hq+oq3UcwbN4H8/j3o/VBj7xibpgn5dZtYkbn3Iu/NKc2sLr 57lvXP5MXcZzF9QVnG+oq/b5/0Jdwwe/VNv4crxu74v5GzjwlbqJz+It/Ave xn8vqDv2vvCufX7wns3n+n38Gw7wHs8xvwMf/lrtxL/jLnzqGzWIk9+q3XgZ h/DBphrGD+Ee3Iv7cBhHcAVH8aHv1Bg+jfttv+/VAfwH44O4ieP4GPOHcMcP 6jA+ghP410XuG5/4UU3ZeX5S0/iulpqRSxdwFh/6WR6dif958pq5o58znpuJ j6f+Grn0DOMX/3/AV27mov8B335cfg== "], {{{}, {Hue[0.67, 0.6, 0.6], Opacity[0.2], EdgeForm[None], GraphicsGroupBox[PolygonBox[CompressedData[" 1:eJwl1FWQEAQUBdBNGkRCJHVBGgWlW7praVBikYZdSrq7u7uUNAglpZTuVLpT pbvPzn6cuW/u3O8XFhEVHhkUEBAQSKzAmAwNjLlDCCYoug+MGb0Tb3nDa17x khc85xlPecJjHvGQB9znHnf5n//4lzvc5hY3ucF1rnGVK1zmEhe5wHnOcZYz nOYf/uYUJznBcY5xlCMc5hAHOcB+9rGXPexmFzv5iz/ZwXa2sZUt/MFmNrGR DaxnHb/zG2tZw2pW8Su/8DM/sZIVLGcZS1nCj/zAYhaxkAXMZx5zmcNsZjGT GUxnGlOZwmQmMZEJjGccYxnDaEYxkhEMZxhDGcJgBjGQAfSnH33pQ2960ZMe dKcbXfmeLnSmEx3pQBSRtKcdbWlDa1rRkhY05zuaEUFTmtCYRnzLNzSkAfWp R13qUJta1CScGlSnGlWpQmUqUZEKlKccZSlDaUpRkhJ8TXGKUZQiFKYQBSlA fvKRlzzk5iu+JBc5+YLPyUF2spGVLGQmExn5jAykJ4xP+YR0pCUNqUlFSj4m BR+RnGQkJQkfkpgPSERCEhCfeMQlDrGJRSghBBP9H94DGHyBWQ== "]]]}, {}, {}}, {{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[CompressedData[" 1:eJwl1PO7EAYYBeB7a2nZtmth2ba7tVpL6y4t27Ztm0vLrsW13LJt27336Yf3 fM/5A86XPLh1UKvAgICAH0TIDUXokE4YwhKO8ETgRyISichEISrRiE4MYhKL 2MQhLvGITwISkojEJCEpyUhOClKSitSkIS3pSE8GMvITmchMFrLyM9nITg5y kovc5CEv+chPAQpSiMIUoSjFKE4JSlKK0pShLOUoTwUqUonKVKEqQVSjOr9Q g5r8Si1+ozZ1qEs96vM7DQjmDxrSiMY0oSl/0ozmtKAlrWhNG9rSjvZ0oCOd 6EwXutKN7vSgJ73oTR/60o/+DGAggxjMEIYyjOGMYCSjGM0YxjKO8UxgIpOY zBSmMo3pzGAms5jNHOYyj/ksYCGLWMwSlrKM5fzFClayitWs4W/Wso71bGAj m9jMFrayje3sYCe72M0/7GEv+9jPAQ7yL4f4j8Mc4SjHOM4JTnKK/znNGc5y jvNc4CKXuMwVrnKN69zgJre4zR3uco/7POAhj3jME57yjOe84CWveM0b3vKO 93zgI5/4zBe+EjL+QEIROvD7P/gGvVCBSA== "]]}}}], AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], AxesOrigin->{1750., 0}, BaseStyle->16, Frame->True, FrameLabel->{None, FormBox[ "\"MtC \\!\\(\\*SuperscriptBox[\\(yr\\), \\(-1\\)]\\)\"", TraditionalForm]}, PlotRange->{All, All}, PlotRangeClipping->True, PlotRangePadding->{Automatic, Automatic}], TraditionalForm]], "Output", CellChangeTimes->{{3.524827688908421*^9, 3.524827700468259*^9}, { 3.5248281244131403`*^9, 3.5248281332209682`*^9}, 3.52482816559732*^9, 3.524924945498199*^9, 3.524924979680996*^9, 3.526625971984592*^9, 3.526627607387055*^9, 3.5266277248901587`*^9, 3.5266279867670517`*^9}] }, Open ]], Cell["\<\ We convert to PgC/yr and move the time to the middle of the year\ \>", "Text", CellChangeTimes->{{3.524924984184757*^9, 3.524925000058172*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"Qfoss", "=", RowBox[{ RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"0.5", ",", "0."}], "}"}], "+", "#"}], "&"}], "/@", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"1.", ",", "0.001"}], "}"}], " ", "#"}], "&"}], "/@", RowBox[{"z", "[", RowBox[{"[", RowBox[{"2", ";;"}], "]"}], "]"}]}], ")"}]}]}], ";"}]], "Input", CellChangeTimes->{{3.5249250030482597`*^9, 3.524925069979109*^9}, { 3.5249251412260437`*^9, 3.524925144623583*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Summary", "[", "Qfoss", "]"}]], "Input", CellChangeTimes->{{3.524925112186635*^9, 3.524925115158729*^9}}], Cell[BoxData[ FormBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"\<\" \"\>", "1", "2"}, {"1", "1751.5`", "0.003`"}, {"2", "1752.5`", "0.003`"}, {"3", "1753.5`", "0.003`"}, {"\<\"...\"\>", "\<\"...\"\>", "\<\"...\"\>"}, {"258", "2008.5`", "8.749`"}, {"259", "2009.5`", "8.540575505908553`"}, {"260", "2010.5`", "9.014042082587483`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], TraditionalForm]], "Output", CellChangeTimes->{3.5249251168766327`*^9, 3.5249251469998083`*^9, 3.526625985579749*^9, 3.526627607574251*^9, 3.5266277250593357`*^9, 3.526627986967965*^9}] }, Open ]], Cell["Get relative emission fractions in each hemisphere", "Text", CellChangeTimes->{{3.524924843573061*^9, 3.5249248528739767`*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"Qfrac", "=", RowBox[{"Import", "[", RowBox[{ "\"\\"\ ", ",", "\"\\""}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.524924858331769*^9, 3.5249248653527613`*^9}, { 3.5249249112175617`*^9, 3.524924916360463*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Summary", "[", "Qfrac", "]"}]], "Input", CellChangeTimes->{{3.5249249188137817`*^9, 3.524924925044137*^9}}], Cell[BoxData[ FormBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"\<\" \"\>", "1", "2", "3", "4", "5", "6"}, {"1", "\<\"Year\"\>", "\<\"Total\"\>", "\<\"TotalNH\"\>", "\<\"TotalSH\"\ \>", "\<\"fracNH\"\>", "\<\"fracSH\"\>"}, {"2", "1751", "2.55178066`", "2.5517806600000004`", "0.`", "1.0000000000000002`", "0.`"}, {"3", "1752", "2.5525738999999996`", "2.5525738999999996`", "0.`", "1.`", "0.`"}, {"\<\"...\"\>", "\<\"...\"\>", "\<\"...\"\>", "\<\"...\"\>", \ "\<\"...\"\>", "\<\"...\"\>", "\<\"...\"\>"}, {"259", "2008", "8264.749695103066`", "7726.689859861448`", "538.0598352444727`", "0.9348970198625104`", "0.06510298013783498`"}, {"260", "2009", "8067.8844720556635`", "7542.641149517965`", "525.2433225384549`", "0.934897019862275`", "0.0651029801378186`"}, {"261", "2010", "8515.082152436364`", "7960.7249281964905`", "554.3572242420478`", "0.9348970198624262`", "0.06510298013782911`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], TraditionalForm]], "Output", CellChangeTimes->{3.524924925721737*^9, 3.524925095775531*^9, 3.526627607687148*^9, 3.526627725176552*^9, 3.5266279870663967`*^9}] }, Open ]], Cell["\<\ Make an interpolating function by extending to 1600 and to 2011.5 in order to \ prevent overflow\ \>", "Text", CellChangeTimes->{{3.524925626877694*^9, 3.52492565307845*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ SubscriptBox["Q", "N"], "=", RowBox[{"Interpolation", "[", "\[IndentingNewLine]", RowBox[{"Join", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"{", RowBox[{"1600.", ",", "0."}], "}"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Qfoss", "[", RowBox[{"[", RowBox[{"k", ",", "1"}], "]"}], "]"}], ",", RowBox[{ RowBox[{"Qfrac", "[", RowBox[{"[", RowBox[{ RowBox[{"k", "+", "1"}], ",", "5"}], "]"}], "]"}], " ", RowBox[{"Qfoss", "[", RowBox[{"[", RowBox[{"k", ",", "2"}], "]"}], "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", RowBox[{"Length", "[", "Qfoss", "]"}]}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"{", RowBox[{"2011.5", ",", RowBox[{ RowBox[{"Qfrac", "[", RowBox[{"[", RowBox[{ RowBox[{"-", "1"}], ",", "5"}], "]"}], "]"}], RowBox[{"(", RowBox[{ RowBox[{"Qfoss", "[", RowBox[{"[", RowBox[{ RowBox[{"-", "1"}], ",", "2"}], "]"}], "]"}], "+", RowBox[{"(", RowBox[{ RowBox[{"Qfoss", "[", RowBox[{"[", RowBox[{ RowBox[{"-", "1"}], ",", "2"}], "]"}], "]"}], "-", RowBox[{"Qfoss", "[", RowBox[{"[", RowBox[{ RowBox[{"-", "2"}], ",", "2"}], "]"}], "]"}]}], ")"}]}], ")"}]}]}], "}"}], "}"}]}], "]"}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.524925202677512*^9, 3.524925292735114*^9}, { 3.5249253405104837`*^9, 3.52492561798275*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ SubscriptBox["Q", "S"], "=", RowBox[{"Interpolation", "[", "\[IndentingNewLine]", RowBox[{"Join", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"{", RowBox[{"1600.", ",", "0."}], "}"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Qfoss", "[", RowBox[{"[", RowBox[{"k", ",", "1"}], "]"}], "]"}], ",", RowBox[{ RowBox[{"Qfrac", "[", RowBox[{"[", RowBox[{ RowBox[{"k", "+", "1"}], ",", "6"}], "]"}], "]"}], " ", RowBox[{"Qfoss", "[", RowBox[{"[", RowBox[{"k", ",", "2"}], "]"}], "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", RowBox[{"Length", "[", "Qfoss", "]"}]}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"{", RowBox[{"2011.5", ",", RowBox[{ RowBox[{"Qfrac", "[", RowBox[{"[", RowBox[{ RowBox[{"-", "1"}], ",", "6"}], "]"}], "]"}], RowBox[{"(", RowBox[{ RowBox[{"Qfoss", "[", RowBox[{"[", RowBox[{ RowBox[{"-", "1"}], ",", "2"}], "]"}], "]"}], "+", RowBox[{"(", RowBox[{ RowBox[{"Qfoss", "[", RowBox[{"[", RowBox[{ RowBox[{"-", "1"}], ",", "2"}], "]"}], "]"}], "-", RowBox[{"Qfoss", "[", RowBox[{"[", RowBox[{ RowBox[{"-", "2"}], ",", "2"}], "]"}], "]"}]}], ")"}]}], ")"}]}]}], "}"}], "}"}]}], "]"}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.524925202677512*^9, 3.524925316490971*^9}, { 3.5249253618942537`*^9, 3.524925368355769*^9}, {3.5249256685298147`*^9, 3.524925729595389*^9}, {3.5249257621202917`*^9, 3.5249257664394417`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["Q", "N"], "[", "t", "]"}], ",", RowBox[{ SubscriptBox["Q", "S"], "[", "t", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"t", ",", "1700", ",", "2011"}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]], "Input", CellChangeTimes->{{3.524925772439863*^9, 3.524925823924872*^9}}], Cell[BoxData[ FormBox[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[CompressedData[" 1:eJxM2Xc4lf//OHAlIyRSKBJakmRVZDzvZJWRMiohZEshq8wQkr0559gzK2SV VLILKTt7R0milOj3fH+vflefv1yP65z7Pvf9ej1fz3HhM7l5wWwjFRUVLT0V 1X9/o7/kbqAKTyR4GZ8H9kRawIu6qgJjdM3n43Sy0RbwKaH58iv0Qb6dUqkx FnBa4WOxf0QiwaAXWGUWbwGL8QImW6ISCXkxGrlhigWck8+u3RWbSOy0ZR2M zrEAhpgM32PkRKIvQvoR8zMLOG79+GgcunJOtkm1xgKMoe7DClo4enN2wHML qPw4Ll5NSSRSHlk+XX1pARZyeyfkkxOJ0mNSml0NFlA3naqgmZZIHDGuLtZ4 awFeJ5NpbHISiZnabRGGYxbgOTM+04nmGjTgChm3APdYgTdyuYnElvsGak8m LMB1sThy28NE4q5leCbLtAXYPazb8yQvkXhFY3C2YM4CjHbNSm0uSiRuPLnI kL1kAfK/JG5klyUSZtuoW1JpLIHIuX2etTyR6D7lkJtFawlyujUSbujrMQoq D+ks4WSJ8qpGRSJxyU2gsWCzJYhb6wV+r0wkTm30H87cYgn7+r3SFKsTCbY1 g4NXdlgC7ZOW7vHaROJ5fvHt4b2WcGRXWZnSq0Ri1w7BbUX7LEH7TnJ0Ljqm LzrHY78lpJ90vHCzLpH4ZlfXwXEQn+fp7rZf9YlEWBHvQULQEu5U29WzNicS tjyO1sYilvClhv0xtCcST7WqK2elLYF9z4aoNHSx/lclkgw+v9ecPc3bRII9 UmT6rKwlBMOLo6/RQu6aRtlyliD4wipP910iMbw3T0nnlCWYvqxOs+1KJFxu OdjdU7KE3lcmEaQP+HsZnhRpTUswlmz1+o2+sEvw+Rv0bP6JGwYDicQhEZut Buct4XcMk+qewURinYtJzu2CJeyxLN+UPpRIyLLrTRRoW4I5E4Prw9FEwiaz qO/TJUtY0i42rJrGeHl0/0GXkSV4NHOp75pJJFiajTPVjXH95Pyl3dBFvjVU 9WjOg1c4ZT8mEowvrnkWm1iC9M9N717MJhIKLvOZd00twYdySbHpcyJBsxAi +MfCElim/hzu+ZZIbAqRFb51wxJsxJPPE0uJhEWfTe8AusFbziUXvTb/plLx Jv4+l0et23IisdIhtGeHHb6f5q9LvD8SCevfgXEP7S2h/unSPatfiUTFluHh R46WwLs5Ou8devFJvzKzkyW464p3SK/ieUvjWbRGi32152b+nUj43fFj4Xe2 hJQDX0pK1hKJqt7P9wNccD8jPg6vUpEIcLrGKXLHErqHAmnMNpAImTDfP3fR okICh9vQM1objr1HzzSYO6dsJBH+Ulyht9wsQef3OJPiJhLBvfp5S767JYhY DEmF0pGIPT7Sn397WsKkzPsoXmYS0bnYc2uvryVYy3CW+aC/tAqE6KPnpQ26 J9C85a94Y9DfT05z5m4lEcHn1Ko2+VkCvdQqRZSVRCxu63sxiBY6tjdHfjuJ 2AWmpS7+lvBIwrI5A107QvU0B31MomCWdgeJiGV/otSHlhM/ceQ1Omjk+yfJ AEvQFFUt0eIgEX8ut9xbRDseuVVtuotE6CjpO5y7bwkrQpWDDeiJPbY0t9Ee QmvrAlwkomy77YE0tP/hgFOf0eNfC7d/Q8cfIjU47SYRb6esS8OCLKF6/6u3 /rwkgp9H2ffxAzw/++kXZ9CLKUtyPej6fepsqnz4/A3XIn+i2/b26GzlJxES CasbZYMtYYRvrj9uL4mgaj/F/Ry9iYdtMucAidg9kFf5KMQSrnwPlmU7SCJu LDXFt6NL2mhjPdB2b1gY5tFGXr+ULgiQiKUeIv1QKD7PyGjO6iES8XsvdQMJ zVZ1ZYO5IIl4T3VRsQJtHdF1+S36ePcO/XdoTvlmhszDJIIpYOkCXZgl3Ep/ dF3jCF7fyO5+Hd3iJlhfiRYRSX/jh+bVzti9V5hEtDT3PyGj2zbFt/1ApxbY 3HqNFjT3EkkVwf1fX7LeF24JYwIaS9/ESYTcnzz+erTUhiY1QwkSUfyuMK8H Hd53KrMJTZwZHPqIlgs6pks5huspM6i0JcISEue4K5VOYPz8OSOuif76Kpal GK1QGrTXCK1CZrHikiQR4fIn6m6iv6tt2rWAdmdd2hmKPl8455ZwkkQknxgU akTn+Jt1UkuTiIIIg/JO9LrhsNANdAhV0PdRdP7W94PyMiRCVIouaRVNb/8E PsmSCLrBW8mHIy3h6hmJeF05EpGZcWzpOLqcr3DhBfpL1TiNPNr0XWpqDJCI nx/3XbuIfiF+nxpOkYihA9xcXmhXXl+bbPQDh0PygWjRLR7vt8qTCPr7kcIR 6LQpu/QRtOcJW700tF/CpdM+CiQi4e7Ktlq0jP+FvFk0E2P87Wb0soMam5Yi ibiW6pH3Fm2uRozvVSIRdTtYHIfQKn8O+tYrk4j4TbQFP9BUn/jmjqiQCKuB +z5r6KpeLq1YtAi13CHqKNy/kq17Lc6QiHxDoc9b0GNJmx+0oyf3jjKyoUkP qL+dOIvxefnpOgeayexHLb0q3l+i6xofuu78V0F7tKFNWM9+tIfcXGQfWljc lF8QPc8xbPJQjUR8i71AiKE7Who2qmmQCO3Y78UEOqjihfVjdLaM1LfTaPmM J++4z5EI9nJvVmX0Y4/CtM9ordNsM2ro69Y5DLqaJCJrujf1HHr/xTSHGjSP d7z0BXSsSKx82HkSEVj4i/UiWmN3+MMf6D+dHJqX0XQMQduMLuD1LPvsr6Bd xz3GRLQwf8ysG15Fi7x1OZuAVtuhcsQY/bHavmSDNolQdnUaNUHrxZr5vEMv bHBYN0Nv8706e1KHROytemppgX598/KFdHR849BTS7SfvtYTRl0SEekUv2KF ljmjzu+IvsCYtccGvXRMOWgAzd1RJ3odXcB/alHhIsbj1pKjtmie3xK1Oy6R CJUdn7/eQHfPCAt6ottsyypuosO6BCKn0LlXT123Q6vU8v/SuIz3E9dgsUdT FXGbVKAtRRIy/nMlib1ljx7ms+ThQw5o+0AWsUB0XPNQyn8WdGJIXED/WdZi uPVfPBhv2nj5Cok4a/vb/D/XUWWYPUGvlwaU/Oes5NPNXPokol5GeOk/B8qN C3mgX2TfF3JEWw36hA+h2WLE9f+zEFftxVQDEqHk0pf+nxcubdhjakgiVj2t q/+zc6dXwcerJOLXX6+dW5e+afzPDMqrl+6Y/vs+p9yK0z2Lf58PuJ2QVbH8 5+Qq502MVng+//rAseXIcGsSsfLXEkKLRSRbzH9/fW7Xp4/Ft/59v5PFTWHS +9/3L9ExJHOG/vMxUb9jbv/jbVfWXw+G/ru+tXBxJS3s3/PI6364cCTi3/Mf ycynlY/+9/nG0+du2CT+s8vsiaZl0r/7fYrg5fem/HPPyNeu6JR/94uUmNqo l/rPaoH9R/ek/Xu/2qOv7uemk4i1v3b3rSi/kfHPJ3ryxsUz/3n7hgN3Yv/H i4IpLD//x+3au7KvZGE91uo4eB37lXzPaNka9KDBcZpX2I/NVYeO82Rj/f0z 8fiEFMbXauB9L/RFzsOqM/wYH1K+R0fQ7xblhOLZMF+7eHQROSSivFe3mgH7 3ekyF7dU9CJb7lVqVty/JXu+jbkkwnne5o4iH+ZfseuNJui24i67aMD+1s7c 9hXaL4c7u9QW47fQiG3fQxKRKHnrteo7rGef9ar80LkaNiUs/lZw9bDO1Um0 3EVO43xla0iyOkejlEciSqq3bI1ns4HB7DN5WWiBuaFvalM2wD11+jxdPsa3 xh5lherrkGgiSWlC95hJcwxfuwF9KWKnDxVg/v4qS+0kfBM4h4U+3kdvuLYm LTZ/Ey7uPhg2i+aI8v/deM4OYq/wHVMtJBGhceyqJ27bQVcC14c89IsnXZM0 YXawvXfHXaYiEvHyW0YIM8UOtNhZDtqigyySl8Qy7CBSm6G1Fb1NeuSNdqYd dERuuiX8iEScj/Jp0km1A5aOdc4wNMSkJnAk2MG5rT9rvqA7zS4tuoXYQaj6 N1PNYqx3grV+pl520PrgM0Mx+i3tr42lN+2AqWX6EWsJ7nfu13fqJnZwln5M 1+F/fF9p4Pc79O+/pn31ViW69J/9oD5a5zHG4197SxYK9ZZhfP+1q6C3/mDl v/uZM++rnq759313rx1hTvX/7hexQGtC/eafH/OYcXf9j7vVXnVntf7zzLXF 0q1t2H8Uss8mX7WDn3f4IlzRSgZK4tQadsAQqXljFL3/lNxCsawdcOd6qZ5t JxGs+92s3hy1gyMvCgVK0SKdt6cd9tuBXM8gDfdbjJedFSX1e+xAc55p3A+9 73kR2yTamEbmxWd0XfjIha8H7MCB24ai20EiflxqqGQ4jushnnjnOXp6bDDk PP5+zNnmiwLvSMSxdZ6qe/fsIMt4RSICfa1p2rt22g4qXQ9u+4Vu193+Z/i8 PTSH6X4xeU8iClnz0igv7eHTs8e5Ep3Yn1WJsP/IcYC1znF/CtrkjlAdK/ct YP60zZS2i0QYsOZrtTy4BbzU8qduohc/lomPLN8C0V32PL3oi9c132+75Ajy oimrRDfWf6kej/VQR9BWae/NRZ/kOXPpZLYjmF1dL9vWQyJebw6jP1vuCM7O R6Lc0K8a9/eoP3OEwBB9uwn0T/4gJnN0QsYDdfVejMcpya8lFY7w8OkTwXJ0 6UBhq3aBI1S/+0i3p49EfHhrOWuT7AjfSTUj3ujbbOVPZcMdQdQsqmoM/fux g8qwlyNcF7aMVOgnEW7bC5VH7zhC1g8Zm6z/MVfQFLf1h38O5w5vOzLwzzRF Ut5f0e5/fefUuGjZ4D+bmh+PkRnGfuyv+1aGlahGSITXX2s8uL/y6n8s+Wjg iurYv+uZfvnw602SCIu/Vnp1cfUp2uyv7wYLde6ewv396+883fdG0SZ/PXL6 0EfLmX9+HNJe5DL373oDPm7ZmK9Yz///++XKe8h+++c6Uatnk0v/fr/jvUPr ueV/HnJyH6z6H89x+H/e+51EONJYeb90dISVqrC1ELSIUekU9zVcL/2ELSto vra0ZDotR9i2nrbb5AeJOMrm+i1P0RH2pOQfeYMmvt0SlJBxBCH5ctnjKyRC VqwnuOWEI0hNPFdPQW+JHjNJkML18G82YPiJ/cZA91KLvCNoCby3dUTXtS8F 3dd2BKOWAY8h9B1RD9s/Nx3B9vpUiMovEnFk34Y1tae4X8wLlBK0gkl7lBmf EwQ8+lnAvYrziFGZVkeoE0RfoK7xRzvFieZLb3CG1CWmtgX0omctk6azMxTG sg/p/cZ+KmxqomrOGZ5K8s7XoXMI7ox9V12gqf/QuvAa3p9xrEq6zQW63MWZ E9CqFuUxD4+7whiPLA/1OokIOK657BvtCl9eKAnbouf1L/r8LHGF3yaacj3o xTkjVZNGV9hMo6dx6g/GX3ZB/Mw7V2DPvmaYh7bT8iwp73aFvWdsb+ygIhNP StlGv793BZE5Z08vtFxw4fX3r11BNsQ79CN6MiWM4vzcFc4eDUrS2kAmYst+ PGV45AoXO6IKn6FPhh5keZLkCqa3KDUHN5KJhf+rz65gvyO7LQL95a89Kx4N rf6P41dfrbdTk4nPf/3Gd1bOlYZMfPzrvv1LGmPomb+ealwzVKP9ZyomVi9e OjIx9dcS0SeeN9Hj8/41KcMPdjKRiYm/ZrjCfPUu07/PXVnjPT/+j3U9855V bfl3vzqJY4N8zGSizl64vTDEFcTnan7fR6c21tzScXeFtFQV7kW03nAfp8N1 V2C59E5abyuZ8GH9ssxzFd+XWf9KLdqw3FbeWccVPtdN3hFkIRM6B+qPRWq6 gr7bzcRI9GqVKV3IeVdoEf1Z9Qud3fx03vuyK0jO+PSZsJKJVwVSewOtXCE7 ielnC5ruufpAtQ/up04sp/g2MsFjoDR9/oUr+DHySpLQutlrAs/4b8Piy9yL 1GxkgrhA71wefBuMXcVdbNDshQFXN/++DXKTSuXS28nE60dWarOjdyCf9LYr HT20zOywVdsNuC7oLTPuIBOXBQpdq2vdIIh+Yrsj+lis5dfqw+6wUmMrMYDO CLlqOxDsDuZOP7QU2MmEt0/jnW0v3aHr8N1b+einTXPEQK87KIwxRG3nIBPy n0RXU6fdoSQ+usQd7ae4edRj3h34zvG8m0CzHxk9FIQOp8n5qsZJJrRXBbaM zrjD+lNR1jL0W3rNWvKQO9g6PBXZvZNMtBbUe/e8dQcgFvn4DpCJ9s7digt3 vaE7h0/WB12g9IZ174Q33GA9f2kcbU99+Uyd2l1IGisKzTxIJvR5e5qNBHzg uOpwLq0Ambhw7YjbeKwPtJYy11ugnz0+bDm+0RdMueVGmtCSAZsU91n7wm8/ 29VDh8iEmPpsvVWLL0R/JrM/QP903prswucHQrpvRD+hl52y/Fht/aCuZlVN XRDjcXt917ebfnDl4GHLQnRx4H7hj7p+sBim57v1MJnYcvJK3xcxPwhauZ9k h94hkVHQQeMH/MZVVR3oJh+5u5c6fOFJ80ynmBCZeC9qKagR5wsXxDgXotAT ale93C/7wmyiMuMyOmvYWLdgpy/4ULsc0D2C1y8X3HvY5wM7r2edqkDHke6O y5J84FFnlz6nMJlo9j/ZEW3tAyqyNK630cUjHk4WBj4wkikR1Y9+Om84a6zt A67MpoXSR8nE7yMaT1jP+QCLS1QzGR3EVX1zk7oP5AzXTqyhXSV2xjSiCZXF P4YiZGJwuevxjKYP9Dzi43qBfjpgcnlZxwdu7Dx/nE+UTIibi2xx0/cBWh/v 8z7om1uL9OhMfSBptuj6ONpZ59ybg9dxv7SGAxTEyAT3Zh7heksfaHvKnJ6J ltn2sfO9kQ+Y75OroRXH/aQ7VZl52QfWg237LNCqNmXqBVo+ELNMXmpC73zZ xWCAzy9k+GaroASZiH4ganYQn7euYVXwATpH/dI7T7T+0cNKn9Bngvoau/D5 l+L0jNWPkQmTOoWnSRd9IJgqyL0QPex5iF/NxAf2WVXFbT1OJq4cYOPQcPKB 6o6ZEjs081KQV1KqD2id5GzrQM/EakuSO3xgNk35o9gJMhG4+byuySbcL0aX TdHoPCXjeUYpXygZ6DqpK0kmEuhOjThl+MJZRRrdCnSF17tr1/t8YaxAwp5T iky4PVx9XMLkB3fYTYNvo5l9KDPXZP2A1Ssqux99iCqBjWTtBznTtbXSJ8lE fhj1AQk/PyA0FwfJaEWeVce3YX7QW8n3cw198EZ6/o04P7DjO7/9qjSZkN0Y LH+X5Af0Qd5HX6AdDRTy75D9IHmx6CyfDJmo2ah/tTXRD45fGTbzQdM7mXTM xfpB2yvmu+NowRPTLioRfmAuJEdWkCUTHG9uN+kE+cF6tG1FJvpJea6kv48f xK6R39HKkQnf/+sX/OCI+ZvPFuh7fx2fLUJ0oP3/euPH6MiTQCYC/rrbxuDE FgLj8a897ee9S06RiZC/fuvOsn1N4d/1J2sczc0V/90/409vZTva76+ZT8ky Sinhea6j20Dn7AeuPqkGaejp0Sv3ruL5HntF84hRGc9LHo1QgpkfqNFYb3RC 662Xrite9YNypTbtIfRM2Q66FT0/4AsUy1ZWwfgp7NM4ddkPgptjfz5CD70q HC7Fz78zrKruOkMmLr47/WoUrzdSu5rki+4oU6Y2sPKDlpBXC5/Q2metcitc /ECi/eBp3bNkwsykfNYu1Q+SWIJjnqMd7Z66ZHfifl1YmBZQJRO0jadjdRnv gUOU9slI9NbCr2J6CvdgoLMyeBXtY2txMtTzHiix7x42VcPzo66c0FZ5Dx5d vCvahraPEZf58fUecCVM+p5Qx98Pbds6IeAP/v1nulPQel5PqOz1/WGBq1CA QYNMCDFLKI0E+oOewTa3W2gKMNLnxflDXZJz6wA6L1mPKSjVH4RH+vconSMT Bgwd+luz/SGeDxyK0FVXdlO35vjDxmvpdZyaZKLh5jy9Dn5+PYOOwwf9gP+b i1S6P3RP2ljNoZk1+y8zUfyBOPj2qfZ5rIedFyqvxvjDQ0sJ5hq09QNGSn2w P+x4GG908AKZyDzDtPFwgD94z/0uCUdn//WskDHNL3TuX9cUHXr4RotMFP21 edmTb/Y6WB/++u13HqUP6Jd/fVLSN15BF99fSlrm4l1/yLg9PVuAtu2L03zp 6g9bn6rKclwkE93TrQ+47f3hzu+iMG90ABH845e1P0zIbh/7iI58fpcyb+4P Gl6uElqXyMQnwiDgvpk/VL4Y8K9Gk1Naawws/EHt8VQnz2UykXh7+LT7dX8Y zl7gv4vuMfn18qqTPziQftmNoyc+iP709PEH2rBNzxX1MP9mSzYdSvGHBB/m LTlo6ye27BKN/iDkzHmF4QqZ0Fhu01dZ9ActA6EfbWjeqcaO0gsBMKV5XFFU n0x4kSW9dwcEwB0FIioK7ecRcKD8WQCkHNY+eskA+8Uae72Eo4Ew/9PNYtQQ +xVqn7kB2vtw9/O9stNXMT/sCJ0XlboP20fDqLPQiwcSv/rb3AfppvRkayMy oaJa8kPk7X0IjH3d880Y4zlqjPpeQhBwB3Xt1zXBervhdtqB90FQ5DF8qxJt 5ED/xGrLA+g2/bbV4xqZUK5mqRjwfABWl9YMhtH8sSbce8oewG9VuvxTpmTi hVybHc/HB7BXnEuF1gyfdz1jylUlGMoP7I+1RJ9i/xgw5RAMZ3cdnWhBf15f 4TieEAyDW6TEjpiTiT1V9fRypcFgt+G0dxhax2nZnfI8GDYtq7V9RX/LYTnf 1RgMcTO63NoWZOLSe0FF/TfBIDhgZF2O3ud4cWduazDUtFtXclqSiT6GhyFi +Pn5V460bmh6juMmN5uCYaLcU3sQfYJz68Xu2mBwfRiYBlZk4kOIitDQ02Bg TIpcSEWn/FhOXcPnSYogy22yJhOeHw+I0ucHg9i9rGBztPtf17s+6m9C3/nr S9efCBy2wXr915+u1jmHoJ3+2kurre4L+tZfZ50cM3p8HevzX3+jZ0iQvYHx /dehmZc3a9rj+fzrJfv40Cfo0L/Wk+th2+9AJo6HRakM5wTDCwb2hDD0ebUT XzalBMP+Hm2eX+jYwxynvscFQ1B6VLrpLcw3v6cunI0IhoWb7wTa0R9D9KTi g4NBV4a1UMqRTLQV7d/sEhQM1fSa4hloW9Hf3R4PgoG/K7SS2YlMiIxFVJwO D4bA1FbZ22iviMTnV3E/522ZXo2j65hbqK2yg7E+q6poOOP9osM65HD9K2mD WivRPe6Mr/i/BQPP+6YLe13IxF7Pjd/z+UNg1kbJYAVdHRLZejEkBDQl742Z uOL7rb1SOdsYAuWb6ixa0V+UU0v8qUPhLuWUQ9ptMtEvEv7H2zsUpqy8fzDd wXlK5GQVy4tQUDv+3N0F/ab1BXPon1DgbJcJUHPD85cRfXLZLQw8SW5MFWgW uTvTjyrCYMLiSQSfO5n4ccJ2cG0hDM5K/GQPRp8YHfBNYwuHR1SS5O9oGrru nB9C4cDe6sxn7EEmSvarvBdTCAf3hLKs1+j7On2u9JfDYcxs6fBxTzJxWP3t Z3nTcFAWEy9OQSdWqx5UNA+H/HX744xeZOKIazeXDnrb60dPndAK5/aNbDYL B9e4L8QIWpn1Y+Avk3AYuibccNabTCSF9ArWGIWDgoitahm6JCqrf84wHB7+ znu75y7mt0Xagl1oluZZnSB02Z2C8lG0c8yhD0tol1/qTL3G4TBgbGl01YdM /KGcKKhwCQd54ezJZrSkpjRDa0Q4bGnct5DkSya+F88KBraEY7275rTZD/u5 WuH6P9Ph0Hs17dct9LNc3mUrmgiQExr1GkL7xzFlHeWPgIyVPTRn7pGJ+Gq5 V1WyEcBQbxhUig45Qy1pfzEC7CIoW3n8Mb8/6y5MsoqAboOB6EB02+SDnAPX I0BakGvXN7Si9ZxgIjrl++VkgwAysbYz92y4TQTQvorf14TWrXPlTsHrr4f1 5IoFYj6WZC4zsoiAd1fYj1LQUUq7D1mZRYCkgM5juvuYD59dDtE0jYCkpSgp B/Tp6y7fC9CbXr6rGUB/4he8zYnXW4WwKigHYb+mMll9yjUC2i5rNhej32dy Rw9FRIDEgTAN7gc4j0n62OsURADVc6bLX9H6z+g/OU5HQFPy68+Xg7E+DW8s NN8UCWHeQT616H23az0GeSNB1/gMx+EQrPcnvxqdlYkEHnn6/Ci0b6ekAY9u JEzyNxK/0fM/5F1bbCMhn9q/yzSUTIhOb0754RQJjhMK1q3oVraFRTG3SJCu p/5zLIxMbD/rVSbnGQkbs2qjktCFxWOmJl6R0OJ/V4AuHK93UPScxM8jLIhn N9FSpe88t3pEwiWVP+d70UbksvGDdyKB91DNFBGB86rOTkFn50iY3uzhlou+ RnOo/ZRDJBTOSrNsiyQT75Lad69YRYLz618Zd9BneJWkMs9Fglx+ldQ42vl4 6+UzJyKBJsS1TTUK++d2ixsR/JHwxvbEtcfoih5Oc0G2SIjW+P6DOxrnTdnx oy8ZIuHK0bLge+g3881PNjJGAj+LI988OqS3fZm0IxJmF8TKdWNw/p750S4l FAnFHV/PPkeXMilK3teMBNeSR8MHY7Gf17ZO9MiIBCLqpmM42qFrJrNcOgro HIU3/0QbpdSMag1FQZv2Z4pxHJkYLX2yWBoYDbHH8sVa0MPM+R7HTsSAAbtN o1g85oM844MnpmLgU8/MAnUCmTBN17E+diIOHldm37uOdvopqv6lIw7cEsx3 daH77zGPpRvGg/yd/UWyidg/OAkpp6TFA8OVidNZ6H2e6+M2hfHQIZ3ey0zC /keteiTlYTzEc5vYuqAf8zw/4JYQD0ZrvBtH0A4iRsnHPeLh4NBwrAoZ8/nz FfGtl+JhvibpcDF6mm6slRCKh/Jkgxc7KWTitpKTLt3vOPDw5tbxQddVMlYk NceBgvGHj7NobtJ6r3xcHDDJJ3pqJZGJmHinDV6+cfCe/zJbNdqR1PE553Yc JFJz5uxLxnm96mBXqEMcmEx0y4Sgm7+6VIjciAPB+piOZbSaYm106PU4+Jqp bW6YgvtbSmubYxsHlf5sqw3oDbKKhKd9HHhbvAs7mkom5EY9mFlc40BZJWJf PFoj5VGPwd04YD6kWUWVhvMcG8d1l5A46N68VcMKnXSx34E1Mw4os61jHWiH lGn3npo4MH0d7HIynUwwJc+EneyPA6F8VaZ0tOemgOK873HwxLb5mGMGmWis lz/hLhIPPhqBLQPoWt/SrGdq8XDmqPJVxUwyATaW0h0W8cDCQrtUgNY6wrh6 8G489C7UBbJnkQlG/W8f9KLjocn30E5X9MWDu1nmYuOhij00tw8tcpfvR05c PDzMXZSSzsb4NPyVRY9OlLnYQkbfKEs95hkTD0HtT/XW0dp3WKs8ouLBzYR3 7moO5uu008puEfFwfdnP7SW6e6/Y99mweNAP/Mi4N5dMrCx2fyDQalwaZD+0 Jo0Q81e0bGGJ0BR6v+bh9JuR8SB8iuOZ8kMyUd7U9kgEf5+n0009Fy1oyqKe kxQPWy1GBhnyyMQcx2zI2dx4oPqlcOM6+mCfzv0HFfGwEJy73or+SFbXGW6O h9E9zGFH83F+uvSa7slIPLwrcdgTgV7a0Fwe9jseahV7ihbRYiGEa+fuBCjt lSa0C7A/Wjhs8lshATJsUt6WoZ/x3gtyc0iA6PVNxhyFZGKW/xvb86IEuBdh 9dUVHbn48DQXSyI472u7248WPn3uWrpTIphXiG2TKcJ6KLW8/+VQIuiejUuj oENWi+WGzpBAeXBV7A+68VGikWkZCSTtjF4ZPSITHh51cs/2kEGAul6rFq3g rxB8IYAMnLGHJvYWk4mxr0d/h8ySYfOhUMd76K9TpFN9yhT49XRx0zSaOoiy NYlCgVmNizEqJXiebAwJtXoK9I8+3f8QredWJn2vhwKvHXnLGUuxXyv6cV98 jALVdPeUbNELn3aY3J6iQH7ix+429GPODauukxQgH9GwEHlMJtY5Hj7QHqFA yIuSHxHo9vYNqsK9FPDU4gj8hj63/+dNgTYK3Jhy49Qpw/l+zVvU7BUFDG+P 5JSjmeWCGmirKHCOSVGKs5xM/GbYuNmknAJEcm7zbXRN4p8Pz5ooICLGrPcB nRXaZCs2SAHeeodZmQrszz9dLb33jQKsl3ruJFX8d76bUj0Yk2DRI4VkXIn1 vmyX+i1IgjEWGqFX6Jkvm5d+6yXB+3Sr6n1VOP8WdXOcdkmCuuNtav7o4yu+ BYzRSfC4WWxwGm33dvtD7uIkyNCPsz3zBPtz0lUxqqYkiPmyuvYQrZ9Z60A1 mATOO+p5bjwlE0qdz4Wu0yeDec6honb0zLxWteqeZLgoHQqi1dgv6i0egBPJ oNK22B6J1meJd/HWTAZJ44tGS+g5RvmqMzbJcGjp6YLOMzLxS/nz986AZNgV wHu3Aj1dEyutn5UMDLvuse6s+a/f9ryn0ZIMq/kfU++gN1sUtz//mQw1nL5W E+izi+xvSBwp4O3HLarxHOfL9o8becRTgFb/3Au+F1hvHaLvqtukQHPjTMAD dFv11m7zgBQIFvc5t4ymFJvH8qSnwLlkLo6rLzFfsM01CdakwDbGsqEmdGfG /K1TvSnQ5ayRJVZLJsxPuww2fUqB+LFpWzK6l+35a/3VFLiicfcY7Ssycf2p GcsKfSrwPNm1dhOt6rIzc2JHKozuf1zXh07xC/S9zp8KGRHqwafryEQ0r3Fm n3AqCFp5c3HUk4mNP+kSH6ikwufOnePe6PYiMSNT3VR4RJQ+nEWPf/TSPGuW Crfy1Ry0G7AeHHxLKnJPheOcU1I16BX9haescanw09drg0Ajxgs9y7h2SSpU f+FsjkBzfPLmONqWCvKNqpfMmjC/W1FeetOmAY345J529JHAT6dN+dOgKclz WrIZ57+595/KZdPgAQNnURr6s3ZmrfClNNBwLnZmasH6raAQbm+XBqxjZ+Wc 0efrOm/Ye6VBp/oEzQj6qMLlLwYhaaC3nyOm9DWZyJX8Ub0vOw12RzzS3/2G TCQctF2LLE2Dkd9n9gWgTzKGN+x4kQbpluNzC+hSXuZtP96kgXmne6leK/ZH mTF93v1pcIhgd6tDD3R1sq/NpMGnvCJ54TbMV3k6E8U/06CI4wxDPHpbUNYY 75Z0cPAd69jQjv1zw/jOw/zpcOyLW4JN+3//r5nwX5ZMhxW9HcZd6NZ3Xgcy z6fD04ZCAXiL+z0SvGx4PR08xVQWctDnGsYWlO+nw6mk0YptHTjvp1/acS8n HTYxuHm5o81j6q9Kt6RDo9N25Sl09VOq1rD5dAgaLWDWfIfzQES/8H2+DFBX V+6uQi/7K97y0MsAlqoRyt73ZCLt67fFiugMiA1nO/IDLX9m4UvA5ky4/Dt/ yagT16dRIMpYPhO4LZWqW9BZA7efbb6dCcPvh30lusgE3bveu2n5mZAGt1WT 0CNfTn5TH8gEs7xtbPTdOJ+zMH5c2JQFAhz5/fbojK4HNce2ZMGcj2LaB3SO HQfNT5YsKJwfslLswXmkIixLljUL7PVcRYvQe727g2m3ZoFEA+tPzl7MXymt qbqMWfBDNO+FD/rKF912EboseEJRCPyE3iKv/SeOOguynvqqnuvDfDE7xZWy IQsi+2qZS9BHLOWietCePza8296P/acHwWjGkAXWO07FuKCFqvVI5wWzQFfc +1I/2ignWkNEPQvkzz/nkv2A80eJdbK1QxZwhcimbRzAeWZ0gDr+ZRbQ57mb maEZZ+yZDGezYKnpqUATurU1mryfLRtGpn7NCQ5iPaLGcJbOhjebThaFoN1/ OcleNcmGSv7bDgvom/xHTmcEZEMGUXlMawj7pd2jrcWJ2RBu+GOlDB161OR0 ZU42uLsfr+YcJhMkY30dobJssEx08nJDD11OvuH/Ihu0Kx/LD6F1an79lHud DUT3N5pTI1hfJORM2rqy4ciSWHM6evma1LaCkWzYtc0hmHYU5+GvTx21PmUD rUjxOSu0oU/MktTPbFhUX9j2Bt3yLOZ3L10ODNkc7RYew/jri5LL3J0DLfdv JESghW6crLssnQPl2QX6S2idnfSHL1zJgdDxw+NV42TiLdMZ0djUHLizwSaL ewL7XR9tUmZjDpjveWjlhR6wqHDz/pIDcEVgQWES8/dQqQSvQi4I3bYozUaf pUz25NjlAmdcljPDFOabZwHbrZJzYVPZpJQtWmZJZseb7lxYeLdvrR0t0nH2 +QvmhzCwcO2F2DSZCK87EvJI6SE0Maf7xqCH5Ux+bvJ8CCln+RiuzOB5CyqO vTvzEIItjVqfoZ1l6qvdd+WBq39yOO9HzJ8nuG18zuSBacaQli9a8JMY92/H PDhfu5tjCr379b2zWuQ8kBvR71eZJRPFA3y7r+XngeA6iZKHljtuNR9cnAfs 3B+MmOewX+vNslAozYONJ3fts0eb7m84rV+SB/MXL0+/R//wKpHNLsqDfqf4 h8c/4Tx99iLLSl4eNET12CagQ6eTnfly8qCkmF30Nzq4yuXw94w8SGrXWTL8 jPWfv+WjSnoeBH2OrniJNvD3uf4J7czYeWffPJlInww4RDzKg2uH2OQC0J8T +eOT2/JAU/nChln0NX77exsX8kDGLKJO7Qvmi650/wW2fNieulV12wLGr4DL zmDjfJx3NZid0Fzurl0qQfnwaSCkowc9cG3Pr8LSfOj99Sb65Ffsr6XI3EqD +VDHyXSJgm67uOddDG0BbFN9LbiOfnOm3ERfuACMPILWDBexfsQZs304WQCF RWfePkdvUsndlaVUAKuj9Om837C+iT8ck9MqAJXtTU530csZcmUZxgUQqxSg MobmnyYGuh0KYMJViev0EtYrhQepnQEFIJZHM5+Ovr55RYOSWgDeg3UvNi1j f+JlLCzysgDatvpFmaF/fU29HzxdANzyp80b0Ot5UQ+LdxSCleNGqYPfyQTn y2MSPsaFUJ71kjEQbVrHp5PYWQib+ryHZtAtcdol0RpFkCL7x/fhD6wHqv5X mQQewfzNGl3GFcwfV3IMGa0fgUyax6Hr6IWm/JYveY8gqFPm9xt0mubpiu5P j6CH9nfbkZ9kwrqIS3LwcDHsk3qaGorWS5804rUsBgebO45f0NdnNRWfpRTD C4qUsuYvnB8zO+K7nxUD89uVncVod5Gq12sdxaC/sfIT6yquh5z/tcixYngo 4fLcAU39p8hEZKEYVsyPR75H2yQVvL61WgyKCcumEr+xXzr7PWVlUwlEvn58 IgZtJLZhUm9LCYys3WL4ji7zUUw8vqMEhEXEB3XXyATZ6uSrg7tLwN1ksahi 7b//1140adlfAi3RxT6c69g/kXYH3JAoAc5GO53b6MyFot3BF0rA/OdRgX70 qFuH8hf7Eig9/OXXyT+Y//fsqZGILAEqw8JWEtrm+TGpnyUloBFum/IbzSVX Yt/3vgRml+YUa6goxIyJ5trV7aUgeTCPc88GCvGkLe8liJeC/2XrOS90csbI /kLNUuh8cKhmBH2r8cGY8vVS4KuZCT+1kUJoORnqUHmWwo2F7Gtp6OdfxY8N 3i+Fan6L49TUFOLwGgO8jCoFBp0Dm03RPDk/jkySSuFSwOSHOjRBzfzsblop ZFVlFO7fRCGk9phkt2eXwtLctbv+6GIm+hy6/FKQ59mrPY3WHGC7Y1JUCmGa YwdUaChEVVJCL2dJKQz4pP7MQSeaFnhee1wKgmVGbzbTUohUuWsH3cpLwXV6 T7I12l62PSS+shQadg7bv0Y/sqexXXpSCtvVkhSE6CgEzaed3o3PSsHE04Aj BL3zGa/P2Zel8OgR9+xndPTyEeHy+lJYG/tQrUFPIZizdOD061I4u4MUVoQ+ PpxnJ/iuFOKV9UxYNlOI1mIFj4z+Upi6vfOYPdpaWIJ3dqIUJPJ76d6hy8xC t0t8LQXtijes0gwU4vedWsbTmx6DY+0Lrgx01NSo6D3uxxDd+nj/FkYK8eyZ 3br1icdQ1ptz1Bkd0WOwMKL9GLrHyVLD6BSGeP/3jo/h+3z4aRUmCmF0hJk4 GvcYjtPcvrhrC4XYmmTF2Tn2GHRZbI190YkJQse+M5aBM5exzSe03siUnfiJ Mog9oOOkw0whMvt2hj23KoNy0TNeNeiWzYrBfMllcMJwZ7YJC4Wg6HbnsbqV wyWrLcWv0WlODxSPF5eDq+OGpxKsFOJu7VsfhqlyiPdarqOg++pdVFl3VkBl 0Mc22m0UQo1NCg6cqYDemMHem+gznV+zDthWwEpKx1gvOkPZ/F1YaAVIVlR9 f8hGIRTdQ3vFWyrgUm0B1fbtFGLxkorZk4kKcG1NZfBAv+Fp2XlqrQLie2O2 T6Hvf2Bv/8xWCVXj93nO7aAQjBRRwymBSuif9xCoRL+1252iKVMJv37ai/Gx U4hc5Z6zGWqVsIvGXCYIXTDUpCJ6qRJOsugpfUPzkHZWbLtWCYTjB7/t+/D7 BxO+mOY+g7iGs3MxMhQiQFgswsjhFZTo7xSgkqUQ2o3eianRr6BtcdrUGu0p zW12peoVzAaWp3aid5D1PpeOvALaPfeG5OQoROXmZZ8hljrgL9PiykW327jK 1SjXgZwq/yU2oBAxQ9/8UrzrwNnlecc0eiaPs87gex1EbgllvkDgeRw1VRQV q4fCdH3VarTA4LzJim09TLb/rAs/RSFgcIPfhfF6oDJv2rCKtqw+wjLE1QDc v2PlzOQpxPCZZ7WvLjSAtoBEpdRpCpFExfJlV2UD2NVsXE5HSyfnUd+cbIBg 7Q5RZgUKYTGcuPU2cyPkzCbfcEU/urRXvUCsEV5538gbQxulBX33Ot8IQ+yy M2qKFMJUm13JzLoRfuUz7q9AO9AyOXe4NwL76X5jPiUK4SSnzhjh0QhifTlJ D9DaPEb0ykaNoHHT5cMy+vvyvX21so1gTaPEaaRMIQZ593VkczSCP2m7Tgs6 5FeyF+VLA6SJjkdIqFCIwCHDVJXGBqhpLG5LQl8QaMjWSGmAfgNvxs1nKISt uPQmHfcG+P5NQ+UW2uDKXoENBg3AGrT73iC6Z3Xcb+V0AwjxfnqpfJZCjLb6 HzM83wAq5U/Wi9FDKWY6250awFTtvjS3KuaHzlGr3ckN4D120dUf/f2V55hI WwOQXQ+ULaCXmp8L025ohErm5a96ahTC55RAjfbxRlg4GWlzVJ1CsH51N5VO bwSmDqOcBPTy0E09+d5GELA4Okmtgef1Litr3uYmUFhb47uB1pjLKFTiaYKr UW8Me9Fsrip/LI42wZ1DJJL8OQqx5XDYDWfZJoh9btWbjz5Fx2TZp9IEJTqS Ozg0KcSdrRcurpxvgrY52gt30blKS9knLzfB7N2u0Dl0ddG9erqrTUDLmfFa 5zzmA/UErsZrTcBf6ED/Aq21t3bHiEUTyCqcUhS8QCFKpwbt7W80waX+rT7R aGlPf3HO203gaDdUs45Oyat4/8i3CfLJbpLvtSjEe97PhyLim6BJ7KyTrDaF OLqDmVKf1gQTTZwl2WjblQXL+vwmoLo6Pc+qQyE6efd98i9vAu7lssPu6LyJ Y/eoXjSB5AM/yyn0ycTHkQLNTaDNp5WpqYvrqz7Atv66Cewq+MaeoO1OQ/Ls myZ4oL7As/8i3l+7pVqjrQnoV+RsQtDUL981xLxtAv+0kIpl9Me3Y5YnOpuA Wn2A2vAS1sPN3XJZfU3g/UNQswH9YiFgQnu0CdZTb5OFL1OIVcbO5bK5JnBT a5qJRRePxDDL/GyCle/sx/6gg5ZyWi4zNINzqtldCz1cn30c50IONMOS6uPW dvQu/mMn+pWawf77xl2SVyiEXNLiiJhNM8ynnDdPQT/J1k+Ki2qG66opJfT6 FKJJ3fsl/YtmmF2eX7dDv0uyJvsvNINFiqxqH5o7V+Au6/4WmDgbHHfKAM+3 W+PLXIMWMFnuH89FexzQfnQusQVGkg+JbDOkEOEnlytWB1vA4Kyr+x30pbHt 9B7ir+FS8o4dqlcxfzuMXxqZfA1dZ0yNS9FucXYSGcQbuLBUUsBlhPvjQlXH QHoD6mc0lT6hGaYmHvuebYWWb0mR2sa430UcX10oraCS9HmoGh1XtDnu3Vwr 1KvIHN5vQiHOtcruTD7UBvLfglxC0Oxxfa216m3Yr/W9WkZHzkjYll1vA1kV ARbDa1g/Tym9PBfQBk8WnfUb0Hp7N0VbJ7WBJKU+R9iUQpxgNisaKmmDcuXt y7HoJJ+rg371bSC+aHLqD/ob1ez0sZ42eEQuDrEwoxDzm1fjW2baQFiZqr8d rcBz/wnXahvkfdU4IGlOIZSF3NMOcbSDAJnikIIWdpB7yi/TDllKn2roLbCe sTw4Pm/SDnu/nmS0R3ONn2p0eNAOKaT7F/vQYk3yvHFl7cCj1Jt+yhL7BYrt 0qnRduAkOclss8J4Uxj5ZMLzFpgVH9mWWmP/dJL91mf/txD8Zb2Kywb7n7Hs Pw3pb2FzojqtH3ptx7ie8Yu3sOnLbJL2dQrh7llbUvPjLfgkSM1Vo6nHuFuW WDvgz+nAE/ttMT8Kh0x2CHaA+3y3bwi60u1G5Fb5DvgVv//tMpp9lMvQ4mIH uJ525Da8gc/XamiQfa0Dlj/XWjag1YR32/LbdoBDPGuZ8E3Mr17DZW2OHbAg b7QhDu1a3rVx9E4H2H4uVP+D9m46uifUqwNm49YSLOzw/fN2dzP4doClvNpU O3q7dvvig3sdMPkpUUzSnkKQKh0JpYAOCGIvORp0H/MVOyXhk303UKt9KPyG dg0c9VjJ6Ab3u5uEDYIoxGfqhvHK192wXH6koAG9NkKr0DPfDTc+6QqJPKAQ hpK9ptlbe2CazzsvAX1MPn9kr3APGF3MFaQOphBZx5fPK5/tgb7gd7nX0V3q +7WYTHvgQu2qQDd6+nmhp61bD7z+sS8HQigEVT31TbPwHlA4onEwF306JrZm Pq0Hnpm4ZG0LxfxQ5FIcWtIDx+NT9ruj2Yi5LUnPeqCotTljEq32flHPqKEH BKi/7T0XRiH6aSzdfr3pgVRJ7vRKtKrjvgsRHT2w64YiP3847v/TDbVnOnsg Kv1G6gP0Zpe+ApWuHmDqi+NdRjso3Fspwc/vMb9MNozAevF8yK/gXQ+sn57l aULv8X9+zKC9B1xusyWJRlKI9YCXL2aaemChUGY3CU2/RTRa53kPWE2YkTdF YX+ZN0mtVtYDYzvDuG6gpZUmRY7n9cCVc5WJPWhKzTEZz9Qe6PQb3XkqGtfj x4BSaHwPqD9hSHiI9ukYsX+L69PwRZxzewzmLxHlocKgHoD9BnEe6PPLOwqi /HugUs+ffRrdu1Hrz4xfD4iGF8VoxmJ/8nhlIiy4Bx7W925/gv5Bv2vD9oQe 2Lu6IXpvHIVQMnvBdyGnB8gih9lC0LSHYyIPPemBHebakd/RzNWnkm+39UAo yYPVKJ5CSN65GcU32QN0HVnhzWi9xsYnVOs94E37dqt4AuYbmiWj75y98FP6 ZygZ/TmG0jF6rBcc7PmZaRMpxPVejZIu7V6Yy1INuYkW2Nu/rca1F0wHHJn6 0M3BVqNrlF7QVW5kyCfhPKMkzbx7rhfa3Rfu7yDj/vZrbj2zrQ9USnZu9kKP crDWmUn1wcnd1+kuUHC9t0uGMvj3QemFGP+naJ2dDkrDD/tAKLCGZn8S1lvD sr2RLX2Q+WzaLxR9Ojvd/dNoH/B8Y9m0gubI79+/aaUP4gRO+honY/2rfHlc cEs/YHLc+Br9iv1FQxFfP2xsLqNKSqEQ134kv9x9th/c1oe86FIpRM5WTZyw +2FJnP6PHfpR1uOO7lv9YGsl6tmPjqI7JvPrfj9MJemtnU6jEOJinGTDzH64 2unrXoBW+/GyTq2uH3o3F6yyp2N+PW3R5z7RD68d//z8iD5k15R0QeAD3NBv c1TLoBBfBdKPXj/zAVgUKF8K0dk/TGIv23wAbTbpyVuZ+D6bfxbfKP4A339t NupGX5/Y2OrU9QHix3r7JbPw+eU4fij++AADxc5v19BbAgnyRqkB8ExQVDXK xv7/nYnitSsDwHt3e0MtWtlX3ZPRawDMNEueBuTg+qxWpW56PQD0knePz6Jt yvRCar4NwMM9msVquRifTzYwRvIMghrdHqEidL6vHKlUdRDm5z9nsT7EekUf ZR3iMQjh3dV8juiejE+lW6oHQazmAbkbvb7f8PfD34PgEnIokpRHIQZmdd6d 9xmCXU4rTOtoocpaavOGIajWbwwwysd67L7dPZ9hGKiEzDz2F2D/tUHi/mTE MKSxSawEoC+qzrwcez8MCqsbb82i92pm17ExjMDUWMdntUIKsTFnmFdt/wgE tqRYFqEZHGW4zsuNgGDJzXHWIgphxle7U053BN4kyBk6ooX22Qdy2Y4Aq9WA ltQjzFe/1Myb40bgsWZeGwl9p/xOwcO8EdCVvHNmHb0c9357Us0IJNJxwqti rN9k+qWB0RGQ+TJVtb+EQrR5s9/esjgCQ91lEoHoUY/yoSMbRoE/S0tQvRTn 32XCW233KNSF8GcWobeIx6pYCo6CudPXPdseU4i6xWnL5eOjQG/wItERvS/W Jnvj6VHIUwjb0YP28tRtSdIYBQ0hw3CpMgoxyzQU13t5FBbYjjCS0W5pJ7pr TEchcnX13jraLyVe1ejmKEiMt1AZl2P+2FnYVe00Ct0tCW6v0LGZ7Xrc7qPg WmL5fX8Fzlc6XzN7fUZhV+IJ+0B0IUd7sHTQKDy7S/tpFn2xd99kaOQoGFl1 matX4vzrV+jHTR6FjeczRovQy5sFTglnj0KG5C39bVVYf7TVF7Y8HgUlXvke R/TChX4LmlejMEPHeqEH/WEhyMOwcxSCvgy/kXqC/cOlYP6Ur6Mg1FOoTEYH nKFN7eYYg7Yaj9p1dOlsvewMjIFdlpqs8VOsh7rRrnJWY7AtlKvyFbom62SH fNQYXDSoKgisxvsZi39YnRoDvcv0kh/RPIr+vU+Yx8FQ52LtmWd4fuvp3Ucl xsHkfJbaQ3RMlOra6KVxMFdf7maowXw4Wuc95zIO1mcUjG3QJVoG7lt9xuGG YtTca7RJ/8avMffHweHUmJPQcwpBdwgENoWNg7OsKFUI+sw3ks1w5DjckfIO +ozu+JS2qSBmHDyPtW/XeIHze/OgzGLcOPiI8iQXos/JdBtIJI7DvSO2h7a+ pBBhP3cUr5DHIfBQdelNdMHjA951KeMQvJ9R7i3aiC9y++6scQjn02sSqcV+ pWdOUfXxOETvzr0QgZ4RuRKn9Xoc4neuDHxFH2Z88d50YhzIO5QtLrzC/mhC jkv9zzikb5l0Y6vD/j+UW+2D1ASUrPFmxtRTCJVEnarb1RNQ/vPm0e9ocaXA d21DE/BkuaZKtwHXY/NnYcqvCXj5Wb+NoxH7azsZLTmxSaj7mHfJFb1vatBS 4dwkNE3+GutFm2/5qGxsOwlvB+N/JDRhfK7eq6gsmITOvum7v9AtgdWLV99O Qm/XcaYrzRiPWllqP5YmYaDjXuxTdPPzmF1lXFMw3NrJy91CIZ4fo0TcVJ2C sea9ee5ou1GpbzdDpmCq3uHYIFrjPU96ztspmH/GcjbpNc6z2RvKXupOw2LV 1c51tGNC8p3UuGn4XlZoePXNf/FYr1PZNQ2/itdmnqP9yhRWaFhmYK1A7RZv K87X83NsQYozQPWQtOaN9sl8oKfgNAObsmYDRtFvR795SCTNAH2a1Db5NqzP a/HNyWkzwJQUSE5DC3x84OUVOQMsiT0HqNvx/Q6I3jZwn4HtsQeKr6GVg2hH XY1ngDPSSboOnTx9f5Tl9AxwhdbV73uL/QebVKYp/wzwBLFp3kN3jkTollLN AL+/Sf8kevu+bbwyw9NwwKfYVKkD60PxCSG559Mg6En1JQvdqu+duZI6DcJ3 zt2me4frs03zzfEH0yDmnERtiT53VN0tF9fjuMPnkCZ08a14jsKcaTh5Q4bz 0Hvcb+2rUbXPpkHO+kHafXSwcvuIafc0yJv3C82iPV7uWNy2OA1KJocqznbi PHjCqOosrt8ZQ9dTeWjpPQMCQSIzwCv+e+P2LgqxUnatXEZnBr7Tede5o29G Pehmc5uBNwPU/pPoQfaMq1apM5BWHKCs0U0hmEZuveB9OQOu/oybK9DCku3/ r4I7j4fy6wIAbhfZB2MrlIhkKxJyT7ayhSiytiFLpVBp0SZbKikl5ZmylKJU JPwkRVkqIiRLlFIGg7Ev8Z73z+/nztx5nnvPPedcf1gP3/+SLR5XahW/4rjG vrGumb9khuem/Qi6RED5h4FeH/n8TU7UvTUN+kVW7i+26yP3n1Cf36JvdRix tvr1kZPnlyWt+pYGofN24n2RfcTZ7b7zdfRujq3nd93oIxqrNaT+oVv3bxi5 l9tHOLietPi24foX7dTaV9JHWlp0U+rQa9LtWBxVfSQ358WOde1pcF3/j/d8 Yx85d2a9/F30xU/0J6++9xG3ba86FnVgfat8J3CH2Ue0NDZSh9BnwlsZExN9 hHeh0qcNXWm0jtLgYZKOL5uVzTvTYOBAjV6yBJM8z/74MwftG3zk4rVlTBJ7 yjFT8jvmcxGZlFp9JvHe2uR7Cn2v8pJtoCOTrFVzU+tFHxvnWm+4n0kE59r/ bunCfkjOW1w9gUleZvUEKXVjfVffaWX1mUkuH/dfHYfO4Gvi8Rxnkr0O/awR tHNZ1SF/hX5ipHLwqfsP7NdqlU29LPuJ2DT7UAU6NqtaTi+kn/R+OrJG8yeO n+xljN7vJ6XpM2PX0WbVM0ceDfSTpKORhf/QFe7Z+2d0B0iAHdcxv540UAuj 1W8PHyCgHL2+Hj23dWev3osBIj0hMLvuVxqM6efPcw4PkIHaS6V3/29PnT3r VAbJW4Z4pMDv//89Z87bynGQpIQlk8NoxTCjDemHB8kBa1nOdnTzT1HrsrhB YrE07a15L/5+tNvOjwcGifyoUlQu+rtFxf7QNYOEXZVpKfUnDeI4bWa1WQOk +s5K/ki0Yvb9jfR7AyTMSife4W8a2HjUtJdM9hMb+QLbIvSACfe9e4x+ojS8 Tli5D5/v2Qznos39ZKLyv7o49N/MgHXco0zy6RZJZKOTFgSOZ6czSeaBCicP JuZLDrXaF0eY5Lj5JlolWssrZVRhO5M4ynxo0uxPgztWYSxfEyZRHdxyIxkd xbU6K1KdSebeNLrOo/+1rOXatoRJGm9sl/UfwHonOD/UQmeS7KC2tnr0/I8Z N7YMk0SC9x3DwTQoyExTS1ZiEhepn1730NtT3KweazGJBtNXUZCF84Ud7Fhl wSQcr/u6D6MLtWt8tgQwyddr+9Pb0bt0EnUnrzFJi9xNnw1DeB+6cXCPfDn6 XrkCAz0/Tm9pGmKSpjzazd3DWO/eqvs+dO0nTQYbXCrRkWZW4cmX+8mXV37i qiNp4NF19XHR+37S+KH4Yh/6c7JCpJXhAGnc2rPZlo319N/ofMKBAdLwTYjv MVrfsI2pmzFAPu80qBAZxfOwOfOhawv6j8+ZELRurGZ4PP8g+XwgbkMj+o+j fcx2g0FSP/58Zs1YGrBmu2U37x4kdSc7XiajqZ43fv3xaG6+8En0qt21Dz7m oeO19XaMYzx+bpI+9nmQfBLfMVSCzor7bzBiYJB8TDmXqzCBz29kPrOPi0U+ KuYGRKILV1r5x4ixyIf7zardaIl3RK5DhkVqVy/0bJzEeJK6JqYsjy5YeS8D 7bA0Y5MYnUVqjLd6805hvuxtLN0jxCLVb0/I+6N9D1/Y3zwzSKqts1qr0fzV S1wVfw6Sqs91yRrTaaA6OH9k9s0gee86tTUBLfbnYu3yVPR3ZTEWurxEzWFr 4CB552v7yWEG+xHV/cwEXJ/KgbD4Z+g43Zijo9cHSGUotYk2+//7z5O3VUvR M1U84ei+MworMh/0k4qzI29a0D9KBKaW6fWTt4vkTxvOYX22y7v+Hff/7RUL k1T0vJaVyyGM3zfSB6Zn0fJe/Inh432kPO1mode/NAisX3Xvwl20ypvQ1+hn kQPdxu595HUOU0d5Pg3Ct0+5FNn2kTI9SdY5tJX6QbP7t9DFG3J+oXuXzZUU 4XyvwH+f1QKuf4eCwDZPJimtSlyRjT40suVodw16S8lPAQ4KYF7Usdyon/zX 3MMIQnvf7uzckdNPSjyFvT6hv+/VD5KQGSAlPQZy2pwUPJq4buZwCh2482si +gAz4kn41wFSPBJ3nY12aNs1zVw2SIqO5Tu5cFHgSiayIscGSNFCh0ghOil7 6IlV1gB5Gc33kc5NQVHylSsdmwdIobBOXAT6ZEjZxo0/+8kL+fPcG3goCLgZ yHWCq58UpOeWU+i04iKerVeYpEC95RQHLwWLD68rn8Xznf90wWg3+vjqeq2I Z33k+Tr1qQq05rZ9Nh+wvj0v2/piBR8F0TI33dKE+sgzy5OHY9Br0pJdMzn7 yNOPWdp9aO7V2SuOcqGd6wds+CmYtN5+7bAI1qv81T8K0Lqxm03s1frwPprQ vHQRBcw8zk0vcD9UQ5k1seiZ7yr1bcf7yGTj5jI2OkNv2/Bgfh+p1nvw3FOA glU1+u+XYj1LTeJ98B69+k1AMN5aSDB7z20dQQocxxPKL6QyienWt1dS0f62 7KYhbqwnz5WieBZTcN6Nxkw51E9+ip8+dgB9Pzo1+vqPfhLdYLzLTIgCSVZU SEP5AHHTTd2Wi/abNfmwXnOQaFydspYWpqC+gafaLGmQzA1vNz2Ddm6PHlwY xvPr+EKPiV57dv/bKCsWoZ7S1FxEcP9681b47mORELHD8mVokZ781+bhLGIW 8ll0pSgFZ+3f7BSNYBHJz1o8SWhWvPAnNRzv1b40NYtO4qirHghkkaIr/QO+ YhTk0AxlyjxYeL+x/lGPPqJ+9vTsZhbxdMhuXi9OgfaD72951rKIVh5fbQZa kn3h/vqlLMIh6lsmLEHBwO3Tqtp4/hsPVDw/im7MXKKmL84iGXXKD36gZ/I/ XSrBfBGmdea2LY2Cd5U6HrGKLGJ1+fuVF+iMxj9X/FeyiAzLJEpRkoK21mua ynoswrS/fSwO/bqxWTfShEVKH08Hj6If/rfl7qZNLHJZ2G2XlxQFw5cZx6y2 ssjO/YXbqtB9mwL+M/diEb1Pkja60vg8QaprruxiEZ7Voaa30e2PnLn9vFmk JaFBj5dOwZPizc69+P7ZA9pqB9HuBSrny9xZJMLusvw39O9CvtE7OG6TOyBq LoP70ynMrePDIgpCtjyP0W/Md9BU/ViEFfRwSlqWgnV8i6JWH2KR8g/8g2fQ b2H9i7EzLJK0yu8HE31QVIhf4waL7L1Y2ewiR4HAcy3bbbUsYtC/rLYMfcPg 158+gSGyyPZs2Up5CjwlRPzc7YdI26Ou50noh22+ps7XhkiuoOmDOXSdSlbf mbYhEhl457afAgXCFWbDVWLDxKF25spn9G3rbvsba4aJksaOKKMluH8j/LWc 24YJO+7lsUz0/ijpezvDhvE+JLVfZCkFiZkcJ7QuD5Mb1mG7jqFBunHsS9Iw 2fewcdtP9E6NEN3J68PESEDXxk6RArPVO7Q3JQ8ToYArpoVow6DFg4dx/Hv1 oJ6SEgXXdHgD1K8Nk6cr7dTi0fdrKu/J4nznYh/Jj6HfnKtOZl8dJi5/F4l5 K+P6ZV8234OfX7HZn6cabRed/FDuJj6/e9CYxjIKqv+V68RmDxP54IO/LqHZ toFlqz4ME+nI0KZhdCnrR92+oWEinni00nk5BduLpATdJEeIUPqJgkI06/go XWL9COEvOJ0pq0JBwaKAu3meI4Tr/fnrJ9Ff1+y1tY4cIf++xkR1oaPrGssn 74yQqb6LYWYrMN4epWd/eTlCRmev7M1CW95+82j80whhCV93WaRKwWBDw6xV xwjpU0yxCEIX+Z5zvPVxhPzSvbO2Dv04escGUfx+l/ldFV01CjZysW7p4/xt 2zIlr6OZWS0bbp0cIc3+2TyTaEXyiKPKbYR8jsgd27ES3+f2QrGt7gj5cPHp r1I0b+z+jQV8I+RNXlHlOXUKMjezZPY+GiaPJ6ujRFZhPv3dtSKNNUQuxPTx qGpR0Cy1u61Pe5CcuTU4FouWoz1L+tUwQE7kjPzqR3PV9i8NOTJAjrwab9qi TUHNNU6OYKyvh+qnK5+hH9f8KHxZ20+Cf/wrkNTB5608Ual3sp/4j3JmHUW/ /l72sHRNP9nNy5fcht4XkvpnLZtJvOiCFzboUrD8y7/540VM4qYuEn4Xrbmz NeRADJM4G0v4cuthPky0fzS4k0m22Etv80M3l4pJXkNb+8hZ1qDz3BJHmrG/ szi0VF9zDeZj/dh74yeYhJxftuIKml+l4JzuDSYxSlaVYqNvjdePVr9kEv0H Grzb1lKgeuKm82wXk+gUa42/RBddeM+xSKSfrPqg91tOH89/r4y71sZ+ojxk 9K4bPTIonfAuv58Ir7O9ELyOgpAW1o3t2M8tsnYIr0fPXqxWcfk5QLg9nH31 DCmI2hws2Ko8SKYjPSyn0Fea8gVz7w6SsUQffY/1eP4yVpbKdA2SofQ9K8rQ KUcERi0UMN8V+EspG1HgVuC68N6JRX6/D+KNQoubxrxOx3xuNjjE8xttucC7 5jQD6wEtjMfKGONtJCn9SSWLuO08yb3IhILaqopURdEhUhDNwR2A9v7a+WK/ /hARfxzFVYsOD2WPqHkNkQNfFnGt2oDx99wkpSl6iNROJ3AmoDseTo5MPx8i qkrinINos0Pem5f+HCLnrZI5tphivfF9cltJYph0B8ty5KFPMdpTnhkME5Nr aQuiBM8zv/2PVM9hklKsvBCC3jvUvj71/DAZ78qab0DPPdjlvz9nmDzRfPLv GlAgUV/oEj03TASd9f6NoXu7DKlNK0aIf0Th3LaNmP/46J+/2I8Qpfdls3Qz CtKdY0Wn0kbIqQGz2WPoNpsP6cur8PxIVM18Q5sfKrboZo2Qaz7107fNKQjb E9flZ8gmwxecp+fQz41/DXrtYBO73K9TXhYUcHh06MNRNnnY6DFVhubdrGWW eZVN+Ka7JhUtKYiIvZGmlM0muxX3Tp5BG6c3NNqWsMlry78TP9Av5e8El1ax iUJw8ISZFT5/aWXIhtdscixpeDwD/ej8iEX8IzZpKgob59mE6yN+20k2iU10 u6bGfNHPLOY6G46wCXMV55jaZowv8YYkT2M22bT1wmgsOtWvxPqfAptkHhMY 7UOvarVK27swQjgYl9g21hSYWjxriugZIV7vxNk5aKnYtetUakdISX/yiJAN BaJHC9/xYb6RlpAb2Y+eCyreW1M8QkINqeE6tDB9Yv5GOeYX72XD2rYU/BDx OW/yYYRoXrg/lIge7Ovtjv42QuJyNIZG0EvIGT7z/hHS2/CEtdWOgqHMJT0b ONjEbEqPlY8uf/bM10KGTailLwcl7SnwndM6tXwNm8xaGA+GoxvkY2WyHdnE Lej1QAva536eKiOETQqumg+s24L9HUPdNSuZTcSKqvpT0FxqG7zSy9hk/3fb /ml04XprT5E+NlFd5cL8zwH7NQNJzx0wSs45tfYpOFLwrWTdPtvgUdJ11LPv FJqHc0lU481RYkJ1//2OfrLtiP6xt6MkpXLvX+KE/TTvBOf7/lEyzvz75y66 x2fLQUvaGNkqvv8P51bMZ/5PMywMx8iTdSO9u9HPLy4MiTqMkcXe4b0V6Pvh H4467BkjRl5aS1Y7Y382dDs/5cgYCfT843wDLXTx1W+HmDFyy+Nu/AL6frlJ 7uPkMVLtvuPNPhfsHxepZjHvjZHJHRJTDeivbRcOkNwxorrjg5bxNuxf8vbd /1UwRra5RflmorMX2pgSpWMkynXDHeHtFMROWq/782aM5G+faDyCrjg0wLnw boz83JYn0I0WvGEz51YzRsS37QNrVwqmjc3tjT+OEXBRPvocvcr4hfxA3Rg5 6Nz2WN6Ngg1Bpy8/axgj1NZrv6LQHzLOfGxoGiOfnOzkWeiQ0ptzSa1jZM6R d6vrDqwPCRmWxp1jZJVjWWw5+tDAuTqxnjHi7nD0tbo7BXyns5anssZI3Bad iSR0Y4b7mCDXOCmy79OcQ8dMm++KlR4nf+zS9/h6YP8QfDHm0apxIm3nkVqH nvrjHiWwcZyE2Xziv+dJwdij9Ue+B46TDOtoU0EvrIe1d7KiIsdJ42YSHoqW ytBWqk4cJ5ybp3I60ObKCtwb740TnU3Pflp6Y/7VX+X5+vk48bEKlM1Dc5i1 dIlVjJPLlssdZXwouLpCsKKjfpy8suiIPot+Fj+sG9w6TgbMk18x0bYK+W6L OsaJvPmWMeed2J9cOLFn5ts4sTHjX/UKTYWERl5sGCcRG8t3qe7C+IyrbOZ5 O06yISLlCvp3REpy3qNx8pXo1U+hnw7KMJvixwkf6efdvRvrwRONX5P640Tf NNPkA3q3xZXrhS1jZO8Gr9C1eyhwKX39POXwGLlmIv0oDS0d2Obxd/EYeWtc 3823F/vTe/9yhzJHyYhRLD0Enf9iU8UUGSVKRhu3fEN/n2n5z76LTRzWz0SZ +VJwurIm3/ACm0Qa5v+Xgzb1M63mXsvGeA9mS/rhenYs3HGdGiGdBivUI9Gb E2+dYrKxnzL47vMHPW7FemI1PUJM9G/ecPTH+nlVbHeAIJsErXX8VIxexUGr dljBJqlrBHiW76PgksoiicnNbFKj99YoAR17heuQZxibTOmeODSOVm2UlD51 n03UdNdmewfgffaUk97272yyXWfwexU6cNmHiV9yo+SC9n0p3UAKDg9XjTx0 GyUFWj52qegwsaFfB2+MEonVDcXBQRT8q+Y/3UQfI3XqL66L76fAorPh3SrF caLaTqsKRcfZBJj27RgnkQmHp5vR3EtDTp1IGictGxpWGR7A+UW3Hz9cOU60 h7S9U9GVTHuD0OFxEnv3cuIcWvG/mi0mshOk22nwrfdBCji/vVVPN50ghtx2 4+XoF2l6qyN2TpDEgkdqy0MokN0t8To5coL89RVwv4DmP+1h+TFlggB9X8If tJc9v+rIkwmSUv2+zPoQBRMrRKtayyfIcMSKkRx03q7gy651E2TzqqjlIocx v9N6uW2+TJC7HT+3haDXC786alE6QaYubYxtRKd4zOWJpU8QJ3K3ZG0ojkf8 O7AoeoI8Gp4fuIF+/UP26IWACcKV7qU4jW4Qy4n/YT9B3J1LnTzCsL6fFQw+ snaCPOeRj3qFls+72pm2dIIIFkYUKoZjfpZKvfdMeILs9m/9exYdp3Xq+GLu CVIis07+F1rg6HUNXo4JIlGbbG91hIJzL6RX8KtOkMATY6ez0dnGMRnuuybI W03n54JHsd4lpbfIZE4Que/PfgWj7bb8FlQanCChV8To9egY7o8JW4wnyUc4 aK17DPOn5Zfsc5cmiQr704lraLsHR3NSf06SJpeL3a4RFNxUiL8xlDhFNPmY EiVoPrcRet+fKRL1crOlwnEKZOyd41cbTpOOfQ+ORqL7eYxzj0RME305vkfd 6GTBnyvliqbJ5Q97O8xO4H3515NNQ6PTpPdkhUgW+pfsIsdPmjPkRteZ0ICT eN4Kpo04k2cIK7Er6wO6ZaVPLm/lDLEyM21dfYqCL1L9KiFDM4QavSOYiB7h 4hmg02fJZOasCRtdd1TMusloljhudz/oEonxVrHyzm3HWZLNX3yvED3jtSeT tmuWcBTTm2ROU3DnTsHUtgOzxC3wCN8JdGrHXvPOY7PkqXyzYSe653iplsrZ WbLo05ogcgb78SZu36yYWbIzMintHlrG6nxie8IsKdYeqec+i/cjzfMeG6/O EokfDlx+6LrftiFOybMkMOnJ2mr0vU8rIqJvzZK35sL+GucoEONaq3k1Y5bI jQfdSkCn5rUnW76YJYfv135goUceqhxJrZolta7q847n8fxm5hf6tM2S4yW9 u6WiKFjkb7BwnGOONAZZJh9FNySHtoXQ5ojGksyqb2iepLhSadU5cq6Oa8b4 AgWjIkuumBjOkfbTuzQptEJ5o/Fz6znCJzievCga+8VPqR9t3OeIzvXYhcPo fvHU28/QHksVAjrRV97sVS5DR2fnNW6KoeCB3cOLFh5z5Kmeuclz9KXl0otk vXD+0pYshVi8bxfuqBTdhfNvChSNQbsdWcaa88f5G/4dG0G3Ny7NLziM83tc /ekRR8E7k3+w+BzO/1vF7j16t0rwu6YbOP/Bohc68RTsspfZxlmG80/bKt5G K5w5VNY0jfNHdcXyXsT4nqFdljb+R3REQtkH0Voj82o9Z/6R6GWp7ywSKNiz KsfmsvQ8eZq7WjsPzdkaeDtr7zxpN3iTInuJArWvB62K8+cJ3xsXrii0i1dx 3m+uBaJj+zeIheZhWBlvclogHs0nmt0u4/6+7bh+OmmBRPuIkgr0nKjz6O36 BdIeaiCRcoUCXXmp4DXLOIBvvuYEVyIF88bwW8iUA3RivX4Ho9v3LH7MuYMD ou9EFW28SkGX7tHrGxNw/F2jd38S9gOF7lcq/3CAu4Nf9bZruB+/Vi8Ez3HA hW/TuuXop6qvDC3FOKFtUIk3+Trex+6S0Zv6nMB7rODAAvrbS5s++U2coMO1 uTUgGfMxY+O1n66c4J7QvrEJ/dLqac6wPydckD6YY3qDgoUZKb/T4Zzw9C6X 1EP0wdzhOOOzOL/GjUjaTTwvKzRYaQk4H3nl9BfN/CngsyYD56tx/G9rCn5+ p5tP8xOcz/mXyiv0UtntMbMlOF/n0ctqt/D8q3917KzC+fwXT11Fv3mSp/+8 GZ+XTe2aQx98l5/37BfOf1Lvg18qBdVsHsvXMzg/3/u1DWiLq26zRhJccCFx B2V8m4IdGY5W7zW44KncIP99tNXUSRMDCy5oyzxzSOwOft5n/5iPNxfoFD+w +I2+lv6NW/86F7ibGz9xSMN6vyQ8Nj4P5/tURy9Bx/6lqbNq8fs/xpmXKQoS ZJqj13BxA29wnMs0mvbCTD54CTfoTCiU7WFgv3glOr9vHTdcELS4angX+63N +3laArhB4qGr4D2092D5+P4z3EBtCjovcA/7wbkNZSeTuUGjN3LuEFrg0p3O T9ncUBiVFN6GfpJ//YtmCTeYLb/PMkvHfkP4usiPt9xQ96bYPwfdGxkSOPWO G9x3fuqmZVCgoyUmmFDFDX/mu3ecRB+N3/mfYDU3hKWNNf5CH+ZysOvBcQ6T RXb2mRhfPDXxUeiENvl3L9BHOUotvNAyEdqmS7OwXu6R2tyBzqSbv4xGS1Jv d4fU4PsWbtcZQscvebY79iM3lLoEPnS9j/npbIhQays3WI+eWlaOPlbAvHTi Lze0XL16e+UD7H/umZSzprlht06W5FV01B2Dv5LCPHB8/0e+3dl4f5Lcq8lv yAN8Qt2na9HcRoaNtxx4IOnR6JTeQwpy346fCd7HAzl/5Pq5H1HwV03bckca DxhGa+0NRtsdd/Z9UMQDlSpmnU3oo4tN0z428UDHroD6rBy87yyL/+UgygvC HS/zNz2moDNn9s2yi7yQevyD5lO05SmHqxI5vKAq25Ul8wTv76rWfBs/8ILp dr6UPrS9GLNIRIgPDn52OXnxKQVKGZ7/Nl3ig4bKEYv6fIxXxx6h6sP8kPx4 Vcv2Eoyn62pR2XYCYDP/y6YI/ePW5l/qOwWAw4F6LfsfBVAc3CMaKgCBw2IP O9BlLYc6u28KgNLG2iWmpZjfqFz/dY8EoPnq+SQGukicyqspFQBYM3Fi9ysK Ll52u3msRwAmzucNV6C1dp14zzElADlN+3xXlOH94rjzal9RQdi5YllbNHrL Ol6nFg1BkD7SvuUv2lwtWil4kyB8fH+9wvo1Bf/VicfI+wrCWfoWwxy0zPOe g9/OC8JAUbnygXIKLsPmcJdKQUgXOH6jHi057rRv9rcguLqvWaz7Bs/X1JX4 qEWL4e1s1tgoum3+hoC442K4aXqxKqIC67dkTSlXz2Kwu2Jh0o42Zgv8/CIg BFzd/56aVOLzVJW0JuoKQfDZkNQFdKJp9QX2eSEwq9y2/8J77Ie1w8YNTIVh SlL0Zy/6voj3cY9QYXjsW719cxUFxXOTj9qyhUGG3xgWV1NwoUGzJI0mAnWu YwXBaKclwDLeLALnsx+r16EXm40d6zshAobTfpR2DQW1h3kvOD8RAZa1Eu0q +uZP7Q1qXSKQmfotho0OrdD+KC4iCjv6k+aca/F+Zztx5JmuKIiY2B16gS60 zGuudRKFygTeXukP2L/lGmZJhohCRGeZ+zF0n1ihdX2CKGhpHav/hp7msVUz zhaFW/XMojsf8bz3WC9d2SEKW5QyV8+jn4/MLKiPiwLPIa90n08UHOnP3jbE JwYHJD5fXFaH+Wvx0Z0blcRAZU8cRxR69Tda71EtMfiWbxb+G01v17rGNBED i20vvLPrsV8WsTmf6y4GM1kHvgh8xnwTu9AsGigGeRNqm4PQI1VpB79GiMHe TT9KP6J3H15wFY4XA7mUVF2tBryfrFq48V+qGHz+63z/Cro/5ejagRwxuLBe WH4EHellbvjwlRgYxb+/srWRAgfvNs+YJjEYbjvNU4COv+R2+NaAGBzjOfB0 yRfsTx5L9TTxiQOHlqdnDFoi5mf9TyVxiHW1WTSCphsvsQ8xEgexs4YF7k3Y P/QvP6jhLA4pj1R3VqITS1xsygLFQalJUkirGfvLGuHR1jPikP2Pq+gm+pzR 41NqyeKgrTayh7MFz/tt6YtGD8Sh0LFLNAi9OX+gKO2JOJge//RfE3ppchhH db44vM/4z9/0K/YHap6M4UJx2PLpIS0bre3o9GVLkTi0TNx8Ld5KQdo4Z5ss 2lspOugEuvKf/Egsfr7XOoz+G122xX77F5zvQOjuii3fKMisM9+k81QcJu44 HixCX97zmPNrjjhEvjeVX9ZGgc2l9ltwXxz4hjWrLqIN/q5T/EGJw2VZ+dBx tG/DJEfGTXGQNhdQ9GmnQLChRLMnURyo4MnaarTbQaXE+XhxUL3x+4heBwVn 1lbLbI0Wh8evvyy7gy7JdiowOi8Oa/ve1PF2UqDu4ukodU4cSiWeHj+I5n4d 02aK4xYmlOo39OlDoSAZIw4ffRMazb7jfk4c7p/B9XS5cjwyF31G0nHr4Vxx 6CjapyHdRcESvbBi13fiMLDY8lwfeu927ui0OXEI01+j5dyN52erWqC0nATM eSu3laJfGvLYaRlKQFSsaLTqD+z/z08EHtouAULP/+kmonOeuPMFh0nA9fb+ zml0+ZpLXo+uSoACb1vcnp+YX6x6rzbcl4BMrWr9T2h1k+8SO0okYJVb4Q+D Hjx/99YKF3yUgOdnMy/dRTu95qz40ykBRjlJ6wV/Yb/W6XVkelAC3jad+R2K nrHYFcCak8B8feBqJ3rOROX7B0EaNKp5bdj0G8eFX0vfpNPA3cm27ylansNm 27blNPh5fH2yXC/2X8sr0z5o0rAvV9sYhe7c8lvrri4N2J+kBgfRAhYiQZ36 NDg+yX3L9Q/m23Me09/W04BLmW3xBn0yvu/MwAYa3qO7hzX+UlDT1pQdZEYD sbC6O9fRa0bXyzzZRIOUtNLN82gHZ/0jgltooFT1aMy/D+PxeE/A1200yB5O uduAzvi7MzXIhwY6cjF2xkwKHtWo3LELpUGRefhUJlrUPtYs6goNYP+eTJF+ CvT+NB4Rf0yD6htOjsfQWdIk3uMDDRzLydwP9NwO/rqaPhq09q3Oth3A59P2 u1bBLwl/TAQ5FAfxPpbQ8GeCSEKKDPXgLDq4gONAoKsk2IzpOvxC/1auHg4O loTZ+ncTViwKbiu3dFWES0Juzg7qIVq1/Wfym2OS4BUzaCk0RIHZ4iA2T4Qk iOw5O3gA7eUa8O31EUl4bSqV3ID+s7dVS+WwJITIPTRZO4zr8e15y54gSVCe MPl1A83nPlrwdLckNDZ8vjiNPpFw/bGJmyScf7x3jecInnfpq5nr7SRhbdxU Wxna607PqW+mkvB7b8I5ZTb2SxXSxXo6knADlDSi0KpH84V9lCRhanJThPUo BVc1QlseztPg4Zd2pVx0yq8TYvqDGB95B6tFxrC+eFzmT2+nweKL3CGH0BJB aUvVamlQ6neT3oRuGbldNFNEg/1mq14bjGP+/HjS0DmbBkuXvva7hV7Tqsfp n0KD+umtInPoJeyn4cFxNDjT3PvCe4ICk95Z/XtnaKD77LjXG/QFgziNZREY jwkivCqT+HxfhFwyD9Pg2r703Gj03r71lRL7aWBhYeDSh+bNrEhw20eDccXa WdspCiK0vV7v3EuD+7NeGU/Q714W75feRQPXryM24tMUDO1LeLjXmwaL8i+w Q9FzB2KjDDxpUHxZNrUFPTK+U+yoO8Z/4OON62ewvtWwmyu300DeamPfbXTu hgnVOicafFRuTpz///iKvN877Wlw6t8+w12zeN+Iu1R715oGWt/muirQ30M4 Lz+zokFXQWKM6hwFL34c/1toQYPERBXtOHR6T0BSkzkNNgYXtfSj350ytdDC cfYmu8gt/7A+v9xX+MeSBhnLu1c8Q6vfdLungvO7LIR+os1j/OnGJq5zoAFv O3/4EfQTw6/Z+R40KCy8rfANPXE7+WhxAA38k7QrjRcouD56LlsG11fmQEUQ hX7w1fvPXdyPGmtXGicHAxy6/3Yp38bzvaK/ZA/6UVb3hiA8Tx0dEoLqnAyY fk//lvyFBndtd2fnczFAe5ZBPOQkwUltwkGamwG98falmeqSwMUdP3ns/25a GfnBUBL2ljyzMuVhQG13xtb32yVBXZ3zdzUvA1K/2lTxJ0mCiazUHXU+BhiZ rRtuvisJWwTUnePRSpdS40WfSkJYn+MbW34GFAUc+Hq8ThLKHt5Nq1vEgOO7 xL89FpSCz7cKXLQFGFBfRuc7JSsFPXHVixPRou2pKhorpWBR4HCEkyADlH8c ZqaZS4GzBmxvWswAzxi+oc5wKfCTcxHWF8Lvrz506fk5KTgmuK8yGT13X26g 6ooUXJw5cWICzRMo+VwnTQoo5hU9V2EG3Bs8GL3wSAqetmX0vUTHZZuKbSqW goral3dlRBjwPW9Zl1SNFLSUfHCNQIcEdTg7d0jB30ddIm1o20Ce2fkhKZhJ HX1nJMqAz+LiZye4pUH4Iv+p22ifqmNJdBlp0AvS7vcUY8CJYT0Be5AGSw/z 9Ffo61qHqxRcpMHN1nXHUnEG6In2vk3wl4ZA4yCx02iHSZ7s48el4dSq01Vd 6JN2lssrE6QhUf5aJEgwIJ+9SQjuSEP64gf699AeKyI+MB9Kw4vZkgFOGgMS T4a21BdKQ3V/XcZudN/qR9kTb6Whrf2newWa92DiK786aRj8MCGuIsmAzvBb iWrfpEEid+mZ32jI6fYuHpAGlTt666ykGLDJktfp1rg0rEuwYt1Hj5+QHfrz TxpsTrpn8UszQLYvtf0OLx08gw947kOfeHJEUFaIDgc9z9Fq0J9Ek/tXSNDh nN2NWnU6A+TjjV800+nwQLPMsB+9tMyg3W8ZHUoUGodsZRiw5LB0ZrAaHT4K 9d7PRcesua7lrUmHrrlpL2FZBtw4Pf7UXpcO7AFhqQNojy+nd9kb0IGnU/lj Hbo359iRg8Z0oH/SP68tx4DSyrWx38zooPHK2igR/eXs6iXX7ehg8thrZBhd 7N61xmk7HbakHcp2kmfAR5fn//760GHXpQs+z9F+4SK5awLoEHbqljRNgQHP 33iECBymQ/T+x59C0Z2mXCfNjtPhltebqCb0dnYAx8uzdMi1bzbWX8IA6x8z WiSWDmUb+tjJ6H6xJevzL9GhYfW/hxPotGhDx/6rdCicsEzxWcqAdKV2ocrL dLjz+nJ0Nfp+Kt+SxDg6nI39GqariPFR3Pp+xXk6+Dkp7UlF+0COQvkJOtjK BThxKzEgc/SrTmooHXR6npFgNPNGkdRQIB1mwswVTJUxfkrnUsfdcD03JAg+ QH9+T9u5xJEOlXzNU6LLGPDTyN2OtpkOD+uX/DmG/vVGMec7rt/lFL/mH+hu fnul7aZ0CN2VV2GznAEV/A6S8UZ0cNOYepaPPl6aNBS/jg4bRuGuggoDRpQu yAXo02FZadzlC2hpnWv/1q6lA/+FxpMsdPMvdc6FNXQYsJcPcl2B8WFUeOkr jjdI791Rjm7WyFpcj/tb2JW7SV0Vz7OiSeEs/t7t7HH9JHT5IAQzN9LhzCFT lVn0r+y4KpY1HXyNYiT2qmE8TH3VGdpKBxvuzxyf0EbRg2KNnnTQ/igzpL8S 92v64udT/nSQTN7VSaEfz4S1tuL+flcdLQ5RZ8AP69V7DS7i+9pIh0quYsCi rUEZ51/h+9J8dp1Ct7QZKBjX0sG044FDL7okvkds8Vc6LDqwXrNIE88Hyz+w Zhj386rnbw8tBkTvFknkWi4DZ92zvlSizecDVF5oyYDfctab1doMSG7v+bDB SAZ0XpymFtA7Zi1VPzvKQGVrumuGLgMGde2rhk/IwMN7/ZZCegyQ5I3uPBkt A5cD164NR38Kla60TpIBt7l3YpvWMCBH5KAtM1sGNrwTWchDd0sIecbmy8Cy y66DMmsZMKN0jnnxlQzwu95tP4vmyPpPq+29DAwo9tUw0bOCGTvd6mWg4a9u kbM+A0bLlhX1t8hA4bPj90vRQ5or9kd0ysDt4xXXVxgw4K7RyM7mHzJwxlzo /GX02ga+uaU9MuArtO3QJDrP5z8OF7RNc5rPznUMcHvQ8DHuJ74v1Wtfgw4L ECpr7pYBKX9tEz1DBjj5a+nZf5cBlZ9LVK+jt4XrGJi3y4Cel5DYBHpXiYBm 5lcZgNaZadf1DPj6tvfg2S8ysMW5r6cYrSw/5jVQJwOedV8/yRsx4MzEGrpi jQwEWr9/eQq99iv90Ei5DESTjIsbjRlA+5tyt/CpDFwvuRqegebImfNTfCgD 6fpnfHhNGBB0z8lMJ10Gnj49YO2PLpCc1VC5IwOvV3mtqUHrbvGUNbgpA3X3 bZes2sAAl5utvPeuyUCHshH/JfS59V/+Mq7KAPPOyhEWWjwyr2Q/eopOb3c0 ZcDv0iuLW27JAN813nfP0b4KicsvZsmApMjYE0mC8RPVNM5+jvsX9zPlCDpG 6MGy1jcyoMvTcK4V/eWDkw1vI67H6dfBRoC/922psCWu95aZ//93eswvdm6L d4/j+w/Ha+zciM9fbmjsLS8Lx4IiJN+iVwyHPm7UkoXoXv/55WYMUP1T+dZz oyxkdFg0/kFnBRx++3q3LHRUz0cctGBACiVm1n5PFpjmg3sa0J1jjlbHn8rC VFm7/RpLBtjxjl48UyYLfEa165LRK/uTuzo+yILUiyLlSXTzm1bhyFZZUNF5 sHiHFQNyr3WVy3bKgl5O8ngJ+qxwzNWoblkA1aguhU0MmMo7tuFrjyxsuXe4 JhLtlvJyPOSPLHgq7MrvRjN7rPqf9stC4E2HNLPNDBjLU3eYGMb3kzCNyUSX y+7ZendSFmIuaR7is8bzbjqxQoRDDm4skvfYh5407p2hBOUg87yAZS26UsuA 6zldDp7PT2pp2jBAp6DWO3y1HJRH9MpcRj92ENQ3sJeDurEmrmH0/WdL/l05 KAcdBysGnGzxvGqd/KR5XQ6mfe+WS9lhvauf7P76Uw70trrvS7PHfNg/sely gjxkatS9zHVkwMaxQtXJPAUwtvnLI+fEgIGdk2HrmhWgMYBrawx6/decleXT CsDx0GBg11aMr/eJKflkCXipMZToLrjfNxuE58uXwJhV8f4o9Aa/0PXVXUsg we9LyQg6w1t3neD8EijJ4t/2cRsDTNPfbVRcvxSkVULizroy4L1f+1Bc3lJ4 bB7fwkKf9Nu7t//DUrDYk7nc0w3nr1o6nfJnKbSfKwupQQdrrBE+y6UIh9Nb XxnswPyjXbtwVUERBN6yBTPR648J6ZToK8LdH0Ju4u5Yv9P1Lu2zVwRDTrWs SLTaZd814bsUoV5pI7sfnd27uCUjTBH8wIPs8MD4m/hUJhujCPM+4Qnv0dl8 LuvmUhRBk/FQ9Z4nnn8n+/nb/ylCRVlFqIgXA04pindnfFQE9++d5SfQA1JG xx53KsLIv0nhPvTFyBCx7yxFiF0i4bHdG5/vB/vuLLcSKG7QzK5Ar9jRefac uBIUelqN6/gw4J+OfnvpUiWwP7nTjEJrXX20f98qJfh1+/iVxTsZsDx9cNps nRKc+O96xzH05oQnIGimBBLtT9R70YuOpXGdtFWCRzPVR5x3Yf69FMix3VkJ Nsr1VJSjpSfezWzboQSt6/+Jae1mgLpOR0eBqxKE7KB730bvO6WhEG2nBPwR ujmL9mC8W6ty/CNKQKXYToWj5zUf/C3VUwL9Il/LHnTYmyj9gBVK8PHr6STH vQxoZdywypJRgj2Tt7peoc13FZyQFFaCGekCzVW+mC+oF2vd8f2vGtRFpKA3 9fSkr5lShJXb/77n9WMAl76xSsyIIrwO55IMRT+7/9+YE78SbE9W2NWNvmIc 5bFaVgkGCwye2PtjP7P32crh1UoQ1eQ4W4L2Xn2qbK2lEiiMBW5euY8BV+8p n072VoJ82oXkZLTZx9aPuRFKYLOG8ZMrgAEaxR0CUjeU4OfWYu0QNC3MP2Vf vhKIJQ3W2AQyIOnMtJ7xkBI8eMZPL0If6gvjHhJSBtMG5b0rgvDzW3yeTKor Q/Ow8bMk9HQxO3nIUhmCxbbPL6DvGwYoHNqpDP8DyFGmuw== "]]}, {Hue[0.9060679774997897, 0.6, 0.6], LineBox[CompressedData[" 1:eJxM2Hc81v/3OH4ro0FoEInK3jMK52nPkJGV0ZBSGZEkiozsvbkuXHaUEUKI KCtENqk0kaKISvzO+3b73T6v7+uf1+1+c12P6/k8j/M45zziO+Nm6kRDRUU1 SEdF9b//J30voaaKyyCo/v//Wtrr75/+f/w1vcu67f+xhuZsZWj8f/6RJnRm R+J/NlYverov5T9vTc4Pks/6z7ePZm+5VPyf6Ru6R94//c9jbWfiMyf/885P m6KjP//zR+VXibzMmf9nOh72j8UC/7lFNpwW1P7zzGk6Gmvb/2y87+tsped/ tmLYms0R85/LbiWpNBf+5/PMhxs/N//nxsFZhgPj/9mOj1sleek/Z+YHA+f2 rP8zED/4+AT+s/j5FwvOqv+5rmUqtNHqP8cUWDOZePxnqifbrZci//PYYnvY nsL//LdsNte3+T83kDTDvo7953aO7Vakpf8sVzbGMMhE+j8TXpPBuw6TCJcu kXevNPdChPS1CG90lpV01xcfDnj1jTluDP0kqYGV3MMJ5y+qZ2bxkwiZQ8ee vGzlhnKBqZwNdMfVgtxWBx5Ye3+t0FEA17t3jubYNl6ItC+pPCxIInh/X/sk Os4HQ1waj0LRta+KrIs6DwLP+FTjF7RRB+Vh2+NDUGG2s7NMiEQMd6z3Pi7k hxHd69NyIiRiuXKR6cQlYeClZ/2Qgt43vEn13EoELrbdm11DTz74XBihLApV AZrfbURJRHX6sV8XdonBusr0ciP63veYWZFpMdD6e/0PjxiJoNBdu5mRKg4x daxUgehOmcDCQFUJGLtWuuU9OviVttO9lxLAJ6u1TUucRLw9Zl01bSAJLovT O4vQ/s8Mwr7cl4Tq+z57mCTw+avjw23mJeGfCxv3JXRha5GubJUkaAuV8fWi 5aLWPBUdJCHuo5agpCSJKP0uTpSuSMA45Y1YPPpAz9K7Fz4ScNDxhsxPtN+f hejpeXG4vJ9d0UKKRNBbv/DhMxWH2okylUdozmcKoyMPxGAzVVuDU5pEeOwf fQ1bxEDX4q3uTbSZimUryUoUEth8jV6jP2461kqXicBkP7s5yJCIF59K+4yE ROBw9H3rXPTft798rjUJg6u+jgOtLK5nI+HsYCkMjxjenXNCZzKT+Q79EgKq Z74uHejGmnip0XQh0L+zy11YDt+f0YI7QV0IEuHBtUi0W6vsFZdFQZha17m5 gA5Lv1HqnScIAg3vAozlSYSK3lWHXltBcLt+M7QSbR15kTWEUxBofjyIv6ZA IsQtGEmKJAEwKNdNHUXvrtxmquQkAEmXZ7KUjpCIZtrdsi9kBWBa2I+Sie42 4Yi9yCQAgp93F/9DHyQx1YR/4gf3/PL7Dookwvzr1M/8Hn5oOK33sBWtpR6a IVvPD7QH3tcdUiIRDnm/V++X84PhlF9zCNqNXdQ2Cp2Svqf9MzovhZldBz// 5mRFl95RzIdJtpK+WX4Q2qXfX4rWcv8ovyImAFcH3g/tOEYi3nzS5H90XQAe x/hPuKF7LFsrr3UKAJ3h3rcDaJfXc7sT9gtC6nP9+WRl/H5MiPHFPkGoOsUp RKVCIi6o011VlRCCvh+fz7mgD2m8WXONFIK5sNrcITTHtq7RufdCQH8gZFpV lURk+M+amu8QhoM1Zlwl6AfGnNfv7RIGVYODVuxAIjQMuD8e5BAGm3eLSf7o mFGr3r37hMH7+pOBz+hWW3nH99zCkLAjhtmUIBFswNH35qAwPMg7ZdCIrv7i rOMsIQzdSqJhAmokYupJxPorNWH42P+7PQ59QfTz/gAHYaA630n9F52T8H7y WbgwcK+nqDqpk4jsiBlFyk4RUExwutmPFmGVE8soEgFzIbk6JQ0S8T538Me4 jii4N9Os5KGXxW6lX/omClHmA9LMmiQikvJLzDpNDIrnsl190MM//taXqYtD W4Br6QzabbvRcfc5cZjeo/LFUItEHHlX9vN+lAT8KdvG/wj96sxYvZuAJOzR mDjNp00iDrPT6gXnS4LMeDE5Et3BU71zZUkSjNyuT66g9a+KTslzSoHLFm0O Rx0SEX4tPuewrBSEZu6y6EafmRI8uaotBRTp9/FyuiRir0uE/7S5FDR3VPaR 0XPvzFO32knBhF3ANiY9EsHDcOhwmYMU/PpppOuJ/pUVl//zlBSwRuwPeY1+ cV4pndVCCsR4v7bq6JMIUSW5j4nHpEC3tmGjEl0x8+cSA4cUnDMMP8ZtQCIG BJ5qjr6XhIAZS59QtOnh4nvGyZKQ5SNQs4iONriTp60jCXXMK0s2hiRCTES0 K2JdAoby2ySeoceP+9fMPZKAxaMJlySP43nUNKOR95OA7QOOxelo2sy7eoqG EiDkLPmR1ohErAem31cQlwDNf//4XNHvFIVf8TtIgEPiC/sxtJZ95ocnORLg K5yZqW6M+cTRJ3BnUQJSnlwcK0Nfj82enjWUhCoLxd17TXC/Py+YeFVLQt88 vWkgmiPf4HQ/mxTMBQ7HzKM15pWVPY2lgJ4jv8fiBMZ/qt72XKwUqGiqaYmY kog7NA60OszSYDXBcicJnWKmcO4EIQ1e7tPNG2jFsX55Vy9pKMu6qfjKDH9P LZPtzwdp6JTRv6ZijvV1q3e890EZ+NDJUVWENu49d4H3nAxwr9SI+lmQiDbG l1v2/pIBxcjgC5/QK+dWwENHFsz5zApMTpII6qmIqi/JsuD+iG+mAd3/W/be xBdZiDy+yMNvSSLkF8qeBWnKAeOa6qVotLdisgcUy0EoJfrRCjqp4RNlZo88 0B6forW3wvoyeefHvXh5CFgVMXmOHqM3+D3MqQAbuTeyJKxJxJciXpPcCgW4 adj5JQV9SOBjrL7lEVj7tUd+E71v4cYJFhZF8M51CnS2IRGpynRl078UYdmg urcfHVX89XbuohJ4/KLZp2hLIgSZ3d77/D0Klw1yqhhP4fNE9iwOqanA3Mq3 DXe0XaDLeVY/VXDOUTEYR4eJitMOtgN80I9KVbMjEd/++Z6sjybgzMrE+xL0 yapX+UWgBm+zhaXY7LF//vt+7BS1Otjp+/j5ojcU5m22rKiDVfbu3QYOJGLP 1FvPB681YVjv3OmH6OM+BSVaPVpgulx1n8uRRNQ3vTjoWq4NL8nUf4LQQx3H /D1DdeC4non2V/Ry6ejJXENd6P5JTjA/TSLqQkKOa2zogi55YboRvewmspmf qgfPdJVF+c/g7y3Fa138oAfqPyOuR6OXOd3PfmvUgxbSeNsKWpwufneuvx6o 6ArttD+L9XOhLclYVA8afnifeo4uZBvj7OzWBUXSs2KJczi/PMh6PeaoC7U6 u1ZS0NGbbzlMfuiA7I8zaptoeg0vuvUgHajIqox2dsJ8quYfv7dPByR0qCb6 0Wlx7f0ij7WhdMlIQPE8nieoEJwga4NQFulqDlqAI+xp9xNtKNT+2szojOef fzwl5bs2HFo6us0Dzdj//cxPMR3IyQy3HP+f/Tg+pnjrAI/2WJ7aBRJBk5w9 qdCjA5mLAosl6Be3B+jChXWBI/OaMttFEkHK/8OjEacLKVrtYb5ousvOX/Zh /NgX2YZn0JbHzh147qEHzFoVVx66kIgC367ufFt9iPq+Uc91iUTENYl84hjS B6aM4/TB//MMd4e8kQHQfZ8jm18mESFGz8drNQzhTrrSfCOaeiA0Uq3JEDY1 wo7wX8H1yuZonsodB79vI0HR6LMBv24blByHP2n8L1fQbPMP1Jc4jcBHw4vb 3pVEqBnnTBteMYKVhacXnqMtFisKO+uNYFHdkTrVjUSMKu09qKZnDFcWHhzf RFNG9Q6/iDaGudR/6c7uJOKcC8s0DBjDx68ZMooeJOLZffptm6ImEKUX65uO flcnEcNuaAIyhUFP/6B1OkK0aK+YwDiNz9ZTV0nE+QzO5m9ZJhDgcNm0Ca3H vfubY58JCDQ6ZvB4Yn83My1npzoBvRwWM7fREnfleiKlT8C+QZWr6l4kIn7Z S/FN/AlokZBpyEPvqU/nbn9yApwjBWi2XMN5K2YxIHD+BDB/2ad/Hn22fkoi a5cpVGuyJHSgX9xq/Z521BRscmknhLxJxCxhdXDB0BSoN1b5ItAnzwj8/aBl CsU2Xy/Oo48aaWiDiikYPXpbaXgd68cUw2CinCkssw//vo/2/fTisq+4KWS6 d6mx+JCI/RrzHyKETUG9tyncHX2o5zGjnYgpfBGuGhhAl51MLQyTNoXY0EJO 2RvY75pHogoIU1B4n3E6CZ0+PhhuYG0KUxBbsoKmCvxwic3fFIKygpZO+pKI nxFxMRtfTEHk93WlOrSy6qoYl7MZvLS4HMh5k0Sw3hlbUPtmBjwsFqxT6Gcp WWcjWSyg/ZKetYofiZg36pzOKrCAS50quWT0qisVU4rySagLFJA+7Y/nrUZw ldvJEuyn9914irZ85hCY/sMSthxjaT10i0TsfMfEkX7WCspSaZlC0IxKLBX/ iqyw3qyafEI7Rv8VcvxoBWsmX9N0bpOIa4neNRPc1pB9/+3bYvRZKqGwu8bW 8PV8l/ulABIh9OZF99t71pDQ1lT3Am3cwJLTOmwNSrxVVBKBJKKpTzBUhcoG 3voV6sai8182lruK2kDoeEbcIlray9vYzcoGxBVix07cwfiXGV8UK7GBoYQg 3ofo6nfuc3Y0tsBneLniWhDWI/XLMicf2UJnsePaCHqsg/nJTtZT4LrFglAM JhGDu/48+XrhFOw+oxeWjh6zZOP40HQKGptVXv5BX2o8dm+R2Q7OcMlwnAoh EQquNtbbbe2AyUfAsel/zjRllM61g4qhfcU8oSSCe9JRNGjYDk5KsyzeRp/Q eSCxNGcH69G0iu/QL3tPiHX9toO8udXb6ndJhOqDYwwzNPagr/O1Iw+9VegU hY3BHhbz3rJsCcP5yzfvrTQ6hWrY8jya+ERdsIfOHlTsurI70KMlzoOpG3bw ob7ps1A4zm9bnhlErdpBxJ4qyQg0m+LW5e7vdkBrOPngJ1q3Q0Yo5rMd+AXS SdhFkIiRk7IjPB/sYKVW/P5zdF1kfb/Seztw/XpSTCoS++FJiq3cRzv4zBdQ mo5eoXz7+Brfx9GyRIQ2CuenU9kTW1bsYDxqsOQyWsK1puAmPp/p079CI2im dumHzPvsoWf1cDFEYz3R2+0Wo2APmuJGgiXoJ7OOWt029tB05nohWwyJ+FBK uWwbYQ8KaTn8fujw40Ksm/32UN7blf8RvXB24iyZxwGEaH8eMo4lESUzZukM 3g6Qq8idV4c2a5L8xDjiAPtctQ4ejCMRTz2DQfGAIyTmueZGoi+KqBiGWjrC 9vFU3hW0i1/sw+FERwhhbs22j8d6874zdseQI2xozPF0ou+NK/zdxXEart9g J0sn4OdP9D25fvo0LD5Q3p+Jro7+8lmh4jTMcMZyuSbifZ29/PfKyTNga1yX MYq+9Mrq04kHZ2Ao+B2nWhK+zzvJp18YzsLz77Icu5Kx/g87Hr/dchbuPRvb 1ZBCIo7dvefaJO4Eh/5SJx1KJRG3ytU0JkKcIEtKlD0afad95aHVGyeIyfRn dUzD8/WORfV+6nlgGCiM60JH385r5V49DwH0L1lk03H/j5TX8Fo7w+9jv2Oy 0Htf6fVvaXaGqx4HmekzcL6NFduuL3gB5gsNot3QPm+399sWXYBzU17bx9H9 fKMlfcIX4aROx9ayTDz/Iv1RT6RdoN9vMXx3Ft5XevrvSte4gG4VJ9NtdAWb Y8BXhUtwdP9lBlMSicjVHjbml74MD02TQx+jlZijOVOLLoNYWPMWfjLOQ3dC f8QyX4GCps/BMWj16Z8+AXZXgOfnTro1dJUbN8dK4RVIFToadDob47Pf2rBk /grgsEHTgx57QZNgJeYKNF01VOQcPB/dVBop+a5wc2P6NkMuzuMf6IsyX7vC sizjpjv6RerrHRG73eAT2eafBuV//UfZaDbIDRyGgvzuo63Cm9eJx24wxnT/ 7548EtF7k74qe9kNerw2f8+iF+KswlwU3cH1VJ+XYT7Ow4kqvaZW7rBTk/T9 ARq2f86O83WHKtHLLqwFJOLuKgO/X7Y7mLMf++iJPnnCLPBKhzv8+sPkOIKu 2O033vjDHdJmxiYUC7G+3xodr5b0gKPdRRaZ6LW2aSkJXw+YqvR++Q/N8b1h /ttzD7iVrmXgWIT1dPXE3K9dV4E3cNfzp0X/+/eh8O3aZ6+Ck0nV47vFWF9m PY/Vr18FRsVAhTk0wfqD4bWWJ9w7YFJpWIL3pfni6zqRnmDIcECsHG3odstl rccTvn1bKGS9h/3umNXQNmoviBtp5PNCb/PtCprd5QUyzZFZI+iq76wMcoe8 YKjAZq9SKdbTj3FHm8W84Hq0cEImerSg4I+NjBfsu7a2fQO97Ub5oddyXtB4 quOuYxnep4p3JOyV9wJ7zRSaNnTZrQMHX8t6AZWYkz//fRLxSUOzggq/T2GX W7uLnlOb5LCQ8gLNvzSec+h9TzUU70t6waeZgQXDBySiSyv5/qaQF4R151wo Rz9fVVCUx+cTqXJ7z1qO37/iyfOZzwtepKvae6G/B1luXhfwAtfAHeMj6Jjd izf08fdYL06ZKVWQiPYNPfFWbS+oNinty0SrcV2tU3XygpOKvnob6OPa1xr4 Y71g7YBeu2Ml1i9bx8GxZ16QwcABbejmI0R2w9ZroPz9Uz1/FdbX6wKygTev wfRIjVwY+juj9i5xYW8IaA4un0N3spOqAt57w8FCM5HjD3H/XSJ7nxZdh/bo gwXlaKV37oePevrA+WtLB9iq8bzo3fcW17gBjHYtGV7oF9dygt7v8oVSzdjd o+jSY/e25n30BSMx+zilGuzXl0R6qqpuwiK7+LYsdNJwQLD1DT9I+Ps3ZAPN bbzj12sFf5B73011uhbPl+diumWuP4x0p99sQ7suZP/hpboFPlUXfvE/wnzn GanPt7gF+zKOeIShLzqejJXPuwVNgfRf59CPmT/ICMzdAseLw+eP1+F5uKN+ qkv0NtCcyH9XjrbeLd/mcfE2aPOqj3rVk4hkmg9C+6dvwxcGVtNRNCkssWdm WwBEfH/zQqmBRGTHnH48Jx0AYqMPdLLQP7wfur+0D4C+Zv+nG2iZOwk5zlEB YGlXfz+skUQIxxar1GkHgo01o+Is2lPzyBLZKxDsLSyf6jXh+ve/rplTAuH8 8ZWRrc0k4u3qQzHJ9UDwVpGmin6C9U2EumV/5h3wVQqIWECPMXL/nWm9A7fk +3cZteB5abXTuvDlDoSIXxFmaSUR5r20OmtyQZC0v8Q0/imJOO2s+0TkSRCk ca5NLaGPBI4pDk8FQdZuHWfTNvSL4NlD60GQw5qyVIXWFi7hrNofDHk7Pt5k b8f7t08uK5d6MBQyydF7oTWzujj/XAyGe1uC4obQ7V7+vnPJwfCAenCf/DMS MTPD4Xf3eTBU/eMtSEYHd6yev7weDLW/3SR/oWNpvYPkFEOgYaW5/uRzPN/O X5J3ZoRA89IOzUdoFdHHJQt0odC6cKpvbwfONzreNHOeodA+W2rlg86T0bja 9DEUOj/+mRlDvz9n0HPA+i68fJ22mt5JIt5cfRjoDmEwNP458A966uj5oL7y MBgbVthu20UitvD9qc3gDoepgZCUx2jfzLRvUcHh8KZ3iJe7G33t5PFvE+Ew 03Wo1A89tnRrsJc5Aj49uyr/Gm0mReYqV46AudbWJyo9JOJyzXfWM04R8K1p pz4ZLU1fTq4Nj4Af9Q5DG+jqor2lfvci4FfNA3uHF/j7B5x4gzsj4E/lvy9P 0PJLg5+zPkTAv/uGnry9JII5L2suZTMCqO5l/gtAf6r/x6q+LxLoCufuvkOz PpbWcZWPBEaKEpt6H4lQHH5y5axTJGwnh2VR0IILYwHu2ZGwM2NUgLYf+89z ss/r8UjYlSJQeRZN78uitsweBVwx7c8Ov8T+Mjn7Uzs4Cngi2E1C0KzNxrV7 6qPgYOiZiY/oxQ9Wvx/NRYHAncpz2gMkgt2FtsSLIxpEblF9L0RXOh+vTFGL Bglf4xsMg9gfnJQoA6ejQcabTHsBvbdjZLjzRDQoXF2I7kQXlKh1lqlEw1FX ZQ7hVzhv7z6ygxCMBlWXSEo42nqXl6LWzmhQPz8hNof2fFDz+tafKNA+I/xI fwjvuwt1ceWfo0DP3ketFH14/OjH9PEo4JVdp9k1jPMMJWO9ZiAKfjEEtPuh GSsSY6pfRcGLKdrQj+h7Vlm6w++igFJ5V8doBOObzyJnKR8NPqHbmB6hT23a KVYXR4ORbWz3gVHs9xMDe18JxMAfutTjS2g9idb3jUqx8HJ8H4vNGMZXgZH5 cVcsFD4gv3yKJi+EdLiLx4Ff0MEE0XESkfVjjMbpWhyYWRWaJaF1md0Z7z6O AxFxkd3/0BGHmovyNuKAiubBiNMEzud1EhfLD8fDyIh0Wh+ajr6oUUQ7HspK a6yPTOL8+q30jNK5eLgToMSVg37our5H53Y8WFk0TTFOYf8Nskx+khoPEiJq ZA+0lIhfOvODeNiy2e4wgd7rIPwm+2k82JsOOflP4/PYTF/PZE+Anb9/eLS9 w3wVpKFUDyTAp15vWbEZvH/KxTNUzSdAI+XPchLahnzqwipjIiRcv1X7D92i M+xaxp8IFw1pfM6/JxFyDzYbr6olAsEXqtSPVjd6uzxvmwh7fjH9PfKBRATl 36yr90qEr93RjTloZomREv/IRHiazXqL6SOJaHBedhnPToQ0r2S4irbDILhW JoKrHif1JLp3OvrD9JNE0OQhPdX4RCKu98TORDxLBK6fvMFlaNvDU+5d7Ynw oyNfa/dnrGe8E4vZLYnQmSXEcAv9tq5ISLY+EcgeZZ2f0BWfz0wXPUgEL22p COMv+PlC4bGDuYmgz1VtUIeW+cY51RmXCLyLR3bwzeJ+15+oaPZPhF/tj/vC 0dpU3/cJX0iE3nSI+4E2bmKZETNJhHzXthO2c/i8kefPrkkmgq+GDns7epk6 YCf/jkQQWDBKSZ7H95u3vJjangDrrYOWG+i93Iv6dDkJMJhyktP5K87DulE8 tH4JUHxpYqIfrWLMeVvQOgFuEfZZigs477MEM2xRTADz3TN2ueip8/WmkpwJ IDLndGDrN5yvJP7WBG7EA9WT2bdX0X7Rm26sP+NhNPEKZRLdPdkq9mQO821f qoPKdxJhv/VVcvxHdG4LdzY615lcUjYTD8NCc+NUi9gf+9mMJt/Fw1A5e+oZ 9GGeAxe/4N+HFFTM29GGklVvyfj9V03nWQWWSMTSdENG12w8DGrG9d1Fb2cS 8pf9ju6pj5xF54V/uVK0gjZ9r2vwA+eVj1MXyv7Gw8D4dvr76Cz3F8vUNAnw 8rNDgPtPEjFkpb9DfyfaNVxlEH2+4S2ZiiMB+leq/sgu4zzEtn1m8UAC9NHS X1tFT9yXvksvhY6QlLFeIRE1K7Lfvh9JgF5W6+8NaBPlyZ2ZkAAv0u6Ucf/C euNk296nhT5QdvEWetp3RH5RNwF6CocF3qLvcu6sbTJIgG7xzfdqq1gvSDa7 jYwSoOuYqf2WNRLB2X6pis0sATqf3uRyRrfwjMZ5WaD1CsY60QJ9WbHLlgnQ 8bIvWeQ3ieCRYLldYpMAzy3XTKPQSRkBkvfs0NN8O7+hPd00PHacToBnTga9 xn+w3p7iHR10TID2r14RlegDV89qX/ufPck67H/x/IULTqji59v/dNBdQ0uw vv4adTYB2gKXWkfQSjeWxxqdE+ApI9dtxXUSkSA1vSbqio7VVM5ARxRuLTpy PQFa97j+/osW159TUQlKgBZSaq3dP+z3EQt7MxLQh1s9n6BbRoNjSwsS4Enp nBTfBvaPhIFxsecJ0Cyz69sd9Jp6you2dXS9SukH9OPBlWE+hURo7IjjL97E 3+t5yp5dhjZqmGGiIhPpw33HvD4nwuPh99mX0L/Xq0778SZBw6kddr1omQTV 2wkn0e8V9klSk4nSj0RMfBjaxXE0Dl2rHR5mXpME9UvhST/QE3SfnWsnk6DO 5+EJcxoy4UiV0Scxjt6cYq5Fz4pFsdzoToJHofQv9tKSiU6W6y/n8Pu1O6TC b6AX596ZBGShk6y1J9GHqMxfyt9OghquIFoVOjKxI8E8hsEhCaopZS1ktPeM S/eSMlp4xJ9qC5nYLcvTvsiZBA8rNo+eQdc8X2mgWk2EqiPCa23obW98vu0f Rjeb1vDTk4l/DykfXmF9qtTyu3oXnXjhBkdMcSJUvCiQnEXT0xR0nMtAm/V/ 1WcgE3BUJuVBbCLceSj+rhpdnvaP41RYIt73ooZ5GMnE9uKe3PkQrDeec11h 6N4pgfge/PvqoG7zD7RhabqOSzzWR5miqlNMZGL97gN+hZxEyEjYUvQcHf35 eySpJhEu/zibKbWVTLiydWmenkwEVdOnsRloLv7iB1TsSbCzijeYbhuZuLBa K0M2SYIZ1ts+rug8ox5t68QkCB04dlp9O5k4nGv7q+BwMlhJZ1iUoZkEg/y9 PZJBJH5Nb88OXE+H4fLMk2ToNamRmUPruPid3GqfAuQKdkFzZjIRHBgXUU9J AfedV7ma0VWWhHf5+xTY9VKCLoGFTNw7ZvlI6XQqfJKMXvuLNiiOuxtHSoW6 2PmvTjvJxFzBAa8DY6lwyrh4WImVTLxkfZ/qopMGEuX03Xnob9OzerM304CK xal5BxuZkGik+h54Pw0GXduqrqMVMnmyQ8bSIK+Pr+gdeuPX8sFz1OngJRGQ acBOJi4NTQUZC6WDdsx0bA3aRFGy58bxdJg7nukTvgudf13GLDEdGu//vvwT fabmgNP56nSI2WF12m43mbhhn5IXMJQOMr279KX3kAmXPWZ0XLsy4IZhDNf4 XjwfY78YIDUD9Mu+smhwkImMF1KelbUZwL3dgO4+Wpdd/2jCcAa09DAsBHCS CSd6mYJo1kxgNAhsFuLC/JHJ/SMRmQkT995UJaB3XLQ8sliUCWVbVYvW0c/1 fntyt2XCLZeszPPcZOLyM305r6lMMO7+E/sSTdfLsv7oZybwilgHH92P+2e6 3biYMQt+hD/yyUfPaNFVbuHKwnl99xVmHjJx0LCSkiqUBSl6Xqd90Fy77VZf CGTBhZJBixl00uaekicHs+Aok7S+4QEyoc/wJZJnfxZsvxirWoteExz3TNuT BdOdCzK8vGTCzu6n3BRLFlQIGQpGoOXyIC+NKQvuhN3jWkYfW3me4EeXBeZf GHfa8+H+GSeMKlBnAb+uM10nuqvsnpY3VRbw2lxaFjlIJsQt/MvWmLOA67Lb h2j0VKOwsLRUFuy55Tm0iC565c7JaJYFrHHX280OkYlNb+5OT298PsrN6lq0 WfCv2y7pWcBQfTuf8zCZ2DXeGTnTkAU0z4OS/NBVpnYKg+NZ8G/0bvAbdFaf f7fkShaszUZ6qfOTCU2R5YSlbST4+Tf2XAGaQyNiYsd+EnzbkWTOKICf5y8Q kOAnweyBNM1LaNuqCIsP20nwQTpLrg99KJw+LmAhC95o5ByWFiQTH0oODgZ0 ZMGERf6uJHT8rtm9ZzOzYNi5mG4Vvb/rrF3BxSx4eaNs2VoI860ji/xMJgt6 Iis+NKJTWcijaquZ0Fpe135HGNfz4+PT9sqExtbG6o/o1dxHwt3imfDoVUu+ rgiZ2GMdVvPpbQbcX+0MZhYlE0aT8ud0IAOKmXq9PNChbM/Mry2kQx7XwLkh tJ/x+UKqrHRIh3HNDDEy8WAzz87wXxoknXgt9w99ZUvesczKNIg9++6woziZ WJa/cencxTSIuPZxVxv6zoSlsBt/GoTcnaUTkCAT83c8LtycS4WA9IXlMPQt F/IRn8epcLN06cM8uli4Yko1IRW8m1aGjCRx/+tbxGncUsGj/3d7JVp91xzV yolUuPzuX/UuKTLhJaMtpn8sFZx/UhdcRz/Z8T1ETjQVzmyhT55AB2VvvP/E lwp2e7eGqEhj/N/FcCcdSAUrYeZrOeh/PfVb3A6ngtkxNidaGTKhsSVuTFU6 FYyO77E4j3aPyI1/ZpEKeg77tLrQWZcMl/cGpoKmB4+8mCyZoKVmI3lXpQIE HeSPRb+jeAodnE0F+SKRLRZy2A8v77Q+czYNpOolVh6hy7SMjvgUpIFoj8zH ffL4fpHiLq9n00DgtcKwPzo6VTJmUDId+L4fffYWrdA6DGne6bDjiEHI5SNk Qq/+Hpy3z4CPzy9tCT5KJq5/+ZC/D8+n+sJ3uo9o8akC23KHLCCze9FpHyMT lGORDNKY71aOfrSMymRiTDwRHmD+dv+Ooo5SIROqFjoK176SQICXlXoB3SUw mXnyEBmCtJOpjFQxvytY5tjNyaCcSNpkATJh4XviSV8lGR6IPfiXSGC9yTk7 LuaRDVvNZP4toz2Cc1gj8rLB+UbtuoUamSAde+53ezQb2rOPrteiq5btGcvo c4D3efPfvepk4hRnDJMyfw74f1X/64Nekn9slW2YAxNsHX/G0XdKv1o89MqB RIf+35kaWL9Xl8P0n+XAYojZ73V005+9J9e/5oBh2eianSaZ+FQ2uvmYPRdK Bm3XmtFrhycGeJVygf73m9UDWpg/Ps/2Pj2VC2cOnFsNQB9shP1HbuXCE60v v96hN+i/i+8l5QL35cu/1LXJxDDVobGOB7ngk7C4kod+M3WxiLE+F4bqvFbo dMiEVt/K+1ctuSD9Zm3ZCb0YLq4a/TwXYrb4Lz9Hl7ZfP5/WnQtzotTLgrpk wlj22A7r3lzQMQ35GYbuiZiekenPhXwfpp+z6NXbnanhL3OBKjv6h74emajo cJhqGcgFu2esP0rR03u2nVZ+lQsN88lL2/Wx/3Pq9uwezYU9bPuWrqA31qgT v37KBU9F8mIfWtpyxt5lNRde2h9clDTAeEwICKozUkAspPB7HLpcZMcHAU4K hJeKfF9CH10YjO4RpoD6msy3h4ZkQu3czzBePQqQeR4t7DqO+ePU1a1gSYG/ mscWrqHPeV2bGDtLAatLT76OoHUU5CvqXSlQHa/x9YgRnk8mt5lCNwrsrOuY T0NfebNNdvQCBa5MG8z/Rtv4DN0Ld6RAN93LORtjMvE4kSZJAtcXEDWfe4zm WupXVDhOgTsnxma5TcjEgLH3+50aFHhz/dSsP1rCTXJaQokCyuS3X6bRLczy nlRSFEhrP/cFTmC/+9bydUWQAitzXz7noI1ebE++zUcBU9Yrn6lNyURj21Pz C/sp8ODI0qczaPVz8cM64hTYZn/tUxv6Hq3wb2agwFE7if3iZthvlWXC3ppR wOXUZ7MU9A7+zbzcixRIt82J2EQfyXV1yb9NgU4b69YL5mQiLcXh99FkCqxa s60NoI3nKlwfleD7WfdIHLPA+heo9uVSIwUsrIKd8tGaaotB915QINhSJWvH STLxR1DcOWqEAg9P/hr0Rr/T7Pll0EGBGYtyprdo2+tqRuY1FGC1uEDoWZIJ 3mMViZG5FCDM+a5Xob9sU1wYjaKAm9nEfS4rnHecfgcc8MH9NE38EIw+3bbr mu45CvSeMOT6hg7Kvfdd0ZQC6yZbTC2tycTdm5N7RtUpIGrSHNaCFujt2Ml0 hAI2xtefCNvgfrBs01c7hvljJPUrAX030tCVYkGBuuOzYuvol+9YY2o8KfDZ kHLWyZZMuI2P7Q1LosAeQ9uMPvRhpQO+go8o4KXfy5B7Cs+XAd8dmg0K5OmF qm61IxPOUWN01rx5MKgL1zzRO03o91UReUCtu1Y6hc60E5Liss8DKZ3KGS17 rM+LZ5jvX8wDB20XznK097usV4oueRCjdciEwwHn4ZrNKAXnPGjSnAoNRNN0 3VpmOp0HXzWSm+bQlT472vdY5QGXhtGymSOZ+MubXdNimAf66gyiTWgHHsGg S5AHN9RaTgucxvj3pn3ylcqDYuJGWizaLeJzuik+7zkVO0+5s2SChXvnnsjP FEhU3nOPhL4jsP8t9QQFnh7rf0t/DuO5nFJ3Ffeb96ia0TjautSqq6iSAq8V +IVvnScTF/uPM8FNCmxXmHb4jPa0p8sMv4z5Lp+aYuJMJsxvMV4Wc6DAJTmT 3nr0htfMehDmZ4YsE92hC9jf7u7r+4rnt0vm6dEo9Oa6omMb7uea9E2PFXQ1 53PZc6oUEJSWK7a/iPX/kH6XqAoFTkotTHegvzsez/XG/A+RLNwt7UImouhv cPzD9aolHAwz0Ow3n+z2sqPAe3GOINpLOG9ebT9U4EUBNvGB+stotadTn81j KaAmFrE4jC5Tt2PQvU8Bd1ENQbhMJvi7MwQ1+ijQJ1yTxHqFTLTr5Wye5cgD gUn2Dk90/GjSX33VPLgVdfX3MPrLndyYrefzQPK7pH2GK87Le/xPKjfnQVhO TNw6+pD/75jcr3nw9sTCU3s37G/UOf2tXPkQV31P8JA7zi/Tv3xmfPPhixOT TQj69crli0fv5QOx90LUZ3R6YZrH+lg+pHU+b9bzwPztP2UxRF8Aizf4l0rR biZZY1dkC0BXNPgQ81WsN7eD5W2sCyBnasbCHc3eus4Q5FAAa9FqYYNot+CU /PtOBXACchrkPHG+Ovkz0fdKAdxb3Piagl5qq7aP8CkAGordgd9oIWu/aP+w ArAxazxh64XPR5kvXiYXQBUdV3ATulQ8XymuqQC21t6oPXCNTEiG6nQufiyA M85jXwLRtErXX9dyFkIDxxGuD+ing0PUQTaFwNadfFzbm0wIWzQv2L0pBJeb y7eL0aRLbkYvQ4vgqZhZ1dbreL9x3t/EqlQMnrE79/ajpwIvqv5+WAIvCDc9 aR8ywWNNx5x5/R4c/tF7MxFdFpzsRKtcCkPmkW8tb5CJHOMkgQNNZSBGP8fW gA4r2jDs87oPwY90tbh9yQQxTNlbs/MBTF0oun4LHcWfd07J6wHI76O/9xZ9 503c6619DyCm59yU+k2cJ3ZbLckdKIdPfm3MBWj6iQ/MbRfKQVXioBqDH84/ aocKWkrLIeVNgOdFNK/D5kGl2XL4FvemoActnlf1l4u1ArTVVcfE/fH+HZKj +0G0Asg/s7bGoT0dnkje1KqA1fy/yj/QtcdCLpy3rwCTkzZu5rewvg/6NJsE V0AxQ31uLdrcxp2GsawCrFy86W/eJhMBuWpye35XQAXXsOJrdB7tmSfP9lcC Y6/sJQjA+a9wxLyHqATHWwmkXPSB1+oar05XQr3kUj9tINafNb3x8IBKYHtn THMe/Uk31ikzqxJcEh7IdaKF+GoVqmsq4anGDmeRO2TiptGm2N22Sti3cik9 Cm0m2rWzAn21sLvnG1qz4qKWbWsldFsKb5gE4TxSQO10tKkSDjKFST1E/xuq ZNp8VAm+DZ/O7A4mE8z0mb02VZUweEkr+Tq6k3paf7OsEkT253eMo/viMrnI xZVwp4/mz7EQMvHs5vL4l4JKmLx9WoyMNotk4o1H029dSWYMJRMfw52NRe5V glRS2OZVtFK9sjhteyXY8nBffI0+TKfSPP+uEkKLywd17pIJ8krAqwTaKqiQ 0VCuQvtz8KkWCVXBZONIAXcYzq9r8v2jJlUgNfDPZwnNyc1boltSBba28TO2 4WRC0Vsg6dNYFYR+PGz4HL2jgXbOdutDmPxtcCAzgkycD0qdXPZ4CKEHM55p RpGJ/tnX3Lx61VBRJi5Zjv4R8z456lY1TCq0pnFGY39vvsUi+LAa6FvNaYLR n3OVL6R/qgYpgy+XvqHXHe/diuaoAdvhm8NWMfi+W5VnT2jUQKgDC7ShDVMM qOUu1cCkpwJbWizGz787f7ymBug3um7SxGF+9Mpd6BirAakwu4+X0TSmdVmK f/D7WcF1avE4j72l6vqtWAtSzwbt5xPwfs6UZMxQWov99nynRSLm31jsAYdn tRAy/lu6Be2SXqhAmq6FiQXeLclJeN70Ity7djyCLT7VrptorQ/hErWHHoEU je7YxWQycbaTySVU8RHYRE2qDaHdDfLclQwfQcget1LVFDIx2HDl6+9Tj6Ai h2Z3Cbpo91LU1UuPYEIk5RZ7Kvarzg/cPDdwPWg68QVNSfylOZGA63WZPDZN w/e1pf5jko3rmX043IR+MmEx9rwU13t9PUYwHffngss31zpcz3nbWjzaxLZG 3+8ZPu8P8ul1tP/2+3/5XuH6fjI95zPwvnA7933KB1yf/rncAJovp03k5y9c P86afCwT93fgJ+++rXVQsW+BoRAtuBIUtpWnDibyAzx2ZmF8F54dapOpw/tX keZHtNq7wo279nVgo3HsgTEJ61vO7NP4a3UQ0tu3twGt0sjfbh+N33+3MhdD JhPU2YGqMi34962a8Yo5ZGLy+jJHhkQ9sJVYbs1Fy1haj2zo1wNZ51IQUy7u b+BI/wvneqgNTrg2gXaAWamrlHr4vPHW2i8Pf+9mp8EujgbwIi0PfkBT7Yo6 xaDQAFTKjIbH8/F+bNKUpmjeABw3JFV5CsiE7oLtuHl8A+j99D/YUoj9MexE oyD7YxiJj88UKsJ65hi+rCT/GM5IFeyKR080TR/aafkYfK+8oD9TjPXRzS/a Lv0x0G9/e7sbTbUSb3O7/jEk3Pu5JlNCJhjPOWg2jD0GHj2Gq5locwuDpPe/ HkPp533ztPfIRMNk2Qc79kZQDJU4dxnNmsKZu/tQI7QfVn89hFZ71d5KLdMI Jm0WJ1VKsT+HngurJRph6vTF/gK0T/4DhU7jRrhA5a/LXIb7dcCaucehEZbJ ca3e6MPznCfMPBohQCX/6Bu00N9CYiW4EXZMPXqocx/ruUYtj1ZmI2T49ohV oC1q/4mNVjeCAOebAo4HZOLkbTaV8yONUPXoB08g2lGq/ONNpiZQPUmfNovu 3GJYJkc0QfcyJ6tpOZ4H6+jT23yb4GSieEQDOiZ474hvbRO4vTT3i6zA+akr FVjkm2Hd9cLKT3RK6siwsHczhO3wcz1ViffxvO9XOh81Q45+nqN4Ff59OWXL oyNPYKB9SbP/Id7fCoZVT2xvAfuzW5qPVJOJuraG8fcCLTBHzXkkB12WlJNV T7SAd45YBWMNziNhLWxt1i1AA4SwB9qKxbxj0aMFYl6bUcbR6mlJWrLhLbDP z5lLvRbr5avj4EFqgcJ9N5PuoVdTfh9IKW8B2fqYHeyPyARDPN+blZYWaLGk hN5EzzP0tFQPtIDhr5rN9+h2tb+Mq+9a4Jzs66XqOuwPe7e8TqFuheT7oiMn G8jE6AHdvRLqraC/8UG/Dq3h7GH72rQVqIzJTzgf43w/4XV842wruCzuLJlC 55VrEP13W4FXrXu/aiPW145SjayMVhiOD0rIRp+5Lvhn14NWIGR/3TzTRCau MiWGaIy2wq+g8sU29GzuAbs9C61QOnTBib8Z70d/Wloe0j2FPd6TRl/QgRvB dh5KT+FrXQufawvOc2VUCZGlT4HC5JvSj3brCFa81vUULG1kt0m3Yv52R9J1 fX4KT/8WLP9EpziNajjzt0GqamTHjTYyMVT4RupVbhuot1tcCXmO99ELC2du x7bD4sRtuupBzOd11dYX9p3gQ+dasf8V3k+1H0Z7RHcClcSpU3fR1K5uJQJN nbAzULHaZohM1B9xj3m0vwvS7gk4tqNL9KOPxBzvAt6hXdslhrGfc+d9d/Hr guJ/NHWp6HefSAI9JV0gKbh0lnoE5zvh8zZMw11Qa/KG5RI6hMx1vvBnF6j6 9j4eQpM0RiXmWbrhed5jZ9VRnG8VtUc3hLvBqLeEvRh9JnP3HUb1bhj5lfqE dQz3I+rHCUmrbrDnDb10Ey0lGnEx43I3uHqeaTMax/dZIP0Zj+uGX1kmbnXo CGOv+vWcbrj1XJXr4ATOJ6EWXpfLu4F+UawjEj3oQYqre9wNMZxcnivoykbx UJuObtijwXTAYRLzx8+4PWWwG8iXV7s70S2dBg2Vr7vh/pNXB7OmyESb7VpE 8nI3yM229m15TSYs+49qfqbqgUa2Cl839BlBv6vCzD2gqUwWGEf/ubElJIe7 B144RQ2qT+N8RiqXmJPoAfNY31tlaOLeuURhzR6YqrsgsucNmZDWmIlnsO2B r9u07syiBc6xbG+K7gEveVkJs7dkwo+11CGvpAfW7fkmGtHk5M/rWh09EBzG EirwjkzI0T42LvvUA9ur/knHob9c5mp/zfACkibnX/9GO33cePZO5AVwb5kI PzuD/VhWRuSw5QsQtap9p/Ae64vJhrhJ9QtwyRdUC/6E82y/Ufn79V740bt7 YQFt+slh1mJHH/iu0qZbfsZ6d2x4soG7D2j4fmi2ou+oFtOPiPZBuP7bRZEv eP9yHJx1OdYHO736spLQaWzHt6gY9kEaqVF3A01uZx1ncegD3o57y86zWI8+ c34s9OqD4sW0nAH02zn7kmfRfSC1767hsTkyccQx/sfOhj6o07i2lo/W3TkY u/9XHxBXzuYzz2N/TvRfN5fvh86UEyY+6IRTXaEd3v1g0gLr79DVU3N+IfX9 MDYrXmzwlUzsC90rnr3eD5+Vt1IdWCATP3fI+bITLyGNg1wUiI6L2FQys3sJ +svSxh/QhxoWt/PeeAl/+5/90v6G789sIsoR9RLKSq3JJei2CunzARkvwe7u gtb272SiWNtpiih6CcxnAxdc0VMUNe+gqpfwRHV38gDaOW0/99XGl+C+r0RZ bhHnzz/GtQrPXgLfL+UPKeiSTEnxvy9ewuDAy8jfaHdj9ouzr15C0P1zsqeW cJ74csJUdOIlyIWvTTSjfY6qD8y9eQlrqzo39H6SiVcRGU7Nf15CyatJ3jL0 M1KP6R3qAbApd+tkXsb+b9B+WZ9xALZF0rp7oHti/B7wswxA4/nUvUNoPcev bIf2DMAVddEnCitkgqlhW/KJ/QPAw/PkfDr6afKgZMvhAej/bcq8jhZcUJz2 FxuAgOFPNfa/yMQpqnvlukoDIF3pa9eKbty9NdpNewBmopi3HF7F/HwVMB9m NgCJFyhloWiWIl2SneMAaGoqmM+iHf5metVeHoCVA91/DdbwvqRSo3HKZwAK /9rlPUDLjPVN7Q0aAMvRJX3W39jPlQ6xVUUNAOPDkB+e6IGerzU/kwagPoYz YwRNWXfKKMgcABeX+2pKf8iEnbit2qn0AeDSVpvNRAeb/bTWjBuAF3zDcRto d7jawBI6AP7/Liie/ksmxtPfNSreHACJ8fU3bWjfbQaPldwH4E113F2BdYyP Sh1LtNMAxMUdlgxHw6jMrvu2A6B2uW5kHj18p/3gLnzfHzqGt4z+4e998U5W NhyAvENv+SvRdJVmz3N0BsB807OXfQPn1XDl7Qx6A7BlkuGaN3p3okWrn80A 1NZmco+jBe46/gtyHQDnBMn2Y5tkomCv6kRZ8ABwuLZdIqNP/+rzuJs1AF16 luzUVNkE//DP13k1A+DLP99wFt3sFK2Y0D8AotS3zzxHr1n7Zc7MDsDUFNtW YepsIvdsLi8/3SBE1xVWRqJD5F6/m90/CKpJR62/oT1u7fzdojAI3936qE7Q ZBMGZXdAWHMQcgzOFD9ERwnvDD5gNAgnBH8Z76HNJqoqcts4LAeBhjZi1Qe9 9aMrlYXDIJxrqNRWpcsmwmcyfFNcB2F3ita3HLTRjwuNXN6D8NxjPJl2Szbh r3yC7oP/IPgcv6JyHu13LtJcMnQQhIWpP3ai3XYYl6vEDoIy5+4sYfps7Pc8 XaJZg2DEJGwWgWaRXtqQezAIp38rb51Hb/P3LTrUOghesyatBgzZxONz1HsH hwYhdPycTxk6h7o3d9/sIKR3+UjuYMwmxq4czhr9NwjNJTmkPjTsS5TiEHoF ZiLEyaFt2cToVqrpsdpXcH6f+Q757dmEtXSaz8qzV+Cz9UJ7MnpEO/ny+tAr IM/FyljuyCYuyCwWMP18BV/uvWGeYM4m/lUuuC/LD8GfjJ/PjrJkExUWg6V0 ukOwI5LBPxP9gb2xb4/NEMhckpw/tTObmFs6uI3q1hBo2WpQmtAWXDNttbFD YGVgac3Dmk3MeojkSeQOgb/o7Y43aKn6CXa+tiGI40q8RbDh/jCaaVsMDgFl W5F8LnqaLcM69O0QdM735Z1hzyYycmd2P/o7BGxlPAEfd2UTXpasS4clhuFw lswR7d3ZRJ5e0EXOo8NwJEr7WyF6/ETRngmtYTh12fXUhT3ZWG/ptybZDUOR WLPi/F7ML2rruVNRw9DAPfjdgCObmL9pKpybOgwvtn8qLEOLP/8lXksZhh9f d+x25cwmzt5gZTasGwa613wv+tDVde5lXU+HYW+vfJDkPsyPRE4qpRfDINKk dzQObeqkapc1NAzK9+2WFtEn9eu2z00NgxHJo/gEFz7f7PRuxY/DcDo6xKEK bTvPFJC1MAyhV+73enJnE6WVPUlUm8OQbtcaPIQ++4zVSIxxBMqODx+T359N 3B9rCHnOOgLNKrM/ktEjCTwaH7lGYED8X8kv9O3MpGiywAjU/tJKc+DJJi75 Kzf+lR+BrCcxoZ3ot9tktRy0R+D8Cd6zGQfwPDnohK9dGIE/XhrcqnzZxEBI ofzzqhF4oxK1tQjtdbLaPefZCLTTD6+xHMwm7hrPMNCOjUBM2vnhd+gzV1WX m1ZH4GBjeEzI4WziTvxsQ5PiKDCEDPp9Qx/hoHnXpzcKX49zXbLkzyYK19IM HWxHofZNmY6wQDZBTjo5RBU4CpnFK/IJ6IvmW8eOpoxCgIfq4b9oF5O6b4fL RkGf9iVVryDuzxZLqx/joyD5guO7vFA2sdG6JNa9NAq7kk+/JqMPt03sPbZ1 DKYFfta7C2N+ZczLDiiPgaf+Hs9dotmEb7SRwmTBGFixO5z2R7csU3nIto6B 6lSR8Sd0BHnrHYnXY8DoqiRWJ4b7dXXbLdm945AVf+qjrUQ2wbEZELCZPA6B NgWv2tFHCn7ysNePw/lD31rFJbOJN6G3XsxMjYNUzW3yJlpTdGbRVWAC2sco lnnSWO9UtuRpP5mAktx5re0yGD9nYmrn5wmIcZGTu4ZeHhg6/37XJFitP9up I5tN5Be1tX13nQSVZ8yb5WhTh5azYhmTcDDGcoFDLpvQ8h8Vj22bBAbLnMlA 9HPBibD0uUn4emC2aw69PyR98gXzFAx8ka4zk88mEh5/ironOQW1lb6FjWi3 pQTaasMpyPRtS+JXwPp8WZNJ12EKAjS2B8Wg44rI566fmQKn7RYeq+jszSyf vtNToD9McnA8kk3UmLwzf283BVLkT8e70Iev72AytJyC3c6SyjKKWJ+N2/LJ RlNweGa/QBKacd92FyGtKZCx277zF1q97mzd66NTQIz9+W2phOv3efgpSk2B kdns+3p0DfU0pYp/Ck71jfZyHcX3zwm6PMEzBS56zx/5ow/LM/MV8k6BT3t1 7hv0oYJ+o2OHpiAU8iLVjmUTlWa+vjcFpiCpIf5aHlo2v0VIV2QKKPIBDluU sf7+MZ++IzEFFRWues7o7LrZAztkp+CJqJ1sF9peQ/pq55Ep6Cs02C+qgn// 99o6RXkKpviOMkSjG/QptlZqUzCXJbT0DX0gRmr9O77f2t69kyaq2cQ+LY3Q h2j6xC3PqtC8pTtZrDWnYBfz8oNdgP1DNaSJXmMKDobPpHmjO5erxuZxPWm6 gTtjaHJbadERNHH7yeWjRDaRlRPowYk2+nP/ZBbaJlDbvwV96loWsYG+arud 7RSu57IYIeKolk3cOvzRm0sb43Ppxq6n6D2DMz/E9TE+n5w3Dqlj/oTxrd00 w/icPvklBL2z/9LW0nNTkDelOfgZnaDbp7HmPQVVlrKNehrYL0eSA+gipqBl kK+wFH3fioXkTsJ4dG7ccNPE+thm8Gm+DeOhsXB2AP3dtbhHeQTj0Tx5XFYL 4588R+3xGeNxtPtIMvrrXgcn4VXMl5o6vlV00ZjpIP2W13BYqmibtXY2MTnT EThH/RpkSpNXGtA2tErdEX8xHgLBb7h18Pw8Mn335SfGI/dq1y109hgNb+Q8 xoP79MO36DriyJvVGYxHqjFJXTebsOx6fb1mAuPBpno3Hy1o+EFd/9UU3I0W 86DXyybaKIrpyr1TkMLIZXsB/a2w8xVb1xTkBzFpdaNPytwxMOvAeGysSojp ZxMy4pwbJfj5lhufOGLQDz8d+v8arNOgpq4wDMAKLagFWWSpaShBZCkiKioC Ub4bFUtRdowQwr7IOqZlKKu2KKVCHazIWoQriiguVJSqoWWTQUUURqFAgZB7 L0gRiAJGqSxJv5/Pj3vPnHfec87HEUmwL/JelRn0bKP/ZdcZzOdY27TXQbxf FVSEsZoEJifr+u6id72X8nq/lMDHyIst+oew37IMQw9HCayi864noztsRx4m +UnAQHi84B+0uY6ViU0q5tMfd4LrRhKlvdlaQRcwH29BdDlarYMVN9UqAeK5 i7cS7e2oofPXawm4u+zaHeqO6ynXfh69fgTinPS0zTxIIl6ZaF51fASqrLru 3/QkifRhz29+c5MC13XiE5YXSbBV92YUZEvhZYyK98/oseHVDipNUojJYZNy NE+cp+P+TgorauymQ73x+y1ap3XWUlD8xNOhG23/5o+EUg4FNhOx2bt98LxP yI6Ob6Mg0ILkGPrifLCkZmjmRYH8gDghC13VFZbLC6bgTFRPwyzay9X5bEo8 BabZMvXgwzhfdE5lSVMoaLiifvgZ+ttb55/+kkWBV7vJJQc+SbzLb68U5FEw McZ9W41uO/XvXFERBQYbRTmZR0iiM6b8ZXE1Bbf25fa9QRcsangM1FKwP7zK VOiHfaxnGxXdp2DoZJOoA82OaNiu1UrBd5cGGu388T3t78nJ7KRg9cO5NVVo UwnfYFM/BRdpDT8dAUnsKJ68c+EVBfYrLa6cQCvXNWtXLlHQzeHNTaGfq9f6 yvRoiCICwD8A8494Gr/ZhgZFcNKZR+h7X1h8relCgzVZY14pxPc8WLYQkEFD W1Nb4tpA3G93xu0NRTQIRiQt6WhuSAll/zsNs8vzmq/Ryao+qa6PaThtpBvA DyKJxTTxyZIhGoz3WF9rQ2+1bGCaZDTcEx54vzUY82hoX+GsoMEtI2RvBbr/ TqtYQ5OBsbK0s5+F4P336/nJ+fUMpP9ZMJyCjunhiCY2MqA7VPvVOFplyd2i ZTMD1xeefO8Tin3IVZWF7GCAxxpta0FrKUwrbtozMOCwrG0TRhJWurXX4nYy IPI3DCpDs17sU/tgyYB66rYbq8LxfBmwMhQsBipKDv6XhC6artHhajCw80Gk 8yj6alB8V+gyDc/6f8j3jMD5KXlQbPmWhvD5Umkj+kdewpAzQ8OCQb31pkiS GH9c7nisn4Zzdl2pJehA/Vcjgm4aLPkTjz6NIomVQ7Te5U4ampNU9BLRk9pO HwYxL34hO5RCuxSU+7Xg/2X1drVuR3G/scOqjBoDWb2eiw1oZVFfcxeHAbY8 1sUyGvvBifbV38PA3XU/FRaiq9ck5OwPYMB1O8moxGC+glbzqTQGGG/xFhHa 1oAnLy5jQDtf1uEaSxKZlC3ACANX69QNH6DzPgoPHVEy4PTCJMIsjiR0z22o uW08Cn/PcOvy0fIbwUaDTqMQr81XKNEsjxlRmHAU/gedy3IC "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], AxesOrigin->{1700., 0}, BaseStyle->16, Frame->True, PlotRange->{All, All}, PlotRangeClipping->True, PlotRangePadding->{Automatic, Automatic}], TraditionalForm]], "Output", CellChangeTimes->{{3.52492580321379*^9, 3.5249258244107428`*^9}, 3.526625997286521*^9, 3.5266276079163427`*^9, 3.526627725423787*^9, 3.526627987324*^9}] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["Atmospheric data", "Section", CellChangeTimes->{{3.524832037020259*^9, 3.524832041990449*^9}, { 3.526627987752322*^9, 3.526627988741578*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"co2", "=", RowBox[{ "<<", "\"\\""}]}], ";"}]], "Input", CellChangeTimes->{{3.524832489337182*^9, 3.52483249413216*^9}, { 3.524832527993512*^9, 3.5248325315996237`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Dimensions", "[", "co2", "]"}]], "Input", CellChangeTimes->{{3.524832533555848*^9, 3.524832535869516*^9}}], Cell[BoxData[ FormBox[ RowBox[{"{", RowBox[{"2", ",", "10"}], "}"}], TraditionalForm]], "Output", CellChangeTimes->{3.524832536442769*^9, 3.524925921011982*^9, 3.526626004515828*^9, 3.526627608004037*^9, 3.526627725545714*^9, 3.5266279920214643`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"co2", "[", RowBox[{"[", "1", "]"}], "]"}]], "Input", CellChangeTimes->{{3.524832581311576*^9, 3.524832587034418*^9}}], Cell[BoxData[ FormBox[ RowBox[{"{", RowBox[{"\<\"alt\"\>", ",", "\<\"ptb\"\>", ",", "\<\"ljo\"\>", ",", "\<\"mlo\"\>", ",", "\<\"kum\"\>", ",", "\<\"chr\"\>", ",", "\<\"sam\"\>", ",", "\<\"ker\"\>", ",", "\<\"nzd\"\>", ",", "\<\"spo\"\>"}], "}"}], TraditionalForm]], "Output", CellChangeTimes->{3.524832587635191*^9, 3.5249259210475397`*^9, 3.526626005300745*^9, 3.5266276080415363`*^9, 3.526627725610639*^9, 3.526627992075629*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Dimensions", "/@", RowBox[{"co2", "[", RowBox[{"[", "2", "]"}], "]"}]}]], "Input", CellChangeTimes->{{3.524832600044374*^9, 3.5248326053529577`*^9}}], Cell[BoxData[ FormBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"307", "7"}, {"444", "7"}, {"506", "7"}, {"640", "7"}, {"382", "7"}, {"431", "7"}, {"352", "7"}, {"334", "7"}, {"400", "7"}, {"645", "7"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], TraditionalForm]], "Output", CellChangeTimes->{3.524832605883334*^9, 3.524925921081771*^9, 3.526626006018865*^9, 3.5266276080923643`*^9, 3.5266277256428003`*^9, 3.5266279921287403`*^9}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"mloraw", "=", RowBox[{"co2", "[", RowBox[{"[", RowBox[{"2", ",", "4"}], "]"}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.524832634971533*^9, 3.5248326781374063`*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"sporaw", "=", RowBox[{"co2", "[", RowBox[{"[", RowBox[{"2", ",", "10"}], "]"}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.524832680343307*^9, 3.5248326923919067`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Summary", "[", "mloraw", "]"}]], "Input", CellChangeTimes->{{3.524832696773796*^9, 3.524832700186314*^9}}], Cell[BoxData[ FormBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"\<\" \"\>", "1", "2", "3", "4", "5", "6", "7"}, {"1", "1958.2027`", "315.71`", "314.42`", "316.19`", "314.9`", "315.71`", "314.42`"}, {"2", "1958.2877`", "317.45`", "315.17`", "317.27`", "314.98`", "317.45`", "315.17`"}, {"3", "1958.3699`", "317.5`", "314.75`", "317.82`", "315.06`", "317.5`", "314.75`"}, {"\<\"...\"\>", "\<\"...\"\>", "\<\"...\"\>", "\<\"...\"\>", \ "\<\"...\"\>", "\<\"...\"\>", "\<\"...\"\>", "\<\"...\"\>"}, {"638", "2011.2877`", "393.5`", "390.76`", "393.89`", "391.15`", "393.5`", "390.76`"}, {"639", "2011.3699`", "394.35`", "391.04`", "394.53`", "391.22`", "394.35`", "391.04`"}, {"640", "2011.4548`", "393.71`", "391.17`", "393.84`", "391.3`", "393.71`", "391.17`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], TraditionalForm]], "Output", CellChangeTimes->{3.524832700644535*^9, 3.524925921162531*^9, 3.526626008708219*^9, 3.5266276082211018`*^9, 3.526627725740641*^9, 3.526627992260755*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Summary", "[", "sporaw", "]"}]], "Input", CellChangeTimes->{{3.524832707180455*^9, 3.524832710907568*^9}}], Cell[BoxData[ FormBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"\<\" \"\>", "1", "2", "3", "4", "5", "6", "7"}, {"1", "1957.4548`", "312.77`", "313.02`", RowBox[{"-", "99.99`"}], RowBox[{"-", "99.99`"}], "312.77`", "313.02`"}, {"2", "1957.537`", RowBox[{"-", "99.99`"}], RowBox[{"-", "99.99`"}], "313.49`", "313.43`", "313.49`", "313.43`"}, {"3", "1957.6219`", RowBox[{"-", "99.99`"}], RowBox[{"-", "99.99`"}], "314.`", "313.61`", "314.`", "313.61`"}, {"\<\"...\"\>", "\<\"...\"\>", "\<\"...\"\>", "\<\"...\"\>", \ "\<\"...\"\>", "\<\"...\"\>", "\<\"...\"\>", "\<\"...\"\>"}, {"643", "2010.9562`", "387.09`", "386.94`", "387.14`", "386.99`", "387.09`", "386.94`"}, {"644", "2011.0411`", "387.02`", "387.11`", "387.1`", "387.19`", "387.02`", "387.11`"}, {"645", "2011.126`", "387.1`", "387.45`", RowBox[{"-", "99.99`"}], RowBox[{"-", "99.99`"}], "387.1`", "387.45`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], TraditionalForm]], "Output", CellChangeTimes->{3.524832711468978*^9, 3.524925921227868*^9, 3.5266260099561768`*^9, 3.526627608276765*^9, 3.526627725799406*^9, 3.526627992310953*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ListPlot", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"sporaw", "[", RowBox[{"[", RowBox[{"All", ",", RowBox[{"{", RowBox[{"1", ",", "7"}], "}"}]}], "]"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"mloraw", "[", RowBox[{"[", RowBox[{"All", ",", RowBox[{"{", RowBox[{"1", ",", "7"}], "}"}]}], "]"}], "]"}]}], "}"}], ",", RowBox[{"PlotStyle", "\[Rule]", RowBox[{"{", RowBox[{"Blue", ",", "Red"}], "}"}]}], ",", RowBox[{"Joined", "\[Rule]", "True"}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}]}], "]"}]], "Input", CellChangeTimes->{{3.524832766893557*^9, 3.5248328323535137`*^9}, { 3.5248328896855164`*^9, 3.52483295749901*^9}, {3.52483300904706*^9, 3.524833033629264*^9}, {3.524835857021216*^9, 3.524835879292924*^9}, { 3.524835929175577*^9, 3.524835933583045*^9}}], Cell[BoxData[ FormBox[ GraphicsBox[{{}, {}, {RGBColor[0, 0, 1], LineBox[CompressedData[" 1:eJxNmHd8j9cex5XWqN0sVJAgO3bt8KBGjQwRlLQaMWq02v5WrnJbrmrv5V5t r1Kp5ocYNWKkSOw9KiIi0YRGJkIGEWKPnpzzPq8kf7Sv7+s8z/e8z/t8zvM8 P26T54yeWrNGjRrfiP9U/j9/vEtC6k8xRmKrb4pDvjcZKY9CC9qviDG+dNw+ NG+Fyfjumwlp80T90Ct82fFVJsNwiDiRJurK4bmrTYZ//K93PVfGGBmxnwW8 aTcZqe5/PfmnqKNXib+1JuPwMRePNFHnzRV3bDAZ1qBWzj4/xxijKycUdcdr 7WovEPV6cXvGJpOx6sCK71N+pv82kxHglx7tsSrGaC3wEreYDO+kJmfmirpG 5Z8Yl/yruH8r/NH0j4M/mvVshz+a9W6D/5cY43Nxe+xO+H+Bfxf8vzB/PPyr 6RcP/2rmT4B/NevdB/+vMcaJCiFwL/yiLgkRBAnw/8p6E+GPYf598IvaW+iv SIRf1MMqJzgAvz3GEKNe4Qfg1/UR+O3Mf9xkLJld+Mx7DXynTMan3b5O+HoN Ps+ajOQ+gampa1jfOZOxs1bhUq+17H+yyTidtWfRvLXwXjQZm9cHGmmi7lr5 l2Yyjsx37em5Dv7LJmPd4L3356/Db5bJWNQwaEe6Hr9C/1j65ZqMH5O+GvZV LDxZ9Bd18nnxl4X/9TFGZbvPruF/Pft9Df/ruT4T/xtYfzb+N5DXHPxvgD8H /xvZnxz8b6T/DfxvrJpP+t8UY1Ruj1cu/jeRr1z8b6pan+T/DR+58P8Gby78 1WrJv5n9z4Vf1JVxbJUH/2Z85MG/Bb958G9h//Lg3wJ/HvxbY4xKPMd8+EU9 rfIvH/6t+MuHfxv5yId/G/4K4N9G/grgjyOvBfDHsb/X4Y/Dz3X4t7P+6/Bv J6/a//Yqn5J/Bz5uw78Dvpvw74CvkPzvhKeQ/O9k/26R/53szy3yuauqv8z/ LvzeJp+78FdE/uN5XhSR/3h8FJP/eNZfQv/fma+E/P/OfpbSX9SVZcAd/O9m PXfxv5v7y/C/m7yU4X8P+1mO/z34e4D/PfitwP9e1luB/730f4D/vZyfZ/hP 4P4X+E9g/uf4TyB/r5kVfyL7U9us+BMZf8Os+BPZ/7pmxb8P3gZmxb+P+Rqa Ff8+/NY3K/79VddL/v3winHJv5/+YlzyH4CnkVnxH+B6B7PiP0D+G8F/kPPT FP6D8DvBf7Dqfsl/CF4n+A+xH87wH4LfAf7D5LEJ/IfZbxf4D/N8aQb/Ea53 hP8I/VzgPwJfc7PK/1H4RS3zf5S8tjCr/B/lfLxtVvk8Rh7dzCr/x+jnalb5 PIY/cb/M/3F42phV/o9X3S/zf5z53Ol/guvbmVX+T3C+2tP/BOfFC/8nWZ8n /k9yPnzwfxI/fvg/RX8//J9ifR3xf4p+HfF/Gr4u+D/NeFf8n2Y/e+H/DPno jv8z8PfC/xnu7wP/WfLZF/6z8PeD/yw++8H/B3kZCP8f8A2E/w+uHwL/OcaH wH8O3sHwn+N5NRz+JPiHw59EPkbBnwTvSPjPwxsI/3nWFwT/eeYbBX8y+Q2C P5nnSwj8ycw/Gv4L5CUE/gucp1D4LzBfKPwpPJ/GwJ9CPsPgT6H/WPJ/kf0f R/4v8jwYT/6r1TKfqax3AvlPZT0TyWcq64kg/5dYfwT5vwTvdPJ/ifkn0T+N 78dI8p/G/TPonwb/TPynM/4J/tPhmYX/dPL3Cf4v48eM/8ucpyj8XyYvc/H/ J3mai/8/OU9f4/9PfCzEfwbzLcB/Bt9P/8J/Bvv3LfyZ3L8Y/syqccmfyfr+ Df+VqnHJfwUfi+G/Qp4Xwn+1alzyX2U/F8F/tWp+yf8XPr6DX9dL4f8Lnv/C n8X+LYM/i+fLcviz8PET/NfgWQH/Nfr9BP813pfL4c+Gdzn82ax/JfzZ7Fc0 /Dnszxr4c/TvL/hzOM9ryX8u699I/nP17zHynwvvRvKZV9VP5j+PvG8gn3ns dyz5z+d5tZH859N/M/nPZ/1x9C/Qv6fIfwHr2U3/arX0fx2ePfi/znnfg/9q 49L/DXwexH+1Wvq/Ad8h/N9k/4/i/yb7cxT/uj6J/0Lqs/gv5Dym4L9Q/16C /xbrvQD/LXymwn8LP5fhv02/DPhvM18m/LfhvwJ/Eb6y4C9iv7PhL9Lf7/AX 83y4Dn+x/n6Hv1j/HoC/RP+egL+E8Zvwl7CeG/CXMl4Efynnpxj+Uv39C/8d 9u8e/Hf09yn8d/T3Kfx3yd8j+O9yHmtYFP9d1v+S/JfBU9Oi8l+mv08tKv9l rL+OReXzHvPVs6j834NP1DKf9+j/lkXlv5za2aLyX858Ylzmv5z9c6T/ffbP yaLyf19/r9H/Pv1aWZT/B8zvalH+H/C+FLX0/4Dng7he+q8gz20syn8F63Gz KP8V8HlYlP+HzN/eovw/hE/U0v9D+rWzKP+PGPe2KP+PeJ954v8R1/vB/5j5 /eF/zH51gv8xz/MO8D/R32PwP2G8O/xPyHN3+J9y3rrB/xSeHvA/hacv/M/Y j77wP2O+3vBXG5f8z8lHf/ifcz4Hwf+c/RkM/wv9/QT/C9YbDP8L+ELhf6m/ X+B/yfg4+F9yvsPhf8V6wuF/hY/J8L+CL9Ki8l/DrvxNJv+ilucnkvxXq2U+ X7Or9U8h/6KW/FPIp6glzxTyX9OueGaT/5rcP5v8i1rm7VP612K+OeRf1NLv HPrXot9n+H/drvx+jn9Ry/V+gf/X6WfC/xt29bwx4f8N+KPwL2rp50v817ar PM/Hf218LcR/bdazCP917Covi/FfB57F+Be13L9v4a8L3xL463L9/+Cvy3q/ h7+eXZ3vH+AXtXwe/gB/Pfwvh/9N5lsJv6jl++5n+N9kfavgr8/6ouGvz/pW wy9q+fyJgb8BPu3wN2A/18HfgPlj4W8I72b4G7J/m+EXtcx7HPyNmC8e/kb0 +x3+Rqw3Ef7GdvU82Qd/Y+Y7BH9j9uc4+W/C+k+R/yaMnyb/1cZlPpsyfo78 N2X/kshnU+ZLJv9vka+L5F/U8vstjfxXq2V/B9Z/mfw7sN4M+jsw/1X8O+I7 G/+O8ObhX4/n49+JfBfg3wlfN/DvRP5u4t/Zzr9/4d8ZnmL8O5OPEvy7sB8l +HfBz138u5DfUvibwVsKfzPydwd+XZfD35zrK+Bvzvl4Dn9z/L+AvwXjNayK vwX+aloVfwt81LIq/rdZr7he8r8Nfx2r4q9WS/6W5LeeVfG3pF99q+JviY8G VsXvauffj6yK3xXfopb8rtzvYFX8rejvBH8r+BzhF7V8nzSDvzX5cYK/NT6a w98any2sKv9t4BG1zH8bng8trSr/beAT4zKfbvR3tar8u9HP3ary6UY+2lpV /t3h9bKq/LvTX9Qy/+6s15f+bcmHv1Xlvy39fOnflueNL/7bkV9//LeDzx// 7dgvX/y353nSAf/t4e+A//b46ox/D85PF/x7wN8N/x7w9cC/J/vRE/+e3N8b /5746Am/F+vtBb8X+x0Avxf5NeD3ZnwA/N7cPwB+b/wMgt+H/R0Cvw8+RsDv w/kNht+X+YLh92W+MPh9OX9h8PuxnvHw+9F/Ivx+3P8B/P7UEfD7s/+R8Pvz PIyEvwM+p8Dfgfunwt+B9c+AvyPP29nwdyQfn8Ovawv578T8NvLfiefDXPLf CR/zyGdn7p9P/juz/nnkszP9viL/XeBdQP676O8H8t+FfCykf1fmX0j+u3L9 Yvp3JX/f4b8bef4P/ruxn0vxX62W/t+Bbxn+32G/luH/Hfr9iP/u7Mf/8d+9 alz61/UK/Pcgfyvx34P9WI3/HvhcA39PeGLh78n6t8DfEz/b4e9FHQ9/L+bf C38v9uMg/L05n0fg763f//D3Zn1n4O/D9Wfg13US/H30+x3+vuzHRfj7cj5S 4e+L/3T4A/iezYA/gPkz4A8gX1fg78fz7Ar8/VhfJvz96J8Ff3/858Dfn/zc hL8/z4Mi8m/o9zv5N8hrKfk36FdMPgfg7w75H6Df7+RzAOe1jPwPxE8Z+R/I fpWT/4HMd4/+g+h3n/wPot9j+g/iffQU/++Sh5f4fxe/j/D/Lut7jP/B+vsA /4PZ31f4H6y/D2zK/xDGa9mU/yHktY5N+R/CehrZlP+hrLeJTfkfyv41tSn/ Q1mvqCX/MPidbYp/mH6/2hT/MK53syn+99g/d5vif4/99bApfl37wD9cvx/h 13Vn+Ifr9xv8I/T7Df4R+OwBf7Va8o/k+8aAfyTzD4R/JPkeBP8o/A2FX9cj 4B9FnkfCHwhfIPyBPE+C4Q9kP8PgD2K/x8AfRH7GwB8E/zibyn8weZpgU/kP pn+4TeU/mPM81abyGcL+iFrmP4S8TrepfIbQf5ZN5X+0/r1rU/kfTZ7m2FT+ R3O+5tA/VP+etan8h+rfs/QPxe8X+B+j31/4H8P9/8D/GN6PC/AfRl4X4j+M +5fgP4z9WoL/sfhciv+x8C7D/1jOy4/4H6ef//gfx/3L8T+O9UTDP548x8A/ nvnt8I8nr2vhf1//noT/ffZnA/zv69+X8E8gn9vgn4CPOPgnwLsV/olV10v+ iezvDvj1+G74wzkvu+EPJ6/74Q8nfwfh/4A8HIVf1yfh/wBfZ+H/kH7n4P+Q +c7D/yF5S4F/Etdfgn8SeU6HfxL8meT/I/KUTf6r1TL/H+nfk+QzAn83yH8E +5lPPiNYz3XyP5n3/S3yP1m/f8j/ZNZTQv9I/fuS/Edyfxn9I8lbOf6nMP9D /Ferpf8p8DzG/1T2+xn+p+rfj/ifSv5e4X8a5+m1KOV/Gj5ELf1P4/7Xo5T/ 6exHnSjlfzq+6kUp/9PpXz9K8X9MvhpHKf6P9fskSvF/DK8Yl/wz9PskSvHP wJdDlOKfoX/PRSn+mczvBv9MzlN7+Gfq9wX8s7jfB/5Z8PrCr+uO8M+GpzP8 s3me9Igy/gZtnd6R "]]}, {RGBColor[1, 0, 0], LineBox[CompressedData[" 1:eJxNmHlYjukex8MwI4xskSVJKgmDMrZ4UGospZI1u2xZZrzrGWM4Z8Y5c+bM HDNzzXGOGUqWZAuFQpMi22RLWRPZSjIjESKc+73vz3O9+mPm+l3P8/zuz+9z f+/3eV8dZiyOiKnt4OCwQvzH9v81h1b/cO5/cVr7leXh6YkGLcC34BfPNdQp Bq1zrtOJz0XtYPvbYdBuj2+Zlidqx8sbPw0Q1889j7zT6Zc4LTn41ufNRf3N yon5X+j1EYOmNZt+NF/UZ06LvyyD1jVl3SOvX+O0o1Xe0av2G7Q898LqL0Ud Im5PTjVomdktPfNF/TA83XVlmkEzh7k6+6yN0yJEWX7AoHUv8qj317XwZBg0 yb8W3v3wr7PXkl/UtsfD0+EXdXMbYBb8cXFa5+hVR6oy4Be1rfTOgl/UvWx/ ufDHcz0H/nj7dckfj5/jBu1fC0pfdV4Pj6gX+a1IWyHqX9aIv2MG7Uz/0Ly8 9fZ+u+uUfuedEKfZHncU/Y5f3/f1FwnMW2DQtm4K1fIT8HXZoB1e1q6P1wZ8 iXpD0P4nyzaw/gWD9nWjsF0FG/B/nv4b47QA2w1nDNpPuctDlot6tu3vLP03 st55/G+C/yz+RW0rXfPwL+pNAvdyPv43c/8F/Iv6M9uC1/G/mXxcw39inGYb J7gI/4n4KMZ/Ij4K8b8F3hL8b2F/i/G/Bb4i+JN4/ib8SfDdgD+JfN2Dfyt5 uAv/VvzegX+rfX3Jvw3+P+DfRr8y+LdxfyX828lLKfyifiaOw5Ey+Lcz/334 d7Df5fDvYJ5S+Hewv/fh3wl/Bfw7uf85/DvxUwV/MvtdAf87teRPZp7H8O/i /FTAv4v1K+Dfxf5Wkv/drFdN/nfTr4r872Y/npHPPXGabfzo5+Rf1EttCz4j n3vgqyH/KezPK/Kfgt+35D8Fnpf0TyX/r8l/qv152T+V+V7gf699fel/L/PW 4H+vfT7pfx95r8H/PvJRhf998L3C/37Oq6NR+d/P8w5G5X8/56uBUflPw19d o/Kfxn43NCr/adxfx6j407m/vlHxp7N+Y6PiT+d5J6PiP8B5amVU/AfYn6ZG xX+AeV2Miv8g/K3hP8jnmwv8B5nfBf5D+GwK/yF428B/iPeDK/wZ8LnBn0H/ dvBnME8b+H9jf9zg/43z5w6/XrvCn4nvtvBnsr47/Jn48ID/MM97wn+YeXzg P0w/X6PKfxb83kaV/yzyK2qZ/yzyJmqZz2zyKvrJ/GdzHroYVT6zWa+nUeX/ CLy9jSr/R5jfz6jyf4R+vel/lPz7G1X+jzKfH/2Pst/98J8Dr4b/HO4fgP8c 5g3E/zHmCcT/Mc5XMP6P4SME/8fJZzj+j7N+KP6Ps99R+D9B3kLxf4J8jcL/ CfIQBv9JeEbDf5L5o+A/yTzj4T/FvNHwn+LzMxL+U/QfB//vrD8B/t+5fyr8 +vXp8Ofiaxb8uezvVPhz8TUV/tP4mAH/aeaZBv9p+k+G/wx+xsJ/xn6/5D+D zxj4z3Ke58F/lvVj4T9rv1/yn2P+WPjP0X8B/Od4ny0k/+fxu4D8n+d9tpj8 n2f/Y8hnHvk1kv885l9CPvPI8yLyf8F+v8z/Bdb/C/m/AO9y+udTf0X+8/n8 +Qf98znff8d/Afv1Df4LuP5v/Bew36vwf5F8/Yj/i/hdg/+L7Nc6/F/CbwL+ L3F9K/4v4TcJ/5fpvxn/lzn/G/B/mXn+C/8V+v8H/iv4Wg//FfwnwH+V/dkI /1V7f8l/le8n6+G/ho9E+K+xX9vgv0a+t8BfiM8k+AvJ2xb4C/l8S4T/OnlO hP+6/nsE/uv29SR/EflIhr8If7vhL8LfPvhv6L9f4L9hvy759foA/Df13xPw 34QnHf6b+u8V8l/Mfhwi/8X4yiT/xexPNvm8xfPZ5P8WPjLJ5y37/TL/t9nP HPJ/G54c8n+b83CM/nfs/WX+75C3Y/S/w/6cxP9d/fs//u/S/zT+75Lvi/i/ R/+r+L+nf//H/z2eL8Z/Cft7G/8l3F+M/xJ8PcB/KfPcw38pfkrwX0reyuG/ T/0I/vvkrRz+++T5Kfxl+HwKv15XwF/G+tXwP+D5Gvgf0P8t/A/w+xr+cvv9 kr8cvrfwl/N+rIH/If3qmBT/Q/JYy6T4H+K/vknx/8F+1TMp/j/w/YFJ8eu1 k0nx/8nnV2OT4v+T8+BsUvx/kl9xXfI/Yv0mJsX/iPlamBT/I/37n0nlv4J5 3Uwq/xWs18ak8l/B54uPSeXzsf59y6Ty/5jPIy+Tyudj8tDNpPJfyf74mlT+ K8mDuC7zX8nz3en/hPn9TCr/T+jXk/5PmKeHSfl/yvO98P+U9QbgX78+CP9V 8Gv4r2K+gfiv4v0zCP/PqPvj/xm+++P/GedhAP6f43cw/p+z38Pw/5zng+F/ wbwj4X+B/zD4XzDPGPiryVM4/NXkIQL+anhGw/+S/R0D/0v9+xz8L8lLOPyv 7Ncl/yt8R8H/ivMVBX8N90fBX0O/yfDXMM8k+F9Tz4H/NT5i4X+Nj0/hf0Ne lsD/hv1YCv8bnl8M/1vmNcL/lv03wP8W3mXk3yFe8Swl/6KW8y4j/6KW8ywj n7Xi+b5B/kWtvo+QT1Gr7yvkv3a8Wu+f5F/Ucr++Jf+ilp8fX9G/jv1+mX9R y/3/gf6ilvn6Ef/v8fwq/Itafj79jH9Rq+8D+K/LfOvwL2r5+R6Hf1HLvMbh vx7Pr8V/PXs/6V/U6vsI/t/HVwL+RS3zuhn/7+N7C/wf4HMT/KKW8dsEv6jV 9w3468fzfQF+UcvzmwK/qGU+UuF3xHcK/I7wpsLvyDxZ8DfAZxr8olb/ngl/ A3gz4G8Ibxb8DeHLgL8heTgMfyP4TsDfiH6n4W/EPGfh/5D7c+H/EB+X4Be1 PI9X4W/M/l2DvzH9bsDfmPuLyL8T/UrIvxM8FeTfCT8PyWcT5q0g/03IfyX5 FLX69yHy35S8VpP/puS5hvw3he8N/Zsxbx2zyn8z5qltVv2bsX/iuvTfnP1p aFb+m3N+6pqV/+b4F/dL/y2Yv5FZ+W9BXuublf8WzCv6Sf/OnJcmZuXfmetO ZuXfmf6Nzcp/S/Lewqz8t2Q+Z7Py35J5nOFvxfXW8LdiHjf4W3Fe2sPvwnlt Db8L63WA3wXf7eBvbe8n+VvD7wF/a9Z3h78N+fWGvw370R3+NvjrAX9bzksX +Nuyvx/B35Y89Ie/Hf01+Nvhbyj87egfAL8r8/jD78r++sPvyv3+8LfHR1/4 23P+B8LfHn+ilvl3I0+DzCr/buRb8Mn8u7H/QWaVzw7MF2JW+X+nlvnswHqh ZpV/d/qL+WT+3Vl/mFnl390+v+zfkXwMJ/8dOY+B9O/IeoH492B/RuDfA9/B +PegXyj+O+FvFP47sf8R+O9Ev0j8e5Kfkfj3tM8n/Xvy+RGKfy/6R+Hfi/nH 4d8Lvknwe7N/MfB7s/5M+L3J61z4OzPPfPg742Mu/J3xNRd+H/IZC78PeVoI vw/7+xn8XdgfM/xd4F8Kfxf4lsPvyzzL4fdl/a/h94X3b/B3Zf3v4e/K5+e3 8L9zXfJ3433+A/zd4P0efv36z/B3Zz9/gr878/8Kf3d8ryH/H8G7nvzrdRL5 /4jzkEQ+e7B+Avnvwf5sIp89OH9byX9P5tlJ/nviN5n898Tvdvr3ot9u8t8L f8n070Ue9+Lfj/yl4N8P/r349+PzfQ/+/VnvEP79yfNB/PvzeZuK/97269K/ Xmfivzf7n4b/j8nHUfx/zPyn8K9fz4e/D74uwt9Hf7/D3wffRfD3hf8m/H05 b7fg7wt/Kfz9OB8P4e9HPirh78f9T+Dvj++X8Pdnv17Cr9dv4B9AfmtbFP87 teQfwPy1LIo/gP37wKL4A5j/NfwB+vcB+Afio55F8Q/k/roWxa9ffwP/IHzV tyj+Qfr73qL4B3H/hxaVf439bGpR+df4PG5gUfnX4HWyqHwO1t/3FpX/wTzv aFH5HMx5aW5R+R+Cf1HL/A8hn60sKv9D9Pc7/YfC525R+R/KfnvRfyj5EbX0 H8j71AP/eu2L/0D4fPAfRF474j+Izw9xv/QfxHnpalH+hzGPL/6H6d8H8D+M 9fwsyn+w/v7Ff7D+/sV/MPkaAn8I8w6DP4T9CoI/RH8fw/8JvobC/4n+foZf vx4G/3DWi4B/OPkNhX84/NPgH4HvSfCPYL9mwT9Cf5/APxL++fCPJP+L4B9J /ufBP4r+i+EfhZ8l8I/i+c/hDyV/X8AfCv+X8IfieyX8YfrvT/jD2N9v4A/T f3+S/9HM/x35H22/LvM/mv34nnyGk+e15D+c+1eTz3Dy8yP5j2A/VpH/CNb7 mfxHcN5X0z9Sf1+R/0j419M/kvkT8T+G/d+M/zHsRzL+x8C/E/9R5DcN/1H4 2oX/KPbrAP7HMm8G/sdyPRv/Y/Xfh/gfB28O/sfx/En8j2O+c/CPh+8i/OPJ WwH8+vU8+CfAXwj/BPwWwj8BH1fhnwjfFfgn4u8G/BN5/g78k3i+DP5J7E8J /JN435TBH03+yuCP5v1dAX+0/v6BfzLn+QX8k/X3EfyT8VsF/xT6V8M/hf5P 4Z+i/76zKv6pnPd6VsU/lXkdrYpfvy5qmf9p5NHJqvI/TX8fWFX+p7Ef71lV Pqdzv4NV5X86+9nMqvI5Xf99Z1X5n8F5b2lV+Z+BPxeryv8Mzrsn/Wcyfyer yv9M1veg/0zOVwer8j+LPHSxKv+zWF/0k/5ncX8Pq/IfQz9fq/Ifg59uVuU/ hv0X90v/s7ne06r8zyZPfazK/2z2Q8P/HOYZiP85+ArE/xz2Mwj+uZyXEPjn 4isS/rnMNw7+efBHwz+PeafAPw+eaPjnc34mwD+f/lPhn09+ZsIfq3++wx9L HhbBH6v/foB/Afk2wr+Az58l8Ov1IvgXwrcA/oXM8yn8C5lHPP9/yB6d0Q== "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], AxesOrigin->{1958., 312.}, BaseStyle->16, Frame->True, GridLines->Automatic, PlotRange->{{1957.4548, 2011.4548}, {312., 391.3}}, PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}], TraditionalForm]], "Output", CellChangeTimes->{{3.5248327882985497`*^9, 3.524832833167555*^9}, 3.52483289039791*^9, 3.52483293094812*^9, 3.524833038617756*^9, 3.524835879939908*^9, 3.524835936168334*^9, 3.524925921281595*^9, 3.5266260116433697`*^9, 3.526627608394079*^9, 3.5266277259104557`*^9, 3.5266279923463697`*^9}] }, Open ]], Cell["Yearly differences between MLO and SPO", "Text", CellChangeTimes->{{3.524833095163245*^9, 3.524833103521991*^9}}], Cell[BoxData[ RowBox[{ RowBox[{ SubscriptBox["\[Chi]", RowBox[{"n", ",", "obs"}]], "=", " ", RowBox[{"Mean", "/@", RowBox[{"Table", "[", RowBox[{ RowBox[{"Select", "[", RowBox[{ RowBox[{"mloraw", "[", RowBox[{"[", RowBox[{"All", ",", RowBox[{"{", RowBox[{"1", ",", "7"}], "}"}]}], "]"}], "]"}], ",", RowBox[{ RowBox[{ RowBox[{ RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], ">", "y1"}], "\[And]", RowBox[{ RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], "<", RowBox[{"y1", "+", "1."}]}]}], "&"}]}], "]"}], ",", RowBox[{"{", RowBox[{"y1", ",", "1959", ",", "2010"}], "}"}]}], "]"}]}]}], ";"}]], "Input", CellChangeTimes->{{3.5248331477729073`*^9, 3.52483332032463*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Dimensions", "[", SubscriptBox["\[Chi]", RowBox[{"n", ",", "obs"}]], "]"}]], "Input", CellChangeTimes->{{3.524833323581044*^9, 3.5248333406864777`*^9}}], Cell[BoxData[ FormBox[ RowBox[{"{", RowBox[{"52", ",", "2"}], "}"}], TraditionalForm]], "Output", CellChangeTimes->{3.524833341630822*^9, 3.524833399743545*^9, 3.524925921660757*^9, 3.524926025579707*^9, 3.5266260168829613`*^9, 3.5266276085402937`*^9, 3.526627726024439*^9, 3.5266279924890213`*^9}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{ SubscriptBox["\[Chi]", RowBox[{"s", ",", "obs"}]], "=", " ", RowBox[{"Mean", "/@", RowBox[{"Table", "[", RowBox[{ RowBox[{"Select", "[", RowBox[{ RowBox[{"sporaw", "[", RowBox[{"[", RowBox[{"All", ",", RowBox[{"{", RowBox[{"1", ",", "7"}], "}"}]}], "]"}], "]"}], ",", RowBox[{ RowBox[{ RowBox[{ RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], ">", "y1"}], "\[And]", RowBox[{ RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], "<", RowBox[{"y1", "+", "1."}]}]}], "&"}]}], "]"}], ",", RowBox[{"{", RowBox[{"y1", ",", "1959", ",", "2010"}], "}"}]}], "]"}]}]}], ";"}]], "Input", CellChangeTimes->{{3.5248331477729073`*^9, 3.52483332032463*^9}, { 3.5248333533132668`*^9, 3.524833359857937*^9}, {3.524833402494609*^9, 3.5248334026085052`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Dimensions", "[", SubscriptBox["\[Chi]", RowBox[{"s", ",", "obs"}]], "]"}]], "Input", CellChangeTimes->{{3.52483336513131*^9, 3.5248333824352283`*^9}}], Cell[BoxData[ FormBox[ RowBox[{"{", RowBox[{"52", ",", "2"}], "}"}], TraditionalForm]], "Output", CellChangeTimes->{{3.524833383214512*^9, 3.524833408049222*^9}, 3.524925921778549*^9, 3.524926026713615*^9, 3.5266260229432*^9, 3.526627608690073*^9, 3.526627726141012*^9, 3.526627992624734*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ListPlot", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"sporaw", "[", RowBox[{"[", RowBox[{"All", ",", RowBox[{"{", RowBox[{"1", ",", "7"}], "}"}]}], "]"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"mloraw", "[", RowBox[{"[", RowBox[{"All", ",", RowBox[{"{", RowBox[{"1", ",", "7"}], "}"}]}], "]"}], "]"}], ",", "\[IndentingNewLine]", SubscriptBox["\[Chi]", RowBox[{"n", ",", "obs"}]], ",", SubscriptBox["\[Chi]", RowBox[{"s", ",", "obs"}]]}], "}"}], ",", RowBox[{"PlotStyle", "\[Rule]", RowBox[{"{", RowBox[{"Blue", ",", "Red"}], "}"}]}], ",", RowBox[{"Joined", "\[Rule]", RowBox[{"{", RowBox[{"True", ",", "True", ",", "False", ",", "False"}], "}"}]}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"2005", ",", "2011"}], "}"}], ",", RowBox[{"{", RowBox[{"370", ",", "395"}], "}"}]}], "}"}]}]}], "]"}]], "Input", CellChangeTimes->{{3.524832766893557*^9, 3.5248328323535137`*^9}, { 3.5248328896855164`*^9, 3.52483295749901*^9}, {3.52483300904706*^9, 3.524833033629264*^9}, {3.524835857021216*^9, 3.524835879292924*^9}, { 3.524835929175577*^9, 3.524835933583045*^9}, {3.5248360003122377`*^9, 3.5248360532415533`*^9}, {3.524836105657441*^9, 3.5248361213059177`*^9}, 3.524926047770144*^9}], Cell[BoxData[ FormBox[ GraphicsBox[{{{}, {}, {RGBColor[0, 0, 1], LineBox[CompressedData[" 1:eJxNlWlIFVEYhm2hqGhDKQiylDS1RFqgIISPItQ09/V61dSue1n+6EymqaEQ KBgSSUINZf2QSiMspaJFo6IFMSWDFtAKo4KiyAqDOnPnueSAyMvMOec5z3ln rl9eeaJrupeX1x79Z/1vjRp/3hlpipd1rVRy8saJYwM6t53Ul5+S8LXDbYFR pvT/CHI2+ysJfrzoQaXOnRGjlT6BSsbSl/YMenKIkoGfSW8DdpjS8Cmh1zdU ydEGx1CVJ69TIt65/UM6F1jXeiWhV059WR1tytMn+tqoZND/5e/DOjf36QU3 Kbl1d2ng0JR8IM53SUiMKb2+ekZREvZ61ay6GNbfCr/OI+37wudug3+nKRus KwJ+T46GX+dgp14hBv5Y+GLh19m6HRQPv856tc6IFPjjTNkfPnekPRl+nX0s oGT44+BPU9JYNj4ZHG/KIesBh5K9G2t7auOZ36nk6ZbYwUGdE60NupRcnjHe FJRgyoTW36fz/VdX66t0/qx1NhQq6TgXK0MJzF+q5Hb18s2rE9lPmZKz2699 r9b5nNYxUq6kfn5c17DOkdYGypk/ifPer6TlcU1kTRJ8FcyfhN8K/CfjT+E/ mfEH8a+zpWNfHf5TTLFi+BH8pzC+Ef8pnFcj/lPx2YT/VHib8a/zCqtQLfhP 434r/tMYfxz/aeynDf50+nwa/nTWN+FPp69n4M/AXzv8GZzPefgz6EMH/A76 eRF+Bz4uwe+A9wL8mf+fd/Nncr5d8Hvud8Pv5H3pht9JX6/D76R/N+HPog93 4Pfke/Bn4esh/NnM9wj+bNZ7An82fRuAP4fnn8GfQ5+H4c+B/wX930Wf3tD/ Kdnd/134HaWfufh7T/9zOc8x+pnLft7R/zy+Zx/ofx7n/ZH+57Gfz8yfz/l+ ov/5jP/K/Pn07Rv+d7P+BP6nZLf/3fD8wr+L857Ev4v5/+DfRf/+4r+A92ma YfsvwIfObv8FjJ9p2P4LOY/Zhu2/EF9zDNt/IfPPM2z+Ivq10LD5i3g/Fxg2 fxG8+r6bv5jvz2LD5i/Gl7dh8xfjd5lh85ewvh/8JbxPAfCXeH4v4C9lfAj8 pfCugd+Tw+Avg2cd/GV8TzYZ8g9E9R3H "]]}, {RGBColor[1, 0, 0], LineBox[CompressedData[" 1:eJxFlFloVEkUhptRfIiIMgaDD8ZlYhaNipoHB4kUaic9arqT7uzp7PvqwjBV xLjMYBhxISoScOPKjAo+GEXQKIoSIypECU0icYgKUVCCgjKjjuKL56a+xgtN 83fVPfWd//zV86s2B2t/8Hg8f8jH/Z4+9cq58bWO8rjPPK0uTXp9IHmdo7bH 9mSOLdDqyMAu3y7RvrH22J4krc6f8ash0SvdR/RvgfhZi9Y7yt3enqDVsmcJ U36P6lStjt3oPjQo2pWxi7RKTx0+nuh1VNedj8nhn7RKGZhxv110Slh+kf0v CuN6I6LTY0b+3rJEq8H/Qy8XZjjqWnznmxxZ39tZPNSRwfnLtFIzK/uHMjgv Tasll0+9S8p0lOy+Fv+zVpEFo192ZnL+Gq1u9cUlDome625YC7+PfjPgF/0p WYC88Ps4X8H/i6OELj1mHfyiXXsyvfBH1wPwb+C8IPyi3fbS/fBvgL8C/o34 XQK/6K2uITXwi34r7XU2w78J/ib4Rde5Txv8oo8fk6cR/izqb4Y/C3+2wZ/F ++3w+8lHB/x++HfC78fvTvgDjjoj7Y/8CX+A+e6FP8B5+7Ta3/L6a0o2/R/Q qi1td+/u7O/rj1b7I5Fs5nGQfOY46tFDeU5qde/plT0dOezvJp855OewVrd3 zFmVFGQeXVr95b36344g5x3Vas+0wMVh0f0Sx65u6ofw9wT5D8F/mvoh+j+H /7nM/yz+5zKPHvzPhf8C/ueR3178z8Ovi/ifx7yu438+/d7E/3zW+/A/n/nc xP8CeO/ifwHvP8D/AvobhL8QvsfwF5K3Yfij6xH4i+Afhb8If0fhL8KPf+Av hu8J/MX49xz+Yt5/CX8J74/DX8J8XsEvOuheyHH4w+RvHH7RbvvJ7+EP0/9b +Eu5z5/hL6X+v/CX4u9H+Muo/wX+Mup/gL+M+U0ylr+c+z7FWP5y+o0xlj+6 Lnoi/xXkcYax+a8gzz8am/8K5jHZ2HxWst9jbP4rmedMY/NZSf1Zxua/ivse Z2z+q/BvtrH5r+K+J1K/mv4XGpv/as5PoH4192u+sf7XkIfFxvpfw/lSb8L/ GvYvN9b/WuqlGut/Lf4sNdb/WuYv+yf8r2N9hbH+15GnVcb6X8c8FP7X088a /K/Hr/X4X888vfA3cF988DfgVwj+BvorgL8R/jD8jfRbBn8jPGH4m7g/RfA3 Ub8c/ibyUw1/c/T/Hf5m8tAGfzPzaYW/hXz/Cn8L/z/b4I/qNvhb4WuBv5V+ tsDfSj/y/jfgyK4G "]]}}, {{}, {}, {}, {RGBColor[0, 0, 1], PointBox[CompressedData[" 1:eJwtklFI01EUxldZkbDCBxshBS4GGYkO0lBYfD74MKLRjKCikpQFQlqy6UYP QUQRRARBBcHOMVZIQQ+LhIpCEnxYNCkkRoMFwSRHlFQOGWR0b/c78OfP7373 O/dwzmkeONcXW+vxePaaz/4Pl8LB1bQg0rT47NJ0HOX8cuDvfUEqaWIujv/6 Q8GVb9HnO4rkRwJzO9L0lfxEsLF7eGJ+if6soGfSmyjWqE8J9r0fWpf2JBy/ EMSLmPRuJb8WnLHhTzj/G8FoqL6Qaac+K7DPLYbJOUH+nYnj5LygkDkfqo/R /0EwMjG/oTtJ/aOguuvEzZl75E+sL0MuCX5fD0wffUr/F8Hbtjt/BmaoLwhs eyKfyRXBYM5cWCF/Z/+8Y87/U7D0w8TuMadXBQ9MeYX95Jog3Wka0kdeFdTZ g7P0r1FctgmvUl+v2FObvdUv5E3Kesledf2fo79BseA7cDG7Qr1REbP93Tzu eJvCymU/ebui1ebvGnf+ZsWU7Xcv9YCi3xZwiNyiaLAxQm5V2HJ+3aA/qLDj 7nxMvUPdvrwidylazDiqFXKI79Ulnb9Hcc2GL+n0XsWwnWc7OaxuP6Pkg4qK zX+B/qgiaMaXu039iOKuwbaX5GPMVyKfVLefNfpPK3b6TfhSTo8psmXTsQ7y kGJLwizwqRT+AVcrnoc= "]]}, {RGBColor[1, 0, 0], PointBox[CompressedData[" 1:eJwtkm1I01EUxtcrlEgZSoVYSY0sjFqUvYDwBIlJb0wJEhJrsQ8LJMPNmUXS Bwnyg2AUfdk5hkUZZAwKlIhKGDJCSkRGhsRgYSVBSgsGM7q3+xy4/Pnd5z7n nv85tzxwuT641OPx7DPLfhtm6nyLMcHD1urVqZE2ZMZ/e/8+EGw4fiOemWzD f/2R4NuLm6dKv5AHBadLzU6a/Exw4GNoWSxDf1xwxaQb+EH9paB4qDbd+Yc8 Iujxvjm7UBB2/FrQ0j+58nBJ2PnfCVIDpqAt1BOCpzZ85KQguftePlBDHhdc sxf46Z8QXLQHmqlPCeqHN3XPXSV/EtjrWm6RZ5jvPv1pgb0+NUj9qyAfMCfe kr8Ljtr4TP4paOodzVb8on+e9a6JOD3Lfm4l5wQeG1XkRUF4Go8LGyLOv0RR ZCNEfYVijykveZ28SmHb23qXXKhufs/pL1JEbL4P1EsUm7vn/MOz5I2KAtvg PLlMEbWxrt35yxW2Pf3b2p3uVWw34+rZS96hyKw3P1RL3qXoipudIP0+dfPo or5f3TzvkA8pjqU7i4dekasV5ytzib5p+o8oYlXmQc1Tr1GM9TVX5pZHHdcp 3tt57SSfVGQrzvWOnog6v19dPy9RP6NoXDAv7ja5UXHQvtcn5CZFwuYfo/8C +ztLPahYa+fh6XAcYr1lHfgHsOKa9A== "]]}, {}}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], AxesOrigin->{2005., 370.}, BaseStyle->16, Frame->True, GridLines->Automatic, PlotRange->{{2005, 2011}, {370, 395}}, PlotRangeClipping->True, PlotRangePadding->{Automatic, Automatic}], TraditionalForm]], "Output", CellChangeTimes->{3.524926062226665*^9, 3.5266260265953703`*^9, 3.5266276087286654`*^9, 3.5266277261788187`*^9, 3.5266279926791267`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ListPlot", "[", RowBox[{ RowBox[{"{", RowBox[{ SubscriptBox["\[Chi]", RowBox[{"n", ",", "obs"}]], ",", SubscriptBox["\[Chi]", RowBox[{"s", ",", "obs"}]]}], "}"}], ",", RowBox[{"PlotStyle", "\[Rule]", RowBox[{"{", RowBox[{"Red", ",", "Blue"}], "}"}]}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{"None", ",", "\"\\""}], "}"}]}]}], "]"}]], "Input", CellChangeTimes->{{3.5248334133537493`*^9, 3.5248334996954308`*^9}}], Cell[BoxData[ FormBox[ GraphicsBox[{{}, {RGBColor[1, 0, 0], PointBox[CompressedData[" 1:eJwtklFI01EUxldZkbDCBxshBS4GGYkO0lBYfD74MKLRjKCikpQFQlqy6UYP QUQRRARBBcHOMVZIQQ+LhIpCEnxYNCkkRoMFwSRHlFQOGWR0b/c78OfP7373 O/dwzmkeONcXW+vxePaaz/4Pl8LB1bQg0rT47NJ0HOX8cuDvfUEqaWIujv/6 Q8GVb9HnO4rkRwJzO9L0lfxEsLF7eGJ+if6soGfSmyjWqE8J9r0fWpf2JBy/ EMSLmPRuJb8WnLHhTzj/G8FoqL6Qaac+K7DPLYbJOUH+nYnj5LygkDkfqo/R /0EwMjG/oTtJ/aOguuvEzZl75E+sL0MuCX5fD0wffUr/F8Hbtjt/BmaoLwhs eyKfyRXBYM5cWCF/Z/+8Y87/U7D0w8TuMadXBQ9MeYX95Jog3Wka0kdeFdTZ g7P0r1FctgmvUl+v2FObvdUv5E3Kesledf2fo79BseA7cDG7Qr1REbP93Tzu eJvCymU/ebui1ebvGnf+ZsWU7Xcv9YCi3xZwiNyiaLAxQm5V2HJ+3aA/qLDj 7nxMvUPdvrwidylazDiqFXKI79Ulnb9Hcc2GL+n0XsWwnWc7OaxuP6Pkg4qK zX+B/qgiaMaXu039iOKuwbaX5GPMVyKfVLefNfpPK3b6TfhSTo8psmXTsQ7y kGJLwizwqRT+AVcrnoc= "]]}, {RGBColor[0, 0, 1], PointBox[CompressedData[" 1:eJwtkm1I01EUxtcrlEgZSoVYSY0sjFqUvYDwBIlJb0wJEhJrsQ8LJMPNmUXS Bwnyg2AUfdk5hkUZZAwKlIhKGDJCSkRGhsRgYSVBSgsGM7q3+xy4/Pnd5z7n nv85tzxwuT641OPx7DPLfhtm6nyLMcHD1urVqZE2ZMZ/e/8+EGw4fiOemWzD f/2R4NuLm6dKv5AHBadLzU6a/Exw4GNoWSxDf1xwxaQb+EH9paB4qDbd+Yc8 Iujxvjm7UBB2/FrQ0j+58nBJ2PnfCVIDpqAt1BOCpzZ85KQguftePlBDHhdc sxf46Z8QXLQHmqlPCeqHN3XPXSV/EtjrWm6RZ5jvPv1pgb0+NUj9qyAfMCfe kr8Ljtr4TP4paOodzVb8on+e9a6JOD3Lfm4l5wQeG1XkRUF4Go8LGyLOv0RR ZCNEfYVijykveZ28SmHb23qXXKhufs/pL1JEbL4P1EsUm7vn/MOz5I2KAtvg PLlMEbWxrt35yxW2Pf3b2p3uVWw34+rZS96hyKw3P1RL3qXoipudIP0+dfPo or5f3TzvkA8pjqU7i4dekasV5ytzib5p+o8oYlXmQc1Tr1GM9TVX5pZHHdcp 3tt57SSfVGQrzvWOnog6v19dPy9RP6NoXDAv7ja5UXHQvtcn5CZFwuYfo/8C +ztLPahYa+fh6XAcYr1lHfgHsOKa9A== "]]}, {}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], AxesOrigin->{1960., 316.}, BaseStyle->16, Frame->True, FrameLabel->{None, FormBox["\"ppm\"", TraditionalForm]}, PlotRange->{{1959.4972583333335`, 2010.4972583333335`}, {315.615, 389.9158333333334}}, PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}], TraditionalForm]], "Output", CellChangeTimes->{3.5248334664792643`*^9, 3.5248335002766447`*^9, 3.5249259218118277`*^9, 3.524926028414734*^9, 3.524926086646036*^9, 3.5266260319670553`*^9, 3.5266276087580357`*^9, 3.5266277262250977`*^9, 3.526627992724517*^9}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"\[CapitalDelta]\[Chi]", " ", "=", " ", RowBox[{"T", "[", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[Chi]", RowBox[{"n", ",", "obs"}]], "[", RowBox[{"[", RowBox[{"All", ",", "1"}], "]"}], "]"}], ",", RowBox[{ RowBox[{ SubscriptBox["\[Chi]", RowBox[{"n", ",", "obs"}]], "[", RowBox[{"[", RowBox[{"All", ",", "2"}], "]"}], "]"}], "-", " ", RowBox[{ SubscriptBox["\[Chi]", RowBox[{"s", ",", "obs"}]], "[", RowBox[{"[", RowBox[{"All", ",", "2"}], "]"}], "]"}]}]}], "}"}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.524833504095236*^9, 3.5248336670055933`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ListPlot", "[", RowBox[{"\[CapitalDelta]\[Chi]", ",", RowBox[{"PlotRange", "\[Rule]", "All"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{"None", ",", "\"\\""}], "}"}]}]}], "]"}]], "Input", CellChangeTimes->{{3.524833671112239*^9, 3.524833727811401*^9}}], Cell[BoxData[ FormBox[ GraphicsBox[{{}, {Hue[0.67, 0.6, 0.6], PointBox[CompressedData[" 1:eJxFkl1Ik2EUx1/b/Ggi1EVIhhORUQkxhBwpDB+jCV44mBIZGJFpMEJK8Tq2 i4FoYHQhGOxDRCzRi8EUvRA/YBcjBGVsFjJBmDIbRTqHurbR/3nPGR4Y48f/ /M/Hc97a3ned/dcURXmIn/zvirU35NweoXydQ0Rb4ltnhvwU2GG9kwhE1lR9 BvzRsNZ9Gib+Bu57g4i2qLwA9oVLmgeOyO8v8B/SF8FtTxBx4hXwtl3jNjGv gk/H0OAX+TfAXyYRf0kPgnW70+/NF8QhsNZt2ranibfAPeOb6Xsp8u+Ay2X+ OekRj3DYlvWut4pQ+Sf0KTlflvQYuF4WuCT/Afgu1h3jfofgGlfStpwjPi4w +3+DT+T8OfKfgC1y33+kpwvvlyG+BMvxNezPgT9h/B7uX+QVypAZG3O/YvAH f7zyO89/HbzkxIHYXwF+HTJOZPPkvwnGukmblvJvgfEaumca4ttgbO/rYq4G 74nZimGNUP214EHZn/sZwI8GcNE89bvvFY6JbG/IyP4HhXpa8jdAl59TfTHp jeARGTxPExjj7NaVEpuv8lV/KxivMf6Y61tQX57Lx/XaoUex0CjrHdAzwc8v 50vIb4O+H0Nw/lMv34v7PYdelQg4rTriF9BX8F47ZeR/BU7hnj84vx/58ntd 4ny7V6yjmt5yQ/wHJtOQyw== "]]}, {}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], AxesOrigin->{1960., 0}, BaseStyle->16, Frame->True, FrameLabel->{None, FormBox["\"ppm\"", TraditionalForm]}, PlotRange->{All, All}, PlotRangeClipping->True, PlotRangePadding->{Automatic, Automatic}], TraditionalForm]], "Output", CellChangeTimes->{{3.524833697718383*^9, 3.524833730445705*^9}, 3.524925921878479*^9, 3.5249260312509537`*^9, 3.52492608878198*^9, 3.526626037240364*^9, 3.5266276088584957`*^9, 3.5266277262911253`*^9, 3.526627992840506*^9}] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.524833091326762*^9, 3.524833092216959*^9}}] }, Closed]], Cell[CellGroupData[{ Cell["Equation system", "Section", CellChangeTimes->{{3.5248284923562403`*^9, 3.524828494143037*^9}}], Cell[CellGroupData[{ Cell["Preliminaries", "Subsection", CellChangeTimes->{{3.526627468096717*^9, 3.5266274699605093`*^9}}], Cell[TextData[{ "Basic equation for the northern and southern hemisphere: ", Cell[BoxData[ FormBox[ RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["M", "h"], " ", "is", " ", "the", " ", "air", " ", "mass", " ", "of", " ", "a", " ", "hemisphere"}], ",", " ", RowBox[{ SubscriptBox["\[Chi]", "n"], " ", "and", " ", SubscriptBox["\[Chi]", "s"], " ", "are", " ", "the", " ", "mixing", " ", "ratios", " ", "in", " ", "the", " ", "northern", " ", "and", " ", "southern", " ", "hemisphere"}], ","}]}], TraditionalForm]]], "\n", Cell[BoxData[ FormBox[ RowBox[{ SubscriptBox["Q", "n"], " "}], TraditionalForm]]], "and ", Cell[BoxData[ FormBox[ RowBox[{ SubscriptBox["Q", "s"], " "}], TraditionalForm]]], "are the tracer mass sources in each hemisphere\n", Cell[BoxData[ FormBox[ SubscriptBox["k", "ex"], TraditionalForm]]], "is the interhemispheric exchange coefficient (> ~1 ", Cell[BoxData[ FormBox[ SuperscriptBox["yr", RowBox[{"-", "1"}]], TraditionalForm]]], " )\n " }], "Text", CellChangeTimes->{{3.524827812808083*^9, 3.524827881736519*^9}, { 3.52482791538174*^9, 3.524828038820785*^9}, {3.524828188111415*^9, 3.5248281966479177`*^9}, {3.524828312885962*^9, 3.524828366585063*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"eq1", "=", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[Chi]", "n"], "'"}], "[", "t", "]"}], " ", "\[Equal]", RowBox[{ RowBox[{ SubscriptBox["k", "ex"], " ", RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["\[Chi]", "s"], "[", "t", "]"}], " ", "-", " ", RowBox[{ SubscriptBox["\[Chi]", "n"], "[", "t", "]"}]}], ")"}]}], " ", "+", RowBox[{ RowBox[{"(", " ", RowBox[{ RowBox[{ SubscriptBox["Q", "n"], "[", "t", "]"}], "-", SubscriptBox["S", "n"]}], ")"}], "/", SubscriptBox["M", "h"]}]}]}]}]], "Input", CellChangeTimes->{{3.524827712327866*^9, 3.524827803607692*^9}, { 3.524827894416453*^9, 3.524827906433227*^9}, {3.524926369082938*^9, 3.5249263805875607`*^9}, {3.52492648545126*^9, 3.524926487036804*^9}, { 3.526626853500556*^9, 3.526626854017577*^9}}], Cell[BoxData[ FormBox[ RowBox[{ RowBox[{ SuperscriptBox[ SubscriptBox["\[Chi]", "n"], "\[Prime]", MultilineFunction->None], "(", "t", ")"}], "\[LongEqual]", RowBox[{ RowBox[{ SubscriptBox["k", "ex"], " ", RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["\[Chi]", "s"], "(", "t", ")"}], "-", RowBox[{ SubscriptBox["\[Chi]", "n"], "(", "t", ")"}]}], ")"}]}], "+", FractionBox[ RowBox[{ RowBox[{ SubscriptBox["Q", "n"], "(", "t", ")"}], "-", SubscriptBox["S", "n"]}], SubscriptBox["M", "h"]]}]}], TraditionalForm]], "Output", CellChangeTimes->{3.5248278062034397`*^9, 3.524827947870214*^9, 3.524925853873987*^9, 3.524926381434846*^9, 3.52492651709422*^9, 3.526626043681633*^9, 3.526626864584505*^9, 3.526627996515624*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"eq2", "=", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[Chi]", "s"], "'"}], "[", "t", "]"}], " ", "\[Equal]", RowBox[{ RowBox[{ SubscriptBox["k", "ex"], " ", RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["\[Chi]", "n"], "[", "t", "]"}], " ", "-", " ", RowBox[{ SubscriptBox["\[Chi]", "s"], "[", "t", "]"}]}], ")"}]}], " ", "+", RowBox[{ RowBox[{"(", " ", RowBox[{ RowBox[{ SubscriptBox["Q", "s"], "[", "t", "]"}], "+", SubscriptBox["S", "n"]}], ")"}], "/", SubscriptBox["M", "h"]}]}]}]}]], "Input", CellChangeTimes->{{3.524827712327866*^9, 3.524827803607692*^9}, { 3.524827894416453*^9, 3.524827906433227*^9}, {3.52482820179249*^9, 3.524828228342284*^9}, {3.524926496599698*^9, 3.524926509773144*^9}, { 3.526626859699369*^9, 3.526626860146757*^9}}], Cell[BoxData[ FormBox[ RowBox[{ RowBox[{ SuperscriptBox[ SubscriptBox["\[Chi]", "s"], "\[Prime]", MultilineFunction->None], "(", "t", ")"}], "\[LongEqual]", RowBox[{ RowBox[{ SubscriptBox["k", "ex"], " ", RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["\[Chi]", "n"], "(", "t", ")"}], "-", RowBox[{ SubscriptBox["\[Chi]", "s"], "(", "t", ")"}]}], ")"}]}], "+", FractionBox[ RowBox[{ SubscriptBox["S", "n"], "+", RowBox[{ SubscriptBox["Q", "s"], "(", "t", ")"}]}], SubscriptBox["M", "h"]]}]}], TraditionalForm]], "Output", CellChangeTimes->{ 3.5248282389065638`*^9, 3.524925855190486*^9, {3.5249265103236303`*^9, 3.524926518529521*^9}, 3.5266260478269033`*^9, 3.526626861022079*^9, 3.526627996600502*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"sol1", "=", RowBox[{"NDSolve", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"eq1", ",", "eq2", ",", RowBox[{ RowBox[{ SubscriptBox["\[Chi]", "n"], "[", SubscriptBox["t", "0"], "]"}], "\[Equal]", "280."}], ",", RowBox[{ RowBox[{ SubscriptBox["\[Chi]", "s"], "[", SubscriptBox["t", "0"], "]"}], "\[Equal]", "280."}]}], "}"}], "/.", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["k", "ex"], "\[Rule]", "0.6"}], ",", RowBox[{ SubscriptBox["M", "h"], "\[Rule]", RowBox[{"2.123", "/", "2."}]}], ",", RowBox[{ RowBox[{ SubscriptBox["Q", "s"], "[", "t", "]"}], "\[Rule]", RowBox[{ SubscriptBox["Q", "S"], "[", "t", "]"}]}], ",", RowBox[{ RowBox[{ SubscriptBox["Q", "n"], "[", "t", "]"}], "\[Rule]", RowBox[{ SubscriptBox["Q", "N"], "[", "t", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ SubscriptBox["S", "n"], "\[Rule]", "2"}], ",", RowBox[{ SubscriptBox["t", "0"], "\[Rule]", "1751.5"}]}], "}"}]}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ SubscriptBox["\[Chi]", "n"], ",", SubscriptBox["\[Chi]", "s"]}], "}"}], ",", RowBox[{"{", RowBox[{"t", ",", "1751.5", ",", "2011."}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.5248288063481607`*^9, 3.524829070578771*^9}, { 3.5248291047333927`*^9, 3.5248291952864437`*^9}, {3.5248292453482943`*^9, 3.52482925153543*^9}, {3.524833871139987*^9, 3.524833873513741*^9}, { 3.5248362152107067`*^9, 3.524836215277136*^9}, {3.524836246440701*^9, 3.5248362518179617`*^9}, {3.524925864653566*^9, 3.5249259028019047`*^9}, { 3.524926125654167*^9, 3.5249261257546577`*^9}, {3.5249261738946753`*^9, 3.524926236860038*^9}, {3.524926296024597*^9, 3.5249262964520817`*^9}, { 3.524926407323532*^9, 3.524926420776272*^9}}], Cell[BoxData[ FormBox[ RowBox[{"{", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[Chi]", "n"], "\[Rule]", TagBox[ RowBox[{"InterpolatingFunction", "[", RowBox[{ RowBox[{"(", "\[NoBreak]", GridBox[{ {"1751.5`", "2011.`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], ",", "\<\"<>\"\>"}], "]"}], False, Editable->False]}], ",", RowBox[{ SubscriptBox["\[Chi]", "s"], "\[Rule]", TagBox[ RowBox[{"InterpolatingFunction", "[", RowBox[{ RowBox[{"(", "\[NoBreak]", GridBox[{ {"1751.5`", "2011.`"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], ",", "\<\"<>\"\>"}], "]"}], False, Editable->False]}]}], "}"}], "}"}], TraditionalForm]], "Output", CellChangeTimes->{ 3.5248290449207*^9, {3.524829079944265*^9, 3.5248291065658073`*^9}, { 3.524829179836233*^9, 3.5248292001966333`*^9}, 3.524829253841302*^9, 3.5248338744372396`*^9, 3.5248362163129063`*^9, 3.524836252668337*^9, { 3.5249258878910847`*^9, 3.5249259034946213`*^9}, 3.524926130763919*^9, { 3.524926176256249*^9, 3.524926237676031*^9}, 3.524926297234343*^9, 3.5249264220522223`*^9, 3.5249265200639143`*^9, 3.526626075487734*^9, 3.526627996763029*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[Chi]", "n"], "[", "t", "]"}], ",", RowBox[{ SubscriptBox["\[Chi]", "s"], "[", "t", "]"}]}], "}"}], "/.", "sol1"}], ",", RowBox[{"{", RowBox[{"t", ",", "1800.", ",", "2011"}], "}"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{"None", ",", "\"\\""}], "}"}]}]}], "]"}]], "Input", CellChangeTimes->{{3.524829207322813*^9, 3.524829314173888*^9}, { 3.524829394263179*^9, 3.524829424400598*^9}}], Cell[BoxData[ FormBox[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[CompressedData[" 1:eJwV1nk8VVsUB3BkyNBAaCBEJEVliF6qpSKVjBUhY2SKjmu67k2azCSpxDnn IslckSkyJBmTJokkUgqV8sgUb72/zuf7Ofuzz/n89lp77zVOPuYuPFxcXIu5 ubj+f3Km5bi55Ejo6G7tCXIj4PptI/3d6FeqB94z0XGmQZEX0SlGEh+C0SGZ z0UF15BwZTRxmI22Mw+RF5MnwdBKTukcWjqne8/atSTwHVUMj0QnHbseZqhM QhGXOX8KOr5MWOTKZhKyf6jO1KKnLtS+DNtNgln4NntJdwIOhKR/O2hBQtxQ 4kEvdNGvT02VziTs2/h4uAWd6DvqkuBPwtmYcm0DDwKOyyuba4eRoOlz1qYB ba7aGHQWzdioXtOENtRx4zSgTYdDFVrR6sZZI5bhJIykJHxuR/MHK4cHRZCQ EL7Xqgtd8EK5sjyKBJGFsrLf0XOh65V0L5MgPFDSIO5JwFh0k9FF9FWTB0bL 0V+vuzNa0Smyce0r0S/zsmts40loNNr4Wgad2bne5swVEordrBqV0cabVeKr rpLAezFdQxe9Z3tzCX8iCZ9DLK/uROsYePQYo1vZbr8BLW+bo9KLzlc/XKSP nghXqZ+/RsJC81IXE/RwQvPwvuskqD2MHjFDf6Q8xOLRRd6fYg6jm4ty7OVu kOD6PFfKGk33qkxDEgnH1M4wXNFBXqPPw9HcU9ml7mizqeLbbehPIqWip9C8 y/TMbG+S0NNZxe2HdjewzApMJsFjVOPSebRm/oWjBSQJZ8qXedL/fy/4faFU GgliFzoN29EZAukRTmj9U1k2r9BnEk/aZaMzlB77dKA3F/wW1E4n4X6vG/0e fa1voaP5LRL636spfEM7GGotibxNwhLPtf08XgT8kYjznMgmYcBg78RWdIxJ YohODgkqQXZT29DykclXgtE8BydnddFGs5mlc+icyQL+PejU/uoFAnlYP6aU mgna8O6vlOUFJLRwuDTc0EmGR1p1CklIG/qrmo7WYUmrsh6ScE3/va3UKQIW 9Im+eoxma5yOkkW3GQgwhSpI2MBaXK6APiH2+8lN9L5ID6mN6MvZDbZllSTs /x4+o4v+8tY3ZryKhOOPx5zt0YmaTcM+dSSUhhczs9C/vvvnnGgl4eHrX+/2 euP6cOXF3kHHbXNN2Y+eE+s/PYQ+eEbCzhgtomOsffoZCXtChwYt0UrnlZ6w 2kjYEVEs7om2lnzbk9BOAseRe20C+vFOHdHa1yT4/wo78AWdcHk6cHUPCYRW 8VCKDwF/FY4K2aPDXpjWpaHdyu6TqWizsvJbd9A7+9xqFT6QIC5/KKgI/U39 rZBKLwkrmcJaLWjoKKK29pEwESeWPo3+IX2qzuQz/q9w/U7b0wQczOldfP47 CQ1aki+0CAJGPFQ0m9CKzQfVdqBjNvgfW/oD8/SRiN6LbssTyqDRc4MtJhZo 87ta2yp+kvBhUgNJgNWDaOd/f5Fg3C1odRc95dcRsf03CV4btXeXopO11hSc RweNnt1Qje4uKZlcOkbCAZs/M21ou/K+WNV/SSi/E3r7B/pElXaZ6wQJrIO8 hzb5EsB39nxPPnqOrV6pjc7c9YxnHJ10+b4FoAdrnA5d+EPCiuTxGTO0R11s P2eSBJc3ZosC0acbP4m8m8b9sm9v5lM0++Vlx4PzJHCt3dXmyiCgc5fUk1h0 lPSBI6fRWvmZSu3ojy0NQ0z0j/BHw4e5KDjQv3xHLNp+x7C/HTcFlw5c93uA 3p1lEEUsoOAeX7csrx8BC0P+Ft4QoODYmfS+NPSJ4QiJLjSvhHF+LrrWSjxI eiEFupIJzGJ0sMaGHWno/lkhySb08FerhhxBCoxO/PUdRbdZPOh+JEyB6eOs LPDHel3vyTuwhAL38sXM72ilus9TG5ZScMKa+e8UuszW4ScD/TdUJpI/gICe y0e6FohSoGCcPS2LVprYdU9BjALSv7zTAl32WNzWWZyCuYfRPY/Q722qivpX UFC1ffWjq4EEeI/rZKuspIDv/II1aWiuy0W0L3pEYWFUAVrxcVYkzyoKwMWe 0fT/eOWr9vJSFNyOEZqb/3/8+Elhp9UUOOt1WBNBOD5O1LlvDQWXmTFSrkwC yOz7AsryFDR/dev0R4vVm+V5o58KNGRdQnPNXhmfQbdJFZ27je5yF4uQXEuB NleawBd0vP6y/INKFPD/Y1HlHkzA9Kz4n2IVCiYsmX8ZLMzPc0V0lAYFTWc2 65Sewfk0p7xa0evTtkw1otVn3xkv1qSgpT2vpQt9IyZFLAGd07Lx1hzaIV8m +aYWBQz23UX7Qgj4/WNtdpY2BWohT4S70JK+Wxqebqfgu0iXoEAo1nPQgQUL 9lJQ/D7BoPw8Aa4J+7Q/HqHAp+jNthWRBERpWH2TP0qB3P5To5vRBa/dUlzQ R98G396PHpeMmh9C+7Gt+FjoiymtDeOWFBg8i07sQadnmFkJW1PQ3XAp6FYU AR9KbJhb7Sgo4TVXNIghgMfKawMTPbLaVNYJrTTF7qlAN+409AxBn9pO6+nZ Y73V202WomerPwoaOVCgIkI2qcUSsKrJJdnRiQKlRyf6leMIONrtUxHjSsFS f9pLMZ6Ae1k+XG/QfB083IZowQAf/dUnKbCJLnvgga5c6vM8H13tpnnuHlrB wPtTmxsFHcK51TuuEDB6z0tY1JOCJX7u/A4JmEeYu801HwpyBbLF6hIJqNri PEMFUVDpGDMYfhP3O+5SXpsoClKvjnqcysD+n9eyG0ymwNPniLDBPQI61kXL b0qhwLXl+wwLzWf68UsAuuQbc2ch+kRqlA8/iXn425fJ3sfzSa83VJGi4MPV ++pzaPp8xC1nDgV603c49UV4/+Lr/tp7i4IXPESreykBT1U356/LoGAg1zb1 Nnr8yCXCB50/7F/Yhz6cuWl6Dv15VuaadRnW776LwjKZ2I9OMSdNyvH+FqGq ZptFgZXGks17KwgIEw5ldOZREOP0evJ0NQHERwl/qXwKhk1P7i5C2xbnBtih A4Nejo+j1e3fMgfQXDeTLrJrCOgtVAsdLcB+63p0PLYWz0frnpiF97H+8jQN yuoIGMr6J1OnmIKNEUEH1zYS8OZM+x0WujH5UKEnusbcNbsKPZgTv74IfX32 St7eEgr2pv/dvbsJ70Om3wpNS7HfWieiHZqxP//cqHYrp4AjGbE4tRXvTwbj nUmPKLDlLjrm9YIAGepeZBeaU1Z5sBL9fczzH+kqClxUmhJFXuJ5ktafwkH3 3X0tko9unn1ul1lNwZNE+5CRVwQYFOUMFNVSIDPgrejSgest5zDaVk/Bz2Rt iTPdBKhNNwvwtVGwMjVgTG4Q86vw/P2ml4LJSM0PHjy+8DRXWzVglIK4zvnf i2V8ISS7TYHFQwO35v7PI7q+YCz39NMGcRpuqEY47LfxBf6nX8dy19KQyBx0 /MHyha3Mjur4rTQ4rvjmTafgeJuf3Xv30RD0cqryQRXOV+JWm2FJw8T3OoP2 z76gJJvv5O5Ow1NZcTUFUQZc7PEtzEWzM+dFK9H9KTo8P9Bc9+/oWooxgLPi SZqvBw2TBZlbEpcxYIVY90eWJw1XY3ME10kyQIhP0D7uFA1Lun9WZUkx4MfQ CZsigoaivso/IesYYJStkjuODvOaD96pzICck6PT2r74frDk0F/0yQFWciW6 8NiRiAAVBnzsSXhXz6BBdOnmU5aqDHjZXmPZ6U+DyW9LxS/qDCgpkT78l0kD aXv3i/QuBhxIe7FVPxjn//teXRAY8CE6bGUs2u3qlNsfNL/j6AdpFg3dCQJr 3+1mgKXwE3ddNg2pfSHVBQYMmLT3PMsKoSHnhapipDED/hF8mDN1ngZV1fl7 G+wY0DbmHat3gYZOzVuVivYMcPqgcDoSzQp215NzYEBUUazWyos0zDmcq5R0 YkD3cccanUs0hFZsMBZ0ZQC7cGFHYDgNijsPRf05xYAqG0vuiWjMe2P/vGQI AxaPGa3ZFkMDxdrULHmWAXZRu/XY6Lmw250rQhnwt0z1HE8sDeYn5wsVzjPw 3OXlXhJHQ713q6lFGAMett/jUo6nYWg1VMzEYT76QlzWiTTsPhnpyZvGgIJN j+YekTTQXy123n2K62vY+Wwevf7tjd6BBgZIOo2RehQN21KN6qWaGBCSuH57 PVrh+IBZbAsDTKauBbbSNCTJE+pn2xkw+th7tCuVhluWzedudDFA/ahc/58M GuyWy21Z8BO/z75QvyUf86vOXbZjpR/IPY5dx0RPel+brFvlB1ECSZE16NZ9 NjeNpP3ALiHvkEkBDQVaJgudZf2AP+vNG6+7NIi49DpnKPrB0Vfrvty5j/W/ brbeX90PJta38suU0KDcaGkgccgPtr4VNxSqpoFZcqdVM8wPbJvsB43Q25T9 gkbD/eBcRU7Y5f/f+8+U5kf6QSsH6sVraBCaEJdWjfUDZzev3bK12G/FhwMh 0Q/ip+p0NetoyHe0uVqV7gdDUowtdg00HHsusmpPrR/QDi9WFT6nISvstZIa rz+E/LHKruqj4cx2s8GSdH8IENDjDhzDPPbUfpM1D4CjBoez5xZw4NpRy0T/ 3wFQkKC+aFiCA40SrfmLygLhxyLd2kwlDvz77uKN66wgMODJ3LlYmwOWijO8 F/YyQZK3O7DLkAMGRm9FM9YFwzPN7dwBxzgwNWKZs1qGBUufbFlfg17l9Tnr qTwLzC2UzYSsOfBqadk1Yh0LOgiJNBptoT/Q3LKZBR8LfkKDDQe2flxVGbeH Bb+VM0JX2HHAKXizlKk7C5avXsRV4cSBUlpQxbKEBdZ5C5T5nDmgHxl8XK6C BeT2aRMTdHv6G9GBahbIWQ9yPqGfaTtG2jSxQOVG7S4RFw7wJwglLXvPAl3R gLPHT3LAxmVTqQc3G0JSve7cQXt8YXpu4mdDzSbn57/QT3Q3rZ0VYoO+sals mBsHFM1OBxaIs8E4WqW6wJ0DowaC5kxlNsSvWjM4iVbTENY5p8qGV9nLl+zx 4MCjzqkjV9TZYNXIa/8WfSH0gWmTLhuSLWfC1njiotPZSaN6bHj/5VeBJzqJ Z+SHzD42yAR87ShGu42NjVgYscGRr3duHq1RriF92YwN/wHul+4R "]], LineBox[CompressedData[" 1:eJwV1nk8lN0XAHCyhRISSokhoRDZKulQlpAK2bMXQsxiHSFJEpJ61avneSaR fSlKQsoSKSG95EdlKxVtSEXod/pr5vuZMzPnnvPcc6+8V7DNkSVcXFxy3Fxc f185c/hOjgCj6FV+17LokHnDysQYrfNW0TIbnXYg4mwCOlhjv8Z1dExep5ig PAFVwd/nctBuNjE0cRoBWi1rruej1xYN7FZUJED1wtTmcvQVp8xEc2UCClY3 jNSj06uFl13YQkCR8VOeUfTsqYbuRGMCzApX3tC+SgeLmOsfLW0JuKXmnXoG LZ2gUJqKLnfb/D4J/e5sbkgnmmGiaZSMjvsn76eNHQGZywdmUtB3S4r4nA8R kN5t55mBVhyokPdzICCtOnAniV7Ua3JKcCEAnNT/VKArJ0fb6rwJeOqdlzqM rlKwk+P1IUAumWY8iq451BxmiX6oO/XrLbrxXq5CP/o9LSXoA7rr5JETP48Q 4KgZzfyK/iT2fouWHwEJ9P7Rhb//rzV+OT+QgN1ceukyBB0uMb4dyQjFfDir CQf0YZqyjV4iATbv8793oW3UHkfEonvNxjVeoM31/Tit6BUSrwN70FrWBZ8c zhDgvsNi4n9o/ijlMxFJBHgC148RdNlz5bp7yQRcd2zQmUEvxqkoGZwnIK55 3+U1JB2mz7VZJaATPfV/r0V/yPRntqMVN2Z6rEd3lxQ+dE0nQDvpiboiOq9P xeXEBQJK6tf3qqGtt6im118kwFDl4TYjNDWoOgdXCKANiFj4oSMCv3WeQT/O Nes6hj44e+dGBzpOqswtCM270uig678EzN8SzWSg/U0dCsKzCOD9LBpxAq1d esq+jPjb333Vl9BPol5VyGQToNEjrf8I/XNVWsCPQgK6LuXcVqbokLL/Uox+ EQGs3tLiTWja2awLUejSt5o56mir+by7i2ivj9cuaqOvjTzgESghgD22nQ1o 8/LJq1JlBPC5R4Q7oq+YH2rXr8B+vFnsSEbrs9eqsWsIkKi1CP6N5hkWe9GI 7jeTPvIH3WEqEClUS4BurtFhHg4dfMSnmv9F//qQZieMPl/Y6lpdR4BHa4ib DHrsJSNlph4/VykY2YG+pN02EdxEwIZPO47Goic/hxb5tBPwO4uiiV3DenKV pOajn+6SJlahF8VHQsbRolKHpNegl+lb64U8I6B9d6u0AlopXqmZ3YH18N2z TQftLPnydUYX7scS1oITutFQX6zhPwImWg098tAZ5+fC170mwDbu4HHrbDos KNgLuaMz82I6bdF+1beIa+iT5/brOKENh/0aFN7g/vHbtsIH/VHrpZDqIAHD onVzkWjorSR1hwlQOdaZlof+sjaoaf87AsKfi+ssuU4Hy6JBkfjPBHw1v3mj Df3pmKp2G/rud9fGLnTKplAn0S/om4XDL9EdJUK5FHp4n4nyGNqmXGdb7VcC Pg6p9i/JoYPj7XPe3yexn+3BYjvRPvV61Ud/EGBZ3ORyBx3dfd7T8g8BJj6H vFpy6dC3S6Y5Fd3o7yzaidYpzVPqQh/7PNvyEv3lzP0JOy4S4EaO9Ue0+86J UDduEvpZ3k+X3aCDcYFpMp2HBDsTq+hD6KUxCxWXBUg4+yiqfALtM5G0qh+d kly2dQbd4CgRsXYpCT1iVTWL6Kitm3Zmo59faO4Sy6PDxAfH1iJBEtoDp2T0 0R22twfuC5OQdNjd/DT6kkoA79sVJOwOq/dUzMf+Nr2b3SRKQn3IkUQNdLWr x1cmmrovW7Md/fr8oX4eMRLC+TwPHPwb/2PXTQVxErr0cgxj/8Y3Srh6S5Bw pS5E/g36lUt95Yg0CS/9CM0bBXQ4PqNfqLqahIg1yz7dQnOdr6QY6DgH99J6 9IbGgrNL1pAwoVS2p+9vvPJFd5oMCVZROc+ECzF+xlfYax0JSmEhD1joDWli 3sPyJNjwEC4Hi+hAFN4SUKaRsG6fHMMdLf7oYMlxtL+IVlYQmmv+wsxvdIbp lGwyut9fPElSkYQzkdYLTeh0k5WllkokGBh08e4opsPcvMTPO6oYb7zl3tYS rF+A9LnkrSQ8cPlxzKoMf097NrAdHZ6zYswVrTX/P2sRbRLOny4PCkJfTrkq noEer92Qk4b2KJXN+lcH67FDteQ5euqLYmGBHgm04sO6zuV0kGRotrbsIKFQ ynIb6yaefxEWPDx7SNDZ0pMzUEGHlsA1ERbohVWH3KfQ6p7jny6gHTtyDQQr cf/uTe6VMyHh2HSNkx6aI/Ok0NCUhOltHguX0EP1ew9EmZNw7XLLQ9vbdPDi 20tOWpHgMxpt8fwOHY5mmOkNHSKhxvTBp8lqOiRvdfxIsyfBnOqeFryH8/8/ v6tH0PXc3dw09Ixk8p9x9JUQJU0bdMLV9tYZBxKczPy6K9DXcw86CjuTEK8L v1k1dHhT5RKp64b5nla/zFVHB/uB4NqUoyTktlTrMx/Q4WZBMFcPOunpgu1F tGBYsMk6X1xPiEdyJbpONLizFB0XeXPvd7SC6fHRDj8SBHSS1oY/pMO3m4HC YgEkzKZWBMc3YP6J/i7/BJOgzCesWtlEh3pN799kBAlTLZ/a7R7TYT4u6etb tKKXe0MkentX6eimSBI4B/PuU+iq47+e3kO3Pent/IAuK04leqLw+TTeEHKi Dc+nDdU7l58g4eeW8ZjCJ3h/Wb08LvokCbGtNDfpZzjPuO/yuiSTUH1g+43Q bpz3C2t1SbSZti/3NbTmbLzvINptn23KE7TipPUT73P4vP2s2Sz3gg7Cw2Pn A1NIKBm6lPwM3fdQUiYmjQS9IMfvGj10YMSFaWZnYL4ue+2E+vA8/aPj9j6L BP6sCu2+13To3XiOpnGVhFEH76PCb+jAd2BoLAz9y7X0niHa51pyMD+B9Y3j f3YDTTMajNtAktAHs92hg7i++KQcbw7OE3eHdbLDeH/jG/gwmENC0JZe+5S3 +DyqbSndmEsCIzaK3YyeOXSaHoxmCte3zaPt8jTmFtFcce/Hgt7hfjRLEJbN IyF47n+7bMbw/pekpu5aQMJ1YwclxQ90SBSOY/aV4H6STYybmqADfWhVqEwp CfvdplPVPtHB9U5xmBuaZlH+1g+t5f4y8i263NieMYQerFCP+1ZGwk67pTIv PmO9nV+nLL2F8zL68KaWr3QYL9iep3+HBB6R1COvp/G+YTrTd+U+5mf0as3l eTrIkjfP9qPje8cVBtGfpwO2r60nIeuGYezGBTw/skeuctDVtePy99BP5jvd 8h5g/m6qpYOLdDCtLHpb2UDCdpFTxbrcDDCU8/jW8YiEC251Zrz8DFCfeyLA 10HCuzRXwThRBmifCLW0QvcVyNeNoLdxyZ2/iH5lm//LRIwBe/hDJWmdJEix 1V8sF2eAk/j6Dbu6SMiXfxadvZIBCapM48huEsgqc4EOSQb0O8uc+NxLwuue jhj1dQxIrA2Y6hkkwT5kQKJElQEtxXpqYd9ImKyTWM9jyoCYwg4F9hIKNEjJ I/E+DLCWaxndJEFBUdXH3TLxDOBv+TBdrEhBfDvPXsdsBuhG9j5I16Wg0jq/ 0r6JAfWvTNNfoKWD/stuQZvBXQ9JPQrEZ2oe6zYzwFHgCjeBbpVSHpZ6xIDI f5x25+tT8DzTSfBNCwPqbr1qub+dgry2Rt7YJwwwHh95Nm5IQWF5uLlMN+bj 8nVgjxkFOzJfyWweZUAtnHZJRPvzBSrWoZWVZAZa0XvttV2s3jKAe9K038Kc gozNh6WD3jHgdiLVd2AvBV/0RP3L3jNgTcW+HldLCky7u2mqnxgwtrSkg7Wf gjFbm9INM1iPKr+GXAcKlkm9notdygSl9aVe/v4U0J7JnJ7VZkLCa0ZFMZqn daD6gg4TRq7qL/mCzhFs+aOiywSOdHM24xgFvzf7ybnoMUFafGCIHUCBO21V V8M2JgjxCbqnBVEg1t8nUmbIhC/jPi6VdArugqeC5l4mWBWqFs+gHb4GBA+h i3y/zekxKIhRSXJPt2CC71t2Vh1aYHVz16QlE4ZeZ/zvEZOC5uHwiWprJnR3 PXToC6XgIof/sJUdE6qq1totRFIgpbW89o47Eyyyn+uaRFEQcls1JcGDCW/O Ja5ORVed2dBs58kEfs9vb9ayKZAZiGDMejHBQbjZ3yAa8x3f2Wh7lAm/3ANi 2TEUDFqM6O0NYsJ2wZqi2XgKwoNW5E2zmVDv4sD94xwFhpVKorVZTBCZtpLf lkLBkK38UMFVJrglGxtFo1erC6VdJpiwUK12ckkqBZYuc3fDKSYYSPJyr0ij wJ4vPmXPdSbUdN3kUk6nYEDg8ZxEEa7HRIjL+RIFHkJU7LkaJpRp3F+8T1AQ xs2cXfIG+2He9+wPmhaZWqA4yARJr2nCiMR+R4RtNhtiQswllR2P0Hc2czWn jTBh/+w/4e0UBWXKztnK75nwrfH4t/5rFFzW7fY5+40JWvZyIz9zKdgVtZP7 Kw8LqqJPPdIspaBxuV2W/WYWyDWmboxEZyhcqWxUY0GywJWzD9E6XX7cWzRY 4JZRsm9/GQUN6t8Pi2ixgL+gpyewHOO5V6oN6LHA/sXGsfxbFKQxN+nc282C Hyrt/LJVFJgfm1NIdGWB7ksJc6EHFJz0MN+4PoMFrm3u763Qh+N7zzZeZMHJ 2qLE8+hymOD3/YcF7Rx4JPEQ16eVcrTyCgu8/QKN1zdgv7hlXZw5LEifbTLQ bqLAk3RVGCthwbgMU9OtlQJOZCJzdRsLKI/nayo6KVi/lTMyyR8KczHC++bQ Ytp7ZpQEQ+EQaRJr3EXB/aGqfw8Lh8Ky/nuj3ejV2v1ZnStCIcr2esn0c5wH pHlni3Qo2JsyDXX+o2D4XebKZZtCQWTzKq/qPgoMKngPih8MhZifjoX1wxR8 jxfdHcQJhTABI+7waQqWH8svdjEPw+/bFS7ycODNOsHMsY9hUJahtXxiFQeC PG9wIvLD4ctyg4Y8JQ6crMkatPKPANMleYYiehwwmGawqtQjQZJ3ILzfnAMJ hmKbB0Si4Jn2Du4wJw4kG2862fQzCkSbNVUeoplaITaa81FgY6t8UMiZA4Ve KnPZXGzopa/KptBxk8/lUwTZMFT2FVpdOCDL2PczXoYNU8q5cdJuHPBldBV8 3sUGqXXLuWq9OCApy68QmMwG5xIeZT5vDjzZ22REO88GYsfc/v3odBX3+r6L bJBzfs8ZRU/sNHpuQrJB9XLDrmVHOPDpnfmXNTfZYCAWFnvYlwNZpRKMoh42 xFwLzM9HJwc8VnXrZ8NDDe/OSfRpNVHvlYNsMLE+sD7RjwO3kvQunfrAButz qg/K/DngSryinfrNhvQ18u9/oX1HpIQsuaLhRaHUit3HOLA8ovOKJF80OD7m dX+JDvE39L0nEg1ZDr8T5QM4cDbv0Uz6ymh4NTZZFoDOHNduDZSOBtmwD713 0G35H6at1kWDJ9/g4h906Hx6siYtGv4PQUB49g== "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], AxesOrigin->{1800., 280.}, BaseStyle->16, Frame->True, FrameLabel->{None, FormBox["\"ppm\"", TraditionalForm]}, PlotRange->{{1800., 2011}, {278.5295084001822, 453.09743900494067`}}, PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}], TraditionalForm]], "Output", CellChangeTimes->{{3.524829307083956*^9, 3.524829315046522*^9}, 3.524829425300893*^9, 3.524833875882215*^9, 3.524836218148004*^9, 3.524836253877236*^9, {3.5249258975603647`*^9, 3.524925904786233*^9}, 3.524926177142486*^9, 3.524926423788986*^9, 3.524926521600287*^9, 3.52662607678446*^9, 3.526627996800358*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{"Evaluate", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[Chi]", "n"], "[", "t", "]"}], ",", RowBox[{ SubscriptBox["\[Chi]", "s"], "[", "t", "]"}]}], "}"}], "/.", "sol1"}], "]"}], ",", RowBox[{"{", RowBox[{"t", ",", "1950.", ",", "2011"}], "}"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{"None", ",", "\"\\""}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", RowBox[{"{", RowBox[{"Red", ",", "Blue"}], "}"}]}]}], "]"}]], "Input", CellChangeTimes->{{3.524829207322813*^9, 3.524829314173888*^9}, { 3.524829372697914*^9, 3.5248293764088*^9}, {3.5248294364165773`*^9, 3.5248295079793*^9}}], Cell[BoxData[ FormBox[ GraphicsBox[{{}, {}, {RGBColor[1, 0, 0], LineBox[CompressedData[" 1:eJwV0Gs0lHkABvDBsSyli+zKaJlERRddjpDGo7a2C3KrbehoCbPTJOqd+7xt 2pVauhCqqfzfVsmYbqJ2mdal2Jxk2iaxnVJtG5FD2o1aTc3sux+e85zfh+fL w0vOiEm15nA4EWz+77l5sRyOgkBxwqe0L5DCg7faGc6sqdDvNvOCKHyfbI7y Ya3PMiTFs+4MqvgpnPWynWoXA+vv+sxLNazFyYHrrwZTuLNct2e+kqC8JN+z IITCVo6VY6qKYFKo2/YdoFAhvejSShMc1xQVaFZS6K6qDjftJmhawN2tj6fw xsV62/0cArsJ/3jUiCl42+gDivMIpsy57a2jKbguc+fV5RNE3dI5ZxZQeKpt GdlfTNDdtTB+9VkKwqQpA03HCdb5l0n211GYeKbrx78YgmTDbVlbB4WCMT0T Ks4QvHSZE7drkIKx5ei1zgqCSKtheYqdBD3awrXnLxJYZ36jE/Ek4E4azRVV ExQyVKUhRALne/Z9B2oIpvtzVwVslODJ1aS58XUEzW9d3CarJRAPpBw7cIPA vz9yYCZh9xeMWm0Lwdn2cV47myQghXtPi9sINt3xtkt8KcHztt6GYiNBeNnj 1I/OUpj8Cm4KOwlihxopPl+Kjsfdr049Iuhvjj+8ZasU9yaX1l//k6B1m8Av WyNFqVqryO0hiO7nGp1apFjoL4jT9xNcMl1tiB2VQuMQ63Z4iMA22C/hha8M vIyf90YPE1SLVTN3xMsg9mn+TDHKWmh362CeDPtsuPkrzAQdY4s3bKiVQbjA 3Y+2YRDmmlO2aFAG0WBOusaeQbRD8qOmqXLwDcHHE8cyaHRYdIReL0eH5Vhf 7kQGR6tPXu/KlyN0A3ibPmegf9003+qWHG3B0VZcdwZPJh9sknEU4GaOseHz GLR+uD/HHKLAktvjh+x9GKS86K1MlyjAUzZ8CPZjsDjswt83LivwIPyX4Un+ DAJEafqPAwpU6VyLOhcyiKmSfyGboURkwrR1liAG9p5us3JEStTNU3Lu8hnM oDOPBpYp8SpeYbD7ksGJvtIIc68SS52ehU1fxcBdY+tx0k8FUe/hU68iGJx7 mHV9WboKMc5DnlNiGdx8NLFWpFfBKbUo783XDCKXW469s1VjEKdLLm9k/7Ae cciIUeNgxkZjZxKDr9YH16vL1bBuThw6ncZA1RM3vmREjd/eM5tqWReNEXS/ e6vGvnnPfr/Duu1K66rYf9UYx2yuHGV938vU4WhSw1317fa1QgZVRxIWZ3No BPjvePOe9SVzkW+RI40tJ/e8ixYxeJ/yhyFoKo3Z7TeFQtZGU3ugzovG60/t H9Cs1wRVCrjeNOTy3Jpy1rKuqGuW6TSyYw4pP7Je4lXZfXc2DWKvMWm3MBCY HrcWBtFICn0ormedtnSm67jFNKbJuF3trLnbhz/JC6Fx7nnJr2bWys6ExuxQ GjX1pTvjxAymITNp13Ia6pHngyLW+qeeassKGvxZ3om7WKc3lnllraTRrCnn 61gnZ2W7/LCGxt67fRcbWK/ZbSuwjaCx2s7Xo4N1mOC8x75IGk588aF+1r6a /WmOUTSMkvMWC+srxlrfQ9E0/gPELUCS "]]}, {RGBColor[0, 0, 1], LineBox[CompressedData[" 1:eJwVzXtUz3ccx/GfOmcypKuVavq5jjhKHZ3Qr9easVrpuhNJlNJd+P6ufb+Y KaWrFJWjzydhfrV0hK1cqhn6HXS/aS5zq9VpXayE/FL77I/3eZ/HH+/nWxwa 7xuuIxKJPNn8v1el+YlESoI0x2c6CwM5dL1Tf2XMPDLuRAKYfwqd9F7CHPLZ yu/TmTudSs56MGtDbz4ZYz7YN+lawOyQ6N59fxuHxm9Lk1arCHTkK9/LtnOI FU2bGZ5AcOGwZfaLnRxKZOWmDwSCA/4GrTqRHLqvXPXQHiaYSHFecFHJYdRU Z0/7UYKGma2LRlM4LNa9seZkGoFmb2ZmeAEHs28sxdXHCUrpwhzPMg7P1Zqx 9JMEb+vXf9pTyyEixGrgzmmCnYmiN5EdHIzOPz32ihJUxoTpmw5wyJ7VY1hy nsC2cuErmY4ULZq8m50lrGfaYJZuIUWPOserrJyAbgrOG7aXwsJkPDXqKoHB 9uL7vp5SGLfq9WVU/f/vZ+/iaCn++jVkVWA1QeylDdn5yVLEDITlZ/xBkCH4 5xSp2f2lFrVaQ9BU4dshfigFyUk+F1PP+kdsDTSDUryu76092UKQaO4u/dNU Bq1Ndl1EJ8GyI3t8A5xl6HjWPVT0hCAvt4ezi5ah1by45vYLAg//CpOqUzIU 82plag/B/l1+Nrduy+Bgu9X/Rj/B9TUP2r1GZCj43G/eiWECzwtDXJRYDnH8 b8k+bwnczhzMeOUtR8ySu3OV4wRJnMSk9IgcKboWxzdOEgwEqeLsrsgRYW9p I+hSuNYYuD7tliNq8GhcgR5FlXpgk4uZApKGtaeDZ1Ok9Vk3jrop0DGV35dq RPF403frmg4r4LIF4h1fUBRtGfIYrFSgfq3PNAtLimhN8XPHIQUs9s7SlYgp KjRBEfOWK+H80GBYbwnF0d7LcRahSohVtRNrbSj+aXfb/JEo0eVR+dbEliJp Q3Zcf5cSV0rNcjsdKFabXDMRG6uweduiH6acKEIiJYLST4VqO5WoWUJxeX3A eGaWCkOByobpGyiu9TVZjjSr4Kr/8uulbhT7zt4wrjFKQFTviaIhTwpjh1NZ uT4J8DUetrbyo1hh/v7R+YIE6Ifnpo0GUGwMWxD57EUCBnGusCKIYnd5pWHb Mh6Z8UEtnSEU/uvanEZ4Hjp3g4fP7abgJiR3+u/zuPeR7rjO/O5qwoyND3mk 2L1samQe0zpvPVvPYw7ddXmc+cBtudWWJh6WCZH7vCJYb+nIvrp2Hmts949+ ZA6d8DZUP+cRfSbpvU8URWH1vfL0MR4r2+oiIph/1zf+d+Adjzcz9LoE5g66 W+n5gYdCkVp1kTmscUXQHC2PRN8s1SdmoSW+8JRIANEr0KqjKQIVf1tdmykg xOVxTA2zdZ3W3Xy2gEVyi6dtzC72Rs0H9QX88rrw1iSzaaxjj7uhgKqa4gP+ MRS0esqzd64Afuz1YBTz3LzYzV5mAiQrFgcfYj7kuLys0lzA3YKLklLm0ry+ H49ZCkhu7iuvZVbuTfkwYiXAffry+R3MX8qqG4PmC9CXxGT1M9uvfqSrsRbQ Ii2bmmKe57A4326BgP8AJCJK0g== "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], AxesOrigin->{1950., 305.}, BaseStyle->16, Frame->True, FrameLabel->{None, FormBox["\"ppm\"", TraditionalForm]}, PlotRange->{{1950., 2011}, {307.55679526406266`, 453.0974528559266}}, PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}], TraditionalForm]], "Output", CellChangeTimes->{ 3.524829377345675*^9, {3.52482944530127*^9, 3.5248295085201693`*^9}, 3.5248338770979424`*^9, 3.5248362205157824`*^9, 3.5248362557286787`*^9, 3.524925911120248*^9, 3.524926178252886*^9, 3.5249265240338697`*^9, 3.5266260784577293`*^9, 3.5266279968775797`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{ RowBox[{"ListPlot", "[", RowBox[{"\[CapitalDelta]\[Chi]", ",", RowBox[{"PlotRange", "\[Rule]", "All"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{"None", ",", "\"\\""}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Plot", "[", RowBox[{ RowBox[{"Evaluate", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["\[Chi]", "n"], "[", "t", "]"}], "-", RowBox[{ SubscriptBox["\[Chi]", "s"], "[", "t", "]"}]}], "}"}], "/.", "sol1"}], "]"}], ",", RowBox[{"{", RowBox[{"t", ",", "1950.", ",", "2011"}], "}"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{"None", ",", "\"\\""}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", RowBox[{"{", RowBox[{"Red", ",", "Blue"}], "}"}]}]}], "]"}], ",", RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", CellChangeTimes->{{3.524829207322813*^9, 3.524829314173888*^9}, { 3.524829372697914*^9, 3.5248293764088*^9}, {3.5248294364165773`*^9, 3.52482954082858*^9}, {3.524833750391919*^9, 3.5248337760193853`*^9}, { 3.524833819739253*^9, 3.5248338237312202`*^9}}], Cell[BoxData[ FormBox[ GraphicsBox[{{{}, {Hue[0.67, 0.6, 0.6], PointBox[CompressedData[" 1:eJxFkl1Ik2EUx1/b/Ggi1EVIhhORUQkxhBwpDB+jCV44mBIZGJFpMEJK8Tq2 i4FoYHQhGOxDRCzRi8EUvRA/YBcjBGVsFjJBmDIbRTqHurbR/3nPGR4Y48f/ /M/Hc97a3ned/dcURXmIn/zvirU35NweoXydQ0Rb4ltnhvwU2GG9kwhE1lR9 BvzRsNZ9Gib+Bu57g4i2qLwA9oVLmgeOyO8v8B/SF8FtTxBx4hXwtl3jNjGv gk/H0OAX+TfAXyYRf0kPgnW70+/NF8QhsNZt2ranibfAPeOb6Xsp8u+Ay2X+ OekRj3DYlvWut4pQ+Sf0KTlflvQYuF4WuCT/Afgu1h3jfofgGlfStpwjPi4w +3+DT+T8OfKfgC1y33+kpwvvlyG+BMvxNezPgT9h/B7uX+QVypAZG3O/YvAH f7zyO89/HbzkxIHYXwF+HTJOZPPkvwnGukmblvJvgfEaumca4ttgbO/rYq4G 74nZimGNUP214EHZn/sZwI8GcNE89bvvFY6JbG/IyP4HhXpa8jdAl59TfTHp jeARGTxPExjj7NaVEpuv8lV/KxivMf6Y61tQX57Lx/XaoUex0CjrHdAzwc8v 50vIb4O+H0Nw/lMv34v7PYdelQg4rTriF9BX8F47ZeR/BU7hnj84vx/58ntd 4ny7V6yjmt5yQ/wHJtOQyw== "]]}, {}}, {{}, {}, {RGBColor[0, 0, 1], LineBox[CompressedData[" 1:eJwd2nc81V0YAPBrXDsJSRnZJEmapM5NIqOSSpIWyh6VpCgSkiivZCQSKkpk pozfNbIrZGev7HHda4/3PP31fr6f55znd85z1tXnlTR3MrrKTCKR9rCSSPDf 7U9OkUhuMRQvzuPnVaJJ1OaZRAUBMGq/IBZFonqbrxjKgX8XpdIjSNRGtaQ3 BtikNtpmi1AS9f7gimYkxPv4OHUCSFSF06ftksFpHpVBj0jUOiLpOQEWjSEX +pCocuGn+/qhv3LS8th9EvXnkQ++qndwfJv9cbsbJKpb2uqnI9ikEv5RcScS VUrsTKMJ+MGp+kI7EtWVvirnCe0f7eZvsiRRxeLPlFeB3U4e0zMmUe1JTNxX 72IflWTi20uiCtkb73TDJtk9Dlm7k0SlNn08/wT8rIPCvZ1EFUw1Tk6D9knv N87Jkai5F5KPrUA8czEuVYhE5co9Gxzujm09wh8/skok3UpZX+mB3fvNnWKz SsQEBLR2gK9zoVeXV4mQ19deT4NvOzkxmawSHhXiW8TuYTs+Ux3WXiUMxZ5p OIOT8lcPy64ScyVOFkL3sbXLn7zsWyHGWvQVtoKPTId3tq0QPePyYwhscMhX s2GFqBbucrUB/1ayMy9dIV7bGwbkgRs4jXk+rBDagjvSzD2xk7/vXnFdIfZv WeN6G1xx2kLy+gqhcnBIPRBclGV9xW6F2GT9piQL/HhlaM/lFWI8d10zhxe2 2bbzKvorRG/N2CsxMHr6R1V7hWjur7iiCmZRmjhxaIUoWus9ch580mB3894V 4oUFbSUFzGrBJCS3QgS4/SwuBlOKurslV4j7QR/8m8FKTFLfxVYI6y/m/MwP sD/Y5/1av0JocP+WPQNuDB4fYFsh+tIzDBbBamek3owuE86j+9J4vbHn5Xpq h5aJJdmC9VLgZ9e4yX+XifWR5R1HwSaDbx26lwltz3bnMDCfQ6Nm4zKRqM/+ YsdDbM2TrB3EMmHfZ9pu5YOtoMpqG7JMzIl1HXIHBzvfffJsmfA5e/XdU/Dy KfvkwGUiutLJKQt8ym9k1G+Z+PnZh4nFF9s8T8zOfZlQuZciGwPuM3Z1s1wm 8rJ3BqSB7T4axFxZJo5O5oyXgHfUhn2/uExcsSj+MgKu2vxQ5NwyEaLbrKvm h52dwCl2fJkQf3ghxQDsv/jES3+Z+JDXw38ZHJh/dvboMlG0feyPH/hTh9h6 rWViej2zYz24dKGTdT+eL0Pm+l9w7PezE/uWCbMGHZcFsGkA0989y0RpaNBd iUfYNq/uL6kuEy8FNj6yBzcGvsvaukycmN4f4Al+W6a0umWZYP19MSgE7Mf0 3UhhmXAISXieA95udUxIdpmgrFOJZfXHvhKtzbR5mWBMGsVvAM8LMoLE8Phr br1TBMee+S4hukwIBOcmG4KrN6QYb1wmBnh1vr4CF+4SpAssE4E8F+t2PcY+ n213nXOZODTq1aADFn9pIcKxTMxUxTebgqvkBwvZlolLT4Y6vMBSL+uZWJcJ QTuenudgp61/IpmXiXK97f3vwP3Ex61My4Qq162RanCE/qDayhLxdyh8vBPs MkHLXFoiXlV8m6KB8ydY5ReXCMOkdjo5AHujaUjQ/BJBfkyaEwZvr9BtnV0i vllLL24F3/V6xT6zRDge1V45CM5X4l9PXyKa2QNZr4I7c9/9mlgigv6msLuB i0Z8PcaWCM2yWq4nYNeZaY6RJeKj34Z1aeC963Wp/UvE5WvqgiXg0HtCIz1L hKD2hQ1N4I5FQ0bnEnGfHC+2DKYGTb5vWSJ29n+X4HsC9ZC2MWxcIgZLBqWl wQdvezbXLRFGPsqKuuBbLIL+VUuELMu3PS/AHzSLrXOXCJlAi8Yk8Pg+t/Rs 7PVrXAvA2yKuN6Vhy1/O+gt+ZtCW+R5bn22XeiDc15fsKv7Drk/9fRys3rFm /gn2hXM3LcA3Hhuw+y0R0k7J6YFgbslThXeWCKnnRjs6wYVCzrmXsEWXaqbB x/cGj5tgv33rzBGE3V70kdVoiZD8Mpe6AxxwSLzt8BIh8SdG2QfcwTqkJ7dE iEuPbN3yFPvCG2rfwCIhnhxadQD8s7IguwN790E7I/DrbaU+jYuEmM5/H9zB K29i15UuEqJ2e7f8BHfsrplLWCREMh7K3XyGzT43e9J8kRA+LCqZHwznqdHN s32BSJ10vFwDLviS2tiwQGjHFL7uBcuxvdjxc4Fwmb8mzvUfdnnnjumCBaI2 NU3kLPi6i/2H2AUiQFRHaAr84H4Z69UFYolxnVv2Oaw/t7cDbZ54Hl+itw/M Y4+8R+YJxZMbAvTB4aU5MX3zhElyHscNMBvf/HjjPJFlzs5GgNP8LMZy5wnH X69I50KxLxl62DyaJzoTyxiBL+B+nGSPl5knilZja9+A6T16h8TniQTju5+y wepCyUMb5glr1m1Xu8D1gk0m3PPE5KWQ+p1h2Ou8JEpocwTThgsZrWDX2lPm JXOEtC/NWSEC3q9POibX5wi2tiqDA+BbjpZe9nPEoOpbBSOwU2H5Z6s5Irnr bJc7mDrdo3BxjtilkX/iF5g5sdpOf444Mv1I2TUSm3ZJrUNujrC6IjZa/BL2 z+nz7m2zxI2LodeawfpuTUFNs4THee7uUbApn8Lzulki5Mx8w/oouD8z5m+V zxJ5ug2EFZjU0RSVMUvwqwY9536Fbe8Y5/gIx5mX1U9FY7+fPNMlO0uUrd7M sgKbsD+13TxL1C0Nb/cAZ1/YNCI8S/ydaZZ5C365xF3DjfONZPLOgnt+1m2b miGsftv3vIyB+8eG5/K3GYI/oe1xz2vsMzER4UdniMzvS/EMsFuadO+hGcL4 r2gBRyy8zw005f0zxEvFCzRl8B+b1vJtM4RUWrupO5j/mOVagRlCtaBjq+Ab bD256P0dDKK+c+WIPPiIc9iXJgbhyrT5sjrYaG+vWi2D+KZ1KfQy2CN346kS BqFZ1bmUDD4V+7b3A4Mwau76cSQOe/N3ssFdBkGfJw2agG9xF8W6MIgwEUlm e/A1v6PrnBhE68Ure0LAq0cDj1gyCPP+7pgOMKJtmznBIFjZmb9OgRk2n2T1 GcQ7BanfrPHYZJdiJ20GMWxnzr4VvPYd86kDDOIGrcfpNvhX8sHjSgxCUJAl IAD8uEJbX4FBZO+WTogGX+29dVmGQSy4WTQXg2eIX7WiDMJ7tZfClwDngVey lJdByEiynpcG/7bMu8PNIEo1ZW7tAWssbNHkYBBcfpZJZuDT293XMjOI/3j6 1yWBdd4wgmboxP2mJ+X54Ne7vGOn6YRdnKpnHdh8c2TpJJ04ss9rdBFsuklb b4ROzFuIlB1/C/Xxyt/YTSeu5J70oIOP9S9w/KITx/3mVDnfYfdJbh+qphP7 T74eEgNzy6VWVNKJ9X9HjXXAD4cP25XSiQp+/x0vwWOJfSL5dGKHbcEAeg/3 C4/In/d0fJ9djT4N/ukRNJZAJ7hJPKdtwExaaRNv6ET/i3OFIeBUVo6iKDoR WUiP6gff0BSLeEon/AKjjBbAFz9FSD6hEzfPanKuTcSutT4Y+YhOHBt75roP 3C77ysiLTjBt3HryCdjSKXbYmU6M99ayx4JNVS712NOJPyluBZlg3ce3yqzp RJZW6dYO8FBn2LnLdMLG+QrbjiQYn+K26ON0orYsPLcRbCbYEitPJ4y//F03 DB5x+10qRSda3+21XgaPMje0idGJHt8mQZkP2GeFFFoE6AT98AbH62D2u7br V6cJIWqYBM9H7J1xf3LqponzOS98DyXD/ridbeE0TXS97/9zGuxoLF9gPU1Y hu9WtQZfPr+Xx3yasHdt6HgKvhFY9/D0NHF/1/p9beDR60f6900TsZ9Dh10/ wX0Zrhq6SiP6E5+fSE7Bjm5aHvWlESEHH2gRYPT6mfp9GnGw3lGtDjzo4Ozt SiMiVnWl58Bn10oyW9EIA2PS7OFU7KAe7SIdGpHO4hDzB9xg5nCJg0Z4XdQe 40qD+/BrGt+jKUJEcD7AJgP7Xr7yRt9JQqCOYzAoB+4ftQ1rm0eJjqwr203z sQ0dLoyvDBI5ReRlR7D19s6MyUEi5FdS5UNwZrPmw55BQmdo6uonsJfG7f2l g8RnUe9XpAI4D0PM9KBB4sHDOM734F1fNa+JDBIyJ3t7pwns4OifMnJ/iZUL j9I4qLB/okVIQn+JZtutnmJge/UDheS/RJDPzU06YNclN3rfADHzheXkS3Ds 9W0icQNEubhMAaUQXMVpsGGAsBu1jAgqwv4mw318rI9wfP2ONQ7cqNu8v7WP cDYadM4Gd3S5CJT1Ea45drqdYNMTPp6xfcQDnxsLKsXYkw3/aRv1EeGiXmb1 YIW/MzZpvUSxQZSEyHd4z+RLCs16iNLVtsDt4ER7wRDtHqI8XXz+MFhV+O8R lR7ip3BcrT3Y9seGsyw9REtfoncBuK2xWDixm5jwyO67Ugr3yRqeiuEuQuRT bWJiGXaCG3dFSAeR7ZOXmQt2/m+T3qUOwtDsPfUnOMflt9/WDsKH+14zHdxV IqJR3E6M2ihwHCqH+zl95vdEG5En52nVAl6qXJuO/hBmsUpyXJWwXzM5pKqb iJnbG1TFwHwH2yRfNBHBJ5gPqoATvwl7XGwiSlaazhj/c/pWLVojoXThoW8c 2MD88h7xRmJ5Y2ufehW2aMaO7f71RMzzR/F21fA+NijKJNQSDwXn9b3ARwmG 3q1awvqFLT0UnPCqqlG7llANP3akAHxZamLDSA1R+lLgL98P7BK1fOF9NcTE m9eK2WBrkVvlJT8IyucvaaRfcB4qJT9QywnZHVtM14PL0wsarpcTXOkvmRXB c/4fhKXLifqMe6dOgQ23a7f4lhE2Xw4z3oKDWy3n9EuJkIJf+/RrsCUiqi81 FxO91X+JF7Wwnw+XDVDzics3mDmSwIYfk0e35BNtG8QM88BUrY8hIXlEvblR Vw+Ysif1vXkuUTqXR1Kpw/78Lv7UQg6RJBNyqBLsXCHC3Z9BOHloFK/8hv6d DTui3hCjkme5+eth/fS1HinEEtZl10/Jgil+hgI20cRl/ve9+v8c1cwZEk4Y Ja5jjQR7Od1/FvWI2F0/oLWzAeptUmVT8gil32EK0gZ7heokpAQh5c2iDefA 1D8OllX/ITnbk1e9wJSxdeap4UiYlOf7A3y51bIq9Q1a3PpfqVUjxH2PKfYl o6K7qh89wFR5WVHDFBRQ8fvZf//iV0/GZaUiYSuhc7lgkrPo2z1paE9c1Ahv E3x/rfjasgy0MqlRIw02lLrQZ56JvqOOzH1ginfO1cVMdLpd4r45ePLKketS 2eiG8Du+bLDE2xNVR3OQupUOo/JfvpUhicocxJQ92NIJjr2Yrnj0Kwo+tTWe sxnG/7LBVv0bOhtX/UgcrFKa+SHlGxKfcrDf+c9+lZ8356JPTz/vvgCmWMRJ zeUil/aTm26AvWoGwy/lIQ2l6RW/f/HDagPFeaiyYnf5539xFCz7MB8Nsuaa srZg16hv5movQJ9PmaGN4EnhNeuUCHQ7bllaGUx6un+bG4HYKJSxs+Cu6Fc9 LFT042l3rT3YZPeRD7JUFNrunf0AHJulv1abiqTdv3t+BOfwqZd6U9FwxTVL Ktgr11fqNRWlC3PoNoAlJmZUvlHRHaukbcPgwRc3x35TESVbj38V7B+adHqU ijjIozMCrdBfxe8uSyH6dSrojwI4wj5IcWMhujj1K8EI7FbTokkpRHKU64+t wIM2dZ9OFqKxp/yOHmDr/JclVwpRZnuG0X9gCWUU6FyIPJTO7H0HJuURrPcL kZb7jEguOGdN9v6AQsRdGU6qAZtQJLVeFKI6YbX+vn/fW5IUf12IXlq1VsyD VR4nV74vRObZ7im8f2C/3Gw3Ti1EW8hiz6XBNY62tVmFaPJUwe19YEpnrk5u IcqJu2R2DMyhoF5GFCLPKdIhc/DR2GtmxYVImxInextMKkvgLS1EvM8OcwWC vZjFB8sKUUN733gsOMI7abq8EJXUSd/I+tc+765GBZ5vmTmjApyzqf03jifk vXHr+DeetT++4/6haV2LNHBimaUYzu/zbrMnexvE70X34++7RF1kFv1nB+ct hYXIMjjaVwUc/G4XPb8QnfZt4zgCdkvyNfqG63dXJPAcmK9OxjC7EO1yMl3r CLZWyJlLK0SC55rXh4OFzxvdSSxE9Ur1UkPgWJ3up8/x+CUF3i2DOayU9z3F 4xcy2sLfDvuzsmHCH4+XVLN9P5h69XI+Xi8fBm/GCbDb5tbRO3i8w8f2WIJj 5cYu3MLj7Qz86gbucu8Vu47HW1+lEQQ2KVVSd8DjreCivgEHp+yj2uDxFuge zv73vTbX/GuFSCbDv7QSzLdgjCzx+BPLdDvBl/OPnjUvRKzRbD+mwYaBV3jw /qL/d8SQowPc5f7mciHq8/P5LQo2EdFgw+3r3YuNd4DdTp1Ovorn68zcegT8 Wf97oB2e79VDF0zBc0Zrk27i9TL16nIECyfuY8HzDT1BWDz8176vNBrvTx+t lYFw8L445B6J5692wDb53/fuKsR8wPNX9hijgrvyBtgK8Pylc50b/n1/fPzz bzx/4YXpIXCOYmXUCJ7/GrXbK2DnSd0ychGSYXZb4O+E+RSgnVJFSHA2+548 eJ/mtU5KEWIdZZA0wCaBe0uvFCF61y4fQ7CExt0enyL0uzI94A6YT3AmtbYI FRFTa56Cmy95nV8sQumZKv/FgVW+T2yXL0YhMSnhVeDBAP6dvsXI+/nYpi4w h+e08ZdidMNfKYYOjr3aGDBSjIxufEgQ64L9Pim2xrQEaVoNyauC/Uk9BqEl SNVM4aM2WCKW4VlTgvi136U5gYVTL7w6/h3VbYwrKARP/qZkXS5F53YGdNeD Bw8+eJdQiroMbrAOgjlOcfMMl6IJT0093m44n6laa++UIZ6BngZT8OeiI4x3 5Ug7XXpsGqwg9faLWhX6pvdWRK4X2+X5JONkDTpkGXRQDTyaej/ZowaV37t1 xQDMOtah+b4GNX0+8v4GmIMSxbZUg+hCA6oE+LL468/xtUi5V07PpA+7XPDM tuE6FOee6BbQj+0hIhWu14BcDm7Y9xrMKudjdr0BaTP5zWaAu9JjqsMb0Iif hWs7WEtW5n1vA9oVIu6iMoBt/2vG17URsZ0J2nkEvGS/uyGyETVvWKKdA9d3 tQTmNaJ70S3XH4JDN13eT2pCpYmhTo1gQ+/gKq8mFGHHsn0EXKKd+N/rJmSr fGN89V9/Mm9tfhNam3nCYctfqNc66ve5JmRCcNl5gBP4zzRYN6ORBq9rUoPY ZnMG7rtaUEHEhOxecL10i75BCwo+f7FfH1z+NqXaogXt6t5veQsc6y0+9V8L uj86c6UcnOPqpDnSgvhYHC44DkG+z6fXh7Winu9/RB+CSfMnN3xsRZn+em3h 4MQJyQ3UVnSOV+F8IZinU0J2uBUp1YZtagTbv2Y+uNqKVp6TW4f/xTUXbAT/ oLiNvSaCw9iWZga30R/k0nZSeAtYS+/WDuM/SPs1tekAOFkfdTj8QSMyMcZW YIl9FN7YP2iXyrnT38DNAqkf17ahmA3XM36ADV4JN21tQ+yr/vzd4Fee3NVH 21Drj5wa9hGorxGV27cNedkJHzsDNqCXRbK1ox/vmo5MgiOSdnUrdqA9TycS WEahHuG71Iw6UOwtdtYN4JKlYMm7HchFa2/RAbDE6pngqg60qSfs4BMw346Z sy6d6JqY8V65Mbi/WUr323ehGlbHMDWwQY+VxMMupDbqyzAA1y/zib/sQjy5 WRk3wT5ZfcblXSjDZL1KIXihSuyibDcSpWx7Vg++G34nSaMb+ckfGf8LlhHa PnWqG5nOuCTzjmM7rsk/7t2NSKH1CmbgYA0eRms3snUffeQEDlXgkZjsRr/N Wf96g+tP7+hh7UHvdux6mwRuvXRHdlsPMvj1XHIWHKi39qFbD8rO/ujFNYEt rsSpGdCDNscUd4qBE9w/Po3qQTT76WgtcKXh7eq8HhTJdWpTCNh5y52f8z1I KYJD+C24aHBTHHsvKpAtWJ8Dpo4zsazvRT2ULes6wOZD1vbKvcjlZwfvFFhx Ydst9V7EZhbKwzoJ9U1j4tbuRYq3V9kVwXObG9rO96I81izyAbDc+jPC13rR 8RBbFkPwt68bupx60Y1PDSu3wK0Xvq737kWs+58s+YPLTx/zCehFYeWUhShw R4afV0gvyu39yCgEa0eekn6D812/Ml0Ppgu9qnzfi7pWhKb+gp+OTJNScP7A 6vEFcMKF8NIMnH+T9+iaKXgvwt+IfMX53+8dlgBrH8onFfQihd1jf3eCf+a/ di3qRd+K4vq1wdVOK/dKe5GBoUnvOfDK16cbKntRR/uabnuwzCpZ60cvcrYr 7vAEz73ZyFrTi5jn3dpCwBpkT5O6XhTqp9z6Fqy1Z/BQfS+SE+xryvmXjz2Q 2tCLct5ENlSB7b276ht7kd72E787wAvJrzybelF7HmvtFJj/2e1CbGe9bz9Z abDfVRSisJmbnao3gEPCr67BDr0qW6kI/lk9IIzzyU23lh0AazeZF+Dv53gF fzcEXy4IXsHj0+PVLrYAl8ZqtuLxt0UtUl3BMjrvjX72IsctaQWPwXWiTdZV vYj05VreK3BHzl+x8l4UoiX6LRVskj5+o6QXydTVfikCG8cy2VB7UfalR1kN 4MGNe5jyetHRMY2MQbB49huNL72o9S7t8yKYi8dUNL0Xrb64kCw5Dfsx1/nH O5xfWuDDLvDM4t83sTh/Wvl7HfAS002Jlzhf9c54B7BG2CapQJzv3FCsF7gL mSf69CL7vzExz8EyAwKdHr0omJnr5Vew4SVuS/teJBVMhFeDdwXqZFn0okyx Wy86wTH+yXmmvah5X1cwmQ7fv/2SrtOLJJ2yH50E18fM7t3ci1be0iSvgQ9+ L3QXwPVrU867CzbbEOqGz1eY3vvJeHCBYvfb8R7EJRdxbgY8moB4vvUgetud rVEMeE/uKfLp9KBagezvqWD7fPWpvT0oRY92qQQ8F/Hns0IPss6xDR0DK4cc b+fsQe3Pzy+jGdgf9NflVd2oVO/Arz7wy6+hUfg+in9wx2YeLKNcuu5IN/LK yWLhncXWSyXe7elG6nLK+/aCffQSVDZ1o1SmzW8eg51bDVt6ulBEDumm8hx2 G/M1LvcudGtCY81hMFfIdIFjFzKSu/P+LLjmyN0o8y60JnTqjxe48pjzD70u 5O3Uo/UbPLlVRESsC9nJlQi5zcN9XiP9O6QTdT1IMnwCZs2eivLqxH+PPg2I AQcqsiY5diKN0HMrJeAai8Eg/U7EyzzRv24BO89f14WjE6W3b8z6CG7bIDv6 uAPJqa2OF4Crxf7G4vchKrRPoQ4cLJzsateBfPRTX82BXzlsfnysAxl/1fI5 sgj32TjZVqADLYQ6neoEL+37pfK+HTlOng6igeeOHPN52Y569dXLyEvw/uhe W/O0HVUzk/crgQMffC691Y5inF9K3QGTvkcwHW1H/NWeZoHgo1Hd2w60o0fy V8Neg2OfHXyl2o6cO7ZzlYLbzMqPiLejQwbfp/iXYfwGzqT5NpT9/sNWObDg xginyTakyBJ8VQ1cXuuxfbAN8X8zbbkEXoqdS2xuQ37rKQI3/8UfHrtW24YW nWWP+f2L72xxr2xDffKT1GTwLvJsdn4bMnnYsED8y3/uXNeXNvSj49uu32AS 4WWT3oY01WMdB8DNx8+e/oTH88I3cR7sI1EWl4jHM2Xbw7OC7RXUZJXQhl4b GIpKgM0c6+pi2/DfG7uNd4LLz0cORbchfxaRYG1wQrFjclQbOsrx6Np5sGFs NtNL/HthzbSGM7ht6apkZBsqXXdJwBd8mb+BG9tPqGooEtz86A8VW1tkLzUF 7MLXhXA+skR8WDHY8pKuP/5eicxah+Z/+eTvR+Lx+GxxPzwG5hPrv4HHq6X8 dyPzKrYKrU8gqQ2x7Dw1KQR2Me1zT2lDRXuJ0q1gHk69D5ltyFtjazQF3Fbp E5OL63Mo/OaZf7717mxxG2LSZtGzBc/pStVX4d83J/7MPAfL3G3k62xDlNM6 PxLBPm39P4ba0KpJRnw+ONZlWYfRhu6bPzH8C840mrbnbUcHrWbllsBec8mC ou1o2c5imY/0Gtdr5eJNxXbkcWv/B3VwTfmdY7rtSOPue68TYEExp5Jz7Wjx vsBZSzCPSPqQbTu66z/C8hS8a6f6nmftyC0q6kL3v3xf10Z2tqN9sey7ZsAq W90OM9rRbMJNLm4mbJf07Y+5O5Briv6XXf98/sYfNfz7q3CRzx88p+1/LLoD Of89X6LMjC2zbttxj06kMlr28jDYY6brZ2Qnmpjced0EvKt0e9CXTuS4wC3u /S8u7Zs73Yns1+TdbgCvJB4/u7cLWe0U3erBAs4YLs3uQoYdsrHB4IKi76Wl XWjf4+3r34LdTLKbG7sQR6fm6g+woo2JymwXSgyw+b2ZFfuG/N+Yfd1osDvb vRj889e7DQXdyDr4ZDUXG3bAHgdqTQ+yGfNziOTAVi0eluPsRwd/qL+8uAbb VkspeN0QaliNwH/ZYd9tSuQRGUd7ot3VYsDMDfqK28dRhPrFgLR/Tp/bdngc md2SVmoGjz5+0G87jnqGPznJCmCLm7NzfB1Hkw1FMwR4xoyt8sQEMrr5Vuc3 uH6z9QbzCZTB5x8xAE6RbdBymUCu+sfU1whil3PuQRETaJnadM8UbDA99alj AnElj7IywJw8g4mqk8he99cZjvX/2ouVqU+iHwNp70TArEMn6jUnUbDk7aOa 4AfnonKNJtGGcKbAZ2CtKwfyr08iGW8hAUUh7BMXRl2SJ5Hf5nmLA+C/pvZ3 MibRYN6fTEMwMb7G7tsk+jgba3wbXFDRv758Eqk6bH1ZAlYgxfr3TCJkQpG8 tAF7U0RDv8AUqoyi8t0AU5+txm+cQqc7KSRfsM7lXyc3TyHra4c6P4Ddr6jd U5xCwS6a0TPgCBazjZQp1BOstfGpMLa+1Nco6ynkV3F0Xf7G1/Dvbc4Jn6cQ 35oKUg34Pr/r78wp9NJQd7IHnCY7vJAzhVKbdH9xbML2Gzh4oHAKNffrBZ0G v1UTm6ydQluYj3GOgrs8fGroU6ha/SSTiCjsf6OR3oM09EbeJGg7eO/tDLIW DbkKXtqoBc4YnpDXpSHJcfsdDmD33Y/tTuH4G/8rBFjyZEK7FQ1JcFALLcSw yc86a57REINeeswN3Lpq9iGUhiq7f7QEgnn1J90iaehW7p+pLHCpMjctjob0 EnvuVYIt5UZfvsf5XgxxdoJDsl/sTsb9HWclOcSx47/LqWfR0OvzK59EwUX2 /kFfacjlKFl9B9gx5E1WPg1tlhIwMgX72KQ+/E5DdN5NHY7gU7U2WypwvkUJ 24fg9A6H+Grcv0HZOxn8opMs+JuGdIt28xaC5S7QuRppSDxV42UD+HizY2Mz zhd1WG4YfPOZp+sfGqrw10tfAS9RVUbaaSjm1smDApux+d+l7urC+c1NKuXB MbyOp3pw/hOXjDXAzw/H6/Th/BrXegzBnKEP1w3Q0LSCg+NV8IYTh9P+0lD5 epeFO+AXfXLyQzg/s7vfU3DwloKbwzR0c+IBfzyYe9o2fISGjrb5x3wBj17w CxnF+SueKVaDhR7ZXB3D+bPCsrvAh5Md+MZx/rhoTQZYn5spFDv6WcJPTgls EjVnEvuGx0dTcfCB7m3yEzi/TfqAKrjRd34vtpjx1xs64DclmdLYNE3qynnw 7cy5Yci/vSzAGaxsf/Ep5Bf9KeQLjmL25IX8nA1xkeAXT6ft8Ph0Zv4op4CZ vhx5j8cv2tvzrQis+ZC7EM9v6teQdhPYtJL3G55/ad5k3QjYzmPTc1yfqKTZ iyRJ7PDH8waDNOQctjIsCGbqcR3E9RVx5mE5CN64262sl4b8H+QpnwQP1wpv xetDD7E3tQRX7F9xxev3M6s6LQAckrK9qo2GvBYDLzeBt27+5FVPQ6M8BwKH wZ6nNx6qo6Fz4mNflsHZA3enftGQ6qFja2WksNVCV2SraKjPb02BM/jRCQvp QhoyjMgfegiW3Hz0RQEN5Sc5rA8H16pWMefRUFj1D/t8cHd2Yl02rj//UxEu aewc5Ten8PlIjua9Ew92TJHTDqch4dSChGzwtkcrH/H586U61lSAd+ktCYbQ 0MXen/KTYLr7NlogDfFtedaoIYPNLlzU701DHuqI2RDs36hw3YuGhvQntlmA qfPqLPdpqMjxhO9jcFzktMYdvL8z1+5qBDs6Zq1zpqGu78SlIXDLA9d2Bxo6 1uT0ZAn8ypA9w46G5BZ+9UjJwvujr3gP3x/NKPg/J/BhvzsRl2hI6yQl3xus +/JL/gUaSjOfHHwBnp7unThPQwG+hpQ8MKkv0MOEhmbDSPa/wEdVqpuMacgy 8XN4z7+4suehMzR0oIpvgkMOu2Nlz2EjvL6+Ol/EwFJv7+A/JFEy5b6nKlhT +bvFCdx/MVNHB6zg6Sp+HO+/7JG1ZuBQt28MAxqqd5ZqdgYfMXo6pE9DT7ae i/UFH/sosKBHQ5oDz6xfgkdYrOSxF2JLVVLB57ZHX8f3afr55blisLp6bfNR GrIR2lXYDF4fI3IBW6LW9vEYmMvt3ooOrs+TNyeZ5bH19FfzsIO1mzduACPK pwhsHaa1PVvBO9/5/oe9knvkAwX8/tq999jZrh43zoDfkp63YjvuyFC3Bd8/ VaiIvyc7OsTsCTZcnAjHbnsnUfUcLD7BK4XHG3rl7PNEcBuFrwLbQPTp+Xyw df9IIJ4fS1OJdN2/fFneDrge3/5bHBkAa1CTbHG9bhioZi6CqYJ7fI7RkCK7 jQefArZs0dJXXN/uwtdasuAnTXXceD0iPBp51ME8lkF3TuLzsXdNw3FwuSsT C35/OGiHoy3Af8RZE0/TEDX57lU38BU7W2u8/tulBhlvwLouBeqmNDTQJl6Q Db6jcMLADN+f4Wf8qv61/+rsdpGGeNcUCzHASZv2b7bA90nZfAfnFuzP6Hjk VRq6563yXhxMHS5VssbnfTZ671Gwjkd+DN7fCen1q2Zg6y9vPfD+P+/AXX4d 3CVZfuMmfm963EyiwBz3V9/i85L449SdcXB5Y+TGRzR02T/gEIsivDeU8I8B NLThcCGnMFgwt/LkUxryy1F+eQjcdqms+QXen/GcuaFg1ry1JW/x+3yHWFLf CutnbxFfju87k9eWx/95za9J/L4V7PWsvgJO33xft5aGzGYOvvIHX9bcLt6K 632zYH8jWLrzwnF83/I65t+9rgTv91e1cP5ptGSeO/d+G+zfstcqV6dRs8EX uqAKdppMg4EAHRnW7VqUB9s98wsTpqOys+lM+8GzNiYdYnSUbf6J9wo4s2WT tQIdPXeLV/gErv3vqPkBOjqe8MzsyA5wdl7PNTr6vmhVcksVO7f918oXOtJ4 0F/pD+Z4HM+RT0eZbBa1UeD3fGv5i+gobt3FjkJwDOe4VDUdecmfnluzE1us OVG9C/c/RVF6B65LHV7PwUDpH4RDG3dhS8QUc55hIJcW0b0j4KrZbB5TBtrL Idm6Cp5PVGe/xEB5V7dIbNmN/en3h25rBiqVUE92B3f+7JbyYCD/EwdPBIPv JrC3eDGQ/n1NWgL4gi+bjy8D1fzR2/cTfGffji9PGagl7HyJxB54T/zX349l oFffL1ntBt9UPVSUwEAX6RZcev+s8mIqkYF6Ttob3gRnbRJbl8bA7829tu9g HsWYE1QGStn/wLMVnM6sOVTMQNdtfaUmwL+/bnEoY6CZsiBr4b2wXxs9dv5k INLDGLotuExTPaeVgYrS4sI9waVOzHHtDOTb9U49FHz4+pNbXQzEdTDVKx88 fnq1pZ+Bqu0zpOvA2YPztoMM9CzqS+kAWDWzvn+YgQTnCR6+fXAfnNGLnGCg RvmSVBnwUBu9doqBIo3LjdTAaDWGPs1A4pk1EebgdsN1c7MM1NVTv/82uOVs e/M8A69vS8cT8BY5avwiA8k7dctkgStD5OdWGGg4ur+sAiw53vqANIOSq4ds O8CNAcwzTDPIcXFszTTYrizrNMsMUlGkfWZXw7Zk5olhnUE0k5lTouBDL0Xr yDMo69HCjAr48djKJNsMcsteiTwC/mZaucA+g9T7mQ+YgrsPh01wzKAlAfYu RzA5w+MX5wwiNLkfPgTnS0W/5JpB3tfXykWA96RsOMk9g7RiBSqSwW+ceaax 2X5tsC8EK/lGefHMoIplkbWNYA72/nnsQCWJ9GGwxTrOS2tm0PHzMmdWwe+/ /EnFTkypDedXh/0tINmDzczs2Sr7z/wCc9hmZ5TE1MDbzcMmsbMSWy4ZgKMF ZauxeZf84i6BW9zVnmBbn9jVfwMscc1UGbsorlveD/z1IH82Ho/ozFPbSPB4 Qb8Utquuxqdk8JSt5S08n5pXQxMEuG9mRwqev+JkmOpv8Jfavh+4Pg8Pa90a ANuWCDXg+rWFTX2ZB89H3SnB9d0zHLPAsx+7ni37Fa7/cPC8504wr4w+F14v rb53RdrgqmqWN8wzKGbvabIpuNznmjRe75MdKQFeYMVh4/FlBsrZavniB1iK JJYxw0D8nuuau8C3Ii7l0xnIvq5gEx1s8ynuK42BNt/ZGLtJA87vrztPxhnI r/TnByvw9X7pVLz/uzZ6jN0Fl3IumvcykLrDFpWn4MI1J/i6GWhMwCcrE5xR ePh8GwOdvqJGZToA+5HSVl2Hz2vmAPN68JpdkVY1DMTBEXpEAWz3rpQFn8/c lPHK42Adw0StCgaSWopviALn3TViw+fd48RJ4VSwbRtXVT4+X3ErpkXg6U+3 X+Yy0GPdc12D4AKNsxe/4PvjFZv0Eljw6MEzWQykMZlxde1B7P9Wrl3JYKCw w1cSpcAXG2vD8f0yGcY7shvcSXu8mMpAesO523TB7TsnAlMYKP6AjbMZWH7y rMEnBloKFspwAl/esU49mYGM+4oZ3uDtXB7GHxno897r+8LANss/33zA98kT cfck8FtfCVFsy46q/DzwbbFH35MYKH/HHVIN2A1tjME2V/7U2Qem7/2WiM22 tbtgHnysfWYY+6P8+hheBO915Yglzmcoo3tPGqwXlSWEv8+QuGe2D1xx1pmE x/dSLG3/MXCvxowkHj/a1L/JHJwQRnLH8+sT2rjgCh7/fJT7M66nwLGWJ+DX TY/qcH2U+R7kxIIjjG/X4PrV8WSFZ4Fz79SwZjPQbc4h10rw30ADpxwGEmUT M+4Ez2x+vxavD5X55G46uD78Qz9eP66lnGkxCuxPvlyVEgZKnRutUwWbh2Um 4Pv7NEMiXQccvHTIoIqBosf9na+Dz7tM7fzNQJojeSf8wOXcpJtNDDTwd1I5 Cqxh6tn7h4FUuk3GSsD5LMbGeP82tAdWt4CZT205i+/ru63Uj+NgileIH76v i38r2Aofwg7YKOy4gNezdG7ADmwo7KfHP4MWi5RKvcA/tpl+EJ5BscTlty/A 6wg11c0zaCin3IIAC3mezFaaQR4fI7r4NbFfzYTd0J1BccH7Wr+C/fIekB/N oHFTtx/sWlCv1ToVnlmUu6yrLwq2H46IF5xF/rEiFSrgA5nXRcRmkfRAQck5 8E3WS8LKs8jkOjnvI3jTi/1qhrOo+FHIhxNHsD0jLn8MnUXBipYKluCAiZu7 o2fRxR+737mBFz0k8t/Oojn+ljdvwFzpD4qzZ5FyzObIafDwg6jI5lkUkZn8 KFwb9kOVl6nwHLp69j45GRx19WXJ5jmkunDiIRXc0VHFJz+HfqDp+0PgI5p7 jHbPIeYqNdf9OtgnFPICDeeQQ3epZSfY1Eoow3sOafJ2H5LXxf44q8fdMYfe NZy/pA4+G+R7vncOcUc3ehwD77I2yRicQ/Vbq7/cBLN/svCcnkNWul+2UcG9 a6w+c86jaj5V/d/gHdNZlmvnkUpzsvUAOFO7WGn9PFq4FhfPo4dN4lMiS86j QJ+gjefAnuP1t/fPo0l9jr324M+1dd8059EZgYenPcHr/H9R9OaReJzbs7dg TVPWDabzKI2wINPAnf3Kkx7zSOhRhxRZH943qxcn/ObR3ePnKMLgLXdTaM/m kVb7cfeDYL+t95kT5lHjgtpUANjjxgvNX/NIvSiTNwasfeDGl9Z59PrxdqU0 8A8nZ4eBeWQtLGvVBBb6Yh21Mo8Wd/O1SxtgL3M0Te5YQBLXB8rzwLmH+Ibj F5DPvisDv8B71K4oZiygodU/LL3ghZvdsUULKP1p7UHOY1A/xkulngWklZyX eQZceehWgvQisvkbEjsOjng3vCN1EQmbhJqyHIf9uCm5r2gRlZe/EBQG79/Z kdm4iBQ+RPgfAhuucfJfWUQD9jHOoeDdHexdx5eQJS2Jon7iNfz/durpU0vo 4jK1y9cQvmflo7V/BRkJTEiInYL7rTvI2ZxEiUyMvKuC7UXVck+yI1G6DmjV H4b4p+TCdhcSxdE68pEtxDer7dj3iEQJyD88/gXihHdCxkcSpdAqItfoNMyP +XPBNImiknfI2P8Mbn9ejFfAi4nCezX0yfRZHPdxdhQOYqbcj217yGaCraut LfWCmTL2R8ZjI7bXq6kl+WhmSrVRlj2C+B7np3KfmCkBlMZjT8Bq0Uuj1cwU NlFhPulzcJ9/rnrAzUJZqYsKNTKF99+xx+8hC8WRty/wKrZXW79VcgALpV1X ydcNzHlTtfg/FkoeNe9WDLQXdkoqec1CuZvSbjwMviLYIZbLQpl5vHmj93nc vsz6yP4JFsoYJT46zQybkRSzdIyVkih7Q7UUmxTqeJPpNCvFnOtQWSv44Vun hXOslObfHZMsF3D7gHJGxVVWStG1TVrG2KQJvcm/HqyUsMD/hhfADtxqFkms lIPNnnu1LuH2KWcY28lkylze8WoTbNKf3L+7uMmUjDdiVxwgPvmAitaRKQp2 uQFh4J1ZqlfFyBT+lZn2QWh/2P90524yZUDa0SfoMnbLHQqzFZkSy3FgYxy2 1zfJp2IOZMr5Me6UbLBk1dFdN8mUmuykpk6wrFyxoSeZ8k23X1H1CtyPzEzb w8mUp05mtY3YXneCdhaVkCldbvXkYYhLC1rXVZApqt4G6ssQD8gcrf1JpjSE asRLm0O95tLPN5MpcjGZTXvA3jox1W1kitt7JR498KxaCrmbTBH9JnrL2Rz2 N+fl2kEyxbE4NOkhxJftvluOkinUap6OMPAlydTCCTzfRh/+D9Ce+UHwII1M sexc0s6H+NNlgVYGmZI96OJeA87yKwibI1M4aKOpvdB+8S7/5kUyxXTRsm8G rHUs5eYymfKRtV2YywJb9OuNF6tkytKaM8fEwGsn+X2Z2CjHN/x4oAKelkeH WdgosRJHsg+DryYU1rCyUWhb8oeNwbGpscpsbBStnbs324Jd6TkX2NkoYRqf Tt0Ds3v3XeRgowwekfUPxvbiXllV5WTDZzU6Lx7iZDOBP9iBJuunsiFe+vaI CRcbpeNKkGwlxFtsCj5iq9iRTdshXrLnbSP2A5d7TyfB66IkW7Hr7jGKWCyx dWTPf8GWeeQwK4RNmrS444TtGty/VREsofuKBbs88sLlA9A+7cO4C/7+pviG UEOIFwW0lODx2icfq7AAP1upoOP5FGR9X3aF9qdFtrFhryUOqAZA3HDGaYHM RrlcnnUtGpyfsFqH65Neuy3qM7hlv+5/uH7GfWKsTWC5oYgSEhslcezFvmGw evdjDVz/hZk1DsvgASbxWLw+MZwrDdJXwcxPVRbIlH7ljvfO2F7tl2Xi8frv 2Wfc9hDiJbO0hEkyxf/QT75wiB8ocXs9TqYonS64kw/xrb1ZvsNkyv0Le1Jq wEhh2gXvt5prKT29YAX/aYsBMsXlTow+1zVYjwX/4z1kSqm3kJcYtpeFf6VL F5kiHPg0UwXi/bf6fnSQKbYv2IYOg+Wpf861kym5MffFzoKPGetsxPudJ3Hm pC2YdbGG5w+ZcjHN0e8e2PW51O5WMuXzt4FvwZD/B+tASAuZwlxycSIe/JAe IIf9feH1pa/Q/oSS0xg+T/47un/9hLidmfYctoG1FKUPPMGUqoPbr31t8Xke vHWHZht2XUOCxFor3P/QA+5s/L0wnoFgGWyvimylBjyec4flmdTBMvoMNTx+ 0bvW109A+9QvmX14fp2fk7otwdv7ghrw/OP+Dp+8C+1ZLVR5esmUa+JKRc/A vfpv/fvJlC1nHFTfQvvbixN6uL6jT1LivkGcEixyagTPt2iCvwbiQpd53uD1 2aNyY3oB4nJMcTwzZMr8tQwLPmscr75mvwWvd140/bcstldVyImAFTLlMPft TENw8rWPQnh/smnmyFwD77lx5dAaNkql23yo+7/+qd4p/GwUwwH3W+/A7kmr BuJsFAGx/P5caN+4u8lDho3SeGrlTC2Yh5l/VJGNcqHQa88SOD4lw3cfG8X2 le/sSRu4n3/7PzNmo2z7XWplBfZ37Yq/yEaZ5ORo9rCB3wPVCZPX2Ci3bwfk vAdzsodsd2Oj+Bg9u7MM7bsUYqWj2SgxHJGLibbYq4XujRNslCuo1a7AFu7T grCBBXxeXUXafoPHxa+LsLFTPvZG562AVXeHjImyU3IK4u6dtsP9NQ/lcBqw U9wZvWM22CQjGVMhE3bKQSXZi57g2yX5+y3ZKSWR7w9+AJvRj1V6sFMe1Qym ENDfxv+gymN2ih674uYG8LobtxNfsFN4D9o9Gwa7Z5juiGOn1Lokr65C/x/H 9SpS2Cn/A7Ak/q8= "]]}}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], AxesOrigin->{1960., 0}, BaseStyle->16, Frame->True, FrameLabel->{None, FormBox["\"ppm\"", TraditionalForm]}, ImageSize->Large, PlotRange->{All, All}, PlotRangeClipping->True, PlotRangePadding->{Automatic, Automatic}], TraditionalForm]], "Output", CellChangeTimes->{ 3.524829544023234*^9, 3.524833777150364*^9, 3.5248338243208017`*^9, 3.524833878810627*^9, 3.5248362228341312`*^9, 3.524836258029241*^9, 3.5249260976000853`*^9, 3.52492614319171*^9, {3.524926179938287*^9, 3.524926242486355*^9}, 3.524926526318965*^9, 3.526626081104735*^9, 3.5266269020534353`*^9, 3.526627996955533*^9}] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["Experiment", "Subsection", CellChangeTimes->{{3.526627455179426*^9, 3.526627456912732*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Block", "[", RowBox[{ RowBox[{"{", "sol2", "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"sol2", "=", RowBox[{"NDSolve", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"eq1", ",", "eq2", ",", RowBox[{ RowBox[{ SubscriptBox["\[Chi]", "n"], "[", SubscriptBox["t", "0"], "]"}], "\[Equal]", "280."}], ",", RowBox[{ RowBox[{ SubscriptBox["\[Chi]", "s"], "[", SubscriptBox["t", "0"], "]"}], "\[Equal]", "280."}]}], "}"}], "/.", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ SubscriptBox["k", "ex"], "\[Rule]", RowBox[{"1.", "/", "tauex"}]}], ",", RowBox[{ SubscriptBox["M", "h"], "\[Rule]", RowBox[{"2.123", "/", "2."}]}], ",", RowBox[{ RowBox[{ SubscriptBox["Q", "s"], "[", "t", "]"}], "\[Rule]", RowBox[{ SubscriptBox["Q", "S"], "[", "t", "]"}]}], ",", RowBox[{ RowBox[{ SubscriptBox["Q", "n"], "[", "t", "]"}], "\[Rule]", RowBox[{ SubscriptBox["Q", "N"], "[", "t", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ SubscriptBox["S", "n"], "\[Rule]", "Sn"}], ",", RowBox[{ SubscriptBox["t", "0"], "\[Rule]", "1751.5"}]}], "}"}]}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ SubscriptBox["\[Chi]", "n"], ",", SubscriptBox["\[Chi]", "s"]}], "}"}], ",", RowBox[{"{", RowBox[{"t", ",", "1751.5", ",", "2011."}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Show", "[", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"ListPlot", "[", RowBox[{"\[CapitalDelta]\[Chi]", ",", RowBox[{"PlotRange", "\[Rule]", "All"}], ",", RowBox[{"PlotMarkers", "\[Rule]", "Automatic"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{"None", ",", "\"\\""}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Plot", "[", RowBox[{ RowBox[{"Evaluate", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["\[Chi]", "n"], "[", "t", "]"}], "-", RowBox[{ SubscriptBox["\[Chi]", "s"], "[", "t", "]"}]}], ")"}], "/.", "sol2"}], "]"}], ",", RowBox[{"{", RowBox[{"t", ",", "1950.", ",", "2011"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"PlotRange", "\[Rule]", "All"}], ",", RowBox[{"PlotStyle", "\[Rule]", "Red"}]}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"ImageSize", "\[Rule]", "Large"}], ",", RowBox[{"PlotLabel", "\[Rule]", RowBox[{"Style", "[", RowBox[{ "\"\< \!\(\*SubscriptBox[\(CO\), \(2\)]\) Gradient N - S\>\"", ",", "20"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1950.", ",", "2011."}], "}"}], ",", "All"}], "}"}]}], ",", "\[IndentingNewLine]", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"Axes", "\[Rule]", "False"}], ",", RowBox[{"FrameStyle", "\[Rule]", "18"}], ",", "\[IndentingNewLine]", RowBox[{"Epilog", "\[Rule]", "\[IndentingNewLine]", RowBox[{"Inset", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ "\"\<\!\(\*SubscriptBox[\(\[Chi]\), \(a\)]\)'(t) = \ 1/\!\(\*SubscriptBox[\(\[Tau]\), \(ex\)]\)(\!\(\*SubscriptBox[\(\[Chi]\), \(s\ \)]\)-\!\(\*SubscriptBox[\(\[Chi]\), \(n\)]\))+ (\!\(\*SubscriptBox[\(Q\), \ \(n\)]\) - S)/\!\(\*SubscriptBox[\(M\), \(h\)]\)\n\!\(\*SubscriptBox[\(\[Chi]\ \), \(s\)]\)'(t) = 1/\!\(\*SubscriptBox[\(\[Tau]\), \ \(ex\)]\)(\!\(\*SubscriptBox[\(\[Chi]\), \(n\)]\)-\!\(\*SubscriptBox[\(\[Chi]\ \), \(s\)]\))+ (\!\(\*SubscriptBox[\(Q\), \(s\)]\) + \ S)/\!\(\*SubscriptBox[\(M\), \(h\)]\)\n\!\(\*SubscriptBox[\(\[Tau]\), \(ex\)]\ \) = \>\"", "<>", RowBox[{"ToString", "[", "tauex", "]"}], "<>", "\"\< yr\n\!\(\*SubscriptBox[\(S\), \(ocN\)]\) = \>\"", "<>", RowBox[{"ToString", "[", "Sn", "]"}], "<>", "\"\< PgC/yr\>\""}], ",", RowBox[{"{", RowBox[{"1990", ",", "0.5"}], "}"}]}], "]"}]}]}], "]"}]}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ "tauex", ",", "1.", ",", "\"\<\!\(\*SubscriptBox[\(\[Tau]\), \(ex\)]\)\>\""}], "}"}], ",", "0.0001", ",", "2."}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ "Sn", ",", "0.", ",", "\"\<\!\(\*SubscriptBox[\(S\), \(ocN\)]\)\>\""}], "}"}], ",", "0.", ",", "4."}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"SaveDefinitions", "\[Rule]", "True"}]}], "]"}]], "Input", CellChangeTimes->{{3.526020870518565*^9, 3.5260209404680357`*^9}, { 3.526021010303677*^9, 3.5260210926268787`*^9}, {3.526021129812367*^9, 3.526021204144067*^9}, {3.526021257081366*^9, 3.5260212627343073`*^9}, { 3.526021308177446*^9, 3.526021411914403*^9}, {3.526021443508532*^9, 3.526021485758459*^9}, {3.526021521775525*^9, 3.5260215671240683`*^9}, { 3.526021640253273*^9, 3.526021791087522*^9}, {3.5260498530999327`*^9, 3.5260498557706957`*^9}, {3.526538206790956*^9, 3.52653820687049*^9}, { 3.5266168833006763`*^9, 3.526616936044065*^9}, {3.526616970324031*^9, 3.526616978578039*^9}, {3.5266170259381533`*^9, 3.52661703865606*^9}, { 3.526617094396153*^9, 3.526617126857554*^9}, {3.526618089417944*^9, 3.526618089586854*^9}, {3.5266193014400873`*^9, 3.526619331557932*^9}, { 3.526619362003674*^9, 3.5266194433051157`*^9}, {3.526619567745489*^9, 3.526619653299156*^9}, 3.526619704885828*^9, {3.526619774928403*^9, 3.526619781533914*^9}, {3.526619826420815*^9, 3.526619880331058*^9}, { 3.5266199143470097`*^9, 3.526619915130081*^9}, {3.526619978232998*^9, 3.526619981903286*^9}, {3.526620190066575*^9, 3.526620191719408*^9}, { 3.5266202292704906`*^9, 3.526620230758224*^9}, {3.526620539161229*^9, 3.526620600351441*^9}, {3.526620657480178*^9, 3.5266208226971083`*^9}, { 3.526621137433634*^9, 3.526621142165913*^9}, {3.52662156718357*^9, 3.526621598516172*^9}, {3.526626274328936*^9, 3.5266262951082907`*^9}, { 3.5266263430242968`*^9, 3.5266263484795628`*^9}, {3.5266263904495907`*^9, 3.526626399142076*^9}, {3.526626431092898*^9, 3.526626493498612*^9}, 3.526626537000371*^9, {3.526626572143261*^9, 3.526626775686891*^9}, { 3.5266268198843517`*^9, 3.52662682506103*^9}, {3.526626970070486*^9, 3.526626993407732*^9}, {3.5266270562365417`*^9, 3.5266273321799507`*^9}, { 3.526627372612372*^9, 3.526627380138299*^9}, {3.5266274964305162`*^9, 3.526627498459578*^9}, {3.526627745005939*^9, 3.5266277549009533`*^9}, { 3.526627834075795*^9, 3.5266278568017073`*^9}, {3.52662808609883*^9, 3.526628097680045*^9}, {3.526628136352396*^9, 3.526628151934963*^9}}], Cell[BoxData[ FormBox[ TagBox[ FormBox[ StyleBox[ DynamicModuleBox[{$CellContext`Sn$$ = 0., $CellContext`tauex$$ = 1., Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{{ Hold[$CellContext`tauex$$], 1., "\!\(\*SubscriptBox[\(\[Tau]\), \(ex\)]\)"}, 0.0001, 2.}, {{ Hold[$CellContext`Sn$$], 0., "\!\(\*SubscriptBox[\(S\), \(ocN\)]\)"}, 0., 4.}}, Typeset`size$$ = {576., {181., 188.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = False, $CellContext`tauex$2853$$ = 0, $CellContext`Sn$2854$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, TraditionalForm, "Variables" :> {$CellContext`Sn$$ = 0., $CellContext`tauex$$ = 1.}, "ControllerVariables" :> { Hold[$CellContext`tauex$$, $CellContext`tauex$2853$$, 0], Hold[$CellContext`Sn$$, $CellContext`Sn$2854$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Block[{$CellContext`sol2}, $CellContext`sol2 = NDSolve[ ReplaceAll[{$CellContext`eq1, $CellContext`eq2, Subscript[$CellContext`\[Chi], $CellContext`n][ Subscript[$CellContext`t, 0]] == 280., Subscript[$CellContext`\[Chi], $CellContext`s][ Subscript[$CellContext`t, 0]] == 280.}, { Subscript[$CellContext`k, $CellContext`ex] -> 1./$CellContext`tauex$$, Subscript[$CellContext`M, $CellContext`h] -> 2.123/2., Subscript[$CellContext`Q, $CellContext`s][$CellContext`t] -> Subscript[$CellContext`Q, $CellContext`S][$CellContext`t], Subscript[$CellContext`Q, $CellContext`n][$CellContext`t] -> Subscript[$CellContext`Q, N][$CellContext`t], Subscript[$CellContext`S, $CellContext`n] -> $CellContext`Sn$$, Subscript[$CellContext`t, 0] -> 1751.5}], { Subscript[$CellContext`\[Chi], $CellContext`n], Subscript[$CellContext`\[Chi], $CellContext`s]}, \ {$CellContext`t, 1751.5, 2011.}]; Show[{ ListPlot[$CellContext`\[CapitalDelta]\[Chi], PlotRange -> All, PlotMarkers -> Automatic, FrameLabel -> {None, "ppm"}], Plot[ Evaluate[ ReplaceAll[ Subscript[$CellContext`\[Chi], $CellContext`n][$CellContext`t] - Subscript[$CellContext`\[Chi], \ $CellContext`s][$CellContext`t], $CellContext`sol2]], {$CellContext`t, 1950., 2011}, PlotRange -> All, PlotStyle -> Red]}, ImageSize -> Large, PlotLabel -> Style[" \!\(\*SubscriptBox[\(CO\), \(2\)]\) Gradient N - S", 20], PlotRange -> {{1950., 2011.}, All}, Frame -> True, Axes -> False, FrameStyle -> 18, Epilog -> Inset[ StringJoin[ "\!\(\*SubscriptBox[\(\[Chi]\), \(a\)]\)'(t) = \ 1/\!\(\*SubscriptBox[\(\[Tau]\), \(ex\)]\)(\!\(\*SubscriptBox[\(\[Chi]\), \(s\ \)]\)-\!\(\*SubscriptBox[\(\[Chi]\), \(n\)]\))+ (\!\(\*SubscriptBox[\(Q\), \ \(n\)]\) - S)/\!\(\*SubscriptBox[\(M\), \(h\)]\)\n\!\(\*SubscriptBox[\(\[Chi]\ \), \(s\)]\)'(t) = 1/\!\(\*SubscriptBox[\(\[Tau]\), \ \(ex\)]\)(\!\(\*SubscriptBox[\(\[Chi]\), \(n\)]\)-\!\(\*SubscriptBox[\(\[Chi]\ \), \(s\)]\))+ (\!\(\*SubscriptBox[\(Q\), \(s\)]\) + \ S)/\!\(\*SubscriptBox[\(M\), \(h\)]\)\n\!\(\*SubscriptBox[\(\[Tau]\), \(ex\)]\ \) = ", ToString[$CellContext`tauex$$], " yr\n\!\(\*SubscriptBox[\(S\), \(ocN\)]\) = ", ToString[$CellContext`Sn$$], " PgC/yr"], {1990, 0.5}]]], "Specifications" :> {{{$CellContext`tauex$$, 1., "\!\(\*SubscriptBox[\(\[Tau]\), \(ex\)]\)"}, 0.0001, 2.}, {{$CellContext`Sn$$, 0., "\!\(\*SubscriptBox[\(S\), \(ocN\)]\)"}, 0., 4.}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{619., {238., 245.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, Initialization:>({$CellContext`eq1 = Derivative[1][ Subscript[$CellContext`\[Chi], $CellContext`n]][$CellContext`t] == \ (-Subscript[$CellContext`S, $CellContext`n] + Subscript[$CellContext`Q, $CellContext`n][$CellContext`t])/ Subscript[$CellContext`M, $CellContext`h] + Subscript[$CellContext`k, $CellContext`ex] (- Subscript[$CellContext`\[Chi], $CellContext`n][$CellContext`t] + Subscript[$CellContext`\[Chi], $CellContext`s][$CellContext`t]), Attributes[Derivative] = {NHoldAll, ReadProtected}, Attributes[Subscript] = {NHoldRest}, Subscript[$CellContext`Q, N] = InterpolatingFunction[{{1600., 2011.5}}, { 4, 7, 0, {262}, {4}, 0, 0, 0, 0, Automatic}, CompressedData[" 1:eJwtxRGQIgAAheG9IAiCIFjYmQuCIFhYCJqdIAiCIAiCZi4IupkgCIJgYSEI mrnurptZCIIgCIIgCIIgWAgWgiAIFhaC5u6278387/ta+V74Fri5ufnyr+D/ +9yPx0/KP69WWGWNdTbYZIttdvjEZ3bZY58DDvnCEceccMoZ51xwyRXX3HDL V+74xj0PPPLEd37wzAsDv64GGWKYEUZ5yzvGGGeCSd7zgSmmmWGWOeZZYJEl lllhlTXW2WCTLbbZ4ROf2WWPfQ445AtHHHPCKWecc8ElV1xzwy1fueMb9zzw yBPf+cEzLwz8vhpkiGFGGOUt7xhjnAkmec8HpphmhlnmmGeBRZZYZoVV1lhn g0222GaHT3xmlz32OeCQLxxxzAmnnHHOBZdccc0Nt3zljm/c88AjT3znB8+8 MDC8GmSIYUYY5S3vGGOcCSZ5zwemmGaGWeaYZ4FFllhmhVXWWGeDTbbYZodP fGaXPfY54JAvHHHMCaeccc4Fl1xxzQ23fOWOb9zzwCNPfOcHz7ww8OdqkCGG GWGUt7xjjHEmmOQ9H5himhlmmWOeBRZZYpkVVllj/c/jX8QjZdE= "], { Developer`PackedArrayForm, CompressedData[" 1:eJwV01WUFQQUBdBJursEhm5pBJVGuoYu0QGkZ0RKulMRlFBS6e4uSWkEpRuk u1GQ2u+utc/5ON83IiomMjo4KCgodiBcoEIIJYxwYgV24hCXeMQnAQlJRGKS kJRkJCcFKUlFatKQlnSkJwMfkJFMZCaCLGQlG9nJQU5ykZs85CUf+SnAhxSk EIUpQlGKUZwSfERJSvExn/AppSlDWcpRngpUpBKfUZkqVKUa1alBTWpRmzrU JZJ61KcBDWlEY5rQlGY0pwWf05Iv+JIoWtGaNnxFW9rRng50pBOdiSaGr+nC N3SlG93pQU++pRe96UNf+tGfAQxkEIMZwlCGMZwRjGQUo/mO7xnDD4xlHD/y E+OZwEQm8TO/MJkpTGUa05nBr/zGTGYxmznMZR7zWcBCFrGYJSxlGctZwUpW sZo1rGUd69nARjaxmS1s5Xe2sZ0d7GQXu/mDPexlH/s5wEEOcZg/OcJR/uJv jnGcE5zkFKc5w1nOcZ4LXOQSl7nCP1zlGte5wU1ucZs73OUe93nAQx7xmCc8 5RnPecG//MdLXvE/r3nDW94ReP5gQggljHBi8R7bWoFY "], CompressedData[" 1:eJyF0nk4ldseB3AJdQ7HtLG3kuFUF1FSV2129V09p0FyD0UqSSqizo4G6VRs DWQoMpwrlaGUmQ6309FgyJAxYy4pJQp7m0KobaiT3er+4XnOc9cf7+f5rfWu 9fuu53219rhtdpomJiYmNfmgY5x3INs93AWj1G/1x7+pR6f4bV445X3h35wj nLJ/6r6JKfVY8kDdv/YcwgR1lPqJOjbF8f9Tn1K6vb71pPv/9KTyqHupjlRn qsuUeh9VIMr5K/qpfOpbage1j+oi+IfhzDRPHKA6Ub/e6zTeUWNF5/uA02IR dNn1LFZRZalH6Po5ahDVh+pPLdsgI67ndx7x1AJqCXWm92Quf7D/KPXIjQ3E MVGei+BRf6GGUJ2p2eq+3ZvuBdPcIRBL+eq1Is2MIy6haKLaifKGgU1dRtUW 9Y1EmKPohthGfcX7Oq9K1zOuiAZkJWxkF/4nGsbUSlH/GMQai4LDennAaof2 67gr6nsDNqI+cTjG7fzy6eNg4KfSVPXhJny+nMqSSIAf9ZCobyIyJuPLJyFa 1C4ZsVUfrN7Ep6KdWvalySyDdLiH9nrC6DaMLkwenImbLFEgfBb9yHfg/qj8 xto/70Ba1O8OlrlMbrgLyaYO5fvrspDPZRgUm95DzjPusZiqe9ixjGvoH/kA nYtVrhglZkMoqFtv4JaLp098bfsX5WHit1DOi2uPkAsbDcXV+bh0XLjCWrsA D+Uey3lUFODf95M3Bg0UQuukus5J9WLMk2s+e9C3BPnpBxknVhaDc0Zqd+PM UmTlSmQtOVCKyiIJoUVFKapPPOnkfV8GzzSVnYeqyxEeZZZuNbsKD495SMpI VMPVab+1z5YaZH+ysHHYXosFd7eXLgioRapcoKFcUi0qQy/VOwlqscGoccnn 0jrUnxi8bPi0HlLxL+YXVdfDx4uEVaY04A/zJ0zbjEaY89MP/1jZiBgnr3dd Po3g2a2yr9v8DAMl0eESBU2oTnPwmxv2HAsULyx9+fYFzGRMZ0QdeYmSkYsh H+VfI6uEZ/9Dz2uIz9uQ6O/Wim1bl6w0b25FH4mxjfR4A+ECk8deyW9gV8ri bGp7i6eXVuj/xu5AZFnS0uBkPk6Pcm+5B3bCpy3uvWoqH62WNs2cdAFig10d qxZ3gbSs9CoP6IbO1uG5vcG98N11KKcisgspequVO0kXdFy1mn9a2wP+9ZR4 o4leFAUXeiY59GIo6mi2mpEAJ6JMzfv0evH+sq/0XCUBBr1tw9S4XdBW7Gmq sOmDveUvZonSfQj4cPyS/N4+PIwKTlO91odmu+PLNwX1Q4IXsYh9tR/eTLNR i5cDKFQzXpjG7YeD82GfQOte6OqzHqvv7oL6xYxXMiXd0PJq5Suu6cN5yZcz 8rrfYSwv5Pfo8AFkalW1tJQPIty5mSf8cwA7zkzPf8YbxLJd3HUVy4cgE8vW /zl/CAXqfrVrOocQ9l552CJhGBa/z7Oz8h/GdwOOwq7RATxoSJlVsuI9ytZ4 c9qThxGf6rbop4YRWHU/XZwjNoKIhrEJwTwh5ENOtZ/DGGq99qXrRo2h7py4 Ntt2HEalIa/Sbo0jRGFRqIr9Z/zckCPDyhIjHu3PH29xnUY6gq7rmrRPI5F2 o/tamsWJljxLqjNvOuFGvD23tHI6Wckc9N8aJUEO8hNdbxVKksCbOjI141Kk rYJ5dP60meSMoCQ90uQ78qS57fRCye+JZ9R+tcvW0iRTV7wzZkSG1PBrEvYo yZED6sfnr5ktT3RZezjcR/JkfVxbzJxEBaK5a0vIlSQF8s8LD/ZzAhSIRrR1 gnW4ItkbG3rqiB6D8INPpa91ZJDbLsWmtYeVyOzNSht3GikR+486Q8/8GWTk qPSqxu0M4nHPJFdgziDs+2m3VT8xiP6gas+Gq0qEMXD2/AhbmcwZtNy5tkiZ 5N00tMkMUyGVsWpWSpJMcnXIbYbGKiaZb5m8e3UYk7gV1y3tMWUSEz11Tjib SXw6SkNLopikUNa7+AaLRWJS9bqZvixSmVAjZLayyNiZ3FrnChbZVr7tbmQo i0gK0+K1OapkPyxlrzSpkhz93CEFzVnE+rDd646s2cTLkGw01ppD2iJ2Z/53 nTqp54YYzzXTIFsdXlmeHdQgyp0F2s07NEmZk4vm4n4NYmAYofrguSaJ0//4 o12OFvkLGl/z0w== "]}, {Automatic}], Subscript[$CellContext`Q, $CellContext`S] = InterpolatingFunction[{{1600., 2011.5}}, { 4, 7, 0, {262}, {4}, 0, 0, 0, 0, Automatic}, CompressedData[" 1:eJwtxRGQIgAAheG9IAiCIFjYmQuCIFhYCJqdIAiCIAiCZi4IupkgCIJgYSEI mrnurptZCIIgCIIgCIIgWAgWgiAIFhaC5u6278387/ta+V74Fri5ufnyr+D/ +9yPx0/KP69WWGWNdTbYZIttdvjEZ3bZY58DDvnCEceccMoZ51xwyRXX3HDL V+74xj0PPPLEd37wzAsDv64GGWKYEUZ5yzvGGGeCSd7zgSmmmWGWOeZZYJEl lllhlTXW2WCTLbbZ4ROf2WWPfQ445AtHHHPCKWecc8ElV1xzwy1fueMb9zzw yBPf+cEzLwz8vhpkiGFGGOUt7xhjnAkmec8HpphmhlnmmGeBRZZYZoVV1lhn g0222GaHT3xmlz32OeCQLxxxzAmnnHHOBZdccc0Nt3zljm/c88AjT3znB8+8 MDC8GmSIYUYY5S3vGGOcCSZ5zwemmGaGWeaYZ4FFllhmhVXWWGeDTbbYZodP fGaXPfY54JAvHHHMCaeccc4Fl1xxzQ23fOWOb9zzwCNPfOcHz7ww8OdqkCGG GWGUt7xjjHEmmOQ9H5himhlmmWOeBRZZYpkVVllj/c/jX8QjZdE= "], { Developer`PackedArrayForm, CompressedData[" 1:eJwV01WUFQQUBdBJursEhm5pBJVGuoYu0QGkZ0RKulMRlFBS6e4uSWkEpRuk u1GQ2u+utc/5ON83IiomMjo4KCgodiBcoEIIJYxwYgV24hCXeMQnAQlJRGKS kJRkJCcFKUlFatKQlnSkJwMfkJFMZCaCLGQlG9nJQU5ykZs85CUf+SnAhxSk EIUpQlGKUZwSfERJSvExn/AppSlDWcpRngpUpBKfUZkqVKUa1alBTWpRmzrU JZJ61KcBDWlEY5rQlGY0pwWf05Iv+JIoWtGaNnxFW9rRng50pBOdiSaGr+nC N3SlG93pQU++pRe96UNf+tGfAQxkEIMZwlCGMZwRjGQUo/mO7xnDD4xlHD/y E+OZwEQm8TO/MJkpTGUa05nBr/zGTGYxmznMZR7zWcBCFrGYJSxlGctZwUpW sZo1rGUd69nARjaxmS1s5Xe2sZ0d7GQXu/mDPexlH/s5wEEOcZg/OcJR/uJv jnGcE5zkFKc5w1nOcZ4LXOQSl7nCP1zlGte5wU1ucZs73OUe93nAQx7xmCc8 5RnPecG//MdLXvE/r3nDW94ReP5gQggljHBi8R7bWoFY "], CompressedData[" 1:eJztzP0/EwgAx3HSedVrERJpUXmYpzyUEBffo+UVlZYUKYWLUvJQiS6y0uqU dm1keWy281hdGJa9hCkNRR42D708ZOth6WHj7iQld/dP3E+9f/j8+FkdFuMX rqqioqL+X7777rv/TdljbZMtTrqgRbH07vgYw1fKM/ucbIDkTdNxSwdXoOWO 1DPEZwluP+NnV4YbYU9Dg83cGwucLIi+56qww5zwElMcY4Vg64tWh+QkbNV4 PeHxwAyx6514juqW6IrOUhLTLeGhuTs5Ls0OCWXlRdE77SGUNa/lWdtCzq1L 6Z2xh/YD1Z//3ucAtRLTY5e0NiAmonOW0u+Bitm/OM/eeUOg8FOpy/BCrlqa 1izTG1MJVwt5pr7Y6PYS3dEUlJw7XqO2ww/VplVfWOf9YCXa7HZ2SyC28J2o XQeDIPchsDw7gkG4xdQveR2MYucRwbdzB0CfYILtFopehbKyJfMQbGNurlmw 6ghKZQ9OR01EYVojOvZ9SAzuJuoITdTjQPV33SD5ehKq7NvjjXancIbC8Xi9 MR4GfJ422yUZbj28xkl9Kt5qn6PlfjqPpCm9T+TMVETI2mQcdxoC9BZyme1p MGZT+tzcr0LsL3zZF3YNxHILJutNOnx05DqnVBj4vFK16cYUA6RUlY5No0zE Owx4kB5lQOd40P2P2zJgVEMIaZtjIEuZM+n5iYECt0ORXWQmAqkiYl0oE3Hu z3sTq5nQPRhZe+xFJsrOawT9JMyAzQerNuK/H4Oc6b510VmI1BIJmktu4vDJ wwn+83OwLo/QELA+F7Bh8G5Z5KHHbk8qRTUPXSYWNVJSPtQoZ5KyludibKQ1 h/CNhWX0XuuV9iy07XXnf0nPRgpz4LfG/lwojAMC59kWwF847FRMZOOb9dQO reJCKE6kJi2UFKKqy6VbcIKDZMvTwUaGHOy8UtzsNcCBlZJ57Yd1HOhGCLws DnMhoZGU5ppczDgvnzSjczB64cpZeHJwud5czkjgghxd0XEgsAiP39HfXIwp hs3nXyJXTN7FgfU7/EdCK+C4aHwstbkSNqEiZ3JpJf7gzX6QmPHwjjzoxF1V AxK9jDscVQvXEXrW3C4+LEPzluT18iFo0Vt7LP8+WBeOmhLv1uEKiE9ixQK4 RjzRFOrU43pA5jJFez0Mq2IjKEaN+LOyaSCF0YRXpNXuvzsI0bc2STYzI0S+ 2CrI3fIh3qv7dhCPP4LBRe+naRdakD72UuTiLMJuWZid25JWiAbtFxeI22C+ a0ED+XY7kkdlpO3GT7CseCttes1TbDcp2l/6qgNHwz46EnM64ddZws6ndsHA wvBgqqwLidP3JjvXdOPrkfAzyvxuZJPyZkc2d+MqI9xQ+8ceeFs/9K3L7MF0 d6HgxNFesPsWV9zQEKNc/1cpu1UMs4I6Oo0iQZg8KpbQKsGRO0HXKsz7QLiX Mpol6QPtfj9rILEftfXxLjdCBvCe3zamSBjEUmEitXrsOTobNiv1g4fACu/s pxoNwW+83KHWawiCavsi2vYhMDRbGDbqwxDS4z9kioZgPbG3fP74MLZW7VOv mR6FlmXYZUnaCzTpVkQYSF/g+nLyPLunY3CiyvcvcpXi683sWVn7GGw521oj RFI4ls4x3z6U4R8Pm09L "]}, {Automatic}], Subscript[$CellContext`\[Chi], $CellContext`n, $CellContext`obs] = \ CompressedData[" 1:eJwtklFI01EUxldZkbDCBxshBS4GGYkO0lBYfD74MKLRjKCikpQFQlqy6UYP QUQRRARBBcHOMVZIQQ+LhIpCEnxYNCkkRoMFwSRHlFQOGWR0b/c78OfP7373 O/dwzmkeONcXW+vxePaaz/4Pl8LB1bQg0rT47NJ0HOX8cuDvfUEqaWIujv/6 Q8GVb9HnO4rkRwJzO9L0lfxEsLF7eGJ+if6soGfSmyjWqE8J9r0fWpf2JBy/ EMSLmPRuJb8WnLHhTzj/G8FoqL6Qaac+K7DPLYbJOUH+nYnj5LygkDkfqo/R /0EwMjG/oTtJ/aOguuvEzZl75E+sL0MuCX5fD0wffUr/F8Hbtjt/BmaoLwhs eyKfyRXBYM5cWCF/Z/+8Y87/U7D0w8TuMadXBQ9MeYX95Jog3Wka0kdeFdTZ g7P0r1FctgmvUl+v2FObvdUv5E3Kesledf2fo79BseA7cDG7Qr1REbP93Tzu eJvCymU/ebui1ebvGnf+ZsWU7Xcv9YCi3xZwiNyiaLAxQm5V2HJ+3aA/qLDj 7nxMvUPdvrwidylazDiqFXKI79Ulnb9Hcc2GL+n0XsWwnWc7OaxuP6Pkg4qK zX+B/qgiaMaXu039iOKuwbaX5GPMVyKfVLefNfpPK3b6TfhSTo8psmXTsQ7y kGJLwizwqRT+AVcrnoc= "], Subscript[$CellContext`\[Chi], $CellContext`s, $CellContext`obs] = \ CompressedData[" 1:eJwtkm1I01EUxtcrlEgZSoVYSY0sjFqUvYDwBIlJb0wJEhJrsQ8LJMPNmUXS Bwnyg2AUfdk5hkUZZAwKlIhKGDJCSkRGhsRgYSVBSgsGM7q3+xy4/Pnd5z7n nv85tzxwuT641OPx7DPLfhtm6nyLMcHD1urVqZE2ZMZ/e/8+EGw4fiOemWzD f/2R4NuLm6dKv5AHBadLzU6a/Exw4GNoWSxDf1xwxaQb+EH9paB4qDbd+Yc8 Iujxvjm7UBB2/FrQ0j+58nBJ2PnfCVIDpqAt1BOCpzZ85KQguftePlBDHhdc sxf46Z8QXLQHmqlPCeqHN3XPXSV/EtjrWm6RZ5jvPv1pgb0+NUj9qyAfMCfe kr8Ljtr4TP4paOodzVb8on+e9a6JOD3Lfm4l5wQeG1XkRUF4Go8LGyLOv0RR ZCNEfYVijykveZ28SmHb23qXXKhufs/pL1JEbL4P1EsUm7vn/MOz5I2KAtvg PLlMEbWxrt35yxW2Pf3b2p3uVWw34+rZS96hyKw3P1RL3qXoipudIP0+dfPo or5f3TzvkA8pjqU7i4dekasV5ytzib5p+o8oYlXmQc1Tr1GM9TVX5pZHHdcp 3tt57SSfVGQrzvWOnog6v19dPy9RP6NoXDAv7ja5UXHQvtcn5CZFwuYfo/8C +ztLPahYa+fh6XAcYr1lHfgHsOKa9A== "], $CellContext`eq2 = Derivative[1][ Subscript[$CellContext`\[Chi], $CellContext`s]][$CellContext`t] == \ (Subscript[$CellContext`S, $CellContext`n] + Subscript[$CellContext`Q, $CellContext`s][$CellContext`t])/ Subscript[$CellContext`M, $CellContext`h] + Subscript[$CellContext`k, $CellContext`ex] ( Subscript[$CellContext`\[Chi], $CellContext`n][$CellContext`t] - Subscript[$CellContext`\[Chi], $CellContext`s][$CellContext`t]), \ $CellContext`\[CapitalDelta]\[Chi] = CompressedData[" 1:eJxFkl1Ik2EUx1/b/Ggi1EVIhhORUQkxhBwpDB+jCV44mBIZGJFpMEJK8Tq2 i4FoYHQhGOxDRCzRi8EUvRA/YBcjBGVsFjJBmDIbRTqHurbR/3nPGR4Y48f/ /M/Hc97a3ned/dcURXmIn/zvirU35NweoXydQ0Rb4ltnhvwU2GG9kwhE1lR9 BvzRsNZ9Gib+Bu57g4i2qLwA9oVLmgeOyO8v8B/SF8FtTxBx4hXwtl3jNjGv gk/H0OAX+TfAXyYRf0kPgnW70+/NF8QhsNZt2ranibfAPeOb6Xsp8u+Ay2X+ OekRj3DYlvWut4pQ+Sf0KTlflvQYuF4WuCT/Afgu1h3jfofgGlfStpwjPi4w +3+DT+T8OfKfgC1y33+kpwvvlyG+BMvxNezPgT9h/B7uX+QVypAZG3O/YvAH f7zyO89/HbzkxIHYXwF+HTJOZPPkvwnGukmblvJvgfEaumca4ttgbO/rYq4G 74nZimGNUP214EHZn/sZwI8GcNE89bvvFY6JbG/IyP4HhXpa8jdAl59TfTHp jeARGTxPExjj7NaVEpuv8lV/KxivMf6Y61tQX57Lx/XaoUex0CjrHdAzwc8v 50vIb4O+H0Nw/lMv34v7PYdelQg4rTriF9BX8F47ZeR/BU7hnj84vx/58ntd 4ny7V6yjmt5yQ/wHJtOQyw== "]}; Typeset`initDone$$ = True), SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], TraditionalForm], Manipulate`InterpretManipulate[1]], TraditionalForm]], "Output", CellChangeTimes->{{3.526626750979999*^9, 3.5266267773404408`*^9}, 3.526626825760519*^9, 3.5266269049050694`*^9, 3.526626980921256*^9, 3.526627159547171*^9, 3.52662722453823*^9, 3.526627336679949*^9, { 3.526627374488617*^9, 3.526627387783504*^9}, {3.526627613844211*^9, 3.5266276239532146`*^9}, 3.526627734093885*^9, {3.526627852392448*^9, 3.526627857350586*^9}, 3.526628002898325*^9, {3.52662809309848*^9, 3.526628098412044*^9}, {3.5266281466796227`*^9, 3.526628163862658*^9}}] }, Open ]] }, Open ]] }, Open ]] }, Open ]] }, WindowSize->{787, 842}, WindowMargins->{{77, Automatic}, {Automatic, 0}}, FrontEndVersion->"8.0 for Mac OS X x86 (32-bit, 64-bit Kernel) (February 23, \ 2011)", StyleDefinitions->"Default.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[1257, 32, 178, 4, 76, "Title"], Cell[CellGroupData[{ Cell[1460, 40, 132, 3, 67, "Section"], Cell[1595, 45, 339, 8, 73, "Input"], Cell[1937, 55, 104, 1, 26, "Text"], Cell[CellGroupData[{ Cell[2066, 60, 520, 12, 33, "Input"], Cell[2589, 74, 3607, 68, 70, "Output"] }, Open ]], Cell[6211, 145, 154, 3, 26, "Text"], Cell[6368, 150, 570, 18, 27, "Input"], Cell[CellGroupData[{ Cell[6963, 172, 130, 2, 27, "Input"], Cell[7096, 176, 994, 25, 70, "Output"] }, Open ]], Cell[8105, 204, 134, 1, 26, "Text"], Cell[8242, 207, 339, 8, 43, "Input"], Cell[CellGroupData[{ Cell[8606, 219, 132, 2, 27, "Input"], Cell[8741, 223, 1562, 31, 70, "Output"] }, Open ]], Cell[10318, 257, 185, 4, 26, "Text"], Cell[10506, 263, 1957, 56, 88, "Input"], Cell[12466, 321, 2059, 57, 88, "Input"], Cell[CellGroupData[{ Cell[14550, 382, 424, 12, 27, "Input"], Cell[14977, 396, 63657, 1050, 70, "Output"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[78683, 1452, 150, 2, 37, "Section"], Cell[78836, 1456, 269, 7, 27, "Input"], Cell[CellGroupData[{ Cell[79130, 1467, 131, 2, 27, "Input"], Cell[79264, 1471, 264, 6, 70, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[79565, 1482, 145, 3, 27, "Input"], Cell[79713, 1487, 460, 9, 70, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[80210, 1501, 181, 4, 27, "Input"], Cell[80394, 1507, 874, 27, 70, "Output"] }, Open ]], Cell[81283, 1537, 222, 6, 27, "Input"], Cell[81508, 1545, 223, 6, 27, "Input"], Cell[CellGroupData[{ Cell[81756, 1555, 131, 2, 27, "Input"], Cell[81890, 1559, 1458, 32, 70, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[83385, 1596, 131, 2, 27, "Input"], Cell[83519, 1600, 1595, 36, 70, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[85151, 1641, 971, 24, 88, "Input"], Cell[86125, 1667, 10832, 187, 70, "Output"] }, Open ]], Cell[96972, 1857, 120, 1, 26, "Text"], Cell[97095, 1860, 885, 27, 46, "Input"], Cell[CellGroupData[{ Cell[98005, 1891, 184, 4, 33, "Input"], Cell[98192, 1897, 312, 6, 70, "Output"] }, Open ]], Cell[98519, 1906, 987, 29, 46, "Input"], Cell[CellGroupData[{ Cell[99531, 1939, 183, 4, 33, "Input"], Cell[99717, 1945, 308, 6, 70, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[100062, 1956, 1574, 41, 123, "Input"], Cell[101639, 1999, 4595, 85, 70, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[106271, 2089, 528, 15, 33, "Input"], Cell[106802, 2106, 2220, 46, 70, "Output"] }, Open ]], Cell[109037, 2155, 752, 23, 33, "Input"], Cell[CellGroupData[{ Cell[109814, 2182, 323, 7, 27, "Input"], Cell[110140, 2191, 1365, 29, 70, "Output"] }, Open ]], Cell[111520, 2223, 92, 1, 27, "Input"] }, Closed]], Cell[CellGroupData[{ Cell[111649, 2229, 102, 1, 37, "Section"], Cell[CellGroupData[{ Cell[111776, 2234, 103, 1, 34, "Subsection"], Cell[111882, 2237, 1287, 37, 86, "Text"], Cell[CellGroupData[{ Cell[113194, 2278, 896, 25, 27, "Input"], Cell[114093, 2305, 834, 24, 70, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[114964, 2334, 894, 25, 27, "Input"], Cell[115861, 2361, 824, 25, 70, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[116722, 2391, 2033, 52, 73, "Input"], Cell[118758, 2445, 2233, 56, 70, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[121028, 2506, 585, 17, 27, "Input"], Cell[121616, 2525, 11578, 198, 70, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[133231, 2728, 780, 22, 43, "Input"], Cell[134014, 2752, 4087, 76, 70, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[138138, 2833, 1293, 33, 58, "Input"], Cell[139434, 2868, 20573, 346, 70, "Output"] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[160056, 3220, 98, 1, 26, "Subsection"], Cell[CellGroupData[{ Cell[160179, 3225, 7548, 159, 313, "Input"], Cell[167730, 3386, 15751, 277, 500, "Output"] }, Open ]] }, Open ]] }, Open ]] }, Open ]] } ] *) (* End of internal cache information *) (* NotebookSignature tx0SmfNbb7S6ID1ZbeUXjhgm *)