Skip to content

M
mathematica
Commit 9187ef10 authored by himyss's avatar himyss
Browse files
Options

data added

parent cae261e1
Hide whitespace changes
Inline Side-by-side
Showing with 19716 additions and 65 deletions
h7Project.nb 0 → 100644
View file @ 9187ef10
This source diff could not be displayed because it is too large. You can view the blob instead.
tMatrix3He.nb
View file @ 9187ef10
...@@ -10,10 +10,10 @@ ...@@ -10,10 +10,10 @@
NotebookFileLineBreakTest NotebookFileLineBreakTest
NotebookFileLineBreakTest NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7] NotebookDataPosition[ 158, 7]
NotebookDataLength[ 671925, 12198] NotebookDataLength[ 743229, 13512]
NotebookOptionsPosition[ 663758, 12060] NotebookOptionsPosition[ 733890, 13354]
NotebookOutlinePosition[ 664186, 12077] NotebookOutlinePosition[ 734318, 13371]
CellTagsIndexPosition[ 664143, 12074] CellTagsIndexPosition[ 734275, 13368]
WindowFrame->Normal*) WindowFrame->Normal*)
(* Beginning of Notebook Content *) (* Beginning of Notebook Content *)
...@@ -889,7 +889,8 @@ Cell[BoxData[ ...@@ -889,7 +889,8 @@ Cell[BoxData[
CellChangeTimes->{{3.880450259849861*^9, 3.88045026245728*^9}, { CellChangeTimes->{{3.880450259849861*^9, 3.88045026245728*^9}, {
3.880450342004263*^9, 3.880450428007826*^9}, {3.8804505083503447`*^9, 3.880450342004263*^9, 3.880450428007826*^9}, {3.8804505083503447`*^9,
3.88045054654538*^9}, {3.8804509533799887`*^9, 3.880450954981093*^9}}, 3.88045054654538*^9}, {3.8804509533799887`*^9, 3.880450954981093*^9}},
CellLabel->"In[20]:=",ExpressionUUID->"75241ed7-817c-4778-b63c-fc8ddf258a79"], CellLabel->
"In[101]:=",ExpressionUUID->"75241ed7-817c-4778-b63c-fc8ddf258a79"],
Cell[CellGroupData[{ Cell[CellGroupData[{
...@@ -901,7 +902,8 @@ Cell[BoxData[ ...@@ -901,7 +902,8 @@ Cell[BoxData[
RowBox[{"r", ",", "0", ",", "10"}], "}"}]}], "]"}]], "Input", RowBox[{"r", ",", "0", ",", "10"}], "}"}]}], "]"}]], "Input",
CellChangeTimes->{{3.880450434981985*^9, 3.880450437069388*^9}, { CellChangeTimes->{{3.880450434981985*^9, 3.880450437069388*^9}, {
3.880450467622654*^9, 3.880450475414855*^9}, 3.880450957309256*^9}, 3.880450467622654*^9, 3.880450475414855*^9}, 3.880450957309256*^9},
CellLabel->"In[21]:=",ExpressionUUID->"0c53d04a-d321-40e7-bd01-78ab6fb12897"], CellLabel->
"In[102]:=",ExpressionUUID->"0c53d04a-d321-40e7-bd01-78ab6fb12897"],
Cell[BoxData[ Cell[BoxData[
GraphicsBox[{{{}, {}, GraphicsBox[{{{}, {},
...@@ -981,7 +983,7 @@ SRb8PGnq4+N0Inq/4oan1iwEGV2aKeLRiRVlU1aGlixcnT/QckpAJ0jTxKUv ...@@ -981,7 +983,7 @@ SRb8PGnq4+N0Inq/4oan1iwEGV2aKeLRiRVlU1aGlixcnT/QckpAJ0jTxKUv
zFiIf5weMT1NJ+4KFVTqDFhIuyjuXiakE3IGA4b7V7HwaK+radAsnTiefUSB zFiIf5weMT1NJ+4KFVTqDFhIuyjuXiakE3IGA4b7V7HwaK+radAsnTiefUSB
XMZC8ZL3aia/6MS7+vDHZ9RZKOctn6EePGLR6cOSMkos/A9M949z XMZC8ZL3aia/6MS7+vDHZ9RZKOctn6EePGLR6cOSMkos/A9M949z
"]]}, "]]},
Annotation[#, "Charting`Private`Tag$8130#1"]& ]}, {}}, Annotation[#, "Charting`Private`Tag$31469#1"]& ]}, {}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->{True, True}, Axes->{True, True},
AxesLabel->{None, None}, AxesLabel->{None, None},
...@@ -1027,8 +1029,1300 @@ XMZC8ZL3aia/6MS7+vDHZ9RZKOctn6EePGLR6cOSMkos/A9M949z ...@@ -1027,8 +1029,1300 @@ XMZC8ZL3aia/6MS7+vDHZ9RZKOctn6EePGLR6cOSMkos/A9M949z
3.880613017272277*^9, 3.8810337608134823`*^9, 3.881197746915187*^9, 3.880613017272277*^9, 3.8810337608134823`*^9, 3.881197746915187*^9,
3.881201407868651*^9, 3.882090691817799*^9, 3.8820907561724977`*^9, 3.881201407868651*^9, 3.882090691817799*^9, 3.8820907561724977`*^9,
3.882329825014078*^9, 3.882421014122815*^9, 3.882867339202798*^9, 3.882329825014078*^9, 3.882421014122815*^9, 3.882867339202798*^9,
3.8831058180657253`*^9, 3.883479269905888*^9, 3.883708437838564*^9}, 3.8831058180657253`*^9, 3.883479269905888*^9, 3.883708437838564*^9,
CellLabel->"Out[21]=",ExpressionUUID->"723f7564-46df-4d91-a314-d091c33004f7"] 3.883709942612533*^9},
CellLabel->
"Out[102]=",ExpressionUUID->"f8bc259c-c763-4a41-9189-e56cd9ffa662"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(*", " ",
RowBox[{
"\:0441\:0442\:0440\:043e\:044e", " ",
"\:0444\:0443\:0443\:043d\:043a\:0446\:0438\:044e", " ",
"\:0444\:0435\:0440\:043c\:0438"}], " ", "*)"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"funcFermi", "[",
RowBox[{"x_", ",", "par_"}], "]"}], ":=", " ",
FractionBox["1",
RowBox[{
RowBox[{"Exp", "[",
FractionBox[
RowBox[{"par", "-", "x"}], "0.03"], "]"}], "+", "1"}]]}], ";"}],
"\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"funcFermi", "[",
RowBox[{"x", ",", "2"}], "]"}], ",",
RowBox[{"{",
RowBox[{"x", ",", "0", ",", "3"}], "}"}], ",",
RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}]}]], "Input",
CellChangeTimes->{{3.883708607441079*^9, 3.8837086099331303`*^9}, {
3.8837087412116117`*^9, 3.883708774272184*^9}, 3.8837088179574213`*^9, {
3.883709003426889*^9, 3.8837090138726997`*^9}, {3.8837090905220137`*^9,
3.883709132535977*^9}, {3.88370917863596*^9, 3.8837091884886093`*^9}, {
3.88370922072269*^9, 3.883709296948432*^9}, {3.883709583092265*^9,
3.883709583170985*^9}, {3.883709634187237*^9, 3.883709670147719*^9}},
CellLabel->
"In[103]:=",ExpressionUUID->"a7903930-b537-4744-afa4-508c0f6775c1"],
Cell[BoxData[
GraphicsBox[{{{}, {},
TagBox[
{RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[
1.], LineBox[CompressedData["
1:eJwt13k8VO/bB/BZyFb2pSJJCKlEKsw51wkhCi0klCxJC0URoYQkW4okW5ZK
UkSWyNJiLbKEkC1LSRgzzBgMnjPf3/PXzPs159zL57ruw9nkeOnIGRKBQOgg
EwicT5ape4rFpcvohSupzrXYhHao8xblZiUz8NCbJPPLT2o3TY2cj1I6BdeH
vr85zD+lPf1WP/Kikjtc+dqR/22aqh0kOSNjp3QDgh93aPEI0rW/1pmMHlWK
BoUlAbqF2Jz2pTTvBnOlVIhPPzD6sYuk8zEy8v0hpVxY87I8dFhhnQ73Kk+e
v+er4NWdfArT2UTnwE2H20VWdfD1wlm51cI+OiW+Z/qetX4DGXOsW33dM51u
mws7PK99B0WvF4yF1g4dEaMol4/YD4gwG57Z95isK9x+pmCP7U9wUblIufh5
l+5muYvZtx0H4HzzMK+A8hndvX1uX/c9+AVJfi5+5e8e6H5cCDzYnjQMWeSE
V6Hhn3Vdq+rrK4NGgXyaoV1RTNN97JS1XuL0H3ha39K9YViWss36F3P5zF+g
3tmssv+zOaV/xvwbduAfjEdP/Fs66U+hD6xTl7SchH1lRu5Tv15T5Jzmdm08
OQk0A+Xu7YO5FPPf7drKZyaBvlUubOh3HuXVxD19Ha9J8G7+0OnIk09xmec+
furhJLTS/J/5ur6l9IjSA553TILA+tfsLq1Sipla/9MpiSmo1e1JfWr/gfJx
/5evu62mYM/z1J21BjWUXfbF9BvxU2C77dv58LSvlBc+GevqOqfAcsyg0ofW
SnG8vXbbP+YU+HjlWhlcaafIPIjGhKSoQOv7WvTe7AelM5XrmOYeKmg6H9nj
EtNDicm5fvb4cSo82z13PMKwn1JOerpg4UUFZ9fDcnPrflHGTjRFmcRSQfpu
3nTf4WGKeD5TziCfCl/asiIufR+lAK9cIdJMhSoH+f06L8Yo5+0PGO2ZpMJf
Xotavp//KKa22m4J3NPA/p6yR9iHSpHMJ7dJrpmGjcJHwo6UTlN+rfq2+6H4
NHAnN58Or6VRrhU4Eh5snoZFTzmBdvFZih7vtjPCW6dBILycb601g7L61FxD
tMY0NBiZjublMSk/3n7cvkZnGjy6gruGZFiUDL7I2Ih907BzY0P+6vR5ipu9
FYvvwDQUPjor+wRZpOwtkjsZZjENb3yz+DfPsinfThcp3bafhsaEyxItNgTk
cfHNCPLZadAn54ZJOhIR59Um07fcpyFlr7H8P18SssNR3JLgPQ2blWWcrDPJ
yEJJf+mNgGnwCleI9h3gQmrWZMsuhUzDARMo9tuxColxuhLsFzkNV5/97U2N
40GUhHgP+SRNw26nD6tzM/kRjbbFlYTMaVD+YfyB5L0agYfUgtKcaQjLeVSq
4yqI1HqfW/0lbxr8RJvGWW5CyEHr4TM9b6fB9tBbST1UGLGW/rF28f00JDkR
Kx/biCD9bAtPgQ/TwJvp4bRIFUGc+798la6eBqfsit+O4aKIR3rlDUrjNKjZ
fJikfRNDwrc8HwnonYazN9UJKsmSiDCfHBo9OA0fmkCx4ZQUEj/++FHqyDSc
v5mZMrtlLZL5OsqkamIaZt+XfWz5tg5RvcfztHl6GmreZXfOvVqPvLl8a2lg
dhrC3SI1Hj2QRso1vd4QlqbBmlkpree1AdGToPKJEGnQHPm6td1TFqlnujpt
4qaBoPPz/VM+G5GOUjtJvTU0kKiIK51qlkOmwMA/eAMNpAu6hV+qb0aubqrs
iN1EgxF/q+Xujs3IAmnvjqeKNHBJ6PzxKFAB4andOlS9jQZha0pVbvxRRKKz
nul27KQBwXW/vMBTJUT87saHo1o0SHp0aDPVZQsid1DMeBVKg+hC/9MJBBXk
+baodEk9GuRZFxxt+aGCqAnxLCoZ0oCrIq3PoFgV0W5beG1kRoPAwpr5/rtq
yBHrIbG7p2hwfMWp6tEBdaRL287tsSMNbg532H7tUEdOSXfWZrvQIM5LrbXI
ZSdyob/B94s7DYz63zGOPNJA6FX633s8aaAYFkmz2aOJ+KRXqP3zpkGrmdO1
6l5NJMQ5f0DgJg1WZCeY3nu1EH7DrdoywTRY3/3u0CaqFhKz5dkDtTs00Ckk
ck3n7EZSxhP2H7pHg+6PJa3Ne/cixZcDc6Kf4B4WKmt/pouEv58uPJFJAxGV
/l3vgimI/SqHSoUsGqhGNXjHuCIIb/K+1rJcGjDsh08RjAHp/Z3fc7uABlNW
xwNCN2FI/k75EYtiGvx58EqDnYEhNnWkud8VNIjiWlbQKtiHbBe9Qij4SAN5
KyxSB9NDyCeH+QJq8PrGZlS9bdNDXtE/y4g10eC+SuSj+9wGyPKG23rQSwPn
ZLKcWpYh0ubKMOUfpEGTZu/LeTsjJOvtGcuOYRpEumw2ur7WGLE4YOh64R8N
evMd1h9KP4AoxBV77KbSYPBsk+KKuwky36/kR5yhQXAujaSgb4pkXOWJfrRA
gyXfF+3xKwcR76prjxyXaVDnX6V1eOwQYso/lraNRIcjpgJ2x7vMkNkn9W8/
89Eh+ObPoMdnLZD9X+92U9fS4Qn3T9nge0eQ9ZILQ2UydJCVcEjxUTiKTJ0+
P3Fbjg6XmzfFr6s8isQzTVaklengQ7q3mrFyDDm/7z3vn610yDr5XvDGC0sE
IreKFuygQ3bhgSxzKytkbNNqReM9dOgvHIq89uk4Un7Rf7uYLh3W7OV/o3TL
GrlfMrGnH6VDvLPv1pb9JxCdQ00mVw3psBj/LPb7Lxsk0if6cpolHba1EyYp
508hpz8v+144QYdbf+o+WZ6yR7QELwXvPkmHp8+Gmvi3nUb6M83jG53psOJ+
mflhlwNSMFX15JErHahXCu/8qHRA7mirZztepMPA1rxjeoccEfVm4XLWFTok
rbXKT7vmhHCtv1Xz+Rq+X59E/j4xZ6TbmfYt2g/PL/aOwUqhMxK00PpLIZgO
+f2CbbGrXJB2xVieww/oMGL/59vjf67IgS1r97rF4/m1ld9JqD6HVCqnuN5N
pIOUUXAV6+l5JHtrVsPHDDpw64lQB/0vIrLb1Bb6ntOB3n5XdPqqGxK3PV91
4SUdAnTWaF7yckdu7HwfofGWDg6UsVFP48vIjAZWblZCh13nK0Z0Oy8jrrtq
Js6/p8Ol9syAH64eyNE9zYcyP9MhdevHkR0pnogyMiwk3k6H4X0R0jZGXkgK
6oqpd9EhzKp7bybBGxHFJi8f7KVDY8PDd9ofvJElvbnWkBE6bK14D2pHfRBP
A39S+hgd2Lt2Fywq+SJj+4maFRP49aYWN1aI15E2Y4E4xiy+P49Pu9K/+SFG
JjHVIvN0oEiThD9/8EfKTSUY25boYHbD7+Cm9wFIltlGKxfuGZAcH95V2HAT
8T+mufaHxAzIKBaIW24NQmiW74xn1s1AUENCc3hDEOJyHPEVkp0B4au3VeTd
gpHDNkY9RkozoPjT7KNGTQhSa9vI76w6A+blYZGC128jlJOHdQO3478HVmwT
0QpFlE7bJr/bPQNRgS68TpV3kCSHwcZ2nRkQy58Zl48KQ4SdzixNozMgV0OX
+Od4F1k8c+mUitEMEKLLTCIUIpCWC8Fyicdn4Kr6OtJ+nnvIfjfew8W2MxC7
atX7Uv4YpMw96lab/QxkCB0zOBcfgzzzeDTE7zoDxIarrzTK7yPrr8iIbbk4
A5ERQ/lpVg+QmKvp+vqXZ4A3mXHBnPkAuX4t56mfzwxM2xUFbjGMQ6g+6h2P
/Gfg7+/pNfnMOMT5ehF3YeAMSNgEtOi+foiYB1S5TITNwDa+jUNbtj1CFIK/
K598PAO3a5tKb99IRKwLyDtdUmZAus25e+Z0EhL5S1P7UvoMvO24LE8zSUYY
EHfgVvYMzFJyP6fsTkVUL1UfDn89A3k+q3rb9z5BTqXOnojNn4F+9W8OHZvS
kFr2sfPPSmeA3JYktl0nHVnYetszt2IG/rX17D3XlI7ssC26XvJxBiqNY7Kj
z2QgCaUSEQ0NM1B4Y+LnvmeZyDnvzpzJ7hkQSbhUQTn7HEl9tqqQ2TcD97oe
nShUykLa2neXr/zCx/v2wCJmIgvR0XzUKDI+A2kuac8OR2Yj7o517eunZsBv
+ktTtstLJPP+XO9m+gzIX8vmOmicg6yePj6ptTADGqXqw+fkXyPYxjAGujwD
q1cTPV2lc5GrZu+WjEiz4DDBIpbI5CF9r9YK2vDPwtGzTcfzk98guee6t99Y
Pwt2C6tzs2kFyFAC3547srPA97K7NSb2LSJVrw0x8rPwU+jYswGdQiRQKdE8
Q3UWTAx0X7knFiGFll+O52yfhRd/9KaFjhYjYyEL9oUaszAat7Dxp0gJcnjY
5nKtziwYFLeVfc54h4SKRvg0o7OwTH/Zae5VipTtex/YpTcLf0I0Tg2blSHy
adL3x01moX47c1F0bTkya9ebL2g7Cw9GtQ+3c31AlCNXl0nZz8JjN53091Ef
ELv3lE9yTrPA/O05v0v6I1KzLqVN48IsrGxLMvMz+IQsGDf16F6aBR4dE/vE
wU/Idp+lIYMrs2DMdaKYeuszEt95csbKbxa8tqO/pturkS/c0Yv2N2chrvW4
2UJoDbKyq5J8LngWzp/ZYcZAaxHXWFlxv4hZ2Kq8dizyYx2ibTGw60nSLKi/
OzaMSn1Fyse4Jx2fzEIU7FAiUL8i6C21Z0qZs5D+9VzxtaZGxKDAVyL35Sw8
+flP1+HJN6TWJK3JI3cWPIMQRf3YZuTAcO1trYJZQEW88k4atSBm4uLM8tJZ
uBm0sjXfrBVpeaWTG1gxC6pNo613ulqRo/sdXAw+zoKRwgPdFy5tiLV3bufX
+lkoiNXhtoj5jjh2GZf0/JiFt4cpNykbOpGRy5cupf6chU0pvadsmzqRs3zx
WxwHZuH5UOrIbNAP5KLO8KO/v/H95KU1GK10IVNtfBavx2dhji4QaVfbjXhc
UOf1mJqF99jvlozYHsQ7OcCHxcDzc0kuCd/Xi7B2PVUvn5+FA8eePI+V70P8
mr6M3VzC6z+182syfz8SuCx1goebASLVud4x0wNIxOkCbUlxBjRtcL+gv2YI
EZzvonVLMSBw4UsTT8oQEnN/JTtFmgHP1Jy37t85jMR/OrhecTMDZKYULpWd
HUHW2l5pG1NiwNPaT1MU/lEkaeZx+CtVBkS6eec25Y8iaQp/FjQ1GDAjpISU
C/9B5CvWvJ3TYgCfgKm9e/0f5JnlrgvvtRlwhrXe/8ftMeRl6K2fevsYIGic
tyFUdBwpHJMuP2zBgALbPeI5PpPI7lt6VyWOMeDoh599Dk5TSOm6c2rdxxnQ
upVv5owlFak0KU4+bc+A5o97d8u9mEaw4d5jCk4M/H3j4aF6NRry2Y+8ZsyF
AR3GHcMxRTSk/pVFwCV3BqiulRDgbacjJvuvaWl64k8ptZcei+dmkKa+lEmm
FwM8UrpEH3PNIm2C/07eCGDA1Ke/9a7GDKTv8m00KpIBJQ/cFYoEWQjhw4cN
GTEM6L3agRT1sxAFITa7OI4BhlFRRe+L5pHzrz3fDyYz4PnaqqoW30Ukmv06
kZHGAMnHeVz2Z9lIvulfX/5nDOg+RFOfsVtCWH/t9+56zYAwKiK032EFkdZO
kjqQzwCywPmDJnsJKBrWyTxZxIDXk0RaaDUBva10qOhOBQPu1eRnnPpHREWd
dDR+NuHza7x6pnmNC91d4CUy3cqA0Nd7ixWVudETxPxprk4GhKtrPhMZ4EbT
nmzJ297PAJd60fAsex7085RjtP4QA2wC32yqVOFFfyOpbta/GZBR3zuftcCL
busVVwuaYsApj9mrw/n8qMVWC4FHdAaojW9RyU8QQK9ejxjPYTLAM/a2k8md
1WjZWlJ2xzID3rwKN6T6C6LGllRFFSEmJH7Z3bLgKoJeeKrKjYoxoUJKufHW
iggaPXNm5IgUE1qe8yCySaJox/3eDP+NTDhsIv3VeEgMZQ1KBd3fzIRtxUuH
NaPFURn1ow7PtzBhzZ39uhMggTp+a9jYsoMJlGiJwtgiSTR0A/fKiCYTri39
+vbPVwrNvoj1z+9hwnXkYuCowVp0mr8keTPGhO87qiaeUtehAUZP112zYAJx
lTNT8skGNC1+gBVxjAkjU62g8UQWrR5d35VmzYTg5cD2mayNKH/I/fgvp5lQ
p5BabTouh27/3ug14MwEfS91zwj/TehheV7LWVcm7LnxJv69mDya8OGGmKwH
E2rkBu88PrwZfS9URtfwYkJWY9OGdNZmtP8Uo9XIlwlnum91HnymgCouXYjx
uMUEAc0uN0thJbRA+8Samvv4/kL9mv5pqKAK9PDkuIdMYCuz+2SWVdCHL8u3
Oj9mQrVS/KnCZlXUR1rOhJzOhHVl3pW/Q9XQ8e+Hu9ueMuHCjMOnyYvbUNvI
YNeMF0wIjLNI1LTZjqJLv0P3vWGC2oagrLeK6uiborWSIoVMUEl2bPyTpY5u
cjd5NliC53P46A+t7TtRroHXn29WMaG7O5T21EgD/frhKqHyGxMSSn+8eJO/
C6X4Pr8X1caE3uPnMqKttdDcnV2yJzuZwJ9ep5DLtRt9kKGLsPuYUFsfm2bn
tgflsnVr/PqLCRLW184ZqO5FvcSe2CaN4nlJ0i5tnNyLWoeQrutMMqF5387M
y7d10C+UXXz8NLw+3zbamNrqorqMMwnds0woOVDsN7SHgsq6NBT7sJlwRVCX
JbcKRUeMYmaKBeZg/9MB/SfLGGpF+BQUKjQHm8edIl/c2YfWvZsRsRKbA3P1
rd9JEnroS5Xj6oz1c3DvVdar3Yg+KjMUVlUtOwcX757dfqJLH41KLDOLk5+D
O0Jeqad8DNDLArJumqr4/UKf5fPr9qNDn83ZpO1zENHCqLO4Zoge9b8V0bZz
DlyO5t33UTNCd0+OZHtoz0GkWLGL+AtjdOlbzu884zngqU+UKP1rirrf6fO6
eXAOKD2pbxq/HEQHQYjb3GIOZO/3a84VHEKr33hunjo+B5WJ0uevPTZHd597
WlBhOwf0+Oor8gct0KxNnfui7OeANF1/M7LZAg1/oH1a7ewcJBgaz0wMHUbZ
Jheoi+fnwC9aUGXLlSOoGznlxlf3Odi07sKJCZ6jqMVVQsp57zko2ilgnQPH
UEmruu4Xt+dAfMwNNZ6wQg0pT7Ezd+dARvRGzaX04+g1+VtZm6LmgOl0aXy7
nTXaNaXjlRg3B3WiJA2l4RMoX4dUr1UCnv/vuJ6yPBtU5/2snljyHIwrtuql
BdmiSXdyhSMz5+D6eN5NJcpJtNEt4ppx1hxYfMVad2w+hbKPuvZz5czBKm5R
ho2IPXpKTv5VQMEc9DW609m3TqNypQ+NLn2cA6mttqnXnzqiFk88c7fWzEG/
mKnptz1O6K3b5hJj9XMwtSpkX26zEzp0mG/4dMsc2O8WHc9ccwYV2/v7wIb2
OciLc/7JVXgGNZD9/Kb7xxz+vl//LMzeBX027n/jyMAcHPyo4phcexbtbDkx
KjiM57FK1exWkCu6qmT3wa+/50C3yV5a0+Ac6ho8vc5gag6qS7fIFnefR1Vl
nIu0lvB6DWkOJhxxR21I+2ToBBbwpKbk6ehdQiPGNgTncrHgXMXDjekyl9GJ
wh8WW1azwKFoadOejR7ohqTCkmEhFvyciYkOfe6Bmt26L5smxgJjofhDZA1P
NO+Q6cRaaRbMDG5q47O6gg5qKh/tkGWBzD+ft11TV1Dh9dxl9+VZcPQAssM+
8irq+bvyDr8qC/xdVHRUOr3QXTc1NrP3suCvsjNNKNsHPXNGKPwdhQXbVktf
oV/wReNNJ6avYiwIglTx7l3X0Tmp55WTRiy4xbpv69nthyovBym+NMXXe009
PKzIH7UesY90MWfBC5fbpPMJAWjZm3U2A1YsiL2igZy9chMdj2d+SLJhwcvN
U2/ntQJR6YDvW6xPsWDTQvmwRHEg6n8gitFyhgVi/Yl1Jp9uoTBEuP/pKgsi
1IY37hIMQYVv0mVbfPD9OdywOlUWgg5Jj7zq82dBSuOaALOLt9EQy7p6VggL
ridfCTQeCkWt6O+sVt1lQfZfu9Cy53fQLfdejohFsYCX7PTvk0cY+qU+irDj
IQvOJFqOX5cJR5PP3IymPGbBjtbxk+nscNSN5CFjksKCh5d4uQ+ORKDClGN7
zzxjAersqq7xNQq1ylt/OamIBb6Cw5HuKzGo8sHVyy9K8fneb5Q5cf8+Oj+2
FFFcwYLLeT2GysoP0GT5X1mtNSxYzCH/3HAmFnWratMaaMD7oVQiMlkgDkXt
qj9PNLHA805I4JuSOPTXw6wBnk4WWK7yDzmxKR4t0HjsJtHDgjVaI2ZHB+LR
kObwRfl+FtgbeU/lZD5ClfjcpdDfLDiSGLXPCnuMXvTfZX6VyYLhvkAfYksy
iq5T6ru1wII3bVF61nUpqFCx1IV7yyzYuINqvlCbihZQF0JfrpoHittw/sbL
aWhw5IT4O/556LmowENZSkOPqfRn1AjOw0FherHYvXR0zvFj5aDkPDQv0pYS
Pmag9SsFB6fWz8Oj11dnkxwz0cTkpz2LsvNAnP4nzc33FKV03mFKbpkHJf+G
6WqXZ2jQAbPth/bMw5TvI2uPCy/QY7+h3EZ3HrTexTiJItmoYvBOE1eYh/0u
ZfNlEi/R+nJxl2CjeXj8K3ebZF8Omnhi1WyM6TwwTP+mGjW+Qi8w526lms/D
H/HQMzc+v0YF1X+mlB6fh/S7oa9Evuahg42NW+ts5+EqO8ljxe0Nmn+usrTd
Hl9vxvogvsU36LHM9A7q2XlYH1Z31XtzAfpY0nWNks880Asv8VoWFKLvZCxM
p/zm4W7qUDH9eBHaJb/3bvHNeSCFRb+sIBWja3fwchvdmYdcyv3TQa4l6F6t
aT2hiHmQpPj9bdv8Dj2u2xX4I3oenONbTiyPvEPjjV6wz8bPg8/JjpYM3zK0
+FCMjnriPFBDHrADDr1HO4/6+LBS5sHuyFMP1pZyVOK08WzYs3nQKWroTKNV
oHE+Y/+yC+dhaIT/0OLUB7TwRouK57t5GGCaK/p7f0S/h7w7q1M+D+fNC0y1
SZ9Q0fthw18+z8PYuygFmtJnVOPR5U2xdfNgfO5sp8aHz+iRFGt726/z0Pvt
+G/0VDV6P1v55782/PeRvhcW2TXomzzhdYWd87Bzn+SL51a1aEsRy8q/B8//
lELBWb46VPhTfdvqITyPh1tyu2/Wo9E9rl+20eYh4ELgqtiir2juoAUvc3Ye
6oU26pnFNqJNv/caVrLm4QZF8evctSZ09QzvJzPCArTd/mvNsGpG1eanVyS5
FqCOdLqmX7kFPYi/Mw3wLIDg9DZs+8sWNEIgu/SS0AJ45od+WVPair4UuT+3
R2wB+C71RQ4YtqFfpHy1CFIL4P0iRUmuuw3lVziQHyO7ALYqzAF/gXY0jPL3
Rf62BWDXb7nWlNOJvtBr/e27cwEu+Ct/3uPwA60zLlXQ01oA7Wr3ykMyXegq
y7tpbZQFKNrTl6v5tBtVsvXoT8QWIOz3hnxHjx7U0OGEjJPBApgfHopdNPiJ
3nZTSZgxXQB7Jn+/NqEPfXpFpPO9+QLwKF6uNRnrQ6t958VCji7AhKRbTvKP
fpQrtOGeuO0CxAnfKPR2GUSDUs/d0Tq/AElyU2VhkUOonq3LhJn7AhSuXf6S
vG0YJa91OuzquQD79nVmbmkfRkPu20knXV+AdPtzkg4ao6iB2YnAwhsL0DHv
cu3K+CjKLWA12hS0AC8IsgerX/xGQ0PM8wgRC5Birs7H3juGGu47KL7+3gJs
mqphHhP4i/IsG/tqxi6ATT85uGXkLxp2TU/fJWkBlqRFXFVy/6F3z2v9+Jqz
AFZft7/LT6eiJls0KKN5C5BqOfdU3WYa5R/Znr78dgEqUhfFd45No+EnlS/s
LF8A/bc7pZtF6ajJesUWkw8L8C+q4/PHPDoq8GOTlnM1Pp5LuQXPkRk00kJ6
Jb4Rz2e57cH+rFn04Jq1zm9aFuCOV/eNJzYMdM0X8YaG9gXILLvZJSjORKP1
BWPZvfj1/B2TpMQ5NGY3cYvj5AIEXlSX8WctoBYzSxF+tAWgGNPN8ocWUZE3
C9NxjAUYN1vW72pnow9UZsvqlhZAt5OnVKRtGT3ye3rjL+IifHNOMy7qW0FF
MydDFrgXQQGCPXb7EiBW5o/ZNsFF4H54Yt3WZCIc6x5+ayi6CMbuzzsktUgg
Hj+49rTkIjx6s99T4zsJ4oR6hh7ILkJugNJC7kYuiCc1ebO2L0JP5c8ba1ZW
gVVVw08RzUUoPfU0qrKWB6T8a7GtexbhOM+DOK2HvJDAqOI/BYuQts6nxtGI
H6wLyi9d01+EIdtDiXFbBWDdpdL2GKNFeD6hMRgstRoSxwpSP5svwnSBw/ds
HkGweZZH7ju6CPeGW1vcVguBtOMrV+bxRRD9NU7mXiMMyT+faaicXoQlFXnP
QGURSPmWUBt9eRFOD18s80sSA5lSjPzw6iIw9xtS4/TEITlzDJJ8FoHlcEwc
pYrj3/eWZgUuwrZyv6MrJyRhvdMg43XIIpRnWi1fXysFiYfCNArD8PslNTsP
9UnBY/munA8xi7Ax+Opk2/V1sHZN4Fht3CL4u8a8ZB5dDwlzWxSbEhZBmLAr
79guaXjUeC21O20RRviVx0oENsBDb6n79DeLcD5LU3B7tByIO1Q1sQoXwTqp
fFhPehPEmZ7lX3m3CNd/XfnO93oTxMqVBAt8XIRwXxdL8wF5EBWw/yBSswho
0/7pTYGb4QFj1ZJUwyL47kxqMlNSgPtfrLwVWhfBIv3QzkvBiiBctFyg2rEI
yd7xNz/pKEHMk+dU9e5FeBBzumwHSwnuXWW6Ir8WYf3blnCVUGWIko23taLh
vhmQWzq7FVbzoQl2DLzedwZ1p4fUIHJmtN1xfhEe6qxREO/eBhH1WmaXiGyw
PN2pv6t/B/C/7Qv34mZD8PlmhQFvdQhPuV3nx8cGWmFasTJ5J9z17MDCRNiQ
cFP65YiKBvCeDAiIlmCDxL7l7qxqDQgzUiyLW8eGmvCDpvedNeGOjJdm+iY2
CK0IVd0p3AW3a8WVynayoW5kZ6Na4h7gyi93/KDFhr/Ty5f0nPZCSJLzk1pt
Nuh9357Iq6kNwZcL137fh48vobk+8o8OkGztLLv3s+F07wXuj426ELSf68HA
ATYsvrT69LCUArfWHxOYOMyGbUEr5go5KBC42UZ0SzasO3LbyeUNQCA1M4R1
gg1jH7N81ewxuFk9s8TlyAbuu83N5df3QYB77PQGTzZsvQcduRP6YPJpZ1+/
Fxu49INONoYbwFrJloYnvmxAf//70bxtPxRWrM7cdIsN3xEHsmKwIQSJ5Nwb
CmFDPp04UadlBOZnDvhnhrHBWUbgwMykEYyvDrVUjGED76lNjNhLB+DdaQW9
37Fs2LEle95Z2wRCCz9tz3rEhkQu0RkvPlPYZLfCo/IEz2/TT8WNFQfBOsen
TC2XDQ9dgtZto1iA0opk1mQ+Gy4E2Royyy1g9khRbG4RGzzyR+bf7zsM9xZo
F9Ur2JD+UZdcfvwI2JnFnKB9YMPcWalje/8eAdWM7YYF1Ww4krJ2p9bNo1B7
4MLGXY1sePeGax5Kj0FcCt9qRjMbYtKe2yWctARHWhar6Ds+XrCc+SoeK1hK
GGnd85MNw80hZdXnjsOusZMhuuNs6NI9UH7zig2QKOzL7Ek2ZPNYxKvvt4WW
e4knK2hsvC91f9ttsIMLe37shnk2OEz10Bm/TsLeCK/NhCU2yAd+zW76dgpW
DYgJfyQsAVMgZpj5yR4yQi3+6vEugZOVkILYr9NwuWeqg7x6CZ5HPY1qc3EA
dHvUp2qhJdgVUu7+dtoBujsakgyllsCH4pdhJ+IEwor6ZiZKS+BvtkNfOvwM
9Pv80hFQXQJLAbWTubtc4FXjzS2N25ZgW7ZUQMiICxhdLSeYaS2BNzvgcNox
VxCvt5kU1F4Cza59nhSJczAkPd/dTFmCFN/KkPqf5+DGZ623hw2WoEeLuP6i
3wU4KNX+RNR4CUTrFeZHjl2EdRc8I7+bLkHrsFqCsJYbFIrmnbE8irtSyOEo
/yX456C89oTjEkzl8z0+dscDbC7+3HrBZQkyNnudaNrgCfXe0RBwfgkMzXv6
TUs94VnErEu65xJ8eJvznJtwFX/+Z11/670ElwulNiTmXIWgNJvomutLcPxW
YedvOy+wL/pQ9DdoCaIj/9RdaPWGb1VXGhZD8fvvbzThe3gNKF+U+tZELAH3
k/sVKvY+sG4gkksjdgncBxs9Wniuw3feE0evZy5B4g2ypmJ+AOiJrT4bmbUE
1sGMQTTvBrzZUHU9NWcJtBhs5dqimxCloZjx6S1eLzlmQfJUILApXUXtJUtA
UMm8YnfzFpw3imj4/X4JJoUjUn+LB4GRHW2av3oJaORtLQtmwVDs8pRrQ/0S
fO/yMemaCQYFj+NrdzQuwYKih/KW1BAghlbA0fYlOLDGM+4bORTe592NThpZ
gnali83ha++Cahkl4/XYEjjKXelXn7oLCdXUoqoJfP2Z7vndX8LBq9uyb3h2
Cd71f7+4PjESRoZ5aQzWEvy45SesGhUFR6bec/EuLUG+tTG3Wlg07CDLq6lx
L4NAYq/GbdMYSF3TASjfMujdjMgt7oiB1WvDjlqsWYYvJLfxs8734a/a1PWr
EsuQN9679+e9B5BpVdZQrrgMrb3VBMrmhyDq4Nb3TQW/3/KRdVLHQwi8IEcb
3LYMEq38gmVR8XAyMHQt9+5l6LY2cPonlACN4dpqUjrLYJbow2PXkwA6DydA
BV0GSSUZWeOcxyD18sjZQ4bLcJ5c2GXnkIQ/T7j97E2WoZhZNTlpmAyzle+i
PcyWwVPuquNXzRRo/S5b/NBqGfatOnDZVOEJRCyNc/W7LINwRd5617fpYOwR
V//y/DKUB12Sz6JkANcoEnnNfRmCakMGRxsy4EZjjJiI9zLQDHWutUxnwuWk
3fIGt5dB/5mFrf+V57BNaHBU+O4y1PVknfixMQvGg+5m90UuwxGdU5s2tGaB
0/le9Wtxy0D+tuPFX71ssNIOgpeZyzA2c6xH9ewrEHu9lXwtaxkIoUQjf/Q1
tMh11OrnLENTKXayXjoXDvAqm/UVLMOZ2DVlQ2N5QPnRZCf8aRnmrOpcU8by
Yd7kmlxfDb5/jS3bKO4FUFwpN5LdsAxRMSsBl+cKYMfzKxf0W/HxZhUL/ooX
grzXuuveg8vQqf2j2vJGMQyMfUL0R5bhulfXRKd8CSTbXSQKjy3DfEr7g5iv
JSBhUBWWTV0GenkUkaBaCrxiZx71Li/DjqbjpUIbyqEmVNA2m7QCY+vN6uNG
yyFooUTWe9UKkCNuv2AUVMDiL/7nQoIroPfkotNjuyqYevOmUG/DCjQLntar
9P4IOQo2PkKbVmD0UV7SdepHcE0gU3oVVkD0RELc1PlP8Oum1WcvtRUYenQx
bsP5z9Buxm59obsCUKn4+Ex4DZRNGFEFbVagc2KA+8nxL7A7Ojm8/uQK2K6b
0Hdb/AIFO2iKQQ4rUPOiT3tTxlfI9ky0Y7iugPidgMC9rEZIYE00/Ly2AsTK
a/rU2mbw5nrw9MXDFWi4k31WltEG9Ge/wfHxCuhvabpvevI7uBvp/pROWYHu
H/t7S2u/w5nwEZF7T1fAQ19xL5rSDseE99z0ersCzJtqpQLWnaAp03tCr3UF
LrTURwewuyG3Qp2x2L4C8xXawklXe0DV/nZMUReeR9vfAJvJHpDP2F6nPLgC
YTR2RfjgTxBVvrVLiLoCV+ZOFOxq7APWulge91UETC2nOn1T5yB0Ku4d0lEg
YPqHPq/vfjgCI60X9TElAvZUrXrF8fsI0APSn+5XJmCBx2YcDguPglAn/1kL
NQJ2wsO3Qz9sFIxD+/6d2UXAZuX/Df+99BusNEQPXdhNwHhLXogTXvwG537D
3Mt7CdhSUcXmowO/4dbuN5f9KPj8wpmMdNM/UPY7iBFjQMB2dQwcfbB+DOof
lFjFGxIwI4bAFuTgGHSiEyVJxgRsD1fdhHDAGMzEW15/fpCA3WLH9W7vHQM1
I+WV98cImMyKepdmzF94ktXE+8eZgO29RRjMbB6H3KOk8xMuBOynuLVa18w4
lK/s/kpzJWAq5XqyqNQ/6DqeFsW+iO/fTuZ0lu0/EOW9IirqRcCiXXo+qf/8
B3KFWVekrhEwT1rAc435f7D9dG+7jC8+X570J1/JCTB9t//RlgAC1rfmx/yQ
2QSEuK6VQW4TMJra4osrJRPwQPxQgN4dAka4Oi1Aa56AtA+3+o3uErCTWx5d
/fpnAirW/ks7EkXALmoMlmdKTAKzvkLR9SEB+2X5bIv2+Ung8qKHuj0iYDGn
lx8xAiZBdNOWMc/HBOybgk7rlvuTsMM35mVACgG7PlNYM180Ca4qTjtinxGw
UplvNlnzkyDLHzvmlYXnJ2Hha8s7Bd/HP6VbZxOwyKj0tBzJKUBfyYvLviZg
VlFda1U0pkBsxxDrRSEB+/hiq32n8xTUC4kWRBQTsLiLP56/uDwFN6b3XXB/
R8DOi/noKftPwVh+ep9mOQGjtOX77HkwBZW7HD5Vfsbne6VEaCybgqsS9/3S
awhYR+hjA6ieAhXmh10hdQRMS2CA5d40BXElclkHvhIwQ/PeB/wDU3BOZzCi
vY2A1Y1nVJ9emQJZaeH9Je0ELMI+fWV0FRXaF2H5cSfej4PYnV2CVEArnly2
78HHfxu5X1OGCuKYveX4LwImLHFfrV+LCl/k7gk2DROwP3bWJe26VLhJrKrL
GyVgsn9EDz7ZR4XxT7I6Xn8JWPsafbuig1So2t8vS6ARMBHNVhaXAxWuKgl2
DdEJGN+e2vH3Z6igyoPer5nF9386pdz8PBXi6lPIESwC1iZrNiZyhQrnTU+O
SRCIWNPOL8fXB1NBTi0qnUUkYtss/l1qC6VCx+oKm59kImY/svDIPZwK2DeZ
pjQeIsY6Ir7P6j4VmLkHQ4P5iNi/WDiQGUeFnHv+4CJAxER/9Fz68YgKkod7
87cKETGbf/xTcylUaNy5+oKgCBHjzdZ4OppGhVuiFAWaKBFze791d0UmFSa+
J8UXS+L3hxpeU8umwkcrW799skRsoCaRIvOWCrUPJOoPyhGxawY2gYlF+Hjf
msWt5YlYBF8nxvWOCl2GBrnuSkSs2of3S3I5FfqDlhd8lYmYGelgc2MlFUYq
3xndViVie+mvvox/oML07m2/krYTMc0l7r/0anw/nn+2ZakTscHNtzb311KB
nZt+vUCDiP1sPh1cWk8Fni2S4g27iVjHH8VCvUYqyEqtGDJRIvbadvOqV21U
UDhaGkvcR8QynuYUKbbj+d+7Mrhan4iFKSarxnZQQYtnzHezERHbHd5KN+mi
go5+Ru32A0Rs+dgp7vhuPN+bdmI6pkTsTLuoXWcPFQ7OtbyyMCdibS9Ndu3t
o8IRzYh528NEbMph3SmbfipYX9pvePYoEWPvaZW5MkAFpz+lAwHHiZgRSSrq
7i8qXP+RIZpjj6/vrJTckVEqBIqdtC92IGIW+cHj6r+pEGou9eqjExHDbFW8
ef9Q4X5dxP6us0RMRG9VVcYYFeLJhg+GzxExP/CeOvOXCslAGJi6QMSIGnmf
5cep8KLkqg/3ZSK29rqDevg/KuTObK8R9sTz692spjVBhcIdf0VkrhKxe3O2
8T24q7JO5mj4EDGov+smMUWFzkeG/faBRGyIu6fbfJoKvd8JWy8EEbFN5Qd4
vuMeEnp/zTuEiFWQf0weplFh8s4OkagwIiYo63ZFn04F+ue/JxPCifjfAw2r
YtyslcyXmZFEzFktzVdxhgpcPmsNymKI2B2m7jILN39hW0zNAyJmPNKceHKW
CsLTkX0tcXg+VWNTlbhlXInX/iQQMe2/21V9GFTQtB7PFk8nYklv3xTWMakw
WP/EbCmDiFVeqfkuNEeFSG3LmdGnRMxgp0mVJe7f6z9QSl4QMZfz9fATd2yE
168nL4lYDV8EYz0Lry9bNTTsFREbaz9eao07se9h84k3RIwUcyjrG24jM9Or
egVE7CLLY2rVPBX//46wbmshEVu8kRqA4DZLu+DILsHPo5t59jPcJKd9jNQq
IjaKZsU5LVAh7zvz8Z2P+PgSWQH3cNsZvEIvfyZiB5tQoTLcxYpSYfvq8PoZ
NFkKLOL9Et+optpAxFZJ18pq4BbmCWoV/UrEggbt3x3HfW5sYv3INyK2XnpP
0BPckicyqhpbiNjRKvnqj7g/NRx3LmojYn0rQgtDuGVyPr0O7SRimernHOXZ
VGhxS8BU+olYUfzgwkPcAf2HRkUGiVhJgl/hG9yq5uTwhV9E7CTMJ3/BHaLu
/v3rKBF7+pApxsa9M32zT+EfIia180Wu2BJ+nkW6ZVL+4ud1f2aMKu49M/ou
7pNE7Mjzn5gV7hGnef7jVCJ2nndg3QXcMe25eUAjYrb5ZeY3cY8XrZsXZhAx
S4Pq0We4U32oEW/ZROzlOntkArfp36fqyctE7G5McCAbN+uETUcIgYSlPDll
sHoZP3+6NbJWXCRs1iX7pCrulZzrn9FVJKzXN7RsL+5XMuquW3hJ2J3XzOeG
uLmXE/NZAiTMbdcuigPuAncLq19rSJiT0P1/brhPDXAvNgiRsJiS9D3Xcb/7
cNkgSYyERX4Yz7+P+2Kw4Q9EGh+/2vVGOW5WeOsfmQ0krEPqukYt7tsP7FiL
siRMS3x1cjPu1HTPdWXyJMx3TUzCL9yq2UsqjxVI2OWy2h3juEvehOn4KJGw
+Cu8t+m4W6pSbXerkjA2PdSDtIL3S53KRQk1EpaoGbGaH/ffb4X+s9tI2F4b
VTcR3KT+LykFO0mY2qRa6EbcmmzmwHZtEkbgE92vjfsDOWh6jS4Jo+Vv1AXc
BwXWECcpJOxb01nyftzO6zfL52Ak7InTemEL3NObcjXC9UjYYVuF45a4A1S0
9c8ZkLCE0y+8bHDH7zV33mJMwrryaIgzbnms5+oqExJGD+Abd8WdZ3Tm9qgp
CeubwjzdcNdb+T3PNCdhJcgxaW/cC1ezxjYeJ2GaJzUmbuMO9deYX7YmYa82
vXx4F7dYSAVfvw0JG9Ukb47CrRb7XTX5FAlrOVswEYv7XeIpXb/TeP6yz1Qf
4d6f8dfUxpGE7X5TYJ6I+1T+ysW1LiQsDJM4koZ7/F14wNxZEmYe+kM9E/e1
DxLRnedIWGr4vflnuGOat+bFuZGw9uxA0xzcHyeP04S98LwvFZCKcJsxhojT
3vj1p2L1SnD3sN1Em31IWBV5u0cpbrpAiGaUPwkLFHiSXIH7hpiQwcUbJGzP
mGdiFW4B6cRjpoEk7GTOYthH3Aqqb7z4QkjYA5ll7Rrcb3bqho7dJmGWmtZL
tbgR7dr4ujskbMce5bf1uK2Me0tuR+D51NbOfcUd5sK7QIwlYVatKdRW3Gca
NqTyPSRhdxM73b/j1lPT1BN5hJ+HQ0m/2nEv0k6GyyWRMOy6U+YP3F3HrmxX
TiFh8spqM124C0vC2nY8IWF2DgJ7e3C7B7xdD5kk7HOyV0YvbtPB+krDZyRM
48Lr+j7cyvr9jmZZJOxjlOVoP+4hXr6ckzkkTMFRg/wLt2XcKV3/tyTsjbpm
9whujbkrA8FFJGxdmcT7UdyCNneDI0rwvAXTH/7m9MfGwq+J7/H8nJ5qjeF+
FtRwKaOChN3PiFnkOGi0X+xlFQnLNRV8/xc3JYfPrvQzCXu35cGWf7jXCW4k
fKwhYUq7l9s5Zl7e9bS+joQJB9X5T3D6cbf9xI+vJOxT59bySU6/fir0Z34n
Yb8WlpepuFcUvsgtd+D92rg5ZBp3752Bau4uEjZOm+Wicfr9EP8aiV78PHJv
XeD4ypuN+TL9JMzners7HbeFmJalwiAJ23T67QDHfN32KZojJIyYEV08g/u3
rtc+3d8k7Ahvncws7k+p4aN6Y3i+XK9vcuzvXLTtyAQJe3SGqsvgnD8qf+Xl
WRJWmipzn4m76Yicow+ThK3RfjTA8csirVWBLBLWNBGydQ63k99ps3tsfH3f
1pRzjPV70eOXSRi/QyuBhVtmX0R8KoGMSQ5Y63Pcuaq4/zUXGet1WPrI8dtz
X4OKVpGxA1+QZY5jGgeVKnjJGNd02N553CYPBC41riZjmeKBWRxXbHBYGRcn
Y898Hl9e4MxX5LHYLEnGROtbkziuPhg0V7iWjMltLqvhuNEvk3pDhoxdv/5Z
YvG/vAr/OcmSsU30OV2O219W/zGWI2Pdl8kOHPd2jw6IKpAxovnnLI5PezB/
zimSMak/YQ0cj/DydPVuIWNVi0bjHE/sUW55vpWMLaBtymzc7IfnP+hokrH2
kD+JHAdu8yvfqEXGUjebFnHMVRPxjmsPGZtL//WN49Wzr9580yFjLcyqFY5j
IipevaWQsZsFYlJLuMU3f3uRgJKx5fUF2ziWOUJNc9QjY95NI9Ycp/1dSTYy
IGPGScFuHCvcEn6sZkjGFOSCbnGs9mbnfeYBMtaalp/Fsa7g1Vvhh8lY2dsT
kxxXPgsJuHSUjN2+473EsR7y0PeYJRlzkJFcs8zJ/2Kxh+wJMjadPqHK8Tdy
nRvZFl9/h6o2x0eSfpwbsyNjPkcXDDm2+cJyKDiN5xts48BxvwPfqUeOZGww
jebGseP8Oht/ZzLWNKh0nePzyrpHDF3x/oi9dp/j66EBej2XyJiu28p7jpc3
RKNVHmTMeaajhuOgolSdp1fI2HPC6WaOw0eqNNyv4fONPfrFsaB/y/ajvmQs
bafJOMcPxH6p7vUjY22/3tE5TtQjbSbdJGM7kr+TVnDL9ohu/BNIxobvB/Nz
nOGxWboxiIwdrp0T4fhlmoFYfCgZU9m4S47j0uVQsmo0GYta2qrDcTRtU+ye
GDImq/8K49hxpFx+/wN8fT8Yhhzzf6HvOx1PxoYEJ45w3F8e1eqWQMboMsnW
HL/NU3bwSyRj6YdlTnFs9/BUYHwqGft+IdaVY/WweaGnaWRM1TzKjWMuv7gn
+RlkLMvypCfHr09/qWx8TsZ27bvtx/Hy1t1LpDxOPdZGctwm2xopnE/Gml3+
3OM4S+SijOxbMrbxUnwsxxZz6braJWRMJDIhkWOFccpXw1Iydi99MoVjVu8P
m2PvyZhprlI6x+mf1ly/VIX3l6VxFsfeRS/4Aj7i/ZGn8ZJjkxf6j8M/k7GB
YK7XHNOjfN89qyNjbxocCjg2ODHK/NlMxoqrpMo5XnswMPRvKxnz4z1ayfEE
Ki05952MaUT4feD4ocJhLdEuMsabH1/NMcp/59i2XjJ2ZditnuPf1PIrxoNk
jBXK3cjxvQ76A6cRMnaxxKGZ473vlQtujJGxJwdD2zi+Gxo3XThNxoq+7O7i
WOPiF6GWWTLmodXQw3HPYcKOfywytlp4Zx/HwXt2m61aImN/13sMcKy24aLb
JiIX9nMs4hfHAWM/co7zcWHqRrajHH97qz8eJcKF7U99M8Zxag93V8o6Luyt
d/Q/jt2I9TWvN3FhJsKiUxxTlMPfVqhwYQohhtMcrzY/mN60kwtjRmnROc5J
bvGf3MeFTfk5M/7Ld/yY9ZojXNjgoR9zHIfdPil0yJMLW2ektshxjZxLbeQD
LuzbuMLSf/Wc6NMs+caFtZ+bXOY4pMQy/Rc/N2bSn7DC8fTE2kDZg9xYuGXv
f7aT7z1lG8WNub+c+c+vJrgR/S/cGHZx8T8vFu+Q3sqzClM7tPyfKSdXXx3U
W4V52678Z3/y38aHN1ZhlR//5wYxkUcnq1ZhZuP/s6SCtoMigQfzZP3Phg11
qgkUHkxt6X++5m41y+/Lg9GX/2dxJyHv2+U82POV/zn/eD2+bx5s6P/9f+Ak
hi0=
"]]},
Annotation[#, "Charting`Private`Tag$31524#1"]& ]}, {}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->{True, True},
AxesLabel->{None, None},
AxesOrigin->{0, 0},
DisplayFunction->Identity,
Frame->{{False, False}, {False, False}},
FrameLabel->{{None, None}, {None, None}},
FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
GridLines->{None, None},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImagePadding->All,
Method->{
"DefaultBoundaryStyle" -> Automatic,
"DefaultGraphicsInteraction" -> {
"Version" -> 1.2, "TrackMousePosition" -> {True, False},
"Effects" -> {
"Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
"Droplines" -> {
"freeformCursorMode" -> True,
"placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" ->
AbsolutePointSize[6], "ScalingFunctions" -> None,
"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Identity[#]& )[
Part[#, 1]],
(Identity[#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Identity[#]& )[
Part[#, 1]],
(Identity[#]& )[
Part[#, 2]]}& )}},
PlotRange->{All, All},
PlotRangeClipping->True,
PlotRangePadding->{{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.05],
Scaled[0.05]}},
Ticks->{Automatic, Automatic}]], "Output",
CellChangeTimes->{{3.883709244549595*^9, 3.883709297337487*^9},
3.883709583707026*^9, {3.883709635758346*^9, 3.883709670568365*^9},
3.8837099473258133`*^9},
CellLabel->
"Out[104]=",ExpressionUUID->"662da529-ccde-4355-a170-93e4672068f3"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(*", " ",
RowBox[{
"\:0440\:0435\:0436\:0443", " ", "\:0412\:0424", " ", "\:0432", " ",
"\:0440\:0430\:0434\:0438\:0430\:043b\:044c\:043d\:043e\:043c", " ",
"\:043f\:0440\:0435\:0434\:0441\:0442\:0430\:0432\:043b\:0435\:043d\:0438\
\:0438", " ", "\:0441", " ", "\:043f\:043e\:043c\:043e\:0449\:044c\:044e",
" ", "\:0444\:0443\:043d\:043a\:0446\:0438\:0438", " ",
"\:0444\:0435\:0440\:043c\:0438"}], " ", "*)"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"PsiRCut", "[", "r_", "]"}], ":=", " ",
RowBox[{
RowBox[{"PsiR", "[", "r", "]"}], " ",
RowBox[{"funcFermi", "[",
RowBox[{"r", ",", "2"}], "]"}]}]}], "\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"PsiR", "[", "r", "]"}], ",",
RowBox[{"PsiRCut", "[", "r", "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"r", ",", "0", ",", "10"}], "}"}]}], "]"}]}]}]], "Input",
CellChangeTimes->{{3.88370978236176*^9, 3.8837098757304697`*^9}, {
3.88370991928649*^9, 3.883709930485785*^9}},
CellLabel->
"In[134]:=",ExpressionUUID->"41107c73-e600-4079-9938-9536a9f8a8eb"],
Cell[BoxData[
GraphicsBox[{{{}, {},
TagBox[
{RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[
1.], LineBox[CompressedData["
1:eJwVlnk81Nsbx2UpF92yXJJtNNV0IxSlBZ9vVBJtSFIpYy0ibiqSFkWSksYS
IVskhKiopChkSVnKvszMt2xdzIxlcuv3/f1xXuf1/u85n+f9nHM0mT7WrqIi
IiKfqfX/PSmYOXe1S4TJ56Tfj621wkyqmmlW+2nHULWV3dFGuOL3+/IQGi0A
Ld0b9VIIfyRVRGpI0MLx7/TWEiZxFV7G/iemNO7CNBTsN4hB808P1pjGQ3BD
6wh340zM6xxgjGqUIjth+zU5gxKkfkjxHdaoRcKPOpuBP98h/3F4p5dOBzy9
nG0bt7ViSG7oxg6nDhgoXS+t8moF4/QOkxWsDtzMW9ueFd2K+0bSqeyZDrxa
3PVav6cV0bU33BzedULq6qVTjqfacJp9a9z8UDeczPhzB+59QYp0XYjs1j54
nggUK+tuhzs+3R3xY2PzGvPhAqUeiKRNlnVGsJHNKkw3MOxBvLhq14cMNu7o
5Bkl2/WgptZN/WEbGwLPhvQlMT1YYTub5rqRg6elAzajC3vx3YOR2zOHC+kF
5mdL5/ThePT58qYoEouvuDZWDfZBVJDW+/ohifM5cdvqpvqQsL9G5PFbEkpq
TPlKiX58UJU3i+ST+NAdHBiq2Q+trOxqC/tvcLbp1D1o34+RF81NbzW+41R9
+ODqyn54c/9mF+cP4oJKTveWyAH0ObZLvqkdhGiklItrwgBsvl7TaeAMoskq
7j+/rAGsr/sWwF08BJ8tWmv3vRmAWGHmQsWwIZyb1jU34A8gPkjT5MyRYUz9
si7fa8eG1GSTc0jgMJx/sDyMmWyc97kYfitmGNoZJQ5/ebPBZPa2ZNUN41qd
Pxl+lQ3t7UmeXw1HMHL/+u4rT9h4I698d8PCUbzM+ce8WJoDg8ia8q1ao9jO
o006KnLwYO5Zzt5to9i848RaAY2DGzNtuseDRnHWjr2Rs5YDu17W+4TvoxAx
/rK+zpGDoZyF/J8VP5DS7ChanMuBlOYVRu/6MbjX1urnreeixui2bvDWMcxd
arNAh+Ai1D7ZUM16DJJ3riveM+dCNOq5+UHPMaQvfx0JOy6Ev0bcvySNIWGL
pGe6HxfDXfuyP4qO4xb78un2LC5yppkF3gvGIWqWobIynwsPhZPP56uOo6Pu
93X3Yi44ltdrLNeOw6/Yvii7gouusvLv1e7jWJHLv2H2lYv6eMbfFfXjaDum
KGgTI3G92GD1kfZx+NRX141LktjetHnDL+44Ku6Zqc7MJ1E175CF0e9xXLNs
X9SgROLl6ahjz1dPwPjNr3nXV5IIjE7y3W8ygcO+MgaSuiTW5+cETO6YQLnG
sud++iSKuVXhBi4TuK8w8FzGiESe7czDgtgJyARv1be1IuF1cm7R7vQJVB4f
KTHYQ2LlDfmyH48nMD9gwz9zbEk8qFz1Qbt2Au3sI1FHDpJIXsMcyv45gWVp
g8JVx0gc2uUzYS7Jw/JX1tM+XpTXx4OEpAIPmWsclZJ9SMSmxkot0+HBxWHF
43J/EjcX1q1MPcqD/ocZ4cJLJEoN1Up2efNgR7+xZziEBMfRB7PneOCV/DTM
DyWxKU/edn8cDzYeMoWjESTcWlx7xDN5CD5jaHz8Jonon888iop4iMuw2fOR
mqvvFofOz2/kob31whybGBIKvvnzXnTyULimO8E3jgTiRaI9Bnl46fy+8Oxd
qj4y40GlOB+RIpzdRBKJN/On9Hzl+AgN+rtZJIXEiIHFC3UaH6vGVesf3idh
FjL6MWATH1d2GS8qSSfhnQMHhgUfrgQ8lDJJJHy6zWmx4yOduMtgPiDxbprt
fdmFj80aPNuYLBJjGutmdP34CNGf/29BNglV82sh3Rf4kDtcwS+m7gFz7475
EZF8MCV+uaTmkPCL0Y5fn8jHfVqTyelHVP4vg5eQ2XzU6hy4pJ9LopbdlHvn
KR9hRi1a7RTzpeiGm6v4kOGwjN3zSNDW+L/58YmPJzvnPe2m2PJAteW9Xj5S
9QpYRvkkTl9UbrMY5cO6Wbs9hOK0LM+jU0I+vknrhzyhuKHx1VCGpAAhxO3o
OoqnBQv8rRUFuOyuM6+eYroa8/dvugDh86T6iynetaU4PG+1ADcMjWihFAd6
zlU4CAGeJAuqQHFmtH2y5E4BGKcufOyn6mkqzVnx1EGA98GbCC+KZ/tmi5w9
BKhSyFDqpc7DkNxtLHtaABUVK7uNFFvrplaXhwggJdE7e57KI9iOt9frtgDm
zTSZHCqvh+e3dimnCLBL/seVcirPlow4t+pcAY71bPJ4QeUtUj84dqpMgKdf
lZ7dp/qhxdt0bkmNAAv0sv28qX7ZLb4p0dQqQF+C1r2lVD/zPNYs1hoXwJRx
yWRHGomvt65kfP0lgJatZVkp5YP4szadUJlJKGdPP5SlfHGQOGfWz5iExD/C
4cBEEqHaDQ03107C+D8p0xuUb4U2GvZGZpPQ+HRaPpTyUTKt0ivOcRJDFVw9
/Tsk9Gv/mtriNYmWUo9LJOWz45j7pYmASRQWbrO7TPleYiITuzNmEvfX0+L+
CSfB7LR9LVY/CfqqmQqjYBJSif0nfNsnsadCpdv0HIkiB2/VXnISSYfueK05
S0KsIyygbM4U7CPY4w2+JDK+lun7Gk5BbSJzfNKZhFW8+UDPlino3TkpZnGU
8ml/S5SV9RQWCJPTrxwisfXL6CjjxBQOvXVIfk7dD2QrLbsnbQpKrWkj8luo
+Y7Js7MqmIJ2uGlfEUis27dRouzVFMycBJc3bSIR1mLDjPk6Ba9lsd/+WENi
RXOoqtWf03CSe1KQqE7ieNNIVGnANAy+89PieFzIRQWAETaNdReWfm4e5aJs
99wfLNY0NuVeFRV+o97VjxqWJx9P46yuV7B4Fxe5DdYSDO40+sNDb8hVcvHj
w/MA1p4ZrG76FLcokgvfd1eYPgwhBl9v2btekQt1zra5k/pCfHxQs2THAi7q
RP/ICSKEsBN33+QoycUyInI8/IAQnz7yTSKFHLSXxVzMiBCiaIl34NxeDjYX
PEhu/1eIBmVfVddsDmQTazrMnv9E42ZTssGIg8KTMjaLLP7DHFnl5cu82Eg9
5zmkt1+EOPpYo0S6qh+XU2b38kfmEJ10fes2+z6INPcRLwPFiGdxdXFszR4s
P+V21nalBOEwcOSVPasTHEGcnfSrucS0mCDvtks7dnCPn4/2lSTylUv/aDT8
gl2cKC11dSnCTDjSn2pG/ZcqmRdr8qSJJ5b/1GjFNUNHtk3N7Mh84raEqeeF
kU+QgsCpi/cnoRsRDNkLTTAfdZhasm8hEfPJ1bqC0Yivb13mOGjLEmNcp7Nu
iXUouVblSBPIEoG/1DYke9XCTcK/r7FRjjhKHlCIJarh7HeuRCZBnrhDnx1y
c3kHXXetRisnBcIlu1Hl9tNKfJTTlvbf8Bexu0DOwUbqLV7kX07UFlMkLK2y
xMMTK3Buzso99d2KRCD7/qPMw+WQ6grc7l2sRFwOCWL4Nr4A94EmKyVoEcHN
W1uul1QK1gpl8dJ9yoSSocRiX+9niEpwq3aiLSZCJX4yv98qgQPrcKPMt8VE
RPHAld7eJ5jekjmTUq5CNKfUrzNeXQQ21/Ts2zBV4nD59hGnigKkGa9WaXBS
I5amvXjESctH3lV/WfdV6sTTpFztEzq5CNvnbCkmUCfaSvK+rJ56iLVdqQ/D
GjSI28KgVxvfZiH+78S8BksacYadqnWgJxMXKiLjLUtphInog0r7/9KxU2Vf
5oelmsTh5y02djvTsNm7+qBsuCYhczRP36LzPlJUmUvrBZrErLOG1c/WZCyt
zIrddXAJIafTSTKO3EPUqrcrP5cvIS6KsaQLlyXAjSf+qXYlnZAI0ukw+hEH
ZuEELfwWndAI9unRl4yF12Wb2R236cSZUKVYeZFY+NsUf5G5Qyc+npHYOTkV
g2sC/5tRsXQiLsS8uOpbDPI3zPyMS6ITHguvW1ytjsHMm99tDx7Rie5/I+6y
wmIQ9VkmsqqaTlhkF6zn/BGDhPQTHqG1dKJLPOGlpmgM0k81mm2voxNBn/XU
mEIWnipGCesa6cR1A52Tw0MsdDnIezS30okSsQnQ6llgsJXNBth0Yp3jmnuy
t1jQKw5Uz+DSiWsFGieCwljYeLVzxvUbnUhWlZAausCCFSOpYHCIOq9DfHrD
SRb8PGnq4+N0Inq/4oan1iwEGV2aKeLRiRVlU1aGlixcnT/QckpAJ0jTxKUv
zFiIf5weMT1NJ+4KFVTqDFhIuyjuXiakE3IGA4b7V7HwaK+radAsnTiefUSB
XMZC8ZL3aia/6MS7+vDHZ9RZKOctn6EePGLR6cOSMkos/A9M949z
"]]},
Annotation[#, "Charting`Private`Tag$206648#1"]& ],
TagBox[
{RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6], Opacity[
1.], LineBox[CompressedData["
1:eJwVVnk4lA8XnbElSUKU7CqSRMmSed/7VgrRYv+RnZCdtIgiilSEBmUrsoYQ
siSpyL7LUmKyFVlnjJkxg8/3133Oc+9zzz3n/nGvtIO30RU2HA7Xjcfh/h9T
7zpwqTg9Rm3b47i++9/XqO+VMjCXugrXDV5kDTc5aW58qw2TkgqArENb79pw
3tRMrYuS5JSKhJ8iqZqC6BNND+S6J03yBfQk8Xd+wrI0e5muxEXJPHg94HLm
I3+T5pafY3JzklWwvXdkxLtvXTO95aXvP8lm6NFQ/6mhZnHibVHkTw+lH1Cy
dzblAHm7lgt0v5j1G4e36udMeCWKtLwmD46XvZ0G7duyUVs+6xJINkPcn5un
IVWLt7e/XJ9gPPhQqX1iGmzeZ5wd4rhI0Gj9EzApOgO/q2/e7fMyJrCXZPEL
R8zA15L0ZL4QG8LzIGn0pu0/6D0d3O791Y/wWXDPC03+OZjZ+y/56LkUgmpU
U+2ZQ3OgurdILjbrJSGb69aE4dk5KGp7Fm1dmk54wug/4hY0By1JD3PxB7IJ
ZqPEb0l/5yDw2rW+atMSQtN/2rPZ7POQlW5W98ixlKDVQ9lZKjEPBY/TC58U
lROkGoysW03mgfDgDu8VqQ+EOJQtbMB7Hj7M2nC+NKslcFaW5I4/moe8G005
HLQ6wswb/mVm3TyUxp1/1qfeQOhM9QYh2jx8P5HzQTSyhVAW0/FI8fACVByg
TvoldhHkeO4Wa+guwGHBnLHMqB5CUtjhfm3HBeBJLbeV+NRH4F0bZl66uwBJ
z6p6fh4dIATfeCJt/WIBCH2CsgWLQwTygpbO1bIFSDEKcNTD/yI4Xf3ncb1z
AUpX2TVPqJMIA2NJcfdmFuD1s4WZSOkxwn6l/cPf2BbhfF2JeP6ZCcLIDGve
gH8RGIODdzzeTBGe5/The8UXoTjtBPGq+TTB0KlAyOLQIqS++twtYzpL4JG+
LzeqsQhfrr/32F24QGgixB65e2YR3AZKvc2fLRHC/0tTFzdahIltekE/QigE
bf98qLFZBHYB43NXM6kEtphKncvuiyD1Lqlilp1OqMtvuLh6cxEml992kLNW
CXcbe8xf3F8E9xeVTXWxawTC+KitRuwitKjFhJa64JDV9VmXgdRFOJfSkvDv
GBtSKbrqfePNInT/8re/e5QDuaG25dauikWYrZhWmHXlQlSNhELKvi6CiPfs
jwu/uBGyp/RD465F2EJwKXNL2IYURyrFkIcXwZewe7wumQ/xytJ6Hju9CHrU
ca6eVX5E8bPuK+WVRbiUEBOX0y+A/Bs2ze1kWwKjfQVmwVNCyBu6Q7HXjiU4
t9jgyKUsgrgK+VRuF1uC7fPpsg+r9iAHlO/UFcgvQR7FirgRKYZM6D9q0j++
BBpqYw4KeZJIhkti18zJJYgTs+TtfCqN2IVlDkZeWALLDbNW70BZROJlCUn+
8hLYbVyMrk3ZjwxX1/5tdFmCr5wGcfEMOSSpv3XR2X8JpC7IKfs9V0D+Iw/S
Oe8twXrjUGJ4yGFEmG8KlxW1BJcHoWbKShnpO0jh1k5aAn1TncmnB44icWdw
O8ezl+DbeFngARlV5JL99j2hpUvwJJ7WKWqqhvDdEZWWrluCn8UWWf4NGkjb
c7mDdW1LcEIFzRoP0EIelamq2A4twWSPTHJ3AIrodp3UXJ9cArMub9MPUxjC
NXvhZCp5CXqdmD9ptaeQ+i1WeoSNJch+aZma36KNhMpeNfy5jQwgo+Xos0MH
weCGxe3dZLDP7G4IfKaHrFuG2e/ZT4YdE7xCxdYGSM2NmKuVKpt4exN/0fWL
yO24VF9zlAy5W0cu03wNEY23bwJWzpGhPeW49N//jJGV5op78eZkOJjy5vuw
vylSNlkfqepEBu4qdPV5qznih++J7fUhg3gdCQ1xtESUxUdf+N0hA/qENJpz
2hqZ15hN3/mIDKINF8nLmnZIoQkjrziBDJlFnzXvrNsjHj5c7y6+JsOjeedq
WHZEFJ4IVs8XkcGRJeoQL+WM/M2R+hJVQwbyd1yKe6Qrkv31cItiMxncb+Kd
TY67I06jJ3pav5OB4ZMj+/yQFyLD1PnhNkaGr4KaRfuqfRCSsOnY1gUy8DRc
Nzn8xA9JO+owk8skg8e+Bu+fMf6I1QVvsg43BXbvc+J4234DEXULWp0SosB+
Ud/oGt0AZPBBJFu4NAVuGnwJbeQOQhLSE3j2K1FAv10+8dyuYMTk42uB+hMU
4CUdCdXVuocIDBWLOupQ4JHJXtakaBjStfxRhs2EAvu2H6uOV3qARPO3KqTb
bfIZh8yzAiOQKnXx8gteFAgsCo9UOv0ImbDxBlYgBS76T9U62EQh/OGfm/Mi
KdCn2HX0s3sMolUoaGKeSAEBjx+xXVZxiHPflRGOLArofnyvF/OQiMQxK1zf
vaNApHZJ/T9qAvJRhodiW0eBBNUEZlrBC+SvntWd7R0UwHperF4oT0GEfN9u
+fCTAlz741738L5C4DkuznWaApyffVF1cjri9slITJhGgbd9l06O8GciCVOZ
2V85loFy1NQ+3Dsb+bydpuwrsLy53zjvql15yKyq3gcJqWXw0/VTndhWgOy2
Sj7TdngZjAc9RXwvFyGnw+Y6A7SWYdTmPsUvogTxegOWcnrL4PDj8lO2F6VI
UnfsRJ/ZJp4uiWT8LUca6ONeoU7LkGBT8bHobiWyKKnGOOK3DA3hTjMWDh8Q
MZ2HYb+Cl0Fj181U2dRaRMfrx/bHUcvg2/FXMFvsM+IXr/hcI3kZaA9FAmWl
vyJpNXdlpnKXYe+5kSFvhwakebyr4Nn7ZWC4cZiU/GlElnlk1U/WL4N3X+Cf
icoWROro9c/z3ctQ47knhTbSjuhbNOqnjC5Djwen8VJJF3IjZE+/3twyWBm9
unolrwfJyHG3o60uw5lWud6dw31Ie8fHmUxuKiC6V87+uzSA0Kk7rhsJU8GK
QTWt2PEDkRV32NiQpcLsiNXUPulfyAXtsshCFSrUtR+ru6ZDQm67cwldBioI
dJXNzKiMIVlx/6Vxn9/MDznNcJpNIF1Vb+TfW1Lh4rtPNg+rpxAWifXO0ZUK
BXFnunEu04gc90Vk5w0qjCXnXSM5ziJGR9Iba8Oo4Cd1IDO+egG5a0Yx9Iil
Aj3cpaGvegnJu3NmeM9LKuyPUU7w6aIgfZmJzo0FVMjnn1Ys2beC4NqmF/2r
qSBjsXJzvpaOHKJoBco0UWFRcuCaVQ4TMRON5uz6TgXbzCfj+/6sI6EnSU/v
jFPh6vcqjlPaeLTQ9ajooSUq2B3ltfbXZ0cHn97PHFynwunsO8JPnnKiHBX9
SuG8K9A65LX2RoQbPTIiX3VMdAV6UwQdm/7xoJacgad/y62ATbcGb4sQHxqu
2N4efXwFpDrEOC518KMlxpL/EU6vgHSDw7hKowA6fNt3bPrSChQGxTsjTCGU
O+OrR6LNCkiOP/pg4yuCHmveRdP2WAF76zRxQxVR1GbR5R45YAUGHmmtvT8t
jj4Sqd72KmIFem72BYpaSKHlKG/C+fgV2Frsxmg8LYOSrthIMTNWwNjSyPqP
yz6UN6r4TW7xClDRrfVH2g6g6mVsx81qVwD6L1Ckbh1EHX6afGJvWwGhJkaN
qL8iypP829N3aAXuf/nXwFN1BH1n6SU2OrUCDPERbVyRCmopymwxWF6BW/Ix
fOvvj6HsPyICqvE0yPhEG3q5ehwteCEkL7+DBj3n0o5Xh2igJhbp/fFiNNjh
VJQxfUkLZe1WesCuQIOuGeGreddQNHOw+pivOg2OWUyFqjEw1OC5ztiINg3G
9z+FkX+n0GXzvhgDIxqoEt4x8kTOoCki9lBtS4PcO0J2smE66JmBuTk5Txq0
PFA3fXb8HDqfcDsl/jYNinZY1oqon0cTzLbosz+kQWmnxB9r3UsoKkxk+MTT
YKsdK1LvgBE69V0qdySDBtrR8p3/Tpig0fGFZgbFNLhkkPrtwRMzVM30BGf1
RxropKSf2CFjgY4INZbKtdJALJwtVJ/dCo3oM3aIH6TB0JXcYpKGLapMJPGz
T9GA88W7cg1ne3TQ2POTD4UG+716v1s5OaIhgqueIzg6RNarOg2kXEHle8PF
DPjoUDNYGWso7Ip2xQm2Vu2lQ535ebLaoBt6y+hVgNxBOswevpfSOuOJSgkc
lo9XowPV2sA5I98Hbe6u6mfTpgO/D58C+Zkf6hd79oGPIR1IhnHPtpX5o6KG
vcdGbOhwYmKyWF/gJvqF325M34MOBV6ndjWXB6BuXbMxVQF0uEEtWHTNDkIF
YgJALoIOl3W8nqzMBqPVF7nmiUQ6OOX8rUxrvoc67HiWwpZBBwVRDW3BnjB0
W6ekvk8RHQ6ReE7O7gpHy6ILGL9q6IDrpzPmkh+iVhc0c/Vb6KD43+DXdPfH
KAffN7OqAToY9kVae0RFowXtRpxyk3QI7LrnYcwZi5pEjZYSyXQ4nxV56NdK
HMoy8HBgwzHAOKLlmqR0PJrJy+D32c6Aq0+il6MfJaLn2x58+iXKgDBi3gGr
E0noymMBL315Bsig5i8eaqSiafovxaqOM6ApDTHZOPsKPbtNsfXAaQYQvTmW
TGUy0PmWygDiJQaYXxVV7TyWiSY8OiPPZsMA4VK33rh72Sh6rqff250BSehW
m0CBPHRqq+2DX7cYECr0NlhhPh992vzvmH44A57K9EdLihehGpG3xiqfMUBl
ZdTY1aQEJelyxh5IZwD6QLpu6nwp+pA7DohvGXBfOCifGVKOKjdJzONrGJDl
EDWrsVyBDkbkp3g3M2D0ZcfE3NtqNERHQ/9XPwOCdYlKUPURld/SwDg3wYBP
U+L+ktF1aNc3w9zKJQYg3ym/2X2/oLfCR8wObDBgywyWMPeoHpU6685J5F2F
Nnaah/TYN7SJk16KF10FoVA9seQ7zahvw30Hb7lV8O+a2CpzpQ2VmDjLtXJs
FUYGTi7+cu5EW9m2vgnCVoF9b1//dutu9JZ063n286ugsKJ/ufZYL7ofi1qK
tFiFavvzmmcJ39Eem4vx/M6rkO9eEzIbOIAG39mpmei32S9j5GIEfQhVTOkd
Fg9ehcGGVvqjymF0qDo+JPPxKtium3wW/TqKhg+Z7zv0fBWy1K6WbY/5jR6j
72kqyVyFu6YL3bIe4yhJeNhdo2QVCCtR9q9vT6JRx9N2fPq4Csojv0bH6v6g
J0zsSs+0rIJn7OWbzdoz6B8/GfO2/lUIb8UMR3jnUGLsxKrR+CpYl2R9UeRf
RE8WZ6cNLawCn/1Bt+SvS+h8h+spO9amX/kiR/ZnUdDkOYWpKW4mqCrp1+dX
UVFd3rlIz11MaMgXPRjPRUepCkWHl6WZcA3XnjcUu4pm6Pl231ZiQpax0mVB
hzX0ouux63gtJuCT8lJ0AAescOruhzpMSDr8h6eYhoe8rIoaPhMmaDyQ/Vo1
wg5m9QF28XZMMGB9vm/C4AT2cS0OMU8mJIJ5J9WAG4rx6zkZAUzwSffgzhnl
AWupOv2D4UywPzsmuatyO/BA6EJRHBOe33s11+XFDxXW2s/UXjJBWeD0bS1F
AXAK4lL/mM+EXOOOtPbdQrAzuenH6UomiNA8N+5rCkNt1aO7LfVM+IfXdZ56
thvcBw1kDLuZsKL/l4dXaS/spvF9G/jFhFDzv5blfBLQsKv7qs0ME065iKoV
pEmBn+qz7ZMrTKj3rssQtZcBSWPTEnd2FuCstyYeN94Hbb4ipuQdLOiZjBPn
vn0AAmKG6LfEWDC/xyJ//095OFCUnLIhz4K4h/UhlUGHoLfdGgs/zoKx/oon
sVeUIGRWcoL3FAtO+XWzUjqU4fC2sYhnF1iQSjXTZU84Cj8OZh4SvcyCv6Kf
YhOiVCFC17nzlQsLBATpu72q1UDVRf6anD8LPvarhynIaMLvBzPCb0NYIDlY
rM3RqgXRmQXVqlEs6HA8EvnzAwpaX71sPrxggUez2u996xj8/a3MdiqbBbsl
jMIsW05BPI6S1fSOBYGWlPdHG7XhlGS53sVPLCjyf36pg3EWFpCbc99bWVAm
bjs94KIHKVaasVaDLCDUyCjFiRiAXiBTdXyCBV86IjP+7LgIKy8+Dl5dYgGz
YHYNUTSE15XBQYtrLFjkVE0dZRnBpYGTUjd51uBg45DpvXUTWKOy168Jr4Hh
sApeV80c3gh9c7kvuwZtN/wtf+dZgPmxh9u2Ka/B2l/Xf7G2VsBhdK4olrAG
glXKRto2tlDiw2u8W28NNHy619vM7KEtSTCg0GwNRq9p7yowcYSpetGXp5zW
4NIFLq+hJ1cAtyDdMOC7BtXkjcgFTlcQ3XPwn0fwGlRoHLbXbnQD1dPKO9mi
1oCHJ+zo2qAnXPRUV09MWoN9Q/IiAhk+4JaIWivmrgFTkrnNLtIP7n8+E/a5
fA00JaJZKzn+kPbPIM/s6xqILZvdXWe/CZW7TDr/da2B0v0K7GxmAPTAZWrI
yKbevLbjZjFBMHfVYa/w7BpUGYcPBncFAzfx6sl8xhroreNP09/fA5laHxds
yzoEkTncHarCgPD3ZtR3oXVgXyh35aM+ADOB4FI3mXWYWg502+3zEHwI4UMb
R9aBcyfR85jKY3jkHLVBRNYhtoP7TylEQ2YMcb+C/jrUu5/c094dA5+qk/U/
/bcOKleuaHW8i4MfExm+Js7r0HXbtT2xkQjLfG8Sp6+tgwhu3FlnVyLwaZZ8
vHtvHdiYr+7bpb8AecfKccGn6+DvQ55p902BU1GftualrMMP7TnC7ycvwari
2xH0zTpQDWL35walw43f7aa9FevQ75DcIGL7GmK3fQ90bVgHJTXOKH/fLCg4
Ppy+1rMOe/8UdCRW5MA32/HGONI6FOG5Dt44/gZIkTNzcvObekN1WgQXCmC1
dEnwI3Mdtsn8Tr3+twiERuiaRls3AOekGN0YVwJK3Di7P8IbUJBtd1bYtBR0
j24JD9q3Af814ftmCeXgaMVXsPPoBriIt1mP6VfA3fBdPdmwAU8vDRteDKuC
58VidK3zGyD0bUWcMPEB2jgOaTu7boB451s567g6mFI66sa8von/s/8nxPYF
cBaaMTFhGzD6pJBsEf4VjhfqDFenbQB+cPLK3uZvkGbq5L/j+wZcSfZAzHg7
oDLYPSlzbAN0vJ+9m6R1Qm+eX53m4gbkv947ZbHcBRzBGNc7ThyWZ2iybXqq
B3YKab8I4sVhbxWiJqi/ekEiT0dRRxCHZRrHtNzt7gON3gtGw1I4rNkq5519
bj+ccTWazJbDYSXNv2nHIwfAaM30lq8SDhPpjVgNtx8EDznrNC4CDouqIP42
pA5BQI2dSvcpHOYaSxdNKPoB4YZO9cl6m/yUpsQZm5+QHug+o2yOw/g0q3WO
pAyDct1WeoQ1Dgs3c6IIS/+COo5czlFHHKbPXzYVnvILLumdFVRzw2EqEZwa
H/lGgBQ1IRXlg8PW9th6brk1Aj49oUoTN3DYHajX/TQ4AhvC0gStOzjsZYRC
q47KKERf/qQXF4bD+CPZg3hCR0HilbX5dCQOsyNWr/m3jsLbCaYTFoPDOqOv
BDC5SIAcTPJLTMBhEP16D24/Cdo8NULmU3CYXs1ozgaQwOpdf9SZ1zgsOEVD
Sfk/Esyu+Cen5OGwdW+ZjQZPEgRqCeZRinDYYwVNC0oICXhCSt6fe4/D/joX
7vsbS4Kk+ov16TU4bGd8xrfuVyRQ2DrfTf+y6U8725afhSSoOv9k9GIzDvvo
HMOpWEUC3TiFuexOHJYae15r5gsJBvubVte+4zCz1ZwHGq0kcN3rwm06jMPI
noqa6j0koNlyCheM4bB9lkOaHIMkCM98Lcs+jcPM5fxFPgyTQHj6pIrlAg5j
T36seJ1EguzDJLSEuslH3vFJb5wEx/3uGnCzNv2XfSV9YZIE9e/FLG3Z8Nif
/h998VMkMGFWu7znxmOVfw/mHv1DggmwuL59Bx6z63g1pLqJr92nhTrtwmN+
Jhmq+Zv1bM3xMR/24rEcxu4jrzf7xW1XTROQwWM1HyU5D06QQMaoJ/+qPB5b
4eDu1RkjQUmCT1WdEh773F9WuHVzPuwnX6PIcTxGqjWouvmLBF2ShX1eWnis
yf0cmvSDBHZO+mMNJ/GYwWFGza0BEizkTi+I6eIxCV6vjT19JOA7emBbqwke
Kz3e1FLTRoK0G/W7ZS7jsbbhsammJhIc/uBwIMAejyVltW4prCeBgfbLk3Je
eIx1/rfZ9hoSPDLbfSssAo/NUGOnIvNIIJr8/sGPKDyWYGEuXp5JgrxRk2cq
RDy2paZ9ovMlCZpcY9+OvsJjYyvWh3/Gk4ArkGdSqxqPybnMDvncI0HoS5bh
8uwm398I85vmJLikXOl7iILHZrmbY7WNSCDx+VqsA2PTLzdlNf7zJKgem+nq
4mTDvJpOrL8+RQLy/qGLhRJs2MmtaxX1h0ngUFB+3vkSG2ZZez9DgIMEJ6u8
9AZL2TCfvlPZaw6jgOslYTW32bEq0xPPx6RH4IC/8y0TBU6sMlnh43/EnzBB
TTTb9pELEyEvF8Y6DcG5Sbc7cb7cWP6eqq0d6gNwYSLmkIQED3Z6dfZ3+unv
MPPVIaSpcBtWqn+t6VBiLyjt7Bc/bbsdi+U85R482735f1Hthyl82JHHd2Fn
cBfozFnSZEz5sfjuK0Z1ch0w+MUJb6m4E1uctL/lnNwK5Q/rbaSoO7Hb6+Ka
aR7N4Mx5ndTRIYDZTVkIJWCN4OgXWM6bJIg9k2XNODs1wBGXQx0G9kKYU27H
3tj3X6FTQHHbdc1d2MViAUtjni/w4W1osiK7MKZvkMMRmVwHgXiFS22/hLHb
46/ys6xrgWf4tq5XmQgWGhYk59vxASazpYkvg3Zjk4XHa5VTq4Aov4ejynQP
JqLOKerrVQExSc6N9lKiWDgn0+Hv03KwJFp38P4RxR6Xjd0fHS0FunYW42Xt
Xqz3ZZsaovIOxidP3foSIYZZ1+rO2tcVQwaisrfdXhzbl/EhfyLjLRQ+uL7T
5bAE9j61QNFTqQAiTB312akSWH954YAKLQ82z1deRLskFrsa9PHElxx4fjC5
sF1fCrs5nn7IYiQLguuinutXSWEoW/bX/9Zew/m9plkt+6Qx68o+Y7PzGXDS
q/HyzkhpjNeu8Jjez1fwUsxhXxtVGmM5Showv6fBvq85CRcuy2ACSj+n5GxT
IObwF4WeWhkshJ24rWR/EjhTOLqbFWQxziClH4T5RHAoIUtFPpXFJO96jxzj
TgCPUGPWuVhZ7Ga4SIIgLgGuG5cN8D6TxTpvcp5focXDQ+r16JgEWSwxTKes
/k88vNVkMBNTZTFX/kd6DxrjgfF5oz87Xxb7tfD4BTEiHmJ6eKPqG2Uxvdxi
jYmt8ZD02tM1vFkWG+ZIqpFmi4fX/h2ndVtlsaAeZXGHVSK8F45Zbe2QxR6p
Kvn8myHCsKWga+93WaycnQxSbUSQG99zemxcFlOzOZqy8ykRlMtuS2ROymIP
iyU9gyKIcOLBT8aVP7JYmhgnz0wwEQzkUounZzb1Wj5/3e5DBD93KYmlJVks
zlxY870REYII9xjvKLKYfDXNQF2fCA+2j/X5U2WxqVPJ+z6cJsLzoteP6XRZ
7MWq0N5WVSJkhHC4VK/KYgKqY+rmh4mQb3jlVBBLFnPLtRWa2k+EMplv4ui6
LNbQFll0U4IItZQDjI0NWWz3DWtuXhEi/A9fkynO
"]]},
Annotation[#, "Charting`Private`Tag$206648#2"]& ]}, {}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->{True, True},
AxesLabel->{None, None},
AxesOrigin->{0, 0},
DisplayFunction->Identity,
Frame->{{False, False}, {False, False}},
FrameLabel->{{None, None}, {None, None}},
FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
GridLines->{None, None},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImagePadding->All,
Method->{
"DefaultBoundaryStyle" -> Automatic,
"DefaultGraphicsInteraction" -> {
"Version" -> 1.2, "TrackMousePosition" -> {True, False},
"Effects" -> {
"Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
"Droplines" -> {
"freeformCursorMode" -> True,
"placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" ->
AbsolutePointSize[6], "ScalingFunctions" -> None,
"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Identity[#]& )[
Part[#, 1]],
(Identity[#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Identity[#]& )[
Part[#, 1]],
(Identity[#]& )[
Part[#, 2]]}& )}},
PlotRange->{{0, 10}, {0., 0.7088375225314254}},
PlotRangeClipping->True,
PlotRangePadding->{{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.05],
Scaled[0.05]}},
Ticks->{Automatic, Automatic}]], "Output",
CellChangeTimes->{
3.883709869951499*^9, {3.883709931548687*^9, 3.8837099535027523`*^9},
3.883711640492401*^9},
CellLabel->
"Out[135]=",ExpressionUUID->"c5b1cf7f-6333-41cb-ac14-ed7aae94240b"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(*", " ",
RowBox[{
"\:041d\:0443\:0436\:043d\:0430", " ", "\:043d\:043e\:0432\:0430\:044f",
" ", "\:043d\:043e\:0440\:043c\:0438\:0440\:043e\:0432\:043a\:0430"}],
" ", "*)"}], "\[IndentingNewLine]",
RowBox[{"myNormCut", "=",
RowBox[{"A", "/.",
RowBox[{"FindRoot", "[",
RowBox[{
RowBox[{
RowBox[{
SuperscriptBox["A", "2"], " ",
RowBox[{"Integrate", "[",
RowBox[{
SuperscriptBox[
RowBox[{"PsiRCut", "[", "r", "]"}], "2"], ",", " ",
RowBox[{"{",
RowBox[{"r", ",", "0", ",", "Infinity"}], "}"}]}], "]"}]}],
"\[Equal]", "1"}], ",", " ",
RowBox[{"{",
RowBox[{"A", ",", "1"}], "}"}]}], "]"}]}]}]}]], "Input",
CellChangeTimes->{{3.883710095254547*^9, 3.883710201527133*^9}, {
3.883710359751049*^9, 3.883710401624404*^9}, {3.883711010966565*^9,
3.8837110111158857`*^9}, {3.8837110595759563`*^9,
3.8837110649009457`*^9}, {3.8837111483581047`*^9, 3.883711151060313*^9}, {
3.8837112836886053`*^9, 3.883711284632275*^9}, 3.883711441598289*^9},
CellLabel->
"In[112]:=",ExpressionUUID->"ad62482c-1e7f-4a85-9ecd-12674e160662"],
Cell[BoxData[
RowBox[{"1.6417137907587436`", "\[VeryThinSpace]", "+",
RowBox[{"0.`", " ", "\[ImaginaryI]"}]}]], "Output",
CellChangeTimes->{3.883710217679234*^9, 3.883710350593095*^9,
3.883711192720694*^9, 3.883711316820291*^9, 3.883711440354952*^9,
3.8837115047150087`*^9},
CellLabel->
"Out[112]=",ExpressionUUID->"00db2c76-8892-4942-8216-daa907d48257"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(*",
RowBox[{
RowBox[{
RowBox[{"PsiRFinal", "[", "r_", "]"}], ":=",
RowBox[{"1.641", " ",
RowBox[{"PsiRCut", "[", "r", "]"}]}]}], ";"}], "*)"}],
"\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"PsiRFinal", "[", "r_", "]"}], ":=",
RowBox[{"1.6417", " ",
RowBox[{"PsiRCut", "[", "r", "]"}]}]}], "\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"PsiR", "[", "r", "]"}], ",",
RowBox[{"PsiRCut", "[", "r", "]"}], ",",
RowBox[{"PsiRFinal", "[", "r", "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"r", ",", "0", ",", "10"}], "}"}]}], "]"}]}]}]], "Input",
CellChangeTimes->{{3.883711522281398*^9, 3.8837117032768993`*^9}, {
3.88371175150282*^9, 3.883711753344592*^9}},
CellLabel->
"In[145]:=",ExpressionUUID->"23895096-ea28-4995-8fa0-463fe03d27af"],
Cell[BoxData[
GraphicsBox[{{{}, {},
TagBox[
{RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[
1.], LineBox[CompressedData["
1:eJwVlnk81Nsbx2UpF92yXJJtNNV0IxSlBZ9vVBJtSFIpYy0ibiqSFkWSksYS
IVskhKiopChkSVnKvszMt2xdzIxlcuv3/f1xXuf1/u85n+f9nHM0mT7WrqIi
IiKfqfX/PSmYOXe1S4TJ56Tfj621wkyqmmlW+2nHULWV3dFGuOL3+/IQGi0A
Ld0b9VIIfyRVRGpI0MLx7/TWEiZxFV7G/iemNO7CNBTsN4hB808P1pjGQ3BD
6wh340zM6xxgjGqUIjth+zU5gxKkfkjxHdaoRcKPOpuBP98h/3F4p5dOBzy9
nG0bt7ViSG7oxg6nDhgoXS+t8moF4/QOkxWsDtzMW9ueFd2K+0bSqeyZDrxa
3PVav6cV0bU33BzedULq6qVTjqfacJp9a9z8UDeczPhzB+59QYp0XYjs1j54
nggUK+tuhzs+3R3xY2PzGvPhAqUeiKRNlnVGsJHNKkw3MOxBvLhq14cMNu7o
5Bkl2/WgptZN/WEbGwLPhvQlMT1YYTub5rqRg6elAzajC3vx3YOR2zOHC+kF
5mdL5/ThePT58qYoEouvuDZWDfZBVJDW+/ohifM5cdvqpvqQsL9G5PFbEkpq
TPlKiX58UJU3i+ST+NAdHBiq2Q+trOxqC/tvcLbp1D1o34+RF81NbzW+41R9
+ODqyn54c/9mF+cP4oJKTveWyAH0ObZLvqkdhGiklItrwgBsvl7TaeAMoskq
7j+/rAGsr/sWwF08BJ8tWmv3vRmAWGHmQsWwIZyb1jU34A8gPkjT5MyRYUz9
si7fa8eG1GSTc0jgMJx/sDyMmWyc97kYfitmGNoZJQ5/ebPBZPa2ZNUN41qd
Pxl+lQ3t7UmeXw1HMHL/+u4rT9h4I698d8PCUbzM+ce8WJoDg8ia8q1ao9jO
o006KnLwYO5Zzt5to9i848RaAY2DGzNtuseDRnHWjr2Rs5YDu17W+4TvoxAx
/rK+zpGDoZyF/J8VP5DS7ChanMuBlOYVRu/6MbjX1urnreeixui2bvDWMcxd
arNAh+Ai1D7ZUM16DJJ3riveM+dCNOq5+UHPMaQvfx0JOy6Ev0bcvySNIWGL
pGe6HxfDXfuyP4qO4xb78un2LC5yppkF3gvGIWqWobIynwsPhZPP56uOo6Pu
93X3Yi44ltdrLNeOw6/Yvii7gouusvLv1e7jWJHLv2H2lYv6eMbfFfXjaDum
KGgTI3G92GD1kfZx+NRX141LktjetHnDL+44Ku6Zqc7MJ1E175CF0e9xXLNs
X9SgROLl6ahjz1dPwPjNr3nXV5IIjE7y3W8ygcO+MgaSuiTW5+cETO6YQLnG
sud++iSKuVXhBi4TuK8w8FzGiESe7czDgtgJyARv1be1IuF1cm7R7vQJVB4f
KTHYQ2LlDfmyH48nMD9gwz9zbEk8qFz1Qbt2Au3sI1FHDpJIXsMcyv45gWVp
g8JVx0gc2uUzYS7Jw/JX1tM+XpTXx4OEpAIPmWsclZJ9SMSmxkot0+HBxWHF
43J/EjcX1q1MPcqD/ocZ4cJLJEoN1Up2efNgR7+xZziEBMfRB7PneOCV/DTM
DyWxKU/edn8cDzYeMoWjESTcWlx7xDN5CD5jaHz8Jonon888iop4iMuw2fOR
mqvvFofOz2/kob31whybGBIKvvnzXnTyULimO8E3jgTiRaI9Bnl46fy+8Oxd
qj4y40GlOB+RIpzdRBKJN/On9Hzl+AgN+rtZJIXEiIHFC3UaH6vGVesf3idh
FjL6MWATH1d2GS8qSSfhnQMHhgUfrgQ8lDJJJHy6zWmx4yOduMtgPiDxbprt
fdmFj80aPNuYLBJjGutmdP34CNGf/29BNglV82sh3Rf4kDtcwS+m7gFz7475
EZF8MCV+uaTmkPCL0Y5fn8jHfVqTyelHVP4vg5eQ2XzU6hy4pJ9LopbdlHvn
KR9hRi1a7RTzpeiGm6v4kOGwjN3zSNDW+L/58YmPJzvnPe2m2PJAteW9Xj5S
9QpYRvkkTl9UbrMY5cO6Wbs9hOK0LM+jU0I+vknrhzyhuKHx1VCGpAAhxO3o
OoqnBQv8rRUFuOyuM6+eYroa8/dvugDh86T6iynetaU4PG+1ADcMjWihFAd6
zlU4CAGeJAuqQHFmtH2y5E4BGKcufOyn6mkqzVnx1EGA98GbCC+KZ/tmi5w9
BKhSyFDqpc7DkNxtLHtaABUVK7uNFFvrplaXhwggJdE7e57KI9iOt9frtgDm
zTSZHCqvh+e3dimnCLBL/seVcirPlow4t+pcAY71bPJ4QeUtUj84dqpMgKdf
lZ7dp/qhxdt0bkmNAAv0sv28qX7ZLb4p0dQqQF+C1r2lVD/zPNYs1hoXwJRx
yWRHGomvt65kfP0lgJatZVkp5YP4szadUJlJKGdPP5SlfHGQOGfWz5iExD/C
4cBEEqHaDQ03107C+D8p0xuUb4U2GvZGZpPQ+HRaPpTyUTKt0ivOcRJDFVw9
/Tsk9Gv/mtriNYmWUo9LJOWz45j7pYmASRQWbrO7TPleYiITuzNmEvfX0+L+
CSfB7LR9LVY/CfqqmQqjYBJSif0nfNsnsadCpdv0HIkiB2/VXnISSYfueK05
S0KsIyygbM4U7CPY4w2+JDK+lun7Gk5BbSJzfNKZhFW8+UDPlino3TkpZnGU
8ml/S5SV9RQWCJPTrxwisfXL6CjjxBQOvXVIfk7dD2QrLbsnbQpKrWkj8luo
+Y7Js7MqmIJ2uGlfEUis27dRouzVFMycBJc3bSIR1mLDjPk6Ba9lsd/+WENi
RXOoqtWf03CSe1KQqE7ieNNIVGnANAy+89PieFzIRQWAETaNdReWfm4e5aJs
99wfLNY0NuVeFRV+o97VjxqWJx9P46yuV7B4Fxe5DdYSDO40+sNDb8hVcvHj
w/MA1p4ZrG76FLcokgvfd1eYPgwhBl9v2btekQt1zra5k/pCfHxQs2THAi7q
RP/ICSKEsBN33+QoycUyInI8/IAQnz7yTSKFHLSXxVzMiBCiaIl34NxeDjYX
PEhu/1eIBmVfVddsDmQTazrMnv9E42ZTssGIg8KTMjaLLP7DHFnl5cu82Eg9
5zmkt1+EOPpYo0S6qh+XU2b38kfmEJ10fes2+z6INPcRLwPFiGdxdXFszR4s
P+V21nalBOEwcOSVPasTHEGcnfSrucS0mCDvtks7dnCPn4/2lSTylUv/aDT8
gl2cKC11dSnCTDjSn2pG/ZcqmRdr8qSJJ5b/1GjFNUNHtk3N7Mh84raEqeeF
kU+QgsCpi/cnoRsRDNkLTTAfdZhasm8hEfPJ1bqC0Yivb13mOGjLEmNcp7Nu
iXUouVblSBPIEoG/1DYke9XCTcK/r7FRjjhKHlCIJarh7HeuRCZBnrhDnx1y
c3kHXXetRisnBcIlu1Hl9tNKfJTTlvbf8Bexu0DOwUbqLV7kX07UFlMkLK2y
xMMTK3Buzso99d2KRCD7/qPMw+WQ6grc7l2sRFwOCWL4Nr4A94EmKyVoEcHN
W1uul1QK1gpl8dJ9yoSSocRiX+9niEpwq3aiLSZCJX4yv98qgQPrcKPMt8VE
RPHAld7eJ5jekjmTUq5CNKfUrzNeXQQ21/Ts2zBV4nD59hGnigKkGa9WaXBS
I5amvXjESctH3lV/WfdV6sTTpFztEzq5CNvnbCkmUCfaSvK+rJ56iLVdqQ/D
GjSI28KgVxvfZiH+78S8BksacYadqnWgJxMXKiLjLUtphInog0r7/9KxU2Vf
5oelmsTh5y02djvTsNm7+qBsuCYhczRP36LzPlJUmUvrBZrErLOG1c/WZCyt
zIrddXAJIafTSTKO3EPUqrcrP5cvIS6KsaQLlyXAjSf+qXYlnZAI0ukw+hEH
ZuEELfwWndAI9unRl4yF12Wb2R236cSZUKVYeZFY+NsUf5G5Qyc+npHYOTkV
g2sC/5tRsXQiLsS8uOpbDPI3zPyMS6ITHguvW1ytjsHMm99tDx7Rie5/I+6y
wmIQ9VkmsqqaTlhkF6zn/BGDhPQTHqG1dKJLPOGlpmgM0k81mm2voxNBn/XU
mEIWnipGCesa6cR1A52Tw0MsdDnIezS30okSsQnQ6llgsJXNBth0Yp3jmnuy
t1jQKw5Uz+DSiWsFGieCwljYeLVzxvUbnUhWlZAausCCFSOpYHCIOq9DfHrD
SRb8PGnq4+N0Inq/4oan1iwEGV2aKeLRiRVlU1aGlixcnT/QckpAJ0jTxKUv
zFiIf5weMT1NJ+4KFVTqDFhIuyjuXiakE3IGA4b7V7HwaK+radAsnTiefUSB
XMZC8ZL3aia/6MS7+vDHZ9RZKOctn6EePGLR6cOSMkos/A9M949z
"]]},
Annotation[#, "Charting`Private`Tag$207074#1"]& ],
TagBox[
{RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6], Opacity[
1.], LineBox[CompressedData["
1:eJwVVnk4lA8XnbElSUKU7CqSRMmSed/7VgrRYv+RnZCdtIgiilSEBmUrsoYQ
siSpyL7LUmKyFVlnjJkxg8/3133Oc+9zzz3n/nGvtIO30RU2HA7Xjcfh/h9T
7zpwqTg9Rm3b47i++9/XqO+VMjCXugrXDV5kDTc5aW58qw2TkgqArENb79pw
3tRMrYuS5JSKhJ8iqZqC6BNND+S6J03yBfQk8Xd+wrI0e5muxEXJPHg94HLm
I3+T5pafY3JzklWwvXdkxLtvXTO95aXvP8lm6NFQ/6mhZnHibVHkTw+lH1Cy
dzblAHm7lgt0v5j1G4e36udMeCWKtLwmD46XvZ0G7duyUVs+6xJINkPcn5un
IVWLt7e/XJ9gPPhQqX1iGmzeZ5wd4rhI0Gj9EzApOgO/q2/e7fMyJrCXZPEL
R8zA15L0ZL4QG8LzIGn0pu0/6D0d3O791Y/wWXDPC03+OZjZ+y/56LkUgmpU
U+2ZQ3OgurdILjbrJSGb69aE4dk5KGp7Fm1dmk54wug/4hY0By1JD3PxB7IJ
ZqPEb0l/5yDw2rW+atMSQtN/2rPZ7POQlW5W98ixlKDVQ9lZKjEPBY/TC58U
lROkGoysW03mgfDgDu8VqQ+EOJQtbMB7Hj7M2nC+NKslcFaW5I4/moe8G005
HLQ6wswb/mVm3TyUxp1/1qfeQOhM9QYh2jx8P5HzQTSyhVAW0/FI8fACVByg
TvoldhHkeO4Wa+guwGHBnLHMqB5CUtjhfm3HBeBJLbeV+NRH4F0bZl66uwBJ
z6p6fh4dIATfeCJt/WIBCH2CsgWLQwTygpbO1bIFSDEKcNTD/yI4Xf3ncb1z
AUpX2TVPqJMIA2NJcfdmFuD1s4WZSOkxwn6l/cPf2BbhfF2JeP6ZCcLIDGve
gH8RGIODdzzeTBGe5/The8UXoTjtBPGq+TTB0KlAyOLQIqS++twtYzpL4JG+
LzeqsQhfrr/32F24QGgixB65e2YR3AZKvc2fLRHC/0tTFzdahIltekE/QigE
bf98qLFZBHYB43NXM6kEtphKncvuiyD1Lqlilp1OqMtvuLh6cxEml992kLNW
CXcbe8xf3F8E9xeVTXWxawTC+KitRuwitKjFhJa64JDV9VmXgdRFOJfSkvDv
GBtSKbrqfePNInT/8re/e5QDuaG25dauikWYrZhWmHXlQlSNhELKvi6CiPfs
jwu/uBGyp/RD465F2EJwKXNL2IYURyrFkIcXwZewe7wumQ/xytJ6Hju9CHrU
ca6eVX5E8bPuK+WVRbiUEBOX0y+A/Bs2ze1kWwKjfQVmwVNCyBu6Q7HXjiU4
t9jgyKUsgrgK+VRuF1uC7fPpsg+r9iAHlO/UFcgvQR7FirgRKYZM6D9q0j++
BBpqYw4KeZJIhkti18zJJYgTs+TtfCqN2IVlDkZeWALLDbNW70BZROJlCUn+
8hLYbVyMrk3ZjwxX1/5tdFmCr5wGcfEMOSSpv3XR2X8JpC7IKfs9V0D+Iw/S
Oe8twXrjUGJ4yGFEmG8KlxW1BJcHoWbKShnpO0jh1k5aAn1TncmnB44icWdw
O8ezl+DbeFngARlV5JL99j2hpUvwJJ7WKWqqhvDdEZWWrluCn8UWWf4NGkjb
c7mDdW1LcEIFzRoP0EIelamq2A4twWSPTHJ3AIrodp3UXJ9cArMub9MPUxjC
NXvhZCp5CXqdmD9ptaeQ+i1WeoSNJch+aZma36KNhMpeNfy5jQwgo+Xos0MH
weCGxe3dZLDP7G4IfKaHrFuG2e/ZT4YdE7xCxdYGSM2NmKuVKpt4exN/0fWL
yO24VF9zlAy5W0cu03wNEY23bwJWzpGhPeW49N//jJGV5op78eZkOJjy5vuw
vylSNlkfqepEBu4qdPV5qznih++J7fUhg3gdCQ1xtESUxUdf+N0hA/qENJpz
2hqZ15hN3/mIDKINF8nLmnZIoQkjrziBDJlFnzXvrNsjHj5c7y6+JsOjeedq
WHZEFJ4IVs8XkcGRJeoQL+WM/M2R+hJVQwbyd1yKe6Qrkv31cItiMxncb+Kd
TY67I06jJ3pav5OB4ZMj+/yQFyLD1PnhNkaGr4KaRfuqfRCSsOnY1gUy8DRc
Nzn8xA9JO+owk8skg8e+Bu+fMf6I1QVvsg43BXbvc+J4234DEXULWp0SosB+
Ud/oGt0AZPBBJFu4NAVuGnwJbeQOQhLSE3j2K1FAv10+8dyuYMTk42uB+hMU
4CUdCdXVuocIDBWLOupQ4JHJXtakaBjStfxRhs2EAvu2H6uOV3qARPO3KqTb
bfIZh8yzAiOQKnXx8gteFAgsCo9UOv0ImbDxBlYgBS76T9U62EQh/OGfm/Mi
KdCn2HX0s3sMolUoaGKeSAEBjx+xXVZxiHPflRGOLArofnyvF/OQiMQxK1zf
vaNApHZJ/T9qAvJRhodiW0eBBNUEZlrBC+SvntWd7R0UwHperF4oT0GEfN9u
+fCTAlz741738L5C4DkuznWaApyffVF1cjri9slITJhGgbd9l06O8GciCVOZ
2V85loFy1NQ+3Dsb+bydpuwrsLy53zjvql15yKyq3gcJqWXw0/VTndhWgOy2
Sj7TdngZjAc9RXwvFyGnw+Y6A7SWYdTmPsUvogTxegOWcnrL4PDj8lO2F6VI
UnfsRJ/ZJp4uiWT8LUca6ONeoU7LkGBT8bHobiWyKKnGOOK3DA3hTjMWDh8Q
MZ2HYb+Cl0Fj181U2dRaRMfrx/bHUcvg2/FXMFvsM+IXr/hcI3kZaA9FAmWl
vyJpNXdlpnKXYe+5kSFvhwakebyr4Nn7ZWC4cZiU/GlElnlk1U/WL4N3X+Cf
icoWROro9c/z3ctQ47knhTbSjuhbNOqnjC5Djwen8VJJF3IjZE+/3twyWBm9
unolrwfJyHG3o60uw5lWud6dw31Ie8fHmUxuKiC6V87+uzSA0Kk7rhsJU8GK
QTWt2PEDkRV32NiQpcLsiNXUPulfyAXtsshCFSrUtR+ru6ZDQm67cwldBioI
dJXNzKiMIVlx/6Vxn9/MDznNcJpNIF1Vb+TfW1Lh4rtPNg+rpxAWifXO0ZUK
BXFnunEu04gc90Vk5w0qjCXnXSM5ziJGR9Iba8Oo4Cd1IDO+egG5a0Yx9Iil
Aj3cpaGvegnJu3NmeM9LKuyPUU7w6aIgfZmJzo0FVMjnn1Ys2beC4NqmF/2r
qSBjsXJzvpaOHKJoBco0UWFRcuCaVQ4TMRON5uz6TgXbzCfj+/6sI6EnSU/v
jFPh6vcqjlPaeLTQ9ajooSUq2B3ltfbXZ0cHn97PHFynwunsO8JPnnKiHBX9
SuG8K9A65LX2RoQbPTIiX3VMdAV6UwQdm/7xoJacgad/y62ATbcGb4sQHxqu
2N4efXwFpDrEOC518KMlxpL/EU6vgHSDw7hKowA6fNt3bPrSChQGxTsjTCGU
O+OrR6LNCkiOP/pg4yuCHmveRdP2WAF76zRxQxVR1GbR5R45YAUGHmmtvT8t
jj4Sqd72KmIFem72BYpaSKHlKG/C+fgV2Frsxmg8LYOSrthIMTNWwNjSyPqP
yz6UN6r4TW7xClDRrfVH2g6g6mVsx81qVwD6L1Ckbh1EHX6afGJvWwGhJkaN
qL8iypP829N3aAXuf/nXwFN1BH1n6SU2OrUCDPERbVyRCmopymwxWF6BW/Ix
fOvvj6HsPyICqvE0yPhEG3q5ehwteCEkL7+DBj3n0o5Xh2igJhbp/fFiNNjh
VJQxfUkLZe1WesCuQIOuGeGreddQNHOw+pivOg2OWUyFqjEw1OC5ztiINg3G
9z+FkX+n0GXzvhgDIxqoEt4x8kTOoCki9lBtS4PcO0J2smE66JmBuTk5Txq0
PFA3fXb8HDqfcDsl/jYNinZY1oqon0cTzLbosz+kQWmnxB9r3UsoKkxk+MTT
YKsdK1LvgBE69V0qdySDBtrR8p3/Tpig0fGFZgbFNLhkkPrtwRMzVM30BGf1
RxropKSf2CFjgY4INZbKtdJALJwtVJ/dCo3oM3aIH6TB0JXcYpKGLapMJPGz
T9GA88W7cg1ne3TQ2POTD4UG+716v1s5OaIhgqueIzg6RNarOg2kXEHle8PF
DPjoUDNYGWso7Ip2xQm2Vu2lQ535ebLaoBt6y+hVgNxBOswevpfSOuOJSgkc
lo9XowPV2sA5I98Hbe6u6mfTpgO/D58C+Zkf6hd79oGPIR1IhnHPtpX5o6KG
vcdGbOhwYmKyWF/gJvqF325M34MOBV6ndjWXB6BuXbMxVQF0uEEtWHTNDkIF
YgJALoIOl3W8nqzMBqPVF7nmiUQ6OOX8rUxrvoc67HiWwpZBBwVRDW3BnjB0
W6ekvk8RHQ6ReE7O7gpHy6ILGL9q6IDrpzPmkh+iVhc0c/Vb6KD43+DXdPfH
KAffN7OqAToY9kVae0RFowXtRpxyk3QI7LrnYcwZi5pEjZYSyXQ4nxV56NdK
HMoy8HBgwzHAOKLlmqR0PJrJy+D32c6Aq0+il6MfJaLn2x58+iXKgDBi3gGr
E0noymMBL315Bsig5i8eaqSiafovxaqOM6ApDTHZOPsKPbtNsfXAaQYQvTmW
TGUy0PmWygDiJQaYXxVV7TyWiSY8OiPPZsMA4VK33rh72Sh6rqff250BSehW
m0CBPHRqq+2DX7cYECr0NlhhPh992vzvmH44A57K9EdLihehGpG3xiqfMUBl
ZdTY1aQEJelyxh5IZwD6QLpu6nwp+pA7DohvGXBfOCifGVKOKjdJzONrGJDl
EDWrsVyBDkbkp3g3M2D0ZcfE3NtqNERHQ/9XPwOCdYlKUPURld/SwDg3wYBP
U+L+ktF1aNc3w9zKJQYg3ym/2X2/oLfCR8wObDBgywyWMPeoHpU6685J5F2F
Nnaah/TYN7SJk16KF10FoVA9seQ7zahvw30Hb7lV8O+a2CpzpQ2VmDjLtXJs
FUYGTi7+cu5EW9m2vgnCVoF9b1//dutu9JZ063n286ugsKJ/ufZYL7ofi1qK
tFiFavvzmmcJ39Eem4vx/M6rkO9eEzIbOIAG39mpmei32S9j5GIEfQhVTOkd
Fg9ehcGGVvqjymF0qDo+JPPxKtium3wW/TqKhg+Z7zv0fBWy1K6WbY/5jR6j
72kqyVyFu6YL3bIe4yhJeNhdo2QVCCtR9q9vT6JRx9N2fPq4Csojv0bH6v6g
J0zsSs+0rIJn7OWbzdoz6B8/GfO2/lUIb8UMR3jnUGLsxKrR+CpYl2R9UeRf
RE8WZ6cNLawCn/1Bt+SvS+h8h+spO9amX/kiR/ZnUdDkOYWpKW4mqCrp1+dX
UVFd3rlIz11MaMgXPRjPRUepCkWHl6WZcA3XnjcUu4pm6Pl231ZiQpax0mVB
hzX0ouux63gtJuCT8lJ0AAescOruhzpMSDr8h6eYhoe8rIoaPhMmaDyQ/Vo1
wg5m9QF28XZMMGB9vm/C4AT2cS0OMU8mJIJ5J9WAG4rx6zkZAUzwSffgzhnl
AWupOv2D4UywPzsmuatyO/BA6EJRHBOe33s11+XFDxXW2s/UXjJBWeD0bS1F
AXAK4lL/mM+EXOOOtPbdQrAzuenH6UomiNA8N+5rCkNt1aO7LfVM+IfXdZ56
thvcBw1kDLuZsKL/l4dXaS/spvF9G/jFhFDzv5blfBLQsKv7qs0ME065iKoV
pEmBn+qz7ZMrTKj3rssQtZcBSWPTEnd2FuCstyYeN94Hbb4ipuQdLOiZjBPn
vn0AAmKG6LfEWDC/xyJ//095OFCUnLIhz4K4h/UhlUGHoLfdGgs/zoKx/oon
sVeUIGRWcoL3FAtO+XWzUjqU4fC2sYhnF1iQSjXTZU84Cj8OZh4SvcyCv6Kf
YhOiVCFC17nzlQsLBATpu72q1UDVRf6anD8LPvarhynIaMLvBzPCb0NYIDlY
rM3RqgXRmQXVqlEs6HA8EvnzAwpaX71sPrxggUez2u996xj8/a3MdiqbBbsl
jMIsW05BPI6S1fSOBYGWlPdHG7XhlGS53sVPLCjyf36pg3EWFpCbc99bWVAm
bjs94KIHKVaasVaDLCDUyCjFiRiAXiBTdXyCBV86IjP+7LgIKy8+Dl5dYgGz
YHYNUTSE15XBQYtrLFjkVE0dZRnBpYGTUjd51uBg45DpvXUTWKOy168Jr4Hh
sApeV80c3gh9c7kvuwZtN/wtf+dZgPmxh9u2Ka/B2l/Xf7G2VsBhdK4olrAG
glXKRto2tlDiw2u8W28NNHy619vM7KEtSTCg0GwNRq9p7yowcYSpetGXp5zW
4NIFLq+hJ1cAtyDdMOC7BtXkjcgFTlcQ3XPwn0fwGlRoHLbXbnQD1dPKO9mi
1oCHJ+zo2qAnXPRUV09MWoN9Q/IiAhk+4JaIWivmrgFTkrnNLtIP7n8+E/a5
fA00JaJZKzn+kPbPIM/s6xqILZvdXWe/CZW7TDr/da2B0v0K7GxmAPTAZWrI
yKbevLbjZjFBMHfVYa/w7BpUGYcPBncFAzfx6sl8xhroreNP09/fA5laHxds
yzoEkTncHarCgPD3ZtR3oXVgXyh35aM+ADOB4FI3mXWYWg502+3zEHwI4UMb
R9aBcyfR85jKY3jkHLVBRNYhtoP7TylEQ2YMcb+C/jrUu5/c094dA5+qk/U/
/bcOKleuaHW8i4MfExm+Js7r0HXbtT2xkQjLfG8Sp6+tgwhu3FlnVyLwaZZ8
vHtvHdiYr+7bpb8AecfKccGn6+DvQ55p902BU1GftualrMMP7TnC7ycvwari
2xH0zTpQDWL35walw43f7aa9FevQ75DcIGL7GmK3fQ90bVgHJTXOKH/fLCg4
Ppy+1rMOe/8UdCRW5MA32/HGONI6FOG5Dt44/gZIkTNzcvObekN1WgQXCmC1
dEnwI3Mdtsn8Tr3+twiERuiaRls3AOekGN0YVwJK3Di7P8IbUJBtd1bYtBR0
j24JD9q3Af814ftmCeXgaMVXsPPoBriIt1mP6VfA3fBdPdmwAU8vDRteDKuC
58VidK3zGyD0bUWcMPEB2jgOaTu7boB451s567g6mFI66sa8von/s/8nxPYF
cBaaMTFhGzD6pJBsEf4VjhfqDFenbQB+cPLK3uZvkGbq5L/j+wZcSfZAzHg7
oDLYPSlzbAN0vJ+9m6R1Qm+eX53m4gbkv947ZbHcBRzBGNc7ThyWZ2iybXqq
B3YKab8I4sVhbxWiJqi/ekEiT0dRRxCHZRrHtNzt7gON3gtGw1I4rNkq5519
bj+ccTWazJbDYSXNv2nHIwfAaM30lq8SDhPpjVgNtx8EDznrNC4CDouqIP42
pA5BQI2dSvcpHOYaSxdNKPoB4YZO9cl6m/yUpsQZm5+QHug+o2yOw/g0q3WO
pAyDct1WeoQ1Dgs3c6IIS/+COo5czlFHHKbPXzYVnvILLumdFVRzw2EqEZwa
H/lGgBQ1IRXlg8PW9th6brk1Aj49oUoTN3DYHajX/TQ4AhvC0gStOzjsZYRC
q47KKERf/qQXF4bD+CPZg3hCR0HilbX5dCQOsyNWr/m3jsLbCaYTFoPDOqOv
BDC5SIAcTPJLTMBhEP16D24/Cdo8NULmU3CYXs1ozgaQwOpdf9SZ1zgsOEVD
Sfk/Esyu+Cen5OGwdW+ZjQZPEgRqCeZRinDYYwVNC0oICXhCSt6fe4/D/joX
7vsbS4Kk+ov16TU4bGd8xrfuVyRQ2DrfTf+y6U8725afhSSoOv9k9GIzDvvo
HMOpWEUC3TiFuexOHJYae15r5gsJBvubVte+4zCz1ZwHGq0kcN3rwm06jMPI
noqa6j0koNlyCheM4bB9lkOaHIMkCM98Lcs+jcPM5fxFPgyTQHj6pIrlAg5j
T36seJ1EguzDJLSEuslH3vFJb5wEx/3uGnCzNv2XfSV9YZIE9e/FLG3Z8Nif
/h998VMkMGFWu7znxmOVfw/mHv1DggmwuL59Bx6z63g1pLqJr92nhTrtwmN+
Jhmq+Zv1bM3xMR/24rEcxu4jrzf7xW1XTROQwWM1HyU5D06QQMaoJ/+qPB5b
4eDu1RkjQUmCT1WdEh773F9WuHVzPuwnX6PIcTxGqjWouvmLBF2ShX1eWnis
yf0cmvSDBHZO+mMNJ/GYwWFGza0BEizkTi+I6eIxCV6vjT19JOA7emBbqwke
Kz3e1FLTRoK0G/W7ZS7jsbbhsammJhIc/uBwIMAejyVltW4prCeBgfbLk3Je
eIx1/rfZ9hoSPDLbfSssAo/NUGOnIvNIIJr8/sGPKDyWYGEuXp5JgrxRk2cq
RDy2paZ9ovMlCZpcY9+OvsJjYyvWh3/Gk4ArkGdSqxqPybnMDvncI0HoS5bh
8uwm398I85vmJLikXOl7iILHZrmbY7WNSCDx+VqsA2PTLzdlNf7zJKgem+nq
4mTDvJpOrL8+RQLy/qGLhRJs2MmtaxX1h0ngUFB+3vkSG2ZZez9DgIMEJ6u8
9AZL2TCfvlPZaw6jgOslYTW32bEq0xPPx6RH4IC/8y0TBU6sMlnh43/EnzBB
TTTb9pELEyEvF8Y6DcG5Sbc7cb7cWP6eqq0d6gNwYSLmkIQED3Z6dfZ3+unv
MPPVIaSpcBtWqn+t6VBiLyjt7Bc/bbsdi+U85R482735f1Hthyl82JHHd2Fn
cBfozFnSZEz5sfjuK0Z1ch0w+MUJb6m4E1uctL/lnNwK5Q/rbaSoO7Hb6+Ka
aR7N4Mx5ndTRIYDZTVkIJWCN4OgXWM6bJIg9k2XNODs1wBGXQx0G9kKYU27H
3tj3X6FTQHHbdc1d2MViAUtjni/w4W1osiK7MKZvkMMRmVwHgXiFS22/hLHb
46/ys6xrgWf4tq5XmQgWGhYk59vxASazpYkvg3Zjk4XHa5VTq4Aov4ejynQP
JqLOKerrVQExSc6N9lKiWDgn0+Hv03KwJFp38P4RxR6Xjd0fHS0FunYW42Xt
Xqz3ZZsaovIOxidP3foSIYZZ1+rO2tcVQwaisrfdXhzbl/EhfyLjLRQ+uL7T
5bAE9j61QNFTqQAiTB312akSWH954YAKLQ82z1deRLskFrsa9PHElxx4fjC5
sF1fCrs5nn7IYiQLguuinutXSWEoW/bX/9Zew/m9plkt+6Qx68o+Y7PzGXDS
q/HyzkhpjNeu8Jjez1fwUsxhXxtVGmM5Showv6fBvq85CRcuy2ACSj+n5GxT
IObwF4WeWhkshJ24rWR/EjhTOLqbFWQxziClH4T5RHAoIUtFPpXFJO96jxzj
TgCPUGPWuVhZ7Ga4SIIgLgGuG5cN8D6TxTpvcp5focXDQ+r16JgEWSwxTKes
/k88vNVkMBNTZTFX/kd6DxrjgfF5oz87Xxb7tfD4BTEiHmJ6eKPqG2Uxvdxi
jYmt8ZD02tM1vFkWG+ZIqpFmi4fX/h2ndVtlsaAeZXGHVSK8F45Zbe2QxR6p
Kvn8myHCsKWga+93WaycnQxSbUSQG99zemxcFlOzOZqy8ykRlMtuS2ROymIP
iyU9gyKIcOLBT8aVP7JYmhgnz0wwEQzkUounZzb1Wj5/3e5DBD93KYmlJVks
zlxY870REYII9xjvKLKYfDXNQF2fCA+2j/X5U2WxqVPJ+z6cJsLzoteP6XRZ
7MWq0N5WVSJkhHC4VK/KYgKqY+rmh4mQb3jlVBBLFnPLtRWa2k+EMplv4ui6
LNbQFll0U4IItZQDjI0NWWz3DWtuXhEi/A9fkynO
"]]},
Annotation[#, "Charting`Private`Tag$207074#2"]& ],
TagBox[
{RGBColor[0.560181, 0.691569, 0.194885], AbsoluteThickness[1.6], Opacity[
1.], LineBox[CompressedData["
1:eJwVlnk0lP8Xx2eI7LIkJGuWsqS0WOZ57pMQERFCRLJHoQhFIus3QnayK0Qo
ZYkiElFkSwjZisk2DGNm8PP76573Off1Pu/7OZ9z7pWwv2niyIDD4brwONz/
69Mge+ajDv+hrBoks+df4lRbesUNLom7QoOJo0wut5faduv7UHFxfzBmHfJM
mA5Re9oYI8YkHgWRGVs535RS1NwRH491sTTwaA/dZPWuVOuluSQuiRWDxqNS
KltTr9ru4QnZebFa+PLnWcsDQ1b13C/ZXkSxdujte9FAqnRQf1keNeyuNARM
pHtRHxMFNZzhe9o/70mwsKEgC9G1GjemD01WvZwFrxIv+UZjU8L4lZ8sTe2z
YJP/y4z63pxwcTBS6evULHS/E55GfS0Jqh1//KeF5wBXpfFK8Y8tgbGycI9A
xBx4mhyyRVldCan3JNA7tkSghTCbff0aRGjiE0pT2zMP4vLFbB9VnxMebQwc
cbs3DzP2uTFqSq8I5mOJrel/5+EBLH++7lNP0OhZ4XktugBS6oL6m51NBPFP
JjYdpgtAvVPtaajVSmCqqSyajF4AJE9kYOFnB2GuZM8qrXEBZCKNO6vdvhOs
DzYKsYwsQOyRAO4zAb2Erqc3gX99Ae7yHigWbesnaO4TcxTnXYQDbTlD+ZcH
CVVx36IVFBfhGO6gMysyTJBlC6pQ1V0Ekjz1aaDPKCE9VHFA69oi+OkN1ebu
/k3g2ByhXQhahMCQmpBZtknCfd9HEjZpi9DS6bW2dW6aQFrUOOtatQgVcp+J
7F1/CA6uRHefrkUoag1a4smeI/yYSE94MLcIDzzdshlb5gnSStIjrQxL0Pkn
+s5S/hJhdI6+YLBnCaJW9rkS00mE1Od9+N4DS6DYmqxz9OsqwdihlN9Sfgki
1SVT60+vE9gkHsqOqS6B6+b8oCWOSmgjxB8J0l6C0iXtF/FDdEK4RdapAyZL
UKlwErVnwCFat19A/ZUdjdN9N9iMRxjias5evr4ET9tIkuFvGZHGF5+MqHeW
gH3k03jHGBMS9LnnUtrDJXhu/aEhV5sFIUyO2arGL0HW7mNazxbYEOrWP+cf
T5cghGbzT3mCE6kRpt70LVmCR93lEiqJexDfk7v99lYvQdHDBglZR17kuAl/
cFXzEmSYXY1Zc+FHSB4SkRe7l0DHYtj4SKEAUhGlFEcaWYLYGWcPqpgQcqNQ
IzV+dgn+LezqURjfjyg06eYory3BxFNNUat5UYQ4YlbUxbAMMo8Sy1dlJZAS
in3FDe5l6OmZYE1mkUJc+D1rOEWW4eVY1OC7A9KIjHJgY6ncMoQiv8niHrLI
lH50m/6JZVhIuMkmvnkIyXNO6Z47vQyawdcWW/oUELvQgsEow2XoUnywOkY7
gohmV47LXV4GPJ2aFdNwFBmpe//3s/MyaK8IqrO+VEHSBzqWnG4vQ6CgUOjb
vhOIBWmQwvRgGbbI3XmBp1QRAa4ZXGHMMpjdpZgRR9SRvkMrLFrpyzAvxNqt
2YkgCdo4nslny8DB+vBzWziGXLjKKRTyemeev2wvJkw1Ea5AYQmJxp1+XlVt
ezMtpDNV9lBj5zIMsoSlt8ToINFVx4/a/lyGkmm8v9guPUS3+7Ta1vQy3A54
yn3sgz7C/M/w9FPSMthsbBjfaTVEWnZb6xG2l8FP3VzxAI8xEiLlajzMTgKF
hcQHA/MmCAa+lgGCJIj+aHgneMsU2bIKvSokTYL6+abCJt1LSL1vnGvNURLY
5mV2/OqxRAISnnpdQnf4Iqfh1nxrRPVlif/aORLsu/Fm/EizLbLWXv0g6RIJ
fjY9p3RnXkWqpluijjuQoNfKp1Iv8hrije+J7/UkgZ2v7Ees2BFRPjCW5h1I
gm/T1Y/DmVyQBdV/uTzRJODnbGeJyXdDykw3iiuSSWCt5i3rH+2BuHsyvzLK
J0FXOZvC/queyOFHfHUL5SQQKOijfzrkjfx9Lv4xpp4Eu55/ShU+eBt51qz4
RaGdBNcZU4sDzXwRhzH1no5+EpSmB8bPNvshkrSzQ24TJFhYzMjd8rmLjAuY
TbAukmCOZM6z91YQknXMfq6IRoJrtz1vFf0ORqwNb5LOsqxAR4st40h1CCLs
do86w78CxvvGTaSbHiKDYVEM4RIrILc/+wg3YwSSnJvMJq20AkzW1iLvQ6MQ
04Z83hb1FdAVbV/GnXuE8P6sEL52dodv1Na/ZvMY6V5tkGQwXYF1iUcU8Wvx
SOyejsO5djt+vRHvlnSeILWnDrwxvLECFMK8bm1sEjJ15SbQ766ABx2NvLM/
FdkT3tReHLUCp23mB86T0xGNMj7TSykrYKto+vOidBbi1Oc4uqtwBcxu85X8
HMpBEmjVLq9erYC8c8HxqcE8pEGSbcW2cYeXmvkmyVeI/NWzDuT8tgJFd2w5
X8Y9R/i9Xu5+N7wCEyLDF29bliCQiktwmV2BkCrfNRPfMsTtg4mIwPoKTP76
IZPmV4EkzxQ8a961CpKeq9EJbq+QJs51ZS/eVViwzHqvnVKF/Duu905UfBXG
gvCyT5mqEUHrDO1OxVVIo7ywuNhQi5wJne/y11gFqkdFFPvneuRGCVjJ6q3C
KfN2z5MCjUj69/ipPvNV6MZuB4nTm5BPlMkbIQ6r8InPhEF/fwuyJHZy44j3
KhRHCNt7B7QiImcjQ3/dX4XDJ4UyDki0I2dvDHH+F7MK70eymd/u60S8kxRS
VTNWIYkV+ZPr3IVk1QdJzhStQk8CO2tlzHekfbK79MnbVVh3aIm0zO5FVtmk
Tp1u2ckXGMhvudiPiB/zaVr4vgrOAtyXGMMGEX3Lz/qZY6tQ1ZgqEukyjPgG
Cw3oza9C1+MkUc78USTv+XW7deoO33TFzVHsN/L1W8NcAQsZjmoHmyRLTSIU
MrePiQAZAmRrrgc4TCNSB+y3t6XIwJJmYXts9g9iqFUVVXaUDNd0zNuraueQ
gOvM/JeBDAo/V7T+jM4jhQkWWSznyfDXMk7FpnIJ6a4tkXtrRYaTbrvvHywi
IfRx+qtrLmQ4HjF8d/PnKiLLYoTw+JJBfeuY0sD5dcTkSO7n96FkuHoq/ro7
OxUJMl8xdo8nw+fg9UNO+zeR4kDtEaFsMoTvXjJ5ewaH9hWkOH0uJUP5a6Kl
tCIDiuucXbpdR4a8JHnD3Rd2ofIrGncl28iwd6aFvO81M2ouHMvU3U8Gw0if
/hEbVjTk9PjjwEkyBLWrtdRbcKBlLseE5ZfJYLNLDoTLuNHBxw8LBrfIcHu0
y7nmFQ+6q3pAKZxjDTIyXi3WtfKhR0blalWE10B65naFqJAAasV098xv2TX4
nki6crRSEA1X+Po19sQazPv0ae9P2Y9WXhSzIJxZA8kfr9spvaLoSIDXxOyF
NagXMLhFU5VAWfKa3VOurAFFv+q+GiqFqrTvXddyX4Pz0vuPcgdLo1eWnB+Q
/NeAeX18PYFJDo3eV8eeE7EGEUw1yuUDh9E3KEfy+aQ1cM1OGVanK6LjjlfE
aXlrgI97lcbWqIxyxFSUFFWsAaMCHcl7eww9VcVwwvz9Gtj8YFHh+HsctR82
/cDYuQaem+tqcpdPoWwZvz28fq6BwdjiOTk2dfSV1Q2RsZk1kPEp0KbuRlAr
YdoXg9U1wKnrjvUoYSjjUIR/HX4dNgeZrJ6yaaKlafxyctzr8LglfnxdRAs1
tcwdSBJZB8XtrXEJdx2ULqgUxnh4HSpf8Tzn2dZFCwbrVLxOrcNdATVC1C99
1CD17MSo1joc/Z1WpLjHCF291BdnYLIOh65qeFy4YIxm7rsKdbbrwDYYj3UZ
XES1f8zPy3qsg7V5nWBsqBm6kByQmRSwDsI3y9JO0i6hyea79Rkj12GfeM7R
E++sUFQgccMzaR0uu00bdnXYoDP94kWjeesgthDFJZphh8YmlZkbVKxDlvR9
VrsQe/SkmTpTXcM6OJa//u6Y64CO8n9+LduxDjhS95vYLSc0ou+ifdLgOhQ1
9kqu5riiyonjexhn1uG3peWPoDh3dPCixwfPlXUw3BAJ3uq/iQbzUT1GcRS4
HDSMz2vwQuV6w0UMuCgQ97zLMfvTLbQ7ga+jdj8FZN4UVnCx+qJ+Jjn+soco
oHGFfbwm1g8V51WUSzpJAb2PHZMKV+6i7d9rBxi0KLB4REhq4H4Q6h2vE+Zp
vNM/fbEteisYFTbuVRm9QgH2DGKH0lII+nGP3YS+OwWUT7SlFwmHoW7d/+Jq
/SlQYX3d4NbDCJQ3zh9kIyiw9bp2sPV4NFpnxLyQmEiBGVnrx2UqMag995NM
hjwKsPkabnNqx6HsXWL6nuUUqDqp1MYkkYBWxZZu/KqnQO3s0F4DlUTU2lCt
SP8LBSQ0ndL2hCSju7hazWt/UMDsOLfYKf40tPSrCZPsNAVc5YZx7ssZqGnM
2OtEEgV8/a7PqUtmo3QD952zcwNE9ZIE+S1y0QKOjT2enBvg1v0hbMYkHz3f
Gfbhl/AGVAzxBt6NKETX/uO9oS+3AY90eO0c6c/RLP1skdoTG3DHVKGIXFOC
6rArdMic2YAzV6PjTT6VoQtfavwTL2yAjVNf5tmkCjQ5WluO4coGxLBfIFzz
f4Wi53oGbl7fAKtxRvvMxCp0htU27JffBoTtzak9Of8WfdxOVNEP34CmOrdJ
+ehaVDXKb6LmyQYo2v/gxm7Vo+O6TPEyuTv+NYLJopUf0EiWBEh8uQHNvbjF
5mdNqHKb6AK+fgN4EM3AvOJmdDDiRebN9g2QjtLZK//nExp8VlX/18AGKDkH
jXA4taFyuz9tnJvagEuhFou1ih1od6txUc3yBtTvmUwJ1PmG+oWPmstsb4BY
j0z4l5FuVFznOlMiBxV4ix7dL2zrQduYKK/xwlSwd0o+9N+/PtTr00P7m7JU
QJ+Vy44a/kBFp3SY11So8Mxm+3hV60+0g4G15B5GhRH/QZrXgxHUT6LjPON5
KoTZfD+gGD6GSmMxy1GWO3zt7nybG7/RnitGSXucqPDWRR0mdSbR+4E8aine
VEhhmO/3Mp5GFTJ7Rw7cp8LvzZ43Zk/+oD/rkoIL/qMC89ucdjfeOTT856WD
8qlU8Aq26pTv/4eqUITaKguoEM/0TKh5YhEdFxi5rlpJBZXlobzY3GU05kQW
94cGKrwvezAQdH8FVTe1e639hQqc++JT2eLI6B9vyUudA1TwOfLtZczgOpoY
P0U1maRC6a8tYfIVKnq64lnWz0Uq7Dv7KODboU104ZuLph2dCo5C50IVxHGQ
MX94ZoaFBpa7VZUN+vGgyzEf5bGXBivtL8uqahiBfLhccVWCBqw1/90z6GKC
PD2v7wFKNDjg5j4XJMoCRi4qPngNGqQPaoudK2UDejhZMPIsDfadd35ueJ8T
igur67lMadAfyWrsabQHzFv87ZLsaFBvEWkXw8oLjJMau0Q8aDDULFXoT+KD
CvzW8zx/GtSQO4oOcQuAjXij/qFwGqhKeKgIOgoCG4QslifQoHpYKNCUKgzV
NlpPTmbv+HcujsX3HwCHe8ynGl7QYHiUI03kvjjwZLQNnamhQZe1NhVBJeF9
bXTQlxbaztxDzVUKB+H6oIGk8Xca8FwwNQw1kgHBda7WH79ogEnqP1YplYNP
e7+7Xpnb0V6Pr0/ryoP38Sec02s0GMlE/ruioARiF80qrzPS4YUTzz/OcmXo
9NpnRuKmw7GUANdjt46Bf9xPip8IHSQVCH7KzsdBpjwjc1uODput5un74k5C
71cbLPwEHRwKhqSCV1Qh+J/YFIcmHWwes+enpWiAIvtExBNDOgwecfyiHorC
0KECeeHLdCiylAvZGMUgQtepK8eZDuSjCgtcRZpw3FnuluxtOjzd3j55L1cL
fofNCbwMpsMhPf4I624diC0orTseQ4e4uqgqU3U90Gi+ceVdGh0IHtYludP6
8Pe3MoPmMzo8FM41lPtpCEm4lcK2V3TwDGAKP8NlDJpib/SMPtBh7r/Tifwj
JrCI3Jnv76DDifNq7C+HTCHTWi3eepAOPXPgr8J9CfTu0o5PTtFhwHHlqMl9
S1hLaxh0XaZDnaVEjNFRa8ivuX9vaZMOq6q6iYIKtnDhx2nxO2yb4OKSmlOs
cRU2yYwtmwKboKriXFvDeQ1K+FudH0ptgulBxfGJPY5wSSWSnV15Ezwe1xw+
f84ZdpmcK48nbEI1swND4QdXqPTkuCiotwnL72bGFe+4Q2c6n3+Z+SZ8u9Z+
jFB/E2ZahLM1HTYBJ54U8KDCC3CLEp9+eG2CVqNdnULNLRAWOkR0v78JXvWZ
dtI0Hzh+RpmHIWYTNJhHhPYH+4GRx6lTKembcEn+SLC/4V1wS0FtFIo24dRZ
lgd3bwTBwybt0KY3m7D3wF/1nNVgyCIaFJs3b8Ix/5Jgr6kQqNlr2kXs3oTT
oyljuhxh0AOXycGjm/CYMWna1DsC5l3t9wv82wSR1aBY1wPRwJLoevrFxib0
YNsXuffGgOR7T2ds9xa8/24f0a4cB4S/d2L6+bfAo2NDh505Acx57792k9yC
AO09oxe4E8GTEP5z+8gWZA3ZcAibJEO0U8x2IrKjwwRFrvelQkFcovRh/S1g
09H37s/MgA91GfofLLYgUbiw7P6rLBiayvMyddoC2ZtWwclcubDKVZIye2sL
HrvoV+SS8oBLrbIh6MEWdJoiTH9ZC0HuWs0k3+Mt4HIrmtKyfA6aMR9YizO3
gGdo7uDf6WKwrm49gpZsgVFjwI+Lb0rB9/dXs97qLZieQt5f+loO8ez9d10+
bQGnNSt5V3ollJ4Yyd3s2YJSL3barzuvodV28nPC+BY4CvrK+Ia+gfGouXnZ
hS1welXqLdRYDdTXy3wNtC0QO+7oy3+0DvhHKWomrNuwLf7Cp/BnPSix4Oz+
CGxD21Zi5Fz9B9A9tjv83sFt2Os94jBzowmuWXOV8hzbBhyHhcltsWYICt/b
8wy2QfGJT6vacgukVohQNM5vg3tHXhf3dCt07pLXcnLZhnDVd6YVxztgRumY
G81nG8pekRlt474CzlItLi50G86YbsdOM3fDibKzI3VZ21DgrCuyv6oHsswc
bnP3b8NiXvyJ0yWDUHP/enrBxDY0TShGNCJD0Fvs3ai2tA0RfH6rMf3DsOs+
xvyKCYfVuOXg2VjGgIdfK+0eBw778SQoqstwHESLzyqc5cNhx3P6LaoFfoNq
r6HJiDgOK8vz10HTJkDbxWT6mSwO66nBX+owngSTTTM/LyUctmTO9fgy4xS4
y9pkMRNw2C+qe1yX4TT419sd/a6Jwwb0h+Te/JmGcGOHlgw9HFaCWKTk3JmB
3LvX55Qv4bDitPwUrnt/QLmRlRJhg8NiLx/4JzP7Bxp3FTGNXcNhDZThBn/D
v3BBT4fvpBsOC+X/yKhe+hfGY6bEYzxxWGPNdbvnDLPg2ROiNOWLw1RDLR+w
m8zCtoAEQSMQh9lfXi2pTp+F2Msf9BJCcRjXx5F7DL9mQTTH5tJsFA5rK3cg
awvNwcspmgMWh8NWu45W/zKaA+RQundKMg7LLJyJk34wB50eqsELmTiMpeWC
ll/ZHFi/GojRzsdhV6/ORir1z8G/tdsZmcU4bNDWRiuLMgd3NfiKV8p3eEfV
FSFBIrAFV7499xaH+eunaSypECG9xagltx6HGVr8y79uQITDrAvfKR9xGFvi
inPPVSLUnn80ZtSOwzKe9jk53SaCbsLh+WddOGycw1na8SERBgfaqJv9OOzM
vv/GdycQwWW/M4vZyA7v/etF6FMirNsyCZRO4DBTm8I01udECC/Il2KcxWG0
OxazrS+JIDB7+qjV4s57Hw1Vn64iwjPFcbSSjMM2DfU/RtcS4YR3kAELfce/
e3/IUD0RWt6KWNky4LE3dPOg1fdEMKXVOb9lwWPMmOIq+QMRpsDSh5Mbjz3r
W4jZ2NG3Hq6HOOzFY4Ii1kn7djRDe1Lcu/14TEksS8qpgQgJnMezeCXxGI9o
ueFGHREkTXpeuMrhsTF7PtPJaiJUJnvWNirhMYui/sbjO/mwYa7P+07gsWNK
7cn0ciJ0i5X13dDAY+Q20Zu6L4hg56A/8ek0HnsaZJ9+8BkRFotmF0V08ZiL
1CaSmUMErmMy7B2meOw29zeDsEQiZPm2CEpexmO6fz35WWKJoPjOXsb/Kh57
fpKsqhdBBAOt7NOyN3b8NGWGxf2JEG0u6BcagcckllNF662IIJzxNmwoBo8t
1uyr+GpChOIx0ydHE/FYG8stnZZzRGhziX85loPHSsL2cbirE4H5Ltu0Rh0e
i9D5S/+z8x9CsunGq//w2Dvb73u3e+fggnKNl/wKHmupOnTZt2MORJtuxdtv
7OQVUWMmfpyDuom57m4mBqx8TjTzW+UckKR/GpWJMmCBYa6x0Y/nwL70zXmn
CwyYvMzLWQH9OThde0Nv8DUDVnXsY3lY8yzgesex+gBGDDu/32j53V+Que3k
Z3qYCePExAzu5c/AFDnFnL2BGduiHqRt/piCc9NugQleLNioPs8EhWsSDKfi
5EVF2TDNZ/8NON/+DXPN9sFtZeyY0eEfuCr+cVDiGThwxpYTS5U/+HXR/dfO
/UW+OrLChXEVm91j2DsMZ+et1iXN9mCrJ31xHxsHYfCjA95KgQejJhyO1Cke
gDeRLVfEyTxYYlSfXdpoHzgx+Yx/+8aLaXUfUFYS6IVr3nffcKTzYaemDKnn
H3+HI87y3wyu8mMX62S9/JW6oYtXgd1HbS+Gk7n89s/Tr/DuZUiGAqMAtlzq
8P39mQ64iz98ofOXAKYZoxC7/a8N2EYCdG9U7cPmlNuMFXpbYfqZRGL2PUEM
57CN+TF/gkQ5oV21ZkJYhRfX4R6NZohLd/p8VVwYu7h1Wn7X6yawSrT5xvFH
GDMSd/C+eqERKFqFG9nv92OZFptCX341wOS0pt/HCBGsiMHyOyH4HeQhR/d/
vXoAc60Oah6QroWyMB8eZ0VR7Ok36TNrEtUQYXZNn5Esitm6WERbXngDO+ur
OOKrGKbJly2UFvwaUg9llH3VF8eaIikBziuVcL8xJlW/Vhz7Lia8luBSAef3
mxV+OSiB+QsdZiWyv4TTNz5f5omSwOrlh4udS19Atoj9wU6yBNbLWG7ValQM
B5ufJxtelsS6mhwPruk9hzjFj4d73ktidu2dug99C8FpZdf39sNSGIbaTdYU
5IN9JUk86rEUdnCcnv9xbx64h1ykn4uXwmRCHdn2ceeBz8WqHxxPpDASb/aM
B0seRJJ9YuOSpbAQsSm6JC0XXqpt0FKeSmF8r+0jSsZzYaNpe+DZCykM71R+
Tqk0F+J6OGJaPkthOXrNRgzauZCe7+ES3i6F9ablVuWjuZB/+9sZ3Q4prAVP
9D6rmgtvBeKoHd+kMB4JXUqSfC6MWPG59PZLYdpv6ZxGvLkgOyl0ZmJSCkv7
MVGgPJ4DylUBogXTUtgp2cNq6z9zQD1seMPxjxTmGiwt1NibAwayTytm56Sw
3/H9NRafc8D7urjo8rIUJuDnb1v4MgfuER5svFqRwoQON6gFFeVAGOdE323y
Tt6QdQvLvBxILc//j0KRwtit1u0FknMgL3iXcx1VChs/xWNAeZwDL4wdNe/R
pbBB/y++I1E5UCXZegDdksLM+A0nPobmwPsVmY3tbSnM9tznmBeBOfA/uWb5
CQ==
"]]},
Annotation[#, "Charting`Private`Tag$207074#3"]& ]}, {}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->{True, True},
AxesLabel->{None, None},
AxesOrigin->{0, 0},
DisplayFunction->Identity,
Frame->{{False, False}, {False, False}},
FrameLabel->{{None, None}, {None, None}},
FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
GridLines->{None, None},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImagePadding->All,
Method->{
"DefaultBoundaryStyle" -> Automatic,
"DefaultGraphicsInteraction" -> {
"Version" -> 1.2, "TrackMousePosition" -> {True, False},
"Effects" -> {
"Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
"Droplines" -> {
"freeformCursorMode" -> True,
"placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" ->
AbsolutePointSize[6], "ScalingFunctions" -> None,
"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Identity[#]& )[
Part[#, 1]],
(Identity[#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Identity[#]& )[
Part[#, 1]],
(Identity[#]& )[
Part[#, 2]]}& )}},
PlotRange->{{0, 10}, {0., 0.8671844265105804}},
PlotRangeClipping->True,
PlotRangePadding->{{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.05],
Scaled[0.05]}},
Ticks->{Automatic, Automatic}]], "Output",
CellChangeTimes->{{3.883711540624555*^9, 3.883711558125278*^9}, {
3.883711589840274*^9, 3.883711704193864*^9}, 3.883711754551626*^9},
CellLabel->
"Out[146]=",ExpressionUUID->"92159f77-a171-49e9-8154-ba6d4ec1546e"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"NIntegrate", "[",
RowBox[{
SuperscriptBox[
RowBox[{"PsiRFinal", "[", "r", "]"}], "2"], ",",
RowBox[{"{",
RowBox[{"r", ",", "0", ",", "Infinity"}], "}"}]}], "]"}]], "Input",
CellChangeTimes->{{3.8837117234318132`*^9, 3.8837117404890823`*^9}},
CellLabel->
"In[147]:=",ExpressionUUID->"0b494c25-4f1d-46c2-9745-2fb9459915aa"],
Cell[BoxData["0.9999831996289966`"], "Output",
CellChangeTimes->{{3.883711742214231*^9, 3.883711756640143*^9}},
CellLabel->
"Out[147]=",ExpressionUUID->"516aa39d-6f97-43bc-9da5-ff695380bb06"]
}, Open ]], }, Open ]],
Cell[BoxData[ Cell[BoxData[
...@@ -12104,101 +13398,121 @@ Cell[CellGroupData[{ ...@@ -12104,101 +13398,121 @@ Cell[CellGroupData[{
Cell[36921, 803, 1356, 40, 111, "Input",ExpressionUUID->"c32958ba-7ddc-4867-b2dd-1fa3dd43d8ea"], Cell[36921, 803, 1356, 40, 111, "Input",ExpressionUUID->"c32958ba-7ddc-4867-b2dd-1fa3dd43d8ea"],
Cell[38280, 845, 764, 11, 37, "Output",ExpressionUUID->"46930625-8230-46b1-8041-0f079ab1abff"] Cell[38280, 845, 764, 11, 37, "Output",ExpressionUUID->"46930625-8230-46b1-8041-0f079ab1abff"]
}, Open ]], }, Open ]],
Cell[39059, 859, 1185, 32, 58, "Input",ExpressionUUID->"75241ed7-817c-4778-b63c-fc8ddf258a79"], Cell[39059, 859, 1189, 33, 58, "Input",ExpressionUUID->"75241ed7-817c-4778-b63c-fc8ddf258a79"],
Cell[CellGroupData[{
Cell[40273, 896, 393, 9, 33, "Input",ExpressionUUID->"0c53d04a-d321-40e7-bd01-78ab6fb12897"],
Cell[40669, 907, 6564, 127, 260, "Output",ExpressionUUID->"f8bc259c-c763-4a41-9189-e56cd9ffa662"]
}, Open ]],
Cell[CellGroupData[{
Cell[47270, 1039, 1329, 32, 109, "Input",ExpressionUUID->"a7903930-b537-4744-afa4-508c0f6775c1"],
Cell[48602, 1073, 21918, 380, 260, "Output",ExpressionUUID->"662da529-ccde-4355-a170-93e4672068f3"]
}, Open ]],
Cell[CellGroupData[{
Cell[70557, 1458, 1193, 28, 80, "Input",ExpressionUUID->"41107c73-e600-4079-9938-9536a9f8a8eb"],
Cell[71753, 1488, 16207, 288, 260, "Output",ExpressionUUID->"c5b1cf7f-6333-41cb-ac14-ed7aae94240b"]
}, Open ]],
Cell[CellGroupData[{
Cell[87997, 1781, 1204, 29, 59, "Input",ExpressionUUID->"ad62482c-1e7f-4a85-9ecd-12674e160662"],
Cell[89204, 1812, 368, 7, 37, "Output",ExpressionUUID->"00db2c76-8892-4942-8216-daa907d48257"]
}, Open ]],
Cell[CellGroupData[{
Cell[89609, 1824, 921, 26, 80, "Input",ExpressionUUID->"23895096-ea28-4995-8fa0-463fe03d27af"],
Cell[90533, 1852, 26190, 453, 260, "Output",ExpressionUUID->"92159f77-a171-49e9-8154-ba6d4ec1546e"]
}, Open ]],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[40269, 895, 389, 8, 33, "Input",ExpressionUUID->"0c53d04a-d321-40e7-bd01-78ab6fb12897"], Cell[116760, 2310, 368, 9, 35, "Input",ExpressionUUID->"0b494c25-4f1d-46c2-9745-2fb9459915aa"],
Cell[40661, 905, 6533, 125, 260, "Output",ExpressionUUID->"723f7564-46df-4d91-a314-d091c33004f7"] Cell[117131, 2321, 195, 3, 37, "Output",ExpressionUUID->"516aa39d-6f97-43bc-9da5-ff695380bb06"]
}, Open ]], }, Open ]],
Cell[47209, 1033, 6880, 197, 339, "Input",ExpressionUUID->"2d742f3b-e2e0-47c6-baf7-86eb7d257d8e"], Cell[117341, 2327, 6880, 197, 339, "Input",ExpressionUUID->"2d742f3b-e2e0-47c6-baf7-86eb7d257d8e"],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[54114, 1234, 888, 20, 37, "Input",ExpressionUUID->"745956bd-cee1-4b9e-be2b-5f3aa5cbb78f"], Cell[124246, 2528, 888, 20, 37, "Input",ExpressionUUID->"745956bd-cee1-4b9e-be2b-5f3aa5cbb78f"],
Cell[55005, 1256, 698, 9, 37, "Output",ExpressionUUID->"bc3623ef-3a74-472b-8633-2951421e87ec"] Cell[125137, 2550, 698, 9, 37, "Output",ExpressionUUID->"bc3623ef-3a74-472b-8633-2951421e87ec"]
}, Open ]], }, Open ]],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[55740, 1270, 1003, 18, 50, "Input",ExpressionUUID->"84ddf410-1206-4db4-8163-fea78d05a9fa"], Cell[125872, 2564, 1003, 18, 50, "Input",ExpressionUUID->"84ddf410-1206-4db4-8163-fea78d05a9fa"],
Cell[56746, 1290, 5448, 107, 265, "Output",ExpressionUUID->"90799b5b-4c47-4e52-915f-aa08eeb2fb0b"] Cell[126878, 2584, 5448, 107, 265, "Output",ExpressionUUID->"90799b5b-4c47-4e52-915f-aa08eeb2fb0b"]
}, Open ]], }, Open ]],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[62231, 1402, 2494, 74, 125, "Input",ExpressionUUID->"dbfa69a4-38ff-4a4c-96a5-19b8ca17951b"], Cell[132363, 2696, 2494, 74, 125, "Input",ExpressionUUID->"dbfa69a4-38ff-4a4c-96a5-19b8ca17951b"],
Cell[64728, 1478, 397, 5, 37, "Output",ExpressionUUID->"e21f76bf-f041-49b1-9046-4325f36ed8c9"] Cell[134860, 2772, 397, 5, 37, "Output",ExpressionUUID->"e21f76bf-f041-49b1-9046-4325f36ed8c9"]
}, Open ]], }, Open ]],
Cell[65140, 1486, 867, 18, 33, "Input",ExpressionUUID->"93967aaa-fb32-46f7-b27c-892da0b16278"], Cell[135272, 2780, 867, 18, 33, "Input",ExpressionUUID->"93967aaa-fb32-46f7-b27c-892da0b16278"],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[66032, 1508, 472, 9, 33, "Input",ExpressionUUID->"fd99e280-b87a-49dd-a288-5fe39a52e19d"], Cell[136164, 2802, 472, 9, 33, "Input",ExpressionUUID->"fd99e280-b87a-49dd-a288-5fe39a52e19d"],
Cell[66507, 1519, 673, 11, 37, "Output",ExpressionUUID->"0be22246-4c49-4edc-a6d1-22db6204debd"] Cell[136639, 2813, 673, 11, 37, "Output",ExpressionUUID->"0be22246-4c49-4edc-a6d1-22db6204debd"]
}, Open ]], }, Open ]],
Cell[67195, 1533, 509, 10, 33, "Input",ExpressionUUID->"79a457e4-2694-4aff-b91a-36c1c1457a0a"], Cell[137327, 2827, 509, 10, 33, "Input",ExpressionUUID->"79a457e4-2694-4aff-b91a-36c1c1457a0a"],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[67729, 1547, 885, 23, 33, "Input",ExpressionUUID->"21c7637c-3a09-41a5-b3ab-b8f8756d6a35"], Cell[137861, 2841, 885, 23, 33, "Input",ExpressionUUID->"21c7637c-3a09-41a5-b3ab-b8f8756d6a35"],
Cell[68617, 1572, 900, 23, 57, "Output",ExpressionUUID->"9e31ccf3-5b9e-443e-a3ed-fb88ce9cf2ff"] Cell[138749, 2866, 900, 23, 57, "Output",ExpressionUUID->"9e31ccf3-5b9e-443e-a3ed-fb88ce9cf2ff"]
}, Open ]], }, Open ]],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[69554, 1600, 671, 17, 33, "Input",ExpressionUUID->"2a836ba1-d54a-4276-b9f3-4a104a1093f6"], Cell[139686, 2894, 671, 17, 33, "Input",ExpressionUUID->"2a836ba1-d54a-4276-b9f3-4a104a1093f6"],
Cell[70228, 1619, 855, 21, 55, "Output",ExpressionUUID->"122bd602-c807-4e8a-be34-fe3a8e9f1eb9"] Cell[140360, 2913, 855, 21, 55, "Output",ExpressionUUID->"122bd602-c807-4e8a-be34-fe3a8e9f1eb9"]
}, Open ]], }, Open ]],
Cell[71098, 1643, 5560, 149, 179, "Input",ExpressionUUID->"3dbd2157-139e-479f-a496-5c8a60d09330"], Cell[141230, 2937, 5560, 149, 179, "Input",ExpressionUUID->"3dbd2157-139e-479f-a496-5c8a60d09330"],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[76683, 1796, 1781, 53, 108, "Input",ExpressionUUID->"b024508b-6d27-4ffa-ab07-de4ed8a4b834"], Cell[146815, 3090, 1781, 53, 108, "Input",ExpressionUUID->"b024508b-6d27-4ffa-ab07-de4ed8a4b834"],
Cell[78467, 1851, 350, 5, 37, "Output",ExpressionUUID->"45acb2ca-0b4f-48db-89cb-740fb77a8d40"] Cell[148599, 3145, 350, 5, 37, "Output",ExpressionUUID->"45acb2ca-0b4f-48db-89cb-740fb77a8d40"]
}, Open ]], }, Open ]],
Cell[78832, 1859, 81, 0, 33, "Input",ExpressionUUID->"bf441233-f9c9-4a42-9b46-8f57bbd8708a"], Cell[148964, 3153, 81, 0, 33, "Input",ExpressionUUID->"bf441233-f9c9-4a42-9b46-8f57bbd8708a"],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[78938, 1863, 599, 11, 33, "Input",ExpressionUUID->"5f437c91-8022-415a-8eed-7828551b0fce"], Cell[149070, 3157, 599, 11, 33, "Input",ExpressionUUID->"5f437c91-8022-415a-8eed-7828551b0fce"],
Cell[79540, 1876, 5767, 112, 385, "Output",ExpressionUUID->"bf8e3471-9d35-4c3d-a3cd-4d07e9c7f911"] Cell[149672, 3170, 5767, 112, 385, "Output",ExpressionUUID->"bf8e3471-9d35-4c3d-a3cd-4d07e9c7f911"]
}, Open ]], }, Open ]],
Cell[85322, 1991, 388, 8, 33, "Input",ExpressionUUID->"5afa8d22-b29c-4441-90a8-81bd28869b4d"], Cell[155454, 3285, 388, 8, 33, "Input",ExpressionUUID->"5afa8d22-b29c-4441-90a8-81bd28869b4d"],
Cell[85713, 2001, 4210, 114, 363, "Input",ExpressionUUID->"61d6b91a-da6f-40e2-b99d-e31866f61d8d"], Cell[155845, 3295, 4210, 114, 363, "Input",ExpressionUUID->"61d6b91a-da6f-40e2-b99d-e31866f61d8d"],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[89948, 2119, 729, 15, 35, "Input",ExpressionUUID->"73fcd4a8-f07c-4668-a074-8d6edd4e9c5c"], Cell[160080, 3413, 729, 15, 35, "Input",ExpressionUUID->"73fcd4a8-f07c-4668-a074-8d6edd4e9c5c"],
Cell[90680, 2136, 992, 14, 37, "Output",ExpressionUUID->"51f45d46-f633-45ed-b517-acaf1b06babd"] Cell[160812, 3430, 992, 14, 37, "Output",ExpressionUUID->"51f45d46-f633-45ed-b517-acaf1b06babd"]
}, Open ]], }, Open ]],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[91709, 2155, 836, 15, 57, "Input",ExpressionUUID->"4207567b-0a7c-4cc5-81be-75f2e42df3dc"], Cell[161841, 3449, 836, 15, 57, "Input",ExpressionUUID->"4207567b-0a7c-4cc5-81be-75f2e42df3dc"],
Cell[92548, 2172, 19587, 338, 263, "Output",ExpressionUUID->"8645ecbc-c383-4c87-81f9-da1c290588ac"] Cell[162680, 3466, 19587, 338, 263, "Output",ExpressionUUID->"8645ecbc-c383-4c87-81f9-da1c290588ac"]
}, Open ]], }, Open ]],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[112172, 2515, 328, 7, 33, "Input",ExpressionUUID->"cee43495-67e9-47c2-94dc-2d657d1fab18"], Cell[182304, 3809, 328, 7, 33, "Input",ExpressionUUID->"cee43495-67e9-47c2-94dc-2d657d1fab18"],
Cell[112503, 2524, 408, 6, 37, "Output",ExpressionUUID->"fbf341dc-1e87-4531-86cf-07f1caa7ef57"] Cell[182635, 3818, 408, 6, 37, "Output",ExpressionUUID->"fbf341dc-1e87-4531-86cf-07f1caa7ef57"]
}, Open ]], }, Open ]],
Cell[112926, 2533, 1886, 60, 79, "Input",ExpressionUUID->"f7780dc9-ccdb-4a12-879b-505da55785a3"], Cell[183058, 3827, 1886, 60, 79, "Input",ExpressionUUID->"f7780dc9-ccdb-4a12-879b-505da55785a3"],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[114837, 2597, 375, 8, 33, "Input",ExpressionUUID->"8bb8b6c3-f74e-4505-9b6f-d5978af920f2"], Cell[184969, 3891, 375, 8, 33, "Input",ExpressionUUID->"8bb8b6c3-f74e-4505-9b6f-d5978af920f2"],
Cell[115215, 2607, 5035, 101, 250, "Output",ExpressionUUID->"878fed8f-9804-4113-a405-c0e976757449"] Cell[185347, 3901, 5035, 101, 250, "Output",ExpressionUUID->"878fed8f-9804-4113-a405-c0e976757449"]
}, Open ]], }, Open ]],
Cell[120265, 2711, 292, 7, 33, "Input",ExpressionUUID->"c6deb938-a60b-48ff-8b90-a74d7ae9e157"], Cell[190397, 4005, 292, 7, 33, "Input",ExpressionUUID->"c6deb938-a60b-48ff-8b90-a74d7ae9e157"],
Cell[120560, 2720, 764, 15, 50, "Input",ExpressionUUID->"6753751b-a669-450c-821a-0e2864446c1a"], Cell[190692, 4014, 764, 15, 50, "Input",ExpressionUUID->"6753751b-a669-450c-821a-0e2864446c1a"],
Cell[121327, 2737, 307, 8, 33, "Input",ExpressionUUID->"dc4db538-b681-426a-acc4-ce255c7c1d15"], Cell[191459, 4031, 307, 8, 33, "Input",ExpressionUUID->"dc4db538-b681-426a-acc4-ce255c7c1d15"],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[121659, 2749, 1082, 21, 35, "Input",ExpressionUUID->"c96e0fd9-189c-4e48-b6f8-cbbdb9d07d41"], Cell[191791, 4043, 1082, 21, 35, "Input",ExpressionUUID->"c96e0fd9-189c-4e48-b6f8-cbbdb9d07d41"],
Cell[122744, 2772, 109016, 1826, 408, "Output",ExpressionUUID->"c9538452-fa75-430e-9799-841b76d6668e"] Cell[192876, 4066, 109016, 1826, 408, "Output",ExpressionUUID->"c9538452-fa75-430e-9799-841b76d6668e"]
}, Open ]], }, Open ]],
Cell[231775, 4601, 5727, 145, 555, "Input",ExpressionUUID->"e57ddf1c-67e2-47a7-9bb7-4c7dc728e854"], Cell[301907, 5895, 5727, 145, 555, "Input",ExpressionUUID->"e57ddf1c-67e2-47a7-9bb7-4c7dc728e854"],
Cell[237505, 4748, 2314, 50, 79, "Input",ExpressionUUID->"7d563751-9dd5-4e27-9845-46f525c48682"], Cell[307637, 6042, 2314, 50, 79, "Input",ExpressionUUID->"7d563751-9dd5-4e27-9845-46f525c48682"],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[239844, 4802, 2125, 41, 79, "Input",ExpressionUUID->"b0bf33f5-97ee-414f-b509-6dfa628674e2"], Cell[309976, 6096, 2125, 41, 79, "Input",ExpressionUUID->"b0bf33f5-97ee-414f-b509-6dfa628674e2"],
Cell[241972, 4845, 95829, 1660, 415, "Output",ExpressionUUID->"b1616405-5790-442d-b45c-9193559498c7"] Cell[312104, 6139, 95829, 1660, 415, "Output",ExpressionUUID->"b1616405-5790-442d-b45c-9193559498c7"]
}, Open ]], }, Open ]],
Cell[337816, 6508, 202, 4, 33, "Input",ExpressionUUID->"50a3db6b-50c1-4c63-a4b6-e0a5ab5b7a7c"], Cell[407948, 7802, 202, 4, 33, "Input",ExpressionUUID->"50a3db6b-50c1-4c63-a4b6-e0a5ab5b7a7c"],
Cell[338021, 6514, 175, 3, 33, "Input",ExpressionUUID->"dff4e73c-d943-4bce-be13-4ae53336a3d3"], Cell[408153, 7808, 175, 3, 33, "Input",ExpressionUUID->"dff4e73c-d943-4bce-be13-4ae53336a3d3"],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[338221, 6521, 964, 21, 50, "Input",ExpressionUUID->"c36da682-78eb-4479-a88a-6d8ffe69fdb8"], Cell[408353, 7815, 964, 21, 50, "Input",ExpressionUUID->"c36da682-78eb-4479-a88a-6d8ffe69fdb8"],
Cell[339188, 6544, 118916, 1980, 409, "Output",ExpressionUUID->"5d6b7975-54f9-4f76-9afe-74ad694852e3"] Cell[409320, 7838, 118916, 1980, 409, "Output",ExpressionUUID->"5d6b7975-54f9-4f76-9afe-74ad694852e3"]
}, Open ]], }, Open ]],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[458141, 8529, 1076, 23, 50, "Input",ExpressionUUID->"19052f96-5012-4bb8-8d61-ab162fcff6b3"], Cell[528273, 9823, 1076, 23, 50, "Input",ExpressionUUID->"19052f96-5012-4bb8-8d61-ab162fcff6b3"],
Cell[459220, 8554, 164815, 2741, 409, "Output",ExpressionUUID->"5a40e7d1-446e-457a-9279-37c87371dec5"] Cell[529352, 9848, 164815, 2741, 409, "Output",ExpressionUUID->"5a40e7d1-446e-457a-9279-37c87371dec5"]
}, Open ]], }, Open ]],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[624072, 11300, 858, 22, 33, "Input",ExpressionUUID->"810cff79-47ba-476e-87f6-c3e7e8c9c39c"], Cell[694204, 12594, 858, 22, 33, "Input",ExpressionUUID->"810cff79-47ba-476e-87f6-c3e7e8c9c39c"],
Cell[624933, 11324, 14262, 259, 259, "Output",ExpressionUUID->"665c9ce6-aabc-4938-9ea3-804267957125"] Cell[695065, 12618, 14262, 259, 259, "Output",ExpressionUUID->"665c9ce6-aabc-4938-9ea3-804267957125"]
}, Open ]], }, Open ]],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[639232, 11588, 984, 25, 33, "Input",ExpressionUUID->"7a20b6d1-898d-48d7-a70e-0612fe4c9344"], Cell[709364, 12882, 984, 25, 33, "Input",ExpressionUUID->"7a20b6d1-898d-48d7-a70e-0612fe4c9344"],
Cell[640219, 11615, 18915, 338, 256, "Output",ExpressionUUID->"87302cc8-2b37-427e-ae3f-967f24d3fca9"] Cell[710351, 12909, 18915, 338, 256, "Output",ExpressionUUID->"87302cc8-2b37-427e-ae3f-967f24d3fca9"]
}, Open ]], }, Open ]],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[659171, 11958, 447, 11, 33, "Input",ExpressionUUID->"13bdecf0-e0fe-4fe7-bb03-54c065ce665b"], Cell[729303, 13252, 447, 11, 33, "Input",ExpressionUUID->"13bdecf0-e0fe-4fe7-bb03-54c065ce665b"],
Cell[659621, 11971, 4121, 86, 266, "Output",ExpressionUUID->"d9074324-3e7b-49a3-815f-cb3ef58357e9"] Cell[729753, 13265, 4121, 86, 266, "Output",ExpressionUUID->"d9074324-3e7b-49a3-815f-cb3ef58357e9"]
}, Open ]] }, Open ]]
} }
] ]
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment