(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 12.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 65444, 1297] NotebookOptionsPosition[ 64925, 1279] NotebookOutlinePosition[ 65355, 1296] CellTagsIndexPosition[ 65312, 1293] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"valcova", " ", "stena"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Clear", "[", RowBox[{ "\[Lambda]", ",", "d", ",", "\[Alpha]1", ",", "\[Alpha]2", ",", "to1", ",", "to2", ",", "t1", ",", "t2", ",", "u", ",", "t", ",", "r", ",", "r1", ",", "r2", ",", "vs"}], "]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"vs", "=", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3", ",", "4"}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"vsp", "=", RowBox[{"{", RowBox[{"vstt", ",", "vsta", ",", "vsat", ",", "vsaa"}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "=", RowBox[{ RowBox[{"-", "\[Lambda]"}], " ", RowBox[{"Grad", "[", RowBox[{ RowBox[{"u", "[", "r", "]"}], ",", RowBox[{"{", RowBox[{"r", ",", "\[Theta]", ",", "z"}], "}"}]}], "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"vs", "[", RowBox[{"[", "1", "]"}], "]"}], "=", RowBox[{"DSolve", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"u", "[", "r1", "]"}], "\[Equal]", "t1"}], ",", RowBox[{ RowBox[{"Div", "[", RowBox[{"q", ",", RowBox[{"{", RowBox[{"r", ",", "\[Theta]", ",", "z"}], "}"}], ",", "\"\\""}], "]"}], "\[Equal]", "0"}], ",", RowBox[{ RowBox[{"u", "[", "r2", "]"}], "\[Equal]", "t2"}]}], "}"}], ",", RowBox[{"u", "[", "r", "]"}], ",", "r"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"vs", "[", RowBox[{"[", "2", "]"}], "]"}], "=", RowBox[{"DSolve", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"u", "[", "r1", "]"}], "\[Equal]", "t1"}], ",", RowBox[{ RowBox[{"Div", "[", RowBox[{"q", ",", RowBox[{"{", RowBox[{"r", ",", "\[Theta]", ",", "z"}], "}"}], ",", "\"\\""}], "]"}], "\[Equal]", "0"}], ",", RowBox[{ RowBox[{ RowBox[{"-", "\[Lambda]"}], " ", RowBox[{ RowBox[{"u", "'"}], "[", "r2", "]"}]}], "\[Equal]", RowBox[{"\[Alpha]2", RowBox[{"(", RowBox[{ RowBox[{"u", "[", "r2", "]"}], "-", "to2"}], ")"}]}]}]}], "}"}], ",", RowBox[{"u", "[", "r", "]"}], ",", "r"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"vs", "[", RowBox[{"[", "3", "]"}], "]"}], "=", RowBox[{"DSolve", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "\[Lambda]"}], " ", RowBox[{ RowBox[{"u", "'"}], "[", "r1", "]"}]}], "\[Equal]", RowBox[{"\[Alpha]1", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"u", "[", "r1", "]"}]}], "+", "to1"}], ")"}]}]}], ",", RowBox[{ RowBox[{"Div", "[", RowBox[{"q", ",", RowBox[{"{", RowBox[{"r", ",", "\[Theta]", ",", "z"}], "}"}], ",", "\"\\""}], "]"}], "\[Equal]", "0"}], ",", RowBox[{ RowBox[{"u", "[", "r2", "]"}], "\[Equal]", "t2"}]}], "}"}], ",", RowBox[{"u", "[", "r", "]"}], ",", "r"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"vs", "[", RowBox[{"[", "4", "]"}], "]"}], "=", RowBox[{"DSolve", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "\[Lambda]"}], " ", RowBox[{ RowBox[{"u", "'"}], "[", "r1", "]"}]}], "\[Equal]", RowBox[{"\[Alpha]1", " ", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"u", "[", "r1", "]"}]}], "+", "to1"}], ")"}]}]}], ",", RowBox[{ RowBox[{"Div", "[", RowBox[{"q", ",", RowBox[{"{", RowBox[{"r", ",", "\[Theta]", ",", "z"}], "}"}], ",", "\"\\""}], "]"}], "\[Equal]", "0"}], ",", RowBox[{ RowBox[{ RowBox[{"-", "\[Lambda]"}], " ", RowBox[{ RowBox[{"u", "'"}], "[", "r2", "]"}]}], "\[Equal]", RowBox[{"\[Alpha]2", " ", RowBox[{"(", RowBox[{ RowBox[{"u", "[", "r2", "]"}], "-", "to2"}], ")"}]}]}]}], "}"}], ",", RowBox[{"u", "[", "r", "]"}], ",", "r"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"vs", ";"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ FractionBox[ RowBox[{ RowBox[{"t1", " ", RowBox[{"Log", "[", "r", "]"}]}], "-", RowBox[{"t2", " ", RowBox[{"Log", "[", "r", "]"}]}], "+", RowBox[{"t2", " ", RowBox[{"Log", "[", "r1", "]"}]}], "-", RowBox[{"t1", " ", RowBox[{"Log", "[", "r2", "]"}]}]}], RowBox[{ RowBox[{"Log", "[", "r1", "]"}], "-", RowBox[{"Log", "[", "r2", "]"}]}]], ",", FractionBox[ RowBox[{ RowBox[{ RowBox[{"-", "t1"}], " ", "\[Lambda]"}], "+", RowBox[{"r2", " ", "t1", " ", "\[Alpha]2", " ", RowBox[{"Log", "[", "r", "]"}]}], "-", RowBox[{"r2", " ", "to2", " ", "\[Alpha]2", " ", RowBox[{"Log", "[", "r", "]"}]}], "+", RowBox[{"r2", " ", "to2", " ", "\[Alpha]2", " ", RowBox[{"Log", "[", "r1", "]"}]}], "-", RowBox[{"r2", " ", "t1", " ", "\[Alpha]2", " ", RowBox[{"Log", "[", "r2", "]"}]}]}], RowBox[{ RowBox[{"-", "\[Lambda]"}], "+", RowBox[{"r2", " ", "\[Alpha]2", " ", RowBox[{"Log", "[", "r1", "]"}]}], "-", RowBox[{"r2", " ", "\[Alpha]2", " ", RowBox[{"Log", "[", "r2", "]"}]}]}]], ",", FractionBox[ RowBox[{ RowBox[{ RowBox[{"-", "t2"}], " ", "\[Lambda]"}], "-", RowBox[{"r1", " ", "t2", " ", "\[Alpha]1", " ", RowBox[{"Log", "[", "r", "]"}]}], "+", RowBox[{"r1", " ", "to1", " ", "\[Alpha]1", " ", RowBox[{"Log", "[", "r", "]"}]}], "+", RowBox[{"r1", " ", "t2", " ", "\[Alpha]1", " ", RowBox[{"Log", "[", "r1", "]"}]}], "-", RowBox[{"r1", " ", "to1", " ", "\[Alpha]1", " ", RowBox[{"Log", "[", "r2", "]"}]}]}], RowBox[{ RowBox[{"-", "\[Lambda]"}], "+", RowBox[{"r1", " ", "\[Alpha]1", " ", RowBox[{"Log", "[", "r1", "]"}]}], "-", RowBox[{"r1", " ", "\[Alpha]1", " ", RowBox[{"Log", "[", "r2", "]"}]}]}]], ",", FractionBox[ RowBox[{ RowBox[{ RowBox[{"-", "r1"}], " ", "to1", " ", "\[Alpha]1", " ", "\[Lambda]"}], "-", RowBox[{"r2", " ", "to2", " ", "\[Alpha]2", " ", "\[Lambda]"}], "+", RowBox[{ "r1", " ", "r2", " ", "to1", " ", "\[Alpha]1", " ", "\[Alpha]2", " ", RowBox[{"Log", "[", "r", "]"}]}], "-", RowBox[{ "r1", " ", "r2", " ", "to2", " ", "\[Alpha]1", " ", "\[Alpha]2", " ", RowBox[{"Log", "[", "r", "]"}]}], "+", RowBox[{ "r1", " ", "r2", " ", "to2", " ", "\[Alpha]1", " ", "\[Alpha]2", " ", RowBox[{"Log", "[", "r1", "]"}]}], "-", RowBox[{ "r1", " ", "r2", " ", "to1", " ", "\[Alpha]1", " ", "\[Alpha]2", " ", RowBox[{"Log", "[", "r2", "]"}]}]}], RowBox[{ RowBox[{ RowBox[{"-", "r1"}], " ", "\[Alpha]1", " ", "\[Lambda]"}], "-", RowBox[{"r2", " ", "\[Alpha]2", " ", "\[Lambda]"}], "+", RowBox[{"r1", " ", "r2", " ", "\[Alpha]1", " ", "\[Alpha]2", " ", RowBox[{"Log", "[", "r1", "]"}]}], "-", RowBox[{"r1", " ", "r2", " ", "\[Alpha]1", " ", "\[Alpha]2", " ", RowBox[{"Log", "[", "r2", "]"}]}]}]]}], "}"}], ",", RowBox[{"{", RowBox[{"r", ",", "r1", ",", RowBox[{"r1", "+", "d"}]}], "}"}], RowBox[{"(*", RowBox[{"PlotLabels", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}]}], "*)"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\"\\"", ",", "\"\<\>\""}], "}"}], ",", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}], "}"}]}], ",", RowBox[{"PlotLegends", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"r1", ",", "0.1"}], "}"}], ",", "0.01", ",", "10", ",", "Slider", ",", " ", RowBox[{"Appearance", "\[Rule]", "\"\\""}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"d", ",", "0.1"}], "}"}], ",", "0.01", ",", "10"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"to1", ",", "30"}], "}"}], ",", "10", ",", "1500"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"t1", ",", "50"}], "}"}], ",", "10", ",", "1500"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Alpha]1", ",", "10", ",", "500"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Lambda]", ",", "10", ",", "500"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Alpha]2", ",", "10", ",", "500"}], "}"}], ",", RowBox[{"{", RowBox[{"t2", ",", "10", ",", "500"}], "}"}], ",", RowBox[{"{", RowBox[{"to2", ",", "10", ",", "500"}], "}"}]}], "]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"r1", "=", "0.1"}], ";", RowBox[{"r2", "=", RowBox[{"r1", "+", "d"}]}], ";", RowBox[{"d", "=", "0.2"}], ";", RowBox[{"to1", "=", "700"}], ";", RowBox[{"t1", "=", "700"}], ";", RowBox[{"\[Alpha]1", "=", "50"}], ";", RowBox[{"\[Lambda]", "=", "100"}], ";", RowBox[{"\[Alpha]2", "=", "20"}], ";", RowBox[{"t2", "=", "20"}], ";", RowBox[{"to2", "=", "20"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"u", "[", "r", "]"}], "/.", RowBox[{"vs", "[", RowBox[{"[", "1", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"u", "[", "r", "]"}], "/.", RowBox[{"vs", "[", RowBox[{"[", "2", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"u", "[", "r", "]"}], "/.", RowBox[{"vs", "[", RowBox[{"[", "3", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"u", "[", "r", "]"}], "/.", RowBox[{"vs", "[", RowBox[{"[", "4", "]"}], "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{"r", ",", "r1", ",", "r2"}], "}"}], ",", RowBox[{"PlotLabels", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\"\\"", ",", "\"\<\>\""}], "}"}], ",", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}], "}"}]}], ",", RowBox[{"PlotLegends", "\[Rule]", "\"\\""}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{ RowBox[{"u", "[", "r", "]"}], "/.", RowBox[{"vs", "[", RowBox[{"[", "i", "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"r", ",", "r1", ",", "r2"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\"\\"", ",", "\"\<\>\""}], "}"}], ",", RowBox[{"{", RowBox[{"\"\\"", ",", RowBox[{"vsp", "[", RowBox[{"[", "i", "]"}], "]"}]}], "}"}]}], "}"}]}], ",", RowBox[{"PlotLegends", "\[Rule]", "\"\\""}], ",", " ", RowBox[{"ImageSize", "\[Rule]", RowBox[{"Scaled", "[", "0.2", "]"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "4"}], "}"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ GraphicsBox[{InsetBox[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJzsvdtyXMeWrtdh3/jSr+C38K0vfbsdfoC9w+0dvmk7ejvC4Qg/2AYJgSDF gyiJFEWREg/iSWQdABQKVQXUcWaO8phFLUkLAoECUFX/zJzfF1+v6F4t8ZBz jJEDc+bhf/hP/+d/+N//m3/5l3/5L/+d/8d/+I//z//07//+H//f/+W/9//j f/23//J//Od/+9f/7X/+t//7X//zv/77//if/lv/L/8v/4//z/+n/N/nAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAJA/No8zK0Y269vk0MZ7NmzGk9/i8dvYfx17L+LR89B9Gg5/CJ1H 4eDbsP9N2Lsf2ndD+07R2i2aO0Xzq6KxXTRuFo0bxaethf/1Ly7+G/9/lf/A dvkP+7/S2vV/vfxF/JfyX9B/Wf/F/bfoPvXfrvxN/bf2P8DJb/6HKf9I/gfz P14x8j9q+QcGAAAAgAph8zCx2cAmnbKTPH5f9nLeQx4+CQfflf1e63bZB/5T i1h5G9v+xy7/8P5XOHxS9qhlg/q+7E79rzkb+F+ZvhQAAABgxVgs31JOuzZq lV1l72X5WrJsKe+WbxTlLaLE5o7/9ctB6D71ASk70lGrHKJi5MOlfmAAAAAA 1SaMbNK1YSMO3pSvKzuPwt69+jaWV29H7/nQlS9IB298MH1IfWDVjxYAAABA QRjb5DAOP8X+68V7y4fl4kl5w5axrV0f5PK9aP+1D7sPvj8CdRAAAAAArBIr hjY+iCcfYu+X8u1l++uisbX2LgvPt7HlD6J8I9r7xR+NPyB/TOpIAQAAAFia OC3fYZ58jL0Xv3eYp/d6YzX9owt94Y+vfBcap+pgAgAAAPidxWvM/fLwn+5P Yf+bopnaVnH8ks1tf6D+WP3h+iPmRSgAAABsEgujsskcvC2XYu7dXxxcqe6O cAM2bpSHOHWf+qMvW1C2JgEAAMBqibPF5/IP8ehZ+SYzuUMvcR02Fm9Bj56V y0HLD/EzdZgCAABAelhxUh6J2X8VOo/YVI4X29ot14L2X5WHhRYn6vgFAACA 6mKzQXl+0dHPi5eZN/VtDCZq4+biFejP5blMs4E6rgEAAECPzfrlHvOj52H/ ARvMcQ1ueWiVZ9SffPRgU8c7AAAAbI5/vM/83GfKexKskb/3n7z/BAAAyJUw tlG7PDPz4CE7zVFv44aHogekhyWXIgEAAKSNxXK/+eBt6DwuWrf0bQbimbZu eYiWRzBNDj1o1WkDAAAAS1Ee0j5slJ/O9+7p2wnEy+hB66HrAcwR9AAAANXE pkfx+F35SrO5I+8cEK9rc6d8+Xn8zgNbnVsAAAC1x4rySqD+q7D/kF3nmKlb Ht7lyZ/jfQ94dcoBAADUiTApD2w/+pmv51grF1/ef/bg9xRQJyEAAEC+hNFi oeaz0P5aPvsjCvUU8ETwdJhz7TsAAMCKsDCKw0+h+zS0bsvnesRK6UnhqVEe +EnzCQAAcDXCuHyr2f2poNVEvNDWbU+WxZtPTvsEAABYgjhdrNV8Htp39PM4 Ymp64pSnLY1ankrqZAYAAKgeFsod6L1f2BaEuBLLDUe9Xxa73YM6vQEAAPSU 52oOfg3738jnaMQs9eTyFOOcTwAAqCdWnMSTD+UR7o2b8kkZMX8bN8tD5k8+ eOqpsx8AAGD9WGGjdjx6xs4gRI2t2+U5S6M2J8wDAECW2LTHN3TE6viPb+49 dW0AAABYBXFqw0Y4/LFofiWfZBHxtM2vPD3LQ5bY5w4AAGlSbg7qvw579/Wz KiJepKeqJyxbjQAAIBliYcPm4sXmtnwaRcTL2dxevPZseiKrSwkAAMDZ2GwQ B29YsYmYgYvVnm88qdV1BQAA4E/K49yPnhetXflEiYirtLVb3mo03lfXGAAA qDdxGk8+lmdsymdGRFyni7M9P7LPCAAANsw/PqM/kE+FiLgxPeX54A4AAJvB Joflreic6I5YVz39y5vcJ4fqagQAAFliNmqH7tOiwW50RPyvXgq8IJT3Gc1N XZ0AACAL4iwOP7FoExHPtFzqOfzkhUJdqgAAIFnCOB6/Dwffyic1RKy4Xii8 XHjRUJctAABICStO4uAtW4QQ8VIuNhm99QKirmEAAFB1yg3p5YWVd+WTFyIm qheQ8hpNtrcDAMBZ2Kwf+69C+458wkLEDPRi4iXFC4u6tgEAQFWwaS/2XnL8 ESKu3MXBSi+9yKjrHAAAKFl0my8Kuk1EXKtl5/mCzhMAoIbYtB97L7khHRE3 Z2t38c6Tr+0AALVgsW7zZWjzbhMRBXrx8RLEOk8AgIyx2XG5J51dQoiodrHD 6LUXJXVdBACAVWLFMA7ecAISIlbK8lSlwRsvUOoaCQAA1yZMyruEON0dEatq eZJ8eYfRRF0uAQDgSliIJx+5uRIRk7C8PfPkoxcudekEAIBLYKNW6DyWTyKI iJfSC5eXL3UFBQCAi7FJJ3SfFp+25HMHIuKV3PIi5qVMXU0BAOBsFge8/1I0 d9TzBSLitW3ueEHjGHkAgGoRxuW29PbX+mkCEXF1elnz4uYlTl1kAQBqj8Vy o9D+Q/nUgIi4Jr3ELbYXRXXBBQCoKTbeD4dP5NMBIuIG9HLnRU9ddwEA6kV5 f2W5dHNbPgsgIm7O5na5yJN7MwEANkCcxuO33CiEiLW1vL3o+K0XQ3U5BgDI lsWpm9/LCz4iolwvhpzkCQCwcspzkI6eF42b8jqPiFgVGze9MHKeEgDAavj8 Mb3Nx3RExDP08sindgCAa2Kjdug8kpd0RMSK66XSC6a6ZgMApIfNjmPvRdH8 Sl7JERHTsPmVl00vnur6DQCQChZPfgv7D/QFHBExNb14egn1Qqqu5AAAlcam 3dB9Ki/aiIhJ64XUy6m6ogMAVJI4W+wV4s50RMQVWN7VXu4tmqmLOwBAhVjc YvmDvEQjImaml1ZuzAQAKAnj2H9dtG7JKzMiYp62bnmZ9WKrLvcAADJsvMdR SIiIG7A8TGm8p676AAAbJ4xi/1XR3JHXYUTEutjc8cLr5Vc9AQAAbIjF602u TUdEFFhe1M4LTwDIns+rN3m9iYgotHzhyQpPAMiWcnM6qzcREavhYoUnW9oB IC/iLA7eFK1deY1FRMQ/be16ceYMTwDIA5schsMn+tKKiIhn6SXaC7V6rgAA uA4Wjz9wtRAiYsVdXFr0gVvaASBFbDaIR8/khRQREZfUi7aXbvXsAQBwCWzY DPvfyOsnIiJeSi/dXsDVcwgAwBKEyeKw92155URExKvY3F4cHT9RTycAAF9k sV3oB33BRETE6+nFnI1FAFBN4gnbhRAR87HcWHTyQT23AAD8iRXD2PtZXh4R EXHlenn3Iq+eZwAAPt8uxOXpiIjZuriinRuLAECIxeP3oX1HXg8REXGteqn3 gs8BngCwecrv6Ud8T0dErJFe9vnODgCbxMYHofNIXv0QEXHDevH3KUA9CwFA LWB/OiJinWU/OwCsnTCJvZdFY0te8RARUWljy6cDzo0HgHVg06Nw+ERf6BAR sRr6pOBTg3p2AoCssFEz7D+Q1zdERKyUPjX4BKGeowAgC8zi8duidUte2RAR sYq2bvk04ZOFeroCgISxYsSBSIiIeKGLY5RG6lkLAJLEpt3QeSyvY4iImIQ+ ZfjEoZ67ACAxFgs478srGCIiJqRPHCzvBIDlicfvi9auvHYhImJ6tnYXt2QC AJxLnJYncH7iBE5ERLyyi9M741Q9pQFARbHZIHSfqisVIiLmoE8oPq2oZzYA qBw26YSD7+Q1ChERs9GnFZ9c1PMbAFQIGzbD3j15dUJExMz0ycWnGPUsBwCV gB1DiIi4RtlVBACxiP1X7BhCRMQ1u+XTjU866mkPAARYGMWj5+oqhIiIddEn HZ961LMfAGwUm/bD4RN5/UFExFrpU49PQOo5EAA2BFvUERFRJZvZAWqCjVph j0stERFRpk9DPhmp50MAWCPx5GNo35FXG0RErLk+GfmUpJ4VAWAtxON3RXNH XmcQERFLmzs+MannRgBYKRZj/3XRuKGvMIiIiH/YuOHTk09S6mkSAFZBnMbe C31hQUREPEufpHyqUk+WAHAtFodwPpPXE0RExHP0qYqjOwHSxYrj0P1RXkkQ EREv1Ccsn7bUMycAXJry1PfOY3kNQUREXFKftjgxHiAtbNLl1HdEREzOxYnx XfUsCgBLUV4ztP9QXjcQERGvoE9hXFQEUH1svB/2H8grBiIi4pX1icynM/WM CgBfxEbtsHdPXisQERGvqU9nPqmp51UAOAMbNUP7rrxKICIirkSf1HxqU8+u APBP2LDBReqIiJiZPrX5BKeeYwHgd+LwU2jdllcGRETElesTnE9z6pkWALzh /Fi0duU1ARERcV22dn2yU8+3ALUmntBwIiJiDfS284S2E0BDPPmtaN3S1wFE RMQN2LrlE5967gWoHTSciIhYO2k7ATYLDSciItZU2k6ATbFYw0nDiYiIdbVs O1nbCbBe2KWOiIjITnaAtRKHn2g4ERERS8u2k3M7AVZPedMQB78jIiL+Q58W uaUIYLUs7lLnaktERMR/srwckzvZAVaEjdqhfVee14iIiBXUp0ifKNVzNUDy 2Hg/7N2TZzQiImJl9YnSp0v1jA2QMDbphP0H8lxGRESsuD5d+qSpnrcBksQm 3bD/UJ7FiIiISeiTpk+d6tkbIDFs2g8H38nzFxERMSF96vQJVD2HAySDFceh 81ieuYiIiMnpE6hPo+qZHCABLIxC90d5ziIiIiaqT6M+marnc4BqE6fx6Jk8 WxEREZPWJ1OfUtWTOkBVsRh7L+R5ioiImIE+pfrEqp7aAapI7L+WZygiImI2 +sSqntsBKkc8flc0bsjTExERMR8bN3x6Vc/wABUinnwsmjv63ERERMzM5o5P sup5HqAS2KgV2nf0WYmIiJijPsn6VKue7QHElLdb7t2X5yMiImLG+lTLzZhQ Z7hsCBERcTNyRRHUlvLs98Mn8hxERESsiT7tclY81I5YxKPn8uxDRESslT75 +hSsbgIANkfsv5LnHSIiYg31KVjdBQBsiHj8vvi0JU86RETEWrrlE7G6FwBY OzZsFq1ddbohIiLW2NauT8fqjgBgjSxORrqnzzVERMR669MxpydBrthswMlI iIiIFbE8PWk2UHcHAKsmTkP3qTy/EBER8Q99avYJWt0iAKyS2HspzyxEREQ8 pU/Q6h4BYGWwUR0REbGqso0dMsFGbFRHRESssK1dn6zV/QLAtbBpN+zf12cT IiIiflmfrH3KVncNAFfEilHoPJbnESIiIl6oT9k+cat7B4DLYxaPfpZnECIi Ii6pT9w+fasbCIDLEY/fynMHERERL6VP3+oOAuASLPYN3ZInDiIiIl7O1i32 E0Eq2PQo7D/QZw0iIiJeXp/EfSpXdxMAFxEm4fCJPF8QERHxyvpU7hO6uqUA OA/uG0JERMxA7ieCKhNPPhQN7htCRERM38aWT+vqzgLgDGx8ENpf63MEERER V6FP6z65q/sLgH/CimHoPJJnByIiIq5Qn9x9ild3GQB/wPHviIiIeVoeFD/n oHioBPH4vTwjEBERcU36RK/uNQDmNt4P7TvydEBERMQ16RO9T/fqjgNqzWIZ 5/fyXEBERMS16tM9CztBSOyxjBMREbEW+qSv7jugppSncarjHxERETcmJ3bC 5rHJIadxIiIi1sryxM7JoboHgTpRXqr+gzzyERERccN6A8BV7LAxYv+VPOYR ERFRorcB6k4EaoENm0VzWx7wiIiIqLG57c2Auh+BzLHZIOx/o492RERE1OnN gLcE6q4EMsbi0TN5nCMiIqJcbwm4ExPWRDzmcCRERET8XW8M1L0JZAiHIyEi IuJf5egkWD1xFg6fyGMbERERK6W3B94kqNsUyIc4eCOPakRERKyg3iSo+xTI BBvvF61deUgjIiJiFW3tequg7lYgfcI4dB7p4xkRERGrqrcK3jCoWxZIm9h/ LY9kRERErLjeMKh7FkgYG+8VzR15GCMiImLVbe5426DuXCBNwih0vtfHMCIi Iqagtw3ePKjbF0iP2H8lj15EXIGtW+HgYeg+9aSOJx9s1LJJx6Y9K47L2SFO 57GYW5hbXFwpsuStIot/0v8V/xf9X/dfJIz8Fyx/Wf/FRy3/jfy389/Uf2v/ A+gHARE3oif+ersTyA6+qiMmpjeWnUex/zIOP5ZdXzGYh0nZEFblZjor/zBh 4n8w/+P5H9L/qOX+RNpRxMzkCztcCvaqI1bZ5nboPI6DX23Utln/H71lsnzu RWd9/+v4X8r/av4X1A8yIl5V9rDD8rBXHbFShoNv4+C1jffKr+HlfR8VeXW5 Psz/muWX+vGe/8X9ry9/BIh4KdnDDsuwOAGer12ISsuv5MfvbNIp11uWyyxr jw9CGJUf5Y/f8RUGMQFbtzglHi6gvFf9B32sItbM0L4b+y8XbzKHaX8o3wwW fKDKt6D9lz508seHiH/X2wnuYYdziMdv5VGKWBPD/oM4eGPTw3LTd/6fy9eH +QD6MPpg+pDKHysi/qE3Fer6ABXFpt3Q/loeoogZW77PHLy2CX3mmlj0n5PD chUo7z8R1XpT4a2FuixABbHQfSqPT8Qc3YpHz2zcXhyVTJ+5MaxcAjpu++D7 I1DHAGJN9daCugeniCe/ySMTMSfD3r14/NZmPdZn6rHgD8Ifhz8UeWAg1k1v MNQlACqEzY5ZB4W4EsPBdzb8ZMXJ3PjRvnqY+aPxB+SPSR4qiDXRGwxvM9TJ D1Uh9l7IYxIxaUPnkY2afD1Ph8WX91GTk5cQN6C3GeqUh0pgo3bR/EoekIgp Gjrf02omzh/N5/fycELM1uZX3myokx3UxCk/5iNe1rB3P578Vp6lSauZD+YP 1B+rP1x5gCHmZ3khZnleB9QXDuREvISNm+VJR7M+dwPljEV/xP6g/XHrQw4x Izmus87YtMcRdojLGA6flPe4cadGrYgzf+j+6OXhh5iH3nJ446FObNAQj57L IxCx0rZuxeP35SZ0vqHXl3Kru4eBB4M+IBET1xsPdUaDABu1+HKE+CXD4Q82 OZhboc5UqAxWeEh4YMiDEzFhGze9/VAnM2yWcusQmzQRzzD2X1sx4HRNOJvy hM+BB4k8UBET1dsPNhPVCrYOIZ4ytO/E4cd5mKizExIhTDxgPGzkoYuYnGwm qg8264c9tg4h/m55c9B4j8/ocBWs8ODhViPES+lNSHkACNSA2PtFHm+IVTB0 f7Rpl4OP4LpY9EDycJKHNGIqeiuizltYOzbeL5rb8mBD1BqPnnPMJqyYzwd7 ch4I4jI2t8sD6CBjLHLWHNZc/+HaZmwRgrVh5gHG5yTEC/WGhB/8MyaefJTH GKLK2HvBhnTYEJ+3t/deyMMescp6W6LOVVgPYRz2H8oDDHHz8m4TNPDOE/Fc vS3x5kSdqLB64uCNPLoQN2w8+ol1myDm93WeP8nTAbGCenOiTlFYMYur1b+W hxbixiwvEmJPOlSHz3vbucYI8Z/15oRL2DODjztYH8P+Axsf0G1CFfHOc3zg ISpPE8TqyLlJOWGTTtHckQcV4tpt7tiwMY+c7g7VJhYeqJRlxN/10j3pqNMS VkPoPtVHFOKaLRcFcXMlJESYsMwe8bPeqKgTElaAjVrFpy15OCGuz9j9qdyW PmdbOiTHYmN7l+1FiFverqjzEa6HhdB5rA4kxHUZ9u7ZhKWbkDgWPYw9mOUJ hSjU2xVvWtTZCFeHQ+AxY+PJ+3mcqZMMYEXEmYe0PK0QhXJEfMKESTj4Vh5C iCu3/Jhe8DEd8mNxexGf2rGuetPCsvxEicf8yIzZ2bpl4zbfXyBnLHiQe6jr 0w1x43rros5AuDRWDDkCDjMz9l/Ow0idWwAbIYw84OVJh7hhywOWi6E6/eBy cAQH5uRir1CHvUJQL8q9RR32FmHd5DbMtLDZcdi7Kw8bxJUYB7/O41SdVQAi 4tRTQJ6GiBvTGxhvY9SJB8sS+6/lMYN4fRevNw95vQl1p3zhecgLT6yP3sao sw6Wwmb90L4jDxjEaxr7r9jACPAnYeJJIU9MxA3obYw3M+qUg4th2Tkmb2vX xgdsTgc4Tbml/cATRJ+kiGu23DQK1cam/dC+LQ8VxCsbj55bYNMiwBfxBPE0 kacq4lr1ZsZbGnW2wXnEHi85MWFt2OD1JsDFWPBkkScs4lr1lkadafBFbNrj mwsmajh4aLMeVwsBLI15ynjiyJMXcV22dr2xUScanE3svdBHCOLlLbcochoS wBWIUw4qwYz1xkadY3AGi5ecrOTE5NyyEXdZAlwDC55EnkrqXEZcg63bvOqs IKzkxOQMB99yGgbASihPyTv4Vp7UiCuXVZ1Vo6w2vOTEpCy/mPA9HWCFxCkr rDA/vb3h7USl4KBgTEsbfuJ7OsDqKfezf5InOOJqLa8IgWpgswEXD2Eylotz DufG/nSA9WDmKcbyfszJxbVEA3VqQQmbFjEVQ+exFSfqjAHIH080Tzd5yiOu Sm5grwJlYdm7Kw8GxAstLzJjASfAxiiPUWJvKWaitzq8spATB2/lkYB4ofHk NxZwAmwaC5568vRHXIne8Kgzqt6Ecdh/IA8DxPO18d7cojpbAGqJRU9AeRFA vL7e8Hjbo86o+hKP38tjAPEcy4Xf0yN1ogDUHU9DtppiBnrbo06muhJnnACM VTYcfMfyG4CKUC7+P/hOXhYQr6O3Pd78qJOpjkQOYcMKG7s/zcNEnSUA8BfC xBNTXhwQr6M3P+pEqiHGORhYWRdb1PlRFKB6xBmb2TFpvfnxFkidSPXCRm35 c0c803j8bm6FOkUA4AtY4UkqLxSIV9ZbIHUW1YvQfSp/6Ih/Nw4/ciYSQNWx 4KkqLxeIV9NbIHUK1QibHBaNbflDRzyljVo0nABpYMETVl40EK9iY9sbIXUK 1YXY+0X/xBH/WQ7hBEgMju7EZPVGSJ0/tcBmg9C6LX/ciH9xyyYdFnUDJIh5 8noKq2sI4uX0RsjbIXX65E8cvJE/a8Q/bWzbtKtOCwC4Op7CrNfC5PR2SJ06 uROnXHaJFbL5FdcMAWSAJ7Kns76kIC5teRVmnKpTJ2fiCTsNsTK2btFwAmRD 2Xa2bukLC+LSelOkzpuc4Rx4rIrecM566oQAgFXiSU3biQm5OB8e1oKN9+XP F7GUhhMgU2g7MS29NVInTZ7Eo+fyh4vIGk6AvGFtJyakt0bqjMkQmw2K1q78 4WLdLXep03ACZE7ZdrKTHZOwtcuhSSuHI5KwAm5xLBJATSgPUOLcTkxBDk1a MbEI+9/IHyvW3MXB7wBQFxbHxesrD+L5eoPkbZI6XfLBhk35M8WaW15tyU1D APXCuBwTk9DbJHWy5EM4/FH+QLHO2qjFXeoAdcSip7+8BCGer7dJ6lTJhMUW QtZyo8w4/Di3oM4DABBhwYuAvBAhnmeT/a2rIfZf658m1tV4/I6GE6DueNt5 /E5ejhDP0ZsldZ6kT5yGvfvyR4n1NPZfzo2F2QDgbWfhBUFelBC/pDdLXL9+ TWzYkD9HrKex+9M8ztQZAACVIc68LMhLE+KX9JZJnSRpw+4hlBgOvpuHiTr8 AaBihIkXB3mBQjxTdhJdB5v2uIAMN29o37HiRB3+AFBFvDh4iZCXKcQzLK9m 7qlTJFXi4Ff9E8T6ye4/ADiH8jQVdZlCPFNvnNT5kSbG3UMocHH2OwDAeXBW PFbT8k4itr5eHhu15c8O62Y8+Y2z3wHgYix6uZCXLMS/6+2TOj3SIx49kz84 rJWLk5E4ihMAlsMCpydhBfX2SZ0biWHFSdG6LX9wWB9D5zEnmwHA5YhTLx3y 8oX4T7Zusw32UsSTD/qnhvWRDAWAK8EbEqyg3kSpMyMl+MkRN6lND9UhDwCp 4gVEXsQQ/2r55Q6WozyGonFT/siwJtrw09xMHfUAkCxmXkbkpQzxTxs3OfRv STiWEzdm7L1g3xAAXBcLXkzkBQ3xDzmocykscCwnbsZw8C37hgBgNcSplxR5 WUP87OKgTt6oXICN9+VPCuvhls366ngHgHzwkuKFRV3ZEH/XGyp1TlSd2PtF /piwDnJqLgCsHG4zweroDZU6IapNnIa9e/LHhNkb+6/56AAAq6c8KP61vMQh ut5QsX7sHGzUkj8jzN5w8JA0BIB1US7sfCgvdIhF+UWvpc6H6hKPnssfEGav zXrqSAeAnPEiIy90iEV5D+ZzdTZUlTAO7TvyB4R5a8OGTwjqWAeAvDEvNfJy h+htlTdX6nSoImQortvyJz6WcQLABrDAlzusgos3LXCa2P1J/mgwZ1u7Fobq MAeAuuAFx8uOvvRhvfXmSp0KlcPCqGjdlj8azFgbH6jDHADqhZcdeenDutu6 7S2WOhWqReSyWlynsf+Kr+oAsGnKo5NeyQsg1lxvsdSZUC1C96n8oWCulmeU hYk6xgGgloQJ506jVm+x1GlQJcIo8GEd16ZNDtUhDgD1xUuQvAxinfUWa87n 9X/AjnVcn3Hw69yiOsYBoMZY9EIkL4ZYZ9m9/gfx6Jn8cWCWcvMXAFQCbnZG qd5oqXOgGoRJaH8tfxyYpTbpqOMbAKDEy5G8JGJt9UaLfQ1z7ljHtRn7L/mq DgBVwaIXJXlhxNrK3evz8sP6z/IHgRnausWSaQCoFuVJ1Lf05RFrqbdb6gRQ YwVLXHAd2ritDm4AgNN4aZKXR6yn5QYHK9QZoMTG+/KngPlZXvXFCfAAUEEs cNEzqvSmS50ASrigAdehFQN1aAMAnI0XKHmRxHpaXslXY8L+Q/kjwMyMJ++9 qKtDGwDgS5iXKXmpxBrqTZc6+GXY9Kj4tCV/BJiTiwM5Z+rQBgA4lzhjLwMq 3PLWSx39GuLxO/XgY27a5EAd1wAAF+PFSl4wsYZ666WOfQ2h81g++JiTi61D HMgJAClgkc1EuHm99VKHvgArhkVzRz74mJM2Y+sQACSDlyx52cTa2dzxBkwd +5vGhg39yGNGxsEbtg4BQFKYFy558cS66Q2YOvI3TTx6Lh92zMfmDjfJAkB6 hAmf/HDDegOmjvvNYpEte7hCa/hTGwDkAV/9cMMuLiSq0d4HmxzKxxyzMew/ mMda3+cFAAkTCy9i8kKKtdLbMHXcb444eCsfcMxGG3M+EgAkjBcxeSHFWult mDrqNwenJOGqDIc/1OobAQBkiEUvZfJyivWxRicmhXHRuiUfcMxDm3bVAQ0A cF28lMnLKdbI1i1vxtRRvwls1NaPNmZhPOIQeADIAote0ORFFeujN2PqoN8E sfdCPtSYhzbrq8MZAGA1eEGTF1Wsj96MqUN+E4SDh/KhxgyMvV94yQkA+WDR y5q8tGJN9GZMHfFrp7zqq3FDPtSYgdx0CQCZwW2YuDkbN7KfRuPwk36cMX3L jwLGTZcAkBdmLD/DjektmTri1wtXXuJKtCLzn84AoJ54cZMXWKyJ2V+CyW0L eH0XKzl5yQkAOVK+6mRVJ27C8ha/fGFTHq7E7JegAECdYVUnbsyMj3+JJx/l w4upW34L4CUnAGSMGevQcDN6Y6YO93VBEuH1zfiHMgCAz/BZEDdjxks6WcyJ 1zR0f+RMTgDIH4te7uQlF7M31yWdiwUqW/LhxaTldnUAqAncwI4bcSvLLRKc zInXNBx8x0tOAKgLFr3oyQsvZm+Wp3TGo5/lA4tJa+M9dRQDAGwOL3rywovZ 6+2ZOtJXT9j/Rj6wmK6hfWduhTqKAQA2iBVe+uTlF/PW2zN1oK8YK06Kxk35 wGK6xmG25zkAAHwJL33y8ouZ27jpTZo60leJjVr6UcWUnYeJOooBADZOmMjL L2avN2nqQF8lsf9KPqSYrrH/Wh3CAAAavADKizDmrTdp6jBfJaHzSD6kmK5W ZHiSAwDAMngBlBdhzFtv0tRhvjrirGjtyocUEzUc/sBllwBQX8y8DMpLMeZs a9dbNXWgrwabHOrHE5PVJgfqEAYAUOJlUF6KMW+9VVOH+WqIJx/kg4mp2rrF EUkAUHes8GKoL8iYr96qqaN8NcSjZ/LBxESNx+/V8QsAoMeLobwgY8Z6q6aO 8dXAafB4ZTM7NAwA4GqUx1yrCzJmbB4nw1sYFY1t+WBiiobDJx5B6hAGAKgC 5iVRXpYxWxvb3rCpg/y62HhfP5KYph486vgFAKgKzKe4VjOYc+PgrXwYMUkb N7M5ugEAYAXEGbdI4/r0hk0d4tcldJ/KhxFTNA64ewgA4J/wwigvzpir3rCp A/y6hL378mHEFLVZXx28AADVwgujvDhjrnrDpg7wa2HFsGjckA8jJmcZ+RbV 8QsAUDEs8iYH12Xjhrdt6hC/Oix4xqsZT35TBy8AQBXx8igv0ZirSW8jisds IMKrmPSPWgAA66P8gKgu0Zir3rapA/zqxO5P8gHE5Ayd7zmWEwDgC5gXSXmh xiz1tk0d3leHG4jwCtqoqY5cAIDq4kVSXqgxSxO+jShOiyY3EOGlnad/FQIA wBoJI3mhxjxtbnvzpo7vq2CTQ/3oYWqGziM+rAMAnIt5qZSXa8xSb97U4X0V 4slH+dBhcvJhHQDgQvi8jmvSmzd1dF+F2HshHzpMTj6sAwBcDJ/XcT1686YO 7qvAm3+8rOHgOz6sAwAsgXnBlBdtzM/FCrf0CO2v5UOHaWnDT+qwBQBIAy+Y 8qKN+enNmzq0L83i0Not+dBhWlpxoo5cAIA08IIpL9qYo1vJXcti4wP1oGFi hr17c+PDOgDAcph52ZSXbsxPb+HUwX054skH+aBhWiZ95RYAwObhgmlch97C qUP7csTeL/JBw7S0WU8dtgAAKeFlU166MT+9hVOH9uVg0zpe0q25BXXYAgAk hQW2TuDKTW7rOpvW8VLGo2fqmAUASA8vnvICjpmZ2Nb1MC4a/OSFl9DGbXXU AgCkhxdPeQHH3GxseSOnDu1l4aZ1vKxcPwQAcBW4kAjXYEK3rkcOqsXLGNp3 uX4IAOBKmJdQeRnHzIzpXNES+6/lw4UJGQev1TELAJAqXkLlZRwz0xs5dVwv S+g+lQ8XJmRC7/ABAKoG69lw5Xojp47rZQkHD+XDhQk5j1N1zAIAJEucyss4 ZqY3cuqwXpaitSsfLkzFsP+AxZwAANfAvJDKizlmZWtXHdXLwR46vIxx8EYd sgAAaeOFVF7MMTOTOE/GJl35QGFC2pTFnAAA18ILqbyYY2Z6O6eO64uxYUM+ UJiQLOYEALguLOnEVevtnDqsL4Y3/Li8nMwJALAKOKUTV2wSK9/i0XP5QGEq xv5LdcACAOSAl1N5Scec9HZOHdQXEzqP5AOFqWjjPXXAAgDkgJdTeUnHnPR2 Th3UFxP27skHClPRiqE6YAEAcsDLqbykY056O6cO6ouwWDR35AOFqTi3oA5Z AIAssCAv6ZiVzR1v6tRhfR5WcDgnLmsS7+0BAFKBtW24Wr2pUwf1ediUwzlx WePxO3XAAgDkgxdVeWHHnPSmTh3U52GjlnyIMBVt0lEHLABAPnhRlRd2zElv 6tRBfR7x+L18iDAVk7hXCwAgGbh7GleqN3XqmD6P2ON8MFzWii9OBgBIDIvy wo456U2dOqbPI3SfyocIkzAcfKuOVgCA3PDSKi/vmI3e1Kkj+jzCwXfyIcIk jIPX6mgFAMgNL63y8o7Z6E2dOqLPI+xx3ysuJTcQAQCsHG4jwhXqTZ06os/B OBAel9SKY3W4AgDkhpdWeXnHfGzueEypg/oLhIl+fDAR53GmjlcAgOyIM3l5 x5z01k4d02djs4F8cDANm9vV/dEJACBhzAusvshjLnprpw7ps+E0WlzS0Hms jlYAgDzxAisv8piNlb29xYZN+eBgEsbBr+poBQDIEy+w8iKP2eitnTqiz4ZL iHBJbdRWRysAQJ54gZUXeczGyl5FFPscC4ZLabO+OloBAPLEC6y8yGM2emun juiziUfP5YODSVjZfXAAAMnDGTK4Or21Uwf02YTDJ/LBwSScW1BHKwBApliQ F3nMRm/t1AF9Nlx8iUvZuqUOVQCAnPEyqy/1mIWVvf4y7N2XDw5W39B5pA5V AICc8TIrL/WYh97aqcP5bELrtnxwsPrG/kt1qAIA5IyXWXmpxzz01k4dzmdi RYO7D/Bi4/CjOlYBAHLGy6y81GMmNip5byB3vOJyVvZSAwCAPOBaQFyh3uCp I/o0Vozkw4JJaEVFL28FAMgDL7PyUo/Z6A2eOqJPwyG0uKQczgkAsF44ohNX ZwWvcbHJoXxYMAk5nBMAYL1wRCeuTm/w1AF9GhvvyYcFk7CKq5EBALLC5KUe s9EbPHU8n8aGTfmwYAJyIDwAwPrhWHhcld7gqcP5NPHkN/mwYPUNBw/VoQoA kD9ebOUFH/PQGzx1OJ8mHr+VDwtW39B9qg5VAID88WIrL/iYh97gqcP5NLH/ Wj4sWH1j/5U6VAEA8seLrbzgYx56g6cO59PE3gv5sGD1jScf1KEKAJA/Xmzl BR/z0Bs8dTifJh49lw8LVl8btdShCgCQP15s5QUf89AbPHU4n4alI7iMXHwJ ALABuP4SV2UFN2KEwx/kw4LV16Y9dagCAOSPF1t5wcc89AZPHc6nCZ1H8mHB 6mvFsTpUAQDyx4utvOBjHnqDpw7n04SDb+XDgtV3HkbqUAUAqAFhJC/4mIfe 4Kmj+TRh/xv5sGD1ncepOlQBAGpAnMoLPuahN3jqaD5N2LsvHxasvvNYqEMV AKAGxEJe8DEPvcFTR/NpQvuufFiw+s4tqEMVAKAGWJAXfMxDb/DU0Xya0L4j HxasvnOL6lAFAKgBFuUFH/PQGzx1NJ+maO3KhwWrr9dBdagCANQBkxd8zMTW rjqYT1M0d/TDgpWXnhMAYCPQc+KKbO6og/k0RfMr/bBg5VXHKQBAXZAXfMzE 5lfqWD5N0djWDwtWXnWcAgDUBXnBx0xsbKtj+TRF46Z+WLDyquMUAKAuyAs+ ZmLjpjqWT1M0buiHBSuvOk4BAOqCvOBjJjZuqGP5NMWnLf2wYOVVxykAQF2Q F3zMxS11LJ+GnhOXUR2nAAB1QV7wMRcr2HPKxwQTUB2nAAB1QV7wMRvVsXwa +YBgEqrjFACgLsgLPmajOpZPIx8QTEJ1nAIA1AV5wcdsVMfyaeQDgkmojlMA gLogL/iYjepYPg17iHAZ1XEKAFAX5AUfc7GCe4joOfFi1XEKAFAX5AUfc7F6 PSdnwuMSzuemDlUAgDpg8oKPmVjBM+G5+xKXkJ4TAGAj0HPiiqzi3Zfb+mHB yju3qA5VAIAaYFFe8DETG9vqaD5N0fxKPyxYeecW1KEKAFADLMgLPmZi8yt1 NJ+maO7ohwUr7zwW6lAFAKgBsZAXfMzE5o46mk9TtHb1w4KVdx6n6lAFAKgB cSov+JiJrV11NJ8mtO/ohwUr7zyM1KEKAFADwkhe8DEPvcFTR/NpQvuufFiw +lpxrA5VAID88WIrL/iYh97gqcP5NGHvvnxYsPratKcOVQCA/PFiKy/4mIfe 4KnD+TRh/xv5sGD1tUlHHaoAAPnjxVZe8DEPvcFTh/NpwsG38mHB6mujljpU AQDyx4utvOBjHnqDpw7n04TOI/mwYPWNJx/UoQoAkD9ebOUFH/PQGzx1OJ8m HP4gHxasvrH/Sh2qAAD548VWXvAxD73BU4fzaUL3qXxYsPp6nKhDFQAgf5iU cVVWcOKOR8/lw4LVNxw8VIcqAED+eLGVF3zMQ2/w1OF8mth7IR8WTMDWLXWo AgDkjxdbfcHHLPQGTx3Op4n91/JhwSScz00drQAAeWPyUo/Z6A2eOp5PE4/f yocFk3BuQR2tAABZY0Fe6jEbvcFTB/Rp4slv8mHBJJyHiTpaAQCyJkzkpR6z 0Rs8dUCfxoZN+bBgEloxUEcrAEDOeJmVl3rMRm/w1BF9GhvvyYcFk5DrLwEA 1goXX+IK9QZPHdGnscmhfFgwCePwozpaAQByxsusvNRjNnqDp47o09isLx8W TMLYf6mOVgCAnPEyKy/1mI3e4Kkj+jRWjOTDgklYwZtbAQBywsusvNRjNnqD p47ovxFn8mHBNORYeACAdcKB8LhCvcFTR/TfsaKxLR8ZTEKO6AQAWBcczokr tLFdzZtcQuu2fnAwBTmiEwBgXXA4J65Ob+3UAX02Ye++fHAwCSu4IBkAIA/Y 0osr1Fs7dUSfTTj4Tj44mIQ2aqujFQAgT7zAyos8ZqO3duqIPptw+EQ+OJiE cfCrOloBAPLEC6y8yGM2emunjuiziUfP5YODSRg6j9XRCgCQJ15g5UUes9Fb O3VEn03sv5YPDqZhs6L74AAAEse8wOqLPOait3bqkD6bePxePjiYipU87wsA IHE4KxtXqrd26pg+Gxs25YODqWjFsTpgAQByw0urvLxjTnprpw7qs7FJRz44 mIo23lMHLABAbnhplZd3zElv7dRBfTY2G8gHB1MxDiq6RAQAIF28tMrLO+ak t3bqoP4C3H2ASxsOvlXHKwBAbnhplZd3zMkK3xtoRXNHPj6YinOL6ogFAMgI i/LCjlnZ3KnyITNh765+iDAR52GkDlgAgIwII3lhx5z0pk4d0+fB9Ze4vJVd mQwAkCLs5MXVWtmLLz8Tuk/lQ4SpGI/fqQMWACAfvKjKCzvmpDd16qA+j9h7 KR8iTMXQeaQOWACAfPCiKi/smJPe1KmD+jy4iggv5dyCOmYBALLAgrykY2ZW 9hKiz9ioJR8iTEgrhuqYBQDIAS+n8pKOmelNnTquz8OmXfkQYUJyGxEAwErg BiJcud7UqeP6PKzgoAa8hLFf6bUiAACp4OVUXtIxM72pU8f1uVjkWHhc3tC+ W+XzZgEAEsG8nMpLOmZlc6f6V7eEvXv6gcJ0nMepOmYBABInTuXFHDPT2zl1 WF8MZzXgpbTpoTpmAQDSxgupvJhjZiZxnmE8ei4fKEzIOHijjlkAgLTxQiov 5piZ3s6p4/piiHy8lGH/AUs6AQCugXkhlRdzzMwk3gjZsCEfKExLlnQCAFwd FnPiGvR2Th3ZF2MTjujEy2kTlnQCAFwRL6HyMo756e2cOrSXIHBEJ17OOHit jloAgFTxEiov45if3s6pQ3spitaufKwwITmlEwDgqnAyJ67B1q46sJclHDzU DxcmZSo/TwEAVAu+LeIa9EZOHdnLErpP5cOFaWnjtjpsAQDSw4unvIBjfnoj pw7tZYl91pbg5YxHz9RhCwCQHl485QUc89MbOXVoL0scfpIPF6bm1tyCOnIB AJLCghdPdfXGDPVGTh3cy8K5DXgFbdZTRy4AQEp42ZSXbszSlM4wDOOiwU9e eDnj8Vt14AIApISXTXnpxgxtbHkjp47uSxDaX+sHDZMy7N2bGycmAQAsh5mX TXnpxvz0Fk4d3JcjdB7JBw2T04oTdeQCAKSBF0x50cYs9RZOHd2XI/Z+kQ8a Jqels2gZAECLsV0X16O3cOrovhzx5IN80DA5w8F3XEgEALAE5gVTXrQxS72F U4f35bDxgXzQMEW5kAgA4GK4fgjXprdw6vi+HFYMOTQMr6CNmurgBQCoOl4q 5eUaM3XLWzh1gF8atq7jFVwsXebzOgDAORgbdXFNJrdp/TNkBF5NPq8DAJwH H9ZxbSa3af0zsfdCPnSYonxeBwA4Bz6s4/r05k0d4FchnnyUDx2maOh8z+d1 AIAvYF4k5YUac9WbN3WEXwVuXccrm+ICZgCADbDYoquv0pirKd20/lfitGhu y0cPUzSe/KYOXwCAKuLlUV6iMVub2968qWP8ioT9b/QDiAka9u7PLarjFwCg Ylj08igv0Zir3rapQ/zqxO5P8gHERLVZXx2/AADVwgujvDhjxnrbpo7xqxOP 38oHEBM1Dl6r4xcAoFp4YZQXZ8xYb9vUMX51bLwvH0BM1cbNeZypQxgAoDLE mRdGfXHGfPW2TR3lV6fcXte4IR9DTNSkgx8AYLXwGgfXa+NG6ofGsNoZr2w4 fMJBnQAAC8xLorwsY8aWu3cTJ3SfyocR09WKE3UIAwDo8WIoL8iYt96wqcP8 usQB24jw6sbj9+oQBgDQ48VQXpAxb71hU4f5dWH9CV7L1i3/8V4dxQAAUqzw YqgvyJi1GeyhsDAqGtxGhFfXJgfqKAYAUOJlUF6KMXMb296wqSN9BXAbEV7H cPjD3NhJBAB1xczLoLwUY94mfQPRX4lHz+SDiUlrxUAdxQAAGrwAyoswZq+3 aupIXw3x5IN8MDFpY587iQCgpngBlBdhzF5v1dSRvhpscigfTEzdeZioAxkA YOOEibz8Yh30Vk0d6ysizorWrnw8MWnj8KM6jgEANo2XPnn5xfxt7eZ02XTo PNIPKaZsaN/h0CQAqBdWeOmTl1/MXm/S1LG+SmL/lXxIMXVtvKcOZACAzeFF T154sQ56k6YO9lVio5Z8SDF1w8F3c4vqWAYA2AgWvejJCy/WQW/S1OG+SsqL Yhs35aOKqWvTrjqWAQA2gZc7ecnFWti46U2aOt5XDCfD4/UN3R951QkA+WPR y5285GIdzOY0+L8Sj36WDyxmoM366lgGAFgvXujkxRZrordn6nhfPXH4ST6w mIHx6DlXYQJAzph5oZMXW6yJ3p6pI3712GxQfNqSjy1moMeSOpwBANbFYrrU V1qsh1u5Tqlh/4F6bDEHY+8XXnUCQJ6YeYmTl1msid6YqSN+XfCxAFelFXn+ XAYANceLm7zAYn0sl6tlSjzhDi9cjbH3gledAJAb5UvOF/ICi/XRGzN10K8L NuLhCs11CQoA1BZWcuKGzfsoGJZ04qpcrOrkrE4AyAWLrOTETZrxYs7PsKQT V2jeP6ABQK3gUyBu2IwXc36GUzpxhcajn3jVCQA5YNELmryoYq3M8mTOv1Iu VmnckI8zZiM3sANABnC7Om7axo06bIsIBw/1Q425GA5/4FUnAKSNRS9l8nKK tdKbMXXcbwIOgsDVauMDdVADAFwdL2LyQop1szxysAbYqC0faszJcuddLNRx DQBwJWLBiS64eb0ZU4f+RgjjonVLPtqYkzZsqMMaAOAqePmSl1Csna1b3oyp Y39DhM5j/YBjTjZ35mGijmsAgEsSJl6+9CUUa6a3YerQ3xxx8FY+4JiZcfBm Puc2TABICPPCJS+eWEO9DVMH/+awyaF8wDE/63DsAwBkAzddokpvw9Thv0Es hr178jHHzIxdjogHgESw6CVLXjaxhnoDVre5kkswcR3ahHOTACABvFjJCybW 0+yvvPw77NTDdVj++BZn6ugGADiXOONjH6qs4UkvVgzZrIfrMJ68ZzMRAFQY 8zIlL5VYU5s73oCpU0AAJybhmrSCzUQAUFG8QMmLJNbWWp2S9Ffi8Tv54GOW LjYTBXWAAwD8DQtsHUKh3nqpc0CDTY+KT1vy8ccstXE9bvUCgKTw0iQvj1hj t7z1UieBjLD/UD3+mKnlxV4jdYADAPyFMOLqZxTqTZc6B5TE/iv5I8Bcjf2X dTuCDACqi0UvSvLCiHXWmy51Giix8b78EWDG2qSjjnEAgBIvR/KSiDXXmy51 HkixgjPKcH0ujuucqqMcAGpPnDLZodbF9UOFOhPExKOf5Q8CMzYOfuULOwAo seiFSF4MseZ6u6XOBD02askfBOatTQ7VYQ4A9cVLkLwMInq7pU6FChAmof21 /FlgxpYfFMJEHegAUEt8juOrOqr1Rot58DPx6Jn8cWDelpv1OCUeADaMBY5n wSrojZY6GaqCDRvyx4HZa+MDdaQDQL3wsiMvfYiuN1rqbKgMYRRat+VPBDO3 tWthqI51AKgLXnC87OhLH9Zeb7G4JOWvhO5T+UPB7I1Hz/nCDgCbwIIXHHnR Q3S9xVLnQ7WIw0/yh4J1cPF9wdTxDgB5Y6wZw+roLZY6I6qFlbfQ8nkdN6HN eup4B4Cc8SIjL3SIv9u6bXxY/xux+5P+0WANDAcPuZwIANZFnHqRkRc6xM96 c6VOiSrClwjcmLH/moWdALB6ysORXstLHOIfsmP9bMI4tO/Inw7WRBu11REP ALnhhUVe3BD/0Nsqb67UaVFR2OWHG3TLZn11yANAPnhJ8cKirmyIf1qe1gJf gLvXcZOGg29Z2AkAq6FcxvmtvKwh/lXuWD8Pz1nupcUNGnsvWNgJANfFghcT eUFD/KveUPFe5Xxi7xf5Y8JaacNPc+PETgC4KmbGEdNYPb2hUudG1bHxvvwx Yd206aE68AEgVbyAyIsY4t/1hkqdHJXHQtj/Rv6ksF62bltxog59AEgPLx1c aIIV1FspVo4tQxz8Kn9YWDdD5zHrXgDgcsSplw55+UL8u95KqdMjDWx6VDRu yp8X1s3Yf8lPhQCwLOXx7y/lhQvxDBs3vZVSZ0gy8JMjSownv80tqsMfACqP RS8X8pKFeKbllztYmnjyQf7IsJ7aeE8d/gBQdbxQyIsV4pf0JkqdIinBqmwU yicJADiHcgGYukwhflF2xV6eePRM/+Cwlob2HRIWAM7Ei4OXCHmZQvyS3j6p syQ9bNSWPzisreHgu3mYqJMAACpGmHhxkBcoxHP09kmdJwliBQd1otDY/Wke Z+o0AIDKEGdeFuSlCfEcF8dyFupUSRIO6kSti9OTSF4AKF+DcDISVl+O5bwy Nu0Vza/kTxDrbDx+x6GdAHXHgpcCeTlCvMDmV944qbMlYcLhj/qHiPU2Dj/S dgLUF284hx/lhQjxQr1lUmdL2tiwIX+IiDZqcVY8QB2x6OkvL0GIy+gtkzph EidOw959+XNEXJwVb+p8AIBNYpz9jqnozZK3TOqUSZ7Yfy1/lIiuTTrqbACA zeEpLy87iEvqzZI6Y3KgvPGhuS1/mojFpy2bdtUJAQCbwJPdU15dcxCXs7nN DXqrgp1EWBUb5DVA/pTvOhq868BkZPfQCrFhU/5AEX+3PIyCthMgWxYf1zim D1PS2yR13mRE5E4irJKtWzbjDDSADPHU9gTXFxnEpS3vHopcX7JK4uCN/LEi /iltJ0B20HBiinqDpE6d3LDZoGjtyp8s4p9628lHdoBcKD+p03BicrZ2vUFS Z0+GxKPn+oeL+FdZ2wmQBazhxET11kidPXli4335w0U8bbmTnQOUABKmPBaJ XeqYpt4aqRMoW0Lnsfz5Iv7NrcVx8dxSBJActjj4nXM4MUm9KVJnUM7Ek4/y R4x4puXlmNzJDpAQFrnaEpPWmyJ1FmVNnIb9B/KnjHimNmrNLaiTBACWwIIn rLxoIF5Zb4e4YH3dcGgSVtk4/EjbCVB1LHiqyssF4nXkiKQNYLNBaN2WP2vE LxmP382N43kBqooVnqTyQoF4Hb0R4oikzRB7v8gfN+I5xv7LeZypEwUA/kac eXrKSwTiNfVGSJ1LdcEmh5xrgRU3dn+ah4k6VwDgL4SJJ6a8OCBe18a2N0Lq dKoRoftU/9ARzzUcfGfFiTpXAKDEk9FTUl4WEK+vt0DqfKoXNmrLHzrihYb2 HS4qApDjaejJKC8IiCvRWyB1StUN43x4TEWO7gSQwSGcmJeLc+C5gmTTxOEn +aNHXNJ48htnKAFsGgueevL0R1yh3vyo86qWxFk4+Fb+9BGXdLGZnfN7ATZF nLJFHTPT2x4ORVERj9/LAwBxeUPnMbuKADZAuWOI9VeYnd72qHOrxoQxV2Fi YrZu2/RwbqzGAVgPZp5iBVeHYHaWl12GsTrBak0cvJWHAeJlteEnlncCrB4L xlJ/zFRveNQJVnfKDyh7d+WRgHhZY+8FyzsBVkmcelrJUxtxHXqrw9KsKhD7 r+XBgHgFw8G3NuurEwggBzyV2FWKGeutjjrJoMRmAw77xWTdKk/35Ts7wJWx sLglZEudy4jrsrxeZDZQZxr8Tuy/kocE4pUtf4DlOzvAFSgPROJTF2auNznq TIM/Kb+qsEsRUzYcPLRZj9slAJbGPGU8ceTJi7hWvb1hFVbViD3O/sXktWGD 7+wAF1PuT2/IExZxA3p7o843OI1NexzIhhkYj55bGKrzCaC6eIJ4mshTFXET lkc699Q5B2fAKRmYia1dGx/wwhPgNBY8NTxB9EmKuBHLU/WgkixedVKLMBPL ReNhos4qgMoQJmwXxXrZ2uUlZ5VhVSfmZNi7Z5PDuUV1YgFIseiJ4OkgT0nE TcpKzopj035os6oTszIOfuUkJagvceopIE9DxA3rzYy3NOr0gwuIfV51Ym4u Xnh2eOEJ9aJ8vdnh9SbWU29m1BkIF1Oe1cm1RJijZQkKI3WGAWyEMOIFAtbW xcVDvORMA66lwGxt3bIxd2VC1pSb09se6vp0QxTJ7eoJYbPjsHdXHjOIazJ2 f7JiwKVFkB3mge3hLU8xRKHewHgbo05GuARx8EYeNohrNZ68n8eZOtUAVkSc eUjL0wpRrjcw6myEy2HFMOw/kEcO4lpd7C06YG8RpE25V+iAvUKIrrcu3sCo cxIuTTzmR2asheWn9hmf2iFFzEOXj+mIf+itizor4UqESTj4Vh4/iJux/BzD vUWQEGHCIijEv+pNC2U8XeLJR3kIIW7O5o4NG/NYqDMP4Fxi4YHq4apPGcQq 6U2LOjnhGlgIncfyKELcpOVyoDGLPKGSWPTgZLE94t/1doVz8FLHRq3i05Y8 lhA3bDj8waZdOk+oCt5tTrselvLUQKykW96uqLMUVkDoPlXHEqLGePRTeZkF nScI8W5z1vdQlKcDYmX1RkWdqLAabNJh4RDW2dj7pdzYbmxsh81ii23pvV/k KYBYaZs73qio0xVWBkUPMfZelLcX0XnCBrDFjUK9F/KwR6y+3qKoMxZWiU17 of21PK4Q5fLOE9YL7zYRL6M3J96iqPMWVgwHwSH+YTx6zjpPWDG/r9t8Lg9v xITkpss8CeOw/1AeXYjVMXR/ZG87rIDPe9K7P8pDGjEtvS3x5kSdwLAWOCIe 8e+Gg+9svDc3TpKHy2OFB4+HkDyMEVOUQ+BzxmI4fCKPMcQKGtp34vAj167B soSJB4yHjTx0ERPVGxI+M+WNjfeL5rY80hAra+y/Zns7fJHPG9L7r+WBipi2 zW1vSNT5DGuHDZWIF1peYzQ54IM7/IkVHhJcJIS4EjkfqSbYrB/27srjDTEB W7fi8XsrTjxv1IkLKswDwMPAg0EfkIhZ6E1IeXII1IN4/FYecogJGQ6flJ+B 4kydu7BB4swfOmvgEVeuNyHq9IYNEqeh87086hATs3EzDl5zsGfmfD5mc/Da H7c+5BCz09sPb0LUeQ4bxUYtKiri1Qx79+PJb1YM+eaeEeYP1B+rP1x5gCFm a+Omtx/qZAcB3JeBeE39B3YbNedhRPOZLOaPzx8in34QN6A3HuqUBw2LS9jZ TIS4AkPnEc1nUvzRaj6SBw9iTfSWg6vV6wybiRBXa3mr0fBTudWdEz4rSHm6 5ok/IG4OQty8bB2qO+VmIn7MR1y9Ye+eF1ib9eYW1Hleeyz4g/DH4Q9FHhiI 9dSbDbYOgY3aRfMreTQi5utWPHpm4zZf3jfL4uv5uO2D749AHQOI9bb5lTcb 6poAlSD2XugDErEGhvbd8rSlyeHi5336z5VjPrA+vD7ILFZHrI7eZqiLA1QF mx2H/QfymESslZ50cfDGpvSf12TRZ069z3xDHUOsoJ6Y3maoCwVUiHjymzws EWtr+f6z/9LGe+WZn6z/vBALPlA+XD5ovM9ErLjeYKhLBlQNC92n8shExGKx 2D4ev7NJp1wCyp1H8/JuoHJx5qTjw8K2R8SE9NaC7zjwd2zaDe2v5fGJiKcM B9+Wq0DLt6DHizvfsy/gVt51XhyXbzIHr/2vL38EiHgFvanw1kJdT6CicFwn YgI2t0PncRz8aqN2efl7mKT9Od7/8GHifxH/6/hfyv9q/hfUDzIiXlsO5ITz iLNw+IM8ShHx0rZulV/k+y/j8KNNOlYM/tGLVuSlqP3eWxaD8hP58GO5FLPz yP/Y+qFDxDXo7cTiuwzAF7HxPrMAYlZ6O3rwMHSfxv6rePLBRq2yKZ32yi/1 YVTumo9F2RCWC0dt6R518U/6v+L/ov/r/ouEUfk13H9Z/8VHLf+N/Lfz39R/ a0oKYu1s3fJ2Yr39CmRB7L/WhysiIiKmqTcS6l4GEiGM2RmKiIiIV7C85jKM 1a0MJION94rmjjxuERERMSWbO95CqLsYSIzYf6UPXURERExHbx7U/QskSBiF zvfy6EVERMQk9Lah3JkIcHn4wo6IiIhLyVd1uB7sYUdERMQLZa86XBf2sCMi IuK5slcdVsLilPhdeTwjIiJiFW3tcgI8rIo4eKMPaURERKye3iSo+xTIiPIe 9ifyqEZERMRK6e0B96rDarHJYWh/LY9tRERErIjeGHh7oO5QIEPi8Qd5eCMi ImJF9MZA3ZtArlg8eiaPcERERJTrLYE3BurOBLLFZoOw/408zhEREVGoNwPe Eqi7EsgcGzaL5rY82hEREVFjc9ubAXU/ArUg9l/pAx4REREVehug7kSgNoRJ OPxBHvOIiIi4Yb0B8DZA3YhAjeDoJERExLrJ4UggIZ5wdBIiImKN9Klf3X1A TYm9n+Xxj4iIiBvQJ3113wH1xYph6HwvzwJERERcqz7d+6Sv7jug1th4P7Tv yHMBERER16RP9D7dqzsOgHk8fi9PB0RERFyTPtGrew2Az1g8YmEnIiJihvoU zx2XUB0WCzsfyfMCERERV6hP7izjhKph4wNO7ERERMzG8jTO8YG6vwA4g/LE zsaWPEcQERHxuja2OI0TqkzsvdSnCSIiIl5Pn9DVPQXAuZRXsT+RZwoiIiJe WZ/KuVQdqo9Nj8L+A3m+ICIi4hX0SdyncnU3AbAUNmoWrVvyrEFERMTL2brl k7i6jwC4BPH4rT5xEBER8TL69K3uIAAuiXFQPCIiYkqWx78bx79DelgxCp3H 8gxCRETEC/Up2ydude8AcEVs2g379+V5hIiIiOfok7VP2equAeBaLPYT7cqz CREREc+2tcu+IciDePy++MT9RIiIiBV0y6dpdacAsDK4nwgREbGCct8Q5Eac hu5TeWYhIiLiH/rU7BO0ukUAWDE2G4SD7+T5hYiIiK5Pyj41q7sDgLVgk07Y uyfPMkRExJrr07FPyuq+AGCN2JBt7IiIiFJbuz4dqzsCgLXDNnZERESdbFSH GhH7r9QZh4iIWEd9ClZ3AQAbJBbx6Lk87xAREWulT74+BaubAICNYmEUDp/I sw8REbEm+rTrk696/gcQYNM+pychIiJuwPJkpGlfPfMDyFicnnRfnomIiIgZ 61MtJyMB2KgV2nfk+YiIiJilPsn6VKue7QEqQTz5WDR35FmJiIiYm80dn2TV 8zxAhYjH74rGDX1uIiIiZmPjhk+v6hkeoHLE/mt9eiIiIuaiT6zquR2gkliM vRfyDEVERMxAn1J9YlVP7QBVJU7j0TN5niIiIiatT6Y+paondYBKU54V3/1R nq2IiIiJ6tMoZ78DLIMVx6HzWJ6ziIiIyekTqE+j6pkcIBm4oggREfGyctkQ wBWwSTfsP5TnLyIiYhL6pOlTp3r2BkiS8mbM/QfyLEZERKy4Pl1yuyXAdbDx fti7J89lRETEyuoTpU+X6hkbIHls1A7tu/KMRkRErKA+RfpEqZ6rATLBRs3Q viPPa0RExErpk6NPkepZGiArbNgIrdvy7EZERKyIPi365KienwEyJA4/Fa1d eY4jIiLqbe36tKiemQGyJQ4/0nYiImLdLRvOj+o5GSBz4om3nbf0+Y6IiCix dcunQvVsDFAL4slvtJ2IiFhHy4bzN/U8DFAjaDsREbF20nACKKDtRETEGknD CaBjsbaTLUWIiJi7rV3WcAJoYSc7IiJmLrvUAapBHH7iuHhERMxSn+A4hxOg OpS3FHE5JiIi5mV5tSU3DQFUjMWd7Hfl9QEREXEl+qTGXeoA1cRG7bB3T14l EBERr6lPZz6pqedVAPgiNt4P+w/ktQIREfHK+kTm05l6RgWAC7BJJ+w/lFcM RETEK+hTmE9k6rkUAJbCJt1w8J28biAiIl5Kn7x8ClPPogBwCWzaD53H8uqB iIi4pD5t+eSlnj8B4NJYcRy6P8prCCIi4oX6hOXTlnrmBIArYmEUj57JKwki IuI5+lTlE5Z6zgSA6xGnsfdCXk8QERHP1Ccpn6rUkyUArAKLsf+6aNyQFxZE RMQ/bdzw6cknKfU0CQCrJB6/K5o7+gqDiIjoNnd8YlLPjQCwFuLJR65lR0RE uT4Z+ZSknhUBYI3YqBX27surDSIi1lafhnwyUs+HALB2youKODEeEREVLk59 55ohgLpQnhh/+EReeRARsVb61MOp7wB1Y3F053N5/UFExJrokw6HcALUlFjE /qvi05a8ECEiYtZu+XTjk4562gMAJfH4fdHaVZcjRETM1NauTzTquQ4AKoEN m2Hvnr4uISJiXvrk4lOMepYDgArBZnZERFytbFEHgDOx2SB0n8prFCIiZqBP KD6tqGc2AKgqcRp7L9lVhIiI13DLpxKfUNRTGgBUHXYVISLiFWXHEABcBhs1 wz5XZCIi4iX0icOnD/UMBgCJYdNu6DyWVzBERExCnzJ84lDPXQCQJFaM4tHP 8jqGiIgV1ycLnzLUsxYApIxZPH5btG7JCxoiIlbR1i2fJnyyUE9XAJADi+Wd D/SVDRERq6RPDSzgBIDVYtOjcPhEXt8QEbEi+qTgU4N6dgKAHAmT8vTOBqd3 IiLW28biBM4wUU9LAJAz8eRDaH+tr3iIiKjQpwCfCNRzEQDUAhsfhM4jed1D RMQN68XfpwD1LAQANcKKIccoISLWysWBSEP1/AMANcTi8fvQviMvg4iIuFa9 1C9utORAJACQYeP90PleXg8REXFNepH3Uq+ebQAAFt/Ze3xn///bu/euOIo0 gMPf/yMhhBCNmrgnmsXE3ASNycwACQMMMMNMV5f7VsfocTdrEhKouTzP+f21 q8il++0+Pd3VkrSExXj3eTowVzzPLknLlOfTgbmVLw7T4Q/V56Qk6ROLYR4j vfZRBeD/SxftydOmv1F9YEqSLlN/I8a49d6BhZDP++ngTv3JKUn6mGJ0xwCv fQwB+Ah5NmqPHlSfn5KkDyyGdozu2kcPgEvI7akHiyRp3iuPC50+t/wmsNC6 B4vuV5+okqR3FiPa40LAkmhn7WinGWxVH62SpL8abMVwjhFd+yAB8Dl1byy6 V3/GSpLK24XuebsQsLTSpD151vQ3qw9bSVrd+psximMg1z4kAFytPNn3inZJ qlL38vT92scBgOuSxt3S8S54StJ1VS5vPo3xW/sAAHDdugue7vCUpCuvu3vT 5U1ghb25w3Nws/pAlqTlbHDT3ZsAb5RH2g9/qD+ZJWm5itHq4XSAv2ln7emu lxZJ0mepe7XQrrU3Ad4pT4dpuF19VkvSQheDNMZp7YkOMOdye/ZbOvi2+tCW pIUrhmeMUG9OB/hAeXbaHj9u+jeqD3BJWoz6N2JsxvCsPb8BFk8e71lMSZLe W1kKabxXe2YDLLJ22j1bdLv6SJekOSzGY/es0LT2sAZYBnl63B49bHrr1ce7 JM1LvfUYjDEea09ogGWTxwMvapek5s1r08eD2lMZYHm9+ah930ftkla0GIA+ TAe4Hnl20h4/avob1Ye/JF1f/Y0YfTEAa89ggNXSvTHzfv2jgCRdfTHuvMUS oJrctmcv0sHd6ocDSbqiYsTFoItxV3vgAqy8NGlHO97VLmnJKu9MH+3EiKs9 ZAH4S1lPqdzkuVn9MCFJn1p/s9y6aR0kgHmVL16n4Xbzcq3+IUOSLtNaDLEY ZbWnKQDv163k+X3tA4ckfVwxuKy6CbBgciqPF736rvpBRJLeWwyr7kGhVHt0 AnAp6aI9/TUdfFv9gCJJ7ywGVIypGFa1xyUAnyo35+XBdm8vkjRPlTcKjXZi QNWekQB8Tnl22p48S3tfVj/QSFrxYhDFOIqhVHsuAnBVynszT56kvVvVDzqS VrAYPjGCvL8SYEXk6Ul7/KQZbFU/AElalQZbMXZi+NSefwBct24Z+cfNwDVP SVfZ4FaMGgu8A6y47szzSXLmKelzl8rZ5hNnmwD8qbvP86knjCR9lrqnhJ66 bxOAd8qzUXm23apKki5bWQGpPJM+qj3PAJh3uTlrR7tWkpf0UZXV3Ue7MUBq zzAAFkqalHcYeXumpPdV3lxZ3iU0qT22AFhY7aw9f5lef1/9oCZpDovhECMi BkXtUQXAcsh5vJeG201vo/oxTlL9ehsxEGIsxHCoPZ0AWEL54rA9fmRhJWll 65Y/ehSjoPY0AmD5lcfbRzseMpJWqu4RoR0PpANw3dppe/bCrZ7S0ldu2jx7 Ebt87aEDwErLk4P26KG3t0vL1mArdu3YwWvPGAD4y9sP3O/UP1BK+rRiR/Yx OgBzrW3yeT8d/rvpe8JdWrT6G7Hzxi4cO3LtUQIAHyRPj7rXaH5T/zAq6X3F rlpeWDk9qj05AOBS2mk+73WXPW9UP6pK+u/6N7oLmz3PBwGwHPL0uB397G5P aU7q7tj8OXbM2rMBAK5AbvJ4rz160FhVXqrS4FbsgOX9QdkdmwAsv9yctWfP y9qevfX6R2Fp6eutd2tsPo9dr/beDwAVlEeNfOYuXVlvP0P3cBAAxKlnKgvL Hz9K+19XP0ZLS1DsSuWt6JOD2Llq794AMH/aaR4P2qOHae/L6kdtaeGKHae8 OWg88Bw6AHyQNMnnvXb4o6eNpPc3uBU7S1nyKE1q77oAsJByGrfnL9NwOzn5 lP5e7BSxa8QOErtJ7T0VAJZFGpcrn0cP0t5X1Y/1UsViFyjrHZWrmk41AeDK pIvuns+fPHCklao8FnT0U7lXM13U3gkBYJXkpjztfvI0HdxtXq5VPyWQrqC1 2LxjI++eQLeKOwBUVtb5PP2lLDLf36x9kiB9cv3NsoT76S/W1QSA+ZSb8+62 z4c+edfC1X16/jA24NiMa+9JAMCHyW2+OGxHu+Xi5+Bm9dMJ6d0NbpZLmqPd 2Fxjo6292wAAnyBN8nivPX6cXt1tel/UP83Qitf7IjbF2CBjs7SiJgAspTwb tecvy4fvB9/WP/fQKhWbXGx4ZTnN2aj2fgAAXJ88O2nPXrw9//Tkuz57a3+c Z569iI2t9vYOANT39vrnT+ngTtNbr32uooWttx6bUGxIrmcCAP8sN2dl2fmT p+n1vWawVf80RnPeYCs2lbKK5ngQG0/t7RcAWEDtrDz/fva8vHazXALdqH+G o+r1NrqLmQ9iwyjPm7ez2pspALBUchqXlx+NdtNwO+1/4yn4Van3Rfy5449e FjWaHGQvOgcArlFZgj5OQU932+GP5Spo31XQZanfXckc/hh/3HKSaZF2AGB+ tNPug/gXZS3Q1/fS3lceh1+Q1uKPVe7JPH5cnjEvH5dPa29MAAAfqrsQ+qrc Dnr86I+z0J6z0Nr1/jzDfFRuyJy8chkTAFg2aVKuhZ6/bE+elZtCX931aPzV NtiKX3K5FfPkWVm/6OLQq38AgBWVxvlimM977WinrFH/+l7a/7rpb9Y/YVug +pvxSytXL48exq8xfpnxK/3dwz4AAP8st7kZ5+mwLBZ6+mt7/KS7LvqvtH97 dU9Hy4nl7fJLGG7HLyR+LWVJzPgVNeP4ddX+gwEALJn8e7rIs1G+eJ3P++WM 9ORZuUB6eL87Kf0mDW4t3lKivY34tss3Hz/C4f1yuTJ+qDirPO+XH3M2ih+5 /OAAAMyRXBa0b8Z5dpIvDvNkv5ydnv1WVnaKc7njx+UcdbidDn8oH+W/+i4d 3Cnne3u3096X5RbT/mbTv1FOXHvr3TKka//zDH73v8T/Vf6BjfIPx78y2Ip/ vXyR+FLxBePLxheP/8Rwu5xDxn+0nEbuxrdRziTjW4pvLL69Ztwtq+58EgAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA4DL+ A0qurpQ= "], {{0, 880}, {892, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag[ "Byte", ColorSpace -> "RGB", Interleaving -> True, MetaInformation -> <| "XMP" -> <| "DublinCoreSchema" -> <|"Format" -> "image/png"|>, "PhotoshopSchema" -> <|"ColorMode" -> 3|>, "BasicSchema" -> <| "CreateDate" -> DateObject[{2019, 10, 31, 13, 45, 13.}, "Instant", "Gregorian", 1.], "CreatorTool" -> "Adobe Photoshop CC 2019 (Windows)", "MetadataDate" -> DateObject[{2019, 10, 31, 13, 45, 13.}, "Instant", "Gregorian", 1.], "ModifyDate" -> DateObject[{2019, 10, 31, 13, 45, 13.}, "Instant", "Gregorian", 1.]|>, "MediaManagementSchema" -> <| "DocumentID" -> "adobe:docid:photoshop:f0520215-dafb-6541-81ee-d971c7a81e07", "History" -> <| "History[1]" -> <| "Action" -> "created", "InstanceID" -> "xmp.iid:33d882bb-3c1e-b34d-b276-4c878eb08eb0", "When" -> DateObject[{2019, 10, 31, 13, 45, 13}, "Instant", "Gregorian", 1.], "SoftwareAgent" -> "Adobe Photoshop CC 2019 (Windows)"|>, "History[2]" -> <| "Action" -> "saved", "InstanceID" -> "xmp.iid:9490bff3-3f14-ee4d-9b6e-9217c57667b3", "When" -> DateObject[{2019, 10, 31, 13, 45, 13}, "Instant", "Gregorian", 1.], "SoftwareAgent" -> "Adobe Photoshop CC 2019 (Windows)", "Changed" -> "/"|>|>, "InstanceID" -> "xmp.iid:9490bff3-3f14-ee4d-9b6e-9217c57667b3", "OriginalDocumentID" -> "xmp.did:33d882bb-3c1e-b34d-b276-4c878eb08eb0"|>, "RightsManagementSchema" -> <| "History" -> <| "History[1]" -> <| "Action" -> "created", "InstanceID" -> "xmp.iid:33d882bb-3c1e-b34d-b276-4c878eb08eb0", "When" -> DateObject[{2019, 10, 31, 13, 45, 13}, "Instant", "Gregorian", 1.], "SoftwareAgent" -> "Adobe Photoshop CC 2019 (Windows)"|>, "History[2]" -> <| "Action" -> "saved", "InstanceID" -> "xmp.iid:9490bff3-3f14-ee4d-9b6e-9217c57667b3", "When" -> DateObject[{2019, 10, 31, 13, 45, 13}, "Instant", "Gregorian", 1.], "SoftwareAgent" -> "Adobe Photoshop CC 2019 (Windows)", "Changed" -> "/"|>|>|>, "PagedTextSchema" -> <| "History" -> <| "History[1]" -> <| "Action" -> "created", "InstanceID" -> "xmp.iid:33d882bb-3c1e-b34d-b276-4c878eb08eb0", "When" -> DateObject[{2019, 10, 31, 13, 45, 13}, "Instant", "Gregorian", 1.], "SoftwareAgent" -> "Adobe Photoshop CC 2019 (Windows)"|>, "History[2]" -> <| "Action" -> "saved", "InstanceID" -> "xmp.iid:9490bff3-3f14-ee4d-9b6e-9217c57667b3", "When" -> DateObject[{2019, 10, 31, 13, 45, 13}, "Instant", "Gregorian", 1.], "SoftwareAgent" -> "Adobe Photoshop CC 2019 (Windows)", "Changed" -> "/"|>|>|>|>|>], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{892, 880}, PlotRange->{{0, 892}, {0, 880}}], Scaled[{0.4444559098370756, 0.5328000764634931}], Center, {0.8757699427238624, 0.6568274570428969}, {{1., 0.}, {0., 1.}}], {FaceForm[Opacity[0]], RectangleBox[{0.6528812717337287, 0.5268256333830104}, \ {0.6528812717337288, 0.5268256333830103}]}, InsetBox[ StyleBox[Cell[TextData[StyleBox["to1, \[Alpha]1", FontSize->14]], GeneratedCell->False, CellAutoOverwrite->False, CellBaseline->Baseline, TextAlignment->Left,ExpressionUUID-> "64f189f4-42f7-42dd-a964-83095abe1770"], Background->GrayLevel[ 1.]], {0.46372885641944817, 0.4601977711827453}, {Left, Baseline}, Alignment->{Left, Top}], PointBox[{0.4431880062579324, 0.4617747228718798}], PointBox[{1.0064166252690836`, 0.6099519788044374}], InsetBox[ StyleBox[Cell[TextData[StyleBox["to2, \[Alpha]2", FontSize->14]], GeneratedCell->False, CellAutoOverwrite->False, CellBaseline->Baseline, TextAlignment->Left,ExpressionUUID-> "a5ce0566-06ba-4ad2-8774-5c514fd2080c"], Background->GrayLevel[1.]], {1.027758116396172, 0.6013842345423603}, { Left, Baseline}, Alignment->{Left, Top}], InsetBox[ StyleBox[Cell[TextData[StyleBox["\[Lambda]", FontSize->14]], GeneratedCell->False, CellAutoOverwrite->False, CellBaseline->Baseline, TextAlignment->Left,ExpressionUUID-> "53e72bba-4194-4530-864a-e1eb85ca497f"], Background->GrayLevel[ 1.]], {0.5811814494568083, 0.29352939787035176}, {Left, Baseline}, Alignment->{Left, Top}], {FaceForm[Hue[0.11666666716337204`, 0.0810810774564743, 1.]], StyleBox[InsetBox[ StyleBox[Cell["t1", GeneratedCell->False, CellAutoOverwrite->False, CellBaseline->Baseline, TextAlignment->Left,ExpressionUUID-> "9781f9f8-2569-43a7-bea2-1f1fdd7d0c0b"], Background->GrayLevel[ 1.]], {0.6830601092896136, 0.5942622950819672}, {Left, Baseline}, Alignment->{Left, Top}], FontSize->14]}, StyleBox[InsetBox[ StyleBox[Cell["t2", GeneratedCell->False, CellAutoOverwrite->False, CellBaseline->Baseline, TextAlignment->Left,ExpressionUUID-> "2f577b11-7bb9-460f-bf6f-a555ca962f85"], Background->GrayLevel[ 1.]], {0.9426555551208271, 0.7167020261411199}, {Left, Baseline}, Alignment->{Left, Top}], FontSize->14], InsetBox[ StyleBox["\[IndentingNewLine]", Arrowheads->{{-0.20000000000000004`, 0, { GraphicsBox[{ EdgeForm[None], Dashing[{}], PolygonBox[{{-1.5833333333333333`, 0.4166666666666667}, {-1.5410500000000003`, 0.369283333333333}, {-1.448333333333333, 0.255583333333333}, {-1.3991000000000005`, 0.18721666666666673`}, {-1.3564666666666663`, 0.11826666666666673`}, {-1.3268499999999999`, 0.05408333333333341}, {-1.3166666666666667`, 0.}, {-1.3268499999999999`, -0.048950000000000195`}, \ {-1.3564666666666663`, -0.11228333333333372`}, {-1.3991000000000005`, \ -0.18353333333333333`}, {-1.448333333333333, -0.2562833333333335}, \ {-1.5410500000000003`, -0.38048333333333345`}, {-1.5833333333333333`, \ -0.43333333333333335`}, {0., 0.}, {-1.5833333333333333`, 0.4166666666666667}, {-1.5833333333333333`, 0.4166666666666667}}]}], 1.31}}, {0.20000000000000004`, 1, { GraphicsBox[{ EdgeForm[None], Dashing[{}], PolygonBox[{{-1.5833333333333333`, 0.4166666666666667}, {-1.5410500000000003`, 0.369283333333333}, {-1.448333333333333, 0.255583333333333}, {-1.3991000000000005`, 0.18721666666666673`}, {-1.3564666666666663`, 0.11826666666666673`}, {-1.3268499999999999`, 0.05408333333333341}, {-1.3166666666666667`, 0.}, {-1.3268499999999999`, -0.048950000000000195`}, \ {-1.3564666666666663`, -0.11228333333333372`}, {-1.3991000000000005`, \ -0.18353333333333333`}, {-1.448333333333333, -0.2562833333333335}, \ {-1.5410500000000003`, -0.38048333333333345`}, {-1.5833333333333333`, \ -0.43333333333333335`}, {0., 0.}, {-1.5833333333333333`, 0.4166666666666667}, {-1.5833333333333333`, 0.4166666666666667}}]}], 1.31}}}, LineColor->GrayLevel[0.], LineOpacity->0., EdgeOpacity->0, EdgeThickness->0.0002, FrontFaceColor->Hue[0., 0.3333333333333333, 1.], FrontFaceOpacity->0.6, Thickness->0.0002, DrawEdges->True], Scaled[{0.5, 0.5}], Center], InsetBox[ StyleBox["\[IndentingNewLine]", LineColor->GrayLevel[0.], LineOpacity->0.5, EdgeColor->RGBColor[0., 0., 0.], EdgeOpacity->0., EdgeThickness->0.0002, FrontFaceColor->Hue[0., 0.3333333333333333, 1.], FrontFaceOpacity->0.6, Thickness->0.05000000000000002, DrawEdges->True], Scaled[{0.5, 0.5}], Center], {Thickness[0.0003467368504525313], JoinForm[{"Miter", 20.}], Arrowheads[{{-0.03326595532940045, 0., { GraphicsBox[{ EdgeForm[None], Dashing[{}], { PolygonBox[{{-1, 0.5}, {0, 0}, {-1, -0.5}}], LineBox[{{0, 0.5}, {0, -0.5}}]}}], 0.98}}, { 0.03326595532940045, 1, { GraphicsBox[{ EdgeForm[None], Dashing[{}], { PolygonBox[{{-1, 0.5}, {0, 0}, {-1, -0.5}}], LineBox[{{0, 0.5}, {0, -0.5}}]}}], 0.98}}}], StrokeForm[Opacity[ 1.]], EdgeForm[{GrayLevel[0.], Opacity[1.], Thickness[ 0.05000000000000002], Dashing[{Medium, Medium}], JoinForm[{"Miter", 20.}]}], FaceForm[{Hue[0., 0.3333333333333333, 1.], Opacity[0.6]}], ArrowBox[{{0.1789133897966344, 0.5240790753214479}, { 0.3345486356982731, 0.5240790753214479}}]}, {FaceForm[Hue[0.4055555462837219, 1., 0.43613287806510925`]], StyleBox[InsetBox[ StyleBox[Cell["d", GeneratedCell->False, CellAutoOverwrite->False, CellBaseline->Baseline, TextAlignment->Left,ExpressionUUID-> "75cf3c46-8d34-4e65-acf2-6fe35d0f1c83"], Background->GrayLevel[ 1.]], {0.2519627789297927, 0.5578977895452202}, {Left, Baseline}, Alignment->{Left, Top}], FontSize->14]}, PointBox[{0.5401978428994313, 0.3071070272459674}], PointBox[{0.9098197634231866, 0.7092767636250688}], PointBox[{0.7536973277514729, 0.6344840945958341}]}, AspectRatio->1.0569992146822556`, ContentSelectable->True, ImageMargins->{{14.545454545454618`, 12.727272727272918`}, { 12.727272727276159`, 10.000000000001819`}}, ImagePadding->{{0., 0.}, {0., 0.}}, ImageSize->{327.27272727272833`, 350.0000000000017}, PlotRange->{{0., 1.3333333333333335`}, {0., 1.}}, PlotRangePadding->Automatic], ";"}]}]}]], "Input", CellChangeTimes->{{3.781274402494996*^9, 3.7812746321087217`*^9}, { 3.781274671582957*^9, 3.7812746984792137`*^9}, {3.78127475727633*^9, 3.78127477527776*^9}, {3.7812748853898287`*^9, 3.781274885644147*^9}, { 3.781274953597933*^9, 3.7812750012305913`*^9}, {3.781275034772085*^9, 3.781275202475691*^9}, {3.7812752459004374`*^9, 3.781275275238923*^9}, { 3.781275316972007*^9, 3.7812753726207523`*^9}, {3.78127541185371*^9, 3.7812754129876757`*^9}, {3.7812755725884624`*^9, 3.781275765802644*^9}, { 3.781275799810896*^9, 3.781275892315818*^9}, {3.781276003308543*^9, 3.781276007691413*^9}, {3.7812760542509513`*^9, 3.781276063234455*^9}, { 3.7812761187476068`*^9, 3.7812761235458913`*^9}, {3.781276154700401*^9, 3.7812767519300165`*^9}, {3.781276807449324*^9, 3.78127683087751*^9}, { 3.7812770746013055`*^9, 3.7812771024298525`*^9}, {3.7812771513108373`*^9, 3.7812773455253286`*^9}, {3.781277395128484*^9, 3.7812774671304064`*^9}, { 3.7812775031485987`*^9, 3.7812776156561728`*^9}, {3.781277648843021*^9, 3.7812776641687307`*^9}, {3.7812777449543004`*^9, 3.781277787177043*^9}, { 3.7813594534602227`*^9, 3.781359458613465*^9}, {3.781359577897438*^9, 3.781359605109664*^9}, {3.7814059535215597`*^9, 3.781405962648141*^9}, { 3.781406079684001*^9, 3.7814060831247935`*^9}, 3.78140623390736*^9, { 3.7814062668751516`*^9, 3.7814064515261*^9}, {3.7814071885894756`*^9, 3.781407204187742*^9}, {3.781412524860113*^9, 3.7814125627899647`*^9}, { 3.7814125987547145`*^9, 3.781412714152316*^9}, {3.781500349874951*^9, 3.7815003501950946`*^9}, {3.7815118029830494`*^9, 3.7815119540362425`*^9}, {3.7815120033815384`*^9, 3.781512190134383*^9}, { 3.781512243010417*^9, 3.781512370645626*^9}, {3.7815124023973913`*^9, 3.7815124025818977`*^9}, {3.781512437705722*^9, 3.781512438437765*^9}, { 3.781512491895745*^9, 3.7815125284350357`*^9}, {3.7815125894069867`*^9, 3.7815126246626005`*^9}, {3.781512655958696*^9, 3.781512658181753*^9}, { 3.7815127128237615`*^9, 3.781512720645195*^9}, 3.7815127685812516`*^9, { 3.781513204198587*^9, 3.7815132956881266`*^9}, {3.7815134079262815`*^9, 3.7815135729703813`*^9}, 3.78151369795213*^9, {3.7815137437511764`*^9, 3.7815138439726505`*^9}, {3.7815138760218678`*^9, 3.781513899939099*^9}, { 3.781514116309124*^9, 3.781514138315786*^9}, 3.7815142511633005`*^9, { 3.78151428974716*^9, 3.781514303073243*^9}, {3.781514335393607*^9, 3.7815143782120347`*^9}, {3.781514423128455*^9, 3.7815144323464365`*^9}, { 3.7815147333665752`*^9, 3.7815148993353243`*^9}, {3.8539171175864863`*^9, 3.8539171325577908`*^9}, {3.856402619869215*^9, 3.856402648225977*^9}, { 3.8575658171277437`*^9, 3.8575658739082603`*^9}}, CellLabel->"In[15]:=",ExpressionUUID->"6ec21ccb-4a1c-465f-980f-6343d97e8f12"], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`d$$ = 0.1, $CellContext`r1$$ = 0.1, $CellContext`t1$$ = 50, $CellContext`t2$$ = 10, $CellContext`to1$$ = 30, $CellContext`to2$$ = 10, $CellContext`\[Alpha]1$$ = 10, $CellContext`\[Alpha]2$$ = 10, $CellContext`\[Lambda]$$ = 10, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{{ Hold[$CellContext`r1$$], 0.1}, 0.01, 10}, {{ Hold[$CellContext`d$$], 0.1}, 0.01, 10}, {{ Hold[$CellContext`to1$$], 30}, 10, 1500}, {{ Hold[$CellContext`t1$$], 50}, 10, 1500}, { Hold[$CellContext`\[Alpha]1$$], 10, 500}, { Hold[$CellContext`\[Lambda]$$], 10, 500}, { Hold[$CellContext`\[Alpha]2$$], 10, 500}, { Hold[$CellContext`t2$$], 10, 500}, { Hold[$CellContext`to2$$], 10, 500}}, Typeset`size$$ = { 628., {131., 137.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`d$$ = 0.1, $CellContext`r1$$ = 0.1, $CellContext`t1$$ = 50, $CellContext`t2$$ = 10, $CellContext`to1$$ = 30, $CellContext`to2$$ = 10, $CellContext`\[Alpha]1$$ = 10, $CellContext`\[Alpha]2$$ = 10, $CellContext`\[Lambda]$$ = 10}, "ControllerVariables" :> {}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot[{($CellContext`t1$$ Log[$CellContext`r] - $CellContext`t2$$ Log[$CellContext`r] + $CellContext`t2$$ Log[$CellContext`r1$$] - $CellContext`t1$$ Log[$CellContext`r2])/( Log[$CellContext`r1$$] - Log[$CellContext`r2]), ((-$CellContext`t1$$) \ $CellContext`\[Lambda]$$ + $CellContext`r2 $CellContext`t1$$ $CellContext`\ \[Alpha]2$$ Log[$CellContext`r] - $CellContext`r2 $CellContext`to2$$ \ $CellContext`\[Alpha]2$$ Log[$CellContext`r] + $CellContext`r2 $CellContext`to2$$ \ $CellContext`\[Alpha]2$$ Log[$CellContext`r1$$] - $CellContext`r2 $CellContext`t1$$ \ $CellContext`\[Alpha]2$$ Log[$CellContext`r2])/(-$CellContext`\[Lambda]$$ + $CellContext`r2 \ $CellContext`\[Alpha]2$$ Log[$CellContext`r1$$] - $CellContext`r2 $CellContext`\[Alpha]2$$ Log[$CellContext`r2]), ((-$CellContext`t2$$) \ $CellContext`\[Lambda]$$ - $CellContext`r1$$ $CellContext`t2$$ $CellContext`\ \[Alpha]1$$ Log[$CellContext`r] + $CellContext`r1$$ $CellContext`to1$$ \ $CellContext`\[Alpha]1$$ Log[$CellContext`r] + $CellContext`r1$$ $CellContext`t2$$ \ $CellContext`\[Alpha]1$$ Log[$CellContext`r1$$] - $CellContext`r1$$ $CellContext`to1$$ \ $CellContext`\[Alpha]1$$ Log[$CellContext`r2])/(-$CellContext`\[Lambda]$$ + \ $CellContext`r1$$ $CellContext`\[Alpha]1$$ Log[$CellContext`r1$$] - $CellContext`r1$$ $CellContext`\[Alpha]1$$ Log[$CellContext`r2]), ((-$CellContext`r1$$) $CellContext`to1$$ \ $CellContext`\[Alpha]1$$ $CellContext`\[Lambda]$$ - $CellContext`r2 \ $CellContext`to2$$ $CellContext`\[Alpha]2$$ $CellContext`\[Lambda]$$ + \ $CellContext`r1$$ $CellContext`r2 $CellContext`to1$$ $CellContext`\[Alpha]1$$ \ $CellContext`\[Alpha]2$$ Log[$CellContext`r] - $CellContext`r1$$ $CellContext`r2 \ $CellContext`to2$$ $CellContext`\[Alpha]1$$ $CellContext`\[Alpha]2$$ Log[$CellContext`r] + $CellContext`r1$$ $CellContext`r2 \ $CellContext`to2$$ $CellContext`\[Alpha]1$$ $CellContext`\[Alpha]2$$ Log[$CellContext`r1$$] - $CellContext`r1$$ $CellContext`r2 \ $CellContext`to1$$ $CellContext`\[Alpha]1$$ $CellContext`\[Alpha]2$$ Log[$CellContext`r2])/((-$CellContext`r1$$) \ $CellContext`\[Alpha]1$$ $CellContext`\[Lambda]$$ - $CellContext`r2 \ $CellContext`\[Alpha]2$$ $CellContext`\[Lambda]$$ + $CellContext`r1$$ \ $CellContext`r2 $CellContext`\[Alpha]1$$ $CellContext`\[Alpha]2$$ Log[$CellContext`r1$$] - $CellContext`r1$$ $CellContext`r2 \ $CellContext`\[Alpha]1$$ $CellContext`\[Alpha]2$$ Log[$CellContext`r2])}, {$CellContext`r, $CellContext`r1$$, \ $CellContext`r1$$ + $CellContext`d$$}, Frame -> True, FrameLabel -> {{"teplota [\[Degree]C]", ""}, { "d [m]", "Cylindrical wall (CW)"}}, PlotLegends -> { "CW is known: t1, t2", "CW is known: t1, \[Alpha]2, to2", "CW is known: to1, \[Alpha]1, t2", "CW is known: to1, \[Alpha]1, \[Alpha]2,to2"}], "Specifications" :> {{{$CellContext`r1$$, 0.1}, 0.01, 10, ControlType -> Slider, Appearance -> "Labeled"}, {{$CellContext`d$$, 0.1}, 0.01, 10}, {{$CellContext`to1$$, 30}, 10, 1500}, {{$CellContext`t1$$, 50}, 10, 1500}, {$CellContext`\[Alpha]1$$, 10, 500}, {$CellContext`\[Lambda]$$, 10, 500}, {$CellContext`\[Alpha]2$$, 10, 500}, {$CellContext`t2$$, 10, 500}, {$CellContext`to2$$, 10, 500}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{976., {163., 170.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UndoTrackedVariables:>{Typeset`show$$, Typeset`bookmarkMode$$}, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{ 3.7838309790029483`*^9, 3.783831022995488*^9, {3.853914015793827*^9, 3.8539140287484293`*^9}, {3.8539171378699856`*^9, 3.8539171491701603`*^9}, {3.853919029418622*^9, 3.8539190577552185`*^9}, 3.8564025510902233`*^9, 3.857565795340687*^9, 3.857565876934054*^9}, CellLabel->"Out[24]=",ExpressionUUID->"e4e02526-b10b-460a-9290-1722ddc188b2"] }, Open ]] }, WindowSize->{Full, Full}, WindowMargins->{{1834, Automatic}, {Automatic, -1}}, Magnification:>1.1 Inherited, FrontEndVersion->"13.0 for Mac OS X ARM (64-bit) (February 4, 2022)", StyleDefinitions->"Default.nb", ExpressionUUID->"7f0264a3-92fb-4f0c-953d-96827f8a1fd2" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[580, 22, 58231, 1143, 969, "Input",ExpressionUUID->"6ec21ccb-4a1c-465f-980f-6343d97e8f12"], Cell[58814, 1167, 6095, 109, 354, "Output",ExpressionUUID->"e4e02526-b10b-460a-9290-1722ddc188b2"] }, Open ]] } ] *)