(* Content-type: application/mathematica *)
(*** Wolfram Notebook File ***)
(* CreatedBy='Mathematica 6.0' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[
NotebookDataLength[
NotebookOptionsPosition[
NotebookOutlinePosition[
CellTagsIndexPosition[
WindowFrame->Normal
ContainsDynamic->False*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[CellGroupData[{
Cell["Intro to Euler methods for IVPs", "Subtitle",
CellChangeTimes->{{3.348*^9, 3.899*^9}}],
Cell[CellGroupData[{
Cell["ODEs", "Section",
CellChangeTimes->{{3.348*^9, 3.059*^9}}],
Cell[BoxData[
RowBox[{"euler", "[",
RowBox[{"u_", ",", "x0_", ",", "h_", ",", "n_"}], "]"}], ":=",
RowBox[{"NestList", "[",
RowBox[{"#", "+",
RowBox[{"h", " ",
RowBox[{"u", "[", "#", "]"}]}]}], "&"}], ",", "x0", ",", "n"}],
"]"}]}]], "Input",
CellChangeTimes->{{3.862*^9, 3.728*^9}, {
3.201*^9, 3.498*^9}, {3.653*^9,
3.225*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ListPlot", "[",
RowBox[{"euler", "[",
RowBox[{"Cos", ",", ".5", ",", ".1", ",", "100"}], "]"}], ",",
RowBox[{"PlotJoined", "\[Rule]", "True"}], ",",
RowBox[{"AspectRatio", "\[Rule]", "1"}], ",",
RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]], "Input",
CellChangeTimes->{{3.056*^9, 3.755*^9}, {
3.196*^9, 3.6813`*^9}, {3.735*^9,
3.937*^9}, {3.652*^9, 3.4707`*^9}}],
Cell[BoxData[
GraphicsBox[{{}, {},
{Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJw9i31Q0wUYx3FBiKgIx3STl22+AcohKMbLxvjCHDBex8bG6MrzzJ1CEBOl
UKIAKQUSvALEQjGhQVEZXfwBSRJ3JUzGwXG+kBkc5up4URgoYhB59nt+z91z
z33u83xU2QdEehsbG87zfXHDp21eTPjo/xc2DI/1jx9y2LYJKxl+kNeYkTsw
inUM//UMhpmOOrgyPK5atfiopBU8hiffT3cyruiEO8MPi7/e2ZvhBiHD035H
IkyJ1djE8Iz90L/y+WVsIe4vsL7REYNtDFtPVsQGOUjhzfCsd6BVGuSL7cSd
TS6t7afgy/CcfP2x/W2O8CO+1vIaP+8e/Bl+7Feof0nqjwDij+vHL0kSsIt4
ivN5n6EUuxl+Iq1cZ/QXIZD4NP+LfattsYfYpA/1jzThFYbnX948agqMRxCx
eH6YO/kDgokzj9Wvti1GCHGtcIVTw2WEEl87GtjnkAIx8djd+799Vw8Jw085
nTssB28hjFhgqOzi3oOUOCTqDq/3PMKJlafv59hbAGJ9nj5raxlQyHCessZO
XIII8qVRgwV/NCOCfG25z9wZCSLJG2MmqnwFiCT/fZPrW+eSICPf2dO1eMgC
Gfnr5oqQxg+wl/zAoFUhNmIv+TuPPjqR0Qw5+dGwrPy6QMjJWwZ0b5d7Ior8
ZMdS9xo9oshb1+68vpmPaPJPhl2ap3wQTf4fn+hdoinEkF92dH7vxIeIYfwC
pzT/RpYUCsYv2H2bO5iUCQX5lcXTi5dliCXvuHbhVp8CseTXpPU/+LUBceSd
0h/LIpcRR95ZHrc114p48i4zvDNzzogn75rjmTAyiwTy3L6G0qdKJJDfYFv0
590CJJLnefjn2H2FRPJ8vvls/QUkkecveZk2diOJ/MbeX8xmPpTk3YqmLkns
oQTD7l4tLkXvQkn/7ldvVvkuQNnFsIeMa/B1QjL1Hj/+ffKiCcnUe3ob85fr
kEy9Z1lJ85V9SKbec+x8xs+vQkW9IGAk3pwNFfWC40E3qqRQUS9oz7q9fzdU
1Atmg7myz6CmXugVarnwCdTUC7WrJC1HoKZeWLgjTHcOauqFRm7nQhVS2L5n
T63XEFLY3jLx+6kDSKFexKm0jDxn6kVuBm2NARrqRQFDDzXD0FAvkj97PakV
GrbXuc8dTIaG7Q9nK7YXQMv27wh6vpyBlu1LdOL0FmjZ/qxUoqiGlu0/nW04
Xo9Utm+ssfxUhlS2/0ZmWC9GKtu3OU+0LiOV7a/yKrZchI7tu99Ul5uhY/se
9+DDV6Bje7M4s3cDdGw/eLtY7Yw0tr+5VN3WhDS2H24/Otf7H/654eE=
AspectRatio->1,
Axes->True,
AxesOrigin->{0, 0.0001},
PlotRange->{All, All},
PlotRangeClipping->True,
PlotRangePadding->{Automatic, Automatic}]], "Output",
CellChangeTimes->{3.8887`*^9, 3.394*^9},
ImageCache->GraphicsData["CompressedBitmap", "\"]]
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ListPlot", "[",
RowBox[{"euler", "[",
SuperscriptBox["#", "3"], "&"}], ",", ".5", ",", ".1", ",", "10"}],
"]"}], ",",
RowBox[{"PlotJoined", "\[Rule]", "True"}], ",",
RowBox[{"AspectRatio", "\[Rule]", "1"}], ",",
RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]], "Input",
CellChangeTimes->{{3.056*^9, 3.755*^9}, {
3.196*^9, 3.6813`*^9}, {3.735*^9,
3.937*^9}, {3.652*^9, 3.4707`*^9}, {
3.7892`*^9, 3.615*^9}}],
Cell[BoxData[
GraphicsBox[{{}, {},
{Hue[0.67, 0.6, 0.6],
LineBox[{{1., 0.5}, {2., 0.5125}, {3., 0.5}, {4.,
0.4854}, {5., 0.3147}, {6.,
0.6675}, {7., 0.9738}, {8.,
0.4986}, {9., 0.4107}, {10.,
0.0971}, {11., 0.8881}}]}},
AspectRatio->1,
Axes->True,
AxesOrigin->{0, 0.5},
PlotRange->{All, All},
PlotRangeClipping->True,
PlotRangePadding->{Automatic, Automatic}]], "Output",
CellChangeTimes->{{3.925*^9, 3.435*^9}},
ImageCache->GraphicsData["CompressedBitmap", "\"]]
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ListPlot", "[",
RowBox[{"euler", "[",
SuperscriptBox["#", "3"], "&"}], ",", ".5", ",", ".1", ",", "25"}],
"]"}], ",",
RowBox[{"PlotJoined", "\[Rule]", "True"}], ",",
RowBox[{"AspectRatio", "\[Rule]", "1"}], ",",
RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]], "Input",
CellChangeTimes->{{3.056*^9, 3.755*^9}, {
3.196*^9, 3.6813`*^9}, {3.735*^9,
3.937*^9}, {3.652*^9, 3.4707`*^9}, {
3.7892`*^9, 3.521*^9}, {3.9123`*^9,
3.354*^9}}],
Cell[BoxData[
GraphicsBox[{{}, {},
{Hue[0.67, 0.6, 0.6],
LineBox[{{1., 0.5}, {2., 0.5125}, {3., 0.5}, {4.,
0.4854}, {5., 0.3147}, {6.,
0.6675}, {7., 0.9738}, {8.,
0.4986}, {9., 0.4107}, {10.,
0.0971}, {11., 0.8881}, {12.,
0.3477}, {13., 0.2693}, {14.,
0.6209}, {15., 0.217}, {16.,
0.2971}, {17., 1.4788`}, {18.,
1.2587`}, {19., 1.482}, {20.,
1.5313`}, {21., 1.7836`}, {22.,
2.032}, {23., 3.687}, {24., 6.142}, {
25., 38.35}, {26., 12611}}]}},
AspectRatio->1,
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{All, All},
PlotRangeClipping->True,
PlotRangePadding->{Automatic, Automatic}]], "Output",
CellChangeTimes->{{3.606*^9, 3.601*^9},
3.963*^9}]
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DSolve", "[",
RowBox[{"{",
RowBox[{"x", "'"}], "[", "t", "]"}], "\[Equal]",
SuperscriptBox[
RowBox[{"x", "[", "t", "]"}], "3"]}], ",",
RowBox[{"x", "[", "0", "]"}], "\[Equal]", "x0"}]}], "}"}], ",", "x",
",", "t"}], "]"}]], "Input",
CellChangeTimes->{{3.399*^9, 3.8613`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"{",
RowBox[{"x", "\[Rule]",
RowBox[{"Function", "[",
RowBox[{"{", "t", "}"}], ",",
RowBox[{"-",
FractionBox["1",
FractionBox[
RowBox[{"1", "-",
RowBox[{"2", " ", "t", " ",
SuperscriptBox["x0", "2"]}]}],
SuperscriptBox["x0", "2"]]]]}]}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"x", "\[Rule]",
RowBox[{"Function", "[",
RowBox[{"{", "t", "}"}], ",",
FractionBox["1",
FractionBox[
RowBox[{"1", "-",
RowBox[{"2", " ", "t", " ",
SuperscriptBox["x0", "2"]}]}],
SuperscriptBox["x0", "2"]]]]}], "]"}]}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{{3.223*^9, 3.1902`*^9}}]
Cell[CellGroupData[{
Cell[BoxData[
FractionBox["1",
RowBox[{"2", " ",
SuperscriptBox["x0", "2"]}]], "/.",
RowBox[{"x0", "\[Rule]",
RowBox[{"1", "/", "2"}]}]}]], "Input",
CellChangeTimes->{{3.904*^9, 3.997*^9}}],
Cell[BoxData["2"], "Output",
CellChangeTimes->{3.3222`*^9}]
Cell[BoxData[
RowBox[{"lineuler", "[",
RowBox[{"a_", ",", "x0_", ",", "h_", ",", "n_", ",", "fb_"}], "]"}], ":=",
RowBox[{"Block", "[",
RowBox[{"{",
RowBox[{"mat", "=", "\[IndentingNewLine]",
RowBox[{"Switch", "[",
RowBox[{"fb", ",", "\"\\"", ",",
RowBox[{"#", "+",
RowBox[{"h", " ", "a"}]}], ",", "\"\\"", ",",
RowBox[{"Inverse", "[",
RowBox[{"#", "-",
RowBox[{"h", " ", "a"}]}], "]"}], ",", "_", ",",
"Message", "[", "\"\\"", "]"}],
";", "#"}]}], "]"}], "&"}], "[",
RowBox[{"IdentityMatrix", "[",
RowBox[{"Length", "[", "a", "]"}], "]"}], "]"}]}], "}"}], ",",
RowBox[{"NestList", "[",
RowBox[{"mat", ".", "#"}], "&"}], ",", "x0", ",", "n"}], "]"}]}],
"]"}]}]], "Input",
CellChangeTimes->{{3.862*^9, 3.918*^9}, {
3.965*^9, 3.1123`*^9}, {3.929*^9,
3.324*^9}, {3.102*^9, 3.961*^9}, {
3.505*^9, 3.776*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ListPlot", "[",
RowBox[{"lineuler", "[",
RowBox[{"{",
RowBox[{"{",
RowBox[{"0", ",",
RowBox[{"-", "1"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "0"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "0"}], "}"}], ",", ".1", ",", "100", ",", "#"}],
"]"}], "&"}], "/@",
RowBox[{"{",
RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}], ",",
RowBox[{"PlotJoined", "\[Rule]", "True"}], ",",
RowBox[{"AspectRatio", "\[Rule]", "1"}]}], "]"}]], "Input",
CellChangeTimes->{{3.056*^9, 3.755*^9}, {
3.196*^9, 3.6813`*^9}}],
Cell[BoxData[
GraphicsBox[{{}, {},
{Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJxVk3s41IkexkfZjpRctpK71MTmVk6hlG+My9pJRbXtyuK4Ha2i2DhsSEqN
y7HLJkWSUFsat1iyfKPQRWISM60yF2MYg/nNmBnjUtue59k/zvs87/M+n/eP
97/XNzp4fRiJRFryyf9LEJP+T38zNF39S9dgmr46keNJh2d/s/ruk7cG1eG1
WS8/yCUDptbsLQhcJgfWN1rB3gwJiP6qaQ4w7O8rsL65ASYgsb/2B3/g5rAW
7RUjMB5Kjco7mgt8r3D3KvuHIKD49agM6IHg9YneFulaGOEcO35493MQbpLz
jzTXApciPByuHQmi3aknrVfdh/ecybnHJgKY0l43bHRXFZjvz10Th3rDdFFo
h8tn9sDIUtNYm38axCf8V45eMIIuaWecS84OEI9oxpZUecADjsZLgxuFQGyp
Xy8QxOO1swfUFV/JgfA1clhgx2Gb5aFfcooIIDzTkgN4Euz5sNHqj/SzQGjl
RjfULOCAb8pQwyCA+H6YrfmmBzj0wWU6z3s9iI0vheyyMUFOY3SMGncRpp5J
2SNbF3Ck+2aUKDUfJlX3m3k94KGgLo6cnfg5CKeZV+xWHUJh2Ioed3o9jP2s
l3ey3hdFrJnH32eXAX8yzG7pEQ2cXkGl93llAU+9u1HnSx6KE0I8l1pEwjB7
w2hXmhYS7qFWT8lUYHnZhihj+EgIHHM85wOAEVQy8WvIHEr8B2w6+rShM4q+
NaUgDiVlxe1XjgUCfXZFyIWAKJS0hNnp74zHyuojKywl7SipONXkllSPnZtJ
Ph4Bd1ESeH4itigdGRldkPmvYiTGWLShyS+RNWJ7valkJxIUMnniTCKyL2oZ
lV61QnH0lYyB/0Yib27km0jqPZwarmGVBuugwO2YxrMIcxRlabTeHryDQr+u
W1lMfxwfD7LZK3PEye2Xex12PsTRxesfOWoSnO4WOTmLWMh7lR7k16qJxMpW
VdUDCcgOz8t95PkTStR9Lr2p6ELW5deHLfUcUDIEB6y02pChnt5Tp5OG0pQP
dt4b8/HJj6dPW0SZo1T6wxO3PhaWrlF2ztbW4My2j2+am0rgN69X5dVL/sAZ
Snxvm3cwvHjL8ShnTuOM8TbhRLgC3igv9OieWYXSDh395Ydc4B1HGmPgcBSl
jlFtVRv9gPtMc/j5riyUJNjqqGk+gdHE0bUFFfpIXGr+vOzbDBhfKNdP9ylC
ccRC4H7hAEy6DeYt1HXhlGO9Wse1AyAmu5SpOW3DCepxj46p34E4V3I717QF
x7Q6sr7j8kHScPfSluNrcOQnUI0d+hakLWzu0qWjyGYYjtsrp2Dmsq3p8Hd2
yGqtvLcjcxRkO6SnZkg12JdGcrhPcgTZ3WUVmRf1sF190DPk6hmQ8dqJ5bnF
GPeoXLs24RHIRpf/m2jVhkfdi1vZP+qCrNpjdyPtEPRZjLWf32AFMtfYG65q
scB603dHZdMYzFw3sHFVWQ0cy3C/PfOZIG37WotsXgf8rxhb9tnIQVL9Ivsh
MxvGnb1emn2vD8QJOiXBdCWI5mE/J9gepmXRL9oNK0Hs9JxerWIIogZP18gG
DSD63+kk1LfCOHmfc9MTAUjdgkoLald+2u0/X7iTDzPpzuTmy8nAsZ33GjL8
CLL8px3yzFvAaoH3ZhE0kMc8pd2WJkFvO21P5T82gkI37fclx7yhVbextHIP
BxTnujafMKRjsR7Vp1TgDIraSeOy/CrsbKwbN45eBYoKHilt2gT7GfuObg6Z
A0WAdfbVGTN8b2kdVGilBnLmRIEJdRfybgdGHGRSQK476JraS8MxnYzTN1Vm
QWboXp1049N/qWF26VOlIB0jby6cZaB4w37hQa1/giRJ+YC7LAmJhfqqoncV
IGYzjWJ97qG08sVei7A+mLJA3S5KD8ps+t+ScwpBuCPECW1PoTz5rH3zxC/A
X2BQfNxFqLhCmKbMs4GTZPKZZXUEzsZ3e1r8nAKsDMrikeA4VBq4WCdJZfAq
NdnCXGiKyrM6bVsruNAwGNR/UL8RlWXFOb6Wb7FGRpsLblmHyovclKPm/8GX
yfHLYw2cUPlF6pKTRheRKcs31nZQwVna4ztr17QhJ22d5oWo7aj4tUijvtcZ
RyNjQr8ub0d5xi0z6uo2nNg0S6Jv7/kTBpxgmw==
{Hue[0., 0.6], LineBox[CompressedData["
1:eJxVxX08FIYfwPFr9Kq2aKUoktOp6VQ6y0PZ+tKkEvNQK4d57iSjQiibRPop
EV3r4Tez3I4rx3nKUeTr4WaRbZ7OyT1wz3ecHkgW0vb6/ff7vF7v18fvVLjl
cQKB8NG//nd4Rfi/4CVHseFk4h145M9Na8w/Dy8N92c1vq+CzrXJwr03zeEF
8Wpv4EwG9N1oNklPvQ46TfeqvIXNMBSg0uil7oDxk+Jl3yW6gXiwnFvzGxO0
bMfKbV7xIP3+7OXkS2RQc15/TsqzAflwy1BYylNQprKvuzE9QEVooNVt/Avk
JlmiyIZ8UGtT5tHeDUavfFKw5GAOaPM7XpcedQIhZ1/lTHEGjE2Z7I6vV8Lg
yjeBHK8R0BncKolj7ICeQ2Pjp0tLQSexpex0swDe4MnhQkyDiYicJHZ4BlTP
Td+VdD+HiZ/XbqQEs/HW3T+DDLfsgokcvR9Mda+waYHBJ56qhYntzgbMDc3Y
qV0dwCATQZcd5b9VXIV95zdcDXauhPGflL2uraYoaJO0MovIMBbTujpEdxxF
bQSYplJBM8dKprMmcLSus3GWlAlq71GTWWYoyoa954Qu60EZuyftmfkMKjqL
ZHFnSSCnrlnUssoFVRe+kSl5QSBdt1n/wVpHVM9UZx7JNQBxlHU2q6IPtbZ0
f8b8dhj6lllG5NzCMavsQ+rvnkI/ibTIv3sJjg38YX4npgyeXW1pZ/VH4Dj4
WhR+4wgtzHs+hWnrcDyintQvU0EptjEacqk4vvdIsXf7emSKC27QJUtxTGRr
LJuRIY43un7IsMAxuxmu9dt57DrNMv+UJETtwcW0I5eI2Of+4os77z5DjaWX
nfUvy1BgGmkUq2xHFVKdvCREFLJWZJms2oHKz/Y4ta85jCMys7eCKgOUf3td
HKUKRenoXwXX+ckojTosyfFrR3nRsTc/86xQQtd4Ta5/jMpNT2y47FkcNg7d
HWbshqqE+2F8ogfyw03jk/t6UZ0VpM7zdcaezDyLD/Zfosb/SWGgkQJ/N5yb
8YypRI3Op65pfh4fjQfxJ2NtUAuukh79Frz1QD+A48VCrW945dp8CpTLWygL
4IJa0pbUH0O6odXMXkyIDUJNHefK3i1i6Hq0KtvLl4eaj1nlLs6Lofd9dLPn
sVJUW4WHN0UPwmDktKBg6DGqFjelBWbRYDj75otElQgVNWbxp9zvgyT47Amr
yF9Qvi08NDaxH0Zf9P5Bn0tFaarqw0phBcgurNhcU5uGI25db2mhriAXJR4S
LTZE4SGVenfIHlDqL7+0TbAEBSYKWmTUaVBOxU8eX87FvoeEQh9KDajuC3Yx
fCax+xjb8saDaFCTCEV6Edew3Ti5kqxeAHWYd+FcThfWplRWXKMHgDriyfu9
NAc84d3Gy7Z7CGqyOMDIswyqO+wW6ucQVPUDlP2H86H1XVyIRLcOVMupFy7/
aQ1dz2w6Vg9tASWZ8y6IlgC9xX6pPqZbQbHm7pRfgj/wS5gpHQufgKwn0DDG
rQKen9DKVpSEgTSY2Wq7MQlEsj1La8r3wcgVy6oQnQOM6v++bqbxGogMyMbn
3ihAGjO46IeB2zDkN5FrfLgDZL9u50xuugkDkd8X/NdcCvL7O7WxBuegx9Pv
zCaHblCk9DEOZJ6Ep+QE3510LiiNUse49+oArXGJ4OxyUCZTLjps+BvYNfub
0glOoPz14tR7v62YE5t5wIT+BSjvXKEaVVrhw/RlXMv6fFAefXmPlhSPbXfp
EgsdAxQjyv+UlFliF6d/mreyExT2RGfTIBn22s82fGpmB3L//mpV4GUcGDE3
9vzNEmRebIGtLxuHPFbu1N8XDVJj3s0fL9JQGNf1t8P6eBg55fpgkhaAEnf9
KpqOAKITrhSNWS6ORrJ4Lu8+wHOi7oyh9xRKz+WLbD1vA59hLylK4KMs5IxV
pOcF6J3OYpIWNqJ89bmt1q4Z0H3Q1aHoQBLKb1PVwcky4CWYu6SkaVCudn/s
+zVCw+yicfkmR1TovbWvSqJC8USFWUrLPpRPFF9y0v8af9KKB/NyAeUlH+W1
NZ9GbnX5wxL+Vyi38ZG0enpgu157+i7+JMoyvvQgvz6CXTErHNMczqOUrUua
ihNiT7NP+lFKNI6WvXIXX/sKB4xqW+tqxf8AQlteAQ==
AspectRatio->1,
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-1.2546`,
1.564}, {-1.9528`, 1.7767`}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{3.3027`*^9, 3.9953`*^9},
ImageCache->GraphicsData["CompressedBitmap", "\"]]
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"lineuler", "[",
RowBox[{"{",
RowBox[{"{",
RowBox[{"0", ",",
RowBox[{"-", "1"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "0"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "0"}], "}"}], ",", ".1", ",", "100", ",",
"\"\\""}], "]"}]], "Input",
CellChangeTimes->{{3.999*^9, 3.291*^9},
3.3233`*^9, {3.547*^9, 3.459*^9}, {
3.697*^9, 3.531*^9}, {3.515*^9,
3.222*^9}, 3.4577`*^9}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"{",
RowBox[{"1", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1.`", ",", "0.1`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.99`", ",", "0.2`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.97`", ",", "0.00004`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.9999`", ",", "0.396`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.9005`", ",", "0.49001`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.851499`", ",", "0.58006`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.793493`", ",", "0.6652099`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.`", ",", "0.0001`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.`", ",", "0.0001`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.9999`", ",", "0.0001`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.99995`", ",", "0.0001`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.99997`", ",", "0.0001`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.99994`", ",", "1.1`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.98993`", ",", "1.4`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.84992`", ",", "1.499`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"-", "0.199993`"}], ",", "1.984`"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"-", "0.7984`"}], ",", "1.864`"}], "}"}],
RowBox[{"{",
RowBox[{"-", "0.58483`"}], ",", "1.9843`"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"-", "0.1833`"}], ",", "1.3258`"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"-", "0.1159`"}], ",", "1.5074`"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"-", "0.7666`"}], ",", "0.7958`"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"-", "0.2462`"}], ",", "0.7191`"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"-", "0.4181`"}], ",", "0.2945`"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"-", "0.1475`"}], ",", "0.3527`"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"-", "0.1828`"}], ",", "0.038`"}], "}"}],
RowBox[{"{",
RowBox[{"-", "0.3867`"}], ",", "0.0197`"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"-", "1.8887`"}], ",", "0.281`"}], "}"}],
RowBox[{"{",
RowBox[{"-", "1.9167`"}], ",", "0.89213`"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"-", "1.706`"}], ",", "0.70046`"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"-", "1.676`"}], ",", "0.62987`"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"-", "1.639`"}], ",", "0.062264`"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"-", "1.145`"}], ",",
RowBox[{"-", "0.10163`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"-", "1.135`"}], ",",
RowBox[{"-", "0.81616`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"-", "1.3533`"}], ",",
RowBox[{"-", "0.1297`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"-", "1.3403`"}], ",",
RowBox[{"-", "0.165`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"-", "1.2238`"}], ",",
RowBox[{"-", "0.7991`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"-", "1.044`"}], ",",
RowBox[{"-", "0.5215`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"-", "0.9918`"}], ",",
RowBox[{"-", "0.4259`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"-", "0.8492`"}], ",",
RowBox[{"-", "0.4251`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"-", "0.3067`"}], ",",
RowBox[{"-", "0.1101`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"-", "0.1956`"}], ",",
RowBox[{"-", "0.2407`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"-", "0.8715`"}], ",",
RowBox[{"-", "1.0604`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"-", "0.4654`"}], ",",
RowBox[{"-", "1.1476`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"-", "0.6507`"}], ",",
RowBox[{"-", "1.394`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"-", "0.01125`"}], ",",
RowBox[{"-", "1.4593`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"-", "0.1653`"}], ",",
RowBox[{"-", "1.0603`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"-", "0.75927`"}], ",",
RowBox[{"-", "1.2769`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.16842`", ",",
RowBox[{"-", "1.9528`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.3637`", ",",
RowBox[{"-", "1.936`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.1573`", ",",
RowBox[{"-", "1.9996`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.75726`", ",",
RowBox[{"-", "1.4838`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.2056`", ",",
RowBox[{"-", "1.408`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.2464`", ",",
RowBox[{"-", "1.2874`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.1752`", ",",
RowBox[{"-", "1.263`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.5015`", ",",
RowBox[{"-", "0.5454`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"1.956`", ",",
RowBox[{"-", "0.8953`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"1.5454`", ",",
RowBox[{"-", "0.5997`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"1.9053`", ",",
RowBox[{"-", "0.5452`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"1.3598`", ",",
RowBox[{"-", "0.7546`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"1.5353`", ",",
RowBox[{"-", "0.6186`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"1.397`", ",",
RowBox[{"-", "0.86505`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"1.4836`", ",",
RowBox[{"-", "0.62534`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"1.6462`", ",",
RowBox[{"-", "0.176968`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"1.564`", ",", "0.48766`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1.2152`", ",", "0.64406`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1.4509`", ",", "0.66563`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1.3844`", ",", "0.5107`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1.5332`", ",", "0.0492`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1.1283`", ",", "0.2026`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1.108`", ",", "0.3154`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.3765`", ",", "1.6261`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.5139`", ",", "1.2637`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.4876`", ",", "1.4153`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.1461`", ",", "1.064`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.8397`", ",", "1.1786`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.5218`", ",", "1.0627`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.3155`", ",", "1.1148`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.30403`", ",", "1.9464`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"-", "0.590617`"}], ",", "1.7767`"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"-", "0.2683`"}], ",", "1.7176`"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"-", "0.2401`"}], ",", "1.4907`"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"-", "0.28917`"}], ",", "1.8668`"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"-", "0.6758`"}], ",", "1.238`"}], "}"}],
RowBox[{"{",
RowBox[{"-", "0.7996`"}], ",", "1.9703`"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"-", "0.4966`"}], ",", "1.5902`"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"-", "1.6557`"}], ",", "1.1405`"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"-", "1.7698`"}], ",", "1.875`"}], "}"}],
RowBox[{"{",
RowBox[{"-", "1.1574`"}], ",", "0.8979`"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"-", "1.947`"}], ",", "0.2822`"}], "}"}],
RowBox[{"{",
RowBox[{"-", "1.7753`"}], ",", "0.7875`"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"-", "1.9541`"}], ",", "0.51`"}], "}"}],
RowBox[{"{",
RowBox[{"-", "1.5052`"}], ",", "0.81455`"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"-", "1.4866`"}], ",", "0.66404`"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"-", "1.253`"}], ",", "0.01538`"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"-", "1.2546`"}], ",",
RowBox[{"-", "0.10992`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"-", "1.8435`"}], ",",
RowBox[{"-", "0.5354`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"-", "1.89`"}], ",",
RowBox[{"-", "0.41977`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"-", "1.848`"}], ",",
RowBox[{"-", "0.8087`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"-", "1.867`"}], ",",
RowBox[{"-", "0.4936`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"-", "1.0177`"}], ",",
RowBox[{"-", "0.7802`"}]}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{3.432*^9}]
}, Closed]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ListPlot", "[",
RowBox[{"%", ",",
RowBox[{"PlotJoined", "\[Rule]", "True"}], ",",
RowBox[{"AspectRatio", "\[Rule]", "1"}]}], "]"}]], "Input",
CellChangeTimes->{{3.056*^9, 3.1727`*^9}, {
3.013*^9, 3.582*^9}, 3.21*^9}],
Cell[BoxData[
GraphicsBox[{{}, {},
{Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJxVk3s41IkexkfZjpRctpK71MTmVk6hlG+My9pJRbXtyuK4Ha2i2DhsSEqN
y7HLJkWSUFsat1iyfKPQRWISM60yF2MYg/nNmBnjUtue59k/zvs87/M+n/eP
97/XNzp4fRiJRFryyf9LEJP+T38zNF39S9dgmr46keNJh2d/s/ruk7cG1eG1
WS8/yCUDptbsLQhcJgfWN1rB3gwJiP6qaQ4w7O8rsL65ASYgsb/2B3/g5rAW
7RUjMB5Kjco7mgt8r3D3KvuHIKD49agM6IHg9YneFulaGOEcO35493MQbpLz
jzTXApciPByuHQmi3aknrVfdh/ecybnHJgKY0l43bHRXFZjvz10Th3rDdFFo
h8tn9sDIUtNYm38axCf8V45eMIIuaWecS84OEI9oxpZUecADjsZLgxuFQGyp
Xy8QxOO1swfUFV/JgfA1clhgx2Gb5aFfcooIIDzTkgN4Euz5sNHqj/SzQGjl
RjfULOCAb8pQwyCA+H6YrfmmBzj0wWU6z3s9iI0vheyyMUFOY3SMGncRpp5J
2SNbF3Ck+2aUKDUfJlX3m3k94KGgLo6cnfg5CKeZV+xWHUJh2Ioed3o9jP2s
l3ey3hdFrJnH32eXAX8yzG7pEQ2cXkGl93llAU+9u1HnSx6KE0I8l1pEwjB7
w2hXmhYS7qFWT8lUYHnZhihj+EgIHHM85wOAEVQy8WvIHEr8B2w6+rShM4q+
NaUgDiVlxe1XjgUCfXZFyIWAKJS0hNnp74zHyuojKywl7SipONXkllSPnZtJ
Ph4Bd1ESeH4itigdGRldkPmvYiTGWLShyS+RNWJ7valkJxIUMnniTCKyL2oZ
lV61QnH0lYyB/0Yib27km0jqPZwarmGVBuugwO2YxrMIcxRlabTeHryDQr+u
W1lMfxwfD7LZK3PEye2Xex12PsTRxesfOWoSnO4WOTmLWMh7lR7k16qJxMpW
VdUDCcgOz8t95PkTStR9Lr2p6ELW5deHLfUcUDIEB6y02pChnt5Tp5OG0pQP
dt4b8/HJj6dPW0SZo1T6wxO3PhaWrlF2ztbW4My2j2+am0rgN69X5dVL/sAZ
Snxvm3cwvHjL8ShnTuOM8TbhRLgC3igv9OieWYXSDh395Ydc4B1HGmPgcBSl
jlFtVRv9gPtMc/j5riyUJNjqqGk+gdHE0bUFFfpIXGr+vOzbDBhfKNdP9ylC
ccRC4H7hAEy6DeYt1HXhlGO9Wse1AyAmu5SpOW3DCepxj46p34E4V3I717QF
x7Q6sr7j8kHScPfSluNrcOQnUI0d+hakLWzu0qWjyGYYjtsrp2Dmsq3p8Hd2
yGqtvLcjcxRkO6SnZkg12JdGcrhPcgTZ3WUVmRf1sF190DPk6hmQ8dqJ5bnF
GPeoXLs24RHIRpf/m2jVhkfdi1vZP+qCrNpjdyPtEPRZjLWf32AFMtfYG65q
scB603dHZdMYzFw3sHFVWQ0cy3C/PfOZIG37WotsXgf8rxhb9tnIQVL9Ivsh
MxvGnb1emn2vD8QJOiXBdCWI5mE/J9gepmXRL9oNK0Hs9JxerWIIogZP18gG
DSD63+kk1LfCOHmfc9MTAUjdgkoLald+2u0/X7iTDzPpzuTmy8nAsZ33GjL8
CLL8px3yzFvAaoH3ZhE0kMc8pd2WJkFvO21P5T82gkI37fclx7yhVbextHIP
BxTnujafMKRjsR7Vp1TgDIraSeOy/CrsbKwbN45eBYoKHilt2gT7GfuObg6Z
A0WAdfbVGTN8b2kdVGilBnLmRIEJdRfybgdGHGRSQK476JraS8MxnYzTN1Vm
QWboXp1049N/qWF26VOlIB0jby6cZaB4w37hQa1/giRJ+YC7LAmJhfqqoncV
IGYzjWJ97qG08sVei7A+mLJA3S5KD8ps+t+ScwpBuCPECW1PoTz5rH3zxC/A
X2BQfNxFqLhCmKbMs4GTZPKZZXUEzsZ3e1r8nAKsDMrikeA4VBq4WCdJZfAq
NdnCXGiKyrM6bVsruNAwGNR/UL8RlWXFOb6Wb7FGRpsLblmHyovclKPm/8GX
yfHLYw2cUPlF6pKTRheRKcs31nZQwVna4ztr17QhJ22d5oWo7aj4tUijvtcZ
RyNjQr8ub0d5xi0z6uo2nNg0S6Jv7/kTBpxgmw==
AspectRatio->1,
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-1.2546`,
1.564}, {-1.9528`, 1.7767`}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{3.998*^9, 3.644*^9,
3.205*^9},
ImageCache->GraphicsData["CompressedBitmap", "\"]]
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ListPlot", "[",
RowBox[{"lineuler", "[",
RowBox[{"{",
RowBox[{"{",
RowBox[{"0", ",",
RowBox[{"-", "1"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "0"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "0"}], "}"}], ",", ".01", ",", "1000", ",", "#"}],
"]"}], "&"}], "/@",
RowBox[{"{",
RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}], ",",
RowBox[{"PlotJoined", "\[Rule]", "True"}], ",",
RowBox[{"AspectRatio", "\[Rule]", "1"}]}], "]"}]], "Input",
CellChangeTimes->{{3.056*^9, 3.755*^9}, {
3.196*^9, 3.6813`*^9}, {3.602*^9,
3.924*^9}}],
Cell[BoxData[
GraphicsBox[{{}, {},
{Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJxV2mk4VV/UAHANKglJoolSUpGSIVGWv6HMShJKRaNoIBmaI5EUDaTMNKBM
RRFZZJ7neby47nzPkYhQ73k/vB9eX+6znOvstddZ++zffh5Wl53WnxEQEJgr
IDCP9b+fQAr8v5//i+H+ddr+tOU3gPinbMR8LwMv/i+eDerKHbeHmBzR+neR
NCCmJb81WbjCm+tHxUZFa4D4XTfG9ymD5AgTsTU/nYAY+xK+5Y4TpGV/6px2
NQCCX/NlxvEMZLJ2jw1apgPBEnfb++k5ZHmpd4auEgJi8D59vVAYfJ2f73D3
SS4Q3QqaGgclIfdpflFh4iQQTZNh53/lQL7MJtPjYX+AqJxS+svmQ0EyU689
9gAQhVvUXkZmQuFr7z96dQ1AZAcytr6Rg6L+V7YPLLlApEj7L/CSg+KNZiPD
2wKAiO44VNfVAyXnH1lFFb0HIrQi5oa+DZR+NDPN9f0GhC8r+/BiESgjAvz1
Q5KB8NDmjfu+h4qdatnXt6QAcRoT9blVUOlhGi60yhkI62vqV/VloSq7eBgE
twCh7yD0j/ESqifCHPXj3YFQ8XqUqvQTajW+Npn3soCQKd3q+/0j1HluEOhk
jQEhvO9o5YAx1GfVfevfmA/8ienXi18pQIOPnbPvpBzwafQzi5JboVFqKPTS
5/vAr5n/X+ElUWj8Mqcw0McH+Nm2306Fn4emQ+nsukEJ4EcPHT9cWANNJHve
fImtwPd/82MzvwKaH3/4V2H3Aviu0XdedXZBy5bRrqyMfcC3qlMPli+FltKv
odfU4oGvuStwgdtCaD05tW4owAL4a7rWKes/htbpTyHrpXnAF/jyUb8boS2s
n5bpOA68odr+6M4/0L79ltwLwWXAK1vn/qbqJbRXPDhxvNseeO/T5eqeREPH
yd/JR1hvgRd4/dOrRDXomKyVDNFxAd55P1ag0TzoDJ2bP/nVDXj7q1+svv8Q
uja9yPdPewO8TVZ+dUtioSv/jrrOYw/gzV8ZIjZ/D3QfLDA7tm8hcGnrn+5J
iITuEQtFx8wE4H53uRCTxYGe64oCas2RwI2YFHAUSIZekQOzmgLbgXu1Ys9j
/3Lojc23cxp5BVzzXtEFcZXQp+J84OitIuAq7Dp/b8k49P2wlnvSNAycfx0G
t8oqoN/KR9I49zFw2gtj9ak+66e1uDceA+CkjV7vrF0GA5oqhnvbXgLH36X3
X9hWGLgj1nGqWxU4R3e0KDwyhYHS+7Lfhk8AZ8d/Fy+zTYAmHGxSX3ITOPNj
CiLZg0A7uOkRg6cF7A5j2pIae6CFH5QWOXQB2B/0f34ryAFa92KFVbp/gH3r
yYptadkwKGs5Vrq8DtiWW9yvjcXA4Kl1eR9IBWCvk1Ld2G8Gg++u48mDlsAi
bQMNd5yDQdYxPffI3cBC/rtD55RgSLH40a2HlcB60lWmPtMGQxfThlWe3QGW
g4y8+i0+DKWveXVSZTuwtn6b/ysgDYbIxdML1z0A5u/0D+eSEmB4h/exo7cX
A7NEwKl2YwMMXzkl0dJ5CJghqT5vov1hOL3yhqayEjDtc/TeRYvBMD+ZSKi0
A6a83PL8BU+Bvm1uY5hUDjD4XJPxC4pAv9B0f/aEFzBypA1892YCPUnKTe/U
CmDcfX/6/Z+NQB9umGPOGwWGUeSyXJktMLLuT+JLE2FgiP36tkTyO4wcC6va
FtMMI23ZlT8X2sPIy1j2D803MBLVn536oBJGmqRuf8r5CiNOV385bxsBhvD0
PIlt+jCi4DFHeXUAMAyNJnPEQ4HOodl32VYD49a/YV31NKCnf78vJS8KjC8y
FjKPo4B+dfE8y80/gMFL+JHIeAF09QqnNyHngLnxUdOihwYw/PvPdsYiFjXv
jqXXPifDcG7czMNPCcAMfbBCTMQOhq8XOEQw9YBZ+uL29M8pGNY+xEmf6QPm
nzmcK6kxMDR9So/f4wysbTX/vj7pg6Fv/LlEWC+wTv46vfunPQz5jNfl1VkB
67ln6cONt2BI86bZj7UHgVVq1XJOWRsGJ/w2VVtFA2siwLDePxQGs5YIEW9/
AFthWdO/hGAYdJN+96j+PbBtfu2+450Og9tSMjRE3YH9YKv2lpZjQGMV935e
LgDsrM8xalHbgfb2DJPdvxfYgyHbNMdngHby2ZPeuzHAEcv7qm2pB7TVpiEv
q8SBs0dT7LNRLwy0PktTYFPXz88Tfe5fAgMhzhlPJ5YD5/nq0IPHImDAqOlE
ie1f4Hy/e43r0g0Dc+oCgnfvBA5jx5uJpeHQ74E8iQdBwF2quDAC90IffemM
UdUZ4GpeCo7VSYA+6+fDs9xp4J74o3CjpAR6i82s26MAuA9qGizGLaFXZe/f
osergPuR7scvioKeGNfXbScNgdukr8/b8g96FneP7D/9GLgT9BUxA3uh2zMk
0WDXauCtqlq4vmoaumiPIgb1zgNv76j8Kec/0GXa/Hz+GnfgnbR7oLBqDDqz
XZx0S/qA5ztXf4kOHzplbLqriqOAl8C+/gLY0PHgVeeRzXnAKxY/sNnzPbTz
NXfPv7QYeIPXuLLkNWg/rN77n/Ym4M+RulG6vBPa8sI/fl7yHvgy4ypHtzKg
bf3xZ2sK/gF/j6jBhoKt0Prg6U2D2SLg2zqSpwYnoIWj6tDzkgD+VcLL2W4W
WiyNtp3OnQL+ky+yIc/FoflTM11SdBnwk7LVDJ4MQLNkl29RcSDwi7gLRGLD
ocn75MKiWxXA77JjBy/Sgcau897Nip+AP/p3z73r1dCo/btvXvkEEIs6jrZ4
REND9DK9F/OWUfsWI/WFjwfUT3s556U7AKGmGPlX6QPU5ZHBHhLUvmyUGH7H
KA5qb0RIVss/BuKYpfg3j51Qo+WpWsvLAuLytoCgCQ2omny+kiElCsQ9Ha9F
++qgMvu3QPJBal99du/0w9uPoMI9Rf7VCyMgEsY7kxK1oFw5q2pKuxWIT5Fn
DJsOQilbdlfoYk8gitwig4z6oOTN6BfPhcFA1HtLcozoUHxCLbxXj8q3J+2q
Us9a+CFNKnZ7ZlPuWH7k9NVxKGxSqlGNXAjEr2SX6bMNgJL0Nzox3pR7Lp7I
NDkL+Q/CNHZcDgFyfvqYpWQM5E74iOndfQGkkK7DqgNP4euZ+AnZZ+eBFDlX
Ez9gDVkt674k+/4FUnzThhmP7/BJb8H6R0fbgFx+Yz+Z0wTpx8ukwm8GACl1
TnZiRQ2kaIZG5ZwsAnIlK1z9wn14K/740YnXLUCumfvyYYIWxDZ/N5R1+wjk
2k8Sd82/QpifqbksEEDK/J6xX10GD06L31UJuQ+kbMt+YcMZMFu4qe7vsCSQ
6/ZxtNmN6DuEpwVee1Ox5ZCRzXx8Xvz3yOjmddT3CaX/dhljjGS/9Cr6Gire
WMop34tvVGMVgqW/UOORn4q63mDyUe624IxXVD5Wv0eH2Jjml1VX31UP5CrT
6OODI5jZ6hJrsWkHNZ+u1Dg9Fmadj+is20EHUlJAY877Jfhl+qCaQ0MBVY/8
fb5vyjH3sV/93OXiQIqKjra51mO+rGzN9xkqf6FJ81NOe7AgY7n1nBU+QAp6
u+nF/sPCuM37g/5eoVwa4g2usVjEoLUZnTIBYuL6v1TNSCzerny5L3UPEBzB
Ay4/XmGJp2DGg+bvQPQVbPaUdMDS/BO79Puofml82zTixMbyuTvfrRysAqI4
P041SQYr9nslGLDuU06cO7K90A8rg+VbLlfoAfHWR0DQZhKrGtSY7IFdQITJ
Wqh/NsQaiaiQwQqqP/0mNMJPx2OtjfWtcJoiEG5/N1pUAtZFWF8IqboDxIld
Aa3uXKzvfCHRWtIFhGlCG+98IzY8Fox+7jMHiF26wYn7zmGjUkdzeP4UEHLi
W0x25WBjDTztqrAGYonkTu8mAptc1AtHU1uAP26uKlh/ApuFvpqp2ZPA783N
m/96ATa/L1zfe14P+KVHTxSVv8MWQzPVDe2lwP+4Mw9PP8WWwSMehwuVgf9M
91KmnDq23u7t+TmcBXwv/7XeTgHYtqr7XLlmBPCPzXFft94J276YSQiaFwAf
vqzuyJvG9oOKAydTk4Evl1g3Fu6D7RzP1s1rVIA/v9qgL7YDO/w3/zlRrAW8
kW17ZLO2Y6eMzrHufa2U+6q8LXuvYueXzyJHigSB9y7xxwr3buyy8FsX9uYV
8PxzGRul5mEXPSXd/cER4J0W+bbtBQu7b8q3z62mAe+/uGUjkRzsESdzPkAi
8GTcamfsR7Dn/cLrWg/lgPvHr1bsTxj2ap/dN/fhAuC2tk1k/LbB3nohk9EI
DeBmuGocsb+NfY7c/A/JjsANMrjp0HwY+34taU40OwTcUye/T6fzsN//TO3O
Z+eAq100rpP9EwcWT413sgqAK+G8fn53NA5YdeaZb3EEDvuIwfjAOA68PuBg
6HgKOIWPnW9W3sMB2rH5uS3CwAlfElmkEYU0hT+9VjUs4Fxo5cUlPEPaJUXJ
a+mNwNFhX3t/Mw1pn9l9Bya2A2eZqeXiTW5Im9J0Ya46D+zhqVfRTWI4qCM+
LntlFthfJnwa9S7joO+1z+WENLAD9aXfujbjYJnjcEqfPrBtBxLfztjjkFBL
edjNn8De3GBG+/oMh8xqYk8/CgPWpITJYIUODoXs/yRWygRWWUrHO/pTHGo0
MMo2UgPWiwj1l44LcXhZYfobqr9Zjj1v760Qx+FDeRouxmeApexzJXhPJQ6/
2Lm911qH8sjlITXZYRxu2fBTbpLyTWmRhc4XKaRLPGn7cVCf8szlBVmy65Bu
5aaVcr+M8s71M23zvyA9tPK2zgtlYG4YrlzR/wjpdeGCJ1dcAAY3/Zn4ulgc
EW7d5dPdA4ysnk23QQZHjPzvBN3QAMZNF3LbBwEcuf/WTLl8CzD0Tx6bfvMO
RwpVxT4qvQOG0Le+8qlPODK9Df5MnYKR+psc1/fWyFB/ZtMQ5AojL97PZDnt
Q8blk43JTu4wYrc39OD8PGQkvVRpVoiGkbWg0DjohQya6oxn4CugD6QZvZ5n
h8yV6t/iFyUAPTH4RpvBI2QeeD1l8Wk/0M90W1w9GYPMACfjqxnpQFeIOijR
14bM70G6gvXLYJjZKC3I6kPmmLinYJ8GDCff0N4tuhNZChOBgf8oHztH2agO
eCDrmKZ0UdtRGN6isUjo0R9khbTUCEUNwBDTeMzSuBVZP6pNWesoj7/rLBAv
DEPW+Kp962ODYOg0Q7zKXAzZmwpds0PHYEjuaqS1miuyj+RfGzWuhsH+e4tp
WIbsQJE1Vx99gcEocYnR/yKQ/TVTVn3cGgZt5S/qCR5E9sj7/8JskmFQAhsq
t+gjZznf1I75F2h1tOl3p/YhR89/ETpTrnv4OE06wwI5ly+Y3FrZAjT9kg/u
BCAnMopeG6UJA7OB35aes0RO+eosz7wpGPjSnWispYWcUfqLRnEhGLiMqmd/
hCN39ZRzfWABDGxW3/2y7zlyDW1WL2iQgv7CO2JVFnTkXvzzIiu2A/q344iJ
0jzkhtHLy9gW0Bez4+3A5kbkfl+RPMj2hT7h1nmbp5WQOxSs7ro8F3q9M3Ik
JdWQJ2ToHMRcCD3D5X4Nx7yRp/yfiWpcPfQcWLs1uUALeVa3B5RqBKD7W/a1
P/HOyLs2u1vy2xB0b3yhJqrBR15E3jnXdivoevxdc1HSL+R9y/EN69gKnRNq
dnVbSpDXPfauv7UBOh1mr7EGB5E34zL+SCcOOkrXXPQonYv8Nete1H9YDx2K
YfIzu+8jX3tpOu1pI7Q/dXl4/os08u20PX93nYe2iUT/YdVtyPeMkz14wBXa
jv4nUujfifzne4d2/+JDKxpJOUS3Iz99+dyl262gVS4/WizJHPlV6wuNeyjn
+SdEC0r9Q/7w2XM+8AaaGX9XKj1/gfxZ2r6DVTHQbNwstaoqDokVTzM+1qlA
0wf5WHKnNBLKnv+ezHkDTcJThTpJXUgYhj5V4LhDo+uhAGL+NBJHeysGFOKh
oWbX4k1Bfki4HRc7FLwFGhSTHJTM9iPxYGmTvaI+1EseUYsi1iDxatxfWDUI
apse5oWsOIJEqnBsYWob1DwhH+8bD0ECreJWS2dCtclznvGt30g0VAnNp1lD
leDNjVZvSSRobk7Z35ZCBWbeldUtQWLUSCu7bimU++w5pJGlhqSAgjjpvA3K
dm78lfVYB8mF/x1V8/kLJeyrheLj3kiK/CznNiZDcYLKcmLxJSSXa295LKMA
P+zO2PRIn0Ry1SprTcNeKFoqzZPLrUNSNlSmKCIJMDjJf+03eyQ3RjmlEoch
fxKCLp++ieQWnRm13Ovw7dTCmqcChUhu86rSnUqEr7XLVJ/VRSCpsi/NfXsn
ZGtc/tggZYqk2ofHa3e6wqdYla13HUOQ3PXO3GxcGDIWnks08vVAUkujo1hn
BaT0GW14uWYYyT0Oq6dMtsHbj3yml/1PJHVWLljn8BvirtNftiZHIQkXHsrt
WwnhoVFXL75zQ1L34Kv4UgcIPKx44YH3fiquU/4zOg+OQeaRyRQBKh7Q17+x
B+8Z9gXPT4uk4oBmE04FPheiq8YoUvlBSd/rsnyMvpIQ8HYzlb/Oy3Oe8ecx
keP2SNRuHpXPP/ceeUdMllGx1wlOofKdXeQ3JwnTDlyKztmphaRm6M6eygnM
LJqXsFHvCJLqOf+Wl2zBLDvXuMXyu5Dc6XVLLLERv4w66ucFGyGpXI0uqsOY
G9gQNKorjeTW7O5b/GeU65I9j4cuR3KTOsvGzwgLsrsXr6vKQ3K92bw8kzYs
fJuiIHVwE5KrJ422JJdhETlX4dT3h0iu0GprPTmCxbt5om4H9iK5VKLpfY0A
lvg5nbPcvghJIT9HEG3C0ho7bL9ZjeTchym8HQZYvrwqaaQ0GYkJ8+xL+3Ow
4tjHL89tB5EY+bLnvd98rEz8fff0k19ItJmbHT6yAavYCfEP/0QgUSph8m6f
H9bseJu7zE8Vic+LEuXDm7H22uSFDefMkYjbVpbz+TjWfXt2bLv8eySC/RSj
XPdg/V8XbSXTYCS8hcydlrljQ9z3oyMS15BwKvzIdRPHxv969DtSLyJhltzg
mngWGwef7Gze+hQJ9VL94xUW2ORbv4jVmIqEjET4g2fl2Cz3OmlaQhYJwbAT
nK+12FzEnawKJZHPNdVq252ILSeLaGuWRyO/Sb28KvQ5tvyTNK9z4yH/6+GP
/pnG2Bo1tG3CZiXyIz88nyS7sU1L4erU3NfIv6OpbFj2Gtva+iTf/aTu5ziz
I9elEtuvzlti4/oB+fqThyvsrLBD9Jn17NRS5MtvcxBKjMCO5ADSgvIkXzBK
eKfafezU7x+smxJAHt1wq9gQCzt7w9XGGqWQV7Il8P4lJ+zyfDem3RCAvATj
P3dNKrBbTFTZKGs+8u68t509fgy735X/mbKzR94xvXtTIa3Ys7fB3e+hFfI0
19i67T6FPS0bPj1+W0Md9tVL7HzasNf5e6+R9kXk8kI+vT4jhr1/I1cGeG5H
brmipJBEC/Y9+/qsx1sNuXGLBh2fa2H/JjGftGeqyPXeukL3czn258TOsz7W
jFzLkMy1OZdxQF5FfYWdInI3aeXo02Nx4GLKRHfxFHJmlNSrSU8cyP7GOnJo
GXIaz2iGWdjjwOwJlRDZr8h5O9ICZySQZhD2W+eTC3J8Pq2Xi6Sc98jh9JBi
IXLMKvYYmzYgrfHz+/Kjp5Aju3X/+bANOCgVToqVrkY22Xm+c2kkDjoIXil7
fhbZRW3VIWeVcDB+9gTD6zyyn22IXV78GQdHbk64XOtDtmOR1B31HBza6nvF
Oq4S2TsyLjoPquDQpSVLcr/fQNbfn708eRccypQWaWyrQFbNw5Twp5QDx97k
/Pv2D1mvPFeerL+Bw+oZNr1nnJF1JtfjwxlfHPbarbr/0BxkqRwW3nnsHw7n
7I0+92MlMmdMdgjW/YfDk3mMop54ZJa91rpnEYV0zU/n99SUIjN03wN9PSuk
e8t6K+clItPuwNWNyxyQ/nWOx7nc78hcn3tm2z4DpI/bfN8TOoEMlm9JqK8e
jqiu/fL0TgEyMlJnY5xHceSKdflwrxoyvPbc/X4uD0c+/jlm93YUGXu3/zhp
Z4gjrCWDRaOayJj7UGt2/UpkbAyqTbagfl9ucm7e2iJknHB/fkLoBo488ihr
fBCDjFc/0gTsNuCIpVBfaloGMpp9In3dHuDIMmGN3G2PkbkkrDf/7jKkt1y3
Z/BbkGko+cft8SGkh9t2TWw2RebNyRv2hj5IP5JkclxjHJlZ2nzl95uRLn1B
1+LUcWSy+4bTI+xwuCPuSMxjB2St6/+V4SiIwxFmyqUYgSybvTnrhM/g8JHL
5+opp7KCJmqXJXvj8ArhJKvF4chCodaqO8k41CL3ypH4gqyf17yLlgMOPc1m
BP7egWx5zZMZG9xwyKJc79s5H8pxB/e89mrFIWHb40aaOynHFWDLu584WH6B
7Jh3CNm5dxJEMhEH/QSyjgwYIJv1LPZIYBN1Xlh9ZmzLBuRIT3hv91iAtMn8
soVbHyJnf/LoA4czSPs0EiFVIImcax9aKv6tQprr64TihnnISfhDMH6pIU2+
Kz23YT1y6sMlT3wUxoG+pEcfRZ2RM31zja4uFb9csMBwXiC1bj4MqCtm44DF
r5+r/d8j9+DG/4JHqHW0wGvjOxYi9/qwvO7J/dh/Yw337IZbyE1ke/xxuIN9
TB+/pPrPyK3RkJX5ug/7Di+s+vokArljZSsar/djb2G174u3+chb9erQLPsn
9ipWuAW5jyNPN63ZwfEh9oTPPbWsyRh5ZwXDby8rxO5/txQKHA2RFxSVWJk+
gd3n94StjrNEXtrVBY841tjVYOAf/fMN8hoD6ia7b2HXroiO+7eikDfWtUwV
9LEzZq9bIaMX+ZLn2Vbxitg5X2N375Qs8jVUPZ3t32GHc8DakdWbkG+j2RXk
WYbtdWpixvnUe/eaN9R7UHvOzv/mlYa7U24jWxwYGtgWljlu1OKE/Mz4atfJ
19g6GUTrXn8Y+XVBDiZlXthqX1/tG6GDfHZyuWO8H7bk38/Z8lqOes//M9u7
5Re2rE3NvP+QQGJdkGqISS4237Yo+X2pHQkt4yp1CWls6nOdd+NWIxKH9jpp
XwrAJh2he/eDKFe5nLYa+paKjdGKNiOnTiPh+30ySfsENky3xnxbakQ5zThb
19UXG+yXeOnP60cifQHxVuUL1l9OmpfkyEaieHz58qF3WLf1ZOmF1ceR6JB4
IaVFYM2wqa/I/EAkOI4j96TdsDr6ymPLwI9IzPYHeCvOw6rDHboaYEi5rHRG
e/dOrBQJmmy1u0Dt06onN9WnYnnJ01UruW+QlN6VHbb5IpZdHxN+voZyimxT
qelLWSzdkbtbe+M/JBXm2yOxGYvpXAldw6WUu2oMVvJe44/XL0Rqn1DOUNtq
pfY0AIsscuOaX4pQTpGxjXVKwcK5Z/Y3LqdcBEnbYt+dwO8uME8jswxJg/IU
Fd8B/NZAizO/vRZJ45spQksRc9SLr0RPHEDSvFz4uX04Zr8a99PJikHy4Lv0
3yYj+Gk2kKve3Yrk4dU3VgTKYcbJJyVCpkpI2sofeqLTih8e7LCIPnUfSfsS
ua+dHHxn4urqJWSO5LHfLcnJyzBe5Ndm56zrSB4vtN11TQFfxjdH3/z6HMmT
a2PG5uZhkHlB0ZVrdCQdxaKVfF/hGXtfGa/gNioON/5JHoc7etabf2Wfo+LM
2OUnlsAzs0dtV5UKqNjxlYzqG4iqsHR5u5vK/+S7XQ7mRZAYXxu08mIPkifu
3OiT2Q5J/ZIi9DhqfAeei+sHX0hb3c18+YOG5FFS5MX9JMj88I82q2OLpF2A
a1z8dcgyTt/0tFkMSZvPYZEq++HLCPt1yntqvEMeEeZHTkGuX/zKy3ahSFpW
Bei0pkO+bNHdv/5/kTTN9sp+uwkK8rQ+9clTTtuvfi/75kUoTJmtUmc9QFLP
BP8ZnIOi31MB724fpZw5fmDp9VYoNghcRNwapZysbiXnSzk+NK68OdCVcvVi
1pbhy1Dao61Lk22k3Oip1epVAeUKFmMp/pSrN3hdfnwvGSrcmp1m/TORXCP6
yT0vHyrzCiVXK1tS7t+j4mA6BNWCS54Tbk1ILhFY0538EmrMMy4afQpHcp59
korbVagNS1QV03iExK+IZR/Np6Cup+fGzXu21DkkaZRReRQaxJPJZOMmJGqZ
p6t/PYaGrLu+QgGLkMi1YVz6yYBGG17J6tW6SCT+mtZ3DIfGSd6jDIJy2uNi
BcmtztD0+kbGAYl6JDyLfi9Q9YBm7RdLTJe3IXF8dCaIkwrNPTtv9moaIrHv
UN3ZrEBouWk1aPjRHwkl5qKkzXnQunpUdjCROqctSzd7q7sDWvOE1pgdoc51
v1N0fx80hTa78KIrc7civ7vzqSfxHNp+h82kZAshH/cSu94PQnvY3ILhDWzk
x3cs9Xu9DTpUOmaSDy9Hvl9SRtuoEHTULU/br62M/NMZod275kKnc2Y9fdcW
5BuQnk4PWdA1/6Nj7L1XyN/orOT0cSd0xQqci79ei/x5q32JX77QrZnMhoEp
5NEWWWqufg7djW8mlnGoc3HBDpebzEDoceZFLTV7gbzXL76K5rVC75w7o2+X
0ZHnqbFi3+Qw9EbYLq33WIS8g5LuvhZPoE/ZXVrz2mvkKap+W9UXDX3FVYrm
10WRN//pgJPBRei3PeZulxaH3N4dvZHXu6GfK78q1l4Yudniab/iU2AAQhU1
/dOQG6xuczfhNgwEvlV+a70auU5R3TuyE2Gg0TJ7XGkCuZrGRrVlX4G28vGg
2sdTyBXRTh/N9QKao0P7VpNzyKFd2yTwpAJoSd/znKIpx2VNlK6/sBNoxIec
PcHDyAko+rjL6w8MashPjbvWI8eu7W9X1lwYvLk1PVvEGjmKu+gHnr6BwaIc
4Vef4pA9TQ++fz8bhhbU6BVPJyC7mrZJwIUGQ6ZnHjtlL0J2pCJjuCcUhkJ8
NxVE3Ee2c/kS2gE/GGpeZ244uRjZuz63KKmfguEVOnoR1vnInj9273rfRRi2
7TJ9SlNFVmPAsSnbazD8+meGDX8QWdFXPuutc4fhHv/8E/sAWeczWg/nlwN9
7dOCe84XkKVqLP1s932gH5dcNFu0EJmzWm0pAU1AjxEZffiZissCLkYXlgK9
93qjfaIQMkN2QJppOYyssRfc0bMWmUc0Ptsy+2DEPpnndCoUmTJRqqYxMzAS
cZ5Hz/JDBt1J+diTeBhpDbt07LQgMj4ESd1NmgHGsm1da1NPI8NN8swP02Zg
WOyI0x3xRoaG4ItdP5yB8TBK9X13NI78ObZ+6kMcMEouCwtJSOFIwapnKw1f
AuPv+7ip33E4ck/PJTxWAJiaBlcnWd04ot+62ybNHZhuBgu8NM/iiGBL0ErL
n8BMftM3+Pcg0sv/Iy9vngYm7UxABiMD6YGyc9Ov7gWW9P2QMz2LkW500Z6X
5gAsS4HAuCeuSF+kHE5oTgDrfsdiuZ+tOFx+2nZd4wZgfRNK644oxuEHS/Uf
zVQBi/9Cks9+h8MGanNq7KaBLXdtsPDgGA7PaYT57QnAPpyaPw1xOFTASmlp
awB2oNaBKOkGHLpxe9JcjQ7sb6vMpxa64tCuZ710nSFgc8ycq9Ku4uCYguTl
J0rAWV3voFZUhYNpe4+J1s0CxzSeXnfPHAfPt7tvvTIMnOs/Sj+sYOGg3O/V
p/7zB07yjmLH9qdI64mRCRjlA6eNnbLibCXSwuoMHz5oAO48wvgu5RWaxUOH
y597gbtj77VxkTKkLWjUMJeLAe7RlkUuYbU4UPA+UfXtYuA+yOwL1JvCAU/R
65utlYGb0dqVoN+IA9sWvpCKVAFul85Qtedc7C/f8uqZwyzw5nLo7V+uY7/q
FcH39D7gbe1uPL3MF/tiRrZvCHMBnpVIZG9nEvYJhfRt+lwKPO+78DD0IPZe
vTKg4BQDvJideQ9/5GFPz+OF7a23gVe8UYKesx97DJjbRM4uBx7j0MHQBX3Y
/fGB0vsHe4C/GH0vLtDDbokLTM9QG+BvO5drt2Ejdvm83i/nGQV8S1PR7eIN
2NkvrSZuJQ78K+ejawcsqPMqM9a88QvwQzFIhlGEHUlity4GpQA/w+LP6ige
dgiHlntt6QN+/YqVzfAJ2y9duV4ROBf4vOWrrjjbYFvDp4iZuMNALDbaqeNz
B9t2HlVodFkAxKbMqDTaF2x9fklFJLIaCD3L18ctTbBljPhx1vAYEA7r3VZ+
vo4th4Z4p51uA+G1yWVoSx42f7YoNzE0ByLUoWsi7x82L1M7P8m7CERSuUT9
/F5suhLBbzVsBqLQ0W1Lugc21t31TjXpBKJd6ZBwyxg2KhJbolfqAcFTkCnb
lYgNgSyFsREOkHM2x95MTcX6KrqWSnUUkMKHxWu+R2Gdn+yFgY0yQEpKx00p
m2Kt1kPdW+2+QMpcXXz4zgOsHlWUldNSA1LhtMjwi69Y9V7kitZqfyC3cy7Z
O/dj5THNhAPlo0BqLhpd+4WLFUuzN3cwLwEJ+ceN73lgWcmjG+O6O4HcL3g3
LSofS71KpP8zsQLSfFi+VXohlmw9d/tVTjKQ1rZrZyM34I+e26rDrdeAtHfc
I5e5FYueLC3sqlwC5Il/h//MuYCFoJBZW7oWyDM79cc9PfF7/0ul4W3tQDpP
0QwOmWCe7uJ5ZvqdQF6yEW7RCMSc2NxlHoFuQLrve2Ml/B2z/2Y/cjO7D+S1
6idb2R/ws8PSN3b860B6D6cHD7/AjG/dLzu2WwN54+noObyFH3dYGl+qbQXy
VjNcjD2D79hLVjHUzgB5JylQItoZ4xOXbg/lMoG8J57/zKwDI77MqAg0agPp
K9oworwZg81paRKKsVQcm9cg1oSun9ZsPPyPqr9viWergwjc4KxSX3R0hIpv
/tW1Pw9PHzHXzba/o+5XeXDdgf8gak33BCs8Hsi7yW7Gicsg0SbtnI1SKjX+
2lOHO2MgKeZZVvC1I1R+8sqJoaOQSp80mOr8BOT1wl6b43sgM/y4ziW5H0B6
kTdtYgIha/dxx461R4H0yFp9UG0ffOnm6D1soJ6Hm3DN151ZkHtrLKIFVgDp
+vvtdy95ynVnZadrqOvnvQqO7dgABYUq4cneM0CeClaxsPKEwgy5E2mLFgB5
XH3N0hkRKPpXvsM1ehpIW/eYwZIGKLb4m2j53z0grQx6fsyegJLownXJEvVA
mn6YvtKNUMqdJ/HqFw1Ig6QNF8IFoHx3AXtfsx6Qe3ff4V7ohooHnBXirDtA
qp/UISIOQWXzHeEmRh2Q29Y83aJ7FKpl3Q3EFnkDufFSipD2I6i5kK+tIhID
5GobzOnkQW22tVvRph4gxVuFVz6lQd2/na5R3y8AuZBVXhy9FRo2bup6uSwW
iOmt54UWHYSGCgtukzQTCHr6+jzlCGh0FdF40eYHRL2TwfxUf2gSc7gvesQd
iByDo6mhXGj6pP1Gjr0fiLjDf7q9v0CzdeL5gJQYIAJe5or81YPmidC3vVOt
QFxarLpqIgpaXv5TraMfBOJQmvDWp7HQqsnmbfKJAkLTj/nZRg5aOy3TiTlv
gFgT7H1tGqDNZ4tDsIob8P9VuPrItEO79NWuNu1w4A9q3pzf6QrtXxWXqjWk
A7+491TMdhfoOGzC+rZIG/hvvtLnnpwPHT/rj+zduRH49yvK5cTToTMky+xa
6G7gn17atubYTehSHC9aPvEH+HqhQ7s/mUBXeUjGoPUM8NcZl4y8XQrdTrdX
t6zTBt7sHpu0R+bQPfN9wdak98DrdPbRmFsOPeFG3kGW+4GX1bRM/WAB9G5f
c1cy/j/ghXgtcX/3CXrL1ZUDbKSA52x3JF+DCX3Hn7w22+EFPD0f5qB2JfSN
b+yLKuQCb1Vnbka9OfQH/Vr9UqgGuD99Kljvn8GA2Iy20pwu4FYeXbU3sxoG
7KWWBN2dBG7s7S/7ginnJVa8en1DHLge9JQ7gz4wwBOdyarcB1zjp0K6iYJA
U2daDctvAO7ae6ystQFAu22VN/ryPHDI3HNNf/KBVmZmf6V1I3CKNd8ckzoE
gyLNh2qCOoETJlBSq0OHQWt6g1WYFXDOLhs7Wk45LvLetK5CP3A0rhzniXJh
kPZubm1/PHAWrNIWbePBkMIBae3iGGC3iiPhHwVDrrcv96oYAzvRdquNoQwM
ZW7/b2O2MrCv8PMiBftgaPxkWXq9D7D3tuXGOPnB8G5xHas384C9WPxS0Zm/
MHxTh7UhLBFYrXFbelW7YbiAKfygxgVYcfd1tJ5LAX3OYt7udw+BdQHnPTya
AnS9t53HJQKApXawtb1sFuh+X2X8O0OBOasj+TAxEOgle0W/l/gBs9RfwdKl
Dkbmq/+LKPAG5uPNHmt1R2FEP85Eq5GKrbc4r69cASO+101PL5MB5qqHXvmj
vTBS+OPUDfdOYAyYSHq+XAsjfz0nXt3xBcZb17xx0c3A0A53fT5HEBjOP5lj
YZTrvGVV5gW2A2Nbn4zmhzvAyBL7fGSIhJHR7bRgw5PAIM6e7bg2D0Y+s/JT
fxoDc+v6H5+vZcOIp8hek/4dwDytq7dQJhBGdkX+GvuRC8zowlOcbB2gT770
WZY2C8y2uA+37l0Ceu4cp4HKbmCJ9seOvBcEune35VHuAmDtu1FzfuQ60DU3
9e9R2AKsW1cLz+ldgeEJ+heWqhmwPpeJXQ7yheHslbcvF7cCi+V2UL9aEIbd
i2meJQ7AlvFYPxRPeXr7SIjarXhgW9WuD6Pet0NcP61TCd3AfnD9FxF2EIaS
Il9p7i8Gdu5NA5qmFgydVjljjf6U4+oL8hwZMCS772jB6VHgrPVYvpuqw2Bn
z54msx3AsTg3HUSIw+DzXzW7+/YD53bKdrs2LRg0f9rQf/wTcNJ2X2o1fQeD
C7KXDx51BE7v8ls59ZuBhifPBC88BVxhrY3WH7WB5hX2XP/uI+BqJm8PX5YF
tO02br4CR4F75qSbmPglGBh501Y2eRe4T48X/HX/CgPRvlHBqym35Sf8OnLd
CgYOjcbutvwGXIYiWXm/FQaExgqkn/sDb+lkRHngDui/I/nleUgb8LQWtoZc
2w59LLevrl2mwHOyDVPxKYA+q38Wi8PMgPeQVfVyQzX05v2wXLP4CPAyvl0M
Oh0EvRsKXrwypJzXVnk9/+oY9AT9nk2epuIZybGaF2bQPep+Kdgkl3rvxPRb
ZD+B7iMqDTeOPgO+wSmjxslb0JWvJR420A78c066DHED6FoXsrHEYwr4D1/3
bnp4CTrvq8+J7YgD/oclmho0UehgbH9zRDwU+NXZbk1PSOgw9hMJu9ALfE5Y
Wm1/CrR/UNU7f2QR5baPK9d8PgvtSwzM5NVygdj8u79j1R5oc/2maTHxA4h9
3rv06/5Aa80r6RsZYkCcUrJtDtWAVkX6XK35u4C4I+G348htaAlKEJ24ZQvE
a6U/ey89gWZmy9GBcgKILO+Fa52coHnfXaGG1kNA1I5NarQsgKbE5L2K9FAg
RuLW71aYB00C1msrffSB+Huje72IETQeu9/WoUS5aXGxnoz3bmjIgfAfPhaU
0/oLpaOUoEEiMETifCOQ656v/rvrKNT1lDO/WB0CcmvvktlYEmqffphR2ETt
s2rfzSaUVKHGsLRWaFcRkDqqEdfFSqFqam3rwRMelMsgrUFBFSo/5L+QE9gM
pCXt4HgmDSocUh4/96LcZSu9L/aPKpSLkiY3LxpSDhu23ssZg1IMt9Va5APk
OUODqYghKLn81shrRodylxY998M1KJaVz5i8NUQ5o3SBXHk0FNWtUzy2+h/l
kiHviM5MKLwZbc26sZtyTfgy3UPWUHDYNCp5zB5I/56UfzYOkJdx32upBx3I
oK9rb9d+hdzFEw+a1fWBDJHfr+ixA76c/iy7X+4jkM8VFmlUKsPn79UR7ZPU
+OH5+i/HjCBzxcED4Z9eAflquH9J6Ff42PPBMqQMgIyKK155LQ7eP2pZMFT5
FMgYolvYVhEStOBlK7sayLim5b8vnIZXDeszozq3AZmw3zGPxoAnh1NeqH2j
6pNomS1w0QzcJW73beX0UzFHUOPlAfT2py/Y1a8I5JuVpq+lCjC0nOiwmUHq
etd9lWVLMfKSzn+uCgupWDm15r8KTFwsZnvoFeXqBMmqhcvvYNKxt6keYQ+o
8UN692e+w9Q01B7lSVH5RfELSAHMvLsmdLKaclbU3kXnNeswa7O37pk4NjW/
K7uEbNPwS4OjzsQNBjV/jaCdOsqY61W2vr82EMhnocv3vFuF+TJh9wxTPgD5
5CbbNPs2FpR8n0wlqfjh7EbTe6ewMFtKIlfxLVX/pT3k/f34Y+EF21caWpQz
c1S+zrHFYrsDsnJ5VL/4jOkNHr6CJSlYsELmKpBXf6jeVO/A0umMkDmHx4G8
KL/lUE8Hlput5HunU/16do3Z7MaVWBE5tsfy9l/Kie8r64PbsZKj2t3w3RNI
m/JauvoEVu9uVv395AWQFjeDVuJvrAmoSH//iXKaYdlOIZkWrG0V/k7vpZy/
582MqF0d1q9/3iQ2RblSdeV6vd3q2KDxcefiBMqRW+R6fQa3YUPPZu8jKlT/
yvy4bHjyFjbe07pZFUnlIzEpxZdxxyb5vrl9JySBXFSy+ppJNzZViTaUHGkD
4o/5vY32R7H5YkW6r+9rIAZ140/Wp2KL+EIX0fSvQFQ6be85GIYtn8uaLqyf
BSL9U5VaaBa22sz9+n0V5bYwVYnTHzOx9fcX0v2gKRA+Q5+LFPdjW0T/Yasj
lBMdSm3HahSwfbfXjxg6dX/djuzfu2uwvfOmtPJyavwNMn7LXh7HDm/mbv/b
1Ptg/stbLZwC7JTKERk3fAh8uoHzUudW7Mxm3P28WAP4pZuWtIYbY9ch97u/
Cl0o9+3VuGTyFbvIw3OFL/8Fvm9Qjm34E+wODpq+1XkO+CfFLvx3KxV7Ni91
lvv3A/h7ajb/e8HCnh800z0vdwFfuqjt8c2X2Hts6t3TI5uANzZqP3/3Puyd
OHw/YPth4NUdjQ278AP7npBje08EAy9pToS/Yyj2b6oQfHelB3h3h7XlJeZg
//e25gSxCeDZzfet5i7Gga1LvgufGgXejlOXG/0EcMCjTMS/TgN4C+cuDNh8
DgdQ8tJAUSNwe2jWKjbTSFs0+fvs8U7gfpp7Zs48WaRZXSqUEtwP3AdnLZZU
diEt0mM4u88GuPaim43/hSBtWMiv1VoKuErT4v4xMTiotLVgyHMcOP+UlRxW
rMTBq23fNA6UA6chKU5jshAH84SjpeW3Ayfe5ZV2sCsOzSl/2hzDBI6bt5G5
1nocMlpUiqxvwNGtHxLoG8Whx7XOZjk/gCN2NTFsdhCHmiUyRDW/A7v3dAW/
WQKHpTobKvgiwE55Ex5oZIDDx2QEb92WA7aXmrVb9Rwcju175HF6DrD1JS0N
58fi8NDKROOQZ8AWNepY66GPdPna0N+EB7A6GgxCOPJIPzcZOUyfA6yEj/x4
jiXSk1+JchL2AstlQK2QJYh0dqrmebfjlPNcfHIvL8cRRdUL+vQ0YM4c2Ji2
yQBHXLZMzY67ArM4JF60cD2OpITo5sx4ATNI8fiT0qM4wnKMNHh/FpgHNjau
2T+GDIXYC5vL2oEpeetKm891ZJzZL56xOBoYXRrf5ss/RUaCzdTPNy+BEWO1
bfHSaWT01T4ZaKJc59ho4bj3AjJXJeuaH6ADY2P2u8fLbJF5mHnvd3oNjDAE
foi7bEBm6MPq8BeU65KyVM4HJSOz6lEErbcMRpwbAyd/ZSJrHtc5KlUQRrba
OwpvO4qsPSlFsbZ/gc4+cBiPNyPLo3QzTY8B9OTshXPp0cj6qKXo+0wA6OeD
pP2LU5A1tMiutXkc6JsaVdL/PED2SmUj53vTMDz8aDa8ZhDZFimh4hcuwXB8
/tZRRgGy/W7UEn8/wPDxU65Lr15H9te4xDv3R2F4lZ9nnYgUsjlSXyKVF8FQ
m8z8gPdc5KztzwwUvQRDT9WaltquQo7lb73ZP60wZFoZ+27BYuTcc5DZsT8T
hgT7dowIayDnk9ifNpe3MIgeZkU5z5EzKBqmdj8QBr0ff3cv60Gu+JG0DQXt
MKiidOBypihygS28KvYw0FgH205MnULuxRJPdeU4oMULbFhqJ4Hc1/SCvQue
AM12t8jZbkXklpt9yfxPHGiify/bDFYg9+fkrjojDxgotZJvXTsPeWsZMmH/
+/90NzSWVh/vRJ6RtFnr3HkwsOOjxJLLZ5HnFpSsnOcO/dWuG0NuXUfe672y
61b8gn61D7w/EtbI+6EcKyS4HvqiV9v2t15CHuu4jOrKM9A3v+A/jcxbyBer
Cu+4LQu9LhGBJpsKkK9+ddHWiifQ05i2PH5aD/n2Np52H09Az665jcw6Y+Tf
vsp+9SQduiNfZzQF7kd+fNXVLZOHoOufz/u5yQbIL7HbcJShC11OiWk/PTWR
PyIr8fLvIHSWrilvXyCBxMLVjqdf7oHOTczxgO2iSCiYb3eh9rOOwCW6jtaz
SOz7/PZughy0M4OyVVb+h8QZc/Ltv8/QbnT+zHKeCBJ+q/WXMYyh7X3ymVMP
kpCIW9Wi6X8W2hYcrH+qZY9EvulA+aFSaD19pkhyVzoS7akpWdrfoKWIddTi
QykSP8Fnb/h2aJEZKHauNENygYCZ93zKeTcOyBl8IZBc5r2tNV4Jmtq131if
bkVSJmDJof3N0LTzvc9DYyaSW5XCtZL50Pj4ZauaUASS6udv+n+8Dw3MpTz2
3BokdbXcB+7kQoPeilnnik9ImiRs//AmC+p3Hbv7b4kpktaxLrO0dqhlZfOa
InKQPK4y9E5eG2oi9co8I+WQPGd3eNvhi1BtJhwWuKgaySuS9zqWHoTKGWn2
wFMrJL3PbkuyVYaKD1ePHn9zB8m7prInlCuh3H7D3dTDxUgGlKy7LfMcyhap
TC2RaULyScOsUWYDlGS/P7fCtwzJMLf7pe35UOwU7PbouSGSkW8Di3a9gh+i
rGJJOxEk4117a9ziofBbxeKl688h+a78qK55KxTUnCATTzUj+SGre29HNOTL
WfsPVMxDMkNdK/2iJuR63TFYfugykllGdsapLPhSPRq/4s9+JL/yVwY7MyFL
9rsU15u6f96mk8VugpDpPrb5AG0Gye+jUgsPC0DqI5OPwdu3IllooaAj/RCS
tlcd0tvsjuSPvXdWVzMhoTnwqLLxEySLUWyDlAm85lkWKS2NQrKkqertp/cQ
ujNC6NwDKr9S7/cl1fvgWg+e9d+fRcUZsW42nXht2cPxJWvaqPh6qqu1IoYK
RLztvbmH+vu2hn3UOn2d72okeniUun+pkFN9FybkcfzPhPxHjW94bPT7LUxa
aWwy3lhC5XekcXy6AFM9lYyn7whT+c+4/zezCjOdNT/OyOtQ81M18dbaglkr
/qRU6h+h5j9zYfH0XvxSYvL4e/kDqj5HhrSnIzDXbUX5B1E3qn6G1WuEtmP+
WvNaC12Sqm/Z7qDgBVhQ0bei2HEdVf9OY7UZWSzM7RabkaPqE39HKtxwMf4Q
HVQLyfOgnt/XkgkpYSw+dSPvqd9D6vn6eZyX52DJ1xi28Kse6vkPmlYfPo9l
wvoL224rUf3RcrWi2RrLj5840bQ/lOofe6lm2bNYkcHRla1cQ/XX1bPyAohV
c3v/2CUkU/23LqTQeTtWWysP1e6h+u+cY8XFfVpY86b18OcPG6j+3bUvBwis
/VWReuEW9Xys4/VHzzzEegMBs4+XdlD9HzuztXwcG4x31wzPfqXWh2rarrlq
2EAu+UeOUvVXPxb5Pj0NG8OveQUXyFLra/Wi6oab2LTnEv/CLW9q/V3ek7Y6
E5to4+t/F+tS69PungSkY3PAvCafyLNICnbJeS99ji2K4cWbPWaQGB0ckDV+
gC31yd9M/5RQ6x+8fNESW69q3rPpOINEXlWWeasBtq3Qoc91CUMi1t9wueZT
bMvJyb5A+ZLwvdxbGsnDdvv4ss2ayUicfrQrGW5i+/Q4/1JeORKGHeJ2h8Ox
IypTSP5gABKbjigXGARh55668Xn6NCQWCNkJld7Azh7TFyksKeQPE8czB65j
1w25upKsHOQXL5ZwKZ3C7pUHnqxSnkR+nP2BTf7fsftLQ1FG4zvk3xwYE0x0
xp5DsceGqySRbxvTfzSwFnuInCN+sYbIV30xm9i2AnsfSaWO5EUiX6RE+1bo
QuyTz3UU6byFPMa2R2+VHLEPX3nmWq1HHjbS+TejsN/289R98xHkvfy0X8dr
FfaPzp/82+qHvEv1mff7/uKAgYHBEC0beYaKitlVjTgQEu3UbGKDvFWlRVTK
OND1iN4U7IBcIu5+mPMY0uRFBpbfSUFucX6QYOcBpF1ef/ZBwhzkvlzFbXNV
QlpOSWhvniZynfNrPuhU4OCccZ+Ey3eRq51oMU8zGAdNPunsxVv/A+qx5es=
{Hue[0., 0.6], LineBox[CompressedData["
1:eJxV13k4Vd/XAHBFSdJAkW+EokERklK0mshQRESpRFQyhTI0IEKSKEkllAyp
SCihrMzzPM/uPJ8rGVLS775/vvef++znnLP3Pmuvs9dnW3o6KjkLCQnNFxIS
Zv3fP4wJ/b8f8P+pmxky3sCd63ZS5x4fBP7fe5OxP/LgcUAnOSRkDvh/pBdM
s0Ih+VPeL7plN/CnWx6PJwdCmv8Bh5WDDsD/WfjNSlsfsuKFk1fLjAGfaE4x
NU+FnNw/hY9rw4DPWnnOQXEIPtJFEts3+wCfHLnF3+QUFPgssEm2tQP+gJpG
Q9pH+PzP0y4sWwf4HULp3JE4KIrS/LVxNhL49cJV5f/K4au0XsiA+ybgf9dp
vVu8HkpfBp6QjY0A/qfn4vXvxuH745+XprYcBf5btXLnKxuhrE8rR819N/CT
xg+FPloBFXITuZz5HsCPZTASzxyCynOaqu23FwM/dNlCt3sDUJU60repchHw
r14S+tuoCtXUX7fEJgXjOf3Ue65Fg9oN3gMpN48B3+rj+mbfXqi7aFhq3T4L
/IOpGy7IHoD6TNefkrudga9ZXXTJuR8a6P1HLln+BL6Cgs0qi3RoUol81RL3
Bvji7wPJO9Oh+bxXS+9LBSCmPT75+gRCy8t7Xxxv1AJBvnAns38DtHpcULrY
GAhE4+MbfssLoG2JjLq8gxkQn2bUxcvcoS3L6kYX/zIQyfE7cj9shnbD/0Q3
HOoGItxFoyVTBdrJ51uaDy4Dwv1aOc/iHHQEqvV2zFcE4njJ47SRl9Ape3XT
06HXQOjuOf46cR90FmjV/r38Bwj5ybw0iz7oMnOu8bJdD8Q8jsvll5PQxRTb
IanlDDyavHap4gB035bdULnSGng1Ud3OHunQI/vwk+luR+Bl7VqltCofej56
/HW+dQ5499Z9zbBNh16jbAVK3kngXT6S9Kx/PvSOGO0v54sCz/hz9D3l19B3
Te++QZ4l8DY5XGCvXAn9i8PVloxtBt5CMzFxeTHoT1E6oSn0H3Apt2xlfKVh
YPvivafcZ4GLY/pLFBEGqvUV+9+vBG5iZnpehzwM2n7Wr8xYBlzftDuJ5Tow
yPbqX6C9DbjHGG0yR9Vh6IYb3PBYAlxV74htkWEwLP7q2/JBC+AKG2S+yg2F
4cSlGW13m4Ez4Lizx0MCRjZ/OCHMNQZOXt3+0eVTMFIYvHlfkTtwIm90uiTJ
wui6veUGBxSBY39jfhEeg9FLFsy81HLgaNdQM16HwGj2NPoOfgaO2PknMe9n
YfSnevCvI2HAHjLXPbFCD0g7Jy4HdxPAzo0at7a+AKSbh78a2/sBO/Q/jl1O
LJC+bygK2+IDbKu/lqkGckAWjnnjrnkQ2Bu0T1XZHQOyYXC76fGrwJoq2/3V
5gKQ7/4KDYuIAFZ1ulrbRz0g10+Kv2EuAFY8yed5xRhQllz9dvVjFrCc/Mz5
obeBcvQaQdtiCiytS4vJ0rVAiZ6a2etvCcx/BWOfrQmgNE3pyljbALPR3qJP
LQWoEt5Lz5eWAfPppZAexg6gHrk0GHR7BTDPtw3anFgO1Ht9i3flPQSm+ouS
xWxLoNaWzeuX1gDGr/qgd1kmQFuooLnjoj4wyk8/4It/BtqBcbHs6DJgRFlZ
3CrfDLSgXUL7SnYC43j+drZ9JdCK+dGPPO2BseZ6RibnAdCmZNQmnXhAJ79f
K2SbDHSNbIdrzq1AzzKWXEw7CfTLue9ICzuA7mk5l+ooDvQ0hccdJmeArt1w
3s5+OdAHf2V+UxUD2kx+xfUDXcBYtduHv3AIaKUS6azDE8A4Qrn/6h8DaLf7
49XPpwEjdDxynvpvoBnIKTisbAFG8QURrQZboIl2dCuumQXGmF6Sg9ZCoNYL
m0XIeQBT5ep0RccToEa9V1Le8AyYpySK34huFcSphcXbag3MBwseBpQHCeJ4
xWjH2b/ALLPb0qiTLojzg+FUv2pgTkjoO1p4CdZB7bgSOwVYG/4L3Ll+A1CO
HDUbFm4Dls3tt+GbzICyeCxQaywfWHf3h3T4hQK5bnXs6/xPwPpi2/CznQXk
8JpdLSJLgcWoNl+ZpAnkg3NbnWQtgC19t6/iIw/IQqgsc343sA+l6E8r/gPS
N/GBBLXfwPZeZLmy8TeQ/OkrgrebAju5fGyGqwMkbfMIy9UvgF3f9Hu+2zUY
5ZvMO9//HNhTmyyW7yLDaFaPYe8GV+Aotg4/ctwNo+dnlB6+pALHpDrm/qYJ
GJX/eHajnBBwri6yTmTpwUiOcMKHayzgvIjfOI8ZBSMKvf5zi48Ap9J1LlOk
DIZjaWIrWl8AhxM1uP7QHRiet3WywcoQuCt+VlQa1cDQlfwff+IygLsztTQu
xRAGR259Mn2tA9zTCf2nJ/tg8Gj0rLJmGnCD2zcXqF+GgWJmxGOeC3DTjlX8
Oe4FAxsfyu9pvAPcGsmqS2510B8XFbFV5w9wWTLm4trfoG9uIK57ZSPwFp8J
b8/eDH0uYau4yASeKjXh0eMw6O2Ioh7tpwLP5N3HRcVfoVfvZx9TQgR4Lnmi
5B050JP+vetVmgHwIqa6vl/bBT0SU8Wwdinw0gNO7tXJgO5rzzyME7YBr3xX
14TNRegafD8wub4XeMPajwPDf0DXQe0fosu3AG/GlRzUkwWdWTuSvy6WB0Jq
WDJT/Tt0Ls3ry9mxHwi1ezfzHw1Ah0/us5LNukAYXrnlf9IX2nu1+lgDl4A4
G+NL0iJBu57+02NXE4C4Rm+ZWlkKbSmdXb+lBM/fvzYxMp8DbfNnnzTeWAtE
qt4Jxuev0Or8heSe9wmIQl23UGV3aIldE3hcQVBXGtw+mg2XQvPxOb+c81pA
DHdlSNsmQJPMuoabQ1Qgfvi0dou8hYa+2Oe/7XOBL2z4tdRyFuoTj4n3+TcC
f+XR3zr3AepOuxhJ/DoNfOXItSP3xqFWjnorwWIP8LdPVz2x1IDqwbphE9pL
4B949sA3RAGqXiilJO/+C/xjHmsHs35C5amfv71kAoF/5prSJT8fqJA1Vu25
dxf4LjkGcxUTUNaz2ZNCSgH+Ndn9DYHlAickiV+JEgV+0KeWg1eHoPS1bWhH
yxbgR4bmqEytgq9ypQUa/8kC/1HI60AbZyiKv6XbOlEF/Od5AemWj6FQIu2t
Z2Al8FOlhA4cXAoFYQYpOpq/gP8mbYkga+Hj7JUCK9EbwM9x9heXUoQcuvsK
Bek/wM+3Wb9aYhCyOswD8qsXAr/Qf/xs0SykYRaj4v5x4BfXt8pfSoUUmz2G
z2ouAv/bkXe0JBrEqydwVc0eAb907vqLk88gXNz2ne7jAuDjqM51fXUwTTi/
zJR5SdD+MSL+IANDEsY9wrUELsLtARqr0zDuqvoimhlV0F/6sv8YcZiU+LI1
O6ED+CWGuRYUHr4mid6p9DIB/pfVXtnGSfjmZ+Iahy+uwC/4z/3E7D3MWeAy
PrxJGfgfjpTXFRvix6jNrnSlJ8DP+vCkddNPLJD6z+ybPw34rw9KhVacxs/P
/ZZdPM0G/gvRS6apRliktE0h2r4I+HGzdQPrFbAkU3PyZmUo8KPWe2u4dmPp
Vs8lj77bA//2jZePGvXwu+3l8U7TOOD7LXgWO/sBy55vEcbaOuC7lmX8230Q
ywc8g544TQHfPldmcp8LVsppaBy4AMC3bNvXqLgRq047UQ7eCQe+gcqNNRM/
sPrFAhdqpOD9dLJVivw2Yc2A2LMrXWbA33gpLd/NEetkXUxd6tOBL2PrYD55
Hett5M58lRWMt/BmvVjxXWx4/F/exNg5ICa6Le9PtGBj62ktv0XHBU5z9ik4
8QmbxXtrP8T3ANGi+i6srR9bDO9eNJVaDUTJhlvb9lzE1n2aIQUTq4DIOOk1
vzkLWwdzzdm+XCBiK1f6PFiBbf5fXzylLQXi+oXfK0JysH2lpfuaRw5AnD9Q
FNZ/CNs/uNeOnQwGwtSG/4C6DDtMFhe33Rc4UCtT/w/XAjuoKsdamnOAkNU0
fTPVhJ23il649n8A3txU5XXbQ9glXZGXq3YfeJRfJ223rcSuD/De5EUL8Gp1
vm8uWY3dhzenp7f/Bd67vPzWxxzsHr6F8/NXAu+B28T6yizsubZL7mGqMfCu
XDBgf7HCXnErelShoG2R4t0rO4O9L1uNTZu9gKcla3wn7Bv27ci4djHECHgr
OpNcFKaxr64jpVY0Fbhj7Yb94t7Yf8ZqXjm3DLgtUuuFvi/A/rH1fVrFw8B9
/1Sqe386DoTApZgAD+BGOgrJ71qJg1Kp06KS94Dr7NVhx7DFwTST1viEHuDu
q73VLaaCQ9rbDeUvngTumgsT4REncajCNjtoWzBwJs00ZWW+47BFocPHNh5w
moM0KUUHcXjEtLxfeRdwMn7PjErm4IibpI7jA23gBJbHpuXvw5Ffohslw0SB
Y90z/+wOFRzdHxfy6Md+4GzVta89IIOj4YXrtZZIAWceu3TDdRMcbXDLX5Oc
BOxu7k59/Q4kLcvzJt3IAva7vSwTW0TS8fD0v8kXgR1Imfr7SBxJTxiPhvyP
AttiMMJLPg1JfR0hvC2nga28uVrpRy6S5YzKU3MDgDXZSGb8M0LyWYNXd1nx
AsfVrCDMhpCcUuttknISWAmyUe+E/JE82nLv22VJYF2out+jsQQpSicPcsMe
AWtH44kLpZJIcTj/e31MDbBEtqkFzaYi5SWxZEbzMzDb+HY++/cjZWRy5GTe
K2CmLFXLs3uF1LUBPQ+viQPT9f5kzY8gpJ72t7c5cwaYO93FzJCL1Gd8So/S
EDDnfyhjlqsgtXu4qyS0EhhNJ27p7D2ENKmDWbu8FIGR4Pii8YsI0szlulct
MwPGua5wtbpapN271PMpG4GxOTf1G1UbaVUb1FRedgH9x6R98cQdpP07flJJ
5C7Qi9LVtX6wkL6LIK+9kAr04LKQ35aqSPeatrS1NQH6YdPuVOcKpL913dlN
Twe6hEG6Z2I10snGyv6/zYDWnutpnv0dGbIx2X+THIGWEF3Ykj+AjGP6HhIb
J4FmN7JQUikSGeEW8w9YvgSaQjq18u1PZJTULdmu/geoZApZWuoKMsbSNK8v
KANq+vOYd7SjyFQmrSn9zx2oFxtCnkqtRaZtoP9XKwmgbvY/bhbCQWbU9d/m
DYpAYacmPQ/1Rua3rhPX9bSB8u6I0OMtzcjk3z/sZq8MFFfftfHpX5GlmBz1
YF0uULasS9Jw7ESWxWJaeOMBILOPq6zTG0dWcKvcoT9pQM4SczQJkUPWB+6f
hY9uAPniYeFkriqyhs9ZnAs6DmQViRLFO4HIXrLpp6HbPCCR7fVbr0ogW9eg
SNJcG0gp+gfTvi9DtvOnoCiSEJDssiJu/nyI7Id+G/nj24Akk14j/fkQsr9G
JkxnaMJox/aK+ccqkE3nFI3E+MLoA+u9CWtzkbP8xU2PHGEYNRb/xyCGkaP7
vP3vMTkYFT7ZUmjBRI4D7dONznYYuR483pPDRk7kTcWAY8YwzAt9sujqX+Tk
nlmluiIShu1RVXqmHDndEc88xIpgqG2ntSxtFXL+/C7sWfkQhvbzy5cHbECu
4qegD0pUGPzIVax3kUPuoUKRuX1LYVBJQ6Ulth65F+fOxUaowkAM3jv8QBq5
9+59+ENlQv/fZHGS3ifkvrdblV7bB/2XW9yKV/Yht8njS+1HKejrsfExcPdD
Lq+yKiBhPvQd1GVvT61EnsRpt2w9U+jNuf7ypFIM8rZqU/VtkqBXVv5SvK0i
8kyOXuC9MoKe0A2yRdG7kHcxXfsKhkI39+kDz6Rh5N3Z89BdEqDb2j9dMTUF
eS+X1dw+6wRd3+ph4CYNeSVKKsa256BL5eGhPUeXIK/LY85RggGd99sSj7ZR
kEf8eueh3gAdP2M0A/L2ICH67d5/2o3QcbJpyumjGhIKX/8qXjaDdnw42NdU
hYTOlNuRljZoVx7u/2D2FYmjLoeCR+WgLfIL830xFYnzK6cLtf5AK6E8/0rp
HBJ+v/4unAuBVkvlDTbz4pG4v7I10zcPWlyvvy1p2IlEysWfP8WvQ7MmY8Nq
/24kPv7gXb4zCY3T8fXZLdlIVOQZFf7tgIavD7KW9M9DovPNk48lw1Af3Ne9
68cOJKid7qfpkVB3KMjV++19JCZ2XBxb4wW1ohHh87N8kD+/YUPXaB1U1/0+
LGJbg/zl8eY5k0lQFTXSoXHfCfnycdFWQWSoPLrP8s0SZ+RvrorpX70HKpau
HysVd0f+ji1LYvKvQlnzo4HyyLPIh4pSYZcU+P4g/lDj6yHkG8c4Cf/XAKUv
LqDYuz/It4yuSPphCl//Y1cMH/uH/FOlmSplt6Hoac2iy5ls5DsqDWsc3gSF
0kuESO99kX+pUP/pvjVQ8KhemTWzD/kegSmBTncgb9kKvmYtIN/Hj2Kidx0+
rGIUL6jcj3y/VN7bDjF4KyE08H4uA/nX/71JMHwK6cKxBu17FiH/1gNhc52P
kPLT/Y+u5mnkBx0dt1u2CeJHtq5c0XoS+cHgeV/jFUTE6zYeqhP0F+wYMDvl
AXbnNv0XUf5FcH+h9PJnLRj8tXyVeNwy5AfqH/Uej8VH3qZ5bx8J+r8xuW31
KnF8EXbDs/WfKvL9h1v2NEXha9MexdIhFvKv/j58bmYtvrGykPmQ9QL5Vw5/
PlbShtmnF6cHrW9H/uWafbKPz+NHTS83u52OyHcKWLr0qC/mF5w+r/9aEL8z
Z8wqG/fhZ51PVfm1Tci3vqqz8msdfvnivkHDsg75R779lV5ThiW63msKdYyR
f3A3WSFpCr8VFRwwlp1C/i7OpspJL/wu9zAp03wt8tVaZDsnjmOZXY/NPDRB
vhJD2CbaE8ufv14/VjmO/FXbd0XlfcWKXu5wWGES8kULVtBWvMEq6fdOdjkr
kZhx4Ylln8Hq431PGj8JI8G23tpiI4w1sW52Gzgfkej31dUVWYu1jaefk8Ku
IVHXFHRVeDHWi6YebMu5h8QXO68uic/YcGCHkb0lD4kMxYiu3ZnYeFMipaiK
hUSc/N6ljU7Y9Gm94RKjaSSCLKV1R8yxmeehl3clGYnLmLBpajW2SvoY6Gj9
RcL6wpEqp2ZszS6Xr7vdjAQY1oo//4htRikfVejqSGxySBE1GcI2yiLxs2eu
ILG80K3Fh4ztN6f3pEzoIe+XUVuIoSt2SLtYmYbNQ96ItPc+zlLs+HDKddk5
RF6V4syWjWex83D1MyHSXeS9dVl1iuyAnSNZvz/RlyHvAf/6yN0Q7PITyj27
IwF53gXkIvMt2C1RPTTYkIk86+LFnbZS2Pk7fz3WbjAG3t0Hx34
162MPNnwd7NG2tjTHNPVGMNE7m/zIvNoa+x15D35Mbcfuf12Hy7sDMDeqcxS
U6le5Ba9c7pe+Av7Iosj/rxIR+5TyI9L9cV+uXXad5tmkOsre/PW+Fbszx5Y
9KNoJ3KP676u0ZDBgb0ks5qXccjd9kqy8PoaHGjRtDJUO4Bc8WOFpq52OHi2
xs013Bs5dOM7arQRHOSl8Jcb3UDO9/tXPn77ikM3Cnf9s0tFzvP//BsMenFY
TOy9RFYncrwnksRKo3E4Pu6DZp6gnpiuIcdm7MURJYuc538rkLPu4fHl3LU4
8n7fmrpLZGTPWM+WLzDF0TVqn9tV9yO75fL4KeoVHLVvXW7UFYTstDbTxZ2y
OJq2wM7QYQDZAffWeW8ncJTRMJAcexXZR588TZQVRtIWpd6FoQxkK063/Wi7
gCSPBc8VZrSQ9TNnWt9UA0m51zzuuG9AVtW3HQn22kga90xrVf8PWQnrS53+
PUHy9vGY7JPJyLpIqTEzuYTkq7N3hqvIyNo5d08nOB7Jn6KGTLojkCV6zWA7
6QCSJ5MnF+qlILPbeHeECxkpO7S3nH0Vhsy0G7mPb2gh5aoxmaZ3CpneEj96
z59ASt7w7QCLDmTCvCOkpsNIGRu7Ypks8Iq4zUqjVV1IVQ+UE38Th4ye5cmp
4b5IdQ2beC80iYzUbYZBvquQ+mahe57zb2S4FVy2OyaPVMrfubWdAj/pvHJL
CBG4TsFV8ebtbKT/m873Mo9E2qkjlpwve5Be++XNr2gy0h6/lNmSvgXpsbSS
hYZKSGt2Gk8T3YB022C77SCMdNFnHh41NUhXiJxr9nBB+j49GYebq5BGF1nb
YVmJdH/TQOlGA6S9G9s5qp2F9A/VOtPlD5DmZV6/9Vgr0ulv+w2EmpCmo3zy
FrsSGXK/RBQGEam/Pd0VjYKRYfneKs4xAamlWjF9CXuREVHtmaRfgNTbnuaj
RSXI+Hror06EPlIPbdzbIbRN4LwNWaeveyF1od2PrHojZK6/rCy71BEptcuE
cqUEcT2xVCnq6m+kRB4Q9WMpIPPuipNjgX+RYjyV1tK0B5lF3pFvqSSkLFa/
/mVeJzLZGl6mVwXrVsdRtykLRNZ/xl3PlD4jOVL94rhjHbKMvwU9nRtE8uGZ
9sGLBcjyv6f3ZOU5JC80l78SYIasjJzhzQqdSKrcNiNi3oqsTtXd+3asQdLt
ZNmhCF9kC/3ZsuHgASTtTdy5wfEcstUUY+7djMXRP5sXk/2akG37zCTi1XMc
LTS2oBzjITvU6eC7bTo46v234evPTGRnB1+Y9ZTGUXWj3cV2USg4v6QLXybj
SLtVzevyR8j+lzneUpaEI4ePyG9XGkfOxo/G/+x1cbjk+mLf4R/IMRd9UyUt
i8Pq5E0dZy8j59rbFfz/XHDo1V3p9KxjyElMuM+zl8UhKU+/LfEFgu+4RaWn
8zgO3kkcd229ghyaOe9qhDEOTK7YIV8rgVyx1TP6r1VxwKl97GFAAnK3bj5/
8fg67O+g9icoUJBrFmxCC9PB/gMm2Req5yP3ilyHVzQJ+3IXbYz45oXc2DmV
mPeHsE9eSbzw11vkflzv8dijHnsjnyl2mJQitzVqNOuXAvZMXtUsvi/Yh/g6
eV3Ktthz7rPE7jdXBe5br/j7gQp2NziG/bwv2GdVj7lSfKaxe8ctbxBhI8/w
W9+Bmz+xK2Xxe5lbXOQ5Xs7/cuYxdi1aunzugxHybp0w6bWjYeeVqNtUjTbk
JQT93Jqvjh294RTxGQvk5TIW7u6exY59ImsmBI7g1d0jR8S7Y3umqMze6xPI
I13mJK5+ju0SceWxZsKCuhB+T6RGEtt8cpYGiTsisXRoi72wMbb2nSR8NqxA
QtnjgGXdKLbuTbR9UNGPhK6uYaJ6HrYYcqM2uvYIHKj/adGXWGxeNuTwqKwa
iXM3lt1JTMTG3hXbqlTnI+E9NiTVLocNKTGT1TnWSNxJzuqX6sD6Cw5fJHQ6
kIi/Iyr3Lg3rtj4IOkzZjET6yyiDLQ+xZnytrarxcyQKfrZR5n5idaHs8Z1J
AgdW3LqR1z+IVTci7kSX7EKiTV89YUkiVoKXcK6KwIXDWvGvM45gxfwhjiXZ
UFC3zzisiXTDsqrukyrm35CY/GboY+6A3+86ur8YFjhMyFLo+DI+lsavTAgK
EkP+4jVmTxfcxa+r32uOzOcgX2r11IllV7EoMXHm4l4+8teYlPWtqMJC+Yn9
i0QFDluXG5yxfRkWpFTZb5gTuGmziejN6QHMU1LI1nYRuGibjIbtnk78cGjj
0uAFacjXlun3XJSKbw0cE9ZYUwVuMWXvMPHGdEPJAqs9P5C/J9/4tKMqvjS0
3fRP/Sjy9x6ld8Tr4ZP7mT5ZlQ+Qv2/N51q79Ri5+mmeh5Qo8vfL5WXcDUYn
e5Gr/2QFLtp/rG+1TT/canMJuxvRI7j/i/rCY0Lw8Oo6vvB/ZgLHWhYnLJKE
RJ+dCZJS85CvrxitXrcNUr+88ziuqIn83UpFnhLNkFmokO48uwn5OidsdwxX
wvuCnpLVnwVO1CyNSFoqDLm9fUEFtauQv/XU5Rlzccg/UevkMkdD/gZV1T41
RfjUuWl33MFJ5CuoTQqPGMGXY8xPW3X3Il/GedbvtwwUN85EfYgXuHRpe4DL
P1v4ZmRy/XaxPPIX+GQdaEgALG84aLfpOBJ/jJuTSMlQtnZHd98FEhJj1pqH
4zhQfiq64vEqb8E54MnaPUu2QcUTZ4upjAokepcwXmpQoLKtwPOpWRMS9UXU
Opf5UL3ER6JCrxGJr0nemvq/ocbwmVKWeRcS2YU//AYGoDZ4bdrTXH8kksXq
znnSoO7Ln8caZkpIRMc5Nztfg/ofG8cf7+1E4qb1zvLbvtC4KbH61b8pgdPM
P9kM2kCTvbmc8pN6JGxCT34v/gDN8btFFsWYInFwLP3goYfQUm/1OKZX4Mpt
T+V11nyC1iDTq+XfBK7877rpbGsYtK2efbQrfh0SIgllIjpboS1P97PzqVzk
8X4sL43/Au0mc7+kX61GXnd4Z8p3T2inGHkZ7HiOvNKT72TneUPHDUlQfxKJ
vPTLOx8T1dApaRviYRWIvKiidT6yI9CZJWMvc7oFeV6HZYVTmqELTGabtr5H
3omVTSHP1KGrkx8+yN2DvN3rpqVcONB9ed7WE14SyJP3tij5sQi6524qqmw8
ijwh4WT7p3eg59HpZ5tIwsgl9aQWG/hDr0pyu9m9OuSW8zfbbRKcY7/A4jdV
1sh9bTovxdMM+kx0w+6e10JuCOff+64d0Ddw797jesF+7NA+6yZdDv1u6s5U
nR/I3SfUFXooFvpnlS5JUQeRK+/rbj5Nh4Eoe/q5VaLI+a39lnTJEwZl6btL
fh0RnOv1AsbPn4LBzNwKVsAC5Hx8UE9RFoUh7RJaLFXgtvtbH+UvvQhDZSKL
bK/lIeeCdP1v0/0wfCTs2Z+it8gBMy+K4U0Y7tGXcOwVXJfpvKe8LA1GHDb0
FxX+RTb/7X/TL5pghA1B4b93I7u6VUN6TBRGdfejg8cKZCcd7stTeAijN6dz
faecke0judVl3w8Y/Q79Uq33kW2ksd9gpxqQhFeHrzvHQrbc6x25TsZAMgie
5903gKwxty2eew8BKeJqYvURQf2uuG/0tOYbkGonMvvSach6IlL4gHsDyGJz
N648DRA4rjtjquwfkE1iPc956SNLV9g4970jkO+9GXnem40ssaju1otvgFxv
uGVX4G9k9nlFPp5EoIhdKAjNN0fmm0+vznk5AcVoEWk+jUCm30mHD9XrgBK+
RTZ0ZR0yDc5KSh5NBEpFQ/26dZeQKVk5p2TpCFQhluNJ6VZkjMRc8/N/AFT9
EOuFJuuQ8a604c0SU6AGxK/28y9Hhp+VrY5OIlA/KW7w+f4BGQcsfO+vDgPq
mNKsQYTAdUsKw340coGm+uy/StPdSO+OYN2xMAGa052FZ08cR3pK5aKt1veB
lkQ6vM7xH9IvuR95/PMw0Lo/XKpT0ka6RpjKuiNRQF/K/V2aEYq0XxLCTMkY
oBs+jd1StRZpuPBsyoQ70G/l4j+T9UgL885JmdoL9AJt5el140gzPX6lNbca
6GylM1kuRkhb/lbldcAUMBT8lkRb/0Vql7/FIt97wLDa3ivy32KkPsPrTvFC
wLh74rJD0jeknrm9NcJbGRglQ16TKq1IVSydfLUxHBhEzasVw1uRQrl+cZfI
AmAqSeXImGxCSvon6bXqjcC0/H484PkSpFy88vyi9hgwQxvN62hPkLIpJ+ZM
iBAwC3ScS03PI5l1Jc6vohmYlL+ndSd4SM76YmSmmw0sKYU5q39CSHaJsIzh
ewNrf9IaJ0OB5zeNnJymBgPL0ydi3urXSGKUix1QWAesF6myy2u9kJShuVTx
/S1g1W3MbtwggiQndVmN6PPAmhRWqe5/gySl4iEi1hLYitudpzILcHS4T/L9
ajKwTQptiu9G42jivSuhnZPAvhrNJBUm4KhNa76ZPRfYSZ/F8+JHcFQq+9mT
zm3Arlb//OOaLY4kG9StfZIFbN4UjWFwHUdWOuUufu4EnFUSTy+tEzgusuTq
+9MGwNnj1d5XaYZDc0ffVBelAMdhXbJu10Ec8l5LkYCnwAlXWKS87isO0rRw
Sfhj4Ly9sK730w4ctLk/JOkRAJym6QX7azxwoE6DLK13EThjrfUzKXtxYPc6
v5fPg4ArOf742OG72P/W2TT/ui1wte3CLbZsw37Zv8s/9pcD13pxfW3sCPbd
5d067OUL3Kv/Yo2mH2Dv9O4jx3TNgftYd7HG8XjsdWLoIa0QuHmfr2Rv3Y49
bb9WRO4ZAW6rn1DFMxfs2XvlYZjlReDyAmYt1wlj91uriFNfFIAnVvpWOqAA
u1dlljmF3AKeyiHrPAVV7Ar2WPHskDvw9i02z+mbwE72u6NehArwTi3jha5W
wU6r80dbn6QAz8cq8smWeOz49oxgbDsJvKie0EMXXmPHhuPL165fCrzXT/dS
Vjtj+4NHcb9H5wOv+IlK5aUN2DZ1+txCs1jgtbZm7Fm+GtvOFJzO104DHv3w
9qTpLdhamXztUPg34P2eMTTN4mLrlrUJ+ZnqQCyl22Xn2WLLOi8XtU23gVgn
MbWn+S428UiBS8QrgND2TApaqIGNX+JPLpwWA8Jw8fDK5GZsCHnMKr3WBMSJ
EeNc4ibWmzKV9YJLgbjA9VsnYY91KxOEvh+oBMJXa76l8z2sGcy6EVnRAcSd
D/dNlc5gddrGx+nXW4B45FSi438Qq1xlzQtrOECkWOx26KvESs3w/FpbwfV3
V4thahjLp/0aJPxoQHxuHruclYhlXydSC402AFFmn5BW3IvfQxaYFBNlQDRs
8BwI34il0eff7bER3N+5fu+mG734VVokN6h2GIhB68b222JYlPS345iuGxCU
bxxztWosVLE3SGw5DQTbzuMgazMWvNfVq4tDIMbUt4VTvDFPK/GHmYoTEJM6
SxWItfjBa5teSIE4EDPehLEmHd/eDJjHeNUGxCy1yLM8F9Mjdnxc9NMMiH9R
Z7VXeODLh2H13PWFwJ93ofXyniFM2CmVLun1Gfjz/cT+262D9+Ijt3Vn5Qra
XxcGsb/i5fE/XyZ8awXtHY2L/+yB6zsvd9cs1AK+ENXxbK4bxAa8YWWuLgZi
rqbHIuoAPHeqVz52/xcQf0b1uY1bIHVj4Ke3lu+B+KWW49oJkCknRJcIHAHi
Z67hHidPeL+sQb24OwUI4tLGX8XpkHv7bKzl0ykgmNY3rtwfh7zfdpsfNGkB
QfJ3TyLXwSfvBq3j35OB6GvTeNN4EArZybfo5yyAaLP/Q52OgWKHSsqvj7FA
1KqItyoHwtde9f1S8YL8KVVMXe57GPBovZ+Q20Ig8o8v8H59D76TDn1+ZtgA
RObX20yRJChfo3b3qcUuIBLPXLoTvB0qrBLeBdI+AfFAZ9nNExehMvqGXJm5
oP9gw3al+v1QVdUydP1PIBBescvJWeVQ/Td6PLWyFwhHSU2Dgkio1c52hk27
gbBoSmKQ5KDOdcOB56c0gdhXXh0Q/BPqX4698N33Cgj1cYWSgxbQ0C0Sue+o
oH+50+tvyMyHpsWnlA12zwNCbN6xWI4MNOuzoqkpD4E3QVYdMMuElitvOZWe
ocAb+bdnD78cWi1MtUPW/QRe/cllcTPJ0MpqX7PLtBZ4+WO7v1vKQ9ttusGp
wTrgvaiyiv/8HdplQ9uMz3kB707vzGCRKrTnZoyGy/kBz21L49FEY+g4bJrQ
YkMFnmWp933xPdAx5KGwK8oCeLsePl2HstDpszj14PU3wJNP5wWOfYOuRfLm
MzvrgTdvdiOnKBW6XqTaCUu4AZcWPy/abBa6NeJnKixigVvrpXt6rQZ0V0xc
8Fg7Ddy3D+MU6iqg50TRiNIEB7hRUz2XF9Khh0nOENL7Cly3Vx0P7cqg97rr
PIMCK+AeiTv5rjQd+sTN9zh+OwjcLY37IqUB+hKjXkvFvATu4qPns59PQ/8W
uSj/Y6rAYcq8PiKbBv1Fc0fUFv0DTtUW6j6ZfBgwUtvvcOckcF5FLRftHYOB
rvSGH4tygXNLZ2XpYUkYdHSyCJh8BRxbNdrKEl0YJJz1ru1fChwtH/8jWeEw
FJA2e7SjGThLROs11cdgWERxgV+VI7CpnIHlt+/DcHR7W4TvUmB/U/zw6aAH
jEgXjRiFVwD7caaF/RcLGEluy+vMMQG2a3BT6bA6jEqJX+7aEQHs/Tk6rEsz
MHriAMehNgjYMhqvT7zKhtFnEunWfQHA4oqp9WzqgdEBF1rD9hvA+r5rMvpF
G5DkrWeL8wT1Nq5MnrF+EEhnW/VFIQNYF1Kb4/otgJTSPXu3eCOwdo1sD1KR
AtLopcfSjV7AWux3s4Z5DciKofZx2TeBOeA2/OV1D5DPqXybauoF5rvvD9F7
JZBTzFbYXDkEzBs+7c785UAe+l06rRYJTJMIkvH8aKDIqW47ct4SmKvnhJfH
BgLlZH/zkuhiYNB7gi8ukwVKgvhiHUH+MApWpf+Y3wGUjqITcg22wAguqjx0
LgKoy6gbPZ1ZwDhStW2k6y9QTSOnDeVbgLFad7/SjCRQw7MOqJq2A50iY7Xv
TDZQy/bdVczfBPTsc3V7HzUD9Y/Zkfy9Q0D3kxGmLSQDTbtN+ncmFej79rgW
dqQDzb3G641wItAXtbjyvGqBlrGNs3T3baC1dvo4Wz0F2rDYqi0XRoD21HQi
2Z0L9FUWYXlrtgLNfqdz9nOB846IdkvGcICm8nTf9mkPoIeovg790gBUzpV5
1gqlQC/8ErNkXz1Qc79vzrZyATo3Vz/KfSNQr93TP3z/DzCUltuU0clA1W2p
iPM+JnBez71Tl58A5e+jw3YHTQTOEwkbP3sNKN87ThS9rgNGcfy/dWZqQAl9
HLrsxC5gcO/lhB+5DhSDnnO/RkaBKU86Vr1bDyiiSXcPrbYCptnTjKTxRiDX
MuNoaVrADPxwlXbmApAji5UIuzBg5ijfeXreU+B3qY7gF+LAHJxKHW5wFvh+
+khVRBqwxJVfSf0yAFLdBW3yNg1BnmRbNUfrAumu4w7u263Aco5JYEweB5Ih
d5a05iiwHtYbhbZoAWnBIt0nqeeA9e20sYyeDYyWf0ou2FMDLOah4CtSv2E0
aIqUHl0JbMnbfSUzejCq11Qc83oK2HpSh2KsAmBk3K82SusWsJ2mC7jbEmHk
cviu6+dqgR2tvt5ocgcMk+oNFhZeBXbBp/sJksYwbHvYx+GSNrAH7o8bX78J
Q83zjpaU/gTOvPxTdktfw9CBP+e3NfcAZ+PGFiuaBwwW6h5+8y8bOKasc1a+
K2BQtTSu8aYDcDynlVakVcFA0gMqKXQVcOKObabmjsPAsuzBogQ/4Hz6mdAo
woD+2wpKTxN+Aadn9L4X/Qf0/aCflft8FTgz0upa4h+hz1F0/warP8CVjXuj
IPYAetvCbmHNYeDq2qqKZstB7z6nBpGZaODaOjJvqttBT84b6uK/B4Drmy/X
YZgFPXLWETU3/QXuM1qwbaMRdEd6+P9aKXDhR0VqyDFb6JqcDhR7uh64Tfrz
HxupQJfDxLl/uwX7JjPx/UKtHOhsusQ/mS4CPGE9LRvjQ9C5y3bm71irYF+W
57C0NkBHaq21XNxd4Ons0xbZNQ86lhT3rtYwA55Z6uUBB21o99U+42ajA7wL
BydjL5RD28iu8scaT4F3S3nvzns90Ha4gfFjlSvw4g7kD5jVQeuHH7kfVwHw
3iTXBy8KhFaZnPmfLkcB79vOPxtt1kDznNj9HyV9wGuTqOjw5UNTw88mrpYk
8KgKmfeuBkPjs3Wv13RcAt6Uu/rJva+gwTmJ089dDoToJO1Ewj2o13SPYlZq
ALG66Gw6tRNqZ5+57mipBmJToWbAsDnU1Gy+9qHSHYidxG+ZNc+g+qFKosQT
K4ELz53sDr4KVafimxPP5ANhtXh6Y0QxVK4PEV24QRmIc8StR24/oJwzvndj
lioQ7ouTirUvQlk+caVtcj8Q/vYSZx+2wfcbgcmJ8wWuDOFEnMm2hdIw67hj
V6KBuP+h4VPNKvgqOcn9+Y0NRPy7lPAvHChKIWzcpdYDkTTcJHWiAAq3mlG4
gwLHpRuvL3//DQq+bMyUd/EUOJLtryQXDXkH734p8iUB8bH8NcmGDh+SRC4Y
mIwKXNkWNrR7IbzNM3LmV9GBKJGZLx20BtKr/2bbPBCMXxo3r/AkG14OHLq5
o4UicKeBjyQjHRKGr2+6+1jg1gp14/TbBNxfspaUmbgaiMqjgSv5YnDls4r9
7i25gvbrpRpXtqPvu7M+NNc4QVt9dixnK8YsSO9SvN4PRPkPS79QNj47tUny
oNVRIL6z5ZZl3sJXT02Pvk6KFIwv67ZVcwNmhPAXb1tXDkRx0KlLQun4zm1k
MZr2COYvJxwmVI65qn9jz/wVjJfLj3Q1XoV5KSse0i1FgHj7W2rTWln8JJkY
YO02BETankZuSywWhkXp/rYJA+JFAVPimg4WTbc2BLkJXPbY+fm/yFH86nJa
9bgpC4goMyVbpz9Y2i9vuyJLEI/bHiUNjyLwe/p8tcm5tQLn1+RuFnuEZYPB
ryKFBC51PWlstx+wQipkefQSQb7Yr+9xVr6MlcZzd7WLHIGw3PjBnvITq4II
WTNRQX4dct7in1mF1Z+Men0NrwCxY/AtsTYVa9gLh4+OGACx4cEjCW4D1q1V
PPxedAYI6RsmmjNxWG8RvaPdmgrEgtf7vyVysOGOQfPL7XECpy3k/pchio2f
D+hV69QAj5RR9vmYEjYxrn+YsX4GvOZQmJsfgC0yjDMqM46Cc9QLlt1cBrau
/w4WfrLAS58w2M40xdYSBVUt6SLgxUaOjKgdwTbLJY+ky/SAd/2sSdbRF9jG
vPOCHCr43s57r2mc/xnbA0N9Hn17AjzTKsLVkIwdKxccsNV+ALztpxwf6jlg
R9bCXbmrEoH3n4b85okE7NQPibw5VAY8ocM1/2QssbPN11Vha47Abakr8i8f
wS6nYZkHQd+AWw/ZpboLsGv6U6NXZxNwc5SsLiRJYXfkTMMu7aPAfXi4vDRT
AnvWZJzUVGIA1ye/OPnSZux5X4hpP9cKzr0X5icPFmCvvqopT9wAuDr2F1YW
RmBv42/zqFlt4Eq//CS+9An2nVZWNIiSBc6UaqU+swr72GmrdZ42Aadzzn1l
tiL2+/vGc3liwMmXi37hk4IDCxJmAyks4MSGLwrZ+RwHHonkp/6VA477nqol
3NU4KF+0seaIJnCM936Q8ZbHwTcf6zfVWQNHOaZwsdcaHNLiLGeHzAP2v21t
3Su+4tBXB7+tb8aB3afwi5OohMMGK26tv9ML7DwHVZ3xOhxunH6jrr8B2Pcm
Lsn8O4wjVstDeHf8ge3YX2THm8GRftukUwpMYO9etVnHjoaj2+iG7ukuwF6e
VrPbgYOj3tq+6jd2Aot+L/P4nXAcLVilrjVuBaySGlJpxC4cnQwve9LcC6zY
M3Hz148gSSci/KTCELCcjgwwMuSR5Leq6+LKdcDa+YTk47oISYUaizNKdgsc
p9c4ZGCJpKnOsHl504L6Dg13q2WQrDMvw/N7JzCzXy39ezkWyVc/dc6zWSrw
gUPjcE4rkvP419gLNAV+CN1LXdCE5LH30/c62oG5dmFq62cyUtS4NTejNAX+
4O12fSWMlMvZNs+oIcAo2WXqS+lDSgZPXiw9WeAXlkKmxxxSyG9jjTJagXFi
nsgLv1ikylPVtpdHAmPdbdPuzhNItX3qsyKnAOiEq0nuvndIfVRFfYGXgF70
/ZRluCdSG10XLXlUDvQ7t3tyYnYgbUH4RYV0gdvMPq73Oc1C2l7pGOVWJtBX
m6eKsNWR5vvfCpEPgUAjnS3xHn+LtOyY2ybc+UDLGhnwfH0badRr/tt8q4Dm
1ellqK2H9P/qH6a8PgE0XX1+26XTSD8W7X5Y7Q7QhOSbvGY6kB72NeeZShpQ
q6/dEeFmIL34xGxvRQ9Q7xvG9jX8QjphJ7xunQxQLR5dfdOKyFCqueI92A1U
6VP5d8cdkGH1fDrv2QxQ+l920kg3kBHeaV5ybRwoyRfOX+P9h4wv3tsdT1QB
xeE9b1t7KjJYPg5ByjVAUfYV3uf/Fpmy3S8mmB1AplfsFopfikzj5++LWvqA
/ObJJvbeIGT6l9qNSPkB2WXs8gOXdmRm7gt4WhMMZNWOF/eO2yKzS6HP4L4G
kDj77W92BiNrvp2lrzIFSO/2nPiTIYEs9R/fJwTfI+lyxea7McrIOkUWabL+
CKTN/cHht28iK3zLfEtOE4wyQxepp04jK7chdZOgno9mlHqGHeIhq7+8zUh/
CEadHlwyq3NHtsiy24uMTWBUaSJTxLca2VtzM9fTF8LIN1rVIx8NZFul65cJ
3YCRnavefn0XhOwb3IN+QoLz0YebvhpLKpGdeqfE+uBeGN4on572Xy2ya93f
s3zHYShptqTWWRvZvAxlg34RGFopv0/NeQo5kmpaonZJMBgZgmr7TJCjM49j
l/wGBuY06jrPTSLn5PrLC4cFbW/VyXohW+TciG10+WwP/bSrQ7vCx5CTZLwj
vHYl9NtKrv3UOYCcUtOmRYdtoK9+4Zkt7qLIGU5AAydV6NtjDaV3XiJnbqv+
4QRL6H0/36tw+jRy5RfdbGlphl65FaluSkbI3bPli91tfeiJCg9bl5yHXNv4
bZvjVkP3b6fWv+MNyL12SAU00qD7Uu4+yqos5D7cSXELCISubre4c2wD5L73
LLSQfAZdB5PuJSTJIrea/fNcQhJ05hpyFTizyB19Q9C5d6FTzi143IaG3Jms
hUs8XaHjruQqs/0ayFvBfta/WAfaf+7xf8lfjrzN7sv1lf2g/Qz3lltIK/L2
besUv8qAttpNM+o9d5B3Qst6Yd5XaNOcqDQya0ee61XR0Q2p0Jp4vIgcdQt5
QRMX9NbshVYR48Ke/8yQF5dHfFLTgea+T/pbV65CXsYH5ZHrT6Dp7crU1fRd
yPvCfGj6MQoaA4pcVo2sRV792bLIuTPQYPTOwXaRMvIGVhht7X0M9dLjZ69O
6iOP/e9rw4edUEt9smvb2RHk/d78dcFVWaj5mFx/8BUTiUUPGKEL5aE6UGpC
e0MtEtLqtJnrF6DK+O+zVR8BifVi57cecoTKVedT7J4vQmLb2mV8vfdQPnp0
7PXPSiR2u6VuCs+CsreVAaEvriFxaKKz3YoK36+2bLbUYyBh9vni7H1JKL3J
oXA9niFh81Gx+VARfF12O8ZhyRgS9tS6iC03oOiV5/42eUH7ooVmMFKgUKuS
w68WzM99Sm2bVxMUVDy6zfmzFwmfjifrkwwh7zjjj2i/OhL+LNPFTuPwoeZt
qv2UIhK3dm7LucyBt/SueSrWb5AI/rb11yUpyFjgudRjt2C+oTc0+K+G4NX6
p3Wbt6xBIsxLvXhvKDwNoTplyAreNzxlbZLfR4i+6a4RH3QLiQiRv3/fJYIP
7WX9+q9swfXUlrNH7qCP2hrFRxefCp73f+6QU4jRClvfXfpXI+g/3LW24Ac+
PW7or6XqIRi/0drb7iC+EhdPzA36LZifiYedojumc6gW276cQSJAqP3F0SJ8
2yhxKY0SJng//mtX+ZP44d2Fnx62A0h4yIjKoBnmHWLeCRt5JIiP3+Ylekws
yI+nTAeKI3FuuW7D7m4sVHr3boN/iCC+ZA/iGQmLYmR/+P7LF8SfEFaZMseS
P63t/zaSkTDYrrNjoQiWXvx+hWBzBeuXd+RH11n87uLmPyu8VrC+rg8PkBlY
lhy2/1TvnGD97S3lZclY3rHu3WIZf0F+RFNuv/uOlaJ67YMrZQX5M518ozYe
q3Y39Gn93CzIrxektToxWO1eQ9beFIU8TuDS4NpYrHm5edWf4XRBfiY++JbP
wdo2xsvWA0KC/J1sJqqcsX7+n3yr3CPIK4rer3rtLjZsPxPyte468jIdTwcP
WmHj+QVG/xwykPf42otfd7yw6SHHQMzSD3nBNaFR8nxs/i5aPKZagDw32yfr
lr/DFp7lhHJxCfJsNts/Iq5g631ySnupKfL27/ZMrBzDtnXvAla7aiJP9f6p
EfMP2PZFaPue50PIk1IoJomxsf3I4FzGbV/k/p5Un6eYi+2kvUuJHceQS5aw
8TdQw45rCs85geeQW3tp5Li9DXYuujXYEZOG3JxF3p5KS7Az0VryWBYDuY+4
5T4BLdil9urm88xdyPWTDmvmqGEX2p+L8biB3FPhfh+/zWL3saiFDWZeyNXX
txVbfR+7SYolZfAIuQp7OAGTPOzxkmvpWLIFuUIhf+zmLmOv0I0El7NLkUOS
si7YfxZ7Y3RdxT8aIec7r2lbawj2yVtm+m/RQc5LKd21eiTse1uRXWJ9HjmB
d665Tt7D/p13KYdLHiPn9AHHF3e1sL8iOU/CzRE5ukdplRU0HDCfd/ehXTty
VmUy73wbw4G+7H6RzCPI/mFxcl6RKg6ef7nWrvg0shtNN4/w63CQ29nufDwV
2RlPLPWAhkPXjPxILk7IDt7elF48jEOz0/EJPCVkn1R+ISNTgcOhw4We7onI
1nQpG1tE4IjYb4/QJ6XIFhM5TFwTwZGYwxZ7HvQia2Ryz8a4IBwVG/2bu/oA
sj7rZwtxCRw1zY+QXX4eWVHD+ZtBFUejZZ/CqMP/ACs8vGY=
AspectRatio->1,
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-1.148,
1.1181`}, {-1.6025`, 1.027}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{3.3173`*^9},
ImageCache->GraphicsData["CompressedBitmap", "\"]]
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ParametricPlot", "[",
RowBox[{"{",
SuperscriptBox["E",
RowBox[{"-", "100"}], "t"}]], ",", " ",
SuperscriptBox["E",
RowBox[{" ",
RowBox[{"-", "t"}]}]]}], "}"}], ",",
RowBox[{"{",
RowBox[{"t", ",", "0", ",", "1"}], "}"}], ",",
RowBox[{"AspectRatio", "\[Rul