(* Content-type: application/vnd.wolfram.mathematica *)
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
(* CreatedBy='Mathematica 8.0' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 157, 7]
NotebookDataLength[ 2923479, 54882]
NotebookOptionsPosition[ 2897501, 54074]
NotebookOutlinePosition[ 2898030, 54095]
CellTagsIndexPosition[ 2897987, 54092]
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[TextData[{
StyleBox["PARAMETER CHOICES\n\nGuide to file names:",
FontWeight->"Bold"],
"\nExample- \[OpenCurlyDoubleQuote]1-0.85-0-0.02-0.0015-0-Fast (+).txt\
\[CloseCurlyDoubleQuote] [\[OpenCurlyDoubleQuote]A-B-C-D-E-F-G(H).txt\
\[CloseCurlyDoubleQuote]]\n(A)\t#spp - number of species ( 1 or 2 )\n(B)\t",
Cell[BoxData[
FormBox[
SubscriptBox["\[Sigma]", "\[Alpha]"], TraditionalForm]]],
" - width of the competition kernel (0.85) ",
StyleBox["[Called ",
FontWeight->"Bold"],
"\[Sigma]\[Alpha]",
StyleBox[" in code]",
FontWeight->"Bold"],
"\n(C)\t\[Kappa] - skewness of the carrying capacity kernel ( \
\[OpenCurlyDoubleQuote]0\[CloseCurlyDoubleQuote] = no skew, \
\[OpenCurlyDoubleQuote]4\[CloseCurlyDoubleQuote] = skew)",
StyleBox[" ",
FontWeight->"Bold"],
"\n(D)\t\[Nu] - mutation rate (\[OpenCurlyDoubleQuote]low\
\[CloseCurlyDoubleQuote] = 0.02 or \[OpenCurlyDoubleQuote]high\
\[CloseCurlyDoubleQuote] = 0.2)\n(E)\t",
Cell[BoxData[
FormBox[
SubscriptBox["\[Sigma]", "\[Nu]"], TraditionalForm]]],
" - mutational effect size (\[OpenCurlyDoubleQuote]low\
\[CloseCurlyDoubleQuote] = 0.0015 or \[OpenCurlyDoubleQuote]high\
\[CloseCurlyDoubleQuote] = 0.015) ",
StyleBox["[Called \[Sigma]\[Nu] In code]",
FontWeight->"Bold"],
"\n(F)\t\[Beta] - skewness in the competition kernel \
(\[OpenCurlyDoubleQuote]0\[CloseCurlyDoubleQuote] = symmetric, \
\[OpenCurlyDoubleQuote]0.6\[CloseCurlyDoubleQuote] = asymmetric)\n(G)\tvm - \
speed of environmental change ( 0.0005 = \[OpenCurlyDoubleQuote]fast\
\[CloseCurlyDoubleQuote], 0.00005 = \[OpenCurlyDoubleQuote]slow\
\[CloseCurlyDoubleQuote])\n(H)\tdirection - sign of \[Kappa] or \[Beta] \
(whichever is non-zero) ( \[OpenCurlyDoubleQuote]+\[OpenCurlyDoubleQuote] = \
positive, \[OpenCurlyDoubleQuote]-\[OpenCurlyDoubleQuote] = negative )\n\n",
StyleBox["Fixed parameters:",
FontWeight->"Bold"],
"\n\[Sigma] = ",
Cell[BoxData[
FormBox[
SubscriptBox["\[Sigma]", "K"], TraditionalForm]]],
" - width of the resource distribution (set to 1)",
StyleBox[" [Called \[Sigma]k in code]",
FontWeight->"Bold"],
"\n\[Mu] = ",
Cell[BoxData[
FormBox[
SubscriptBox["\[Mu]", "K"], TraditionalForm]]],
" - initial mean trait of the resource distribution (set to 0)\nloci - \
number of loci (set to 10), i.e., 20 alleles\nF - fecundity of each parent \
(set to 4)\nr - intrinsic growth rate of a species per generation (set to 1)\n\
\n",
StyleBox["Calculated parameters:",
FontWeight->"Bold"],
"\nKm - amount of resources, chosen such that the average inital equilibrium \
population size was 2500 individuals.\n\n",
StyleBox["Time:",
FontWeight->"Bold"],
"\nIn the text, time is measured relative to the point of environmental \
change (t=0). In the simulations, however, time was started at the beginning \
of the runs, so that we must subtract 5000 from the generations in the code \
to get the generations in the text."
}], "Text",
CellChangeTimes->{{3.6387187358712587`*^9, 3.638718819127743*^9}, {
3.6387189270350103`*^9, 3.638719078692966*^9}, {3.638720164178071*^9,
3.638720221442553*^9}, {3.638720371330275*^9, 3.638720372795931*^9}, {
3.638720416324606*^9, 3.638720611198151*^9}, {3.638720702288377*^9,
3.638720743381325*^9}, {3.638720778292109*^9, 3.638720910893894*^9}, {
3.638720950288766*^9, 3.638720964393516*^9}, {3.638721094610753*^9,
3.63872112788477*^9}, {3.6387211831459713`*^9, 3.638721224981522*^9},
3.649590022189939*^9, {3.658075983868826*^9, 3.658075984617874*^9}, {
3.661180707716226*^9, 3.661180717280942*^9}, {3.661180814602475*^9,
3.661180818554213*^9}, {3.6611863184028378`*^9, 3.661186374691861*^9}, {
3.661186485236309*^9, 3.661186485713958*^9}, 3.661186927641089*^9, {
3.661187122818047*^9, 3.661187140579206*^9}, {3.661360023700308*^9,
3.661360023770093*^9}, {3.668884232711216*^9, 3.668884276526415*^9}, {
3.668888974980728*^9, 3.6688889762580976`*^9}, {3.669212415853899*^9,
3.669212423964223*^9}, {3.669212641934455*^9, 3.669212669573071*^9}, {
3.6692127081421957`*^9, 3.669212709146142*^9}, {3.6693178689758453`*^9,
3.669317876131034*^9}, 3.66932009234226*^9, {3.669327414255083*^9,
3.6693274530444927`*^9}, {3.669327505995363*^9, 3.66932754417387*^9}}],
Cell[TextData[{
StyleBox["Set Directory:\n",
FontWeight->"Bold"],
"Set the directory of files to the name of the main folder obtained from \
DRYAD. Edit BaseDirectory below as needed (i.e. to match name of folder that \
contains folder obtained from Dryad)."
}], "Text",
CellChangeTimes->{{3.662577524248315*^9, 3.6625775422224627`*^9}, {
3.668283279372768*^9, 3.668283297323131*^9}, {3.668283621536635*^9,
3.6682836266139812`*^9}, {3.668283680528104*^9, 3.668283680983057*^9}, {
3.6682837587159243`*^9, 3.668283794745434*^9}, {3.669327583163005*^9,
3.6693276702747498`*^9}, {3.669327704305519*^9, 3.669327728824717*^9}, {
3.703194028979278*^9, 3.703194084265314*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{
"BaseDirectory", "=", "\"\\""}],
";"}], " "}]], "Input",
CellChangeTimes->{{3.668283677378977*^9, 3.668283688137865*^9}, {
3.668283729008216*^9, 3.66828374463734*^9}, 3.668283866569931*^9, {
3.669307461362237*^9, 3.669307463504999*^9}, 3.669327678107033*^9, {
3.7031939671168337`*^9, 3.7031940116712313`*^9}}],
Cell[CellGroupData[{
Cell["Definitions [ENTER]", "Section",
CellChangeTimes->{{3.6580709274791603`*^9, 3.658070930549304*^9}, {
3.6580756578279*^9, 3.658075659467235*^9}}],
Cell[TextData[{
"The definitions below are required to find the ESS points of the system. \
\[Omega] is the scale parameter and \[Xi] is the location parameter for the \
Skew-normal distribution. Here we standardize \[Omega] and \[Xi] such that \
the mean (\[Mu]) and variance (",
Cell[BoxData[
SuperscriptBox["\[Sigma]", "2"]],
CellChangeTimes->{3.6495875161633377`*^9, 3.658071081770849*^9,
3.658071471377894*^9, 3.6580749455730743`*^9, 3.65807565749862*^9,
3.6611746054406557`*^9, 3.6613457046268806`*^9, 3.6613487657142143`*^9,
3.6613552992714157`*^9, 3.661355802930806*^9, 3.6613558413009777`*^9,
3.66135651883119*^9, 3.6613607581628733`*^9, 3.661361139627762*^9,
3.661363530340844*^9, 3.661363848984345*^9, 3.6613644859882174`*^9,
3.661367550766671*^9, 3.6625626269493713`*^9, 3.6625779224352217`*^9,
3.662580999335812*^9, 3.662937786708641*^9, 3.6629378210914516`*^9,
3.668170302672791*^9, 3.669213192314025*^9, 3.6693089484716387`*^9,
3.669329537782708*^9}],
") of the distribution are independent of the skew parameter, \[Kappa]. "
}], "Text",
CellChangeTimes->{{3.6693277745969973`*^9, 3.6693277944779587`*^9}, {
3.6693278306653767`*^9, 3.6693278713088923`*^9}, {3.669327906687851*^9,
3.6693280565600557`*^9}, 3.669328117665786*^9, {3.669329580702312*^9,
3.669329614651134*^9}}],
Cell[BoxData[{
RowBox[{
RowBox[{
RowBox[{"\[Omega]", "[",
RowBox[{"\[Sigma]_", ",", "\[Kappa]_"}], "]"}], ":=",
FractionBox[
RowBox[{
SqrtBox["\[Pi]"], " ", "\[Sigma]"}],
SqrtBox[
RowBox[{
RowBox[{"-", "2"}], "+", "\[Pi]", "+",
FractionBox["2",
RowBox[{"1", "+",
SuperscriptBox["\[Kappa]", "2"]}]]}]]]}], " "}], "\n",
RowBox[{
RowBox[{"\[Xi]", "[",
RowBox[{"\[Kappa]_", " ", ",", "\[Sigma]_", ",", "\[Mu]_"}], "]"}], ":=",
FractionBox[
RowBox[{
RowBox[{
SqrtBox[
RowBox[{"1", "+",
SuperscriptBox["\[Kappa]", "2"]}]], " ", "\[Mu]"}], "-",
FractionBox[
RowBox[{
SqrtBox["2"], " ", "\[Kappa]", " ", "\[Sigma]"}],
SqrtBox[
RowBox[{
RowBox[{"-", "2"}], "+", "\[Pi]", "+",
FractionBox["2",
RowBox[{"1", "+",
SuperscriptBox["\[Kappa]", "2"]}]]}]]]}],
SqrtBox[
RowBox[{"1", "+",
SuperscriptBox["\[Kappa]", "2"]}]]]}], "\n",
RowBox[{
RowBox[{
RowBox[{"k", "[",
RowBox[{
"\[Mu]_", ",", "\[Sigma]k_", ",", "\[Kappa]_", ",", "u_", ",", "Km_"}],
"]"}], ":=",
RowBox[{"Km", "*",
RowBox[{"PDF", "[",
RowBox[{
RowBox[{"SkewNormalDistribution", "[",
RowBox[{
RowBox[{"\[Xi]", "[",
RowBox[{"\[Kappa]", ",", "\[Sigma]k", ",", "\[Mu]"}], "]"}], ",",
RowBox[{"\[Omega]", "[",
RowBox[{"\[Sigma]k", ",", "\[Kappa]"}], "]"}], ",", "\[Kappa]"}],
"]"}], ",", "u"}], "]"}]}]}], ";"}]}], "Input",
CellChangeTimes->{
3.609776602968527*^9, {3.6493381627451468`*^9, 3.6493381823333073`*^9},
3.649530840487455*^9, {3.66118119728854*^9, 3.661181209584093*^9}, {
3.661360964403531*^9, 3.6613609701695213`*^9}, {3.669328060840147*^9,
3.669328143544745*^9}}],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"Mean", "[",
RowBox[{"SkewNormalDistribution", "[",
RowBox[{
RowBox[{"\[Xi]", "[",
RowBox[{"\[Kappa]", ",", "\[Sigma]", ",", "\[Mu]"}], "]"}], ",",
RowBox[{"\[Omega]", "[",
RowBox[{"\[Sigma]", ",", "\[Kappa]"}], "]"}], ",", "\[Kappa]"}], "]"}],
"]"}], "//", "Factor"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"Variance", "[",
RowBox[{"SkewNormalDistribution", "[",
RowBox[{
RowBox[{"\[Xi]", "[",
RowBox[{"\[Kappa]", ",", "\[Sigma]", ",", "\[Mu]"}], "]"}], ",",
RowBox[{"\[Omega]", "[",
RowBox[{"\[Sigma]", ",", "\[Kappa]"}], "]"}], ",", "\[Kappa]"}], "]"}],
"]"}], "//", "Factor"}]}], "Input",
CellChangeTimes->{
3.64958751527136*^9, {3.669212766294774*^9, 3.669212766682002*^9}, {
3.6693281473910303`*^9, 3.66932815189268*^9}, {3.6693293863155947`*^9,
3.66932939876849*^9}}],
Cell[BoxData["\[Mu]"], "Output",
CellChangeTimes->{3.6495875161633377`*^9, 3.658071081770849*^9,
3.658071471377894*^9, 3.6580749455730743`*^9, 3.65807565749862*^9,
3.6611746054406557`*^9, 3.6613457046268806`*^9, 3.6613487657142143`*^9,
3.6613552992714157`*^9, 3.661355802930806*^9, 3.6613558413009777`*^9,
3.66135651883119*^9, 3.6613607581628733`*^9, 3.661361139627762*^9,
3.661363530340844*^9, 3.661363848984345*^9, 3.6613644859882174`*^9,
3.661367550766671*^9, 3.6625626269493713`*^9, 3.6625779224352217`*^9,
3.662580999335812*^9, 3.662937786708641*^9, 3.6629378210914516`*^9,
3.668170302672791*^9, 3.669213192314025*^9, 3.6693089484716387`*^9,
3.669329537780368*^9, 3.702938803642377*^9, 3.702941382008645*^9,
3.7029870121351137`*^9, 3.7029872336731997`*^9, 3.7030046322348003`*^9}],
Cell[BoxData[
SuperscriptBox["\[Sigma]", "2"]], "Output",
CellChangeTimes->{3.6495875161633377`*^9, 3.658071081770849*^9,
3.658071471377894*^9, 3.6580749455730743`*^9, 3.65807565749862*^9,
3.6611746054406557`*^9, 3.6613457046268806`*^9, 3.6613487657142143`*^9,
3.6613552992714157`*^9, 3.661355802930806*^9, 3.6613558413009777`*^9,
3.66135651883119*^9, 3.6613607581628733`*^9, 3.661361139627762*^9,
3.661363530340844*^9, 3.661363848984345*^9, 3.6613644859882174`*^9,
3.661367550766671*^9, 3.6625626269493713`*^9, 3.6625779224352217`*^9,
3.662580999335812*^9, 3.662937786708641*^9, 3.6629378210914516`*^9,
3.668170302672791*^9, 3.669213192314025*^9, 3.6693089484716387`*^9,
3.669329537780368*^9, 3.702938803642377*^9, 3.702941382008645*^9,
3.7029870121351137`*^9, 3.7029872336731997`*^9, 3.703004632236946*^9}]
}, Open ]],
Cell["\<\
The distribution is shifted over by an amount vm*t each generation:\
\>", "Text",
CellChangeTimes->{{3.661181182434329*^9, 3.6611811930644913`*^9}, {
3.6611813084135857`*^9, 3.661181311069577*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"\[Xi]t", "[",
RowBox[{
"\[Kappa]_", " ", ",", "\[Sigma]_", ",", "\[Mu]_", ",", "vm_", ",",
"t_"}], "]"}], ":=",
RowBox[{
FractionBox[
RowBox[{
RowBox[{
SqrtBox[
RowBox[{"1", "+",
SuperscriptBox["\[Kappa]", "2"]}]], " ", "\[Mu]"}], "-",
FractionBox[
RowBox[{
SqrtBox["2"], " ", "\[Kappa]", " ", "\[Sigma]"}],
SqrtBox[
RowBox[{
RowBox[{"-", "2"}], "+", "\[Pi]", "+",
FractionBox["2",
RowBox[{"1", "+",
SuperscriptBox["\[Kappa]", "2"]}]]}]]]}],
SqrtBox[
RowBox[{"1", "+",
SuperscriptBox["\[Kappa]", "2"]}]]], "+",
RowBox[{"vm", "*", "t"}]}]}], ";"}]], "Input",
CellChangeTimes->{{3.6693294077939587`*^9, 3.669329419724358*^9},
3.6693295479078608`*^9}],
Cell["\<\
which corresponds to a shift in the mean \[Mu] by vm*t:\
\>", "Text",
CellChangeTimes->{{3.661181313301227*^9, 3.661181322573019*^9}, {
3.661181446586465*^9, 3.661181450119781*^9}, {3.661361042530306*^9,
3.66136104409549*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"Mean", "[",
RowBox[{"SkewNormalDistribution", "[",
RowBox[{
RowBox[{"\[Xi]t", "[",
RowBox[{
"\[Kappa]", ",", "\[Sigma]", ",", "\[Mu]", ",", "vm", ",", "t"}], "]"}],
",",
RowBox[{"\[Omega]", "[",
RowBox[{"\[Sigma]", ",", "\[Kappa]"}], "]"}], ",", "\[Kappa]"}], "]"}],
"]"}], "//", "Factor"}]], "Input",
CellChangeTimes->{{3.661181467229384*^9, 3.661181468435837*^9},
3.6611814986361094`*^9, {3.6693294236761093`*^9, 3.669329427491535*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"t", " ", "vm"}], "+", "\[Mu]"}]], "Output",
CellChangeTimes->{{3.661181468921118*^9, 3.66118149917458*^9},
3.661345704858683*^9, 3.661348765879231*^9, 3.66135529947112*^9,
3.661355803097299*^9, 3.661355841468562*^9, 3.661356519030972*^9,
3.661360758446618*^9, 3.661361139757699*^9, 3.66136353044074*^9,
3.661363849078924*^9, 3.6613644860890503`*^9, 3.661367550893984*^9,
3.662562627049098*^9, 3.662577922585307*^9, 3.662580999435478*^9,
3.662937786803844*^9, 3.662937821191943*^9, 3.668170302773336*^9,
3.669213199701653*^9, 3.669308948533306*^9, 3.669329735196868*^9,
3.702938803732341*^9, 3.702941382102103*^9, 3.702987012218891*^9,
3.702987233755884*^9, 3.703004632621525*^9}]
}, Open ]],
Cell[TextData[{
StyleBox["Competition Function - standardized so effect of competition <= 1\n\
",
FontWeight->"Bold"],
"\[Beta] skewness or third moment of the competition function (0 or 6/10)"
}], "Text",
CellChangeTimes->{{3.649338267044713*^9, 3.649338271338543*^9}, {
3.649338381708871*^9, 3.649338386537755*^9}, {3.649338434130883*^9,
3.64933848824087*^9}, {3.649531721251013*^9, 3.649531738343688*^9}, {
3.669212809554042*^9, 3.669212810797858*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"a", "[",
RowBox[{"u1_", ",", "u2_", ",", "\[Sigma]\[Alpha]_", ",", "\[Beta]_"}],
"]"}], ":=",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{"1", "+",
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{"u1", "-", "u2", "+", "\[Beta]"}], ")"}], "^", "2"}],
")"}], "/",
RowBox[{"(",
RowBox[{"2", "*",
RowBox[{"\[Sigma]\[Alpha]", "^", "2"}]}], ")"}]}], ")"}]}], ")"}],
"^",
RowBox[{"(",
RowBox[{"-", "1"}], ")"}]}],
RowBox[{"(",
RowBox[{"1", "+",
FractionBox[
SuperscriptBox["\[Beta]", "2"],
RowBox[{"2", " ",
SuperscriptBox["\[Sigma]\[Alpha]", "2"]}]]}], ")"}]}]}]], "Input",
CellChangeTimes->{{3.649338514812175*^9, 3.6493385149922457`*^9}, {
3.661355790447741*^9, 3.661355800925108*^9}, 3.661355839188909*^9, {
3.661361057547977*^9, 3.6613610867840853`*^9}, {3.662562580806951*^9,
3.662562582950205*^9}, {3.669320095654901*^9, 3.6693201053561163`*^9}}],
Cell["\<\
For all values of \[Beta], the influence of an individual on others of the \
same phenotype is, by definition, equal to one:\
\>", "Text",
CellChangeTimes->{{3.6580711245263977`*^9, 3.6580711824762077`*^9}, {
3.662562585684505*^9, 3.6625625918989677`*^9}, {3.669329692119699*^9,
3.66932969928155*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"a", "[",
RowBox[{"u1", ",", "u1", ",", "\[Sigma]\[Alpha]", ",", "\[Beta]"}],
"]"}]], "Input",
CellChangeTimes->{{3.658071108590219*^9, 3.658071113087834*^9}, {
3.6613610958069153`*^9, 3.6613610959104147`*^9}, 3.669320106855537*^9}],
Cell[BoxData["1"], "Output",
CellChangeTimes->{3.658071113575882*^9, 3.6580714715616817`*^9,
3.65807494570352*^9, 3.658075657639893*^9, 3.66117460563866*^9,
3.6613457050438833`*^9, 3.661348765979933*^9, 3.661355299572507*^9,
3.661355803197839*^9, 3.6613558415693274`*^9, 3.6613565191317377`*^9,
3.661360758579176*^9, 3.6613610921209917`*^9, 3.661361139858418*^9,
3.661363530640251*^9, 3.661363849279333*^9, 3.6613644862043*^9,
3.66136755097913*^9, 3.662562595429875*^9, 3.662562627150885*^9,
3.662577922767828*^9, 3.662580999502034*^9, 3.662937786869643*^9,
3.662937821257762*^9, 3.6681703028401527`*^9, 3.669213203590589*^9,
3.669308948599268*^9, 3.6693297383290167`*^9, 3.70293880381466*^9,
3.702941382217977*^9, 3.702987012300832*^9, 3.702987233854823*^9,
3.7030046329054623`*^9}]
}, Open ]],
Cell["\<\
Therefore, W is as follows, with a[u1,u1,\[Sigma]\[Alpha],\[Beta]]==1 so it \
is not included in the definition (a[u1, u1, \[Sigma]\[Alpha], \[Beta]]*n1 == \
n1)\
\>", "Text",
CellChangeTimes->{{3.658071096913103*^9, 3.658071101654958*^9}, {
3.658071159356782*^9, 3.658071173892248*^9}, {3.669212862362834*^9,
3.669212927521044*^9}, {3.6693201080724277`*^9, 3.669320108889966*^9}, {
3.669329712764773*^9, 3.669329721252542*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"W", "[",
RowBox[{
"\[Mu]_", ",", "\[Sigma]k_", ",", "\[Sigma]\[Alpha]_", ",", "\[Kappa]_",
",", "\[Beta]_", ",", "r_", ",", "u1_", ",", "u2_", ",", "u3_", ",",
"n1_", ",", "n2_", ",", "n3_", ",", "Km_"}], "]"}], ":=",
RowBox[{"1", "+",
RowBox[{"r",
RowBox[{"(",
RowBox[{"1", "-",
FractionBox[
RowBox[{"(",
RowBox[{"n1", "+",
RowBox[{
RowBox[{"a", "[",
RowBox[{"u1", ",", "u2", ",", "\[Sigma]\[Alpha]", ",", "\[Beta]"}],
"]"}], "n2"}], "+",
RowBox[{
RowBox[{"a", "[",
RowBox[{"u1", ",", "u3", ",", "\[Sigma]\[Alpha]", ",", "\[Beta]"}],
"]"}], "n3"}]}], ")"}],
RowBox[{"k", "[",
RowBox[{
"\[Mu]", ",", "\[Sigma]k", ",", "\[Kappa]", ",", "u1", ",", "Km"}],
"]"}]]}], ")"}]}]}]}]], "Input",
CellChangeTimes->{{3.609616330249124*^9, 3.609616343815124*^9}, {
3.6096163778882017`*^9, 3.609616381528657*^9}, {3.6096164128891068`*^9,
3.609616523336049*^9}, {3.609616607718815*^9, 3.609616632122014*^9}, {
3.6096166890051403`*^9, 3.6096166903652153`*^9}, {3.6097788423207417`*^9,
3.6097788433282137`*^9}, {3.609792088897949*^9, 3.609792102881138*^9}, {
3.609792435865707*^9, 3.609792438649537*^9}, {3.609852351088435*^9,
3.609852356607218*^9}, {3.6108472895155854`*^9, 3.610847337054304*^9}, {
3.649338517498515*^9, 3.649338541715328*^9}, {3.658071071038583*^9,
3.658071075684579*^9}, {3.661361103745741*^9, 3.661361109697538*^9},
3.6692128564949837`*^9, {3.669320109556588*^9, 3.669320111056471*^9}, {
3.669329438720953*^9, 3.669329445403129*^9}}],
Cell[TextData[{
"Km from ESS calculations below [see also excel file] as a function of:\n(A)\
\t#spp - number of species (1 or 2)\n(B)\t",
Cell[BoxData[
FormBox[
SubscriptBox["\[Sigma]", "\[Alpha]"], TraditionalForm]]],
" - width of the competition kernel (0.85) [Called \[Sigma]\[Alpha] in code]\
\n(C)\t",
"\[Kappa]",
" - skewness of the carrying capacity kernel (\[OpenCurlyDoubleQuote]0\
\[CloseCurlyDoubleQuote] = no skew (symmetric), \[OpenCurlyDoubleQuote]4\
\[CloseCurlyDoubleQuote] = skew (asymmetric))\n(F)\t\[Beta] - skewness in the \
competition kernel (\[OpenCurlyDoubleQuote]0\[CloseCurlyDoubleQuote] = \
symmetric, \[OpenCurlyDoubleQuote]0.6\[CloseCurlyDoubleQuote] = asymmetric)"
}], "Text",
CellChangeTimes->{{3.6540160387132883`*^9, 3.654016041151279*^9}, {
3.6580742342720013`*^9, 3.658074238222699*^9}, {3.658074769793377*^9,
3.6580747903979*^9}, {3.661175211384204*^9, 3.661175212110365*^9}, {
3.6625628749512453`*^9, 3.662562892005775*^9}, {3.6692130694642963`*^9,
3.6692131509240227`*^9}, 3.669320111641572*^9, {3.6693294585974607`*^9,
3.669329458804813*^9}}],
Cell[BoxData[{
RowBox[{
RowBox[{
RowBox[{"Km", "[",
RowBox[{"1", ",", "0.85", ",", "0", ",", "0"}], "]"}], "=", "6267"}],
";"}], "\n",
RowBox[{
RowBox[{
RowBox[{"Km", "[",
RowBox[{"1", ",", "0.85", ",", "4", ",", "0"}], "]"}], "=", "5669"}],
";"}], "\n",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"Km", "[",
RowBox[{"1", ",", "0.85", ",", "0", ",", "0.60"}], "]"}], "=", "7816"}],
";"}], " "}], "\n",
RowBox[{
RowBox[{
RowBox[{"Km", "[",
RowBox[{"2", ",", "0.85", ",", "0", ",", "0"}], "]"}], "=", "11828"}],
";"}], "\n",
RowBox[{
RowBox[{
RowBox[{"Km", "[",
RowBox[{"2", ",", "0.85", ",", "4", ",", "0"}], "]"}], "=", "10756"}],
";"}], "\n",
RowBox[{
RowBox[{
RowBox[{"Km", "[",
RowBox[{"2", ",", "0.85", ",", "0", ",", "0.60"}], "]"}], "=", "14492"}],
";"}]}], "Input",
CellChangeTimes->{{3.662562862925623*^9, 3.6625628629277887`*^9}, {
3.662580992934908*^9, 3.6625809965492897`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"k", "[",
RowBox[{"0", ",", "1", ",", "0", ",", "u", ",",
RowBox[{"Km", "[",
RowBox[{"2", ",", "0.85", ",", "0", ",", "0"}], "]"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2"}], ",", "2"}], "}"}]}], "]"}]], "Input",
CellChangeTimes->{{3.649531021262866*^9, 3.649531029756596*^9}, {
3.649531173729876*^9, 3.649531195297473*^9}, {3.6625782242342663`*^9,
3.6625782252092743`*^9}, 3.6625783600793343`*^9, {3.669213213091576*^9,
3.669213261693933*^9}}],
Cell[BoxData[
GraphicsBox[{{}, {},
{Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJw113k0VlsbAHBDUqakJFeEIvNMV2LvJCmZKlLmq+gzVFeZSohXppQxkqkM
eRXec+IiwzZmnucpUySJTIXK++271vf9cdZZv3X2OmevfZ7n2c8W+evm+WtM
DAwMv/H1710O7Juj0+novnlEZP9qILy5cShkY5OOTO6f9LRnpEDaW0XxlTU6
cnf9pLvGSYFKEgZ/zXzBz6emMqWOUODR3ZShln46gndnKCOXKRBOLTU9y6cj
MaXgXqtKCjwf3Ppa2YaOlFT46R+igqBnO8XVsWILxY1vG+Q/HQx7etjnqux+
I762ksV443AoWHlz79EDv5BR+OeRqQdPYKFzLcuu0U3koHwvPp4pGto+Uvw2
GLCBxsOWfTPzYuF69L0QBNZRKrelZbJdPEzn+sCfMPEdCTE7CVdQEmHSWUW3
7tA19KmSzyKiORkGuNh5SZ5ZRd+l4dBr/zR4jznH0+3rMsp52yfUbfQS2vm3
H+7LXkK9B7bduMGRAePKpxOSnL6hgQgGdoH6TPhuTILjjegCWjJ/LKFCfQUP
cUPtiylfEBCJFq1xoEJSKsRpcmoWGdn+A+c1X8OxOkJYTW0GuWXxBbFuvIHT
MnFK6J8pNBgxUSDtmwd3+1LV5Bgn0GPHNzevMNKgjNqiTObKCOpgyF2uTKdB
Bzk/v5LREZQ8OCd3MYsGU8V3dbXWj6Ck+KGR6Wwa5OGT9/z+fAQ5fL0Vti2P
Bn/8uFF1WmcEORev75UvpsHqkgXTudhhxNQ3IPNnCw2aay74yqsNobvZK9S9
KzQYqPO1o8SrHylU/XRu0iBgtd68kYp9P6ooRDmfNQnIYPClLc+gH83Osqmz
QgL6mH5uSRftR5ba3ic0dQjo4TDdENHSh9Ra0hZizxHweshopZ1wH2I233to
2ZKA51paaTsbelB36ICZjQ8Bwzpa5ClkD/KI5zh+2peADT3NeVtJPUiit91C
1p+Ap0Yb36z83YPCc4L1VgMJqLVQlz0q0INGtN3rXMIJqMBdkUbc7Eb6Xzpr
WRMJyHsxL/IyXxcqfZ9OThQSkBQPf3eKuQspV9SvuBUR0HjD8aPiYifKLp1/
xlSCv58i8idbfSf6mXVjj2AZAbdmY8feeXQi74qRPK1qAs7cvyd3oK8DWVuK
i6m0EfCGUVRCuWQ7sqOM7p3+SMDs1bPzcYztqL1hj7D2DAEnn22DNwbbkKJT
U0DyJwKaffT8JBTahnpXxQ2M5ggIvK3V/Gdb0aUL7+ZSFgnInS7do/2qBe3q
LF75uoHn+71uV8PhJsRXy0/V4yTh45yX1VobjSj92IO3IVwkdLb2cy9sbUSc
LyXL3+8i4eH3fw6/9GhEPLfCWo7zkPBp3Ous+w0NyC69tZ2bj4R3VaI0lV3q
UbFPIoe5MAnNZl2/UWE9aj3uN+gpQkLlpLPpwrz1iMH7SGqcKAnnmbft5Kp4
j2i0Y3uaD5PQutujZ3bXe3Tz8kiMoCQJtd0snVPe1qJZj9YMW0USComrC/GG
1KJgdddOGyUS/hzk7Qy3rEXSAoxLlsokLDjRrubNUoumKFRWE1USiu/WZrp4
qQZNDL0IFVYnIRvtyLOdP6uQgPWLeEtIwszh6YjPlAqU/lS1TNeAhEM++1KT
lSvQX03iKj+wuYRO00wmy5Gt9x9DmYYk9LDN7ioB5YjJ7Wj+byMS6k478YVt
lqIaG6pX/HkSzi4spkndKkGMj05a3b5EwgORwuQHoRJkvTSdvN2chMaKJjXR
rcVosSBgZwJ28W1yelOqGNl6/LItvEzC0PU7Us3T/yC94NMcQxYklGLafOts
UYAiwpFCsw1en3SpuoNsBej28VzOE7YkjNax6Osufouq8vj3FGJvPixb19j3
Fn0/NfU03o6Ezex+mhydBFIyDPbVtSchQ26+YaUfgQbUC5/nYqsYjtvckSOQ
hvzlcZ6rJEyKPBEwEk5DltdDx/qxB6R2PL4ckYcOx5iS+g4khK7/oVXN5aL9
1zdZM7Cz85u6JPVyka+IAmUT21slgm+T6Q36oDOz+MKRhH9o8bxI9KIinoza
qKHrJAzwv13D1JeNGthV+A//h4RfqnumnZSz0eiE23tn7LLT8VIaC1kooXRH
9Bq2lcmBgmH7DCSXc/nLshOOl5U1dffadDTG5OMj40xCn6ftiEssHXm5nT51
FTtpOKD5xMwLNASf3W/DlvG1NBnWfYGUKhm+MriQsFRYrf/OqzSUGd8do4hd
0NxVZ9SZgvy0A4MjsHu4H3YGRCcjS4tTPcXYK6bqo4UXkpDuJU3zSWyl8dRV
gb5naEAtlUXBlYQmYhcYjOITUFbQstxF7FtO2zkCzONxfTV84oGdv+pyaHYo
FtmYbqwWYrepC8sLJMWgP7NUN7uwF3y7jxlaRaMn3aZqC9ictQ91HwhFoTPL
JlTWGyQ057mTcR09QQpJohcOYscnDZW2nYhAK4uVyqrYfeInulVqw5BklLj+
Gey9xKu5RN0QZJpt8MwC+4IGFxNjYxD6Mqkg5IIdXXeH31E/EBncbh68i91h
NKzQ2uqPern5W4KxhQoCIx3SfFDHD961aOznDcZIKdMTBX6uuJiEvX9UcGGL
6oZkZXZ/SceWnupVf2rljFjD2Yqp2OIct+LlHO2Qrhm1NBfbv0eiR6DGAB2w
n1/Lx5bZNerEIqsC/mHvdqD9O/+lgFTudXOgLW/F9e/zb0ZHlm+6OYBPiuHz
r7Hvxeg2OavcAq2/rBhfYW/5ej9PlXcHvFt959L+fb/TG5duqbtgQmK9LR6b
2WxMk1XcD5xdqwmOwK4RDg1O5g4A12w1PR9gU56K3jr6mAK05h2Tb2PrcpSZ
d7IHg6HU05v22KwBpiecQ0OBIutExHnshh8Lkiysj4Ccsro5wA5zDeFJpTwG
uSWml6Wws5Yi7x94EAk8Co9H7cF2dJRy+GcrGiRxB2WO4/+pJ+p5JVAzFuzV
WntQiy0xWmNo7BMHGO8bxGVhz523Ojq3EQ8YHwzaXsNu4syRLvrzGeDQEObX
xn7d8P0gxTMReH27s0MQ20UrcofQWhKQn7/9qBXHo8HGyK855RRQaaAqko4t
VyC5VOSWCpQmlL56YK/HTsxLrKeBQyH7pPmxS9ju9Va7p4OUkzugHs6PNFne
7nzRDMBzuPs1G/ZD4/yOpPYM4KeVsNWE8+3i06lmD8ks8Ov79cunsL+JnKuW
Gs0GES5vZ4RxfvbrzCC+MCr4zTn0qAvnd4Wjf/m2ozngrnL5HwHY4bkFxR8i
XwORhiMLQ7geiKsL5kfr5AFd/XKP27hecFgWvfFbygNGWstWe7FXfE1yXFLy
QXt1t+zbayS0naw+f8iHBhp5RUPmcD2Sk/hh8LuXALSxd1IQ16/GtzY6RGgB
eOCdoxeM6+PxOpmaI+MFIFWtsXk7Nq1v40SKWiHouvJbnWKN96uNGBA+VQja
JswHvKxIeBU0HLumWQSYqz6LnMH1lt6koMi/VAIGRaX2PDQjodvI7/wnp98B
7kBu64+mJJz52iS3PeUdWNOSiofYLdzXZFbOlgLeif6e5QskTDR7dqQ1owys
pdlTtExIqDrJKPTAHIHb7O9n3fTx/N9dWlKgInBp4pNO+Vm8HtG5teMbCKzu
XO9jwWZ/8UY1zaASCNiXJ0fpkfCXsfkIfaESwK3F0phTJByl5UsixWrAYHTW
VRuQMPWWda1mUS1gG2kx0cf7Y5Llzry4sVpQQ1ccs1QgYYJeQfxX1jrAUHch
x0WehJHCbM7J5nVA0//z5kNZnD8dhbt/b9QBIyMYkYX3WzsFTpuy4/UgY+ty
URTerw99K904Vt0IzPZlnPiDG9fb1pOU1a+NoPyqsfUw7g/6cpq58vibwDmL
PPdE3D+EXRs+JPJ3ExAT0HjKw47jZWjTgFW4GUSR4zlzLDg+6tRfdt9vAfbe
/Q+P/STgledFZ13U20EbXcfYEvc3BV6gV+xaO5COq88anSQgl1m9zVhkOxCr
PMhqNUHAKu7+O+dn28E9FbtPph8IuPfkPaMk/Q6QtAupKAwQ8F5xonfAZgfA
vZJ3cDMBz6QPthqad4H+qqnAWhoBvwXlOdS5dgHDFWlt7nwCJlwPpGsEdgEv
Z4rslVwCzsrKKkrmdQHnmMyIWSoBQ4r9Y5m3dYPV94GBiy9xv9h6xKI4vxuk
C115nxVLwNPr7rMirL1Agt+3qcID948GPMxrhf2ABUY9L1Il4GO7nUsbjf1A
/aSBSbEyAQfcGca2RvtBpi4tpkiRgE4pC+92bB8AHmPUSkIWj19scjtgNgAq
HFWbY8Xw+KjAyZPfB4B9rYToPl48vm+1KlptCHRoUqd34v75iU2/v0LRCPgQ
b2rYn0OD9YaCnMY8E4DFbFLl6UY+/CrC69uVOAVq9kftCX2cB93vSNs92TcD
9vixmn/kyIX9I9znHRpmQWZigaGA8Wto6338E+u5L0BO0ld1VyoV1kgfDath
WQC2xxdlLpa/guI7y2Yz9L4BfbEO1YjvmVCwzPkUS8gS8KROtQ+qZ0CGTSaq
2+Qy2P5xQLzE+iX8YVJuXSe2Cvb7lm6w56fBYRUbATHKGtBw3fe8ZTAZ3rrE
vVt05Du4eqTSnohKhPyxH823Ca6DfUM6Rh158TDPIu3VitcGeB4jNcpTEwsv
afrpNZRvAgeKgeCyZjQkrF1Fj/36CfgUut14lp7AdbaTzCWmv8F8StPMVY9w
eL5TQ00wYQuUH9vxpJ8Mhmwa7FVlyVvgRcro1YWXwbAqY0jfMn0LsHN8pnPE
BEMFL2+753lbQGWbk7/d7WDIdbDoEX/dFijdPPDQUSUYNrooTfEubwGh8P0e
M0UPIdwhGcl1jg7Ylc/wZNUGwfW/1//IM6GD1oj9U2RhEMwfrs80uEQHjn8V
6tdnBUGhfIfSR3/RwRNz+Q/bQ4PgL9OMGTZvOhjYpI6MGwTBovSDmqxZdLCn
VPvD1gAF3uBcrM96TQecbBk3KU0UKO5ZcV6XoAP3MGe/3WUUGHvW6npQGR38
qkrYo51KgW5LiTHM3XQw/45p/Nc1CpSycBJKH6ADn7qjahWXKHCiVp2q/YEO
gqz8fz88Q4HGCQMVDz7TwXAWZUBOlgJ3MGWfEVmkA+NXA7OcBykQOXv2VK7S
gXX/LftVbgr06NW1sd2kg437cbqTTBT4v/M7+P/5/b8G3w7X
"]]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-2, 2}, {0., 4718.689068975791}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{
3.658071081852553*^9, 3.65807147146922*^9, 3.658074945636091*^9,
3.658075657597821*^9, 3.661174605577036*^9, 3.661345704993761*^9,
3.6613487659145603`*^9, 3.661355299506054*^9, 3.661355803132003*^9,
3.6613558415021772`*^9, 3.661356519064678*^9, 3.6613607585092077`*^9,
3.661361139793086*^9, 3.661363530573564*^9, 3.661363849130685*^9,
3.661364486136353*^9, 3.661367550936541*^9, 3.662562627106069*^9,
3.662577922638212*^9, 3.662578225558165*^9, 3.662578361625536*^9,
3.662580999590261*^9, 3.662937787029085*^9, 3.662937821376152*^9,
3.668170302992517*^9, {3.6692132102226543`*^9, 3.669213262016081*^9},
3.6693089488419952`*^9, 3.702938804091424*^9, 3.7029413824031267`*^9,
3.703004633108597*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["Calculating Evolutionarily Stable Strategies (ESS Points)", "Section",
CellChangeTimes->{{3.661355014442129*^9, 3.661355016742935*^9}, {
3.669213301932412*^9, 3.669213317056045*^9}}],
Cell["\<\
We set the initial trait values (phenotypes) of the simulations to the ESS \
points of the system (See Doebeli 2011). These points vary with the parameter \
choices and the number of species in the community. Below we calculate the \
ESS points for all of the parameter combinations we tested. \
\>", "Text",
CellChangeTimes->{{3.669329808107808*^9, 3.669329849083624*^9}, {
3.669330043302411*^9, 3.6693301114779367`*^9}, {3.6693301699254837`*^9,
3.669330188153165*^9}}],
Cell["Common parameters", "Text",
CellChangeTimes->{{3.661355852080145*^9, 3.661355856383094*^9}}],
Cell[BoxData[{
RowBox[{
RowBox[{
RowBox[{"try\[Sigma]\[Alpha]", "=",
RowBox[{"85", "/", "100"}]}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{
"width", " ", "of", " ", "the", " ", "competition", " ", "kernel"}], " ",
"*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"try\[Mu]", "=", "0"}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{
"mean", " ", "of", " ", "the", " ", "resource", " ", "distribution"}], " ",
"*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"try\[Sigma]", "=", "1"}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{
"width", " ", "of", " ", "the", " ", "resource", " ", "distribution"}],
" ", "*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"tryr", "=", "1"}], ";",
RowBox[{"(*", " ",
RowBox[{"intrinsic", " ", "growth", " ", "rate"}], " ", "*)"}], "_",
";"}]}], "Input",
CellChangeTimes->{{3.658074206458665*^9, 3.65807421166369*^9}, {
3.658074801389743*^9, 3.6580749396472607`*^9}, {3.658076014352268*^9,
3.658076022888116*^9}, {3.661355168522891*^9, 3.661355173465476*^9}, {
3.661355599798407*^9, 3.661355626797003*^9}, 3.661359956137329*^9, {
3.6613616597727613`*^9, 3.661361662450386*^9}, 3.669320112440447*^9, {
3.66933020768617*^9, 3.6693303239909*^9}}],
Cell[CellGroupData[{
Cell["One species case", "Subsubsection",
CellChangeTimes->{{3.661355862319255*^9, 3.6613558641854267`*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"ntot", "=", "2500"}], ";"}]], "Input",
CellChangeTimes->{{3.661356695784233*^9, 3.6613566998890953`*^9}}],
Cell["\<\
We ask what values of u1 and Km would maintain 2500 individuals of a single \
species, such that the mean fitness is one (W = 1) and the change in fitness \
with a change in trait value (um away from u1) is zero:\
\>", "Text",
CellChangeTimes->{{3.661355868534315*^9, 3.661355906324935*^9}, {
3.66135934244738*^9, 3.661359354837508*^9}, {3.661365634815134*^9,
3.661365638917808*^9}}],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"try\[Kappa]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Beta]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"roots", " ", "=", " ",
RowBox[{"FindRoot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",",
"u1", ",", "0", ",", "nm", ",", "ntot", ",", "0", ",", "Km"}],
"]"}], ",", "um"}], "]"}], "/.",
RowBox[{"um", "\[Rule]", "u1"}]}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], ")"}], "\[Equal]", "0"}], ",",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "u1", ",", "0",
",", "0", ",", "ntot", ",", "0", ",", "0", ",", "Km"}], "]"}],
"\[Equal]", "1"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"u1", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"Km", ",", "5000"}], "}"}]}], "}"}]}], "]"}]}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",", "u1",
",", "0", ",", "nm", ",", "ntot", ",", "0", ",", "Km"}], "]"}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], "/.", "roots"}], ",",
RowBox[{"{",
RowBox[{"um", ",",
RowBox[{"-", "2"}], ",", "2"}], "}"}]}], "]"}]}], "Input",
CellChangeTimes->{{3.661355380776771*^9, 3.6613554716473618`*^9}, {
3.661355628776557*^9, 3.6613556384935837`*^9}, 3.6613564788712254`*^9, {
3.6613565266446323`*^9, 3.6613565269706306`*^9}, {3.661356653270664*^9,
3.661356657405102*^9}, {3.661356692788609*^9, 3.661356703844652*^9}, {
3.661365305930057*^9, 3.661365325846908*^9}, {3.661365369550172*^9,
3.661365405067132*^9}, {3.669320113689932*^9, 3.669320114506575*^9}, {
3.669329468421339*^9, 3.6693294787257338`*^9}, {3.702940532616886*^9,
3.7029405335001383`*^9}, {3.7029412257414827`*^9, 3.70294122812393*^9}, {
3.702941275684395*^9, 3.702941277364108*^9}, {3.7029413256191607`*^9,
3.702941366578924*^9}, {3.7029428932497253`*^9, 3.702942897211364*^9},
3.7030047081167*^9}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"u1", "\[Rule]", "0.`"}], ",",
RowBox[{"Km", "\[Rule]", "6266.5706865775`"}]}], "}"}]], "Output",
CellChangeTimes->{{3.661355400057754*^9, 3.661355484875826*^9},
3.661355639112556*^9, 3.661355814416032*^9, 3.661355846086014*^9,
3.661356479643317*^9, 3.661356528448374*^9, 3.6613566579978237`*^9,
3.661356704202601*^9, 3.661356799715898*^9, {3.6613598769263163`*^9,
3.661359963203663*^9}, {3.661360098302494*^9, 3.66136010577055*^9}, {
3.661360265106131*^9, 3.661360282741428*^9}, 3.661360759824787*^9,
3.6613633755406733`*^9, 3.661363488854203*^9, 3.661364142829502*^9,
3.661364488455009*^9, {3.661365321161644*^9, 3.661365326441318*^9}, {
3.661365370125573*^9, 3.661365408747449*^9}, {3.661365458553314*^9,
3.661365471788363*^9}, {3.6613656409902687`*^9, 3.66136566362761*^9},
3.6625626531689043`*^9, 3.662562711941856*^9, 3.669308950265973*^9,
3.702938980590547*^9, 3.702940534222314*^9, {3.702941228804873*^9,
3.702941278008635*^9}, {3.702941341788973*^9, 3.702941395720881*^9},
3.702942913560527*^9, 3.7029870194677267`*^9, 3.702987066405884*^9,
3.70298723872289*^9, 3.703004639872552*^9, 3.703004708814828*^9,
3.703005633047179*^9}],
Cell[BoxData[
GraphicsBox[{{}, {},
{Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJw12nk0Vd/bAHBlyEwqpZCEhIRkqjwqCUXIlFmDCkklfGUoJEpISBIyR5mn
JFuoZIxkijLeges65pnfbq33/Yf1WWffc8/ZZ+9nOOy5eNPoykYGBoZ4/OPf
b1ngH11fX0cMyqSWgY2pcHNxb/Di0jqyY+HONnmWBnmF8hLTs+soqTIys1Q4
AxQk9S6SxvDxjKIDOkpZoLw5sKexcx25Lg1st5LJA42hyfqXueuo6pa03IfD
JWD0qCn7kO06IrJTiCvTVeDREnjjauUaik24Ur1vrAFCx9w7Z8rWEEXFw0xc
qxGSN10/7l+4hjRkvb79TWqERtDb9jpzDWnz9bGEmjSBaN62T22R+HhcYMK3
j83QHJHOqX51DalMLX9Y/vQDJIzqsrfyrqHGCPujOg4/ob2dY/Sz/SridORu
cbfqggeXiyuzrVaRawSDeJNfF8jO2DyPNltFoVoCGhwpXRC8peDodb1VJMNe
yQrULjhmZB7Oq7qKZkKqioPcuiG9JVXRlncV2Yn59KcG9YBn/TG/lcoV5Fz6
ujL0ZS8IVd3cqiy4ghi6bDbnq/dDI99hN7XtK6in9OxGbb1+8Lqy9PMY3wri
Py4i8suyHzrYHz7XZF1BLqPbV1o9+yHCJI7PaGYZnR0JJJsW9APjWC3vjcZl
5Ch2kev53gGgbtvJleK9jMxrDGLW1wag2KmWmadvCenKXP47GTcEKiIu8umd
Syh9ck5bP3MIytu3Wx9rW0IG1s7dScVDUHXMqcjp2xJi8SkPkfwxBPU8fJfq
8vHn46sGqpmGob/QtupBEHZ9tvR+52FgX1nymjm4hL4KBwxTDo2AXag80e2/
iLi/ztmFZJLAqygyqMlnEbVrJt4bKiBBdO+04GfPRSR6RsxI6RMJ6mVKdDJd
FlEMRV/zaysJDjWppbhbLKICf/nS8CUSsHBrmm5RwJ+P041v1CXDu3DTirMD
C0jtZmcvB4kMC5H3ghEsoNSCdbcHrFQgC34e1VJbQGIOrdbDm6nQkc6i16y4
gDSFz47CLioUlj/b3Ld/AcV+i2YYOEAFl8GMuKUtC6iycEtygxEVhuTb3x2m
zKOdTwXfar2iQvMPmdbsiHnU/koveEpiFFK4/wjEDswhzfamZQ6pMYi0hE2q
vXNIam/172j5MfDPTJrp7phDvgVhKQKqY3DxxKWWXY1zSEuidYFbewxE3SmB
iSVzyHPohGD+lTFI7puaSH8yhyrbmA06Escg6d2mr8WH55Ad2xeJCh4axOvK
3/4ZMouCWYNWsv7QQIxDt/5H4Cxyvv5ryHaYBtkNF0Wb/WZRUpq/HO8oDcrP
RrXV3Z1Fc0evM16apUG3/rxCpf0sImRkWls5xoH//KfpTNVZpLvBbFuH8jiE
W+rc9aXOoMroYYWQ0HHwd7b33K8zg/IMkfnW/XT4E2YTX35yBnXkbB/eLksH
tXzLqjPqM6he/vJb/kN0mJo1YXU5NIOIREYa8zE62PvpxhYIzaA/WsKx2QZ0
0Ig8VHZkahrxPdhSsc2DDmulzAt6r6aRTSmzlXsVHSx6Ngr+jZ5G6iaRkyO1
dChZWQfXiGlEou7hMfxOB5fjS48iH06jhNmEMYE2OvTV07d33pxGlTlcTu5D
dKjo61S205xGbdYFQVbME3CPMcvj9vgU8nTpXaadmgCXlzYsdpQptMSwqy9c
ZwIuHtwSrTc0hWwOdW4/qDcBupbeBZLdU4hbrDHpovEE7CjUH/9TO4VYLz2W
T7g4AUUXpy+eiZ9CohuU2q75TgD981F9sTNTaAc1bNWscAIGzSZ7N2tNIfq8
2MWQkgn4NZ7mtK4xhVR+PTIt/TABFQI8IT1KU+hr1/FZ1qoJeHJroCZCdAo5
CKmqBDROgOSeINXVxUlU7bkZfg1PgP39FrGOzEm0WapO3YeNANPuRPW+lEnE
fjMsoJudAF0FV/PhhElEbvipqshJgOIwb+hU1CT6r7JmdZibAFZto2nuB5Mo
S9Z3/tBWAnJ4fn0+fWESVSL/88HCBCwn9Nh8YJtEc5oiGTwKBBDzWZ5VTJNI
YtrI98ghAoYN7kV+WyeQRn1e3xVFApo3Cn79NUug9vg85RIlApIdrA9MDRBo
fBOz86kjBGjL9i9LlRNIUOncTWFNAqI/jcTGOxLoq9aJBGRMgI1nnK/yFQJ1
2/ua/TQhQPLQuctttgTy12y5OWJKQHlm2UFWEwL5avB+ZrpAwJ/nT77eAQKV
9aWtHrQmYJ+j/IzuVgJ1XJqPU71CwO0DSwlT9ybQAjdVebcbAUwplxwlb00g
GfGftxjuEhCzo+mwjcMECn1oK96P/ZExqfG7wQSa4k1eifPA43tOLSWJTyDb
I7H+a154fNAzk3MtdHRklCHZ5wG+nr+SnO9E6UioeeSn/VMCvI9ueB+3g45a
Ch7Mbgoj4NjLbr0QbjpK5k7tfoddZfQ43GFpHLG28dGmwgn49mWMb0/bOLru
U3DGNZKA9uwcgZgH4+hPT0iQ3Av8fayPygM9xhGnJ4dwDbbZFVvLOzfGEfvV
K/7GsQT0CPO+Nrgwjs7aKhbdeUnAwLNbIhzy4yj1rVpzyisC6B6K++730xB3
RoJTQyIBee2cdS4dNPSnNUvoTBIBt+RHrlk30pCjZlv6d+yZ0egstTIasrHc
eLzmDX7+1vMHZsNpiKTQmp6ZgteLZrmiI9BQ2vLlb0czCKhPivxlfpiGglVH
lLOwQ1cd3U9L09DNZx9D+DMJ4CndVSa2nYZUvi38HMPml/I58pc+hlhSY7eG
ZBGwl1fjhHHCGFIwffwr7D0BYXIDXo7Px9DtDUqGU9gLBv6F94PH0PUdosHG
OQQ0PqsVe397DD21WpXalkuA2xadTSynx9DuzDDLR3l4PRwaBcGjY6hiiqOu
H1vb+ImngvwY8t2rP6eST4BQdBPVZtfYv/z2agT7K79RY+nEKOqRyhGWKyRA
TnmaqXl4FInl7M/zw44zizo23D2KYrQn2Zqxb8Z25PDWjiIdh7cCV4sI2LHT
8tn12FGkf+ZN1eNiAhyFLpvuOj6KHv9kH44txc/zGHO4vNIoug0eVr+w1W3S
v52WHkV1MbpZvGUEbEmkqLhtG0WX4m9+D8CuELmxq4lKRfw3PspYfSBA4ji3
8dAfKrJadbgajh1hnxu6+JOKGmV4fD9jX0meXBWvpCJR5eQTouUEcIu59/tG
UpFl0xR0YHtqbheIfkRF8i7Jtxg+EjB4ucww25uKXFTGHu7HLk1bqu50oCKt
+tgLntiiX18tj1tSUf2e9J0J2KGko4pMhlR0u+b152psu31+aXJHqGjQKaGW
tQI//9Mif7TkqKiNzVBUClvx2md+a3EqEt5z/LouNttbxuAQHipyvixb8gi7
QCrYcXCIgpYSoy/NYu9utfsg3U1B+pIS+Vyf8Pd5qLLebaYgG5f/FsSwr9SO
pm36QEGDx597GGC3OdbMGORQEG/eRN5lbPXN8SfjUihILkGN7IG9w0ZvQCaM
giT0v+u9wg5kkpBzD6Ag9e2pftnYk1lrvsiTggJvvsovx7Yx7GxidaEgf9V7
w3XY9fO5gkaXKOiiL49AB7ZyQrDTK3MKAhcxg0HsVE378mE9PN4u6PE4Nu+Y
KpvsSQpSat/wfR7b5xmfuYcKBV1zvcS5oZKAUeWx9KoDFHSHydOEDdv0T80s
214KMg3mTOPFrgmM1zy/g4J2CNGX+bHlpO8+j+eiIHauUQtB7PhWvcGRjRQk
2NhULYLN5ikhf3CBjE4uOCiKYbsLr/t5jpNR/oWAPAnswdrO5s+DZKQyRChL
Yp9zyhPi6CKj5wU+Df9csTnE2biJjMp4F5z+WbLM/uPrajISuy27cx92tI0a
O7mUjA54THT8O/9G5i0X5N6TkR6NLWUPtkv2WMZ/yWR0o/6snxD2b8PaueoX
ZCSv/Mh5B7b2QvwpzqdkpP0w2IkPuzjhbpSJPxnlKor4cGCLntIfSvAgo5Up
oWRG7LAxCQWKMxm9fWX4ewnP3/Kz9fvyF8nIUuXJ/knsaypdLV5m+Po2vHpK
wm7/kydce5aMmq0MWX9j50hfrDBVJiPB8zOan7F3talxJMmQkX6GP2shdrDn
FgvqHjLauHF5JAXb/kvt/D1OMvI6OzHpj93s9FrrywYyWrvLLXoLW43PPZp7
noRWBGxu2mBvtd136M0ACZnZdF5Wwn7AzOA/2kFCYVVp3Huw6dldPw41kpDT
HnoXO/a3hRCXryUklB6k0vb7335IvPiJ5x0JefT2b6zBTjp1hPPCGxKuB8+Z
vcX2iqS9HXtCQhe8frjcwSapfFlQfEBChbyPD5lhn//7+rSvOwnFCljsVsOW
kTk3wmtPQrSQ8JureD/+/ZIvoqREQloeL9m8sL3PL2qqyJAQnW7hdwF7x4DG
dTVREnL7Lq+ugm2w0pKvzk1Cclc6Xk7j+FClQD9xmjSCTDUYe+2xraoOX9Xp
HUEeyP39EewFPZ8nZ9pGkM2RW01bseWuc7afqxxB9NWS5Vocf5ISpa6Yx4wg
Uf98MSHsowduh1iEjqCS+Ec+kziedZV/eG/lP4Jiwu2kvmDzdmjP2bmMoOQN
vf6O2A84rz66roXPb65z4j2Ojxf/S3nrNTeMxJbYYraUELDGMtbkTRtGY6yM
/n04vsZFKUz5Dg6jmC38TenYbbmf1QKah9GdfJMAZeyTpL8NT9KHUaH7rwBD
HJ/FzgvS402HkUGU0u1rBQSMyEQroJIhFF2jviCB84mUbxqdkj2Elq7GzHbi
fOPSUpzF92YIkVquGgT/yz+3OkQdngyhPcpiouR3BLCXbt/CZTeE7GW+nnud
jefjeNy0BdsQYl97kEzD+e2eSWLRnOUgqt3GlymE8+Vm37dKshsGkFxy1txq
NAFBJZJ1vPP9aEY/SjYae4mecWGa1o+cY+9xyWAP2qZ7l3X1I5XVazXmUThe
Hk+pPpHXjzQ8WsRzcH1gxPxa38y2H43nvburg+uHfQJ7mhju/UXWHcLNp4Px
+lCakEmb7kXqo6YcEf8REKA5/uODZycy8nN32G1OwDbjnIgL29uQ5t2yfCcV
fH6JJ+WnGNtQv8cz5RVlvD4Wrw7LT7QiNc4jDE+xHyfsUWH/1ook/yuzysX1
3Bol6m+5eyuScjcwmcf1Hsnnnqxgxw8U6SLxO0oez9+5Z7Gf9regi9a/29il
Ccic0aVFb2hBnOEFy6lS+P5eMmm4dDejS/vAG7BNhz3IwiHNSJsyHXR3PwHw
n43SfUoTWlrlbB/Zh9dLinT7iYxG1Fqi+qtTDF/v3BeeOrF6pF9i9oJ5N44f
WcnV6ovf0aXjP01Tcb3qZON3t7jpO6JJBT0/iS32VeV3svt3ZLXN8lGAEK6n
orPTferqkAuZy5lNEO8/xWfHDjl/Q9tPr1YdEMDXQ7lBvNX4hpoOxqW17yDg
ULxuisi2b2hlpySfNzaNkYmNu/Irirya+rBxO84fP93bKTxfUf/Zr+Q7/ASc
uG3llFBYi3Q+Zov2bSFAWEJVeFtwLfp+YuBHKPZy97bWJ1a1aOZGPe8x7KLj
LUr/MdcimVom7UQ+nO83n9hobFaDbK4spThuxustb99LtuXPyP+++1MhHgLS
fo88pQZWouqjO+rncX3f482f+PpQJarQG0OV2NzCp/MMBz+hsq7FE0HY7naZ
bR/gE0pePzzFj6014rj98dJHZKM6uaaO+wUKfSJJyvUDqlIrFczaRIBghEjB
H+EPSCFdlMcL20DesCayqQwlD2+J0sUuu1MwsiRVhtyel5uOsxAQsuAm1TBS
gu7Pn/6mii21canQybIImR5pfk5nwvOTIvVlN3sRehf56sc37EhNy46fZYWo
3lkv9Q32UlDFwhH+QhRrbLLZDLuBw+8YZ2s+ui/mx/qdkQCG97n6VX75qM2R
gTEDW1G/39ZNNh8FZ6rFPMSOjzju3/skD71jKHikid0lxRp24WkOSsuzjv++
kQCNG9fzPo++Rw6rNhffYWfm1rft136Pypdyq8Ox/1N8un1p4zuUTVo0Msfe
qc73Js7zLaL9ZColNhDgf/9OzcaOTORdZ2/chT1W3T7ieCgT8RQ4PK3Crjj9
QuoIPR25dm34GYltbShY9PtSKmI/55mnjk2bnlW9W5uCvqukhEtje8e0IG7x
FETsdGcWwI7/7d9wnPQGXU0JKp5lwPvX18rwt9YbJOa0PDGM/VFEqdMtIwlV
3wj63I5d1ND25VxrAtp5+qRUCXY7b1Crf+RrVDCQ+jkDe9pEta/4fDyKUfcm
XmIr9CfO7Op4ifYlDWy9j20ofp7h3ItY1MMcy+6G7erIwulv/gKlTmyNvYad
O+O8l9IThYyHM73OYzerihzcFf8cTVH6W3Sw6b4/1fStI1H35T2fNLC5aoO0
Hgg/Q5kBnidUsM353FKvoXD0KGDaVg77RXzPx+bjTxF3ccK2/dgdEsd/KtY+
RtL3Hl4Sxd6anzEapxWMtpwp0BHEPn+Ee+OG7w/RwXeydfzYkV/cBK6eCUCM
Kox/N2P/OPdbrqnpPpKNUw7jwhYuCohwSPJGZyPafrFhv6ozQAppHmiG2l3M
gr2jT4i+9vY2ygs2kmXClh76pRpj7YSGbTVgI7YEp+sL2av26I9bOoUB+367
ZPuuGj1U9SdI6p9lePocmQ8oQuDXQaZ/7pj0T+RdMIdJh3KPfybO7Zu6edsB
sji5AjZg33uuVe+k6ArC/N0SjNhrvv+9Sjx4F2Kmd11i/nd+x3fOP6W8QG1f
mzIrNqPp32ObJPyA79R8Kgd2jUjIo9e8/sAx/TCLBzswRtRVOSwQOKke2lux
tTgrzFs5HsEs8cVXAHuTv8lxp5AQKCZd1duNXTdP38+8KRTOlxkXiWM/vhHM
lxgYBgwO/oUy2OmTET6CDyJAciNJVxH76lUph5K1SFDKFj5xCltb1MMi4FgU
9Kh0v9HHluyr0Tfwjoa4kqiX5tijRtbKo4svIMGgxcAFu54rS7pU5SVwB8jw
emFn183tDvSIA9k2ratB2M7qEazCs/EQVnu5Nwlbb7F3ZfRQAshuh6UcbNmi
/ZOltxMhaCQg9xP2QtQATXIhCRakib+92B/Y7/2qvpsCSRoxJqJ4vyQd2PYz
VzQV/vbLNiphBxnk/ohvSQX91A0zZ7CNY4Ya3Peng2tnmaknNrHnbLVUXybY
VPVd6sbu1CSh7Y/fAsuhKttp7Mqr9z8xKWeBqL0/Bzfe/0/eF5X9iciGG5X9
t05hS6gK5UZq5gD7dwu3CmxOq9J3fpM5YKf8kvobe9rXMMs5IRe47Dm5VrDt
BquN9nrngVJGirU6jkeykvN6q7/y4XrhT+EG7O+Ftpr5IUVQbSBAZmLG9dIX
mZp9/UXgelxrz0HsvI7F4wlKxaCOLjFbYMcsPocnQ8WwGqJYn499GerUrhwr
BZs+rWPXcbxdr5eTF5j8AO+KOXzncXy+3buaG366HNJ/fz4ow4rz83i9LEtC
OYxfoD+0x27kvSIzrfsRhG+LCjdjx5m+3NeUWgHq3mtTOTgfHB7cIPzAHIGx
yWJbGAe+/nKzSbm3CCbEha58x5aIfF/bv4gg/XTpfSZOAjjevDucpFcFflt+
GXljrxiY967Tq6Djw2Hz21wE9OXl7kfy1RB85GuEB85fia42tcdKa0H7wuau
IZz/4q3YcqL/1sJ9ppdtslsJiNUuejG+6QvciTmq44UdIcLu9Nr8C/gazmfy
bcP750fx5tXFL7AmR4jp4HxrL8dlW3H0G0iO7EtuxPl5L/FxUa36O9jouItL
4fzv3XQycGb8Ozi2LSk8we7IauDOEagHi+jlShr24yu/9+65VQ8nWV6dy8f1
BNGzpLdJpAFsDmiAxh68Pr6oJv/0aYSpuZIiN1x/WLwq1XVWbYG6O0/zFHB9
o5PS3aRv3gbXuJOEO1QJOKXHxzhb3AlSXKs8MRcICLftvC9X2gvcLP3vJDzx
eqUdBVJjL5BS9WIzsX3/S159NdgLnp7d5lK4XnN5fsNrE3cfaCwamRzwIkD/
G6Pbn8t9YHSHQUTeG+f3g3JXQ/n+gMvecaGD93H9sxasR7nxF5gmTzSsPsLn
f0LnSAj4C6JFfi6euB703WFcf/7lX0hWk/g2he2isPs0qv0LF4Mro0ghuH4s
tBBp4OoH88CAh/VPcDwhEwLJl/thtn2m3//f+yl9IS4DvgHQ9nienBOD47Xs
AP9twQFg/nswnf8FXu9caSJREgPAmxCm54u91CCj2KU2AFn2ToFnY3H81Dlq
aXdpAOp6I72HX+LnedLyrWvRABzICSNteI3nU+XlqWemg1C+UURyPBnHp+3W
5wrtBsGux2C3Nq6fp+dELvxyHISurTpvkrFDizOdBfwGQUnd64RpKgFIoez5
m4xBiNhmNFyahuu9A50D+QuD8N1mZvESrsfH92zzbYsbgjlKCL8FrudV7r25
9Tl1CKKcne+kYPu3H7iSlzMEXmMntWnY/I+0zoZVD8Hro2um3rg/UKd57NQd
HYK9XX9nonPx8yzpKfmsOgwj67+jcvJx/cVzNSvv5DAclHghOIEtdn36daLe
MMiEcmw+iPuNsl2cD33sh6G20/TYe+z++8fOq4YMQ9nP9fDkQgLkzyRN5HUN
g+nbq/6uuH/xTpUZShwcxn2Sh38G9tfVso4w2jDMyR8c/tf/WOS1fnJmGIFP
Ge3ftXF/5L+NMVRScgTK5xvYt+P+qdEl3G+7wghYkUaYdLD563bdYTmK/fqA
pRd2lpeixfC5ETCoDRX4jf3z7xXJJI8ROBvnVx+F+zFh1ald4Q9G4KD+SuRn
7GuRvjy+T0bAvUy5YBx7RfPFnGXiCMgoKE2dxP2eWFZd7fZvI8B70OkKBfuu
m7R9OD8JtDKY/Xlxv8nPPlFhuocEu/ji4DB2WWLBDmEZEsSmSe//15+u1Kv+
eHecBFOuf7z/vW/y36MN9c4kaEwo5d6N+12xUo5XzzxIIPnr2tZj2F/OtsyZ
+5PAm1kPLLBZPU1zyC9IEHhYb0MkdljzZSHmGhKUBUQIz2PLXZb8r7GJBLpf
jihx4/68dXGs/XkXCdS3Wzv/e7+0VfxOqCidBMUGGXL62CXlShTqAgm2Ou79
ZI9tZrB0Mp+RDKzzHy+7Ycfde7AMAmQoWh7d8AL76OZTZpvEyJCk0jGbjt2X
zlrYLEsGljuPNpRg+x5t5I5RJUNwyH6xWmyRtnBHa00yTD8hW7ViV189/1Xs
HBlmy2lZfdiXVvlFaRfI0PPoMhcVm+l5j0/hZTLoRnkFTGOnSyZ0e90kw1y+
Becqtnal/eETXmS4NiiXwVxJAPW8+DO2h2RIMN1/ngv7MZVC+xFOhl4XV56t
2DJ+77Rj48hwrlzhtwB281bXVNs0MtTNxRcLY9/MOsSwL48MHry9r0WxeTXm
LenlZIjZI/RcHLvgV3lp8Rcyzh9Po/69LzJ28t3i84MMnh4Wb/69T5plOHFT
8zcZDrfnl/1zTAxzw7+/uxWYfe7+N15F5rvET4IM7asljP/eV/V8DvWPWybD
O3rV4b3Y98wM/tizUHAdzHVzN7bg+Ba1/Zsp0CrdkLMTu9K/M5rYRYGzyZIz
/+7HbseryVIJCqiUGqtzY2/IsdHzk6dAqaNvKAt28knRt1pHKSBKbu/7N1+a
3SNM3KcpUHb/kfwMNsnlrd0vQ/z54i9B/+b7EdONingrCsRKo95/z6P+4Mwd
6dsUiDqV8qgG2/lLacuUNwV6NtB7irC5LO9Jlz+iQKJckXQatkHQxiHt1xRg
aXCr/vd+aWrXV3XeTArEPP7B4oodlR8S11lAgfpLjqessDt7eY0c6igwmCOY
I4+t++RKl1sbvn+TMAdB7ArVcpuAXgoEfbNRYcFOirnklERQoPm1j3gnXt98
p8omc5Yo4M/pA5XYgdOcnp+YqKBrdcw1FfuaQUlgzw4qaPRc2uKC3bPGzkEV
pYIR+V6gIfbZ97bP5mWokBNZxqaILc/OlrD1OBVOv2LSn8P7canGslT/OhVE
qnOyb2I73847Zn2HCqOWBdlnsP+IMNc6+VDhYGV6uQR2tU/Oj+BneHzh9409
5bieUt4wWv2BCv772vcfxl4bMXFtraFCvJRqOBu2a1TW3N8mKkgN2q314vhh
PHmecXWACtcWLs7fxxbMThdUZh8FyaHdJz7h+BN2YTn51NZR0BIIHgrBZmA1
2G8sPAqvtj4OMcEevrx4+JbCKDCcruun4vj2XvjsuWyLUXDrlc5iwRZpSvr1
4fIoXF21tWnA8TPy3qxlncsoRN1l4wvHdu9KuDbiPwruDtJ3/71/Uo+cfLA7
G4+3Lt3Bi+NvnoYWq2zxKEj0vSlpLCJAdCIu7CgahUKhAf1gbJazmq8u/BwF
hahmpxUc31uYXxQ9Xx6F9E7vU104/tv9d5S86ewYuB9goVrn4X75ct0vuukY
pHE2VG/EntY3rv1lPwYOS0tW6TjfBIk5v0nxGIMTalYtVJyP3rW8soSUMQjO
vhptj/PVovhyi/vSGPzpbCO2ZOH5531Uac1MA/Gyvpupb3G+XOZ7r8lLg1Ez
s+RD2CKtUo/5JGgAcubC+jg/anlbaOYY0iA1rNvyTjqej7YPZSOZNFD1EFT2
xfnY6tOpjMZCGnxVLX2y+IYA8czW6MJKGkih2qA72GU+1NsP2mmgobzgfCkJ
rwdJgQNCDOOgHb0+qJCA78/P842x2TgI8VqjcJz/a6SVH9cw02HhyKXAI7i+
sDlonDLJQ4e4CKm/0WG4/le4VbF7Jx1GztBm6U9xvFLLpt+TpYNFTr7x61C8
f7R3n1c0o0MSh3/tKK5fHK5sEkzLpIN5XkfH6UCcDxI73wedmQDfzEAuFlxf
JSfPfC0ymYCF9eKXSh44Xqdv7h+0nYC8Jycar7jj9ff+DB+4TUBHed6eKjcC
uj8i9/n4CVA0yve6fAvny64MuEafgCidY2ecHHH9y1ZBSdXGedrV6qmzJd7f
32Qdk/VwXf48w/+uBY5PQW/GEo3wuuS5yO+D6z9Tpkf0OCsCHAXv8QebEfBw
3XAmwhXv4/JQh6fn8XqdJa974zrp8cBSrvEZfL2DW7abUPB5l5mlW3E96fIm
KNZonICRorHEdyoEqNktChhM4bzl9eh1kDIBbX1/BM+s4O8R3SmndBjHv+63
osd5J6Fsv0xigBxeby0ge0BlEgr0xFk7JQgQqnA6xRw8CTGzfTyWfPg8AktL
Lk8nYZNukR6VF/c37sF5XZGTkPRNvPQurtdXDqbtevd6EviMdrOF4Pq+J+XP
pFHhJHiwKYe/xP1HzBPDhKQ/k2AcFf2memYCuC2V548cnoLMZ1PjbJ8ngKXs
y7s0tSlQr3395v2nCVjdanyRR2MKHOLWXPTKJ4DW7No0qDsFzhk0/QeFE1B/
IislxG4KjInQsQ9pE/BISsig88kU7qu+tjuHTADD0sa3twenQGXaY3OD3gTY
DXVP+5GnYOVXr6ic7gRUNeapP6VNQZfd7ehnWhNwP9GmPWNuCtyajrzQgQlY
1yxf72WfhkayQ+9TuQlYC79levrQNBxtqx28wjcBK+L9jIKB0zB6+ZDp6Z90
mDf8ZPNFfAbmOLbTr+rQwb87t09degbUQy9Nu2nSgds+2apMbgZGxe5K+wAd
JFwfWWQfmYEKwxf7/Q7TwTjM0PSZ4QxUscI2nT10yKsf0bP2mQELbw3bqflx
uH6S+xiutUHlCzNj8Jtx+K1ou0s8cBZ0rzBt2ztCA4fFwzwPQ2bh7AkWB6a/
NCA+cTKOhM2C+SGxa/1dNGA6XT6a+nIWNkrM3QlupIHshW3lYrmzYCd9wiwW
79v7Pg3mYj2zkOQenlt0nwYSX5Vj9srNQWwOt1Y9Pw1czXg3i/bOAf8ra9YS
+TG4mHkwTnxgDiTeB1PfSY2ByaL+3v2kOWBwDfRM2DsGaq+eHpYj5oBpySLq
1rYx3AewW6gzzYM7Yr7duTAKcQ7MKRYy81BVeEghsXIUau8uKT73noeogJpS
Nq1REIgaNmcSWsB9oiWKO0kFlYDd/G6iC6CRM7N+Q40Kprctfg7tWwClqAwe
NXkqRBr80KtRWIBKv8DHFcJU4OSqOOGvvQDD7++4Oi5SYO3hcxkGtwVgKQ5l
dHhPgWGPEwwr9QsguHt37kceCuRYJmVMey7CQgRlZ0sFCRQ79y6x+C6C537J
XzcKSPDRKOPszoBFiD8uosycSYI6nZxJjaeLoJ9o0C/0nARDyhVHwt4sgoVU
sM7cNRLs2NrVIlm/COmMIl6whQT+jTwL1ruWoCSdO5Pv4giYHfPTrvu0BILb
HKWyyEPQO0viqa5egjJPdr8nv4fgYo5+58dvS9DI5RJ1uWUInHcLO+S2LoHw
x17aaskQ+G/4FBAzsgTatRtrGh8OQc6XpcrLXMvQ6y3g3LFnCJj03Q9vsF4G
q1IlHrfzg5Bvc0NUbWUZzw/bbPyrfrhYTAglbViB4Jen49lD+2Erp5sAy6YV
2JkQ3O/s3Q/uH7x42zavgGZdz24e635Q2xq8dn3fChiZpcV8F+qH6u/JPS+N
VqDrXus1YbW/0K7YFbmYuQKKn6ZNNMX7YIH9JOMHk1Vg8BbbNpbbBXx07qhq
i1Woau2U5XraBdKtPWKNtqtQ9NHmyXbHLrB5cVvr7/VVyIt40TC8twtq9iaH
MPuuQtS1kHjbmE4IO7qB1ygdjxfJnfzm3gHiLkhwbA4fd5rnpIm1g1HrESWh
2DVYYO6wPHClGdiPcHyueL0GvOqfvP+wNsPn1J4zVilrkGSZs1fnXRPIef5n
/yoH+47xXt2pRuDeXRoq8GUNrhlHfJzxaoDvzgpD26bWoMzX/0C5bx1osO6P
4D67DpRK9bfX9ath4dbCzhzDdTBY+vCrh/IZcn9/S9MzW4f7s2O71vw/g3Cu
w8fQi+u43q5fuFBSBSsmqST2/9Yhwm/3KlKohNKU3cc2pePxB1f8u5NKwYVr
4lt69joQSiF91Q0lIOFRaaSVvw4MOdf0WeeKIUrX+trDinXg/ZxskaZdBLcn
454z/sTj1QxNBEh5IGXpKJzShY9vU09o58iDgVrVtyf+4M/3Jvu22OeAQWxX
5QPqOthl7a+WmMoC1o2ZOnsmsG/siDVReQvIyaO9amYdNM7e/HbQJwPcf2nZ
2i2tQ9KeDuWiqjT4v//XhP//f83/AYOP7sg=
"]]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-2, 2}, {0., 1.046425623785727}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{{3.661355400057754*^9, 3.661355484875826*^9},
3.661355639112556*^9, 3.661355814416032*^9, 3.661355846086014*^9,
3.661356479643317*^9, 3.661356528448374*^9, 3.6613566579978237`*^9,
3.661356704202601*^9, 3.661356799715898*^9, {3.6613598769263163`*^9,
3.661359963203663*^9}, {3.661360098302494*^9, 3.66136010577055*^9}, {
3.661360265106131*^9, 3.661360282741428*^9}, 3.661360759824787*^9,
3.6613633755406733`*^9, 3.661363488854203*^9, 3.661364142829502*^9,
3.661364488455009*^9, {3.661365321161644*^9, 3.661365326441318*^9}, {
3.661365370125573*^9, 3.661365408747449*^9}, {3.661365458553314*^9,
3.661365471788363*^9}, {3.6613656409902687`*^9, 3.66136566362761*^9},
3.6625626531689043`*^9, 3.662562711941856*^9, 3.669308950265973*^9,
3.702938980590547*^9, 3.702940534222314*^9, {3.702941228804873*^9,
3.702941278008635*^9}, {3.702941341788973*^9, 3.702941395720881*^9},
3.702942913560527*^9, 3.7029870194677267`*^9, 3.702987066405884*^9,
3.70298723872289*^9, 3.703004639872552*^9, 3.703004708814828*^9,
3.7030056330961123`*^9}]
}, Open ]],
Cell[TextData[{
"With \[Sigma]\[Alpha]=0.85, this one species case would be a branching \
point (i.e. we would expect speciation) because the following is positive, \
but this will ",
StyleBox["not",
FontWeight->"Bold"],
" speciate in simulations with random mating:"
}], "Text",
CellChangeTimes->{{3.66135964140793*^9, 3.661359644255671*^9}, {
3.6613599655973597`*^9, 3.661359975882709*^9}, {3.661360044227745*^9,
3.6613600812408752`*^9}, {3.669213607819154*^9, 3.669213710515926*^9}, {
3.6692138012391357`*^9, 3.669213820419384*^9}, 3.669320115152977*^9, {
3.6693321998621264`*^9, 3.669332210723011*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",", "u1",
",", "0", ",", "nm", ",", "ntot", ",", "0", ",", "Km"}], "]"}], ",",
RowBox[{"{",
RowBox[{"um", ",", "2"}], "}"}]}], "]"}], "/.",
RowBox[{"um", "\[Rule]", "u1"}]}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], "/.", "roots"}]], "Input",
CellChangeTimes->{{3.6613595685591793`*^9, 3.661359584469429*^9}, {
3.661359624203629*^9, 3.661359627019671*^9}, {3.661359665394278*^9,
3.661359709153092*^9}, 3.661359804535282*^9, {3.6613598575885057`*^9,
3.661359924152072*^9}, {3.661365416938882*^9, 3.661365430544819*^9},
3.669320115906549*^9, {3.6693294825891323`*^9, 3.669329482848838*^9}, {
3.7029412851765537`*^9, 3.702941285512187*^9}, {3.702942262047165*^9,
3.702942269628446*^9}, {3.7029424305881653`*^9, 3.7029424467161207`*^9}, {
3.702942761701954*^9, 3.702942763498736*^9}, {3.7029427995744343`*^9,
3.7029428005868187`*^9}, {3.702942902419614*^9, 3.702942910144314*^9}}],
Cell[BoxData["0.3840830449826991`"], "Output",
CellChangeTimes->{
3.702942447209043*^9, 3.7029425506770487`*^9, 3.702942764345736*^9,
3.7029428046334248`*^9, {3.7029429115604467`*^9, 3.702942915593504*^9},
3.702987019622961*^9, 3.7029870665441504`*^9, 3.7029872389435053`*^9,
3.703004643084086*^9}]
}, Open ]],
Cell["\<\
Skewed resource distribution with \[Kappa] = 4:\
\>", "Text",
CellChangeTimes->{{3.661355671688161*^9, 3.661355676367598*^9}, {
3.66921389096352*^9, 3.669213896615259*^9}, {3.6693294853012857`*^9,
3.66932948562987*^9}, {3.669332271836622*^9, 3.669332273814839*^9}, {
3.669332319684003*^9, 3.669332322616048*^9}}],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"try\[Kappa]", "=", "4"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Beta]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"roots", " ", "=", " ",
RowBox[{"FindRoot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",",
"u1", ",", "0", ",", "nm", ",", "ntot", ",", "0", ",", "Km"}],
"]"}], ",", "um"}], "]"}], "/.",
RowBox[{"um", "\[Rule]", "u1"}]}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], ")"}], "\[Equal]", "0"}], ",",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "u1", ",", "0",
",", "0", ",", "ntot", ",", "0", ",", "0", ",", "Km"}], "]"}],
"\[Equal]", "1"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"u1", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"Km", ",", "5000"}], "}"}]}], "}"}]}], "]"}]}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",", "u1",
",", "0", ",", "nm", ",", "ntot", ",", "0", ",", "Km"}], "]"}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], "/.", "roots"}], ",",
RowBox[{"{",
RowBox[{"um", ",",
RowBox[{"-", "1.5"}], ",", "1.5"}], "}"}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"u1", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"u1", ",", "2"}], "}"}]}], "}"}], "/.", "roots"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]", "Dashed"}]}], "]"}]}],
"\[IndentingNewLine]", "]"}]}], "Input",
CellChangeTimes->{{3.661355380776771*^9, 3.6613554716473618`*^9}, {
3.661355628776557*^9, 3.661355652123377*^9}, {3.661356708092615*^9,
3.661356708772687*^9}, 3.661356833022089*^9, 3.6613654796512127`*^9, {
3.66932011872325*^9, 3.669320119390436*^9}, {3.6693206718162117`*^9,
3.669320675567388*^9}, {3.669329490244932*^9, 3.669329490497983*^9}, {
3.702940498686404*^9, 3.702940504168182*^9}, {3.702940988867805*^9,
3.702941054525552*^9}, {3.702942818857579*^9, 3.702942862573966*^9}, {
3.703004743130705*^9, 3.703004778065373*^9}, {3.703004812334735*^9,
3.703004867207806*^9}, {3.7030049686590633`*^9, 3.7030049735526133`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"u1", "\[Rule]",
RowBox[{"-", "0.5640230744006248`"}]}], ",",
RowBox[{"Km", "\[Rule]", "5668.7485526713535`"}]}], "}"}]], "Output",
CellChangeTimes->{{3.661355400057754*^9, 3.661355484875826*^9}, {
3.661355639112556*^9, 3.661355652463122*^9}, 3.661355814482313*^9,
3.661355846117831*^9, 3.661356709120061*^9, 3.6613567997809353`*^9,
3.661356833435248*^9, {3.6613600984042273`*^9, 3.661360105837563*^9},
3.661360282862611*^9, 3.6613607598968887`*^9, 3.661363375606657*^9,
3.6613634889532537`*^9, 3.661364142897287*^9, 3.661364488554109*^9,
3.661365481187899*^9, {3.661365641057138*^9, 3.6613656636936007`*^9},
3.6625626532367277`*^9, 3.6625627120102663`*^9, 3.6693089503561563`*^9,
3.702938980719451*^9, {3.7029405010025177`*^9, 3.702940505287178*^9}, {
3.702940992116417*^9, 3.70294105510601*^9}, {3.702941250845104*^9,
3.702941256678533*^9}, 3.702942823418993*^9, {3.702942854571034*^9,
3.702942864191255*^9}, 3.702942918728443*^9, 3.7029870196904793`*^9,
3.702987066613407*^9, 3.702987239013006*^9, 3.703004750570527*^9, {
3.703004845637302*^9, 3.703004867668304*^9}, {3.703004969497006*^9,
3.7030049741135187`*^9}}],
Cell[BoxData[
GraphicsBox[{{{}, {},
{Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwV13k4lF0UAHCJElIkWUqlLKGUJGtHkbQpkiSyRCFbkqSylayVSkKiBSk+
aRPCVYSI7NmXMcbs887YQum78w/P7/G699zt3HPXu/pZuwsKCAhY4x/8344N
yitXd42jnzWP4iPmRkDE2Mhh+sU48lC12f+lggxeN+fKqJnjyGuho5ZHIxl+
NJSu6Xk8jqh3anf+6yVDor3+YNmDccRkdRB/f5NBNljXNfLGOEoYXFoL2qOg
9n6rx9Iz40hn8GU/6dkoWGxSDtygNI5yyhKyJYMo4LCYvdFecRz9+PmKKxBJ
Af/Roo5E+XF0WipKknybAo+eWeyclxpHAsWTM1HZFKDIec92LRxH6dPXXum3
U+Cm6PvwO6M8tGjvLT0vrTH4wjC5PZPLQ69deg4b9o9B+/clu7Zm89A1PxHd
0rExoL5sZZ99xkOVVIV9W3hjsNzN7Wh7Kg9puz4Tm1pEBee+6BVv4ngoSC5l
m/BWKsz/aEp18+ahAokoL/VwKhgUOOT81MJ/t4uzaJWlwX8dy7d+1OAhI6Nr
dY1KNFj3t7okTZWHVH7rM8s1abDo0OZG97XYdKuD10xo0Er7Oz4nwUM5Pk1p
Aedo4KWcuVuNzUXWmf9Ylu9pkJY+3Beez0WL5I8FLTOlw9Lqh2fP5nJRTb/W
7PuDdAhn7CcOZnGRzQ3wsbShw1mDdwtXpXPR69mwfe7udNDuilT/L56LJPYL
dClE06F+xcbgbi8uOt2W+eJDHR1m486u0N7ERbbNDiXtZgwouOn3TV2Zi7K0
h+xUDjHANTT48ob1XCTy8sMpv2MMqL8Q1ysth00+kDfmwoA0u4IX0yJcRFY3
OxoQygB9lant5VQCZWS7x0x9ZEDwlygbi1wC+aso9HIUmaD5+c6i3VkEIvXp
NxspM2How6Ni/acEcm6bl4vUYIJF7qvVGikESrStqZ3cyYRVdxvJS2MIlLR0
+GjkUSYUOay81HaOQGYDzmq64UyYnM56eFqVQBaWorJ6PUywj/n0KH0DgYpd
L5ibDDKhUrY+tWctgcS33o7cQ2ZCgj7nia0sgUIj7PV2sJmgdFU/x3IJgfLl
Xqi1L2DB0z+Pfa53ctBpXW74H1UWnFjCfmN8moNeO1q4yfmzQEl9xYcSWw5K
Kb036h3IAvYBveIdRzjoUMn95Z+DWXAzIbJyswkH3ZkyCNoXwYJ3y1a1rFHi
IE2zToH191kgIWPC+zvKRoUyqkt737GgWum+ToUPG4kKB6yJI1hg2Xmb/sid
jYYC3kjFT7CgKzb26QVHNhKQW+Nx6zcLmES4uPJhNqI0zlp4C7BhBfIjx2uy
0a1ozuXJZWxwPXU46SSDhf6kpqsIbmGDQJLIxIQHCyl6GbSpnWVD3D6h103O
LCQ4H0EO82SD9Nw/p1w7FrI36J9p8WaDmut0wykLFgqoPWR27iIbjmylvPiq
ykKJAmWDtuFsyPhRdSyRwkQBMVWulqlsMBQOe6/hxkRZZrsuo1r8/5TbSxId
mMiA+S/Wqp4NMrXpThM2TNT6oLZm8AcbiJhSsfK9TJRow/lBtLAhR3zqjKUq
Ez0tbvQf7WWDlLSP9AU6A9X9aNBbzWEDVenUpSJ/BlKTUTnXJcWBzoVeDfKe
DFRfMJA6Jc2BKnLw+jAXBjIqeHFWchUHMnKSG/dZM9BXdm2vkQIHjqm3Kndv
Z6Cu47vun9/AgYpt+zvnpujo6aWXqzS2cyDJZOfO3dfp6NrpNU77j3JgYQ2n
v+ESHeUv1Ur6bcWBgIO5N2196ah16Vpa1jEOWNnKtZ53oqNmL4/5CVsOSHjP
eSfvpqM/Zky1i44ciHmEnjOE6chXhClK9+TANfY+ieQ7NEQWfKvQGc4BxkWB
j+uiaajsq+rYlkgO2M8Un8oLoyGZRoEtUTc4oC+k/qrSn4YsRcb01G9xYEpO
3IxhTUOVD+8l2sZzwH9v8xWTVTR0NFMrz+AhB86k243SM6mIrtR0xvQlBxI/
jBm3PaIi+VHi1blcPN4fQcmf71LRnaCg07GvOCD/N2lfQhgVkSxpa7/lcaDZ
seXVZicqKu6qdlYs5MCutQd8/RWpaPaz8Sf7Yg547+yusZOhorOOh3xOlHAg
7YjH2t0SVPRUhv3NqpQDk2G3miXnx5D075LzUMaB/KGv2u/7x1Dp93LSPOKA
3HPD6cn0MVTZrWsqWcsB89L6IwNJY0j+jl4mDTuw9WRuTcIYuua+txnV4XgE
g08+ujaGFKkj5e71HLh15sNnPQf8fc3dNSmNHJjYuDn8qsIYKlinmJ7axgEl
47KuMyvGkK6NVMnRdg4cPX5w2yExbOfhXuEODuRFeZJWz1FQz2Yx8OrkgCsl
26yih4JsVkr9VOjmwM+XiksWpFFQnExH/sYBDjizKhcE3qeg5xbGTu+xedpn
ZilxFGQQRokwGeSAdMVLxo+rFGTS4L7edogDdu1bm1IcKShgcamoH4kDJAHT
B1vXU5C19tjdkxQOXDQfjX8hR0F6P6xON2MLJUTflJGioJu2Cl/3jnFAddWP
S38EKSj/Ks1ak4rne/NxuzryKJLVFOqm0vD6nzy3xjl3FG1JYvutZ3EgOnOJ
TNvTUXSWdO5FJLbsaJ6EeeooMkvdlkjCNvQn/mnEjSK9/tiMDDYHwm9dIU2f
H0XNIp0NiwkOSP5Q6PVyG0VUkTOLnbCfS1a09TuMIovI70s/Yn9LF/xWdXgU
Obi33HDkckD0ffzLu1qjiIysrJ7yOPD49+angmqj6FrwznVsbM1dzSmX1o2i
vswdDQbjHDjyXTrulOQo+lAhVNGMnTT4xFt1nIwsVfytORMcUBQv3IaKyEiJ
UikxM8UBX7Ja390CMlo+U5FjMI33a9mzW845ZCRqHLzsKrajz4PeBclkxB5L
d/yNnd4UFGV2iYxMfLp3jP7mADOHo7XSh4yetlPS18zg8Yd59Iy6kdGfldE0
G+weLXutaBsy6nrdaFyJLXfPuPv7djJ6bqknHzfLAQ/PohtpGmSUQMqfLMEu
3q215fwGMlrdotxAxbbjrbshvoKMdNeCr+kcB5KPCW0+whtBlpG+vUxsisb1
X2vpI6hmrX+j9B8O6ApNRRDDI6hVN6LRELvjw1jnvZYRFMMoXhCNLS3TEN5e
OIKYOkFhUn854MY21cjOHUGuGVMq27E/1JR1XHo6gqpZ6oQ19rHLBeqrEkeQ
JsmVexf7+RHVjrHoERRnZbTlP2ye6tOw4rARNGVwKfk79v2ue+0n/UaQ/9FM
3j9sUqFomPq5EfTB4SRDbp4D22JvbJo7PYIEXgjJbcdu1r8Umm6Jx9NWsPoM
9rLHdmqDm0cQqTJocSn26YstrW+UR5AKi05rxC44eOB6+JoRlLFKRXoY2/KP
Yev6pSOoz8d4v/A/nH/bP1zjCY0gmfjPdjLYrPzNqlV/SIgSY1aigp3guPaa
G5OE6PKvgvZi9+1IUdlBJqF3SXJdx7A1JSRbhPtIKKuk4oELdkOFoMrLBhIa
aK9Quoot/+hq8+UqEnJ+/Gz2FraX30SIxWcSGsqv23EfW3Qd5SftNQndsRge
yOG3ny7SMPSchHw/eKoUYv8np1HzKw3H8+zaYDF2aPLhL033Sej0Gx3xL9hH
V/iXfYsjoerx1wV12EqJ9z+VRZLQnvmpup/Y4+If370PISF2xxbHTuzq2F//
vQ4goYSZsz592MmLZnOfeZHQVqd3c8PYHjdWZ6W4ktD8RSXRMWx9Aci8a09C
rQq1aQx+vNdd0m5Zk5DA24I3HH68MzceXj9AQrMLKQfGsQuCchID95CQ0Klg
3ynssPG6+PMGJERc8Fs9w4/Xn3HLVZuEKq602c7x42UtjTypjudHNm/tX+wJ
z63XjyqRkIPHXPA89jeKdfA+eRIK+V3r9o8f75lLF3dJ4flqkBrl22Poke8O
UdyfXd8c3waOpZ6agiRUFL0hj2+xnj63DbPDyP/T6AS/vT7bf07yvGHUVKTY
y++voG39KUn6MKqprXP6gx1+1MxWhIS/z+i7OYtt1XjW6l/3MHrtbHXoNz/e
A7GHplqGUX326uJJfrw1eftY34eRRZB2PQ+7xrRpD/nLMAo+GHWTPz8plYRx
b8kw2rpsEY0/f4alO3S+vxpG5gaHi0ewxXfaaVU+G0Yy2SyVQeyB9yHqn1KH
UY6Q/74e7Mj/0Lrs2GEU6leezV9PG3WSQnrEMCqbPD72HVv5pdCqB1eGkcjZ
86Qq7Lqn+5dGeA4jm/fJ4p+w09Z4iwS7DKPKYB/g76fzaXcW+p0cRh6/92x/
hS2R1DbjsH8YrX5u757Gbz/akaK3CceTPK0Sgq0iFD6stX4Y7dGIe3gBezr8
eZ+K3DCqONXW5sFvP2SsVXoJ7t+ztsYWe8jnAiKoQ2ir/p3irdjeNlEpublD
yNlpzckBfP6ezZduV382hIIlNY61Y3fmEk15qUMo7kahYT22yd9Twm/ihpC3
cmH/R2zpHO2Aj974+6rVCQnY5dODB79uHUJllWFVeti8ZyvHTDcNIa/Ncvu3
YKseOhj5bf0QmljU1roB+97TouI6qSH059zYtAR2w335gxm0QSQrLPrfKM43
q3UvzX+6MIjw44r0EPtW3JDOZ9dBJL/p/N4EbGLg4PmKY9hSoZWR2NXRSl3V
OwZR+8QeYX9sn+6fb1tmBlDijhTGQeyuzYbUdvoAarLi6Jhi74nMUezqHUCh
wo+eGmDLaFyPHygfQBTDZyObsCuuqbszIgaQRGGPvii2WsvDx+yAAUSe/10k
yM+PygtauWcGkPnHbqc5nI/PNv3a9XvvAJrIvaHPwm5WMr00pzuAKgLSvCnY
BpcL8uZVBxC1TKJ5EHvZuig81AEUbPREsw07JJCwFJnrR16ic6qN2OS6U1Fi
zH6UEWtsV4tdfEGbJ9nUj7Tl6afKsJVqnqitRP3obOPtbZ+wE+SXOMkW9iP7
S7Em77CdqwYbFO/j77exJV5h7zP+7d4f0Y/ai3wuZ2Fv+bRcIP1CP8pKfK72
FHvltk1p9i79qDiFtSEd+8/r3TpyVv1InPOfVwr2yEb7pl8m/ShoxmQ+Cbs+
I8AjeWs/Sj8jOHQP+61svODxdf2oSfGQ5F3slPsv0lcs70fzLkEPErDDxMt0
W//1oepXv87F8efrVntzIqcPaRdX343BPizA8joy2Ie6khLF+febToiwsMTP
PlSakDAYha0wsSbzR0Uf2qUtIsq3oK+ufnxBH9riaHX7JjZtzLJtf0YfylL/
4MV3s8s5H5E7fUjqb8gLvj/1hi2uvY6/v8bW4/9/xvGUZ1E+fWg+6bjmLeyo
n4WGZo59qP7KZCi/f+/93zsED/chteeS2rHYx6qG/b4Y9SFmPcM8nr+exrNL
wjX70J6pqorb2Os/SWXtWt2HEs53pSVii2zT2PVXrA+lfXLve4DNeW3a9Xmu
FwXn59x8hN250SEghNGL8l3akx5jl2cEiuv39iJ5HRUJ/npkyd7Oma7vRctr
Wrj89Yq/n21SVNqLvP+J7n6NHSBe0RP4uhe/Z4X+vsHeLcCR4MX2IkrJJOLv
D7WQxa8Kr/Qi9WUHvldhL59Ya+rn2YvCX640a8AeGDt6mWnRi3jLPt3vxf7m
4imZp9eLLGp6PMjY+b0ReZ5qvcg3QfIjfz+H/Hw3SFnci4Tkdn9YgPe/y/6G
K9nTPYgyfcVTHNuiamSF21gPqlxlnrqKf54+SVsM1/SgdBthHy3sdxlBhb1R
PaiV9HmhO3aq7N0DaZd6UPCcbv5F7PD7L8l27j1IR2j8F/88W97qku0060HM
pW7lz7HpPgYRzQt7kCjTrJ+K3TJmrXB3vBsRweyyOexil/MfD490o+VZsmrL
cD65dTydVv+1G3XKsrN2zvPr+3mrbxHd+P7Rs7nLr1ckjTVTA7pRQsWwbDZ2
KOXqIp8z3ag+osPxM3bP3ZlS6b3dKJkoPE/DfkCa2OAm0o32jFzLP4jz555P
2+d3znShdwu+x7hjE/EBXWL0LlT95CwjDPvQDiLhfUMXat4XYV6ELRTDmBS8
24XKUzQ/SAsQ8M5BvbkzrAuJxrz5tgHbeZvn69f+XSjr6o4127HLeiinra27
0FG3vExr7EubSbXPVnahdKWvc0nYlNauVJP0X2iX3mN71QUEJL1cFSh9+xeq
lj85YYC955qtJfX6L9TPPdZtiZ2h3C6Y6PQLedTr3bqMfSL45/lBpV8oe0Y5
8Ad23Zoa49BXnehm3cfhm4IEBPGEZK3TOpGi2F3rJ9gba015yvGdSOmj8Yoi
7HD/LzmN3p3ILk4jioqtV1W2bM3WTrQ7K0XbaiEBrzzeD38u6kBmD7YwtwkR
0O6aufZgTgcqOS44aYUt4Bjv2POwA+0UN3UOwLa1OtP9O7ADTbhvd/qALWiw
omXH9g4kcKdkkbEwAfZiFyvfvGlHOVRCz2URAVHCTvO7MtuRzKvbsdHYhf8O
GDXdaUeZ4b9MCrAXTSgVM33aUXGlO/kP9ru+1jebNNtRvQZFOHMxAaIF2pkv
ctvQLZQxMiVCwI5cxX7tlDaUOzFSsmEJXo/nogpfo9vQFzHz2aPYRcmk5KGz
bciBu640H9s17P6dNcptKEXe3NBTlIDSo7zrj561oupBV88pMQK8xt86xKe1
IDi/7brrMgJSdbmG5+JakHfU7vbH2HVXtiqYhrQgC+OZhx3YygJvumdPtiDd
4JKTB5YTMCSeb+sl14J2T/wg60kScFwl5+j+lGYc/2059RUERLzTiZXQ/IlG
2k47Oq4iYEDv/b4asZ9IyMJfLQvbCG1bFMpoQru0ip0Y2FMNW26wXjch83ie
1FVZArxH1a7/2NSE7J6sT8iUI8BOds2FONVGZHaNVftHgYAtocInF21oQDli
JgYi6wmQL21+RBVqQHmrlbptsYWnHnfWU+pRoJRnRzZ2n4+2zd3X9SjUijNq
pkRAnKPTEVntejQVvd89egMBY0Yle9V3f0dRbbt/rlEh4Omct7alUy2ylKxt
uKtBwIor7WLJj6tQqXWu8I2dBPz+NyPJCalCj88RgwT2wK21shb2VaggIGyd
kx4BuUleG2dlq5AoFLUZ6ROwq1DA+HTyV1Qdsf/vHwMCPMc0fVXufUE3tcu2
Je4iIDRP9JnPUoTWvthZKGBOwC83b/U3I0WIPGNz8O9xAi6HqN/5/jADuS7c
kH/2MgGv7+qZZG19Am0QuaD3MQF3PCM6nSM/wfJzoz4nawhYOnHIMN+qCk4F
OMilc/B6BdboBN1sgLPXu/UbV3OBXXL46+W6FpBYXFLnb8GFnOhnzm6xHXBW
Qyfzph8XlKfyVgQ/7oZCIbt7Wo+4MPBubbmhRz+4xg6PMYq5cPzRUAwjcQgI
Y83+w51cuLPv/dIFqUNQt1DlQTV23XTUfZlnQ9DjUztr8IsLBnYa6bvfDsHD
3b4DKl1cUJQLevOoZQio3YfGZ7u5QE0T6zSVGobQlTnbk/q5EJKhuyH9wTA8
TguViSNzISM7ofxQMgkin39mX+VyIVDt0PNfT0igXv/I5xf2/jyxaNdsEnhz
SU+1eVyYKIw7GvyBBPIGLhup2AfLYkZetJLgJsM4/cgEF3633lwyJzECaWp5
+sunuWAlcP34q+gRaBWcCTvxhwsqN4wMdO6OwKTzsMMr7D/CfxRR8ghY/tJk
zGLnil2ltmePQPLBuwpP/nJhXubKVYHqEahZPFnXP8+F15svPTshQIbuj8J7
ji7ggdApH5bwFTJkRc0vnRHmgcJB23XbI8iQGRPLNV/EA21DOOYcS4am1Q6X
krCdFSRLSlPJoP7dw3HLYh6U93646VdKhqkouXxHER4EOfxR6J4jw31Kl8Zr
UR7QHOMP5IeOwr9dK3/PSPBAwDLwevetUYheSH1juIwHsrscCxfdHQVt/ZdC
17HNFbVkXDJHoTnuxs157OcDrcMrK0dBjU7q+bOcBw5O8lfCFlAgCY00UKR4
0OT86qX1TQp0lRMSfjI8iNwQZjAZTwH7bX5vn2LvoNg0PnpAgYSx5tkW7PTz
AuN9zylAMeVEbF/Fg/NBJ3ad+0KB3LYLTjxskQThjqvzFAiJuWbuJMeDMsve
c4qLxiD4hpBlPLaf5NvZyqVjQPPTmyvC7kx2WLdozRjYXzlhvlSeB9nP3p9P
NByDktxTTz5i7/nkIpgdPAYiZiTjSQUeTF3Z+XBf+BgoGcEjhdU8eGW0VI0e
PQZxh+Qe7sZe/rX4sNajMahdOXs9AXvwx7LUko9jMJXoLqi4hgfXSOVaTTzc
H6nom5YiD7ZmP/jqPzsGTbK6p49ij5zzPL5CkAouZmJp/tgHWNJX7SSpUPqf
79wbbNnf52tIWlQIKlhzRn0tDz4ulXec9qbColyroqXreEDRMM+8GEgF+5Nm
U6rYsgcChjlXqWBmLtm3G/varXp3ahwVpqumUgKxzf6F+HbnUqFs4+rODuyg
NS8LjxdSQcVZ3JSFnWvYxmv5RIXZg1bHhdbzQCxY43J9DRUCu5I9t2G3Er1h
n8lUsPXafSQaW2iZyNedTCoczV08+hhbd7OO0IdxKph4ZKwtxE71TIjJF6RB
T8lc5C9sZ5LRvSfraCDd+lpASYkH9wU82+TUaHBnk/rn7djVig9XJmvRgLV6
Wm4vtuopVuqdXTQ4+0Wv+iw2u+3J8zAHGrheSPqejb2O9508d4YG85MlWR+w
rZdPqQSfp0GxW96GKuyPhyzz/ENwe6FvxQexKV4hLGYEDd5MZAcxsWVjc7Q8
Y2kgT1O+OYN97dv8e5cUGuRLxcRKbeBBwYj6VH8mDSZ0DkQoYg8tOKFn/5IG
MoUnVqtjm+56U2ZdRIOcEmkjE2zRT07fTNtpoLvLbp0HtlFH/OLKXhqQNhdt
vYDtO/5pv9EIDRbxBkeuYLdoLW/S4dFgU8QJ7ThsQUuj5W9naBCaFtV4D1vH
28N68wI60DaaiKVip+RWdiovp4PSMQXfHOz6Gqbs81V0sDiz+kE+9h+y7CnF
tXRQKPeyf4e9ZeHeJ2kqdOjKnKr6hO20/sKgzBY6WFoW/izDToQn6x/soEOH
RMz1L9hfHb+fWWZMB2MN38Zv2BNXJ7PjzejQQlij79gqaeupiw/RYU+hyrFG
7FTly8EqNnQI2b62vhlb/O0Pkb0OdDA3NGttww43Uko940aHuOaI853Y47WX
N0V606FQoPphF/bZY40lTwPpkN4/dbQHu2dA6QC6RofE64ue9GIf9gru6b9J
B6O5gSt92JWTjV5/EugQc8l7jG+diA1z8g/pkLvs8SjfL8WvxOs/ocMsYRvI
t3xKk4JdNh0W7U14wG/vzoaN+UH/0cHDUNWU39+CN1eMHn6kQ9li6Rv8eAIN
fv54X06Hp8O7jvHjpX7b6Nj6DccnlPSeP55TViEsopEOUoX/XvDH29T38/qy
TjrsUvXdyJ+PPR7KElsG6CD9tkGHP18fx0MyDlHw+qQIdVRjq4U1bznPpoOm
hrBwJXa6qAqKnaJDweeS6lLsZclXj+TO4/XJlJD+iD2Vr+I/KsEAqD3gkovt
qXdNQGgVA5pqRZ2eYfdVtSQqrWVA14PVTP7+qOq59tZJiwHWGmPvY7F1z7bu
Dt3JAPPGYHY49muuams6MCBjbGnxZf76i7Txuo8woNhmYvoM9sIktRu/TzAg
KVnR9yR20NrQFaucGcDbMh9gie2ou0nHxp8Bdi531XZiN38JrQ4IZoDXAvlu
/nkwO9xucy+cAfMLxWX550XdLexSUyIDbO27TBZiZ3DahVkpDLj4PV59Ep83
yavqyWLPGJDeYvecgv37XkeRxVsGyP/jGtZhf0Mav7+2MKAwccHKW9h6ByNi
hrtxfMGuPoHY+Z2dsgIkBuh17z7mys8nrAh9Yx5u78mWWiMl/v3XFfJJigl/
G58fZuL8Mxt082/eMSZsilpevQNbtKOGBaeY4LZp9SNFbPntSwbaXJmwWOi0
8GJsfc7tirkLTKB/3fu+E+fH4HOPwg4mMsHXnWN9AXvqxOsFjB9MMPv898ED
nJ8XFTG5oe1MyPKVXRGELSOtRZLqY0Lgfj9NO+wdze+/GjCYkCf8YLMCdqBF
+Y24JSywefL3XDrO9zy9ZmF1cxbc0Sl+E4/vD8FHUlPlh1kg2mzWcA5batKG
YnWcBc+YK8JNsbe97a654saCOhPDjzP4/vHfNBL9PZIFuX4zB12w2XJTSzwR
CxjV8WvW4PuMMasgkavHBnGN/0bMZXF+qok+NGDCBrcLWmxJ7Dv3xuOk97PB
SLnieh++X7eqNSyOOMmGuj+FGv7YQcdDFtiH4O/XlVfew/ezQGHXhFgZG9SH
2OXl0ni87g97/YADG0+aBxfj+//c1gXyOfs4IPL7xt+L2MVz3nZ9RzhgZXRQ
WAv71H2zDgtnDqQUKKe/wPXDUzTetD6CA+mOreRbuP7QkLf+2vYVv3vNdjfv
EMd/PxfdroDr7JytvuE6uJ4RuerRsEGVgJoiVskwrnf87+z/qoHrbBNJkeA7
2PBRrNBwOwErmyoiKLheGhBMjD9lit8BFhLfE4V4sDojZc/jMwRIKU+tbML1
VUr7q0L5LALENQUVGXNcEKDGvVTKJUC2Jro6Bttj7nyGej4BWRQNljL2TqUt
CQYfCJijhFafnuVCp9+7c/bVBATSZGPrf3NBWuyzYhqZgL/LjtnFTXIhcfeP
BDllLizTcAt7zeaCecWL7X1quG69HYQXC9eHBld7MjS54CZaPdnOwv3pqKtt
1OHC/SM/8v8yuWCiGlO1xZQLD4kPPfsZXCDEzWZNXbiQb8ZSaRzjwpGuz+d8
n3Ch3HedSNgQFyT88vZUreSBW94P6YRmLrg/f7T8F66DVNWX58z85EJZx40B
Ot5HQieKC85iexo5hEip4Dz0rUsZmrhQvWTpOxddnJf31OTSGnA9neW7XuAE
zjthKcyNtVygdG8TME7hgfRCu+rt5VyoMCsuL5Ifh0YHS9v/XnLhzHCaYZTi
OFDXly0XwhYJvV5yTGkc1PaXWtrncMH6056PxKZxqNu44rhwNm5vU2O+uv44
iAuPxhx/juNfRnqccWIc9i10DBlI58LpbrGQW0njsNE5gHXvHhf++jjp2kpM
QCLdzjjkChcWLG5N1fg7AVfFwgYPm3FB1yLg6wGBKXjg8eWuwwIuzPblU1fy
piCldHlrVQkBZt51iYenpiCk6qezXzEBt+dG9KJmp6BYSFZX/hMB6+QVYicE
p0GNeu+9D17nfSdiN7WtmIZkF/NJsTcEJLW4eyXumIbOwD3eynjfbKlRZIpe
mYakbE9q/W0Cgo8bJO25Pg0b1x8mTicQ8IV83CgkYhqyUv/o8eIIsFl4O4EW
Ow1m7QsSZGIIuGoyp1mXNg26Cf7bbSPx+7n0l09U2TTs1KA7vg3C+/TA+Mry
ymmo0VRy0L9EgEO3RMVE9TTEFG1MqbxIAGd6r4Rb4zS0Vnyr++FPgMyODwV7
BqbBrUt2cZ8Xfu9X/7QNIU1D0Kw529GTgFfHGPNvKdOQQ/4oOXgOv6cDlI6s
50wD1fmu+KAbAbcW7Jq2G58GLcfkEUd8TpoTT2YmTk/D+KTMVK8Lfi+vu7Sv
bm4a7isNmp50JuDMm0TOv3/TUPil7EfHaQL+B446H9c=
"]]}}, {{}, {},
{Hue[0.67, 0.6, 0.6], Dashing[{Small, Small}],
LineBox[{{-0.5640230744006248, 0.}, {-0.5640230744006248, 2.}}]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0.62},
PlotRange->{{-1.5, 1.5}, {0.624451420442904, 1.133755592344956}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{{3.661355400057754*^9, 3.661355484875826*^9}, {
3.661355639112556*^9, 3.661355652463122*^9}, 3.661355814482313*^9,
3.661355846117831*^9, 3.661356709120061*^9, 3.6613567997809353`*^9,
3.661356833435248*^9, {3.6613600984042273`*^9, 3.661360105837563*^9},
3.661360282862611*^9, 3.6613607598968887`*^9, 3.661363375606657*^9,
3.6613634889532537`*^9, 3.661364142897287*^9, 3.661364488554109*^9,
3.661365481187899*^9, {3.661365641057138*^9, 3.6613656636936007`*^9},
3.6625626532367277`*^9, 3.6625627120102663`*^9, 3.6693089503561563`*^9,
3.702938980719451*^9, {3.7029405010025177`*^9, 3.702940505287178*^9}, {
3.702940992116417*^9, 3.70294105510601*^9}, {3.702941250845104*^9,
3.702941256678533*^9}, 3.702942823418993*^9, {3.702942854571034*^9,
3.702942864191255*^9}, 3.702942918728443*^9, 3.7029870196904793`*^9,
3.702987066613407*^9, 3.702987239013006*^9, 3.703004750570527*^9, {
3.703004845637302*^9, 3.703004867668304*^9}, {3.703004969497006*^9,
3.703004974419861*^9}}]
}, Open ]],
Cell["\<\
With \[Sigma]\[Alpha]=0.85 and skew, this would not be a branching point \
because the second derivative of W is negative:\
\>", "Text",
CellChangeTimes->{{3.66135964140793*^9, 3.661359644255671*^9}, {
3.6613599655973597`*^9, 3.661359975882709*^9}, {3.661360044227745*^9,
3.6613600812408752`*^9}, {3.66136339462226*^9, 3.661363404861648*^9}, {
3.669213833643119*^9, 3.669213845315988*^9}, 3.66932012045875*^9}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",", "u1",
",", "0", ",", "nm", ",", "ntot", ",", "0", ",", "Km"}], "]"}], ",",
RowBox[{"{",
RowBox[{"um", ",", "2"}], "}"}]}], "]"}], "/.",
RowBox[{"um", "\[Rule]", "u1"}]}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], "/.", "roots"}]], "Input",
CellChangeTimes->{{3.6613595685591793`*^9, 3.661359584469429*^9}, {
3.661359624203629*^9, 3.661359627019671*^9}, {3.661359665394278*^9,
3.661359709153092*^9}, 3.661359804535282*^9, {3.6613598575885057`*^9,
3.661359924152072*^9}, {3.661365416938882*^9, 3.661365430544819*^9},
3.669320121073862*^9, 3.66932066659807*^9, {3.702942871217594*^9,
3.702942881440555*^9}}],
Cell[BoxData[
RowBox[{"-", "0.20148613186881842`"}]], "Output",
CellChangeTimes->{
3.6613596291155033`*^9, {3.661359695178446*^9, 3.661359713074703*^9}, {
3.661359876961609*^9, 3.661359946402203*^9}, {3.661360098435884*^9,
3.6613601058703203`*^9}, 3.661360282892849*^9, 3.661360759950075*^9,
3.661363375672612*^9, 3.6613634889867573`*^9, 3.6613641429620743`*^9,
3.661364488588097*^9, {3.6613656410902157`*^9, 3.661365663726511*^9},
3.662562653269929*^9, 3.662562712075412*^9, 3.669308950378477*^9,
3.702938980797352*^9, {3.7029412511952667`*^9, 3.702941256956615*^9},
3.702942872372922*^9, 3.702942922360735*^9, 3.702987020007379*^9, {
3.7029870514046164`*^9, 3.702987066878931*^9}, 3.702987239276726*^9}]
}, Open ]],
Cell["\<\
Zooming into the single-species ESS shows that a population at this singular \
point is a local maximum on the fitness surface (not a branching point), so \
that small step mutations would not invade (but a large step mutation would, \
e.g., one taking the system to um = 0.9).\
\>", "Text",
CellChangeTimes->{{3.703005050203574*^9, 3.703005058338039*^9}, {
3.703005110767887*^9, 3.703005205212928*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",", "u1",
",", "0", ",", "nm", ",", "ntot", ",", "0", ",", "Km"}], "]"}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], "/.", "roots"}], ",",
RowBox[{"{",
RowBox[{"um", ",",
RowBox[{"-", "0.7"}], ",",
RowBox[{"-", "0.4"}]}], "}"}]}], "]"}], ",", "\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"u1", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"u1", ",", "2"}], "}"}]}], "}"}], "/.", "roots"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]", "Dashed"}]}], "]"}]}],
"\[IndentingNewLine]", "]"}]], "Input",
CellChangeTimes->{{3.703004990248858*^9, 3.703004995471909*^9}, {
3.703005027797546*^9, 3.703005077504517*^9}}],
Cell[BoxData[
GraphicsBox[{{{}, {},
{Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwl2Xk4VWsXAHAJSQNJEtUlU4bcFKIUoZKkqCQk5ApFREgJJZE5kilRMqWB
UEqWikhEQpyzj5x9TElIiELfen1/eX7P2fsd17vW3raU/Wmz/7i5uLhezeHi
In/3alnyz3/XDXzxVzxcvg3pjFP62WszumH8+Wfri9+HdIRaXI02u3ZDuuMv
ycmhIR2vsh1Sb7S7YcLj45VlI0M6apdENm3l7wbjK32rFEaHdJJVDwbnN3eB
md7MxMzYkI5R43beuMwuiPB/KBr2a0jHfK9clYt7F7y+t7iKb3JIJ7/02bNS
nS6YWnLDU+/3kE62YBlnWrALLpZI9R/4M6TzV79k70aKA0KD8jfNp4Z0Mk7Y
fPtynwNqF/SPyU0P6eRwGu0Xo8XCXtxWQD8+ps/QzuOAXv4ESxldcXjtu6Qc
DjAKKw9sRHfuGsk6cI8DJcrFMrpoybUh9tVpHBheeNn6CDq970H7w1gOOMko
rr2Gvu08Xe3vw4FARV2zbrRJ7l6Rx94cSFD9d6oXPdV3y5Y+ywF6yerMfrSl
07bJnV4cWP9o+vsQWuREgKKQBweErzc7/0aHOsyJvOPCgfHL9tyCM0M6Hsd4
zaqPYnsn57/QQOsfWkQJGXDgTGyxSyD6obEyr6k+B2TEYz0vocUN9qjE6nHg
t1SDXzB6ZENY4JLtHFAO9QoORacL8coKb+NATqpHcAx65v2U61JNDoRuTd2U
jn6uN/B3mTI6bsC1HC23eYGCuRIHxFOm9CvQ11UVzRIUOWBM+Yu9RjtLOmWK
KnBgsLOlrAotNsMxXC6H11f3jdShvUuZsWKS6EiuZUy06vr30hIiHEjLVlQb
R4vO7VmyZykH8m99mvqFnmrh4jovzAG/omdvJtFvz2tQDCEOeCVoGU+jLasz
4pMXcaDohJwhz98hnWAbX17xeRx4Pr1uYAm6NUK2V+w3DcI1XF+V0C+O6bYY
TtKQ1WDstw6dvsHqje8EDSFevfP/Rbu0xdxuG8frOQIyG9B/pacOJ/6kgXIR
N9BEr33RVLP8Ow0uFdRGA/T5rwF5op00lGn9aLFEr/ZyPnvwCw0abXwS1uiK
GTPd6x006LYU2hxF84jItS5iYf9VDexj6KhtdXN4GTTI+Sp+diDjiRM78vMT
DR31tRfd0FVbC+Y1VtMg9m2kMhDtVJPctAj9NqeUFYQWOBB8a89b7P+a7Ngl
tInT4Y3VlTSsvj74zxV02/Vpm/JXNCSGm/0Xhu7v3V2S/4IG7bGaR7Foweu0
Q9gjGoTsM3dmoBUnqkdLHtJge/mD4R30TpsHwV0PaDDPOLP7Lvqiom+mTj4N
TTJKO++hv79e1DWWQ0PNZdd1uej3PzWP29+hIX536ZPH6KuHou223KCBe9zn
bjn6zguvH07xNASf5vIGdLmUZVBCHA0WNst2VaDHv8tk/IjF8fX1dL1C/xfy
vDM7ioaVFZqCVWj9p93HREJpGB5d/s97sj9i2jbf/WgwaKv6txX9Wu/v69Xo
8a2/PxIHn3otv/8cDWprGGc+o/krDH8U+tBQF5n2uA0tfOJQsK8XDZfm7l7J
RMsUu+XNdaPh8efUoi/ong5VQXVXGvgK3m3vROfyj3k6nqJB+U5ePbGK9fmt
71xoeDZ8jc1Gb5ob2hh1ggYeneZJDtrINGN8hR0NjQFzvveiF553sNpji+u3
9PF/feiGTPmKC8doSDWRYBEfnHgQ9uUoDV0MhZqv6KO3n6+8Z4nxpq0R/Q3t
/v2T3vqDuL+el9mD6A3Lb2bbHaDhg4P2ziH0qK7lwjgzGvgvPc8lPhff2TK2
H/u34XcdRl/a8t3pxV4apvwnu36gb4TxRe/cRUOzcE7yKFrkZGLjlZ002KSG
9hDHGysKV+3A+AywUR1Dxwma3NA3wPibN/CGOPbGjRTd7RjP8snUOFrIR54V
oEvDBX9VyV/oGIvS1aCD8Zf8yp44WoKVsXUbrh+7vos4MkMmZ/MWbD/lDjVB
1udyyddzm2lYKL9QbBId4WCoVKpFg3WPhxlxuPyph5s0Md6LNlYShz14UqSm
ToPMldSU32R/o3eMe6rRYJzx8wNxqPvnTU820iBiZTTnD4nHjX+eq26gocdq
wp74SqneK5V/cb8D7cWnyPlMaeZ2U8H99Hm9gzj4gqPBg3U4fi9Zd+LLOteq
lZTxfGwcf0UcVPWxfq0Crnf+hyPTaK7s44JOa2kYfWbmTxwYOrY/W56GGVXW
beKAPSuaZeVoGBSfRxP7f7RlrJGmISLnueUMeqpwRMJ+DQ3l4/7exBfig49m
SGF/y/bEEp8/nNP5jySen7M8lcS/NTevOfYPrkf0Dyaxn3jd8bTVGF9K/SPE
51hDPStX0ZCf/HfVX/REedBa65U4/x2rNhD7pi91SZGgYUTacAexz/FN31eI
43wUqp2Ixw3eqRxZgeu5duU5Ym85K/dEMYwXgcBQ4rNfL/4UXU5DrYJ3JrFb
1sLfO0Rp4LJbVEjseDyZ6+wyzJ/rw8uJj0munZcpgl4z/I7YglW86NNSPH8V
2s3Epsn6Itxo7TgPFrHR4Y/iqsI0eMtEdxPrixyTsl1CQ9T0jQFi7Y8D8tFC
GP/ZISPE6lF+KuWC2F6+3S9ilT386t8X09AfL/+HWJ4/YctKtEZ/2zSxZJW0
3p5FmP/Vvf8SC+vo7MtdQENO0//NU2ppPU+AhryidbP3T5/ts9eYj/vb4jbb
/vgGb+f/+GkwlL492//Q0Fz3+Hk0hMrC7Pj68mO93/DhefivYXb8bOd//Ed4
MX+dbJydH0PuwWUpdOqr17Pz/8TZfG0/D+aroaxa4rr0mpiAuZh//f2BuOqo
+c2H3Hj96M4nxOXiXbdYc2hIY83NIn762SNzIbq1ougm8eP4v3lbuGh4LWc5
u1+5ppEFLn/Z0HRz1If4zmKJZ0kzbHBKDXYkjgvVqPo1xYbAoKu6xBE7Kt/L
oWPO/FEiDuY2azr0hw37xU6IzsbDBdcvTybZ4H5Hvo/E22mtP930BBsW3vRv
IHYaDx1Ygq6xrS8mtnTPnDw9zoa0OOsA4gPrNnDdHmND4sJb9sTG/cD3YZQN
fn7tBsTbHJhLlX+yYdtBQz7iNRbCKn1DbHjctnD2fEksS1dbjuZu2mJBLNK0
bsvOQTaUTbtsIOYz3m2YOcAGb4E6Djmv/TqB9rZf2aBWk72ZmDO1yDm6jw3X
ZXoXEVOlKafLe9mwYVCxk+SHDxufXljZw4by7ldBxAXygwltNPanrF1K8otT
qpHfMnROj2oo8eol2UfN2GywmdxnTnzt9zGZui9sqGXxDZN8ZV//sQAoNtbT
kyuIhT2L67Ja2WA24G5A8mFN75LHnBY2VFz5h4/4orVbnCR65b7ptyS/9u+Q
t0z+xIYzcoY7id+IJfVGNuJ6fJbbQvKxV/kF7rO1bOjLPTEzQur5xvbugnds
2Gmv/YS4M1v93WANG9aL7zpBbBw7GO1Ujfu/haue1ANZB9tV1pVs4JddFE3q
Ret8A039cjaUhAx//07q26EFbksKcb5HP60g9So+coecWQEbmq+uf0bq23BV
QMf1x2wwudZ2iDhPY9RE5BEbxh8IRPegV4qx/l2ej+MN4Z7sQnMzH/5YmYX7
tSLpPqmfdbZmZ9cmsyFEWDaKgVZIiljnnMQGSidDlDjk49vu3EQ2DHd5pbWj
dfS2mCvdxP7WyuSTel4oLbNJJZ4NEdEPgNT/mz1jExujMB7vvaluIut/KumC
ziU2ZAaU2tSiNQMbJk8HYfzu565+h14cz+uTHojxFxanQvz8hYfHnAD0+tg/
1eilC4wc35xng6/6vEjyPFKZ+3vfrrNssBDeG0WeX+R6raT3ObFhIK14UQnZ
L7vVtTYmeF6UL0vcJvl+nbTMrb1sEG586ZhG6uWk/EWmMRscvnkW3CLrG6O6
wWIPG3hWHdyRSs5buUGyqSGur++QYxKJL4mTLgZ6bHA82h8bR85P81MBRQ02
HAwuCLuKLttpumdsFY6n87QoeX7sn39+gf/XThDl1BxXJfmiZNnc38WdUBTz
dnIIn58pMxuVwSudcOeBtfUjtHn9rcRPpvj7tvuCJ8j7w6ZwjfVSeP+pZG5p
NN+yT8t5OF+Aq8pImY3vJ7G+/rrXzqP3Zmmnoh89v9w4I/4FzEtP5R5Dh5T6
dBwq7IBy16JkafSPhOoDKfs7wLLpg8IIvp8VHbVYunJfB+TJn/H+gfaW+dqU
urcDrE0j3gyjpwoEzNKMOkDSRO7YEJq/fu/+DIMO0JSaTBlAr57bbJyt2QFN
hVbKvWjj0507nkh2AD/PP3kUWlDDg1ftnw5weLGOj7hpak5V0aoOeJxUZs9E
W1yTNigR7wDdn1arGOjj9xz1SkU6oFY1N/Ez2o85sA34OyDxYnl2Ezp71+Sm
98MsMCj7rPAObV0VFKQ0xIL1yrzXatDC+gLvw7+zoFW7ub8afXGbhI1xPwuE
iy0evkUfVN8aXM9hgdd63q2VaG7poMaGVhaoZG89B2ibGX7n5jIWlPcWnS5B
i1yILVR7wQKzdbVdxejayRVT8aUsiMqMsCRWH1OMPlTCgs03xQ2L0AsHjItb
H7FA7IaDUiH6eXvMnPY7LOhaMGfpQ7RosVgyK5QFQscYTlnonXe23TpylQXK
fvOm7pH1j3ZIb7nCgg6LlmjiVufHWfWX8P6Qg6WZ6ITVhk9eXsDxPuhbehe9
PNSn7pY7C8wNcnpvow3P3mpYcZoFUxNzrxD72r9puuGK4+HllSZu0xZsj3Rh
gduuCds0dOKPrG5/Bxaccr3flYoWs2qdOWqBv/ddXpBM2jOcmsMwZ0Go2uEn
SaQ99TW85ofw9+PNVsRtgm4LTMxw/uH1DxNJe5W8YtuMWRA48Nr6JmlPRV11
tS4LZuQn2+LRK+bEH++QZ8GwafjBGLT2vYJhLTkWuJekLyS22d3gf0OGBcnr
Q6ui0ZmxAonGUiwQ+fhBi3j9mqC65+IsWP3QQDkKfeBt2hHRFSyouD/aH0nW
z6Wsx2M5C+Tiz+URlxX+4lIQYUFf1FxlYkN9N/Wbi3B8i9ZoRaBP9oa/HlnA
gjK9yzPh6Kjw3H0mAiyg1coqiZs/dTnzzmPBmmclB4iPOVileXKxwHBJ2/lr
pL8rhvP2/6Sg7Zb4WCg6ScEx/v4PCkxAqoa4rP6y1LxhCiS1+FKJuUVhS/kA
OsVpJ3FUlrq7cg8FWYzUe1fRBUYHpq92UXApKDGAuHnQ/RqHpkDAyMuSWHxT
fmbyFwqa79YLE9+rXtPO3479bVgSFYKuOanr6PCZgsS05aeJ+wVtfkILBQMj
XKbE6y2SFvk04XiL/ZcTH5gqSW5qpCCwZcnUFTKf9GZ5lQYKtHWusYnL+gT1
ut9T4Gum8Ij4S8S6Bt1aHG/+/pvE3Kp7rFNrKNAsPBpIbHguxPtAFQX2koqH
iE+uypz76A0Fulr9usRRr17FCLymQMYmdh1x8/zpvFflFAwrJcwnNlBvZcu8
pGClgO5kMMlPto/EQl9Q4P393VdimYjQfd9KKViroMYkjn9qF2LyjAIDoYB6
Yh7O5pcFJTi/sbwKYq/FIqMixRTQys+KiLu0viv6PqHAhj87l/jQf2/tmAUU
rGf63CZ+G3M7cdtjnP+EYgKxRplvQ8ZDCiwKKyKJs3pN+XgfUGBsrRVCLLpU
aavTfQpaDW8EEIds4/F6n0tBfm3zOeJxZ1aeSg6un9qEF7HjjRJ2bBaOr+2v
O3FrRbTYWCYF1gIDrsQly/VCXmRQMGLj6UKc4Db6MyiNgomqmFnzJdcrdqfi
+KMmThJ7V2XZGaZQ4Ne00424Zzgg8X4SBfFd5z2IzVceaVicSEGnaOLZ2fnt
2sB3JoGC6y9S/Gbn57lga0s8BY0yVwNn55fW5akZR0FRpuXV2fnVvsxLiaXA
LFI0enZ+YwnsmWgKcta/uDk7P0l3MfsoCgo7DTNm52e8e19VBI5vCO4Tf/ZZ
E7I2HMfzUPIpseHdP2XhYbh/7iffED/70Pxz8CoFfVfSG4kTZa/aFQdTMDpa
+52Y39Q2UewyBXd+VEwT+17QajgfRIFR2J3FJF4sPn3T1rtIwdsGhY3ENTOV
nvcuUPBQqnEnsaZiWh7/eYzXg8etiMWC9os1+FDgdNf0KnGbSvFPKw8KNN6Z
98/Gr2WUIpzGeOR35SXn49mVE3Zr3CjoeHJGijiRWtHQ50JBevRea+Ij1y7m
nXWgQGizEYu4tvgwu82eAuVHXX+JN7PXi2nbkfX3kJ49v5qcK9w2FPDMsXMl
ZnTvsos+jPNdkrWQ5IPKwHLTxeYU2Bb82Uj8SEJdL/IgBTV8ctbEwaZrpMNN
KUhum3xIvO7lVFfIHoxPrXs2YWR+Fp4tvEaYX/KyI4i5f36tCjakYCEj8AVx
69rPWZd24PXnn0mQ/BUYX+B0UYeCiyz9HmKXf9cemd5KQabdXAmS7w7Vpu2+
oE0Bd37KfmJFrghFPy2M14TD5bP58aTjwNmNFKg0z80k+VReX8LdVZ4CNTfH
RJKfhTtibQdkKbiW2sggnvLlNz0pg/ksaflqks8bH46pOkthe9Pa2cR+4o0/
HSQocPcZeEPqwYcfwT7Wgni+NETl48h+RPw5wVyE+7PvpA/xXfkzFpYLKfig
kVFD7Hv0mJbFfDx/px67knoj9U7rz4G52J7b8dc3SD5IH7y45xcTHKwOJJB6
ZTpiPZk7xgTJn81TxCoG7z35R5mQFXrcgdS3r73ZTlXDTFg9lKNB6qHNv3Zm
Ov1MEPVm9aagd5d/kt3IYkJzzkZ/Ul/lhPTSY5lMSK/MGyXmsX8sPtzOhDPs
ja7p6HLeSMEHrUw4ddTfLgOttnfnpFwjE3pEx81JPV9NPasTf8OEPqXKs9no
P+vkd517xYTy3MAZ4raAG68+AxNsJQ+G5qDjpM+UxJcxwV1t++1ccl5OKqUv
LmFCW4o24z56ZPKWJ3cuE2bsp4Mfo6uXXxbvj2KCgVndo+ekv/YoE4dIJnDx
hO5/QfJJcvKljnAmbD6uM0Ist6qwvymUCZTcHc2XJP7WsJ+/uMSEmLxtH8nz
ku46HatIbyaoVQpsqJoi/6/+k7LehgmafllPGsn+88xrzLNmgleOqddHtHOV
MI+sFRM6jnBpkOc5MUPFUyssmFC4zbnsE9pn7xFtbjOcT/vpllayPhZPqU87
mFAWEKLJQj909Vzls44Jvophlf2kfpVs/jOhxITOlLyMb+iJmTntfopM4GHW
BZDn0+0xMfEX5ZkQmiOiM0jitfDBghApJlyqefqOPO/+/tU7Gb+MCYp6FwUn
0bsuWbcWTjOg6V6KDT8+Lw/UShepTTGAkbLDej46Zum32JLfDBAO/GUpgGZk
ntv7/BcDhMY8rRai3aoTKl/9YIDyyxYnIXT8wo+Fjd0MaBZwKxYj3zMSdkQP
1jOAe7XfckW0bwLPr311DEiQnzFRQgslvLEpqGWAidSrq+R7iM6N7Spe1QyI
5+KdVkGnxW2tn6xgwAeliHHyfcQqRn0BbxEDfKdaZLehW8Nkr0okM4D21fc5
gH5/gTfA0JEB438qRoPQ1De79CoHHO/LD8cvowcty1/pHWfA5v1zmoPRwlo+
PFttGcBf2/L0Kvk+MtYXpmrJgBBRvchIdL9rXby4CQPS91mcTkILHIvLG1Bn
gKHrnyWF6N3bpVpjeBlwR4Kb1YO2cds92TmXAaGOp2r70F4pHitVuRkgcvVg
Kfn+kjb2yv7jTDvoedxOGUSP5toPLZloh5i/8mfGyfcd4Uz+uP52MAoxOMGH
7z8THLktNxraIeduvqc8evGSfTbd9e2QLGobq4CW3uYTpF7XDgMhyY+V0CaJ
1dUtNe3gFHTv57/oTGOng6Kvsf0qiQhN9L7iXNebRXh9eg2fEdqB/hjTW9gO
5uWLthqj/QR/P9lU0A6XjnR4mZD7nY1+f37QDhfkpb+aoX+v+hYilt0O2j/1
uqzQQnuW5jndawe/xm9yNmhZ3y31z+62wwfHNSdt0fubwpceSW8HG6bWhAPa
8e8Tjdy0dmjeJbGdvO+dV6aOTKa2Q11YeLgzOuYIj//ulHbQ7bv2+SQ6K0Q5
PSmpHfP7Clk39P8AN1p3JQ==
"]]}}, {{}, {},
{Hue[0.67, 0.6, 0.6], Dashing[{Small, Small}],
LineBox[{{-0.5640230744006248, 0.}, {-0.5640230744006248, 2.}}]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{-0.7000000000000001, 0.9975},
PlotRange->{{-0.7, -0.4}, {0.9974872796270808, 0.9999999990019051}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{{3.703004987074624*^9, 3.703004995976568*^9}, {
3.703005037945709*^9, 3.7030050779753942`*^9}}]
}, Open ]],
Cell["\<\
Mirror of the above with \[Kappa] = -4:\
\>", "Text",
CellChangeTimes->{{3.661355671688161*^9, 3.661355689015037*^9}, {
3.6692138651598186`*^9, 3.669213884559649*^9}, 3.669320664034966*^9}],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"try\[Kappa]", "=",
RowBox[{"-", "4"}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Beta]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"roots", " ", "=", " ",
RowBox[{"FindRoot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",",
"u1", ",", "0", ",", "nm", ",", "ntot", ",", "0", ",", "Km"}],
"]"}], ",", "um"}], "]"}], "/.",
RowBox[{"um", "\[Rule]", "u1"}]}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], ")"}], "\[Equal]", "0"}], ",",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "u1", ",", "0",
",", "0", ",", "ntot", ",", "0", ",", "0", ",", "Km"}], "]"}],
"\[Equal]", "1"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"u1", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"Km", ",", "5000"}], "}"}]}], "}"}]}], "]"}]}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",", "u1",
",", "0", ",", "nm", ",", "ntot", ",", "0", ",", "Km"}], "]"}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], "/.", "roots"}], ",",
RowBox[{"{",
RowBox[{"um", ",",
RowBox[{"-", "2.5"}], ",", "1.5"}], "}"}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"u1", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"u1", ",", "2"}], "}"}]}], "}"}], "/.", "roots"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]", "Dashed"}]}], "]"}]}],
"\[IndentingNewLine]", "]"}]}], "Input",
CellChangeTimes->{{3.661355380776771*^9, 3.6613554716473618`*^9}, {
3.661355628776557*^9, 3.66135566700301*^9}, {3.661356711340468*^9,
3.66135671206817*^9}, {3.661356782441318*^9, 3.661356783529015*^9},
3.661356835420842*^9, 3.661365485609647*^9, {3.669320121673662*^9,
3.669320122356022*^9}, {3.669320652548283*^9, 3.669320659080694*^9}, {
3.70294047581279*^9, 3.702940493167143*^9}, {3.702943031877437*^9,
3.702943035627537*^9}, {3.703005271410681*^9, 3.7030052845684423`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"u1", "\[Rule]", "0.5640230744006248`"}], ",",
RowBox[{"Km", "\[Rule]", "5668.7485526713535`"}]}], "}"}]], "Output",
CellChangeTimes->{{3.661355400057754*^9, 3.661355484875826*^9}, {
3.661355639112556*^9, 3.6613556674477453`*^9}, 3.66135581451628*^9,
3.6613558461861362`*^9, 3.661356713020488*^9, {3.661356783878813*^9,
3.66135679981393*^9}, 3.66135683581847*^9, {3.661360098469356*^9,
3.6613601059361467`*^9}, 3.6613602829238663`*^9, 3.661360759980571*^9,
3.661363375705228*^9, 3.6613634890202208`*^9, 3.661364142996811*^9,
3.6613644886211033`*^9, 3.661365486055447*^9, {3.6613656411576138`*^9,
3.66136566377569*^9}, 3.662562653301832*^9, 3.662562712109947*^9,
3.669308950437655*^9, 3.7029389808521852`*^9, {3.702940476999694*^9,
3.702940493703751*^9}, {3.702941251294978*^9, 3.70294125703004*^9}, {
3.7029430224372597`*^9, 3.7029430415058527`*^9}, 3.702987020091751*^9,
3.70298706694858*^9, 3.702987239412066*^9, 3.703005253965756*^9,
3.703005285569325*^9}],
Cell[BoxData[
GraphicsBox[{{{}, {},
{Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwV13k8VF8UAHBLIVsqCdlT2X5C0u6UCtEiSZKQkCTJ3mJJKluiRagkleyR
7Mu1hyT7ToxlmGHmzdiX+F3/zHy+n/vemzv3nHvOfdJWtw1t2FhYWM7gj9Xv
N5I80ysr7CUdi5JbzCxKIHdpQ8WDf+wlvlpBBWu+lEBHp/DL+QX2Erm+mnsh
lBIQfbVDdXKavYSrnBa8360U3nFp3RqhspeYmOZW8gSWQSzDc7iunb0k9ufa
vzFJFZBUPtIa9Y29JEBo0zS9tRoKr5dl77ZgLyn0jZ0ysGsAe8ra6f50tpKW
yxN77+l3wPr+vUFb+dlKUuL/aV370wfde0h+Tx1ZSwTMFGNEgQSqVcJzDqUs
JbFqMuLeC0PgVXO44q8kS0nc4PCU3CEyfOHvE4kcWEZPhCdOadqMQYyeqnNz
4D/kV3peSlKLCv4OVz3lTy6h6gP9dX9qxsGLPcnDeWIB+fk3LIpr0uCa7x/Z
toR59IRQsepwoMObouHId/ZzqJ5r877wvQT03RbkMN4wi9wzmJPt3wiAGF/j
07yzSNou56dLBgGxdePxxzlnkUHVVDh/JgFX5St1dv+bQbtKuHmOZhMwRHIL
FBibQaqlzDdRhQRQL7Tz/iqZQTrrosxFagiYOxi96YjTDFK3tf1yYYCAjVxS
0gp/ppGtXW9RAz8DdCKdDmfVTCNL988vTwow4IFc6aUjFdOIIBlpl25gwIiu
1QvjvGnkuKv0WKogAwoCP7M/+jSN8o3JXz1EGWDNIz/S7TGNDH/nX2nbzoBs
frXkZ1LTKCznWk7RQQZc2nx8D+POFNogknT4hDUDwuzSe147TCFZBTd5ZxsG
VBWI+R+4PoWkUh3Wx9gyQM1quumR2RQSUyFqmXYM4P0W7ySkM4Vm9ZI4w24x
oFh3XcpBsSnUzHu7KcqdAbIP6mWeVE0iu7r9d8efMsD0z4FahdJJVOI8rTAf
wIBwma93/hRMokIhnr9rghiwXO1TIpwxiUisR86KhDCgfbOqefLbSbSPPclY
I4wBQd9eRjU4TSJBz5a9RyMZQCeZCGzdOomSZ0dpb7/i3098ICMmNIm6qrXt
7yYwIMQpVl18wyQysYtdb5zIALllsokk5yTy3La2kzeZAZYiHh+3TTKRbUzp
Tac0BjScfa2m9IuJtK5L5q/PYkB6YaPR4ftMtO+rkWZ6KQO8H03baroz0VkH
9/MuZQw4pSdyF+4wUafqxcg95QwYbbd8f/Q6E4kpc33PqWCA1CR9+MR5JjKE
NQrff+L1lef3OKPIRGtvsp73/c2AOxF6URbdDBTX9CPPr4MBgsjQY6qVgTTe
jdoe6MTxIpteCGxgIFLc4+0M7IV9NzdkVjJQuGRT++VuBvh3BwdypDNQxPFQ
oR19DIiQ+n031Z+BlvbyKoYOMqAw6azp4n8MlF1Hl0ibYIB588V9YXL4+vJ7
Fro0BrAuWQht38ZA3P4zOQPY2qedms4IM9CD68EZGwgG/KGH6cWxMZDvhcw6
WyYDSOpNB062E0h7/3L98AwDOJHR1je+BEr/EWOxb4UBWpcFrQPuEyhn7fOv
qdgPZptT7roTaL1jroIMCxOIXec1zRwIdErGaJCLlQkdseeuSpsQKK1uUfo3
GxMS/M58Td5FoItU/VkVDiaQJPiJdwoEitysvDYaW6zg977Q7QQKeZtvwMbJ
hLDJU7VOWwnkHnbrYwO2p7X+xB5OAnVVuv5nvQ6Ph4TZ+hbRkft81obrvExY
U7l+ziqTjiKqz/BWYHv+Cw08kUhHVtNz2lJ8TLB0fJbC/RqbEPFqw1Y1CGK+
cqAjaatcYv96JjRt8vdO3EpHrKnvhXo3MGHTW4+Iprs0ZNJhaPNaiAkqbxDq
caQhOU7+W/3Yp15yjo1coyGVd4uRCluY8CT4zcHF0zT0ZL2SeSH23P2c/m0y
NOTxZNOnVmEm9JnNKrjVTiC7nZ5H/ooyYcEEjHzQBLrIEfFRbCsTtlx46hX4
YwLt8euRv4RtcHpLw/uYCRRsHpv+B7v88F63KucJ1Bak/O67GF5PCQ+0ZesE
OuOQLWggwYRKUTQqLTCBfHn8ln2wSUKcG5XWTiC9phsbv2FvXf/G+gh9HImm
6OVxSzIhdCV73Y3ycSTx8T5XLnbS4rKaS+446ggy1B3A/jmrbeaVOo5S7VDm
OikmsBBtaeFvxtFNbmF+E2yX/pnz+TfH0d1KopWCHdaj6VVhOY6cpT558Ekz
IaXjSXz9hXHk0GijvQt7pEFongTjCCV13nTCZvttLjOhPo7SIsfKnmNL1sTr
z8qPIy27nzpp2CalGjE8gvh5Dkndo9huRd4/N68bR4dC+alrZJjwIq+KkFym
Im+HZTkp7F8ZxsfUR6nIxQNUjbA149xHzQqpyLbtnud37CuyMzujM6jI32U8
5if2g3i36+3xVCTfN7LUjZ2f5DpyLpyK9jQrWLJtY0Kn0tT250+oKOVXvY0g
9lyai03dfSpSc0z/tB17b6bzkLYtFekODlSfwDbew9zmf5mKrK6FpBthu+fc
uVZqQEXzo/KNVtiv9zPilk9QkUk/WcEJ+0eBE+ngQSoqLJ4seoDdfJiQvqtC
Re/Y7gcFYDPR7avZ26moY3dy2EtslQrHfhUBKlJKK9T7in1WmybpuJaK/u2d
X/6G7Vh9yyJ5gYI4VV9P5GA/05uIGaVTkMP5YiGEnVLn0Ld9GI9bx92rxP51
Zlz8WhcFRajdFvmFTWm4eSX2DwWxRRtO/sHmPk9911tBQU9873G1YMu32veI
5lPQdLvgpXZs3YuUrSbfKIj8/uxwJ7Zd543Lrz9T0EK3SWo39tPLY9FNURTE
nmCe0YMd32vXtf45BZ2Rfc5YdaXFqMhpfwpq8BF2XPXQwPVLQXcpyHRGbufq
/ezW5MifjhQ02kATW32+zIhtxxprCiqxiTzbhn3UbmSL1iUKKhY2Qk3YlhSb
iz5nKMj7soFDPbaPw3BE4TEKikktMK7BjqFZt83voyDW9xXe5dhFTkOb9ypT
EFEZNVSI3cO8dsF1GwXZNt8IyMJech18lSFMQad8rtmnYm+dtWqh8VHQ5xdZ
QZ+xD9wlbVJix/MfDh2LxjZdvHr+xtwYqrCUeBqGfddr4EX8xBg6tfji2mPs
yBXLpkHSGFIr2upzFzvnYf8G6Y4x9KKY3OmA3cZuec789xhildvhaoEtyGXR
0JEzhk7K51zXwt4d1LdeKHUMDdralaphG/Kanz0fN4aempy8LIMdLnCl/nfI
GGKzNjFYwfmc/qKHj8dvDHWlDyePYzcImp3W9RhDB4Wv6nZi84tcriu7OoY8
rg8cT8f+720XD8vFMcS/RftLNPYpcVP9w6fG0M47Jjr+2EHSl2pzNMZQSKD2
uQvYnAoXq1N4xtCQw/OHNLw/jV+e6I1jHUNhybXNLdifl3YzI2dH0R9If5iP
rfVHQOzx4Cj6mSbMeIT9wLX29pWCUfRPOVtmPXZtb67/+YxRdEjtrTGB64mI
zteok19HUUytHbkBO1vEv3zPy1EkKWMuFYZNFB/ewn9zFFkrCU9xYGvKKSmt
uTqKVCQTNg3i+vUsXPTogvEoqjh9LbwYW8F61n5EaxQ92LT81QXbel1GcbHo
KCLfOaTdhutjx3lZ29u1ZERYt9t7iTNhR9HG+zYlZKStf8H3LLbbDtawy9lk
JHfxxYwU9sb53jydODKazmWsLcP1+FTMGz6pe2TE4TrwYwnX65JR7qwGeTLq
kU3zNML1nt9wvqZKkoyiW+ZSxbCvFJD7CjeTUaRrivaQCO4Hzyq4ElnJyO3w
UtwdbPXd3mYPO0eQkg8772PcPxK9GOxqgSPIulm1KhT3n9ikhPSz3iOohvKh
QAc7st3iyi2XEdT/UHNpZTPuR6r12QlXsLdOWjhiWw0n3ZBUG0ELHCE5WoI4
n09b/+HtHkZmV8K6anC/eybWHk1WGkaFR4TCz+P+6X8yVGetzDAi+c2bz/Dg
eLmfmJLZMoyWzEJ8IrHtGzJPm7MOI2G/wrwubiZo+4extLYOoexmNZGLuD+v
UE/alnkPocJXDwp34f5+p6BQ9X3DIKo7DhZW+PwQ+YeU6VI1iBYW+d7NLuPz
3SCXhl7hICoRnNINweblvXBg9usgsmwancz8x4B4swmtcz6D6BL/t1dLiwzo
+idutFZ5EHn6bVF3mcPnkyM+7reCSUjnsurTWXy+2Vh5tOCw9gAqPpjKad/P
gIMWH87rHBpAEcLPqX//4vPz/BLVQG0ATQfIG13Azv4vV8xaYgB1rjz7oYnP
W6YRyt5BM/1I7YBeHk8PA+Kubz3aHt+PpIlx3uftDFDlnq5y4uxH1MQrBYfq
GfAxxuCLTngvst/WRzmWz4CbT31y/8p3IM2D7/y9AxlA5pR5RJJoRvfm8jXf
GOPzad4pa6uzv5DR56ysxK0MsLPpnt/8qgSN/9vX/KyfgFPsJ+bvaych/a1B
N/uTCIgbb2lk2f4RxJY3vT3iRoDDwEZH6Z8fYcnB/OJjVwL2tBlwa92IAzuC
/LDWhYBqVKf1KPUTiKntkDV2JoD2oiJzrUY8yC4cSHO+TcD+/T9ec+skQ0Bc
kXnpDQJGy2qUgn58B2GxIt08cwJOF43ei16bCbYtrQxe7O85nDVJxpmg7Vq0
9eoVAu6nnLD5NZcJa3fITXGbEcAfUfqe93AWlESFVVlfIkD9Rh7/88ocsH9X
a6dqRIDv+kTiZVshVCtW7lPTI6Cxk+cZz44isA++xBN9kgCZz47yj9yKIGT8
2A027Ip96lbOgsXwwrClukWHAC4r1GxgiODd0zoZ3xME6HbZd3OQS0C7vCmG
cYSABqWHxeVW5eBrPX9Hax9+/wr/HuITVA4UYVH3Qvy+Jz07aHrwezlwtdZv
2IvtXKo9+521AsqqjmxQ1iBA0JhXJS62ArIP7ty/TZ0AE583H337KkF0Y7WT
ggoBA42p/odNqyHEs+F6mhwBdnKFk6aPq0E0sGiPGjbNu9bKM70adhdvKcne
ScCCIvlIJkcN7OHm5ynbgd//nkj9k8usgTMmvr4DsgQcP/DSTZD3F3DVL285
Lk1AbdjHIdW9vyDufFpVsxQBBuRv589a/QJesSl1a2yzV3WqQbm/IKa1weCp
JAFutLW0Fes6EJI1CGwTJyA+ztOWWvQbxAT8N0WJEqA0/6SVa+w35F8MrVbH
/n729fEdgvUwZROh2ShCQPFShsxV+3qQTMy9xYvdbkztaxP6A7/5AjqCtxDg
v/ab4sDeBmg2Z+lJEyQgK0/6c11YI0QsFPE/Xk9AtNCv9LHPjZAbKt5/GNvb
xbWII68Rgvf0Gs/yE6D938+2IwONMLmraLcDdkesw7os1SaYcLf9coUPr8/T
HMf3TU1g4CWsYcGD38eHLO/njzTBxpWXx2Swy45yB7QvNMGywTfmMDcBwYtm
Hzdsa4ZDf6LUb2OL3WZreezSDGUzyZqB6wjQND6931GwBcJE3KS7OXE+Zc6c
CJZrAcVn6jIJ2BwCsYYJh1pgTk4UuWH/qWHeJFm3gOzBgl8bsS0PR8YYZ7XA
tyNfZY04CPCTHWQH41Yo3Fx6Z3INAbYPQwTM7FthWrOSpRZbr2+P+F3vVuiP
TpT9iL0pMkAjM74VbPtY5M9hf+ZRvrFzthV6vNg257IT8JPpWb8+sg0OpI4v
xbIRYFodltyb2gZHLA8Pe2HT3icEJJe3QalZ9p3L2IInO7R06G0QIkJyEca2
/LA3x1u7HXLlmtZGsxIw6Xr21SmzdjitIj93H/uJ3vU7os7t0Cs8/NQcO2U6
QjH7fTsU8c7e3449pz/zYWKqHbiNe9/ls+D1lOb3KuDugKiln5YfsSVmt5sG
SnWAsmtCfgD28bgLgttPdUAQ1ULpEnb43I8As08dEKb/mcqCLVtfZ6OQ1wGe
j9486VihQ+6nIa25+g740Rh5Lh2774zgv5cLHRCnqKx2DVvhi8udX+c6Qb2o
sb91mQ5F94LPRF3vBD8qp2oWtoHBJ8XrXp2g22MS/BrbfbFpmC2xEwwjhC5c
wl7XSClrKO4EsUvd6BD2u3i22JiWTlD5Y68ojV12Ts30AEsXSNDMFsf/0eHC
Tr29XEJdUHaSatqCPbp0VbBNsQukCt9mFGLzJ4TX37nYBcbHvQ6EYX/0SkyG
W10QHZ96/T62+vnSAL5HXdCRvfzwOvblZUIrMa0L0k5XuGhh05q5pDwqusDp
A4+2KrZfotS/411dwKEusiiFvdlnX9dGogta/HTDNmAnGBnk9K/thrDbdDZ2
7IMKdq/StnZD8Ulzg+klOtSv+Nx5oNoNonV/3Uaxp5K+KQpf6QbTGnnNRuyn
vj+5Rpy7wfj3ze4qbFHjv8OZAd1QF5R5ogg7VXG27GFMN3j/3nXvB/YR1vWx
Z390Q0XNOvcU7Oa2HV7itd1wRMxG4wu2bYqmKfVvN7yqsciNwZ5/aLw3b7ob
lDQ3zkdih1x0FHzK0wMjp59Pv8QuMU/QHpTsgZKV5Ynnq/OzIXmCeg8IBO16
HIItd0ss+a1uD/gWZeQGYl9xNe6dNesBDfmNT55iv7gftt7oTg9UiHZSHmNX
+dUeTX/cA5oxQUP+2AuBa1x5o3uA1zveadXK4Zrxdmk9IHQsIWTVVpGeHRVl
PVCozqmxev+bD9+5pdt7oMVEw/4Jdl38+CEvag90uXzeEYDNkrbjdudKD8xx
FdoFYatnWX7cI9gLoqaD/z3DtiuMbg6X6wUFuwcuYdjvylvW0g71guDkkMYr
7MZa/n1653ph4z13t9X14GjStY+36YWGg0+U3mMf6PR7x3avFyI0bC7FYTv2
F9abh/ZCpJzl/FfsOPIMS0FcL8iEoXVp2G00ld1bcnphNPnn09X48MzY27j8
6gW9+7lOBdiua/7WKE71QsyspmctdgKPyNJTrj64dwPCm7B7Np5XHhLrA1+R
5XXd2Cekf754d6IPDDZfWT+BLaT57TLfmz6wNj4ushnnl96JsWc3kvugRXv2
ryS296ltJZWoD/y36NIVsMmmb2S9R/tApprUfRQ718Nngrb/L/hPUSOdV/M9
46xPQ89fMOCanuzBNtjo2XgyvB9qJb/0FeP9Nvr8Ssvxt/0gIU+5Vofty3es
Hb70g+EJjrpO7G9c/L178vohxDV67xQ2/8qnUemBfhDUPyS5E9eD+AeBVDFq
P8SfMjffjX14wZG2Zbof9Oo+2gC2w/T+Kb51A1B/lFJsjP2L+mdlXmUAKC17
D/lhW93IYps+MAAhinvNQrAXRqLXEscHIPrtN7mI1XpDsuEZMRkANRI9NwG7
zEKff8BqAIrNY90ysC/1qmzocRiAIK23DXnYAR2LQk2+A6B3RPh8DbaU8YDI
76ABCFuydmlYrW/NVWLVrwbghW34tnZsg3MpkuUxA5DrNm/Ri02uD5cpTsDj
NtOygyur6+2xPe/7ALRldzqOYgvVmsn9KBwAbZXZ/RPYaTpait+q8PV/o/0Y
2NqVO5WTGgbAVJT/xPRq/dTiU/3SNQBCPhFec9juJczdsUMDwDXjJreIza/Z
ofGWNgBS3ylH/2F/KSjaHzE3ADOqu6qWsQ/t/3QonI0E+UfuZaxgt2QHQAgv
CQRnl1dW7aDuqPVUiARKheOpq17z/fwJPykSOGvfzlm9/92u/bpeCiRIepcm
vPr83akS+p7qJKgX+vN7AbtWYc0ZF00SsFkwmmZX45EwZuCoSwJzZzXZqdV4
bP9z/oYhCdbEJRfRsV98+mFsbUYC2kvnt5TV+EhHX7KwJUHHsai8IezSGB8z
UycS7FujLNiHbSJmY3HhHgm4fQ5+bcMmovSsDPxJUJtd7Vi/Gq8tKjb6oSTQ
5ey0rVyN1+vNdtqRJIje4RBcsBqvjYv2R+NIMLXdu2O1H50N6791KIUEns6c
el9W4xOc7KJWQoIez7NBwavxWRfu/l8tCUr6xw28VuPzxP2uXAsJwiaLFR2x
ex8e9ZEYJUHbiwi+09iuKzv8RJgkfB65wnsQm9eL97HgEgm4hHv55VbX37M9
iFtgENJvW/Cv4PxXVJua7hUdhKDEYmEytui4wNWM7YOgsag+8ht7zkJvr8nB
Qci26/3xBpsscj1OUXsQLC9oJt/Dbmt+xLdiMAhV/zadNcPO0ika/GI7CP4+
xwO3Yn9m7Tpz984gCDrHC87j/fqqYCbv1INBGDIK3tuK7bxLJWwyfBCavmb9
F4itvOXToaNFgzA3fwX+4voh3oi+ClYPgtbzX5R0bN7gno2jTYPQpkZleYhN
Wd48Fjo6CMSre8Zi2PEjAa97Ng1B3TYzDlikw+vYLyzpEkOwhmXFlh3b37Ts
5iP5IYjfqrumagHnR/3iUQUYAo7lG70nsCWzHWke9kNQ2CFrs2se57NT8CV9
tyGwsjXiGJ6jw7J8QoWE7xBo9Q79iMTueT8QXfl6CE6xyMsszNIh8rGRzqbS
IUgQUHn1eQb3R7jzfeQXfh7f/dmT2O7zz8Tz24agjzVx78Q0HYxu/Zy0HB8C
sW0bNf7DFrhwIDZtyzCY2VV5vZikwwr/RR4/mWEItZwT3YFNq3Zxv/DfMKhI
XbyWw8T95VDqqSWtYZDbfq2niUGHQFmp+ZOOwxDAJV48TqcD29Raw+GKYRg6
pPcpnorrTVUmeaV+GNputU1txfaLuuol2jkMDoEiw6EUOrBCUcLZiWGIXKMT
cmsM96sg15W8zSMgK7lyhY+M+62ZzOsWyRGI6BDjvz1CB59dDQp0+RGwlnmt
Wj+M16dF0VhWcwT8+j8U+g/R4Z/kYEqo7QhoSL3SbRqgQyEzTCvRaQSSKoTm
JbAfVGp2lN8bgYWceMKunw5L9tHs86EjMEX2iZnqw/s165zptZwRMHt08CKl
G+ejfgnnPi4yqD+2ParXiveThON7w41kkP3XlWfXQgdPxtbdt8TIUH9uWNy/
mQ6zER7mcSpkqN1jHJ7RSIeZAeUs3ktkCM3lfDjyG58XPN5bDSSSgTiVeC6z
kg4/9PTnFjPJcOaQU9H7CryfxOefCRWTwTLQIcu/nA6TZUZ5+k1kkKqLVdUt
pQOTj1cge4EMvEZG3z4X0oH+6V5RkP4o5ItqX0j7jvtzpkWBl/EoNFw3vqKV
QQeJsuN5TldHIeD1NlLjNzqc6ufPMvYYBaXQl0cHU3B/FfuUIvNpFCLWt7vU
x9PB8vWvt/kLozC1O94ZRdHB43N6VOraMWhoKXfkjKRDaObrN7ECYxDibXlN
LwKvb6PFyyc7xmD8iIpg6Qs6iPBPBRkajkG6mucXp2A6ND0Ru0dJHIOURK6l
hvt0GHvN6tn7Ywyqt9fdrbiL4/1lxK0BjUEcf4DNdw+8H8vT72S3jsErusU1
Lxc6BK8cv+HHSgFjIYPlens6HPe8ZSJ6iQK6zabVJiZ4/98o1tDjooJQoex4
pTKux8ybEtybqHAoNfY9mxLuH/dFOGrFqdCQ+LBxnzwduEJdW0/upoL1m9Nv
w7fRwfS7gutJcyoQ/8wyJrfg+SxGZOj+oELEa63YOys0EPQ/HsWFqODwM45P
a4kG8nxM3+oaKmwU17HhmaeBoeRpA92/2M/3pQQwafDlGDtdh3scjJyp/krD
NNALua2kYzkOdeYf4wVqaGC+WVyQ8+Y42FnrC9yspIFLTO1ilds4FGcWlheV
0uBd+vZf2sHjwHXtbZ9+Pg3oLd03tLPHwfpzZcm6ZBq8Etf9eoJ3Aqw27lhk
C6ZBX5qUzPHcCdwHWy9/OE6DcgMLdf2yCTD4qKsGR2iQwHyvbVg3AVzhizLt
B/HvaWy9adk/AfZrLv5HV6MBV/HmHw+4aKDxybm7WIoGar+5tbNMaJC/q0+x
ZWECnlKnbuzA/3PNRVbp8IQJcHi2+8F/7Div2R21pD9NgOEu51B1PjoY08oP
J7yfADEX+nctaVzHkt3fRL+YgO8LY4vmJ3Helb5NXP9gAnrW/X32BueVVd1i
rurpCRB+NWSyBr+3Z5dZRnOMjoPGI0khVxnsTQUSdf2r62jaPLiTAJYNu9Uf
d45DuEHD6XI1Ahx3725prB0Hbr5CLT9dAuKS9FWaU8bh3+OXSiyuBNi/iLpo
5zgOJA8tlqVaAirM7+20I1OB5bpX0c0GAqQ+OSj49lFB0jj3XncrAbHj2l8C
W6lgpq48nd9PwJnAsjynciq0EiKUuzME1LVNXnoWQ4XqG4zmWWkGWHF2cxDn
qJB6OfbrpCcDmG7EwaYUCqi3b1vg8GZA9ZfA06lxFMg3/HpK9BEDpM5ohN6N
pED1yTTGkWcM6HN2Mx5+RAHS3sKDoR+x7aQ2cJlSQFiw449cLQOmtJ5esGen
gF/d+rkrW5ngSIpSkdAbAy7dl3p3pJjgYKysvXh4DJ6XC733386ECuUfcj9V
x+BdvrhW8i4mdCXosiqKjEFOgmLI3DEmxPtJZ0qRR2HcX0fqpQMTBMwn9TN8
RsH4sI9udRET3nVqeNfGkaFnemR9WRkTdlwOfPzhFRmupp1pL/jJBO/vUqeu
PiGDg6SE7bdGJhywNctLukGGh6xFjyKGmWBgd+mB4S4ypFQuFFvzTUJxeJRb
f/YIsJ9x38N6ZRKCnG6bnMjGfYKjb2nh6iT4GiZp+X0ZBn50omLKdhJS2Kzz
El4Ng7DK5vOjTpMgx9HYneE8DMobfzj98Z8EK9Gy9gzch0zbGMnvUyZhTV/n
3rMfhiDd/JbMgaVJ4FXxzFFwGoSrWYR4LOsU5LrqVn0zHYSNvK4iHJxTMKr1
oXvziUFwzbsn0LRhCvY5bHLwFxmE/YIByzd2TsGDfbfOj+BzUFlNXFeU4RRw
0VvQ63UkaFHveDGfMAX9/YdXjB/2w+Pgy6EWaVMQM+r5L+56P2iQ+gIrM6dA
g+/uv5rT/RD5fNg3vHgKXh2rVEwQ6YcrFKajfMsUTP3+/UbT4i+MfODTv7Qy
BQ6H268+T+iFWe5j7HkXpsGTZdOa2n+dIEDjf1VmOg1K549FXqvoBIXGLtk6
i2kIey1Q+S2oE8zeOGv/vTENAZyBe8yFOqFsW1zgWu9peDAobsOp0AGhh1gF
DOOngZC5rSqn1QayjkiMOjMNx+WTmqzVmkDzXHDq1OI0sIiLvHeiNcJF9Yua
yywzwBLoyZRMaoSgBZrFBp4ZCIjIl70u1Qj0JxKf9krOgOuMUXkAVwPkf/CS
99eZwfVJ2fPws19wrvGghnjkDPjSb/PIjJcC10Ge0sL3M6ASFS0rs68USj53
6Zt9mgHd4qAdfI9KQNnz7tW3aTMQO0o+ul+xGHglc0JEKmfA8ojQm27TXKh2
UBvczJwBqTZKSnFkAhzhkg/jPzULvm9GBiJ1ktHcnTnRtHOzUNK7qfZiRhr6
1v3zy+mLePzopZR9AhlI4pttQYjVLMSShTocnv5ASxc+j3DfxX54VbUiogDl
fJI8zBk/C1KdGwrzJCqRIx/9Z3zyLDhNDGdlra9COzyKDbUz8PiJt9272H6i
V3pX7B4XzgJLzQwkUquRMyP6JXszvn7Lyx+LDXVI4bK9xKeOWTjy64CKev1v
NFCxP1GrD89Py+YFy+96ZBDZUfxwbHU+6fLp1xsQF1vCSWn6LHhmZX5/MNaA
0E2PlpKpWZgb3EcSdmhE7q3aFpYLs6CS7qX0hN6IlEGIsrIyC5G3K7mqXJrQ
/3/QlS8=
"]]}}, {{}, {},
{Hue[0.67, 0.6, 0.6], Dashing[{Small, Small}],
LineBox[{{0.5640230744006248, 0.}, {0.5640230744006248, 2.}}]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-2.5, 1.5}, {-0.2883162580162604, 1.1337556301025589`}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{{3.661355400057754*^9, 3.661355484875826*^9}, {
3.661355639112556*^9, 3.6613556674477453`*^9}, 3.66135581451628*^9,
3.6613558461861362`*^9, 3.661356713020488*^9, {3.661356783878813*^9,
3.66135679981393*^9}, 3.66135683581847*^9, {3.661360098469356*^9,
3.6613601059361467`*^9}, 3.6613602829238663`*^9, 3.661360759980571*^9,
3.661363375705228*^9, 3.6613634890202208`*^9, 3.661364142996811*^9,
3.6613644886211033`*^9, 3.661365486055447*^9, {3.6613656411576138`*^9,
3.66136566377569*^9}, 3.662562653301832*^9, 3.662562712109947*^9,
3.669308950437655*^9, 3.7029389808521852`*^9, {3.702940476999694*^9,
3.702940493703751*^9}, {3.702941251294978*^9, 3.70294125703004*^9}, {
3.7029430224372597`*^9, 3.7029430415058527`*^9}, 3.702987020091751*^9,
3.70298706694858*^9, 3.702987239412066*^9, 3.703005253965756*^9,
3.703005285844059*^9}]
}, Open ]],
Cell["\<\
With \[Sigma]\[Alpha]=0.85 and skew, this would not be a branching point \
because the following is negative:\
\>", "Text",
CellChangeTimes->{{3.66135964140793*^9, 3.661359644255671*^9}, {
3.6613599655973597`*^9, 3.661359975882709*^9}, {3.661360044227745*^9,
3.6613600812408752`*^9}, {3.66136339462226*^9, 3.661363404861648*^9}, {
3.661363438759192*^9, 3.661363443239099*^9}, 3.669320122992879*^9, {
3.669332352417199*^9, 3.669332356562945*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",", "u1",
",", "0", ",", "nm", ",", "ntot", ",", "0", ",", "Km"}], "]"}], ",",
RowBox[{"{",
RowBox[{"um", ",", "2"}], "}"}]}], "]"}], "/.",
RowBox[{"um", "\[Rule]", "u1"}]}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], "/.", "roots"}]], "Input",
CellChangeTimes->{{3.6613595685591793`*^9, 3.661359584469429*^9}, {
3.661359624203629*^9, 3.661359627019671*^9}, {3.661359665394278*^9,
3.661359709153092*^9}, 3.661359804535282*^9, {3.6613598575885057`*^9,
3.661359924152072*^9}, {3.661365416938882*^9, 3.661365430544819*^9},
3.669320123591202*^9, 3.669320647732378*^9, {3.702943036953147*^9,
3.702943038818841*^9}}],
Cell[BoxData[
RowBox[{"-", "0.20148613186881842`"}]], "Output",
CellChangeTimes->{
3.6613596291155033`*^9, {3.661359695178446*^9, 3.661359713074703*^9}, {
3.661359876961609*^9, 3.661359946402203*^9}, {3.661360098503271*^9,
3.661360105970409*^9}, 3.661360282957787*^9, 3.6613607600139627`*^9,
3.661363375739296*^9, 3.66136348905296*^9, 3.661364143029723*^9,
3.66136448865444*^9, {3.6613656411899433`*^9, 3.661365663809816*^9},
3.662562653335972*^9, 3.662562712142785*^9, 3.669308950471209*^9,
3.70293898090276*^9, {3.702941252075344*^9, 3.7029412576722918`*^9}, {
3.702943026836296*^9, 3.702943043789357*^9}, {3.702987021091477*^9,
3.702987067510428*^9}, 3.702987240095086*^9}]
}, Open ]],
Cell["\<\
Zooming into the single-species ESS shows that a population at this singular \
point is a local maximum on the fitness surface (not a branching point), so \
that small step mutations would not invade (but a large step mutation would, \
e.g., one taking the system to um = -0.9).\
\>", "Text",
CellChangeTimes->{{3.703005050203574*^9, 3.703005058338039*^9}, {
3.703005110767887*^9, 3.703005205212928*^9}, 3.703005396144545*^9}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",", "u1",
",", "0", ",", "nm", ",", "ntot", ",", "0", ",", "Km"}], "]"}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], "/.", "roots"}], ",",
RowBox[{"{",
RowBox[{"um", ",", "0.4", ",", "0.7"}], "}"}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"u1", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"u1", ",", "2"}], "}"}]}], "}"}], "/.", "roots"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]", "Dashed"}]}], "]"}]}],
"\[IndentingNewLine]", "]"}]], "Input",
CellChangeTimes->{{3.703004990248858*^9, 3.703004995471909*^9}, {
3.703005027797546*^9, 3.703005077504517*^9}, {3.7030053049250383`*^9,
3.7030053086922894`*^9}}],
Cell[BoxData[
GraphicsBox[{{{}, {},
{Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwd2Xk4VVsUAHDUK5UpCSkqQ6j0lBKK1UAZiqKiQhKS6hYJFZJkylTJIxIl
hESGVDKUVFJJEveei3MMIbOMGd7a/eX7fcfZZ++111p7+yy3PWNqz8fDw5PF
y8NDfib7r06IiamHZWmLFFhTvXAz9nDw4th6WF2wVvwU+nJWsOvduHooKgjk
d0JbsNv1E+/Vw0D5QJ89eu6ah/2pD+shIiS7ygp9+rv09oLseqjRf/xxN3q9
vHBb7Yd6KFfTyFyDflPav0psvB6SxA5I/Z7shcKlyiH5f+qBr61VbQCd72XT
ZTFZDy22XOM+dJrml4y7PGwoNOUL6kJHZGeoKM5mg2TWEqFWtGXi8X+1xNgg
72hxuBY95MNdZ7OGDQUp83leoBW3fNDMsGWDUkDksWvo5DXHmtbZsSFrnnnv
VfQK6Un/5/b4XEPX0xctP65aU+7IBibpbsxltGxuNItmsaE9fAdzAb1EyfGB
+CU2VCfqpLPQIiKzBa/cYkPyfxukDqLDpxJyZt9mgyN/Q4U5Wqhb61BYFD7v
e+R5AC1YwUqJjWHDDkhvNkPP9avdmn+PDeUeu4uN0TNHH7r9SmeDkxU3Qxc9
2qjbtL+MDQkrbhxZi165U45b85YNJZwFWqpk/Zm8bLN3bNDPSFn4L7rEs+jb
3go2+JfwVq1GBy3SeLe7ig2sOxf2KqGlzFZl6lFs6Fm6M2ApelP5fM8Nv/F9
xapCITRLpc8jd4gNA0lznguiEyI/n1cbwXir784XIPM7dv3M2nE2PH3SnzMX
XTk985gKDweK3j96OYvMR3PUQEGAA7NeJk1MTfSCd0aDxEJ5DjTpbNjeh35l
+TY4V4EDh1REd/eiJwQyJs0U0aVLLXrQl05faL65kgO1Tz86d6E91og9EVnL
geQU65x2tHOWwQ4BHQ4oLVA9Q6PtcnNdZ1hwwNbd49039AO72J/3D3LA2Iw9
XI1mxHwPbTvMgWj/Y4rER8+bbLlizYHU8s7rVWhr9c5503YcWOdcZvsJbVGw
9MG4M873jO3Od2ijwuCv/dc5MP5GvfMlWmTyW/D5UA5sMzpuQFyjLa07FsaB
z18jHr0g4xU/yee5yYHc5k+nnqNdXtfECkdzYMCgYyoffee9jINKEgeWebP2
PkUfmeO4NPshBxxfzC/JRssbZtetT8HnQmn/Emd+3G60OY0DNTzP52ehSz87
qhplccBPzYB+jG6veTruWMiByNw/jx+hHy+cyOl6hd9rr15F7HJA7/TZYhxf
NzYtlcT7x49G99cccDk3lZaCFuZMlPm/54Dhm9nPHqLV6R3hSTUcmBnT8ycR
7dfNlmvq4oBGjfHGWPQB99Vmfj0c4NM7W3EHrcTr7avUx4GeoAfWxJViy+mz
g/g9fZ3gGLTY5uPxvOMYj/hNPf+hk4IHJeVmU6BfKtgRiXYT09N/x0+B0oBC
KLF+fJT7ybkUpFUbriPuytaszRGkgDJ/fvkWen395Vu6YhSst1+meBNdpigg
5LCcgkMjn1LC0VHZVtpz5SgY3hlsSey46cmpTHkKuiSMRYkFTEw/DitSoNXe
6ROG3ucWHRiwhgJJpbNOoegVPJ3PVqlS4L/3iCLxaNCmn1/WUlBuZdYago67
26AnuYECvy/6dsQtZfIzHm2iwPTXEdZ1dL6x27rd2hSwp06pEQfWvTvar0NB
8n7PsWD06i6nEs1tFER4JgQSuy7I9qrQp8DTY+hpEHrHXb7HLEMKXp+Z50Ms
qbiPEt1FQcvs5cbEhVojWodNKIh6b9AdiJ5pqz36az8FIYaBG4mD7L55BZpT
kGBuIUgsdPzEDIWDFPBoL2kJQEucui1kbUmBhol3JPFKt275KlsKhMrv8xA/
8biadsqOgvEP/A3+JN6XFqnOcaDARdamkFjHR2/TthMUqIfRl4j3Bt/dm3sG
431pxSzi2hC1H3ucKZAyEfp1DX0o/INltwsFO/paqojtIoeOr3CjIN7C6h5x
R9T17tfuFGR4TQUQs2KWnztygQKP1aHOxB7xu72jPSkIY5x3Ek8mNM/Y4E0B
Vqcase+DC0FfL1PA18+/nPh66sPIuVcpWPPJZMqP1Gv6JqkUPwr6LPf1EEc+
/npvuz/uz6/tjcTxTyfTPIMwPqXMG2K5vFuqi65TIG534xlx6jPl/LwQfF6i
nEGs8qJ4k2kYBQJX0xOJnxbuL+0Jx3w5LB5NvLH4147rNyi4M3IinLiw9Eql
4i0KAv9JDiDeUiZhWhZJgYNahQ/x2/LHP2yiMH/+rb1IbPhhu9XkfxRYp3w4
T/z5Yz0TE4PvGyQ5E5t9PuOoHkvB5zf2LOK6qn96quMoECsTPEXMfF87Ni8B
91dIxIm4i201U+8BBRejUk8SO3MHg+gkrD+7ytPEw41Bwt7JFJRV1Jwlvsgs
vS2VivnlXupKPN2SJ/XsEe6f5M0LxH4/jRLM0ik4dWjHZWL+TlqhL4MCn1/c
a8ShXe7pIZkUTHlYhBKL9gquVc7C97PybhP/1/8g/2025rfOUDzxkt+am21z
KCj6Kv6IOHH4S+lULgXB4lK5xCvG7HfG5mM8XkwVE6f/+VO5sYCCs05llcSq
UzdMa55T0PbNiU2sOaPISvAV5muAxSixblS+clgR7v8yn9kkP4yVnwwJleDv
r3CS+JuPJgmhIm+wHp38NP/mHxN98EYZ9pPluUbEF87fUBAtp+C9+kNr4rBY
31cLPlDgdKbCnzh6zaWgyAoKXOdNxRI/KD23f2ElxnOkP5u44Kddt/gX7GdP
FzURM2o7paW+Yz/QP6pH6qWrHDru1OLzqXAb4pGDGnmL6/B7bZ6exAI+yrul
OdgftCPyidUr53kto7E+I2+rkXrdcmSmQSJDQefJzH3ERgMTYrItWP/7rroR
20j2ZMj9pCDO0KaQONiuilrRjd/f27iH9IfIkfepKT0U1MJXd+J7waWuSn0U
sKS97hHnZj0VWDlIwazbvP3EDRORm1XGKHAcyYsj/Wjd7YNxav9wwftihDjp
d5uVTB1zZ3GhbyOvAfHOl4brN/BzoS5G0ZPYkt5UqT6PC1IbI1uI/VVkJjTn
cyHMsPUV6aect8zhLdJcqDBdeZP054HE5ru0DD7/JPKdeK53S6PvMi4Yl7yT
JP1cS73t2Fs5LpxKf3ifODq546ThSi4UtEiURJDzKqDv0r6NXJCXC1xOzg/W
sf5XQxpc4Pfe5Ux8DQamo7RwPq85pcS5I4NX67W5EJJw0J6cPwscR65b63Jh
c+/7vNvoKv2pWMe9+P45Rc9ocv7KT3PnmOH4J8/WEU/z8CxL38eFNU+9N5Dz
b81z3qRucy6eEx39xKHK/2S4WHPBY3nfOXKeGs4VKPQ8yQWnfFZcPDnPPi6i
Iq5xobK3wJOcx0c1vOzEA7hgKajdQTyV1NQVG8iFku3HDiSTfPdOmUy+ju9/
jVxHzvNM1Q1LX93gQpOh3wA572Nu77HtuMsFN5ZZRAZZ/5GA9q35OJ5L8tZc
9KLB378H2rhQXnzf6S3aqS7u29l2LtzcfWGc+MUr3ac9HVwQuVofXE76eWDk
mc4uLkSVbXhM7kd3pNd30gM4n5f7Rz+QetY/11g1xYVZa3+nfEbL3O3/kCne
AK/1njjVkf66syfeaUcD7NOTZ3Wjfc7HD/LrN4DhQTkVcv9reGCsn2LQAIXd
mV3E0TxP+pt3NcAuaafT5P4o9OKMrpVZA9hpOJwfJOfz6v4OE5sGGNWTvTeG
rhT9vX7DxQaQyhEyJ/dR14axiunHDcCWLdy+HL32v0fhyUKNEMyp0LFAb7h1
stbJvRHufOO7EYPufWmUqdvQCLZXePu55H4+w1FYcmkTpB2RkViGf7+UGOQE
LjFrgix2MccRvTpxz+dHV5tA0thgSwZ6s9RIjV5BEwzEqU4OoJMfrU7q+tUE
PI0/Dq2f7oVyg1xYsoSGnuZnoqfQn0JWaHajeSzZw8Q1X6LXFUnTkF9xmX0a
zez3UrBZSkNTzN6EM+ipozvmJcnSIGY9Y8U59MaLdbWrlGnw2bNu0UV0atrE
6U3qNKxcbRobgA6epxd3aA8NcT0Sgwlk/Kj2Aum9NKy4aJaSiJaRDfnehG6J
n3X4Pvqpxjeh42Y0hCysLnmArrc/euXcARr4jg5cS0YrlXg5hFjSIJo4OZSO
fuear1rkSMOpGw5O+WgRnkO7r5ygQaf7o8Az9KHrkyd0nWjQaIzNJO5J1H1Q
cZIGmeYLfQVo8S/VC3+waCgflj39Eu2g3Dve60qDSOQngxL0zAbFt8uv0CAk
+zD0AzrlYbcAjbb4XbaoAm14Omdfgi8NWSH6D4lvTOi0yPjRYHjlwouPZH2L
D8xYEkCDZKQ79xNa08Jvq3goDYUSof9Uo1nVTa/mxtBQVnyUU48WvZP8TwU6
4puGGRudd/TU7qA7OP/VxyuIJ/pGqNlxNEwsep/PQQcJC0/MvEeDR1t4ABed
tEtbazoJ4yfXyE+T+JXH5A9m0RB293nATzRfzjHNN9k0OAhO9ROvvqdSePMp
5gPf6cPtaB/30tK1uTTc8Xi/qoPEW6mj8swzGlyOHH/diXYP0mj+9Qrzxedb
eTc64Tyfw8si9Pmrcj3oiqOV7cHFNOz7uv8ysYyWTY9yKe5v/pH1vST/OgPG
jpfRMDo4dqsPvXDXD+GWCpzfrFqlQbSORuLNnI80OBmdcSd2lD+58GolDfc/
y74lLpyYkpL9TAPLr9bqN9ru8YoVNl9pMD5o6zeEDovpS/23moYl2sUfiQuu
vVg1ja7asU50GC1gbbw2voaGtiKLOOIcIbfN1A8abFqiH46gqXEoTq+jQetO
dCvxrJ9ztl2qx/kfSpMfJflUfHenFIcG3R7eBGK+s29NLRpoiBx2uT6G3vtV
7ERNCw3eGzrW/0EX/SMiHNVKQ7tHuC3xSq15eeZtNFhaHgknnvmAl5fzE9ez
/2Ibcb5rTzTdSYPv7hvBE2i5Rx06D37R4PbZI5s4gtvSYteF87np/4P4xA6O
ans3DVs2Llg+iV4i+f59Tx8N6+RbHxEH7XrDyurH9YwMfCAe9ikScxnA+nwi
10H8pSPXZmiQBrZ0l/wUerNM1qxnv2lImPDdSpxqmp7hMYT1JLLJitj3ZeLo
n2EaShQEbxL39sbFvxrB+JmsSCe2lI/WvTxKw55J6zfEG0LDIvjGcT83qPQT
3y8NUi9D8/0snTWNFhr2o679wfw76bqYuN36ktKcSawvnbXbiPffcvtcgRbN
0dpH/Pqds2vIFMbbwMaeeM3EKSnjaRz/duJ54lhVxxJhHgbEVk75EfPbH3P4
ihaNPX+L2DXGWuAWLwOfL81OJDbm228hPoOBNWyP58Qv1fdM/UCHeZuXESud
NEqKmcnA6ibjz8SR93YYHv6HgR03rX8Q89Zs7VsyC58r+TcSs/i1oxrQ4hve
thGzN2tsTpjNgOquxd3EO53VmKP8DKTyBA4Q5z5cEyg3h4H7rXNHiJezlde0
otXDHowThwkp1CTPZcA1dO8k8fi2ZRcd5zHAchObJj7uvnjZSgEGllG//npL
0/xTjwUZuHmidopYyoC/QFWYgW2fBP+O5+81w3oAnaCjN0w8mD01I1eEAan4
sH5im7axR+fnM+Dv3fGLuFJqyGSjKAPxLvtbiTVN+oZG0TKC1Vzi5Ku/Yl8s
YOBFk/V3YtGCtq2eYgxI+vz5SHy5i/6pvZCBJq+UUmIXPfq9sDgDTLJ9HrFD
fNMjGu23mD+V+OBIY3COBK5vT1gM8a49jSevSTKw+cVI0N/1PWrYZb6IAc9P
2y8Qq/E1qChLMZA55Xz873pzqd7KxQxUhLhsIRYUpKrilzDgXb19FTGPAyf7
rDQ+nz0kRvxTgn1ObCkDu0SHWkh+ss/W72tDj37Z9pH484e6DQXLGFAyZmUR
5176MXJYloFIS0t34pSa2joVOQYGaqQPEt9RqX0+jRZreKFJfKWx5tIDBQbc
XK6NkHoz3l493amE8TLZbU+8Ne5rU6Eyzn+co028fqiqNGwlA3U1WxcSL075
cnXdaty/1ogSUu/tcz/NvvgvxlNSZQ4x51hlu5EqAzZN9nWkf3wu/PhBei0D
1S7OycR5rIrrpesY8Hk7pUPsW/1OeI46A3wvmaPj6POr3vWx0VLn7isSO/qV
f83YiPUSrtpF+pmJ+ttbezQZsC7KcyZecue1RPRmzI+gfSzS/4QHS0dPaDNg
2Oe+8m8/3FVav0kH47XX/m//7Jgsjm0EBnw/xpoT5x99tVRxO85XyVGF9N+9
ygWK+QZYHyF88aS/xxfVq/kZMiA0JqNP3Gn2B0yNML9F+PsH0H7eOhY9u3B/
ZHWAOP9bWeCKPQzoy6/6RM6TJd5fO6IOMBDx/GYmOZ9OLBgcsjPH72do6RHn
p4rxqVlgfXOT2V1kfd/Mpb4cxPrjfuAl9lVqMJxtxcDFkFVbyXn3s7oz3f0Y
xmvTz6ttZH8cBQr07PD95FuziH0mVcoW2DMwUf8noJXkn5Iz9cQB6+/CpH8L
yV+vEYH2Ewzkl+SfZ9BPFWeyLM5ivrgFL2xAe3lKq2p6YX48mThUQ86nQ2eP
jKHbzI8Uf0PHbXwT9tybgfUKMbLEhQOO3Zo+DBQ4R7R+Jf3AMTdN6yruX+oV
qy9ot/1GCpuDGMiQEVxI7iOsNRek4DYDtbov7xWhp+ZVGkyjZaJWNrxCh3bI
XCiOYsBO8thi4oyksh8QzYBDr8pNch/qlBK5vSWWAfn7Ms7kvuQwO0V4WyLG
v27O72z0kaaamXqPMf49g3OTyPeZVWcWZuJ8vbsFyf0tpMW3vhV9sc9RmNzv
CtpVM/2zGNDa1CxI7oMi/SHm73NwPonfR2PRJbx6aUYvMJ76av630LJyeSam
7xiYm0NdvILWUBB4Ifse1394fJcPqSfFY/KD6MKPAdKX0RdXzR+7VcFA8sve
557ob2qn73//hL/f3dzoTvJHV2HIooaBOKGGRnK/bbW/fecIzcCW51IZFmid
LGklWYYBp5B4W3N01PjDvBa0UmGexAG0fnh+1YkWrCezOC8zEq+CH7Ncf2I+
mGhrGJPzZZ7UucBuBpZ8tXfcjp6RHW+UPcbA8Mic7NWkv0+kTPCJNsNo2q4P
43g/r/E1zStFW6zarzyG9p8zedpnQTOM72MCRtCd4qaNk2LN4MoO3PIbnbt2
onRUohnOKo/f60bvOL4noEe6GZxi5kg0oU9Vj85nK+P4JgXMG3RBqoFi9tZm
GA5a/sMf3W82KuWzDccvHUj1Q6+cThYy2Y7PzZs9fNFx+2cOd+k2Q5XRsgXe
5P8vfMVlSvrN8Fp0TPU8+Z7letsE42bYNv5g/jH0d+Gld8MPN8N6vkpbbfSA
229R1vlmCDyaJkf+X8JyqlH+160ZNE4EJ3egO61yt/ShZbxSFH+iaV1XlotH
M/Q0RMkz6CrR3x/cLuF6ZLTn1KEzMwd9Ll9phkOim73eoJ3aBnoiQpuhxTFZ
gPy9xOzvr8h52Ay295QyddBuB0a287Obofyp7X82+PdYyXGToNa5LXBzJFXs
zJ9esA9X/++TVgvo2kjo2oz3wuO6FQ5lrBbIvRshKTrWC+nrTvDq3muBs8fP
zn860gu7M3Otqr+1gCiVt3fWcC8YbAn3PTm7Fbx/i42r/u6FP8zLc6EbW6Fs
WrRg1wD2s5R+haKTrSBfZ35ybl8vWHleSHKPawUfIy+FF91Yf3Ni0s8UtcK2
eJe80V+98D9fTjwT
"]]}}, {{}, {},
{Hue[0.67, 0.6, 0.6], Dashing[{Small, Small}],
LineBox[{{0.5640230744006248, 0.}, {0.5640230744006248, 2.}}]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0.4, 0.9976},
PlotRange->{{0.4, 0.7}, {0.9975551170254635, 0.9999999998534612}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{{3.703004987074624*^9, 3.703004995976568*^9}, {
3.703005037945709*^9, 3.7030050779753942`*^9}, 3.703005309889642*^9}]
}, Open ]],
Cell["\<\
Skewed competition function with \[Beta] = 0.6:\
\>", "Text",
CellChangeTimes->{{3.661355671688161*^9, 3.6613556989663982`*^9}, {
3.669332363452776*^9, 3.669332395466394*^9}}],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"try\[Kappa]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"try\[Beta]", "=", "0.6"}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"roots", " ", "=", " ",
RowBox[{"FindRoot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",",
"u1", ",", "0", ",", "nm", ",", "ntot", ",", "0", ",", "Km"}],
"]"}], ",", "um"}], "]"}], "/.",
RowBox[{"um", "\[Rule]", "u1"}]}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], ")"}], "\[Equal]", "0"}], ",",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "u1", ",", "0",
",", "0", ",", "ntot", ",", "0", ",", "0", ",", "Km"}], "]"}],
"\[Equal]", "1"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"u1", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"Km", ",", "5000"}], "}"}]}], "}"}]}], "]"}]}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",", "u1",
",", "0", ",", "nm", ",", "ntot", ",", "0", ",", "Km"}], "]"}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], "/.", "roots"}], ",",
RowBox[{"{",
RowBox[{"um", ",",
RowBox[{"-", "2"}], ",", "2"}], "}"}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"u1", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"u1", ",", "2"}], "}"}]}], "}"}], "/.", "roots"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]", "Dashed"}]}], "]"}]}],
"\[IndentingNewLine]", "]"}]}], "Input",
CellChangeTimes->{{3.661355380776771*^9, 3.6613554716473618`*^9}, {
3.661355628776557*^9, 3.6613556384935837`*^9}, {3.6613557349779043`*^9,
3.661355735375474*^9}, {3.6613567865132637`*^9, 3.661356787184842*^9},
3.661356837748784*^9, {3.661363480544209*^9, 3.661363495037232*^9},
3.661365492433366*^9, {3.669320124274016*^9, 3.669320124941757*^9}, {
3.6693206377990513`*^9, 3.66932064496451*^9}, {3.702940465174862*^9,
3.702940467911091*^9}, {3.702943049393299*^9, 3.702943053348877*^9}, {
3.7030053695961533`*^9, 3.703005377127123*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"u1", "\[Rule]", "0.6648199445983377`"}], ",",
RowBox[{"Km", "\[Rule]", "7816.384007216777`"}]}], "}"}]], "Output",
CellChangeTimes->{{3.661355400057754*^9, 3.661355484875826*^9},
3.661355639112556*^9, 3.66135573562361*^9, 3.6613558145489607`*^9,
3.661355846220117*^9, {3.6613567875470133`*^9, 3.661356799847382*^9},
3.661356838152878*^9, {3.6613600985369987`*^9, 3.6613601060031567`*^9},
3.6613602829907093`*^9, 3.661360760047449*^9, 3.66136337577344*^9, {
3.661363489086845*^9, 3.661363496037834*^9}, {3.661364139329336*^9,
3.661364143064105*^9}, 3.661364488688263*^9, 3.6613654930910997`*^9, {
3.661365641224661*^9, 3.661365663844842*^9}, 3.6625626533684483`*^9,
3.6625627121761312`*^9, 3.669308950551178*^9, 3.702938980969791*^9,
3.702940468782918*^9, {3.7029412522790327`*^9, 3.7029412577625933`*^9},
3.7029430588911057`*^9, 3.7029870211749477`*^9, {3.702987062157529*^9,
3.702987067646666*^9}, 3.7029872402954197`*^9, {3.7030053620465508`*^9,
3.70300537823067*^9}}],
Cell[BoxData[
GraphicsBox[{{{}, {},
{Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwt2nk0lF8fAHCJksqWlFLWJFFIZe1bQloUEqKEJCFJwg8JSSptUqmE7FEo
yhKuPdn3LeuYGWOMWezG9l7nvP/U+Zznmee59z73u9xzSNrdMrnGycHB8RH/
s/L/PhChLi8vI6PpYH1e7WK4NScdOsdeRpk9HYfWfSqGzCxl2YmpZWQT1S1Q
uVAMKnKGduTRZbT1nrSuz+8SOCwY3F3bsYwsQjfSmw6WwdEhVvX7DPz7/NPs
6zsrweRRXdqBK8tI6fSftR7FNeDVEHzzetESkvGr5fgn1wJho54dk7lL6Kjq
6e4M0xaIW3vjWFDWElJ6LXrOPqAFasFw86eUJZQQ5evq0tECUpmbC5vDl1BP
sZLGwoNWqH+ZtOHI9SXk5izltL+jDWRNqtKEBZbQQJdV7ROHTmhtXU8tsV1E
nZE7Irj39UKg/c+itEuLSOGhSQ6fUS/sm7R+/cZ8EWW7BflyuPdC6KYfWjcM
F9HW/U93R//sBW0TixcC6osoVsKwsUyzD5IaElSvCCyiS401BpXH+8G7Wvv+
QtEC+mFHl3zyeQB2FN8SPiy2gOSF9xxeG0iAWqGDHhpbFpAPFyV90wsC+Fxj
t2gLLaD2SfFvIp8I0M778LUuzwJyt8m+wJFHgJcXPgiZTM4jWrbj6qtMAqwe
LRe4WTuPzG78J+F8eQhGNm/bGO+HHX27N0OJCD+dy7n5e9moNmDD+IlCEqhJ
uCondbBR5M9vn2WqSZDfuuWydjMbfX3MapppJ0GxtnO28x82cguXqg9kkqCa
X+hq1Xc2WtilSZGRJsNA1pXiwBA28uBO3PMthAy8C2yfyf1sJKKrPMvUHwab
MGVmV9AcCulzuP/sGwV8ssND6u7NIYGm7bEPcijwpmdCrMR7Djmq6hS5l1Cg
WuHXyRTXObRPvHi1VhsFDtRpxHtaziG2b52c7wIF1vDpmm1SmUPkpgSfjJMj
8PWFWcGZwVkk5xrwbEP/CMyG+4YimEXNArZf3KapMCxWQtXXmEXe3FYfvZap
0J60xrBedRY5scdve/GMQlb+K8HePbMom/Wyz3bbKLgSkj+wN80i2a9oP0F7
FIaUW78epMygKv53XhEPRqG+UaEp7eUMak18v6F3HQ3i+fpEIwenkcx9G5c+
zjEIt4K16j3TKISRFyTGOwZBKbGTXe3T6OtG1WxTwTGw07nasL12Gqlc5vDM
Eh8DKU9KcMyvaZTp+b5ZXmsM4nrHGUlPp1GsBaFltccYxH5dW/nz4DQKjup6
erd/DKJOKbu3PJ5CmZQPUlxJdJBZf6q6MXgKVUpWbL2XRoe0Gjup+vtTaCfH
0DtWJh3yz0Q0V92dQrppw+p1v+nQdXZGpch2Cr2N0Th9rokOIucLJ1LUp1Dc
m4HnAfN0eGF18q7/yCQq/+eXmHSGASJidnW+xEkU6baGEWHMgOgen13/9U8i
m2Yq930zBqRf/tp2p20StWpT4/VtGFB7hf/QjZJJ9Ovmva74OwzgsW+bPv8e
3/+Sk/buPQOCXGy995ycRFz28S4eBAb0PbeOyj8+idwfDAfDMAM0vlsVnz4y
iV72aM5w0xgwPnWBx/XAJMotezMRPMUA2/unIn/smERNVW8rd3Ex4Wj4gVzN
8Ql0R+lpsr8IE5ZyuGcNP06gRknNkEB1Jlh2c4r1v5lA1WNLjGhNJvxaWAa3
lxOoR2/33nxtJrgeYz8KfziBNNrnRKnHmNBbTd/ScWsC7dCvmtl/igkFvR2H
bXQnkMz7l3GmlkzwXZ3q5T42jkLnI1et+w///r31GhvKONqtpaRR5sMEu/2b
3hgOjaNPkk0pvn5MOGXl90Ouaxwp+9zYO3yfCVuzzo71lY8jpVmnnpQQJmTb
TdidjhpHna8KYjpeM4FeonVW5vQ4ElbaKUX5ygSCOatHUH8cJWx2iHNKZ0Lb
WKLz8lF8fVvE7dEMPD5R/sfdh8aRS0L08vAPJjy9PVj2UmocHeLQYNTmMkFO
MkR9cY6Fqm74l+iXM8E2oEGmPYWF+kaLji93McGsK+ZIbzwLNV7uuqf/D49X
xc2CGM1C3hSCYlgPE1SJAmHjESy0qcJ2XKifCTwGJhN8gSyUm24kzkdkQjp/
W8mJiyxEySa//z3GhPnobuu8dSxE6DIPnVlmAnMm1buYi4Wc7euK+FaxgGjk
G/5nmYmepT+8L8PJgnpOscq2KSZqPaEad5qLBXEOlxXHB5moj/79XigPCwz2
DczL5zPRtpMhmwsFWPCmkBQZ5cREO3N3LW6WYIG19wf/w9eYSFf7sscmSRbI
HThn33yFiZqH1E7xS7EgPyV3P88FJgo43S7MKcOCvtdPK+8AE7nlOGu07mbB
biflyVPCTBRUyueydz8LmDLkLhIfEyUVysryK7Egr/8DCljHRLmcSadY2O9S
eURuLjKQG624LVOFBQMB6cd1mxmo2jSJZ8chFrgrsqPHfRlIUAaCUrVYwBV/
1UnuNgPh0Fa/q82Ct1vrDlo7MNAraWmHI0dY8Ht1bO1fIwYqrnKQqQV8f7ce
O3YXA+24kqHfpoPvD3l14VwDHVnIU1G0AZ5Pv9yGr1J0ZOO/4fqm8yzw01r1
7cNWOqr/84wUj639vsvwMR8dHTlmIHHAlAXFJk9eOLDH0B/G51rDCyz4UzEq
JNk8hhz+3hbwMGdBa1q66NvAMaRBdysOtsLv43mUH+w1hnLz5nVXXWKB+bUr
VndujiHu6++e+2F37xT4ZHRxDJ3KP3Dn1mUWDL66LbFeeQzlu1q90r/CArqX
6u6AARrSMZ/9mG/HgszWDVWu7TTE22mQJX2VBbeVSY6Xa2mI+ONG5FPsSeqb
VI1cGmr9drLe3J4F85dnFKde0NC2mN8zg9dYwKObr+oENLRmaSG/0JEF1bHh
bRYHaUjtzX3mphssCFt08jyxl4ZOJwUsOGLz52zPldlCQ7Zcch/4nVggIn9P
s58+iujK++bPOrNAWuCojmn0KBpJF6h7e5MFz5UGfZxej6LZwFmjAexZo6Cs
gNBRFHciOFDOlQW1r8plvrmPos4/+qPZ2B6bTq5dc2IURXhlThbewvvpABXE
tEYRB5nJXMA2MH3qraI8ioRlzsdouLFgx5u6EevtoyisU3PzD+xKEZPaHAYV
HSxt8351mwVKhye46olUtNXskmgl9gfzCG1iFxXJuATdnsO+FdmeLlBORcGK
LqcvueP1z/Uals2jotcuL+qfYut2bZXQTqciRzPBDfnYW7dZvboRSUWxEcxc
oTssCNJY+Hv/GRWdz/y2RxubZvmJ820QFT1Z89jcAbvkY/+dUhcq+mxoOZaN
7bTD3mz7MSrSGkgRPu6B94c29wvlQ/j9Su8Dr2IfsU76c2IvFa1OlPsehL0p
hqLmsZmK9puRLQux/dHj2094qYjH/m57JzalXz41dnkERahf2zKBXSBxc3vd
yAiCkD006bsskD3GZzrUN4IST18J1MB+aZsRNtcygtw9c/vOYbMDjSr4/44g
uy4Slz32tTjW4q6iERR7MXLSE7uxNPyQVtYIMmMEpIdiawwduGWSMoKOJBkd
eI+dsLot2fHTCJKLzn2Qgs0n4zngHz6CXq53iv2F7a27RfTNoxEkpibypAyb
YJ9rnOY3grQfuB5rwD7z8OKTktsj6KudzJ8u7JxEdmmHwwiasxvZPoQtVflx
fsxqBInI3To6ih1G1lLlMh5BhJvXD45jT6/pc9mmP4LyeILnZ7Btdt9PVNIc
QUyS5+sF7OoTEn36SiPIacP44jK2qmOJyOVdI0jqU7ImpycLokPtzt3ZNoJS
W04arsZe92V16GP+EfR7zdMDK/b4m1AcwzWCclN2MFZh943ozf2coyANg+yA
lecZ8A4r19IpKOLlqpF57B/yoU6EIQqyPJUrtzIe8SabvL1dFNQ912nNWhm/
lzrP3XoKaj7h7U3Fnt0hZF5URkGDmeBJWFn/cmri2jwKKq3vtFhZj2anskmj
dAoqsBiTWFmvI4JRxz/EU5CYzO6GlfVMy/EIH4qkoK8ySvY52FutDQcVnlOQ
6s0fA1+wg7lklTwfUFDffgu9j9is1CV/XHxQcVFN+NOV9ZnJEDO5SkFReyup
jtiHo0OdP1pQ0DnjuOkLK99X1zafaEhBz1umx45h33slZOGlhsfPyv4sgk09
PJpUrEhBY2SPK8t4/5n1lU2tk6aghNGL64exlfbefR21kYI+WB9TysKOajIk
kDjxePU+pr7DXuctq7x/dhiR9/3d7ItNKO+oLyEMo8A3xiVHsM85Z+5Y3zmM
PuZxrRZf2d+Cj11M64bRvn3aaks4nt5Ya/AO5wwjS27W/Txsg9kovQ3PhtGS
rMk7aeyf0XcjLgQNoxBvsdB5HL9SemeHor2GkYJ6++1m7PlXywHKdsNITbVR
5R52+l67ArPDw+hRO/PeSr7Y3qyxPlZhGI1pGZx8ix3qvclyRHIYaQ6v3nQN
27aifMZ3Ax5v3bWEZZx/hK/sPvB5kIxuhfE1y2EHcnMEUdvJqPxeSTwT5y96
WmfjgVoy6tt48b8c7D+zj10rf5GRbMOcig62Tzjty+hTMnqy6/rEaZwP+yu+
Sxw6REbEO2W6yi64Hp2f01VTICPhd7se0HG+3Tp49IaGFBktCFIZqdhGCw3f
j/CRke5PgpkkdrEKXecEmYR2ukU6ceF8HRsjf83iLQltF2rck3CdBVqK7o8t
w0hIyv7Aa1Pszvy8b5eCSCh4235VLmyBdoNpG1cS6oPj4rYOeD4brj+6oU9C
poeVUwVx/bD7L/6LzzQRSYwai5zF9WhpzWidH42IbA2uwbgtzrcRKuP+BCJy
0fD48ga7OaNE40E9ERGliTrdNiw4Tu6veZpERE/ivn+0xPVN5rwYPcqMiHa6
Njmp4XpIUnijgn4NIfnE/hwXXF/l/RPplLQhZFqvdZuJ669rw89Uoc9DKEA7
1+YO9uztdimHp0NIyEaZ5InrNW/Olk0bbYbQfyNGHzyM8X489mHCct0QSj95
8fppQxb4XojJnrYioCr/QAUXXRYI+n85tG/VIDKITbZMwf1IyC+5KoGZAfSv
2kRrPTabnnxxgjaADhWvibqJ+xnClSS/3M4B1P3FrFNpH47/Y/GlOpkDyGed
jsX3vSww4f501vzKAJr8dnHTR1ncD4lK1nH49qMJH3N3ETEWKBxiKCRO9KDp
a8OX27hZ8EB3rDHPuwNl+u0Li2xiwmbT9JcXtzQjsygxQ4EoJvyYruCvkqlG
inYlXA7OTEj8R3o2ElyElHS+VNni/rvbTyTm04EilFkr8ue3BhP4dp7INCYU
ojgVj4Mi2J42Kc15UIjEzina16oxQZ/ktOUJ+zca9c3beuQQEyh0Rqy8Wx5a
xZ7An5gJ8pzsLGerbEQOGfsSvJsJ1vHyFeK82YiZ/SJ5TJYJ4bpW7S25WSje
V22XOTY7pGBWUyQLjXO5xu3dxYSa9fe1NzR9R1JtY5ndUkzolOd5fvFZOnot
VXrfeCcTLhuLZf+7moB2qD2sSNjMBNrElPrd8niUuZx8SBLb720D4tsVj+Ik
dPdHCzMh6l9QzTHyZ0T8qZb7fhPu72uaK841RaMIvS0q7wSZkDHpIk3pjkCC
BOH1XzcyIaBVrnV7mSHKcrA0hjVMUODvdeJWVAXLlAbdOm4mtLOCYgRmLUDh
SnKVFbbva/1qZ1U3YObZBvng80+ZxONHnwSCgJKyrryIkwnXr8s7/FoKh2r1
ScuKJQbk8fq2ld6NB8riTIrKOANiFTe3ZEglAHNW89BVFgNCjDIaoxoSIDxf
VOYNkwGmb4dqPPckQe47JLVIZwBT8kypfG8K1PKwfvSOMkBWfUdGuG461G5z
NBokMWDDpZyv91npkKJqv1oOe8LfONUlOgMMdPW2uREZYEMoNZH2ywR3sf0e
XEMM2Cc3Y7jY9h16Nl75pz3AgL9ZV3S/P84GT8nY4IluBmhVKJTtHsiG4B+/
/Y2wM9vnjkUf+gkJNXd607sY8HbuNTwd+gn25LCqW50MsIcqjWvaOZBNiTzP
2c6A5WolZVFWHnjWnZJ1amLAQcKqnYEWCLToC/eP/8XvzzdnKX1BoEt6n9pa
hecT/q18YA4BOfHkmuvY6z9/PRhrWAwuh3+ce/GHAQtGFj3L9GIgODMl6RUM
6M3M2IOUS8H91RZvYikDuqMsN22xLIXYoothodjtodyLrkGlEPxQqFYRu97G
qnFnSyn4zWjX+pYwoEhgrZe/RxnocN8s21XMgBg363LtnHJojQ+U/V7IgKhL
69Lf9JdDyvFLBdexIw2y342trYAiv72e4tgvJXidP1lUwKmRh+fDCxgQ0PhT
cHEOX09vT3z4mwF+BTbzplKVQBHhP6OH7Z2ynvT1VCUoxVQJrsF2C7DNvfSx
Evyf2c09ycfnaaWNVwq0/oBCuq5cXB4DrMVyDYSv/QGPb4l5TtiWPFdVXJ79
gZe/Yq6pYpsM5HKL9f2Bni9VvDW5DNB5af/V934VhL539eLGPuLH/7YluQpC
FmVq2nPwed4x//7exirIzhNV/YKtclTg/D+Jv0A2YegYY0szf89plP4F66aj
R9N/4fHXHQ+eHPsL7TzruR9it6fW8KWLVoPrjWiey9hPrv2TlrxdDaWuelUC
2ESdq+ndUdWQ8OJaEO0nA7QlRtUiqqohve26119sZjfbcK1EDXBMCvI9wj6V
G9RZfLoGZEOzvl3HTnjDe9XHqwYECuWDT2KbG23zHquvgW3Ld5oEsDMV4ziT
2TUgoqeoP53NAN718s9sZGvB9fOTsR7sogr1uJZ7tRAwRG74hr01vkTh2Zda
kCvK54nEdg84maPfVgtin3puPcCuvdx0jGNVHVRfUOZyw96lebE2T6EOTO9/
LL+M7b910OyORR1Ee8xnnMHunHIcVAiuAxez/RVa2GGZ3tMx/+og4UyAowQ2
+RlH4MW19cAMPzu5Cfuoc+j6TQfqoVnxfCIP9gcDgbe11vWgo2nrs5SF43NX
pETIk3qYTDvpPoV9ZrVEGvyqBze9f0/HsJMGkg/ODdaDYwKhgozNUbS/+MfG
Bqg/Ii8+iG35MeeUi3oDSDj4vO3BzvaGtl3XGiDy5Hv5Lmw+sz9X+l82gN/s
qe52bMcD56iRBQ2gb2+c0IZdItDhYUJpAJ6rLo9WvNErY5mbtxHCv18MWrk/
/9pEOUG8EfqmWl93Yl83PfwEHWwE3ZJ3+f+whY/7nos63Qjd4Ren+leep4yE
/7NthKKuBh0StqvE6u4LXo3gPvPt8yj2dv4TMSrPGkFNJ1FgArtq8Yk9f3wj
WK699nwe+y6tfg8ttxHinn0Q5cbrJfVPiFFV3wjpW1iZ/Nj1f82yE4mNcIos
eH47tm/uh/+C2I1A00hY2o0tl9x35IpAE3BYGv44iN36RopLS7YJ3J9luuhi
77uT+nzKuAl+Bckx7bH/2dLPN19vgkvrfH55YocaqYhm3GuCaZXle4+xCYr5
8Y5fmiDuC8/6H9gvxJYc9VAT1Bvk1/3B1lqvs0+qrQlkVdlP+7DfUv7m/uNo
BrfvTlN8eL+ejO+qO2vRDGE5z877ruz/h+kOFTeboVHf/kgkdqTjg2XNB81Q
PuMn8AuboqiovCe9GXoymuwnsUNzAyJWc7XAbPHBJF8cX0ofLyj6iLaASKBZ
fAx25z35Sua+FmhXM/Arx5Y73jrTe7EFrBcrfwvgeK6q222Vm9ECIZkTJ7Kw
3TIXJvZVtECY1Q12L/bW101hid0tIPO7w28dzheOFr5F4dytQByKGLXD5hmq
l7xp1Qp+0zN64jjfnJi9S5Fc2wYWvbkRBThf0btPBUaKtUF2sf/zCey3heLb
+FXagPjbCfbi/EYO+nt64VIbxOqeLY7CDtm4I6P9B76uLScYivNlpVT53afW
7UDeTQv0L2KAnqHQ6qmfHeBPoI/34Xz93HYda+5vB7D3jkbIlOH53uXoX+rt
APqer8lO2E7R9HyeNZ2gwqwRncV+zqh2FzPrhGKfBzxbcX3ofPWAcHy6EyZ/
nKxzwvXDqX2yJPxQN7SKSuQZ1+LveaUjQCmnBwr2sLY24XoVQtMCcm0PGG1z
erGvA8f/f3GLHwk9QHssLRqG7fr6ps9avl5QqDe2PoHr3dk/qz367HvB77eJ
VxGuh3z7la6HCfXBqeUR8W89eDxLoYaUm/0gdF5ykz8BP/8pfX30g34I6nDn
7ias5BfT6vPv+6G9lfH3IK7HririJ1B5P2wQVSqhYe/OspSo2TgA1QTh/Ra4
nq8dZorG2Q9Aui1NXZrCgD9nd2w0EhoEhbmzYb5jOB73DYq4iw1Caw/X2Sps
m42JEhGygxB9WiZdGPcP7BoF1U6NQWDzd+t8xVY4qWVlc3UQ3MV/PW9n4Hp2
3OqLW/YgzNr/UhXB/UmPlHhWeNEgWFuVCl7C3sM5VJBdNQjZcWLun7FLi50a
Z3vw82omf8pPMGBK22cmgJsAPqXF2w5P4vyk9l7vlRkBPiTr9h6cxvlsy+Vz
WTYEUJUnSt/BnpiWuNjmRIAN4TnNGdhhP1NcRO8TQGXNQbvdMwxAKrmvPyfj
68vyovyzDJBR7Bj8PksAoX8GLmgO7+cNH0dbOIfA0/+w8zh24aj11NSGIdCR
Ppcjw2aAWSqZR0NyCDi2aig9wg7dPb2/9OQQCJf8vXt8ngFjkpv9mz8MQfrL
V+3vFhig5vv5dknCELif3b69CDuoVfFaZvoQEIbG3g9hizzSP/O8dAhyLbYd
VVjE9ZXmte0UdQg0Wow5s7FD9bj41CeHoAoRaC3YzdEvV8ktDeF8KMo9ge1g
/IXCLUSEImmF3H24H3zxq/tXiToRdIbKFz5id/NfT808ToQfczfkfmLL3Jj4
FGNIhEvPxe7WYedu3/Dwni0RorlsneexOe9Gers4E6GxsF5QcBnXj3oZF6u7
RNiXuKplF/ZAgPZ59cdEkI1yizmDLd/9V1/uNRHYtMfJ1tgeB8w0tnwighZD
qvwWdlEYQXFNMhESclIn7mPzkF0lpzKJsObJS9UX2CYwL0zMJ0Jm1/GHn7Cj
Ih/xtJQT4ddJVWIqtvLpWEZmJxHseMIqS7H9EhSGYghEMHnRol+HXbmY2/6c
RgRK8taGdmwBc73qe9NEODtSc7kf2zKzqdCFgwQeYtYsMnbCOuvvVrwksNQ6
GjqGTbejJpwSJoG155DEBLZagWek+k4ShMnn5c1gB21eHSYnR4LGURXjeexa
1xf3t6iQwD6glLSILVK1/c4aLRIQBrvuLmPbSKY4TOmRIF97dHnFqT6qlsRz
JNCdcgxa8WRLsWHLRRLIR1fMr/z+iKLhsdKrJAji9HBaeX5oSJfq95skUJAc
rl15f0v/NblYLxIQFcMlV8a3U318+4tAEiS9ojisjN8x3J/f/ykJqqiXP67M
78co7+qbb0igstGhsA97QffdtFUMCWI579a0YetHS1NPfSFBOe9yWQ32y5mM
XvUsEgR89E4sxu420mqSKySBgK2Zaza2TGpV+ZY/JNA5snFHMrbr6gu5a5pI
EHJGKDMSO/fSYNpUNwnUerp3Pcbm/HUzhkgkwQ+PHj/vlf3Dzw5voeP5tYZl
OWC/dQwJKZ0lgSvLtur8yn4qEfL5zkmG5tmmPMC+67HX9oUIGYTDLykIr6wv
L6PATJIMmUtPotgr+zXmx9adCmSoYmqm92MvVKs3fj1GBgI6m56IHW2zuNfj
DBkGNlRGhmDDdPEjTXMyRCOqmAN2kKQBVLuQofGVE1ViJR5y1n985UWG2fDe
/Qs4nirONExbBJHBpVBxbTs2j7dZ+vA7Mth/j7z6EPt5vf0O7jIycB0X+NSM
41fJXu6/2joydL4Z1IjDbpobxY0NGZ6YL1m6YQvvuhMmRSeDp7T5Nh7sD76B
8yA6DEELx67swvlCS1DPfK3MMIgVynVRcD7pTeLJqt83DE5DPRWp2BLNL5wu
6w6Dv/IkYw92klx0l8+tYeBI6DfajPOTQZHtQR2fYXDUUtpbi/PZyPldr9Y9
HIaFv0OOgdgK978aRH4Yhh/G5WuGcf770Zaf87NiGNxrMt5G4/xo6uy/6V7j
MD4fWZoZYE9x6NzS/TcMqtaCTswpHA8Kf2VbmMPQHLLwUBO7KKjjDXM7BTh5
jS0LcX622fqRlSNLgW0CA8EXsVelWxveV6ZAZOOhyQmcz3W7SFx8JyhwZiL6
vTR29f7JO3vdKWDZI1l9E59HO3oETByqKOB0UVz0Kw3370+vdXo0U6BH/foF
VewC9XzrBz0UkGp9NZWPz6exb686xzIpUNzsalVGxfvf6Fdw99YRcLB0Cy/G
9YtdZpVz9sYI5CZ7mTvj86mLe6b25Tsj0N0Xsq0L178+Ce5y53sj4Ji6cY8e
dum99MbQVyMw/vOm1FZcP58eXkUtzRsBmueE1Zd+BoilJYkd5qUCLf7BWy98
Xn1+cT5OT5gK1E9rrP7i+szBY7THdCcV90NlJqLYRPu5g7dVqJB/mdCWhev7
t51nzqVZUqG76y5HSyuO93BWoHgaFUI7w97k1uP1+09reO2ZUXC9xaMpgs+P
8vZVbXSzUYgi70zdgs+PE2dNy9tsR0FCcGuZCML1Xsblc7zXKPh9Eh7diM+L
Xxs+WkH8KGwIHe3tx/3V3K75Bk/2KHj08SYKZOL5CTwqusxNg9nQVfWj6bge
zgt90xWggY6fa1D5N7y/muSfCMnSQKxGKMQ1DecHP0vddGMaELMulSUkMSC8
OS+XlEID+1XNLpFRDLhUqJdcm4V/z33txumP+HyT0vQmq4gGlQ8EWubf4/i8
N+Ie2EqDUzRRsuk7vN5yooo7OMZg1ra1bfgVnt9978+m5mOgD0UqL0IYULb3
8JMybjrEUgTett/E59P9pvEsfjpU8n+yPufCgFmV2wXi2+hQ7fsrq8IJ72eN
NLrvPjo4frBcTL3OgAgD8fOq5nRYOjNEMLfF9fDaWrHEFDpMrrf5oG6K4zem
41vIafydloXrBdUYEBc3WZl9Ae8jq+3S6odw/CUJDhCu4HndTm++rIrr/7fT
QuCB+9g4Rc0YJQZ0/UaeMyvzfuPAzbkH5/POZHDEfU6oTJyYvigDZNcVUBIM
mOD/+9uhwhk6jP/Z5xRnyISUMt36d1N0KAr5PBpjwgQn8T9fbk3QwYzrEf3D
JSYY5f4nu4VBh4fLxpMv3Zhgnz29Xo9MB+LU8LJfJBO+Wskrb2+lQxxh05YL
FCZ4Hn0jnvSNjs+lIZEmY0woejmrKZtGBw2bOVGjcSbkP2A4xeN5N/f2iZ1e
YEK2rzE7Ip4Oq7q+SB0TYEF9378fpu/pYNMA+xTVWPD85N49esF02FHgrMcd
ygKnWZtV/XgdhUXZbNdnLCiIOtmCTOmwwTM0szOcBT1awjNRxnRY2J+4/esn
FsinT+89c5oO3fF9LJMsFnDmmwr4H6HD26fG0bF9LCBzNI0qytCBz+rwjObB
cSAICnBm0MZgTW7F10SNcfA50DK5eWQMFoVN7fiPjkNQ26opb9IY0Ord6gin
xkEtt1n4QN8YVOukxj+2GQfVZJsIr4YxeCS/w6jj6TiEecTGwvcx4GBzfnEn
jEN9tYN4we0xsBnqmrg/PA68Leu+kW+OQXFt5pFntHGgKJ1/utFpDAJirFuT
p8eBL0JdxchuDJZ185d7eCcgdbRsIsVkDJZe3DY7cWACmoOE3yapjMHCroHV
YsETkF+wnFDOoMGMcaF1xa5JsA/Z2bzNmgZBXRm9R/ZOAm/AlccECxrw2cZd
ylWahCPp8ecTz9NA1u2RZZrmJFxq2yQidpIGps+NzV4ZTwKP9TGu+gM0yKwm
GV6+NwkmYVobj/HQ4MZxPu2p1knwD2r8cu7bKPxTvbJ9V/AU7u+lNa8PU8Fh
7iD/w8dTEFzTKD0/QAVm4YbVpOdT4GLoGf64mwpcJ/KpCe+nIHxm99SbOirs
u7g5XyZjCkL2b/J2yaJCwL0aC5nuKUhqXEzb6E8F2crDb6WVpkHouKEgLz8V
3MwFBKV6puEJ24ymID4Cdin7P+wanAauypkdjVtG4MLcWek95Glo5VlTd1Ng
BDQ+PjuoxJyGYnGVd5GrRoC7n9fyCNcMyBahh2lDFPjgwB1vqTADtefEhcuT
KFB+l6362g97lr/0ixwFRCOIFlw7ZqGW3TD9bNswqD0QF/GQmgW2GS9zRmAY
zNwtW4Z2z0KPQL+75dphCDdqNCxTmQX7nGjOdZNk2LCxQCfIYBaiy8Mr1+M6
vPTwtQKHxyx8lQ7Ijr9HBqKXDsdC9Sxkql5gsztJkG4VmzzhPQfRlfmScl5E
UO2QZq/xn4NtCT/TTFyI8Nsk+cy2B3PQ6Vn++i7ui6tOprOOPpsDn3J754TT
RBg6XKD5/PMciGxvyk4UJ8JW4c4Gueo5qJTb/VClcgiCavlnL29ng83nM2yT
jUNgrn3foKqQDZQyux2vggbhu/VNKY2FeeAYC9SqlOkBu5/MHbGrFkCOcVH4
LFcPCG/wEF2zdgHcPIO1iob+gWeej0Cz4AKoPizRMI/7BxrCoUs3di9AZo6a
iNPOf1D6N677vckChHXonecSwudQ1c7wuRR8Haa2viR3wCzv8dV5FxbBQ81S
hn20BYTofBGlloswQCYS48VaYG9Tt0ztlUUIrhuYVJ1tBut37vr9NxZhQdUQ
bchohjLpuMfc/osw6/xH/NX2ZniutUrAJGkRAkwb6b2MRtjlisRGpxfhpUlX
8BbeOjBp0jy0I3IJLLgGhc/8LgVezfUlBZ+WgDk3v17SqhRKErpPX4pfAg7P
x/lf2SWg5P2f7cf0JRiQ4b8wrFYCfOI5YaIVS2C01UO+8iqCvy4qQ5vHlyB2
w0+XwL15cJRnz0u+M8vAEaDg8/lZCszent2WbrwMsTte890jJ0HGvz+JhubL
MLApOl34SCLszHD4HWa3DBJ362bvjHyGhQsJZN7/luHoVN3nNNu3kBMvrr02
CT+vSid/5/Qd5LqR8ScpDZvNnHlFDUCyXkUm+t+xU/XQ9f5HKOLUZceHBdi8
F8Re0MKRO+vD69Ut2I+UbM88iEXyVk474zuXISDvDPf4yTg0WK7+RadvGYrf
39KZEkxARpGdRYEj+P1mI5yiScmIhzPlpCQDX08JrNR0/4KQs1dr8SS+3p4Y
XwxpyLNN/4oNGz9fVrEwhe8b+v/fZ8LRojWHp/rS0f8AQq6Bgg==
"]]}}, {{}, {},
{Hue[0.67, 0.6, 0.6], Dashing[{Small, Small}],
LineBox[{{0.6648199445983377, 0.}, {0.6648199445983377, 2.}}]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-2, 2}, {-0.06029478356083162, 1.0913117426946237`}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{{3.661355400057754*^9, 3.661355484875826*^9},
3.661355639112556*^9, 3.66135573562361*^9, 3.6613558145489607`*^9,
3.661355846220117*^9, {3.6613567875470133`*^9, 3.661356799847382*^9},
3.661356838152878*^9, {3.6613600985369987`*^9, 3.6613601060031567`*^9},
3.6613602829907093`*^9, 3.661360760047449*^9, 3.66136337577344*^9, {
3.661363489086845*^9, 3.661363496037834*^9}, {3.661364139329336*^9,
3.661364143064105*^9}, 3.661364488688263*^9, 3.6613654930910997`*^9, {
3.661365641224661*^9, 3.661365663844842*^9}, 3.6625626533684483`*^9,
3.6625627121761312`*^9, 3.669308950551178*^9, 3.702938980969791*^9,
3.702940468782918*^9, {3.7029412522790327`*^9, 3.7029412577625933`*^9},
3.7029430588911057`*^9, 3.7029870211749477`*^9, {3.702987062157529*^9,
3.702987067646666*^9}, 3.7029872402954197`*^9, {3.7030053620465508`*^9,
3.703005378293508*^9}}]
}, Open ]],
Cell["\<\
With \[Sigma]\[Alpha]=0.85 and skew, this would not be a branching point (the \
following is negative):\
\>", "Text",
CellChangeTimes->{{3.66135964140793*^9, 3.661359644255671*^9}, {
3.6613599655973597`*^9, 3.661359975882709*^9}, {3.661360044227745*^9,
3.6613600812408752`*^9}, {3.66136339462226*^9, 3.661363404861648*^9}, {
3.661363438759192*^9, 3.661363443239099*^9}, 3.66932012562477*^9}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",", "u1",
",", "0", ",", "nm", ",", "ntot", ",", "0", ",", "Km"}], "]"}], ",",
RowBox[{"{",
RowBox[{"um", ",", "2"}], "}"}]}], "]"}], "/.",
RowBox[{"um", "\[Rule]", "u1"}]}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], "/.", "roots"}]], "Input",
CellChangeTimes->{{3.6613595685591793`*^9, 3.661359584469429*^9}, {
3.661359624203629*^9, 3.661359627019671*^9}, {3.661359665394278*^9,
3.661359709153092*^9}, 3.661359804535282*^9, {3.6613598575885057`*^9,
3.661359924152072*^9}, {3.661365416938882*^9, 3.661365430544819*^9},
3.6693201264068623`*^9, 3.669320632146531*^9, {3.702943054762773*^9,
3.702943056670909*^9}}],
Cell[BoxData[
RowBox[{"-", "0.33395231773850775`"}]], "Output",
CellChangeTimes->{
3.6613596291155033`*^9, {3.661359695178446*^9, 3.661359713074703*^9}, {
3.661359876961609*^9, 3.661359946402203*^9}, {3.661360098636149*^9,
3.661360106104082*^9}, 3.661360283091209*^9, 3.661360760147089*^9,
3.6613633758723288`*^9, 3.6613634891860447`*^9, 3.6613641431644897`*^9,
3.661364489087818*^9, {3.661365641290807*^9, 3.661365663876708*^9},
3.6625626534020653`*^9, 3.662562712210247*^9, 3.669308950590267*^9,
3.702938981035777*^9, {3.7029412524907837`*^9, 3.702941257942738*^9},
3.702943061423143*^9, 3.702987021340632*^9, 3.702987067911254*^9,
3.702987240427648*^9}]
}, Open ]],
Cell["\<\
Zooming into the single-species ESS shows that a population at this singular \
point is a local maximum on the fitness surface (not a branching point), so \
that small step mutations would not invade (but a large step mutation would, \
e.g., one taking the system to um = -0.9).\
\>", "Text",
CellChangeTimes->{{3.703005050203574*^9, 3.703005058338039*^9}, {
3.703005110767887*^9, 3.703005205212928*^9}, 3.7030054429294767`*^9}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",", "u1",
",", "0", ",", "nm", ",", "ntot", ",", "0", ",", "Km"}], "]"}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], "/.", "roots"}], ",",
RowBox[{"{",
RowBox[{"um", ",", "0.2", ",", "0.8"}], "}"}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"u1", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"u1", ",", "2"}], "}"}]}], "}"}], "/.", "roots"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]", "Dashed"}]}], "]"}]}],
"\[IndentingNewLine]", "]"}]], "Input",
CellChangeTimes->{{3.703004990248858*^9, 3.703004995471909*^9}, {
3.703005027797546*^9, 3.703005077504517*^9}, {3.7030053049250383`*^9,
3.7030053086922894`*^9}, {3.703005430207575*^9, 3.7030054354868917`*^9}}],
Cell[BoxData[
GraphicsBox[{{{}, {},
{Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwd13k4lG0XAHAhlSSKsmVpQUKSCslRqRSVJJVXkq2iEFKpJCSEhEJJClnS
QpaseUNlmxlryG6eYWwjZQ3vd+7vr7l+1zNzP/dyzrnPyFk7m9hxc3FxPV/A
xUU+Kw5TH2NiKmBxzdi7xhwOeL58afHyRQWslTUupaOVx88sTE2qAKPv5e0V
6LDYJrNPGRXgEza5vhh9avDbdFNFBSjvtpl9jWYFpIHITAUwnKtpN9A8Zc5V
oeaV4NFqO7cOnbVa2f2JVSXoyT6sl0bbO/ZLxdlXwhPRovfi6MoV55zeuuL3
HeU8l6PDz5kIVwdVgoPetNnfbA7I/qdxcklBJbTmG6s1oHdpz/T4SlbBk6Eh
iyD0+swfNsvWVkGb6KWIe2h+pWzmE8UqqL7Vy/BGN4m7sFK3VUGmb67VNbTL
NMWmH60CeepnvS361afaUUm/KmjyNF60G823I3X+41AV9D96GzufxYGhd/53
dv2uApOOWx9m0HXytlzfpqsgqFmhagL9YpUMdytfNXxVWybKQWtORC7kkqsG
l+a/M51oh2xvAaMT1SBl/EywFE3bekqCWVQNInN2R0LRVcOfs+ZLq2Ftf6Xz
A/T3ZIWj4pXVMJMsFBWA/iI56XukqRo6Hu6c9EHn8DwZ/jRSDSanp+euoePq
60tCZGrge7f9ehv0s5Cd/6RsqIGwZbcSrNDRBxLGv2yqgT2xdoqW6PACV6Wp
HTXgUpy59zTaP0E40toYny+TKTmKdnY7en7H3RrIaQ2l70JfUsldYHK/BhYH
Pnizk6ynTzr2UkgNzI8eDdFC2/4zwngZUwNjBcrW29Cn9oZoC2TWQEODzDEV
tN7KqmXdPTXAFNXcK43eVaOe8re/BtJFjG9KobXvP92zioPzH1qbJ4HW+Hvx
muHfGrBkj+9bjVbsXdydvZIGBobaiUJooY/7s4L0aWCRd8+VF918tCTZ/xAN
+Oy5l/GgXw5pPfMxpsGrs3/SF6DV5VV8PC1oYLtm29z8Rw4cj1lp7OBOg/Rf
Kzun0VLbQ/bae9Jg8fYNSVNoZh3fDmtvGsQHJrlMot0FZtaYB9OAtXN09Tj6
yZ2uwYOJNOBlRCWPoi2lzDv3pdEgK3xpDActn1dft/sDDVwk+h+OoHPHvuZp
FdLA1Lg5ZAjdbPf2/sYGGkSq3KnsR8dzK9zc0EqD/l9r+/rQF1/EO8l10eDL
+o1LiGeaI06ID9FAKPn0GQotaeS5bgkvHRiVGvt7yHz7f69ayE8Ho4zGkG50
+r3L/AuE6OCSUNfahdb5bPVrSpIO4Vfb/TrRvBatzD9ydAjNZ3d3oGumjjeP
KtBhbeMRfWJL9QOf+7fSgfe4rHg7WQ+9JJOpRYcS8QcP2tAjjtqvu4AO87cM
eYjvJKmENBvSoaG9gvsn2mBPsnfDMTqY7fIPakULdcq6M07SYftc5GrieDGR
f77b0KH67OvdLegL2SFHyi7Sod86uaMZvcVk0Z4SZzqo3p/0Jp4Z8d5WeBXH
m32sSPzlwYzip5t0GPl1t/EHOkjRXSrrLh0MovLvE5uUDy//cB/XKwlALGF9
nic9BOf/VnC2Cd073zWRHEGH6FuKxcTpz8wHEmLo8C7nwT1id82G9hcv6OAe
tMOEWKfxcO2zJDqskN+0npjX9VtZ1Bs6ROba/W1EVwvu/hSRgedxifWD+PGb
/DcPc+lg7ZaeR2xpoPHiQREdvk/lxBPLU2/D75fSQU9pYQjxutcGlgsr6ZA4
+PQ2sez53o2+DDpoXLVyJ16j6DXO9QP3L8/0CrEEW+xfr3Y6pKR6/P/56rSP
wbO9dNivWf7/34s4HjnlOUCHIDP4//hCyux1U6N0yBzvfUW8bNiXc3WSDul8
mcXE/O+kC37P0UHdM6WL2DfXolSTmwHv9L4uJuvlFlNKvbaQASaH+HcQe1+f
DM1ZzAD++26OxPPNZe7jSxngzeJ6TXxbK9xcYzkDJE5lsIhnY87qua1gwHyl
rwo5D88ZZflMUQYIql7zJJ4yn1n6S4wBA85BNcTXCr792izFgD9ehfLkvN1v
WRe9XcuA4sLrg8RjbZsThjbg869cJ0n8uOyaC9i0kQE6JxK+E1+ejzJN3Yzv
z9xaTOJtyNJOu1+dAavMZfaQ+HT4rC6rsJ0BI5py1cT23jWDiToMUDW0GSPx
bMXN4xt/kAFGvl/uk3zpsGZc6DRigFXSbh2ST2dKnx+RNmbA05O0CWJzP02J
WDMGaIgIeJF8PM7nlBFlwwADj5kGkq919jujmuwZYJvwLY+FNv62+LaoAwOC
UmMSSX4bBSQYRLjgfncdCGaj9/O3dIbeZoDnwXcJw+gyh9flNd64njDfT6Se
7K1yeyPgxwDXftN6Um/0ggWvBQUxYMiuT2IMrSWoL+gfxYCAtPRfE2jlFe91
bmfgfu0sKST1MCdi93u/LBxvM201qZd6og1ywbkMEJLnuU7q6XGxab5nRQyQ
vd1xYBHaU3pv7acKBkSf2L1hGbmflH7Y/elmgIfuYKM42iT9YvNfJgN6+GZ9
JNFtKrOHePoZoKmxYdsaNEdNTm3FCO7n8qIUWfSqHY4zm2cY4DPVX61A7o+9
/4U6rqiFAT/rxTvQI2WPFriJ1kJAVRAfuV+u71/v7ilWC4ophUvI/fPg4MHT
gdK1oHRRSwbQmUcj1iUr1YJq/y3/A2guC4VPPXtqQUPVfB+53567H+0+7VYL
pvSm295kvQFj8MqjFszPJh/3RTOfPY4buFELypO6m/3RyqU//7npXQvR54on
yX1cKHyhKTakFnKWttVEkfW9867qTK4Fs613Qz6gpdgZ2XZttaBb0HKMhS6Z
NRV511kLXvmbOthkfUJTrhM9tVBts8ZlGJ2+Q1ftPrsWjD+1Jv5B6/hXpqVM
1ELr1afHeLD/sFjX+2JQqA6a20Rz5dCxZ0SCruyrgzE35VRr9GtrvcdpBnXg
zVSqt0e/P38pvtewDobEnbgd0V+ulOWcMKkDv/kiFzc0+557r9bZOnBinAv2
Q29/16DDfaMOtg+lFieja+cjOeHpddCm+JFvjPQ/8aInslbWw6lH6Z2PsR+T
/Mo3nL2qHhI77H4/RasNTfrlitfDjLDL0ni0uWZrVr5MPRitcDNIQ79jxIn8
u6kez3HVBOkXzRYoNtTsrYfR7yPSbHSytfbxPrd6oBUnv9DLxftiw9ljEg31
MLVmZO0sWmxLzbGCxAZoPbmlsyKPA//e8fW9c74RRH7emP5UwIEGBY8fTvJN
0KoZW9lYxIGrZiGbY8abwKgp5MLpEoy3b0OfWDk/4PvvNVo9Xzgw+dllv3NA
M4ypGBxilOP9KrxlYq1ZCwyIdwy3fMf+NEnrx7RoKzA/zt6nVXEgpMS+cCmr
FRz2HjkgQ+eArnRbnV7KT+DXjFczqsP6xu0x/MGzDcoKDKRqGjmgoGekZHSw
HYwtbxofaOFAaolDND9/Bwx4atkEtHEg79tbft6fHRB/WaljaRf2m8Ja72Tj
OqGtmF/wUC8HbppzaWepdoGFYLPSRRb2W84TcVefdEHm6sbV2WwOVCSFxRpM
dsF38ytz6UNY32R2SWlZdQNfiWLUZw4HvpUvUoFv3aCntvNW1BjOP8SjyUyh
B0x0IEFonANPoycXBD/sAfND2nH+kxxYWS71tW60B4IOPzKNmubAbmkryc3G
vcCfoKRl9Rfzyb2Iu+ZYLwg2/rx4Hr2+SmLA4XgvuDJSHzuhF19v/PTarBfS
1z7uuIVm1B4ykz7TC9u3XN8Wg7a8t+3RModeuDXUN85A3xriXzTk2wsX8lWz
dWax/uRnj6Xk9oLOafcq3jmMl5dXZTfl9YJPsbExPzopYNuRt/m9wJsaxFiO
jjTLTs0o6oVMa+FSCbTrWJZVfmkvWBfucVFDqypl0aroveCfO8k2RyfHZKaN
9PWCwNF/jdPRcd6uzS7sXqB1P9TNQD85r873e6AXVN+EKuSg/bdlnpsc7oUj
WqsHP6NtazPEuP70gnqqsmY9WnZJhr8wFxPcxZXZU+jo6++tNcSYIHUpOlZv
HvMz5RrfD3EmTESYH9qHftkMaTckmVDYBWMH0WmajF/F0kywzb2kdhxdNDXq
fXADE17PS9nboXuuq7+wVGfC1M592QFo5RvZPwOMmCB0RLapEq2WevvOpiNM
4I+sKqOht7XsW0c7ygQrb6u3dWhdrSaHlcdxftJ6l1rRx6Ynpp+fZsJ29cR4
NtrjhqbYR3smGPRe7uH7D/PpRoFpuzcTmHc8i3TQRtosXVsfJmRZBX4AdNOM
0MZBXyZYh62O24MeuGk/N+XPhPBF6RcM0CJewq9FQpigfS+44Dja3uf8pGEM
EySOU2YX0aN7wrvrnjJBRE/7lyP6Jk9R1elYJnzfNHnPCR3mtyL+/AsmnFJO
iHND5/kXGfgmMSF62bPg22iBByuf5mcwQVq/7HQY+omhrt/uj0zwuTwQE46W
Fbjo9D2LCXpG5xoi0dtCivc05eJ4p3ZqxqAtH14c/FXEhLCxawUv0RkRn3U2
VjJhv0/Nuwy0jumA/IcqJrT5GUd8RH8VERXeUcMEzRkB12x062MHSp+B53NZ
WToPzRstGmrVxIT+yja1ErRZrGNnVA8TvFYW69agIxpbZVYzmcArF1xMQzME
D1k9oZjQnJejyUAfuqvYHdnPBDVRKal6NNhTPY9GmHBIacGLZvStF6brhEeZ
UHkw5FcLOr+51CbsFxNKeB11f6I1DF8xQ/8wIb1R9Fs7WlHtLOvBDBPq4rkj
e9B2F2nyS2eZcOT0+Kde9KtXu84HzTFB8LNqMxO9RlSqP4CLgmpJl4V96BUz
zex7fBSYt/NJDqKPbjVQWriYAoHSxSuG0MGXch38llDgdXE/zzCar/PxoI8A
/t7HuWEE/bfUZPjOCgo0P5hsGUNrzv2r8t9KCt7ZCswQe2zf4uQlSgEXZ6Lw
N4mHlOWcW2IUmAmd3jKOVunx2jwrTsHQUE0PsYPkiPNNSQqeKDmFTqCZIdWj
N6QpeGq6qWESLfdt55ZpGQpK/Pc5TZHz5Xpz5bocBZFJ97in0S2ugWMe63E+
21zFZ9Cr0qfUJzZQsHhIMpbYlDrvdlUBvy/JEvuLpp3c/8dNiQLFK01cs+il
j7I1fm+iwKV92pHYoHL9VVcVCgaOaNYS3+OJzP6liu+/EKY2h/6iwzPhokaB
Mo0riPi/q67bR7dQcGltQDuxzvtuD+etFBQv3rBpHu3Zb5w7okGB0/omV+Jc
uZLJy9spqBN7mkX8x3yz5vAOCnQDnUeJ1SPjrl/SokBQ/IT8f2jnmmV5g9oU
pDgeNCNO57s97aBDgfd6Q29iNgxpDeyiYJZ1KpFY/sY/nheBgkSzK1+IbTIr
8/v1KBhdFdFKHD+o9ff8HgocqgqHiAcuZ2Qs0qfAUuT9NLHGqOKF5H0UeGyK
/o/YyzVe+sABCvhNPeaJK/6sbmQZUBBce2CCWOTawwf+h3D/+vj7iC2n+fbI
G1Gg0VLEIE656TVVfhjHH7D8SDw2N/7O7igFfpZDocQ63pftFh7D9d+wtSH2
56Ykk0xwf73K1YgZfhZ1+qZ4nhnLJsn+SC5qCGCewPg8sTOH2D7QEPxOYny9
N3Ii/rC0dHzdaQosuPVkiPWFMq1tLCjQTyh3JOcTGr5RnMcS4++66SLiZpGX
9FdnKTA5WfyMnPdl8TCdHmsKtutKvSfx8unZot93bSlg0ARUibml76TK2eN4
12uTSHw9Weu06txFCmzlGXdIPHYlUtVcjrgfH/l6SLwqKZzxjb9EgbQD/y7i
z5uMRjudKQiyc20n8d6voVRp6UHBiuWR30i+qOe+9J6/RsF+G55Rkk+3tMR3
xN2gwJNXXZhYWHdxYvstCuT1vu4aRWsfYN228MX8k3kKJH/9Ks5ozPrheizr
VUh+0wwbB575U5C5vFhkgMSDcdnJn4F4Hh3x1aQeBJ9+tcU8jIKcHEcmqSdN
P8X7px9hPq7iiu4m9dbyUVxMBAXXhTX1u9DZ1t5LW57geQw/8Cf1qMPRkjr5
nAJ/enjmD/QWL4mYE2kUyPI8fV2J5nr053HLG8xP/f4FFeQ8E2jhZ95SMCGR
bfYN7VLhE2z3AeN5sGyolJyfyOCdqzkUKFU8rixEq70psH/8BevJyi+Gb8l4
xY9txMuwfu06pvuGjMdwtnpeToFaoIFSKhlvYp150nfMR/bFkUQy3u7gw9k0
zJ9AY4VYMl6zhUZjKwWFR93MA8l4g9u3nG7D+mfe1uNPxpsTUm1vp8BUPMrW
j4y3rlyB6qIgX2r2+B0ynpOK5DiLgp4FZ3rc0ZsXzi8Q/Y3vz9UrtESrqr+g
my5lgf5ImbkKqS+hd/dMC7Cgzs6hdCM5b7ZN9nNBFnzP5V4vT+r1S8VnLGEW
tNF4a6RJ/RLOtL8uxoKgRWuKl5P6wimbe7aBBQ1ZyyVH8T5nvB3Y1Ass6CkJ
+5iGfrukJu7+bhZo5squfo0OsnsvrLyXBc0FDq4v0fpr3Cfd9+Pzlg1C0ei8
4LkvfIdZMPWNr98P/cpRyFzJnAX2WaxFZ9BuG7cHXHFngctk/l8+NPe8xTFB
D/x9X/TlBejwOl+JN9dYEPpj/4+/2A9l3qxNZ3qy4NMSgfBR9FjNpdqTd1kg
QAkktZB+zTVBQjeUBepyrpCGdikQesufwgI/AQntfWiusB0eyakswOv6lS46
zNYS9N+wgHF1klsT/WFZeu3td+jbmmlKaM7ZAxOjWSxQXPkhgvSHTrxe8ONf
FlxazVX7A/vLy4cHaxN+4nzybrLPoX0y3bvXt7PAi73iqzk6evX8aFIHC6zd
VJ4dR5d1CwmldLOAtblPdR9awmP7kfQ+Fgj6H5hVQH+Nu1uZ9ZsFPo9CVIaw
n5UdXV1avrQPjiwt6SL9cH24flbfzj7gr7bUPTPDgQm9Jq3AXX0Q7Op1+Tha
jHP+sxL0AZ+hY8RBtKXhg8rLe/rAKj+pdBu6n6eu67dBHxS+v5y9DD3vfnYZ
l1kfSHBVtRVgf6500tNezKUPPLPLVYXR3pIfxA4m9gEtbov3C+znFc0TmbSk
PhjJOrY+El0bHf3BNLkPXIwESwLQa1fdNbBK64NKj5MdV9ClQibXr33oA/tZ
7py9aD6+Pz+SCvvg6YJABjWB9WB0RxR3Yx806SWmrEPHlH8WLVzYD2K2VVH3
/nDgfOxwgr5dP3zdWl/2exTrU45K1kB1P6ywKPf2wP8n87+Ez7xSYUNr7Dnj
9D5cXxlby2QzG1YtexjxGF0X9e8q7i1scNhcXOmFTt51hXFOgw32myREj6GN
Axl75XayYf/Fx+Lj+H/olexDpXgDNhyyme3URu8/KjD13IYNgl6pJ4qYmM9r
mQ2H7dCdN0WT0BLjBRlz9mxQFhCtCEZznjo6nnFgQ6RL5FILdDSrskPqChv0
hyLmpvH/18DtwPJnXmwokZmJ2IpuMD73ytAbv//F4qEEunid1p2/d9mQU33B
awE6oqJf8597+L7PV3fQe/D+EjVIlwhmg23OZlEHtHy/TGBlCBt4VdPeGqOF
CibtPB+ygd/ys9YONGWVLNMazgaXsExlXjRj653ZwEg2+PQFRwx0Y//Hd7JF
6wkbjONnhhnoxBbVHHYUG0yo6Z256NB0voiYGDbMdgXcfo7+HyiDIuU=
"]]}}, {{}, {},
{Hue[0.67, 0.6, 0.6], Dashing[{Small, Small}],
LineBox[{{0.6648199445983377, 0.}, {0.6648199445983377, 2.}}]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0.2, 0.991},
PlotRange->{{0.2, 0.8}, {0.9907023633475436, 0.9999999992445356}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{{3.703004987074624*^9, 3.703004995976568*^9}, {
3.703005037945709*^9, 3.7030050779753942`*^9}, 3.703005309889642*^9, {
3.703005416636854*^9, 3.70300543581048*^9}}]
}, Open ]],
Cell["\<\
Mirror of the above with \[Beta] = -0.6:\
\>", "Text",
CellChangeTimes->{{3.661355671688161*^9, 3.661355689015037*^9}, {
3.6693323809245157`*^9, 3.669332392720907*^9}}],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"try\[Kappa]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Beta]", "=",
RowBox[{"-", "0.6"}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"roots", " ", "=", " ",
RowBox[{"FindRoot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",",
"u1", ",", "0", ",", "nm", ",", "ntot", ",", "0", ",", "Km"}],
"]"}], ",", "um"}], "]"}], "/.",
RowBox[{"um", "\[Rule]", "u1"}]}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], ")"}], "\[Equal]", "0"}], ",",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "u1", ",", "0",
",", "0", ",", "ntot", ",", "0", ",", "0", ",", "Km"}], "]"}],
"\[Equal]", "1"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"u1", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"Km", ",", "5000"}], "}"}]}], "}"}]}], "]"}]}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",", "u1",
",", "0", ",", "nm", ",", "ntot", ",", "0", ",", "Km"}], "]"}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], "/.", "roots"}], ",",
RowBox[{"{",
RowBox[{"um", ",",
RowBox[{"-", "2"}], ",", "2"}], "}"}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"u1", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"u1", ",", "2"}], "}"}]}], "}"}], "/.", "roots"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]", "Dashed"}]}], "]"}]}],
"\[IndentingNewLine]", "]"}]}], "Input",
CellChangeTimes->{{3.661355380776771*^9, 3.6613554716473618`*^9},
3.661355628776557*^9, 3.661355738287986*^9, {3.661356791824819*^9,
3.661356792544799*^9}, {3.661356841964574*^9, 3.661356847964258*^9},
3.661365609149229*^9, {3.6693201271236963`*^9, 3.669320127874043*^9}, {
3.669320622346368*^9, 3.669320629477435*^9}, {3.7029403294954453`*^9,
3.702940329918006*^9}, {3.702940375784993*^9, 3.702940460501059*^9}, {
3.702943068877674*^9, 3.70294307924326*^9}, {3.702945896730184*^9,
3.702945897614167*^9}, {3.7030054493317623`*^9, 3.703005461868636*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"u1", "\[Rule]",
RowBox[{"-", "0.6648199445983377`"}]}], ",",
RowBox[{"Km", "\[Rule]", "7816.384007216777`"}]}], "}"}]], "Output",
CellChangeTimes->{
3.6638090561463947`*^9, 3.669308950674362*^9, 3.702938981102932*^9, {
3.702940359906928*^9, 3.70294037795713*^9}, {3.702940457318544*^9,
3.702940461150104*^9}, {3.702941252579042*^9, 3.702941258029543*^9}, {
3.702943074226142*^9, 3.702943079725507*^9}, 3.702945898211835*^9,
3.7029870214258833`*^9, 3.702987067980423*^9, 3.702987240496112*^9, {
3.703005445957136*^9, 3.703005462170896*^9}}],
Cell[BoxData[
GraphicsBox[{{{}, {},
{Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwt2nk01N8bB3CVkCSJtEiSkCRbku2RhBRJSGTXIksREpJE6VtJlpIKJRKS
EBKuPdn3fTczxjaLdYztdzvn9w/ndYw793Pn3vfz3MN+u1tGV9ezsLCk4C//
vkvDjvG1tTWkUcR2fK4/Hd1aPBCyyMRmlyWtwDeUkSUrNjO3hlj0lk8e+JSK
5CT07UgTayjA4GpRsWMyOr4tqLu2A5uxdEiG7RPSGKFXv/2OXy8qcDCvNhgZ
PalLlbdeQ8Wt1uTa0U9wtyHI5XrRKjJr7tlUKVYMzye8OmbzVpHEz+HBsOBi
+MTueDIwaxXpnvxC4icUQy3o839IXkWG1q3G5+NLQCSDv7A5fBXFs60LDeYv
g/qwJC7166uoquTr9SMzFSBmVJXKx7OKWN6JZTX61UBr6+bxEtsVpCTILrFu
vBkeOvwsSr2ygqTs93e1creA9KxVRNSlFXSugGH6Ur4FQrZnqjrqr6BBgv9q
nl8LqBmZveQ5sYJsdISGBre0QlLDZwVrnhUkGqox+upwG3hXqz1YLlpGYaXz
KVPGHbC3+BbfccFlNEsUid5o3wO1vMc8lAWWUXwDz2m3hz3gc5XZosa7jDKQ
UGBVXA+0cwZHaHEsI47tlKETvT0QZhLDazS7hPLUzqYeMu6FDRPlPC61S4jc
1tClq9EHY/y7tyT4LaFizzapgU0D8NOpfOPWPibiHd315ZncECgJu8omdTBR
wbH+I74aQ5DfKmCp1sxE4V0b7toYDEGxmlO20x8mYiUbOnPdHILqrbz2VT+Y
SGH85+fx+CEYzLIufviYiYbjH+tUcg0D5zLTZ/YoE7mKDq1K9A2DzXNZWlfg
IjLqNg9asyWAT3b447r7i+jczXGvOmcCRPXOCJZ4L6L84369EXcJUC2VcybZ
dREJB67wcr4ggHydcoKX+SKqtuf59j6XAGzcWqbb5RZRb1HeY6vNREh7aVpw
boiBAs3MEu98IwIj3DcEAQO9Lk281tBLglHBknFtZQYqv76p6AOJBO1JbPr1
CgzUfyHHzYFGgqz8V9v6DjGQ3fyRdT0bRsF1+EsMczsDyaw81naRHIUR2da0
Y+QFlONf9ELSaxTqG6WaUsMWUFjtRysJDjIkcPfvih6aR7zX/+aIC4xBuAWw
n+idRzyCoxqb941BYHL8bFf7POL8HuhLFhsDO037hj2188j8xr5tYYpjIOJF
DorLmUcZlLKDkSZj8Klvmpr0bB75BB2WvBM+BvFp7JU/j82jG2KGvxPZx+G9
nqx7y9M5pNq7y/DD4DiIbtarbgyaQ17OhfYxpHFIrbETqX8wh5wjr+eGT45D
/rnI5irPORQWPSThyRiHLoMFuSLbOXSO/txnHc8E7LhYOJN8Yg5lJtizKqtP
wEuLM57+Y7NIyVbyt8qbCQh0tvU+dGYWNW+1WmNVnYT+UKv3+afwzwUpLAYn
J0H5h0XxWfVZ5PBXSzBcexKm50w4XOVnEdsj1dTNFybB9oFedObeWWTwIMOr
/OokaITL56lMzyAKd7vw+dBJWM3dyNB/N4OkbMwu9vRMgnn3esGBqBnUnzJX
8HxwEnKW1+B22AwiO3dFniBOgutJ5pPw4BnEG/72bTBlEvqqKQIdt2YQ48Q3
tVGWKSjo6zhuozWD3C+2CbeIToHvhpS77lPTiOMKT6iV4xS4vrVisyFPo5BE
DU1VlymwO7o9Sn9kGjnTlWGH2xToWfhlSnRNI24l2IO8p2BnlsFUf/k0CiuU
ekV4MgXZdjN2Z99PI7aLv4UCEqeAUqJqIHp2Gs1KSA2z9U/B8CV67zbtaaQY
dNbMbWgK2qYSndY0ptH6ExwXOwl4fru2Pu1WnEZc3O/63k1MwTO3obIwkWkU
kFV2b5ExBRL7H59YWaSjeekAG57tFLANaBBtT6ajFKOAi7+0KGDaFafel0BH
YUP+lck6FNCTu21GiKWjQXNFgSg9CigQeJ5PR9KRtNJ5MwdDCnDoGs1wP6Qj
o/KHj/ssKJC+ta1E5zIdySzVL6m4U2Apttvq1yY6Knil6ZH9ngK0hRTvYlY6
6lS9+EszjgIEQ9/wP2s0NJvPsbX+IwXq1wtWts3RUN6bD9M9SRT4dM3yyPQQ
DZUTZitaMyigKz24JJlPQ1p3eBkq5RSIKiRGv79JQyFPI85MkClg5R3jf/wq
DbE537AzmKCAhPx5h2ZrGkqRe6eRPkWB/OS8oxwmNJSxvd7YYZoC/RHPKu8A
DamHKvGmLFFA/KbsrB4fDbnyioR+2EIF9yPM2GlfKhrfGNAre5QKrAn2NyXc
qMhm79RFWVkqvN5Zd8zqGhWVf31ad0SeCr83xNf+NaSiTOmW+r3H8eu7TzPj
D1JRWNJB9W51/PrHr0zON1CQ2d1q90p9KuQPSHCliVCQnR4H3HOkgp/qum8x
OymooLQwnsWJCmpvu/SfclPQzlN33wU7U6HY6L+X15hTaD6CYRtyiwp/KiZ4
9zdPIca0mqWbJxVaU9N3vX44heKD6640B1CBcldBPGBwEinW5yx1R1Eho5Wr
yrV9ErH5Xr668w0V3GSJNyxrJ1GB08Sbi9FUmB2PSlHOm0QaTh2WZTFUWLJc
ODL3chJVv/nyOiSOChxa+Qo3YRKFlBM5U5OpcIBHQ9M4dgKJMeM9zH9RIVRm
yOdmxATytzn7+0Y+FRiGgVkBIRPI7sTmeI/fVKh9VS76zX0CGdm6nA0upILH
9jPsbDoTKFRNxvq/EipU7jCqzaWOo9s3csUO/qWCzPEZ1nrCOBL6NivPXU2F
mEuRaoSucUSI7luZxb4V3Z7OUz6OVguuNPyupcLO3RavHKPH0af/SmKlG6lw
c6+D6Z6T40jXWf1DSjteH7WNL2UVx5EfW7DF7Q4qqFsl/dE5PI6eP1eYk++k
wvY4spIH/zh6rBFUmt1FhQJhlz11Y2PI9OAE830vFbhFvQb9w8dQaXBWxKZh
KnhrCeyKejKG8vefpX3DHnbIu5DqN4akAlR1DEeokJvILO24NoZC22gToQQq
2Ig/SJRRGUPFLFw6syQqZEqG3BweISOZv6cYNhNU2Ndk8+twFxmFOor6jGA/
v3uCw7OejKraDoo7TFLhavl4IvsvMlo+NLvJZgo/r5X+kFQoGc1u+CamSaVC
EKuYjNcjMuLxDTiWg01PWfVH3mQUU6LvL0GjQvXCd0EjezIKO69TwU6nwv1X
vGZ3lchI8+fglR/TVBg/PpFUfISM8rhSbwnMUMG0v2xu0wEycr13ucYXW+aw
Z8T7LWQUv9TrALP4ecs76kuGR5Gu8ahx5hwVdBnvT3O9GEUsS+p1ugwq/Iz1
jDQJHEXx65TPR2KLnDYYib07iqQYB5T6sZderQXI2o2iG+8uaLssUiH9sF2B
6fFR1ByzGuLNpMKeZuXN8VKjyI9++W4udoj3dvOx/aNoNb+iZxbbtqJ8wZdr
FOXwXOV2WqICn7W4/MchEmp2p50/vUyFhxtZAsfbSSh/lnnAG5uS2tkoX0tC
QSF6979i/2E8da3MISHDMbM/7CtUUIizK9yaRkIe3uTfCtjxp1W4Ln8kocwP
Vmo22D7hk18nnpEQwy+BkolNUqpgKDwkIRub0yLd2BcHPuj4e5FQrJTH+Bq2
lNR5Io8tCa0KiWjorFLhbbO4grkpCQW2ejXdwGa7x/Io4SwJub/asBaCPVDx
Q1hRkYS6n95RrMD2u7iopSSFn2dN3GkAe+eQhqOyCAkpvlq5zcA2XG74oc5N
QjkNevNia1SYfCrQrsFKQp23h71VsUMErJmaTCLS5u9pNsQulqNo6pCIOK9l
t3thXyk+dv1MLxGpPvux/BiboX//2dlmIqqtayt7jR3ZU/5dv4qIkheO3kzE
lnHkaj1fRETdaRfomdi18xcZF7KJKOxvrTnCvhH0TtA4hYg47OSTq7FZeUc0
TOOJSK9UoKcVOz5O8qrZayLideWa68NWPeL+1Pw5EYULf14gYnfm//p2JZCI
NGvdCJPYHrrrmq28iSg7hqNwGpunXXfexpWIzCaXAhew0+zDdts7EJGu2cDx
JWxdeof6VXMi4k7T7lvBJvjvs79uSESuExUea9gPua4/cdQmImFD+to/C8Wk
pzqpElH8GcuAf84Xn29wkSOicb/YhX+/b/pTbfaWBBFJlp+5/m/8ac3gne5C
RBQpPdv47/1DG2tVPfiIiIVFXnEGW9KKz9aLk4gqM95FT2FXTlgEe7MQkfFU
2SIJ2+5ewlefeQJajTppMYC9yjZR5zdJQLFFKUXt2DGRctP+wwRknB51sA5b
UcRnx8NOApIbiH5Vit38vUT5UT0BEVb0WHOxXdU2WQeXE9DNMc0HKdicNYaP
nuQTUEGmAOsH7FOkgZpnSQRkuvun7APswTvitBfvCUi7Ka3PFdtv3S2+sHAC
in498NYSO1tw9UqkPx4v3PSMErZhyumHrz0IaLd9DYj+21/HXyRG3ySgWs/e
c1uxRS8KUt6bElDgW8Ufw3g/Fg/a88adIyDyrx+ba7CvuKYqftQkIGXlI48y
sSOfKj9IlCYgXadnDf7YrMVmPOlsBDT5NY9zC3a8frxCxvIIMk3a5EPB50e1
Z9Qsc3oEGbw6vL0B22Pe62NO/wiqitX/+wKbKBUlh3JGEOnKBvd12JL+iRRy
6giajLkq04XPt2vDzxTejyPo8+fd6zOwGW7tIteejaB2yB41x+bMFdi+xWYE
CXvKzSXi/JA5GTNjvmkEGdZZkHhxvniGp3wPWh1Gzc/LGntxPuWP5Dulzwwj
oaRb1ETsU497Rtb1D6P/aO1Nx7BNawRbkzOHEQnlOpzD+eZrEpc9bzGMWNw6
XpnO4/VJ+n5b+MIwMoWgPD5sVgaS0tMeRt6WzxSacX6Gxgx+/iAzjLot6Qpn
seMH9kdpbRxGoa17Xx3DeVvp+NkzPH0IhYhJPZnC+b3N/6ui9LohdJM9bJKB
68PjHIkqnoVBxFW2yzAVm0n5cnlmchBJn481s8Qetk7yy+scRP1jRtbFuL5k
nkwo1cwYRJ+qAt0Dx6lgtPGDwSXrQSRh4iLBGKWC+K79dSy+A8j55q6XP3F9
k1KkSiXO9CJ/s/hnbbh+XpN+8OBXXy8KOFS5+S52nNjW5ro/vchq/cKHndi8
Akfvzr/rRbyv81mu4Pq7sOBaoqPVi8ydXBZHWqlQ+otiMh7Zg1QPRQUym6hg
pkbxP6rYjRQswyUMcT0PP+bfdEq4G33axtu3UEOFmiPcomac3ag814QQh60u
JP03oL8LxapsnqHhfuDAmsv25sddyGhOSvcN7h8oxVNfPDo6Ub/+gcfzlVR4
pDXV+Mu7AzUXtpdyleL31508r2DfgWI+fRktw/0Hi/5Efbp+BzLXk3rji+1n
MlabINKBZqO0P0wWU8HrGrHqRW07CjJX9GpDOO9C+opthdvRp5ud3WW4n0l6
3gu9nO0ofA7uBWETwnqKTOfaEFftl8LT2LZvuwrOVrch2vQ+qC6ggnlKW94x
jzb0nLhi1IP7o3O1dRmbqlpRPu91qX24f/qvsfZoUGYr0mvOoo7j/qqqtSZ9
9X0rOte7/k4u9um+v2kzbq3o2vkFZIStTqlI7tvTihz4+OLC8/D8p8vFzdha
0eu3l0IdsPPny5KaaS3If41f7zj28bWSz38qWtCgxIEjA7l4//MUxf+41YKy
v7DVKmG78hXukzJvQTcCs85sw07bWRCbpNWCPM5Nx43nUOHQ/vz373a1IBm5
7b1x2CJyOdHBZc0oXI6tgA/bRvGnAEt6MxJ56yY++xPvD+Xs1z7RzSgyat/d
VmzBU5mRt1yaUavMctUbbH7j9LDLAs2IrHLd6hB2ptiz/NMbmtH0QlTRNmzD
xesEWWoTSnETpzKz8frE7lfi/NOEkpgTFQ3Y4m6rtvOZTajZzsz1N3b5qZ5n
w7FNyOB4zMQX7FVy5EC+VxPS3bTe8RH2u99um77YNSGNCFMnd2ylUAP5CIMm
pBrXp22H3WZz2PKBchOKYUtdNsJ2l+d44iTWhLhONr3Qwt7KRsy4xNuEdtjb
Lilip3WWdJ9abURGgk7aktik+77Sgu2NSG7bgXvbsR8ZmplxlDaimMQxu03Y
wgeOBc5+a0SRD8ylWbAL57alDb5tRM3q/r0LWXh/VFHaaoMbUTrfFVca9kJM
zVqeWyPKKF0kjGFHuiQfSrRsRLRoi5MEbFmN4IuvzjSiMI+goAHsel67+/eP
NSLNIs/vPdhORPUvjvsbUeyNo2Wd2Bx5e5pMtjSicsr34nZsPX763KPpBpRn
NJvchh2cn3LmSnUDIu9h+P1zsbXDB4VPDSjd5Kfav9czWYXoXD4NqPmF6GQH
tkJKhxbxQgNibVF92o3tev5VdOGhBmSTNcPfj508qzcZta4BrVdRixjGHn7L
quHaVY98pjevJ2MLQlGE9o96ZNNnaE/BNiXcHRV6Wo8GvZdy57DDnsqqLNjU
I6X8RZZV7GrpidAGpXpkvkUJ2PH6sbZ+Hv7CU4/v5x/vbMOGe1aKAeQ65D8k
FCeI7SO08z+z4jrU6R9dKoGdXdbUJxNdh9rtZ/uPYVNuPJPddLsO2SkJzJ3C
luA+HTykU4dCeQkbL2LbZa12/tpXhxQ8VXntsd+b5UmFL9SiGAOWPR7YPAmH
WzW/1CLzo5oH32Lr6RLF9zyoReP7vCW+YQdNxfrOmNaiTtOnh0uxGcd5D3xm
q0U3K98pULHl+mq8/PprkPQWXVV2vN+dA4OrjXNqECProI4w9lAtw23jtRpU
bv3L0eTf+XHPrOhTq0GfXbY8csM2FXDelcNfg3LG6z+FYlfbDhRfq6hGBkfK
GTX/ztN8xdYq0WqU1K/BdxGfz9CUT6Xqi3/Raxm3CB9sJ6sHnj/r/iIfpotB
ArZopVLPJ6+/yKH/pS8D+3VUatL9qiokxzxd+wPngfuZkMuz76tQkP3vUyPY
51ccuJzcqpAD5fQqP84XjqtC7ma7q5BMzjaNB9g+Cq/U5J3/IDGaBrctzitT
sgvtq8YfRJmSynmPLf9eL0GY/w8qOtj/pQt7cgPrJu6iSrT7Qr7TJZyHVi1e
reStlYixYeE/O5yXmu5XnGKzyhF346XaXJyvQmInhPhDypHRV5ebHEX4ftHF
3/TsSjlaX9dsaY6dfbJB8d7GciQnskNnPc5vsW2a640vlSGzpBIFO5zvnBni
bzctlSDBF2ardmX4/NqzngtoKEHm2reV/mKXCQytzieUoM/fehtlynG+Pohx
IJwrQborMUKsFXj/GGyRQbHFSPDjbeXfuN4k9hBfjAUVoepwriYnXJ+6/XbE
fZAvQszVjq4BbG4hnYwLw4XIISFulwmuZ142yc2/oBBJHToEp3D90ybeFPiP
+RvZLfVISNdTgUyhxkve/oXm9wwmqjfjzz9MOLNf6BeS9KUoVWIbyl4oC6/L
Q+SLYmznW6iQdyeTyJTMQ+HKb8474Hr7lOEhWUPMQSGH0z9+wPVYcj0zy8ki
G+UdCjM524PXN0GyYh9nNlKgRL0mYYdrWbS35GUhxR9TvI/w/Zf5uIChsiML
FTx4XYj6cD3e/ECNq+kHMuO8060ziPt3SY7Qyy/SkVTJiEQEkQqWFwSze+w/
o90qu+z5cb8yOTN3wrM8AaUIjPK1Yvu9bkDcBxOQ4W2p6Qh8/3zfE1hzkvQR
yQVKSwvgfie7prnifFMskpzbl3h4gQrfZ50PkLsjUed6pQvPcb8X0CrRuqdM
H/GMhhyO2kgDqa19NzceUYAizWYaGxsN2umBcTwMM1husdG+h+0boV3tpHAb
QlftPlqz06BM+OmTDzyB4G9mwyO/iQbXr0tey1kNB8WF5zGzXDT4xenbVuqZ
AOlZBzwH+WgQf4S/5bvIZwgTd5tw5afBY8Pvje8bPsO2/bMsq9jGr0dqvA4l
AYcZgV1IgAa0/edKJfuS4RCf/L2ru2ggdmLv93CtdKAkbwvaJkSDv1nWWj+e
ZsP6TKn2bnEaHBteJ/TQDME8d9LwdjUaHKD9XlQu/Qu7o5xmoh1pcCahq87A
rBkakq9diIqlwWl93g1zPztAt1yicKaFBi+tOwJkcnvhZeWtpPQNdHg8qQqk
2l7Y7RaJPFjp4H/v08q7YexGk3vKG+ngGuHiw87dB0p3mNXlbHQw+LPBo9+h
D9D0WG3rJjpwH5W5/py3HzhaeO8PbaXjdQvRJ7sMQP0TB4kve/D4zyibYx8N
wHChRKi1IB5/p3H1xbcD4D1/+a7AXjy+3D4dVD4Ax067NgYL0UE8y1y4Zssg
7JC+HHRlPx3YR2m7PjkMAsfr6cN0MTr8Mdi7xZB3CIjDrw1+yNKBT3poh7vg
EPi+FjfSl6ODzZZE4UixIaBZZDWSsZk1UgqdykPwRIOqIqRAB6kzqhY29kO4
zt/MDVSkQ9gpi6+3s4dAOqwkSVaFDuZKb0+/Mh2G+EiIEtGiQ5KA5fksm2Fo
XDr2MQ17Zl74ctvNYYh1lOZVPE2H5z+TnXc9GIYwB09hHW06ILm8iI9fhoHa
Hd1jq0sH0SMdQz8Yw5DJ1at47xwdpvbz+zfHjICrx+VhSWM6KPl+dCv5PALG
ud4LH7ADW49czUgfgSMHHe15TOiw44n2udDSEZAzM1SbwVafvLtbb3wEKOo6
5IxLdHiZ051TcoIARbsZEZst6NC99XpKxikCrBn+rbuDLeo48yFOnwDd8vXG
Pdh5e7iC79sSIC2YVzf5Ch0GA9QunnhKAM6+ycwTVnSQPRtPzegkgGJQBb+y
LR38PkuNxA3/G3+s5zV25Upee+gkAQS+thKnsc0zmgqdWYggaPK9NNkOz59/
w3MJCSLYVUuHbXagQ8vAVYn4u0SoD6pjpF2jg9CJ6T0vHxJhPJ3ycwX7Rrj/
Vv9nRLjn/O6b/nU6LGu9mbeII4J5voHeBLZoSlW5wB8iiIyJH9rrSAdPj8O2
L3eQwKfp+Yq5E14fTmqB6X4SCLksDX3GzovL3CkkRYJr87ItU9jL1Sca006S
4Ifiri4/Zzy//bpQ7UyCRuc6q5cuePzcze9e3SWBFNErqgm74lzDvFkgCYrz
5Fp4XenA4W2aPvqGBAd+ctqGY4fWO+zdWEYCY68bmcG36CDjIHGvto4EKcUN
W4qxmxYnWiM6SSB6+uPNRWy+g3eei1BIsL4486DjbTrE+D5cgl2jsFxGfqHq
RgfVbacvsYuOAgMtDrpi9yVxZNVLj4JxUNfReGzh5pc3LbVGwe+0StEadpJE
bJfPrVEIW+X8L9OdDrpFtsc0fUYhVJMvuRd77OLBV5uCR+Fm8ZWCjXfwfn+Q
phsdMwr7l0nlxtj1fLc/WyeOwglaZa4P9q0UeRbxjFFofyoSG4ed2Zaf+7Ni
FPJp/2mSsI2d/LffbxwFQ93ja+wedJhj0byl1TMKopdj0ySwlaT+irXQRuGR
f1/7NeyiwI4o2h4yeHlTTNqxbXa+o+eKkaF/l3owFXtdupX+A1ky+B6oj2P3
pINWF5GVW4cM1nvmIhSwSa5fbdoukGFM+ajzGewnrC4F76+QQVeUJmWJXX10
9s5hdzLEqhtcfYjtXJHbMO1HBu3fL3teYW+x8D2c/4QMMtHxxz9ip9PUnzwM
J0Pe+Rbv79iGj9eP6H4gg+R9n9gC7Ok9leo8yWQw7CV/qcKO/PE0piOTDNO6
bpEt2Io6+vOxhWSwLLpm34fd0ctjdK2KDBOmgnwkbL1nVzs9msnwZoH3yBR2
wYl8q0e9ZNhxP/fsDLY0mZv4ikSG5OL7txjY8a/tneJpZEj80fVmGZv3dB49
nUkGKRMoX8MOmuHyLmQdg9IKkdl1XnSY/2i7WsM9Bkw5htgG7BuGOUHdO8dA
eEj+yj93r3JuHhMZg14JvYj12Oe+Wb9akBqDbq/vNSzYRRbZAmzHx8D5bCfr
Kh5flnNTLN/JMVBQPqHOxP6cZyl64OwYVI1p353D3nE9M0XWZAzMt3t9p2KH
8LPLaliPgUmgComMzSyzyDVwHAMOPq49Q//W3z1DzfLOGGjnXtHvxO4X3lju
dH8M+Jw/+dX/W++Gy3o+T8ZA/ZRRchl26f30xpBXY8BqNdSQi60gteHSm3dj
UDBVPp2CndR9qS8xcQy85N15PmA/O75uvPTXGITKrp3wx14lmtxuKhuDK7l/
tVywb0emzA/UjYHeC3ldC2xj+sUNK0N4/ax/K/7bT5VxyU83T45BV3S58D5s
JYOVrbvn8XrEnFq3CVswNUnwOOc4KC/dS+jC+zP08tKn03zjoMsUdCjGZuEw
PGQsNA75LFt2JWETHBaPucmNw+7+VEtXbNPtBgUPVMdBJk170hC7quSTZqg2
9i02Fznsb0Lnzqeaj4OVVJ3mND5PwnXxbb8cxoF+o/h1I3a475xFles4vnf8
6P6G7dUZe4MYOA6xzfYyV7HVw+kP96WOw+V1qxv+4POdoaHNIf1zHOpdaqve
Y4tQY0JV0TjIFurdc8NmO6f17nLLOAx+lnkngN2w8U12xNI4bOiOajHF+WFz
T3WU/dwExLO6xcbjfJJ0qGqjmE6Apz5LjTX2jIFxeZvtBJCfZiTvxX4s6vwx
4e4ElB7I9YjC+ZfW8M4CEibgxmZ5VU+cl1754npi6ROwRSq+/xA2JGYpbfk1
AYP22VJ9OG+bfWr4e+onIAzx/QXsxYNLDV7MCegaD6bO3sT7gedJkeXGSRD6
udwTi/18ifebFs8kFC/HuupgCzdJ/scrNgmnbn15FInzX9vPXCv9wiR8mQ69
LHQDr1/zrzxi8iR4vUS7abjeXCk8/aU2axJUQ3wEgrAPJjdFZRVNwrev1t93
YOfdH3N/2DoJIQ+I347b4/0qsevIXpYp2LnrcfMNXM8kH3h/NL40BdxfVoSe
WNJh1pE1TMVuCvoFLviyYhcah/mLuExBUVDu9QBcPw0lky1ogVNQHD4z9a/e
erV18D9Pn4Kw+ffvz1ymQ9nh4/+VbaQA04lATMf13eqocQJ9KwUY7+4d2YfN
kHMr2LebAhTFR5KhF3FeK6dSfKUp4ElL0rxhhPNId99FhUsUqFrP08NlSIdr
V9kFE5MpoG89IylwFtenuI5vj89Sge4RKy+lQYdPn2Yrs03+/d1pbJM74PqS
tG1w2JoKkTuWAnPU8Xn5dpYXPKgQTeO1UFGjQ9dv5LXwngqVYvbhCsp0SOn8
AjcoVFhesHpDkKeD2KYC8mddGjhczShSxP3X9B/pm5/0aeBT0q5vfBDny+OP
E3FGNGiwS/W5LYrPA+sTSswVGjSFsqd+FqFD8NqF2bDbNLDVETBdxv0dYW50
zS+aBto1khduCOD5Dm8XMCHT4OBibYo0O+4HPz6ONpqiweulsCoh3G8q2yzu
MpymwdTWmttbcD/a3NcveHaZBswACSvSelxPur6KnOTBdaTl0LvHqzSwaQDp
I0q4Lqaa8QbM0WBvgdPpjSF0uEcbCDYapgHfLibT9QUdfLSmXi0M0oDLKySj
M5wOR7961scM0GD5aOKetA+4r+1/19bTS4PuhH66URYdJK7Hs+p24Hk9uxAb
34/XYWxVrKqGBtwWxxdUjk2D+6k+F9ssGrDlVaQlKk+DWNelgeofNFjhM7bb
qjEN3ROeV+UyaDBZf7tuWG8aQtRXUpfSaFCtmZLw1GYa8qUKOe4m0eCJ5F7D
jmfTUBSsJM/zlgYszPVf3YengU9lsrDCDz/fSNfMg9FpMNaCK1t9aVBcm6H+
YnIabP6zVrh0jwYBcVatX+an4b1GW+iQJw3WtPLXejln4G32jvZBVxqsvnQz
1ZGfAYFEbUaIDX7eg4MbBINmIPPyUMk9TRoeNNfg0NMZiGTabniqQYMCxou3
iqEz4Ki2w+G1Og38alSOXoiegc7J+AepyjRYuv3G/HHaDAQ1NbIhOfy5/Db4
QWudAYqeQth/IjRYuFBoVXFwFnIisk99Y6FBYNf3PvXDs6ApI1AUt4zvt7af
ruTJzMLzVDudQXx/E7v9xDxVZRZiVI7qXsT70Dj0gumrC7NQv6+8iAXfNzOq
ifqW92ch3X7E/G4WFRxPcavNtc7CtdgLpSU2VOhRsN5zMGgO2KRztJXSKHBt
8djW4Kdz4Hft3NDlJArQCrk2EEPn4HMhv6lXPAVYdfLHP7+dAx8r8bK4SApI
X+bPF/0+B+p22yyz/SgQcL/GTLR7DhQvLe0YPksBscrjrw/IzAN35FU7FdIU
3L7Es02kdx5YUqqdVDinwC75aMzBoXmYzI3juLdhCkwWDQ4cIs2DrvaOgB/L
k6D87sUxGdo8yAwNzPBSJ2HjAKe5OusChEwf+/imZRJirm1MMJdagKQ312MT
301CuSdTIcJvAYKWfDYXi0/CrkiCGeteBoQ7OrlrH50ApUf7dniIMGBwp0/h
HbEJMHU3bxkRZ4BPC31HzN4JCDds1C+TY0C2PTuhafMEcG0p0AzUZYBwiJPr
1Og4rAZHSLF4MGA5ZJ1nY+w4EO5qsixXM0DvUySnOPs4pFvEf5nxXoSdH4Wc
t5aQQaHjAJPNfxHSVRcdeXPJ8Nvoy7ndjxahSrHjAvc3MlSdSadrvFiEYr+r
9bRoMowcL1AJ/bgILAYP19ncJsNOvs4GiepF2P226d7IXjIE1m5lWO5hQsHo
XW3rO6NwSe2BblUhE/y0dr8WYSdB7xxpa2kpExS3v+u+u4TvFekGHb//MCHd
Zf3hCioRnPcJXfvexITHowk9Op1ECFxX+Og1kQlyjodpk8lESK9gFjlsWYJQ
1zrvH7pEYDXwOrbOcgkY7MfK1h4S4IeVi4jy8hLoNvBMBHQPg91P2t74dctg
Gt7uHlgzDHxcHrvY2JeBq95jzbtgGLx++fA0b1uG3TUHOE7HDoMyX8iqo/gy
DJ45tHzJdhhK/37qfmu0DPPENn874hC0KnSGLyYvQ+jc34VGwiAwOE9t+GWy
AloiT0nX/PuAl8IdWWq+Arf9+RuarvTB4aZu0VrrFcgb6Wg6qNIHVm/ctQcc
V0CqY5QUstALZQc+Pd3ovwKipLTwE7d6IVR1HY9R0gosZ/83qGjeAwddkeDE
PB4vOHmDtFAXGDWpKO6NXoXZA2nNWuatwKmyuaTgwyrsNDpUU3ekFUo+d5+9
krAKWi5FZQrrWkHG+57tu/RV0PUt0n3/pQW49+U+31WxCgWE84n1083w11lu
hH96FYRfvnRODmwCDY5DYdzn1iA58VB8E3cdMNwYu9MvrIEZO/own1YL33v+
JOpfWoMwH27XRr1aEPp+7fdzuzUIiA8M/xhcA8smn0mc9/Dvl9w5mrXwF3IT
9qmxJ62BxkTMHsu6SnDdQv2TlLoGhttcxDOvVYLY3SIj7R9rYHMnaFfeWgVE
6lneCC5YAxmnLd/aZCrAnR4TsaFlDYrPRDsZviwDSYubQgmda3BbwzT4oFgZ
DJWf+KrZvwY3Iti9vxaUgmF0Z9HDsTWQiB7sLSCXAMf65DP7qXi8xuyqs/4l
gJzuthbP4vmPtQaEbC/B9V3b2oaJ52PmUeKeXAz//39UMJwP0uZUK4b/Abt+
PxY=
"]]}}, {{}, {},
{Hue[0.67, 0.6, 0.6], Dashing[{Small, Small}],
LineBox[{{-0.6648199445983377, 0.}, {-0.6648199445983377, 2.}}]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-2, 2}, {-0.06029478356083162, 1.0913117982546012`}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{
3.6638090561463947`*^9, 3.669308950674362*^9, 3.702938981102932*^9, {
3.702940359906928*^9, 3.70294037795713*^9}, {3.702940457318544*^9,
3.702940461150104*^9}, {3.702941252579042*^9, 3.702941258029543*^9}, {
3.702943074226142*^9, 3.702943079725507*^9}, 3.702945898211835*^9,
3.7029870214258833`*^9, 3.702987067980423*^9, 3.702987240496112*^9, {
3.703005445957136*^9, 3.703005462237636*^9}}]
}, Open ]],
Cell["\<\
With \[Sigma]\[Alpha]=0.85 and skew, this would not be a branching point \
because the following is negative):\
\>", "Text",
CellChangeTimes->{{3.66135964140793*^9, 3.661359644255671*^9}, {
3.6613599655973597`*^9, 3.661359975882709*^9}, {3.661360044227745*^9,
3.6613600812408752`*^9}, {3.66136339462226*^9, 3.661363404861648*^9}, {
3.661363438759192*^9, 3.661363443239099*^9}, 3.669320129124751*^9, {
3.669332406600465*^9, 3.6693324084552593`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",", "u1",
",", "0", ",", "nm", ",", "ntot", ",", "0", ",", "Km"}], "]"}], ",",
RowBox[{"{",
RowBox[{"um", ",", "2"}], "}"}]}], "]"}], "/.",
RowBox[{"um", "\[Rule]", "u1"}]}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], "/.", "roots"}]], "Input",
CellChangeTimes->{{3.6613595685591793`*^9, 3.661359584469429*^9}, {
3.661359624203629*^9, 3.661359627019671*^9}, {3.661359665394278*^9,
3.661359709153092*^9}, 3.661359804535282*^9, {3.6613598575885057`*^9,
3.661359924152072*^9}, {3.661365416938882*^9, 3.661365430544819*^9},
3.669320129707817*^9, 3.669320616710771*^9, 3.702940227605329*^9, {
3.702943071942483*^9, 3.7029430949345407`*^9}}],
Cell[BoxData[
RowBox[{"-", "0.33395231773850775`"}]], "Output",
CellChangeTimes->{
3.6613596291155033`*^9, {3.661359695178446*^9, 3.661359713074703*^9}, {
3.661359876961609*^9, 3.661359946402203*^9}, {3.661360098636149*^9,
3.661360106104082*^9}, 3.661360283091209*^9, 3.661360760147089*^9,
3.6613633758723288`*^9, 3.6613634891860447`*^9, 3.6613641431644897`*^9,
3.661364489087818*^9, {3.661365641290807*^9, 3.661365663943783*^9},
3.662562653469594*^9, 3.662562712275742*^9, 3.669308950788952*^9,
3.702938981152934*^9, {3.702941252775343*^9, 3.702941258224883*^9}, {
3.702943083542992*^9, 3.7029430957431183`*^9}, 3.702945901107917*^9,
3.702987021740368*^9, 3.7029870682786427`*^9, 3.7029872407615633`*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["Two species case", "Subsubsection",
CellChangeTimes->{{3.661355862319255*^9, 3.6613558641854267`*^9}, {
3.6613562585732937`*^9, 3.661356258843144*^9}}],
Cell["\<\
We ask what values of u1, u2, n1, n2, and Km would maintain an average of \
2500 individuals per species, such that the mean fitness of each species is \
one (W = 1) and the change in fitness for each species with a change in trait \
value is zero. Note that this requires flipping the focal species from 1 to \
2 in the fitness function.\
\>", "Text",
CellChangeTimes->{{3.661355868534315*^9, 3.661355906324935*^9}, {
3.66135934244738*^9, 3.6613594040833597`*^9}}],
Cell["\<\
Symmetric competition and resources (\[Kappa] = 0 & \[Beta] = 0):\
\>", "Text",
CellChangeTimes->{{3.669332439211329*^9, 3.669332462727398*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"ntot", "=", "5000"}], ";"}]], "Input",
CellChangeTimes->{{3.661356695784233*^9, 3.6613566998890953`*^9}, {
3.6613569167689047`*^9, 3.6613569183108883`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"try\[Kappa]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Beta]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"roots", " ", "=", " ",
RowBox[{"FindRoot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",",
"u1", ",", "u2", ",", "nm", ",",
RowBox[{"ntot", "-", "n2"}], ",", "n2", ",", "Km"}], "]"}],
",", "um"}], "]"}], "/.",
RowBox[{"um", "\[Rule]", "u1"}]}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], ")"}], "\[Equal]", "0"}], ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",",
"u2", ",", "u1", ",", "nm", ",", "n2", ",",
RowBox[{"ntot", "-", "n2"}], ",", "Km"}], "]"}], ",", "um"}],
"]"}], "/.",
RowBox[{"um", "\[Rule]", "u2"}]}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], ")"}], "\[Equal]", "0"}], ",",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "u1", ",", "u2",
",", "u3", ",",
RowBox[{"ntot", "-", "n2"}], ",", "n2", ",", "0", ",", "Km"}],
"]"}], "\[Equal]", "1"}], ",", "\[IndentingNewLine]",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "u2", ",", "u1",
",", "u3", ",", "n2", ",",
RowBox[{"ntot", "-", "n2"}], ",", "0", ",", "Km"}], "]"}],
"\[Equal]", "1"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"u1", ",",
RowBox[{"-", "0.3"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"u2", ",", "0.3"}], "}"}], ",",
RowBox[{"{",
RowBox[{"n2", ",", "2500"}], "}"}], ",",
RowBox[{"{",
RowBox[{"Km", ",", "10000"}], "}"}]}], "}"}]}], "]"}]}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",", "u1",
",", "u2", ",", "nm", ",",
RowBox[{"ntot", "-", "n2"}], ",", "n2", ",", "Km"}], "]"}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], "/.", "roots"}], ",",
RowBox[{"{",
RowBox[{"um", ",",
RowBox[{"-", "0.6"}], ",", "0.6"}], "}"}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"u1", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"u1", ",", "2"}], "}"}]}], "}"}], "/.", "roots"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]", "Dashed"}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"u2", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"u2", ",", "2"}], "}"}]}], "}"}], "/.", "roots"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]", "Dashed"}]}], "]"}]}],
"\[IndentingNewLine]", "]"}]}], "Input",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmViYGAQA2IQ7X97hl61+2tHg+1fLEF0380ZviC64PR5PxDdJNcx
F0Rf6uFeBKL58xyXg2gLXcbVIPqeTdVbEC3VEfMeRP99Kf8VRHd2dv8G0XW6
c5lrgDSbNAcbiG5ovM8Fon0O8/KC6BQ1BVkQzedXKgeiv/QdXdUApM8ZP94M
ouUu2+8E0Xqfo8D0J+5Ve0H0tL0h+0C00iF/izVhrx2Trk4E03ucFIpBtIz0
3hIQrdU4s+zMtNeOujErwXTL7F1VIPqau2cDiPYVFN56FkhXSeqBaZXeGoVz
QPqI70YwLfQrPfMNkI5xWQWmHS5cKQTRKTZT6kD0rOzaXSBa6v0qMG2eW63/
DkjvObMOTAMAriq0NQ==
"]],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"u1", "\[Rule]",
RowBox[{"-", "0.2927796536457922`"}]}], ",",
RowBox[{"u2", "\[Rule]", "0.29277965364579267`"}], ",",
RowBox[{"n2", "\[Rule]", "2499.999999999998`"}], ",",
RowBox[{"Km", "\[Rule]", "11827.556703322587`"}]}], "}"}]], "Output",
CellChangeTimes->{{3.66136668863997*^9, 3.661366693003729*^9},
3.661366731169405*^9, 3.661366771292821*^9, 3.6613675567031517`*^9, {
3.661369271874679*^9, 3.66136932579862*^9}, 3.6613810453373537`*^9,
3.662562738063354*^9, {3.662562801903412*^9, 3.662562817222013*^9},
3.6693089510207853`*^9, 3.702938981247766*^9, 3.702940599795265*^9, {
3.702940650833996*^9, 3.702940674919223*^9}, 3.7029407983984947`*^9, {
3.702941252941399*^9, 3.702941258324778*^9}, 3.702943146281858*^9,
3.7029870218875313`*^9, 3.702987081196672*^9, 3.702987241023367*^9, {
3.7030060306997347`*^9, 3.7030060344470577`*^9}, {3.703006099050688*^9,
3.703006197949189*^9}, 3.703006681385408*^9, 3.703009662576449*^9,
3.7030097397049417`*^9}],
Cell[BoxData[
GraphicsBox[{{{}, {},
{Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJw12nk4Vd/XAHCZKiJJSCUkSUJKibKRJEkyK1NCQmZlSEQJURJCZpHMmaJk
GxLJdEezuMZUrsxk+O39fd73n3o+z7nOuPfaa61zhK2cdW0YGRgYnqN/8P97
TDjEjh8fhg/yTXUU+ulAVbrwqrTMMBwh/k00RrZnuep35OgwzKp9S72LXPE+
mnzg0DC0e/VyRwmyPtveIJ49w7BNVCFLYoAOwj9JDM4zDkO12pNXeX/Qwfo+
jYQKIg0WfNYa+jFIB0O0QE4lNxoU4mkIODtCB1NiPNrLTjQ4objkbYK8Yp8Z
UepAg+bq+y08kXlmG7cdsaHBGaE7f/KQNZg42PmNabDPiHnPnlE6KDzwavPM
WRqsUlqvnUX2s85lyNpKg/qxeX6x43Swe4w0w5E2BAsYriVkTNKBwNbUTIbk
IVh3v1+rEnmvpKPxbMIQ5LEl0NuQ97sxV3dFD0FLO7HNK8gH10+EZoQMQW1Z
jftXftHBMd7Y/addhiCX8YPgReSL6sZa1mAIyk4yXzrzhw68s/oyP/YPwklv
We4EOjr/rv15VT2DcMDIvyoXuWjrzeLqzkF438fb5DPyhOPP6joC+v29Zw6D
yMbHFzqbGwbhiOPP6YPTdHCyZjtbb/4gXPBrf1yAPNet6vTPbxD2iHsylf+l
AyeOdyfPCA5CcROD9JRZOpjO69VZExiEsWrvrQqRXbU4Har5BuHJaPFdENnj
qXuK8o5BqGX5RGcA2Xer0pbzzOh4Sp3Ce+foYDt7Vslr8g/oIaEuF4Os+m95
udrxBzQmiOv5zdPBu960YJakAbigUch4aJEOYrvupy3EDkDGm54FssiBFKOq
8cgBqN9WdkUJ+Vo7x8y3RwOQ51qVmwHytnpvs2eOAzBZ3l8xCNkl5+oJvjMD
sOpFW18f8invTTTx3n44AKiPQ5boQPRu3+puSj+M7G/7FYXM5f6Bj729H64O
zV1IWsL3787lP3X90HH3D9p75ATL7or3Of1wrr4howd5/cL75wo+/ZD/b7qh
xDIdNPDeOKu1ux+u1zzMqkP2owsEfOLuhzP7StJakOWayHUS2/rhdLlYFBU5
01tDY+tGH4yOoetOIj/uk9b7OtIHV42+6O9YoYPz6et2ykV9cMzKwMIMueFo
YvSJC32wYuRB9R9kP1bDzgzlPri064fTArLcj+0COxX6oJiIwa4N5MzIoJS/
kn2QLT9Rjesf2v+sfU4Bdx80BNpHZZHPV56uER/ohR1V3ZIeyA1qnb/2evZC
r0DuHX+RixX8KTlOvXDlYdqdJeRkmUNQ3q4XmobZ1G4ge+29F6V/vRe2SbzR
5lylA4k53tPhKr1QxzGF4QhyZIZh8D+OXih6NbPRCvk6I1WoJ6sH+hQpsbUg
ayz5sdml9sCv2zKNicgnpg7Ozcf3wN/yS8ldyJw9no07InqglKvvzlHkmve7
nC6690BlxqjENWSxGwafKkAP7FrtP350jQ7+QrLBq65uaLXfOykY+av7zMFo
YjfUb3oR9xQ58RDXQmRLNxS6eCYiElnj+aXYsJpuOC1nfDMBOdW8juqX3Q1P
7j9Yn4+ss1ZoZO3VDVUVu/VJyAUKT02O8XdDHoWwgd3rdPBoKvuwFHc3XOE4
yiOIfC3967LEtm4oM/HznAgyKxtjgihDNwzQrnshgWze7dXDN9EFPUZvjCsg
c3jZXl//0AVlLi/6XUN2LFMx+27UBa1OM3nGIHOeVzJQv9oFtUOBSjxyIVnh
cq1mF+QvOLg5CXlm9vjZD2e74HQeU8AbZC9ZsX0ZB7pgTshLsRJ8foVs/T70
TigiYH2pHVkMbKbMT3TClYZXpUTkxjamVhdaJ0w+2sBHRWabWq2ypXTC4EGh
lj7kSEl6ou6nTph9zObPT+TX70imEk86oXqoDS/TBh2cOd2hnxnQCYXO+wuz
Ig80tWgJ+XRC1aeDYluRhSYazvDe6YQzg+FC25GzxCr2Mup1QrFb3B0CyMUZ
iX3dgp2wo3TxwDHk5iQb09ByKuTlmIcmyAa/OhXci6hQS4pn/jryoLzmbrMc
KlT9VXHQHHmeJEWVSaZCn+U0byt8PLalK12PqbDcyOS3PbLn3bBzhwyoUPzh
cwZfZIYvq8I7rlChcgOk30cO2+HM8E+DCqvmCnseIKfm6X1uO0OF5u4DGYH4
fGh7T90VpcIusS6mMLz/K4USDbMU6MVxfe0Vcm6i8NbCPxQo2SiXE498cvLl
eNw4BcZJbdV7jXzpsdcbx14KFN2UHZeMfPeTiiBPPQWmyx+ae4Pccoi842YU
BWowHacXIRt5qk9rhVMg21d5s2JkWl1F28lgCgx0cmosQV40S3rK5kOBC1vu
RZYji0TbshTfQMc/bTr/Cfkew/ISwzHkY3YcX/H5OJg82HqEArf1bVJoRF6g
VDJxH6TAsVXRm03IHrk+nAd2UyADD09uM7Kb4eqB85so8Izb7x3tyE55G9qh
BDLklpZX6kSW4rMkv/hOhnk/ek90If95WGOS0ECGybIK4t3IjkYPrXMryVCo
R5alF/k2I5NPaxoZSr62ixtAtjZmzdzhRoYTnx6JjSKL1ttKCDii7R0Kk9jD
RxsLRWzJMFynN2cM2Yop5OPxa+j3RuMiE8gWBVs7DFTJUOeR39QksuBuewPz
M2Soy9od/wuPv6DmHtuTZGhtcFL1N7KpydPRexJkeO3vprA/yNeYOf7Fc5Nh
1t+jC3RkAec7AenbyFD+w0ToNHJ3dytLLisZButVCfxFNi58xlW1QoLavpXH
Z/B4vMYlNkAjwSLx6+fmkHkaXHLH+pC1JWuwydIEGTqVBE+sSyrMI+uyRCky
fCfBgNNNBxeQdYp2XhUpIcHil6W9i8i9C7rr2XkkyCn7U3MJ2fZsVK50Fgmm
q06UY99v5mI9G0+C2YN6j5eRN+/QKamPIsHU+43j2FFGzy01w0mw7e3OCyvI
2SMcn4z8SdCq9Nwq9vEjl+0GvEjQI0ZK9x9ytWv4Lhs3EuRlYcjEJq+zubjZ
kCCDr7XKKr6/5zX3LZuToJTbehj25NPQZn9jEizoDidgb/BvORhxiQRlG6MN
1vD8sbhA3HmeBI2ld73E5skK9k9QIkHJllet2Cm/GySF5UmQn02IZR1Z4jhL
z9tj6Hz13p/GLvNWeyJ1hAQFua84YCvXBJ0oEyVB5rzVeGzDy4zP6/hI8BpL
zBT20EuVMxd3oPsTGsyzgcdbT8DPdjYSlHCPOYW9KFQTa8hMgh37G4ywA29t
nOtfI8K4X/ye2BwFSn9vLhJhhUz0c+y4Ob/kyWkiTL6g8Bb7gOLnS66TREgO
5qzCLni4urQ4TIRC53jasE83KWY96CdCr3btfuwvnL56LJ1EuHS/9if2FYOP
DOEdRLie4DyL3fN6OZ+7mQgZ75muYE+Le20R+kyEIrEbG9is5QtWR4uI8JpI
w3/bX6zKcZW+Q3+/sXcOe+85z88KGUTYo944if02tNS+NpEIO041DmDLdszy
acQS4coOoQ7sz7zHG9qeE2EeN6UaW8PMzc0glAjtPX/mYBMz3u/vCyRCmrtl
NLbZ5HSL1X0i5FI/64s9ISPj89OTCHlEgiyw3e45H3JxJkL1M3Iq2GufC8gL
dkSo2mgohB3CPPXQz4oIm2cnV/Hz2XnpqDSzKRGOTc9RsZNfOPaFGRBh2697
Bdilgr9Oxmmg4z2ZN8AGNhIjgqpEuOq1cBC7Off2i0xFIhxg95td+y/eT/wq
liJCqTeHnmBv0xtNbeUhwqjDmi/weAwwSjhRz0mEc2W2uthz1680VWwhQjdf
lx3Y/daV9IxVAvxdYRCKx3vB3QglnxECLB7Ns8TzQ8RXleg8QIA8kt47sGP9
F21sugjQ/pV6DZ5fD0JuROi0EGBy5RQf9pUEuT6xUgL0+VVRiOfvl+RJ570F
BDgoTNLBls9IYeLOJkBrHsZpPN+F8rYeWXtNgHaDb8Wxpz/3e5OCCFA03zAI
x4uoocd8AXoEmB5rMojjD+uYQq7nZQIUafpxE9tnkq7kcIEAKyZSR3G8spo1
sTVUJEAnw/7hKTy/WaTKJA8QYOnJgO843pHFqbrdMx0wzM7jIo6XfC5iz2Sj
OuCX26xcOP4a6ny8mPW0A3pVeOr04+uV0WYReNwBk0XEnvch8/71vL/JqwPO
2BlsxvF7l1uDfYdZB9RQVBzG8X+nh/UFp8MdkFcl7BIBx99ptU36D9thYAXn
3zr8vIscvRQ92mFc8Mh6LfI+12i6yK12qC91lR1778xw/1+tdthxdXk/xPF3
LvDjc/52+NGvRR6vX7xLNe7fC9tgTWaZBF7vOBjOjqkOtMK6w4tC6Xj9WlHO
vUVohVo6RexpON7Pq7mEf2mFI69M5lOQi35prVByWiGj/+OGJGT9TlPO2/da
oRD7QxO8PicU3D/5nKsVsinMX41EFjerCu5VbYHptxZe+iGf+6h4yONtM1zY
1tJhgO/f7d0Z/NmN0OeKjT3Ob0rWrDkJt77AHAqVvQDlQ3+Cn5eumtdCNe/1
aHPk3l9Xor0kqqDVvKg7F863RMskM7mq4G93FcPtyC6mAg2EhU/Q1GCPAifO
D1tH5iXqP0FiABvzNmSZAm+j/uufoAvrn9TNyMEuGQKqER8hm4rHxjrKP2Xn
F1LZpyvgdOqE/hSy31HT0/LUCiiRcPzqH+Qmm1qCdVUFHFHT1/6NbEZ9ylgd
UgH1H+y+NIkc8kHI2kW4Agauf9UeQx7w1jxE0f0Apw0u+A8gh64n5SeXlUE7
G5/QdmQvqZ4fwUll0Dpe630bsp05L7fz4zIY8nuyuxXnz9XP7gKDMuhCizja
gsz6wB8MzpVCWojPQBPyozVLgvCJUtiTZnyrDvnB6oH5N8XFUOeyEX85spOk
5aGIhGJoLv3yWhmyuWmiiWdgMZyLf5dUiny2iqf6vG4xHMi/JVaCvOrL8mTs
73sYcuKEahGy978xfvFj76HS9K2MHOTxOT1vQ4tCGHl1lDMVWeR4/V7+I4XQ
SSTVIgXv31W2pnuhAFLZ7d8nI1P/cG02e1YAO2iSxkm4Xhhrjb75OR9GP/cp
xvXAm64LRS578qDV96iEGORB3g96suO5kNnWdTUaea+B2OJscS4MeWdjgf2S
wKx0TzMXmpZGir9EDmyu/e7nnQOznP414nrjRpXieFhnNpRK91QMx/XISk6Y
VkY2dNHsLcD1SZe8gBSnczbktTM9gK1TtuTxgjUbKpkWbw9DVi4oY4yTewsZ
HMrnnyALpkoLZr7MhHUNtotByL1BBwzglXQYF/WAdB/Z8r2y5JJgOgyIJ7pi
jw2YMR2bSoNz/Qd3YM+cjnufHp4G7X816/oib5nexhn8LRVah/PQvJEdK35H
xAcnQ4UP7TL38HjYeegM+8FkyGko9eMucpDTjcn79UmwT/j5M+wEUaq6JUMS
FPhpNO2J3BgJN8R8XsPfJWw1Hvh53I5yLb0TBwfN+SLdkKW+tOwX2xYHVZ1z
tbFP79/c9irnFRzZrsaJrUPxlfAdj4UFT4IiXfF4V7EZVrkRA617ldJc8HhO
THlRshENU/+t3MKOXuwGB5OjYdy7KmnsnHztxC29L6HQgat1zvj+7pY3aNeP
gtlJtbNOyCMebkwqsy+gvXJ+HTa9Pe998YsXsOlSShQ2a7AwZ2xbJIzciJXD
th3Z9awy8hmMc+98cgefT0LYZGJrBNRZXDLHjtbZUA9gi4C8icKnsGurJjbU
Hz2FdQkhk454vMR8ciXfC4GJ4YVm2E1/Z3PDK55At6/5Z7E9tSXH1JaDYZzn
O0Hsts1J18p8HkMB1/hhB2Qfa0r0nU+PYEtPRCO2WC1H+8HVIBgw55+H7e/z
4FysXyDUvmPmjS3ZWe6nXf0QNo9q3MDuOk7/wLoRAPeqyGpi3+iBxlMM/jCy
dV0Q++NLmVbzQD8oxkNjw+a+nKbSznQfetjVL9ojf4GBEkWs3rDAIoCMvc97
Nlko5B7cy2P6BfuurPXOF1vvQoVluTLstl/kJ5ueesBYXs632Icyz6+6bnOH
Mu4j8dgB5uUodLjCqF2VEdhdfIdGdbe7wC9M4YHYVunSJcHCd6DOOTMvbJ5d
OxJvidpDtW5JZ+yvT2YeaRy6BWWbV2yx762Q7hyWsEb1bqMFtvidMkO2ozdg
QcsLE+xSeNSfamEKx0au6WPzZU7rxNkYQisbER1sn7ASkWsOOlBeZ0IL++OP
3xOnaGqQ8W2eJjaDwSj/vd5jsM/e+SL2hD+Tic/CWVChOP2fT+z6NCPgpge+
1NprYxOkl4RMHE2AVtZBXWwnTbkrr2wtgMTcgCF2sGxltX2RFeB6F2uKTYad
lNB8GyBUp3UTW+Tywu/sHDvAdmaTA7ZrDw9z01sHsM5d6o5dc+v4nvE3TiBH
1cYP+8mK+G4mggtQ/soTgi2lUvEm6oobcImre4lNfXJBRqTNHbiVOKVii+6y
vaDy/S7QzKmtwv5+fZ7YcdELcHnZtWC7pT8yt2zyBpFuHP3YtdIZnv4N94FM
y9VNeHzY3ZXdtF3tAdDZ/ZcHm+tzbXhynT+QdH52GFv64DRhwOIhSGevN8AO
bPrwSmx/INA+c+0ONtXB38xpIBC0XKQ/xn5QzPlzzfQRWPnG/RG7BRxl2Hft
CRCcPCuF50PB7d3NKYdDgOOAjw525EuWaJHlEBC+k+aOrTfef0g8Lgyk/paq
xu559uzKcWoE6JuElng+VlX47C7PfAYEfLXCsZNotsPyns+BzEvGSmyZ1ymK
+8MigdPfyV14vs9N3WsXPRwFGM3e9WOPMjmdGIuMAk2H/LlxPKHyW8e/XYoC
D2L8NLA/qOrclGh6CWR7Zj9g+8SKL0rfigESNnVvcDzapNQtqJgZB5SEm8pw
fJvRbQ9a3RYPHnzkW8Om3WqY+OwRDzSzI8674/n24n2xsloCqKb86sYOGQ1V
Vx9+DRiTHblwfOWMUHC6KpwCJpoNS3F8Xk+TIXGHpgAp/gUOLxzPysXkydMp
oLiywg7bzmXrwyOWqaBL6K0wju+aCfOaBdJpQM1RJM0H72+qdaCkLR1Q2S2p
fshntr4227eRDr48HFB4gOwgatcXLJ0BLO8apWI3XWPsMYnMADyb5Z388fNt
PEnZuPoGFHfl73qIvJia8v0SJROobVZ8+Qivn3quFcO92eCjjtwFvP5xOiud
urztHfCxj2rGPhvGXl5+5h0QMqBpR+D1pCazJDTpHUgNNLn2DFn/aE+BtEUO
sLVJuo/X02+s5zJ9abmAP19hCq+/xZU8UTt/FgCRwewgvL4/WpgkPN1XCBI/
Gsvi9d/weO0OZt1CUCcqQMP+l3fnxdzHQtA83K6Whuebzs0me/UikBi4wvsG
2f5cVeMl/vfg49XRP++QVw47feWoKgbJFoVWOH/Zu0iof8FUDmyHDTSJ+Pip
zBp6+8pBjgaHHO4XXtQ81cJzqhyszOYIkXF8TEokv7IvB4lvY1coyO3nbo0m
EcrBFmHBym58/yJXWXNSPgCGNAvLIeTxw4c06xQrQVjJTr2/eP+m9ztm3KvA
Gb/StJ0oP3zsWFpSrlAL6ixLmK4jT36p2m55/wuQUsiWK0J+Lz4mExvcCASG
q/oYUf4qPMPQ6/WwGYRF5jHr4nw589cuu2fNoK9fRUcPWcmEqmP0uhmc9L70
Wh/3T2pyv8qVNQOhnyXSRrheeGZYPDPRDDxCM66a4nrsSF6oo8530Mar4WWL
8/ObRvKW+1sAW2eBqg/yIz5V9yuSLWCsctkL9992fpcsUDrdAjpKvQpw/01G
llF0n14L0A9n4/NHdmDI394T3AJUM1QHgnD9l8g4rjfVAoILxc5F4PqQkh9z
4XMrWB0MNML5fjBHPpPJt1Zwot7CLBVZ9Xyeqz2lFSTqa1vh+uBTac7liD+t
II7f5HYGct7LtyykfW3AcWra4S1yxNU0T/MHbUBI55FKIe7PtEYbeIJ2oF7X
IVSNr48luj74UjtoOyjHguuVpjMvj8UZtYOWpDsT2Cp5Lzg+ObeD6SbdXFzf
yD591sCQ2g7sK8pEGnB/RPSLgDpDB7B346N+x9dH+xxGsOwA2eFUZdw/e5A+
sNv0VgegBTmw4/5ZpNVG9tidDjDdepWMXU5Tbvzn0wG0LTbfwPUYw3A9k1hM
B9CR/2aD67no4W/3fb51gLjD8gIjyFkZk+wsHR1ATDumCbvyJvvr59QOsM7F
54n7awPDWpVvhjvAx81+Tbi/Jj7SPt+21gHI7oHGP5GrRihOB2QJgOf6LwFc
X7a9WVjLlyeAuBvyOdhD1nwR8oAADKN9T+F6lHXUOPeyFgGYvum6hOtVndHe
8Xu2BLCwM+E67pdZZa7eZbxDAKJS53uwPW32sUa4EwBzVJvhLK7HRs1F0wMI
IOuAy0VcD4+MDlm2JBCA9aN4HlwvL2QyThumEYA+J+0h9lbbA/5DbwmAO2L6
N7bUmHXSQik6/l69Klx/e42Ndwu1o/Nn6QK4Xg/L2nI7l0IA1C/LCdhJtoeX
5PoIQOl90yx23Zg976WfBOASeiMZ1/8c4390PZmIgHbgUCfuF5z8GfcvcisR
BOpmCuB+guWvc2/ythOB+tbNptjF9Pj54T1EkJhv34Xd91cteUOYCKZsb+3E
/QqWObr6HnEi6ANntbCNl87H6Z4ggoSu2x+wH65MKzspEMG68aef2Dmrr3+G
KhOBgE/vbtwPWWOYUajVIgJJLj93bDGmpOE+XSLwUVhOxNZh0QhfMiYCGZfT
X7DTtyb3S9sQAafJP3bcn/nOfjH4kgMRaJTfk8Se45iTuuVKBPzu+ZrYglwp
nYH30PEH422xL3BrBiT7oe06CgHYLjzz4h+DkLeHv8JO4E0lUEKJQMkhPA+7
nv+Sz9/nRGBfJA+xfwssiHDEouMfftaOvWtf2nfxRCIQFQz7r1+mtF/LQy2d
CHQ7D//XL7MTXtxrmU0E1Qn2M//1vw6kN/gWEIFU/sVl7JFDS7wlH4ngd3Pn
f/2yk5LadpNf0fkoVK9iW0gtc7G2EsFc3tPF//pRMm8qhUlEYPlnjI5dLHvF
6mw3EQidbB3F7j2xwmbygwhCahS7sZlPZZZ4jBLB/S/SzdhSp3VMI38RgZNX
VgW2keI/5ry/RGC3I+kNdsDZrPzGRSJYqeN6hp0DrhoOrxGBNlz3wCaprK6v
M5EA7ylrE+zVc2/fCrCRQLSJkiK2mLquzkkuEojVDxP4r1+osbZ0lZcEwvXP
L+Ln56WZnXZnLwnoP3IkYH/XXp95I04C03xzfthzOu9e10iRgHWztg62oJ6+
Wt8JEpi5yCaE7WKUE7NThQTKz8b9N74STAyUpC+g7XPW/tj11xnGNS+TgOFG
sBo2r6WhfKAJCRQFwa94/AKrTUNJFiSwRa4jCNvOOi+00oYEtLMllLA/2TH2
TruSgOPx9zl4fli6FvhZhJGAhHCJFZ4/+oYO/qaRJCDi8Zgd+6Ki+EOTWBIY
Y8t6j+ebLEv6I710EjhD+zqP+9ss8TFPL3wkAe5Np83w/F3x041QqyGBFjXp
//pnU1bbn6t8JQGyjVkAdpdkaJQikQTezBjE4f56Ts39eOlJEmhrs8vC8SQ5
8/RryWkSWE9qE8F+GbaQeHgB/T7cIBHHn/v6LqkHGMnA9sqnYNzfvzJx8y2f
ABmItcfI43g2t/1S2cZFMqAarHHg9wsTc5s/rF4hAx9eges4PvZ3f6lYNiCD
ObfDmbi/9jVDqWr2BhkISvHIjCPHn5KtH/cmA/2sr0I4/ipZ7Ca0v0PHozA6
4H6brBqV2FJIBs2Tw49xv+3Q4Zfkb2VkoFz2JAnHd67ZbV31tWTwVYm9Hsf/
4WCGHx+6ycA8N2+Mgsd3wfjvlK0UoPwkO6IV+f2Hhq+CXBQwVXjsegtyT01G
ahIvBbxpLRLF640kyUL/9QEK4PkTkIvf93Qsdn6KPUsBXi5LT+qRd6s0hUW4
UsDvyk9eFXj91Myy3uZFAeulNUwfkB31Hik9fYD2R/YJK0OutlGeCXmK/n7L
ehh+P2UVVmHyKJMCJINajPLw8yBli/t2I2uO7sXrM6kvmHHlBwVYKmvewP24
1VHrPq8xClCLFE7D78e0l4Qi785SQJ0a78445Jm98YuuHFTQ1ZAKcX9O0Tb0
q50KFSjXeZ96iNyydNva8B0ViG9tD8Lv/7apEY1sC6lgfeOgIc5HtJ4rXLpb
RgUTF7aJXsPz5yC7bGwtFdhLeRXjfl6zbt4GpZsKeCts47WQv+VNJRiwdQK3
auvw0/h5WroT9B06wbpX/W/8vpI1r/eLtWsnMI8hHeZAVl88V+FxrxOYSv67
wYZ/H8GTEh3UCQJvPaxnRm74WOZIft0JJjevay6j/OsLz9Jm/ZZOoOavazeE
XNt0X0nvaBeILpysyUc+Kc/KNnq8CyhnSXHlIOe8fU65q9CF4qGASRZyVHC6
Y8KFLlA1QelMRrZWa0oYutEFpp9fDHmO+4c1OxedY7uAY2Z8kTOy5oecwvCN
LiAVv30Fv2+uFjvhK8jaDeb0ZT3EkGVjP6sXbesGXef1x4WR93h29JN2d4PJ
PQEV/Mi/ZRfY95zoBntdf7CwIj8rULF7Z9cNanTnLvxA+Scxs0voK6Eb6GbX
qOJ8nXvJ/fzprm5QLRrzC79vv6q53T5voBv0xKyH4/y/Y+p8SdSvbtDx3acS
94faT5Wct2DpAZFaDysscX33LcJ+Sb4HWAmyah5HbvijWiqR2gMSv/tH4+8B
mJUHupKyeoCtsdl5/L2AWpT3Gld+D+jJ2D/VgPzlZJH6YmUPkBpXPFSJXOe/
r7ue1AOcak6cSkGu3rG0Zrq5F3hwSX27jVwhl3/huVMvSA1mjcDfM3A2Ex+/
9OgFGgX6Bfh7BxvzpfpXPr3AaWSucRKZ+8k55dTgXpBszD/Sh+zQ1S3/PrkX
THHZwBpkQV9WCVJbL+A8PrAWjPyoxmIbn3QfkPms4sWB3KP/WHOPXB8w13JO
YEE+9jMnZL9iH2Do0y1dW0H52I4FZvELfcBxp3g7/p7j1M3wNXmLPiB/1D+1
FXmSpXLq2vM+4KPjl/8U+colbkIyvQ98rNC9vAm5h8lkXHShD1THirxeXEbj
oyplLWe1DwRaeAz8QfY5elTiw9Z+EKIXdL4HOWu7RlD7gX5QXh0TXYy8SvKT
YzDuB7w+n2VuIGeb/oy/UdMPUm/IyJYv0QGjU42V6IsBwH/Vp/fsIh28sXsR
pfhqAIws9x/G3+Ocv2lVp5s0AGQIyXfEkEOMmUUevhsA5jQhCicy5zmNof7a
ATDJ9+jAjwU6EODvsHg1MwC+TuZX+CEfr/thyqb/A5zw9XxdPI/zZ/8jXuyD
gFN+ZG55FsXf5WlnD85BEPBGtewXcoqdVanLjkFw0mfpdj/yNvXzZ2/zDYJI
Pr2iGuQxBvYr1w4MgjMNQkXByPF3Y93OKA6CudT1u1zIDFb5lQwOaDvFf0lg
BuW38r0XQpsHwZc/Xb5s02j9OG3m9bV1ENRYPX63SKcDZ4Uf2UwEdLyHpY0j
yFxnhrc+6BwEXbK+lGpkPfDru9vIICBrtMq5IXed/3fFdH0QzDDHMFKnUPzW
3WMsLTsEliAl+sUfOlhyvG5HiR8CJ1c4O6mTdEB+ln6wN3EIxH1wdK5FLir6
SRtMGQJCsmFLuch2c/fMfmcOgS1KP/sCkLt8o3WZioeApr/3n8PIFWGtZ441
D4Frsb8Pef+kA+9ssCNiZQh4lYgS2SfQejp84KPadRoYcc66xzCKrjeU5P7G
nAYkGr13jozQQYZ00FFmKxoo/i6UgC4QaPnSUuvtaGBFqe7WM+Rk7rQnqndp
4DfHWaY9yKoqggbKL2iAlmQmKzOM8utk/mnFRhpIX1E4ojlEB+ZqTe9eN9NA
rMNRziPIxyfv3fzXSgOl9cU97Mh9cp3Uj2QaSA27LNM6iPKt1pjPp2k00JGX
1aKNTPzH/fTUGg2sxqzUXP6BxmtandorhmGg1KgvfxTZ94Lb+gLTMGjyT47b
hiz6kuBazjYMBO07d34fQPW1RKSxHP8wiJ2qnlVH1uwA3DF7hkG4rOf7g8j7
79K/zwkOA4aoJiNm5KZabVB6cBgUaewzr+1H9cGt9aWdh5H/bK1OQXbjKCh2
lxwGdRftWR8gq5eYOZKkh8Hq+vFTpsj/930j+P/vG/8HWv8kbQ==
"]]}}, {{}, {},
{Hue[0.67, 0.6, 0.6], Dashing[{Small, Small}],
LineBox[{{-0.2927796536457922, 0.}, {-0.2927796536457922,
2.}}]}}, {{}, {},
{Hue[0.67, 0.6, 0.6], Dashing[{Small, Small}],
LineBox[{{0.29277965364579267`, 0.}, {0.29277965364579267`, 2.}}]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0.9958},
PlotRange->{{-0.6, 0.6}, {0.9957553453036068, 0.9999999999969911}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{{3.66136668863997*^9, 3.661366693003729*^9},
3.661366731169405*^9, 3.661366771292821*^9, 3.6613675567031517`*^9, {
3.661369271874679*^9, 3.66136932579862*^9}, 3.6613810453373537`*^9,
3.662562738063354*^9, {3.662562801903412*^9, 3.662562817222013*^9},
3.6693089510207853`*^9, 3.702938981247766*^9, 3.702940599795265*^9, {
3.702940650833996*^9, 3.702940674919223*^9}, 3.7029407983984947`*^9, {
3.702941252941399*^9, 3.702941258324778*^9}, 3.702943146281858*^9,
3.7029870218875313`*^9, 3.702987081196672*^9, 3.702987241023367*^9, {
3.7030060306997347`*^9, 3.7030060344470577`*^9}, {3.703006099050688*^9,
3.703006197949189*^9}, 3.703006681385408*^9, 3.703009662576449*^9,
3.703009739775098*^9}]
}, Open ]],
Cell["\<\
Confirming that this is a stable pair of strategies to a slight change in \
either u1 or u2. This would not be a branching point because the following \
are negative:\
\>", "Text",
CellChangeTimes->{{3.66135964140793*^9, 3.661359644255671*^9}, {
3.661360589128385*^9, 3.661360602974161*^9}, {3.661360691300109*^9,
3.661360691475387*^9}, {3.669332482926097*^9, 3.669332498675777*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",", "u1",
",", "u2", ",", "nm", ",",
RowBox[{"ntot", "-", "n2"}], ",", "n2", ",", "Km"}], "]"}], ",",
RowBox[{"{",
RowBox[{"um", ",", "2"}], "}"}]}], "]"}], "/.",
RowBox[{"um", "\[Rule]", "u1"}]}], ",", "\[IndentingNewLine]",
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",", "u2",
",", " ", "u1", ",", "nm", ",", "n2", ",",
RowBox[{"ntot", "-", "n2"}], ",", "Km"}], "]"}], ",",
RowBox[{"{",
RowBox[{"um", ",", "2"}], "}"}]}], "]"}], "/.",
RowBox[{"um", "\[Rule]", "u2"}]}]}], "}"}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], "/.", "roots"}]], "Input",
CellChangeTimes->{{3.6613595685591793`*^9, 3.661359584469429*^9}, {
3.661359624203629*^9, 3.661359627019671*^9}, {3.661359665394278*^9,
3.661359709153092*^9}, {3.661360304945673*^9, 3.661360395308395*^9}, {
3.6693201339409103`*^9, 3.669320134758668*^9}, {3.669320594808853*^9,
3.6693205977260513`*^9}, {3.702943155001569*^9, 3.702943157039815*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.03240067387529477`"}], ",",
RowBox[{"-", "0.032400673875295105`"}]}], "}"}]], "Output",
CellChangeTimes->{
3.6613596291155033`*^9, {3.661359695178446*^9, 3.661359713074703*^9}, {
3.6613603472719603`*^9, 3.66136035578646*^9}, {3.661360398557123*^9,
3.661360465128694*^9}, 3.661360622614654*^9, 3.661360694941847*^9,
3.661360760247066*^9, 3.661361148626329*^9, 3.661363547808544*^9,
3.6613644892870073`*^9, 3.661366777692974*^9, 3.66136755673503*^9, {
3.661369271908579*^9, 3.661369325831122*^9}, 3.661381046738572*^9,
3.662562738097912*^9, {3.6625628019388638`*^9, 3.6625628172566013`*^9},
3.669308951127061*^9, 3.7029389813023157`*^9, {3.7029412532242317`*^9,
3.7029412585106363`*^9}, 3.7029431576162643`*^9, 3.702987022041359*^9,
3.7029870813448877`*^9, 3.702987241159865*^9, 3.703006043008953*^9,
3.703006549105432*^9, 3.7030096850294867`*^9, 3.7030097398410883`*^9}]
}, Open ]],
Cell["\<\
Skewed resource distribution with \[Kappa] = 4:\
\>", "Text",
CellChangeTimes->{{3.661355671688161*^9, 3.661355676367598*^9}, {
3.669332505836727*^9, 3.669332512307555*^9}, {3.669332547804143*^9,
3.669332551272911*^9}}],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"try\[Kappa]", "=", "4"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Beta]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{"roots", " ", "=", " ",
RowBox[{"FindRoot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",",
"u1", ",", "u2", ",", "nm", ",",
RowBox[{"ntot", "-", "n2"}], ",", "n2", ",", "Km"}], "]"}], ",",
"um"}], "]"}], "/.",
RowBox[{"um", "\[Rule]", "u1"}]}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], ")"}], "\[Equal]", "0"}], ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",",
"u2", ",", "u1", ",", "nm", ",", "n2", ",",
RowBox[{"ntot", "-", "n2"}], ",", "Km"}], "]"}], ",", "um"}],
"]"}], "/.",
RowBox[{"um", "\[Rule]", "u2"}]}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], ")"}], "\[Equal]", "0"}], ",",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "u1", ",", "u2",
",", "u3", ",",
RowBox[{"ntot", "-", "n2"}], ",", "n2", ",", "0", ",", "Km"}], "]"}],
"\[Equal]", "1"}], ",", "\[IndentingNewLine]",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "u2", ",", "u1",
",", "u3", ",", "n2", ",",
RowBox[{"ntot", "-", "n2"}], ",", "0", ",", "Km"}], "]"}],
"\[Equal]", "1"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"u1", ",",
RowBox[{"-", "0.4"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"u2", ",", "0.7"}], "}"}], ",",
RowBox[{"{",
RowBox[{"n2", ",", "2500"}], "}"}], ",",
RowBox[{"{",
RowBox[{"Km", ",", "10000"}], "}"}]}], "}"}]}],
"]"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"ntot", "-", "n2"}], "/.", "roots"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",", "u1",
",", "u2", ",", "nm", ",",
RowBox[{"ntot", "-", "n2"}], ",", "n2", ",", "Km"}], "]"}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], "/.", "roots"}], ",",
RowBox[{"{",
RowBox[{"um", ",",
RowBox[{"-", "1"}], ",", "1"}], "}"}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"u1", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"u1", ",", "2"}], "}"}]}], "}"}], "/.", "roots"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]", "Dashed"}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"u2", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"u2", ",", "2"}], "}"}]}], "}"}], "/.", "roots"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]", "Dashed"}]}], "]"}]}],
"\[IndentingNewLine]", "]"}]}], "Input",
CellChangeTimes->{{3.661355380776771*^9, 3.6613554716473618`*^9}, {
3.661355628776557*^9, 3.6613556384935837`*^9}, {3.661356268253724*^9,
3.66135630436094*^9}, {3.661356346044685*^9, 3.66135637603677*^9}, {
3.66135690781993*^9, 3.661356922891614*^9}, {3.661356968997313*^9,
3.661357020360539*^9}, {3.6613570849118032`*^9, 3.6613571042532988`*^9}, {
3.661357142984558*^9, 3.66135716043009*^9}, {3.6613572890046864`*^9,
3.6613573276905127`*^9}, 3.661359410020193*^9, 3.661366781539485*^9, {
3.6613692517036858`*^9, 3.661369256846119*^9}, {3.66932013544236*^9,
3.669320137209255*^9}, {3.6693205809076843`*^9, 3.669320592226274*^9}, {
3.7029433106235123`*^9, 3.7029433406893663`*^9}, {3.702943610635017*^9,
3.702943619613172*^9}, {3.702944013597533*^9, 3.70294401416831*^9}, {
3.7029870892014637`*^9, 3.702987094078024*^9}, {3.703006569790736*^9,
3.7030066601948833`*^9}, {3.7030096885751877`*^9, 3.703009701764471*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"u1", "\[Rule]",
RowBox[{"-", "0.6015968154944005`"}]}], ",",
RowBox[{"u2", "\[Rule]", "0.42350036015936454`"}], ",",
RowBox[{"n2", "\[Rule]", "621.7656575248498`"}], ",",
RowBox[{"Km", "\[Rule]", "10756.31406848269`"}]}], "}"}]], "Output",
CellChangeTimes->{{3.661355400057754*^9, 3.661355484875826*^9},
3.661355639112556*^9, 3.661355814416032*^9, 3.661355846086014*^9, {
3.6613562926598473`*^9, 3.661356320327838*^9}, {3.661356359681973*^9,
3.6613563764858828`*^9}, 3.661356924616371*^9, {3.661357004487162*^9,
3.6613570209907017`*^9}, {3.661357089615758*^9, 3.66135710493612*^9}, {
3.661357148109284*^9, 3.661357162793375*^9}, {3.6613572897937613`*^9,
3.6613573291108103`*^9}, 3.661359422393593*^9, 3.661360622647628*^9,
3.661360695006824*^9, 3.661360760280407*^9, 3.661361148692198*^9,
3.66136354957542*^9, 3.6613644893203907`*^9, 3.661366787760202*^9,
3.6613675567689877`*^9, {3.6613692523892593`*^9, 3.661369325865345*^9},
3.661381048954234*^9, 3.662562738131093*^9, {3.662562801972684*^9,
3.662562817291395*^9}, 3.669308951171324*^9, 3.702938981369481*^9, {
3.702941253377392*^9, 3.702941258642933*^9}, {3.7029432985950127`*^9,
3.702943341474098*^9}, {3.7029436113537683`*^9, 3.702943620341473*^9},
3.70294401496693*^9, 3.702987022171027*^9, {3.702987081417019*^9,
3.7029870948429947`*^9}, 3.7029872412291193`*^9, {3.703006572378749*^9,
3.7030065911616993`*^9}, {3.7030066214204893`*^9, 3.703006660902645*^9}, {
3.703009693635664*^9, 3.7030097021528463`*^9}, 3.7030097399079227`*^9}],
Cell[BoxData["4378.234342475151`"], "Output",
CellChangeTimes->{{3.661355400057754*^9, 3.661355484875826*^9},
3.661355639112556*^9, 3.661355814416032*^9, 3.661355846086014*^9, {
3.6613562926598473`*^9, 3.661356320327838*^9}, {3.661356359681973*^9,
3.6613563764858828`*^9}, 3.661356924616371*^9, {3.661357004487162*^9,
3.6613570209907017`*^9}, {3.661357089615758*^9, 3.66135710493612*^9}, {
3.661357148109284*^9, 3.661357162793375*^9}, {3.6613572897937613`*^9,
3.6613573291108103`*^9}, 3.661359422393593*^9, 3.661360622647628*^9,
3.661360695006824*^9, 3.661360760280407*^9, 3.661361148692198*^9,
3.66136354957542*^9, 3.6613644893203907`*^9, 3.661366787760202*^9,
3.6613675567689877`*^9, {3.6613692523892593`*^9, 3.661369325865345*^9},
3.661381048954234*^9, 3.662562738131093*^9, {3.662562801972684*^9,
3.662562817291395*^9}, 3.669308951171324*^9, 3.702938981369481*^9, {
3.702941253377392*^9, 3.702941258642933*^9}, {3.7029432985950127`*^9,
3.702943341474098*^9}, {3.7029436113537683`*^9, 3.702943620341473*^9},
3.70294401496693*^9, 3.702987022171027*^9, {3.702987081417019*^9,
3.7029870948429947`*^9}, 3.7029872412291193`*^9, {3.703006572378749*^9,
3.7030065911616993`*^9}, {3.7030066214204893`*^9, 3.703006660902645*^9}, {
3.703009693635664*^9, 3.7030097021528463`*^9}, 3.7030097399099493`*^9}],
Cell[BoxData[
GraphicsBox[{{{}, {},
{Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwd2nk4lN8XAHCyJBVCWkjSJgnJnlxJ0kIlRciWRItokRBSpEgSfSVJWVKW
hJDk2vd9N7YxM8bavPZd/c77+6eez/M+c+ede88999xT22xuGV5ZwcbGdhL+
IP9OPa1ybL3AKC6VF1pe28VCrby+r3V4RnHgPsuVsT0sFHw+QtBwagS/eWRr
Jt3PQhwjxQI3q0ewxrcYieFxFhpav3ltjMcInlrR3abBS6Bw+94b8fdH8I4d
4tMZqwmk+yu2+svtEWweXh20dy2BPlnJBabaj+Disj0HhQUIZJ6oszrPaARz
n+t41bSeQHVat1Z1yIzg6qArXKu3EejH9WIu/u5h7CRYc/myMoFUJRz3x7cN
Y7sm89RyFQLlNG+4dKhxGJ8JFDOWUSNQ/qHrGdfLhrHCmeQs1kECVfILXi7/
PozrOX0YlocJRE23zH/kN4yX2kuZUycJxLu04DYlN4xD7KK0xy0J9CI1Nj5A
ehjXHgxd2G5NIIErBo2SO4dxjlGb3HkbAq2v/bjn7GYYT+OZSLotgSSi9dqT
OYdxadylCXMHAinpvFG62jGEaTUm9Q63CWQVuH+sw2cIK4e9uX3rMYHcMkL8
ah4OYdOwj342TwgU1jUpVuA6hAvjy+2MfOF9ZTKPJzgO4Ru/M4IUnxLoQI16
jIvpEP40N/Oa+ZxA3Hw6F4QUhrCtyRdpwRACJb28kHuqbxAX61+VefGBQKVZ
WYZaXYPYzvfbebNoAvX1bhw60DaI/RlltlIfCSQi37letGYQR489V8GfCORV
b3lrKHsQ1x5TLumNI5DhOgdJv+BBvNTFLfcnkUBzIe7+GMFzRflIzSwCDYgV
DOuqw/gr1K3nwa3x3Pq1ioNY717qbFo2gdJzXq3r3jOIe0a+RUrmEMiR9jli
QWgQm4a4903mEoi+vzlJaXAAN2sL7rEsJFBtvUxDYvAAtu+8omBZTaBc09sH
DgQM4Pbu+qlpcCIjKyzHdwCPWZ6ND6ghkP+ctmmF2wDuipSlpNcS6IjERTrT
dgBLaT6Nmq0nUPYt3+ltagO48TXDWr+FQDF8PZvC+5g49XUiu2o3gULM0Eq1
LibWMmhSTQL7JERPdbQycc40/5OtPQSy0b5cJ1rNxPki3KYcvQSSdBl88iGT
iUsdfDfnUyF+uyeI+AAmjk75+ZGPAeNJG3Uf82PixuRSt7tgn/s/Kge9mdg+
OOduB9hmnWuctAuMx+1dG91PoG1Hl01TrJhYJj1IbucAgaKTVpb+UGJisf8E
jbmGCRQ8b59+QZ6Jl5JTIy+BvXUro2elmdhILoP/B9iKGuiuJsHEa6r+eVuP
EGirsOD+37xMnDG4Mz51lEBR7mKRxb39WP2Wb5wUQaDIE/tvNz3rxz6+UXlP
Jgm0Y/WJyvon/ThEwX8EgxOrbCRrvfpxmrWAywI451RoY/m9fmx43iz+5hSB
OgxmFfKs+zEz6+qTU9MQP+d+Tyao9ePMoamfozPwfUKtJ+MV+3GuyM2V4rME
2tnMiomR68drwhi/DMCK5yWMonb240+u28xTwIbGjzNer+vH3ibTz+zmCPTS
7Pg9zyEGVtUxEv01D+OL2dS4MxhY6m3MFjo4qstt54NeBt7cIhLMu0CglEtJ
LXdaGFh75kuZMbjakl/ZoYCBZV01Xo2AjSSkguxyGThH224H/yKBOqlazMtZ
DBxSJSejAB62vv3GIpmBu8I637mAeWxbZs69ZeClO6Kr58HBO1gGZ0MZ2Eet
0nDjEoE29HN/NnjJwNxJvkIq4F12qsbHfRnYJdZoxR3wUft3WZrODHxDLTaW
Aa6WyuDXuMHA8ZdWF/8DGw1VX1W7ysC5mt1Wm5cJZHvt7wbFSwws3DYibAD2
uWHtuuc4AxsWN9z7Bu4JsojMOcLAbI/LPcrB6t/N8k9qMvC1EkOCCp6YPs/j
eICBd1l2bhL4SyBrrxPhaVtgvMLf/10F5348lntkIwMzss7xeYA3FutQmwUZ
eOP0wPRLcD0PkppdycDeYTmbM8FaIQeyD07QcXluQc0iODJDvqt6lI4DXbl6
V/+D/d+6j81igI431723EwWnikrpeXfR8Rs7505V8BrNnTfWtdGxn/3fCl2w
vZVk8KcGOtZ6+ni/EXhrnFh7cSkdB4mKON4Eu5VtWjpfQMdOJbd1HoBbh0Qk
Bn7RceXUlTdPwEGy6+xXfafju1Vfv70FD5/hC4xIhPfbfNw1Bqx7Z3Xq3ng6
DkUbcBL4bxbXnP47OmbraK/4DTalrBDrDaPjaAeRlyXgzKV/yCmYjjNXbmyp
BgtuXb7MHgDvP/0osgnseHjhaYgvHYvsmOvvAFdenk3c7g2fVxBP6wXv8puq
y3CjY+lb/7H3/yPzxfjk0Xt0rNrK3TIE7q5kbWi7Rcc9gvz7WGDVPyMH7a/R
cbGnIe8EOJR/yHLelo4VJe/cnAaP7Wc+fm5JxwvpgsZz4FNG9M+ipnTs/bax
bAGc4EKtSjKi43rmufwlMOfbbuLQaTr2t1A5/Bds9YsiVHecjpnOW07+A+d2
t6lY6dBxjlZ8D+mNbC1m45p07PPWeYn0XclGLx81OjaYF48jXa9TFyOkCOMH
6HeQ48lcrS6LlaVji72Rb5fB/s8qRpT20PGw1RfmIpiRWMpftp2OBWyFCubB
WrVFB0zE6ZhT1HXPLDhyLN94aCMdJ2y+JzFFxotgnrubEB27xn+OHwMbKf36
sJqPjqNSk3JHyfgxzi6K5KFjaofE5UEyftx+DOzjoONU5+gIOhk/kWmr8TIN
73Ipu9wDLs77JndmjoaXXu/H7WB3jq/3b/+h4QkVDTlyPR3fWnBbDdLwc+6V
eeR628gJhenTaVhR+TCRBz5h5pEm1UHDn9bMq6eCNcflD4s003BPodOFBPD+
p/11HHU0LD5/UiSanL90gz89xTRMMxf3DSLf7ziHRzWm4ZDEtUq+4H89Wbw5
OeDcMwHuYCbvNqmwVBqWyccyV8EZNpM2JyNhfI70M+rkes59Hlf9j4Zzq9K1
ZMHvgsy9d4XQcLBON2UbGU85Je/Z/WnYVDqYnwd8VjC8PesODc85fH9aD/tR
J+HU1ThHGs5bq9RaAFbVZJ8JcaBhzp74xjSwxLVrQo6WNOyy90DbazCrQMNg
x0kalueZEjUE04zHu9bp0nCtwRhTC9zyJ+76Py0a9qgIvixH5otN/M8oyjQs
Uh56ZzU4wLmvKFiShm0sXRcx5BupbX5qy/N9OD7dQkAULJalXj481YdFljVl
uMD8+sSFdqIPS+xhZycg3824mtxN7+/D0VsnWgvAxfXS3xwa+rD3ryEtW7C1
d92O1oQ+nHnM81Yk5NsLHR80u2P6cOz3x40+4BMKTiaMKHguNzhrD1ZkCARO
hPbhE143AhTJfK1nOMn3qA/7BSRQy8nzgL+l4NjFPrwUc/k9E86LxSiKxc9V
ffjNp+at83DejM1+dc3n7MPCOza8bgczzriHlP2j4hu2Gi1Z4NoVYqUt01Rc
GZladg/8ye7Svok+Ks4v+n2LgPNNT5a6KJ1Dxbcb3m+lwPkX9rs/PPIaFXNm
GQS+hPPSwjXCU+UKFWc0a12wA0sdOG3baEnFwds3TmmQ52lCthzPeSp2WTyU
PDQB+f11QOkdRMVfKyq3HQbvvrZ/6oQwFadc5XYZHCPQ7X0LURPuvVjM9HuV
KAs+3yu1JkmyB+u4e+6TGSTQdgEtbaOoTizvsFfgXheB0qT9r9Ho7XhOd8yt
q45AvSXfJZSVW/G14YDS98UE8jg3r6Mq04qrDdLnXMAb+7Qc1CVbsfeJA0fP
gM8s1X3X5GvFm9tz9nGA8xVY2seYLThQ3EDrWhHUJx+kr5i8acFRAev8DkG9
ZvMg5ovbTDM2dLlkMY8h/3KP1HiMNuPMmX7hVnBEqMKEJ60Zx7ObDKWBG78V
qD+ubcZschajN8BHmL1VAfHNWL0q5RItD+qRc2KsyAvNeEwmbkXTbwL1y4Qp
4MwmLHDVaabqF4GkPeNYg4lN2OTFyPgXsGPdj6+CH5uwX96wkD94zrlV0i6g
CYdzdFTpgHmzNgittWrC0hXb+PKh/pQ/HDFpugrGK/479vsn5I/zHzJmzBqx
8hOF8jaoX/PjvzlJnG3E+X2zOAfMOYdlTug24jXNw9T34KAIaux7+UZMY/8Q
ZQuO7t0WpsPViIVfb149lQn1tkPsvZCUBrz5gnPmZvA6zy/KsuwNOOHg419P
MwjklylVLjBbjyP4Hj93Bi+wPl+cHK3Hm+cHPM3ANMt4j+z2emzVvKJdDpx2
OKZQO7Ue245YnqKkQ73E9d7A2LIe+7id0lEGlx4So6qdr8fCfw7dlASru7xz
FjtZj3cIrsrlA0sOvA3tU67HfhI6VQNpBJosf0O5zlePm68Pp74D7960rYbN
vQ7L+1i95wULPN86VmJXh03NbXbNf4f5XNgiFGBYhxvHn7cMgMu7Nl9cL12H
d5y2iC8B20cL9+/pqMUmoVcFH4O/7uZZNlSpxdnexiJc4JBwbomN22uxzn1R
jplUOO9XcR3p5qvF5Rr7RAbAJ0bYn11l1mCecc1vFeCRlEVhj7AaXKqpmBwM
llEmZOImq3HI6l/tO8F2sl5eP7urscxpwS0bwR928TfWlFXjUS67IF6w4Aa5
+zPvqrGPy/Is8Y1As7OOBcd0qrFIfC4zFyw/9lfIXBaeC1eEpIKvDQbZOW2s
xqYehddjwV3tKavfjlZhV3bn2EBw4U/W+eHQKhyhaytvCV767pnw17MKm8s8
OmIEVvrKtyjoUIXDx289Pg5OiJCNPnioCnvsTXumCH7h7jgc2F+Jy//pfVsD
NjnE8pRTrsQuj/aalqTA/Ch5NhyRqMRuO/lUf4Or9vHtMOGtxM1t17R/gDXF
ZSu8eypwyiOXrjjw9n83hRr9KrChOe/OZ2Dz2eUrTKcKLLBu4ooP+A3xInvB
tALb4g1N7mAeavKl7XIVOJuxuP8WmJX/5/PdtnJcbazMbgLe/fPhgn9BOR5k
F48xBFt9X6v/PrEcuygtO+mDmz7umyjxKsdO/9yDj4DXRPzWoTiUY8P1PDRN
sG6I/n+sc+W4Nd3WUh2c7XNTY4NUOV7Rate9Hzzhthy0V7AcL0TOdu8D773z
og8tleGoO3K80uCoy8l+9vVluGePQ78kuM3sUIdHThluX38+dCtYwKhm76vY
MuwvnesoBn6s86f+p2sZFj5cGycCLtQbPa14uQwrKJzkEwaz6Y/UpuiXQXz5
Rq8j5+/ssP4e1TKcIOxszg/2OD9UHSNZhodPcGivBedcHDwpvrYM8xjIn10N
nr80UBk+W4qZDqPPVoFVbZjHhWileFf53tGVYBe7/vIX1aVYyol2nxuccY1x
jCerFOsc49zHRf5eR3qpz8dSTBPwXc0Jlr9DO7ocUIqTHE2EOMC37vcV33cp
xfFUZ50V4BR36pEJq1JsWlIcxQ4e9eotvHGyFK8w1ZEkLf2k5/CAUin+mkOv
ZQPb+3fnW0uUYgNaWCzp+MAu1MVbinkS9WNIM4I78y5Ml2Dp2uVK0pJhlEMN
vSXYjREuSo5n/bYj92RlCda0WxdGOvp9+8HSjBLsmHhRhXyfno9tOVofSnD9
yOUV5PuKxbeq/XpWgtWR5Axp068t2Up3S/CT936C5O8NT2lWSbUowZQeH2Ny
PlrTmjKlj8Pnf/GUkPMlnNWoFHegBAfVrDIj5/Pcr4aMreIlmPri/iZyvkNw
/YEInhLsanyEjVyP+qK6NOHJYrzCzoKfXK9T1TWpq8qLsUm8brwQ+Hl9tdyT
tGJc+GN6H7n+5c1VKX8ji3FoSVb3RvDR7oqkSedibHdO5Yc4+Elf+V5H82Kc
mdvStY2Ml/6yr4O6xfjUsp7MTjI+WCUJ3aLFWOC1o7YMGR8TxbtNuItxez/b
KnkyPmaK4hvHirD9aqnZA2CVfwWxZSVFOMV/8rgGub4CedHfbxVhA4HUMgOw
o/DvrTKmRVg4YHPFOXDSxtyoeB34vE3oOLnf9mzLiXy3qQhPnHXOukyuj0Jm
uG9RIZY2GhQm96uV8o8NbCmFuPA/5qlH4A/qGW/cwguxa+HVxKfkehxJC711
sxCHBH3tDAWvN0oJvrihEKe6K6z8Dk7bFZBzlKMQGyjmjWWBz8xfZewnCrC0
xunFPHL+orap8pYVYJPJI3dqwH8HQ3tzXApwQmfp6AiY+dBdVqw1HwsevD4n
C/nq8RkTE57CfGyFZoZVwBLblXymkuH5kP+yFti0nNVS7ZuPVdFjn3PgWkGb
hw+V8nFa+MIqN7Dj6Vfhv/dgzOKWZ6sh8+PUidEwdozt7IxH2sC0t5xajh15
+FOnyzQNfIFxf0D8WR4+02ZsNw9GDyyUvQd/4zcH07N3Q34XiNnbrP05Fxdz
7hR4Dk6bKeEv35GDBRY9V12B8ybo66dCzfmfWFfv+5+74OsWXvd+1PzEFFbI
5BPwjlLVzk8uP7GPHbttHPhNWGL8w/JsnN3b2Eyeb26Krw4duJGFo4X1qbfh
PNS+bX49Kj0DT8SdH4mG81R8l5r4ev8MXNun15wBXuxY3xBgnoEjjTI6y8EZ
h+uUH3Bl4OhJ/6Pj4F3rtFcYGadjaqyazxE4z3lTd79dtfgdKzuu8/8Djuvs
fzH0JAWnHK7mMoZ6geIh8uH9gRQc8ZI5dwPMJ34s9SwtGU9EvOZ4DHaxSmj8
iZLxLsETlt/Auv3XNjxfSMROyzH7VkE9MsgioqWdvmA7pfp1BWDpFQvp181i
sUFuo9FhqHcunRXL6Lwcitk+3HvrmUugn7zuLYX3XqM0Jz/zd1DfKdHYxR+Z
fEOeNju4t1TDeTP2a1698CeidGwdsG8m0PGYjhoDk0IkqTfOb9MN+01fkGP6
RxlqXsmWWNVPoJeWbd7yWdVIoLk7aGkU6p1RDcSsrkZarcLzm/4QyPPBp+V3
tGrkv/jBUAXs+Pqm20q+GnR3yqHJGWxQxnG3x7YGxXI2rmKC+eTkrwYK1iLt
I0fUq6D+Dfrrrz94sw4lrPWR9Yf6uMxgy9ozgg1obmPMt3Kor4Vl+0RuizUg
o5mgwl6w1do4idBdDcjD9UTRDHihSkaxXb0BNYv/fbFjCuqL4xpmVpcbkFjQ
vK4XOPiI2RenjAYkyHZVYz/U96aqb4++utCIbNI6ev2g/o/fcOl0ulUjchH7
E/oOPDkjcbHlWiNKUjqlnAoO/JFwY5NXIxJh5B3qAGOF7NcfPzei8JL9FtJw
n9ixr63v+1wjCrp8uLMc/Gfbes/GiCb06dG6+zNzcN64f3QuiG1CIYaqOjxw
f/Fp3nclNaUJ5V8XWd5E9sOe6p4KKmxCIlV1+w+BNUfvbz4x3ISaW0XjfcAv
MymZBWrNyG7H2e+r4D60/2Q0kdrejEblt6zlgfuSR6wM/QOtGYVLDRzaAC5d
zm4NGm1GzOl9F3eBTVMbft9ga0FGB9ac1gH7rOcIlJJqQcqnOFS8wE29V6Si
77cg0/vJxBj43t291i9FWpEnt29REdznRHiJ3AvbWlGGVA5qAGd/SNsoLtOK
NkdofewBL1Wq1ScdbkWGMsLC82CfbXqo8kYrOpMVkSUD98egWtstXEWtyO+H
xWgQWN5W6kF1TStKUrDPjgA3zI80v25vRbFlAg7xYOGddwIlWa3I6YGQ629w
hPujRbSpDd1dSD45DI6Xiupwu9WGgp4WYE24z+rlWStpu7UhWsDnej3w0Lmd
r1b5tiHGbu8S8n4s45WkFx7Rhnrye0ztwGktOVk/StqQSdmeA4HgPJ+2sDHR
dpTPrAhuBFttfDeetasdUXNGOilg9hQLfa/97ehUhQkvnbyvd/Rz8h1rR4qX
RwQmwZVyU3f23m5HeVJNRevgft/WJWBoV96OTJXys46T/YmAK+13G9uR9pnQ
4tNkP0ctx+JxVzvqWdmTdR4c/eby9eixdiSd9v2sNdkfOZP5hLKxAwWbupy9
D6b85V09JNmBwpOFXnmQ/aRky1ezMh1IPL0/8xHZ3+BdFSV8uAN9fbPyRwB4
ocgsy8ChA0l9tHaLAt+4nXro0p0O5HO+aPgTuEeCq/j6ww4k5rvp8Gdw4cOU
ev9XHcjvxuMP38ABKuzDhT87UKS/oyQm+2/9550aijpQinxYQSHYKfTrTG9N
BzIpdNItJfs/4+c4lvs60NzK3ew1YLHEeDEVXgoyvJKuRvbbgi4ufjoqTEEa
IbFcXWA2njN7jMQp6Pm31Vlk/4dhO6/krEBBbA5ilWR/6IKQQa6XBgXZWmfu
ZYLLCz5pB+lSUOCKz7fJflKy+KnTiaYUFMp3M5XsN0nURLf8tKUgVabCZ7I/
F+I+bVbuSEHSWvKPyf4Up/QJWqsrBZUaX9Ih+3Uu7VH2/T4UZHItbXgSPOg3
yZoMpCCJrN0uZP/OVEnv3or/KEjd6wdzBlxNj1wU+EhBEVxGGmQ/TzNk/NHW
RAra+HLRheyXpWrp8sj+oCBTm9g3ZH9PkogI0sAUVF2m+47sr4W+J4RPVlBQ
yKrOJ2S/j/uUzruLTRSUcOfiObIf57oQvs2+m4LSzuVwk/264YQ/n10GKGhu
bjqKtLmxtqzvOAW5ZnCKkf29Oq7/Ml4vUlB7e89D0toZI+qfuDqRQY5H8b//
96e0ClL5O1FCSitBete6sGN4Ezxf2/+PdDgeqqnZ3okk5aKnSPM6ahp17etE
QY5staQ9xF5ThlU6kefuvwGkWZUDVvOHO5Fu1itZ0lYPNAZWnupE2R7pP8j3
k7Ytb2Fd6EQKK2OESE8aGBW3WHciiQvo7PL/452alnujE2VkejqSv99vx42P
Mfc70fB94+vk/Jzhn3v53KcTRQ/jY+T8bVp47On8ohMZWqdwkPNLY/DfNAnv
RObymz6Q/cikundmKKYTxSfPbCLXxyVn94ldKZ2oS/7QXbI/ieLSVdf+7ETK
QvRkcr15gtHuqaJO5PKtp5SMh0a3qvWdtZ1ownoXJuMl8ooxZ2FHJ/L2T31D
xpPdGfpEAqMTWfjc0R8Gz+9crHNZgO+/+9CE7A8XCjzNu8TVheb2f0+igQMX
BZN1BLpQu/5sL9lPlmiQfi64qwsVq4XSyfgf/pXpOi/fhTw62tJbwenx2lep
B7tQpcvKy2R/WtfDVCflbBdSvMBpQfY7Ba4yFcLMu9CSU96XcnDH2dvbPK52
oa/qms3F5H7e/fzv8YddiO8/+5JcMt4bf2b3J3QhgxrzDYlkvPw++rk6vQuZ
flc1iQfvTGgIS8/rQt5NL+5/BGc/HLr9qLkL8SY8PPsfmQ+kNu3bwtaNDF7a
O5P5JEEoTpRzdTeimnHEkf1P57/yvCPru1H4tqrMe+R+atYbyN7bjdi8ft11
INffy/WjkXE3EqMJXyTz25QDZ/BBm24k0LLmoR74t1Gwp+TNbpQT1u95mFxv
6QSzMZ9uJO4oJHaAXL+WtvWBKd2Q587/EgYX7VV5XsTVgyR9JX0bIL9ayBnF
jPP3oOKDj8UqwHMKzrlbN/cgiX0fwvLJ/K6eyHKX7UFLmUMy38ChelvPKRr3
IBOhMdZzsN2VlWJxCT3oU830Tw0wm8MOpaa0HkRTs3NQAEfcOGzA/rsHbfZb
v7AbXHvH3ftSA3xfyDosCFbxIRjrF3qQlkRcKxPOH54Pbcl+J3tRoZ2t0jPw
p09TpRnnexEb++ZpD7BG/DoqzbIXvXF4FeYEdko+KYju9iILFO9qDO74hV1m
I3tRyFhA6Xbw1/bPyJ7Vi+SFLrtlkv/+tCp3MFaPioKutfEWw3k8USZ77ZM+
Ffnr7tmZAc7z+zjywZCKvqZ7ScSS/VXOp6wIcyqyXxTNeQz2/Xd2KtiJisTn
D7keBjOmB/55hFPRaI7XpiyoHz7RhDacH6QiG8+LOc+hvnD86Bdu+IeK2uOc
mS5gdav5TWcmqMjoS/iEDbixu0fs5BIVyXJNfVUHs3d8kTws0Ic2tnO+G4T6
xqoOye5T7UONb5OdNcFbcq8f5fLvQ4rFIQUNUC8Jb1pYcHzRh3jsB9uzwGtc
/FPbQ/oQN/aoeA9ekosTTXrfh8bWqCo7gCkxPeOG6X1o4l+Lxl+o194EnI2K
7ulDtorPpiXAfGYqsweVaGihobxSD+o/7uySpDh1Ggrd+Hp6D3hZ2MiGX4uG
RiP05njBo7VONbQTNHSi7Lhv9QSc19pfY55Z0ZDw5O1cffBT6S1n2gJoiHWs
KExvHOJjYcWX2zQaynHyiN9KwO+jd0x6DdCQ+cc/W/9CvZpfnar5YpSGlp5p
3usCe3+waP48Q0Mycqbp4eB/Ojn/unjpyOrzbQ9+8N+XzheOHaAjkRfDajNQ
Py/tpHKIPaGjUC+1rQnDBJo9+9uiZCcDceqJOr2Detun41u35l4GqtzRt3wD
zGf9yTxbnoEoa40tNMG7nJ6aJh5koFwN8f+oDDh/g85eeHWWgVzQZ6YkOLWy
X//SQwb6qzs/HkUjkMMRvkPTzQwkFclhdreXQJ2KlqI7n/Qj/4uKN1+1w/6Y
V+L3fdaPZKe3njQBj/1ew9Ef1I8kX7EviIM5j+UMx77tR42NjpWJbQSSvbg+
Z8e3fuRxxV6xqBV+/8Mqkx2UfiQz4SYxBPeJXaUqb7bLM5Hfg6kpgQaIf2OB
dZJdTBT8IuliTTmBbBLkInb2MVE7pScpEHx+3mD7HiYT8Wmxmk6C1d+9UJIf
Y6LBPuf3FWUE4urlNdXkHEC1Dl/Fikphv9pxxZjKDCDdM/n5ycUEKr63oPja
YwCJiD49ap0P50cow4RzyyDqyrO2If8/Q4pZ9OdJ1yE0s+9FUkc0gYwPeemV
/x5GcIlWC/Qn0HeLm5LqSyOoi8IqP3ET8gvvEY6f5/+gPIVbEWEnCWTYcFB5
SzgLSW9TKZzaDeflwdUFue9ZyN77nMApcEEs5aR5DAutMNrEE7ML6lvXB9bv
UljIaqvq1OmdsH5bswI3lbCQcD71V5wkgSpuKNDXT7DQzMOica0tBNLi2RPM
dwry+KH1mkqCZL97bnPKWZjnkfVBj9YR6FtnWZy+MezzhZtPagTgvvrN7leg
Ddzru7Mv2/JDPJ2PZfI+gHNdqWLoxRoCZcVsPbQyHt7bW3upjhv291qiLD6R
7CuJxomAd93PM9SFe7HLh8gJcy7Ilycu2fvCvVHvjrT7IAeBbo/DxbSJQHdl
H6JFNsjvZtfEYyAOfPqjeBG4r1jti3YP1AlOLx/4/GOhM+HteY+GCCS1xUmb
5y8L8axIOL4N9s3dwj2RJ5ZZCF+/35wP9zCW9tG3gUssyPe6llaQhwIvfFar
XWQhWSQyTNYVJ74rPuQH/w82roLV
"]]}}, {{}, {},
{Hue[0.67, 0.6, 0.6], Dashing[{Small, Small}],
LineBox[{{-0.6015968154944005, 0.}, {-0.6015968154944005,
2.}}]}}, {{}, {},
{Hue[0.67, 0.6, 0.6], Dashing[{Small, Small}],
LineBox[{{0.42350036015936454`, 0.}, {0.42350036015936454`, 2.}}]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0.964},
PlotRange->{{-1, 1}, {0.9643621390219088, 0.9999999998039273}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{{3.661355400057754*^9, 3.661355484875826*^9},
3.661355639112556*^9, 3.661355814416032*^9, 3.661355846086014*^9, {
3.6613562926598473`*^9, 3.661356320327838*^9}, {3.661356359681973*^9,
3.6613563764858828`*^9}, 3.661356924616371*^9, {3.661357004487162*^9,
3.6613570209907017`*^9}, {3.661357089615758*^9, 3.66135710493612*^9}, {
3.661357148109284*^9, 3.661357162793375*^9}, {3.6613572897937613`*^9,
3.6613573291108103`*^9}, 3.661359422393593*^9, 3.661360622647628*^9,
3.661360695006824*^9, 3.661360760280407*^9, 3.661361148692198*^9,
3.66136354957542*^9, 3.6613644893203907`*^9, 3.661366787760202*^9,
3.6613675567689877`*^9, {3.6613692523892593`*^9, 3.661369325865345*^9},
3.661381048954234*^9, 3.662562738131093*^9, {3.662562801972684*^9,
3.662562817291395*^9}, 3.669308951171324*^9, 3.702938981369481*^9, {
3.702941253377392*^9, 3.702941258642933*^9}, {3.7029432985950127`*^9,
3.702943341474098*^9}, {3.7029436113537683`*^9, 3.702943620341473*^9},
3.70294401496693*^9, 3.702987022171027*^9, {3.702987081417019*^9,
3.7029870948429947`*^9}, 3.7029872412291193`*^9, {3.703006572378749*^9,
3.7030065911616993`*^9}, {3.7030066214204893`*^9, 3.703006660902645*^9}, {
3.703009693635664*^9, 3.7030097021528463`*^9}, 3.703009740183346*^9}]
}, Open ]],
Cell["\<\
Confirming that this is a stable pair of strategies to a slight change in \
either u1 or u2. This would not be a branching point becuse the following are \
negative:\
\>", "Text",
CellChangeTimes->{{3.66135964140793*^9, 3.661359644255671*^9}, {
3.661360589128385*^9, 3.661360602974161*^9}, {3.661360688548036*^9,
3.6613606889317617`*^9}, {3.669332518072462*^9, 3.6693325297412043`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",", "u1",
",", "u2", ",", "nm", ",",
RowBox[{"ntot", "-", "n2"}], ",", "n2", ",", "Km"}], "]"}], ",",
RowBox[{"{",
RowBox[{"um", ",", "2"}], "}"}]}], "]"}], "/.",
RowBox[{"um", "\[Rule]", "u1"}]}], ",", "\[IndentingNewLine]",
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",", "u2",
",", " ", "u1", ",", "nm", ",", "n2", ",",
RowBox[{"ntot", "-", "n2"}], ",", "Km"}], "]"}], ",",
RowBox[{"{",
RowBox[{"um", ",", "2"}], "}"}]}], "]"}], "/.",
RowBox[{"um", "\[Rule]", "u2"}]}]}], "}"}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], "/.", "roots"}]], "Input",
CellChangeTimes->{{3.6613595685591793`*^9, 3.661359584469429*^9}, {
3.661359624203629*^9, 3.661359627019671*^9}, {3.661359665394278*^9,
3.661359709153092*^9}, {3.661360304945673*^9, 3.661360395308395*^9},
3.661369291251972*^9, {3.6693201378589687`*^9, 3.6693201384923553`*^9}, {
3.669320574773777*^9, 3.669320577573996*^9}, {3.702943347266692*^9,
3.702943348324843*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.4966055818589825`"}], ",",
RowBox[{"-", "0.13510145140203167`"}]}], "}"}]], "Output",
CellChangeTimes->{
3.6613596291155033`*^9, {3.661359695178446*^9, 3.661359713074703*^9}, {
3.6613603472719603`*^9, 3.66136035578646*^9}, {3.661360398557123*^9,
3.661360465128694*^9}, 3.6613606227147827`*^9, 3.661360695041057*^9,
3.661360760380499*^9, 3.6613611487260313`*^9, 3.661363550893981*^9,
3.661364489354548*^9, 3.661366790927662*^9, 3.6613675568017473`*^9, {
3.661369272015514*^9, 3.661369325897975*^9}, 3.662562738163818*^9, {
3.662562802037026*^9, 3.6625628173223457`*^9}, 3.669308951521977*^9,
3.702938981565436*^9, {3.7029412534607964`*^9, 3.702941258711276*^9},
3.702943349050715*^9, 3.702943624676156*^9, 3.702987022574361*^9, {
3.702987081762089*^9, 3.7029871032926617`*^9}, 3.702987139946278*^9,
3.702987241694981*^9, 3.703009740258007*^9}]
}, Open ]],
Cell["\<\
Mirror of the above with \[Kappa] = -4:\
\>", "Text",
CellChangeTimes->{{3.661355671688161*^9, 3.661355689015037*^9}, {
3.66933253208641*^9, 3.66933255305709*^9}}],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"try\[Kappa]", "=",
RowBox[{"-", "4"}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Beta]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{"roots", "=",
RowBox[{"FindRoot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",",
"u1", ",", "u2", ",", "nm", ",",
RowBox[{"ntot", "-", "n2"}], ",", "n2", ",", "Km"}], "]"}], ",",
"um"}], "]"}], "/.",
RowBox[{"um", "\[Rule]", "u1"}]}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], ")"}], "\[Equal]", "0"}], ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",",
"u2", ",", "u1", ",", "nm", ",", "n2", ",",
RowBox[{"ntot", "-", "n2"}], ",", "Km"}], "]"}], ",", "um"}],
"]"}], "/.",
RowBox[{"um", "\[Rule]", "u2"}]}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], ")"}], "\[Equal]", "0"}], ",",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "u1", ",", "u2",
",", "u3", ",",
RowBox[{"ntot", "-", "n2"}], ",", "n2", ",", "0", ",", "Km"}], "]"}],
"\[Equal]", "1"}], ",", "\[IndentingNewLine]",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "u2", ",", "u1",
",", "u3", ",", "n2", ",",
RowBox[{"ntot", "-", "n2"}], ",", "0", ",", "Km"}], "]"}],
"\[Equal]", "1"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"u1", ",",
RowBox[{"-", "0.7"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"u2", ",", "0.4"}], "}"}], ",",
RowBox[{"{",
RowBox[{"n2", ",", "2500"}], "}"}], ",",
RowBox[{"{",
RowBox[{"Km", ",", "10000"}], "}"}]}], "}"}]}],
"]"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"ntot", "-", "n2"}], "/.", "roots"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",", "u1",
",", "u2", ",", "nm", ",",
RowBox[{"ntot", "-", "n2"}], ",", "n2", ",", "Km"}], "]"}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], "/.", "roots"}], ",",
RowBox[{"{",
RowBox[{"um", ",",
RowBox[{"-", "1"}], ",", "1"}], "}"}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"u1", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"u1", ",", "2"}], "}"}]}], "}"}], "/.", "roots"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]", "Dashed"}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"u2", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"u2", ",", "2"}], "}"}]}], "}"}], "/.", "roots"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]", "Dashed"}]}], "]"}]}],
"\[IndentingNewLine]", "]"}]}], "Input",
CellChangeTimes->{{3.661355380776771*^9, 3.6613554716473618`*^9}, {
3.661355628776557*^9, 3.66135566700301*^9}, 3.661359412600828*^9,
3.661366794033626*^9, 3.6613692648076468`*^9, {3.66932013994289*^9,
3.6693201416598883`*^9}, {3.6693205591553993`*^9, 3.669320572122107*^9},
3.702943634586898*^9, {3.7029440224162083`*^9, 3.702944026739483*^9}, {
3.7029455643132963`*^9, 3.7029455653153067`*^9}, {3.702987150671851*^9,
3.702987157907008*^9}, 3.703009720224674*^9}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"u1", "\[Rule]",
RowBox[{"-", "0.42350036015936404`"}]}], ",",
RowBox[{"u2", "\[Rule]", "0.6015968154944005`"}], ",",
RowBox[{"n2", "\[Rule]", "4378.234342475149`"}], ",",
RowBox[{"Km", "\[Rule]", "10756.31406848269`"}]}], "}"}]], "Output",
CellChangeTimes->{{3.661355400057754*^9, 3.661355484875826*^9}, {
3.661355639112556*^9, 3.6613556674477453`*^9}, 3.66135581451628*^9,
3.6613558461861362`*^9, 3.661359422423724*^9, 3.6613606227480183`*^9,
3.661360695072857*^9, 3.661360760413575*^9, 3.661361148760644*^9,
3.661363552427513*^9, 3.661364489422073*^9, 3.661366794761784*^9,
3.661367556835826*^9, {3.661369272074642*^9, 3.661369325965248*^9},
3.662562738230153*^9, {3.662562802071294*^9, 3.662562817388214*^9},
3.669308951622385*^9, 3.702938981637085*^9, {3.702941253544346*^9,
3.702941258794845*^9}, 3.70294363632662*^9, 3.7029437266193542`*^9,
3.7029440302966433`*^9, 3.702945219926193*^9, 3.702945566175878*^9,
3.70298702276267*^9, 3.702987081933196*^9, {3.702987146187714*^9,
3.702987158550191*^9}, 3.7029872417793093`*^9, {3.703009721255368*^9,
3.703009740324336*^9}}],
Cell[BoxData["621.7656575248511`"], "Output",
CellChangeTimes->{{3.661355400057754*^9, 3.661355484875826*^9}, {
3.661355639112556*^9, 3.6613556674477453`*^9}, 3.66135581451628*^9,
3.6613558461861362`*^9, 3.661359422423724*^9, 3.6613606227480183`*^9,
3.661360695072857*^9, 3.661360760413575*^9, 3.661361148760644*^9,
3.661363552427513*^9, 3.661364489422073*^9, 3.661366794761784*^9,
3.661367556835826*^9, {3.661369272074642*^9, 3.661369325965248*^9},
3.662562738230153*^9, {3.662562802071294*^9, 3.662562817388214*^9},
3.669308951622385*^9, 3.702938981637085*^9, {3.702941253544346*^9,
3.702941258794845*^9}, 3.70294363632662*^9, 3.7029437266193542`*^9,
3.7029440302966433`*^9, 3.702945219926193*^9, 3.702945566175878*^9,
3.70298702276267*^9, 3.702987081933196*^9, {3.702987146187714*^9,
3.702987158550191*^9}, 3.7029872417793093`*^9, {3.703009721255368*^9,
3.703009740326167*^9}}],
Cell[BoxData[
GraphicsBox[{{{}, {},
{Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwV2Xk4VF0YAHAt1oQkUUqUUiQkSeqVCik+URISQiVJRSGVKGmTSpJKCG2y
pUJy7DvJbjDGzGAsuZJsqb73/lPP77l3znrPOe95KTidsnCZycfHZ4n/0P+r
gXT/v38UMU7Tuij+ewhOTS4PmZyiSLTl75EsdOp7jZU/f1HEpDx6qfP0EGgq
mzr1DFDEb2HFo09/hmDjvKuMqmaKeM2rn2/LR4E+50fF4xSKOJQkbQ/np8Di
evXb9Ycp4vN6QLhWnILzX6+ePJo7RAxmuh85vZyChoY5/fmO30nFXFGlfSYU
LMk7JbVRbpCca++0tnWj4MOJIn7xjn6yVfiMr0AwBQ63NYZbA/sIb2jmV+UY
CibuXwghwCNvglPtVD5Q0CuX32+oyyPDcr+jLqObEgVMa7R4RMznQkw9+n32
vXkdq3nE7IjLjAsfKfBgv4yams8jVsP1cqWfKOBoNCRt4PWSiLsfyvdlU1BT
q/rtbVgvcQvjO29IKHghxpSN7OohH5sLu4PLKLhvC4Kb2nvIinamRhU68FXM
aGtTDxGQddg9r5wCJ4MjXxdX9RAxgfqeKLTiOd7V5x97SG3z6vy3FRTEdYxQ
ibd6iJA137yiKgpikgRLPmzoIaOH11//WkvBUxONM/U3ukl6g6/Q/hYKVswx
qai92k1MHtaa3US/rXRSrLncTYKf7nUn6Ow94XVl3t2kP/Gf6upWClrNxjVz
HbuJf75hyRRa2vLLz1ebuolPmolTRBsFd213eV/q4xKD9uA7KUx8LudUfYHL
JbXWKTWd6Oh2PyXfTi7Z89KJJ95JQfKhpMazjVzi/DQ84RS66rC49vF8LgmQ
22u8lkWBkHPjmOVjLom5cl4ntgvHw93RZ/UuLpGW7xd151LADLV/mr2dS2Yz
PBY/Qeum2ebt3solmgUyf8rRI7/2C3ms5xKJCXHdVd0UOF42iUxfwiU9ub+e
dKL176/P3DzCITPvtooY91Lw9xP/hOkTDpHa8/L7eB8FNoyZcp0POWTl3UBf
hX4KPk7/A88wDqltkGaYoD22TV2/f41DqpyfyD5Dd1QMLWw+xSGGu90ewAAF
OR3NGx12YHmF2f7+gxRcmPXm/JnvbNIU3+PbNIS/f2wv4MBjk2DDHaYTaKd1
8x+actjEWUN7WpaiwMTWP125lU3qwqcH7dAy782+M4vYhB25aHEXOsPpp9Pu
p2xivKs0jT1MwVC+ntmK3WzC1+AvXDlCAfvAj/Z5hmxS8sTekYdu/J5w4p8+
m4Qt+f2Q/ye2T1b8BkObTWRUQx4C+tbprsIwRTYRJYNDaWhlheBNfya7yNRg
omTYKI5fwNcVTa+6SFTsCVvNMQqsWp9v7XjRRTxmqjNN0Caantbc6C6y9Yic
/hG0Flfi9kh4F7npdif2AVrI2OKn2JUuYsdKaxtBJ4s35hsd7CJN8gJab8cp
+B3NsM8S7iIt9Y5JsyYpGB5/45M3u4sU7Y9YLoPmml+4X/qPRbjSw36q6JqZ
ciWNv1jE0E6zYh86zvXQ2pEuFjF5VjHwAm2sxvq9JptFphSFDPSmKHj4pTvy
qRuLaHVt9tz/mwJ7n6hLG11YRKoqyPEoWnn9f851h1kkkntCzRed/SpzndB+
FqmaNLB9imY+uFVyFlhE+r3MzC70KjeNURMpFkkS+nz7yDS2d0VPa7cYi6R3
XNY7i87qjCIBwiyibnaxLBD96I2Q9Mk/nUS/0cg7Fs0KSN6+o66TSHUsX96B
PrN2KnrkQicxlNrQYvqHgtkvjrgpn+4kvOyh/2zRETLVG+xdO4nAlfPxx9Cf
Z8VUlZt3ErnGxdxA+n3GzqkYpU7CUP+Q+4F+P/je/v++MomTvGWf1F/s3/TU
smtFTCLhaK+5DJ192nkwO4tJshuqrVXQnXYbg1bGM8nUqb9bttHvr+9I/ePD
JFbSb9xO0O93KosmKTKJ5M2d+7PQ/noz3kXJMIlBr3tHPnrL41bTG2JMMjo4
YlSBzrO4edd1qoP8/aVTxECXFg9IKtR1EDXRyzZT6BDFovfiZR1E4svJsRn/
8Pu5/HTf3y8dZGLhuJcwukbHNKLtdQcpKRuXlUE3vE2WjbjSQW5OBc7WQkcI
Xc++er6DLOqS+aiLPuBy2PbsyQ7idvyayTY0Y6nEM/ODHSTahk/ODN117/Sy
ORodJCr+PydXdNzQrvzJlR2k9qK7ijvaebeiE08Oyx950nwazZtd/6JYqIOk
J5u3+qOHzmutCmC1k6WBnMB76NQG0TKPpnZiY3jUJQJ9WqP72KGqdqKcvEnl
CXq0/+Eb3cx2cvMszyEe/fvQ+Npfd9tJy2Z97w/onOyvNZxr7SQjYM7ZLPSl
ha9O1V1oJ023HPd9Qc/8Zp2WcrSdMCWq8ovQQjuytdygnXjknjSuQ1fE3G+0
3tBOGmSdjjSib/9xO2ek0k70ri1xakGLf1qcuWJhOzEngnOY6Nr5o9bz57aT
N693fmCh73tWTc6Y1U782o5t56Cl11zc3DnURl5ZXZzDQ7cE72+v5raR6YKL
O/vRjzlrL+Yw2khOzpUjg2gbfYGlb2vbSF1zmMsQWu4ZM/dxSRvReZ2+exjN
nPx4OCSnjUyUDC0YQcdY3eU7n95GlMv2FP1EL5fQN9gX3UZ6mm5Xj6FD1bv8
3B60kSINux0T6AnzwPcBIW1k6eN7UZNop9PLByMutpE9RLt2Cl11r2jFuzNt
xNV6f/dvtHa6y6HCo21Ed9F46zRdX51ARKsdPs9RSv6DFvn5soba20asJ/od
/6K95u8SFDDC8m6Y/6LNXN8Pcnpt5JyqwzGMY8B43y0fTY02MhKz/DPtdC/V
NOOVbYTxMv477SUPq/vsF7cR7dlIdMgHD0VvCez/BYER2iON4ra3+NuIZMNU
IW27sdQHsVMMsqyl3pt2ibRF1SeKQdgWTwRpq2/8ObuGyyCSkra+dHuiDoRv
4bYySFy3XCXd/tk+G85N1TBIxfP+abp/pyKbkiWKGER6QY0YbUbm+d6VWQzi
KfeNjx6PHa0yy7YkY313/9TR45c8mWVt+YJBWowPXaPHV2aR7b3jkQxSu2pq
4Tg6UHe6/PIdBskWZd78hR60eTYzIpBBahiSTHq+rC5s3Zx0nkF45+Pm0fOZ
/6TzbIE7g/hVRSjR862aE5DU4sggMYWTsvT3ENGu0D1kxSDKuxuHBtBuS5yt
Fm9jEI/aJbq99Hrewn9XQ5tBoj9Fp3LRW+0TS41UGER/Zp4gGz3/OU/HawGD
7MuYY91Orw9y4/RNEQZxlzPZ20qvz841b2L+tRKTPnOVJno9LTu5uLqvlQzV
d175il65TWwfh9lK0kX8/1aiwxxTbk/WtxKPFiG7MrRL3I8/SrmtJPGOXHYe
WmzFOdal+63E381oViraZ8dC2YfX8blpUMhbNNs5c+9b/1ZiXcZHJaI/JUwV
NLu2EsbOvsPP0A6rLieob24lAd6hdSH0+jRaxjRUx99L/HIKQmsdy5c+pNRK
hJSohoto4dezQm6It5KwHyWHztDf15oQNzanhdz2XznbBi3/zSFLpbWF9JSc
yrOk1/f5TULeNS3EwuPjYVO6/UX9CYJZLUTE9IiRPj2f9qZdqqEtpOKMec4K
9MV7ktbndVrIK5baTh7ut/0bBxLz1rYQ45NjG1hoK2bhL+HlLcROwlakBa2u
4v3g6dwWwpNbYV+KZhc11+Szm0lS57f0eLTxxNOdoneaicSru7I26A/R3uH7
A5uJv8cPY3O04k4zTvT5ZlJ7KtzOEP373r8ADadm0tRQqq6JTlZxyrHa2ExE
5IVDhdBSh1etj+1qImsc1ZRS8bzqLE5bpq3dRAJ6OBIDeB76W07u0FFtIi1Z
z/KZaJku/eO6ik3EbLODbR3afPpr2laxJjJhs9wkC52nOWRg1NNIrt5/viAY
HfN8jYt1RCPRfnbCfTHayffFa7+xBlL0Ud1mA57ffwUGqv0HG4jmxoYtK9FR
4Zojl9gNpNbozZyF6LqUfN2gmgby952U6wTGD9t7OitvJTYQRtUP6Wz0Cku5
oadWDUTI4uDpTehu1Yea5GM9aQEXM2WMP9ZcShjiva0nZ77VCi9Ae3z98EYy
tp4km4i/m4GeON2k6HqrnsR0bHrLmMD96dPC+XMd6ol0Udb1W2j1bVE/bYTr
iVyuYjUP46ML+59njNnWkdQN1n33MH6ad+m1ttqMb0Tzn3VQLMZrwR+VyyTG
a4mbjYXJTfTU0MuDPwdrScQRm39n0OzDif6ZLbWEpVy+fgc6fduLAoPUWjK7
8VppN8aHFvzPzA4criUe2pkJSuhVsgrVfBe+kr+M65GRGF+qalOqCT+riLtD
rZnZdwqCdnyvzfIpJaP7e+adwnh6wb7ksIMLC8gxr9zpiXYsf6xYvGxFNnkV
leOT3UBBQlv3nb6ryWR2Q+XG0koKDu2Vy2g7Ek7MxsUcywoxXhK50Fjg/QCc
47OtEnNw/tYuqE9RDIePZSbnbqCDzVNqn34NBxlb7mt39L4ITuW51REwJfrK
dD16WGFPwZqOSPDMib6Z/xnX/6YlKfd3RINVU8LPLrx/lb8/vCPtRjwwfy/a
sz6LAr1i1cJVrHhQZbevkEWnNk1ui9ZOgCFRgwX/MnH/mnwAtzgJoPjn6JZK
tDOU6bpseQk33bYkO6P/VahryP54DcvW1K55ive9DewZS69Yp0A7T3DfUrwP
qmUf+KH+OgX8Ls5iCaFX3n9XxJpMAfPlz4N+4v1xTmzShhjTVGC9F5csR0+b
4zY3lApXE7ebeaM7UlNWE410COzadaAug4LnnvZFWz5lwCuV6B3P3+N9zk44
+WFnBtw3WUbdRkcaZzz6LvgBHNyn3vuhw5aJnHhm/QFG1OfcsUIH1H6Y92fy
AySmDFwSRzuqzz2co/cJdL8PnA1Ox/N4+POkbkEWjKXEa95Iw/VXvf3q6Pcs
SPVcK+mLbnpTKZYsmw2Z3a/nH0ffdGlbrnA6G/o/d/nvQg8zpkwFl30Gn+ez
Buagc4s3xdVfzIHB1qu7H6Xi+n2Rr3rndQ4wt9bvv4E+E7Drk2FjDvjnPwm6
gFbafLAqS/ULOP+a3OWAvp3qM/a87QuU7Lp0VQVt8+STifsmAl5TE0VlKXj/
8YFGJRcCBnda531Bi1mVHu4MI+D0PiEoDZ0v0exlwSPgz2fTFIWW2n7hv6e7
8yDSOVr3FP1cg0j5OubB/SmjNGe0x7JZjP3n8yDU6I6pDbrsz01n8Rd5IGO6
bXwn+kJmlG/gVB6UXE+YJ49WfsncelgiH0JmXP20AN3wUHG23sp80NR+FSSK
Vjv7JvTX3nyQHpa6O5WM629t9otjr/Mhr4F4taB3vWitNrMugIgB/jtP0MPX
kl2LTxaAuXJpXjg68ljQv81BBTC1NmZRKJq3dq3G6uQCkGR06V9Bh2QGhM+a
XQgCLY8OHkerP9m/1k+2EEq0RPOOoFsurikZVisEp/UrTe3RytsbxjsOFoLn
zLA2S3RZ9SrbzJRCCD2wsFIf7Zk6/VOtuBDChx8e00PLPPh2O4FRCMnrt63V
QR+zvpB7n78I4lceVlVHS2w2PyC8uAh2GI64qqIzlygNX1YvAj1qpEwZLcSp
UThpW4Rxvf8sRXRq8YtsjmcR+A2taF+Ktn7lY2kTXAQTY77ti9F8t0wHa58U
wZ75t2bLol+dVLxmlFYE1jFH90mjzc3Hl+SWFMGajqVV89ETmlUftdqLoK6f
nJiHNprw5ikIFsNt19+Kc9FDDJMrkXLFkHf5ve4cdMQX+UXimsXAJGF+wuit
MaPp14yKQTI1li2I7gks3z1tVwxl2aNnBNChLtHcM2eKwV0lUoUfrW189mLf
9WKwU4sSnY1mrjGWdnhWDBm1QtKz0MFzl6Q0pReDGt+I0Uy02vAPI9OyYuzX
kbgZ6Ka6ElZhRzFkyp9Qon3pwxNf3Z9Yv6n0Nz70ykhPyTShEmi6ciaBdo3f
zrerlpZAuuidONrnDi3aEb2+BOTkzpbRXqpPtUvtKgHlXI2FdHklikXet+xL
wIHVGErbg/+x2EyvEoj+z30d3R5p3smXPjdKYPTTjEnauRUG+lR0CQTExw3Q
7Xd9t7DVJaME9C/bCtL9FQsbPN1eXgJ/w3T20OPx8Uy+iGVnCUjOMMymx8t+
f8SL8tESsG+8u5ceTwGdE3r6IqUgMKIgSY938iL9xo/ypeAuKzQtirb6I+Wx
dkMpDA2Yiouj/3b2CcSblAKz9+9uev4SC3KfL3IoBYPjK9Pp+TVLeKBzz7sU
Cl5/3UbP/9j1Y98Eb5WCXx7/bxn0TlPJWb8+lEKg/I5++nsKdRT+MVleCtLH
C3sV6O/fm6/zb0cpnNO5I6yEdoseyhYSKAMxBcVsFfT79O5XcxeVgXv9H+N1
6OmS9ghJtTL4uGXntCZdHlVxRs6qDNS3b6zVRTfPKnBQcCsDbvSP4a3oZTJZ
ZisvlYHV+o3a2+ny9F+uUU8sg4qDgWp76PrvBbG3j5XBcGNP02G0QqJfrbFI
OawZLpdzoduTfTrXdGk5tEufue5G188+HHXAsBzE7FUrven3tfQsTkSUw6jL
X1F6/bsZr9f3fFMOuZvzfOn9IcNujZp3bjk8ZfrOofcPw2syIpd7yoGvdODZ
K/r9ptH8+9oVYGftermYbl//QMojkwrgiwySqqbr+8t+9tS+AkyWFtU00P1d
9c03MbgCLK4XpHPp933eaWQ3VUAipb1JAPez6UWusV3nKiHywNvt5uid6w7d
7blZCVoKQmvp/TJ0+76LA9GVcC6gbDO9nyq4Gxz8VVIJko2Xy33Qhl+WzhNe
WAXBWVKJL9B3DzcHqH+qArZNtQsf7u/Bg3rQU1UFQ5eXp81FX/KN+/OEXQWi
TZHKi9EeD076CYpVQ3Bu9xNttFnpLC+mczUMCsqHn0KLrVM/eluyBprK11T2
oQVyHioZKNcA3+3nLZPov8a/OeNbamBkUl1SBM+nIacShyPHayAgK05YBV0T
YWejm1cDN82uCZ9Ch/4NMeWd/ApjtgUm/9DBt4bmRAd9hYYZpTKSeF5ektlX
Yfn4K5hHfZBUQntoyhuRoq8QsGLLzd3oVe9tllXOrYUyIafrUWjB3mHZOOda
UFyam6GP52+p2ZK55pLfoOYNN/Ednu9Sal3SZ+S+AcO5xLAI7TA3YVn4ym8g
c05MtA09Vamq1aL7DaLMkwSEMT5Q3aVn63DkG5hFSHx2RYdtt33tmfENqsQv
LVyN8YaNzuOd96zqQEx+g1k5xieJCw/9996hDtQH3lzjon+OLTvY6FYHXiyR
rn/o2x9eucteroOZ281mbcT4hmhmPoh9iR7fPJqIXrG2uSttog7Cq3t872C8
9F1hwaW6qHoo2pz81AvjLZ0Lsafz4+tB8nXfvQfowIa1LqnJ9ZBjdfdlOlr6
uuGe0IJ6eCNctf4Heuvg+UUm/fUQBpzqUxi/3f3I+Ji/qQH0HmSPnflCgcbu
GCq1pQHqFh8JCiMUeHupON6VbgLzHqbW8iIsT4TKsVJoAj+d5w170JnP02WW
qjZBboj6g3Po6YpNtUnbmiAse5V7BTpQwRgq3JuA+3n2jbPFOL81zkv4C5vA
YfNFk8oSHB/l6Fa/U82g63Mp9245rvd2CQvXshbIvbBtodNXnA9fvV7BPW2w
9MA1kREGBYUqG28W8jMhyXdg6FUv7ofr9r34Ic4E5qd9G5p76fPpdI78IiYw
DAdP8PNwvnTfDl1QY4K58fFXjuhwY3lLrQNMEKvr2i/bh/uvi6BcwismeO7U
0bvWj+fn8+Z3wbs7wfk/oV97MN6OixstydjfCVwzsRc+aL3EeSz24U7Q1OJo
x6M93+2WBK9O0Hd5JvYb3fqZnBt/is9jiNfLIQretLyEY0OdEF38X80UheeN
cA4v3pgFUjrOW29gvD9SquYWZ8oC5/WURio6Nzh24LkFC5ZJuc5oRlvNvj4U
ZccC/9I0zRV4f7j2b+9omCcLYsQGG3LQ3F+9//wjWZDnElzWM4rtZc9fuJ/H
guSuzd2L8P7iERscafGdBZLX0uP10LoOk7LmIyxQPeGjZY+u62DK7Z5mgajO
qcIY9IzW14rbJLpgZdKx8OV4H3L4CmprdbpAVaUySR7vT0tyTuzkD+mCkqNH
/wzh/UtKdmrK404XBPAnmoni/U30XEhqy/0u+Dhj1sHV6Ol1CYuTnnWBO/A/
ckIzXjB/WLzvAq7Tw9ff0BG39kbHMLsg1VbjPZ2fDeV1Wopwu8A40O9ANvra
Tg9hr74umDA5k0TfP73+3fQyGu0C51ZD15l4f7U4W2QyJMwGz9+OIvZoMduN
45s3sCHs5q4ofrzvCmQWJyXosqHB2khIFv1Hap+TuD4bMkrXL1VFD9Z4VrNN
2MB39xnsRVcYvHlxw4ENYycFdj1CFzzXOfjThQ2jctU9L9FZ0yVih06wIdNq
tnIm+tVHjq/6OTYMn7h8vxl9fc0S8+ZbbNjx7P34PDp/cv0t/7Z7bEi0FI2V
R5/jbvr8JoINUme396miXaOtVl6KZcMI74+lIdr+N7etNxE9au1tgd5vffbe
3iQ2SDRuW29P55ckw6ZXfGKDyJzjgV5ovVNL00Nz2KD50F/yMnp9VdLRiXw2
CNiV6d1AKwaX11VWsSE1IuXQU/QizoGQDXVsuP1liWUCep5+z5bnzWzQu36c
9Q7NNzXz9Rk2GwLHN+fR+VAHTuvPy71sKLny4xGdD82rSt16Z5ANDrf7JOn8
zrKP129E/cD2Tr9U/4YOeG7f8HKMDXb+qcN0fogVskH+w282RJ0LtqDzSfpn
RN0K+DjAXvRufxedL7TlZHzl58BT25eT3eh/O7L/tYtwwH5ofAud/7RXu2fS
L86Bnt0KinR+K3fhsYfjUhxYmZqQ8AO9dAawZi/igMEiwbJRerz7F6hIynPg
6p7SEDq/xqwf9JZfwYFjVUd76Xzc1i+FeaqrORDDPs6h83XRiVFzdNU4MBZl
5k/n+/7ePW1ltJ4DXkURaXQ+0N7XOHafDgeMfxQE0vnCXCf5QcctHKg9Z0nR
XrpnTPuUAQdCTpaN0b60ofqKvxEH1qTFRtJmLo2vurGHA2Es+wa6vK1CFxY+
2suBzEOXX9P1Rf/Y6xRvxYEq08CFdD7xD0P5XZot9u9xzxI632pX9G8814ED
ugNrcuj+5LxrMqhy4cCr9OofdH/lHr270+rGAR0F01x6PPwDrrb0nOJAncoq
BXq82o/bLh/14sClm62y9HjqWWp6zPDD/mV2vaTH+6mecJbYZQ5M/cypoPPT
00qsWXJXORC4lXelja5f/JPZ6hs4P3asKjrfnTNx57F2KAeGGhXe0vk+/8rN
6/ZGYv/LTssX0PVlSPrZP+PAm2U+Gdl0fdF9RSfiOFB27xMjnc7Hez6yCU7i
QDqzpiWWzmfbeCQ8SOOAVPrTlEh09vadwzEfORB15+6Cu2g/6Z/XPudh+95V
3/ZDT302SxtuwPn0/ie7h/59gtL0n1YOZCzYbQv070OnDed0ckBuXcgqTbSv
45t2pT4OSF/OtJem89sCAkK2fzjgISOxqRXXq/Vwu8WxmVyYnSZYWIbObH3/
zFuQC7yf7+o/oX2SHNeHzeOC4Q1WcDh6fO8X+2IlLuiIlCoZowNbUzq2qnDB
vcl1CZ1vE3OMs8tU50K2v8eVxeiVntdt3m7mAiuKujWI+9O+0L1W9/Zi+Ze2
PrqOZi3Y0ShygAuJlfFMd/SJZ9r7rtpxIaCHeXsvOjBpscX5o1xgb/67SBad
WtFteugiFwLbVvTH4H6oZ9FS1RTIhQb7o/uuoEtbK3abh3ChPahB3hHN5KXs
2v6AC08bLJuXokUF/Xaufs0FyZHmjPu4/x7fLrblVwMXfIrdQmxxPx+t4Mvx
YHBBJntGigY6wOKnLq+TC3JHNFQE0ZGOLTpt/VxY88lNIRXPg5LLcVr5fN3w
Zlbc8CSeF4o52qp3VLtB6Cd11h3Pk+Ttq98KaHaDiMXWJxvRmyoXrwnY2A36
RltFZ6LNGXzKZw26IcDHtCx8DNfPRMXyg9bd4Fl+6kHaLwratA4vVrraDVpH
WBWleN65Tm4Qv3ajG5LfSDmGoIe/iM7qDu2GwZHSzcbo2UbZ/fGPu8FP6/Pn
Yjw/1Q4uyF6R0g1S8erfPv3A/lystF7B6IaG2+uSzuN5LGIQt+dqZzeE7QnS
UEU/FPDV53K7oUzNk+qkz++7K5XjqW7wqJaQ3Imuj70yvpy/B4KLNnfw43m/
smRjxHL1HtCXfs5ywPgh9abYzaANPWBw0jJcCK37X/dFjm4PiL0+7pWC8cZ/
LfddXuzsgT0lcR+nMB7x6f+utdy2BxbtCl57HeOXSrH4esXgHhjSmthwnovx
xQGJeYrtPfCmLHpVcgcFTq/WRSl19QDf7H+ftqH3T5otX93TA+YHVPwa2rG+
J3c2qA/3gHaiwb3xNgr4O0Vsts7uhTCnpvH1GD9FufK/sFHthT3/zZt3rYmC
Iu8prQf+vZDxzDk7qAbvmyWyuRFXemG4FDZOV1PweuEmo6jgXqg5vaX2LDo0
6/zB2LBecPjcaulQRcHBP6MXU+J7If2dbKhaBcb3V6mSyqpe0PT9pfEc4z3Z
cK717CU8MEmQ3F5Fx6tB8tJeijxoyPzdL4O2OmNTz1nFA7cNG92dsym4b15r
WqjJA7lQamwc41/RuTkGgcY8OGd3YP48jK//XnugyufFg4kB0wgRvF9wzxvw
TVfwIEOsVFHqBQUzj178cqKWB2rcKAXdODyfrDL92hp5IFa+r80+loJDWmq/
slk8SE68fyH+OQVNw7L9vmM8iNQptVz2lILy4z/qxxX6IMJRP7g1HL9f25iX
P336wOqs1LjJNQq0mpdPCVzqg+kdY7kHrlLw2eLlnkVBfTAR++y/I0EUlO1K
/qF/pw9i4jil565QwNmYszk0tg+kUsumQy9SICPV8lW5og8EZHKzg7xxfVeJ
Txxa3A/O06W3fJzpv9c/MDm9rB+KDmaW2B3B+LxQ+tlVpX7Q2fg3GZxwv85e
YvB2XT/oqvNfneFAwadXKrcntvfDiInRKm9bjGeuGi174N4PJmte3lpsQcGB
LZeNy770w23DqQD7rbg//+oRLyjoB6/wuGVLtuD3lGzW/Lm0H3r2LzzM2EyB
u/xS15Rv/RDiyMsw34Ttm/ElKKK7H25+e/FWVQvHo3gq13nuAOhcXMMXuxrX
m9m5DTMODUB4yDVB7/kU3BRgTk85DoDn4b4yfkkKxMnOolHXAbCS9BF9KIHx
h/oCS57nAOwJPSadMpeCdZIZnl+vDkDMg/zF3wRxP2/68fZZ0gD4NLnKVf0e
gjT7k4q60wPgtk7c8RF7CJw+DC+JmTEI6SI5S+pZQyAl6iUrIDgIFtkWv0Q7
h+Bclp9E3bxBsDtiPOzXNgTZbpsWxy8fBIM71vZBjUPwP94NfTY=
"]]}}, {{}, {},
{Hue[0.67, 0.6, 0.6], Dashing[{Small, Small}],
LineBox[{{-0.42350036015936404`, 0.}, {-0.42350036015936404`,
2.}}]}}, {{}, {},
{Hue[0.67, 0.6, 0.6], Dashing[{Small, Small}],
LineBox[{{0.6015968154944005, 0.}, {0.6015968154944005, 2.}}]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0.963},
PlotRange->{{-1, 1}, {0.9635636179631677, 0.9999999998618765}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{{3.661355400057754*^9, 3.661355484875826*^9}, {
3.661355639112556*^9, 3.6613556674477453`*^9}, 3.66135581451628*^9,
3.6613558461861362`*^9, 3.661359422423724*^9, 3.6613606227480183`*^9,
3.661360695072857*^9, 3.661360760413575*^9, 3.661361148760644*^9,
3.661363552427513*^9, 3.661364489422073*^9, 3.661366794761784*^9,
3.661367556835826*^9, {3.661369272074642*^9, 3.661369325965248*^9},
3.662562738230153*^9, {3.662562802071294*^9, 3.662562817388214*^9},
3.669308951622385*^9, 3.702938981637085*^9, {3.702941253544346*^9,
3.702941258794845*^9}, 3.70294363632662*^9, 3.7029437266193542`*^9,
3.7029440302966433`*^9, 3.702945219926193*^9, 3.702945566175878*^9,
3.70298702276267*^9, 3.702987081933196*^9, {3.702987146187714*^9,
3.702987158550191*^9}, 3.7029872417793093`*^9, {3.703009721255368*^9,
3.703009740607922*^9}}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",", "u1",
",", "u2", ",", "nm", ",",
RowBox[{"ntot", "-", "n2"}], ",", "n2", ",", "Km"}], "]"}], ",",
RowBox[{"{",
RowBox[{"um", ",", "2"}], "}"}]}], "]"}], "/.",
RowBox[{"um", "\[Rule]", "u1"}]}], ",", "\[IndentingNewLine]",
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",", "u2",
",", " ", "u1", ",", "nm", ",", "n2", ",",
RowBox[{"ntot", "-", "n2"}], ",", "Km"}], "]"}], ",",
RowBox[{"{",
RowBox[{"um", ",", "2"}], "}"}]}], "]"}], "/.",
RowBox[{"um", "\[Rule]", "u2"}]}]}], "}"}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], "/.", "roots"}]], "Input",
CellChangeTimes->{{3.6613595685591793`*^9, 3.661359584469429*^9}, {
3.661359624203629*^9, 3.661359627019671*^9}, {3.661359665394278*^9,
3.661359709153092*^9}, {3.661360304945673*^9, 3.661360395308395*^9},
3.661369291251972*^9, {3.6693201378589687`*^9, 3.6693201384923553`*^9}, {
3.669320574773777*^9, 3.669320577573996*^9}, {3.702943347266692*^9,
3.702943348324843*^9}, {3.7029452427529297`*^9, 3.702945324447315*^9}, {
3.702945502452323*^9, 3.7029455178284893`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.13510145140203078`"}], ",",
RowBox[{"-", "0.49660558185898274`"}]}], "}"}]], "Output",
CellChangeTimes->{{3.702945305244828*^9, 3.702945331439674*^9}, {
3.7029455034360437`*^9, 3.702945518471486*^9}, 3.702945568909153*^9,
3.702987023220113*^9, 3.702987082540682*^9, 3.702987164514831*^9,
3.70298724225675*^9, {3.703009726706091*^9, 3.7030097406749687`*^9}}]
}, Open ]],
Cell["\<\
Skewed competition function with \[Beta] = 0.6:\
\>", "Text",
CellChangeTimes->{{3.661355671688161*^9, 3.6613556989663982`*^9}, {
3.669332676948182*^9, 3.669332718386448*^9}}],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"try\[Kappa]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Beta]", "=", "0.6"}], ";"}], "\[IndentingNewLine]",
RowBox[{"roots", " ", "=", " ",
RowBox[{"FindRoot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",",
"u1", ",", "u2", ",", "nm", ",",
RowBox[{"ntot", "-", "n2"}], ",", "n2", ",", "Km"}], "]"}], ",",
"um"}], "]"}], "/.",
RowBox[{"um", "\[Rule]", "u1"}]}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], ")"}], "\[Equal]", "0"}], ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",",
"u2", ",", "u1", ",", "nm", ",", "n2", ",",
RowBox[{"ntot", "-", "n2"}], ",", "Km"}], "]"}], ",", "um"}],
"]"}], "/.",
RowBox[{"um", "\[Rule]", "u2"}]}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], ")"}], "\[Equal]", "0"}], ",",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "u1", ",", "u2",
",", "u3", ",",
RowBox[{"ntot", "-", "n2"}], ",", "n2", ",", "0", ",", "Km"}], "]"}],
"\[Equal]", "1"}], ",", "\[IndentingNewLine]",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "u2", ",", "u1",
",", "u3", ",", "n2", ",",
RowBox[{"ntot", "-", "n2"}], ",", "0", ",", "Km"}], "]"}],
"\[Equal]", "1"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"u1", ",",
RowBox[{"-", "0.4"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"u2", ",", "0.6"}], "}"}], ",",
RowBox[{"{",
RowBox[{"n2", ",", "4000"}], "}"}], ",",
RowBox[{"{",
RowBox[{"Km", ",", "15000"}], "}"}]}], "}"}]}],
"]"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"ntot", "-", "n2"}], "/.", "roots"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",", "u1",
",", "u2", ",", "nm", ",",
RowBox[{"ntot", "-", "n2"}], ",", "n2", ",", "Km"}], "]"}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], "/.", "roots"}], ",",
RowBox[{"{",
RowBox[{"um", ",",
RowBox[{"-", "1"}], ",", "1"}], "}"}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"u1", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"u1", ",", "2"}], "}"}]}], "}"}], "/.", "roots"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]", "Dashed"}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"u2", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"u2", ",", "2"}], "}"}]}], "}"}], "/.", "roots"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]", "Dashed"}]}], "]"}]}],
"\[IndentingNewLine]", "]"}]}], "Input",
CellChangeTimes->{{3.661355380776771*^9, 3.6613554716473618`*^9}, {
3.661355628776557*^9, 3.6613556384935837`*^9}, {3.661356268253724*^9,
3.66135630436094*^9}, {3.661356346044685*^9, 3.66135637603677*^9}, {
3.66135690781993*^9, 3.661356922891614*^9}, {3.661356968997313*^9,
3.661357020360539*^9}, {3.6613570849118032`*^9, 3.6613571042532988`*^9}, {
3.661357142984558*^9, 3.66135716043009*^9}, {3.6613572890046864`*^9,
3.6613573276905127`*^9}, 3.661359410020193*^9, {3.661362592027089*^9,
3.661362642928392*^9}, {3.6613667973065023`*^9, 3.661366831756469*^9},
3.661369270005904*^9, {3.6625628003583593`*^9, 3.6625628137249947`*^9}, {
3.669320142742897*^9, 3.6693201445932007`*^9}, {3.669320541686845*^9,
3.6693205562223883`*^9}, {3.702943835820408*^9, 3.702943839347892*^9}, {
3.702946071375264*^9, 3.702946075430245*^9}, {3.7029872054220123`*^9,
3.702987216639627*^9}, 3.7030097292165422`*^9}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"u1", "\[Rule]",
RowBox[{"-", "0.44444578872920065`"}]}], ",",
RowBox[{"u2", "\[Rule]", "0.6716550549590458`"}], ",",
RowBox[{"n2", "\[Rule]", "4344.437649615975`"}], ",",
RowBox[{"Km", "\[Rule]", "14491.895229742673`"}]}], "}"}]], "Output",
CellChangeTimes->{{3.661355400057754*^9, 3.661355484875826*^9},
3.661355639112556*^9, 3.661355814416032*^9, 3.661355846086014*^9, {
3.6613562926598473`*^9, 3.661356320327838*^9}, {3.661356359681973*^9,
3.6613563764858828`*^9}, 3.661356924616371*^9, {3.661357004487162*^9,
3.6613570209907017`*^9}, {3.661357089615758*^9, 3.66135710493612*^9}, {
3.661357148109284*^9, 3.661357162793375*^9}, {3.6613572897937613`*^9,
3.6613573291108103`*^9}, 3.661359422393593*^9, 3.661360622647628*^9,
3.661360695006824*^9, 3.661360760280407*^9, 3.661361148692198*^9, {
3.661362595113431*^9, 3.6613626434369926`*^9}, 3.66136326637789*^9,
3.6613635531441307`*^9, 3.661364489454585*^9, {3.661366798646145*^9,
3.661366832314844*^9}, {3.661367556869445*^9, 3.6613675766392927`*^9}, {
3.661369272108698*^9, 3.66136932599811*^9}, 3.662562738262789*^9, {
3.662562802107106*^9, 3.6625628174230967`*^9}, 3.669308951647607*^9,
3.7029389817049923`*^9, {3.702941253629098*^9, 3.70294125887831*^9},
3.702943738004327*^9, 3.7029438399956284`*^9, 3.7029455805099487`*^9, {
3.702946072674519*^9, 3.70294607590972*^9}, 3.702946908271244*^9,
3.702946939124256*^9, 3.702987023307095*^9, 3.7029870826151*^9,
3.7029871680687304`*^9, {3.702987207153417*^9, 3.702987242345682*^9}, {
3.703009730118476*^9, 3.7030097408031273`*^9}}],
Cell[BoxData["655.5623503840252`"], "Output",
CellChangeTimes->{{3.661355400057754*^9, 3.661355484875826*^9},
3.661355639112556*^9, 3.661355814416032*^9, 3.661355846086014*^9, {
3.6613562926598473`*^9, 3.661356320327838*^9}, {3.661356359681973*^9,
3.6613563764858828`*^9}, 3.661356924616371*^9, {3.661357004487162*^9,
3.6613570209907017`*^9}, {3.661357089615758*^9, 3.66135710493612*^9}, {
3.661357148109284*^9, 3.661357162793375*^9}, {3.6613572897937613`*^9,
3.6613573291108103`*^9}, 3.661359422393593*^9, 3.661360622647628*^9,
3.661360695006824*^9, 3.661360760280407*^9, 3.661361148692198*^9, {
3.661362595113431*^9, 3.6613626434369926`*^9}, 3.66136326637789*^9,
3.6613635531441307`*^9, 3.661364489454585*^9, {3.661366798646145*^9,
3.661366832314844*^9}, {3.661367556869445*^9, 3.6613675766392927`*^9}, {
3.661369272108698*^9, 3.66136932599811*^9}, 3.662562738262789*^9, {
3.662562802107106*^9, 3.6625628174230967`*^9}, 3.669308951647607*^9,
3.7029389817049923`*^9, {3.702941253629098*^9, 3.70294125887831*^9},
3.702943738004327*^9, 3.7029438399956284`*^9, 3.7029455805099487`*^9, {
3.702946072674519*^9, 3.70294607590972*^9}, 3.702946908271244*^9,
3.702946939124256*^9, 3.702987023307095*^9, 3.7029870826151*^9,
3.7029871680687304`*^9, {3.702987207153417*^9, 3.702987242345682*^9}, {
3.703009730118476*^9, 3.703009740805496*^9}}],
Cell[BoxData[
GraphicsBox[{{{}, {},
{Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwd2Xk4VV0XAHCVVBSiaFBJlISQVJJVUqR4JUkpIUlSr4SEJCQpMr+SKEMR
IcnMlohkTOb5Tq7xyFAIfet+/9Tze+659+yzz95rr7VstvjX4PJCLi6uc/gP
5/97LDfFucoBsmpN+kj0ixEwe6I42urZT2h3mac0BkZgKtjVlwCbaOwLMtiy
g4I+sU8DR1XZZLb2UNFWWQqaXvPo1iizia/6oP12OQo+5AWt7NzOJt/XlGTL
7qTgBu1N5Iwwm5Rmfvggs4sCuuKPlN3sPuJx1yycez8FNXWy9cmBfSSdXBJR
1KEgjr9rbUQvi/gWiEY6WlEQbAJL9nWwSPBIh7/2FQo8E19OtDaxSMl8dts6
awosNC7Vrq9iEeVnxzwKr1Ig4cT2jslikZqfK//O2FIQ2zlGvX7MIqEbVg4b
3aLgZcqSLx93oyvjnofcoyBKR9G+4RGTWJ+pHZQOp0CST6eyzptJeB71DZSj
k79ZSNTcY5LUksvmVv9RkHci9HuFI5OUFK39+CqCgla930pF5kwy8n3Jn5XP
KRA5VTieuI9JBnKMN7bGUPDU5Jijez+DaJ+6m7YwCT8Xs6h2ZTCIiGZ0RyA6
usNF6k43g8x6mD/Y+JaC1AspjbcaGSS4yFhnbzIFVRcFVK5+YpCmS/UJl99R
sNSy8depZwzyUlnj05v3OB+25s7bj+H12oXulbkUdAWYRuUdZpBfawNmDfIo
UH1vUnxcnUE8hBn0NvTY5OmlN3YxiL1aI8XOp8D8nk5ExgYGabEvXzBfSMHB
4F05+8foRPLvyO7lJRTMZy+e0n1OJ9ENGyTyvlJwrm2hWHcYnVRmhW5XqKQg
a/Yv2AXSyVbWmZcJ6BuHZh4GP6CTNf73OgK+UdBZOSLa/C+dRCTeDT1XTUFB
Z/MeM006EWpJlW2uo8B10dvb9sM0sirQ9YRVM37/mSmPGZtGEnUY45/RFjuF
w3TpNDLz+bLE5hYKdEzcMqRbaYSn8OTqNvSaD3rDXaU0whu+7czRNgoyLcYt
jkfRSIBr/vWlnRSMfFLTkzxOIxEyslzKNApoZ352rDxKI+JOJi2e6MbhhGt/
D9JIado7tXp0wVqBR20qNHJwxPStLZ2Cxzd7PwdK0IhYn/3GaAYF0pt99s1N
95Lzzo7+gyycP49ayabEXiJr/y5JcZACo9YY9c64XkK78G3lTbSOkp0xI7qX
pIwGCKSjlRmCT8ZCe0nerddVskP4PrUNxvnv9xJ2t8PJzcP4/gUaP2md7SUR
a6ITf43gfrBOaNcz7CWjV1vu7qQoiPjkOHn6n17iY6g6eAV9/5bIdssjvcS+
SORpM9qw+UyghyKOz+nl3/ejFPyJbjPNXdZLKqf83pwao2D091vnYm4c34yW
kA+aoe8aXP63h3Rx5YjmoGsWin1pnOwhEmqnx9eN4/6xuiA31ttDjBwWjbWj
teV7/sjk9RDL+COKxycpCCtkRkTZ9JDQXXOt3b8pMHWOdN9zuYfcWKO5ZdkU
zteufyy/X+whL4Nt/yii8xJzdi493UNozfvOeqK7Qh5/uQU9RMf4Xd2GaQq2
2ShO6KzqIbGxpl0wg+OVZLUy+XuIyOv1Oy3Qud2RxGNZD/GV2ijkjf7v7VKR
63PdREaj5ukXdI9H6mHN790k/FDLv0f/UGAvNxM95tpN6pISxhRnKeCOu2Qj
fbOb+Lncuq+LDl9TvdvUqpukDP1KsEbnL3pZ9VW/m7RYzKa/4FzfdmTmpVQ3
yRoRblw4h9f/k1bWtK6b8Na+FF2Pli5bE7RcsJsUdMf8VELrpg9uc57pIvK5
DbbmnOt9gk7/U4sekPfJ5Vw/OyP+oLSLiD+76leDzrtpOZSX20VaJhq30dHd
5/d4bY3vIvYnJHfyzXPmrzN9zrmLyO4qcjSa58zfUbddN7qIRmrKMWv0iY3p
WlcvdZERpac5d9A3l3l1/dDtIhsvClk/51zfLb08RaKL5NEOrWpDu6kteBe5
pou4b71U3Yc+8KxV9xF/FzlRvVJhEl1s4PfUaqaTWHDVjfH/xfiSZqFwerST
ZP3df2o9WnP5/vrDrE4iqT1yYRu6vGxQaPP3TjI62WWvjvaVKP0gUNFJ6gRd
7h5D69yLMpwvxO93r9pliK7ZqxventRJVC8uemmN/pGcujb8Pn6+uu2BPzp8
6cM879v4e+W+w2HoM5cvmty6jtf7Jy+IRrdtFHyhf7aTSK9bqvAOHeXKPgD/
dBKHczE6mWjTluIuuSOdhCfmslA+ujfopjifYifpuKv6thwdO3Ls0/RWfL66
1y7VaMvjEhZssU4S+9/c1Hf01sSZhc1C+Pnn61ItaDZ3Q1zZ0k5y4vhWrk70
W/Nkzcz5DvJd3uhRL/pakRczdqKDKDnKfmKiZdef9wka6CB2ci1v+tEjt5W3
efR0EPUbvgeG0ek/llfcaOogq4xsPUfRNxWZ1heq0HwfnMbRSgGFy06UdBDB
/MfrfqEnBsLequZ0EPvnUjem0FlaN45vT+0gOv1pN2fQzvFHh0TjO4ha/1mp
WbTqgk3+PJEdxKXP4NEc+s+F33KTTztIxZ7KF/PogrzaGvqDDmKxm7L4i3YX
Tfz3u2sH4T38s4Xjgw4egp9udpCJyr9/OV5Yb/w+7UoH+aKu8//PS+UUDaIv
dBA/Ua7/f/+B37LxJ6c6SE6j/v9//2hfb4jrsQ4issDWj3P/pZp5yjaA95e+
v50zvsqXwY3GuzuIKp24cMb/ZM7GSWtHB5GpOePOeT69c4dFVTZ3EN8AZ2XO
8wtkr8+RFMX71Z18wZmfOuEJY+EVHSRcSziXM3/BdlXTCxbh86cOPeTMr2F1
fOToVDuR+bKCdwAtInN3f/dIOzlo/BpY6Baf0x3VjHZipsySpqGf0eXuFrS1
kyeKc2Wc9yv2oqvo2Zd2IsJvJ/YD3TWdddG3oJ24Fe1oqkG/NHrKdTujnbAV
3TW/orcIHtQwjG4nBvpvoBAdoNDrYhPSTuylO9Sz0FP6nh88fNtJotx5Viq6
KqhU8p19O5H4rLQzBq2ScfnC5yvtJGNoUX045/e/84S3nm8nFY6rxQLQDsLH
lvBotZMpdSrVlTOeXQMgptZOxC2Uft9Eaxs+dlZSbCest8n9V9Abwqr7Tde3
E8NmlRoD9BcRg6psqo1YZ9tGSaIV9oxz1zDaSDR9w4E16MgzoQcYrW2E9+bY
Iz70vxFNqYKlbURpYlb6J8aDNetMgq5GtJHRC+e9ctA2GyyN1h9qI+e9fLr3
oH8cWPxUUaWNGF24c3ErWt30dbnWjjYi4mr3dBVaOIa912F1G1nVYsk1ivGt
QPz6+ur+VvJFep9cHJpf0qnHPbiVjNYc6p/BeOusKbo27GEriR0u9mGgaZY5
J5PdWonnBrmWanR2wkxJs1UrSWSW/xeDNtt2L0FhfyvRW9kXCOgMGV8bGr2F
qKygvbqJ8X9TvVnujtYWEs3Vsu4M+sntfUsda1qI/kItPTX05dKBhCW5LaTk
xj3mYvQaU91e2YAWEtrFbA/D8+RukJDx7b0txKdxRiwJzyftqagjy/2bSc4p
Rmg0nncfox1DT3s2k8Q7h+td0RJH9OjRt5uJfFBMrTH6T9BfD0WLZuKjfVBY
CJ26w6LAaE8zKY0pLrj/i4JVF7ftetXbRFyi0qpP43naXfZeXEWliYw5BD79
juex26lpzb2yTSR0qYJxMnpN78GrqhJN5KWAw08vtP5s7Xt1/iYSWZEarowu
VhrR0GI1kthbhu9DfuJ6ipG5bBzeSJa2BBkcw3zA4k5cksuvH0T21fPoEMw3
mLJhSiSrgeif3yyX1keBjHvCCDu5gRilX7t5B32j9uNboVcNxMfC/8lh9NTN
Jgmrx+hOA+1mzH94s0WFV5g1kKiErx2zTFxfhyLHzy1rIOtWuKYfxHzJ9XRM
5i+T7yT2EE9+Sg8FK92TVOQX1JMso/SVkq0YL1Uo2YTxKhKl9y5fFPNHL83h
ulzncsJF/6axFvPZ1YapgWdFS8jexq/ezxLx/f4qE6iQzCMnEoT+WReJ++1t
bIn6dC6Z7W/V6XqG8dj0nuPH6lwSYFJgEYuW/LK3PdYplyjYPuqTQYeHJb++
W5FDXkeq6RzA/N1FOejALtts0lJ67fkVzPc17M9fi/6QSfSCRGIbgilIaGf6
93unkgB9kYdCT/D8cROJebErleTYftKhPcb1u1Er/STtHYncLKSQgXYyS/ye
C+9I0QJxMwP0UaaNqN9MMsmrOXY21A/PkxHqpYxdEhFZZ1m58RHO98KZD9dM
4smYG8tJzwfPrziZsk288WSqXCdJAh2sadLUkBNH1NQXLPj9gIIZn4Kp/SJx
pMemQfwl+hvfvQPL618RMSl+qQlvjG8ySwPO+kcT6ZOBZ+K8KLhwUiyz/VIo
0bnbJLbpPgVD45P7HEtDiFDT/dEpD1xf4bWEXyqEqBjLDX5HR7V7fjvECiIy
Zj2nH6Izv30v+6c+gIw9VVw0hvVS2oTtFnabN5FczF1f406Bxw/pH+s/HyAb
JWTrXrvh+xTotFksJwluR7RSH6CbfnrGCE5pw5TIiixLtGvI0cprymbQI9On
sQX9WfzRwxeC9iCybOJUrCsFV67IWGXNe4INj6Blogvme7yujSWOIRD8uDj/
hzOuZ7nVDWkSoVDalfosC+2jn1YXVRsKSvO6yRFow3D6N6ft4VBw4ufVC+jR
zSdKZDojoOY2z5n+23i+79uQFqwZDRrxZAEfevn57JR7P6Mh0Wa95KgTBePu
J9/aRsdA3hFz10a0Ga3EYIvbS+g4OlHxEi0v/Vt3rvEVlBjK0/ahv364qPn+
UTyEi8uIOTlSoFYm+3lbTzzM6FuFmaLTm6YPRaskQKlsjKYWOnw6BB7TEyBR
5eiRtWhLqFC9fOANqCmK1RMHCv5WKiiu/ZkE6XV/Nomi7Tvm0p5qvQXlRjGu
RWjWcKU8T/RbUJqSEqWwnq0SvCw7rpMMIsJbB8rRkUbPtlXHp8C81nEpN/Ru
2oKN943ToI1/9Z8Rexx/3pmfCklpsCZs4bVu9Nbgd6U902mQN2bDV4fme5Wy
+6VuOlQk1na+R8/qG3f8HUkHv7C2r7fRU2qLvpwRfQ9mEFR0FT0hnZqWBu/h
XAQPwwQ9xMXtdTHwPYxx6346iO5MT9tOFDNglLnpy3J0W9Q5YdFzGVAwHXeI
C93ku3juhmcGvFy0ZWT8JuaHZiZ1GxsyQLVTrq0dXSS45La7wwdgqe36+w4d
Y2daeiA7E2Qy73qaoKPOL0sN684Es99ZggboCO3M/4aXfISKPyfqtNGB4rzX
Xhh/BJ6QOLoK2qPu48q56Y8wcMHTZDXarcDsj6FEFmTRtjuuQDsn8jFTdLKg
6vWp4sVoOw/znPPPs8DtqvrgLzus9xRWXCxQywbJ/zpD2tGmYjnaqy5nQ08S
t2oj+tzSS0q2/tkg0vltZS3aoCdnsVhXNmQaaBl9RutVXaJu8eTAj5gFnwvR
Ojn8rd/kc6BJwto8B60RaJniei8HWgI1d6Wi1d0Ewhve5MCXYGKVhFa1zru3
oy4HnkyNfotHKx0UPNUungt6Nfd2RKHlZfPVdh3LBV/zXqkItMwaq62Pb+YC
T8wCg1D0ltH8adWSXJAUfAD+aLfqw94Tw7nQdi6w8BG66e03/tS1eeC7WsjJ
B63ge+rZlSN5YN/Ld9UL7Xe5fcvmm3nA3n0v3APN0LiU2haVB8pm1+fvog+I
D+4NrciDCK/ml67o8Dn7z7oTeWD8rOjuHfRo24zuEvF8KLLbEnb7/8/v2VJ8
PB+WpvH0OaLjw3gvudzOB59a61sO6Hn74OFdcfngsUVH9Rb6jP465+GafND7
/na/PTpdLnbhm5l80Gn1u30Tzcsn42+2tQB6+AaG7dCW7Pei6wwKwE24Iprj
orJ9sQ13CyD6X0k/jtfEfZL1TyqALsf5NI7tPY5lH20sgB8nTwtyfq/qQv0h
rgWFoL5YOpljqf1nq3JlC4FxxdGDc3/3Nb1Gt4wLIXObWiBnfC2T1r2y3oWQ
UuHSxhm/UsPoNVZaIQzF77zohH6S7vwrpr0Q8oaMNzqjWf5c988uKQKX1xOi
LuiD13z5hHcVQV4q1wk3dKS2YHiVaRHI57jkuaPHpSLEffyKIOe42aX76BOL
xJMhqwjsKlKPeqNf97zZPd1bBBGXLlk+5KzH59k6tvsIWE2P6QWgM52hUeoy
gUz/8vXBaH6j8ovdgQSqbk1KhKM/CTY7GLAJuL3Q64lGr7id9ncxbzGwZO3D
49B5l8dLaZuKISOh2ycRveqw6z9Rx4shSvyhyAfO9xXJqjvmxbB1c85Hznq+
Ib6o7fTtYhhasvlpEbpizs9SIK4YtPN9RivRrjmRdzxnikGGh/86Cy39pkv9
ouAn2Jp0rXMY/SNMgltt6yfgN2t8OMlZ37feBkye/AQdfJl+nP1Jk8uLs076
BD9MWFrS6Kdi89ZHyCcoKR5+qIhW49OQl2j8BDXLvi3Yjw5nf81p5yqBvI39
sXroY3Gt1XrGJSAk2/zMGT36INWq7HoJbDzw4JYXJ55Ye/3d71UChg8+eAeg
2XJyittTS2DG6F/dBLRvjkfoIu7PkMG+ebsRXVG9zSQn7TNIy4RJceKfXfrs
uHzZZygR4r+lh14TUv8koe0zqF6y+30ebW3sWhS8uBSajL/Eu6CX0ms2Xzcp
xXnzCsxBa005sjcvKYNMpnisOsbzkTad+xFiZRD8sd1YHx1euGmdgFIZqBp+
PmKBZnl+PT57vgzEcxiffNA+KzakNWWUgQjvzKHv6C8SpY6PTb/AwGXN07fw
PDmiK7Ro8mM5lJjbXezE8yjAfNnP6a/lMG98YN0EusWRq3u+sxx40r0W8uF5
ZxM9kreUpwKKVQ6bcM6/AKrSXsyoAoILfu2IQLcEedEO/6oAwaGNB0zxfLVp
mvgUrFIJ/Flm6Xx3KPgwMJj2n04lSF+OnN2Gnp2nvYgyrYSMV/84aKIDttXf
ee1TCU5LWcy7nOud3ynmNVUCT2p17Rjn+nVWr3qdvsHIvsepDMwPnl5s9lDI
roLMenchNuYTPkNqwKqqArbfes/ld3F/3omde06rgkrnxRKK6Bsh112W8FfD
gJzRmAtar3yRQ5dlNdyY+V0viPkM/06FK0+EasBh3S7HI5jvBMz76rKv14Jx
6A7vesyfyvU2rNAXqgerQ5PrbjzE9S/fK2IvVg+GOpf9ItFmKxLEQ7fWQ5vk
3g3l6JlvssotqvUQEB2aIu6L+dExNROzS/UQm7bk30Z04GGTJLvMeniyxPPq
EcwPz+19diTI6DvMvrl2Wd2fguHNq92/RzYA/92wTP8QChwddpg/FWkCB6K7
YOMrCpo7BA2sKlrA8Fj+R9H3eP87an1LTrTD3l15QT7FmF/t2OP3eXEXdNTa
dC6tx/N+WQE7XrsHQm34aU7dFIyVy9vE6vaApzL7QQq6yOfVYIxBDxQL9fPT
0EbcD0ciz/fAr5T42hOYvz/4e3Ii0K4HNAdoPJt7Mf5P9v11i+iBgDW2W0pp
FMTShEVPs3ugZ+39b+NYD9x45RNhMNwDZif35kphvaBqNr1Wf6wHpvh3+5xB
f+/sEjs+2wND6zUK89ALWpMkDgn2whOae+Q9rDfMakFebm8vcLdtYC/sx/q2
4NqRxb690COo4z0yiPO/dmbmhn8vVFToN28awnzOyTe9JbgXvB+0zOqjZ3cm
rE950Qsd15yLMtBtcV0/DT70gv6c0WoHrH/CH5+MftnVC36edh3DI/j+Tfb8
3r+bBusic7cWYP3Ek1OWkqBKA0v/XYZ96LlVhhYCB2mgXhR2QgjrraEau2qa
Dg24z216cQVdqfE27pEZDTZ+jc4SGKfgocwG/ebHNFCaXRx+eoICrpmFSfY0
GpxftuJ8FtZ/ZvTW8Xt9NEiZu8Hbgi6uSlf3H6KB0KFxr2m0R4zpjze/aCD+
JKp5P9aPfzXz/nbw0uG16JLZQvT805tGWrvooBRCX5EzhfnIHe1Xhnvp4MFS
PNOELrLYNGR+gA7Ok4+sJ9Duu6vvu2nRIVYmiLYT69m5Nul3703osOZokHw8
elaqZ5GYNx2y/uX+cx/r3/MC2XrbH9GhRC7nXRS6YMr/mUoAHVzsLkhlo92+
7d95MoKO+y3LYhD9x+6/cz4pdCiw3Sd4EuvpmXy996M/6CB5cA/fSqzPzyVI
zc610kHsff3kNnRewOxRvm46FG88GquOvmP+tkOqnw7Gcr/hGnqKh2epyRwd
xOdWPvqE/n2y0LRMigG/Vg5vtZijwLM1rVN9BwN8W/PeOnH6Ceax53MUGFD1
ra/XD73V7uG55P0M0KZdupqBNgw4aRR0kgH2IjxNc+ie1ZqNvGcYIHtlZFhg
HuvHFyqG3ucZkO4A2ZvRninrDW5fYYBkhvgFTXR6JVP3wl0GBP+3kHqAVjNo
qWryZIBm7KnHYejy1srj+r4MqHEQbY5Hd7HTjh0OYYD0i1nXEvTyJS5Hticx
oCPWfGIaHRFgWxqbyoCWB9cXL+H0k0QuHhbLZIA++fVZmNPPk9I8JEAYcO61
j7Ys+uph/gOTPxiQ11RifZbTH6zkKrjRxgDD0e6uS2gPg3FVdjcDIt0ecN1A
R5i37G0fYMDBN/8euY+W7K/MNhxlQKz0Hms/dJpdoUrNJAMyaU92h3D6Rfdi
lT9xMcG5l10ThzZYEvZBlYcJvmL2kcnozoCHSpl8TIxHTwU+cO7/wlbhjQgT
PLOeTBZz7i91MU1cjAmpz6jLnH4r37uT8pGbmdCWNeTO6bdKFKjI+ssyIbY2
P4nTX009vD2ZR4kJXf2C+Zz+275v62U89jDBwpXHgdOfKzXgT5pWY8LsWtMf
nP6dfhuX9C0NJgiatrZz+nsd5uOvh7SYkEHb5zeCvtLPlLLSZYLfkUPdP9Fj
di3x3QZMmNr6vm2C0++cqtxy1pgJ3DLH3X6jeT0KY79fYILZRN3naXTYkvTN
Jy4xwUWe+/0ftPjT2Jdl1kyw8Xp9mNPPTBEJ2wQ3mLD81R1XTr9zb/TD6Jxb
OL49YPz//qiUywalO0zw+ZPTyrH+O9uoZHcmfHmV+P9+arvyxfVS3kyIotd+
5dhqerfAg0dMOKduu5/j0cLli5gBTNAZX2vI+X0XT/ovzVAmrFkfLcy5P7dW
3kD8M3z++sI7nPEF8AV1cccwQWyXug9n/Gvrrny3jGdCnTljL+f54kPVv5Qm
McHUwzGI8/zyZ1fnSabh/GdmPeXMT86GoXfemUyQ3XZ9F2f+NGglrxi5TJBZ
ZOrGmd+q18/CNAnOp5OeDWf+z1yzexRfyoSe94vmOP1v2k6tu9yVTLBnayhz
3p/txIablrVMOKFfL8B5vx53vxlLtjHB6dloRhVnvjViT3h3M8F6gs/lC2e+
ee4cZDCYMHPrMYNw+utPt0rHUzjfY99i36OVDefWc08yYd5D9FcSumjNDwHL
GSZ4n+oYfIVueHX/95bFLLBb2FcYyOn/WxkPevGyoNg7+9lDTv9eZmc3XYAF
U+Eiou7o2Q8dX+LW4eeNYZNXOf3+L3vCtyiwQOXozv0HOP15P34/r90s0Cvk
3aDI2X//MO/SVVlwjh4Tzemf/tMSfDnuCAsmFqzw4OX03weGlbeYsGBr0OOP
9bifF6aVSnuZsYBxqzqAs9/9bz0Xo19mgV/7xOIP6NhZbe44OxYYmPBWB6O/
8cc3SPiwQDBlMFsXbdTgUu75mAUDCpN39qN7/juZTwtkQctXwRZp9IT439jY
5ywYyQq9shC9cdc5e4n3LBiKvF6djvHM7ozgSokOFnQIm97n9FMtEndGSvXi
eHsNQujo09N6W7azWGD7QuZ4FVr1uf9uhVEcf39ZchR6cTfvOXXuPvBMur9j
HzrSanHcOdk+cK77/MeM0z/NlpQ1VUQHlp/WRN9bqvnRXKUPom7lG2xDW771
LLc+2Aff1bOVh/A82Dnyd9DJsA8MXreE3ESXOs4oh7j1wZPh/8Js8LzJ+rK2
KPx+Hyz8ELBUG50kuk8r0qcPJPkerJdCB+TePvsqsA8CojLFu/D8Ojs3cTct
vg9+dc3GHkePeFNfvlX1ATddynQVnodrQxnG3BvYEHBp0MoEz9u9XptEHCTY
sNdKyEcabWR/roG+jQ1Okg5yk3g+B+vX6X5WYkNb/rSwP3r5igINT202qOg9
3peN5/n8gxBZLgc2CM4WZ0yMUiDmWNP/7x02nCvJ2JeH3m+57E23OxuMZaSP
3EM7a9zbTB6xwepOOnsJ+ue8jYh7DBuienJNhCnMl25rcM1WskFsuKZQCPOP
hVfuFl6rY4PvBfmbdZifiBvluLQ3siGW90KCP/qCsvxkXg8bRkz2P+VBN42u
Hbjziw1mO70sxgYo+Hr1Z8Pvzf0QpevZ8J6N8dTk5Ztx534Ye1N3qIaO+6d5
ywyPez+sa03bcB+db/DmxDqvfvCL0PLeha44lvrzoH8/KPP1joZj/kbfU7A/
4FU/sITdNYwxv1uzqqVWuhKt6fyitAvPwyqBqQvrB3DdONA1Wjl/vw7RuSk+
ALOe8bmsFszHP4u88JYagLqpoFV+6Ki8DRrJOwdA6AHrTG0zBdmJO55MHR4A
sfUHBAybMH/y1hIPsR0A3+h2kaMNGF8O3NOuKBwA7qSh/d+qML5PsgRKSgZA
XKPiujnaIlWvOb98AHjLb235/Q3jzaaNVmn1eP2ih2s3oz0XFHqFMwfA1ubj
jn+/4nyUzRRZrhiEjqGh4vEyjJ96TrsXXBgES5mPDi+KKPDj6ZqdMR+EAEbU
1y1oAXKkdMJqEMJ/5EQlFVKwTmH1KbbdIJz42VrwoQDXs1CmXa33IMiatnZ/
ysN8puln8osUvH7V00dlWRS8N70uoTo7CM6HexWvpuJ4P45ueLlgCNoUNik1
vMN8dbnDWp4lQyBk+CtYDe2U6yL4feUQ1HE9dlyRgvtxle/81W1DUCG/LOdN
EgUlX2PbnhkMgY6wAldRPNbDyi3B04n4ewdS+ewiMT/iPbwo9/QwdOUp3Ov0
okBohD+05Nww/Nromi2D3lHfJll1cRisfroY3/bE+Pif/dHuq8PQo9fdwI/1
zOctsY8Wuw/DyJ21ySpY/wSoLRA0eD0MWcKHMq46UyB1g4gN/hqGlkWn2kxs
MR+o36+yIWIE8t5+PWhlgPF8P9+nghcjEBUnVG1/Euv/+Lbj5+NGQFJzbYC7
PgUKznfMn6eOgGmy0bsQPczPNmU/WVs2Aqrip85m6uD6tVWirx4bAR4ubbla
DQoOLt0eyH+CghqlJ+PWSpy/N0ytS8XfXWX+I9xEEfOV9vIE3TM4L6t8rXQV
MP6lWeU/scC6in+rn7w8xvfT8SxerBNlS1ltrO243uI2HVjyGvfBouwrOzdj
PbKCKn+djHEo7mDGKnGM/7eLDI5i3ZTjslBqeiMFoToXrB/ge+YZFvckYhTY
/4wMWYTrcmyFlbDGGgpkTGw2xuG6ni3RixAXpaC3dF+SBu4LPfFTh+dX43kf
0VJ0H+uUjJ8xvNnCuD8WJh7bjPue1m22NViIAnLt9o9ijEPuNvJXbFfi+288
etEM46JnbmnVEUE8n0FkgJMH2A51G20UoOB/BRSJWw==
"]]}}, {{}, {},
{Hue[0.67, 0.6, 0.6], Dashing[{Small, Small}],
LineBox[{{-0.44444578872920065`, 0.}, {-0.44444578872920065`,
2.}}]}}, {{}, {},
{Hue[0.67, 0.6, 0.6], Dashing[{Small, Small}],
LineBox[{{0.6716550549590458, 0.}, {0.6716550549590458, 2.}}]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0.9560000000000001},
PlotRange->{{-1, 1}, {0.9567408239242945, 0.9999999999984923}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{{3.661355400057754*^9, 3.661355484875826*^9},
3.661355639112556*^9, 3.661355814416032*^9, 3.661355846086014*^9, {
3.6613562926598473`*^9, 3.661356320327838*^9}, {3.661356359681973*^9,
3.6613563764858828`*^9}, 3.661356924616371*^9, {3.661357004487162*^9,
3.6613570209907017`*^9}, {3.661357089615758*^9, 3.66135710493612*^9}, {
3.661357148109284*^9, 3.661357162793375*^9}, {3.6613572897937613`*^9,
3.6613573291108103`*^9}, 3.661359422393593*^9, 3.661360622647628*^9,
3.661360695006824*^9, 3.661360760280407*^9, 3.661361148692198*^9, {
3.661362595113431*^9, 3.6613626434369926`*^9}, 3.66136326637789*^9,
3.6613635531441307`*^9, 3.661364489454585*^9, {3.661366798646145*^9,
3.661366832314844*^9}, {3.661367556869445*^9, 3.6613675766392927`*^9}, {
3.661369272108698*^9, 3.66136932599811*^9}, 3.662562738262789*^9, {
3.662562802107106*^9, 3.6625628174230967`*^9}, 3.669308951647607*^9,
3.7029389817049923`*^9, {3.702941253629098*^9, 3.70294125887831*^9},
3.702943738004327*^9, 3.7029438399956284`*^9, 3.7029455805099487`*^9, {
3.702946072674519*^9, 3.70294607590972*^9}, 3.702946908271244*^9,
3.702946939124256*^9, 3.702987023307095*^9, 3.7029870826151*^9,
3.7029871680687304`*^9, {3.702987207153417*^9, 3.702987242345682*^9}, {
3.703009730118476*^9, 3.703009740877742*^9}}]
}, Open ]],
Cell["\<\
Confirming that this is a stable pair of strategies to a slight change in \
either u1 or u2. This would not be a branching point because the following \
are negative:\
\>", "Text",
CellChangeTimes->{{3.66135964140793*^9, 3.661359644255671*^9}, {
3.661360589128385*^9, 3.66136063255726*^9}, {3.669332693054696*^9,
3.6693327095967197`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",", "u1",
",", "u2", ",", "nm", ",",
RowBox[{"ntot", "-", "n2"}], ",", "n2", ",", "Km"}], "]"}], ",",
RowBox[{"{",
RowBox[{"um", ",", "2"}], "}"}]}], "]"}], "/.",
RowBox[{"um", "\[Rule]", "u1"}]}], ",", "\[IndentingNewLine]",
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",", "u2",
",", " ", "u1", ",", "nm", ",", "n2", ",",
RowBox[{"ntot", "-", "n2"}], ",", "Km"}], "]"}], ",",
RowBox[{"{",
RowBox[{"um", ",", "2"}], "}"}]}], "]"}], "/.",
RowBox[{"um", "\[Rule]", "u2"}]}]}], "}"}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], "/.", "roots"}]], "Input",
CellChangeTimes->{{3.6613595685591793`*^9, 3.661359584469429*^9}, {
3.661359624203629*^9, 3.661359627019671*^9}, {3.661359665394278*^9,
3.661359709153092*^9}, {3.661360304945673*^9, 3.661360395308395*^9},
3.661369295386739*^9, {3.669320145941864*^9, 3.669320146459193*^9}, {
3.669320534971472*^9, 3.669320538035235*^9}, {3.702943843942903*^9,
3.7029438448108873`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.3885428528291322`"}], ",",
RowBox[{"-", "0.38270862009550544`"}]}], "}"}]], "Output",
CellChangeTimes->{
3.6613596291155033`*^9, {3.661359695178446*^9, 3.661359713074703*^9}, {
3.6613603472719603`*^9, 3.66136035578646*^9}, {3.661360398557123*^9,
3.661360465128694*^9}, 3.6613606228145657`*^9, 3.661360695139907*^9,
3.6613607604808807`*^9, 3.661361148825829*^9, 3.661364490589588*^9,
3.661366860386601*^9, 3.661367556902011*^9, {3.661369272145879*^9,
3.661369326031049*^9}, 3.662562738295558*^9, {3.662562802137617*^9,
3.662562817456348*^9}, 3.669308951704788*^9, 3.7029389817704782`*^9, {
3.702941253712584*^9, 3.70294125894569*^9}, {3.702943825211561*^9,
3.7029438453127327`*^9}, 3.7029455821106586`*^9, 3.702987023473735*^9,
3.702987082829116*^9, 3.702987173149952*^9, {3.702987242510703*^9,
3.702987255190344*^9}, 3.703009740942276*^9}]
}, Open ]],
Cell["\<\
Mirror of the above with \[Beta] = -0.6:\
\>", "Text",
CellChangeTimes->{{3.661355671688161*^9, 3.661355689015037*^9}, {
3.669332711729651*^9, 3.669332728599249*^9}}],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"try\[Kappa]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Beta]", "=",
RowBox[{"-", "0.6"}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"roots", "=",
RowBox[{"FindRoot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",",
"u1", ",", "u2", ",", "nm", ",",
RowBox[{"ntot", "-", "n2"}], ",", "n2", ",", "Km"}], "]"}],
",", "um"}], "]"}], "/.",
RowBox[{"um", "\[Rule]", "u1"}]}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], ")"}], "\[Equal]", "0"}], ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",",
"u2", ",", "u1", ",", "nm", ",", "n2", ",",
RowBox[{"ntot", "-", "n2"}], ",", "Km"}], "]"}], ",", "um"}],
"]"}], "/.",
RowBox[{"um", "\[Rule]", "u2"}]}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], ")"}], "\[Equal]", "0"}], ",",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "u1", ",", "u2",
",", "u3", ",",
RowBox[{"ntot", "-", "n2"}], ",", "n2", ",", "0", ",", "Km"}],
"]"}], "\[Equal]", "1"}], ",", "\[IndentingNewLine]",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "u2", ",", "u1",
",", "u3", ",", "n2", ",",
RowBox[{"ntot", "-", "n2"}], ",", "0", ",", "Km"}], "]"}],
"\[Equal]", "1"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"u1", ",",
RowBox[{"-", "0.5"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"u2", ",", "0.5"}], "}"}], ",",
RowBox[{"{",
RowBox[{"n2", ",", "4000"}], "}"}], ",",
RowBox[{"{",
RowBox[{"Km", ",", "15000"}], "}"}]}], "}"}]}], "]"}]}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"ntot", "-", "n2"}], "/.", "roots"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",", "u1",
",", "u2", ",", "nm", ",",
RowBox[{"ntot", "-", "n2"}], ",", "n2", ",", "Km"}], "]"}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], "/.", "roots"}], ",",
RowBox[{"{",
RowBox[{"um", ",",
RowBox[{"-", "1"}], ",", "1"}], "}"}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"u1", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"u1", ",", "2"}], "}"}]}], "}"}], "/.", "roots"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]", "Dashed"}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"u2", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"u2", ",", "2"}], "}"}]}], "}"}], "/.", "roots"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]", "Dashed"}]}], "]"}]}],
"\[IndentingNewLine]", "]"}]}], "Input",
CellChangeTimes->{{3.661355380776771*^9, 3.6613554716473618`*^9},
3.661355628776557*^9, 3.661355738287986*^9, 3.661359416904543*^9,
3.661366866702174*^9, 3.661369268045425*^9, {3.662562771733823*^9,
3.662562793620635*^9}, {3.669320147076826*^9, 3.669320148976576*^9}, {
3.669320518168563*^9, 3.669320531540475*^9}, {3.702943863777714*^9,
3.702943864414934*^9}, {3.702945585516075*^9, 3.70294558645597*^9}, {
3.702946083309519*^9, 3.702946086575481*^9}, {3.702946236837614*^9,
3.702946256476921*^9}, {3.7029467279892597`*^9, 3.7029467403095627`*^9}, {
3.702946814234544*^9, 3.7029468144395742`*^9}, 3.703009735093834*^9}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"u1", "\[Rule]",
RowBox[{"-", "0.671655054959046`"}]}], ",",
RowBox[{"u2", "\[Rule]", "0.44444578872920054`"}], ",",
RowBox[{"n2", "\[Rule]", "655.5623503840266`"}], ",",
RowBox[{"Km", "\[Rule]", "14491.895229742671`"}]}], "}"}]], "Output",
CellChangeTimes->{{3.661355400057754*^9, 3.661355484875826*^9},
3.661355738856802*^9, 3.6613558145819073`*^9, 3.661355846253046*^9,
3.661359422523507*^9, 3.661360622847405*^9, 3.661360695173545*^9,
3.661360760514834*^9, 3.661361148859212*^9, 3.661364490622003*^9,
3.661366867120508*^9, 3.6613675569348583`*^9, {3.66136927217605*^9,
3.6613693260645113`*^9}, 3.6613810710590143`*^9, 3.662562738350053*^9, {
3.6625627721343613`*^9, 3.662562817490123*^9}, 3.669308951754416*^9,
3.702938981837339*^9, {3.70294125379487*^9, 3.702941259028742*^9}, {
3.702943851682721*^9, 3.7029438649498453`*^9}, 3.702945587947057*^9,
3.702945730142817*^9, 3.702946087345027*^9, 3.7029461276991577`*^9,
3.702946243112536*^9, {3.702946729053482*^9, 3.702946746074613*^9}, {
3.702946792064836*^9, 3.7029468148961067`*^9}, 3.7029469175234413`*^9,
3.702946974965989*^9, 3.702987023558496*^9, 3.70298708299723*^9,
3.702987190536178*^9, {3.702987242612856*^9, 3.702987260760014*^9}, {
3.7030097362231693`*^9, 3.703009741008163*^9}}],
Cell[BoxData["4344.437649615973`"], "Output",
CellChangeTimes->{{3.661355400057754*^9, 3.661355484875826*^9},
3.661355738856802*^9, 3.6613558145819073`*^9, 3.661355846253046*^9,
3.661359422523507*^9, 3.661360622847405*^9, 3.661360695173545*^9,
3.661360760514834*^9, 3.661361148859212*^9, 3.661364490622003*^9,
3.661366867120508*^9, 3.6613675569348583`*^9, {3.66136927217605*^9,
3.6613693260645113`*^9}, 3.6613810710590143`*^9, 3.662562738350053*^9, {
3.6625627721343613`*^9, 3.662562817490123*^9}, 3.669308951754416*^9,
3.702938981837339*^9, {3.70294125379487*^9, 3.702941259028742*^9}, {
3.702943851682721*^9, 3.7029438649498453`*^9}, 3.702945587947057*^9,
3.702945730142817*^9, 3.702946087345027*^9, 3.7029461276991577`*^9,
3.702946243112536*^9, {3.702946729053482*^9, 3.702946746074613*^9}, {
3.702946792064836*^9, 3.7029468148961067`*^9}, 3.7029469175234413`*^9,
3.702946974965989*^9, 3.702987023558496*^9, 3.70298708299723*^9,
3.702987190536178*^9, {3.702987242612856*^9, 3.702987260760014*^9}, {
3.7030097362231693`*^9, 3.703009741009818*^9}}],
Cell[BoxData[
GraphicsBox[{{{}, {},
{Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJwd2Xk4lN8XAHBJkRIttPlKkiRJlhRyJZVUkiRLCakUKUKKJNmKJElIhJLs
IVs4spTsW9YZ68zYvUIlid+Z3z/1fB7P3Ln3vvc959wzmyyu613k5ODg0MR/
2P/LEKGh+XkKbEa6DET4KXL9z2bfPzMUjLflX5YQoEhaxi6JyZ8UKDB0v+1Y
QRE5yeMWrGH8O6/ZPeVVFFFa4dle1UKBccjF/KNrKKLe96MiLJWCsbZTb45v
pIieT3Wi/HkK3Bq6XetkKHKr1vPa5cIxkNu2qYJ2lCL+w04tUzljoCrNJVZ9
jCIx3Ff2e2SMgan079z84xSpIscFX8WPAefOuYSwExQRSxMsaAgag0f2EqHa
pyhSExi3TO3yGBR63m/0NaaIhF554mqBMRCtuW3vbEWRpqalQ5/NRyGh39Fy
lwdF7lt+LEw8OwrtCziAhZaZMn32/MwoDEUr3Hv5gCK+q9JVrxwfheBHprsW
elFkn57hE4G9o1AnPWte6UORuNo3CucFRkGm4qkIeUwR54p992YLR0Chw8zg
4wuKbDHuP8XKHYF2j6iSM6EUaRgMlKzLHAGz6ccRf9DSSxj1sQkj4BCgHKQS
TpGew4/Ej4aMwPrBVUE5ERTRLmv+FnZtBMY9a/leRFPkv6Lrq5WER0DC3eFg
fwLux0pFB+U1I9AqlJHukEiROxdnGvetHIF4xtYXC5Io0szr9UyTZwT0O62+
rEumSODp8JV6U8MQs3dvyYFUiiwcLhW4VjUMHn5h59wyKDIouJ4v1nUYVE2d
Tj75RJFQqy6buFvDEAr/ZpfmU+TQpzdV7+2HocLebIsvOsZsp3+a1TBEXLYZ
dSugyNlEzaWF+sNgkx9w/hJQpFb9+pI26WHQnnObFC6hyEfr0kX89CGwTJEU
kqqgyB5R211xLUPQrBPVF4XOa1pzbl/DEAQtt/1PsJIiRfusM62/DoFM7Ezz
P3QF/8oL5R+GgOPkRqvyaop0Z5wvuu89BDFiqxQ16inCOztzZ2onenMBX0UL
RR6nvYnzkxqCcSve5h2tFBG4qNMgtmUIkhz6VzxFC9ZEbzu5fgiMt+5hnm6j
iOhrrdZkriHg0vThaGuniKJmiOLltkHwLXFRLaNTxMx/13ibxyC4BwicV+rD
/c4M8q6+Owhrt5g89EQ/p00Kf3YehPX0SFKPrpDOOhJvi75co3uFQRH5auVY
J+NBoMn95g1mUmTxck2DVXKDUGEG3E39FEl6YpB/rGcAAjrmrs0PU+RLdrae
Om0Ayi2n7NVG8Hx0rR2UbxmAxczKJXfRQrIdghuqB0DDpHN0Gn2v7vz1wZwB
aHAtCh4exfdtxRUx78ABaC2Z8c6nKDId5OILZAAqTLOPLJ+kSL/w56FDygMQ
JO+9RBPdHLf4eI3CAIQfmte5jc7Ie7qCvm0A8jJ6rXvRtr3vwmdWDYDb5hVT
KVMU6dvVlKQ40A+zX7fd3PULz/endfwFvf2gzsWfcB5ddPC8nSa9HxwWXb36
GB1pNKR4qqEfSl87+PajDe9zwI38fugcfqAe8hvf3zrp+sTAflAwbfhOn6ZI
vrG9vLxfPwQPRBRx/aFIIiP7eZ5XPzCKE/dsR/tOaxh/u9MP446P6p3QB0SN
+liW/WAxPJ3EM0ORnOtePzft7YeQhXzqa/5S5N2fijPv5fvhamH+BiV0yAOB
PFmZflh73cPXAH3zxUs3srkfgh5qCgWjZeAD9zm+fli912AJ7yxFYpd3rgvt
YcHcc50HPeggE8K9l8aCYp8t62bQHvGvp9qaWdA0Unp45T+KWGhcqN1QxYI3
7gdv7EeLOQ14RmWxQMvj/VQ4emXJEXv1DyxYnrzxTBqaUyDxfE8iCyRu7dQv
Q/e+v6a8OZoFi7O5No6hY+gTVJwfC2a3Mf4pz+H3S+nTD3uzYO09L5XjaI9b
HysG3FkgahIkeB5tscL5rZQTC6QbW6Luozcd/GecYsaCkWD7VcVogSBTrRMm
LPDsrFOuR3N0geL4aRZwnbzG0Y3udvYQkDvKgvA92pdn0a+TuL98VMT1Xf39
XnYe48kfqwwDWRYMkIRvqmj3QxWvf0uxwDTU9qEW2qzb32WvKAvGswSHTNG6
O8as2tezoNfxmt8VtPqdEwYuguj3RdU30RtXr9xVwIu+f2C3D3q5+U0R00Us
0FEcOBuInktuWjo/z4RIV/stYejOwy9Y6j+ZEMMl9uo9uiZ4urGHYoKYdf6x
D+jCHqPPHkPoDxJROehIF+GI0i4mpB88veMLOqD87sOL7UzYUxdwpQrtJtjl
tPg7EyTSPY40oG0t1C3f1TJBK9C6ugVtmhp9UquCCXIrPX/S0DqznGSwFD/f
u7i4B612xFL6ETBBN1lGnoWWCSlbtz0P/75595Eh9H99EtxVmUzQ/3WGawy9
TNZ3yiaVCcUdNZY/0LOugz18CUzQ8Pt+dQo98k27NuUNjgdxQr/RNKGk/BNR
TJhTuGv1B111gS9hPIwJQknPzP6i89NsXzwNZgJHv/j8LDrpX62n3BMmFCVY
a86hI7R32Tc+ZAIXxMhinifiS7Ur6jyZoPqVkc92YqWFWM09JgSmLZ1lW87f
5U7lHdy/3YfH2M47FtxQ7oifF/z6jG0NvmSpLzdwvss+jbDHr6gu8yixZkIT
Te/PP7ReQGd70SUmhB8pzGXPp03nt1yhORPs1+yQYc/XjF/A79NZJqzlqzVg
r2egVrIv5wwTFCYb5dnrvRG4XyVLD/cr2LqMvR/TusbPMo4zYSi/bOkE+7yt
uDmcpsUEbZWV3BSau8HvQMoBJqR0uWcPo4VOFUzG72XCG8aDPQz281/VfDRO
gQkTY7eWdKO3NI3Fxu5kQpL98cAOtMJpUf3ILUxYqXO2qJ69n4J7k16KMkHc
9Of/z8eB5pNcYRuYcNZwZwX7/OideZD5bAUTOp8cTM1Dt6+JWPZ0GRMYz+4r
ZKLNWzMtA7iZ4M8vYpfMXo8Ra/XDfwzMb3tWRKGfmBxxdBtkQPnEjgk39nyF
LapdGAxIsk1UcmLPl3Zny+0uBhTV8ey+hk45l/T95ncGTIlsNjVmP//z/Luv
fGZAmrig+S60vqhkwKV8Buhx19tLoDu61VkXsnH89yNqG9BD5vYhpskMCN67
kJsLzWP5/depMAbkbB8zacD3O1B8TOdkMAOG4gcOlqHXMBe/03nCAJZ4yXA2
WuLSnjNHvBgQc7rVOgJ90OpltpodAyqelmlYsOOPjbnztiP4fTRw7MF41Rlg
GpF3gAH2cdH5NWjlDyZFR9UYYBvwK+sTeuLnaR5beQboHqS+BKPN72mHpv/H
gLMejcYH0OpB8jkqE33AuU/CNwjja0SmLK1qpA+aixdudkFPN+/gMO3vA9qp
7Y4X0GkbJLXcaX3g6aOjLo/e+Fa4tfQLWiDKuRbj+Vz2ounjL/vA8r3KuxnM
D8btnMJdz/vANyGgsROdNTuPZ64Pwrm5PhWjbffP+AR59UGowLH8h2h6xdia
lut9wLOT78lqdD69RclMsw9mmAqJ/2H+cVmYcMt+tBeMeQ9fm8f8Zhtmuths
oBeaO6fa6WiLnaueH+/rhUhj3VX5aG0T13TJtl4IqG9l3EKvzdAZ7SztBf+7
iQKjPymSaTFpcTQCP39LMbsa8+3YZ1Ud8aO9IOrzKfLKBO6Xe614c3wPsJRj
q4Qw3xu0RanRY3tAbnzj6SGsB7TlbhgyIntAJNUyqwCtwBDwnwjugQhbTi5L
NI+W3uTy+z2QE5pRl4L1Rgr/98+HjXqgiGOZ0b4hivyNbDfNXdIDzjNStgTr
k+cFzNCIq91Q1aDW39ON8aBLclmSWCekCW90zMD6a7OAuoZ+ZAdcTVdQci+m
SLqU79Xevla4ei11IXygSFfZB9Hdu5vB6Ut8VCPWs0zp53KQ1Qi96uWqIsEU
kXJ7OzaQ2Ahjgj+WsZ7h/tV+TFgZ3Qic5QGzyehpu2axS36NkGleo6yG5s1e
s4rPrBGEmF1KZkEUkd0fPmm8pBHGjebPJATi8zgdlfnLpAF4WFu1DLE+X+H2
frfMgnrQ5+nR3oz1u3eWZLnA7zrg6pE/8dubIjNj74wmR+qgaE72ViW693yc
a05rHTQphsk5oNP3xxZrpNWBfoSE8Ve8D+gteqVz5nwdpJvyezp4UmTruk3V
HC61wDPwa3boPubXRxvHyy7VgmtXXEIJenrmv1V+erUg63fsXgS6nLbeSFCq
Fkr/dbzSQVu9Xs3c1lYDzmV56ZnuFEnYyvNPT6kGhhJe6/rew/vCbkr67WQV
HDu0doHOXYpckrl3L5deBUOTKt2S6CgJ/obqr1VQPu47vhC9cs3OW79eVsGI
wbK3ea4U+f3b9vNhzSoQ0Us1k0IX546dHgquhN0Z0XtXuWA9tm/MbefuCqjy
vye+9DbWF4pu9QdEK0CbJWIy4kyRyh3LxQ15K0B/Cd+XarSaiMw3985vMO4t
u/cpevP8tVUN3t9AjpPnxXr0WNHoO4eWcuDYsVZT6RZFHmiO1uU6f4V4n29T
oY74/VojJxQufIVmXkWd+2iO48M1Kce/goHTfdoVtOvpwapYsa/gEckRqoJ2
usQsf1z1BdyPXfHvccD98qUXmYt+Ae8nk85K6Dh/GqHxfoG6kWWSm9GMwI5C
g59lUF7DxcePNg9ryz9aUQZjdhXO/Tfx/U/4nqPoUAZFqvvawtHHqqrTlpSX
gs542bel6Ed1VTs900sh3PYEfcYen1dTZcpcRCmUpz3ZOoQ+SP+WNGlXCkWX
L5p9Q6uNlcXTN5SC3JsMy0do14nSrYaLS8FZR2OnCzrvV0lcw3gJrE9lytqg
leY/v/laVgIeuSFtOmhZgcLXH66XQHFszWchtO3qgo3SxiVwKF/20BJ00tr8
yDjNEhj7+XfBrB1Ftm3Ki3i5rgReS/3c2IsWk8sK9SopBo0vd3+loQX1UwKN
1hRD549iQSN0uoRf3sGFxfD6mCCcQOv+uczYRX2G5Q/Xhx1CP4rctIf362cQ
bTvdpYCeGwjuynP6DLzf5D6uQr/8ZLfkncVn8PwBjKXoPQE68s90PoOO5Y6D
XGh7eR4fa4nPYJxSEPrzBkVYd11khJuLQHfJPr929ANdQ0Oe4iKQ8DHQaEKL
blb0mEougjETJ6katHH52PcqryKY6Wp7XIz+HV45n2NXBCJpW5YUoIOvxW97
e64IuNb5fsxG16y0uHtXsQgsP0RFJ6OtmWrvrmwqAiHBsz3xaJ6cDfWn+YqA
dXuf3hu0V17CkbMVADeuuH59iS46b/lKIQbAQKW78gV6hkvkx7I7AHERjguC
0bYnnoYWbAPMd+ocj9HxU9ojzxcACHG7fHuI7g3jUrdtK4TAvz9KvNHCpPDZ
oQ+FkPf8HfUAbcC41S/ysBDc10ceu48OfLhL5bdZIYh8aGl3Q1fIDAfU7imE
5RcMwl3RXE1vet8JFAKvsLDfHTS5bbrbfaAABBKkkp3Rd0TWPjIsKgCzggcc
t9CZJfV02dACsB2Q9HJEj1n57VpyowAmojaoOKAllx/06jlcAE3K58Ruoi0y
5lpzNxbA7okxZXt0hGGOdNDvfLjRU+9ph27+Z+d+tTYfeBdzc7AtELu9SeNd
PpSTJ0k30NpazK0b7uVDgK71I7Y9RyNdJg3ywYP2MoztwiDD2kqZfOi9sqmd
7WmllZvfLM4HKfPZo+zx5OiVTq6dn2B82Q6KbRsPrwr9rE+wODyjhD2fuK1E
ZEfAJzBYE/iNPd+eqmm7RZc+wS/HYg72+oTt08vo+z6B+EPtK07s/V1jsy5L
8BOoL5ZcyN6fwPwt1wJG86DC07jmNnt/zbuKLpXlwSW3ngoX9v5yh60mr/Kg
Uyd/+i5aLUnPao1jHqxXGDrjjk7/VcZfLp4Hy6JUErzQAQkxxWp/coH1Vb7L
l32+TO85fqzOhQkhMR1/tPiXPR0xTrlQt6q97Rma445gwLqjueBaF/WLfZ7o
OybUAzfmAk/9qeMR6JDniXF3y3Ngbso1/i3a/oiv0VREDhTSRpIS0Cf+WS6z
tssBgafqw6ns83tRxN5wfQ54b/IR/MR+/gpP98nbZIPAVjlR9vtjMHBt/L16
NhS3WUyy3y/5CO1YUcFs4Ew05uhFjyzkWrK8MAvE9wd8HUebNjo1DfBnwYCR
B+8KfF+VfU75nGd8BEP1q4nr0GtUZJWbcz6C2IEJLzF0XcxgVIn5R5heWtXP
jgca9metIzMyoe7t/LmzaBGJvSKCvplg46dReQn9t02w3u9sJrjtmbKzQ2fu
r919e1EmeMv4WvugJVZocOqfyYA063fLs9CcZSIfK7ZngP6TkEPF6C7nv5f3
c2RAzPec7Bp0aHdmtcz7dPg14HhwAM2btjVsyd8PEMfRxyeC8ZB1geuYe+0H
4JK9u1waXbKmZ+5X7AcIf8qlpcyOv/fCLRnHPgCLmXnxDHpMh08WItNAOM1X
Oxj9toP5eNAzBRJW09PWYrxvdxWKeiWfAms9O/m3oZeLHE472ZsMtp+Go/ai
ncziG3JJMjRocZ4yQR9iXl3zaCYRAr0Wc0WjB8ao11I33oO2kIqvIuYb4UDR
9E6R96AvJTqphdbddbIkqDoe1q67FHAWnXMznTkjFQ88QczTnuiH0w5Slcw4
WO95YWszWopzJsPa5A0wRFy+eWD+M42VKtvI+wYSvJIVwtBBmibNjTmxkMd9
qzYVPeOdP60iFAtxBaHP6OjKpff2LauPhqm+p/oqThRpleIJMHocCVl1NUnz
6HMnhTM7LgTDSr+2o4mYr0cmf+51LH0GCi0w9wXtGlILy7c8gzuqvvRedESH
R+V+1lOweXtXZAPWB5mVDWUn6gOgYte2pMfo1CmbzQPtnuCg9rL/zh28nzVJ
Nm0o2QdO1assHLHekOanX120Q5xIj1hdD0E3//CIEpjWIhxgGpeNdnl2qMJa
wYzMHqAHzqBLRB/6vBKwJzeO/jztgfXM5ctSl7LmPIisTFZAmBtFcnldvhc7
PiNDw3slWFgvvd4h2JgqFkx26ya78mM95a2bWhdRG0ykhH9z7EXrh/RVOm0L
If6TL4L80eObjhVL0UNJ8NrqZkUPPJ97/0sN0owkksJe5YEPKPIt47zmh4dv
iKH9nONlrP8UexeI3DdMJWcFpVMD/fF+n3fmh+z7VFJntGLxZ7REUHJp959U
skwm4O4P9NLoJMXXx9OIhHZjtR7Wn7O6hrT5sTRie23ruFAAxoe01G2wK500
jT4UffsE67cbpqX7sjMJz71fJ1qxnt08/umPcnEuucPPGxEURpEjsW3VOobF
xFm67PbZ91h/HF+58OfHr8Spav5LSy7eJ8+3uMtmV5F4xvRF028U+arzH5/u
ynpi8dRvsXcbRVbL9AjZC9eT8CMlLYA243srGixRTwTiRp/+Qc9USiu0KtcT
dasTRTbt+LyOqJqYXagnQhW58yc7ML4eMHl/I7OeLLdOo62hY77eE3bwqUED
uXrLMeEJ3gdGNwm6NYQ3ku7OBZbieF/Y4xJt9/lNI2GY5/ecRns07biYltJI
xBcu2ueDFvI5dCyguJHE+7n5DaLVRm6t1x5qJA1dJR5JA7ierPasz3ubiJrj
f2nb8T6y6+hrKq21iWRJrUrnw/uO6xvpvqjeJiJ3wu2BMvrLv5zmgJEm4nTj
ovRltHFafYENx3diocdcWIT2EFzoLyn5nXBpmJReH6NIY9dFyde3vpPymEiz
rxRFHB22mz8RaiY5lyPTT+P9SoiXyjfYhOY2vuaOzolKXysi3UxGDir9SEDP
VuytS9rfTMwGTU/Noz02aZEKm2YSf/HVnbeTmD9qLP9bVNJM9A5nivTj/S1O
MrLtzvUWclaocpnab4poFZoratxpIepzEzfN0YOntjxd4tVC9Kw9IzzR0veS
tELDW8hiGJWtQKd/z8v+WNZC9KNFzfSmMd96tDwf39BKfB9pxRjg/bOFJqB3
qbyVWB2J49mB911tv4utDg2tZEjl7JlD6Py9eaYPaK0khGvc6jz6dcgF69fj
rTi/4cZAtJVulmf72jZS1FpeMo6eKTHJ1rnSRtpTf3S9wfu0jX3avnM324ip
sNnBPHSn6KJS67ttRFf5xdVadPHdlDrfp21EZiR8chrtp7RgqDi3jYRPhM5o
4X1eODFOWIm3ndTw+XygoQOM/sYcXN1OtKrcZ0fRHDy62/RF2km6uDzXPJph
+UfRTq6dJJjMaYnOUSRZ5NiJRON2wrm9LYbd3xStfv0917KdXGrfX2PL7oe6
/DQpt20nvyTpmXfRTq2RVkyPdqK7ejA9HK0W9OP+xsR2kuK56Bq735mmfohH
5mM7sb2YbtOJFqPCA1ShndSZ80kMoxcf03xp1NhOIjuXli2cp0jtoheZz/62
E8/wrhR2v0Ujc1g5ZlEHaer64MTuf2ZaqH9O4+8gcZqpvw6hQ2GwunpzB3G7
dFXEhN3vuq3az32sgxQejOB2R0tZln8fM+ggdUqXyUP0pI5+6XfzDmJ/cE40
CO0tbhMde6uDBLS97I5h90/5p5888uggPLyShQnodTMP3OwedxCxBD/NdHa/
r/alCYntIFqTDO0itFPeVm2JlA4SH2j2/34VeZuxhy+3gzh7ww92P4snkGyd
KukgTqzSIna/s+FOpWBHTQcZqpRXamX3Cy+e4Spu6yDhJrX6dPQl3b6JeEYH
mSoxXteLllW53vOE6iDTqmGe7H7nny1/a51mOoghj04Iu99ZLOBTeG4RjXja
qeqw+53+f1cmawrQyOvqrUnsfqcBK/Ll9g00kuTSmMru74nWSz1aKUEjNgxO
I3b/b+hTlvMfWRrxv3P7Hbs/mBGncblbhUYS8mbC2f1D16c1p78eohHd7dry
7H7jIVdjzZSTNMJzbvsNdj9S4DJL7vlZGrEaMj/J7le2nbTf5HqZRoScPzSz
HaM6x3/BnkbaM+nzbNtsfTR35C7Ozyihiu3dK4VGZX1pxGNbhyrb87PRHWue
0UjDD3ld9vjl/Tsq5l7RiPIj58Xs7w9qyM1hxtNIRJPNefb8zhYcfFeVQSOq
BU3G7Plvia9/nlFII0XKDtO/0GNB5zzDv+Hndfj3sNefc3fQ/n4TjUgvvLqO
vT8eVo7mVl043nWtiFH00VMLdE8M0cjqTNuiQfRqtcdqu3/SSNrf115Mdj9c
ct2O/zjoRMI1dpjd34xf9XYD11I6aXZUnmD3N+3mZHmHBemkSF4qrHmefd/Q
6s/ZTie8plu+VrD754VN36N204lMSO7xUvSL92al3vtxPKmcmwXs83rPOVr/
DJ1oOSx+lYKeusIVqGJBJzzHu6Li0AX6gW5i1+iE9kVhfyT7vErFm4x70Emc
iZWpP3q9oIJ2y2M6Wf+jts0D3TcPewpD6aRQ+OuEM/u8fm8R9E+hk4q3t2Yv
sH8fKLrAdTOXTvKa80YM0UsSqQmjUjqZ0Yy+fZx9Pt2567a208nyWWsrRXTJ
dqVHJYs6if5+32cc7H79Tv3YH/ydJHS5rMEkvs/Tcnb5G9d3Eu1vr4qYaGnl
xDEXmU4iKrbM/xs6WGvjKYUznUR12dxvf7TMMVUbC/NOYp8eOemKLj9h5BVo
3UnSzH2f26D/GTzLHrnXSYpW3K7URl+6yC38Nr6TaGyPnuFk/55yRVyxMb2T
BOiYbB7HeBZus19nQQGOV983zo5/NTdd3M/Vd5Llx2Nvf0QreVAMwZlOwnL5
qGqB5olqSfY+2kUEOvnNEjCexsRMfck83UXypd7BU7Rq3Iru3vNdhNNU5LMz
+kby0ZXEoYt4bpyIP4hu+wROvyO6SFPqWu4OjOcJre+I1VgXOSZR0zQ5g/UD
rdQwZLqL5PFEq35Hj1PjeywWdBOrPNsDWehHk3x6gUu7SWmwxo5b6MKZw54j
G7tJ74MvNlOYbySW5A+80eomrtvlbtIwH018lbkac7ybSA8E2Oaw85N39HCU
XjfhvD2yJBhtwOUzFn62m3jwzG/URnvNn5wKvNFNmpybSz9gfmP87J93De0m
yi9WVNn+wvicaXz/zqtuItfjkaGJdr1Zzekc001eU8f2rEev/pG+6GZSN+EK
11hX+pMiB0buLr1ShONRaxVWoWN6V605PdBNClOz4iPZv19Ge4fqjeL4mxbo
2aKVzf6s053oJkIhi0L2oRvoncJHZ7uJ2uaQ0XbM5wva3ovtF+ghkvxHmwXQ
ZrVEZseeHmJ8p/rKlXGK/JdvfXCRbw/R0XG4XTWC81k3M2P7uId0djZNPkQv
c/JNaw3qIWLFHD8OoWd3vt2Q9KqHxB8esYdhvG/Edv7Qy+ghU8l2TxKwvgnx
Oxn5urOHdFNn56yw/lluovRbRbGXJB1KO+HVh/kopyzprXIvUXN7XiSH/rda
34JfvZdw9o8md/Vi/V5zo7pXu5d41sn+U0JXaCTEPjTrJeOhj616sT7zkfpP
t8Wvl7gLaR4W6cTzOcP53r63l2TJOlTJtuL6+tom7/X3EoG+NSuaWihSVJWm
9nikl9RJ1dGd0O5Rpk3vfvUS//Ke5Z+aMR5q5s3TePvITIRG5b7vFJl7Ymdw
WL6P5Mv1P5JuwPVu6V4o7NlH1OKU1qRUYjzkz9bZ9rCPlKdqrdJA508/Dtsd
0EdEdkYEfa/A51upsvNkaB+pmLBf/xfr1783Xhh7J/URb9d8bfVyrEc+6XwY
b+ojxdzlyzJKKfL7ZIFp2RYG8S1csWJvAcbLtlS62nYGGUjQ/5aez/79MOZs
jiyDMB6+GtyOlrjhY5yowiCRj73NhT/hfSDgpMHTkwwiGRO57VcOnrcK5vFz
dxlEqNd4wj+TIlcOLN/3s4lBErzMxA8lUqRD4fyGLZ5MYnA+VpIegu/7H0V+
r4dMsqxI8Z0cerxg2UJmAJO4D9v5+jzH+Ho4b+hNGJOo6R2w3xmM8cRIME88
lUkE3tV03nqK+3m30lC8nUmcI2t+D/nh/L4ohWyWZZFfWlN8RnifuXFGYIUY
jUVEdZVXHrtMEYv4neFbeljELH3PLp9LFDn9R2fzNhaL6LHeF36+iOf55WNF
2XEWURu4LK5oSZFFXbzGalz9xGF4cI2gOcafS4tijaX7Cc+m9ge5xhQpdZxR
eObaT1TTXV88O471RDDDkOu/ARLYoc/lvYsiKSav3006DxLtAy42F0fGyJl9
97TKC4aI9Lddj+Sjx8hNi+eCnH+GiOMIZ4r/0zHyP1o5HJc=
"]]}}, {{}, {},
{Hue[0.67, 0.6, 0.6], Dashing[{Small, Small}],
LineBox[{{-0.671655054959046, 0.}, {-0.671655054959046, 2.}}]}}, {{}, {},
{Hue[0.67, 0.6, 0.6], Dashing[{Small, Small}],
LineBox[{{0.44444578872920054`, 0.}, {0.44444578872920054`, 2.}}]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0.9560000000000001},
PlotRange->{{-1, 1}, {0.9552672766361768, 0.9999999997504816}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{{3.661355400057754*^9, 3.661355484875826*^9},
3.661355738856802*^9, 3.6613558145819073`*^9, 3.661355846253046*^9,
3.661359422523507*^9, 3.661360622847405*^9, 3.661360695173545*^9,
3.661360760514834*^9, 3.661361148859212*^9, 3.661364490622003*^9,
3.661366867120508*^9, 3.6613675569348583`*^9, {3.66136927217605*^9,
3.6613693260645113`*^9}, 3.6613810710590143`*^9, 3.662562738350053*^9, {
3.6625627721343613`*^9, 3.662562817490123*^9}, 3.669308951754416*^9,
3.702938981837339*^9, {3.70294125379487*^9, 3.702941259028742*^9}, {
3.702943851682721*^9, 3.7029438649498453`*^9}, 3.702945587947057*^9,
3.702945730142817*^9, 3.702946087345027*^9, 3.7029461276991577`*^9,
3.702946243112536*^9, {3.702946729053482*^9, 3.702946746074613*^9}, {
3.702946792064836*^9, 3.7029468148961067`*^9}, 3.7029469175234413`*^9,
3.702946974965989*^9, 3.702987023558496*^9, 3.70298708299723*^9,
3.702987190536178*^9, {3.702987242612856*^9, 3.702987260760014*^9}, {
3.7030097362231693`*^9, 3.703009741074712*^9}}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",", "u1",
",", "u2", ",", "nm", ",",
RowBox[{"ntot", "-", "n2"}], ",", "n2", ",", "Km"}], "]"}], ",",
RowBox[{"{",
RowBox[{"um", ",", "2"}], "}"}]}], "]"}], "/.",
RowBox[{"um", "\[Rule]", "u1"}]}], ",", "\[IndentingNewLine]",
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"W", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Sigma]\[Alpha]", ",",
"try\[Kappa]", ",", "try\[Beta]", ",", "tryr", ",", "um", ",", "u2",
",", " ", "u1", ",", "nm", ",", "n2", ",",
RowBox[{"ntot", "-", "n2"}], ",", "Km"}], "]"}], ",",
RowBox[{"{",
RowBox[{"um", ",", "2"}], "}"}]}], "]"}], "/.",
RowBox[{"um", "\[Rule]", "u2"}]}]}], "}"}], "/.",
RowBox[{"nm", "\[Rule]", "0"}]}], "/.", "roots"}]], "Input",
CellChangeTimes->{{3.6613595685591793`*^9, 3.661359584469429*^9}, {
3.661359624203629*^9, 3.661359627019671*^9}, {3.661359665394278*^9,
3.661359709153092*^9}, {3.661360304945673*^9, 3.661360395308395*^9},
3.661369295386739*^9, {3.669320145941864*^9, 3.669320146459193*^9}, {
3.669320534971472*^9, 3.669320538035235*^9}, {3.702943843942903*^9,
3.7029438448108873`*^9}, {3.702946241676045*^9, 3.7029462583566093`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.38270862009550555`"}], ",",
RowBox[{"-", "0.3885428528291331`"}]}], "}"}]], "Output",
CellChangeTimes->{
3.6613596291155033`*^9, {3.661359695178446*^9, 3.661359713074703*^9}, {
3.6613603472719603`*^9, 3.66136035578646*^9}, {3.661360398557123*^9,
3.661360465128694*^9}, 3.6613606228145657`*^9, 3.661360695139907*^9,
3.6613607604808807`*^9, 3.661361148825829*^9, 3.661364490589588*^9,
3.661366860386601*^9, 3.661367556902011*^9, {3.661369272145879*^9,
3.661369326031049*^9}, 3.662562738295558*^9, {3.662562802137617*^9,
3.662562817456348*^9}, 3.669308951704788*^9, 3.7029389817704782`*^9, {
3.702941253712584*^9, 3.70294125894569*^9}, {3.702943825211561*^9,
3.702943867248321*^9}, 3.702945591178535*^9, 3.702945732258947*^9,
3.7029461322796392`*^9, 3.702946247492051*^9, 3.702946794810157*^9,
3.7029468452154627`*^9, 3.7029870238565807`*^9, 3.7029870832121983`*^9, {
3.702987242994403*^9, 3.702987264107662*^9}, 3.703009741141502*^9}]
}, Open ]]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["Figure 1A and S1A: Competition and Resource Function Shapes", "Section",
CellChangeTimes->{{3.6611746161357594`*^9, 3.6611746173503027`*^9},
3.6625774253967648`*^9, {3.662606070278802*^9, 3.6626060789902897`*^9}, {
3.669332751555216*^9, 3.669332761102725*^9}, {3.7032048659454813`*^9,
3.7032048724274797`*^9}}],
Cell["\<\
This section allows you to play around with the shapes of the competition and \
resource functions.\
\>", "Text",
CellChangeTimes->{{3.6693379555153637`*^9, 3.6693379923081427`*^9}}],
Cell[CellGroupData[{
Cell["Figure 1A: The Resource Function", "Subsection",
CellChangeTimes->{{3.661175077563939*^9, 3.661175079483638*^9},
3.6626060640406637`*^9, {3.6693380331103086`*^9, 3.6693380532701197`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"trysp", "=", "2"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Sigma]\[Alpha]", "=", "0.85"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Kappa]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Nu]", "=", "0.02"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Sigma]\[Nu]", "=", "0.0015"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Beta]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"tryvm", "=", "0.0015"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Mu]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Sigma]", "=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{"tryKm", "=",
RowBox[{"Km", "[",
RowBox[{
"trysp", ",", "try\[Sigma]\[Alpha]", ",", "try\[Kappa]", ",",
"try\[Beta]"}], "]"}]}]}], "Input",
CellChangeTimes->{{3.661174881989313*^9, 3.6611748821653337`*^9}, {
3.669307304457251*^9, 3.669307305342643*^9}, {3.669320152393816*^9,
3.669320155243657*^9}, {3.6693205106676617`*^9, 3.669320514685092*^9}}],
Cell[BoxData["11828"], "Output",
CellChangeTimes->{
3.661174626890498*^9, 3.661174882637281*^9, 3.661175709138599*^9,
3.661181009681334*^9, 3.6613457066252403`*^9, {3.6625629060172453`*^9,
3.662562912317348*^9}, 3.66256297704276*^9, {3.662581016759543*^9,
3.662581025704988*^9}, 3.662581320327879*^9, 3.662581367516726*^9, {
3.668170304839793*^9, 3.668170314941268*^9}, 3.668170367348769*^9,
3.668170418354663*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"plot1a", "=",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"tryKm", "*",
RowBox[{"PDF", "[",
RowBox[{
RowBox[{"SkewNormalDistribution", "[",
RowBox[{
RowBox[{"\[Xi]", "[",
RowBox[{"try\[Kappa]", ",", "try\[Sigma]", ",", "try\[Mu]"}], "]"}],
",",
RowBox[{"\[Omega]", "[",
RowBox[{"try\[Sigma]", ",", "try\[Kappa]"}], "]"}], ",",
"try\[Kappa]"}], "]"}], ",", "u"}], "]"}]}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2.5"}], ",", "2.5"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{", "Black", "}"}]}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.6611749019011927`*^9, 3.661174956235146*^9}, {
3.66258126970789*^9, 3.662581271282796*^9}, {3.6625813635034637`*^9,
3.662581365616117*^9}, {3.669320504417531*^9, 3.669320508099987*^9}}],
Cell[BoxData[
GraphicsBox[{{}, {},
{GrayLevel[0], LineBox[CompressedData["
1:eJw12Hk4Vl20AHDeg4QipTKlEkUavnzGyl5IUipDyFymZJ4TSoYM6cs8k8xT
hveQUOy3TBmSKRJCJaKJSETuuc9z71/n+f1x9jln77XWXmfvsnDWsaYxMTFx
MzMx/e/1xuTZubU1gjEWYFJuNX0VPvluXRhaIRjnk0Qs3xF2cI5ndPHxEsF4
Oe0n4ChsBzsVXFadfxKMqq6Nba1advD8Tgz72CeCkWFmHRNQbQfsBwd2MF4S
jF1PL64tRNhDnMelM7dSCcYWh/13NVUdoZjZPYdJjmCkOxErJ3xdQF63iC1Z
mmAozfgLid11geaccdt/DhOMtnWsgZvTXWBMXeuAhQTBeNT457ggdoGt9w5U
NQgSjJCeuzYDhCsECky1hDARjGia7sf1Ua5wUdp0hquNxiCGX7DEVrgBq7X6
EX5TGmOrZeV9XglP6DH7x2DGkMY4pNkvdeWYJ9y/KOhXp09j2EnNs7ad9wRZ
ze9Nl7VojDvG7ZW1Xp5gI51oWKRKY4xOmjefavKEF8yTt45K0hgV9esbhK29
4O79kFemi8wM8cj7Z4fKrsHmN00OWdHMDC395dnd7j6g05BiKdHGxGC98YYh
dfYW+H4/7hD1YQ1bonRdsWPBUH0txa7s/F/8NNFhx63AMDgXo7fzb/IK/iM7
/6yo/z9QT687d+rLMjb/UPVtbCIa8lqu97sbL+HDNWtfFZjiwSw4ju9VwSLO
NTJjEXmUBDcvEaWcm39h7e/SoiLX0oDpgAhWvT2PdXj3bTc+8gDeRiSHFr+e
wyeFtv3L5ZIFQhy2hfMqs5gtO1IwPzkH7GUkWYeEvmNNsbqMJ8t5YCn3rqCh
YQaTtwgh/rOFIOmtuOaUM4VTK25nv71SDJkjuo3XlSfwtpBTHdzRJTAZwHdM
fft7POw3LUbYlwHHjbLvsRzv8eZ6LrM0tzI46K2RPbYyjpelI/P/8SkDL6cb
HD7j45idrd1cK7wM2Iwn3jwsGsfaMrRV0/wy2PPvI0/e4+P4Cp4oqXpfBhaf
LpSNXB7DU+tO7N29vxxq4/epTemP4DlLocssSeXAbjxpyXxsBLOYrHbIpJaD
/s68QIFdI9hXw+uT1f1ymCsSZWjODOO4wCnBpznlIMHYcZTuP4wfuW20Pkcv
h6TpLf/4FAzhljuBfMxt5eCJmIW5lgfxnOfQmbilcnjOwjgqNjqI76w6uXmv
lANP200jpcZB3F2ltNVorRweXlhJdLk3iNdVdrziY6XDx6uLvK93D+Lot57v
nXjooBP3lf3+mTfYv1X+VJ44HQ5/Hpw/lN6Pf5rvsNypTQePHwcktgX345yf
5tdv69KhejHA9K9dP95st6owpUcHZTbJ5g75fnxCYUtVnhE1nqhP4tW+13jE
zdxvnRUdPE0FFLM5X2Pug78NDbzoUNtt5L/VpxdLKR/Tkkimw983pRWrl3qx
dSdbjXIqHVTGaFMf1XuxXpLaQ4N0OrR/K9Kq4OvFlQnWB/0y6TDM+WeXFr0H
h7dqheYX0mFNLbUxfKobuw+oM0Jq6HCidmj9qn4X3rahQOLyAB1Ki3IVWo52
4e6J807nB+mwPdX5avTOLmwltK9UcYgO/YtsMWf6XuHNpy8Kso/SQcxXnyd9
uRPb7IiLvPmJDs8DFrhA/SU+JeRMDM7TIcEi3KGP5yU+3KoWnPCLDldVhTts
33bg9R9qf2j9pgMPq1pEtGMHfpvXE/b0Dx3Mw+LWf4htx7ba2mlONBJW7kmz
hYy1Yq3hyDvHuUnocm6xFihqxcRuZNTKQ0K2lnFTqXsrVvWMXKfDS8Jp3qDg
ATbKHh2LhnwkJMf30CQOvMDtFaLbTwiSIJvmutZ+vRkPSHAW3hInwaWw7Pem
zQ3YIInjc7wiCYc3OgWpjD3HF9c1/VdwlIRZN6mN7iXPcSt91aL6GAluxwpF
+9SfY5fKL2mvlEjwfJV1LsHvGT6ORJSHVUj4Ob1fQ6YD49FnG987nibBo7LA
LMEG42C/Wj3dMyT8uiHmsciEcdLWsDkZTRJ+84hk1MjUY7Wh0dy5s9T3yvIu
HM94iuecpaY0tElgC/r94KRbDVZ7MRPsbEBCqKZnVT5XDRbUyTXee5EE9q1z
7ez51Xis2EtvmDJH4cyvtqHHWI11A/24EQncr95pnlerwnML7GsjJiREJRlb
lI8+wlfVvCdumpLAa/Hm2iafR5gf+3wRMiNhy0J3Vm9pJTZx5THWMidhu2DT
b4PtFVhCsoSMu0zN50fljTUkiZ8/ehu/w4IEgdJ6UYGzJP7O4ZiYS1lYufrc
cAAdMxKezxdZkqDaqa/xrL8MR724tynWmoSTl7U8gjjLcEqt7DirDQmn5jUy
1KAU276wf+lJWVPg+EJr4UOsd6R4WfMKCfo2opk9foXY0nRD9htbEu64uofF
PCrAo7IjEUeuklDn1+Cs8y0f32OLeBhOeU+spVKPeR72ifkQd8iOhIv3K8Ri
knLx5j8qJjcpRxQSG3S6c3A3+dmojfIczh7qVsnGBmeCVw3tSRBv//k82jcL
W8zJZqZTNuxXLdKuzMQnPUt931FmfPng3S32ABsGXuszcCBh6vsVxu66+7jh
e7ROFOXzbOyRWQfTceEabV0z5R3Sp6SyNqXgM9VhvBKOJNzWmFreFZSE31q6
XNWn/MU8rDVzPgEXP77w6xZlXa99Sbts4nGs+e6aAsq1d1/YZA7E4rIzLfSX
lHdl28rs0ojBduVHxr5TDqthZ8msjcIJbHonuJ1IeJehnat88R525tz5bj/l
ko5oFeWjETifEVKiRtl3qXsUdoRhN4cbpAllDXHeG8B8G0cmL31xobxNV0cA
Pgbgc9vmTAIpt6/tcfa/dwMnLZnRoinbGuYW3rxwDf9MUhhJo8xSIfbxhoAr
jojx+5pLGfg1jy8zrLHMC1Hph5R/JCVbzSbrYMdLUqVllP1ocU0n5RXQpeY4
s3LKB1MsW7bImqPJQpMTpf/7/vz0b5zcDihiLdi8kLKu9JunIcoeKJCJpzyT
ctWgQWCorw8ql2SWTaS8gTEj2mh0C2WA6Ww4ZRRbHNJ4LQgFa0i+v07Z1cb+
c2NcCDoc7cx+hXKWwn7NJno42lIgY6VNuY9rprSp8y6SsQxZkKfMNla0qXkm
EokNOzwVppxmKKNoGRyNVlwWqteo+ZZRjbf/wBuLtBsPzLyj3Cm1kGaZGYf2
1u3RfUKZienRmmV9InKIjmq0p5z8ecs/HzWTUVWURCeifKTXw8JqKAWJ3Gjd
sImyVd6/TVa/05GfrsehYipeViPjfn0MyUCNgSWbPCi3H1uOJe88QKTEaUlF
ylbiRk1H+LNQ7YXta3VUPB4W5HjnNpaFnI8HPvGlvMpd+4vMz0ZDNoxSWcoJ
S/z7pGVzEfcBecUcKt5bOgbvSOsWIHnh3ilTKl9svd+2GO8vRPuXUp+sUvnF
vmeIJZgoQtFmVqdSKJ/2Hb7ZV1GM0rnaolqpfOyQGHXz3FKGfiSJf2Ci8tXh
9WhZ+pcyJC0hfDeEyu8QcPllYVGOJsS//mCnvPeLi3SEIh2dd9/7nbCinqfq
VjI0TaKwdy+aeqh6Ip881/5dvwIpKqjoKVFm/+42TTRUICnFd1l5l0goTHHf
K5VaiU7WNVx3pOrR9KxHpt+ZKnQn9K5IH1XPHB5cixd+WIPc61dSWKn6eOzX
YsU/22vRpJqR7HF9Erg0vXvUgmtRyPPqeFc9Kh8WvbmdTJ6g7vNSWV26JHw7
5xNez1WHVvXk/l7RIqH6Zn19mSwDcb9gSK6cIuFB4d+XNQ4MJC3XeIyJclif
0khDFgP1TJgIMKtT9UUS/xnY+Ay5GjopLp0gYek1lmeafIbWS+oINwAJigee
kVqJDWhaLPNrnRwVP339CfWtDSh+wFInW5ZaP98vPlIrDaj27uP52zJU/Wnd
psp+uRHNB+6eV5EmYbO1Uy+WbEIHpRlfUg9S9SJNcP5gfTMyCFhVattDQgaX
l8yGiVa065vTNSFqf0ypiOD33daGer3qcos2UOtvlLk6pdGGmMd998hykXC3
oKOpsbQN+Vcs8KmtJ8H7hKi+n3c7MkkYGVIhSNDx6/Ka4XyJJFSsI+up/Zrm
xTdsxd+FLHz3kk+o/d/oUlFP9b9dqK9HSPgV1R+Qp1Erl1YXujSm4TdK9Q8W
IlerKkO6kFS9q+BiL9UPvHgaxTLfhcgI02XmDjoECVqp5XR2o9OXBiRDn9CB
5RlZ+iGoF/n5q+41SKKDSbF6rlxGL9IILZLnTKBDZfxwakRtL2oyu2TxNJYO
VnZs4dKzvShoMp3YGkmHps1GlkFmfah1eCEj7zYdQmyYt4sqvEZ1ypaGSm50
WMelFWDxrR+RwYvjWhp0uLjXiCG7fgDlT4aNVp2kQ5GK1RrHngFUVhYnL3CC
Dueue9+oMBxA//lfpg0qUf3LpwfXWZoGEMvaCr/cv3QQfzbrmpf6Bv0V9A3x
2kEHNa9Yi+lTb9G31IJlztlyCBrrV3XLHkGOeaa87++VQ3lqiNbNuXHkef3H
lW/+ZeCcZcXzUX8CWSiquk0GlYCZXYpwaMAUgpNHTg7eLIZwbS8F6bQZ9DZ9
NETethBYtsR/8l/+hkS8KmMf8+bDQPvtH8Hcs8hadx+L5HgO6PlayKY0zCGl
Rzy02LAscOCc2d1pNI/EE4NjMq4+AJHi5gS26QX0WVNFbvdwGvhWq+pypy6i
4g5Rrsi+JHDJc6iSPbSEdgZ8VasxiQcumpzFwYlldFbsKavKz2hQc7wQLxm7
gn4cqgt0+/ofbK8Rdlbb8xfpmpxVv8IcDjFuYdGHB9bQV8mcg7bGwaATcv5A
ehUT5Cx/drPPvAWSxsF6OTeYgebKrx3O6guGrlW8LAHMIN/2oyf/iw+EhU69
sgxmhrzajd5ven1gokLztGgEMwiz+FO/Nz7wgIsPZSUxA4eq7q1r4AN89bn7
HlQww5nm0PQx/+vAtKvlT+pnZvgvMyrqA6c39H9anxWrR4Pa/bnvJ/Q9oflC
eFrNRRoshUp0l6h6QtVz9sRRYxqE76tpDjrsCQn3193db0GDo3JCDw05PEFP
n9WrwYkGJkst2Q/rPaCvien0z1Aa/BaQs/os4QE9OYuzOrU0UD/0e10khzt0
Wkwo84oQsDdmOGfTTxcYZ8n/Hb+bAL/WEqmz4y4wn2dbxi9OgHrER76kVy7A
PzMjtOsAAfGPVSaNH7qAlfvc4qGjBHzaKRuQYuMCy0FrJWcNCHCNHhjvf+IM
4rn8AuGRBNBcHCZlyxxBQX2oiyuWAAWDq5YWkY6g+TktNCqBgCGfKJ0iZ0dw
PbBzITGdgEw5UeXIw47w9JF4V14xAV7hvubFFQ6g0ywd0thCgFQJlAhhe7C2
XTh2qp2AgPmtnWyZ9uDN8fhneycBLFJYiSvIHtLPKV7ufU3dX36oxVbdHqb6
4dj7DwQkCfD52nTbwbI37af1JAGt0h93SlTawQbBxsLP0wRc36EcwpZoB0fM
1bfNzhIg1PhKfZOpHagxr+/0WCBgffmuW0pgBxez24J//yZgYVz5cIioHdip
3T3qt0LAZpEzJ6fY7OD/zjfg/883/gemDkOH
"]]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-2.5, 2.5}, {0., 4718.688943193847}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{
3.661174766250498*^9, {3.661174898402533*^9, 3.6611749567998257`*^9},
3.661345708824452*^9, {3.662562908851624*^9, 3.6625629124170303`*^9},
3.662562977133276*^9, {3.662581016844882*^9, 3.6625810258027267`*^9},
3.662581271570897*^9, 3.662581320393997*^9, 3.662581367586372*^9,
3.668170315011198*^9, 3.668170369331335*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"try\[Kappa]", "=", "4"}], ";"}], "\[IndentingNewLine]",
RowBox[{"tryKm", "=",
RowBox[{"Km", "[",
RowBox[{
"trysp", ",", "try\[Sigma]\[Alpha]", ",", "try\[Kappa]", ",",
"try\[Beta]"}], "]"}]}]}], "Input",
CellChangeTimes->{{3.661174881989313*^9, 3.6611748821653337`*^9}, {
3.661174945363006*^9, 3.661174963851177*^9}, 3.669320155743041*^9, {
3.669320498199029*^9, 3.6693205018825006`*^9}}],
Cell[BoxData["10756"], "Output",
CellChangeTimes->{
3.661174626890498*^9, 3.661174882637281*^9, {3.661174958947073*^9,
3.6611749643819313`*^9}, 3.6611757521283484`*^9, 3.6611810155820627`*^9,
3.661345711094224*^9, {3.662562912450803*^9, 3.6625629270363283`*^9},
3.6625629771751823`*^9, {3.662581016905477*^9, 3.662581025839589*^9},
3.662581320427314*^9, 3.662581367616254*^9, 3.6681703150414352`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"Skewness", "[",
RowBox[{"SkewNormalDistribution", "[",
RowBox[{
RowBox[{"\[Xi]", "[",
RowBox[{"try\[Kappa]", ",", "try\[Sigma]", ",", "try\[Mu]"}], "]"}],
",",
RowBox[{"\[Omega]", "[",
RowBox[{"try\[Sigma]", ",", "try\[Kappa]"}], "]"}], ",",
"try\[Kappa]"}], "]"}], "]"}], "//", "N"}]], "Input",
CellChangeTimes->{{3.661175720357274*^9, 3.661175756869231*^9}, {
3.669320491782563*^9, 3.669320495717222*^9}}],
Cell[BoxData["0.7844267553823128`"], "Output",
CellChangeTimes->{{3.661175724551145*^9, 3.661175757461691*^9},
3.661345712876794*^9, 3.662562912484151*^9, 3.662562977209638*^9, {
3.662581016938425*^9, 3.662581025872251*^9}, 3.6625813204607353`*^9,
3.662581367650818*^9, 3.66817031507611*^9}]
}, Open ]],
Cell["Peak occurs at:", "Text",
CellChangeTimes->{{3.662562965019528*^9, 3.662562967234468*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"FindRoot", "[",
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"PDF", "[",
RowBox[{
RowBox[{"SkewNormalDistribution", "[",
RowBox[{
RowBox[{"\[Xi]", "[",
RowBox[{"try\[Kappa]", ",", "try\[Sigma]", ",", "try\[Mu]"}],
"]"}], ",",
RowBox[{"\[Omega]", "[",
RowBox[{"try\[Sigma]", ",", "try\[Kappa]"}], "]"}], ",",
"try\[Kappa]"}], "]"}], ",", "u"}], "]"}], ",", "u"}], "]"}],
"\[Equal]", "0"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "1"}], ",", "0"}], "}"}]}], "]"}]], "Input",
CellChangeTimes->{{3.661345725944672*^9, 3.661345803032847*^9}, {
3.669320484015189*^9, 3.669320489099217*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"u", "\[Rule]",
RowBox[{"-", "0.5640230744006248`"}]}], "}"}]], "Output",
CellChangeTimes->{{3.661345728180367*^9, 3.661345803756647*^9},
3.662562912517063*^9, 3.662562977259493*^9, {3.6625810169719877`*^9,
3.6625810259057426`*^9}, 3.6625813205092173`*^9, 3.6625813677004766`*^9,
3.668170315140525*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"plot1b", "=",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"tryKm", "*",
RowBox[{"PDF", "[",
RowBox[{
RowBox[{"SkewNormalDistribution", "[",
RowBox[{
RowBox[{"\[Xi]", "[",
RowBox[{"try\[Kappa]", ",", "try\[Sigma]", ",", "try\[Mu]"}], "]"}],
",",
RowBox[{"\[Omega]", "[",
RowBox[{"try\[Sigma]", ",", "try\[Kappa]"}], "]"}], ",",
"try\[Kappa]"}], "]"}], ",", "u"}], "]"}]}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2.5"}], ",", "2.5"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Black", ",", "Dashed"}], "}"}]}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.6611749019011927`*^9, 3.66117497883393*^9}, {
3.662581275266698*^9, 3.662581276210367*^9}, {3.662581315057166*^9,
3.6625813178408413`*^9}, {3.662581356671853*^9, 3.6625813591996202`*^9}, {
3.669320472380465*^9, 3.6693204802141743`*^9}}],
Cell[BoxData[
GraphicsBox[{{}, {},
{GrayLevel[0], Dashing[{Small, Small}], LineBox[CompressedData["
1:eJwt2Hk0Vd/7B/A7IKJCyRwhRZlDIvcxlxAJpTITkgyRzCRJKKSMDWQe72lW
7BOSaBCReZ4iig+Z3d/5rvX7667XOnvt8+yzn/0+d53dDpdPOlNIJJIPmUT6
32/IuPEcg0HFpeosozBuKowF7VzoXqPita4tP13PUMGEs3/x1TIVP/TDeJ7r
CRVE1bzWL/9HxW+5yjsfVWKCmtgk1oExKn54Xn813ZEZWGV/7sK/UHHloBC1
tH+bwLvm0e7MRio+vdRhMmvMCl2WrhIBH6n4VJi3/+U8VigOW5aSf0/F7x+s
YfptzQYm3wWVHz+n4pF9Mi6GLZvh3hW74+EZVHyx65Jw3/oWWGeVMjmXSsU3
4pwkTd22gkvWrOmhFCoe7S70UaJ9K6jWR1r+TaDiD+pDzFmeb4Mu3lx7u0gq
HtOqqXsX5wTRt7+ughsVF6zW89bGuOHWCSxQyIWKb/5SqLR9nhvmhgNDlhyo
ONvBhIbXKtuhloPjesU5Kv7L6N6OuOrt4GIjmyBqSsUVNBKVUjt2QDHZ9ylJ
lYpzHlNvjTzEC4fMi1jSlKj4mVkz2cw7vFD/dNBVQZ6KG8vzvRgY54UBA1MZ
BykqXrN1IXs5gw92Jsi8rBUk6n/3M+M7twBECkx8jCZR8SO7WGI8NYWB00NE
WmSdgmetFLisFwpDVpVl3KtlCm77yMZwYecueG33wXRijoJvWr20JL+wC6bz
sjuPjVJwx0gz7gJ7UTitdH6Ko5GCb9zmCmOzEIOxqHvGufXE9XrnAdEHYuDb
3lR+pJaCp4R0TnJ2iUHCtcNXPN9RcOfE5MYoB3GoRbzr38oouH9zSwk5VAJk
jVq2JidT8KfaabeTByXhXRab9/67xPzFDeCquBeO/YHW2jgKfsj1USYtai84
JZU/mL9BwX0SzHLI+/dBekecqGUABZ/uetUhfkMKmJ0NFPnPU/DZK18lQz0P
QIuNgtXUGQpu8fq7mlnjAXh4WjC4ypKCazaX9MrtlQEVoz8f7E0peEbOI3+B
ERlwUXpwpkiHgi/9s/X76y4HDeTxcHVp4n7mVSw3rRTg3mpz7pa9FNx31YLP
J0EB7BYqG/vFKbiSVqn38gcFWJ5I2BElTMH3JvMwhlQUQbpZpeAzJwV/5tis
ZSSqBHEPo7+dXyTjAoKFO39yK8PpVK95uXkyPjmrraR1Shkkkqz5KbNk3CBK
nWR/Xxmqbsg65k2S8R1vL3k1CKnAjEf7v5leMv5g5HOVi6IqmKpL7gqvI+MF
EW8EPSLVYHvHB4/sRDK+ef4Lb1aNJuD7n8REJZBx07yiDR8hGniEBT91uU3G
mS7nhipcpUG9pFKP9A0yTq77IvSaFyDQ7/HxZwFkvEnqvuf9NoAh7iDpOlsy
vs7cX/fKVRvuuFjq550j4xSmraP2WdqgUangEHOGjPeG6E7fbdGG+/YTaUbm
ZNx3bfvOSE0dMKywYGvTJ+OtmFvDNyFdwIzlJ0ZlyLiJ3E+JnfN6YPuEnalB
mqhX4UdkioI+cCyMiRTtJeOOtxnsJZf1wSUzy8pzNxlnVcm6mDOtDwJTmz/+
20HG/dOFzHr/GkBkzGjupjUSzvmT1JrEYwgna9MdpRpJuGkUJr5p0AQkfoz0
fawn4a3vq3dOHz4B/0ZkrV1qSXi+uDnLy5QTkMZSa5rzjoTT931nXZM0hYFj
U0eEy0l4TXzz71cjpnCpWZ2P6x4JN37sMTXmfxI0B28kl98l4Y8Fg53sik8C
59y3rSbxJHwvU+YJ64GT8Hy7E/PtaBIu0KBk33rcHFYs4+aYrpFwFzX2hYV9
pyCmt+fz0nkSLmIk+7RnzQKsZySPPrAm4aXyzu4/1CzhAMOrVtmKhHOfTXh9
7qolfBNlrvQxJeFz1135xOctYaeTTP5vbWL+Y87mT+etIGcyJGJgLwmf7L8Y
e4HbGoL+HPG4O8xADsPnDmY22ECmveoE9DLQ/bEX9cY7bOFdq7zTbDsD9QsK
D2fY2cLGK/FzJxsZKCEsOoJr1RYiw9mMdtAZyI7W7ledYQexXG37U0MZqF5u
MDFl3B6Kr3/NPxrAQAqCuqu3uR3g88JH8WVvBgpvYjrbccQBtnZVClo7M5DV
3tz/rqQ4QFL2Y3YhIwaa+BRq1nTUEdKVPKYe8RPjT4rVn8Wd4G2u8wXT7Qy0
1BE88fuvE/Tw2g6TtjDQFj3N+e7dzrBrzazbnsRAvenrTW1RzpBdp9okPr6B
LoFntv4JFyi0oBbnP99A1nTK44R/F+D11XT38hMbKNj/+jajpIsg5uSd23F0
A+laG+RW/bgI8aZHB8jaG6hsV1ZTBa8HOEj9szh1cANVcw+57XrkAezdZlrL
fBtox79FQ6nnl8BGk41PZ2gdaSYYON9dvAxU5oAP7VfW0XPRiE0CV3zAc9aE
RPJcR5u3Hv6w5aEPdPTuUZe6sI421CvLjBp8oORla0XQmXVUJvb2WKmwL1i6
ymWKaq6jpqwNP8pnXyhoGvNx37SO9N61lWir+oFJkoXoRtoacvKmTx0xDIBA
xW3HDJLXUMwT5w6NkADIa2nwvhu3hvR+ysXHVwTABrdGrVjYGipqum63h+8a
lCaLuRg4raEeNtoOlalrwJHyp/iu7BpqVR15yPMkCBof3FIVr11FSiu1KdHG
YfBPVcfO490qirr3z1b9dhiIdazFvHixivqKdtKPfQqDQD6vLoOCVfRfY0m/
mng4SKVZhnjEr6Kth4LyI7LDISZdvPaF1SrKf+Z78GFhBBhkVZkc/b2CdPac
KCruug5/43vWmMZWkBu7p2Lb2nVID10tet+/gqqtunn2iUTBb1u1TeqtK0h2
VETC0CkKksReIJnKFcSe/K4u/G8U9OWXyG+PWUFereHmNZzR4I9lcPeJr6Ci
z1KxHV4xIJpTiacLryDu6fYqrdQY+JTc6WnFu4L+UxRxakMxIOTH29S8eQWF
SufxBG+7BTWqyddrZ5fRqJakxceKW7C1Kna+AC2j3yfYHC1XYyHv47V237PL
6D+W83lGFfGQpuivU3iKGC9d5tI0EA9xWT4VfcbLyKRw420QVwL4+F6MPQbL
qEe4a9nLNwGOiJzXFNmzjFZD67xL1O7AD3/Ia5xZQlyWweGlF+4CRXKT/+7I
JbThcNPr9rYksIm6x/OtYBFxi+2T4M1NgVA7ahn79n+o4OPwvXbZLCDJiCCd
G/Mok7cy8nteNnTdTrtZ3DaHVD+N6ZGk8kFos2vhvPYsym9R1ZyUKAab6s9x
YhqzyHjpZqqucjE88VHwMlWeRVdHcm1T9IpBsntFpWTvLKIJzA3zuxSDXEl8
nSPHLJqxSk0tySsGbZNn/S1tf1Enn03F+J4ScEva4KG7/kVdR9e/KQqVQom+
43KfPXHd4c0Wlf2lMLPysYfj7F/0zPr2ZZnDpeDjmJjjavwXbants1myKoXg
gxIKoop/Ua5Nh9x6UinsKk1O3bX4BxXxDku/YCmDi8rSzN1Cf1DqvX82gSNl
4MP8Jt9/2x8k6v3hQ95sGQS2GRhyU/6gQ18at9ZvlEGsn/OdY+MzqLoqUbCX
rxyKXjzmf02fQdbxnvMXjcrhlzKvbIr+DMqmSVZS6eVwQYXJ6oTXNLpzm+fT
tGoFeLIkL086TKNNYYymgiMV4N++OzPaYhrZZuzHzulUQLQ/bbDq8DTyylYW
LDepgLyXgRcPME+jahlb1g2nChhVmQ1jS/+NCtqtmrTuVoCjal9Bbe0UOnJ3
/aLpYAW4FKha6r+aQlWzpzu+jVaAO38i9VPRFMqWFvx5dLICvFZ1bL4mTqHM
eKWYvf9VQDAq3N5pO4Xe0rZlP2Ciwz0Dv9CZ1Um0skNwn7YkHeqtOE7xH5xE
Q1+C0qud6PCpwZmcuZewqFHgZVc6fFYjokxwEsk8fj3G70GHFkEfNgnKJBLm
rLpw1pcO/f0/q2Wbf6HDY1rCiRF0WLqQI6Xr8Qs9eHSTsyGTDtIBhxmeTyeQ
f3ckj8dXOuC9JtLD9ydQWV7Et4TvdLDUcbSwujWBDj76JFr0gw6RW+OKaZ4T
KB1/n9TYRYfOp71WnIcm0JEns8vYGB1ivodX0JvGkbxMt7TEOh12qaZ076ke
R+SNosTvDDo8zyxkSa8YRxbNt95epWAwcKHlXGTKODr8iexctgkD1Q1xNnPb
cbSsLeH2gQuDMemP9vNzYyjB7e3+LAkMgu92x7mOjiGbw94nOyQx4P7351XP
zzH0KVXLl0MKA833fFs/vBtDnQxLzFYGgxQr98qU6DGk/s85CVPGQLoqdJTt
2hi6UVq18EIVA1wsmTP04hgKOHTRB1PD4Pf0WxcX0zHEYcXZcP8IBrpRW7ar
Cowhz/fnT2/Rw6Dr127NYo4xdJNKXunUx8DrhIqbCGMUyUe6tD86ikGGgC3a
NDKKzI5+MuU1wmCuouJiR+koSnRrq39xEoMnveZ117RGkfjhgPznNhgojiiu
/Dg4ig64OecwbDGom+SSl983inYkHV/StSfWv/gtY2zrKDreH/Gu2pGon9vI
17xnBHmXcAlddsXgLd/+wrJvIyjngKhxvBsGRiKb+9lqR1CSWca/XHcMPA80
GOKFI0jh/nBNvQcGmL6umMzVEeS/PEuv98JAx1j8dIz7COrpCeF9443BD3NK
wvD5EdTLt8CT54PBPzt8OU13BFHNDsxcvoKBepDGdxbuETTzTDa89ioGnyME
Nzkwj6C3aR67bwdgYBOzolG1NIw4jqwGG1/DIDzldYFv/zBalFvxrQkk1ld+
MHygZBjd5CrruBSCgcXL7S/VHw+jUpvbteyhxHrfzU3dTx5GVpuGYp8SZm2s
sDIOHEax0tp4fRgGac134gsuDSMdzgUV03Diefz0rKXaDyMDlisZPwgbjxyQ
qzQYRjb7tGlfIzDom2R35lEfRv5vjW7qRBL7NTuZ7iU7jDrZ078+I5y0UcCy
l2cYubPGety4joE4c4xGJOswGmBZahoj/Jz9gk/v6hCq0adp6ERh0M63py95
aAj9ekO1nyZ8QYRpx5+2IcQnYb1L/QYGS3uGjxl+IsYLa2xcJ3zrQE1Y7rsh
ZCcgwNxAWEDpyQtSxRBCK86qm6IxKFYLnzqbM4Ss15PStAhrgO3uV/eH0GQZ
j/xVwl/0Na24Y4fQ7y5HRj5hG2Ph+EshQ8gyeJ79B+E/5ms1DV5DyKSMZr1K
ONy6e0ncaQixZ1XPCN/EgMu+UjbMagi99Z/6ok44+0KaU5fhEEo4p7V2irCS
Z0C6suYQajLXCHUjXHfFqvmuwhBiUT1z+hphyyAVlt8SQ+hSPs+dKMLjETwa
BnxDSHzjj+RtwptDyv8kbybqP1jHH09YNuBYzsDaIMpYeFd0i/BJ32FLmT+D
SFH+Xn84YX/PkM2Bg4PoYghTtQ/hdDfe6vrWQeTD8em4LWEi47y31w8i5/is
BH3CQ7bH99i9HkRXhTTj9hFmOTvaUVI0iCxkLhgyE5a2DItbzhxEj/3bvvYQ
6zcx4wf9O4PoXq+eSDlhH6Nn/yVFDKIuez+tYMIpBsb5/b6DKIxtt7ou4dfa
49YHXAYR3xdm7v/tR8+RiK3XTg8i5qiBpjpivyQOvvDjPjKIDLa6M+QJH5U7
IWUrN4jU1BOj+on995D+1VO8exB5Tjyk3iL8XFRYV49lEH3xOMPyheifDsFX
i4lLAwhLDky5QHhtp1lx3+QAOv7CXXmd6D+dLTe4A74NIL3jqdX8hF1YRerr
3g8g6xc6zx4T/RtLfXON6/kA6hlM+yZGuGX590BR6gD6KsB7n4/od4exU+W9
9sT8sR+WG4nzFD044yB9agB13dds2k+4qCdm51X9AfRRZmj2ZjCRRy3vQjj3
DyB3EWMLxSAMKGHHUqMn+hHN5yu3KXF+Df1CGCJf+lHRRs3+OOJ8J16ku7yh
96PY8tX6Wn8MRE/zK/8O7EeHhJ+k7/HDgKbw67vZln4UbLHT/DmRH9F7hdWm
ZvtQuvs9gS9EvnwVNnsc1d6HSlim7g5eJvp38xvPV4/6EFVZ8/H6JSLPh2PY
hRX70Jln5cMUIq8qU/bpTVj2In4T+Xp9Iv9Yz447kjV6Uah2cYSYHdGPonmR
Art7UXbs5wsrRH7OFYnjRlM9qGyPRsPDcxhI4bvU6WE96EjmS5dKKwxSJ3co
BBZ0IyHHQn8tYyJfyltPJMd3I8y59ODQcQwO+iV5lvh0I/35Oo8wQwy+MbaV
9Gl0o5VTiTblBkS/8bDv1fnehY6GRn0b1cLAj0YW5ljpRIaTdC468T6pYcLV
9/R3oi0dH8oED2LA2RhqrVnXic4q1XJdV8Sg5NTaA6+ETuR7aFz9qBwGI26L
3G1incgv+/fjkn3E+bg3zfrweAd69OXAk0EBDOR/dc7LZbUjlvkZFUHi/Xnl
r4wUb1Q7qujI/350lQ6vFyPOb7i3o/yy0J1XlumgxSJd//lQOzLzw4trF+hw
UjzwgduPNvTmvaedwQwd/M4LHM5hb0MpwWL1w310qPxuHbYzsBU9PLXlUnQ1
HXQru9nWLZuRWLOaHm8AHcqKctU+qjcjFx53hxQ/OvBlXHZLFG1GZ3xS0rmI
/xPtiyxJx398Qwa5bq5MnnTYE2TJmbXyFVV+HW5udaRDTcQCBxh8QUOcESFC
J+iwlqDEEj3wCd0KWnzqJkEHr8LyJa7ttehG0OWEmMYKsHQRf9ISXIgYucZz
3Dsr4OPnzlgl8wIa7vjpyaNnZXBY5j1m+qCWJljgcKN5cylQ/Hl6nPibaczm
KcxyfsWwicM0wmGmncbq2Xi963UhXB9o1/HJ6aWdzk+SsmQqgIqMaNPQuUGa
tKwZcvLKg8vZTpwjlqM0co7/dqX3T8HGPV34ZsQE7WJb3cqoag7cMvNXU8qc
okX7XHmv8/4JMO1IGQtbmaG58bQ+k1d7DD+bbvyN2jZLS0keSrF+kQUWQQ4q
6bVzNMlTnNn/DaaDB/uU2Ffredo5heWWLY6pIFJcf59lcoH29EvXkagd9yHo
tY75toxFmq177YREVTJ45Xm8VJFbpiXHJYb1Pk8EDoqqg+zoCk1T3mvtmNUd
0Lt0KkU6eY32Ru9B2FDJbeB7I3xZT2KDFoSN++TdjoEkn5hE+Z8MWgr7nSdM
fjfgZPQJmayXJNit8HtepTMSpM9GWTwNIYOjYZqh4q1waB9jy062oMB2j8UF
oaRg+OowqsUtQoVT3KMc8q0BMMiUv5QiRoWp1968brUBMJ/nWs4vSYXcZy9p
Rc8CgH9qSmi3DBXc74X36d4LACffuUU5dSrElJWwdlsEwMp1RqmxFRU0L6Di
mK6rIJnLL3DrDhWaFRls7b/8Qc2gu5kjmQrOE4HhW7r9wehX5s2796kQOaFQ
ZfTZH7xlRBceZFHhj//50KEyf3j3QrI5r5gKOeTVFvcr/nCyXim67iMVlBk1
tr9J/uDsuqBxtIkK5eYGsw/n/CBg86v/mr5SiTqVhM+M+EGWyWH71jYqaB0y
Uxv56AcT7aAxNEwFE7ZpZYs7frASQPnPeZwKJ3iZTHQj/GCLYF3hr0kqvG9J
nzzs6weKtga8s7NUsK4yz9O08gM9MtvXKwtU8NFaQ8eP+cHpnMaopSUqXN2l
YG6n7gfuenHqwWtUaH+ifD5Yxg/+/3s4mOwz7n4k4gf/B9Ytj90=
"]]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-2.5, 2.5}, {0., 4743.551174414426}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{
3.661174766250498*^9, {3.661174898402533*^9, 3.6611749326727743`*^9}, {
3.661174971617035*^9, 3.661174979874189*^9}, 3.6625629128600273`*^9,
3.662562977604355*^9, {3.6625810173284283`*^9, 3.6625810262648973`*^9},
3.6625813209542522`*^9, 3.66258136787414*^9, {3.668170308023425*^9,
3.668170315308902*^9}}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"try\[Kappa]", "=",
RowBox[{"-", "4"}]}], ";"}], "\[IndentingNewLine]",
RowBox[{"tryKm", "=",
RowBox[{"Km", "[",
RowBox[{"trysp", ",", "try\[Sigma]\[Alpha]", ",",
RowBox[{"Abs", "[", "try\[Kappa]", "]"}], ",", "try\[Beta]"}],
"]"}]}]}], "Input",
CellChangeTimes->{{3.661174881989313*^9, 3.6611748821653337`*^9}, {
3.661174945363006*^9, 3.661174991080408*^9}, 3.669320156677528*^9, {
3.6693204637459784`*^9, 3.669320469330616*^9}}],
Cell[BoxData["10756"], "Output",
CellChangeTimes->{
3.661174626890498*^9, 3.661174882637281*^9, {3.661174958947073*^9,
3.6611749918183737`*^9}, 3.661175767946301*^9, 3.661345816940422*^9,
3.662562912901017*^9, 3.662562977642212*^9, {3.662581017354138*^9,
3.662581026307095*^9}, 3.662581320993787*^9, 3.66258136791671*^9,
3.668170317791676*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"Skewness", "[",
RowBox[{"SkewNormalDistribution", "[",
RowBox[{
RowBox[{"\[Xi]", "[",
RowBox[{"try\[Kappa]", ",", "try\[Sigma]", ",", "try\[Mu]"}], "]"}],
",",
RowBox[{"\[Omega]", "[",
RowBox[{"try\[Sigma]", ",", "try\[Kappa]"}], "]"}], ",",
"try\[Kappa]"}], "]"}], "]"}], "//", "N"}]], "Input",
CellChangeTimes->{{3.661175720357274*^9, 3.661175756869231*^9}, {
3.669320450860777*^9, 3.6693204565432587`*^9}}],
Cell[BoxData[
RowBox[{"-", "0.7844267553823128`"}]], "Output",
CellChangeTimes->{{3.661175724551145*^9, 3.661175771029934*^9},
3.66256291293425*^9, 3.662562977676758*^9, {3.662581017388833*^9,
3.662581026340591*^9}, 3.662581321028245*^9, 3.662581367949505*^9,
3.668170319542407*^9}]
}, Open ]],
Cell["Peak occurs at:", "Text",
CellChangeTimes->{{3.662562965019528*^9, 3.662562967234468*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"FindRoot", "[",
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"PDF", "[",
RowBox[{
RowBox[{"SkewNormalDistribution", "[",
RowBox[{
RowBox[{"\[Xi]", "[",
RowBox[{"try\[Kappa]", ",", "try\[Sigma]", ",", "try\[Mu]"}],
"]"}], ",",
RowBox[{"\[Omega]", "[",
RowBox[{"try\[Sigma]", ",", "try\[Kappa]"}], "]"}], ",",
"try\[Kappa]"}], "]"}], ",", "u"}], "]"}], ",", "u"}], "]"}],
"\[Equal]", "0"}], ",",
RowBox[{"{",
RowBox[{"u", ",", "1", ",", "0"}], "}"}]}], "]"}]], "Input",
CellChangeTimes->{{3.661345725944672*^9, 3.661345821026009*^9}, {
3.669320443190877*^9, 3.6693204483470592`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"u", "\[Rule]", "0.5640230744006248`"}], "}"}]], "Output",
CellChangeTimes->{{3.661345728180367*^9, 3.661345821407564*^9},
3.662562912967787*^9, 3.6625629777085342`*^9, {3.6625810174426394`*^9,
3.662581026374097*^9}, 3.662581321061359*^9, 3.662581368016634*^9,
3.6681703216918573`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"plot1c", "=",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"tryKm", "*",
RowBox[{"PDF", "[",
RowBox[{
RowBox[{"SkewNormalDistribution", "[",
RowBox[{
RowBox[{"\[Xi]", "[",
RowBox[{"try\[Kappa]", ",", "try\[Sigma]", ",", "try\[Mu]"}], "]"}],
",",
RowBox[{"\[Omega]", "[",
RowBox[{"try\[Sigma]", ",", "try\[Kappa]"}], "]"}], ",",
"try\[Kappa]"}], "]"}], ",", "u"}], "]"}]}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2.5"}], ",", "2.5"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Black", ",", "Dotted"}], "}"}]}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.6611749019011927`*^9, 3.661174998544894*^9}, {
3.662581278874682*^9, 3.662581279962277*^9}, {3.66258131131325*^9,
3.662581312760997*^9}, {3.662581351225706*^9, 3.662581353983912*^9}, {
3.669320423925097*^9, 3.669320432326062*^9}}],
Cell[BoxData[
GraphicsBox[{{}, {},
{GrayLevel[0], Dashing[{0, Small}], LineBox[CompressedData["
1:eJwt2Hk0Vd37APA7UGQmIZmSMSQyZNqPJBIiIRIl5JVkHipkSGR4o2QIqSQi
rlOvTLnGJiVzQrjXPEbIzO981/r9ddZn7bP2Pvs5z36es46Y4/UzziQCgeBG
JBD+dw0eM/mzvU2uMZU26X0i4gejN/cs9W6Qa7yXygNIcn5gyjmw/G6VXNPD
9GDnVXU/ED3quXl9gVzzX5cNs6m5H9TdS2IaHCXXKM5NNp2P8AMmhR/CNd/I
NU+dq0ip437w0PfiqduPyTXhbEoj2e/8oYDok0NQI9fQi7SmLrkGAqOzgZLA
BVJNWPS9Vzbut4Cnu9H9WSKx5trLKv8d5rfhTH36ZZkvhBrEfszsYkY43Pyt
7X5/aJuaX2zHWORwB8oC0t2KT29RT6caKIgejQbTJEvRrbQN6kgI09rLrFgw
yHxvaji9RmXZlI3eZ/Av5H4M6vI5v0p9SWoSVg1JBPvIh7zf85apsd9kCtpe
PYCQi+QiFp6/VBPjtKWhn8lAkBeh6t1ZpN6dMtC9tz8VemLT7hZ0/qFqvo9i
+dGQDvt2ueYvHpunxiwQJrYuZMJVFVnG3n2/qeuRpLpxmWy4rNafV18/Rf3S
2XRitugpyAZqbHvkjFMfxDBbKEs9h6e/LBqCdEeo9XtSvpc15cBYGK+WAT+d
OnfBrd/vQi5UJEvrj1v9ojoVDyZW8+WB4sTPxUOZXdSP5gLpd77lw/GKXuZN
qxaq1wuTkynOBeCZX7zCxVNPLTvjaGYo+BqsXMSftt3KpzLp5rU8e1UEH7/+
vKdskYd4WvU1v3BRQEO+FjNLqUfN946djGulgEpH16Pqz/Vo3eM+n1oHBRRv
Tt+Q26hH7w1efRvsooDkZz49pksN6Bz98KRiHwV4nD3aqbKN6PlSPFY/SoHp
DMFFheoPCGk8HytZp8ATVn8VtpHPaIdOeNzzAyVA8uftcxJoQXLJmglXvEvA
9uKrtrIjLWg/BWXN+pYAZoQ+s5q1ILPbfY0+ASXgKPJP6duoFvQpled04K0S
qPtUdZ9hsQUtNfTP/hNVAhGCTvo5za1ob9t26HRaCTDUYkVDEe3o7ytauxW1
BOwKDF6oPWlHnFR54/TaEnib3Pc4tqIdWdI+uffWl4CT244Y5fl25CvcmGL1
qQQaeWwvR9h3II3R/2QUW0sgyoXIL360E7HFlHS400tgJ6tZmONsF+pmNWeY
I2FwTsq2RpX5BzJktfn8gwGDV8ectncd+IHSvjQ1V+3AwDQoMPiNzQ+0Mm59
L2QXBo9Gs4MYGn+grxVDpoNcGEjWznvlPu5Gv4SuWAmIYhDYt065UdqNMi5K
SrWLYfBlmXHOtLUb6Qj9XYgRx8BDYa/H8o6fyGpb0HNWEoPSx8fcDL1/IgWX
ab8keQz0/R84Thr2oB8vEhuPaeDrJWY+rb7cg/a1tml90cRgvPDlYFJID/I4
mX3FVBuDuKFKe823PUjJ+UijMWDQYTZsGyfSi3a2lO8TO4GB00EVC4W/vchz
o273AXN8vRMoicTVh1LCxuJ8z2DA5HiytetgH4rU0nSvtcCgMPXC6dBLfeh5
TJ+xmRUGi4xRp1q+9iG228B67DwGEYNdet7PfyEX+ntZLycM+stPXQus+oVa
KhQMfJwx0HhQ8yik8xda2u296eWCwZz+q4l7O/uRj+mMpLMrBvYFwf8+v9qP
6tgKV8XcMaiI/FOWH9mPvjqXejJdw4DX/gq9OLMf+c9aX5zC/ZXTXKXqez+y
i8hMzb2Oz+9/oLdDeQCFhfgvz3vj8TmdxtBrPIBEC2LfV/pgMC/NrkBzHkCG
shE9Yb4Y5PUu355JGUCndISZyP4Y7NFtktyxMYDYSK0V3YEYqLOJSkftGkQ6
lS01kUEYjAb1aDHzDaIn3snrcjcwOGZx2oVDcRBNSR3f8rqJwSrj0XJBx0Ek
1tNE/RaMQa73wrcsj0EkcClpwTYEg7MDr+liNwfRzZpXR4dxU8r2s0o/HET8
p8KnJkPx/Uv8Ei3IHkSHClJMXW9jwJKUoqLwehBVOxZgNNwuV1kdjnwYRFWh
nu6fwjDY3f3B513bIEpV9ypXCceg7nhYtMbAIJpg5PibhVtI+G8JrAyiltwy
OecIPN/uUT7UM9BQvCm7cB3uwGW33hNcNLT++eHM3kg8P1oGGExkaejyei1v
De5w7XSBFlUaKvQtcma9g4Hiq7MKFno0NOVgHX4Wd/8eDr2u0zT0/p39lVTc
sRGfrW3saGjpkAtnN271uQj3PlcaqtPlCOKJwuNnpxPm4IePq61nGOF++Hkl
mR5GQ+aaTQHBuI+pvnnlnEBDDA6ijIW4555do46n09DB14+hC3cWh3TH1Zc0
5KHcL7GB2/gWfXz2DQ1Vc8RQhO7i8R/P2PSqoaF9wdp9GrhzLa25l77S0J3B
jBwL3GfruKQCf+LP32nI6IqbdOir5voIDZ3UHloNwE15HGUW8oeGvhuwh0Tg
buKJGuMg0JFYdtH8PdyjsXdCnrLRke074f3xuIkMd3iVBenofk4z8//G992K
LGyQpiNnrUPPw3CrLUboWanSUbAENu6D+4x7RM+YHh3xznzuuIj72nC4V5A5
HVUITl4yxB1tF87E4kBHEkZ378nift4R9iTDnY60VflO7sRdbRymqnCDjjS7
OVP78f3/bLj9jXqXjv4ETHtRcC9q3XYyT6Yj1Trx1lu4Of4LXac/oyPP/sMU
Pdyy8qFJvhQ6Oh75gJkR90WhkJqUJjpKfmLMG4C/r5vJwdYyP+koY29ulRTu
R2zBsxWjuK2sP7Xh+fB18+a+fuIQKvPq+cuHe8zv5pvrHEPI0LiaHcPziTR7
w4goNIRYWIX9TuBW7w8KPKA+hIJdE/js8Xy0sAriKNUfQiFN9YY0PH89mgNz
DSyG0PPmaswed051QIebxxAKve4uaIjnO+cTP8WSnCFUos+X34Gfp4N8fh+P
YUOIJ7KbWQb3iX997Tuo+HqDNwIDbmFwK9QnbrlnCFncUnAj4edx3MFrXJtr
GPEbFLG0BGBA7vYM/S48jGLn3xss4udd2MxzzyW5YdRx++UVbtxn4frxSINh
1MhorqOF14ca0WvZX4KHEcHjT6m+Jwa9qe5qdrHD6L1ofpg6Xm/+cro3z6QO
o0dSujslPDCQI17d4Hw7jBo0FhWmrmKQSnM9Zz05jMz0c5wOXsHg+jMnzmGr
EfQ23UwowA6DhKC0jITLI2hD4LzKPrx+Fpk1Sx/1HEHs8TsfVNpgMLulppsQ
M4IOyPBzTuD11v08i7d61QjKpK683DLDwG031h4nNor0r6TxcR3H4N7UqIOa
wiiKsw//du4Y3q/qBKdpGqPIs7k1IR2v/xOedxjUzo6ivBtDEqx4f3D9dk6F
FjWKKOGLJ16q4PUlavuRyvQokubAfCokMIi6cER8cGUULarzmj/F+1PukX+K
7zGOoUGREcZwvH+N0Ns+DgiPoTy5xglFIbyfoNyVGPMx5P1xh+Hx3Rg4rhjb
9peOoapR62EdIl7f3NKF7oaNIyuO7yFeXSWw/pO5eT5+HO02KinOaC+B1JNB
IXbp42jd0CCvtqUEWqXPDRx+M44OPTozsfKlBI6P8T7tGx5HdfzHb+zD+7+M
U+IBJcMJtHJAx0s1twQWL0Qf/MU+iTJEXG8XXi+B+9+Wew0EJ9EreateNvcS
kNe+EodJTaIiWnaXq2sJuOw7MXMXJlEP155Clksl8LOHXKzkPYlQuHsjw5kS
qLYOVYrunET51i3XGpRKIMbc/6hyxhRKc9pqDvpNgaSvsu6F+VOosu+xV9Ek
BTIMBrIk3k0hE9v1lN4RClC0DRn426YQz0KBrwj+PdUts/f7xs5pJMKpn2Ty
iQLSpGqnDz7TyOZ1QcXxJxT4gDHetzk1g34FiWu/NqAAw+7k0dC1WeQe/SLx
4I5i4J4NYefe+Rsd4XbPpK0WgdgnV9Ucnt/I5Ibv7riZItC5pRX1Se436lxc
c63uKIKg4SEJLoff6Kl6Npb2rAhm3yo5P6v/jQoGCdbKWkUwLTvu5XhiDikI
aLZpXXkNP5ruzEVyzKMotapI4ycFYHnTUTW9/g8qKly6G3/uJbizTO1vtl1E
uk67jO/zPweRgg+Pdkwuof3K3IlvtjLhZpmeBcfjZVTAl/tTiJ4MSnYtcw5P
l5Go0Uoyy4dkmNy2S6C8XEb1Ol75LK+SwdbA/7P522W0VNUgquedDBpdeejh
t2VU2ehtnkhOhpUFNjkBwgrijYrcVSHzEPwPdTOIO6+giFFDhsLIJFBod3rm
c3UFMWznDjBcTYJR/3nU4LWChBvdCd7mSWBZveumc8gKqhq5pRsjnARHTLTn
X6asoO/JVMLr8kRYcHv2S+7LCnpaSSprW7gPnrnupaqHVpFd7uBawe8E6P8u
mMyuuor8ZPjiK98ngMnqF59RrVVUnnFZdzM2AWSNZQ4/MlpFFq1FenwyCTA8
P1Kw5LyKjAQ/Lec6x4O1tsPTtxmriOm0XZL2eCzodJjHKe1aQ/GlpVQPnhgo
3CRc3cW1hkxHJaVax6JBUIpyks63hrRvU/VcqqJhJYh9Z5LEGjqUwhYn7RIN
mEhT2DysofxSlSbWqrsgcfV4ACVgDX19w0s09YoCVpKao8LIGrozxjztRoyE
8gCyxejUGjpNjpiv6YsAl5nvell/1tAu37zQE2URUNPtKsFOWEc7GgLmBq5H
gE9x+vjM3nVEPyknY0QLhx67LY/XZutIJ45jcfJrGOS9a7wpV4Xff6j4VHR8
KFjKJ7kP160jky+bAh9OhwLpuf2FjM/raHfmtvUF7lCwS1jWYf2xjvL5OU+k
pIYAh7MMaXp+HbXyytYq5QeDP3d8dIHUBqo00dTo7LkJ+tfOJss+2ECcxpYx
fCGB4JtUSbietoGW/Dl7g0wDIefdfvc3TzZQyNQZNXGRQCCR5o9pFW6g4OPm
Cka1AVDzKH7OpHEDhTKrD9KZAkCj5sMpr+UNJLCh0cP6wg8UeI6Sys5vImud
ArEcDh+4oJ59bePSJuqPyvTxH/eGuAs7f4LrJroVqWcfXesNUy87iz/7bqJh
kzWym6835Gl5X+iN30QTh51LhX55gbhLQdkWdRPF9Unc4ajwBP5yoev6B7aQ
vmuW8Xu4BluXXwpyHdxC51H41ta6OwyzH/7Ud3gL+QvMXK9/5w4Up+NivmgL
vVR03GpVdAcDzqvtz2y3kK92W/2C9FXwv1KmRkjcQhwplR/LFf8BO+5jw00p
W6g8K+1oz4IrHHvfdD8lawu5jJaL+rxzBXaegQmFwi2kqWdfzQKukFvNmHHh
4xZy1Lc59cHqCnTyWhAqN7eQRTLLl9Y0Z6io6SuMYthG3MSO33JOzpB91cXm
DMs2arkocv6vgjO41wZhE/zbSKdcOri10QkYrmU78R/ZRrNNujYpK5fhSMPM
Jz+3beRq8+dFp5cjJHlHJyr+2EYnu9V2ZF5wgLWvhWXRv7bR+oN5rhlOB3CU
ah0YHNpGly/fNeptsAflPgGFxLltJFemfT1BwR4mn1mOrDAQoMn23egR5gsQ
xzoWZiNMgB2l95uKe2yh5mhQ8h0xAuSwfjH3SrGFRReW/JIDBDCOD2GqO2sL
drWHWpgPEkBO1fcSW6sNyPsHCleoEeDzZqOjUss5aB5grtxrToCZtH7VmTEr
ILFlNJ84S4DEWNlplddWoKqhQPe2JkDe7cCH295WkPXwDHPTBQJEqTcacROs
4PrJx9Y33QjA/UnDUkjUEjjfyC32RhDga6JuH2uABZyJOi2fWUqAUgGL3Ec3
zCDXZu5keTkB5iaWXdBpM1iVS3TprCKAqvET8VMHzCC7ve0JWz0BaF+Mfbie
nIYZUSvukO8E2Hx8x5DL0hSiK+2W7ccJ4Ofw6ABx+BT0JWzy3JwigIXuM2mW
tFNwyDFLMWWWAOOjrPKNpqegi2nwn++LBPjutW9Rr8oIxK0u9yEiEV7wY4yG
T05C9dw/taJ7iSBy+iC/caQBcDfs6tcSIsIuRfmvlXoG4JxSsHZOlAg7RpWO
fiQbAKvOjHKiJBGWguOvFN45ATaxnrlEZSIY5Mc9TLivD4sSAbH0U0TodxnI
K6jVA9nzkZY5wUT4cPLYyNUYABuvUm6GMCJ053k07bUCiL47/v1yJBEmNjo5
rMUBRt4YG4nHEsFMQ0J6JARBNisvepaKz19pYHVgQxt4q19IZ78hwmuXngdU
KU043vFjZLuUCC7ZhRNZrRrgPcn83KGCCKHbfRtetzSgZY+HkEgtEYyPCCtN
dhyFe9dVubOaieBWLPF86L46EMQ+rj+eIMLMlHcmu7IqHFJbLVufJkLnb9oj
kSkVsDc56H9+jghK98TuEXNUoDLo37m9y0QgsdzVVORXAf8265E0BhIcHSv9
j7DrCExFjDeniJCgV5dZpYJLCfam741b3k8Cx39aemY7D4MhxfiktSQJUswb
3nSmH4bcPkr9HnkS1Oj824ZJHoaLKkFlyRokmBiwtgk6oQhdo8zPHliSgG9J
XN3zpDx8OBuTUX6OBA3/fm3cPSMHpXVMKQPnSTDezlRakygHj7J2xh10JIGH
v+idA/0HwdKK0b/egwT8qVvXOsNloaORYLRwlwRH4l0iy1eloEH59nGBWBJ8
rNRhKyyUgrdPt3VQAgkeXFmxC70oBQ+Dt5RjH5Kg1u6xJfWLJFiobAiJPyXB
h7T0dpd8CWjLWZ4/U0GCguNOfr7x4lDHHTAd+B5fb3/Uo+sm4oDd/juaVYPv
945Qngy7OCTZLfVOfiDBLMuL+rbE/WC+e6ExvJ0ELA76v+qeikFLxGwaNk2C
xaeEsbkGEaiZv/aw+zcJpJaK+rZtRYDiMJOw9YcEO6/lvzP/Iwz3NacjjFZJ
QCs0vUE5IAynFyau0RnJ8Gabw2MjZR80O47ocouQoWlqpX3lPwGgMbxcSd5P
hvn9xVdSzgrAYq5rsYAkGVpOh6tGL/KDwNTUPjF5MvycwqTN1PnByefP8iFN
MhztclBk/r4H1iK2X5tYk+F+t0BDjcpuYJOsdWq1JcNXTRfGojEeEP0ULmhp
T4Z3w12fKek8oM+6I8bOmQy31QRYJ8g8cP8hq9NVHzJkMmV3NdK5QPKFwN6Y
f8lwTEza4U0WBxw16G1hfUCGQwsLrVL7OcB4IuPu/UdkeJ5Tx3PpJTt4yYsu
pWSSoSSh4Oeud2xQ9Z9kS24BGTgSI3szJlngzAflqIaPZNCQqw1Zy2QCZ9cl
LcMmMihrB0lJajJB4K53C03NZPBX/ShR+3MnZJpqXGrvJEOa/K/Ow4I7YbwL
tOhDZGjWxQg3ihhhLZC04DxGhsrSzunHVozAJtiQPzFJhk2+CAITgRGUHAz4
5ufJoKe4h+W1FQPoE5mbfZfw+PAa2fwiM8C5518iV1bIQOt3DD6BkcFNP07z
1gYZFhr99IYvkeH//0eDTINVJMZNhv8DYnnNNg==
"]]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-2.5, 2.5}, {0., 4743.551301879657}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{
3.661174766250498*^9, {3.661174898402533*^9, 3.6611749326727743`*^9}, {
3.661174971617035*^9, 3.661174999181528*^9}, 3.662562913323399*^9,
3.6625629780549088`*^9, {3.662581017802705*^9, 3.662581026734263*^9},
3.662581321508395*^9, 3.662581368204636*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[",
RowBox[{"plot1a", ",", "plot1b", ",", "plot1c", ",",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "2.5"}], ",", "2.5"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "5000"}], "}"}]}], "}"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.661174633960438*^9, 3.6611747263832273`*^9}, {
3.6611747708918543`*^9, 3.661174802202121*^9}, {3.661175004220257*^9,
3.661175057446113*^9}, {3.662581306786034*^9, 3.66258130895284*^9}, {
3.6625813465844297`*^9, 3.662581374382675*^9}}],
Cell[BoxData[
GraphicsBox[{{{}, {},
{GrayLevel[0], LineBox[CompressedData["
1:eJw12Hk4Vl20AHDeg4QipTKlEkUavnzGyl5IUipDyFymZJ4TSoYM6cs8k8xT
hveQUOy3TBmSKRJCJaKJSETuuc9z71/n+f1x9jln77XWXmfvsnDWsaYxMTFx
MzMx/e/1xuTZubU1gjEWYFJuNX0VPvluXRhaIRjnk0Qs3xF2cI5ndPHxEsF4
Oe0n4ChsBzsVXFadfxKMqq6Nba1advD8Tgz72CeCkWFmHRNQbQfsBwd2MF4S
jF1PL64tRNhDnMelM7dSCcYWh/13NVUdoZjZPYdJjmCkOxErJ3xdQF63iC1Z
mmAozfgLid11geaccdt/DhOMtnWsgZvTXWBMXeuAhQTBeNT457ggdoGt9w5U
NQgSjJCeuzYDhCsECky1hDARjGia7sf1Ua5wUdp0hquNxiCGX7DEVrgBq7X6
EX5TGmOrZeV9XglP6DH7x2DGkMY4pNkvdeWYJ9y/KOhXp09j2EnNs7ad9wRZ
ze9Nl7VojDvG7ZW1Xp5gI51oWKRKY4xOmjefavKEF8yTt45K0hgV9esbhK29
4O79kFemi8wM8cj7Z4fKrsHmN00OWdHMDC395dnd7j6g05BiKdHGxGC98YYh
dfYW+H4/7hD1YQ1bonRdsWPBUH0txa7s/F/8NNFhx63AMDgXo7fzb/IK/iM7
/6yo/z9QT687d+rLMjb/UPVtbCIa8lqu97sbL+HDNWtfFZjiwSw4ju9VwSLO
NTJjEXmUBDcvEaWcm39h7e/SoiLX0oDpgAhWvT2PdXj3bTc+8gDeRiSHFr+e
wyeFtv3L5ZIFQhy2hfMqs5gtO1IwPzkH7GUkWYeEvmNNsbqMJ8t5YCn3rqCh
YQaTtwgh/rOFIOmtuOaUM4VTK25nv71SDJkjuo3XlSfwtpBTHdzRJTAZwHdM
fft7POw3LUbYlwHHjbLvsRzv8eZ6LrM0tzI46K2RPbYyjpelI/P/8SkDL6cb
HD7j45idrd1cK7wM2Iwn3jwsGsfaMrRV0/wy2PPvI0/e4+P4Cp4oqXpfBhaf
LpSNXB7DU+tO7N29vxxq4/epTemP4DlLocssSeXAbjxpyXxsBLOYrHbIpJaD
/s68QIFdI9hXw+uT1f1ymCsSZWjODOO4wCnBpznlIMHYcZTuP4wfuW20Pkcv
h6TpLf/4FAzhljuBfMxt5eCJmIW5lgfxnOfQmbilcnjOwjgqNjqI76w6uXmv
lANP200jpcZB3F2ltNVorRweXlhJdLk3iNdVdrziY6XDx6uLvK93D+Lot57v
nXjooBP3lf3+mTfYv1X+VJ44HQ5/Hpw/lN6Pf5rvsNypTQePHwcktgX345yf
5tdv69KhejHA9K9dP95st6owpUcHZTbJ5g75fnxCYUtVnhE1nqhP4tW+13jE
zdxvnRUdPE0FFLM5X2Pug78NDbzoUNtt5L/VpxdLKR/Tkkimw983pRWrl3qx
dSdbjXIqHVTGaFMf1XuxXpLaQ4N0OrR/K9Kq4OvFlQnWB/0y6TDM+WeXFr0H
h7dqheYX0mFNLbUxfKobuw+oM0Jq6HCidmj9qn4X3rahQOLyAB1Ki3IVWo52
4e6J807nB+mwPdX5avTOLmwltK9UcYgO/YtsMWf6XuHNpy8Kso/SQcxXnyd9
uRPb7IiLvPmJDs8DFrhA/SU+JeRMDM7TIcEi3KGP5yU+3KoWnPCLDldVhTts
33bg9R9qf2j9pgMPq1pEtGMHfpvXE/b0Dx3Mw+LWf4htx7ba2mlONBJW7kmz
hYy1Yq3hyDvHuUnocm6xFihqxcRuZNTKQ0K2lnFTqXsrVvWMXKfDS8Jp3qDg
ATbKHh2LhnwkJMf30CQOvMDtFaLbTwiSIJvmutZ+vRkPSHAW3hInwaWw7Pem
zQ3YIInjc7wiCYc3OgWpjD3HF9c1/VdwlIRZN6mN7iXPcSt91aL6GAluxwpF
+9SfY5fKL2mvlEjwfJV1LsHvGT6ORJSHVUj4Ob1fQ6YD49FnG987nibBo7LA
LMEG42C/Wj3dMyT8uiHmsciEcdLWsDkZTRJ+84hk1MjUY7Wh0dy5s9T3yvIu
HM94iuecpaY0tElgC/r94KRbDVZ7MRPsbEBCqKZnVT5XDRbUyTXee5EE9q1z
7ez51Xis2EtvmDJH4cyvtqHHWI11A/24EQncr95pnlerwnML7GsjJiREJRlb
lI8+wlfVvCdumpLAa/Hm2iafR5gf+3wRMiNhy0J3Vm9pJTZx5THWMidhu2DT
b4PtFVhCsoSMu0zN50fljTUkiZ8/ehu/w4IEgdJ6UYGzJP7O4ZiYS1lYufrc
cAAdMxKezxdZkqDaqa/xrL8MR724tynWmoSTl7U8gjjLcEqt7DirDQmn5jUy
1KAU276wf+lJWVPg+EJr4UOsd6R4WfMKCfo2opk9foXY0nRD9htbEu64uofF
PCrAo7IjEUeuklDn1+Cs8y0f32OLeBhOeU+spVKPeR72ifkQd8iOhIv3K8Ri
knLx5j8qJjcpRxQSG3S6c3A3+dmojfIczh7qVsnGBmeCVw3tSRBv//k82jcL
W8zJZqZTNuxXLdKuzMQnPUt931FmfPng3S32ABsGXuszcCBh6vsVxu66+7jh
e7ROFOXzbOyRWQfTceEabV0z5R3Sp6SyNqXgM9VhvBKOJNzWmFreFZSE31q6
XNWn/MU8rDVzPgEXP77w6xZlXa99Sbts4nGs+e6aAsq1d1/YZA7E4rIzLfSX
lHdl28rs0ojBduVHxr5TDqthZ8msjcIJbHonuJ1IeJehnat88R525tz5bj/l
ko5oFeWjETifEVKiRtl3qXsUdoRhN4cbpAllDXHeG8B8G0cmL31xobxNV0cA
Pgbgc9vmTAIpt6/tcfa/dwMnLZnRoinbGuYW3rxwDf9MUhhJo8xSIfbxhoAr
jojx+5pLGfg1jy8zrLHMC1Hph5R/JCVbzSbrYMdLUqVllP1ocU0n5RXQpeY4
s3LKB1MsW7bImqPJQpMTpf/7/vz0b5zcDihiLdi8kLKu9JunIcoeKJCJpzyT
ctWgQWCorw8ql2SWTaS8gTEj2mh0C2WA6Ww4ZRRbHNJ4LQgFa0i+v07Z1cb+
c2NcCDoc7cx+hXKWwn7NJno42lIgY6VNuY9rprSp8y6SsQxZkKfMNla0qXkm
EokNOzwVppxmKKNoGRyNVlwWqteo+ZZRjbf/wBuLtBsPzLyj3Cm1kGaZGYf2
1u3RfUKZienRmmV9InKIjmq0p5z8ecs/HzWTUVWURCeifKTXw8JqKAWJ3Gjd
sImyVd6/TVa/05GfrsehYipeViPjfn0MyUCNgSWbPCi3H1uOJe88QKTEaUlF
ylbiRk1H+LNQ7YXta3VUPB4W5HjnNpaFnI8HPvGlvMpd+4vMz0ZDNoxSWcoJ
S/z7pGVzEfcBecUcKt5bOgbvSOsWIHnh3ilTKl9svd+2GO8vRPuXUp+sUvnF
vmeIJZgoQtFmVqdSKJ/2Hb7ZV1GM0rnaolqpfOyQGHXz3FKGfiSJf2Ci8tXh
9WhZ+pcyJC0hfDeEyu8QcPllYVGOJsS//mCnvPeLi3SEIh2dd9/7nbCinqfq
VjI0TaKwdy+aeqh6Ip881/5dvwIpKqjoKVFm/+42TTRUICnFd1l5l0goTHHf
K5VaiU7WNVx3pOrR9KxHpt+ZKnQn9K5IH1XPHB5cixd+WIPc61dSWKn6eOzX
YsU/22vRpJqR7HF9Erg0vXvUgmtRyPPqeFc9Kh8WvbmdTJ6g7vNSWV26JHw7
5xNez1WHVvXk/l7RIqH6Zn19mSwDcb9gSK6cIuFB4d+XNQ4MJC3XeIyJclif
0khDFgP1TJgIMKtT9UUS/xnY+Ay5GjopLp0gYek1lmeafIbWS+oINwAJigee
kVqJDWhaLPNrnRwVP339CfWtDSh+wFInW5ZaP98vPlIrDaj27uP52zJU/Wnd
psp+uRHNB+6eV5EmYbO1Uy+WbEIHpRlfUg9S9SJNcP5gfTMyCFhVattDQgaX
l8yGiVa065vTNSFqf0ypiOD33daGer3qcos2UOtvlLk6pdGGmMd998hykXC3
oKOpsbQN+Vcs8KmtJ8H7hKi+n3c7MkkYGVIhSNDx6/Ka4XyJJFSsI+up/Zrm
xTdsxd+FLHz3kk+o/d/oUlFP9b9dqK9HSPgV1R+Qp1Erl1YXujSm4TdK9Q8W
IlerKkO6kFS9q+BiL9UPvHgaxTLfhcgI02XmDjoECVqp5XR2o9OXBiRDn9CB
5RlZ+iGoF/n5q+41SKKDSbF6rlxGL9IILZLnTKBDZfxwakRtL2oyu2TxNJYO
VnZs4dKzvShoMp3YGkmHps1GlkFmfah1eCEj7zYdQmyYt4sqvEZ1ypaGSm50
WMelFWDxrR+RwYvjWhp0uLjXiCG7fgDlT4aNVp2kQ5GK1RrHngFUVhYnL3CC
Dueue9+oMBxA//lfpg0qUf3LpwfXWZoGEMvaCr/cv3QQfzbrmpf6Bv0V9A3x
2kEHNa9Yi+lTb9G31IJlztlyCBrrV3XLHkGOeaa87++VQ3lqiNbNuXHkef3H
lW/+ZeCcZcXzUX8CWSiquk0GlYCZXYpwaMAUgpNHTg7eLIZwbS8F6bQZ9DZ9
NETethBYtsR/8l/+hkS8KmMf8+bDQPvtH8Hcs8hadx+L5HgO6PlayKY0zCGl
Rzy02LAscOCc2d1pNI/EE4NjMq4+AJHi5gS26QX0WVNFbvdwGvhWq+pypy6i
4g5Rrsi+JHDJc6iSPbSEdgZ8VasxiQcumpzFwYlldFbsKavKz2hQc7wQLxm7
gn4cqgt0+/ofbK8Rdlbb8xfpmpxVv8IcDjFuYdGHB9bQV8mcg7bGwaATcv5A
ehUT5Cx/drPPvAWSxsF6OTeYgebKrx3O6guGrlW8LAHMIN/2oyf/iw+EhU69
sgxmhrzajd5ven1gokLztGgEMwiz+FO/Nz7wgIsPZSUxA4eq7q1r4AN89bn7
HlQww5nm0PQx/+vAtKvlT+pnZvgvMyrqA6c39H9anxWrR4Pa/bnvJ/Q9oflC
eFrNRRoshUp0l6h6QtVz9sRRYxqE76tpDjrsCQn3193db0GDo3JCDw05PEFP
n9WrwYkGJkst2Q/rPaCvien0z1Aa/BaQs/os4QE9OYuzOrU0UD/0e10khzt0
Wkwo84oQsDdmOGfTTxcYZ8n/Hb+bAL/WEqmz4y4wn2dbxi9OgHrER76kVy7A
PzMjtOsAAfGPVSaNH7qAlfvc4qGjBHzaKRuQYuMCy0FrJWcNCHCNHhjvf+IM
4rn8AuGRBNBcHCZlyxxBQX2oiyuWAAWDq5YWkY6g+TktNCqBgCGfKJ0iZ0dw
PbBzITGdgEw5UeXIw47w9JF4V14xAV7hvubFFQ6g0ywd0thCgFQJlAhhe7C2
XTh2qp2AgPmtnWyZ9uDN8fhneycBLFJYiSvIHtLPKV7ufU3dX36oxVbdHqb6
4dj7DwQkCfD52nTbwbI37af1JAGt0h93SlTawQbBxsLP0wRc36EcwpZoB0fM
1bfNzhIg1PhKfZOpHagxr+/0WCBgffmuW0pgBxez24J//yZgYVz5cIioHdip
3T3qt0LAZpEzJ6fY7OD/zjfg/883/gemDkOH
"]]}}, {{}, {},
{GrayLevel[0], Dashing[{Small, Small}], LineBox[CompressedData["
1:eJwt2Hk0Vd/7B/A7IKJCyRwhRZlDIvcxlxAJpTITkgyRzCRJKKSMDWQe72lW
7BOSaBCReZ4iig+Z3d/5rvX7667XOnvt8+yzn/0+d53dDpdPOlNIJJIPmUT6
32/IuPEcg0HFpeosozBuKowF7VzoXqPita4tP13PUMGEs3/x1TIVP/TDeJ7r
CRVE1bzWL/9HxW+5yjsfVWKCmtgk1oExKn54Xn813ZEZWGV/7sK/UHHloBC1
tH+bwLvm0e7MRio+vdRhMmvMCl2WrhIBH6n4VJi3/+U8VigOW5aSf0/F7x+s
YfptzQYm3wWVHz+n4pF9Mi6GLZvh3hW74+EZVHyx65Jw3/oWWGeVMjmXSsU3
4pwkTd22gkvWrOmhFCoe7S70UaJ9K6jWR1r+TaDiD+pDzFmeb4Mu3lx7u0gq
HtOqqXsX5wTRt7+ughsVF6zW89bGuOHWCSxQyIWKb/5SqLR9nhvmhgNDlhyo
ONvBhIbXKtuhloPjesU5Kv7L6N6OuOrt4GIjmyBqSsUVNBKVUjt2QDHZ9ylJ
lYpzHlNvjTzEC4fMi1jSlKj4mVkz2cw7vFD/dNBVQZ6KG8vzvRgY54UBA1MZ
BykqXrN1IXs5gw92Jsi8rBUk6n/3M+M7twBECkx8jCZR8SO7WGI8NYWB00NE
WmSdgmetFLisFwpDVpVl3KtlCm77yMZwYecueG33wXRijoJvWr20JL+wC6bz
sjuPjVJwx0gz7gJ7UTitdH6Ko5GCb9zmCmOzEIOxqHvGufXE9XrnAdEHYuDb
3lR+pJaCp4R0TnJ2iUHCtcNXPN9RcOfE5MYoB3GoRbzr38oouH9zSwk5VAJk
jVq2JidT8KfaabeTByXhXRab9/67xPzFDeCquBeO/YHW2jgKfsj1USYtai84
JZU/mL9BwX0SzHLI+/dBekecqGUABZ/uetUhfkMKmJ0NFPnPU/DZK18lQz0P
QIuNgtXUGQpu8fq7mlnjAXh4WjC4ypKCazaX9MrtlQEVoz8f7E0peEbOI3+B
ERlwUXpwpkiHgi/9s/X76y4HDeTxcHVp4n7mVSw3rRTg3mpz7pa9FNx31YLP
J0EB7BYqG/vFKbiSVqn38gcFWJ5I2BElTMH3JvMwhlQUQbpZpeAzJwV/5tis
ZSSqBHEPo7+dXyTjAoKFO39yK8PpVK95uXkyPjmrraR1Shkkkqz5KbNk3CBK
nWR/Xxmqbsg65k2S8R1vL3k1CKnAjEf7v5leMv5g5HOVi6IqmKpL7gqvI+MF
EW8EPSLVYHvHB4/sRDK+ef4Lb1aNJuD7n8REJZBx07yiDR8hGniEBT91uU3G
mS7nhipcpUG9pFKP9A0yTq77IvSaFyDQ7/HxZwFkvEnqvuf9NoAh7iDpOlsy
vs7cX/fKVRvuuFjq550j4xSmraP2WdqgUangEHOGjPeG6E7fbdGG+/YTaUbm
ZNx3bfvOSE0dMKywYGvTJ+OtmFvDNyFdwIzlJ0ZlyLiJ3E+JnfN6YPuEnalB
mqhX4UdkioI+cCyMiRTtJeOOtxnsJZf1wSUzy8pzNxlnVcm6mDOtDwJTmz/+
20HG/dOFzHr/GkBkzGjupjUSzvmT1JrEYwgna9MdpRpJuGkUJr5p0AQkfoz0
fawn4a3vq3dOHz4B/0ZkrV1qSXi+uDnLy5QTkMZSa5rzjoTT931nXZM0hYFj
U0eEy0l4TXzz71cjpnCpWZ2P6x4JN37sMTXmfxI0B28kl98l4Y8Fg53sik8C
59y3rSbxJHwvU+YJ64GT8Hy7E/PtaBIu0KBk33rcHFYs4+aYrpFwFzX2hYV9
pyCmt+fz0nkSLmIk+7RnzQKsZySPPrAm4aXyzu4/1CzhAMOrVtmKhHOfTXh9
7qolfBNlrvQxJeFz1135xOctYaeTTP5vbWL+Y87mT+etIGcyJGJgLwmf7L8Y
e4HbGoL+HPG4O8xADsPnDmY22ECmveoE9DLQ/bEX9cY7bOFdq7zTbDsD9QsK
D2fY2cLGK/FzJxsZKCEsOoJr1RYiw9mMdtAZyI7W7ledYQexXG37U0MZqF5u
MDFl3B6Kr3/NPxrAQAqCuqu3uR3g88JH8WVvBgpvYjrbccQBtnZVClo7M5DV
3tz/rqQ4QFL2Y3YhIwaa+BRq1nTUEdKVPKYe8RPjT4rVn8Wd4G2u8wXT7Qy0
1BE88fuvE/Tw2g6TtjDQFj3N+e7dzrBrzazbnsRAvenrTW1RzpBdp9okPr6B
LoFntv4JFyi0oBbnP99A1nTK44R/F+D11XT38hMbKNj/+jajpIsg5uSd23F0
A+laG+RW/bgI8aZHB8jaG6hsV1ZTBa8HOEj9szh1cANVcw+57XrkAezdZlrL
fBtox79FQ6nnl8BGk41PZ2gdaSYYON9dvAxU5oAP7VfW0XPRiE0CV3zAc9aE
RPJcR5u3Hv6w5aEPdPTuUZe6sI421CvLjBp8oORla0XQmXVUJvb2WKmwL1i6
ymWKaq6jpqwNP8pnXyhoGvNx37SO9N61lWir+oFJkoXoRtoacvKmTx0xDIBA
xW3HDJLXUMwT5w6NkADIa2nwvhu3hvR+ysXHVwTABrdGrVjYGipqum63h+8a
lCaLuRg4raEeNtoOlalrwJHyp/iu7BpqVR15yPMkCBof3FIVr11FSiu1KdHG
YfBPVcfO490qirr3z1b9dhiIdazFvHixivqKdtKPfQqDQD6vLoOCVfRfY0m/
mng4SKVZhnjEr6Kth4LyI7LDISZdvPaF1SrKf+Z78GFhBBhkVZkc/b2CdPac
KCruug5/43vWmMZWkBu7p2Lb2nVID10tet+/gqqtunn2iUTBb1u1TeqtK0h2
VETC0CkKksReIJnKFcSe/K4u/G8U9OWXyG+PWUFereHmNZzR4I9lcPeJr6Ci
z1KxHV4xIJpTiacLryDu6fYqrdQY+JTc6WnFu4L+UxRxakMxIOTH29S8eQWF
SufxBG+7BTWqyddrZ5fRqJakxceKW7C1Kna+AC2j3yfYHC1XYyHv47V237PL
6D+W83lGFfGQpuivU3iKGC9d5tI0EA9xWT4VfcbLyKRw420QVwL4+F6MPQbL
qEe4a9nLNwGOiJzXFNmzjFZD67xL1O7AD3/Ia5xZQlyWweGlF+4CRXKT/+7I
JbThcNPr9rYksIm6x/OtYBFxi+2T4M1NgVA7ahn79n+o4OPwvXbZLCDJiCCd
G/Mok7cy8nteNnTdTrtZ3DaHVD+N6ZGk8kFos2vhvPYsym9R1ZyUKAab6s9x
YhqzyHjpZqqucjE88VHwMlWeRVdHcm1T9IpBsntFpWTvLKIJzA3zuxSDXEl8
nSPHLJqxSk0tySsGbZNn/S1tf1Enn03F+J4ScEva4KG7/kVdR9e/KQqVQom+
43KfPXHd4c0Wlf2lMLPysYfj7F/0zPr2ZZnDpeDjmJjjavwXbants1myKoXg
gxIKoop/Ua5Nh9x6UinsKk1O3bX4BxXxDku/YCmDi8rSzN1Cf1DqvX82gSNl
4MP8Jt9/2x8k6v3hQ95sGQS2GRhyU/6gQ18at9ZvlEGsn/OdY+MzqLoqUbCX
rxyKXjzmf02fQdbxnvMXjcrhlzKvbIr+DMqmSVZS6eVwQYXJ6oTXNLpzm+fT
tGoFeLIkL086TKNNYYymgiMV4N++OzPaYhrZZuzHzulUQLQ/bbDq8DTyylYW
LDepgLyXgRcPME+jahlb1g2nChhVmQ1jS/+NCtqtmrTuVoCjal9Bbe0UOnJ3
/aLpYAW4FKha6r+aQlWzpzu+jVaAO38i9VPRFMqWFvx5dLICvFZ1bL4mTqHM
eKWYvf9VQDAq3N5pO4Xe0rZlP2Ciwz0Dv9CZ1Um0skNwn7YkHeqtOE7xH5xE
Q1+C0qud6PCpwZmcuZewqFHgZVc6fFYjokxwEsk8fj3G70GHFkEfNgnKJBLm
rLpw1pcO/f0/q2Wbf6HDY1rCiRF0WLqQI6Xr8Qs9eHSTsyGTDtIBhxmeTyeQ
f3ckj8dXOuC9JtLD9ydQWV7Et4TvdLDUcbSwujWBDj76JFr0gw6RW+OKaZ4T
KB1/n9TYRYfOp71WnIcm0JEns8vYGB1ivodX0JvGkbxMt7TEOh12qaZ076ke
R+SNosTvDDo8zyxkSa8YRxbNt95epWAwcKHlXGTKODr8iexctgkD1Q1xNnPb
cbSsLeH2gQuDMemP9vNzYyjB7e3+LAkMgu92x7mOjiGbw94nOyQx4P7351XP
zzH0KVXLl0MKA833fFs/vBtDnQxLzFYGgxQr98qU6DGk/s85CVPGQLoqdJTt
2hi6UVq18EIVA1wsmTP04hgKOHTRB1PD4Pf0WxcX0zHEYcXZcP8IBrpRW7ar
Cowhz/fnT2/Rw6Dr127NYo4xdJNKXunUx8DrhIqbCGMUyUe6tD86ikGGgC3a
NDKKzI5+MuU1wmCuouJiR+koSnRrq39xEoMnveZ117RGkfjhgPznNhgojiiu
/Dg4ig64OecwbDGom+SSl983inYkHV/StSfWv/gtY2zrKDreH/Gu2pGon9vI
17xnBHmXcAlddsXgLd/+wrJvIyjngKhxvBsGRiKb+9lqR1CSWca/XHcMPA80
GOKFI0jh/nBNvQcGmL6umMzVEeS/PEuv98JAx1j8dIz7COrpCeF9443BD3NK
wvD5EdTLt8CT54PBPzt8OU13BFHNDsxcvoKBepDGdxbuETTzTDa89ioGnyME
Nzkwj6C3aR67bwdgYBOzolG1NIw4jqwGG1/DIDzldYFv/zBalFvxrQkk1ld+
MHygZBjd5CrruBSCgcXL7S/VHw+jUpvbteyhxHrfzU3dTx5GVpuGYp8SZm2s
sDIOHEax0tp4fRgGac134gsuDSMdzgUV03Diefz0rKXaDyMDlisZPwgbjxyQ
qzQYRjb7tGlfIzDom2R35lEfRv5vjW7qRBL7NTuZ7iU7jDrZ078+I5y0UcCy
l2cYubPGety4joE4c4xGJOswGmBZahoj/Jz9gk/v6hCq0adp6ERh0M63py95
aAj9ekO1nyZ8QYRpx5+2IcQnYb1L/QYGS3uGjxl+IsYLa2xcJ3zrQE1Y7rsh
ZCcgwNxAWEDpyQtSxRBCK86qm6IxKFYLnzqbM4Ss15PStAhrgO3uV/eH0GQZ
j/xVwl/0Na24Y4fQ7y5HRj5hG2Ph+EshQ8gyeJ79B+E/5ms1DV5DyKSMZr1K
ONy6e0ncaQixZ1XPCN/EgMu+UjbMagi99Z/6ok44+0KaU5fhEEo4p7V2irCS
Z0C6suYQajLXCHUjXHfFqvmuwhBiUT1z+hphyyAVlt8SQ+hSPs+dKMLjETwa
BnxDSHzjj+RtwptDyv8kbybqP1jHH09YNuBYzsDaIMpYeFd0i/BJ32FLmT+D
SFH+Xn84YX/PkM2Bg4PoYghTtQ/hdDfe6vrWQeTD8em4LWEi47y31w8i5/is
BH3CQ7bH99i9HkRXhTTj9hFmOTvaUVI0iCxkLhgyE5a2DItbzhxEj/3bvvYQ
6zcx4wf9O4PoXq+eSDlhH6Nn/yVFDKIuez+tYMIpBsb5/b6DKIxtt7ou4dfa
49YHXAYR3xdm7v/tR8+RiK3XTg8i5qiBpjpivyQOvvDjPjKIDLa6M+QJH5U7
IWUrN4jU1BOj+on995D+1VO8exB5Tjyk3iL8XFRYV49lEH3xOMPyheifDsFX
i4lLAwhLDky5QHhtp1lx3+QAOv7CXXmd6D+dLTe4A74NIL3jqdX8hF1YRerr
3g8g6xc6zx4T/RtLfXON6/kA6hlM+yZGuGX590BR6gD6KsB7n4/od4exU+W9
9sT8sR+WG4nzFD044yB9agB13dds2k+4qCdm51X9AfRRZmj2ZjCRRy3vQjj3
DyB3EWMLxSAMKGHHUqMn+hHN5yu3KXF+Df1CGCJf+lHRRs3+OOJ8J16ku7yh
96PY8tX6Wn8MRE/zK/8O7EeHhJ+k7/HDgKbw67vZln4UbLHT/DmRH9F7hdWm
ZvtQuvs9gS9EvnwVNnsc1d6HSlim7g5eJvp38xvPV4/6EFVZ8/H6JSLPh2PY
hRX70Jln5cMUIq8qU/bpTVj2In4T+Xp9Iv9Yz447kjV6Uah2cYSYHdGPonmR
Art7UXbs5wsrRH7OFYnjRlM9qGyPRsPDcxhI4bvU6WE96EjmS5dKKwxSJ3co
BBZ0IyHHQn8tYyJfyltPJMd3I8y59ODQcQwO+iV5lvh0I/35Oo8wQwy+MbaV
9Gl0o5VTiTblBkS/8bDv1fnehY6GRn0b1cLAj0YW5ljpRIaTdC468T6pYcLV
9/R3oi0dH8oED2LA2RhqrVnXic4q1XJdV8Sg5NTaA6+ETuR7aFz9qBwGI26L
3G1incgv+/fjkn3E+bg3zfrweAd69OXAk0EBDOR/dc7LZbUjlvkZFUHi/Xnl
r4wUb1Q7qujI/350lQ6vFyPOb7i3o/yy0J1XlumgxSJd//lQOzLzw4trF+hw
UjzwgduPNvTmvaedwQwd/M4LHM5hb0MpwWL1w310qPxuHbYzsBU9PLXlUnQ1
HXQru9nWLZuRWLOaHm8AHcqKctU+qjcjFx53hxQ/OvBlXHZLFG1GZ3xS0rmI
/xPtiyxJx398Qwa5bq5MnnTYE2TJmbXyFVV+HW5udaRDTcQCBxh8QUOcESFC
J+iwlqDEEj3wCd0KWnzqJkEHr8LyJa7ttehG0OWEmMYKsHQRf9ISXIgYucZz
3Dsr4OPnzlgl8wIa7vjpyaNnZXBY5j1m+qCWJljgcKN5cylQ/Hl6nPibaczm
KcxyfsWwicM0wmGmncbq2Xi963UhXB9o1/HJ6aWdzk+SsmQqgIqMaNPQuUGa
tKwZcvLKg8vZTpwjlqM0co7/dqX3T8HGPV34ZsQE7WJb3cqoag7cMvNXU8qc
okX7XHmv8/4JMO1IGQtbmaG58bQ+k1d7DD+bbvyN2jZLS0keSrF+kQUWQQ4q
6bVzNMlTnNn/DaaDB/uU2Ffredo5heWWLY6pIFJcf59lcoH29EvXkagd9yHo
tY75toxFmq177YREVTJ45Xm8VJFbpiXHJYb1Pk8EDoqqg+zoCk1T3mvtmNUd
0Lt0KkU6eY32Ru9B2FDJbeB7I3xZT2KDFoSN++TdjoEkn5hE+Z8MWgr7nSdM
fjfgZPQJmayXJNit8HtepTMSpM9GWTwNIYOjYZqh4q1waB9jy062oMB2j8UF
oaRg+OowqsUtQoVT3KMc8q0BMMiUv5QiRoWp1968brUBMJ/nWs4vSYXcZy9p
Rc8CgH9qSmi3DBXc74X36d4LACffuUU5dSrElJWwdlsEwMp1RqmxFRU0L6Di
mK6rIJnLL3DrDhWaFRls7b/8Qc2gu5kjmQrOE4HhW7r9wehX5s2796kQOaFQ
ZfTZH7xlRBceZFHhj//50KEyf3j3QrI5r5gKOeTVFvcr/nCyXim67iMVlBk1
tr9J/uDsuqBxtIkK5eYGsw/n/CBg86v/mr5SiTqVhM+M+EGWyWH71jYqaB0y
Uxv56AcT7aAxNEwFE7ZpZYs7frASQPnPeZwKJ3iZTHQj/GCLYF3hr0kqvG9J
nzzs6weKtga8s7NUsK4yz9O08gM9MtvXKwtU8NFaQ8eP+cHpnMaopSUqXN2l
YG6n7gfuenHqwWtUaH+ifD5Yxg/+/3s4mOwz7n4k4gf/B9Ytj90=
"]]}}, {{}, {},
{GrayLevel[0], Dashing[{0, Small}], LineBox[CompressedData["
1:eJwt2Hk0Vd37APA7UGQmIZmSMSQyZNqPJBIiIRIl5JVkHipkSGR4o2QIqSQi
rlOvTLnGJiVzQrjXPEbIzO981/r9ddZn7bP2Pvs5z36es46Y4/UzziQCgeBG
JBD+dw0eM/mzvU2uMZU26X0i4gejN/cs9W6Qa7yXygNIcn5gyjmw/G6VXNPD
9GDnVXU/ED3quXl9gVzzX5cNs6m5H9TdS2IaHCXXKM5NNp2P8AMmhR/CNd/I
NU+dq0ip437w0PfiqduPyTXhbEoj2e/8oYDok0NQI9fQi7SmLrkGAqOzgZLA
BVJNWPS9Vzbut4Cnu9H9WSKx5trLKv8d5rfhTH36ZZkvhBrEfszsYkY43Pyt
7X5/aJuaX2zHWORwB8oC0t2KT29RT6caKIgejQbTJEvRrbQN6kgI09rLrFgw
yHxvaji9RmXZlI3eZ/Av5H4M6vI5v0p9SWoSVg1JBPvIh7zf85apsd9kCtpe
PYCQi+QiFp6/VBPjtKWhn8lAkBeh6t1ZpN6dMtC9tz8VemLT7hZ0/qFqvo9i
+dGQDvt2ueYvHpunxiwQJrYuZMJVFVnG3n2/qeuRpLpxmWy4rNafV18/Rf3S
2XRitugpyAZqbHvkjFMfxDBbKEs9h6e/LBqCdEeo9XtSvpc15cBYGK+WAT+d
OnfBrd/vQi5UJEvrj1v9ojoVDyZW8+WB4sTPxUOZXdSP5gLpd77lw/GKXuZN
qxaq1wuTkynOBeCZX7zCxVNPLTvjaGYo+BqsXMSftt3KpzLp5rU8e1UEH7/+
vKdskYd4WvU1v3BRQEO+FjNLqUfN946djGulgEpH16Pqz/Vo3eM+n1oHBRRv
Tt+Q26hH7w1efRvsooDkZz49pksN6Bz98KRiHwV4nD3aqbKN6PlSPFY/SoHp
DMFFheoPCGk8HytZp8ATVn8VtpHPaIdOeNzzAyVA8uftcxJoQXLJmglXvEvA
9uKrtrIjLWg/BWXN+pYAZoQ+s5q1ILPbfY0+ASXgKPJP6duoFvQpled04K0S
qPtUdZ9hsQUtNfTP/hNVAhGCTvo5za1ob9t26HRaCTDUYkVDEe3o7ytauxW1
BOwKDF6oPWlHnFR54/TaEnib3Pc4tqIdWdI+uffWl4CT244Y5fl25CvcmGL1
qQQaeWwvR9h3II3R/2QUW0sgyoXIL360E7HFlHS400tgJ6tZmONsF+pmNWeY
I2FwTsq2RpX5BzJktfn8gwGDV8ectncd+IHSvjQ1V+3AwDQoMPiNzQ+0Mm59
L2QXBo9Gs4MYGn+grxVDpoNcGEjWznvlPu5Gv4SuWAmIYhDYt065UdqNMi5K
SrWLYfBlmXHOtLUb6Qj9XYgRx8BDYa/H8o6fyGpb0HNWEoPSx8fcDL1/IgWX
ab8keQz0/R84Thr2oB8vEhuPaeDrJWY+rb7cg/a1tml90cRgvPDlYFJID/I4
mX3FVBuDuKFKe823PUjJ+UijMWDQYTZsGyfSi3a2lO8TO4GB00EVC4W/vchz
o273AXN8vRMoicTVh1LCxuJ8z2DA5HiytetgH4rU0nSvtcCgMPXC6dBLfeh5
TJ+xmRUGi4xRp1q+9iG228B67DwGEYNdet7PfyEX+ntZLycM+stPXQus+oVa
KhQMfJwx0HhQ8yik8xda2u296eWCwZz+q4l7O/uRj+mMpLMrBvYFwf8+v9qP
6tgKV8XcMaiI/FOWH9mPvjqXejJdw4DX/gq9OLMf+c9aX5zC/ZXTXKXqez+y
i8hMzb2Oz+9/oLdDeQCFhfgvz3vj8TmdxtBrPIBEC2LfV/pgMC/NrkBzHkCG
shE9Yb4Y5PUu355JGUCndISZyP4Y7NFtktyxMYDYSK0V3YEYqLOJSkftGkQ6
lS01kUEYjAb1aDHzDaIn3snrcjcwOGZx2oVDcRBNSR3f8rqJwSrj0XJBx0Ek
1tNE/RaMQa73wrcsj0EkcClpwTYEg7MDr+liNwfRzZpXR4dxU8r2s0o/HET8
p8KnJkPx/Uv8Ei3IHkSHClJMXW9jwJKUoqLwehBVOxZgNNwuV1kdjnwYRFWh
nu6fwjDY3f3B513bIEpV9ypXCceg7nhYtMbAIJpg5PibhVtI+G8JrAyiltwy
OecIPN/uUT7UM9BQvCm7cB3uwGW33hNcNLT++eHM3kg8P1oGGExkaejyei1v
De5w7XSBFlUaKvQtcma9g4Hiq7MKFno0NOVgHX4Wd/8eDr2u0zT0/p39lVTc
sRGfrW3saGjpkAtnN271uQj3PlcaqtPlCOKJwuNnpxPm4IePq61nGOF++Hkl
mR5GQ+aaTQHBuI+pvnnlnEBDDA6ijIW4555do46n09DB14+hC3cWh3TH1Zc0
5KHcL7GB2/gWfXz2DQ1Vc8RQhO7i8R/P2PSqoaF9wdp9GrhzLa25l77S0J3B
jBwL3GfruKQCf+LP32nI6IqbdOir5voIDZ3UHloNwE15HGUW8oeGvhuwh0Tg
buKJGuMg0JFYdtH8PdyjsXdCnrLRke074f3xuIkMd3iVBenofk4z8//G992K
LGyQpiNnrUPPw3CrLUboWanSUbAENu6D+4x7RM+YHh3xznzuuIj72nC4V5A5
HVUITl4yxB1tF87E4kBHEkZ378nift4R9iTDnY60VflO7sRdbRymqnCDjjS7
OVP78f3/bLj9jXqXjv4ETHtRcC9q3XYyT6Yj1Trx1lu4Of4LXac/oyPP/sMU
Pdyy8qFJvhQ6Oh75gJkR90WhkJqUJjpKfmLMG4C/r5vJwdYyP+koY29ulRTu
R2zBsxWjuK2sP7Xh+fB18+a+fuIQKvPq+cuHe8zv5pvrHEPI0LiaHcPziTR7
w4goNIRYWIX9TuBW7w8KPKA+hIJdE/js8Xy0sAriKNUfQiFN9YY0PH89mgNz
DSyG0PPmaswed051QIebxxAKve4uaIjnO+cTP8WSnCFUos+X34Gfp4N8fh+P
YUOIJ7KbWQb3iX997Tuo+HqDNwIDbmFwK9QnbrlnCFncUnAj4edx3MFrXJtr
GPEbFLG0BGBA7vYM/S48jGLn3xss4udd2MxzzyW5YdRx++UVbtxn4frxSINh
1MhorqOF14ca0WvZX4KHEcHjT6m+Jwa9qe5qdrHD6L1ofpg6Xm/+cro3z6QO
o0dSujslPDCQI17d4Hw7jBo0FhWmrmKQSnM9Zz05jMz0c5wOXsHg+jMnzmGr
EfQ23UwowA6DhKC0jITLI2hD4LzKPrx+Fpk1Sx/1HEHs8TsfVNpgMLulppsQ
M4IOyPBzTuD11v08i7d61QjKpK683DLDwG031h4nNor0r6TxcR3H4N7UqIOa
wiiKsw//du4Y3q/qBKdpGqPIs7k1IR2v/xOedxjUzo6ivBtDEqx4f3D9dk6F
FjWKKOGLJ16q4PUlavuRyvQokubAfCokMIi6cER8cGUULarzmj/F+1PukX+K
7zGOoUGREcZwvH+N0Ns+DgiPoTy5xglFIbyfoNyVGPMx5P1xh+Hx3Rg4rhjb
9peOoapR62EdIl7f3NKF7oaNIyuO7yFeXSWw/pO5eT5+HO02KinOaC+B1JNB
IXbp42jd0CCvtqUEWqXPDRx+M44OPTozsfKlBI6P8T7tGx5HdfzHb+zD+7+M
U+IBJcMJtHJAx0s1twQWL0Qf/MU+iTJEXG8XXi+B+9+Wew0EJ9EreateNvcS
kNe+EodJTaIiWnaXq2sJuOw7MXMXJlEP155Clksl8LOHXKzkPYlQuHsjw5kS
qLYOVYrunET51i3XGpRKIMbc/6hyxhRKc9pqDvpNgaSvsu6F+VOosu+xV9Ek
BTIMBrIk3k0hE9v1lN4RClC0DRn426YQz0KBrwj+PdUts/f7xs5pJMKpn2Ty
iQLSpGqnDz7TyOZ1QcXxJxT4gDHetzk1g34FiWu/NqAAw+7k0dC1WeQe/SLx
4I5i4J4NYefe+Rsd4XbPpK0WgdgnV9Ucnt/I5Ibv7riZItC5pRX1Se436lxc
c63uKIKg4SEJLoff6Kl6Npb2rAhm3yo5P6v/jQoGCdbKWkUwLTvu5XhiDikI
aLZpXXkNP5ruzEVyzKMotapI4ycFYHnTUTW9/g8qKly6G3/uJbizTO1vtl1E
uk67jO/zPweRgg+Pdkwuof3K3IlvtjLhZpmeBcfjZVTAl/tTiJ4MSnYtcw5P
l5Go0Uoyy4dkmNy2S6C8XEb1Ol75LK+SwdbA/7P522W0VNUgquedDBpdeejh
t2VU2ehtnkhOhpUFNjkBwgrijYrcVSHzEPwPdTOIO6+giFFDhsLIJFBod3rm
c3UFMWznDjBcTYJR/3nU4LWChBvdCd7mSWBZveumc8gKqhq5pRsjnARHTLTn
X6asoO/JVMLr8kRYcHv2S+7LCnpaSSprW7gPnrnupaqHVpFd7uBawe8E6P8u
mMyuuor8ZPjiK98ngMnqF59RrVVUnnFZdzM2AWSNZQ4/MlpFFq1FenwyCTA8
P1Kw5LyKjAQ/Lec6x4O1tsPTtxmriOm0XZL2eCzodJjHKe1aQ/GlpVQPnhgo
3CRc3cW1hkxHJaVax6JBUIpyks63hrRvU/VcqqJhJYh9Z5LEGjqUwhYn7RIN
mEhT2DysofxSlSbWqrsgcfV4ACVgDX19w0s09YoCVpKao8LIGrozxjztRoyE
8gCyxejUGjpNjpiv6YsAl5nvell/1tAu37zQE2URUNPtKsFOWEc7GgLmBq5H
gE9x+vjM3nVEPyknY0QLhx67LY/XZutIJ45jcfJrGOS9a7wpV4Xff6j4VHR8
KFjKJ7kP160jky+bAh9OhwLpuf2FjM/raHfmtvUF7lCwS1jWYf2xjvL5OU+k
pIYAh7MMaXp+HbXyytYq5QeDP3d8dIHUBqo00dTo7LkJ+tfOJss+2ECcxpYx
fCGB4JtUSbietoGW/Dl7g0wDIefdfvc3TzZQyNQZNXGRQCCR5o9pFW6g4OPm
Cka1AVDzKH7OpHEDhTKrD9KZAkCj5sMpr+UNJLCh0cP6wg8UeI6Sys5vImud
ArEcDh+4oJ59bePSJuqPyvTxH/eGuAs7f4LrJroVqWcfXesNUy87iz/7bqJh
kzWym6835Gl5X+iN30QTh51LhX55gbhLQdkWdRPF9Unc4ajwBP5yoev6B7aQ
vmuW8Xu4BluXXwpyHdxC51H41ta6OwyzH/7Ud3gL+QvMXK9/5w4Up+NivmgL
vVR03GpVdAcDzqvtz2y3kK92W/2C9FXwv1KmRkjcQhwplR/LFf8BO+5jw00p
W6g8K+1oz4IrHHvfdD8lawu5jJaL+rxzBXaegQmFwi2kqWdfzQKukFvNmHHh
4xZy1Lc59cHqCnTyWhAqN7eQRTLLl9Y0Z6io6SuMYthG3MSO33JOzpB91cXm
DMs2arkocv6vgjO41wZhE/zbSKdcOri10QkYrmU78R/ZRrNNujYpK5fhSMPM
Jz+3beRq8+dFp5cjJHlHJyr+2EYnu9V2ZF5wgLWvhWXRv7bR+oN5rhlOB3CU
ah0YHNpGly/fNeptsAflPgGFxLltJFemfT1BwR4mn1mOrDAQoMn23egR5gsQ
xzoWZiNMgB2l95uKe2yh5mhQ8h0xAuSwfjH3SrGFRReW/JIDBDCOD2GqO2sL
drWHWpgPEkBO1fcSW6sNyPsHCleoEeDzZqOjUss5aB5grtxrToCZtH7VmTEr
ILFlNJ84S4DEWNlplddWoKqhQPe2JkDe7cCH295WkPXwDHPTBQJEqTcacROs
4PrJx9Y33QjA/UnDUkjUEjjfyC32RhDga6JuH2uABZyJOi2fWUqAUgGL3Ec3
zCDXZu5keTkB5iaWXdBpM1iVS3TprCKAqvET8VMHzCC7ve0JWz0BaF+Mfbie
nIYZUSvukO8E2Hx8x5DL0hSiK+2W7ccJ4Ofw6ABx+BT0JWzy3JwigIXuM2mW
tFNwyDFLMWWWAOOjrPKNpqegi2nwn++LBPjutW9Rr8oIxK0u9yEiEV7wY4yG
T05C9dw/taJ7iSBy+iC/caQBcDfs6tcSIsIuRfmvlXoG4JxSsHZOlAg7RpWO
fiQbAKvOjHKiJBGWguOvFN45ATaxnrlEZSIY5Mc9TLivD4sSAbH0U0TodxnI
K6jVA9nzkZY5wUT4cPLYyNUYABuvUm6GMCJ053k07bUCiL47/v1yJBEmNjo5
rMUBRt4YG4nHEsFMQ0J6JARBNisvepaKz19pYHVgQxt4q19IZ78hwmuXngdU
KU043vFjZLuUCC7ZhRNZrRrgPcn83KGCCKHbfRtetzSgZY+HkEgtEYyPCCtN
dhyFe9dVubOaieBWLPF86L46EMQ+rj+eIMLMlHcmu7IqHFJbLVufJkLnb9oj
kSkVsDc56H9+jghK98TuEXNUoDLo37m9y0QgsdzVVORXAf8265E0BhIcHSv9
j7DrCExFjDeniJCgV5dZpYJLCfam741b3k8Cx39aemY7D4MhxfiktSQJUswb
3nSmH4bcPkr9HnkS1Oj824ZJHoaLKkFlyRokmBiwtgk6oQhdo8zPHliSgG9J
XN3zpDx8OBuTUX6OBA3/fm3cPSMHpXVMKQPnSTDezlRakygHj7J2xh10JIGH
v+idA/0HwdKK0b/egwT8qVvXOsNloaORYLRwlwRH4l0iy1eloEH59nGBWBJ8
rNRhKyyUgrdPt3VQAgkeXFmxC70oBQ+Dt5RjH5Kg1u6xJfWLJFiobAiJPyXB
h7T0dpd8CWjLWZ4/U0GCguNOfr7x4lDHHTAd+B5fb3/Uo+sm4oDd/juaVYPv
945Qngy7OCTZLfVOfiDBLMuL+rbE/WC+e6ExvJ0ELA76v+qeikFLxGwaNk2C
xaeEsbkGEaiZv/aw+zcJpJaK+rZtRYDiMJOw9YcEO6/lvzP/Iwz3NacjjFZJ
QCs0vUE5IAynFyau0RnJ8Gabw2MjZR80O47ocouQoWlqpX3lPwGgMbxcSd5P
hvn9xVdSzgrAYq5rsYAkGVpOh6tGL/KDwNTUPjF5MvycwqTN1PnByefP8iFN
MhztclBk/r4H1iK2X5tYk+F+t0BDjcpuYJOsdWq1JcNXTRfGojEeEP0ULmhp
T4Z3w12fKek8oM+6I8bOmQy31QRYJ8g8cP8hq9NVHzJkMmV3NdK5QPKFwN6Y
f8lwTEza4U0WBxw16G1hfUCGQwsLrVL7OcB4IuPu/UdkeJ5Tx3PpJTt4yYsu
pWSSoSSh4Oeud2xQ9Z9kS24BGTgSI3szJlngzAflqIaPZNCQqw1Zy2QCZ9cl
LcMmMihrB0lJajJB4K53C03NZPBX/ShR+3MnZJpqXGrvJEOa/K/Ow4I7YbwL
tOhDZGjWxQg3ihhhLZC04DxGhsrSzunHVozAJtiQPzFJhk2+CAITgRGUHAz4
5ufJoKe4h+W1FQPoE5mbfZfw+PAa2fwiM8C5518iV1bIQOt3DD6BkcFNP07z
1gYZFhr99IYvkeH//0eDTINVJMZNhv8DYnnNNg==
"]]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-2.5, 2.5}, {0, 5000}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{{3.661175016988134*^9, 3.6611750578598833`*^9},
3.66256291335157*^9, 3.6625629781123447`*^9, {3.6625810179135036`*^9,
3.662581026806093*^9}, 3.662581321570483*^9, {3.6625813682342176`*^9,
3.6625813748171597`*^9}}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["Figure S1A: The Competition Function", "Subsection",
CellChangeTimes->{{3.661175077563939*^9, 3.661175084147271*^9}, {
3.662581042219514*^9, 3.662581046147794*^9}, 3.662606065695064*^9, {
3.6693380614706287`*^9, 3.669338068327107*^9}, {3.703204889829855*^9,
3.703204895658703*^9}}],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"trysp", " ", "=", " ", "2"}], ";"}], "\n",
RowBox[{
RowBox[{"try\[Sigma]\[Alpha]", " ", "=", " ", "0.85"}], ";"}], "\n",
RowBox[{
RowBox[{"try\[Kappa]", " ", "=", " ", "0"}], ";"}], "\n",
RowBox[{
RowBox[{"try\[Nu]", " ", "=", " ", "0.02"}], ";"}], "\n",
RowBox[{
RowBox[{"try\[Sigma]\[Nu]", " ", "=", " ", "0.0015"}], ";"}], "\n",
RowBox[{
RowBox[{"try\[Beta]", " ", "=", " ", "0"}], ";"}], "\n",
RowBox[{
RowBox[{"tryvm", " ", "=", " ", "0.0015"}], ";"}], "\n",
RowBox[{
RowBox[{"try\[Mu]", " ", "=", " ", "0"}], ";"}], "\n",
RowBox[{
RowBox[{"try\[Sigma]", " ", "=", " ", "1"}], ";"}], "\n",
RowBox[{"tryKm", " ", "=", " ",
RowBox[{"Km", "[",
RowBox[{
"trysp", ",", " ", "try\[Sigma]\[Alpha]", ",", " ", "try\[Kappa]", ",",
" ", "try\[Beta]"}], "]"}]}]}], "Input",
CellChangeTimes->{{3.661174881989313*^9, 3.6611748821653337`*^9}, {
3.661177127306767*^9, 3.6611771352737617`*^9}, {3.661178155939536*^9,
3.661178160314032*^9}, {3.66258103228792*^9, 3.662581042225037*^9}, {
3.669320157960541*^9, 3.669320159110588*^9}, {3.669320414775318*^9,
3.669320417974051*^9}}],
Cell[BoxData["11828"], "Output",
CellChangeTimes->{3.662581091713974*^9}]
}, Open ]],
Cell["Characterizing the shape of the competition function :", "Text",
CellChangeTimes->{{3.662563068140214*^9, 3.6625630766751633`*^9}, {
3.662581042231248*^9, 3.662581049107544*^9}}],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{"dist", "=",
RowBox[{
RowBox[{"a", "[",
RowBox[{"u", ",", "0", ",", "try\[Sigma]\[Alpha]", ",", "try\[Beta]"}],
"]"}], "/",
RowBox[{"Integrate", "[",
RowBox[{
RowBox[{"a", "[",
RowBox[{"u", ",", "0", ",", "try\[Sigma]\[Alpha]", ",", "try\[Beta]"}],
"]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "100"}], ",", "100"}], "}"}]}],
"]"}]}]}], "\[IndentingNewLine]",
RowBox[{"mean", "=",
RowBox[{"Integrate", "[",
RowBox[{
RowBox[{"u", " ", "dist"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "100"}], ",", "100"}], "}"}]}],
"]"}]}], "\[IndentingNewLine]",
RowBox[{"variance", "=",
RowBox[{"Integrate", "[",
RowBox[{
RowBox[{
SuperscriptBox[
RowBox[{"(",
RowBox[{"u", "-", "mean"}], ")"}], "2"], " ", "dist"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "100"}], ",", "100"}], "}"}]}],
"]"}]}], "\[IndentingNewLine]",
RowBox[{"skew", "=",
RowBox[{"Integrate", "[",
RowBox[{
RowBox[{
SuperscriptBox[
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{"u", "-", "mean"}], ")"}], "/",
RowBox[{"Sqrt", "[", "variance", "]"}]}], ")"}], "3"], " ", "dist"}],
",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "100"}], ",", "100"}], "}"}]}], "]"}]}]}], "Input",
CellChangeTimes->{{3.661175962902585*^9, 3.661176072002411*^9}, {
3.6611781012237577`*^9, 3.6611781118787737`*^9}, {3.662581032331626*^9,
3.662581033843258*^9}, {3.669320159894299*^9, 3.669320160562501*^9}}],
Cell[BoxData[
FractionBox["0.26684086826043196`",
RowBox[{"1", "+",
RowBox[{"0.6920415224913495`", " ",
SuperscriptBox["u", "2"]}]}]]], "Output",
CellChangeTimes->{3.662581091813582*^9}],
Cell[BoxData["0.`"], "Output",
CellChangeTimes->{3.6625810918688583`*^9}],
Cell[BoxData["75.67201092726484`"], "Output",
CellChangeTimes->{3.662581091914361*^9}],
Cell[BoxData["0.`"], "Output",
CellChangeTimes->{3.662581091970072*^9}]
}, Open ]],
Cell["Peak occurs at :", "Text",
CellChangeTimes->{{3.662562965019528*^9, 3.662562967234468*^9}, {
3.66258104224587*^9, 3.6625810579466333`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Solve", "[",
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"a", "[",
RowBox[{
"u", ",", " ", "0", ",", " ", "try\[Sigma]\[Alpha]", ",", " ",
"try\[Beta]"}], "]"}], ",", " ", "u"}], "]"}], " ", "==", " ", "0"}],
",", " ", "u"}], "]"}]], "Input",
CellChangeTimes->{{3.662563088087288*^9, 3.662563097763052*^9}, {
3.662581032334819*^9, 3.662581042250135*^9}, 3.6693201613610907`*^9}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"{",
RowBox[{"u", "\[Rule]", "0.`"}], "}"}], "}"}]], "Output",
CellChangeTimes->{3.6625810919983397`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"plot1a", " ", "=", " ",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"a", "[",
RowBox[{
"u", ",", " ", "0", ",", " ", "try\[Sigma]\[Alpha]", ",", " ",
"try\[Beta]"}], "]"}], ",", " ",
RowBox[{"{",
RowBox[{"u", ",", " ",
RowBox[{"-", "5"}], ",", " ", "5"}], "}"}], ",", " ",
RowBox[{"PlotStyle", " ", "->", " ",
RowBox[{"{", "Black", "}"}]}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.6611749019011927`*^9, 3.661174956235146*^9}, {
3.6611752254100027`*^9, 3.661175230359705*^9}, {3.661175431831642*^9,
3.661175432063044*^9}, 3.661178118742219*^9, {3.662581032336154*^9,
3.662581042257969*^9}, 3.66932016219427*^9}],
Cell[BoxData[
GraphicsBox[{{}, {},
{GrayLevel[0], LineBox[CompressedData["
1:eJw1mHk01V3Ux7muKUKuCtVTylCIKEOl9k9CJMlY0YAMeZRZicRjqDRIRciQ
IUXmIUPl/DJdU5drnkIR5er+yjzf975rve9fZ33W2Wfts7977X3O2lJ2bqYO
JA4Ojm2cHBz/u94ePzXFYlHwmxOn37IW38GY/6bZ/hUKXjds1nealA3GIkPz
pYsUPCZcJi9tXTbsOOi+6jZNwQ8cDTGw3JINVRFP+YbHKPhkcJH/uFY28Cl1
/4N/oeBBPWJ5H4Ky4bn35ZNBLym4mrOkyyGBHHjH6ZXOoUHBx5a2iwkr5gK3
g76qxAVR3IbjVnePaz5QempdU6M24L+FJ7KoXQVgWh1vv6dRBHesrjVPcioC
f+KI65MRYfxogMmislUJlN2Id8k7LYQHbC2zNbtaCsZPLXasxQnikSdkHM04
KkA/8ZPxicl1+IVjKZj1/EfIoPp1eVnz4zoxHppW4jhcDH2+seUtL95kbOUr
IlsFgZe5cgUoPLjpRM7GRZcayG/Rf9whyIN3vC3QzPCuge9HH15P5OHBB90P
0s4F1oDeto3KykvcOKckl2NHVA0I9cnmm37jxi2K6V83l9dAkplhYVweN55K
3ZE5wFcLSC/qvZwRNy4mffxRaE4tcOzdjnTCyPi5u2LUaEEqBGzSvhgWSMYZ
toYneSSoMM+yW627QcY7HmjLBslQgdmWcdjQhYwHWviSnhylQv9NpTKT02Rc
WvK7jpQHFd7XHCm4IEHGnZzGwzb0UOGajU3ajRwuvK08+I1TTj30PYi7+66T
hN9nToit3miE9tod2ZdbSPh8Xq0/f3gjNLPetG5sIOE8m69I7njeCJVe7yWC
PpLwtObNO13zGyHVuv2deRoJj43SNgv61QguCutbV91JuPKB0I0pF5pguTFI
3ESQhFe/mQomGzfD1nXOmTPHOHEgH2W5n6HBxcrmhzu1OPF/qP4mn+1pkOKp
4m6ixonzdk6H7PClgWz/knq2HCeebPynXuAlDZSzH9XYC3LiE/cMz7z4QYNj
xkVDbZ0c+FbK8+LHt1vg6tO1jQXOHHgNUUcutGmFf9Xkufu3slCpXaDTagEd
PLnL3/gKsxBnWuVV3k90uNWpbyhKYqGtxhrukvV0iPBxiDQYX0PTJlmZ1oN0
yCp5JVFWsIaOsTJyTwq0wS+1zUrRemtoG8tF9JdjGzipk61Ou68iX+uz7aYy
7WCvMfi2unoZWfg87PuEd4DjWw1LvdJlJEb3C738pQNcJKK4GrKWkUf40JBg
Xwe4L+tcpEUtI9aWw/X/TXdAAMqk9F5aRulDKQqjsp3wXN8nkLm8hB6d930d
EtkJdVaC5hIHlpDjOM+Qs3MXyN88xLqevoDOBKuGOR/qAfyrsfxIzAL64G/y
a8WwByx17C2s7i+gkplb/UnWPfCf0MN3cH0BGRB8jwVu90Bv+lcrEc0FtNdc
Se4+3gP36EH5BU3zqE86jrHVsBfG5Km2M1Nz6KWrhcCIUx+kfDWr8dOeRROD
RVXpLQOgOqq61HFgFt25Jc8K+T4ANRMb9u3bPYty1D4UuM8OwNh8y8sxoVmU
Mi0b4bnlK8iLGnmZDcygXvrNW+LOX6FQ7/jOvTdmkM8pn7Q/XINQk3cgaDh7
Gln/4PEZ1x2C8eCNWvriU8ixTcwpcXEYKqJ36/60/I3KK812ih4ehX2/emeU
E8eQatLm8T/UcThe0c+/ajmMGqWOhH3ZwoDcrNcHqYeHUUgoN3/MHgaIv3S7
GrVjGNmUN1yz0GBA1zzP05MdQ+j7raGNZaYMkPG3FElcGkRiJ/715b3PgKrg
WUFM/yty5T0flTrNgJXH+3nCh3vRiblRYXs0Ca1uVAfJrF70ff0r79dNk5Bm
Yl2b69WLVneuM+7pngRD0ZDQbp5eJF8d+EDozyTERbeR9uztQUdsApxLt/8G
9QQPVpNfF+pK0vVu9v8N7pl5Cxso7cgw/LR7tAwT9gldDzk23IbsrCxJvUpM
+OupKOSV04Z6qlzt+DWZ4KmVuatDvw2lWbUwlA2Z4NOSahwTQEcpuw5RI68x
YXpCwUCtuQV1XWNcv5nPBO/itxdjHFuQh4S8h28ZE+Zuy3jPc7D3MeOuizgT
FkS2J5er0ZD5oLgGs4UJK+qis0eSm5FxfZQ9F5MJPCELr/Q8G5AhUf3npwwB
d4183r8RbEB0KZVXAYoE8G2aauJ7U4+mz7c/WlAlYF0mY66xn4owgZCMt0CA
cMug0WndOiQd4ec7ZkXAk1hru/yhWmTex/hUdoEAUbueGxtu1aKfX7TMPO0J
EJulp7bn1qAayb9z8dcJEN9Su2AlXo2seGNkUQgBcaPaQuWFVSjPR2yw/h4B
krmVuyRPVaHM4vD15Y8I2KZdZjwQ/Bnl3ynzMHpBgA7N0uBzF0KzpidLtTIJ
0LM18Q4RQGg44eizGzkEnJgxSNbFKlGI216l2AICjCSPzDZkfkQ/VeJORZQT
YOm4K6UtoBwpDWby7KsnIMLD697TkjIk0mXSEdZEwKeAajdTZikyiu5u+0wj
QPqZ/dG2S+/R2ubtuyY7CDibVCTzNLYEfU+wtezrJuBBJtd6U3oxkvl+73Zu
HwFTKK2ffqwIbfr8w41vmADZpumqKP9C1PwlfMfj7wSc69LJOlNcgCQbRiMX
RwnAJ0du0mXykXK3nH/wLwJ+Ek74zk+5aO2x73Aig4DTPHyRqUo5qPGFZXfy
bwL+2X9CMXVDFooW2Gdq/peAMIOfS1Ihb9Fhemo1zzQBk5fuNaTMZCDx0PiU
pBkCzHx3x0o5vkbyHltHt8wRUPGw3jGlOw0ZiBaGBM4TIJXmrCZlkIqC/73q
V7dAwL1yPnJKxSs0a9tZOb1IwGDymdfaZ5OQk6CQMc8yATnNUce0D79EB1bz
pdbY7L9IH8L+iUVdYd8O9K8QYCArehvjjEaT0ydCElcJ2GxmKomNRqFs6iZ+
3TUCmljSbnceP0INIxzVdDY7n3udGWh+F9W918nVYRFALpIZvS0ZjN5fSK2P
ZzMmYXRkCfdBZ3FHkW42/4mNu/I3zg4lZtiGLrA5gPS8Vk/TAJ5QJ3ax2KwU
b08VU3eDZ/Rh5gSbByUKmALCAbDONfPHBzab7e/5GK4dCuaqKvyebH7fa/Xf
Xf8IUH/LOL+ezetxxq6a80/gmVz7wCP2/eDZu/CaG88giuocNc2Ox8Px3181
z2NA+kix/1E2px5UMKotiIOZYp3k6+z4OwQZubW0BPiQocARytaHZzhrQx0j
GbhTedIClwhIOKd2yD40BXzEZh9eZOurphP974hoGvzLn1i9i60/TXE2wT4l
HTRG9pyisfPFwVHCsq98A0rvNL3b2fmN+yWmMmqUCQOamTuUpghQbfe2u9Kf
BXnK/Ueu/yHgSsaB2isLOUApXsdMmiRgNfL53Gh4Hpy5QHkeOcHWX2vpWWFE
PlDLp1odfrLtZc/XqkoUgrfi90PVIwTs27Ju0HO4EFJ5Be4YfmOfF66YK3xT
BHc4D98rHSQgZlFi9371Epg3ubxNp5cAanNvxH6zMrC9q9gj9YWdz5t9VGuF
clBSfq/5pIHdT6T7yaFcFXBpJef4cC0Bhv4DgR1FH2B+dXOJTCUBzXuGPH3E
ELwSu3vjBLt+XTuH8hInEZiqPMyte0tAOOY+Z2eHg0PBVmO5dALkJt33Pzj0
GQafO6g8iWf70/HM6Z+oAu0o9edc4QRoxk01EZbVcNK0e1NsENs/4TnBVV0N
Rn2vx4T9CciM95JTfFkD1+RVGJluBEz89U4JOFkH0R3jYg/Y/cz11Y3obdkN
YL8/VXTHTgK05uaLVMQb4WFDhcaiJAGCRjfbdEMbgbR9aaCUwq6H+ZvC122a
4Jh8p+4YmQCm8a37lYJfQCz6+5LAGBPKAisr89RbQWHWOCE5jQmH9n4uNHnR
DmIHc4R2rGeCWkdXTGVDO2xWK+B6x8V+L/wnbymutENu0If6XUu/QbZhsw6f
bQeMXJK7MjT2GygO19uRfCcEl+SbhKDfMJmwZUapsgu26CaNpFz7DcmCvmrr
f/TC7O4KrQuVk0Dy3ThwRWIYfKzI9dOHGMAraBJsxxyDNuurLZsSxiFkuEvH
M+033P6x7qeV2Cjkvww3CZz6C8TIazXuLd+giRI+LswxBVEL+QdYQt9g7EFY
YMr6KdgvaSPEyfUNtgaEZtfsnoK9gmestzKG4Z7Nf3wCl6YgzEM4ruDDMFze
Foi/aJqCIOlqhbMXh0Ek2WdfQfo0VOs9cNE0GwK31Csio5azsOpXcr85bwAe
+8UlPLafBZLfm1m+xAHINaHtPug+C4tyfu2mEQPAXNPQfnx/Fl61rm8TchgA
V2sBT82Ps/Dxk4K53JYBcBErbH8oNQe8h/8sd97vB8dwVoza5BxUHQRxLo8+
uOgSv+1u8ALYXhVZ0XLogeVeftrfRwuwbeOy9ZxFD8Qa+AXaxC+Aorer9Ae9
HqDvPjukUrQArUcF2x1398Dx8Y0pA6MLoHM1cER3shv2XImSVj2xCDmpF95s
9e2GmQv3FL4KLYEy38WepaguuH/G9+D+hGVY2//ux4+fHfC0Wd41O3MZJtaH
b1fq74AE/aEkmdJlSKjyzApm/y/zj5wgi7ctA91x8rFhYQf07JFsWeFdgZ78
rqd2AR2wm1R5pc5rBWbT1J+liXZAXSH3k3MnV+EPz5f/5PXbgSwWPXZnaQ3S
Sy2tbWl0EGUGConysqCijVtyvpoOUvXO6ukUFnyp+0N7Xk6HowFa4fWKLPD5
qML5M50OfqMjMhsuseBJtmHrpD8dmMWqDqnVLPCIpF1zUaDDpPxPDzs9Dkwz
5qAC/5NW6G4K+xMqzInF9Y1MrQ7Q4PnRRF2LTZzYM4vte0waaWBaUBwvs40T
00wZCy8opQEtZuR4nTwn5uolHZzylAZ1ttpxvHqcmLv0acYBAxq8n1/Rjgjg
xBQNFKO3lX+BmF3ezyJ/cWKrpZfTY9OawcLfTj2+moQlqZ8TdHvVCDGJYjzz
DSTsvPWSttzTRuhCdZ1mrSRM42vF318hjWBJVvBZ/5WE7TMxffnYqRHOPpou
CpojYeZBbyXNlRvhfHKoitMeLsxZI4ZUjzfA5eoMxQORXJiIs3bvJkY9uAow
dtLOkzEt/5MvQ62pwPCrIAvYkjE6Tehex2kquPy8P6bvRMYEhK2eKh6nglPt
7qzPXmTMo/XI6IwiFezuOKqUPCRjsQMq+I+1Ojg3/Q0SKsnYizjpkGPpdaDX
32PjspMbU6XGVVXM1ML2d3UxPBPcmN2+s06n3tWAf5mOmfBLXiwxWTBCQ7MK
3DNc36sr82NrJYZcAwY4CJI07JR+rMPiwwSWJsmfQPeaebT8M0HsdM6A322B
ChAv3+amKy2EHZp6srskoxSeet6L2tctjM0sRpxzdCwB0/DTexPfi2CnpudL
U6OKQN461CL99gbMJNYGUVcKoGuMP/WZhSg2IKoTdsMvH2h2P7RFt1Ow3mDl
NB2vXPhGfrMQvZOCcbwWVkHOuTCT4ZwnIUvBClwzKNjFXJBgMLZK7aVgx63H
6s8Y5MIVr6l55cMUTLurLap4ey4shbByTllRMDGhpBfeX3JA9rWE5P1IChYr
taujTjEHDur3two+o2CvXrnYjO3MAaNfCXefxFCw194itHUSOeCxd8fsi0QK
5r/24bIddw58LJFtzXhHwWTcOBknB7PBtG5/eA2VgjXUf+vijsoGB+dZrRNN
FOzIixMBnnez4ea60ukmGgUbSsB6R25nQ6LxIdv2TgrWuKEup8MlG352YVrf
RyiY++duV+bxbFi6SZp2GKdgeanOt4IOZ8P6LTWZvyYoWNXrB3KbVbNB9ZL+
5r9/KZjtTLG56fZs0OXkp3nPUrA/vt20uY3ZcDatMXRhgYLJh9UMJAtmg4vu
w8MBKxQsay7S/xRXNvzf/Ab7//nN/wC4XxLd
"]]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-5, 5}, {0., 0.999999590063668}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{3.662581092030478*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"try\[Beta]", " ", "=", " ", "0.6"}], ";"}]], "Input",
CellChangeTimes->{{3.661174881989313*^9, 3.6611748821653337`*^9}, {
3.661174945363006*^9, 3.661174963851177*^9}, {3.661175302254344*^9,
3.66117531282722*^9}, {3.661175361898897*^9, 3.661175362146018*^9},
3.6611754016342573`*^9, {3.66117714329955*^9, 3.661177146936655*^9}, {
3.6611781643377934`*^9, 3.661178167723196*^9}, {3.6625810323401537`*^9,
3.662581042263939*^9}}],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{"dist", "=",
RowBox[{
RowBox[{"a", "[",
RowBox[{"u", ",", "0", ",", "try\[Sigma]\[Alpha]", ",", "try\[Beta]"}],
"]"}], "/",
RowBox[{"Integrate", "[",
RowBox[{
RowBox[{"a", "[",
RowBox[{"u", ",", "0", ",", "try\[Sigma]\[Alpha]", ",", "try\[Beta]"}],
"]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "100"}], ",", "100"}], "}"}]}],
"]"}]}]}], "\[IndentingNewLine]",
RowBox[{"mean", "=",
RowBox[{"Integrate", "[",
RowBox[{
RowBox[{"u", " ", "dist"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "100"}], ",", "100"}], "}"}]}],
"]"}]}], "\[IndentingNewLine]",
RowBox[{"variance", "=",
RowBox[{"Integrate", "[",
RowBox[{
RowBox[{
SuperscriptBox[
RowBox[{"(",
RowBox[{"u", "-", "mean"}], ")"}], "2"], " ", "dist"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "100"}], ",", "100"}], "}"}]}],
"]"}]}], "\[IndentingNewLine]",
RowBox[{"skew", "=",
RowBox[{"Integrate", "[",
RowBox[{
RowBox[{
SuperscriptBox[
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{"u", "-", "mean"}], ")"}], "/",
RowBox[{"Sqrt", "[", "variance", "]"}]}], ")"}], "3"], " ", "dist"}],
",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "100"}], ",", "100"}], "}"}]}], "]"}]}]}], "Input",
CellChangeTimes->{{3.661175962902585*^9, 3.661176072002411*^9}, {
3.661178122366139*^9, 3.66117812472682*^9}, {3.662581032340611*^9,
3.66258103384601*^9}, {3.669320162862363*^9, 3.669320163511032*^9}}],
Cell[BoxData[
FractionBox["0.2668409423224054`",
RowBox[{"1", "+",
RowBox[{"0.6920415224913495`", " ",
SuperscriptBox[
RowBox[{"(",
RowBox[{"0.6`", "\[VeryThinSpace]", "+", "u"}], ")"}],
"2"]}]}]]], "Output",
CellChangeTimes->{3.6625810921177*^9}],
Cell[BoxData[
RowBox[{"-", "0.5953735910908625`"}]], "Output",
CellChangeTimes->{3.662581092195342*^9}],
Cell[BoxData["75.67201092751577`"], "Output",
CellChangeTimes->{3.6625810923042097`*^9}],
Cell[BoxData["0.06868516701530065`"], "Output",
CellChangeTimes->{3.662581092432013*^9}]
}, Open ]],
Cell["Peak occurs at :", "Text",
CellChangeTimes->{{3.662562965019528*^9, 3.662562967234468*^9}, {
3.66258104224587*^9, 3.6625810579466333`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Solve", "[",
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"a", "[",
RowBox[{
"u", ",", " ", "0", ",", " ", "try\[Sigma]\[Alpha]", ",", " ",
"try\[Beta]"}], "]"}], ",", " ", "u"}], "]"}], " ", "==", " ", "0"}],
",", " ", "u"}], "]"}]], "Input",
CellChangeTimes->{{3.662563088087288*^9, 3.662563097763052*^9}, {
3.6625810323437243`*^9, 3.662581042279913*^9}, 3.6693201641451902`*^9}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"{",
RowBox[{"u", "\[Rule]",
RowBox[{"-", "0.6`"}]}], "}"}], "}"}]], "Output",
CellChangeTimes->{3.6625810924651117`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"plot1b", " ", "=", " ",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"a", "[",
RowBox[{
"u", ",", " ", "0", ",", " ", "try\[Sigma]\[Alpha]", ",", " ",
"try\[Beta]"}], "]"}], ",", " ",
RowBox[{"{",
RowBox[{"u", ",", " ",
RowBox[{"-", "5"}], ",", " ", "5"}], "}"}], ",", " ",
RowBox[{"PlotStyle", " ", "->", " ",
RowBox[{"{",
RowBox[{"Black", ",", " ", "Dashed"}], "}"}]}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.6611749019011927`*^9, 3.66117497883393*^9},
3.661175323669704*^9, {3.66117542748713*^9, 3.661175429166958*^9},
3.6611781291492643`*^9, {3.662581032345018*^9, 3.6625810422859097`*^9},
3.669320164761113*^9}],
Cell[BoxData[
GraphicsBox[{{}, {},
{GrayLevel[0], Dashing[{Small, Small}], LineBox[CompressedData["
1:eJwtmHk0Ve/3x5E5U240CmWmkJAM+5gbJKJRIVNRIVM0UJFQZAghJfoQXVJx
o+k5MpQhmefhmmdxD5Hp/s53rd9fZ73WetbZe7/3fp/nOY+kg8dxZzYWFhY5
VhaW/z1vjxxlMJkUPPpjSm65Og2Gb4rOd65Q8BuzKh9kdWlgLtS78PEfBb/o
ABaRRjSQ0PJc9SAouFNw1xlHKxp8j4jlpg9T8BfpPBMHrtGAe0/rDvwXBadl
PeBNzqXBEx/7I3dSKLifqOcPOfmP8IbV+xWLJgVfp7WWL6xUBBzOpnu3nBfG
wwLeFWkkfQJKW/mV9JgN+Jiwyt/EvV/heGmyo3yVEN7t/OKlniAON//oXoke
EMSnGL4iskMlUHQ92e3tMQF8o/RN7ZTBUjCPPSGxlsSHL1cf3SvnWQGmqV/N
D07y4lLaZiZbXSthJrJrhX2YF7/+pWfXft9KSA5czinp5cV9teMlbe9WwqSd
Fpd2Iy/uXmn+9HtSJcTuLES7P/HiNhd8VaarKqEni6pCCePFJQOO8LXsqQK/
9ynCPbt48SQtj6otq1WQ+SOgxduGB1fbxaUnXFgDSXv9DLOtefDQC+mrWWU1
8CjVK7/nKA/O9VI8+FBTDXh5X444hPHgIjvGePOJGtAVP68nLs2DL9NU9PjU
fkGTH5ZZNc2NB+1n6eQt+AVsMlx+kve4cY2dhIcnqgXbkCciv19z4Uez+SIg
qA5q4S+XfzoX/q9N9ZhQWB3A8qkliWdcuHbhqfCR6DqQ8NrW6/WYC48T4fXO
Tq+Dfrv016J+XPgLjb7imxV14KKdr21ryIW3cSdstBOsB3dG9YWpbk7cSLR7
3eHMegi0X5e3nsKJR7gVK/CON0D+b9OoJj5OfOJH0NK1uQbo13vknsrJiU//
3B/Yt9YAJmIiyspLHPiPU88/t1IaQaBDJv94Hwdu1r21QlKvEZ5bHX6f9JYD
V7r9b0z1SSMgkxiarBkH/ty1nHnNpAlYdosjw/vseBdrzWZmWTPcEtW3vR/I
jp+UKFlLaWiGBabDasV1dtxSOFLYiN4M0w2Z2ofd2PGxtpcThcvN0Om/p8ji
GDtuk8t7W1KtBWhluu/Ob2HHqdyhqxKvWuDquXMZ13PX4UIPfVp4HrdCx8Ok
B2+a2XBWwwCljoh2aCyXoNr/ZsNPFGlo+CW3Qw0zq06kkg233FZguSOnHb55
07bc+cKGS5gR/bGV7ZBu0/jGOoMNnyza5yXA0wFuivx1q55sOKcov+upiA5Y
rrqz2YKPDW86O2jkldAJ23kvZc8ZsOIpf77e62jpBttvNY926rDiYoFWhM1E
N7z0UvW0UGfFa5nPjk8zu0Gmc0mDKsuKt+YPrzeR7wFlamSZIx8rHlm0Ke/7
rR4wMP/Q29DMgttmbv+2JNMLrrFrIu8useC/F84bnTWiw2V1BY7O7UzUFZq2
ubqkD7w4irP8BJmoRAd0t9T2wY1m08PCbEw0tc4U9+zogwhf58eHRtYQm+7J
P9pEH+QUpm0pereGGHL3zA2l+2FMfdOeeJM1xK3MLNv8sB8uarCfOua5ijJ/
X4ycOT8Ajpo9r0tLl1EA7YnFM4khUPA/wHR/tYi61PdY6vwahZfdVmUB+vNI
dSw/GHSmYOSuiI7pZgaKf/fww8HiGeC9/fZPHC8Dcd8Zdd74fQb2+B/KoK/M
othTKnydVTPg536b90bfLPoSkPTpdNcMcNoMtVFzZpF6or++MHMGpPYV+grr
zqIn4i9SHAxnwWHY+m33hRnk6cP2KLFiFkL7ph0UrGeQUubTEyG1s5DTFSZ6
3WQGpRs4rb/UMguMhi+3hRRnUB/7iULK8CywBR16Gjr6B0Wnj1gvsjMAVMfq
Lfn/oN370kzaMQZ8ipczHj05hba7nC4UyGcAt82II6vOFJKmX0sOoDHgpETm
va2SUygwbf+n1i8MYOTsws0mJlHF8zDlq5UMkMd3aL8LmkSL0gJp//oY8HR8
o+qN1xNIiBp0L1CIgOG3jcfiIieQ7c8KdkFRAvb5xrpTvSZQ592h0ehtBPxm
ClJ7dCZQOLeFyyUZAjhF1ssa1o+jYsHiPY7aBPgCqxjf0hjS7XLy8XQg4Ds7
ri3dO4ay6mxteC8SIFQVeFavbAxNageuxF0mgGq9kugZNYZ+HJhd7+dDwKDr
gnDzzjG0llVe4XWfgL3KNNVprjH0mSE/+CCcgDtzPhZcU6PoRmU+y6NIArYF
MSK1Po6itATrXvt4Ao4/meJ+fmQUrQ7x9Bx4RUDaGarsR5VRRJP2TS3PImB6
x2WTOpFRxK9YUaD3hoCI7NFgNvoI2ibYkrr8joCSbwNrLj4jKEohxOL5NwIE
QtLF7pwZQbohcaVJJQScO3RBJ0lvBLmuGKzeKyNgsbEnoJp7BDUoN93bUUWA
ylj7nHLqMJLht5LwbyLAZ2a3/KaQYdRefcryYwsBRQt3z6+5DaPiUk3d4TYC
9DkVKmr2D6PMGeWtlG4CQvkDlz6ID6ODUnZ/hXoJqNrYsCeFcxh9jnnquEYn
69t1I9G1aQh1seBVWYMEJCjUVlt8HkKmEfrvHYcJ6FTdybI/fQhJGc5zCI4S
4IRVXeL0JNe7JdSpTRDw2nRH6tTJIfTySLpm7iQBk+Ze9U26Q+gA144JkWmy
f+e3HshYP4RqnilvK5wh4JOTu3sEYxD5H74ZMTFLwNrl7+nX2geR5s4MxQ0E
AQbeoq2n8UEkx9+0KD1H5n/DbT2WNYjWbj2elJ8n87/7DWSjBkm/vWEV+0uA
YLiwj4DvIPJbslJjkmwd7fJ63mYQqc5x365bIOBp4qeuLoNBdL0krSN6kYCu
5wIbyuQHEQUzPYj9I0Ai08H4jdAgeq4V+L2HZKdcWkDswgBaeCxmcmWJgOwC
3ryAngF03dmqbpTk6c+2/fblA2gEe2VrvUzOU+l70YPUASS2e2I6j2S/Ks4j
ynEDyKHpTNAiyZ/qzwaJ3hhA7on+AqorZL1teR9W7QeQWppMymmSDehso4Om
JM8kSXmQHDpycnvNngH00s0ux4fk6ukciw8iA0i046ySK8lCf9dCklf6EXO2
IseMZOvV48V3B/rRmyPqMuIkP2XPmrpU1Y+47aJe0Mn4XeuXJS3e9SPB6xs2
x5AsQTl2UvNpP2p7aR2jQrLz1oyIHUH96NQzI35E1pcjufCNw6Uf1RVLRen8
r165I8SkGRmvIko0m9Rnr8oL2Sa1fjQ16pXNTrKfJmHzeWs/unV90+FjpL6f
9Eyj01n70efGzSthpP5M45Sy8NE+NKzlWvqO7I/R0T+Lnr/7kM5ji1eVZD/D
rA13n6b1oUjFKxl1ZL+FHCfiZUL6kM81OyEqg6zPDar4L/chxYGt4XfIeUm6
Frc2Z9mHNqXXqxuR87TzjvbFUvE+dEz6qVHSFAEuDx6n5HD2oZ4ipQIFch5z
ogZ+x0zRUUhkudebcQLUUh/ut/9MR0VTz5dvjJD5fOrkWT1JRyte4lJWpB/y
cv7T+qFNR8WdHnLqPQRsTvFwjZGgoxe2wfR1XQS0LHDGHmnqRZTbwmkXWwmQ
vnlSKHWpB20psuw79Iv0r824h2pZD8r4ps4RR/q3Rifwd3lkDyqPXztW+YP0
79p/UdMSPagsKjlllfT/97vzfJhpNwrSzhoPLST95xB+pUmoG2VuCtmp/Z4A
V0OxmksdXWidtIJAdx6pD4fxw5irXSi88I75OPn9sQt7wjMQ14nY7t3NUkoi
YCVKjTOU3o6q94rec/QnoM7jh/PWnHa0SVy7ZsWbgAwLm/I873YkOr9T/r4H
AYeFg0NaOdsRIxELdHQh9Y1vYJPf3YbkjnDZnLEiQOPZNWZ1QAs6z39mGlMg
yP2Nw87esAUF6DfEtEoR0H0+6dscXwsadLYlbMUJCBEvuS2W1ow4n8w5YhsJ
aEwXWnGvaELnkNduy1UGeGa/XdxAaUTYo8mYshoGqAi4BxvQG1C20rEn9AoG
zHopCXjnNqBVu3uTMzgDvHSydzWZNiB/s372PwUM8P2dbp5wqx7VOlm9dnzG
AGJc8ZB6zW/UHOwVa+zKAM7gxTQTr0pk+YqZ9d/yLJx02fWy4VYxwiT5O99y
z8KPmvYINasiMJFeeaA4PwUHdpe8t0hshGJ7JqfZ7TFg8xPpctpCh9Y5MV+e
D0Nw1j6noWgfHR5HcV19nzEE7w9DJZ8FHWQnzhg6PxkCB3FXWkEoHU4VWKeM
+g7B959fotnn6PC1Y8HORWsIgrc5Gb8izykhPNHT2PdBYC95nzcQPADXV6Ob
gjoHgIvP4q7D9DBUq74ul1Hqh9OyZ3ENnhF42nhu7yPxfsgxcGLySo0A5i27
bVm4H8wD/G9/ODMC5oEO1vP/+iBhOC2AvXwE/juSx2Pzsw9kSmavZaaMguy8
sOeoSx8Y+8U5jB8ch+3r7o/9yaFDML3F0CtjChJURVwupfRAT/GRq/5fSB0S
/cw3hvXAgTg8IbB5Cia/Nn+r9emBGeOcsQiuaSjcIb7Rw7wHbN/cfpxxeRra
8l8nnmMj1/tJdTap/YHYwVq5gSvd8I9Dq3ibwwxELri22Zp1QX5KqEUgYxZ2
Woc/4VPrgGpK6IggC9nnGs2OYskOGH54P/AlPwMmv/UF+wp1wPZbIdQyOQZU
uV9t2jTdDmHn7nGvt2NAd/X8Li7y/GovFognVjMg7m6odahUOwi98FV5R+7L
/zVue0jb1QYe6U5CgyfnYdfJPP7LB1sgKiDpWZTjPISUPjxhqt0CeRa1clqe
8/DKsPzL7j0tML2mqR8VPg/lZZk/Nm9sgSs26732f5kHM4/SQRfyfO628X3j
I8m/sOEqfanzRjO4hDIT1Cf/Aus62awZWhPYuiWLPbi7CJaHzfIFDjfCcjtP
7WzkIvzL6Eh3g0Z4eigg8FzyIlxX+ORdu68R6uVO96p+WIS3F4j4XPFGMBoR
edk1uAie6jukKucbQN4pRmrvwX/gzPWJ5pHRAHPnwxS7BZZg4WCrjjl7A4Rb
+mmpPVuGx7dokasddRBbo3CFmr0M8jXpFnb1dfDMtPe59MdlYEicjf35ow7y
dQ+yb25YhiZTqt+7gjpok9/6e4VrBTjUW9d1RdWBHNs3pwrvFXhVzTCLMqqD
ivcc0WeOrEJeTF20t9tvYN8YPxy0tAYDdhEnMqx/gfB0oIAwFxMszikV1Rv/
AsmflzReUZhQyLl6i1fzF+jd0gn9qcSE6KH1vClbfkHA4ID0BjsmFMdV6Wr2
1sB0wV7n9FImxFIk71tfqYFJhdFrDiYsWKVs0PxIZDW0Vt+fCRFkxQw3jPcX
TlbCE71U4xOirJh9+/erKr2VcPxdQbK0GCv2RN+iq6C+EmoTBowqFFixmCwu
/U5aJVRc0E/iMmHFyj9a7E0l/49pCyv6EbdYsaSKo9unN1dCwi6fuMdjrNgd
e0XBcPOfcOKmg0ZyKRvGfTlXc7ixAq6sn9hZe5Yd+1XrYOPnWAbibyoSOMc5
sJJtZiJfT32Hm0WGVoIpXFigbuCfKU8cPDOv0DSUeTD5K9V3jBq/Ah+bpsOe
IV4Mn3A61D33CYyvWscrxPFhLP9EbbODi2BzsZiHsZQAdvC5uaV6CA1ivcJi
VFoFsQfuek4fUwrgeOix3ak0IcxLJ1n4PvcHULAJOfHq9gZsj21U2dusd9Ay
zJMed0IYa97k+LneMh9qHYb0hcUpmMXNUj3FS3nQx561GL+Tgnlp5U99tM2D
ucxLb7fIULA4V7HZgyfyYMvExHbJ3RTs1qroxHWDPHDyZiwoa1OwjAwDRx6x
PFgKZuYePUXB7rx8ILfYkAsy/23ZGv6YgmX/Ygkj9HNBy7Szji+Ogh3VyOrn
0MoFs7FnD6ITKBhDxcBgu0ouXNstMZ+YSsFKSjo5T+zIhS+FMnWZbyjYv/OZ
jn+XqHC8Qi207AcFo1t5XPhbQAXnS/M6B6spWOt4LMOUSgV/3o9EdS0ZLyrU
MTWDCqnmBy40NlOwhcnaTqtYKoy2YDr9A+T7LjYPT3tQYcmfjXAeoWDXjttp
2l2kAv+2suyxcQomrVR+otGWCnvtTDfNzlKwv+sPERVHqWDMylPrM0/BbDRW
r5oYU+F0RlXI4iIFG4svzq3UoYKb8SPtWysUrFLxaL7FPir8/30Tdj08zLtT
kQr/B6jil2I=
"]]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-5, 5}, {0., 1.249134698408547}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{3.662581092497964*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"try\[Beta]", " ", "=", " ",
RowBox[{"-", "0.6"}]}], ";"}]], "Input",
CellChangeTimes->{{3.661174881989313*^9, 3.6611748821653337`*^9}, {
3.661174945363006*^9, 3.661174991080408*^9}, {3.661175330645129*^9,
3.6611753447438583`*^9}, {3.6611753785381327`*^9, 3.661175398703705*^9}, {
3.6611771522422123`*^9, 3.661177153681905*^9}, {3.661178170956088*^9,
3.661178175512438*^9}, {3.662581032348621*^9, 3.662581042289118*^9}}],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{"dist", "=",
RowBox[{
RowBox[{"a", "[",
RowBox[{"u", ",", "0", ",", "try\[Sigma]\[Alpha]", ",", "try\[Beta]"}],
"]"}], "/",
RowBox[{"Integrate", "[",
RowBox[{
RowBox[{"a", "[",
RowBox[{"u", ",", "0", ",", "try\[Sigma]\[Alpha]", ",", "try\[Beta]"}],
"]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "100"}], ",", "100"}], "}"}]}],
"]"}]}]}], "\[IndentingNewLine]",
RowBox[{"mean", "=",
RowBox[{"Integrate", "[",
RowBox[{
RowBox[{"u", " ", "dist"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "100"}], ",", "100"}], "}"}]}],
"]"}]}], "\[IndentingNewLine]",
RowBox[{"variance", "=",
RowBox[{"Integrate", "[",
RowBox[{
RowBox[{
SuperscriptBox[
RowBox[{"(",
RowBox[{"u", "-", "mean"}], ")"}], "2"], " ", "dist"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "100"}], ",", "100"}], "}"}]}],
"]"}]}], "\[IndentingNewLine]",
RowBox[{"skew", "=",
RowBox[{"Integrate", "[",
RowBox[{
RowBox[{
SuperscriptBox[
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{"u", "-", "mean"}], ")"}], "/",
RowBox[{"Sqrt", "[", "variance", "]"}]}], ")"}], "3"], " ", "dist"}],
",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "100"}], ",", "100"}], "}"}]}], "]"}]}]}], "Input",
CellChangeTimes->{{3.661175962902585*^9, 3.661176072002411*^9}, {
3.661178132678462*^9, 3.6611781341744003`*^9}, {3.662581032349102*^9,
3.662581033848658*^9}, {3.6693201653781033`*^9, 3.6693201660614147`*^9}}],
Cell[BoxData[
FractionBox["0.2668409423224054`",
RowBox[{"1", "+",
RowBox[{"0.6920415224913495`", " ",
SuperscriptBox[
RowBox[{"(",
RowBox[{
RowBox[{"-", "0.6`"}], "+", "u"}], ")"}], "2"]}]}]]], "Output",
CellChangeTimes->{3.66258109258529*^9}],
Cell[BoxData["0.5953735910908625`"], "Output",
CellChangeTimes->{3.66258109266448*^9}],
Cell[BoxData["75.67201092751577`"], "Output",
CellChangeTimes->{3.6625810927619057`*^9}],
Cell[BoxData[
RowBox[{"-", "0.06868516701530065`"}]], "Output",
CellChangeTimes->{3.662581092882976*^9}]
}, Open ]],
Cell["Peak occurs at :", "Text",
CellChangeTimes->{{3.662562965019528*^9, 3.662562967234468*^9}, {
3.6625810423016787`*^9, 3.662581042302726*^9}, 3.6625810834491987`*^9}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Solve", "[",
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"a", "[",
RowBox[{
"u", ",", " ", "0", ",", " ", "try\[Sigma]\[Alpha]", ",", " ",
"try\[Beta]"}], "]"}], ",", " ", "u"}], "]"}], " ", "==", " ", "0"}],
",", " ", "u"}], "]"}]], "Input",
CellChangeTimes->{{3.662563088087288*^9, 3.662563097763052*^9}, {
3.6625810323512373`*^9, 3.662581042305676*^9}, 3.669320166695159*^9}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"{",
RowBox[{"u", "\[Rule]", "0.6`"}], "}"}], "}"}]], "Output",
CellChangeTimes->{3.662581092948204*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"plot1c", " ", "=", " ",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"a", "[",
RowBox[{
"u", ",", " ", "0", ",", " ", "try\[Sigma]\[Alpha]", ",", " ",
"try\[Beta]"}], "]"}], ",", " ",
RowBox[{"{",
RowBox[{"u", ",", " ",
RowBox[{"-", "5"}], ",", " ", "5"}], "}"}], ",", " ",
RowBox[{"PlotStyle", " ", "->", " ",
RowBox[{"{",
RowBox[{"Black", ",", " ", "Dotted"}], "}"}]}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.6611749019011927`*^9, 3.661174998544894*^9},
3.661175338293209*^9, {3.661175424614745*^9, 3.6611754248553743`*^9},
3.661178139148828*^9, {3.66258103235212*^9, 3.662581042311743*^9},
3.6693201674275103`*^9}],
Cell[BoxData[
GraphicsBox[{{}, {},
{GrayLevel[0], Dashing[{0, Small}], LineBox[CompressedData["
1:eJwtmHk0VP//x800dh9iUtEmWuxbSdleN7KEJCQpiiJJJbJlaU+0KGu2EqUs
UZaxhDuyZM86lrEPY4uYS2Qs3/s75/fXPY9z7nm/tufz/X6f927HmxZORA4O
DmUCB8f/fQPHTrDW18lUn5CnnnS5TGD6b16gr5CpNWSuPa4HMsFs48BiwT8y
1WzJvY2tkQkSR9xXb2JkasmAiZq0cSb8CA3nGWSSqcKv/yl/dMkEHsXOndRG
MtXS4Z2rSmomRN6+aHIvnkwt/XJR+a3UF8ggeH7gUCdT9Uenfu2TzgJOJ0NV
MTsR6jFK5HycwVcgd1W5Jb8Wpm672+lg/eQbWFTEXZKp20jdsGlae9tIDvj/
0XZ7xRCiXqs/EFXwMg8KfeJcs08KUh9vV3kYYk4Bs/DTEmuxAlSf+D3BV+8U
gmFiqZnRbz4qW89hvXmiGFJ/+tE8z/FSm96wfYUflYL9o0jRX5+5qST/6w7Z
jlQIurghi5/MRc0uZjrDvh/AobAL1XtMor7bNWzH3F8JPc9igzM6iFTfvIKl
9fxqaKuSyLz4i0hVTOlwvkSthob1T82itURq+W3e8Ma6aijzpIjdKyFSb4Y/
UqMMVEPyubYMqxQi1bM9ybib9ye4yv3XvOpOpPqFcby4duEnsOvubTUXIFLv
+m5+MC5UA9v5XNLmdQnU1cfcOdHBtWBf1vBcUotAPb7hVMBAZC2891BxN1cj
UHVeP15TSa6FffTlQ5n7CVRl69IT8yW1oJT5ovKSAIEqWZMv+IdVC7pmuQOt
HRxU3rE0VuXFOrgavib6zYWDKmo9zlA9Vg/X1GQ56dvX0cGdn0S05BvBg7Po
k7fQOno7bj6HpdkIdzoMjUWI62iAgqNovkkjhHo5hR0fW0NjK9RM7K41Qnp+
kljhtzXU4aPSJ62MRphQ26IYZbCGdtiFpiIKTXDlEOnMSfdVNJIWJp2p8Qsu
qfd/rqhgo+TuD+HtZc3g/Fnd2qCAjXLIjlt8+9kMrmKvN9Sms9FtqauBkc3N
4M7Ws296zUZvoC9kbww3QwCaRu6+wEYTLdt9bnK1QKShV9AMexkV2m/1M+tk
C1SfEbASO7iMXkF47IzGWkDWV2P9xocl9ICtG+OwfBtQ+8xkGdFLaNOCSkyV
ehtY6106fSZkCQ2WLk4+p9cGDwSfZ8CNJfSCXggjxbYNuj/0ndl4eAmNylxd
+xjSBk9b7n39Vr+IxnccNvWdaAOm7E+HedZfdKtMuEbk13Z432dZ6Xd0AY3c
cMW6yJ4GqiOqy+0HF1C39+rXWddoUDkprKwsvYAGT50sUvOjAXPxVzxTcAG1
YmiQ6RE0kBUx9bTsnUeDls1K3tfSIMfgmKSCzzxqNvrUeZ96J1RmH7w3mImh
IkMJqsbiXTB2X1TLcCsLJZPzxljEHuALzP4TwcdCn36oo1lv6gFF3+Mpgytz
qHe3n0vt3h7wvhHId2doDiWqVqX0GPUA17nRrsz0OdSmOLk+K6wH9hzM9xLR
nkPloji9pCXo4Mi0yu5zmEWfCSbtpZj2QnGUtP649TTK9+ey/hCtH3jOjV0i
aE2jw+2dfBNT/WAtkfpAfPc0Gjmc8ItAGABWuhTVdOo3yg4yf+AsNwAy1J2a
3+7+Rnerpxau3huAN5ObVO58nkLX5I5aUbYMghcQdggsT6APO1TXahsGQXmi
e14pkYkq7N3a+thiGG7PKshsecREc7tPvPW0H4bCxft2a65MVJvNqrjqOgxH
uWSrGw4z0XenvPbcfDAMFlJ3Yq62j6KmCp+9+nOGwctOXCOFfxTlUIwjnhJl
QHGL7d3NdxhoW3VAedggA44V03lXrQdRNdMZw0evRsE9LXtJmNyGZhtlht77
NAHWzlLvWwOK0JJyrXCh3mkIveX5NDy/EC06UTXW/3saSgMqblrMFKAmcXAm
a3Ua9kRc0mm9QEEr4vQ4T+yaARaaQm/RzUXDSl5vfuI4AzsPGMknC6ejddqv
pmvHZ2D2TezluVhH9Lo0x2IS9gd+NnSHHrAshDw93ef/VmbBxbfn5zm5Iujs
7D8awDkHPHvopEcbiiHJ1nLfv//mwNi/N6g99zuEaXQSh3bOQYPMgIfXJhTK
9tjnOyFz4KLn8YU++QNoimoc0g/mwC3JJ2pHZi1QfZ3TctfnQOvvYq7K1joY
GK2lAzcLBEx9W/Uf1UGcdY3JD0EWfFn0Fbpxvh5+SyCX0nawYMbsTkiZQCMo
/GhnrmiwoDCorCz7UDNcWE7fkOjJAg2F8hzzmDY4GRnCO0xngVo7Lbqstg2+
LkhovRpigbL/7zvyK21QL/A8SHWMBftqt+jxOLTDN1f5FgsWC8hON9pQ2Q5I
GLzNw8GDwe+EbfOKZTQI+ZZPWlLGYExPpSthlgYth8lcvWoYDE8alPBJdUJo
EH9SjgYG3Yc9HjGDOyHW+4K++jEMqttrNr091QV2jm/n460xeCfgrfbfaDf8
2P0mkOqLQVzuMzH/LT0QunBUqDIAg2jb96vjx3tgGdk3U3gPg+efG6oqs3pA
+KWskfdTDHyPSVkH+NKBzSPmqh2DgefUYY3JdDqocLEv1sZhcCPcbKdNHx3U
rzhsMniLgdOgH/OAbi+sx2+8LvwRA4uAZu8p/j4IDu4Sn/mGwQkppu1ZnT7w
IaxIr+VhYFTH1vnp3gdV0Xs91wow0Nm6nzulow++v71171cpBnJ5gTG27/qh
o0tg7lsNBvvORfjXtPSDb1PkSd16DCSJaRcOkQbA2fa8/49GDLaat+8XuYr7
kL+DJ7wVA6K3aO9lsUHInQ7OdqNjYHsxvbXw4CAYRqfe/tiHQY4x1AqYD4JL
0obqugEMHHddpeQ9GQSaQ3tPDwODYt61TJ7kQUBHBJ9UjWIgMh+ecr50EP5U
b36RMIbBj5qSV6T5QRhJWn8gNIWBeO6pYBuhIbCqPGyX8RsDj0RmYKbsEAi1
zl49MINBXbD/bQ6DIYg+/Pfdpz94/h4br1k5DEFn8PO/3HMY3Dn/0eFzwBAs
YW5OViwMWg00bFZi8PVaqkeeYxg83HZZ/0PTEKyGLiyWL2DQy/lPc2liCOSz
/IPK/mJwcPaFqinnMDx+07+cuojPs0dSJkliGKYjk6/4L2EwUlmwa15zGJKd
K1HNfxhoZZtuNjozDPTIorUxnCNjhwQSPIbhVLa7xL1lXI8PvTfMvhiGtGen
dpPYGBy7wb+slzYMzf7aa544J9gkzcZUDsPewLC8XzjP66qNTQ0Mw62L23W3
rGBgqlDXB+xhKJ1U/WiM84ctF9ojNjPgz0x871WcVwjzdWMqDFC8GDd2G2er
30/LNU8wYKPdVNU1nDNpOwrDXBgQfqDaxwxnUnlOFuMhAxrtele343w+w/Cj
+jsGBPicPduJx8+L6o1/VswAfXnGs0CcBe7dCh/oYEDFztgYIZwvu3KFHJhj
gGfNprsv8PpKrOLvBguMgKXFVf1FvP5NoOxN3z8CN5ylZkxxdpOpclPSGwH1
ZaPAl3j/qsi2lx7aj0CZ8NnF73h/d67NnO30G4FefxOHDrz/3uMPzeWiRkA1
+BW1B59PU+tWw7tfR0Dn68ZtDfO4fku/aLfVj4CJkbxPGj7PoE+6B/ePjcAL
0e90D3zetNedsv7EUTj4m99cGtfDE2fCVqkjo7Caczf4DK6ffvNoQR+rUbgV
EXauBdfXIU05zvqbOF/UcFDH9ccUOs3ySB2FhstHpWtwfeosT4xXl4+CWZjS
GgvXb/RI0IB43ygo2tIV+UYwMCj63PCDzATb/oCmVVz/b1O0KzYrMWHaJfp0
D+6Pvy9ai1yNmSDeknslBfdPquNKqsh9JkhyCDuyaRhwC5jfd5xh4nNf16hs
wMBmvy31EO8YXPlqnUiuwyBd9/I6354xEJpJyDb/iYGZn29g7tkxiFYYkIws
x/NhJvmRqsagpv+xsG4+BuOEjMKugTHwos+UcuRgoLEjfzFzeQyOjuS+/5KF
129Z63VaeRzm1/vOtn7C+1k+dys1fhzOlFenHY/F96te9tc7lHHYXpsqFxCF
+22Rc9asZRz+yjY8SHyN71eK4jcWuSZgLm4L15cQDCjxuq5GHhNQ/e5KNcEP
A33vCMdJo0nYpWRjFW2F5/c68X3ZpUmQ6VyqpJ7E88v8NBgeNAkm/Un36ca4
vxjf7TXzJiF/VdxgGMGg3XzE9vmuKaDGevSoy+N6k1OzVPw7BfY5y/3iHLh/
B2l6HinTwHmoJCs4kQX9RSbXfUumwWNqt8alGPw8iaBGB3VMg2W47eGDr1kw
q58+Eco9A21Nn+coj1hgnxEYlnJtBoT3FojpXsP/995Dbz/wB56bnPV5fIgF
/ziPFG1znAXh116RntVz8DX+iXkQaw4qr9u4B7XMws3kyxtHrBcgmHfotPOu
abB3jdsRfH8JxJu2THL+G4eQU95HDiSwodvatlvGdBTCG2TdMtPY0B/nFmKi
PQoJhgNv9xawQeK614S34ih81TYibW1lg+jIu8rJjaPQJSP+a4V7BSS3RSsY
0kZAmlh2udpzBYTHXzxudxyB6hzOV2dNVuHDfbVTRriPSZuimHeX14Bb0MHo
5tAQiMwECYpwr8PzSRto7xiC3TUuhz6Q14HUFep3tG4IdAK0ntTIr0NGkHDm
wdwh8Bth7BW+sA5ZPdcogY+HYCZP1Sm5Yh3Y71tTYuSG4Lfs+C1HAw4kT3qe
vy1wEDrrH88+EiIgPupi23d79kOkTqL+6c04jyPP1Oz7weJbXtzeHQTE84+b
xLnj/dAUzThWLUtAApzqX3bv6odqh6Ox3AYEpDFqVD25sQ8oiytHQwMIyAMR
oRAb+T6IlrodETZBQBT2RsRw/aXDaX/HQ3EVRKSy53p8Q0E3RCdu4lqsJSLr
Ueaa05+6gYZWd1g2ExHGQRsN8TfdYE2S8/qvj4j8NnmjFOvbDTYvsNx7f4mI
sfCvKRmNbrB990jliswGxFRp7fxLtAsuVqTKHwzbgJSuK7rubusEN/4pySZb
EuIe20Nw30aDKb9iEr8DCdEwXplNEqSB63gI0/AKCbE+px1NJ9DgSpV0erkn
CZGq1GRcH+8Ax7vOKvnPSQiBtDmNk9IBZ7EhSCgjITIteiS2RQcY0LvOu0py
Itu33OH6GdEOuzKqo7kmOZF120WavlIbWL0rLKqb5UTUckuJFVJtEBqR3vty
kRNZ5QrxOL61Deb9X0pu4eRCRNVUVm4R2qDO1DprvwQXMtPsXq/c3greM6NV
RtZcSD7ru6C9fys0qnAuhP7gQtJHbY11mlvAv1DPUiieG3mzXaXCKbwZVM83
z154z40Y0UquRoc0w+T6+ZdfP3Ej/sX7/RrvNYOtoXftqTxupNEsssTsZjNo
0D5DZCM3cpaUrpVo2oyfs//Ji3HwIK/2fHRx4mkGb6UukpQTD9KwIQm/8/wC
91Q3yiElXsTx9by027ZG6P+1LUrwEC+ivPyDw5u/EU78q/NkavEiIYKOa8/Y
DSBrKqMSbcyL3P3upNNLb4CRudGMBSdeBFU6Ei+Q2ABntC+8z0vgRSY5fhxJ
2d0AOu2nnqvy8SF2GZb1dgfqQYCo7qg4yodcnSyY7fSuhSKfDZbMKT5kwYkz
vvNqLThP/9J7y+JDNhl1xwyex++1XS57BTn4EYaHqougXi14ZseNT4vzI9vz
9e52CdVCz/m1G1/M+RGbzLnAXRk18Lmgyl++hB/ZVWy2UXf8J+hft4qSjRBA
judZhmn5V8PWoh039fcIIomVJfGOEpUQ7vH0tXKnEHKf+DAkDysHiycnFRIp
G5FIbUmdykNUkD336PSHQGGkfKp7M9GvFGhM3uSI0yKIe/+kHPK1GJocR4+K
7CIjO940i0q7FcIQ6dNSlCQZWUg/apntWAjzqS7ZYvvICMXv4ZTm2UIQm5ra
vluBjNyP6djuZFAIlz1Zi0qaZETSd1l0UaIQlh+ufzlxhoyUVr3j3txZAPs+
iomHhJERnx6h8r2GBXDEkN4sEEFGxIaSSad0CsB0IiH4VTQZqWnQlL+vVgC3
FCQWYhLJyFNBf7FZqQIoyd/XnJpBRj7/952Ph1AAFtUHnlT+JCOx7rcMdpRQ
wMllQcuoHo+fJSYflUsBX74CrL6JjKwLC6PCGRRINNNwaOsgI0XYx4GtcRQY
pyFawwy8vm2bsu19KbDsS8ScxsiI2sXGZPZNCvy3rTJtYpKMvKx5JZN4hQKq
Fwy3zM2RkZtNRoxpawroE3ibbi+QkYziRqFEMwrYpNQ9WloiI8uOgT/MDSjg
qv9cM2AFj9ewb4lHhwL//96FvCqI/1KlRoH/AULhsJ0=
"]]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-5, 5}, {0., 1.2491349265092242`}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{3.6625810929804163`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[",
RowBox[{"plot1a", ",", " ", "plot1b", ",", " ", "plot1c", ",", " ",
RowBox[{"PlotRange", " ", "->", " ",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "5"}], ",", " ", "5"}], "}"}], ",", " ",
RowBox[{"{",
RowBox[{"0", ",", " ", "1.25"}], "}"}]}], "}"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.661174633960438*^9, 3.6611747263832273`*^9}, {
3.6611747708918543`*^9, 3.661174802202121*^9}, {3.661175004220257*^9,
3.661175057446113*^9}, {3.661175411344037*^9, 3.661175419343192*^9}, {
3.661175451950192*^9, 3.6611754737108583`*^9}, {3.66256313750655*^9,
3.662563137801505*^9}, {3.662581032355836*^9, 3.662581042314878*^9}}],
Cell[BoxData[
GraphicsBox[{{{}, {},
{GrayLevel[0], LineBox[CompressedData["
1:eJw1mHk01V3Ux7muKUKuCtVTylCIKEOl9k9CJMlY0YAMeZRZicRjqDRIRciQ
IUXmIUPl/DJdU5drnkIR5er+yjzf975rve9fZ33W2Wfts7977X3O2lJ2bqYO
JA4Ojm2cHBz/u94ePzXFYlHwmxOn37IW38GY/6bZ/hUKXjds1nealA3GIkPz
pYsUPCZcJi9tXTbsOOi+6jZNwQ8cDTGw3JINVRFP+YbHKPhkcJH/uFY28Cl1
/4N/oeBBPWJ5H4Ky4bn35ZNBLym4mrOkyyGBHHjH6ZXOoUHBx5a2iwkr5gK3
g76qxAVR3IbjVnePaz5QempdU6M24L+FJ7KoXQVgWh1vv6dRBHesrjVPcioC
f+KI65MRYfxogMmislUJlN2Id8k7LYQHbC2zNbtaCsZPLXasxQnikSdkHM04
KkA/8ZPxicl1+IVjKZj1/EfIoPp1eVnz4zoxHppW4jhcDH2+seUtL95kbOUr
IlsFgZe5cgUoPLjpRM7GRZcayG/Rf9whyIN3vC3QzPCuge9HH15P5OHBB90P
0s4F1oDeto3KykvcOKckl2NHVA0I9cnmm37jxi2K6V83l9dAkplhYVweN55K
3ZE5wFcLSC/qvZwRNy4mffxRaE4tcOzdjnTCyPi5u2LUaEEqBGzSvhgWSMYZ
toYneSSoMM+yW627QcY7HmjLBslQgdmWcdjQhYwHWviSnhylQv9NpTKT02Rc
WvK7jpQHFd7XHCm4IEHGnZzGwzb0UOGajU3ajRwuvK08+I1TTj30PYi7+66T
hN9nToit3miE9tod2ZdbSPh8Xq0/f3gjNLPetG5sIOE8m69I7njeCJVe7yWC
PpLwtObNO13zGyHVuv2deRoJj43SNgv61QguCutbV91JuPKB0I0pF5pguTFI
3ESQhFe/mQomGzfD1nXOmTPHOHEgH2W5n6HBxcrmhzu1OPF/qP4mn+1pkOKp
4m6ixonzdk6H7PClgWz/knq2HCeebPynXuAlDZSzH9XYC3LiE/cMz7z4QYNj
xkVDbZ0c+FbK8+LHt1vg6tO1jQXOHHgNUUcutGmFf9Xkufu3slCpXaDTagEd
PLnL3/gKsxBnWuVV3k90uNWpbyhKYqGtxhrukvV0iPBxiDQYX0PTJlmZ1oN0
yCp5JVFWsIaOsTJyTwq0wS+1zUrRemtoG8tF9JdjGzipk61Ou68iX+uz7aYy
7WCvMfi2unoZWfg87PuEd4DjWw1LvdJlJEb3C738pQNcJKK4GrKWkUf40JBg
Xwe4L+tcpEUtI9aWw/X/TXdAAMqk9F5aRulDKQqjsp3wXN8nkLm8hB6d930d
EtkJdVaC5hIHlpDjOM+Qs3MXyN88xLqevoDOBKuGOR/qAfyrsfxIzAL64G/y
a8WwByx17C2s7i+gkplb/UnWPfCf0MN3cH0BGRB8jwVu90Bv+lcrEc0FtNdc
Se4+3gP36EH5BU3zqE86jrHVsBfG5Km2M1Nz6KWrhcCIUx+kfDWr8dOeRROD
RVXpLQOgOqq61HFgFt25Jc8K+T4ANRMb9u3bPYty1D4UuM8OwNh8y8sxoVmU
Mi0b4bnlK8iLGnmZDcygXvrNW+LOX6FQ7/jOvTdmkM8pn7Q/XINQk3cgaDh7
Gln/4PEZ1x2C8eCNWvriU8ixTcwpcXEYKqJ36/60/I3KK812ih4ehX2/emeU
E8eQatLm8T/UcThe0c+/ajmMGqWOhH3ZwoDcrNcHqYeHUUgoN3/MHgaIv3S7
GrVjGNmUN1yz0GBA1zzP05MdQ+j7raGNZaYMkPG3FElcGkRiJ/715b3PgKrg
WUFM/yty5T0flTrNgJXH+3nCh3vRiblRYXs0Ca1uVAfJrF70ff0r79dNk5Bm
Yl2b69WLVneuM+7pngRD0ZDQbp5eJF8d+EDozyTERbeR9uztQUdsApxLt/8G
9QQPVpNfF+pK0vVu9v8N7pl5Cxso7cgw/LR7tAwT9gldDzk23IbsrCxJvUpM
+OupKOSV04Z6qlzt+DWZ4KmVuatDvw2lWbUwlA2Z4NOSahwTQEcpuw5RI68x
YXpCwUCtuQV1XWNcv5nPBO/itxdjHFuQh4S8h28ZE+Zuy3jPc7D3MeOuizgT
FkS2J5er0ZD5oLgGs4UJK+qis0eSm5FxfZQ9F5MJPCELr/Q8G5AhUf3npwwB
d4183r8RbEB0KZVXAYoE8G2aauJ7U4+mz7c/WlAlYF0mY66xn4owgZCMt0CA
cMug0WndOiQd4ec7ZkXAk1hru/yhWmTex/hUdoEAUbueGxtu1aKfX7TMPO0J
EJulp7bn1qAayb9z8dcJEN9Su2AlXo2seGNkUQgBcaPaQuWFVSjPR2yw/h4B
krmVuyRPVaHM4vD15Y8I2KZdZjwQ/Bnl3ynzMHpBgA7N0uBzF0KzpidLtTIJ
0LM18Q4RQGg44eizGzkEnJgxSNbFKlGI216l2AICjCSPzDZkfkQ/VeJORZQT
YOm4K6UtoBwpDWby7KsnIMLD697TkjIk0mXSEdZEwKeAajdTZikyiu5u+0wj
QPqZ/dG2S+/R2ubtuyY7CDibVCTzNLYEfU+wtezrJuBBJtd6U3oxkvl+73Zu
HwFTKK2ffqwIbfr8w41vmADZpumqKP9C1PwlfMfj7wSc69LJOlNcgCQbRiMX
RwnAJ0du0mXykXK3nH/wLwJ+Ek74zk+5aO2x73Aig4DTPHyRqUo5qPGFZXfy
bwL+2X9CMXVDFooW2Gdq/peAMIOfS1Ihb9Fhemo1zzQBk5fuNaTMZCDx0PiU
pBkCzHx3x0o5vkbyHltHt8wRUPGw3jGlOw0ZiBaGBM4TIJXmrCZlkIqC/73q
V7dAwL1yPnJKxSs0a9tZOb1IwGDymdfaZ5OQk6CQMc8yATnNUce0D79EB1bz
pdbY7L9IH8L+iUVdYd8O9K8QYCArehvjjEaT0ydCElcJ2GxmKomNRqFs6iZ+
3TUCmljSbnceP0INIxzVdDY7n3udGWh+F9W918nVYRFALpIZvS0ZjN5fSK2P
ZzMmYXRkCfdBZ3FHkW42/4mNu/I3zg4lZtiGLrA5gPS8Vk/TAJ5QJ3ax2KwU
b08VU3eDZ/Rh5gSbByUKmALCAbDONfPHBzab7e/5GK4dCuaqKvyebH7fa/Xf
Xf8IUH/LOL+ezetxxq6a80/gmVz7wCP2/eDZu/CaG88giuocNc2Ox8Px3181
z2NA+kix/1E2px5UMKotiIOZYp3k6+z4OwQZubW0BPiQocARytaHZzhrQx0j
GbhTedIClwhIOKd2yD40BXzEZh9eZOurphP974hoGvzLn1i9i60/TXE2wT4l
HTRG9pyisfPFwVHCsq98A0rvNL3b2fmN+yWmMmqUCQOamTuUpghQbfe2u9Kf
BXnK/Ueu/yHgSsaB2isLOUApXsdMmiRgNfL53Gh4Hpy5QHkeOcHWX2vpWWFE
PlDLp1odfrLtZc/XqkoUgrfi90PVIwTs27Ju0HO4EFJ5Be4YfmOfF66YK3xT
BHc4D98rHSQgZlFi9371Epg3ubxNp5cAanNvxH6zMrC9q9gj9YWdz5t9VGuF
clBSfq/5pIHdT6T7yaFcFXBpJef4cC0Bhv4DgR1FH2B+dXOJTCUBzXuGPH3E
ELwSu3vjBLt+XTuH8hInEZiqPMyte0tAOOY+Z2eHg0PBVmO5dALkJt33Pzj0
GQafO6g8iWf70/HM6Z+oAu0o9edc4QRoxk01EZbVcNK0e1NsENs/4TnBVV0N
Rn2vx4T9CciM95JTfFkD1+RVGJluBEz89U4JOFkH0R3jYg/Y/cz11Y3obdkN
YL8/VXTHTgK05uaLVMQb4WFDhcaiJAGCRjfbdEMbgbR9aaCUwq6H+ZvC122a
4Jh8p+4YmQCm8a37lYJfQCz6+5LAGBPKAisr89RbQWHWOCE5jQmH9n4uNHnR
DmIHc4R2rGeCWkdXTGVDO2xWK+B6x8V+L/wnbymutENu0If6XUu/QbZhsw6f
bQeMXJK7MjT2GygO19uRfCcEl+SbhKDfMJmwZUapsgu26CaNpFz7DcmCvmrr
f/TC7O4KrQuVk0Dy3ThwRWIYfKzI9dOHGMAraBJsxxyDNuurLZsSxiFkuEvH
M+033P6x7qeV2Cjkvww3CZz6C8TIazXuLd+giRI+LswxBVEL+QdYQt9g7EFY
YMr6KdgvaSPEyfUNtgaEZtfsnoK9gmestzKG4Z7Nf3wCl6YgzEM4ruDDMFze
Foi/aJqCIOlqhbMXh0Ek2WdfQfo0VOs9cNE0GwK31Csio5azsOpXcr85bwAe
+8UlPLafBZLfm1m+xAHINaHtPug+C4tyfu2mEQPAXNPQfnx/Fl61rm8TchgA
V2sBT82Ps/Dxk4K53JYBcBErbH8oNQe8h/8sd97vB8dwVoza5BxUHQRxLo8+
uOgSv+1u8ALYXhVZ0XLogeVeftrfRwuwbeOy9ZxFD8Qa+AXaxC+Aorer9Ae9
HqDvPjukUrQArUcF2x1398Dx8Y0pA6MLoHM1cER3shv2XImSVj2xCDmpF95s
9e2GmQv3FL4KLYEy38WepaguuH/G9+D+hGVY2//ux4+fHfC0Wd41O3MZJtaH
b1fq74AE/aEkmdJlSKjyzApm/y/zj5wgi7ctA91x8rFhYQf07JFsWeFdgZ78
rqd2AR2wm1R5pc5rBWbT1J+liXZAXSH3k3MnV+EPz5f/5PXbgSwWPXZnaQ3S
Sy2tbWl0EGUGConysqCijVtyvpoOUvXO6ukUFnyp+0N7Xk6HowFa4fWKLPD5
qML5M50OfqMjMhsuseBJtmHrpD8dmMWqDqnVLPCIpF1zUaDDpPxPDzs9Dkwz
5qAC/5NW6G4K+xMqzInF9Y1MrQ7Q4PnRRF2LTZzYM4vte0waaWBaUBwvs40T
00wZCy8opQEtZuR4nTwn5uolHZzylAZ1ttpxvHqcmLv0acYBAxq8n1/Rjgjg
xBQNFKO3lX+BmF3ezyJ/cWKrpZfTY9OawcLfTj2+moQlqZ8TdHvVCDGJYjzz
DSTsvPWSttzTRuhCdZ1mrSRM42vF318hjWBJVvBZ/5WE7TMxffnYqRHOPpou
CpojYeZBbyXNlRvhfHKoitMeLsxZI4ZUjzfA5eoMxQORXJiIs3bvJkY9uAow
dtLOkzEt/5MvQ62pwPCrIAvYkjE6Tehex2kquPy8P6bvRMYEhK2eKh6nglPt
7qzPXmTMo/XI6IwiFezuOKqUPCRjsQMq+I+1Ojg3/Q0SKsnYizjpkGPpdaDX
32PjspMbU6XGVVXM1ML2d3UxPBPcmN2+s06n3tWAf5mOmfBLXiwxWTBCQ7MK
3DNc36sr82NrJYZcAwY4CJI07JR+rMPiwwSWJsmfQPeaebT8M0HsdM6A322B
ChAv3+amKy2EHZp6srskoxSeet6L2tctjM0sRpxzdCwB0/DTexPfi2CnpudL
U6OKQN461CL99gbMJNYGUVcKoGuMP/WZhSg2IKoTdsMvH2h2P7RFt1Ow3mDl
NB2vXPhGfrMQvZOCcbwWVkHOuTCT4ZwnIUvBClwzKNjFXJBgMLZK7aVgx63H
6s8Y5MIVr6l55cMUTLurLap4ey4shbByTllRMDGhpBfeX3JA9rWE5P1IChYr
taujTjEHDur3two+o2CvXrnYjO3MAaNfCXefxFCw194itHUSOeCxd8fsi0QK
5r/24bIddw58LJFtzXhHwWTcOBknB7PBtG5/eA2VgjXUf+vijsoGB+dZrRNN
FOzIixMBnnez4ea60ukmGgUbSsB6R25nQ6LxIdv2TgrWuKEup8MlG352YVrf
RyiY++duV+bxbFi6SZp2GKdgeanOt4IOZ8P6LTWZvyYoWNXrB3KbVbNB9ZL+
5r9/KZjtTLG56fZs0OXkp3nPUrA/vt20uY3ZcDatMXRhgYLJh9UMJAtmg4vu
w8MBKxQsay7S/xRXNvzf/Ab7//nN/wC4XxLd
"]]}}, {{}, {},
{GrayLevel[0], Dashing[{Small, Small}], LineBox[CompressedData["
1:eJwtmHk0Ve/3x5E5U240CmWmkJAM+5gbJKJRIVNRIVM0UJFQZAghJfoQXVJx
o+k5MpQhmefhmmdxD5Hp/s53rd9fZ73WetbZe7/3fp/nOY+kg8dxZzYWFhY5
VhaW/z1vjxxlMJkUPPpjSm65Og2Gb4rOd65Q8BuzKh9kdWlgLtS78PEfBb/o
ABaRRjSQ0PJc9SAouFNw1xlHKxp8j4jlpg9T8BfpPBMHrtGAe0/rDvwXBadl
PeBNzqXBEx/7I3dSKLifqOcPOfmP8IbV+xWLJgVfp7WWL6xUBBzOpnu3nBfG
wwLeFWkkfQJKW/mV9JgN+Jiwyt/EvV/heGmyo3yVEN7t/OKlniAON//oXoke
EMSnGL4iskMlUHQ92e3tMQF8o/RN7ZTBUjCPPSGxlsSHL1cf3SvnWQGmqV/N
D07y4lLaZiZbXSthJrJrhX2YF7/+pWfXft9KSA5czinp5cV9teMlbe9WwqSd
Fpd2Iy/uXmn+9HtSJcTuLES7P/HiNhd8VaarKqEni6pCCePFJQOO8LXsqQK/
9ynCPbt48SQtj6otq1WQ+SOgxduGB1fbxaUnXFgDSXv9DLOtefDQC+mrWWU1
8CjVK7/nKA/O9VI8+FBTDXh5X444hPHgIjvGePOJGtAVP68nLs2DL9NU9PjU
fkGTH5ZZNc2NB+1n6eQt+AVsMlx+kve4cY2dhIcnqgXbkCciv19z4Uez+SIg
qA5q4S+XfzoX/q9N9ZhQWB3A8qkliWdcuHbhqfCR6DqQ8NrW6/WYC48T4fXO
Tq+Dfrv016J+XPgLjb7imxV14KKdr21ryIW3cSdstBOsB3dG9YWpbk7cSLR7
3eHMegi0X5e3nsKJR7gVK/CON0D+b9OoJj5OfOJH0NK1uQbo13vknsrJiU//
3B/Yt9YAJmIiyspLHPiPU88/t1IaQaBDJv94Hwdu1r21QlKvEZ5bHX6f9JYD
V7r9b0z1SSMgkxiarBkH/ty1nHnNpAlYdosjw/vseBdrzWZmWTPcEtW3vR/I
jp+UKFlLaWiGBabDasV1dtxSOFLYiN4M0w2Z2ofd2PGxtpcThcvN0Om/p8ji
GDtuk8t7W1KtBWhluu/Ob2HHqdyhqxKvWuDquXMZ13PX4UIPfVp4HrdCx8Ok
B2+a2XBWwwCljoh2aCyXoNr/ZsNPFGlo+CW3Qw0zq06kkg233FZguSOnHb55
07bc+cKGS5gR/bGV7ZBu0/jGOoMNnyza5yXA0wFuivx1q55sOKcov+upiA5Y
rrqz2YKPDW86O2jkldAJ23kvZc8ZsOIpf77e62jpBttvNY926rDiYoFWhM1E
N7z0UvW0UGfFa5nPjk8zu0Gmc0mDKsuKt+YPrzeR7wFlamSZIx8rHlm0Ke/7
rR4wMP/Q29DMgttmbv+2JNMLrrFrIu8useC/F84bnTWiw2V1BY7O7UzUFZq2
ubqkD7w4irP8BJmoRAd0t9T2wY1m08PCbEw0tc4U9+zogwhf58eHRtYQm+7J
P9pEH+QUpm0pereGGHL3zA2l+2FMfdOeeJM1xK3MLNv8sB8uarCfOua5ijJ/
X4ycOT8Ajpo9r0tLl1EA7YnFM4khUPA/wHR/tYi61PdY6vwahZfdVmUB+vNI
dSw/GHSmYOSuiI7pZgaKf/fww8HiGeC9/fZPHC8Dcd8Zdd74fQb2+B/KoK/M
othTKnydVTPg536b90bfLPoSkPTpdNcMcNoMtVFzZpF6or++MHMGpPYV+grr
zqIn4i9SHAxnwWHY+m33hRnk6cP2KLFiFkL7ph0UrGeQUubTEyG1s5DTFSZ6
3WQGpRs4rb/UMguMhi+3hRRnUB/7iULK8CywBR16Gjr6B0Wnj1gvsjMAVMfq
Lfn/oN370kzaMQZ8ipczHj05hba7nC4UyGcAt82II6vOFJKmX0sOoDHgpETm
va2SUygwbf+n1i8MYOTsws0mJlHF8zDlq5UMkMd3aL8LmkSL0gJp//oY8HR8
o+qN1xNIiBp0L1CIgOG3jcfiIieQ7c8KdkFRAvb5xrpTvSZQ592h0ehtBPxm
ClJ7dCZQOLeFyyUZAjhF1ssa1o+jYsHiPY7aBPgCqxjf0hjS7XLy8XQg4Ds7
ri3dO4ay6mxteC8SIFQVeFavbAxNageuxF0mgGq9kugZNYZ+HJhd7+dDwKDr
gnDzzjG0llVe4XWfgL3KNNVprjH0mSE/+CCcgDtzPhZcU6PoRmU+y6NIArYF
MSK1Po6itATrXvt4Ao4/meJ+fmQUrQ7x9Bx4RUDaGarsR5VRRJP2TS3PImB6
x2WTOpFRxK9YUaD3hoCI7NFgNvoI2ibYkrr8joCSbwNrLj4jKEohxOL5NwIE
QtLF7pwZQbohcaVJJQScO3RBJ0lvBLmuGKzeKyNgsbEnoJp7BDUoN93bUUWA
ylj7nHLqMJLht5LwbyLAZ2a3/KaQYdRefcryYwsBRQt3z6+5DaPiUk3d4TYC
9DkVKmr2D6PMGeWtlG4CQvkDlz6ID6ODUnZ/hXoJqNrYsCeFcxh9jnnquEYn
69t1I9G1aQh1seBVWYMEJCjUVlt8HkKmEfrvHYcJ6FTdybI/fQhJGc5zCI4S
4IRVXeL0JNe7JdSpTRDw2nRH6tTJIfTySLpm7iQBk+Ze9U26Q+gA144JkWmy
f+e3HshYP4RqnilvK5wh4JOTu3sEYxD5H74ZMTFLwNrl7+nX2geR5s4MxQ0E
AQbeoq2n8UEkx9+0KD1H5n/DbT2WNYjWbj2elJ8n87/7DWSjBkm/vWEV+0uA
YLiwj4DvIPJbslJjkmwd7fJ63mYQqc5x365bIOBp4qeuLoNBdL0krSN6kYCu
5wIbyuQHEQUzPYj9I0Ai08H4jdAgeq4V+L2HZKdcWkDswgBaeCxmcmWJgOwC
3ryAngF03dmqbpTk6c+2/fblA2gEe2VrvUzOU+l70YPUASS2e2I6j2S/Ks4j
ynEDyKHpTNAiyZ/qzwaJ3hhA7on+AqorZL1teR9W7QeQWppMymmSDehso4Om
JM8kSXmQHDpycnvNngH00s0ux4fk6ukciw8iA0i046ySK8lCf9dCklf6EXO2
IseMZOvV48V3B/rRmyPqMuIkP2XPmrpU1Y+47aJe0Mn4XeuXJS3e9SPB6xs2
x5AsQTl2UvNpP2p7aR2jQrLz1oyIHUH96NQzI35E1pcjufCNw6Uf1RVLRen8
r165I8SkGRmvIko0m9Rnr8oL2Sa1fjQ16pXNTrKfJmHzeWs/unV90+FjpL6f
9Eyj01n70efGzSthpP5M45Sy8NE+NKzlWvqO7I/R0T+Lnr/7kM5ji1eVZD/D
rA13n6b1oUjFKxl1ZL+FHCfiZUL6kM81OyEqg6zPDar4L/chxYGt4XfIeUm6
Frc2Z9mHNqXXqxuR87TzjvbFUvE+dEz6qVHSFAEuDx6n5HD2oZ4ipQIFch5z
ogZ+x0zRUUhkudebcQLUUh/ut/9MR0VTz5dvjJD5fOrkWT1JRyte4lJWpB/y
cv7T+qFNR8WdHnLqPQRsTvFwjZGgoxe2wfR1XQS0LHDGHmnqRZTbwmkXWwmQ
vnlSKHWpB20psuw79Iv0r824h2pZD8r4ps4RR/q3Rifwd3lkDyqPXztW+YP0
79p/UdMSPagsKjlllfT/97vzfJhpNwrSzhoPLST95xB+pUmoG2VuCtmp/Z4A
V0OxmksdXWidtIJAdx6pD4fxw5irXSi88I75OPn9sQt7wjMQ14nY7t3NUkoi
YCVKjTOU3o6q94rec/QnoM7jh/PWnHa0SVy7ZsWbgAwLm/I873YkOr9T/r4H
AYeFg0NaOdsRIxELdHQh9Y1vYJPf3YbkjnDZnLEiQOPZNWZ1QAs6z39mGlMg
yP2Nw87esAUF6DfEtEoR0H0+6dscXwsadLYlbMUJCBEvuS2W1ow4n8w5YhsJ
aEwXWnGvaELnkNduy1UGeGa/XdxAaUTYo8mYshoGqAi4BxvQG1C20rEn9AoG
zHopCXjnNqBVu3uTMzgDvHSydzWZNiB/s372PwUM8P2dbp5wqx7VOlm9dnzG
AGJc8ZB6zW/UHOwVa+zKAM7gxTQTr0pk+YqZ9d/yLJx02fWy4VYxwiT5O99y
z8KPmvYINasiMJFeeaA4PwUHdpe8t0hshGJ7JqfZ7TFg8xPpctpCh9Y5MV+e
D0Nw1j6noWgfHR5HcV19nzEE7w9DJZ8FHWQnzhg6PxkCB3FXWkEoHU4VWKeM
+g7B959fotnn6PC1Y8HORWsIgrc5Gb8izykhPNHT2PdBYC95nzcQPADXV6Ob
gjoHgIvP4q7D9DBUq74ul1Hqh9OyZ3ENnhF42nhu7yPxfsgxcGLySo0A5i27
bVm4H8wD/G9/ODMC5oEO1vP/+iBhOC2AvXwE/juSx2Pzsw9kSmavZaaMguy8
sOeoSx8Y+8U5jB8ch+3r7o/9yaFDML3F0CtjChJURVwupfRAT/GRq/5fSB0S
/cw3hvXAgTg8IbB5Cia/Nn+r9emBGeOcsQiuaSjcIb7Rw7wHbN/cfpxxeRra
8l8nnmMj1/tJdTap/YHYwVq5gSvd8I9Dq3ibwwxELri22Zp1QX5KqEUgYxZ2
Woc/4VPrgGpK6IggC9nnGs2OYskOGH54P/AlPwMmv/UF+wp1wPZbIdQyOQZU
uV9t2jTdDmHn7nGvt2NAd/X8Li7y/GovFognVjMg7m6odahUOwi98FV5R+7L
/zVue0jb1QYe6U5CgyfnYdfJPP7LB1sgKiDpWZTjPISUPjxhqt0CeRa1clqe
8/DKsPzL7j0tML2mqR8VPg/lZZk/Nm9sgSs26732f5kHM4/SQRfyfO628X3j
I8m/sOEqfanzRjO4hDIT1Cf/Aus62awZWhPYuiWLPbi7CJaHzfIFDjfCcjtP
7WzkIvzL6Eh3g0Z4eigg8FzyIlxX+ORdu68R6uVO96p+WIS3F4j4XPFGMBoR
edk1uAie6jukKucbQN4pRmrvwX/gzPWJ5pHRAHPnwxS7BZZg4WCrjjl7A4Rb
+mmpPVuGx7dokasddRBbo3CFmr0M8jXpFnb1dfDMtPe59MdlYEicjf35ow7y
dQ+yb25YhiZTqt+7gjpok9/6e4VrBTjUW9d1RdWBHNs3pwrvFXhVzTCLMqqD
ivcc0WeOrEJeTF20t9tvYN8YPxy0tAYDdhEnMqx/gfB0oIAwFxMszikV1Rv/
AsmflzReUZhQyLl6i1fzF+jd0gn9qcSE6KH1vClbfkHA4ID0BjsmFMdV6Wr2
1sB0wV7n9FImxFIk71tfqYFJhdFrDiYsWKVs0PxIZDW0Vt+fCRFkxQw3jPcX
TlbCE71U4xOirJh9+/erKr2VcPxdQbK0GCv2RN+iq6C+EmoTBowqFFixmCwu
/U5aJVRc0E/iMmHFyj9a7E0l/49pCyv6EbdYsaSKo9unN1dCwi6fuMdjrNgd
e0XBcPOfcOKmg0ZyKRvGfTlXc7ixAq6sn9hZe5Yd+1XrYOPnWAbibyoSOMc5
sJJtZiJfT32Hm0WGVoIpXFigbuCfKU8cPDOv0DSUeTD5K9V3jBq/Ah+bpsOe
IV4Mn3A61D33CYyvWscrxPFhLP9EbbODi2BzsZiHsZQAdvC5uaV6CA1ivcJi
VFoFsQfuek4fUwrgeOix3ak0IcxLJ1n4PvcHULAJOfHq9gZsj21U2dusd9Ay
zJMed0IYa97k+LneMh9qHYb0hcUpmMXNUj3FS3nQx561GL+Tgnlp5U99tM2D
ucxLb7fIULA4V7HZgyfyYMvExHbJ3RTs1qroxHWDPHDyZiwoa1OwjAwDRx6x
PFgKZuYePUXB7rx8ILfYkAsy/23ZGv6YgmX/Ygkj9HNBy7Szji+Ogh3VyOrn
0MoFs7FnD6ITKBhDxcBgu0ouXNstMZ+YSsFKSjo5T+zIhS+FMnWZbyjYv/OZ
jn+XqHC8Qi207AcFo1t5XPhbQAXnS/M6B6spWOt4LMOUSgV/3o9EdS0ZLyrU
MTWDCqnmBy40NlOwhcnaTqtYKoy2YDr9A+T7LjYPT3tQYcmfjXAeoWDXjttp
2l2kAv+2suyxcQomrVR+otGWCnvtTDfNzlKwv+sPERVHqWDMylPrM0/BbDRW
r5oYU+F0RlXI4iIFG4svzq3UoYKb8SPtWysUrFLxaL7FPir8/30Tdj08zLtT
kQr/B6jil2I=
"]]}}, {{}, {},
{GrayLevel[0], Dashing[{0, Small}], LineBox[CompressedData["
1:eJwtmHk0VP//x800dh9iUtEmWuxbSdleN7KEJCQpiiJJJbJlaU+0KGu2EqUs
UZaxhDuyZM86lrEPY4uYS2Qs3/s75/fXPY9z7nm/tufz/X6f927HmxZORA4O
DmUCB8f/fQPHTrDW18lUn5CnnnS5TGD6b16gr5CpNWSuPa4HMsFs48BiwT8y
1WzJvY2tkQkSR9xXb2JkasmAiZq0cSb8CA3nGWSSqcKv/yl/dMkEHsXOndRG
MtXS4Z2rSmomRN6+aHIvnkwt/XJR+a3UF8ggeH7gUCdT9Uenfu2TzgJOJ0NV
MTsR6jFK5HycwVcgd1W5Jb8Wpm672+lg/eQbWFTEXZKp20jdsGlae9tIDvj/
0XZ7xRCiXqs/EFXwMg8KfeJcs08KUh9vV3kYYk4Bs/DTEmuxAlSf+D3BV+8U
gmFiqZnRbz4qW89hvXmiGFJ/+tE8z/FSm96wfYUflYL9o0jRX5+5qST/6w7Z
jlQIurghi5/MRc0uZjrDvh/AobAL1XtMor7bNWzH3F8JPc9igzM6iFTfvIKl
9fxqaKuSyLz4i0hVTOlwvkSthob1T82itURq+W3e8Ma6aijzpIjdKyFSb4Y/
UqMMVEPyubYMqxQi1bM9ybib9ye4yv3XvOpOpPqFcby4duEnsOvubTUXIFLv
+m5+MC5UA9v5XNLmdQnU1cfcOdHBtWBf1vBcUotAPb7hVMBAZC2891BxN1cj
UHVeP15TSa6FffTlQ5n7CVRl69IT8yW1oJT5ovKSAIEqWZMv+IdVC7pmuQOt
HRxU3rE0VuXFOrgavib6zYWDKmo9zlA9Vg/X1GQ56dvX0cGdn0S05BvBg7Po
k7fQOno7bj6HpdkIdzoMjUWI62iAgqNovkkjhHo5hR0fW0NjK9RM7K41Qnp+
kljhtzXU4aPSJ62MRphQ26IYZbCGdtiFpiIKTXDlEOnMSfdVNJIWJp2p8Qsu
qfd/rqhgo+TuD+HtZc3g/Fnd2qCAjXLIjlt8+9kMrmKvN9Sms9FtqauBkc3N
4M7Ws296zUZvoC9kbww3QwCaRu6+wEYTLdt9bnK1QKShV9AMexkV2m/1M+tk
C1SfEbASO7iMXkF47IzGWkDWV2P9xocl9ICtG+OwfBtQ+8xkGdFLaNOCSkyV
ehtY6106fSZkCQ2WLk4+p9cGDwSfZ8CNJfSCXggjxbYNuj/0ndl4eAmNylxd
+xjSBk9b7n39Vr+IxnccNvWdaAOm7E+HedZfdKtMuEbk13Z432dZ6Xd0AY3c
cMW6yJ4GqiOqy+0HF1C39+rXWddoUDkprKwsvYAGT50sUvOjAXPxVzxTcAG1
YmiQ6RE0kBUx9bTsnUeDls1K3tfSIMfgmKSCzzxqNvrUeZ96J1RmH7w3mImh
IkMJqsbiXTB2X1TLcCsLJZPzxljEHuALzP4TwcdCn36oo1lv6gFF3+Mpgytz
qHe3n0vt3h7wvhHId2doDiWqVqX0GPUA17nRrsz0OdSmOLk+K6wH9hzM9xLR
nkPloji9pCXo4Mi0yu5zmEWfCSbtpZj2QnGUtP649TTK9+ey/hCtH3jOjV0i
aE2jw+2dfBNT/WAtkfpAfPc0Gjmc8ItAGABWuhTVdOo3yg4yf+AsNwAy1J2a
3+7+Rnerpxau3huAN5ObVO58nkLX5I5aUbYMghcQdggsT6APO1TXahsGQXmi
e14pkYkq7N3a+thiGG7PKshsecREc7tPvPW0H4bCxft2a65MVJvNqrjqOgxH
uWSrGw4z0XenvPbcfDAMFlJ3Yq62j6KmCp+9+nOGwctOXCOFfxTlUIwjnhJl
QHGL7d3NdxhoW3VAedggA44V03lXrQdRNdMZw0evRsE9LXtJmNyGZhtlht77
NAHWzlLvWwOK0JJyrXCh3mkIveX5NDy/EC06UTXW/3saSgMqblrMFKAmcXAm
a3Ua9kRc0mm9QEEr4vQ4T+yaARaaQm/RzUXDSl5vfuI4AzsPGMknC6ejddqv
pmvHZ2D2TezluVhH9Lo0x2IS9gd+NnSHHrAshDw93ef/VmbBxbfn5zm5Iujs
7D8awDkHPHvopEcbiiHJ1nLfv//mwNi/N6g99zuEaXQSh3bOQYPMgIfXJhTK
9tjnOyFz4KLn8YU++QNoimoc0g/mwC3JJ2pHZi1QfZ3TctfnQOvvYq7K1joY
GK2lAzcLBEx9W/Uf1UGcdY3JD0EWfFn0Fbpxvh5+SyCX0nawYMbsTkiZQCMo
/GhnrmiwoDCorCz7UDNcWE7fkOjJAg2F8hzzmDY4GRnCO0xngVo7Lbqstg2+
LkhovRpigbL/7zvyK21QL/A8SHWMBftqt+jxOLTDN1f5FgsWC8hON9pQ2Q5I
GLzNw8GDwe+EbfOKZTQI+ZZPWlLGYExPpSthlgYth8lcvWoYDE8alPBJdUJo
EH9SjgYG3Yc9HjGDOyHW+4K++jEMqttrNr091QV2jm/n460xeCfgrfbfaDf8
2P0mkOqLQVzuMzH/LT0QunBUqDIAg2jb96vjx3tgGdk3U3gPg+efG6oqs3pA
+KWskfdTDHyPSVkH+NKBzSPmqh2DgefUYY3JdDqocLEv1sZhcCPcbKdNHx3U
rzhsMniLgdOgH/OAbi+sx2+8LvwRA4uAZu8p/j4IDu4Sn/mGwQkppu1ZnT7w
IaxIr+VhYFTH1vnp3gdV0Xs91wow0Nm6nzulow++v71171cpBnJ5gTG27/qh
o0tg7lsNBvvORfjXtPSDb1PkSd16DCSJaRcOkQbA2fa8/49GDLaat+8XuYr7
kL+DJ7wVA6K3aO9lsUHInQ7OdqNjYHsxvbXw4CAYRqfe/tiHQY4x1AqYD4JL
0obqugEMHHddpeQ9GQSaQ3tPDwODYt61TJ7kQUBHBJ9UjWIgMh+ecr50EP5U
b36RMIbBj5qSV6T5QRhJWn8gNIWBeO6pYBuhIbCqPGyX8RsDj0RmYKbsEAi1
zl49MINBXbD/bQ6DIYg+/Pfdpz94/h4br1k5DEFn8PO/3HMY3Dn/0eFzwBAs
YW5OViwMWg00bFZi8PVaqkeeYxg83HZZ/0PTEKyGLiyWL2DQy/lPc2liCOSz
/IPK/mJwcPaFqinnMDx+07+cuojPs0dSJkliGKYjk6/4L2EwUlmwa15zGJKd
K1HNfxhoZZtuNjozDPTIorUxnCNjhwQSPIbhVLa7xL1lXI8PvTfMvhiGtGen
dpPYGBy7wb+slzYMzf7aa544J9gkzcZUDsPewLC8XzjP66qNTQ0Mw62L23W3
rGBgqlDXB+xhKJ1U/WiM84ctF9ojNjPgz0x871WcVwjzdWMqDFC8GDd2G2er
30/LNU8wYKPdVNU1nDNpOwrDXBgQfqDaxwxnUnlOFuMhAxrtele343w+w/Cj
+jsGBPicPduJx8+L6o1/VswAfXnGs0CcBe7dCh/oYEDFztgYIZwvu3KFHJhj
gGfNprsv8PpKrOLvBguMgKXFVf1FvP5NoOxN3z8CN5ylZkxxdpOpclPSGwH1
ZaPAl3j/qsi2lx7aj0CZ8NnF73h/d67NnO30G4FefxOHDrz/3uMPzeWiRkA1
+BW1B59PU+tWw7tfR0Dn68ZtDfO4fku/aLfVj4CJkbxPGj7PoE+6B/ePjcAL
0e90D3zetNedsv7EUTj4m99cGtfDE2fCVqkjo7Caczf4DK6ffvNoQR+rUbgV
EXauBdfXIU05zvqbOF/UcFDH9ccUOs3ySB2FhstHpWtwfeosT4xXl4+CWZjS
GgvXb/RI0IB43ygo2tIV+UYwMCj63PCDzATb/oCmVVz/b1O0KzYrMWHaJfp0
D+6Pvy9ai1yNmSDeknslBfdPquNKqsh9JkhyCDuyaRhwC5jfd5xh4nNf16hs
wMBmvy31EO8YXPlqnUiuwyBd9/I6354xEJpJyDb/iYGZn29g7tkxiFYYkIws
x/NhJvmRqsagpv+xsG4+BuOEjMKugTHwos+UcuRgoLEjfzFzeQyOjuS+/5KF
129Z63VaeRzm1/vOtn7C+1k+dys1fhzOlFenHY/F96te9tc7lHHYXpsqFxCF
+22Rc9asZRz+yjY8SHyN71eK4jcWuSZgLm4L15cQDCjxuq5GHhNQ/e5KNcEP
A33vCMdJo0nYpWRjFW2F5/c68X3ZpUmQ6VyqpJ7E88v8NBgeNAkm/Un36ca4
vxjf7TXzJiF/VdxgGMGg3XzE9vmuKaDGevSoy+N6k1OzVPw7BfY5y/3iHLh/
B2l6HinTwHmoJCs4kQX9RSbXfUumwWNqt8alGPw8iaBGB3VMg2W47eGDr1kw
q58+Eco9A21Nn+coj1hgnxEYlnJtBoT3FojpXsP/995Dbz/wB56bnPV5fIgF
/ziPFG1znAXh116RntVz8DX+iXkQaw4qr9u4B7XMws3kyxtHrBcgmHfotPOu
abB3jdsRfH8JxJu2THL+G4eQU95HDiSwodvatlvGdBTCG2TdMtPY0B/nFmKi
PQoJhgNv9xawQeK614S34ih81TYibW1lg+jIu8rJjaPQJSP+a4V7BSS3RSsY
0kZAmlh2udpzBYTHXzxudxyB6hzOV2dNVuHDfbVTRriPSZuimHeX14Bb0MHo
5tAQiMwECYpwr8PzSRto7xiC3TUuhz6Q14HUFep3tG4IdAK0ntTIr0NGkHDm
wdwh8Bth7BW+sA5ZPdcogY+HYCZP1Sm5Yh3Y71tTYuSG4Lfs+C1HAw4kT3qe
vy1wEDrrH88+EiIgPupi23d79kOkTqL+6c04jyPP1Oz7weJbXtzeHQTE84+b
xLnj/dAUzThWLUtAApzqX3bv6odqh6Ox3AYEpDFqVD25sQ8oiytHQwMIyAMR
oRAb+T6IlrodETZBQBT2RsRw/aXDaX/HQ3EVRKSy53p8Q0E3RCdu4lqsJSLr
Ueaa05+6gYZWd1g2ExHGQRsN8TfdYE2S8/qvj4j8NnmjFOvbDTYvsNx7f4mI
sfCvKRmNbrB990jliswGxFRp7fxLtAsuVqTKHwzbgJSuK7rubusEN/4pySZb
EuIe20Nw30aDKb9iEr8DCdEwXplNEqSB63gI0/AKCbE+px1NJ9DgSpV0erkn
CZGq1GRcH+8Ax7vOKvnPSQiBtDmNk9IBZ7EhSCgjITIteiS2RQcY0LvOu0py
Itu33OH6GdEOuzKqo7kmOZF120WavlIbWL0rLKqb5UTUckuJFVJtEBqR3vty
kRNZ5QrxOL61Deb9X0pu4eRCRNVUVm4R2qDO1DprvwQXMtPsXq/c3greM6NV
RtZcSD7ru6C9fys0qnAuhP7gQtJHbY11mlvAv1DPUiieG3mzXaXCKbwZVM83
z154z40Y0UquRoc0w+T6+ZdfP3Ej/sX7/RrvNYOtoXftqTxupNEsssTsZjNo
0D5DZCM3cpaUrpVo2oyfs//Ji3HwIK/2fHRx4mkGb6UukpQTD9KwIQm/8/wC
91Q3yiElXsTx9by027ZG6P+1LUrwEC+ivPyDw5u/EU78q/NkavEiIYKOa8/Y
DSBrKqMSbcyL3P3upNNLb4CRudGMBSdeBFU6Ei+Q2ABntC+8z0vgRSY5fhxJ
2d0AOu2nnqvy8SF2GZb1dgfqQYCo7qg4yodcnSyY7fSuhSKfDZbMKT5kwYkz
vvNqLThP/9J7y+JDNhl1xwyex++1XS57BTn4EYaHqougXi14ZseNT4vzI9vz
9e52CdVCz/m1G1/M+RGbzLnAXRk18Lmgyl++hB/ZVWy2UXf8J+hft4qSjRBA
judZhmn5V8PWoh039fcIIomVJfGOEpUQ7vH0tXKnEHKf+DAkDysHiycnFRIp
G5FIbUmdykNUkD336PSHQGGkfKp7M9GvFGhM3uSI0yKIe/+kHPK1GJocR4+K
7CIjO940i0q7FcIQ6dNSlCQZWUg/apntWAjzqS7ZYvvICMXv4ZTm2UIQm5ra
vluBjNyP6djuZFAIlz1Zi0qaZETSd1l0UaIQlh+ufzlxhoyUVr3j3txZAPs+
iomHhJERnx6h8r2GBXDEkN4sEEFGxIaSSad0CsB0IiH4VTQZqWnQlL+vVgC3
FCQWYhLJyFNBf7FZqQIoyd/XnJpBRj7/952Ph1AAFtUHnlT+JCOx7rcMdpRQ
wMllQcuoHo+fJSYflUsBX74CrL6JjKwLC6PCGRRINNNwaOsgI0XYx4GtcRQY
pyFawwy8vm2bsu19KbDsS8ScxsiI2sXGZPZNCvy3rTJtYpKMvKx5JZN4hQKq
Fwy3zM2RkZtNRoxpawroE3ibbi+QkYziRqFEMwrYpNQ9WloiI8uOgT/MDSjg
qv9cM2AFj9ewb4lHhwL//96FvCqI/1KlRoH/AULhsJ0=
"]]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-5, 5}, {0, 1.25}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{3.6625810930141287`*^9}]
}, Open ]]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["Figure 1B-C and S1B-C - Burn-In Populations", "Section",
CellChangeTimes->{{3.6611746161357594`*^9, 3.6611746173503027`*^9}, {
3.6625774253967648`*^9, 3.662577462465583*^9}, {3.662606047521247*^9,
3.662606082246353*^9}, {3.669332763540777*^9, 3.669332765323853*^9}, {
3.7032049630307426`*^9, 3.703204982788464*^9}}],
Cell[BoxData[
RowBox[{"\[IndentingNewLine]",
RowBox[{
RowBox[{
"FileLocation", " ", "=", " ",
"\"\\""}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"SetDirectory", "[",
RowBox[{"StringJoin", "[",
RowBox[{"BaseDirectory", ",", "FileLocation"}], "]"}], "]"}],
";"}]}]}]], "Input",
CellChangeTimes->{{3.668283829461403*^9, 3.668283888945311*^9}, {
3.66930780494631*^9, 3.6693078105757217`*^9}, 3.669308668056964*^9, {
3.703193378654346*^9, 3.703193393002442*^9}, {3.7031938965045643`*^9,
3.703193922737053*^9}}],
Cell["\<\
These figures illustrate the state of the population at the end of the \
burn-in, as well as the ESS trait values. Only the first burn-in replicate \
is illustrated in each case.\
\>", "Text",
CellChangeTimes->{{3.662577463801627*^9, 3.6625774866086197`*^9}, {
3.662598586538209*^9, 3.662598606279924*^9}}],
Cell[CellGroupData[{
Cell["\<\
File: 1 - 0.85 - 0 - 0.02 - 0.0015 - 0 [Symmetric one species]\
\>", "Subsection",
CellChangeTimes->{{3.6580707049519672`*^9, 3.658070706349422*^9}, {
3.658070744397442*^9, 3.65807075249966*^9}, {3.658076356754607*^9,
3.6580763606504917`*^9}, {3.6625774963684072`*^9, 3.662577499079831*^9}, {
3.662577751631178*^9, 3.662577790492811*^9}, 3.662578471457584*^9, {
3.662581798018008*^9, 3.662581820815783*^9}}],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"trysp", "=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Sigma]\[Alpha]", "=", "0.85"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Kappa]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Nu]", "=", "0.02"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Sigma]\[Nu]", "=", "0.0015"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Beta]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"tryvm", "=", "0.0015"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Mu]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Sigma]", "=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{"tryKm", "=",
RowBox[{"Km", "[",
RowBox[{
"trysp", ",", "try\[Sigma]\[Alpha]", ",", "try\[Kappa]", ",",
"try\[Beta]"}], "]"}]}]}], "Input",
CellChangeTimes->{{3.658074206458665*^9, 3.65807421166369*^9}, {
3.658074801389743*^9, 3.6580749396472607`*^9}, {3.658076014352268*^9,
3.658076022888116*^9}, {3.6625777618468847`*^9, 3.6625777620482903`*^9},
3.662578477841975*^9, {3.669320170978973*^9, 3.669320171494699*^9}, {
3.669320395672826*^9, 3.669320398790882*^9}}],
Cell[BoxData["6267"], "Output",
CellChangeTimes->{{3.658074932852392*^9, 3.658074948287805*^9},
3.658075053786251*^9, 3.658075661309265*^9, 3.6580760233468857`*^9,
3.661348768081315*^9, 3.661361475265626*^9, 3.662577504446596*^9,
3.662577549352231*^9, 3.66257779171821*^9, 3.6625779283183403`*^9,
3.662578485042122*^9, 3.66258047285019*^9, 3.662580802693659*^9,
3.6625978076065283`*^9, 3.662598562200474*^9, {3.663807754901279*^9,
3.663807769219434*^9}, {3.6693089424118843`*^9, 3.669308953053299*^9}}]
}, Open ]],
Cell[BoxData[
RowBox[{"data", "=",
RowBox[{"ToExpression", "[",
RowBox[{"Import", "[", "\"\<1-0.85-0-0.02-0.0015-0-Burn_In.txt\>\"", "]"}],
"]"}]}]], "Input",
CellChangeTimes->{{3.658071226407762*^9, 3.658071244891139*^9}, {
3.658074994893792*^9, 3.6580750210197153`*^9}, {3.658075621640133*^9,
3.65807562203861*^9}, {3.658075690781049*^9, 3.65807569876371*^9}, {
3.6625777972698793`*^9, 3.662577797581771*^9}, 3.662578487313106*^9,
3.669309004505835*^9}],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"genotypes1", "=",
RowBox[{"Round", "[",
RowBox[{
RowBox[{"Total", "[",
RowBox[{"Transpose", "[", "data", "]"}], "]"}], ",", "0.001"}], "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{"Length", "[", "genotypes1", "]"}], "\[IndentingNewLine]",
RowBox[{"Mean", "[", "genotypes1", "]"}]}], "Input",
CellChangeTimes->{{3.6540156291055717`*^9, 3.654015637852762*^9}, {
3.6540156904355803`*^9, 3.6540156946030903`*^9}, {3.654015764153283*^9,
3.65401580327742*^9}, {3.658071257922381*^9, 3.6580712642191257`*^9},
3.658075625809054*^9, {3.661348776598023*^9, 3.6613487797015142`*^9}, {
3.66136146018661*^9, 3.661361467487602*^9}, {3.66136149867896*^9,
3.6613615017026176`*^9}, {3.6625784995606194`*^9, 3.662578500496483*^9}, {
3.669309015681478*^9, 3.669309019888382*^9}}],
Cell[BoxData["2485"], "Output",
CellChangeTimes->{
3.6613487809482737`*^9, {3.661361475780387*^9, 3.6613615021844683`*^9},
3.662577556169673*^9, 3.662577804020043*^9, 3.662577928918355*^9,
3.662578501609182*^9, 3.662580473234736*^9, 3.662580803044672*^9,
3.662597807972514*^9, 3.662598562567638*^9, {3.6638077550506573`*^9,
3.663807769619067*^9}, 3.669308959554783*^9, 3.669309023690769*^9}],
Cell[BoxData[
RowBox[{"-", "0.015795573440643883`"}]], "Output",
CellChangeTimes->{
3.6613487809482737`*^9, {3.661361475780387*^9, 3.6613615021844683`*^9},
3.662577556169673*^9, 3.662577804020043*^9, 3.662577928918355*^9,
3.662578501609182*^9, 3.662580473234736*^9, 3.662580803044672*^9,
3.662597807972514*^9, 3.662598562567638*^9, {3.6638077550506573`*^9,
3.663807769619067*^9}, 3.669308959554783*^9, 3.669309023693563*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"totalsize", "=",
RowBox[{"Length", "[", "genotypes1", "]"}]}]], "Input",
CellChangeTimes->{{3.658076784459578*^9, 3.658076805699773*^9},
3.662578507433992*^9}],
Cell[BoxData["2485"], "Output",
CellChangeTimes->{{3.6580767952988997`*^9, 3.658076806295833*^9},
3.6625778063358727`*^9, 3.662577928985957*^9, 3.6625785078609056`*^9,
3.6625804732676086`*^9, 3.662580803077553*^9, 3.6625978080072603`*^9,
3.6625985626018343`*^9, {3.663807755117077*^9, 3.663807769653091*^9},
3.669309027044032*^9}]
}, Open ]],
Cell["\<\
The following sums the competitive impact felt by an individual of phenotype \
u exerted by all of the individuals on an individual of phenotype u:\
\>", "Text",
CellChangeTimes->{{3.658075190925829*^9, 3.6580752068114223`*^9}, {
3.658075541506732*^9, 3.6580755784304743`*^9}, {3.658076166027096*^9,
3.6580761819691687`*^9}, {3.658076486638575*^9, 3.65807648742222*^9}, {
3.6625803420237617`*^9, 3.662580348246387*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"competitionplot", "=",
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"Sum", "[",
RowBox[{
RowBox[{"a", "[",
RowBox[{"u", ",",
RowBox[{"genotypes1", "[",
RowBox[{"[", "i", "]"}], "]"}], ",", "try\[Sigma]\[Alpha]", ",",
"try\[Beta]"}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "genotypes1", "]"}]}], "}"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2"}], ",", "2"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Thin", ",", "Black"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", "Automatic"}], "}"}]}],
",",
RowBox[{"AxesOrigin", "\[Rule]",
RowBox[{"{",
RowBox[{"0", ",", "0"}], "}"}]}]}], "\[IndentingNewLine]",
"]"}]}]], "Input",
CellChangeTimes->{{3.65401717055512*^9, 3.654017187280355*^9}, {
3.654017344576412*^9, 3.654017359511397*^9}, {3.65401927528238*^9,
3.654019279074164*^9}, {3.6580749961162663`*^9, 3.658075010600336*^9}, {
3.65807618793108*^9, 3.658076188490995*^9}, {3.658076231516355*^9,
3.6580762327478237`*^9}, {3.662578424430344*^9, 3.662578429869256*^9}, {
3.662578513682218*^9, 3.6625785430394173`*^9}, {3.66258043211016*^9,
3.662580434565007*^9}, 3.6625805520910788`*^9, {3.662580800601956*^9,
3.662580801001749*^9}, 3.6693201722291107`*^9}],
Cell[BoxData[
GraphicsBox[{{}, {},
{GrayLevel[0], Thickness[Tiny], LineBox[CompressedData["
1:eJwt13c4lt//AHAZyYj0CU2rMqPs8OEcikp2g0KoUIiSjE+yesjMk5Wy75si
eyXzWE92ZiQpMtIgQj2E53e+1/X7477u6/XXue/rvKfoZTcze2YmJqZ5/Pzv
LQcEvjEYDCQwXM+dOUyBbiv7Q1dWGaglaK7f+yMFFpXKiy8uM9BmDqcdxhMU
qCBpeHn6OwOFMXRYmGYpUJWP8r5ziIG0Txo9u80UDOHEQvuTQgY610q7SUgE
Q7MHXbmKNgwkW/s1XtQrGHp1U2441m2gimDLoMbdIXBggOtbg9060gtiV/gY
+wDuq3fbobp3De10uTUYzRcGy52b2XhHV9HR2U/eXVnh0DZSfn44aAWddTC0
jA2IhPSYu6EI0FFQz3k3eduHkOT5uCtx/Dc6NmGbqnGKCpP15d37w5YRe4Xs
zO/bj2CQi5231KkllBrlUdOWFgPvsrzwcp/9hUrQO2rMWiy0C+g+MJi9gJRN
L1m4WcTD+NqpxGSnefQgY+lzUUMCrPokyZ0nNocqI6ReEpcS4f5tUOds6nc0
GmYxOTn/BJZIhzp9nphBr9Y3OHJKkuAnWrGIiso0Opb7pdrgdgqcOhSvgF5O
oEo/y0SOHWmQzy9HRW7TOMqIUBnItE+Hh1R+Hspa/IB2jqinlItnwPvHZ3sq
vYcQ+rju7j2RARtP/jBWujKEil5KZUtOZ0Amw+9vCgyHUBW3q8DQTAb0Pfe1
kxQbQrsXryXIzWVAT4ep1qjOQeTjeXG2hZ4Br4WO1tuJDCLIkNAhthLQoLOr
iKN1AI3lEitflAkY3tN5mFIygJbarj60PErA1oGOgo3kARTN6iPUpU5A3dG2
vMVbA6jYlUPqBSCg1hwte3TPAJp4yld6+hQBj2yrSy9260dsq6V/pK0IyH+2
gHpBsA+xbXl+0TCAgCXiEVW6LH1IyuqBvnkQAU1WHCflf/YiEe9qXRsKPj9V
9ChnSy9a6LSzuB5KwI2ZuE9Vnr3ojVb+a3sqAafv3ZXbO9iDzCZDwjfSCOhq
/CixVqobRXt0rGfVEjB7Sf9H/KZu1CPaRrgiAn5+wgpdh98gSia/hHIDAc9P
en0RCnuDPqZdaa1uJiDwuaQSMNOFnDsfnSrsIOA2UmZA53knGiqXl5Qbxt/7
m8bbeqAdiYvm5AT9IuDDF0Sj1kobeivrpnBwiYDOl/zvlHe1IbHNKdy0ZQIe
eH10hPBsQ775VwrX6ARMiM99dq+1FTlze4ecZhDwP6VHmoouLeixnSN04CLh
+Zkb8zmwBY1eX1ce5SahYrI+KcLfgrabVzuY8pDwBwsrB0/da2TP6+Qhz0fC
S/2eAzO8r9HKouzeHgES6rhbOaeWNqP+qNjAEFESComrCfGHNqPzPdrUHjES
/h3m742wakZbJ7leCx4gYZl2t4oPWzMq+q5NpIiTUJxPh/mseRO6SxtbC5Eh
IWeRxBOOvw3IS1YLdiuRcPoKq0FAdwNapn48+l2ZhE2C4xu/yQZ0XOanHqsq
CX39n16dNGhAItAwTVaNhHNGW4+g1Hp0wnvTQWtNEmaNTEV9pdShAI0veXK6
JHzvK5CWoliHyvI/zXDpkZBH6ESR6edaRLWZjpzG9rTN7qsEtWiecYYz7iQJ
9aacBMNXq9HycmJL92kS/heSJKmVU41M6aNHEg1IWCDRqfbLvBrduNm7Zm1I
QkEnWauL5VXIYItG1bgRCWfmfqZL36xEZy72VLaZknAvVaTko1AlMtqpIHHP
jIQm8qZNMV2v0BExx1+yZ0j46nbJ1Kr0KxToxpb+4CwJw+ge0h1TL1HBNuLk
HnMSSjOvljpblqFMvrcXmyzxfZDSNGHOMiTDk2tvYEXCmOOWg/2vSpFruPLr
PuzVkBq6hkApMhnODRmyJmEHl78md28xevPLfaXehoRM+YVG9f7FyHRE4ZmS
LQmVjMZsPOSKUWi3Y1YWdjJVO+hDRBFSHKl64m9HwnfSWx5eiCpAs7InTP65
QkJ443pRw7d89KlmPOQWdnZhe5/UyXzE/l5raxe2j1KU4CpzHrqWw7fF9yoJ
P3vOqV22zUXTV5bvdmPrVxpbtde+QF01Xloi9iTcrbU946l3Dvo0Y1BQiR0U
cLuJeTAbTRHClswOJPzeODDlpJiNStqp505i15x4LK0x9wxFDzoodGIfCKcb
kKefIdoj6x2cjiSM7LzgxpWThQ5fFzimi21turds5EomyhzgDCnF/rG4rHan
mUQftDrTprB9E7oRz0EStUgHivBfIyG3Wo5udjCBkp1YtuhgJ48EdWhPZ6Du
L3LnXbAP+VmZjuhloCfp45xx2NUiKkMez9OR8Iu/Byuxyzr6aMa9qajQff7h
X+yBbSG9QTEpqLgj/sPO6yRcPKc2Wn4mGd17oUpVxN6e9GNmZkcSosXX55zG
VhhLW9oz+AT9ktknZYdtevAMk/HjRATE/uXxwL7ptJk7yOIxytXjuUDBphZW
CpbvSkDv74VwxGAXLrnsn3kfh3ppT4RTsN+oiRzekxyLeBVAUhb2nF+/upF1
DGLMu/nmYm9tDtELFHqENE5INBVgW2z3yLyGotHOmMtuhdiPk99Xv9GOQtV6
ooH52IPi2v1KzeHIe/EqPRt7R/Hzb0/1QtGopvzbDOwzGjzMm9qC0e2JCMFE
7Biaxy7H0/dRcZUvisDuMR450tUVgNqKtnb5YguV3ac6pPuiqE596Iyd1GqC
FLK8kKqMzi5z7J2j++Y2ctyRDjOrBcSWmXirlmDtjCZTiTVxbHHum4/lHO0Q
1V6BnQs7YEByYE+TITrR1+b143/3xTvqxCarBBa9Ao06sAcXgtK20S0AYPKI
eI49byzxy83dAXTL1MkFYt+N1Wt3VroJ/unzO2qBveHnk5R2+A4QGxvMPoQd
4JTn0i/9H7C48NV/A8dPk0jYg5RtQcBt88Dlp9iUBLGbqg8p4F3emutVbD3u
GotergdgHxHwWQa79c+cFBt7JGCBZkylOH4dHaUdXm7EAH/ex3sJHP8nxbwu
3teMAzqXNl83x5YcbTIy8Y0H9/w9hTixv5lZq35beQzsz5yhOeJ8ctGibhFa
TgY0/1OcrDj/DFc+rH1TTAUWB/9mZV4moVyZ1EKFexo4az+Up4NNjxv/IUlP
BwZZp9c9cX5Xct5923iHBF9U1Ur+Vx/SZfn7C8UywfM67iod7BCTwp7k7kxg
u2pW3XCJhGcTJjo8pZ6B2DrhvJe4vsyLGjRKj2aDkpSis764Pg0dn0aC4Tkg
SX1NefoiCescA2pZVV+A3qT+HYbYEfllrz5Sc8GXHY5dfBfw/antK4w5XgA+
+Aare53H+WdVkee/UAD2XgnY2XYO54uf6QuX1EKwGtFLF8S2/dxott+3CNz4
y9uUh+unnOQfw/W3xaB24DW1xISEbaU2x4vDygA9XKfosD4J/6UdapIYKwMj
b+TZzU6RsGhwRTtVpRyk7eB3uYXrfcJKLIiYKAc5e9cuP8f94CpoVbfXrADq
XrV753VIyGg/Ir9roRLoVv1DWVYnofLnTUKBFgjU/b7YMiiJz68yXziSg4DZ
gm55sQT+n5j85rEVBHb/cZUNx/2OKyNPOd2wHmy0HahXxP1wzcTiA2OuHnTv
Ew+7LkzC0aJCKSTfCIpnXf1t+UmYdvNSs2ZFM5j0GWO7j/t3shVHQfynZrC7
RVuMb4OAiSfLHs+y00Bat8vX5DUCUkU4nVMsaEBNKNU3f4WAAT3lfOsrNHDA
TnmwZJGAdke22tT82wJerlhfMP5CwP3z1SvqjW3gK08J67tOAvp2HaMszbaB
qM2eifR2Ag6+6OAp2NUOnjfoJwu04fnIfmS/6K12oHe7aVWfRsD596uG7CId
4E5ksnY8nn/qaGpE/71O4JHXcKs4n4AXkyr0XdS6gRhjNHhHJAFPkcNdRhZ9
4KqO8G08AsD54AIH2o0+0CybEhKI57nEa/cZGvf7wJjSyxh+TQLOyMrKSxX0
AY5hxWRVPA+GvgqIY2HtB0zKY9lX5PB82CVh+aqwH5g/9DC23k3AE/Q7M6Ls
bwF/tJ7E5HwG1DXczrJcPgT8jv8xykvMgNE2QwFHKj6AB//dadOeTIctRvu2
mmwfBx6VoMWTNx3OivL79T2dAH6arApn/VLhHQ8Zu2iBadDbux7p9DEZDn3Y
ZubQOgPKcrTZA/cmQVuff7+wG3wHviG+8vqBT2CTjGp4E9sckGQ14pvuewzF
OWpmMk/Og7ipcRGzMwlwX42zLlvoAuBVSi5+ORcHmVaZc9w//wKCqYoP2e/H
wj+mtZdoB5fAsuPhhBrdGDiiZLPnIGUZnMu7LtXB9gjeNN/GJ/bhN4g/n1mu
8Toa7oqbtGDdRwfjF+kCY91RsMAy/fmi9wqY5E0LPfYuAppr+p9srV0Fw6HN
0UfFw2HxpRti6mt/wfXmTYkqyaGQznmMpfLcOgiWTFd14HsAzXo1VPYlbgD1
ycKsE7XBkFODq6EmZQNIhG99FFsRDBsy35+2IjcAGep7c7w4GB7x9rFLKtgA
Dx3zt9x/Fgx5hCsid9E2ABGnGT4aHQzbXBQm+H9tAOGJAfmfl/F+tkWKymPA
AIKdOnsCOIMh/RZ9d4EpA+w85yvBwRYMC0dasgzNGUAbCPPFMShQqNChOvIy
A/i9HvYpXKLAtXOZ05w+DEBjr4xaw/thBSmsyf6MAaKpoQd+llKg69afLc9y
GeD2un1ZfAEFinvVmekVM8Dz2WcCWjkUGKdvfS24hgFYRJ8Yx6VSoPvC01iW
fgaI+qYQcD6MAqUtnYTIdwzwdY8wlYtCgePNajk6HxnArZ3h0uhHgSaJ7+oC
vzJA5j/fw5U9KHALc/Yp0Z8M4Oya3L7gSoHI2WugfokBUl5HDxRep0DPt3o2
tqsM0Mi8K9vtKgX+/74LErUij8vbUOD/ATdIm9Q=
"]]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesLabel->{None, None},
AxesOrigin->{0, 0},
Method->{},
PlotRange->{{-2, 2}, Automatic},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{{3.65401717310271*^9, 3.654017187829471*^9},
3.654017373231942*^9, {3.6540192724811373`*^9, 3.654019295101372*^9}, {
3.658076192083295*^9, 3.658076207327387*^9}, 3.658076247547501*^9,
3.6625776031328707`*^9, 3.6625778241482553`*^9, 3.662577944294787*^9,
3.662578391828827*^9, 3.662578446612812*^9, {3.662578522231292*^9,
3.662578547175063*^9}, 3.6625803856341963`*^9, 3.662580477024961*^9,
3.662580806849924*^9, 3.662597811771411*^9, 3.662598566375152*^9, {
3.6638077551849203`*^9, 3.6638077734484987`*^9},
3.66930903492336*^9},ImageCache->GraphicsData["CompressedBitmap", "\<\
eJztW3mQlMUV/zhNKKMooCiiKApKdOKNHB6rCB7oRA1eWURERjCiG/HIRo24
RuOYyzGaEEPcqFljalOVbPLHWpXaVLF/JFuUa8l6LOiC67Eqow46qKOO2ulf
v/d6+hveLqO7VEkVVO0M093fr1+/9+vu97rfd87CG5YsXrbwhqWLFk6Yc/3C
miVLFy2fMPu6623RkEFRNGhJFEWbJkT4v7H/5Q/3byk++Af//zL3NdR+FE2x
WHTfhULxcVc8hItsYaEYzacnduEqY7ImU0Xwg93nENPQVTD8L0p65JxpTlfb
FtWmsa37cS7ubE7jIZNubDN5Y85zxcNMWyZpWGj3l2rsioZTx9/gJqbQbmqS
adMN0fKdpqm5MzpfhCq0mapExlgxose9oHmTTiRNW8Fwu+GurD6VMs3dBSdg
a2OL/TTDqKfB7muE6WrOmFRNramt5b+alEk3dZFGuptMdU0jeppbQXOTbzPJ
RBqdlOTKWQUmTWveRBf4sm5Tl6w1nUXDimZhhphCLmt6enrwZ8vwOcxkc17f
JttSZ6pXtkdzK2nvpMlAmkgT53tSlm02yWS9azc8NP9wUMIUitx3sd1URSnT
VTShIXi8MUNID+ezMQseo2BWJiIwaKueTJdJ1zYAyhR7mmxNlWnPM2OGOkF6
OupNgsbTEBA619NuUpaIbXkj/TXX1eFh2M/Ugn7t+XJ+ZVszJsH0q860WhwT
lTrLmpb6GhNVuc7O45H5GRY2tSPqbKm3iokJYOFNdYIJnlxpekqq/aboyY4o
T3qJ/qL08ITXZ9Hk886iQpZ/Kc3/uc0q/EVL8DEoVH287W79KNv9a463I8oc
myVfXzF3mmqnqXYgmfsw1QUDXMZdfbUlux9Vrma79rBzNDsHuuMN9FGucu5X
Pi+/3GcxnzPsO3uHPCwb0jvsI+5rd+twNrrq6rq0jQzSpiNHnm+HdSdT6XqT
rk6ahs6CVrZt+JEG7mZO3PueRpOsabbf8JZr4GNa37vFerV1NhBQyowZ3HsP
f3Zf3yIv37r0G1vrTKK2lRoV4PknzL+f3LrMOr2kq2FA/QeBPea+7MpbzJmm
2oSJqhvMf9MJk0i3c7dZF6ytqtu6zMYNfYhZUkTeNNZUGYogq01r1nrJbWkr
XktMvP+0bF3W1mcPj7IlO1amTG1Th/joptBV71SadaKSetcrZd0BeXqFt6op
dNiohSMEq568ECLTYDKpakuIfIkkpbI+OEIx0TBL7ILx4ZZlb75YYi7/5l+9
Qu2AU1728s8//9xX/VVpTqHWUPPZZ5+Z1157zTz99NPmk08+2SWO8tFHH5mu
ri7z4Ycfqiii608//dShPPPMM+7bonKEyV9DzTvvvGOee+4589JLLwFOC/Ue
YzTI9Oqrrzo0BPVAG0FoIxjt7bffdmgQzgrZoKA9EqC9/vrrMbRdCW1XRstm
s2bt2rXm5ZdfNh9//PFj3kr1jPHFF1+YN998MzY+cqiwVPgmmzZtijV5RBHr
4WAE6HPjxo1Q/EhC211RwVtvvQV0FiaOtorRcrmc167Vx56EtgfX2jGZDRs2
mI6ODvPuu+8+rAA9xE2tacy6detMZ2cn9oXRBDSKaz/44ANfu2XLllUK0Epu
isM06BN9bt68eS8CGsO17733nqvB6G3LhxSg3waKhQrEfpbZ0d6EthejoQmq
WFu/V9AeDDp+9tlnHXGs2vchoLGBoqBCqNKO73cK0G+4qX3YgTz//PNQ1DgC
2resG2jAju9BBeh+LpOxWfJE4wllXDCuN954w/HE8uUBz8v7Amu98MILTmYr
0P70+HiuLdgVEJZav349au9XhPgVN8VyAb6hJ8ulCQR0AD8hvLaiRhkF5Zdl
Vn3llVfA4AMJZUKgsRdffNGJZEX7tQL080Cc7u5uscNEAjqIn8BSgm7sjOQB
xFHuZRT4NWiHgVlVHkwoE7kWUwzigM9WtF8oQPeUaQdgFnQSAR1Sph0rFg8g
jvIzRsHkwYAwMIs4mVAmBcaCKcEpK1paAbqby0B1kMuqOzqMUCYHjMFiBzu+
//7793jG/JQbYKXGiMEY280UevwwRra6diLaBYzFjktwJ5fB0OgCnD2cIKYE
EmAMsLLt7C4F5Y6gKdSKsVgmH0FAhwdq5WGw9HGUFYyCOQvFYYGzak0QyhH8
BJQOs1mleOlDlNu5DAsojGinWXQkQSQCokBdUJudy3coKD/hMiz8WBCsMaOj
COVIrsI0hyBWxdY7orJtOdqVOt+3sqRYczHZIa1VxdEkwVGBKngliehCZJS7
Ukgn4XqlTVt34Gr17aNrZapkt3AZFiqM3q5m0bEk1tFchWUBOrOLhhcLLmyV
OMSV+vW6r686oT/mMqwkUAlm0nEk1jGsS8x58Bj6tAy4SiRrt5LVtTmYXIWx
wbbjhZsD/mD+WU5Hx5M8x3GVTHq7u0cpRZj2CuOKXmINVU03sy4wA6AH7NZW
L1NJsuP5CUwdUeJilqzQnvGSVRqP9BKjqJLdFJAHCsP0nkZiTeUq+K5QGHaJ
Ra5stI0Jcqa9IWW5RaJVGsz0EuBokt3IZeFsm06SncBVUCdWLDD+Ci4rZjtN
vQ3kkpk2HvBulcRBWpk2D2/gMuuJ+UV1Bkk1jY0MwmPhAOntypziJ8JQaXCF
ZZoEy7lM1kHweCZJMIOrsDFi24DrfKMCcX3QDvqz20t0IkHM5CrMEvDB8sKP
OYSo4cFi65HB2oGfRCgn8hPwzSEjwp7lCsp1gSGxK2BVO4UgTuIq2SGtu0By
O4Rrxdp2ocaaB9pW0YMnc5WslNZS0Q+VvpdxmTAf9D6VIE4RU1hXAn1bV99v
NSHENUE7dAWKnkYQVVyFTRVVNjLyow0hfhBIyz5jNIsgTg0ExPyD03itAnE1
l8FLE0qeThCnlakJ97nLFIilXGYfdRB2zkWzCWJWYCKoCVJco0AsKYMALecQ
xOkBBFwD66r4cYcQV5VBgDVnEMRsrsLcArPhV13t2ZBSHjyTHpwTPAiqgyhL
lb4XKxBnEcQZgfiAgBKXKBBXKhBnE8SZAQTsAJ5fpUAs4jK4jwJBN/MsTMmU
oGtKgZB1EJxsbm52btI5BHF2AAFTwulcrEAs5DLhJGh9LkHMLZMCVVcqEJcH
UggnKbWDhRniHGiOo/24Q4gFXAb6ox1mxncJ4lwF/QoF4rKgK8wgSEsX7SwM
jRGcBOMXekLNL7MXSE9X8SxCabbBQ71c6buay4SxYA3d50Ry/4/9HiPDGrtA
gfg+l2GNhdeAbY5yLHzmCg5cYEprDz9aDQLhMyIE/GIIuVxCXAxa4zhgvgJx
KZchGoIUOEGZRxCS8AFkwITjDiEuKZMW+9KFBDGPq7CHINoNhQ4hLuYyiYyx
ZV0Uh5ApDmNpEBdxmTgUWKEIloUhWgvXLvVskFqs5UI3GpLHBBOFRpcofYuM
IBSYiBCXFOtHJoSCy3qxAiHKBhuwV2IBoGH6HuVoEPq9qA8IuJ9gREnZ3srY
94EOK1+oQAhrcIgHWqMdmVzl2jwFQrgLFwrKBnfnxyEwRpgSK5RsQAN1wSKz
D24tTAYa0NTx3MV6IYYmP2TrAG+gL2ZkXREKwm1ZQGLJrBTigiEiVizA699l
jhofyDoJi8DeYB0td369EdZhARHHLwioeLT9vQmSbSPkLguygKsQ9GEdwa+Z
iiASDgzgLZLsRJgOsjjS9uk3BRyNQTL8msFWC6O6ft48qVYTZcEVkSl2RVws
8eew/U4X7pWiOoYd+Gsr8SBkMYWLQ9u/9zvEZ0bVNBFNCesG8MpLXCPsIXG/
xjsWoS4pQOjf1Zh0ieM22fm4S3GHsKeCVaFJQwjxCREKymJMDp13yjAfhH1z
FQjxTOWIF/tqKg4hexY2RQfhEMQrhnsmIQO5tN6nlBUWLtLZSt/im8tqjxiJ
HGvv2Vp2+rXlrD4gsCogmsUvhhD/GlsRotNwtCGEhBZwTrDz4RenOYuXz9ut
+3WGAiEBjizQcOiujkNAiXJqqUHMKmuHMyCKkXy4IkEBTDSnDwgsONjG8Ysh
JEQEUWSMsxUIiRdBPMDgFwV7PmCDKoVQpysQErUKoTBdlsUhhFDY4hyEQ5CI
WTZfaIrCXR9vSkAC/c5S+hYIzAUMFb8YQqJeWBlcw1Q5TYGQ0B9DBKnwi+J2
H3ujWCbsqQrEyVwG/wbDBHdr4hBYZmTx1SDk8EMmF3wUOsPwhwjicWJyVSkQ
shOHk4vOffxRBiaX6OKUPiAwg0QXDCEHKphzshufrEDINoxQR3SxPA4BAbHk
wiXWIORQC7uC+Gt0IuXPsUJdONU5hOlBBxgm1nQ6DfNnUdAA+g5dl7BvgYC5
RQMMIYdioQZmKhCygcnFMrq6KQ4RakCDkONOYQOGSSfK/nQv1MAMBWJqWVfQ
xY8IQk6AQ11M7wMi1AVD3BxUySo8TYEID7pFF7VxiFAXGoSc4odsoEsIFqZU
BV2c4NlwrKIBulRhEeKbzVSlb4EINcAQcg8SsuF4BeIYRQO3xiFCumoQct0T
auA2grhFqTquDwh0A+8dvxjiVkXAYxUIdxc2GGO9nR68TVHORC4bqOs5uQKE
zLAhFi7uXi4OsfTLkOj2f7R7eSIZld4OwgrYVfzK93OaZN/hMnF5EKKtiEsm
sxde7X4sWb6j3gaQzc6HzHe1mObVT1QWrVWejpfgMmw54sXRzau/spUzFRwb
kGSjTHdTralpoLeQBu56Tq6k4fPKEQELs4Kr4LmI60HC7GlaapNmZXuuv1dz
mnrkehuX5OJC15FEcj8NaeR0i/JbxsQd/46MjZMbzebtcD0nCgs9yzvj4smB
AQ4rvHjdTaaunhTQ3VxjWZAx2a76igK3LxPMfZvLxGstpRiwEuOSU7YRUqGK
pjVT7SdkptUReSDv6USy0HgsmWQvhK7gWFFmIS/vp1V8SVfpxd0ULguPKSir
w6dlhK7l4QqEpJeIO4UZe3ccQiJYbKAaxKFcFgZnlKESSYqJnLhjpXJ6dAiT
A1uL9055PT6fRkJkRChTlL4FAjGtRCgMIUkyYSh7mAIxSVEipfgwEp0/yg50
qAIh6UahEu+NQ4SnXRrEwYoSKWMpknwjmZYI5CYrEBODdtho0Y5Sp1iYUrgD
9EkKhKRxycE3pKUMMp8+FY7xkD4gwuN3hpA8LhhKDiEOViAO5DI8LhahZDJG
IotICO7G7RAmBCaXCwjKZfPJaHhI3KmDlL4PCIYpxLsvDiHH5bj40yD25zJZ
p6BsSs2LJLEuvAU6UIEYz2VypIWrasoRZGFKN1CYlRMUiP2CrtAOgSElSPo8
QUEHUQ5QIMZxmRAKAd8DBCEJi0IohNb7KxD7lg0YhKKMSxaGDiHWrFnjjnvG
KxD7BFJgILj2ogRUFoYG8tRTTzkp9vNsGBv0vXr1aqdsShuNJOlT/BT0PU7p
e28ukys3mJyyaFkEOpWQe5p9FYi9AinkipSyYCPJYRWiYP3bR4EYw2UIyaAB
QFBaLgsTrxqrQIwOpJWkgD8QhKTkQr+YNLgI31uBGMVliGnE5JRl7DOUJTEL
W6Qd7xgFZU8uk2wQuLV/JJRVQRXnHXq5Q4iRQW9YHrg3Sp1msNKdOUg7SkGR
F/YkCxEX6H8iCMkDx64Fq3MK7x6eWfLCHrYMmZ6UUM4QpcxTGGSk0r3kt4P9
mBhYk+zCQu9eMBglUGJ4sIttqb0oOCIQFnsUlGrHTi/LcN5+KemZU/x3VYDk
tXPwQPKNJb+dkvgjeaddAnusgpa0IxS04YwG9cI3B5qkiNMLBvw13FkKrEET
LPk45bLNhiuoQ/gRoAqD+CgKctJ7EH28QDXaBYTZLUWXR4ROYaOONf8za9d3
u9Ei0oOy8Bx6xlBhS2gEexbac14RJt3fQuqOV+PCdRu+3LXeorseMivmnWUe
bCXPDdqDpMAAS3BrDimhA9jm7yHvlQCwM9vv97HCF6fkDYUgnIv6fR9XZmZ+
YabefZWCNf9vwN/ZIvvpQVhxO9ymlXerBFfu6mn7vOC1iqnSW9D0FW/BniT0
aND/ATQHXm8=\
\>"]]
}, Open ]],
Cell["The following adds the resource distribution (black):", "Text",
CellChangeTimes->{{3.658076288037281*^9, 3.6580763014525347`*^9}, {
3.658076373076785*^9, 3.658076378521894*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{"competitionplot", ",", "\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",", "u", ",", "tryKm"}],
"]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2"}], ",", "2"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Thick", ",", "Black"}], "}"}]}]}], "]"}]}],
"\[IndentingNewLine]", "]"}]], "Input",
CellChangeTimes->{{3.658076255457404*^9, 3.6580762835585957`*^9},
3.6580763806995564`*^9, {3.662580376998959*^9, 3.6625803805266*^9},
3.6625804458306847`*^9, 3.662580549170567*^9, {3.662580797089583*^9,
3.6625807976891613`*^9}}],
Cell[BoxData[
GraphicsBox[{{{}, {},
{GrayLevel[0], Thickness[Tiny], LineBox[CompressedData["
1:eJwt13c4lt//AHAZyYj0CU2rMqPs8OEcikp2g0KoUIiSjE+yesjMk5Wy75si
eyXzWE92ZiQpMtIgQj2E53e+1/X7477u6/XXue/rvKfoZTcze2YmJqZ5/Pzv
LQcEvjEYDCQwXM+dOUyBbiv7Q1dWGaglaK7f+yMFFpXKiy8uM9BmDqcdxhMU
qCBpeHn6OwOFMXRYmGYpUJWP8r5ziIG0Txo9u80UDOHEQvuTQgY610q7SUgE
Q7MHXbmKNgwkW/s1XtQrGHp1U2441m2gimDLoMbdIXBggOtbg9060gtiV/gY
+wDuq3fbobp3De10uTUYzRcGy52b2XhHV9HR2U/eXVnh0DZSfn44aAWddTC0
jA2IhPSYu6EI0FFQz3k3eduHkOT5uCtx/Dc6NmGbqnGKCpP15d37w5YRe4Xs
zO/bj2CQi5231KkllBrlUdOWFgPvsrzwcp/9hUrQO2rMWiy0C+g+MJi9gJRN
L1m4WcTD+NqpxGSnefQgY+lzUUMCrPokyZ0nNocqI6ReEpcS4f5tUOds6nc0
GmYxOTn/BJZIhzp9nphBr9Y3OHJKkuAnWrGIiso0Opb7pdrgdgqcOhSvgF5O
oEo/y0SOHWmQzy9HRW7TOMqIUBnItE+Hh1R+Hspa/IB2jqinlItnwPvHZ3sq
vYcQ+rju7j2RARtP/jBWujKEil5KZUtOZ0Amw+9vCgyHUBW3q8DQTAb0Pfe1
kxQbQrsXryXIzWVAT4ep1qjOQeTjeXG2hZ4Br4WO1tuJDCLIkNAhthLQoLOr
iKN1AI3lEitflAkY3tN5mFIygJbarj60PErA1oGOgo3kARTN6iPUpU5A3dG2
vMVbA6jYlUPqBSCg1hwte3TPAJp4yld6+hQBj2yrSy9260dsq6V/pK0IyH+2
gHpBsA+xbXl+0TCAgCXiEVW6LH1IyuqBvnkQAU1WHCflf/YiEe9qXRsKPj9V
9ChnSy9a6LSzuB5KwI2ZuE9Vnr3ojVb+a3sqAafv3ZXbO9iDzCZDwjfSCOhq
/CixVqobRXt0rGfVEjB7Sf9H/KZu1CPaRrgiAn5+wgpdh98gSia/hHIDAc9P
en0RCnuDPqZdaa1uJiDwuaQSMNOFnDsfnSrsIOA2UmZA53knGiqXl5Qbxt/7
m8bbeqAdiYvm5AT9IuDDF0Sj1kobeivrpnBwiYDOl/zvlHe1IbHNKdy0ZQIe
eH10hPBsQ775VwrX6ARMiM99dq+1FTlze4ecZhDwP6VHmoouLeixnSN04CLh
+Zkb8zmwBY1eX1ce5SahYrI+KcLfgrabVzuY8pDwBwsrB0/da2TP6+Qhz0fC
S/2eAzO8r9HKouzeHgES6rhbOaeWNqP+qNjAEFESComrCfGHNqPzPdrUHjES
/h3m742wakZbJ7leCx4gYZl2t4oPWzMq+q5NpIiTUJxPh/mseRO6SxtbC5Eh
IWeRxBOOvw3IS1YLdiuRcPoKq0FAdwNapn48+l2ZhE2C4xu/yQZ0XOanHqsq
CX39n16dNGhAItAwTVaNhHNGW4+g1Hp0wnvTQWtNEmaNTEV9pdShAI0veXK6
JHzvK5CWoliHyvI/zXDpkZBH6ESR6edaRLWZjpzG9rTN7qsEtWiecYYz7iQJ
9aacBMNXq9HycmJL92kS/heSJKmVU41M6aNHEg1IWCDRqfbLvBrduNm7Zm1I
QkEnWauL5VXIYItG1bgRCWfmfqZL36xEZy72VLaZknAvVaTko1AlMtqpIHHP
jIQm8qZNMV2v0BExx1+yZ0j46nbJ1Kr0KxToxpb+4CwJw+ge0h1TL1HBNuLk
HnMSSjOvljpblqFMvrcXmyzxfZDSNGHOMiTDk2tvYEXCmOOWg/2vSpFruPLr
PuzVkBq6hkApMhnODRmyJmEHl78md28xevPLfaXehoRM+YVG9f7FyHRE4ZmS
LQmVjMZsPOSKUWi3Y1YWdjJVO+hDRBFSHKl64m9HwnfSWx5eiCpAs7InTP65
QkJ443pRw7d89KlmPOQWdnZhe5/UyXzE/l5raxe2j1KU4CpzHrqWw7fF9yoJ
P3vOqV22zUXTV5bvdmPrVxpbtde+QF01Xloi9iTcrbU946l3Dvo0Y1BQiR0U
cLuJeTAbTRHClswOJPzeODDlpJiNStqp505i15x4LK0x9wxFDzoodGIfCKcb
kKefIdoj6x2cjiSM7LzgxpWThQ5fFzimi21turds5EomyhzgDCnF/rG4rHan
mUQftDrTprB9E7oRz0EStUgHivBfIyG3Wo5udjCBkp1YtuhgJ48EdWhPZ6Du
L3LnXbAP+VmZjuhloCfp45xx2NUiKkMez9OR8Iu/Byuxyzr6aMa9qajQff7h
X+yBbSG9QTEpqLgj/sPO6yRcPKc2Wn4mGd17oUpVxN6e9GNmZkcSosXX55zG
VhhLW9oz+AT9ktknZYdtevAMk/HjRATE/uXxwL7ptJk7yOIxytXjuUDBphZW
CpbvSkDv74VwxGAXLrnsn3kfh3ppT4RTsN+oiRzekxyLeBVAUhb2nF+/upF1
DGLMu/nmYm9tDtELFHqENE5INBVgW2z3yLyGotHOmMtuhdiPk99Xv9GOQtV6
ooH52IPi2v1KzeHIe/EqPRt7R/Hzb0/1QtGopvzbDOwzGjzMm9qC0e2JCMFE
7Biaxy7H0/dRcZUvisDuMR450tUVgNqKtnb5YguV3ac6pPuiqE596Iyd1GqC
FLK8kKqMzi5z7J2j++Y2ctyRDjOrBcSWmXirlmDtjCZTiTVxbHHum4/lHO0Q
1V6BnQs7YEByYE+TITrR1+b143/3xTvqxCarBBa9Ao06sAcXgtK20S0AYPKI
eI49byzxy83dAXTL1MkFYt+N1Wt3VroJ/unzO2qBveHnk5R2+A4QGxvMPoQd
4JTn0i/9H7C48NV/A8dPk0jYg5RtQcBt88Dlp9iUBLGbqg8p4F3emutVbD3u
GotergdgHxHwWQa79c+cFBt7JGCBZkylOH4dHaUdXm7EAH/ex3sJHP8nxbwu
3teMAzqXNl83x5YcbTIy8Y0H9/w9hTixv5lZq35beQzsz5yhOeJ8ctGibhFa
TgY0/1OcrDj/DFc+rH1TTAUWB/9mZV4moVyZ1EKFexo4az+Up4NNjxv/IUlP
BwZZp9c9cX5Xct5923iHBF9U1Ur+Vx/SZfn7C8UywfM67iod7BCTwp7k7kxg
u2pW3XCJhGcTJjo8pZ6B2DrhvJe4vsyLGjRKj2aDkpSis764Pg0dn0aC4Tkg
SX1NefoiCescA2pZVV+A3qT+HYbYEfllrz5Sc8GXHY5dfBfw/antK4w5XgA+
+Aare53H+WdVkee/UAD2XgnY2XYO54uf6QuX1EKwGtFLF8S2/dxott+3CNz4
y9uUh+unnOQfw/W3xaB24DW1xISEbaU2x4vDygA9XKfosD4J/6UdapIYKwMj
b+TZzU6RsGhwRTtVpRyk7eB3uYXrfcJKLIiYKAc5e9cuP8f94CpoVbfXrADq
XrV753VIyGg/Ir9roRLoVv1DWVYnofLnTUKBFgjU/b7YMiiJz68yXziSg4DZ
gm55sQT+n5j85rEVBHb/cZUNx/2OKyNPOd2wHmy0HahXxP1wzcTiA2OuHnTv
Ew+7LkzC0aJCKSTfCIpnXf1t+UmYdvNSs2ZFM5j0GWO7j/t3shVHQfynZrC7
RVuMb4OAiSfLHs+y00Bat8vX5DUCUkU4nVMsaEBNKNU3f4WAAT3lfOsrNHDA
TnmwZJGAdke22tT82wJerlhfMP5CwP3z1SvqjW3gK08J67tOAvp2HaMszbaB
qM2eifR2Ag6+6OAp2NUOnjfoJwu04fnIfmS/6K12oHe7aVWfRsD596uG7CId
4E5ksnY8nn/qaGpE/71O4JHXcKs4n4AXkyr0XdS6gRhjNHhHJAFPkcNdRhZ9
4KqO8G08AsD54AIH2o0+0CybEhKI57nEa/cZGvf7wJjSyxh+TQLOyMrKSxX0
AY5hxWRVPA+GvgqIY2HtB0zKY9lX5PB82CVh+aqwH5g/9DC23k3AE/Q7M6Ls
bwF/tJ7E5HwG1DXczrJcPgT8jv8xykvMgNE2QwFHKj6AB//dadOeTIctRvu2
mmwfBx6VoMWTNx3OivL79T2dAH6arApn/VLhHQ8Zu2iBadDbux7p9DEZDn3Y
ZubQOgPKcrTZA/cmQVuff7+wG3wHviG+8vqBT2CTjGp4E9sckGQ14pvuewzF
OWpmMk/Og7ipcRGzMwlwX42zLlvoAuBVSi5+ORcHmVaZc9w//wKCqYoP2e/H
wj+mtZdoB5fAsuPhhBrdGDiiZLPnIGUZnMu7LtXB9gjeNN/GJ/bhN4g/n1mu
8Toa7oqbtGDdRwfjF+kCY91RsMAy/fmi9wqY5E0LPfYuAppr+p9srV0Fw6HN
0UfFw2HxpRti6mt/wfXmTYkqyaGQznmMpfLcOgiWTFd14HsAzXo1VPYlbgD1
ycKsE7XBkFODq6EmZQNIhG99FFsRDBsy35+2IjcAGep7c7w4GB7x9rFLKtgA
Dx3zt9x/Fgx5hCsid9E2ABGnGT4aHQzbXBQm+H9tAOGJAfmfl/F+tkWKymPA
AIKdOnsCOIMh/RZ9d4EpA+w85yvBwRYMC0dasgzNGUAbCPPFMShQqNChOvIy
A/i9HvYpXKLAtXOZ05w+DEBjr4xaw/thBSmsyf6MAaKpoQd+llKg69afLc9y
GeD2un1ZfAEFinvVmekVM8Dz2WcCWjkUGKdvfS24hgFYRJ8Yx6VSoPvC01iW
fgaI+qYQcD6MAqUtnYTIdwzwdY8wlYtCgePNajk6HxnArZ3h0uhHgSaJ7+oC
vzJA5j/fw5U9KHALc/Yp0Z8M4Oya3L7gSoHI2WugfokBUl5HDxRep0DPt3o2
tqsM0Mi8K9vtKgX+/74LErUij8vbUOD/ATdIm9Q=
"]]}}, {{}, {},
{GrayLevel[0], Thickness[Large], LineBox[CompressedData["
1:eJw113k0Vtv7AHBRV4aEwlXIUDJlSqLS3hqQIpShTKnQNSev11SERBMZIrNz
zJkjs22eZZ6pG5FUhkII73fftX6/P84667PWs/Y5a6/nefazhW466lnS09HR
beLnv7c04J6l0WioSuc9tfkQBTquiQSurdNQu5U3196jFJj3Vk701zINsZjZ
rVhCCpQX07o5/Y2GWi7JPuYzpsDjHP4j7YM01KdP7OwPoUA4udj6OpeG1uOb
M1w2KVDvccebo+Y0ZHZ6QZA66gqpnf721lVb6DkXsa0t0w329bHM1lhson0d
VOW1RS/IX+249zjfBjqpwVKdme8Di2zrd+weX0dDZ8t2t3H5wRvP5BaGfdfQ
g79NXmTPPoKroZ6BCKyi9rvB6ZONgZBk+8Ab9WkFafUk+izxPoOxmnLOvUHL
qFJImKk/NBj62lm4iV9YQsnTIzoDXi+hJ0Mm1fnHT8TkSSsjrMOghU/nwYH0
RSQYB1uaTkfAiMqpqFibBVT1XCb+3z2RsOyjGGuW8BySTnhjUs35GoqwwzNX
478h6luupC+z0bBAItBmYnIGSfMeA7IfYuHHhnxBRcVp9OgfU4Oqt/FwSipC
Hr2bRLJXeszYxBIhx4MMReltn5BQ4z+O35YToZTivFTKrzGkkBHmyUAkQStp
b+/S8TEU4y7BUZWcBBNEd/d0NI2hM4tZdNS0JMjJI0NdiRlD/D4TXyezkuDv
3w416ufG0M1SsfaM4iRYWzqnPxs+isJkbjJPtSdBI5W5BzKKIyjlz2fDPStJ
0O/cj65St0GklpYvLHiWgLUa3y8r3BpEkt2O783PE5BO69v7HK1B1P/lc26c
OgG99L+2k8KDCMqwcuy9REBXq6nm5+0DiD6OW+nbVQLeCRyvthAcQAx67O5n
rAh4qb0jj6m5D+10vzYR/JiAT7raZfwL+pDHYN10eBABm/vacrZi+5BRZhZz
1FMCnh9vyfp1tw/F3zfMiQom4Om5hvTx/X0o2rBWzy+SgLLsVYn5jr3IylbX
ezOVgFxXc0Ku8fQgy8Fluof1BCwQfVp2nqEHOa3cOSbRSECdNevPcvPdKHHx
6rvuJvz9eCEl5qZudORXXsz+NgJuzYR/LHPtRl6q579EdxNw+r6nNN9AF4px
aORV/0BAh8svoyrFO1HC9N56vRUCpi9pfo/Y1ol+nXyfXP+bgBOvt0OH4ffI
8m5+ncIaAQ0+U78IBL1HU/kXy3ZvEBC4myn6zHQgKWM177xtJGQnJfvOpLWj
sDtpu+JYSViw0rC7+WArYk8r8TkgRMIXmUTt6bUW9O4hJcVZmIS2Zt6Uoo4W
5Gc8lFknQsKDjUqjhGsL+nyuTt9clISvIt6k3m9uRs7cFQfuS5LQQ+GlylG7
JtTYQxPWO0ZCgxn7hQzYhB7aRvD7KZLwaKwmKcjVhLbdWljMP07C7wzbmdiq
GtGQoaEo0wkSmvW69s3sbkTx8iUFcadJeMbZxDb+bT3K7o6jN1cnoYCosgBX
YD2y7rxtY69Bwj/DXN1PTeqRKWNLivsFEhaqdiq676hH8jmrEU8vklCU4wz9
VcM6RG1l1ou4TELmvMOvmf7UoC/a3N+BIQlTRqeef/WvQsqK+dbzt0k44sWd
EHe0CrG9Fb6TaUlCNgH1PN2JSqQo1ehxy4qErjfSe0pBJfpTVN/faU1CtSkb
nifr5chv/I3JSxsSzszNJ0o4lSIRXUufYkcS8oUIFnwQKEWaT3mfXnEioY6c
bl1oRwly0m1J/oFdcq9gal2iBKnK3dzO50zCoFUXibapd2gkPdDRwoWEEvTr
b22NC5HD9K6uF254f0iJhgPMhWjq2WoRizsJQ88ZD/SWvEVS8irpAdjrARWr
J7nfoi+hMN/Vg4RtLN4qrN35SFrtvC7wIiFddq52tXc+krHgeJWFraD9r7mL
dD4yXhGY5rlPwtgQVd+xp3lon+f9tBnsIYmdL649z0G3bn964+xNQmj/T17N
bDb6lKat3oWdntvaI66RjXpDmX9I+pDQXeE5zzp9FjI9Qmc4jr3vNGdStFsG
+niMjhDzJaGvz706+oF0pH1l45kr9rfavimbo+lomcvjYS12hXqkxMm5VOR/
ISHgqh8JTXX5CkdvJaM9PfK0G/44X34tK1PqSZRUu0aLw/Z61YnYDpFovlaK
fxg7dtS3TXU6Cck3hmZdeERCqQcmuqNqSeg3R4qAN3a5oOKgS1oikqN9yirA
LmzrabjcHY8UryXy7w0gYR97QLdvaBxiureD7gz2L33l8aIrscg20GTLHlv+
34Sl/QOvUQlzjnY1tu6hK3SXI6NQeVBI4jS2k81frL5GkeiJ2DE2lsckzF2y
E5kZCUchy9GntLHfKwvK7I8NQ5kxGpt22HMPek9om4aim7ovh4Owd9UHqD0U
eIniCuy6k7GNOF2S76BgxD3T87kSOzJ2pPy96nN0Pa1iTz/2gKhqr0L9E9Qh
L2I2i703P202Wi0Q5V6jq9/EvnKSjX5byyN0wE37/O5AnC8NLrzWF/0QH3Xn
hAB21+VR2Y4OHxTYLh4thS1Q6BdileiFjnjm2CthxzTrIPkUKirhDDM5g/33
OP/cVoYzqs/ts9LElpzsV35laot6/jg908EWZXWKlLa2QFeOWHVcxfbpE+vb
X6eFkhjfihtiS+0et9lxRAHsGDVI+s8Di74J7KtG4J2/roIB9sLlwz8dna3A
oAM5oYftGabWaqvgBDxCtLK0sLceuMckyFBAjL3uS7X/1rfJsuuV8ACiPPkv
VbAZDD6qMIp6g3kJx2x57DrBoMdx7L6gqPfF50PY/q+EnY6/8AeCLXuO82Cr
sVYYdbM8Bugyfcpf2Iy++qq2QUGAQdlcegnvX/PvOfEdjM+A6qRM70fsJ/aB
nAn+L0C2skdYC3bqYsh9vochwKjwnGM+trW1hNW7rVAw+87V3RNbQ5h63U8l
HIjO/0gzxRYbr9PW8YoAIGv7TxXsWT3T47NrkcBHWHF4FedP665MyWKl10Dr
523XXuw3zSsH/KnRQMnFWCYL2+50yE6B5ViQ09SxZIittTa2MXs0HoRx3dwm
iS1dKL5Y7JwATrHNi2/g/F4N//RdbDURRDBIdEZhlzJ79tdSSHBoqM62HNdL
4hGu3lzhZLDJFSvhgR2gk9sV25kM9mbcyFPEvvpqss1VPBUMTLBwZOB6XBC6
VCsxng5aCxLF7+F6HTw3jXieZAB+w2fCgthV1j6V249ngpCj8pOtD0n4NLuw
5EPIGxAwJ1TBiy2qzJ8bei4HmGksdsbi/sFqUpzlvZgD5k4wMSth/3qgm2kX
nwsONA2zdj8g4Y2JWj0Rrzwgc1LefgP3I2mx31qb/flAvrolVgn3r5a35ufy
gwoBz4L+iBruj6capOoO/1sI9nzhL6iikjBvYE01XrEIIAEpfQXsV2th4Olk
EVBlGt7825WEt0HzCUuVYjDQ/v5D0z0S0lpl5XgXS8H2Qw6sFQ4kdB7bzA1W
LwMu52/msWNP/2iV/iu+DCidmhW+ZU/CdnZLqV+a5UDlIOmyzY6E0QavD3ck
V4DH6Te6Rf4h4bGJbQIPjRBIAe/SaDfx/5cZLspmINCLdKUAtmhodv2/awgs
8Pu3eVmQkCUp61iiVjVofxx+/ac5CTd0jMZoc9WAr6SvptGEhON5ueJIrhaQ
guKzew1ImOBkVq9SXA/mKxr+0cDnY6wJU07Ex3pQZh1dflGNhFEahZE/GBsA
d8BFWa3zJAwRZLaNM2oAcxZOfppncf10FXFsrjUAjfQDw9KAhBayu8wrTjUB
57t5AfH4vBZZKF87UdsCDJh9JPkO4n7bcdZ/6UcLmBi4B1rxfDCQ2caWw9sK
zLKVZFzx/PDEclRE6G4rSOxiSW4SwPkysq7FKNgGGpzH5nV4cX40KBO999tB
cG2Sx+YuEl6PKda0U+4E69EJ/TXLBCx0A/2HLDuBnuT3q1JLBGQzaDL/GNIJ
XrFyVYf/JGAN+6CL3kwn4MiQNDGfJ+Des56XYy92gYbMT2WjMwT0LIl2913v
AsfNroTcHSXgBXK4Q9uoB9h5OWVzIQIuPMqxarDvAWUoxEK9koBRd/xoJ/16
QL/+hCi1nIAzR47Iief0gH2Knl+6igkYWOITzrC9F1zYo6trn4fnxY7DxiW5
veB63tRlzSQCqq9SZoQY+wF34Ndrrx/i+VGLk2G5aBCcGpT0zztFwBcWTItr
LYPAMlixKPQEAYcodB+3xgfB4eVKk3tKBLSJnyvb+dcQME8lOWQVcPx8qzOf
wRBw+vlIJFISx7/0mzi7MgQ29lQ68O3D8QNLNaGKIyDFnWueEc/PweaDPrLF
Y8A666xIQEYSbNLm36XD+Qn0BH23415MhD+EuB70RE+C9pFcrjLZREhxkbQI
5p4GF3SPvmltjoeDY+x6Vs0zQPQNpxhlMRbecD/1hfHSNxCRHLIYLBoD6ySP
P6nbMQe8UnKm9oi9hqJMFTPJGgugVbqw8bBaJOSvsD2/I3AR6H+Pk/vqEAHp
1ukznCd+ArrfVTZ21DD4W7fSrOHQEig//JzzT/ZLOKpgvv+Q/zK4u3Vr40dS
MHQyZOcQHlsBXcHXUrMPP4O84Z+NtvOvAh1n9VMFfwfBHOPEtF9ua2DfdfHd
V+gCoKGKt0Zz5TpYMD36OO+qH8w3sxc+sfEHdI2JPQj77gNXmc8ylOpvgmto
pY1x332o131SkT9qC1DYPjP95nOHzCdZairitoBpvX71PlZ3WJM8ctGE3AJ8
JqUFan/coKybu0VMzhYwuff+fPGwG2Q7UPyMt2ELSC8zbK2/coMtdvKTXD+3
gNSN264se9wg3CkewnaJBmYOhuxT46DC1bur+3J0aYDqlerhsI0Kc0ebUrQM
aaBdM2Q6ftEVCuRalT+7SQO2PEajPD2ucEM/eZrZnQY6w1OYbcJcYTF5QIUx
lQa0s9OYXvC4Qodd802pb2igaNbZXHGnKxSlVump5dMAg4Ro6vQqBYZrmt55
VEEDnE0XaWYjFOi8GB3G0EsDen9u5+bEUaCEsY0AOUQDymtaxq9eUOCneuWM
Mx9o4GIN3ewjbwrUiRqqeviVBnoCw9O9LChwJ336BaF5GsjtHO7z06NAZEvt
q16igch7+WOhZynQtV/N/MY6DZh4XajKUKDA/7u/g/+/v/8PlloAuQ==
"]]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-2, 2}, Automatic},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{{3.65807626463237*^9, 3.658076279167932*^9},
3.662577609843607*^9, 3.6625778242232523`*^9, 3.662577944421152*^9,
3.662578453437272*^9, {3.662578524796567*^9, 3.6625785478328342`*^9},
3.6625803857245903`*^9, 3.6625804771551647`*^9, 3.6625808069283533`*^9,
3.6625978118415537`*^9, 3.662598566453952*^9, {3.663807755234572*^9,
3.663807773572632*^9}}]
}, Open ]],
Cell["\<\
The following adds a histogram of individuals that exist at the end of the \
burn-in period (groups into 0.01 bins), arbitrarily scaled to the same \
maximum height as the resource distribution:\
\>", "Text",
CellChangeTimes->{{3.6625803561581984`*^9, 3.662580420748272*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"bc", "=",
RowBox[{"BinCounts", "[",
RowBox[{"genotypes1", ",",
RowBox[{"{",
RowBox[{
RowBox[{"-", "2"}], ",", "2", ",", "0.01"}], "}"}]}], "]"}]}],
";"}]], "Input",
CellChangeTimes->{{3.6625796146565323`*^9, 3.6625796162285557`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"maxheight", "=",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",", "0", ",", "tryKm"}], "]"}],
"//", "N"}]}]], "Input",
CellChangeTimes->{{3.662580070809471*^9, 3.662580079704524*^9}, {
3.662580174205254*^9, 3.662580177645094*^9}}],
Cell[BoxData["2500.171271275779`"], "Output",
CellChangeTimes->{{3.662580175046308*^9, 3.662580178130217*^9},
3.6625804772349043`*^9, 3.6625808069932537`*^9, 3.662597811907279*^9,
3.6625985665196867`*^9, {3.6638077552999907`*^9, 3.663807773636106*^9},
3.66930907589466*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Graphics", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"EdgeForm", "[", "Black", "]"}], ",", "Black", ",",
"\[IndentingNewLine]",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{"Black", ",",
RowBox[{"Rectangle", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2"}], ")"}], "-", "0.005"}],
",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2"}], ")"}], "+", "0.005"}],
",",
RowBox[{"bc", "[",
RowBox[{"[", "i", "]"}], "]"}]}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "bc", "]"}]}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"AspectRatio", "\[Rule]",
RowBox[{"1", "/", "GoldenRatio"}]}], ",",
RowBox[{"Frame", "\[Rule]", "True"}]}], "]"}]], "Input"],
Cell[BoxData[
GraphicsBox[
{GrayLevel[0], EdgeForm[GrayLevel[0]],
{GrayLevel[0], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{GrayLevel[0], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{GrayLevel[0], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{GrayLevel[0], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{GrayLevel[0], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{GrayLevel[0], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{GrayLevel[0], RectangleBox[{-1.9349999999999998`, 0}, {-1.925, 0}]},
{GrayLevel[0], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{GrayLevel[0], RectangleBox[{-1.9149999999999998`, 0}, {-1.905, 0}]},
{GrayLevel[0], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{GrayLevel[0], RectangleBox[{-1.8949999999999998`, 0}, {-1.885, 0}]},
{GrayLevel[0], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{GrayLevel[0], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.865, 0}, {-1.8550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.845, 0}, {-1.8350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.825, 0}, {-1.8150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{GrayLevel[0], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{GrayLevel[0], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{GrayLevel[0], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{GrayLevel[0], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{GrayLevel[0], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{GrayLevel[0], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{GrayLevel[0], RectangleBox[{-1.6849999999999998`, 0}, {-1.675, 0}]},
{GrayLevel[0], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{GrayLevel[0], RectangleBox[{-1.6649999999999998`, 0}, {-1.655, 0}]},
{GrayLevel[0], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{GrayLevel[0], RectangleBox[{-1.6449999999999998`, 0}, {-1.635, 0}]},
{GrayLevel[0], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{GrayLevel[0], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.615, 0}, {-1.6050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.595, 0}, {-1.5850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.575, 0}, {-1.5650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{GrayLevel[0], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{GrayLevel[0], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{GrayLevel[0], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{GrayLevel[0], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{GrayLevel[0], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{GrayLevel[0], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{GrayLevel[0], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{GrayLevel[0], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{GrayLevel[0], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{GrayLevel[0], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{GrayLevel[0], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{GrayLevel[0], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{GrayLevel[0], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{GrayLevel[0], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{GrayLevel[0], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{GrayLevel[0], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{GrayLevel[0], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{GrayLevel[0], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{GrayLevel[0], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{GrayLevel[0], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{GrayLevel[0], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{GrayLevel[0], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{GrayLevel[0], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{GrayLevel[0], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{GrayLevel[0], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{GrayLevel[0], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{GrayLevel[0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{GrayLevel[0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{GrayLevel[0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{GrayLevel[0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{GrayLevel[0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{GrayLevel[0], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.935, 0}, {-0.925, 0}]},
{GrayLevel[0], RectangleBox[{-0.925, 0}, {-0.915, 0}]},
{GrayLevel[0], RectangleBox[{-0.915, 0}, {-0.905, 0}]},
{GrayLevel[0], RectangleBox[{-0.905, 0}, {-0.895, 0}]},
{GrayLevel[0], RectangleBox[{-0.895, 0}, {-0.885, 0}]},
{GrayLevel[0], RectangleBox[{-0.885, 0}, {-0.875, 0}]},
{GrayLevel[0], RectangleBox[{-0.875, 0}, {-0.865, 0}]},
{GrayLevel[0], RectangleBox[{-0.865, 0}, {-0.855, 0}]},
{GrayLevel[0], RectangleBox[{-0.855, 0}, {-0.845, 0}]},
{GrayLevel[0], RectangleBox[{-0.845, 0}, {-0.835, 0}]},
{GrayLevel[0], RectangleBox[{-0.835, 0}, {-0.825, 0}]},
{GrayLevel[0], RectangleBox[{-0.825, 0}, {-0.815, 0}]},
{GrayLevel[0], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{GrayLevel[0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{GrayLevel[0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{GrayLevel[0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{GrayLevel[0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{GrayLevel[0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{GrayLevel[0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{GrayLevel[0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{GrayLevel[0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{GrayLevel[0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{GrayLevel[0], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{GrayLevel[0], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{GrayLevel[0], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.685, 0}, {-0.675, 0}]},
{GrayLevel[0], RectangleBox[{-0.675, 0}, {-0.665, 0}]},
{GrayLevel[0], RectangleBox[{-0.665, 0}, {-0.655, 0}]},
{GrayLevel[0], RectangleBox[{-0.655, 0}, {-0.645, 0}]},
{GrayLevel[0], RectangleBox[{-0.645, 0}, {-0.635, 0}]},
{GrayLevel[0], RectangleBox[{-0.635, 0}, {-0.625, 0}]},
{GrayLevel[0], RectangleBox[{-0.625, 0}, {-0.615, 0}]},
{GrayLevel[0], RectangleBox[{-0.615, 0}, {-0.605, 0}]},
{GrayLevel[0], RectangleBox[{-0.605, 0}, {-0.595, 0}]},
{GrayLevel[0], RectangleBox[{-0.595, 0}, {-0.585, 0}]},
{GrayLevel[0], RectangleBox[{-0.585, 0}, {-0.575, 0}]},
{GrayLevel[0], RectangleBox[{-0.575, 0}, {-0.565, 0}]},
{GrayLevel[0], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{GrayLevel[0], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{GrayLevel[0], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{GrayLevel[0], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{GrayLevel[0], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{GrayLevel[0], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{GrayLevel[0], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{GrayLevel[0], RectangleBox[{-0.495, 0}, {-0.485, 0}]},
{GrayLevel[0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{GrayLevel[0], RectangleBox[{-0.475, 0}, {-0.46499999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{-0.465, 0}, {-0.455, 0}]},
{GrayLevel[0], RectangleBox[{-0.455, 0}, {-0.445, 0}]},
{GrayLevel[0], RectangleBox[{-0.445, 0}, {-0.435, 0}]},
{GrayLevel[0], RectangleBox[{-0.435, 0}, {-0.425, 0}]},
{GrayLevel[0], RectangleBox[{-0.425, 0}, {-0.415, 0}]},
{GrayLevel[0], RectangleBox[{-0.415, 0}, {-0.40499999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{-0.405, 0}, {-0.395, 0}]},
{GrayLevel[0], RectangleBox[{-0.395, 0}, {-0.385, 0}]},
{GrayLevel[0], RectangleBox[{-0.385, 0}, {-0.375, 0}]},
{GrayLevel[0], RectangleBox[{-0.375, 0}, {-0.365, 0}]},
{GrayLevel[0], RectangleBox[{-0.365, 0}, {-0.355, 0}]},
{GrayLevel[0], RectangleBox[{-0.355, 0}, {-0.345, 0}]},
{GrayLevel[0], RectangleBox[{-0.34500000000000003`, 0}, {-0.335, 0}]},
{GrayLevel[0], RectangleBox[{-0.335, 0}, {-0.325, 0}]},
{GrayLevel[0], RectangleBox[{-0.325, 0}, {-0.315, 0}]},
{GrayLevel[0], RectangleBox[{-0.315, 0}, {-0.305, 0}]},
{GrayLevel[0], RectangleBox[{-0.305, 0}, {-0.295, 0}]},
{GrayLevel[0], RectangleBox[{-0.295, 0}, {-0.285, 0}]},
{GrayLevel[0], RectangleBox[{-0.28500000000000003`, 0}, {-0.275, 0}]},
{GrayLevel[0], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{GrayLevel[0], RectangleBox[{-0.265, 0}, {-0.255, 0}]},
{GrayLevel[0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{GrayLevel[0], RectangleBox[{-0.245, 0}, {-0.235, 0}]},
{GrayLevel[0], RectangleBox[{-0.23500000000000001`, 0}, {-0.225, 0}]},
{GrayLevel[0], RectangleBox[{-0.225, 0}, {-0.215, 0}]},
{GrayLevel[0], RectangleBox[{-0.215, 0}, {-0.205, 0}]},
{GrayLevel[0], RectangleBox[{-0.20500000000000002`, 0}, {-0.195, 0}]},
{GrayLevel[0], RectangleBox[{-0.195, 0}, {-0.185, 0}]},
{GrayLevel[0], RectangleBox[{-0.185, 0}, {-0.175, 0}]},
{GrayLevel[0], RectangleBox[{-0.17500000000000002`, 0}, {-0.165, 0}]},
{GrayLevel[0], RectangleBox[{-0.165, 0}, {-0.155, 0}]},
{GrayLevel[0], RectangleBox[{-0.155, 0}, {-0.145, 0}]},
{GrayLevel[0], RectangleBox[{-0.14500000000000002`, 0}, {-0.135, 0}]},
{GrayLevel[0], RectangleBox[{-0.135, 0}, {-0.125, 0}]},
{GrayLevel[0], RectangleBox[{-0.125, 0}, {-0.11499999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{-0.115, 0}, {-0.105, 0}]},
{GrayLevel[0], RectangleBox[{-0.10500000000000001`, 0}, {-0.095, 0}]},
{GrayLevel[0], RectangleBox[{-0.095, 0}, {-0.08499999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.085, 0}, {-0.075, 0}]},
{GrayLevel[0], RectangleBox[{-0.07500000000000001, 0}, {-0.065, 0}]},
{GrayLevel[0], RectangleBox[{-0.065, 0}, {-0.055, 0}]},
{GrayLevel[0], RectangleBox[{-0.055, 0}, {-0.045000000000000005`, 1}]},
{GrayLevel[0], RectangleBox[{-0.045, 0}, {-0.035, 12}]},
{GrayLevel[0],
RectangleBox[{-0.034999999999999996`, 0}, {-0.024999999999999998`, 125}]},
{GrayLevel[0], RectangleBox[{-0.025, 0}, {-0.015, 653}]},
{GrayLevel[0], RectangleBox[{-0.015, 0}, {-0.005, 986}]},
{GrayLevel[0], RectangleBox[{-0.005, 0}, {0.005, 564}]},
{GrayLevel[0], RectangleBox[{0.005, 0}, {0.015, 139}]},
{GrayLevel[0], RectangleBox[{0.015, 0}, {0.025, 5}]},
{GrayLevel[0],
RectangleBox[{0.024999999999999998`, 0}, {0.034999999999999996`, 0}]},
{GrayLevel[0], RectangleBox[{0.035, 0}, {0.045, 0}]},
{GrayLevel[0], RectangleBox[{0.045000000000000005`, 0}, {0.055, 0}]},
{GrayLevel[0], RectangleBox[{0.055, 0}, {0.065, 0}]},
{GrayLevel[0], RectangleBox[{0.065, 0}, {0.07500000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.075, 0}, {0.085, 0}]},
{GrayLevel[0], RectangleBox[{0.08499999999999999, 0}, {0.095, 0}]},
{GrayLevel[0], RectangleBox[{0.095, 0}, {0.10500000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{0.105, 0}, {0.115, 0}]},
{GrayLevel[0], RectangleBox[{0.11499999999999999`, 0}, {0.125, 0}]},
{GrayLevel[0], RectangleBox[{0.125, 0}, {0.135, 0}]},
{GrayLevel[0], RectangleBox[{0.135, 0}, {0.14500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.145, 0}, {0.155, 0}]},
{GrayLevel[0], RectangleBox[{0.155, 0}, {0.165, 0}]},
{GrayLevel[0], RectangleBox[{0.165, 0}, {0.17500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.175, 0}, {0.185, 0}]},
{GrayLevel[0], RectangleBox[{0.185, 0}, {0.195, 0}]},
{GrayLevel[0], RectangleBox[{0.195, 0}, {0.20500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.205, 0}, {0.215, 0}]},
{GrayLevel[0], RectangleBox[{0.215, 0}, {0.225, 0}]},
{GrayLevel[0], RectangleBox[{0.225, 0}, {0.23500000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{0.235, 0}, {0.245, 0}]},
{GrayLevel[0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{GrayLevel[0], RectangleBox[{0.255, 0}, {0.265, 0}]},
{GrayLevel[0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{GrayLevel[0], RectangleBox[{0.275, 0}, {0.28500000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{0.285, 0}, {0.295, 0}]},
{GrayLevel[0], RectangleBox[{0.295, 0}, {0.305, 0}]},
{GrayLevel[0], RectangleBox[{0.305, 0}, {0.315, 0}]},
{GrayLevel[0], RectangleBox[{0.315, 0}, {0.325, 0}]},
{GrayLevel[0], RectangleBox[{0.325, 0}, {0.335, 0}]},
{GrayLevel[0], RectangleBox[{0.335, 0}, {0.34500000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{0.345, 0}, {0.355, 0}]},
{GrayLevel[0], RectangleBox[{0.355, 0}, {0.365, 0}]},
{GrayLevel[0], RectangleBox[{0.365, 0}, {0.375, 0}]},
{GrayLevel[0], RectangleBox[{0.375, 0}, {0.385, 0}]},
{GrayLevel[0], RectangleBox[{0.385, 0}, {0.395, 0}]},
{GrayLevel[0], RectangleBox[{0.395, 0}, {0.405, 0}]},
{GrayLevel[0], RectangleBox[{0.40499999999999997`, 0}, {0.415, 0}]},
{GrayLevel[0], RectangleBox[{0.415, 0}, {0.425, 0}]},
{GrayLevel[0], RectangleBox[{0.425, 0}, {0.435, 0}]},
{GrayLevel[0], RectangleBox[{0.435, 0}, {0.445, 0}]},
{GrayLevel[0], RectangleBox[{0.445, 0}, {0.455, 0}]},
{GrayLevel[0], RectangleBox[{0.455, 0}, {0.465, 0}]},
{GrayLevel[0], RectangleBox[{0.46499999999999997`, 0}, {0.475, 0}]},
{GrayLevel[0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{GrayLevel[0], RectangleBox[{0.485, 0}, {0.495, 0}]},
{GrayLevel[0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{GrayLevel[0], RectangleBox[{0.505, 0}, {0.515, 0}]},
{GrayLevel[0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{GrayLevel[0], RectangleBox[{0.525, 0}, {0.535, 0}]},
{GrayLevel[0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{GrayLevel[0], RectangleBox[{0.545, 0}, {0.555, 0}]},
{GrayLevel[0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.565, 0}, {0.575, 0}]},
{GrayLevel[0], RectangleBox[{0.575, 0}, {0.585, 0}]},
{GrayLevel[0], RectangleBox[{0.585, 0}, {0.595, 0}]},
{GrayLevel[0], RectangleBox[{0.595, 0}, {0.605, 0}]},
{GrayLevel[0], RectangleBox[{0.605, 0}, {0.615, 0}]},
{GrayLevel[0], RectangleBox[{0.615, 0}, {0.625, 0}]},
{GrayLevel[0], RectangleBox[{0.625, 0}, {0.635, 0}]},
{GrayLevel[0], RectangleBox[{0.635, 0}, {0.645, 0}]},
{GrayLevel[0], RectangleBox[{0.645, 0}, {0.655, 0}]},
{GrayLevel[0], RectangleBox[{0.655, 0}, {0.665, 0}]},
{GrayLevel[0], RectangleBox[{0.665, 0}, {0.675, 0}]},
{GrayLevel[0], RectangleBox[{0.675, 0}, {0.685, 0}]},
{GrayLevel[0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{GrayLevel[0], RectangleBox[{0.695, 0}, {0.705, 0}]},
{GrayLevel[0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{GrayLevel[0], RectangleBox[{0.715, 0}, {0.725, 0}]},
{GrayLevel[0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{GrayLevel[0], RectangleBox[{0.735, 0}, {0.745, 0}]},
{GrayLevel[0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{GrayLevel[0], RectangleBox[{0.755, 0}, {0.765, 0}]},
{GrayLevel[0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{GrayLevel[0], RectangleBox[{0.775, 0}, {0.785, 0}]},
{GrayLevel[0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{GrayLevel[0], RectangleBox[{0.795, 0}, {0.805, 0}]},
{GrayLevel[0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.815, 0}, {0.825, 0}]},
{GrayLevel[0], RectangleBox[{0.825, 0}, {0.835, 0}]},
{GrayLevel[0], RectangleBox[{0.835, 0}, {0.845, 0}]},
{GrayLevel[0], RectangleBox[{0.845, 0}, {0.855, 0}]},
{GrayLevel[0], RectangleBox[{0.855, 0}, {0.865, 0}]},
{GrayLevel[0], RectangleBox[{0.865, 0}, {0.875, 0}]},
{GrayLevel[0], RectangleBox[{0.875, 0}, {0.885, 0}]},
{GrayLevel[0], RectangleBox[{0.885, 0}, {0.895, 0}]},
{GrayLevel[0], RectangleBox[{0.895, 0}, {0.905, 0}]},
{GrayLevel[0], RectangleBox[{0.905, 0}, {0.915, 0}]},
{GrayLevel[0], RectangleBox[{0.915, 0}, {0.925, 0}]},
{GrayLevel[0], RectangleBox[{0.925, 0}, {0.935, 0}]},
{GrayLevel[0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{GrayLevel[0], RectangleBox[{0.945, 0}, {0.955, 0}]},
{GrayLevel[0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{GrayLevel[0], RectangleBox[{0.965, 0}, {0.975, 0}]},
{GrayLevel[0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{GrayLevel[0], RectangleBox[{0.985, 0}, {0.995, 0}]},
{GrayLevel[0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{GrayLevel[0], RectangleBox[{1.0050000000000001`, 0}, {1.015, 0}]},
{GrayLevel[0], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{GrayLevel[0], RectangleBox[{1.0250000000000001`, 0}, {1.035, 0}]},
{GrayLevel[0], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{GrayLevel[0], RectangleBox[{1.0450000000000002`, 0}, {1.055, 0}]},
{GrayLevel[0], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{GrayLevel[0], RectangleBox[{1.0650000000000002`, 0}, {1.075, 0}]},
{GrayLevel[0], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{GrayLevel[0], RectangleBox[{1.0850000000000002`, 0}, {1.095, 0}]},
{GrayLevel[0], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{GrayLevel[0], RectangleBox[{1.1050000000000002`, 0}, {1.115, 0}]},
{GrayLevel[0], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{GrayLevel[0], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.135, 0}, {1.1449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.155, 0}, {1.1649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.175, 0}, {1.1849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.195, 0}, {1.2049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.215, 0}, {1.2249999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.235, 0}, {1.2449999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{GrayLevel[0], RectangleBox[{1.2550000000000001`, 0}, {1.265, 0}]},
{GrayLevel[0], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{GrayLevel[0], RectangleBox[{1.2750000000000001`, 0}, {1.285, 0}]},
{GrayLevel[0], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{GrayLevel[0], RectangleBox[{1.2950000000000002`, 0}, {1.305, 0}]},
{GrayLevel[0], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{GrayLevel[0], RectangleBox[{1.3150000000000002`, 0}, {1.325, 0}]},
{GrayLevel[0], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{GrayLevel[0], RectangleBox[{1.3350000000000002`, 0}, {1.345, 0}]},
{GrayLevel[0], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{GrayLevel[0], RectangleBox[{1.3550000000000002`, 0}, {1.365, 0}]},
{GrayLevel[0], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{GrayLevel[0], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.385, 0}, {1.3949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.405, 0}, {1.4149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.425, 0}, {1.4349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.445, 0}, {1.4549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.465, 0}, {1.4749999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.485, 0}, {1.4949999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{GrayLevel[0], RectangleBox[{1.5050000000000001`, 0}, {1.515, 0}]},
{GrayLevel[0], RectangleBox[{1.5150000000000001`, 0}, {1.525, 0}]},
{GrayLevel[0], RectangleBox[{1.5250000000000001`, 0}, {1.535, 0}]},
{GrayLevel[0], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{GrayLevel[0], RectangleBox[{1.5450000000000002`, 0}, {1.555, 0}]},
{GrayLevel[0], RectangleBox[{1.5550000000000002`, 0}, {1.565, 0}]},
{GrayLevel[0], RectangleBox[{1.5650000000000002`, 0}, {1.575, 0}]},
{GrayLevel[0], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{GrayLevel[0], RectangleBox[{1.5850000000000002`, 0}, {1.595, 0}]},
{GrayLevel[0], RectangleBox[{1.5950000000000002`, 0}, {1.605, 0}]},
{GrayLevel[0], RectangleBox[{1.6050000000000002`, 0}, {1.615, 0}]},
{GrayLevel[0], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{GrayLevel[0], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.635, 0}, {1.6449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.645, 0}, {1.6549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.655, 0}, {1.6649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.675, 0}, {1.6849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.685, 0}, {1.6949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.695, 0}, {1.7049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.715, 0}, {1.7249999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.725, 0}, {1.7349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.735, 0}, {1.7449999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{GrayLevel[0], RectangleBox[{1.7550000000000001`, 0}, {1.765, 0}]},
{GrayLevel[0], RectangleBox[{1.7650000000000001`, 0}, {1.775, 0}]},
{GrayLevel[0], RectangleBox[{1.7750000000000001`, 0}, {1.785, 0}]},
{GrayLevel[0], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{GrayLevel[0], RectangleBox[{1.7950000000000002`, 0}, {1.805, 0}]},
{GrayLevel[0], RectangleBox[{1.8050000000000002`, 0}, {1.815, 0}]},
{GrayLevel[0], RectangleBox[{1.8150000000000002`, 0}, {1.825, 0}]},
{GrayLevel[0], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{GrayLevel[0], RectangleBox[{1.8350000000000002`, 0}, {1.845, 0}]},
{GrayLevel[0], RectangleBox[{1.8450000000000002`, 0}, {1.855, 0}]},
{GrayLevel[0], RectangleBox[{1.8550000000000002`, 0}, {1.865, 0}]},
{GrayLevel[0], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{GrayLevel[0], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.885, 0}, {1.8949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.895, 0}, {1.9049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.905, 0}, {1.9149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.925, 0}, {1.9349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.935, 0}, {1.9449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.945, 0}, {1.9549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.965, 0}, {1.9749999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.975, 0}, {1.9849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.985, 0}, {1.9949999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.995, 0}, {2.005, 0}]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Frame->True]], "Output",
CellChangeTimes->{
3.662598566594532*^9, {3.663807755352665*^9, 3.663807773695518*^9}}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"histoplot", "=",
RowBox[{"Graphics", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"EdgeForm", "[", "Black", "]"}], ",", "Black", ",",
"\[IndentingNewLine]",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{"Black", ",",
RowBox[{"Rectangle", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2"}], ")"}], "-", "0.005"}],
",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2"}], ")"}], "+", "0.005"}],
",",
RowBox[{"bc", "[",
RowBox[{"[", "i", "]"}], "]"}]}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "bc", "]"}]}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"AspectRatio", "\[Rule]",
RowBox[{"1", "/", "GoldenRatio"}]}], ",",
RowBox[{"Frame", "\[Rule]", "True"}], ",",
RowBox[{"FrameTicks", "\[Rule]", "False"}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.662579808750051*^9, 3.662580000968864*^9}, {
3.662580093697451*^9, 3.662580094976821*^9}, {3.66258012727341*^9,
3.662580128536862*^9}, 3.662580189485834*^9, {3.662580451133957*^9,
3.6625804529645967`*^9}, 3.6625978056439734`*^9, {3.662598554236463*^9,
3.662598559235463*^9}}],
Cell[BoxData[
GraphicsBox[
{GrayLevel[0], EdgeForm[GrayLevel[0]],
{GrayLevel[0], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{GrayLevel[0], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{GrayLevel[0], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{GrayLevel[0], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{GrayLevel[0], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{GrayLevel[0], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{GrayLevel[0], RectangleBox[{-1.9349999999999998`, 0}, {-1.925, 0}]},
{GrayLevel[0], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{GrayLevel[0], RectangleBox[{-1.9149999999999998`, 0}, {-1.905, 0}]},
{GrayLevel[0], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{GrayLevel[0], RectangleBox[{-1.8949999999999998`, 0}, {-1.885, 0}]},
{GrayLevel[0], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{GrayLevel[0], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.865, 0}, {-1.8550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.845, 0}, {-1.8350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.825, 0}, {-1.8150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{GrayLevel[0], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{GrayLevel[0], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{GrayLevel[0], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{GrayLevel[0], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{GrayLevel[0], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{GrayLevel[0], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{GrayLevel[0], RectangleBox[{-1.6849999999999998`, 0}, {-1.675, 0}]},
{GrayLevel[0], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{GrayLevel[0], RectangleBox[{-1.6649999999999998`, 0}, {-1.655, 0}]},
{GrayLevel[0], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{GrayLevel[0], RectangleBox[{-1.6449999999999998`, 0}, {-1.635, 0}]},
{GrayLevel[0], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{GrayLevel[0], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.615, 0}, {-1.6050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.595, 0}, {-1.5850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.575, 0}, {-1.5650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{GrayLevel[0], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{GrayLevel[0], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{GrayLevel[0], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{GrayLevel[0], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{GrayLevel[0], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{GrayLevel[0], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{GrayLevel[0], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{GrayLevel[0], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{GrayLevel[0], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{GrayLevel[0], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{GrayLevel[0], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{GrayLevel[0], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{GrayLevel[0], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{GrayLevel[0], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{GrayLevel[0], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{GrayLevel[0], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{GrayLevel[0], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{GrayLevel[0], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{GrayLevel[0], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{GrayLevel[0], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{GrayLevel[0], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{GrayLevel[0], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{GrayLevel[0], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{GrayLevel[0], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{GrayLevel[0], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{GrayLevel[0], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{GrayLevel[0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{GrayLevel[0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{GrayLevel[0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{GrayLevel[0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{GrayLevel[0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{GrayLevel[0], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.935, 0}, {-0.925, 0}]},
{GrayLevel[0], RectangleBox[{-0.925, 0}, {-0.915, 0}]},
{GrayLevel[0], RectangleBox[{-0.915, 0}, {-0.905, 0}]},
{GrayLevel[0], RectangleBox[{-0.905, 0}, {-0.895, 0}]},
{GrayLevel[0], RectangleBox[{-0.895, 0}, {-0.885, 0}]},
{GrayLevel[0], RectangleBox[{-0.885, 0}, {-0.875, 0}]},
{GrayLevel[0], RectangleBox[{-0.875, 0}, {-0.865, 0}]},
{GrayLevel[0], RectangleBox[{-0.865, 0}, {-0.855, 0}]},
{GrayLevel[0], RectangleBox[{-0.855, 0}, {-0.845, 0}]},
{GrayLevel[0], RectangleBox[{-0.845, 0}, {-0.835, 0}]},
{GrayLevel[0], RectangleBox[{-0.835, 0}, {-0.825, 0}]},
{GrayLevel[0], RectangleBox[{-0.825, 0}, {-0.815, 0}]},
{GrayLevel[0], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{GrayLevel[0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{GrayLevel[0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{GrayLevel[0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{GrayLevel[0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{GrayLevel[0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{GrayLevel[0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{GrayLevel[0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{GrayLevel[0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{GrayLevel[0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{GrayLevel[0], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{GrayLevel[0], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{GrayLevel[0], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.685, 0}, {-0.675, 0}]},
{GrayLevel[0], RectangleBox[{-0.675, 0}, {-0.665, 0}]},
{GrayLevel[0], RectangleBox[{-0.665, 0}, {-0.655, 0}]},
{GrayLevel[0], RectangleBox[{-0.655, 0}, {-0.645, 0}]},
{GrayLevel[0], RectangleBox[{-0.645, 0}, {-0.635, 0}]},
{GrayLevel[0], RectangleBox[{-0.635, 0}, {-0.625, 0}]},
{GrayLevel[0], RectangleBox[{-0.625, 0}, {-0.615, 0}]},
{GrayLevel[0], RectangleBox[{-0.615, 0}, {-0.605, 0}]},
{GrayLevel[0], RectangleBox[{-0.605, 0}, {-0.595, 0}]},
{GrayLevel[0], RectangleBox[{-0.595, 0}, {-0.585, 0}]},
{GrayLevel[0], RectangleBox[{-0.585, 0}, {-0.575, 0}]},
{GrayLevel[0], RectangleBox[{-0.575, 0}, {-0.565, 0}]},
{GrayLevel[0], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{GrayLevel[0], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{GrayLevel[0], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{GrayLevel[0], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{GrayLevel[0], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{GrayLevel[0], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{GrayLevel[0], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{GrayLevel[0], RectangleBox[{-0.495, 0}, {-0.485, 0}]},
{GrayLevel[0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{GrayLevel[0], RectangleBox[{-0.475, 0}, {-0.46499999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{-0.465, 0}, {-0.455, 0}]},
{GrayLevel[0], RectangleBox[{-0.455, 0}, {-0.445, 0}]},
{GrayLevel[0], RectangleBox[{-0.445, 0}, {-0.435, 0}]},
{GrayLevel[0], RectangleBox[{-0.435, 0}, {-0.425, 0}]},
{GrayLevel[0], RectangleBox[{-0.425, 0}, {-0.415, 0}]},
{GrayLevel[0], RectangleBox[{-0.415, 0}, {-0.40499999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{-0.405, 0}, {-0.395, 0}]},
{GrayLevel[0], RectangleBox[{-0.395, 0}, {-0.385, 0}]},
{GrayLevel[0], RectangleBox[{-0.385, 0}, {-0.375, 0}]},
{GrayLevel[0], RectangleBox[{-0.375, 0}, {-0.365, 0}]},
{GrayLevel[0], RectangleBox[{-0.365, 0}, {-0.355, 0}]},
{GrayLevel[0], RectangleBox[{-0.355, 0}, {-0.345, 0}]},
{GrayLevel[0], RectangleBox[{-0.34500000000000003`, 0}, {-0.335, 0}]},
{GrayLevel[0], RectangleBox[{-0.335, 0}, {-0.325, 0}]},
{GrayLevel[0], RectangleBox[{-0.325, 0}, {-0.315, 0}]},
{GrayLevel[0], RectangleBox[{-0.315, 0}, {-0.305, 0}]},
{GrayLevel[0], RectangleBox[{-0.305, 0}, {-0.295, 0}]},
{GrayLevel[0], RectangleBox[{-0.295, 0}, {-0.285, 0}]},
{GrayLevel[0], RectangleBox[{-0.28500000000000003`, 0}, {-0.275, 0}]},
{GrayLevel[0], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{GrayLevel[0], RectangleBox[{-0.265, 0}, {-0.255, 0}]},
{GrayLevel[0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{GrayLevel[0], RectangleBox[{-0.245, 0}, {-0.235, 0}]},
{GrayLevel[0], RectangleBox[{-0.23500000000000001`, 0}, {-0.225, 0}]},
{GrayLevel[0], RectangleBox[{-0.225, 0}, {-0.215, 0}]},
{GrayLevel[0], RectangleBox[{-0.215, 0}, {-0.205, 0}]},
{GrayLevel[0], RectangleBox[{-0.20500000000000002`, 0}, {-0.195, 0}]},
{GrayLevel[0], RectangleBox[{-0.195, 0}, {-0.185, 0}]},
{GrayLevel[0], RectangleBox[{-0.185, 0}, {-0.175, 0}]},
{GrayLevel[0], RectangleBox[{-0.17500000000000002`, 0}, {-0.165, 0}]},
{GrayLevel[0], RectangleBox[{-0.165, 0}, {-0.155, 0}]},
{GrayLevel[0], RectangleBox[{-0.155, 0}, {-0.145, 0}]},
{GrayLevel[0], RectangleBox[{-0.14500000000000002`, 0}, {-0.135, 0}]},
{GrayLevel[0], RectangleBox[{-0.135, 0}, {-0.125, 0}]},
{GrayLevel[0], RectangleBox[{-0.125, 0}, {-0.11499999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{-0.115, 0}, {-0.105, 0}]},
{GrayLevel[0], RectangleBox[{-0.10500000000000001`, 0}, {-0.095, 0}]},
{GrayLevel[0], RectangleBox[{-0.095, 0}, {-0.08499999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.085, 0}, {-0.075, 0}]},
{GrayLevel[0], RectangleBox[{-0.07500000000000001, 0}, {-0.065, 0}]},
{GrayLevel[0], RectangleBox[{-0.065, 0}, {-0.055, 0}]},
{GrayLevel[0], RectangleBox[{-0.055, 0}, {-0.045000000000000005`, 1}]},
{GrayLevel[0], RectangleBox[{-0.045, 0}, {-0.035, 12}]},
{GrayLevel[0],
RectangleBox[{-0.034999999999999996`, 0}, {-0.024999999999999998`, 125}]},
{GrayLevel[0], RectangleBox[{-0.025, 0}, {-0.015, 653}]},
{GrayLevel[0], RectangleBox[{-0.015, 0}, {-0.005, 986}]},
{GrayLevel[0], RectangleBox[{-0.005, 0}, {0.005, 564}]},
{GrayLevel[0], RectangleBox[{0.005, 0}, {0.015, 139}]},
{GrayLevel[0], RectangleBox[{0.015, 0}, {0.025, 5}]},
{GrayLevel[0],
RectangleBox[{0.024999999999999998`, 0}, {0.034999999999999996`, 0}]},
{GrayLevel[0], RectangleBox[{0.035, 0}, {0.045, 0}]},
{GrayLevel[0], RectangleBox[{0.045000000000000005`, 0}, {0.055, 0}]},
{GrayLevel[0], RectangleBox[{0.055, 0}, {0.065, 0}]},
{GrayLevel[0], RectangleBox[{0.065, 0}, {0.07500000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.075, 0}, {0.085, 0}]},
{GrayLevel[0], RectangleBox[{0.08499999999999999, 0}, {0.095, 0}]},
{GrayLevel[0], RectangleBox[{0.095, 0}, {0.10500000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{0.105, 0}, {0.115, 0}]},
{GrayLevel[0], RectangleBox[{0.11499999999999999`, 0}, {0.125, 0}]},
{GrayLevel[0], RectangleBox[{0.125, 0}, {0.135, 0}]},
{GrayLevel[0], RectangleBox[{0.135, 0}, {0.14500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.145, 0}, {0.155, 0}]},
{GrayLevel[0], RectangleBox[{0.155, 0}, {0.165, 0}]},
{GrayLevel[0], RectangleBox[{0.165, 0}, {0.17500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.175, 0}, {0.185, 0}]},
{GrayLevel[0], RectangleBox[{0.185, 0}, {0.195, 0}]},
{GrayLevel[0], RectangleBox[{0.195, 0}, {0.20500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.205, 0}, {0.215, 0}]},
{GrayLevel[0], RectangleBox[{0.215, 0}, {0.225, 0}]},
{GrayLevel[0], RectangleBox[{0.225, 0}, {0.23500000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{0.235, 0}, {0.245, 0}]},
{GrayLevel[0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{GrayLevel[0], RectangleBox[{0.255, 0}, {0.265, 0}]},
{GrayLevel[0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{GrayLevel[0], RectangleBox[{0.275, 0}, {0.28500000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{0.285, 0}, {0.295, 0}]},
{GrayLevel[0], RectangleBox[{0.295, 0}, {0.305, 0}]},
{GrayLevel[0], RectangleBox[{0.305, 0}, {0.315, 0}]},
{GrayLevel[0], RectangleBox[{0.315, 0}, {0.325, 0}]},
{GrayLevel[0], RectangleBox[{0.325, 0}, {0.335, 0}]},
{GrayLevel[0], RectangleBox[{0.335, 0}, {0.34500000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{0.345, 0}, {0.355, 0}]},
{GrayLevel[0], RectangleBox[{0.355, 0}, {0.365, 0}]},
{GrayLevel[0], RectangleBox[{0.365, 0}, {0.375, 0}]},
{GrayLevel[0], RectangleBox[{0.375, 0}, {0.385, 0}]},
{GrayLevel[0], RectangleBox[{0.385, 0}, {0.395, 0}]},
{GrayLevel[0], RectangleBox[{0.395, 0}, {0.405, 0}]},
{GrayLevel[0], RectangleBox[{0.40499999999999997`, 0}, {0.415, 0}]},
{GrayLevel[0], RectangleBox[{0.415, 0}, {0.425, 0}]},
{GrayLevel[0], RectangleBox[{0.425, 0}, {0.435, 0}]},
{GrayLevel[0], RectangleBox[{0.435, 0}, {0.445, 0}]},
{GrayLevel[0], RectangleBox[{0.445, 0}, {0.455, 0}]},
{GrayLevel[0], RectangleBox[{0.455, 0}, {0.465, 0}]},
{GrayLevel[0], RectangleBox[{0.46499999999999997`, 0}, {0.475, 0}]},
{GrayLevel[0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{GrayLevel[0], RectangleBox[{0.485, 0}, {0.495, 0}]},
{GrayLevel[0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{GrayLevel[0], RectangleBox[{0.505, 0}, {0.515, 0}]},
{GrayLevel[0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{GrayLevel[0], RectangleBox[{0.525, 0}, {0.535, 0}]},
{GrayLevel[0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{GrayLevel[0], RectangleBox[{0.545, 0}, {0.555, 0}]},
{GrayLevel[0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.565, 0}, {0.575, 0}]},
{GrayLevel[0], RectangleBox[{0.575, 0}, {0.585, 0}]},
{GrayLevel[0], RectangleBox[{0.585, 0}, {0.595, 0}]},
{GrayLevel[0], RectangleBox[{0.595, 0}, {0.605, 0}]},
{GrayLevel[0], RectangleBox[{0.605, 0}, {0.615, 0}]},
{GrayLevel[0], RectangleBox[{0.615, 0}, {0.625, 0}]},
{GrayLevel[0], RectangleBox[{0.625, 0}, {0.635, 0}]},
{GrayLevel[0], RectangleBox[{0.635, 0}, {0.645, 0}]},
{GrayLevel[0], RectangleBox[{0.645, 0}, {0.655, 0}]},
{GrayLevel[0], RectangleBox[{0.655, 0}, {0.665, 0}]},
{GrayLevel[0], RectangleBox[{0.665, 0}, {0.675, 0}]},
{GrayLevel[0], RectangleBox[{0.675, 0}, {0.685, 0}]},
{GrayLevel[0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{GrayLevel[0], RectangleBox[{0.695, 0}, {0.705, 0}]},
{GrayLevel[0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{GrayLevel[0], RectangleBox[{0.715, 0}, {0.725, 0}]},
{GrayLevel[0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{GrayLevel[0], RectangleBox[{0.735, 0}, {0.745, 0}]},
{GrayLevel[0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{GrayLevel[0], RectangleBox[{0.755, 0}, {0.765, 0}]},
{GrayLevel[0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{GrayLevel[0], RectangleBox[{0.775, 0}, {0.785, 0}]},
{GrayLevel[0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{GrayLevel[0], RectangleBox[{0.795, 0}, {0.805, 0}]},
{GrayLevel[0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.815, 0}, {0.825, 0}]},
{GrayLevel[0], RectangleBox[{0.825, 0}, {0.835, 0}]},
{GrayLevel[0], RectangleBox[{0.835, 0}, {0.845, 0}]},
{GrayLevel[0], RectangleBox[{0.845, 0}, {0.855, 0}]},
{GrayLevel[0], RectangleBox[{0.855, 0}, {0.865, 0}]},
{GrayLevel[0], RectangleBox[{0.865, 0}, {0.875, 0}]},
{GrayLevel[0], RectangleBox[{0.875, 0}, {0.885, 0}]},
{GrayLevel[0], RectangleBox[{0.885, 0}, {0.895, 0}]},
{GrayLevel[0], RectangleBox[{0.895, 0}, {0.905, 0}]},
{GrayLevel[0], RectangleBox[{0.905, 0}, {0.915, 0}]},
{GrayLevel[0], RectangleBox[{0.915, 0}, {0.925, 0}]},
{GrayLevel[0], RectangleBox[{0.925, 0}, {0.935, 0}]},
{GrayLevel[0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{GrayLevel[0], RectangleBox[{0.945, 0}, {0.955, 0}]},
{GrayLevel[0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{GrayLevel[0], RectangleBox[{0.965, 0}, {0.975, 0}]},
{GrayLevel[0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{GrayLevel[0], RectangleBox[{0.985, 0}, {0.995, 0}]},
{GrayLevel[0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{GrayLevel[0], RectangleBox[{1.0050000000000001`, 0}, {1.015, 0}]},
{GrayLevel[0], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{GrayLevel[0], RectangleBox[{1.0250000000000001`, 0}, {1.035, 0}]},
{GrayLevel[0], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{GrayLevel[0], RectangleBox[{1.0450000000000002`, 0}, {1.055, 0}]},
{GrayLevel[0], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{GrayLevel[0], RectangleBox[{1.0650000000000002`, 0}, {1.075, 0}]},
{GrayLevel[0], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{GrayLevel[0], RectangleBox[{1.0850000000000002`, 0}, {1.095, 0}]},
{GrayLevel[0], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{GrayLevel[0], RectangleBox[{1.1050000000000002`, 0}, {1.115, 0}]},
{GrayLevel[0], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{GrayLevel[0], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.135, 0}, {1.1449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.155, 0}, {1.1649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.175, 0}, {1.1849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.195, 0}, {1.2049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.215, 0}, {1.2249999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.235, 0}, {1.2449999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{GrayLevel[0], RectangleBox[{1.2550000000000001`, 0}, {1.265, 0}]},
{GrayLevel[0], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{GrayLevel[0], RectangleBox[{1.2750000000000001`, 0}, {1.285, 0}]},
{GrayLevel[0], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{GrayLevel[0], RectangleBox[{1.2950000000000002`, 0}, {1.305, 0}]},
{GrayLevel[0], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{GrayLevel[0], RectangleBox[{1.3150000000000002`, 0}, {1.325, 0}]},
{GrayLevel[0], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{GrayLevel[0], RectangleBox[{1.3350000000000002`, 0}, {1.345, 0}]},
{GrayLevel[0], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{GrayLevel[0], RectangleBox[{1.3550000000000002`, 0}, {1.365, 0}]},
{GrayLevel[0], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{GrayLevel[0], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.385, 0}, {1.3949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.405, 0}, {1.4149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.425, 0}, {1.4349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.445, 0}, {1.4549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.465, 0}, {1.4749999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.485, 0}, {1.4949999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{GrayLevel[0], RectangleBox[{1.5050000000000001`, 0}, {1.515, 0}]},
{GrayLevel[0], RectangleBox[{1.5150000000000001`, 0}, {1.525, 0}]},
{GrayLevel[0], RectangleBox[{1.5250000000000001`, 0}, {1.535, 0}]},
{GrayLevel[0], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{GrayLevel[0], RectangleBox[{1.5450000000000002`, 0}, {1.555, 0}]},
{GrayLevel[0], RectangleBox[{1.5550000000000002`, 0}, {1.565, 0}]},
{GrayLevel[0], RectangleBox[{1.5650000000000002`, 0}, {1.575, 0}]},
{GrayLevel[0], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{GrayLevel[0], RectangleBox[{1.5850000000000002`, 0}, {1.595, 0}]},
{GrayLevel[0], RectangleBox[{1.5950000000000002`, 0}, {1.605, 0}]},
{GrayLevel[0], RectangleBox[{1.6050000000000002`, 0}, {1.615, 0}]},
{GrayLevel[0], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{GrayLevel[0], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.635, 0}, {1.6449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.645, 0}, {1.6549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.655, 0}, {1.6649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.675, 0}, {1.6849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.685, 0}, {1.6949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.695, 0}, {1.7049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.715, 0}, {1.7249999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.725, 0}, {1.7349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.735, 0}, {1.7449999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{GrayLevel[0], RectangleBox[{1.7550000000000001`, 0}, {1.765, 0}]},
{GrayLevel[0], RectangleBox[{1.7650000000000001`, 0}, {1.775, 0}]},
{GrayLevel[0], RectangleBox[{1.7750000000000001`, 0}, {1.785, 0}]},
{GrayLevel[0], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{GrayLevel[0], RectangleBox[{1.7950000000000002`, 0}, {1.805, 0}]},
{GrayLevel[0], RectangleBox[{1.8050000000000002`, 0}, {1.815, 0}]},
{GrayLevel[0], RectangleBox[{1.8150000000000002`, 0}, {1.825, 0}]},
{GrayLevel[0], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{GrayLevel[0], RectangleBox[{1.8350000000000002`, 0}, {1.845, 0}]},
{GrayLevel[0], RectangleBox[{1.8450000000000002`, 0}, {1.855, 0}]},
{GrayLevel[0], RectangleBox[{1.8550000000000002`, 0}, {1.865, 0}]},
{GrayLevel[0], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{GrayLevel[0], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.885, 0}, {1.8949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.895, 0}, {1.9049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.905, 0}, {1.9149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.925, 0}, {1.9349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.935, 0}, {1.9449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.945, 0}, {1.9549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.965, 0}, {1.9749999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.975, 0}, {1.9849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.985, 0}, {1.9949999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.995, 0}, {2.005, 0}]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Frame->True,
FrameTicks->False]], "Output",
CellChangeTimes->{{3.662579824150284*^9, 3.662579924329763*^9},
3.662580001591158*^9, 3.662580129220911*^9, 3.662580190033875*^9,
3.6625804772897387`*^9, 3.6625808070482807`*^9, 3.662597811959137*^9,
3.662598566675571*^9, {3.6638077554022913`*^9, 3.663807773753832*^9}}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[",
RowBox[{"competitionplot", ",", "\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",", "u", ",", "tryKm"}],
"]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2"}], ",", "2"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Thick", ",", "Black"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]", "histoplot", ",",
RowBox[{"Axes", "\[Rule]",
RowBox[{"{",
RowBox[{"True", ",", "False"}], "}"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.662579485856509*^9, 3.662579491127986*^9}, {
3.6625802104607067`*^9, 3.662580220555599*^9}, {3.662580463397059*^9,
3.6625804711235657`*^9}, 3.6625805460433283`*^9, {3.662580792465548*^9,
3.662580793041589*^9}}],
Cell[BoxData[
GraphicsBox[{{{}, {},
{GrayLevel[0], Thickness[Tiny], LineBox[CompressedData["
1:eJwt13c4lt//AHAZyYj0CU2rMqPs8OEcikp2g0KoUIiSjE+yesjMk5Wy75si
eyXzWE92ZiQpMtIgQj2E53e+1/X7477u6/XXue/rvKfoZTcze2YmJqZ5/Pzv
LQcEvjEYDCQwXM+dOUyBbiv7Q1dWGaglaK7f+yMFFpXKiy8uM9BmDqcdxhMU
qCBpeHn6OwOFMXRYmGYpUJWP8r5ziIG0Txo9u80UDOHEQvuTQgY610q7SUgE
Q7MHXbmKNgwkW/s1XtQrGHp1U2441m2gimDLoMbdIXBggOtbg9060gtiV/gY
+wDuq3fbobp3De10uTUYzRcGy52b2XhHV9HR2U/eXVnh0DZSfn44aAWddTC0
jA2IhPSYu6EI0FFQz3k3eduHkOT5uCtx/Dc6NmGbqnGKCpP15d37w5YRe4Xs
zO/bj2CQi5231KkllBrlUdOWFgPvsrzwcp/9hUrQO2rMWiy0C+g+MJi9gJRN
L1m4WcTD+NqpxGSnefQgY+lzUUMCrPokyZ0nNocqI6ReEpcS4f5tUOds6nc0
GmYxOTn/BJZIhzp9nphBr9Y3OHJKkuAnWrGIiso0Opb7pdrgdgqcOhSvgF5O
oEo/y0SOHWmQzy9HRW7TOMqIUBnItE+Hh1R+Hspa/IB2jqinlItnwPvHZ3sq
vYcQ+rju7j2RARtP/jBWujKEil5KZUtOZ0Amw+9vCgyHUBW3q8DQTAb0Pfe1
kxQbQrsXryXIzWVAT4ep1qjOQeTjeXG2hZ4Br4WO1tuJDCLIkNAhthLQoLOr
iKN1AI3lEitflAkY3tN5mFIygJbarj60PErA1oGOgo3kARTN6iPUpU5A3dG2
vMVbA6jYlUPqBSCg1hwte3TPAJp4yld6+hQBj2yrSy9260dsq6V/pK0IyH+2
gHpBsA+xbXl+0TCAgCXiEVW6LH1IyuqBvnkQAU1WHCflf/YiEe9qXRsKPj9V
9ChnSy9a6LSzuB5KwI2ZuE9Vnr3ojVb+a3sqAafv3ZXbO9iDzCZDwjfSCOhq
/CixVqobRXt0rGfVEjB7Sf9H/KZu1CPaRrgiAn5+wgpdh98gSia/hHIDAc9P
en0RCnuDPqZdaa1uJiDwuaQSMNOFnDsfnSrsIOA2UmZA53knGiqXl5Qbxt/7
m8bbeqAdiYvm5AT9IuDDF0Sj1kobeivrpnBwiYDOl/zvlHe1IbHNKdy0ZQIe
eH10hPBsQ775VwrX6ARMiM99dq+1FTlze4ecZhDwP6VHmoouLeixnSN04CLh
+Zkb8zmwBY1eX1ce5SahYrI+KcLfgrabVzuY8pDwBwsrB0/da2TP6+Qhz0fC
S/2eAzO8r9HKouzeHgES6rhbOaeWNqP+qNjAEFESComrCfGHNqPzPdrUHjES
/h3m742wakZbJ7leCx4gYZl2t4oPWzMq+q5NpIiTUJxPh/mseRO6SxtbC5Eh
IWeRxBOOvw3IS1YLdiuRcPoKq0FAdwNapn48+l2ZhE2C4xu/yQZ0XOanHqsq
CX39n16dNGhAItAwTVaNhHNGW4+g1Hp0wnvTQWtNEmaNTEV9pdShAI0veXK6
JHzvK5CWoliHyvI/zXDpkZBH6ESR6edaRLWZjpzG9rTN7qsEtWiecYYz7iQJ
9aacBMNXq9HycmJL92kS/heSJKmVU41M6aNHEg1IWCDRqfbLvBrduNm7Zm1I
QkEnWauL5VXIYItG1bgRCWfmfqZL36xEZy72VLaZknAvVaTko1AlMtqpIHHP
jIQm8qZNMV2v0BExx1+yZ0j46nbJ1Kr0KxToxpb+4CwJw+ge0h1TL1HBNuLk
HnMSSjOvljpblqFMvrcXmyzxfZDSNGHOMiTDk2tvYEXCmOOWg/2vSpFruPLr
PuzVkBq6hkApMhnODRmyJmEHl78md28xevPLfaXehoRM+YVG9f7FyHRE4ZmS
LQmVjMZsPOSKUWi3Y1YWdjJVO+hDRBFSHKl64m9HwnfSWx5eiCpAs7InTP65
QkJ443pRw7d89KlmPOQWdnZhe5/UyXzE/l5raxe2j1KU4CpzHrqWw7fF9yoJ
P3vOqV22zUXTV5bvdmPrVxpbtde+QF01Xloi9iTcrbU946l3Dvo0Y1BQiR0U
cLuJeTAbTRHClswOJPzeODDlpJiNStqp505i15x4LK0x9wxFDzoodGIfCKcb
kKefIdoj6x2cjiSM7LzgxpWThQ5fFzimi21turds5EomyhzgDCnF/rG4rHan
mUQftDrTprB9E7oRz0EStUgHivBfIyG3Wo5udjCBkp1YtuhgJ48EdWhPZ6Du
L3LnXbAP+VmZjuhloCfp45xx2NUiKkMez9OR8Iu/Byuxyzr6aMa9qajQff7h
X+yBbSG9QTEpqLgj/sPO6yRcPKc2Wn4mGd17oUpVxN6e9GNmZkcSosXX55zG
VhhLW9oz+AT9ktknZYdtevAMk/HjRATE/uXxwL7ptJk7yOIxytXjuUDBphZW
CpbvSkDv74VwxGAXLrnsn3kfh3ppT4RTsN+oiRzekxyLeBVAUhb2nF+/upF1
DGLMu/nmYm9tDtELFHqENE5INBVgW2z3yLyGotHOmMtuhdiPk99Xv9GOQtV6
ooH52IPi2v1KzeHIe/EqPRt7R/Hzb0/1QtGopvzbDOwzGjzMm9qC0e2JCMFE
7Biaxy7H0/dRcZUvisDuMR450tUVgNqKtnb5YguV3ac6pPuiqE596Iyd1GqC
FLK8kKqMzi5z7J2j++Y2ctyRDjOrBcSWmXirlmDtjCZTiTVxbHHum4/lHO0Q
1V6BnQs7YEByYE+TITrR1+b143/3xTvqxCarBBa9Ao06sAcXgtK20S0AYPKI
eI49byzxy83dAXTL1MkFYt+N1Wt3VroJ/unzO2qBveHnk5R2+A4QGxvMPoQd
4JTn0i/9H7C48NV/A8dPk0jYg5RtQcBt88Dlp9iUBLGbqg8p4F3emutVbD3u
GotergdgHxHwWQa79c+cFBt7JGCBZkylOH4dHaUdXm7EAH/ex3sJHP8nxbwu
3teMAzqXNl83x5YcbTIy8Y0H9/w9hTixv5lZq35beQzsz5yhOeJ8ctGibhFa
TgY0/1OcrDj/DFc+rH1TTAUWB/9mZV4moVyZ1EKFexo4az+Up4NNjxv/IUlP
BwZZp9c9cX5Xct5923iHBF9U1Ur+Vx/SZfn7C8UywfM67iod7BCTwp7k7kxg
u2pW3XCJhGcTJjo8pZ6B2DrhvJe4vsyLGjRKj2aDkpSis764Pg0dn0aC4Tkg
SX1NefoiCescA2pZVV+A3qT+HYbYEfllrz5Sc8GXHY5dfBfw/antK4w5XgA+
+Aare53H+WdVkee/UAD2XgnY2XYO54uf6QuX1EKwGtFLF8S2/dxott+3CNz4
y9uUh+unnOQfw/W3xaB24DW1xISEbaU2x4vDygA9XKfosD4J/6UdapIYKwMj
b+TZzU6RsGhwRTtVpRyk7eB3uYXrfcJKLIiYKAc5e9cuP8f94CpoVbfXrADq
XrV753VIyGg/Ir9roRLoVv1DWVYnofLnTUKBFgjU/b7YMiiJz68yXziSg4DZ
gm55sQT+n5j85rEVBHb/cZUNx/2OKyNPOd2wHmy0HahXxP1wzcTiA2OuHnTv
Ew+7LkzC0aJCKSTfCIpnXf1t+UmYdvNSs2ZFM5j0GWO7j/t3shVHQfynZrC7
RVuMb4OAiSfLHs+y00Bat8vX5DUCUkU4nVMsaEBNKNU3f4WAAT3lfOsrNHDA
TnmwZJGAdke22tT82wJerlhfMP5CwP3z1SvqjW3gK08J67tOAvp2HaMszbaB
qM2eifR2Ag6+6OAp2NUOnjfoJwu04fnIfmS/6K12oHe7aVWfRsD596uG7CId
4E5ksnY8nn/qaGpE/71O4JHXcKs4n4AXkyr0XdS6gRhjNHhHJAFPkcNdRhZ9
4KqO8G08AsD54AIH2o0+0CybEhKI57nEa/cZGvf7wJjSyxh+TQLOyMrKSxX0
AY5hxWRVPA+GvgqIY2HtB0zKY9lX5PB82CVh+aqwH5g/9DC23k3AE/Q7M6Ls
bwF/tJ7E5HwG1DXczrJcPgT8jv8xykvMgNE2QwFHKj6AB//dadOeTIctRvu2
mmwfBx6VoMWTNx3OivL79T2dAH6arApn/VLhHQ8Zu2iBadDbux7p9DEZDn3Y
ZubQOgPKcrTZA/cmQVuff7+wG3wHviG+8vqBT2CTjGp4E9sckGQ14pvuewzF
OWpmMk/Og7ipcRGzMwlwX42zLlvoAuBVSi5+ORcHmVaZc9w//wKCqYoP2e/H
wj+mtZdoB5fAsuPhhBrdGDiiZLPnIGUZnMu7LtXB9gjeNN/GJ/bhN4g/n1mu
8Toa7oqbtGDdRwfjF+kCY91RsMAy/fmi9wqY5E0LPfYuAppr+p9srV0Fw6HN
0UfFw2HxpRti6mt/wfXmTYkqyaGQznmMpfLcOgiWTFd14HsAzXo1VPYlbgD1
ycKsE7XBkFODq6EmZQNIhG99FFsRDBsy35+2IjcAGep7c7w4GB7x9rFLKtgA
Dx3zt9x/Fgx5hCsid9E2ABGnGT4aHQzbXBQm+H9tAOGJAfmfl/F+tkWKymPA
AIKdOnsCOIMh/RZ9d4EpA+w85yvBwRYMC0dasgzNGUAbCPPFMShQqNChOvIy
A/i9HvYpXKLAtXOZ05w+DEBjr4xaw/thBSmsyf6MAaKpoQd+llKg69afLc9y
GeD2un1ZfAEFinvVmekVM8Dz2WcCWjkUGKdvfS24hgFYRJ8Yx6VSoPvC01iW
fgaI+qYQcD6MAqUtnYTIdwzwdY8wlYtCgePNajk6HxnArZ3h0uhHgSaJ7+oC
vzJA5j/fw5U9KHALc/Yp0Z8M4Oya3L7gSoHI2WugfokBUl5HDxRep0DPt3o2
tqsM0Mi8K9vtKgX+/74LErUij8vbUOD/ATdIm9Q=
"]]}}, {{}, {},
{GrayLevel[0], Thickness[Large], LineBox[CompressedData["
1:eJw113k0Vtv7AHBRV4aEwlXIUDJlSqLS3hqQIpShTKnQNSev11SERBMZIrNz
zJkjs22eZZ6pG5FUhkII73fftX6/P84667PWs/Y5a6/nefazhW466lnS09HR
beLnv7c04J6l0WioSuc9tfkQBTquiQSurdNQu5U3196jFJj3Vk701zINsZjZ
rVhCCpQX07o5/Y2GWi7JPuYzpsDjHP4j7YM01KdP7OwPoUA4udj6OpeG1uOb
M1w2KVDvccebo+Y0ZHZ6QZA66gqpnf721lVb6DkXsa0t0w329bHM1lhson0d
VOW1RS/IX+249zjfBjqpwVKdme8Di2zrd+weX0dDZ8t2t3H5wRvP5BaGfdfQ
g79NXmTPPoKroZ6BCKyi9rvB6ZONgZBk+8Ab9WkFafUk+izxPoOxmnLOvUHL
qFJImKk/NBj62lm4iV9YQsnTIzoDXi+hJ0Mm1fnHT8TkSSsjrMOghU/nwYH0
RSQYB1uaTkfAiMqpqFibBVT1XCb+3z2RsOyjGGuW8BySTnhjUs35GoqwwzNX
478h6luupC+z0bBAItBmYnIGSfMeA7IfYuHHhnxBRcVp9OgfU4Oqt/FwSipC
Hr2bRLJXeszYxBIhx4MMReltn5BQ4z+O35YToZTivFTKrzGkkBHmyUAkQStp
b+/S8TEU4y7BUZWcBBNEd/d0NI2hM4tZdNS0JMjJI0NdiRlD/D4TXyezkuDv
3w416ufG0M1SsfaM4iRYWzqnPxs+isJkbjJPtSdBI5W5BzKKIyjlz2fDPStJ
0O/cj65St0GklpYvLHiWgLUa3y8r3BpEkt2O783PE5BO69v7HK1B1P/lc26c
OgG99L+2k8KDCMqwcuy9REBXq6nm5+0DiD6OW+nbVQLeCRyvthAcQAx67O5n
rAh4qb0jj6m5D+10vzYR/JiAT7raZfwL+pDHYN10eBABm/vacrZi+5BRZhZz
1FMCnh9vyfp1tw/F3zfMiQom4Om5hvTx/X0o2rBWzy+SgLLsVYn5jr3IylbX
ezOVgFxXc0Ku8fQgy8Fluof1BCwQfVp2nqEHOa3cOSbRSECdNevPcvPdKHHx
6rvuJvz9eCEl5qZudORXXsz+NgJuzYR/LHPtRl6q579EdxNw+r6nNN9AF4px
aORV/0BAh8svoyrFO1HC9N56vRUCpi9pfo/Y1ol+nXyfXP+bgBOvt0OH4ffI
8m5+ncIaAQ0+U78IBL1HU/kXy3ZvEBC4myn6zHQgKWM177xtJGQnJfvOpLWj
sDtpu+JYSViw0rC7+WArYk8r8TkgRMIXmUTt6bUW9O4hJcVZmIS2Zt6Uoo4W
5Gc8lFknQsKDjUqjhGsL+nyuTt9clISvIt6k3m9uRs7cFQfuS5LQQ+GlylG7
JtTYQxPWO0ZCgxn7hQzYhB7aRvD7KZLwaKwmKcjVhLbdWljMP07C7wzbmdiq
GtGQoaEo0wkSmvW69s3sbkTx8iUFcadJeMbZxDb+bT3K7o6jN1cnoYCosgBX
YD2y7rxtY69Bwj/DXN1PTeqRKWNLivsFEhaqdiq676hH8jmrEU8vklCU4wz9
VcM6RG1l1ou4TELmvMOvmf7UoC/a3N+BIQlTRqeef/WvQsqK+dbzt0k44sWd
EHe0CrG9Fb6TaUlCNgH1PN2JSqQo1ehxy4qErjfSe0pBJfpTVN/faU1CtSkb
nifr5chv/I3JSxsSzszNJ0o4lSIRXUufYkcS8oUIFnwQKEWaT3mfXnEioY6c
bl1oRwly0m1J/oFdcq9gal2iBKnK3dzO50zCoFUXibapd2gkPdDRwoWEEvTr
b22NC5HD9K6uF254f0iJhgPMhWjq2WoRizsJQ88ZD/SWvEVS8irpAdjrARWr
J7nfoi+hMN/Vg4RtLN4qrN35SFrtvC7wIiFddq52tXc+krHgeJWFraD9r7mL
dD4yXhGY5rlPwtgQVd+xp3lon+f9tBnsIYmdL649z0G3bn964+xNQmj/T17N
bDb6lKat3oWdntvaI66RjXpDmX9I+pDQXeE5zzp9FjI9Qmc4jr3vNGdStFsG
+niMjhDzJaGvz706+oF0pH1l45kr9rfavimbo+lomcvjYS12hXqkxMm5VOR/
ISHgqh8JTXX5CkdvJaM9PfK0G/44X34tK1PqSZRUu0aLw/Z61YnYDpFovlaK
fxg7dtS3TXU6Cck3hmZdeERCqQcmuqNqSeg3R4qAN3a5oOKgS1oikqN9yirA
LmzrabjcHY8UryXy7w0gYR97QLdvaBxiureD7gz2L33l8aIrscg20GTLHlv+
34Sl/QOvUQlzjnY1tu6hK3SXI6NQeVBI4jS2k81frL5GkeiJ2DE2lsckzF2y
E5kZCUchy9GntLHfKwvK7I8NQ5kxGpt22HMPek9om4aim7ovh4Owd9UHqD0U
eIniCuy6k7GNOF2S76BgxD3T87kSOzJ2pPy96nN0Pa1iTz/2gKhqr0L9E9Qh
L2I2i703P202Wi0Q5V6jq9/EvnKSjX5byyN0wE37/O5AnC8NLrzWF/0QH3Xn
hAB21+VR2Y4OHxTYLh4thS1Q6BdileiFjnjm2CthxzTrIPkUKirhDDM5g/33
OP/cVoYzqs/ts9LElpzsV35laot6/jg908EWZXWKlLa2QFeOWHVcxfbpE+vb
X6eFkhjfihtiS+0et9lxRAHsGDVI+s8Di74J7KtG4J2/roIB9sLlwz8dna3A
oAM5oYftGabWaqvgBDxCtLK0sLceuMckyFBAjL3uS7X/1rfJsuuV8ACiPPkv
VbAZDD6qMIp6g3kJx2x57DrBoMdx7L6gqPfF50PY/q+EnY6/8AeCLXuO82Cr
sVYYdbM8Bugyfcpf2Iy++qq2QUGAQdlcegnvX/PvOfEdjM+A6qRM70fsJ/aB
nAn+L0C2skdYC3bqYsh9vochwKjwnGM+trW1hNW7rVAw+87V3RNbQ5h63U8l
HIjO/0gzxRYbr9PW8YoAIGv7TxXsWT3T47NrkcBHWHF4FedP665MyWKl10Dr
523XXuw3zSsH/KnRQMnFWCYL2+50yE6B5ViQ09SxZIittTa2MXs0HoRx3dwm
iS1dKL5Y7JwATrHNi2/g/F4N//RdbDURRDBIdEZhlzJ79tdSSHBoqM62HNdL
4hGu3lzhZLDJFSvhgR2gk9sV25kM9mbcyFPEvvpqss1VPBUMTLBwZOB6XBC6
VCsxng5aCxLF7+F6HTw3jXieZAB+w2fCgthV1j6V249ngpCj8pOtD0n4NLuw
5EPIGxAwJ1TBiy2qzJ8bei4HmGksdsbi/sFqUpzlvZgD5k4wMSth/3qgm2kX
nwsONA2zdj8g4Y2JWj0Rrzwgc1LefgP3I2mx31qb/flAvrolVgn3r5a35ufy
gwoBz4L+iBruj6capOoO/1sI9nzhL6iikjBvYE01XrEIIAEpfQXsV2th4Olk
EVBlGt7825WEt0HzCUuVYjDQ/v5D0z0S0lpl5XgXS8H2Qw6sFQ4kdB7bzA1W
LwMu52/msWNP/2iV/iu+DCidmhW+ZU/CdnZLqV+a5UDlIOmyzY6E0QavD3ck
V4DH6Te6Rf4h4bGJbQIPjRBIAe/SaDfx/5cZLspmINCLdKUAtmhodv2/awgs
8Pu3eVmQkCUp61iiVjVofxx+/ac5CTd0jMZoc9WAr6SvptGEhON5ueJIrhaQ
guKzew1ImOBkVq9SXA/mKxr+0cDnY6wJU07Ex3pQZh1dflGNhFEahZE/GBsA
d8BFWa3zJAwRZLaNM2oAcxZOfppncf10FXFsrjUAjfQDw9KAhBayu8wrTjUB
57t5AfH4vBZZKF87UdsCDJh9JPkO4n7bcdZ/6UcLmBi4B1rxfDCQ2caWw9sK
zLKVZFzx/PDEclRE6G4rSOxiSW4SwPkysq7FKNgGGpzH5nV4cX40KBO999tB
cG2Sx+YuEl6PKda0U+4E69EJ/TXLBCx0A/2HLDuBnuT3q1JLBGQzaDL/GNIJ
XrFyVYf/JGAN+6CL3kwn4MiQNDGfJ+Des56XYy92gYbMT2WjMwT0LIl2913v
AsfNroTcHSXgBXK4Q9uoB9h5OWVzIQIuPMqxarDvAWUoxEK9koBRd/xoJ/16
QL/+hCi1nIAzR47Iief0gH2Knl+6igkYWOITzrC9F1zYo6trn4fnxY7DxiW5
veB63tRlzSQCqq9SZoQY+wF34Ndrrx/i+VGLk2G5aBCcGpT0zztFwBcWTItr
LYPAMlixKPQEAYcodB+3xgfB4eVKk3tKBLSJnyvb+dcQME8lOWQVcPx8qzOf
wRBw+vlIJFISx7/0mzi7MgQ29lQ68O3D8QNLNaGKIyDFnWueEc/PweaDPrLF
Y8A666xIQEYSbNLm36XD+Qn0BH23415MhD+EuB70RE+C9pFcrjLZREhxkbQI
5p4GF3SPvmltjoeDY+x6Vs0zQPQNpxhlMRbecD/1hfHSNxCRHLIYLBoD6ySP
P6nbMQe8UnKm9oi9hqJMFTPJGgugVbqw8bBaJOSvsD2/I3AR6H+Pk/vqEAHp
1ukznCd+ArrfVTZ21DD4W7fSrOHQEig//JzzT/ZLOKpgvv+Q/zK4u3Vr40dS
MHQyZOcQHlsBXcHXUrMPP4O84Z+NtvOvAh1n9VMFfwfBHOPEtF9ua2DfdfHd
V+gCoKGKt0Zz5TpYMD36OO+qH8w3sxc+sfEHdI2JPQj77gNXmc8ylOpvgmto
pY1x332o131SkT9qC1DYPjP95nOHzCdZairitoBpvX71PlZ3WJM8ctGE3AJ8
JqUFan/coKybu0VMzhYwuff+fPGwG2Q7UPyMt2ELSC8zbK2/coMtdvKTXD+3
gNSN264se9wg3CkewnaJBmYOhuxT46DC1bur+3J0aYDqlerhsI0Kc0ebUrQM
aaBdM2Q6ftEVCuRalT+7SQO2PEajPD2ucEM/eZrZnQY6w1OYbcJcYTF5QIUx
lQa0s9OYXvC4Qodd802pb2igaNbZXHGnKxSlVump5dMAg4Ro6vQqBYZrmt55
VEEDnE0XaWYjFOi8GB3G0EsDen9u5+bEUaCEsY0AOUQDymtaxq9eUOCneuWM
Mx9o4GIN3ewjbwrUiRqqeviVBnoCw9O9LChwJ336BaF5GsjtHO7z06NAZEvt
q16igch7+WOhZynQtV/N/MY6DZh4XajKUKDA/7u/g/+/v/8PlloAuQ==
"]]}},
{GrayLevel[0], EdgeForm[GrayLevel[0]],
{GrayLevel[0], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{GrayLevel[0], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{GrayLevel[0], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{GrayLevel[0], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{GrayLevel[0], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{GrayLevel[0], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{GrayLevel[0], RectangleBox[{-1.9349999999999998`, 0}, {-1.925, 0}]},
{GrayLevel[0], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{GrayLevel[0], RectangleBox[{-1.9149999999999998`, 0}, {-1.905, 0}]},
{GrayLevel[0], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{GrayLevel[0], RectangleBox[{-1.8949999999999998`, 0}, {-1.885, 0}]},
{GrayLevel[0], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{GrayLevel[0], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.865, 0}, {-1.8550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.845, 0}, {-1.8350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.825, 0}, {-1.8150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{GrayLevel[0], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{GrayLevel[0], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{GrayLevel[0], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{GrayLevel[0], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{GrayLevel[0], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{GrayLevel[0], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{GrayLevel[0], RectangleBox[{-1.6849999999999998`, 0}, {-1.675, 0}]},
{GrayLevel[0], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{GrayLevel[0], RectangleBox[{-1.6649999999999998`, 0}, {-1.655, 0}]},
{GrayLevel[0], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{GrayLevel[0], RectangleBox[{-1.6449999999999998`, 0}, {-1.635, 0}]},
{GrayLevel[0], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{GrayLevel[0], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.615, 0}, {-1.6050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.595, 0}, {-1.5850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.575, 0}, {-1.5650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{GrayLevel[0], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{GrayLevel[0], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{GrayLevel[0], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{GrayLevel[0], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{GrayLevel[0], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{GrayLevel[0], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{GrayLevel[0], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{GrayLevel[0], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{GrayLevel[0], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{GrayLevel[0], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{GrayLevel[0], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{GrayLevel[0], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{GrayLevel[0], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{GrayLevel[0], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{GrayLevel[0], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{GrayLevel[0], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{GrayLevel[0], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{GrayLevel[0], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{GrayLevel[0], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{GrayLevel[0], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{GrayLevel[0], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{GrayLevel[0], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{GrayLevel[0], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{GrayLevel[0], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{GrayLevel[0], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{GrayLevel[0], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{GrayLevel[0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{GrayLevel[0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{GrayLevel[0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{GrayLevel[0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{GrayLevel[0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{GrayLevel[0], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.935, 0}, {-0.925, 0}]},
{GrayLevel[0], RectangleBox[{-0.925, 0}, {-0.915, 0}]},
{GrayLevel[0], RectangleBox[{-0.915, 0}, {-0.905, 0}]},
{GrayLevel[0], RectangleBox[{-0.905, 0}, {-0.895, 0}]},
{GrayLevel[0], RectangleBox[{-0.895, 0}, {-0.885, 0}]},
{GrayLevel[0], RectangleBox[{-0.885, 0}, {-0.875, 0}]},
{GrayLevel[0], RectangleBox[{-0.875, 0}, {-0.865, 0}]},
{GrayLevel[0], RectangleBox[{-0.865, 0}, {-0.855, 0}]},
{GrayLevel[0], RectangleBox[{-0.855, 0}, {-0.845, 0}]},
{GrayLevel[0], RectangleBox[{-0.845, 0}, {-0.835, 0}]},
{GrayLevel[0], RectangleBox[{-0.835, 0}, {-0.825, 0}]},
{GrayLevel[0], RectangleBox[{-0.825, 0}, {-0.815, 0}]},
{GrayLevel[0], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{GrayLevel[0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{GrayLevel[0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{GrayLevel[0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{GrayLevel[0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{GrayLevel[0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{GrayLevel[0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{GrayLevel[0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{GrayLevel[0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{GrayLevel[0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{GrayLevel[0], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{GrayLevel[0], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{GrayLevel[0], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.685, 0}, {-0.675, 0}]},
{GrayLevel[0], RectangleBox[{-0.675, 0}, {-0.665, 0}]},
{GrayLevel[0], RectangleBox[{-0.665, 0}, {-0.655, 0}]},
{GrayLevel[0], RectangleBox[{-0.655, 0}, {-0.645, 0}]},
{GrayLevel[0], RectangleBox[{-0.645, 0}, {-0.635, 0}]},
{GrayLevel[0], RectangleBox[{-0.635, 0}, {-0.625, 0}]},
{GrayLevel[0], RectangleBox[{-0.625, 0}, {-0.615, 0}]},
{GrayLevel[0], RectangleBox[{-0.615, 0}, {-0.605, 0}]},
{GrayLevel[0], RectangleBox[{-0.605, 0}, {-0.595, 0}]},
{GrayLevel[0], RectangleBox[{-0.595, 0}, {-0.585, 0}]},
{GrayLevel[0], RectangleBox[{-0.585, 0}, {-0.575, 0}]},
{GrayLevel[0], RectangleBox[{-0.575, 0}, {-0.565, 0}]},
{GrayLevel[0], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{GrayLevel[0], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{GrayLevel[0], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{GrayLevel[0], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{GrayLevel[0], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{GrayLevel[0], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{GrayLevel[0], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{GrayLevel[0], RectangleBox[{-0.495, 0}, {-0.485, 0}]},
{GrayLevel[0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{GrayLevel[0], RectangleBox[{-0.475, 0}, {-0.46499999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{-0.465, 0}, {-0.455, 0}]},
{GrayLevel[0], RectangleBox[{-0.455, 0}, {-0.445, 0}]},
{GrayLevel[0], RectangleBox[{-0.445, 0}, {-0.435, 0}]},
{GrayLevel[0], RectangleBox[{-0.435, 0}, {-0.425, 0}]},
{GrayLevel[0], RectangleBox[{-0.425, 0}, {-0.415, 0}]},
{GrayLevel[0], RectangleBox[{-0.415, 0}, {-0.40499999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{-0.405, 0}, {-0.395, 0}]},
{GrayLevel[0], RectangleBox[{-0.395, 0}, {-0.385, 0}]},
{GrayLevel[0], RectangleBox[{-0.385, 0}, {-0.375, 0}]},
{GrayLevel[0], RectangleBox[{-0.375, 0}, {-0.365, 0}]},
{GrayLevel[0], RectangleBox[{-0.365, 0}, {-0.355, 0}]},
{GrayLevel[0], RectangleBox[{-0.355, 0}, {-0.345, 0}]},
{GrayLevel[0], RectangleBox[{-0.34500000000000003`, 0}, {-0.335, 0}]},
{GrayLevel[0], RectangleBox[{-0.335, 0}, {-0.325, 0}]},
{GrayLevel[0], RectangleBox[{-0.325, 0}, {-0.315, 0}]},
{GrayLevel[0], RectangleBox[{-0.315, 0}, {-0.305, 0}]},
{GrayLevel[0], RectangleBox[{-0.305, 0}, {-0.295, 0}]},
{GrayLevel[0], RectangleBox[{-0.295, 0}, {-0.285, 0}]},
{GrayLevel[0], RectangleBox[{-0.28500000000000003`, 0}, {-0.275, 0}]},
{GrayLevel[0], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{GrayLevel[0], RectangleBox[{-0.265, 0}, {-0.255, 0}]},
{GrayLevel[0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{GrayLevel[0], RectangleBox[{-0.245, 0}, {-0.235, 0}]},
{GrayLevel[0], RectangleBox[{-0.23500000000000001`, 0}, {-0.225, 0}]},
{GrayLevel[0], RectangleBox[{-0.225, 0}, {-0.215, 0}]},
{GrayLevel[0], RectangleBox[{-0.215, 0}, {-0.205, 0}]},
{GrayLevel[0], RectangleBox[{-0.20500000000000002`, 0}, {-0.195, 0}]},
{GrayLevel[0], RectangleBox[{-0.195, 0}, {-0.185, 0}]},
{GrayLevel[0], RectangleBox[{-0.185, 0}, {-0.175, 0}]},
{GrayLevel[0], RectangleBox[{-0.17500000000000002`, 0}, {-0.165, 0}]},
{GrayLevel[0], RectangleBox[{-0.165, 0}, {-0.155, 0}]},
{GrayLevel[0], RectangleBox[{-0.155, 0}, {-0.145, 0}]},
{GrayLevel[0], RectangleBox[{-0.14500000000000002`, 0}, {-0.135, 0}]},
{GrayLevel[0], RectangleBox[{-0.135, 0}, {-0.125, 0}]},
{GrayLevel[0], RectangleBox[{-0.125, 0}, {-0.11499999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{-0.115, 0}, {-0.105, 0}]},
{GrayLevel[0], RectangleBox[{-0.10500000000000001`, 0}, {-0.095, 0}]},
{GrayLevel[0], RectangleBox[{-0.095, 0}, {-0.08499999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.085, 0}, {-0.075, 0}]},
{GrayLevel[0], RectangleBox[{-0.07500000000000001, 0}, {-0.065, 0}]},
{GrayLevel[0], RectangleBox[{-0.065, 0}, {-0.055, 0}]},
{GrayLevel[0], RectangleBox[{-0.055, 0}, {-0.045000000000000005`, 1}]},
{GrayLevel[0], RectangleBox[{-0.045, 0}, {-0.035, 12}]},
{GrayLevel[0],
RectangleBox[{-0.034999999999999996`, 0}, \
{-0.024999999999999998`, 125}]},
{GrayLevel[0], RectangleBox[{-0.025, 0}, {-0.015, 653}]},
{GrayLevel[0], RectangleBox[{-0.015, 0}, {-0.005, 986}]},
{GrayLevel[0], RectangleBox[{-0.005, 0}, {0.005, 564}]},
{GrayLevel[0], RectangleBox[{0.005, 0}, {0.015, 139}]},
{GrayLevel[0], RectangleBox[{0.015, 0}, {0.025, 5}]},
{GrayLevel[0],
RectangleBox[{0.024999999999999998`, 0}, {0.034999999999999996`, 0}]},
{GrayLevel[0], RectangleBox[{0.035, 0}, {0.045, 0}]},
{GrayLevel[0], RectangleBox[{0.045000000000000005`, 0}, {0.055, 0}]},
{GrayLevel[0], RectangleBox[{0.055, 0}, {0.065, 0}]},
{GrayLevel[0], RectangleBox[{0.065, 0}, {0.07500000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.075, 0}, {0.085, 0}]},
{GrayLevel[0], RectangleBox[{0.08499999999999999, 0}, {0.095, 0}]},
{GrayLevel[0], RectangleBox[{0.095, 0}, {0.10500000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{0.105, 0}, {0.115, 0}]},
{GrayLevel[0], RectangleBox[{0.11499999999999999`, 0}, {0.125, 0}]},
{GrayLevel[0], RectangleBox[{0.125, 0}, {0.135, 0}]},
{GrayLevel[0], RectangleBox[{0.135, 0}, {0.14500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.145, 0}, {0.155, 0}]},
{GrayLevel[0], RectangleBox[{0.155, 0}, {0.165, 0}]},
{GrayLevel[0], RectangleBox[{0.165, 0}, {0.17500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.175, 0}, {0.185, 0}]},
{GrayLevel[0], RectangleBox[{0.185, 0}, {0.195, 0}]},
{GrayLevel[0], RectangleBox[{0.195, 0}, {0.20500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.205, 0}, {0.215, 0}]},
{GrayLevel[0], RectangleBox[{0.215, 0}, {0.225, 0}]},
{GrayLevel[0], RectangleBox[{0.225, 0}, {0.23500000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{0.235, 0}, {0.245, 0}]},
{GrayLevel[0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{GrayLevel[0], RectangleBox[{0.255, 0}, {0.265, 0}]},
{GrayLevel[0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{GrayLevel[0], RectangleBox[{0.275, 0}, {0.28500000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{0.285, 0}, {0.295, 0}]},
{GrayLevel[0], RectangleBox[{0.295, 0}, {0.305, 0}]},
{GrayLevel[0], RectangleBox[{0.305, 0}, {0.315, 0}]},
{GrayLevel[0], RectangleBox[{0.315, 0}, {0.325, 0}]},
{GrayLevel[0], RectangleBox[{0.325, 0}, {0.335, 0}]},
{GrayLevel[0], RectangleBox[{0.335, 0}, {0.34500000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{0.345, 0}, {0.355, 0}]},
{GrayLevel[0], RectangleBox[{0.355, 0}, {0.365, 0}]},
{GrayLevel[0], RectangleBox[{0.365, 0}, {0.375, 0}]},
{GrayLevel[0], RectangleBox[{0.375, 0}, {0.385, 0}]},
{GrayLevel[0], RectangleBox[{0.385, 0}, {0.395, 0}]},
{GrayLevel[0], RectangleBox[{0.395, 0}, {0.405, 0}]},
{GrayLevel[0], RectangleBox[{0.40499999999999997`, 0}, {0.415, 0}]},
{GrayLevel[0], RectangleBox[{0.415, 0}, {0.425, 0}]},
{GrayLevel[0], RectangleBox[{0.425, 0}, {0.435, 0}]},
{GrayLevel[0], RectangleBox[{0.435, 0}, {0.445, 0}]},
{GrayLevel[0], RectangleBox[{0.445, 0}, {0.455, 0}]},
{GrayLevel[0], RectangleBox[{0.455, 0}, {0.465, 0}]},
{GrayLevel[0], RectangleBox[{0.46499999999999997`, 0}, {0.475, 0}]},
{GrayLevel[0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{GrayLevel[0], RectangleBox[{0.485, 0}, {0.495, 0}]},
{GrayLevel[0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{GrayLevel[0], RectangleBox[{0.505, 0}, {0.515, 0}]},
{GrayLevel[0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{GrayLevel[0], RectangleBox[{0.525, 0}, {0.535, 0}]},
{GrayLevel[0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{GrayLevel[0], RectangleBox[{0.545, 0}, {0.555, 0}]},
{GrayLevel[0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.565, 0}, {0.575, 0}]},
{GrayLevel[0], RectangleBox[{0.575, 0}, {0.585, 0}]},
{GrayLevel[0], RectangleBox[{0.585, 0}, {0.595, 0}]},
{GrayLevel[0], RectangleBox[{0.595, 0}, {0.605, 0}]},
{GrayLevel[0], RectangleBox[{0.605, 0}, {0.615, 0}]},
{GrayLevel[0], RectangleBox[{0.615, 0}, {0.625, 0}]},
{GrayLevel[0], RectangleBox[{0.625, 0}, {0.635, 0}]},
{GrayLevel[0], RectangleBox[{0.635, 0}, {0.645, 0}]},
{GrayLevel[0], RectangleBox[{0.645, 0}, {0.655, 0}]},
{GrayLevel[0], RectangleBox[{0.655, 0}, {0.665, 0}]},
{GrayLevel[0], RectangleBox[{0.665, 0}, {0.675, 0}]},
{GrayLevel[0], RectangleBox[{0.675, 0}, {0.685, 0}]},
{GrayLevel[0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{GrayLevel[0], RectangleBox[{0.695, 0}, {0.705, 0}]},
{GrayLevel[0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{GrayLevel[0], RectangleBox[{0.715, 0}, {0.725, 0}]},
{GrayLevel[0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{GrayLevel[0], RectangleBox[{0.735, 0}, {0.745, 0}]},
{GrayLevel[0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{GrayLevel[0], RectangleBox[{0.755, 0}, {0.765, 0}]},
{GrayLevel[0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{GrayLevel[0], RectangleBox[{0.775, 0}, {0.785, 0}]},
{GrayLevel[0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{GrayLevel[0], RectangleBox[{0.795, 0}, {0.805, 0}]},
{GrayLevel[0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.815, 0}, {0.825, 0}]},
{GrayLevel[0], RectangleBox[{0.825, 0}, {0.835, 0}]},
{GrayLevel[0], RectangleBox[{0.835, 0}, {0.845, 0}]},
{GrayLevel[0], RectangleBox[{0.845, 0}, {0.855, 0}]},
{GrayLevel[0], RectangleBox[{0.855, 0}, {0.865, 0}]},
{GrayLevel[0], RectangleBox[{0.865, 0}, {0.875, 0}]},
{GrayLevel[0], RectangleBox[{0.875, 0}, {0.885, 0}]},
{GrayLevel[0], RectangleBox[{0.885, 0}, {0.895, 0}]},
{GrayLevel[0], RectangleBox[{0.895, 0}, {0.905, 0}]},
{GrayLevel[0], RectangleBox[{0.905, 0}, {0.915, 0}]},
{GrayLevel[0], RectangleBox[{0.915, 0}, {0.925, 0}]},
{GrayLevel[0], RectangleBox[{0.925, 0}, {0.935, 0}]},
{GrayLevel[0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{GrayLevel[0], RectangleBox[{0.945, 0}, {0.955, 0}]},
{GrayLevel[0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{GrayLevel[0], RectangleBox[{0.965, 0}, {0.975, 0}]},
{GrayLevel[0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{GrayLevel[0], RectangleBox[{0.985, 0}, {0.995, 0}]},
{GrayLevel[0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{GrayLevel[0], RectangleBox[{1.0050000000000001`, 0}, {1.015, 0}]},
{GrayLevel[0], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{GrayLevel[0], RectangleBox[{1.0250000000000001`, 0}, {1.035, 0}]},
{GrayLevel[0], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{GrayLevel[0], RectangleBox[{1.0450000000000002`, 0}, {1.055, 0}]},
{GrayLevel[0], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{GrayLevel[0], RectangleBox[{1.0650000000000002`, 0}, {1.075, 0}]},
{GrayLevel[0], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{GrayLevel[0], RectangleBox[{1.0850000000000002`, 0}, {1.095, 0}]},
{GrayLevel[0], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{GrayLevel[0], RectangleBox[{1.1050000000000002`, 0}, {1.115, 0}]},
{GrayLevel[0], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{GrayLevel[0], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.135, 0}, {1.1449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.155, 0}, {1.1649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.175, 0}, {1.1849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.195, 0}, {1.2049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.215, 0}, {1.2249999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.235, 0}, {1.2449999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{GrayLevel[0], RectangleBox[{1.2550000000000001`, 0}, {1.265, 0}]},
{GrayLevel[0], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{GrayLevel[0], RectangleBox[{1.2750000000000001`, 0}, {1.285, 0}]},
{GrayLevel[0], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{GrayLevel[0], RectangleBox[{1.2950000000000002`, 0}, {1.305, 0}]},
{GrayLevel[0], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{GrayLevel[0], RectangleBox[{1.3150000000000002`, 0}, {1.325, 0}]},
{GrayLevel[0], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{GrayLevel[0], RectangleBox[{1.3350000000000002`, 0}, {1.345, 0}]},
{GrayLevel[0], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{GrayLevel[0], RectangleBox[{1.3550000000000002`, 0}, {1.365, 0}]},
{GrayLevel[0], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{GrayLevel[0], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.385, 0}, {1.3949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.405, 0}, {1.4149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.425, 0}, {1.4349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.445, 0}, {1.4549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.465, 0}, {1.4749999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.485, 0}, {1.4949999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{GrayLevel[0], RectangleBox[{1.5050000000000001`, 0}, {1.515, 0}]},
{GrayLevel[0], RectangleBox[{1.5150000000000001`, 0}, {1.525, 0}]},
{GrayLevel[0], RectangleBox[{1.5250000000000001`, 0}, {1.535, 0}]},
{GrayLevel[0], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{GrayLevel[0], RectangleBox[{1.5450000000000002`, 0}, {1.555, 0}]},
{GrayLevel[0], RectangleBox[{1.5550000000000002`, 0}, {1.565, 0}]},
{GrayLevel[0], RectangleBox[{1.5650000000000002`, 0}, {1.575, 0}]},
{GrayLevel[0], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{GrayLevel[0], RectangleBox[{1.5850000000000002`, 0}, {1.595, 0}]},
{GrayLevel[0], RectangleBox[{1.5950000000000002`, 0}, {1.605, 0}]},
{GrayLevel[0], RectangleBox[{1.6050000000000002`, 0}, {1.615, 0}]},
{GrayLevel[0], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{GrayLevel[0], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.635, 0}, {1.6449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.645, 0}, {1.6549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.655, 0}, {1.6649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.675, 0}, {1.6849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.685, 0}, {1.6949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.695, 0}, {1.7049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.715, 0}, {1.7249999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.725, 0}, {1.7349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.735, 0}, {1.7449999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{GrayLevel[0], RectangleBox[{1.7550000000000001`, 0}, {1.765, 0}]},
{GrayLevel[0], RectangleBox[{1.7650000000000001`, 0}, {1.775, 0}]},
{GrayLevel[0], RectangleBox[{1.7750000000000001`, 0}, {1.785, 0}]},
{GrayLevel[0], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{GrayLevel[0], RectangleBox[{1.7950000000000002`, 0}, {1.805, 0}]},
{GrayLevel[0], RectangleBox[{1.8050000000000002`, 0}, {1.815, 0}]},
{GrayLevel[0], RectangleBox[{1.8150000000000002`, 0}, {1.825, 0}]},
{GrayLevel[0], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{GrayLevel[0], RectangleBox[{1.8350000000000002`, 0}, {1.845, 0}]},
{GrayLevel[0], RectangleBox[{1.8450000000000002`, 0}, {1.855, 0}]},
{GrayLevel[0], RectangleBox[{1.8550000000000002`, 0}, {1.865, 0}]},
{GrayLevel[0], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{GrayLevel[0], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.885, 0}, {1.8949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.895, 0}, {1.9049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.905, 0}, {1.9149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.925, 0}, {1.9349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.935, 0}, {1.9449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.945, 0}, {1.9549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.965, 0}, {1.9749999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.975, 0}, {1.9849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.985, 0}, {1.9949999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.995, 0}, {2.005, 0}]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->{True, False},
AxesOrigin->{0, 0},
PlotRange->{{-2, 2}, Automatic},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{
3.66257949156072*^9, {3.66258021143362*^9, 3.662580221084853*^9},
3.66258047736412*^9, 3.662580807124124*^9, 3.66259781203299*^9,
3.662598566747724*^9, {3.6638077554349813`*^9, 3.6638077738252153`*^9}}]
}, Open ]],
Cell["\<\
From the ESS calculations:
{u1\[Rule]0.,Km\[Rule]6266.57}\
\>", "Text",
CellChangeTimes->{{3.6625831016188927`*^9, 3.662583129434276*^9},
3.6625832301909657`*^9, 3.662587879844906*^9, 3.662588322881942*^9,
3.662598068763547*^9, {3.662598310571471*^9, 3.66259833774723*^9},
3.6625985271253023`*^9}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[",
RowBox[{"histoplot", ",", "competitionplot", ",", "\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "maxheight"}], "}"}]}], "}"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Black", ",", "Thin"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",", "u", ",", "tryKm"}],
"]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2"}], ",", "2"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Thick", ",", "Black"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Axes", "\[Rule]",
RowBox[{"{",
RowBox[{"True", ",", "False"}], "}"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.6625981710969687`*^9, 3.6625981892162952`*^9}, {
3.662598313163443*^9, 3.6625983216273403`*^9}, 3.6625984027700377`*^9, {
3.6625984817991734`*^9, 3.662598485862543*^9}, {3.662598528445595*^9,
3.662598534732072*^9}, 3.662598573547632*^9}],
Cell[BoxData[
GraphicsBox[{
{GrayLevel[0], EdgeForm[GrayLevel[0]],
{GrayLevel[0], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{GrayLevel[0], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{GrayLevel[0], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{GrayLevel[0], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{GrayLevel[0], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{GrayLevel[0], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{GrayLevel[0], RectangleBox[{-1.9349999999999998`, 0}, {-1.925, 0}]},
{GrayLevel[0], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{GrayLevel[0], RectangleBox[{-1.9149999999999998`, 0}, {-1.905, 0}]},
{GrayLevel[0], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{GrayLevel[0], RectangleBox[{-1.8949999999999998`, 0}, {-1.885, 0}]},
{GrayLevel[0], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{GrayLevel[0], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.865, 0}, {-1.8550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.845, 0}, {-1.8350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.825, 0}, {-1.8150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{GrayLevel[0], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{GrayLevel[0], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{GrayLevel[0], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{GrayLevel[0], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{GrayLevel[0], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{GrayLevel[0], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{GrayLevel[0], RectangleBox[{-1.6849999999999998`, 0}, {-1.675, 0}]},
{GrayLevel[0], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{GrayLevel[0], RectangleBox[{-1.6649999999999998`, 0}, {-1.655, 0}]},
{GrayLevel[0], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{GrayLevel[0], RectangleBox[{-1.6449999999999998`, 0}, {-1.635, 0}]},
{GrayLevel[0], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{GrayLevel[0], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.615, 0}, {-1.6050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.595, 0}, {-1.5850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.575, 0}, {-1.5650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{GrayLevel[0], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{GrayLevel[0], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{GrayLevel[0], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{GrayLevel[0], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{GrayLevel[0], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{GrayLevel[0], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{GrayLevel[0], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{GrayLevel[0], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{GrayLevel[0], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{GrayLevel[0], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{GrayLevel[0], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{GrayLevel[0], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{GrayLevel[0], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{GrayLevel[0], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{GrayLevel[0], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{GrayLevel[0], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{GrayLevel[0], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{GrayLevel[0], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{GrayLevel[0], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{GrayLevel[0], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{GrayLevel[0], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{GrayLevel[0], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{GrayLevel[0], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{GrayLevel[0], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{GrayLevel[0], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{GrayLevel[0], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{GrayLevel[0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{GrayLevel[0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{GrayLevel[0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{GrayLevel[0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{GrayLevel[0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{GrayLevel[0], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.935, 0}, {-0.925, 0}]},
{GrayLevel[0], RectangleBox[{-0.925, 0}, {-0.915, 0}]},
{GrayLevel[0], RectangleBox[{-0.915, 0}, {-0.905, 0}]},
{GrayLevel[0], RectangleBox[{-0.905, 0}, {-0.895, 0}]},
{GrayLevel[0], RectangleBox[{-0.895, 0}, {-0.885, 0}]},
{GrayLevel[0], RectangleBox[{-0.885, 0}, {-0.875, 0}]},
{GrayLevel[0], RectangleBox[{-0.875, 0}, {-0.865, 0}]},
{GrayLevel[0], RectangleBox[{-0.865, 0}, {-0.855, 0}]},
{GrayLevel[0], RectangleBox[{-0.855, 0}, {-0.845, 0}]},
{GrayLevel[0], RectangleBox[{-0.845, 0}, {-0.835, 0}]},
{GrayLevel[0], RectangleBox[{-0.835, 0}, {-0.825, 0}]},
{GrayLevel[0], RectangleBox[{-0.825, 0}, {-0.815, 0}]},
{GrayLevel[0], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{GrayLevel[0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{GrayLevel[0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{GrayLevel[0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{GrayLevel[0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{GrayLevel[0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{GrayLevel[0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{GrayLevel[0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{GrayLevel[0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{GrayLevel[0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{GrayLevel[0], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{GrayLevel[0], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{GrayLevel[0], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.685, 0}, {-0.675, 0}]},
{GrayLevel[0], RectangleBox[{-0.675, 0}, {-0.665, 0}]},
{GrayLevel[0], RectangleBox[{-0.665, 0}, {-0.655, 0}]},
{GrayLevel[0], RectangleBox[{-0.655, 0}, {-0.645, 0}]},
{GrayLevel[0], RectangleBox[{-0.645, 0}, {-0.635, 0}]},
{GrayLevel[0], RectangleBox[{-0.635, 0}, {-0.625, 0}]},
{GrayLevel[0], RectangleBox[{-0.625, 0}, {-0.615, 0}]},
{GrayLevel[0], RectangleBox[{-0.615, 0}, {-0.605, 0}]},
{GrayLevel[0], RectangleBox[{-0.605, 0}, {-0.595, 0}]},
{GrayLevel[0], RectangleBox[{-0.595, 0}, {-0.585, 0}]},
{GrayLevel[0], RectangleBox[{-0.585, 0}, {-0.575, 0}]},
{GrayLevel[0], RectangleBox[{-0.575, 0}, {-0.565, 0}]},
{GrayLevel[0], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{GrayLevel[0], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{GrayLevel[0], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{GrayLevel[0], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{GrayLevel[0], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{GrayLevel[0], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{GrayLevel[0], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{GrayLevel[0], RectangleBox[{-0.495, 0}, {-0.485, 0}]},
{GrayLevel[0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{GrayLevel[0], RectangleBox[{-0.475, 0}, {-0.46499999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{-0.465, 0}, {-0.455, 0}]},
{GrayLevel[0], RectangleBox[{-0.455, 0}, {-0.445, 0}]},
{GrayLevel[0], RectangleBox[{-0.445, 0}, {-0.435, 0}]},
{GrayLevel[0], RectangleBox[{-0.435, 0}, {-0.425, 0}]},
{GrayLevel[0], RectangleBox[{-0.425, 0}, {-0.415, 0}]},
{GrayLevel[0], RectangleBox[{-0.415, 0}, {-0.40499999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{-0.405, 0}, {-0.395, 0}]},
{GrayLevel[0], RectangleBox[{-0.395, 0}, {-0.385, 0}]},
{GrayLevel[0], RectangleBox[{-0.385, 0}, {-0.375, 0}]},
{GrayLevel[0], RectangleBox[{-0.375, 0}, {-0.365, 0}]},
{GrayLevel[0], RectangleBox[{-0.365, 0}, {-0.355, 0}]},
{GrayLevel[0], RectangleBox[{-0.355, 0}, {-0.345, 0}]},
{GrayLevel[0], RectangleBox[{-0.34500000000000003`, 0}, {-0.335, 0}]},
{GrayLevel[0], RectangleBox[{-0.335, 0}, {-0.325, 0}]},
{GrayLevel[0], RectangleBox[{-0.325, 0}, {-0.315, 0}]},
{GrayLevel[0], RectangleBox[{-0.315, 0}, {-0.305, 0}]},
{GrayLevel[0], RectangleBox[{-0.305, 0}, {-0.295, 0}]},
{GrayLevel[0], RectangleBox[{-0.295, 0}, {-0.285, 0}]},
{GrayLevel[0], RectangleBox[{-0.28500000000000003`, 0}, {-0.275, 0}]},
{GrayLevel[0], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{GrayLevel[0], RectangleBox[{-0.265, 0}, {-0.255, 0}]},
{GrayLevel[0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{GrayLevel[0], RectangleBox[{-0.245, 0}, {-0.235, 0}]},
{GrayLevel[0], RectangleBox[{-0.23500000000000001`, 0}, {-0.225, 0}]},
{GrayLevel[0], RectangleBox[{-0.225, 0}, {-0.215, 0}]},
{GrayLevel[0], RectangleBox[{-0.215, 0}, {-0.205, 0}]},
{GrayLevel[0], RectangleBox[{-0.20500000000000002`, 0}, {-0.195, 0}]},
{GrayLevel[0], RectangleBox[{-0.195, 0}, {-0.185, 0}]},
{GrayLevel[0], RectangleBox[{-0.185, 0}, {-0.175, 0}]},
{GrayLevel[0], RectangleBox[{-0.17500000000000002`, 0}, {-0.165, 0}]},
{GrayLevel[0], RectangleBox[{-0.165, 0}, {-0.155, 0}]},
{GrayLevel[0], RectangleBox[{-0.155, 0}, {-0.145, 0}]},
{GrayLevel[0], RectangleBox[{-0.14500000000000002`, 0}, {-0.135, 0}]},
{GrayLevel[0], RectangleBox[{-0.135, 0}, {-0.125, 0}]},
{GrayLevel[0], RectangleBox[{-0.125, 0}, {-0.11499999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{-0.115, 0}, {-0.105, 0}]},
{GrayLevel[0], RectangleBox[{-0.10500000000000001`, 0}, {-0.095, 0}]},
{GrayLevel[0], RectangleBox[{-0.095, 0}, {-0.08499999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.085, 0}, {-0.075, 0}]},
{GrayLevel[0], RectangleBox[{-0.07500000000000001, 0}, {-0.065, 0}]},
{GrayLevel[0], RectangleBox[{-0.065, 0}, {-0.055, 0}]},
{GrayLevel[0], RectangleBox[{-0.055, 0}, {-0.045000000000000005`, 1}]},
{GrayLevel[0], RectangleBox[{-0.045, 0}, {-0.035, 12}]},
{GrayLevel[0],
RectangleBox[{-0.034999999999999996`, 0}, \
{-0.024999999999999998`, 125}]},
{GrayLevel[0], RectangleBox[{-0.025, 0}, {-0.015, 653}]},
{GrayLevel[0], RectangleBox[{-0.015, 0}, {-0.005, 986}]},
{GrayLevel[0], RectangleBox[{-0.005, 0}, {0.005, 564}]},
{GrayLevel[0], RectangleBox[{0.005, 0}, {0.015, 139}]},
{GrayLevel[0], RectangleBox[{0.015, 0}, {0.025, 5}]},
{GrayLevel[0],
RectangleBox[{0.024999999999999998`, 0}, {0.034999999999999996`, 0}]},
{GrayLevel[0], RectangleBox[{0.035, 0}, {0.045, 0}]},
{GrayLevel[0], RectangleBox[{0.045000000000000005`, 0}, {0.055, 0}]},
{GrayLevel[0], RectangleBox[{0.055, 0}, {0.065, 0}]},
{GrayLevel[0], RectangleBox[{0.065, 0}, {0.07500000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.075, 0}, {0.085, 0}]},
{GrayLevel[0], RectangleBox[{0.08499999999999999, 0}, {0.095, 0}]},
{GrayLevel[0], RectangleBox[{0.095, 0}, {0.10500000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{0.105, 0}, {0.115, 0}]},
{GrayLevel[0], RectangleBox[{0.11499999999999999`, 0}, {0.125, 0}]},
{GrayLevel[0], RectangleBox[{0.125, 0}, {0.135, 0}]},
{GrayLevel[0], RectangleBox[{0.135, 0}, {0.14500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.145, 0}, {0.155, 0}]},
{GrayLevel[0], RectangleBox[{0.155, 0}, {0.165, 0}]},
{GrayLevel[0], RectangleBox[{0.165, 0}, {0.17500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.175, 0}, {0.185, 0}]},
{GrayLevel[0], RectangleBox[{0.185, 0}, {0.195, 0}]},
{GrayLevel[0], RectangleBox[{0.195, 0}, {0.20500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.205, 0}, {0.215, 0}]},
{GrayLevel[0], RectangleBox[{0.215, 0}, {0.225, 0}]},
{GrayLevel[0], RectangleBox[{0.225, 0}, {0.23500000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{0.235, 0}, {0.245, 0}]},
{GrayLevel[0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{GrayLevel[0], RectangleBox[{0.255, 0}, {0.265, 0}]},
{GrayLevel[0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{GrayLevel[0], RectangleBox[{0.275, 0}, {0.28500000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{0.285, 0}, {0.295, 0}]},
{GrayLevel[0], RectangleBox[{0.295, 0}, {0.305, 0}]},
{GrayLevel[0], RectangleBox[{0.305, 0}, {0.315, 0}]},
{GrayLevel[0], RectangleBox[{0.315, 0}, {0.325, 0}]},
{GrayLevel[0], RectangleBox[{0.325, 0}, {0.335, 0}]},
{GrayLevel[0], RectangleBox[{0.335, 0}, {0.34500000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{0.345, 0}, {0.355, 0}]},
{GrayLevel[0], RectangleBox[{0.355, 0}, {0.365, 0}]},
{GrayLevel[0], RectangleBox[{0.365, 0}, {0.375, 0}]},
{GrayLevel[0], RectangleBox[{0.375, 0}, {0.385, 0}]},
{GrayLevel[0], RectangleBox[{0.385, 0}, {0.395, 0}]},
{GrayLevel[0], RectangleBox[{0.395, 0}, {0.405, 0}]},
{GrayLevel[0], RectangleBox[{0.40499999999999997`, 0}, {0.415, 0}]},
{GrayLevel[0], RectangleBox[{0.415, 0}, {0.425, 0}]},
{GrayLevel[0], RectangleBox[{0.425, 0}, {0.435, 0}]},
{GrayLevel[0], RectangleBox[{0.435, 0}, {0.445, 0}]},
{GrayLevel[0], RectangleBox[{0.445, 0}, {0.455, 0}]},
{GrayLevel[0], RectangleBox[{0.455, 0}, {0.465, 0}]},
{GrayLevel[0], RectangleBox[{0.46499999999999997`, 0}, {0.475, 0}]},
{GrayLevel[0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{GrayLevel[0], RectangleBox[{0.485, 0}, {0.495, 0}]},
{GrayLevel[0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{GrayLevel[0], RectangleBox[{0.505, 0}, {0.515, 0}]},
{GrayLevel[0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{GrayLevel[0], RectangleBox[{0.525, 0}, {0.535, 0}]},
{GrayLevel[0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{GrayLevel[0], RectangleBox[{0.545, 0}, {0.555, 0}]},
{GrayLevel[0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.565, 0}, {0.575, 0}]},
{GrayLevel[0], RectangleBox[{0.575, 0}, {0.585, 0}]},
{GrayLevel[0], RectangleBox[{0.585, 0}, {0.595, 0}]},
{GrayLevel[0], RectangleBox[{0.595, 0}, {0.605, 0}]},
{GrayLevel[0], RectangleBox[{0.605, 0}, {0.615, 0}]},
{GrayLevel[0], RectangleBox[{0.615, 0}, {0.625, 0}]},
{GrayLevel[0], RectangleBox[{0.625, 0}, {0.635, 0}]},
{GrayLevel[0], RectangleBox[{0.635, 0}, {0.645, 0}]},
{GrayLevel[0], RectangleBox[{0.645, 0}, {0.655, 0}]},
{GrayLevel[0], RectangleBox[{0.655, 0}, {0.665, 0}]},
{GrayLevel[0], RectangleBox[{0.665, 0}, {0.675, 0}]},
{GrayLevel[0], RectangleBox[{0.675, 0}, {0.685, 0}]},
{GrayLevel[0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{GrayLevel[0], RectangleBox[{0.695, 0}, {0.705, 0}]},
{GrayLevel[0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{GrayLevel[0], RectangleBox[{0.715, 0}, {0.725, 0}]},
{GrayLevel[0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{GrayLevel[0], RectangleBox[{0.735, 0}, {0.745, 0}]},
{GrayLevel[0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{GrayLevel[0], RectangleBox[{0.755, 0}, {0.765, 0}]},
{GrayLevel[0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{GrayLevel[0], RectangleBox[{0.775, 0}, {0.785, 0}]},
{GrayLevel[0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{GrayLevel[0], RectangleBox[{0.795, 0}, {0.805, 0}]},
{GrayLevel[0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.815, 0}, {0.825, 0}]},
{GrayLevel[0], RectangleBox[{0.825, 0}, {0.835, 0}]},
{GrayLevel[0], RectangleBox[{0.835, 0}, {0.845, 0}]},
{GrayLevel[0], RectangleBox[{0.845, 0}, {0.855, 0}]},
{GrayLevel[0], RectangleBox[{0.855, 0}, {0.865, 0}]},
{GrayLevel[0], RectangleBox[{0.865, 0}, {0.875, 0}]},
{GrayLevel[0], RectangleBox[{0.875, 0}, {0.885, 0}]},
{GrayLevel[0], RectangleBox[{0.885, 0}, {0.895, 0}]},
{GrayLevel[0], RectangleBox[{0.895, 0}, {0.905, 0}]},
{GrayLevel[0], RectangleBox[{0.905, 0}, {0.915, 0}]},
{GrayLevel[0], RectangleBox[{0.915, 0}, {0.925, 0}]},
{GrayLevel[0], RectangleBox[{0.925, 0}, {0.935, 0}]},
{GrayLevel[0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{GrayLevel[0], RectangleBox[{0.945, 0}, {0.955, 0}]},
{GrayLevel[0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{GrayLevel[0], RectangleBox[{0.965, 0}, {0.975, 0}]},
{GrayLevel[0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{GrayLevel[0], RectangleBox[{0.985, 0}, {0.995, 0}]},
{GrayLevel[0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{GrayLevel[0], RectangleBox[{1.0050000000000001`, 0}, {1.015, 0}]},
{GrayLevel[0], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{GrayLevel[0], RectangleBox[{1.0250000000000001`, 0}, {1.035, 0}]},
{GrayLevel[0], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{GrayLevel[0], RectangleBox[{1.0450000000000002`, 0}, {1.055, 0}]},
{GrayLevel[0], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{GrayLevel[0], RectangleBox[{1.0650000000000002`, 0}, {1.075, 0}]},
{GrayLevel[0], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{GrayLevel[0], RectangleBox[{1.0850000000000002`, 0}, {1.095, 0}]},
{GrayLevel[0], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{GrayLevel[0], RectangleBox[{1.1050000000000002`, 0}, {1.115, 0}]},
{GrayLevel[0], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{GrayLevel[0], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.135, 0}, {1.1449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.155, 0}, {1.1649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.175, 0}, {1.1849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.195, 0}, {1.2049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.215, 0}, {1.2249999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.235, 0}, {1.2449999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{GrayLevel[0], RectangleBox[{1.2550000000000001`, 0}, {1.265, 0}]},
{GrayLevel[0], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{GrayLevel[0], RectangleBox[{1.2750000000000001`, 0}, {1.285, 0}]},
{GrayLevel[0], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{GrayLevel[0], RectangleBox[{1.2950000000000002`, 0}, {1.305, 0}]},
{GrayLevel[0], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{GrayLevel[0], RectangleBox[{1.3150000000000002`, 0}, {1.325, 0}]},
{GrayLevel[0], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{GrayLevel[0], RectangleBox[{1.3350000000000002`, 0}, {1.345, 0}]},
{GrayLevel[0], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{GrayLevel[0], RectangleBox[{1.3550000000000002`, 0}, {1.365, 0}]},
{GrayLevel[0], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{GrayLevel[0], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.385, 0}, {1.3949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.405, 0}, {1.4149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.425, 0}, {1.4349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.445, 0}, {1.4549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.465, 0}, {1.4749999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.485, 0}, {1.4949999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{GrayLevel[0], RectangleBox[{1.5050000000000001`, 0}, {1.515, 0}]},
{GrayLevel[0], RectangleBox[{1.5150000000000001`, 0}, {1.525, 0}]},
{GrayLevel[0], RectangleBox[{1.5250000000000001`, 0}, {1.535, 0}]},
{GrayLevel[0], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{GrayLevel[0], RectangleBox[{1.5450000000000002`, 0}, {1.555, 0}]},
{GrayLevel[0], RectangleBox[{1.5550000000000002`, 0}, {1.565, 0}]},
{GrayLevel[0], RectangleBox[{1.5650000000000002`, 0}, {1.575, 0}]},
{GrayLevel[0], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{GrayLevel[0], RectangleBox[{1.5850000000000002`, 0}, {1.595, 0}]},
{GrayLevel[0], RectangleBox[{1.5950000000000002`, 0}, {1.605, 0}]},
{GrayLevel[0], RectangleBox[{1.6050000000000002`, 0}, {1.615, 0}]},
{GrayLevel[0], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{GrayLevel[0], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.635, 0}, {1.6449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.645, 0}, {1.6549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.655, 0}, {1.6649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.675, 0}, {1.6849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.685, 0}, {1.6949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.695, 0}, {1.7049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.715, 0}, {1.7249999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.725, 0}, {1.7349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.735, 0}, {1.7449999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{GrayLevel[0], RectangleBox[{1.7550000000000001`, 0}, {1.765, 0}]},
{GrayLevel[0], RectangleBox[{1.7650000000000001`, 0}, {1.775, 0}]},
{GrayLevel[0], RectangleBox[{1.7750000000000001`, 0}, {1.785, 0}]},
{GrayLevel[0], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{GrayLevel[0], RectangleBox[{1.7950000000000002`, 0}, {1.805, 0}]},
{GrayLevel[0], RectangleBox[{1.8050000000000002`, 0}, {1.815, 0}]},
{GrayLevel[0], RectangleBox[{1.8150000000000002`, 0}, {1.825, 0}]},
{GrayLevel[0], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{GrayLevel[0], RectangleBox[{1.8350000000000002`, 0}, {1.845, 0}]},
{GrayLevel[0], RectangleBox[{1.8450000000000002`, 0}, {1.855, 0}]},
{GrayLevel[0], RectangleBox[{1.8550000000000002`, 0}, {1.865, 0}]},
{GrayLevel[0], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{GrayLevel[0], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.885, 0}, {1.8949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.895, 0}, {1.9049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.905, 0}, {1.9149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.925, 0}, {1.9349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.935, 0}, {1.9449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.945, 0}, {1.9549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.965, 0}, {1.9749999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.975, 0}, {1.9849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.985, 0}, {1.9949999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.995, 0}, {2.005, 0}]}}, {{}, {},
{GrayLevel[0], Thickness[Tiny], LineBox[CompressedData["
1:eJwt13c4lt//AHAZyYj0CU2rMqPs8OEcikp2g0KoUIiSjE+yesjMk5Wy75si
eyXzWE92ZiQpMtIgQj2E53e+1/X7477u6/XXue/rvKfoZTcze2YmJqZ5/Pzv
LQcEvjEYDCQwXM+dOUyBbiv7Q1dWGaglaK7f+yMFFpXKiy8uM9BmDqcdxhMU
qCBpeHn6OwOFMXRYmGYpUJWP8r5ziIG0Txo9u80UDOHEQvuTQgY610q7SUgE
Q7MHXbmKNgwkW/s1XtQrGHp1U2441m2gimDLoMbdIXBggOtbg9060gtiV/gY
+wDuq3fbobp3De10uTUYzRcGy52b2XhHV9HR2U/eXVnh0DZSfn44aAWddTC0
jA2IhPSYu6EI0FFQz3k3eduHkOT5uCtx/Dc6NmGbqnGKCpP15d37w5YRe4Xs
zO/bj2CQi5231KkllBrlUdOWFgPvsrzwcp/9hUrQO2rMWiy0C+g+MJi9gJRN
L1m4WcTD+NqpxGSnefQgY+lzUUMCrPokyZ0nNocqI6ReEpcS4f5tUOds6nc0
GmYxOTn/BJZIhzp9nphBr9Y3OHJKkuAnWrGIiso0Opb7pdrgdgqcOhSvgF5O
oEo/y0SOHWmQzy9HRW7TOMqIUBnItE+Hh1R+Hspa/IB2jqinlItnwPvHZ3sq
vYcQ+rju7j2RARtP/jBWujKEil5KZUtOZ0Amw+9vCgyHUBW3q8DQTAb0Pfe1
kxQbQrsXryXIzWVAT4ep1qjOQeTjeXG2hZ4Br4WO1tuJDCLIkNAhthLQoLOr
iKN1AI3lEitflAkY3tN5mFIygJbarj60PErA1oGOgo3kARTN6iPUpU5A3dG2
vMVbA6jYlUPqBSCg1hwte3TPAJp4yld6+hQBj2yrSy9260dsq6V/pK0IyH+2
gHpBsA+xbXl+0TCAgCXiEVW6LH1IyuqBvnkQAU1WHCflf/YiEe9qXRsKPj9V
9ChnSy9a6LSzuB5KwI2ZuE9Vnr3ojVb+a3sqAafv3ZXbO9iDzCZDwjfSCOhq
/CixVqobRXt0rGfVEjB7Sf9H/KZu1CPaRrgiAn5+wgpdh98gSia/hHIDAc9P
en0RCnuDPqZdaa1uJiDwuaQSMNOFnDsfnSrsIOA2UmZA53knGiqXl5Qbxt/7
m8bbeqAdiYvm5AT9IuDDF0Sj1kobeivrpnBwiYDOl/zvlHe1IbHNKdy0ZQIe
eH10hPBsQ775VwrX6ARMiM99dq+1FTlze4ecZhDwP6VHmoouLeixnSN04CLh
+Zkb8zmwBY1eX1ce5SahYrI+KcLfgrabVzuY8pDwBwsrB0/da2TP6+Qhz0fC
S/2eAzO8r9HKouzeHgES6rhbOaeWNqP+qNjAEFESComrCfGHNqPzPdrUHjES
/h3m742wakZbJ7leCx4gYZl2t4oPWzMq+q5NpIiTUJxPh/mseRO6SxtbC5Eh
IWeRxBOOvw3IS1YLdiuRcPoKq0FAdwNapn48+l2ZhE2C4xu/yQZ0XOanHqsq
CX39n16dNGhAItAwTVaNhHNGW4+g1Hp0wnvTQWtNEmaNTEV9pdShAI0veXK6
JHzvK5CWoliHyvI/zXDpkZBH6ESR6edaRLWZjpzG9rTN7qsEtWiecYYz7iQJ
9aacBMNXq9HycmJL92kS/heSJKmVU41M6aNHEg1IWCDRqfbLvBrduNm7Zm1I
QkEnWauL5VXIYItG1bgRCWfmfqZL36xEZy72VLaZknAvVaTko1AlMtqpIHHP
jIQm8qZNMV2v0BExx1+yZ0j46nbJ1Kr0KxToxpb+4CwJw+ge0h1TL1HBNuLk
HnMSSjOvljpblqFMvrcXmyzxfZDSNGHOMiTDk2tvYEXCmOOWg/2vSpFruPLr
PuzVkBq6hkApMhnODRmyJmEHl78md28xevPLfaXehoRM+YVG9f7FyHRE4ZmS
LQmVjMZsPOSKUWi3Y1YWdjJVO+hDRBFSHKl64m9HwnfSWx5eiCpAs7InTP65
QkJ443pRw7d89KlmPOQWdnZhe5/UyXzE/l5raxe2j1KU4CpzHrqWw7fF9yoJ
P3vOqV22zUXTV5bvdmPrVxpbtde+QF01Xloi9iTcrbU946l3Dvo0Y1BQiR0U
cLuJeTAbTRHClswOJPzeODDlpJiNStqp505i15x4LK0x9wxFDzoodGIfCKcb
kKefIdoj6x2cjiSM7LzgxpWThQ5fFzimi21turds5EomyhzgDCnF/rG4rHan
mUQftDrTprB9E7oRz0EStUgHivBfIyG3Wo5udjCBkp1YtuhgJ48EdWhPZ6Du
L3LnXbAP+VmZjuhloCfp45xx2NUiKkMez9OR8Iu/Byuxyzr6aMa9qajQff7h
X+yBbSG9QTEpqLgj/sPO6yRcPKc2Wn4mGd17oUpVxN6e9GNmZkcSosXX55zG
VhhLW9oz+AT9ktknZYdtevAMk/HjRATE/uXxwL7ptJk7yOIxytXjuUDBphZW
CpbvSkDv74VwxGAXLrnsn3kfh3ppT4RTsN+oiRzekxyLeBVAUhb2nF+/upF1
DGLMu/nmYm9tDtELFHqENE5INBVgW2z3yLyGotHOmMtuhdiPk99Xv9GOQtV6
ooH52IPi2v1KzeHIe/EqPRt7R/Hzb0/1QtGopvzbDOwzGjzMm9qC0e2JCMFE
7Biaxy7H0/dRcZUvisDuMR450tUVgNqKtnb5YguV3ac6pPuiqE596Iyd1GqC
FLK8kKqMzi5z7J2j++Y2ctyRDjOrBcSWmXirlmDtjCZTiTVxbHHum4/lHO0Q
1V6BnQs7YEByYE+TITrR1+b143/3xTvqxCarBBa9Ao06sAcXgtK20S0AYPKI
eI49byzxy83dAXTL1MkFYt+N1Wt3VroJ/unzO2qBveHnk5R2+A4QGxvMPoQd
4JTn0i/9H7C48NV/A8dPk0jYg5RtQcBt88Dlp9iUBLGbqg8p4F3emutVbD3u
GotergdgHxHwWQa79c+cFBt7JGCBZkylOH4dHaUdXm7EAH/ex3sJHP8nxbwu
3teMAzqXNl83x5YcbTIy8Y0H9/w9hTixv5lZq35beQzsz5yhOeJ8ctGibhFa
TgY0/1OcrDj/DFc+rH1TTAUWB/9mZV4moVyZ1EKFexo4az+Up4NNjxv/IUlP
BwZZp9c9cX5Xct5923iHBF9U1Ur+Vx/SZfn7C8UywfM67iod7BCTwp7k7kxg
u2pW3XCJhGcTJjo8pZ6B2DrhvJe4vsyLGjRKj2aDkpSis764Pg0dn0aC4Tkg
SX1NefoiCescA2pZVV+A3qT+HYbYEfllrz5Sc8GXHY5dfBfw/antK4w5XgA+
+Aare53H+WdVkee/UAD2XgnY2XYO54uf6QuX1EKwGtFLF8S2/dxott+3CNz4
y9uUh+unnOQfw/W3xaB24DW1xISEbaU2x4vDygA9XKfosD4J/6UdapIYKwMj
b+TZzU6RsGhwRTtVpRyk7eB3uYXrfcJKLIiYKAc5e9cuP8f94CpoVbfXrADq
XrV753VIyGg/Ir9roRLoVv1DWVYnofLnTUKBFgjU/b7YMiiJz68yXziSg4DZ
gm55sQT+n5j85rEVBHb/cZUNx/2OKyNPOd2wHmy0HahXxP1wzcTiA2OuHnTv
Ew+7LkzC0aJCKSTfCIpnXf1t+UmYdvNSs2ZFM5j0GWO7j/t3shVHQfynZrC7
RVuMb4OAiSfLHs+y00Bat8vX5DUCUkU4nVMsaEBNKNU3f4WAAT3lfOsrNHDA
TnmwZJGAdke22tT82wJerlhfMP5CwP3z1SvqjW3gK08J67tOAvp2HaMszbaB
qM2eifR2Ag6+6OAp2NUOnjfoJwu04fnIfmS/6K12oHe7aVWfRsD596uG7CId
4E5ksnY8nn/qaGpE/71O4JHXcKs4n4AXkyr0XdS6gRhjNHhHJAFPkcNdRhZ9
4KqO8G08AsD54AIH2o0+0CybEhKI57nEa/cZGvf7wJjSyxh+TQLOyMrKSxX0
AY5hxWRVPA+GvgqIY2HtB0zKY9lX5PB82CVh+aqwH5g/9DC23k3AE/Q7M6Ls
bwF/tJ7E5HwG1DXczrJcPgT8jv8xykvMgNE2QwFHKj6AB//dadOeTIctRvu2
mmwfBx6VoMWTNx3OivL79T2dAH6arApn/VLhHQ8Zu2iBadDbux7p9DEZDn3Y
ZubQOgPKcrTZA/cmQVuff7+wG3wHviG+8vqBT2CTjGp4E9sckGQ14pvuewzF
OWpmMk/Og7ipcRGzMwlwX42zLlvoAuBVSi5+ORcHmVaZc9w//wKCqYoP2e/H
wj+mtZdoB5fAsuPhhBrdGDiiZLPnIGUZnMu7LtXB9gjeNN/GJ/bhN4g/n1mu
8Toa7oqbtGDdRwfjF+kCY91RsMAy/fmi9wqY5E0LPfYuAppr+p9srV0Fw6HN
0UfFw2HxpRti6mt/wfXmTYkqyaGQznmMpfLcOgiWTFd14HsAzXo1VPYlbgD1
ycKsE7XBkFODq6EmZQNIhG99FFsRDBsy35+2IjcAGep7c7w4GB7x9rFLKtgA
Dx3zt9x/Fgx5hCsid9E2ABGnGT4aHQzbXBQm+H9tAOGJAfmfl/F+tkWKymPA
AIKdOnsCOIMh/RZ9d4EpA+w85yvBwRYMC0dasgzNGUAbCPPFMShQqNChOvIy
A/i9HvYpXKLAtXOZ05w+DEBjr4xaw/thBSmsyf6MAaKpoQd+llKg69afLc9y
GeD2un1ZfAEFinvVmekVM8Dz2WcCWjkUGKdvfS24hgFYRJ8Yx6VSoPvC01iW
fgaI+qYQcD6MAqUtnYTIdwzwdY8wlYtCgePNajk6HxnArZ3h0uhHgSaJ7+oC
vzJA5j/fw5U9KHALc/Yp0Z8M4Oya3L7gSoHI2WugfokBUl5HDxRep0DPt3o2
tqsM0Mi8K9vtKgX+/74LErUij8vbUOD/ATdIm9Q=
"]]}}, {{}, {},
{GrayLevel[0], Thickness[Tiny],
LineBox[{{0., 0.}, {0., 2500.171271275779}}]}}, {{}, {},
{GrayLevel[0], Thickness[Large], LineBox[CompressedData["
1:eJw113k0Vtv7AHBRV4aEwlXIUDJlSqLS3hqQIpShTKnQNSev11SERBMZIrNz
zJkjs22eZZ6pG5FUhkII73fftX6/P84667PWs/Y5a6/nefazhW466lnS09HR
beLnv7c04J6l0WioSuc9tfkQBTquiQSurdNQu5U3196jFJj3Vk701zINsZjZ
rVhCCpQX07o5/Y2GWi7JPuYzpsDjHP4j7YM01KdP7OwPoUA4udj6OpeG1uOb
M1w2KVDvccebo+Y0ZHZ6QZA66gqpnf721lVb6DkXsa0t0w329bHM1lhson0d
VOW1RS/IX+249zjfBjqpwVKdme8Di2zrd+weX0dDZ8t2t3H5wRvP5BaGfdfQ
g79NXmTPPoKroZ6BCKyi9rvB6ZONgZBk+8Ab9WkFafUk+izxPoOxmnLOvUHL
qFJImKk/NBj62lm4iV9YQsnTIzoDXi+hJ0Mm1fnHT8TkSSsjrMOghU/nwYH0
RSQYB1uaTkfAiMqpqFibBVT1XCb+3z2RsOyjGGuW8BySTnhjUs35GoqwwzNX
478h6luupC+z0bBAItBmYnIGSfMeA7IfYuHHhnxBRcVp9OgfU4Oqt/FwSipC
Hr2bRLJXeszYxBIhx4MMReltn5BQ4z+O35YToZTivFTKrzGkkBHmyUAkQStp
b+/S8TEU4y7BUZWcBBNEd/d0NI2hM4tZdNS0JMjJI0NdiRlD/D4TXyezkuDv
3w416ufG0M1SsfaM4iRYWzqnPxs+isJkbjJPtSdBI5W5BzKKIyjlz2fDPStJ
0O/cj65St0GklpYvLHiWgLUa3y8r3BpEkt2O783PE5BO69v7HK1B1P/lc26c
OgG99L+2k8KDCMqwcuy9REBXq6nm5+0DiD6OW+nbVQLeCRyvthAcQAx67O5n
rAh4qb0jj6m5D+10vzYR/JiAT7raZfwL+pDHYN10eBABm/vacrZi+5BRZhZz
1FMCnh9vyfp1tw/F3zfMiQom4Om5hvTx/X0o2rBWzy+SgLLsVYn5jr3IylbX
ezOVgFxXc0Ku8fQgy8Fluof1BCwQfVp2nqEHOa3cOSbRSECdNevPcvPdKHHx
6rvuJvz9eCEl5qZudORXXsz+NgJuzYR/LHPtRl6q579EdxNw+r6nNN9AF4px
aORV/0BAh8svoyrFO1HC9N56vRUCpi9pfo/Y1ol+nXyfXP+bgBOvt0OH4ffI
8m5+ncIaAQ0+U78IBL1HU/kXy3ZvEBC4myn6zHQgKWM177xtJGQnJfvOpLWj
sDtpu+JYSViw0rC7+WArYk8r8TkgRMIXmUTt6bUW9O4hJcVZmIS2Zt6Uoo4W
5Gc8lFknQsKDjUqjhGsL+nyuTt9clISvIt6k3m9uRs7cFQfuS5LQQ+GlylG7
JtTYQxPWO0ZCgxn7hQzYhB7aRvD7KZLwaKwmKcjVhLbdWljMP07C7wzbmdiq
GtGQoaEo0wkSmvW69s3sbkTx8iUFcadJeMbZxDb+bT3K7o6jN1cnoYCosgBX
YD2y7rxtY69Bwj/DXN1PTeqRKWNLivsFEhaqdiq676hH8jmrEU8vklCU4wz9
VcM6RG1l1ou4TELmvMOvmf7UoC/a3N+BIQlTRqeef/WvQsqK+dbzt0k44sWd
EHe0CrG9Fb6TaUlCNgH1PN2JSqQo1ehxy4qErjfSe0pBJfpTVN/faU1CtSkb
nifr5chv/I3JSxsSzszNJ0o4lSIRXUufYkcS8oUIFnwQKEWaT3mfXnEioY6c
bl1oRwly0m1J/oFdcq9gal2iBKnK3dzO50zCoFUXibapd2gkPdDRwoWEEvTr
b22NC5HD9K6uF254f0iJhgPMhWjq2WoRizsJQ88ZD/SWvEVS8irpAdjrARWr
J7nfoi+hMN/Vg4RtLN4qrN35SFrtvC7wIiFddq52tXc+krHgeJWFraD9r7mL
dD4yXhGY5rlPwtgQVd+xp3lon+f9tBnsIYmdL649z0G3bn964+xNQmj/T17N
bDb6lKat3oWdntvaI66RjXpDmX9I+pDQXeE5zzp9FjI9Qmc4jr3vNGdStFsG
+niMjhDzJaGvz706+oF0pH1l45kr9rfavimbo+lomcvjYS12hXqkxMm5VOR/
ISHgqh8JTXX5CkdvJaM9PfK0G/44X34tK1PqSZRUu0aLw/Z61YnYDpFovlaK
fxg7dtS3TXU6Cck3hmZdeERCqQcmuqNqSeg3R4qAN3a5oOKgS1oikqN9yirA
LmzrabjcHY8UryXy7w0gYR97QLdvaBxiureD7gz2L33l8aIrscg20GTLHlv+
34Sl/QOvUQlzjnY1tu6hK3SXI6NQeVBI4jS2k81frL5GkeiJ2DE2lsckzF2y
E5kZCUchy9GntLHfKwvK7I8NQ5kxGpt22HMPek9om4aim7ovh4Owd9UHqD0U
eIniCuy6k7GNOF2S76BgxD3T87kSOzJ2pPy96nN0Pa1iTz/2gKhqr0L9E9Qh
L2I2i703P202Wi0Q5V6jq9/EvnKSjX5byyN0wE37/O5AnC8NLrzWF/0QH3Xn
hAB21+VR2Y4OHxTYLh4thS1Q6BdileiFjnjm2CthxzTrIPkUKirhDDM5g/33
OP/cVoYzqs/ts9LElpzsV35laot6/jg908EWZXWKlLa2QFeOWHVcxfbpE+vb
X6eFkhjfihtiS+0et9lxRAHsGDVI+s8Di74J7KtG4J2/roIB9sLlwz8dna3A
oAM5oYftGabWaqvgBDxCtLK0sLceuMckyFBAjL3uS7X/1rfJsuuV8ACiPPkv
VbAZDD6qMIp6g3kJx2x57DrBoMdx7L6gqPfF50PY/q+EnY6/8AeCLXuO82Cr
sVYYdbM8Bugyfcpf2Iy++qq2QUGAQdlcegnvX/PvOfEdjM+A6qRM70fsJ/aB
nAn+L0C2skdYC3bqYsh9vochwKjwnGM+trW1hNW7rVAw+87V3RNbQ5h63U8l
HIjO/0gzxRYbr9PW8YoAIGv7TxXsWT3T47NrkcBHWHF4FedP665MyWKl10Dr
523XXuw3zSsH/KnRQMnFWCYL2+50yE6B5ViQ09SxZIittTa2MXs0HoRx3dwm
iS1dKL5Y7JwATrHNi2/g/F4N//RdbDURRDBIdEZhlzJ79tdSSHBoqM62HNdL
4hGu3lzhZLDJFSvhgR2gk9sV25kM9mbcyFPEvvpqss1VPBUMTLBwZOB6XBC6
VCsxng5aCxLF7+F6HTw3jXieZAB+w2fCgthV1j6V249ngpCj8pOtD0n4NLuw
5EPIGxAwJ1TBiy2qzJ8bei4HmGksdsbi/sFqUpzlvZgD5k4wMSth/3qgm2kX
nwsONA2zdj8g4Y2JWj0Rrzwgc1LefgP3I2mx31qb/flAvrolVgn3r5a35ufy
gwoBz4L+iBruj6capOoO/1sI9nzhL6iikjBvYE01XrEIIAEpfQXsV2th4Olk
EVBlGt7825WEt0HzCUuVYjDQ/v5D0z0S0lpl5XgXS8H2Qw6sFQ4kdB7bzA1W
LwMu52/msWNP/2iV/iu+DCidmhW+ZU/CdnZLqV+a5UDlIOmyzY6E0QavD3ck
V4DH6Te6Rf4h4bGJbQIPjRBIAe/SaDfx/5cZLspmINCLdKUAtmhodv2/awgs
8Pu3eVmQkCUp61iiVjVofxx+/ac5CTd0jMZoc9WAr6SvptGEhON5ueJIrhaQ
guKzew1ImOBkVq9SXA/mKxr+0cDnY6wJU07Ex3pQZh1dflGNhFEahZE/GBsA
d8BFWa3zJAwRZLaNM2oAcxZOfppncf10FXFsrjUAjfQDw9KAhBayu8wrTjUB
57t5AfH4vBZZKF87UdsCDJh9JPkO4n7bcdZ/6UcLmBi4B1rxfDCQ2caWw9sK
zLKVZFzx/PDEclRE6G4rSOxiSW4SwPkysq7FKNgGGpzH5nV4cX40KBO999tB
cG2Sx+YuEl6PKda0U+4E69EJ/TXLBCx0A/2HLDuBnuT3q1JLBGQzaDL/GNIJ
XrFyVYf/JGAN+6CL3kwn4MiQNDGfJ+Des56XYy92gYbMT2WjMwT0LIl2913v
AsfNroTcHSXgBXK4Q9uoB9h5OWVzIQIuPMqxarDvAWUoxEK9koBRd/xoJ/16
QL/+hCi1nIAzR47Iief0gH2Knl+6igkYWOITzrC9F1zYo6trn4fnxY7DxiW5
veB63tRlzSQCqq9SZoQY+wF34Ndrrx/i+VGLk2G5aBCcGpT0zztFwBcWTItr
LYPAMlixKPQEAYcodB+3xgfB4eVKk3tKBLSJnyvb+dcQME8lOWQVcPx8qzOf
wRBw+vlIJFISx7/0mzi7MgQ29lQ68O3D8QNLNaGKIyDFnWueEc/PweaDPrLF
Y8A666xIQEYSbNLm36XD+Qn0BH23415MhD+EuB70RE+C9pFcrjLZREhxkbQI
5p4GF3SPvmltjoeDY+x6Vs0zQPQNpxhlMRbecD/1hfHSNxCRHLIYLBoD6ySP
P6nbMQe8UnKm9oi9hqJMFTPJGgugVbqw8bBaJOSvsD2/I3AR6H+Pk/vqEAHp
1ukznCd+ArrfVTZ21DD4W7fSrOHQEig//JzzT/ZLOKpgvv+Q/zK4u3Vr40dS
MHQyZOcQHlsBXcHXUrMPP4O84Z+NtvOvAh1n9VMFfwfBHOPEtF9ua2DfdfHd
V+gCoKGKt0Zz5TpYMD36OO+qH8w3sxc+sfEHdI2JPQj77gNXmc8ylOpvgmto
pY1x332o131SkT9qC1DYPjP95nOHzCdZairitoBpvX71PlZ3WJM8ctGE3AJ8
JqUFan/coKybu0VMzhYwuff+fPGwG2Q7UPyMt2ELSC8zbK2/coMtdvKTXD+3
gNSN264se9wg3CkewnaJBmYOhuxT46DC1bur+3J0aYDqlerhsI0Kc0ebUrQM
aaBdM2Q6ftEVCuRalT+7SQO2PEajPD2ucEM/eZrZnQY6w1OYbcJcYTF5QIUx
lQa0s9OYXvC4Qodd802pb2igaNbZXHGnKxSlVump5dMAg4Ro6vQqBYZrmt55
VEEDnE0XaWYjFOi8GB3G0EsDen9u5+bEUaCEsY0AOUQDymtaxq9eUOCneuWM
Mx9o4GIN3ewjbwrUiRqqeviVBnoCw9O9LChwJ336BaF5GsjtHO7z06NAZEvt
q16igch7+WOhZynQtV/N/MY6DZh4XajKUKDA/7u/g/+/v/8PlloAuQ==
"]]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->{True, False},
Frame->True,
FrameTicks->False]], "Output",
CellChangeTimes->{{3.66259818351793*^9, 3.6625981898543987`*^9},
3.662598239810951*^9, 3.662598347829685*^9, {3.6625983917715483`*^9,
3.662598417762067*^9}, {3.6625984636023073`*^9, 3.662598493038002*^9}, {
3.6625985669371643`*^9, 3.662598574157655*^9}, {3.663807755468377*^9,
3.663807773896284*^9}}]
}, Open ]],
Cell["\<\
From the ESS calculations for a single species with \[Beta] = 0 :
{u1 -> 0.`, Km -> 6266.5706865775`}\
\>", "Text",
CellChangeTimes->{{3.663806887418069*^9, 3.66380692245322*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",", "u", ",", "tryKm"}],
"]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "0.7"}], ",", "1.5"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{", "None", "}"}]}], ",",
RowBox[{"Filling", "\[Rule]", "Bottom"}], ",",
RowBox[{"FillingStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"GrayLevel", "[", "0.8", "]"}], "}"}]}], ",",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",",
RowBox[{"{",
RowBox[{"0", ",", "maxheight"}], "}"}]}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",",
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",", "0", ",", "tryKm"}],
"]"}]}], "}"}]}], "}"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Black", ",", "Thin"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Axes", "\[Rule]",
RowBox[{"{",
RowBox[{"False", ",", "False"}], "}"}]}], ",",
RowBox[{"Ticks", "\[Rule]", "None"}], ",",
RowBox[{"AspectRatio", "\[Rule]",
RowBox[{"100", "/", "408"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.6625990392524347`*^9, 3.6625991182736807`*^9}, {
3.662599742489361*^9, 3.662599797768262*^9}, {3.662600227309654*^9,
3.662600235495182*^9}, {3.662600636715523*^9, 3.6626006574723177`*^9}, {
3.6626007550573053`*^9, 3.6626007633197927`*^9}, {3.662600810103195*^9,
3.66260092853878*^9}, {3.662600994952506*^9, 3.662601020830427*^9}, {
3.662602129587813*^9, 3.662602129978712*^9}, {3.662602228711524*^9,
3.662602228781869*^9}, {3.662602321461495*^9, 3.6626024255520983`*^9},
3.662602463407353*^9, {3.663807115104044*^9, 3.663807132585802*^9}, {
3.663807192327776*^9, 3.663807194391363*^9}}],
Cell[BoxData[
GraphicsBox[{GraphicsComplexBox[CompressedData["
1:eJw1Vwk0lVsbFlcoCqlIiYhu0ZUMJdq7m0PmMWSIZCyEkLE4Isc8FjKeDxmS
KZxCG8lY5iROIi4q0kWOofh3a93/rPWts571rf0Oz/s8e+9PxOaGgR0zExPT
Jn5+/08Va+rY208h1iLGYlJiJuwN9FnJ/eMflCrRPawekAVrWLgED4VOoPC8
pD43hWxY+0ztKsfBT8hkmcUphsiGAd4vZpfRGGrh1FCWZs+B7l2nP5DCRlHy
RW+5l645UJz7vKQHGkEzHZ2tba05sO+ZoLNg/RAyYu0PtRWmwhU35+O9bW+R
iXu68bQrFV4K51AyZ+tHgk39XKJlVFjO5q1os60Hqb7jpj2fo0JKlyW7f1AH
ImtVKusIETC3AGVrsL9CpmThCQ0SAc3yguSOyLxA5Ly4FyV2GPtVGnMerESr
Yt7jTn4EHKqLnY27lY4Wtr8TdQojIH+KlJna4wSgbuw/Rr5HwEJPXm8X/VIw
kP/38c3bBGx1Vac7JNWCza5t8Y7XCXiYR3LmqtlLoL286B6iS8DVtCSmtCvt
YKZq9NKmOAHfc3Dx1Wh1A6l5DqmdP6hQxMK7bbdTH4gJM/R7XE+Flzv37DF0
eAskuT9KX/WhQuvha/x1MkOAl/usr/1fVDgzoprC/30Y7Llz/bz3WA709TKU
WJn5AJoC0j9whORAx3eUqmCTMZBYcf0t2+EcuBcyf7wwNA7iy+SG1GjZkIN6
tpXDYAIM1cdf+EstG37oH6BYV0yCL/OtUafKs2C1PsuAj/QUYNO8khxXkwnd
syJXxJOnQepNn1Gflgx4Y+rdSNfCDGjfIJ2r7k+HHr51qqdcvwDLb4PpFi0P
oQl9LVKh5ytAdh98HrWkQRjZa7qiOwfKQmmdCyWpkHMbM5Nu9Tfw9sq5HVV5
KXDHufWK7m3fQbpyvEJ1zgPITzQWmrZ/B663LlHb792Hu+aeRkv6/ws+3TtX
+So4GXJbesqNn1kAvpLDmcKOSbC0PbmOd3UBdNl8fbpsnAiB0KR0bOEi6MuT
SP1lngB7UzYcZx2XgNja641pvXhotE6KSRL8AWZ3HdJhsYyDvmbzCc86foAf
H3dsU5mOgdkfbc1R+DLgWV7vo69FQZoWGw+3IgMMPA9ov6scCRuoC4ubmwwg
lLiZeduSAul8NkRo1T/o7ccrmvPsWXD5W+6LLI03aME9cc8BNgLer40ZsGlu
RS+O8r8ZlyFgwS9kWcrdhFR7DmztMCbg8M59qmkFNHRoLIHvpDsB45zexX9X
KkLrAx/nWoMJGKTeLJZ4/yaym3jApR6O9ZqdFN9mmAsM5DfPONwlYIxRoWZs
ZhUgPKL5Ir0JqGJ75KtmQgPg6WYpS79MwJ3G1ksbli2Artcsk6REQKc+vYgj
Jq8BPw+5SGUnAesYAczsGQxAGgpSPqEZAa+MDa784JpCCfSFiTtdmVDyTptA
RWkX4ii9EVy+RoXcJO9vrofakaAa8zT9CAHF+8FmQNRLpG2e5mWpQ8A0szfK
V1xqkUdY7q9n2A/xD7p1m4TK0GZziYkb9ku6w9hw2pM4dFVs8G0J9pO9c/HZ
2cIM4D//ofws9pu72iUWgqgA8vHBUoL+mC9B7fd3LF6AvdrMD7WwX9NOqrqe
oDeDp+tbOa+oErC82oN0hd4BvPRN190FCah4qIkj6joDBBmNvmx7GQEPyDx6
bmzfgtgHZngscP9Hj8C68aQGZLK3tSYW87Pvlb1O/0QVksn5HsqP+dsgdt61
UMpFP7uG1N0wv27bV0VI0f7gVp5BrSLmnxzRz/KwrxA8ehZX8BPPp+jKaqJ/
Kg1U7Kqx0MXze6pY9NlkuRG8iPG7dsmEgGffKKyHdDGA3RLLZmM/BYqpxose
V5xC8oOq9wXKM6GampnaGZtuNE5hdVdbosLXHNfWPXvb0Ua/c12+KAH/qd/s
vqrRjKCh+OiMOgHXNvOfNXfXIeHKV4otjgRcDj9nOJ1ZjuTsFBbIAbh/XtrE
7sT7SILkVSSM+QVk59cCx1JA5Csp2UXM7wQ88VFSvBxkZnTWHAok4ClS5/DN
lTpwibXtgAuOZ33odLGGYDPQb4cZbJoEfFvAQvwS6gAKh1dqtUQI6Ftjy9Vl
wAA57KpeZKZIOLyc1mqxuxWReHfrlykQ8DMvU3SbQSMaq1xsbTQjoN812CGv
WoP0TNTUaTfxfhm2GJGv9Aip2+5glwkhYANb/1LrsC64r7t1jwnm13X3044T
ux6B0G66gQp+v9+89wbr/hqQNaWQy+xJwABdpy/6Ko0gS9belcucgIE2wxuv
qhhg65NyM6OdEfCSVm2KonIJ4lN4/4dMEAF/+vLkgqRQRKqzoXLj+KrHvEyt
knJATxnF0i6UgEw6wRICIk9B4+2J9BkfAso1HgvkVcpBH2KGi8j4/dJwMTUl
lgIMAuQ2FjGf9zcXlP5IeAy4JkxV4nD8TYVkxrlpBiDz1D70S6FAVt9vpzT0
ppC19/ut5tRMaHRMdPRObTeqH1R3YP2XCo/OTmxZOdKBvHvRqw1h7NdKq1Mm
hc2oQfvU9iw1rKe+xFvLQfWowBglnHXA+g9eG1i9XIGq821H/bEfKNOijoah
qUgjW12mA89Tkks7sex6Mjgap5UHcH3pygfeuDuUgRJNHeM92G9MZhEjLqp1
gHbPw2/eiYBNqRXq756/BGEde8Y1tAk4LfK6V7OhHeT++YDnmBg+75jld95Q
ZYDYGpbENaFIeOo9X9dH51bEk/7WTluOgBfYrX/Uljci/fEnBztNsZ+UpcId
GTVo4gKntp8HrsfHLqazrgAxv3b3IpMJyN1rqOUpb4VIQrKXL2L+J83EjgdW
4lLXN6yG8XzfmtRbalhWA6df5qe0vAg49r7ti87XBvAOvi54b4HnX1LM5FDI
AHecHcmnpSLgC2WpdKv6J6jcmiff+A7eD8Q+P37uE4m6qIfDJ3H/dW7/1BbJ
ZoMu88c5g3h+NA2X3ZdtKkHgkgCJDZ/vaRUZQQp1VGR9e255A/vbWHog9UBx
CFiZXyvYj+vjJF3N1pUpBh5a8lya2N+ZZPvVT8MMINxqOc1XTYFflbSshrIT
ESfpTaQzzmfAiGQN+ZIG6iUiozPwPGySg+8F1+Uh0YvRuYO4P0fnROHM8Bsg
pHi7nA6OX5d5U55idQdxFJHEZDDOybq5OHwrC+WUNNqu43oTQkOKd3nGAm4/
ldoGHN967uWP7EUGMOFr+3PRjwK9eTPOm5pPod6a2tmVtExonnHvz0Mz3SiY
lVfsyjwVmn0QDn1m1IG+kIoSHx3E+i2Jne0ZakYqXMnnvPF+yawUYRz7vh71
3ObQuWVPwC0bg7tZUAX6y3VJaQnzI9136ajHRhoKqOv+lYb7oRrUL69vTwLR
sgVONrielTO7VPjYy8CTTzKCUVhftpOfR67N1YJePeJ4yTUCel6cT8mIeAnO
/BAOcsTngdtl6c8Lce1APKn01v3DmI9HQnEAMgCHwDFn5eOR0KFDXz8npRVJ
nv73Cb8sjs8cVyg33ohSS0bGOvH+Sc4XddiiR0Mu1opD7/D+OuomxD0aUIgk
gGycONZXs/J7BWnb66jXcSNcD/OZFUj/SGXJAzkC0ksieL4yxpUDs7+qgH18
0q9ZrC/erJVrb140gD96lg3qLAnobJAUrEAwgEGC+46TShHQTX7qgEdgKWqX
qaVP4v4+rxqdWLkWg2zZ1oM7cP/z4mdGsjmywNcOrZ7tmB8+9atRTCyVIKPC
Nj4B86dVbMysEUAg1QDfTRrOz2buuHuMFgTYVxVYpXB9rQ6CBl7kIuA2QTDl
YX19k9D1qxxgAOdD0fs+N1NgggRZhCGQjPqGWL6p4XxtSj8duyJSQUFx6L32
3/liFDmSAvJRoKVoVSjWl+TeyR0F6Cq4zU9dMcTxS3LzDjJTySjzwtXqQxiH
tHmsb/pno2D2/Q4NWF/ny/ZKDAZHgZyM+tIRHL8s4bG3+xwDbLZUhD2lUOCn
n3N5spwpyCTkROMyzmedNkAIJ5xFppwK0b/3Z03dwCOBYeGIzVpzZh2vz2OF
QuYZYcBehprPgd/3WYsIdBR4gR1XSJ0kjIWWHkrt8PdFVqkss2cxdithPDhy
Mh78yfFWmMDruS+MePasMoByS0GYvDMFHrdauvDRegr9ybldUu1BJrw8eFr3
5kY30pMWORnzjQoXLiLVtGsdiBYqKrUu9JvvRy3R35uRuN7c5Bi+3z9xY20Z
YX2B6n5kd/NifR9XIlWzzVegbJeb9qV4PndbPSO31D5EnZvBdmTcn6WXV4GI
RSJwT3j5zQPXo+W9f7OjrBSYX11Ze4Xnf79QwOJzQy2w9+U7uh3fZ7QqoxuC
PF6C4mGazjLW99OAT56qvu3gX2/t05r4fs+9ltAjocwAt/beiBiTi4Qbf3/n
JT9pRbOxFiGBJwmox1QQsrDSiNZuL6pqYn0fH8kc1A6gobePlBtCsb4V5tb0
pumFaN6l6D4D6+OEp2n2xVw3RN/NI6yN+fsZQ6NVFecCQa+8cRWsL+uLx7nP
dlUBssCHy0r4/lIczF0cVdAAhHaLd0ri+w1fHnvTwWwGqGysii8/HwHbK5ou
+38oReWmBf8W4f7iJiMW90zGovyjj4LqcP9F6otRLZcygct1WsRhzM/fF0Zb
9fsrAN0tQO4d5i9P4uR5QzqBdrxz/pmE86Mx23zyndsgdo1DThbXJ+bLOBp+
tAhcM+cU6sX13/d7+fxhLwPcuFy7bPSaAqf2Z5DDBpNRp+JStizOd9fq6b6l
4RRQvHz30SjO57ptr0YGPR8d3qUlb/H7/H/Pz2lWbQ5Ck/fRf58fRrEj48KC
d9EDU/Et+zCmq+gqcdCzkb7km7EcrO/0V+O2NeyRQN3s+bEZHN/0H+GaS18Y
YElWZ21PPAXKL7CzNbelILs1t64xnG/AP1fxtosh+sIc0GGM4y2crvzycJOC
BmpXo77j9Rv7tlkoiYUC74T4gF2//RRZlRRV7QGK9L8ZaWDs0s5WoekSgHIo
n+mnMN5Po8unescB9t6OvyvwelqabhVtmQHe/D0Jk25SoHjilr+q7tghnxCr
C7/9+oSU+W7jBBlss/hw7DDGHY21e0VzncATjozr+hhvfX7DcuJIMEov5G86
inHc8xlqTbw0aBK3y//tRxH56Ay2hz5gWJcnBWLcLSRd2BPujXzOJOqrYOz4
w1525icDNNE11t/bYv7/+55n+u/3/++Z/+P/ASg2Aic=
"], {{},
{GrayLevel[0.8], EdgeForm[None],
GraphicsGroupBox[
PolygonBox[{{1, 254, 255, 50, 253, 199, 245, 153, 191, 237, 115, 145,
183, 229, 85, 107, 137, 175, 221, 63, 76, 98, 128, 166, 212, 49, 48,
47, 46, 45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31,
30, 29, 28, 27, 26, 25, 24, 23, 22, 62, 75, 97, 127, 165, 211, 21, 61,
74, 96, 126, 164, 210, 20, 84, 106, 136, 174, 220, 60, 73, 95, 125,
163, 209, 19, 83, 105, 135, 173, 219, 59, 111, 141, 179, 225, 72, 94,
124, 162, 208, 18, 114, 144, 182, 228, 82, 104, 134, 172, 218, 58,
110, 140, 178, 224, 71, 147, 185, 231, 93, 123, 161, 207, 17, 198,
244, 152, 190, 236, 113, 195, 241, 143, 247, 181, 227, 81, 251, 196,
242, 149, 248, 187, 233, 103, 250, 193, 239, 133, 246, 171, 217, 57,
252, 197, 243, 150, 249, 188, 234, 109, 194, 240, 139, 177, 223, 70,
146, 184, 230, 92, 192, 238, 122, 160, 206, 16, 151, 189, 235, 112,
142, 180, 226, 80, 148, 186, 232, 102, 132, 170, 216, 56, 108, 138,
176, 222, 69, 91, 121, 159, 205, 15, 79, 101, 131, 169, 215, 55, 68,
90, 120, 158, 204, 14, 78, 100, 130, 168, 214, 54, 67, 89, 119, 157,
203, 13, 77, 99, 129, 167, 213, 53, 66, 88, 118, 156, 202, 12, 52, 65,
87, 117, 155, 201, 11, 10, 9, 8, 7, 6, 5, 4, 3, 2, 51, 64, 86, 116,
154, 200}}]]}, {}, {}}], {{}, {},
{GrayLevel[0], Thickness[Tiny],
LineBox[{{0., 0.}, {0., 2500.171271275779}}]}}},
AspectRatio->NCache[
Rational[25, 102], 0.24509803921568626`],
Axes->{False, False},
AxesOrigin->{0, 0},
Method->{"AxesInFront" -> True},
PlotRange->{{-0.6999999551020408, 1.4999999551020409`}, {
0, 2500.171271275779}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02], Automatic},
Ticks->None]], "Output",
CellChangeTimes->{{3.662599048027356*^9, 3.662599118487307*^9}, {
3.662599759021966*^9, 3.662599798298171*^9}, 3.662600236269802*^9, {
3.662600638703472*^9, 3.6626006578231163`*^9}, 3.6626007638682947`*^9, {
3.662600814095531*^9, 3.662600826209643*^9}, {3.662600874001212*^9,
3.662600929941042*^9}, {3.662601006206463*^9, 3.66260102140853*^9},
3.662602139115399*^9, {3.66260222915946*^9, 3.662602256804039*^9}, {
3.6626023286059513`*^9, 3.662602380961183*^9}, 3.66260242621764*^9,
3.66260246389086*^9, 3.662937889284708*^9, 3.663807058496855*^9, {
3.663807111945539*^9, 3.663807129323585*^9}, 3.6638071954185743`*^9, {
3.663807755501622*^9, 3.6638077739374943`*^9}}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["\<\
File: 1 - 0.85 - 4 - 0.02 - 0.0015 - 0 [Asymmetric resources - one species]\
\>", "Subsection",
CellChangeTimes->{{3.6580707049519672`*^9, 3.658070706349422*^9}, {
3.658070744397442*^9, 3.65807075249966*^9}, {3.658076356754607*^9,
3.6580763606504917`*^9}, {3.6625774963684072`*^9, 3.662577499079831*^9}, {
3.662577751631178*^9, 3.662577790492811*^9}, 3.662578471457584*^9, {
3.662581798018008*^9, 3.662581820815783*^9}, {3.662597526241951*^9,
3.662597528913352*^9}}],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"trysp", "=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Sigma]\[Alpha]", "=", "0.85"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Kappa]", "=", "4"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Nu]", "=", "0.02"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Sigma]\[Nu]", "=", "0.0015"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Beta]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"tryvm", "=", "0.0015"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Mu]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Sigma]", "=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{"tryKm", "=",
RowBox[{"Km", "[",
RowBox[{
"trysp", ",", "try\[Sigma]\[Alpha]", ",", "try\[Kappa]", ",",
"try\[Beta]"}], "]"}]}]}], "Input",
CellChangeTimes->{{3.658074206458665*^9, 3.65807421166369*^9}, {
3.658074801389743*^9, 3.6580749396472607`*^9}, {3.658076014352268*^9,
3.658076022888116*^9}, {3.6625777618468847`*^9, 3.6625777620482903`*^9},
3.662578477841975*^9, 3.66259753496896*^9, {3.669320174179378*^9,
3.669320175012113*^9}, {3.6693203874565763`*^9, 3.6693203907886457`*^9}}],
Cell[BoxData["5669"], "Output",
CellChangeTimes->{{3.658074932852392*^9, 3.658074948287805*^9},
3.658075053786251*^9, 3.658075661309265*^9, 3.6580760233468857`*^9,
3.661348768081315*^9, 3.661361475265626*^9, 3.662577504446596*^9,
3.662577549352231*^9, 3.66257779171821*^9, 3.6625779283183403`*^9,
3.662578485042122*^9, 3.66258047285019*^9, 3.662580802693659*^9, {
3.662597550858047*^9, 3.662597566225039*^9}, 3.6625976118146353`*^9, {
3.662597707110633*^9, 3.662597723145001*^9}, 3.662597821259129*^9,
3.6625983429739*^9, 3.662598386962474*^9, {3.663807781270646*^9,
3.6638077915061293`*^9}, 3.663807960844657*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"data", "=",
RowBox[{"ToExpression", "[",
RowBox[{
"Import", "[", "\"\<1-0.85-4-0.02-0.0015-0-Burn_In.txt\>\"", "]"}],
"]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.658071226407762*^9, 3.658071244891139*^9}, {
3.658074994893792*^9, 3.6580750210197153`*^9}, {3.658075621640133*^9,
3.65807562203861*^9}, {3.658075690781049*^9, 3.65807569876371*^9}, {
3.6625777972698793`*^9, 3.662577797581771*^9}, 3.662578487313106*^9,
3.6625975371446753`*^9}],
Cell[CellGroupData[{
Cell[BoxData["data"], "Input",
CellChangeTimes->{{3.654015655270091*^9, 3.6540156561189938`*^9},
3.658075623809044*^9, {3.6625784941298647`*^9, 3.6625784947523813`*^9}}],
Cell[BoxData[
InterpretationBox[
TagBox[
PanelBox[GridBox[{
{
StyleBox[
StyleBox[
DynamicBox[ToBoxes[
FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"],
StandardForm],
ImageSizeCache->{278., {2., 8.}}],
StripOnInput->False,
DynamicUpdating->True], "Panel",
StripOnInput->False,
Background->None]},
{
ItemBox[
TagBox[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.0268919`"}], ",",
RowBox[{"-", "0.0267567`"}], ",",
RowBox[{"-", "0.0226245`"}], ",",
RowBox[{"-", "0.0252646`"}], ",",
RowBox[{"-", "0.0274442`"}], ",",
RowBox[{"-", "0.0274442`"}], ",",
RowBox[{"-", "0.0242816`"}], ",",
RowBox[{"-", "0.0246252`"}], ",",
RowBox[{"-", "0.0281165`"}], ",",
RowBox[{"-", "0.0265499`"}], ",",
RowBox[{"-", "0.0247766`"}], ",",
RowBox[{"-", "0.0295143`"}], ",",
RowBox[{"-", "0.0231582`"}], ",",
RowBox[{"-", "0.0262897`"}], ",",
RowBox[{"-", "0.0282012`"}], ",",
RowBox[{"-", "0.0244004`"}], ",",
RowBox[{"-", "0.0267171`"}], ",",
RowBox[{"-", "0.0284745`"}], ",",
RowBox[{"-", "0.0263945`"}], ",",
RowBox[{"-", "0.0294473`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"\[LeftSkeleton]", "1", "\[RightSkeleton]"}], "}"}], ",",
RowBox[{"\[LeftSkeleton]", "2558", "\[RightSkeleton]"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.0283588`"}], ",",
RowBox[{"-", "0.0282012`"}], ",",
RowBox[{"-", "0.0226245`"}], ",",
RowBox[{"-", "0.0284347`"}], ",",
RowBox[{"-", "0.0295358`"}], ",",
RowBox[{"-", "0.0274442`"}], ",",
RowBox[{"-", "0.0269136`"}], ",",
RowBox[{"-", "0.0246252`"}], ",",
RowBox[{"\[LeftSkeleton]", "4", "\[RightSkeleton]"}], ",",
RowBox[{"-", "0.0284228`"}], ",",
RowBox[{"-", "0.0262897`"}], ",",
RowBox[{"-", "0.0291225`"}], ",",
RowBox[{"-", "0.0282012`"}], ",",
RowBox[{"-", "0.0274794`"}], ",",
RowBox[{"-", "0.0291295`"}], ",",
RowBox[{"-", "0.0290582`"}], ",",
RowBox[{"-", "0.0292478`"}]}], "}"}]}], "}"}],
Short[#, 5]& ],
Background->GrayLevel[1],
BaseStyle->{Deployed -> False},
Frame->True,
FrameStyle->GrayLevel[0, 0.2],
StripOnInput->False]},
{
RowBox[{
ButtonBox[
StyleBox[
StyleBox[
DynamicBox[ToBoxes[
FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"],
StandardForm],
ImageSizeCache->{49., {1., 8.}}],
StripOnInput->False,
DynamicUpdating->True], "Panel",
StripOnInput->False,
Background->None],
Appearance->Automatic,
ButtonFunction:>OutputSizeLimit`ButtonFunction[
Identity, 188, 24010936893988619183, 5/2],
Enabled->True,
Evaluator->Automatic,
Method->"Queued"], "\[ThinSpace]",
ButtonBox[
StyleBox[
StyleBox[
DynamicBox[ToBoxes[
FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"],
StandardForm],
ImageSizeCache->{52., {1., 8.}}],
StripOnInput->False,
DynamicUpdating->True], "Panel",
StripOnInput->False,
Background->None],
Appearance->Automatic,
ButtonFunction:>OutputSizeLimit`ButtonFunction[
Identity, 188, 24010936893988619183, 5 2],
Enabled->True,
Evaluator->Automatic,
Method->"Queued"], "\[ThinSpace]",
ButtonBox[
StyleBox[
StyleBox[
DynamicBox[ToBoxes[
FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"],
StandardForm],
ImageSizeCache->{82., {2., 8.}}],
StripOnInput->False,
DynamicUpdating->True], "Panel",
StripOnInput->False,
Background->None],
Appearance->Automatic,
ButtonFunction:>OutputSizeLimit`ButtonFunction[
Identity, 188, 24010936893988619183, Infinity],
Enabled->True,
Evaluator->Automatic,
Method->"Queued"], "\[ThinSpace]",
ButtonBox[
StyleBox[
StyleBox[
DynamicBox[ToBoxes[
FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"],
StandardForm],
ImageSizeCache->{74., {1., 8.}}],
StripOnInput->False,
DynamicUpdating->True], "Panel",
StripOnInput->False,
Background->None],
Appearance->Automatic,
ButtonFunction:>FrontEndExecute[{
FrontEnd`SetOptions[
FrontEnd`$FrontEnd,
FrontEnd`PreferencesSettings -> {"Page" -> "Evaluation"}],
FrontEnd`FrontEndToken["PreferencesDialog"]}],
Evaluator->None,
Method->"Preemptive"]}]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxDividers->{
"Columns" -> {{False}}, "ColumnsIndexed" -> {}, "Rows" -> {{False}},
"RowsIndexed" -> {}},
GridBoxItemSize->{
"Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.5599999999999999]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[1.2]},
Offset[0.2]}, "RowsIndexed" -> {}}],
DefaultBaseStyle->{},
FrameMargins->5],
Deploy,
DefaultBaseStyle->"Deploy"],
Out[188]]], "Output",
CellChangeTimes->{
3.654015656661993*^9, 3.658071247971476*^9, 3.658075055070158*^9,
3.658075702597713*^9, 3.6613487750821867`*^9, 3.6613614757456408`*^9,
3.662577553367422*^9, 3.662577801465736*^9, 3.662577928876912*^9, {
3.6625784921416903`*^9, 3.662578495405699*^9}, 3.6625804731940117`*^9,
3.662580803017035*^9, {3.662597551213076*^9, 3.662597566547062*^9},
3.662597612154852*^9, {3.662597707448338*^9, 3.662597723481122*^9},
3.662597821587715*^9, 3.662598343320187*^9, 3.66259838731667*^9, {
3.663807781613985*^9, 3.663807791845489*^9}, 3.663807961241753*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"genotypes1", "=",
RowBox[{"Round", "[",
RowBox[{
RowBox[{"Total", "[",
RowBox[{"Transpose", "[", "data", "]"}], "]"}], ",", "0.001"}], "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{"Length", "[", "%", "]"}], "\[IndentingNewLine]",
RowBox[{"Mean", "[", "%%", "]"}]}], "Input",
CellChangeTimes->{{3.6540156291055717`*^9, 3.654015637852762*^9}, {
3.6540156904355803`*^9, 3.6540156946030903`*^9}, {3.654015764153283*^9,
3.65401580327742*^9}, {3.658071257922381*^9, 3.6580712642191257`*^9},
3.658075625809054*^9, {3.661348776598023*^9, 3.6613487797015142`*^9}, {
3.66136146018661*^9, 3.661361467487602*^9}, {3.66136149867896*^9,
3.6613615017026176`*^9}, {3.6625784995606194`*^9, 3.662578500496483*^9},
3.662597609582741*^9, 3.6625977045261497`*^9}],
Cell[BoxData["2561"], "Output",
CellChangeTimes->{
3.6613487809482737`*^9, {3.661361475780387*^9, 3.6613615021844683`*^9},
3.662577556169673*^9, 3.662577804020043*^9, 3.662577928918355*^9,
3.662578501609182*^9, 3.662580473234736*^9, 3.662580803044672*^9, {
3.66259755125731*^9, 3.662597566576078*^9}, 3.66259761218233*^9, {
3.6625977074770308`*^9, 3.66259772351291*^9}, 3.662597821625908*^9,
3.662598343357924*^9, 3.662598387363462*^9, {3.663807781654187*^9,
3.663807791890389*^9}, 3.663807961276124*^9}],
Cell[BoxData[
RowBox[{"-", "0.5376235845372894`"}]], "Output",
CellChangeTimes->{
3.6613487809482737`*^9, {3.661361475780387*^9, 3.6613615021844683`*^9},
3.662577556169673*^9, 3.662577804020043*^9, 3.662577928918355*^9,
3.662578501609182*^9, 3.662580473234736*^9, 3.662580803044672*^9, {
3.66259755125731*^9, 3.662597566576078*^9}, 3.66259761218233*^9, {
3.6625977074770308`*^9, 3.66259772351291*^9}, 3.662597821625908*^9,
3.662598343357924*^9, 3.662598387363462*^9, {3.663807781654187*^9,
3.663807791890389*^9}, 3.663807961278501*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"totalsize", "=",
RowBox[{"Length", "[", "genotypes1", "]"}]}]], "Input",
CellChangeTimes->{{3.658076784459578*^9, 3.658076805699773*^9},
3.662578507433992*^9}],
Cell[BoxData["2561"], "Output",
CellChangeTimes->{{3.6580767952988997`*^9, 3.658076806295833*^9},
3.6625778063358727`*^9, 3.662577928985957*^9, 3.6625785078609056`*^9,
3.6625804732676086`*^9, 3.662580803077553*^9, {3.662597551291707*^9,
3.662597566609559*^9}, 3.662597612215122*^9, {3.662597707510434*^9,
3.662597723546295*^9}, 3.662597821658207*^9, 3.662598343406785*^9,
3.662598387412004*^9, {3.663807781687318*^9, 3.663807791921775*^9},
3.663807961309874*^9}]
}, Open ]],
Cell["\<\
The following sums the competitive impact felt by an individual of phenotype \
u exerted by all of the individuals on an individual of phenotype u:\
\>", "Text",
CellChangeTimes->{{3.658075190925829*^9, 3.6580752068114223`*^9}, {
3.658075541506732*^9, 3.6580755784304743`*^9}, {3.658076166027096*^9,
3.6580761819691687`*^9}, {3.658076486638575*^9, 3.65807648742222*^9}, {
3.6625803420237617`*^9, 3.662580348246387*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"competitionplot", "=",
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"Sum", "[",
RowBox[{
RowBox[{"a", "[",
RowBox[{"u", ",",
RowBox[{"genotypes1", "[",
RowBox[{"[", "i", "]"}], "]"}], ",", "try\[Sigma]\[Alpha]", ",",
"try\[Beta]"}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "genotypes1", "]"}]}], "}"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2"}], ",", "2"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Thin", ",", "Black"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", "Automatic"}], "}"}]}],
",",
RowBox[{"AxesOrigin", "\[Rule]",
RowBox[{"{",
RowBox[{"0", ",", "0"}], "}"}]}]}], "\[IndentingNewLine]",
"]"}]}]], "Input",
CellChangeTimes->{{3.65401717055512*^9, 3.654017187280355*^9}, {
3.654017344576412*^9, 3.654017359511397*^9}, {3.65401927528238*^9,
3.654019279074164*^9}, {3.6580749961162663`*^9, 3.658075010600336*^9}, {
3.65807618793108*^9, 3.658076188490995*^9}, {3.658076231516355*^9,
3.6580762327478237`*^9}, {3.662578424430344*^9, 3.662578429869256*^9}, {
3.662578513682218*^9, 3.6625785430394173`*^9}, {3.66258043211016*^9,
3.662580434565007*^9}, 3.6625805520910788`*^9, {3.662580800601956*^9,
3.662580801001749*^9}, 3.669320175912326*^9}],
Cell[BoxData[
GraphicsBox[{{}, {},
{GrayLevel[0], Thickness[Tiny], LineBox[CompressedData["
1:eJwt13k4Vd33APCQMhRCeitklkjUG73C2RFJEcpQGogSShpQ6V5DikTmMmW4
R0J1G1QiWZR5yJg57r3GzJJ5uL/9fZ7fH+c5z+c5f+x11l57rXOkz1+1uMC5
atWqUXz9765KiA2x2WxYc+mzc6dMOLo6Lxs0v8AG8faudrZCOHqbra4wNc2G
i4ysQDnlcLR7u8n5/mE2JOgdiLm2Jxxpbghor25hw+GigsAtB8MR6pmsjHvD
BtNW3dUZF8KRRWDNyz3n2HDDx1k+OzMcedUGXHEqWAH2+Pqqp3sjUFMT/1CR
/TII6n0L+uEZiSQKr4pqii8B+fqZ8+3cKPTRtZhb8NcClKChorv8McguRH2i
zX8ezP1cRNQin6C5SO8gIObgY16lg51oLCIFujbHMmdA/5K6jnB1HEo0Vr/e
+HAa7BdYfkRoAvK/bH9L6fBfMI6qRNlaz5A3V5bX9dE/MLn9yFteoWRk71sr
15wxCYZxQ1x77FJQzNe+2ESXCZhJ36CrpJKK8rq3r3slMwbPSM6mb/Op6K42
x+v4f8ZA6vRIaNxSKtKJazN5KDAG4b+Lpt3YqajQIjjs4sIopMz4lG/kpqGy
kmFh6YZRCKW6HzkuRENNL+mbn/iNQkmpkVmIAg2Nef2r6MsYAX7XrOQhcxqS
FUJ6J5KGgagM5V4kaeixGvOOS9QwWF+1+5mWTkNzZv7ZvkHD4Kw8H380k4aq
I4rlXl8fhkapfewYOg3dFDm8ds2hYXjVofZHMJeGSsUsqnPGhyBXMO5TUg0N
uUg4Wm09MAR5ywFBm6dxPDrcYeoaQ+AW5iZJnaUh3bPpZYeUh6B2531nxjwN
iSQP7ru5cQgklZw2Ja3QUL7Ula01v3+DhTQlYXktiQTkPBnUyN9gvvtH9JEt
JHq/I8iF1TMI3M+H1ovpkGhbvV2uctsgNL7KrpclSBTi9R+Px49BWOe4LL/r
AIkuFA89X5s7CIJ/jt3WNSDRP2dNmCqPB8Fh60QCYUIiSoSwjde+QZAOFj5b
eZpERnOJButCB8CfWRoxc5tEH5M8oi39B6Amok4725tEMgamPUleA7A9zszg
CoVEixFsX/XzA9AeVXqpzZdEdOXz+VaaAyDG8qqLCCSR6DnFPanMfsgIzWL4
RZOou+SdlIZGP5T6wynLVyS6e3z+4D6VfhAquDlLe43jYyJnLZl++Mn3THaM
TiKzpdp3ugL9sOR0VIHyjkSFu8f0DvX3AaPvZS7lE4lSkndcsHnSB7QibT2e
QhJp77z+8FRIH9zQPHFetYhErXm5r0/798Feaj6nxTcSCTUbzdi59cGhq38L
I4pJ5LfOKdDZsA9SXOO2TJWT6PxtMvPOTC9wX3a/r11PopU1wzV3R3pBV3n9
Qa0GEsVH7/5DZfVC8T2ax95GEjW8KdK696MXODbTVOV+kki/v7vqUXovKM9W
s1itJJI7Lj6WaNULe9q73/Z24/gZDsLJR3thwTrYMJdBotNuLzVS9XrhxsRn
/UdMEkU/1PJ5rtoLdVm81xV7SLS60EaIvqYX/kh/CUH9JOpTidkNn3pAoY29
e3qYRDuoz8cGX/aAKbvZmD5CIrfaj1nCqT3AOVl92HGURHPXmmUuPuoBfS/X
hdIxEvHlbBJZb9cDH/zdRJ0mSXSMZ3uthmUPiCfLHl/7B69/ct8jO+MeaLQa
u5GGLbFkw/Xh3x5YeOJ58ucUidQOxE+d4u0Be4+GtA0zJPKIzHoTsMKC0+dS
emOx83ryXOlTLLhpvodTYhbn40FHD0cXCyIcc5q2zpHIqkq8KeM9C3yVDSun
5nE+xXeGN7xgQVvF3mH7BVwfV3SOLiWywITLsr8a+5LQ2eJjgfh5Qphz3CKJ
vC2TP8zYsuDg+9i4dcs4n+lv3KXMWdBdHeVnj716DlSMDVmQeLIfZWM/jmek
PVNjgbXR2YMmK3i/hifsyuRZYG8/GRiDvUmHQ2JyCwtST+ektmOndEvHHORm
weyJVitbNs632m5ztwUmjC9/nnyCvcNfb33sOBMMelrsa7HdGi0qinqZcM6W
nb56VRrKlnO4P9zGBHdYKtTAnvO4cWBjLRMGnVPeXMDWLru3rFvMhJ2fv16P
wPb7Jzr3Ui4TdvMq8+VhlzqneUTSmXCjsMijG5v/ywf1fJIJI/pnP3JwpCGz
dSWjfbFM8FnuLpfCjj7zM1PwMROcbJXeamO30fsu/HePCay6ba6W2JKrZqQd
bjHBt+nlvAv2efM1XSFXmHCE9dmWgv2CJhb/6TwTFr33RoRgj0wpWDGsmeCp
KBIfi61moCnMZ8KES+6GnqnYHk8O/dijxwSpwVL5F9h5A9bBZzSZwC8flpGJ
vbLvkmGgChPMvieuZGDrB9/ifCeN83NhQvE5dlBHUEG7GBOm34XKJWFXq8Td
Wb2OCaFW3n+jsDdQMzVUOZjgzP396QPsB5+2lwvNMkBMqPCAF/bC2IuTUyMM
6DDoVLyA7aaoOPyTxQBqpoKxGTbrXPrdz60M8Ax8m7EP2ypWXiDhBwPOeIXq
S2JX1qUlU4oZUHqqccv/8qnLK6dul8eA3jPxqkyc7/cHyG96bxmwZ2aJWoCt
cEfmhHw6A6x6N62Lw45/n9q3NpEBo2p8ze7Y/rIpPDWBDCi5vST1D/aM7bb4
NxQGnJgxoA3g+nCJTlKOvMEAm/p5uw/YFtzPTK3PMcCk4OhTA+xSHXHGf5YM
0Io4JMiHreWZcE38CANY+o4lVbgeZQbiopkaDHBvbhwxxH6ybbNCsQoD+F5F
n12FzWcTm5MuwwD/o8cFc3C9T5U/aXcVYIBZY4GqOLYTh9hl09UMkG8efla5
RKJPN3Ys2v/tBugUM/HEfmCpeGCkqhsOC/leLsHnS3GzdM0q727g31uTo4fP
n1DwtomSi93w7RnPrg58XucWJEQeWXTD03b6oDt2eeeWkxt3dIPpcKJcND7f
l1JE+5TaukDKVK4iF/cDsw0iPOPFXdAZXHVGG3uf/wblD2+7ILWtTTN/mkS8
jgLXdIO6oFqg6Wv2XxJlKfIsW2h2QZaZpYQ/7j+RsWuk/pHtAk5e7d9juF/d
4eXW/yXQBUIzIis22MbDHA+d+n/BLZ0Hq+UnSDRMXxS9G/ML0k54Ribi/qei
Ma7yfKoTOOLeKvENkuiiqo9P7q9O2NVGyds/QKJkBcGGmrJOKIiiyrvg/iq8
aZfXTEInBLSi0K+9JJqddSs6dLATLDlv5eni/vwtd8xyKLoDDp5INX7ZRqKl
d9SMFWoHiO2U6snC/X5vlsCisHMHLEGuw4sWEmXEq6bs1+mAT8JbpJ/i+RDq
7TYU0tcOKd17M8zxfLHRGaPu0mgHWWehH3vw/IncS63Xl2qHaMEme84yElXt
FJCz4WuH+0aOYzUlJNKVVK3w7WqDrdweM7bfSSTLviLS8KANPN0+sI4XkGis
cPTFzZZWeHhEQPNDNonuHRyty73VArd3PKITiTh+o5Fj/zq0QJ03a31OPIlW
mQz/oJu0wMVjyZnKcXgeW/6uJmVawJYLEtY9IZHnxb7y0OpmUPTWi3gdhvc3
6FehvVQznDzptXzZn0RHq2ve8pY3gULMU9mRCyQKrqveFfC+CbSj0tvXO+L6
aKqiryQ2gUtc2LLKeRIZ/Kp4NXWtCe6Gnwp1OIvfZ6wk49fWJrA9uI3zvRWe
L0IFKe+uNsKYotrbn4Yk2niCHn5yUwM40xvG9eXx94/CozwDrgawMvrSul8W
19e8U6/6eD1sPXbsvbo0Xj9Jeh9fWT1Yjx/R2SSB5/dgdHeeZz04LYZ2VIiS
qJ/irSreXAf31TkCfnDh/n0sIvarUi30ibny2jFo6P1MiWC5XCXEqpiGL0TR
0POOvtDfAQWQ/+b5ndOtqeiMufiHDoc0oIftmtoimopy+bx/fvMgCc0690V/
wxS0l8Uh6WcDBNzY+LeqIAnJTnyZ1/pWQfBHlv0V5X+GDpNtNaY2DUQlQ6Bm
QjMBGZgIc01/bCFeGbZbi96JQ2HnWnzVcjoJXelz+ylDT1GZqcR6M2EmUS8l
lHbF9Akald5IbYjvId7ZPw1+1RONPG4q24eJ9RNiq9cku8VEoZZOIYuL5YOE
snCSzA+9SGR3W3tg7dFh4vgmd05uiQj0XVkz+Dv3GPHSKZIzfjgMKfDmD6YZ
TRBBwUYqVaOhSCLf1YA7aJKY5k3wTpQMQasWODOvs/4Qf+pGsiimwWjW/OvZ
Evm/RPwZR+OPBUGo499zW+UDpgnODoda3l2ByN1aaINM5wyx+1qOUnfJfbQ5
utdmtcQcYb1f6efDxwGIbpvyYurWPOEgW1HhZ3UPWev4GJV/XSDiRMe1VA/7
o3dnr8hoLS0SBcf5Jdec8ENzfPpcuZbLROPQw9KLZ3yRRf1+DYnYFSLadiK/
WdAH8e3nL8p/tkIUsus5M3l8UFFa+5HT5AqRXUWJpHD4ILVbt+0T6CuEwdVP
j3ZOUZHAtpyQzSUrxIPn5jUZzVRUcXl3z8Y/K4T37L0q/iQqQjxK4QJH2URt
78fPFFUq/n6a20I3ZxP03PehTxWp6E1H2XMTazYRPqAZkS1FRZJvLn4JOc8m
JHmDpf4IU9GSZVo/3202sWikePjhLAXlkNt01qaziZR+Vb5tRRTktn68LP0l
mzCf6HS0zaMgBa8CC8N3bEJ10zQjLpuCoo3PXLqfzyaKahW1JNIp6PpkfBRX
I45nlvuUziMK2mHrIkm2somjydcygwMoiFn8X6ZeF5tw39oq0k6hILPY1gK/
32xCQtFRw8edgng4Mw5Lj7OJ/obJkSZnCgJXr6bCv2xi9KHxFxUHCvL8aXjO
boFNDO0gUx6cpqD//38lRvvUElmWFPR/Y8/GEQ==
"]]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-2, 2}, Automatic},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{{3.65401717310271*^9, 3.654017187829471*^9},
3.654017373231942*^9, {3.6540192724811373`*^9, 3.654019295101372*^9}, {
3.658076192083295*^9, 3.658076207327387*^9}, 3.658076247547501*^9,
3.6625776031328707`*^9, 3.6625778241482553`*^9, 3.662577944294787*^9,
3.662578391828827*^9, 3.662578446612812*^9, {3.662578522231292*^9,
3.662578547175063*^9}, 3.6625803856341963`*^9, 3.662580477024961*^9,
3.662580806849924*^9, {3.66259755502888*^9, 3.662597570360077*^9},
3.66259761597375*^9, {3.662597711285487*^9, 3.66259772731466*^9},
3.6625978254396353`*^9, 3.6625983471763563`*^9, 3.6625983911173573`*^9, {
3.6638077855146103`*^9, 3.663807795639194*^9}, 3.6638079695336227`*^9}]
}, Open ]],
Cell["The following adds the resource distribution (black):", "Text",
CellChangeTimes->{{3.658076288037281*^9, 3.6580763014525347`*^9}, {
3.658076373076785*^9, 3.658076378521894*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{"competitionplot", ",", "\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "4", ",", "u", ",", "tryKm"}],
"]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2"}], ",", "2"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Thick", ",", "Black", ",", "Dashed"}], "}"}]}]}], "]"}]}],
"\[IndentingNewLine]", "]"}]], "Input",
CellChangeTimes->{{3.658076255457404*^9, 3.6580762835585957`*^9},
3.6580763806995564`*^9, {3.662580376998959*^9, 3.6625803805266*^9},
3.6625804458306847`*^9, 3.662580549170567*^9, {3.662580797089583*^9,
3.6625807976891613`*^9}, {3.662597544440679*^9, 3.662597564103757*^9}}],
Cell[BoxData[
GraphicsBox[{{{}, {},
{GrayLevel[0], Thickness[Tiny], LineBox[CompressedData["
1:eJwt13k4Vd33APCQMhRCeitklkjUG73C2RFJEcpQGogSShpQ6V5DikTmMmW4
R0J1G1QiWZR5yJg57r3GzJJ5uL/9fZ7fH+c5z+c5f+x11l57rXOkz1+1uMC5
atWqUXz9765KiA2x2WxYc+mzc6dMOLo6Lxs0v8AG8faudrZCOHqbra4wNc2G
i4ysQDnlcLR7u8n5/mE2JOgdiLm2Jxxpbghor25hw+GigsAtB8MR6pmsjHvD
BtNW3dUZF8KRRWDNyz3n2HDDx1k+OzMcedUGXHEqWAH2+Pqqp3sjUFMT/1CR
/TII6n0L+uEZiSQKr4pqii8B+fqZ8+3cKPTRtZhb8NcClKChorv8McguRH2i
zX8ezP1cRNQin6C5SO8gIObgY16lg51oLCIFujbHMmdA/5K6jnB1HEo0Vr/e
+HAa7BdYfkRoAvK/bH9L6fBfMI6qRNlaz5A3V5bX9dE/MLn9yFteoWRk71sr
15wxCYZxQ1x77FJQzNe+2ESXCZhJ36CrpJKK8rq3r3slMwbPSM6mb/Op6K42
x+v4f8ZA6vRIaNxSKtKJazN5KDAG4b+Lpt3YqajQIjjs4sIopMz4lG/kpqGy
kmFh6YZRCKW6HzkuRENNL+mbn/iNQkmpkVmIAg2Nef2r6MsYAX7XrOQhcxqS
FUJ6J5KGgagM5V4kaeixGvOOS9QwWF+1+5mWTkNzZv7ZvkHD4Kw8H380k4aq
I4rlXl8fhkapfewYOg3dFDm8ds2hYXjVofZHMJeGSsUsqnPGhyBXMO5TUg0N
uUg4Wm09MAR5ywFBm6dxPDrcYeoaQ+AW5iZJnaUh3bPpZYeUh6B2531nxjwN
iSQP7ru5cQgklZw2Ja3QUL7Ula01v3+DhTQlYXktiQTkPBnUyN9gvvtH9JEt
JHq/I8iF1TMI3M+H1ovpkGhbvV2uctsgNL7KrpclSBTi9R+Px49BWOe4LL/r
AIkuFA89X5s7CIJ/jt3WNSDRP2dNmCqPB8Fh60QCYUIiSoSwjde+QZAOFj5b
eZpERnOJButCB8CfWRoxc5tEH5M8oi39B6Amok4725tEMgamPUleA7A9zszg
CoVEixFsX/XzA9AeVXqpzZdEdOXz+VaaAyDG8qqLCCSR6DnFPanMfsgIzWL4
RZOou+SdlIZGP5T6wynLVyS6e3z+4D6VfhAquDlLe43jYyJnLZl++Mn3THaM
TiKzpdp3ugL9sOR0VIHyjkSFu8f0DvX3AaPvZS7lE4lSkndcsHnSB7QibT2e
QhJp77z+8FRIH9zQPHFetYhErXm5r0/798Feaj6nxTcSCTUbzdi59cGhq38L
I4pJ5LfOKdDZsA9SXOO2TJWT6PxtMvPOTC9wX3a/r11PopU1wzV3R3pBV3n9
Qa0GEsVH7/5DZfVC8T2ax95GEjW8KdK696MXODbTVOV+kki/v7vqUXovKM9W
s1itJJI7Lj6WaNULe9q73/Z24/gZDsLJR3thwTrYMJdBotNuLzVS9XrhxsRn
/UdMEkU/1PJ5rtoLdVm81xV7SLS60EaIvqYX/kh/CUH9JOpTidkNn3pAoY29
e3qYRDuoz8cGX/aAKbvZmD5CIrfaj1nCqT3AOVl92HGURHPXmmUuPuoBfS/X
hdIxEvHlbBJZb9cDH/zdRJ0mSXSMZ3uthmUPiCfLHl/7B69/ct8jO+MeaLQa
u5GGLbFkw/Xh3x5YeOJ58ucUidQOxE+d4u0Be4+GtA0zJPKIzHoTsMKC0+dS
emOx83ryXOlTLLhpvodTYhbn40FHD0cXCyIcc5q2zpHIqkq8KeM9C3yVDSun
5nE+xXeGN7xgQVvF3mH7BVwfV3SOLiWywITLsr8a+5LQ2eJjgfh5Qphz3CKJ
vC2TP8zYsuDg+9i4dcs4n+lv3KXMWdBdHeVnj716DlSMDVmQeLIfZWM/jmek
PVNjgbXR2YMmK3i/hifsyuRZYG8/GRiDvUmHQ2JyCwtST+ektmOndEvHHORm
weyJVitbNs632m5ztwUmjC9/nnyCvcNfb33sOBMMelrsa7HdGi0qinqZcM6W
nb56VRrKlnO4P9zGBHdYKtTAnvO4cWBjLRMGnVPeXMDWLru3rFvMhJ2fv16P
wPb7Jzr3Ui4TdvMq8+VhlzqneUTSmXCjsMijG5v/ywf1fJIJI/pnP3JwpCGz
dSWjfbFM8FnuLpfCjj7zM1PwMROcbJXeamO30fsu/HePCay6ba6W2JKrZqQd
bjHBt+nlvAv2efM1XSFXmHCE9dmWgv2CJhb/6TwTFr33RoRgj0wpWDGsmeCp
KBIfi61moCnMZ8KES+6GnqnYHk8O/dijxwSpwVL5F9h5A9bBZzSZwC8flpGJ
vbLvkmGgChPMvieuZGDrB9/ifCeN83NhQvE5dlBHUEG7GBOm34XKJWFXq8Td
Wb2OCaFW3n+jsDdQMzVUOZjgzP396QPsB5+2lwvNMkBMqPCAF/bC2IuTUyMM
6DDoVLyA7aaoOPyTxQBqpoKxGTbrXPrdz60M8Ax8m7EP2ypWXiDhBwPOeIXq
S2JX1qUlU4oZUHqqccv/8qnLK6dul8eA3jPxqkyc7/cHyG96bxmwZ2aJWoCt
cEfmhHw6A6x6N62Lw45/n9q3NpEBo2p8ze7Y/rIpPDWBDCi5vST1D/aM7bb4
NxQGnJgxoA3g+nCJTlKOvMEAm/p5uw/YFtzPTK3PMcCk4OhTA+xSHXHGf5YM
0Io4JMiHreWZcE38CANY+o4lVbgeZQbiopkaDHBvbhwxxH6ybbNCsQoD+F5F
n12FzWcTm5MuwwD/o8cFc3C9T5U/aXcVYIBZY4GqOLYTh9hl09UMkG8efla5
RKJPN3Ys2v/tBugUM/HEfmCpeGCkqhsOC/leLsHnS3GzdM0q727g31uTo4fP
n1DwtomSi93w7RnPrg58XucWJEQeWXTD03b6oDt2eeeWkxt3dIPpcKJcND7f
l1JE+5TaukDKVK4iF/cDsw0iPOPFXdAZXHVGG3uf/wblD2+7ILWtTTN/mkS8
jgLXdIO6oFqg6Wv2XxJlKfIsW2h2QZaZpYQ/7j+RsWuk/pHtAk5e7d9juF/d
4eXW/yXQBUIzIis22MbDHA+d+n/BLZ0Hq+UnSDRMXxS9G/ML0k54Ribi/qei
Ma7yfKoTOOLeKvENkuiiqo9P7q9O2NVGyds/QKJkBcGGmrJOKIiiyrvg/iq8
aZfXTEInBLSi0K+9JJqddSs6dLATLDlv5eni/vwtd8xyKLoDDp5INX7ZRqKl
d9SMFWoHiO2U6snC/X5vlsCisHMHLEGuw4sWEmXEq6bs1+mAT8JbpJ/i+RDq
7TYU0tcOKd17M8zxfLHRGaPu0mgHWWehH3vw/IncS63Xl2qHaMEme84yElXt
FJCz4WuH+0aOYzUlJNKVVK3w7WqDrdweM7bfSSTLviLS8KANPN0+sI4XkGis
cPTFzZZWeHhEQPNDNonuHRyty73VArd3PKITiTh+o5Fj/zq0QJ03a31OPIlW
mQz/oJu0wMVjyZnKcXgeW/6uJmVawJYLEtY9IZHnxb7y0OpmUPTWi3gdhvc3
6FehvVQznDzptXzZn0RHq2ve8pY3gULMU9mRCyQKrqveFfC+CbSj0tvXO+L6
aKqiryQ2gUtc2LLKeRIZ/Kp4NXWtCe6Gnwp1OIvfZ6wk49fWJrA9uI3zvRWe
L0IFKe+uNsKYotrbn4Yk2niCHn5yUwM40xvG9eXx94/CozwDrgawMvrSul8W
19e8U6/6eD1sPXbsvbo0Xj9Jeh9fWT1Yjx/R2SSB5/dgdHeeZz04LYZ2VIiS
qJ/irSreXAf31TkCfnDh/n0sIvarUi30ibny2jFo6P1MiWC5XCXEqpiGL0TR
0POOvtDfAQWQ/+b5ndOtqeiMufiHDoc0oIftmtoimopy+bx/fvMgCc0690V/
wxS0l8Uh6WcDBNzY+LeqIAnJTnyZ1/pWQfBHlv0V5X+GDpNtNaY2DUQlQ6Bm
QjMBGZgIc01/bCFeGbZbi96JQ2HnWnzVcjoJXelz+ylDT1GZqcR6M2EmUS8l
lHbF9Akald5IbYjvId7ZPw1+1RONPG4q24eJ9RNiq9cku8VEoZZOIYuL5YOE
snCSzA+9SGR3W3tg7dFh4vgmd05uiQj0XVkz+Dv3GPHSKZIzfjgMKfDmD6YZ
TRBBwUYqVaOhSCLf1YA7aJKY5k3wTpQMQasWODOvs/4Qf+pGsiimwWjW/OvZ
Evm/RPwZR+OPBUGo499zW+UDpgnODoda3l2ByN1aaINM5wyx+1qOUnfJfbQ5
utdmtcQcYb1f6efDxwGIbpvyYurWPOEgW1HhZ3UPWev4GJV/XSDiRMe1VA/7
o3dnr8hoLS0SBcf5Jdec8ENzfPpcuZbLROPQw9KLZ3yRRf1+DYnYFSLadiK/
WdAH8e3nL8p/tkIUsus5M3l8UFFa+5HT5AqRXUWJpHD4ILVbt+0T6CuEwdVP
j3ZOUZHAtpyQzSUrxIPn5jUZzVRUcXl3z8Y/K4T37L0q/iQqQjxK4QJH2URt
78fPFFUq/n6a20I3ZxP03PehTxWp6E1H2XMTazYRPqAZkS1FRZJvLn4JOc8m
JHmDpf4IU9GSZVo/3202sWikePjhLAXlkNt01qaziZR+Vb5tRRTktn68LP0l
mzCf6HS0zaMgBa8CC8N3bEJ10zQjLpuCoo3PXLqfzyaKahW1JNIp6PpkfBRX
I45nlvuUziMK2mHrIkm2somjydcygwMoiFn8X6ZeF5tw39oq0k6hILPY1gK/
32xCQtFRw8edgng4Mw5Lj7OJ/obJkSZnCgJXr6bCv2xi9KHxFxUHCvL8aXjO
boFNDO0gUx6cpqD//38lRvvUElmWFPR/Y8/GEQ==
"]]}}, {{}, {},
{GrayLevel[0], Thickness[Large], Dashing[{Small, Small}],
LineBox[CompressedData["
1:eJwt2Hk4VO/7B3BClkqyFEVliRYK+aSUzk0kStmXKFK2ylSyhWypVCohHyHL
HCkqbVpI3fIhFBWJLDGLZRhrJMYyv/O9rt9f53pdZ55nzjNz3+/nuY6yxykb
z3kCAgLqggIC/7tuJJb28/l8pIWY8T1kDsCpKdW4KR4fnxywPZhqdQCevtBR
H/vDx/5FdUc23zgAumstPXq4fOT+Vti2X8QK9JfEttY28zE6ony3WqwVAHv0
050nfBTivEsvvWYNNpfrHm524+PRgeQF3hW2kGTUZq51kI+4BiRb+2yhcZrT
q27PxwZXx6Vxi+3A4bSw2vK9fBwedjVJcbEDF+ftGQL6fEw7ZxQeM2EHxzbk
x9dJ8nFaSqPuh74DBH+N9fN+P4cXto01m/U7QTw3qHn8zRz27vljcHaFM9BF
fY1iXszhpVMbFYb2OUMtYSl398EcPpgqLfj+1BlUnsq9a0icQ+ENNb+8ww/C
l4S8hTu951A+Xj9unqorqNtUP5SVmsOVvLWZ/k/dYAetRI4uMYdnty05YDDg
BtZXH0VuEpnDlKpXNhtl3SG8PMHWgjeL16ve2bZYuUODrvN0ZNcs5pneZjjU
usN5mX4L7ptZ5JcYSy6rPQKNjQv6PxyZRd1fK7sYw0ch+tjL9w9dZ1F2dSHN
Y8kx2Dh+OOm24yxqHU7eLbX5GMTJPN/hazmL4t8Djo8GHQNDG6ebUttm0TjJ
2bZOwBPyvubquUnNYuuurAlxJS8I+WQYOfN+Bj9oFTbEhvjAmoO9tj3FM2i4
8EFYQ5YPNPQlrP1WNIOSy+MeWVX5gKZ4Vz1ZMIO7PwhodC71BabZVbW9KZTz
C/hmb3zBorKp5o7fDIqsOcY+JnwClMpOyeorzmAof2tzTrkf1Er/E2CwbAZr
x9xVHYf9INST991QegY3Kp19s1ORBk0SF5NMxGawb4Smfi+IBgn2adI249Po
OtLHqdc6BULcCim/2mnUOn8pk2FzGvrkli8iw6exT6h8vlXHGUj16TyZFzyN
HvQnGr1/z8Dut7m1+f7T+Hn9ICd1iT/Q3TfFP/WZxri24sB9pv7g+tBkwXu7
aTRXe9Q4/tgfvsIp8RbNacx7FqZrG3sWXp6oEFn8i4dfrWLULpoGwtbVNJ28
Zh66PHG7P3ksEEoalx0ybODhQC63Kj42EMoMTxSdqOJh3o+nwssqAuHTYumj
1c94SLh/sS8yCQLGC7ey6Es81GRbLlDYFwwSM7zQ8U08HFSmTb46ew7c43VG
WmKmEByXR4poREBoUeKluvNTKHjTq2jlvgi43T6m+CFkCu/bDvfbnYmAT5qv
zB/QpvBQW/x++dII2FxnQAYdnMKSF7uu8mwiYb6kiYOM7hSmTD26KrsrCh7d
dCjdx5zEDwPDj4Wio2EyMSwOiUkcnvj8ckY9FkjJDoVU5gSahboPnEq5ChkW
Ov7fr/zB5zUDXPyeADEnj4SsMx/Hg0PtglM2yRAmVBDsP/gbi17pXC7QSIUj
UV/Vmh6Mous/H1L+pqTD7XfdqRnHR/BKzYupvwWZcDgkLULfcwSTRptXRL3O
hLWbDxxrcBtBkZa1ZwQqMqHkwZtNYvYjeFQ+IKmvPRM6kq59PEuMYCr3v1pX
ySzQOK4zbiE7ggXTy3/jqSzw1+Jl/g4bxk+KPy8oL82Gks61Cx+pDGG1f/zY
4cpsCN8h+DhNfghLJNTW633KBsM7LZZXJIfwlvtjY5Gv2VBmc/WmF28QG08I
Saf/zIaqSq60csMgzqtaPJHMzYbGh4UKKdGDqKPANS+TyoGhYD2NKMYAakQN
Lux3zIGnjQuraU0DGHNLb89W1xw4o9Ptc6h2AEVopnox7jkw3n+7wODNAO7k
aS0X982B6UN/tf7cpMaPms6xzuWAmEmJ3nFiAA+4aZh8TMsBVSkwtsvkYvZZ
5XaTlhy4oc0MPZ7ERTWjJcJOv3Jg0irmRVQcF016k2c9mTlQe6tC7bE/FzMq
NI/69+VAgIy56HwzLvqWreTum8qBj0ttal8P92PYurE0MXk6HFc65rDCqB9l
Uv/zuWNNh0ZDkZs6W/pR54WDyXx7Ouw8nFdltqEfHfUPDvk50UEmi7M1QK4f
Lbs2PdFyo0Ppar8VdX19aOAiPEI7SQdJtSBGRGIfXuoT7Jq8SIfn6+OOs9gc
lNhVkbHpJR1W1bsXb2jhYIFyQmz/azrEB28TC/zCQaHRGzHZJXTwrOi/J1rM
wclPKZWzSAf5w5ZMzRscTF6+PO78JzqcvyXtFLyVg7nmtdJJHXTo1+fmlWlx
sLVIa4jPoINDx39/xFU52CE7OubNpoP2hsCkjEUcrCw/FLuOQwdWRfOXD6xe
5LqosvxH6bBnMsN04fVePH35J3eVEAkvMwOT7WN68e21blUQIUHFdD87M7gX
J2ajs1xESZi+xY/S8ehF79MOPrELSCjc4FHqoN+Lif8yztyVIUHWTWNzDrMH
c2+pzg2pkNBZ+Wz1li092Ho6L1NpJwnhtlMmWzV78OeEzJGbBAnyTPA1UOlB
rsK37bNAgtXM12c7JXtQyd7TqG4XCWW6Q8ZmPd3ofbYXd5qTkJ213tMppRvp
Uy7rfG1J2KHlf+VgfDc+fhRjedeOhJ8lxY9dY7oxsOT7/Tp7EqSa9ky407rx
SfLb+apOJEQv9L7su7sbF9Mu52a7kuBxjswPnejC2EqOUt8xEubmc+vCB7rw
sh2RyPQkIS1Z93cEqwu16ZWuTV4kNDz5YHDhSxeGaN+bKfIhYVdP5+dreV0Y
ac7N2X2SBMZZjZHrGV240mVIUMWPWq/gKdmExC78LPKjeopykeKca3JEFx4/
+DEp8xQJaraKQxkOXWi7g+H8zp9aL+OodNa+Lvwzk64ZfpYEV9rDLTnGXdjo
ah+sH0BC8hWDyHsbuzD0o+95MpAE4TInqcL51P0AoSvWIdTvY5mt93SGjTYO
8U7jlHe09To9/83GZ/aXnyWdIyFgIijnVQcbJSzyxKpDSejWvK2Lr9h4ciT+
iuh5EtZH3BviPGTjId7WjWmUaV9fFkjnsHHFc4UfayNImDzTpOJ1jY207316
BpHU/P/1dNyMYuNdxdtjpZSjZf+mFQeycX/5AG6PIkHi9TKZRe5sXFOjcV0r
moQDYmu/brFnY+ar+qRsysnOW6+5W7BRVPzli8UxJCjNOAkV6bGRE1huwaLs
YemLv9ZRn68srTK9QEJe5rkw0VVs/NCY4HuPsrZR2thBcTZ+f+uv4RxLQmBi
wZPYORZq+DubP6Zcwi45UTjGwqnkz+mzlHddamMLdrBQiS7ZkXiRhLhmbtaG
7yw8LV/2vZly7doZF/tqFjYJvRdRuESCw2fFxgfPWWhQ7rs+gXKaolZCw30W
5jfPqXyk3OlnuG8mg4VdzYVHJymroaWYeiILbeDUsPplEnykDlccuMxCC2JL
jTXlx0doUefCqfGPeGMhlH8/j9hBnmGh9bwi/wzKW4RvTtZ6sbDN7uCeUsph
9llFEy4s1N7XE/yTclnek9OrrVloqmgtPEpZeBI1LXazsOp88ohIHAnm5t84
Z7ezsC+vgFhG+UYaI/euNjXe5Ma4GuUG7oh71RoWmpwxkN5EeZmhoNLocha2
PytI/4ey640lLculWHinvzVpK+XsTuXbJiIsFD9YNatPuVtb15rGY2LGrZPt
mymvjzFelDrMxBe0Kl1NyrTvNjUfupj4SOaHkDLlF2pHL3JbmDiPmWgjTXky
8KyR3FcmnqXNKQtQ3lF1YXZnBRM3x8oF9lPriZZPLvYpZqKybNP+esoffXMD
EwuZKLt55/MiygveFumUkkxcJb2PnkzZamHlYHcqEyf/ziqfoZx86Ef+4htM
tDWw0bOg3FLY7bntAhPt9M3aV1FeKTChfDSEicIH2hR/U/+Xh/X8jng/Jra3
L5wqozwwpu7AcGSixTWjBDvK2qb60hKWTFwqbWT9v3oITDH7stmYifilqbiV
qpe5rT67L2tSti69bkt519WQec+UmWjvIsqX+F99tcW9b13KRI5spypS9bck
In/LRkEm7shfm6xE+dKrtdVSfxnY+m9nUR1Vz7yh+85jAww0+neNQBhlllte
+JufDDxhJLO6juqH50ZkufFTBr59bFdzgOof9VAVuzV5DNy/2TOmj+q3tOc5
3aIZDEzr9DwXRTlGNVus7jIDbfKZ6/Oo/rQRubvf0Y2B36asO79R/f3RUJGx
zZ6BTgaBn+0oGwSln1Hcy8DByHqxpnAq/3vvJDO3MND9/reob2EkjFWntJ6Q
ZOCu/IX596g80VBQrhMI68T+Uy9GG6h8krq6aqTSqxNXaQdLaVGe5CnJXLPp
RMWszLxYKs+q25c7y63vxMWm8caaVN75ZMt2r2vpQA9FdughKg8LNMRmbfQ7
8IXvMM/cl4TE1Pmr5VU7UNiPnR9O5W2ouMiuX5IdKLCt8M8jbxIsuIJXvHt+
obKwqN98Kp+5hdOy4bd/4YpV5ivuepCguWVY895YO1q6Cwa7uJDgtTEysvhX
O254+CXf7iAJWeqLG+qq2vFKubrBXmcSpJdtCp5Ib0eVjZwIbUcS/v6lfTAz
acevHmc4bTYklBcP2fcnt2GCQGLRG2o/cjIciti0pRWll1qQd/+hnvefiPpd
q1uxNV1m3EyPhM9akmpOEq1omdrMG9YlYefKjTVRHS146xhHb5s2Cap8P5mG
Sy2488jf3KfrSRgqG7wf0PwTRweHSv9ZRcIFk8FvxSHN6GC4+0HBfOr79wwc
0DvajHe3i+jKU/uzgCX3S6FlM27Ys+jHBWr/DrfvqyVVmtHio8xpewESgry6
q6/XNqFE5P5trCk6+MT9KjuyugmTTJsX5g7QYV9t3VPx6kasTp360/yNDnJ2
hQnOyxrQ5p7Y4YBk6vyifq3EVKgB/630EktPpIPVlHeXznA9mvwuDi9LoMPV
TOWtElX1uD1Eukb0Oh3mOMmdJUH1WOcnoBBHnX96zodtVGz6hrvl3zRaBdGB
duBW6rt1XzGzbdh7oSM1/0Tl4mq1T7hY2qs2QI4O99q6r/fFvkeVRIEFd8Ny
4JC1YlHb0VwUvzjxYhEzG4olwn6UB5JEelXHCQPjbPiHJbgy2gmJTcYB3odW
Z4HqyNspg/IaIpAbE19RexfMyZa6/U4NRFrUQ1qXYwaYWkoL/XnZTIRevyeZ
3psGN92ao7RftxMWT8UY2gl3oGq/0iIraSbR/vnYd45SKgwqy0U0pLGJZH7w
6qmqFAgM2HDk5tIeQq6Wf/jN+dvQ3C5l41XNIfgts3GeK5PB/dyOXtF9XKJF
PKE+uCMR/tugf/U/kSFiQHTVo9Drt0BdvJSTu2eEuOOnJSZ5KAGUSk+YisSN
ElXZkvWioTdAgDcv35/1m3ifJCc9oxwPf63fHa5cM06M17PHPCWuQpue24o1
sX+I9169KRnMy3DaUWqJSvsEcb13eH5s50VQSO5yElaaJGYTzR78UoiFQpfs
+2MhU0R6bNUFN4sYcDSM3FP9jkdkuuhN7yiKgmeH/VQMZqaJHJU9amHnI2BS
YpdQsf0s8Tk4JWrvlTCwqd++RSl1jnCzmzhBmwoBie0LPpTenSNmjFJ7fIZC
4ENu615Xco4YapqY580OAe2Qc0fSC+eIS02tK2l1ISC56nW8QuUc0dtd3ng/
JwRqTuqy5X7PEZHvtlRUW4QAiK1LkNzHJwJ9R3mlWcHU+WJyeaE1n1jfJfNg
/e1geNJWdc/SkU+k5PZ0p18NhpVPvN7Ge/CJ6z+9l1wJDIYZ+9weiXN8oifa
Xv7G3mB4Ta4yFM3jE6ulf/oYTwYBbdFwVd5DPjHzXqeDMxgE6sHvbXY/4xOv
Jc3aEtlBkGxxyOdiKZ9Y0X3o+OiXIPAfTUsS+s4ntAp21v68FwTrXY6vJH/y
Ccf4c6fS04OAWbEt37iDTzjUtN0+cisIrFJ/vo/uo55Xt8p3MjwIxOY9MFce
5hMSGmuX1vgHAZ4Ibiwb5xPu4u677voEQdCP3W7uPD5xX751JOBwEPz/+ySi
xUZwpZVdEPwf5Y2anQ==
"]]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-2, 2}, Automatic},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{{3.65807626463237*^9, 3.658076279167932*^9},
3.662577609843607*^9, 3.6625778242232523`*^9, 3.662577944421152*^9,
3.662578453437272*^9, {3.662578524796567*^9, 3.6625785478328342`*^9},
3.6625803857245903`*^9, 3.6625804771551647`*^9, 3.6625808069283533`*^9, {
3.66259755521319*^9, 3.662597570593274*^9}, 3.662597616172531*^9, {
3.662597711475161*^9, 3.662597727494256*^9}, 3.662597825622953*^9,
3.662598347380108*^9, 3.662598391315916*^9, {3.663807785703619*^9,
3.663807795823428*^9}, 3.663807969769074*^9}]
}, Open ]],
Cell["\<\
The following adds a histogram of individuals that exist at the end of the \
burn-in period (groups into 0.01 bins):\
\>", "Text",
CellChangeTimes->{{3.6625803561581984`*^9, 3.662580420748272*^9}, {
3.662597832401039*^9, 3.662597833169085*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"bc", "=",
RowBox[{"BinCounts", "[",
RowBox[{"genotypes1", ",",
RowBox[{"{",
RowBox[{
RowBox[{"-", "2"}], ",", "2", ",", "0.01"}], "}"}]}], "]"}]}],
";"}]], "Input",
CellChangeTimes->{{3.6625796146565323`*^9, 3.6625796162285557`*^9}, {
3.662597714686502*^9, 3.6625977209101562`*^9}}],
Cell["Peak occurs at:", "Text",
CellChangeTimes->{{3.662562965019528*^9, 3.662562967234468*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"FindRoot", "[",
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "4", ",", "u", ",", "tryKm"}],
"]"}], ",", "u"}], "]"}], "\[Equal]", "0"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "1"}], ",", "0"}], "}"}]}], "]"}]], "Input",
CellChangeTimes->{{3.661345725944672*^9, 3.661345803032847*^9},
3.66258246225274*^9}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"u", "\[Rule]",
RowBox[{"-", "0.5640230744006249`"}]}], "}"}]], "Output",
CellChangeTimes->{{3.661345728180367*^9, 3.661345803756647*^9},
3.662562912517063*^9, 3.662562977259493*^9, {3.6625810169719877`*^9,
3.6625810259057426`*^9}, 3.6625813205092173`*^9, 3.6625813677004766`*^9,
3.662582464690024*^9, 3.662583239290604*^9, {3.6625834355813627`*^9,
3.662583464801539*^9}, 3.662588493560286*^9, 3.6625968460866623`*^9,
3.6625984579052467`*^9, 3.6638077212455397`*^9, {3.663807785751504*^9,
3.66380779589106*^9}, 3.663807969829093*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"maxheight", "=",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "4", ",", "u", ",", "tryKm"}], "]"}],
"/.", "%"}]}]], "Input",
CellChangeTimes->{{3.662580070809471*^9, 3.662580079704524*^9}, {
3.662580174205254*^9, 3.662580177645094*^9}, {3.662582327255519*^9,
3.6625824049239683`*^9}, {3.662582469659295*^9, 3.662582473289554*^9}}],
Cell[BoxData["2500.1108919042317`"], "Output",
CellChangeTimes->{{3.6625823536178703`*^9, 3.662582357195736*^9}, {
3.662582387556489*^9, 3.6625824063901176`*^9}, 3.662582474209477*^9,
3.6625832393560467`*^9, {3.662583435632378*^9, 3.6625834648523006`*^9},
3.6625884935930777`*^9, 3.662596846134961*^9, 3.662598457971768*^9,
3.663807723046283*^9, {3.663807785789695*^9, 3.663807795939653*^9},
3.663807969860549*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Graphics", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"EdgeForm", "[", "Black", "]"}], ",", "Black", ",",
"\[IndentingNewLine]",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{"Black", ",",
RowBox[{"Rectangle", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2"}], ")"}], "-", "0.005"}],
",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2"}], ")"}], "+", "0.005"}],
",",
RowBox[{"bc", "[",
RowBox[{"[", "i", "]"}], "]"}]}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "bc", "]"}]}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"AspectRatio", "\[Rule]",
RowBox[{"1", "/", "GoldenRatio"}]}], ",",
RowBox[{"Frame", "\[Rule]", "True"}]}], "]"}]], "Input"],
Cell[BoxData[
GraphicsBox[
{GrayLevel[0], EdgeForm[GrayLevel[0]],
{GrayLevel[0], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{GrayLevel[0], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{GrayLevel[0], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{GrayLevel[0], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{GrayLevel[0], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{GrayLevel[0], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{GrayLevel[0], RectangleBox[{-1.9349999999999998`, 0}, {-1.925, 0}]},
{GrayLevel[0], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{GrayLevel[0], RectangleBox[{-1.9149999999999998`, 0}, {-1.905, 0}]},
{GrayLevel[0], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{GrayLevel[0], RectangleBox[{-1.8949999999999998`, 0}, {-1.885, 0}]},
{GrayLevel[0], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{GrayLevel[0], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.865, 0}, {-1.8550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.845, 0}, {-1.8350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.825, 0}, {-1.8150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{GrayLevel[0], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{GrayLevel[0], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{GrayLevel[0], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{GrayLevel[0], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{GrayLevel[0], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{GrayLevel[0], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{GrayLevel[0], RectangleBox[{-1.6849999999999998`, 0}, {-1.675, 0}]},
{GrayLevel[0], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{GrayLevel[0], RectangleBox[{-1.6649999999999998`, 0}, {-1.655, 0}]},
{GrayLevel[0], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{GrayLevel[0], RectangleBox[{-1.6449999999999998`, 0}, {-1.635, 0}]},
{GrayLevel[0], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{GrayLevel[0], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.615, 0}, {-1.6050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.595, 0}, {-1.5850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.575, 0}, {-1.5650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{GrayLevel[0], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{GrayLevel[0], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{GrayLevel[0], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{GrayLevel[0], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{GrayLevel[0], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{GrayLevel[0], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{GrayLevel[0], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{GrayLevel[0], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{GrayLevel[0], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{GrayLevel[0], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{GrayLevel[0], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{GrayLevel[0], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{GrayLevel[0], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{GrayLevel[0], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{GrayLevel[0], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{GrayLevel[0], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{GrayLevel[0], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{GrayLevel[0], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{GrayLevel[0], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{GrayLevel[0], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{GrayLevel[0], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{GrayLevel[0], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{GrayLevel[0], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{GrayLevel[0], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{GrayLevel[0], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{GrayLevel[0], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{GrayLevel[0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{GrayLevel[0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{GrayLevel[0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{GrayLevel[0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{GrayLevel[0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{GrayLevel[0], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.935, 0}, {-0.925, 0}]},
{GrayLevel[0], RectangleBox[{-0.925, 0}, {-0.915, 0}]},
{GrayLevel[0], RectangleBox[{-0.915, 0}, {-0.905, 0}]},
{GrayLevel[0], RectangleBox[{-0.905, 0}, {-0.895, 0}]},
{GrayLevel[0], RectangleBox[{-0.895, 0}, {-0.885, 0}]},
{GrayLevel[0], RectangleBox[{-0.885, 0}, {-0.875, 0}]},
{GrayLevel[0], RectangleBox[{-0.875, 0}, {-0.865, 0}]},
{GrayLevel[0], RectangleBox[{-0.865, 0}, {-0.855, 0}]},
{GrayLevel[0], RectangleBox[{-0.855, 0}, {-0.845, 0}]},
{GrayLevel[0], RectangleBox[{-0.845, 0}, {-0.835, 0}]},
{GrayLevel[0], RectangleBox[{-0.835, 0}, {-0.825, 0}]},
{GrayLevel[0], RectangleBox[{-0.825, 0}, {-0.815, 0}]},
{GrayLevel[0], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{GrayLevel[0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{GrayLevel[0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{GrayLevel[0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{GrayLevel[0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{GrayLevel[0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{GrayLevel[0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{GrayLevel[0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{GrayLevel[0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{GrayLevel[0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{GrayLevel[0], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{GrayLevel[0], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{GrayLevel[0], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.685, 0}, {-0.675, 0}]},
{GrayLevel[0], RectangleBox[{-0.675, 0}, {-0.665, 0}]},
{GrayLevel[0], RectangleBox[{-0.665, 0}, {-0.655, 0}]},
{GrayLevel[0], RectangleBox[{-0.655, 0}, {-0.645, 0}]},
{GrayLevel[0], RectangleBox[{-0.645, 0}, {-0.635, 0}]},
{GrayLevel[0], RectangleBox[{-0.635, 0}, {-0.625, 0}]},
{GrayLevel[0], RectangleBox[{-0.625, 0}, {-0.615, 0}]},
{GrayLevel[0], RectangleBox[{-0.615, 0}, {-0.605, 0}]},
{GrayLevel[0], RectangleBox[{-0.605, 0}, {-0.595, 0}]},
{GrayLevel[0], RectangleBox[{-0.595, 0}, {-0.585, 0}]},
{GrayLevel[0], RectangleBox[{-0.585, 0}, {-0.575, 0}]},
{GrayLevel[0], RectangleBox[{-0.575, 0}, {-0.565, 0}]},
{GrayLevel[0], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 18}]},
{GrayLevel[0], RectangleBox[{-0.555, 0}, {-0.545, 223}]},
{GrayLevel[0], RectangleBox[{-0.545, 0}, {-0.535, 732}]},
{GrayLevel[0], RectangleBox[{-0.535, 0}, {-0.525, 1000}]},
{GrayLevel[0], RectangleBox[{-0.525, 0}, {-0.515, 488}]},
{GrayLevel[0], RectangleBox[{-0.515, 0}, {-0.505, 92}]},
{GrayLevel[0], RectangleBox[{-0.505, 0}, {-0.495, 8}]},
{GrayLevel[0], RectangleBox[{-0.495, 0}, {-0.485, 0}]},
{GrayLevel[0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{GrayLevel[0], RectangleBox[{-0.475, 0}, {-0.46499999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{-0.465, 0}, {-0.455, 0}]},
{GrayLevel[0], RectangleBox[{-0.455, 0}, {-0.445, 0}]},
{GrayLevel[0], RectangleBox[{-0.445, 0}, {-0.435, 0}]},
{GrayLevel[0], RectangleBox[{-0.435, 0}, {-0.425, 0}]},
{GrayLevel[0], RectangleBox[{-0.425, 0}, {-0.415, 0}]},
{GrayLevel[0], RectangleBox[{-0.415, 0}, {-0.40499999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{-0.405, 0}, {-0.395, 0}]},
{GrayLevel[0], RectangleBox[{-0.395, 0}, {-0.385, 0}]},
{GrayLevel[0], RectangleBox[{-0.385, 0}, {-0.375, 0}]},
{GrayLevel[0], RectangleBox[{-0.375, 0}, {-0.365, 0}]},
{GrayLevel[0], RectangleBox[{-0.365, 0}, {-0.355, 0}]},
{GrayLevel[0], RectangleBox[{-0.355, 0}, {-0.345, 0}]},
{GrayLevel[0], RectangleBox[{-0.34500000000000003`, 0}, {-0.335, 0}]},
{GrayLevel[0], RectangleBox[{-0.335, 0}, {-0.325, 0}]},
{GrayLevel[0], RectangleBox[{-0.325, 0}, {-0.315, 0}]},
{GrayLevel[0], RectangleBox[{-0.315, 0}, {-0.305, 0}]},
{GrayLevel[0], RectangleBox[{-0.305, 0}, {-0.295, 0}]},
{GrayLevel[0], RectangleBox[{-0.295, 0}, {-0.285, 0}]},
{GrayLevel[0], RectangleBox[{-0.28500000000000003`, 0}, {-0.275, 0}]},
{GrayLevel[0], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{GrayLevel[0], RectangleBox[{-0.265, 0}, {-0.255, 0}]},
{GrayLevel[0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{GrayLevel[0], RectangleBox[{-0.245, 0}, {-0.235, 0}]},
{GrayLevel[0], RectangleBox[{-0.23500000000000001`, 0}, {-0.225, 0}]},
{GrayLevel[0], RectangleBox[{-0.225, 0}, {-0.215, 0}]},
{GrayLevel[0], RectangleBox[{-0.215, 0}, {-0.205, 0}]},
{GrayLevel[0], RectangleBox[{-0.20500000000000002`, 0}, {-0.195, 0}]},
{GrayLevel[0], RectangleBox[{-0.195, 0}, {-0.185, 0}]},
{GrayLevel[0], RectangleBox[{-0.185, 0}, {-0.175, 0}]},
{GrayLevel[0], RectangleBox[{-0.17500000000000002`, 0}, {-0.165, 0}]},
{GrayLevel[0], RectangleBox[{-0.165, 0}, {-0.155, 0}]},
{GrayLevel[0], RectangleBox[{-0.155, 0}, {-0.145, 0}]},
{GrayLevel[0], RectangleBox[{-0.14500000000000002`, 0}, {-0.135, 0}]},
{GrayLevel[0], RectangleBox[{-0.135, 0}, {-0.125, 0}]},
{GrayLevel[0], RectangleBox[{-0.125, 0}, {-0.11499999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{-0.115, 0}, {-0.105, 0}]},
{GrayLevel[0], RectangleBox[{-0.10500000000000001`, 0}, {-0.095, 0}]},
{GrayLevel[0], RectangleBox[{-0.095, 0}, {-0.08499999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.085, 0}, {-0.075, 0}]},
{GrayLevel[0], RectangleBox[{-0.07500000000000001, 0}, {-0.065, 0}]},
{GrayLevel[0], RectangleBox[{-0.065, 0}, {-0.055, 0}]},
{GrayLevel[0], RectangleBox[{-0.055, 0}, {-0.045000000000000005`, 0}]},
{GrayLevel[0], RectangleBox[{-0.045, 0}, {-0.035, 0}]},
{GrayLevel[0],
RectangleBox[{-0.034999999999999996`, 0}, {-0.024999999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{-0.025, 0}, {-0.015, 0}]},
{GrayLevel[0], RectangleBox[{-0.015, 0}, {-0.005, 0}]},
{GrayLevel[0], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{GrayLevel[0], RectangleBox[{0.005, 0}, {0.015, 0}]},
{GrayLevel[0], RectangleBox[{0.015, 0}, {0.025, 0}]},
{GrayLevel[0],
RectangleBox[{0.024999999999999998`, 0}, {0.034999999999999996`, 0}]},
{GrayLevel[0], RectangleBox[{0.035, 0}, {0.045, 0}]},
{GrayLevel[0], RectangleBox[{0.045000000000000005`, 0}, {0.055, 0}]},
{GrayLevel[0], RectangleBox[{0.055, 0}, {0.065, 0}]},
{GrayLevel[0], RectangleBox[{0.065, 0}, {0.07500000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.075, 0}, {0.085, 0}]},
{GrayLevel[0], RectangleBox[{0.08499999999999999, 0}, {0.095, 0}]},
{GrayLevel[0], RectangleBox[{0.095, 0}, {0.10500000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{0.105, 0}, {0.115, 0}]},
{GrayLevel[0], RectangleBox[{0.11499999999999999`, 0}, {0.125, 0}]},
{GrayLevel[0], RectangleBox[{0.125, 0}, {0.135, 0}]},
{GrayLevel[0], RectangleBox[{0.135, 0}, {0.14500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.145, 0}, {0.155, 0}]},
{GrayLevel[0], RectangleBox[{0.155, 0}, {0.165, 0}]},
{GrayLevel[0], RectangleBox[{0.165, 0}, {0.17500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.175, 0}, {0.185, 0}]},
{GrayLevel[0], RectangleBox[{0.185, 0}, {0.195, 0}]},
{GrayLevel[0], RectangleBox[{0.195, 0}, {0.20500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.205, 0}, {0.215, 0}]},
{GrayLevel[0], RectangleBox[{0.215, 0}, {0.225, 0}]},
{GrayLevel[0], RectangleBox[{0.225, 0}, {0.23500000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{0.235, 0}, {0.245, 0}]},
{GrayLevel[0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{GrayLevel[0], RectangleBox[{0.255, 0}, {0.265, 0}]},
{GrayLevel[0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{GrayLevel[0], RectangleBox[{0.275, 0}, {0.28500000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{0.285, 0}, {0.295, 0}]},
{GrayLevel[0], RectangleBox[{0.295, 0}, {0.305, 0}]},
{GrayLevel[0], RectangleBox[{0.305, 0}, {0.315, 0}]},
{GrayLevel[0], RectangleBox[{0.315, 0}, {0.325, 0}]},
{GrayLevel[0], RectangleBox[{0.325, 0}, {0.335, 0}]},
{GrayLevel[0], RectangleBox[{0.335, 0}, {0.34500000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{0.345, 0}, {0.355, 0}]},
{GrayLevel[0], RectangleBox[{0.355, 0}, {0.365, 0}]},
{GrayLevel[0], RectangleBox[{0.365, 0}, {0.375, 0}]},
{GrayLevel[0], RectangleBox[{0.375, 0}, {0.385, 0}]},
{GrayLevel[0], RectangleBox[{0.385, 0}, {0.395, 0}]},
{GrayLevel[0], RectangleBox[{0.395, 0}, {0.405, 0}]},
{GrayLevel[0], RectangleBox[{0.40499999999999997`, 0}, {0.415, 0}]},
{GrayLevel[0], RectangleBox[{0.415, 0}, {0.425, 0}]},
{GrayLevel[0], RectangleBox[{0.425, 0}, {0.435, 0}]},
{GrayLevel[0], RectangleBox[{0.435, 0}, {0.445, 0}]},
{GrayLevel[0], RectangleBox[{0.445, 0}, {0.455, 0}]},
{GrayLevel[0], RectangleBox[{0.455, 0}, {0.465, 0}]},
{GrayLevel[0], RectangleBox[{0.46499999999999997`, 0}, {0.475, 0}]},
{GrayLevel[0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{GrayLevel[0], RectangleBox[{0.485, 0}, {0.495, 0}]},
{GrayLevel[0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{GrayLevel[0], RectangleBox[{0.505, 0}, {0.515, 0}]},
{GrayLevel[0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{GrayLevel[0], RectangleBox[{0.525, 0}, {0.535, 0}]},
{GrayLevel[0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{GrayLevel[0], RectangleBox[{0.545, 0}, {0.555, 0}]},
{GrayLevel[0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.565, 0}, {0.575, 0}]},
{GrayLevel[0], RectangleBox[{0.575, 0}, {0.585, 0}]},
{GrayLevel[0], RectangleBox[{0.585, 0}, {0.595, 0}]},
{GrayLevel[0], RectangleBox[{0.595, 0}, {0.605, 0}]},
{GrayLevel[0], RectangleBox[{0.605, 0}, {0.615, 0}]},
{GrayLevel[0], RectangleBox[{0.615, 0}, {0.625, 0}]},
{GrayLevel[0], RectangleBox[{0.625, 0}, {0.635, 0}]},
{GrayLevel[0], RectangleBox[{0.635, 0}, {0.645, 0}]},
{GrayLevel[0], RectangleBox[{0.645, 0}, {0.655, 0}]},
{GrayLevel[0], RectangleBox[{0.655, 0}, {0.665, 0}]},
{GrayLevel[0], RectangleBox[{0.665, 0}, {0.675, 0}]},
{GrayLevel[0], RectangleBox[{0.675, 0}, {0.685, 0}]},
{GrayLevel[0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{GrayLevel[0], RectangleBox[{0.695, 0}, {0.705, 0}]},
{GrayLevel[0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{GrayLevel[0], RectangleBox[{0.715, 0}, {0.725, 0}]},
{GrayLevel[0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{GrayLevel[0], RectangleBox[{0.735, 0}, {0.745, 0}]},
{GrayLevel[0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{GrayLevel[0], RectangleBox[{0.755, 0}, {0.765, 0}]},
{GrayLevel[0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{GrayLevel[0], RectangleBox[{0.775, 0}, {0.785, 0}]},
{GrayLevel[0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{GrayLevel[0], RectangleBox[{0.795, 0}, {0.805, 0}]},
{GrayLevel[0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.815, 0}, {0.825, 0}]},
{GrayLevel[0], RectangleBox[{0.825, 0}, {0.835, 0}]},
{GrayLevel[0], RectangleBox[{0.835, 0}, {0.845, 0}]},
{GrayLevel[0], RectangleBox[{0.845, 0}, {0.855, 0}]},
{GrayLevel[0], RectangleBox[{0.855, 0}, {0.865, 0}]},
{GrayLevel[0], RectangleBox[{0.865, 0}, {0.875, 0}]},
{GrayLevel[0], RectangleBox[{0.875, 0}, {0.885, 0}]},
{GrayLevel[0], RectangleBox[{0.885, 0}, {0.895, 0}]},
{GrayLevel[0], RectangleBox[{0.895, 0}, {0.905, 0}]},
{GrayLevel[0], RectangleBox[{0.905, 0}, {0.915, 0}]},
{GrayLevel[0], RectangleBox[{0.915, 0}, {0.925, 0}]},
{GrayLevel[0], RectangleBox[{0.925, 0}, {0.935, 0}]},
{GrayLevel[0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{GrayLevel[0], RectangleBox[{0.945, 0}, {0.955, 0}]},
{GrayLevel[0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{GrayLevel[0], RectangleBox[{0.965, 0}, {0.975, 0}]},
{GrayLevel[0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{GrayLevel[0], RectangleBox[{0.985, 0}, {0.995, 0}]},
{GrayLevel[0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{GrayLevel[0], RectangleBox[{1.0050000000000001`, 0}, {1.015, 0}]},
{GrayLevel[0], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{GrayLevel[0], RectangleBox[{1.0250000000000001`, 0}, {1.035, 0}]},
{GrayLevel[0], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{GrayLevel[0], RectangleBox[{1.0450000000000002`, 0}, {1.055, 0}]},
{GrayLevel[0], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{GrayLevel[0], RectangleBox[{1.0650000000000002`, 0}, {1.075, 0}]},
{GrayLevel[0], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{GrayLevel[0], RectangleBox[{1.0850000000000002`, 0}, {1.095, 0}]},
{GrayLevel[0], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{GrayLevel[0], RectangleBox[{1.1050000000000002`, 0}, {1.115, 0}]},
{GrayLevel[0], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{GrayLevel[0], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.135, 0}, {1.1449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.155, 0}, {1.1649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.175, 0}, {1.1849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.195, 0}, {1.2049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.215, 0}, {1.2249999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.235, 0}, {1.2449999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{GrayLevel[0], RectangleBox[{1.2550000000000001`, 0}, {1.265, 0}]},
{GrayLevel[0], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{GrayLevel[0], RectangleBox[{1.2750000000000001`, 0}, {1.285, 0}]},
{GrayLevel[0], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{GrayLevel[0], RectangleBox[{1.2950000000000002`, 0}, {1.305, 0}]},
{GrayLevel[0], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{GrayLevel[0], RectangleBox[{1.3150000000000002`, 0}, {1.325, 0}]},
{GrayLevel[0], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{GrayLevel[0], RectangleBox[{1.3350000000000002`, 0}, {1.345, 0}]},
{GrayLevel[0], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{GrayLevel[0], RectangleBox[{1.3550000000000002`, 0}, {1.365, 0}]},
{GrayLevel[0], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{GrayLevel[0], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.385, 0}, {1.3949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.405, 0}, {1.4149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.425, 0}, {1.4349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.445, 0}, {1.4549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.465, 0}, {1.4749999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.485, 0}, {1.4949999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{GrayLevel[0], RectangleBox[{1.5050000000000001`, 0}, {1.515, 0}]},
{GrayLevel[0], RectangleBox[{1.5150000000000001`, 0}, {1.525, 0}]},
{GrayLevel[0], RectangleBox[{1.5250000000000001`, 0}, {1.535, 0}]},
{GrayLevel[0], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{GrayLevel[0], RectangleBox[{1.5450000000000002`, 0}, {1.555, 0}]},
{GrayLevel[0], RectangleBox[{1.5550000000000002`, 0}, {1.565, 0}]},
{GrayLevel[0], RectangleBox[{1.5650000000000002`, 0}, {1.575, 0}]},
{GrayLevel[0], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{GrayLevel[0], RectangleBox[{1.5850000000000002`, 0}, {1.595, 0}]},
{GrayLevel[0], RectangleBox[{1.5950000000000002`, 0}, {1.605, 0}]},
{GrayLevel[0], RectangleBox[{1.6050000000000002`, 0}, {1.615, 0}]},
{GrayLevel[0], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{GrayLevel[0], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.635, 0}, {1.6449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.645, 0}, {1.6549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.655, 0}, {1.6649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.675, 0}, {1.6849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.685, 0}, {1.6949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.695, 0}, {1.7049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.715, 0}, {1.7249999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.725, 0}, {1.7349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.735, 0}, {1.7449999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{GrayLevel[0], RectangleBox[{1.7550000000000001`, 0}, {1.765, 0}]},
{GrayLevel[0], RectangleBox[{1.7650000000000001`, 0}, {1.775, 0}]},
{GrayLevel[0], RectangleBox[{1.7750000000000001`, 0}, {1.785, 0}]},
{GrayLevel[0], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{GrayLevel[0], RectangleBox[{1.7950000000000002`, 0}, {1.805, 0}]},
{GrayLevel[0], RectangleBox[{1.8050000000000002`, 0}, {1.815, 0}]},
{GrayLevel[0], RectangleBox[{1.8150000000000002`, 0}, {1.825, 0}]},
{GrayLevel[0], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{GrayLevel[0], RectangleBox[{1.8350000000000002`, 0}, {1.845, 0}]},
{GrayLevel[0], RectangleBox[{1.8450000000000002`, 0}, {1.855, 0}]},
{GrayLevel[0], RectangleBox[{1.8550000000000002`, 0}, {1.865, 0}]},
{GrayLevel[0], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{GrayLevel[0], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.885, 0}, {1.8949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.895, 0}, {1.9049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.905, 0}, {1.9149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.925, 0}, {1.9349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.935, 0}, {1.9449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.945, 0}, {1.9549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.965, 0}, {1.9749999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.975, 0}, {1.9849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.985, 0}, {1.9949999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.995, 0}, {2.005, 0}]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Frame->True]], "Output",
CellChangeTimes->{
3.662598347509198*^9, 3.66259839143888*^9, 3.662598460306551*^9, {
3.663807785844496*^9, 3.6638077959961433`*^9}, 3.663807969935913*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"histoplot", "=",
RowBox[{"Graphics", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"EdgeForm", "[", "Black", "]"}], ",", "Black", ",",
"\[IndentingNewLine]",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{"Black", ",",
RowBox[{"Rectangle", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2"}], ")"}], "-", "0.005"}],
",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2"}], ")"}], "+", "0.005"}],
",",
RowBox[{"bc", "[",
RowBox[{"[", "i", "]"}], "]"}]}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "bc", "]"}]}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"AspectRatio", "\[Rule]",
RowBox[{"1", "/", "GoldenRatio"}]}], ",",
RowBox[{"Frame", "\[Rule]", "True"}], ",",
RowBox[{"FrameTicks", "\[Rule]", "False"}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.662579808750051*^9, 3.662580000968864*^9}, {
3.662580093697451*^9, 3.662580094976821*^9}, {3.66258012727341*^9,
3.662580128536862*^9}, 3.662580189485834*^9, {3.662580451133957*^9,
3.6625804529645967`*^9}, 3.662597797293749*^9, {3.6625982935722923`*^9,
3.662598297330913*^9}}],
Cell[BoxData[
GraphicsBox[
{GrayLevel[0], EdgeForm[GrayLevel[0]],
{GrayLevel[0], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{GrayLevel[0], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{GrayLevel[0], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{GrayLevel[0], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{GrayLevel[0], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{GrayLevel[0], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{GrayLevel[0], RectangleBox[{-1.9349999999999998`, 0}, {-1.925, 0}]},
{GrayLevel[0], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{GrayLevel[0], RectangleBox[{-1.9149999999999998`, 0}, {-1.905, 0}]},
{GrayLevel[0], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{GrayLevel[0], RectangleBox[{-1.8949999999999998`, 0}, {-1.885, 0}]},
{GrayLevel[0], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{GrayLevel[0], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.865, 0}, {-1.8550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.845, 0}, {-1.8350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.825, 0}, {-1.8150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{GrayLevel[0], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{GrayLevel[0], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{GrayLevel[0], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{GrayLevel[0], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{GrayLevel[0], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{GrayLevel[0], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{GrayLevel[0], RectangleBox[{-1.6849999999999998`, 0}, {-1.675, 0}]},
{GrayLevel[0], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{GrayLevel[0], RectangleBox[{-1.6649999999999998`, 0}, {-1.655, 0}]},
{GrayLevel[0], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{GrayLevel[0], RectangleBox[{-1.6449999999999998`, 0}, {-1.635, 0}]},
{GrayLevel[0], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{GrayLevel[0], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.615, 0}, {-1.6050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.595, 0}, {-1.5850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.575, 0}, {-1.5650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{GrayLevel[0], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{GrayLevel[0], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{GrayLevel[0], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{GrayLevel[0], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{GrayLevel[0], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{GrayLevel[0], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{GrayLevel[0], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{GrayLevel[0], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{GrayLevel[0], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{GrayLevel[0], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{GrayLevel[0], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{GrayLevel[0], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{GrayLevel[0], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{GrayLevel[0], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{GrayLevel[0], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{GrayLevel[0], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{GrayLevel[0], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{GrayLevel[0], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{GrayLevel[0], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{GrayLevel[0], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{GrayLevel[0], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{GrayLevel[0], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{GrayLevel[0], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{GrayLevel[0], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{GrayLevel[0], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{GrayLevel[0], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{GrayLevel[0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{GrayLevel[0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{GrayLevel[0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{GrayLevel[0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{GrayLevel[0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{GrayLevel[0], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.935, 0}, {-0.925, 0}]},
{GrayLevel[0], RectangleBox[{-0.925, 0}, {-0.915, 0}]},
{GrayLevel[0], RectangleBox[{-0.915, 0}, {-0.905, 0}]},
{GrayLevel[0], RectangleBox[{-0.905, 0}, {-0.895, 0}]},
{GrayLevel[0], RectangleBox[{-0.895, 0}, {-0.885, 0}]},
{GrayLevel[0], RectangleBox[{-0.885, 0}, {-0.875, 0}]},
{GrayLevel[0], RectangleBox[{-0.875, 0}, {-0.865, 0}]},
{GrayLevel[0], RectangleBox[{-0.865, 0}, {-0.855, 0}]},
{GrayLevel[0], RectangleBox[{-0.855, 0}, {-0.845, 0}]},
{GrayLevel[0], RectangleBox[{-0.845, 0}, {-0.835, 0}]},
{GrayLevel[0], RectangleBox[{-0.835, 0}, {-0.825, 0}]},
{GrayLevel[0], RectangleBox[{-0.825, 0}, {-0.815, 0}]},
{GrayLevel[0], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{GrayLevel[0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{GrayLevel[0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{GrayLevel[0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{GrayLevel[0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{GrayLevel[0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{GrayLevel[0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{GrayLevel[0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{GrayLevel[0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{GrayLevel[0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{GrayLevel[0], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{GrayLevel[0], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{GrayLevel[0], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.685, 0}, {-0.675, 0}]},
{GrayLevel[0], RectangleBox[{-0.675, 0}, {-0.665, 0}]},
{GrayLevel[0], RectangleBox[{-0.665, 0}, {-0.655, 0}]},
{GrayLevel[0], RectangleBox[{-0.655, 0}, {-0.645, 0}]},
{GrayLevel[0], RectangleBox[{-0.645, 0}, {-0.635, 0}]},
{GrayLevel[0], RectangleBox[{-0.635, 0}, {-0.625, 0}]},
{GrayLevel[0], RectangleBox[{-0.625, 0}, {-0.615, 0}]},
{GrayLevel[0], RectangleBox[{-0.615, 0}, {-0.605, 0}]},
{GrayLevel[0], RectangleBox[{-0.605, 0}, {-0.595, 0}]},
{GrayLevel[0], RectangleBox[{-0.595, 0}, {-0.585, 0}]},
{GrayLevel[0], RectangleBox[{-0.585, 0}, {-0.575, 0}]},
{GrayLevel[0], RectangleBox[{-0.575, 0}, {-0.565, 0}]},
{GrayLevel[0], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 18}]},
{GrayLevel[0], RectangleBox[{-0.555, 0}, {-0.545, 223}]},
{GrayLevel[0], RectangleBox[{-0.545, 0}, {-0.535, 732}]},
{GrayLevel[0], RectangleBox[{-0.535, 0}, {-0.525, 1000}]},
{GrayLevel[0], RectangleBox[{-0.525, 0}, {-0.515, 488}]},
{GrayLevel[0], RectangleBox[{-0.515, 0}, {-0.505, 92}]},
{GrayLevel[0], RectangleBox[{-0.505, 0}, {-0.495, 8}]},
{GrayLevel[0], RectangleBox[{-0.495, 0}, {-0.485, 0}]},
{GrayLevel[0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{GrayLevel[0], RectangleBox[{-0.475, 0}, {-0.46499999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{-0.465, 0}, {-0.455, 0}]},
{GrayLevel[0], RectangleBox[{-0.455, 0}, {-0.445, 0}]},
{GrayLevel[0], RectangleBox[{-0.445, 0}, {-0.435, 0}]},
{GrayLevel[0], RectangleBox[{-0.435, 0}, {-0.425, 0}]},
{GrayLevel[0], RectangleBox[{-0.425, 0}, {-0.415, 0}]},
{GrayLevel[0], RectangleBox[{-0.415, 0}, {-0.40499999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{-0.405, 0}, {-0.395, 0}]},
{GrayLevel[0], RectangleBox[{-0.395, 0}, {-0.385, 0}]},
{GrayLevel[0], RectangleBox[{-0.385, 0}, {-0.375, 0}]},
{GrayLevel[0], RectangleBox[{-0.375, 0}, {-0.365, 0}]},
{GrayLevel[0], RectangleBox[{-0.365, 0}, {-0.355, 0}]},
{GrayLevel[0], RectangleBox[{-0.355, 0}, {-0.345, 0}]},
{GrayLevel[0], RectangleBox[{-0.34500000000000003`, 0}, {-0.335, 0}]},
{GrayLevel[0], RectangleBox[{-0.335, 0}, {-0.325, 0}]},
{GrayLevel[0], RectangleBox[{-0.325, 0}, {-0.315, 0}]},
{GrayLevel[0], RectangleBox[{-0.315, 0}, {-0.305, 0}]},
{GrayLevel[0], RectangleBox[{-0.305, 0}, {-0.295, 0}]},
{GrayLevel[0], RectangleBox[{-0.295, 0}, {-0.285, 0}]},
{GrayLevel[0], RectangleBox[{-0.28500000000000003`, 0}, {-0.275, 0}]},
{GrayLevel[0], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{GrayLevel[0], RectangleBox[{-0.265, 0}, {-0.255, 0}]},
{GrayLevel[0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{GrayLevel[0], RectangleBox[{-0.245, 0}, {-0.235, 0}]},
{GrayLevel[0], RectangleBox[{-0.23500000000000001`, 0}, {-0.225, 0}]},
{GrayLevel[0], RectangleBox[{-0.225, 0}, {-0.215, 0}]},
{GrayLevel[0], RectangleBox[{-0.215, 0}, {-0.205, 0}]},
{GrayLevel[0], RectangleBox[{-0.20500000000000002`, 0}, {-0.195, 0}]},
{GrayLevel[0], RectangleBox[{-0.195, 0}, {-0.185, 0}]},
{GrayLevel[0], RectangleBox[{-0.185, 0}, {-0.175, 0}]},
{GrayLevel[0], RectangleBox[{-0.17500000000000002`, 0}, {-0.165, 0}]},
{GrayLevel[0], RectangleBox[{-0.165, 0}, {-0.155, 0}]},
{GrayLevel[0], RectangleBox[{-0.155, 0}, {-0.145, 0}]},
{GrayLevel[0], RectangleBox[{-0.14500000000000002`, 0}, {-0.135, 0}]},
{GrayLevel[0], RectangleBox[{-0.135, 0}, {-0.125, 0}]},
{GrayLevel[0], RectangleBox[{-0.125, 0}, {-0.11499999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{-0.115, 0}, {-0.105, 0}]},
{GrayLevel[0], RectangleBox[{-0.10500000000000001`, 0}, {-0.095, 0}]},
{GrayLevel[0], RectangleBox[{-0.095, 0}, {-0.08499999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.085, 0}, {-0.075, 0}]},
{GrayLevel[0], RectangleBox[{-0.07500000000000001, 0}, {-0.065, 0}]},
{GrayLevel[0], RectangleBox[{-0.065, 0}, {-0.055, 0}]},
{GrayLevel[0], RectangleBox[{-0.055, 0}, {-0.045000000000000005`, 0}]},
{GrayLevel[0], RectangleBox[{-0.045, 0}, {-0.035, 0}]},
{GrayLevel[0],
RectangleBox[{-0.034999999999999996`, 0}, {-0.024999999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{-0.025, 0}, {-0.015, 0}]},
{GrayLevel[0], RectangleBox[{-0.015, 0}, {-0.005, 0}]},
{GrayLevel[0], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{GrayLevel[0], RectangleBox[{0.005, 0}, {0.015, 0}]},
{GrayLevel[0], RectangleBox[{0.015, 0}, {0.025, 0}]},
{GrayLevel[0],
RectangleBox[{0.024999999999999998`, 0}, {0.034999999999999996`, 0}]},
{GrayLevel[0], RectangleBox[{0.035, 0}, {0.045, 0}]},
{GrayLevel[0], RectangleBox[{0.045000000000000005`, 0}, {0.055, 0}]},
{GrayLevel[0], RectangleBox[{0.055, 0}, {0.065, 0}]},
{GrayLevel[0], RectangleBox[{0.065, 0}, {0.07500000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.075, 0}, {0.085, 0}]},
{GrayLevel[0], RectangleBox[{0.08499999999999999, 0}, {0.095, 0}]},
{GrayLevel[0], RectangleBox[{0.095, 0}, {0.10500000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{0.105, 0}, {0.115, 0}]},
{GrayLevel[0], RectangleBox[{0.11499999999999999`, 0}, {0.125, 0}]},
{GrayLevel[0], RectangleBox[{0.125, 0}, {0.135, 0}]},
{GrayLevel[0], RectangleBox[{0.135, 0}, {0.14500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.145, 0}, {0.155, 0}]},
{GrayLevel[0], RectangleBox[{0.155, 0}, {0.165, 0}]},
{GrayLevel[0], RectangleBox[{0.165, 0}, {0.17500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.175, 0}, {0.185, 0}]},
{GrayLevel[0], RectangleBox[{0.185, 0}, {0.195, 0}]},
{GrayLevel[0], RectangleBox[{0.195, 0}, {0.20500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.205, 0}, {0.215, 0}]},
{GrayLevel[0], RectangleBox[{0.215, 0}, {0.225, 0}]},
{GrayLevel[0], RectangleBox[{0.225, 0}, {0.23500000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{0.235, 0}, {0.245, 0}]},
{GrayLevel[0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{GrayLevel[0], RectangleBox[{0.255, 0}, {0.265, 0}]},
{GrayLevel[0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{GrayLevel[0], RectangleBox[{0.275, 0}, {0.28500000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{0.285, 0}, {0.295, 0}]},
{GrayLevel[0], RectangleBox[{0.295, 0}, {0.305, 0}]},
{GrayLevel[0], RectangleBox[{0.305, 0}, {0.315, 0}]},
{GrayLevel[0], RectangleBox[{0.315, 0}, {0.325, 0}]},
{GrayLevel[0], RectangleBox[{0.325, 0}, {0.335, 0}]},
{GrayLevel[0], RectangleBox[{0.335, 0}, {0.34500000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{0.345, 0}, {0.355, 0}]},
{GrayLevel[0], RectangleBox[{0.355, 0}, {0.365, 0}]},
{GrayLevel[0], RectangleBox[{0.365, 0}, {0.375, 0}]},
{GrayLevel[0], RectangleBox[{0.375, 0}, {0.385, 0}]},
{GrayLevel[0], RectangleBox[{0.385, 0}, {0.395, 0}]},
{GrayLevel[0], RectangleBox[{0.395, 0}, {0.405, 0}]},
{GrayLevel[0], RectangleBox[{0.40499999999999997`, 0}, {0.415, 0}]},
{GrayLevel[0], RectangleBox[{0.415, 0}, {0.425, 0}]},
{GrayLevel[0], RectangleBox[{0.425, 0}, {0.435, 0}]},
{GrayLevel[0], RectangleBox[{0.435, 0}, {0.445, 0}]},
{GrayLevel[0], RectangleBox[{0.445, 0}, {0.455, 0}]},
{GrayLevel[0], RectangleBox[{0.455, 0}, {0.465, 0}]},
{GrayLevel[0], RectangleBox[{0.46499999999999997`, 0}, {0.475, 0}]},
{GrayLevel[0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{GrayLevel[0], RectangleBox[{0.485, 0}, {0.495, 0}]},
{GrayLevel[0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{GrayLevel[0], RectangleBox[{0.505, 0}, {0.515, 0}]},
{GrayLevel[0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{GrayLevel[0], RectangleBox[{0.525, 0}, {0.535, 0}]},
{GrayLevel[0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{GrayLevel[0], RectangleBox[{0.545, 0}, {0.555, 0}]},
{GrayLevel[0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.565, 0}, {0.575, 0}]},
{GrayLevel[0], RectangleBox[{0.575, 0}, {0.585, 0}]},
{GrayLevel[0], RectangleBox[{0.585, 0}, {0.595, 0}]},
{GrayLevel[0], RectangleBox[{0.595, 0}, {0.605, 0}]},
{GrayLevel[0], RectangleBox[{0.605, 0}, {0.615, 0}]},
{GrayLevel[0], RectangleBox[{0.615, 0}, {0.625, 0}]},
{GrayLevel[0], RectangleBox[{0.625, 0}, {0.635, 0}]},
{GrayLevel[0], RectangleBox[{0.635, 0}, {0.645, 0}]},
{GrayLevel[0], RectangleBox[{0.645, 0}, {0.655, 0}]},
{GrayLevel[0], RectangleBox[{0.655, 0}, {0.665, 0}]},
{GrayLevel[0], RectangleBox[{0.665, 0}, {0.675, 0}]},
{GrayLevel[0], RectangleBox[{0.675, 0}, {0.685, 0}]},
{GrayLevel[0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{GrayLevel[0], RectangleBox[{0.695, 0}, {0.705, 0}]},
{GrayLevel[0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{GrayLevel[0], RectangleBox[{0.715, 0}, {0.725, 0}]},
{GrayLevel[0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{GrayLevel[0], RectangleBox[{0.735, 0}, {0.745, 0}]},
{GrayLevel[0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{GrayLevel[0], RectangleBox[{0.755, 0}, {0.765, 0}]},
{GrayLevel[0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{GrayLevel[0], RectangleBox[{0.775, 0}, {0.785, 0}]},
{GrayLevel[0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{GrayLevel[0], RectangleBox[{0.795, 0}, {0.805, 0}]},
{GrayLevel[0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.815, 0}, {0.825, 0}]},
{GrayLevel[0], RectangleBox[{0.825, 0}, {0.835, 0}]},
{GrayLevel[0], RectangleBox[{0.835, 0}, {0.845, 0}]},
{GrayLevel[0], RectangleBox[{0.845, 0}, {0.855, 0}]},
{GrayLevel[0], RectangleBox[{0.855, 0}, {0.865, 0}]},
{GrayLevel[0], RectangleBox[{0.865, 0}, {0.875, 0}]},
{GrayLevel[0], RectangleBox[{0.875, 0}, {0.885, 0}]},
{GrayLevel[0], RectangleBox[{0.885, 0}, {0.895, 0}]},
{GrayLevel[0], RectangleBox[{0.895, 0}, {0.905, 0}]},
{GrayLevel[0], RectangleBox[{0.905, 0}, {0.915, 0}]},
{GrayLevel[0], RectangleBox[{0.915, 0}, {0.925, 0}]},
{GrayLevel[0], RectangleBox[{0.925, 0}, {0.935, 0}]},
{GrayLevel[0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{GrayLevel[0], RectangleBox[{0.945, 0}, {0.955, 0}]},
{GrayLevel[0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{GrayLevel[0], RectangleBox[{0.965, 0}, {0.975, 0}]},
{GrayLevel[0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{GrayLevel[0], RectangleBox[{0.985, 0}, {0.995, 0}]},
{GrayLevel[0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{GrayLevel[0], RectangleBox[{1.0050000000000001`, 0}, {1.015, 0}]},
{GrayLevel[0], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{GrayLevel[0], RectangleBox[{1.0250000000000001`, 0}, {1.035, 0}]},
{GrayLevel[0], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{GrayLevel[0], RectangleBox[{1.0450000000000002`, 0}, {1.055, 0}]},
{GrayLevel[0], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{GrayLevel[0], RectangleBox[{1.0650000000000002`, 0}, {1.075, 0}]},
{GrayLevel[0], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{GrayLevel[0], RectangleBox[{1.0850000000000002`, 0}, {1.095, 0}]},
{GrayLevel[0], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{GrayLevel[0], RectangleBox[{1.1050000000000002`, 0}, {1.115, 0}]},
{GrayLevel[0], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{GrayLevel[0], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.135, 0}, {1.1449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.155, 0}, {1.1649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.175, 0}, {1.1849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.195, 0}, {1.2049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.215, 0}, {1.2249999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.235, 0}, {1.2449999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{GrayLevel[0], RectangleBox[{1.2550000000000001`, 0}, {1.265, 0}]},
{GrayLevel[0], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{GrayLevel[0], RectangleBox[{1.2750000000000001`, 0}, {1.285, 0}]},
{GrayLevel[0], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{GrayLevel[0], RectangleBox[{1.2950000000000002`, 0}, {1.305, 0}]},
{GrayLevel[0], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{GrayLevel[0], RectangleBox[{1.3150000000000002`, 0}, {1.325, 0}]},
{GrayLevel[0], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{GrayLevel[0], RectangleBox[{1.3350000000000002`, 0}, {1.345, 0}]},
{GrayLevel[0], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{GrayLevel[0], RectangleBox[{1.3550000000000002`, 0}, {1.365, 0}]},
{GrayLevel[0], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{GrayLevel[0], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.385, 0}, {1.3949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.405, 0}, {1.4149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.425, 0}, {1.4349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.445, 0}, {1.4549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.465, 0}, {1.4749999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.485, 0}, {1.4949999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{GrayLevel[0], RectangleBox[{1.5050000000000001`, 0}, {1.515, 0}]},
{GrayLevel[0], RectangleBox[{1.5150000000000001`, 0}, {1.525, 0}]},
{GrayLevel[0], RectangleBox[{1.5250000000000001`, 0}, {1.535, 0}]},
{GrayLevel[0], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{GrayLevel[0], RectangleBox[{1.5450000000000002`, 0}, {1.555, 0}]},
{GrayLevel[0], RectangleBox[{1.5550000000000002`, 0}, {1.565, 0}]},
{GrayLevel[0], RectangleBox[{1.5650000000000002`, 0}, {1.575, 0}]},
{GrayLevel[0], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{GrayLevel[0], RectangleBox[{1.5850000000000002`, 0}, {1.595, 0}]},
{GrayLevel[0], RectangleBox[{1.5950000000000002`, 0}, {1.605, 0}]},
{GrayLevel[0], RectangleBox[{1.6050000000000002`, 0}, {1.615, 0}]},
{GrayLevel[0], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{GrayLevel[0], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.635, 0}, {1.6449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.645, 0}, {1.6549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.655, 0}, {1.6649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.675, 0}, {1.6849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.685, 0}, {1.6949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.695, 0}, {1.7049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.715, 0}, {1.7249999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.725, 0}, {1.7349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.735, 0}, {1.7449999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{GrayLevel[0], RectangleBox[{1.7550000000000001`, 0}, {1.765, 0}]},
{GrayLevel[0], RectangleBox[{1.7650000000000001`, 0}, {1.775, 0}]},
{GrayLevel[0], RectangleBox[{1.7750000000000001`, 0}, {1.785, 0}]},
{GrayLevel[0], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{GrayLevel[0], RectangleBox[{1.7950000000000002`, 0}, {1.805, 0}]},
{GrayLevel[0], RectangleBox[{1.8050000000000002`, 0}, {1.815, 0}]},
{GrayLevel[0], RectangleBox[{1.8150000000000002`, 0}, {1.825, 0}]},
{GrayLevel[0], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{GrayLevel[0], RectangleBox[{1.8350000000000002`, 0}, {1.845, 0}]},
{GrayLevel[0], RectangleBox[{1.8450000000000002`, 0}, {1.855, 0}]},
{GrayLevel[0], RectangleBox[{1.8550000000000002`, 0}, {1.865, 0}]},
{GrayLevel[0], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{GrayLevel[0], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.885, 0}, {1.8949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.895, 0}, {1.9049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.905, 0}, {1.9149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.925, 0}, {1.9349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.935, 0}, {1.9449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.945, 0}, {1.9549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.965, 0}, {1.9749999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.975, 0}, {1.9849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.985, 0}, {1.9949999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.995, 0}, {2.005, 0}]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Frame->True,
FrameTicks->False]], "Output",
CellChangeTimes->{{3.662579824150284*^9, 3.662579924329763*^9},
3.662580001591158*^9, 3.662580129220911*^9, 3.662580190033875*^9,
3.6625804772897387`*^9, 3.6625808070482807`*^9, {3.662597555326487*^9,
3.662597570713022*^9}, 3.662597616287258*^9, {3.6625977115981693`*^9,
3.662597727615457*^9}, 3.6625978257474337`*^9, 3.662598347566922*^9,
3.662598391504985*^9, 3.662598461155345*^9, {3.663807785908943*^9,
3.663807796052938*^9}, 3.6638079700186777`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[",
RowBox[{"competitionplot", ",", "\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "4", ",", "u", ",", "tryKm"}],
"]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2"}], ",", "2"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Thick", ",", "Black", ",", "Dashed"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]", "histoplot", ",",
RowBox[{"Axes", "\[Rule]",
RowBox[{"{",
RowBox[{"True", ",", "False"}], "}"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.662579485856509*^9, 3.662579491127986*^9}, {
3.6625802104607067`*^9, 3.662580220555599*^9}, {3.662580463397059*^9,
3.6625804711235657`*^9}, 3.6625805460433283`*^9, {3.662580792465548*^9,
3.662580793041589*^9}, 3.662597548784338*^9, 3.66259849052735*^9}],
Cell[BoxData[
GraphicsBox[{{{}, {},
{GrayLevel[0], Thickness[Tiny], LineBox[CompressedData["
1:eJwt13k4Vd33APCQMhRCeitklkjUG73C2RFJEcpQGogSShpQ6V5DikTmMmW4
R0J1G1QiWZR5yJg57r3GzJJ5uL/9fZ7fH+c5z+c5f+x11l57rXOkz1+1uMC5
atWqUXz9765KiA2x2WxYc+mzc6dMOLo6Lxs0v8AG8faudrZCOHqbra4wNc2G
i4ysQDnlcLR7u8n5/mE2JOgdiLm2Jxxpbghor25hw+GigsAtB8MR6pmsjHvD
BtNW3dUZF8KRRWDNyz3n2HDDx1k+OzMcedUGXHEqWAH2+Pqqp3sjUFMT/1CR
/TII6n0L+uEZiSQKr4pqii8B+fqZ8+3cKPTRtZhb8NcClKChorv8McguRH2i
zX8ezP1cRNQin6C5SO8gIObgY16lg51oLCIFujbHMmdA/5K6jnB1HEo0Vr/e
+HAa7BdYfkRoAvK/bH9L6fBfMI6qRNlaz5A3V5bX9dE/MLn9yFteoWRk71sr
15wxCYZxQ1x77FJQzNe+2ESXCZhJ36CrpJKK8rq3r3slMwbPSM6mb/Op6K42
x+v4f8ZA6vRIaNxSKtKJazN5KDAG4b+Lpt3YqajQIjjs4sIopMz4lG/kpqGy
kmFh6YZRCKW6HzkuRENNL+mbn/iNQkmpkVmIAg2Nef2r6MsYAX7XrOQhcxqS
FUJ6J5KGgagM5V4kaeixGvOOS9QwWF+1+5mWTkNzZv7ZvkHD4Kw8H380k4aq
I4rlXl8fhkapfewYOg3dFDm8ds2hYXjVofZHMJeGSsUsqnPGhyBXMO5TUg0N
uUg4Wm09MAR5ywFBm6dxPDrcYeoaQ+AW5iZJnaUh3bPpZYeUh6B2531nxjwN
iSQP7ru5cQgklZw2Ja3QUL7Ula01v3+DhTQlYXktiQTkPBnUyN9gvvtH9JEt
JHq/I8iF1TMI3M+H1ovpkGhbvV2uctsgNL7KrpclSBTi9R+Px49BWOe4LL/r
AIkuFA89X5s7CIJ/jt3WNSDRP2dNmCqPB8Fh60QCYUIiSoSwjde+QZAOFj5b
eZpERnOJButCB8CfWRoxc5tEH5M8oi39B6Amok4725tEMgamPUleA7A9zszg
CoVEixFsX/XzA9AeVXqpzZdEdOXz+VaaAyDG8qqLCCSR6DnFPanMfsgIzWL4
RZOou+SdlIZGP5T6wynLVyS6e3z+4D6VfhAquDlLe43jYyJnLZl++Mn3THaM
TiKzpdp3ugL9sOR0VIHyjkSFu8f0DvX3AaPvZS7lE4lSkndcsHnSB7QibT2e
QhJp77z+8FRIH9zQPHFetYhErXm5r0/798Feaj6nxTcSCTUbzdi59cGhq38L
I4pJ5LfOKdDZsA9SXOO2TJWT6PxtMvPOTC9wX3a/r11PopU1wzV3R3pBV3n9
Qa0GEsVH7/5DZfVC8T2ax95GEjW8KdK696MXODbTVOV+kki/v7vqUXovKM9W
s1itJJI7Lj6WaNULe9q73/Z24/gZDsLJR3thwTrYMJdBotNuLzVS9XrhxsRn
/UdMEkU/1PJ5rtoLdVm81xV7SLS60EaIvqYX/kh/CUH9JOpTidkNn3pAoY29
e3qYRDuoz8cGX/aAKbvZmD5CIrfaj1nCqT3AOVl92HGURHPXmmUuPuoBfS/X
hdIxEvHlbBJZb9cDH/zdRJ0mSXSMZ3uthmUPiCfLHl/7B69/ct8jO+MeaLQa
u5GGLbFkw/Xh3x5YeOJ58ucUidQOxE+d4u0Be4+GtA0zJPKIzHoTsMKC0+dS
emOx83ryXOlTLLhpvodTYhbn40FHD0cXCyIcc5q2zpHIqkq8KeM9C3yVDSun
5nE+xXeGN7xgQVvF3mH7BVwfV3SOLiWywITLsr8a+5LQ2eJjgfh5Qphz3CKJ
vC2TP8zYsuDg+9i4dcs4n+lv3KXMWdBdHeVnj716DlSMDVmQeLIfZWM/jmek
PVNjgbXR2YMmK3i/hifsyuRZYG8/GRiDvUmHQ2JyCwtST+ektmOndEvHHORm
weyJVitbNs632m5ztwUmjC9/nnyCvcNfb33sOBMMelrsa7HdGi0qinqZcM6W
nb56VRrKlnO4P9zGBHdYKtTAnvO4cWBjLRMGnVPeXMDWLru3rFvMhJ2fv16P
wPb7Jzr3Ui4TdvMq8+VhlzqneUTSmXCjsMijG5v/ywf1fJIJI/pnP3JwpCGz
dSWjfbFM8FnuLpfCjj7zM1PwMROcbJXeamO30fsu/HePCay6ba6W2JKrZqQd
bjHBt+nlvAv2efM1XSFXmHCE9dmWgv2CJhb/6TwTFr33RoRgj0wpWDGsmeCp
KBIfi61moCnMZ8KES+6GnqnYHk8O/dijxwSpwVL5F9h5A9bBZzSZwC8flpGJ
vbLvkmGgChPMvieuZGDrB9/ifCeN83NhQvE5dlBHUEG7GBOm34XKJWFXq8Td
Wb2OCaFW3n+jsDdQMzVUOZjgzP396QPsB5+2lwvNMkBMqPCAF/bC2IuTUyMM
6DDoVLyA7aaoOPyTxQBqpoKxGTbrXPrdz60M8Ax8m7EP2ypWXiDhBwPOeIXq
S2JX1qUlU4oZUHqqccv/8qnLK6dul8eA3jPxqkyc7/cHyG96bxmwZ2aJWoCt
cEfmhHw6A6x6N62Lw45/n9q3NpEBo2p8ze7Y/rIpPDWBDCi5vST1D/aM7bb4
NxQGnJgxoA3g+nCJTlKOvMEAm/p5uw/YFtzPTK3PMcCk4OhTA+xSHXHGf5YM
0Io4JMiHreWZcE38CANY+o4lVbgeZQbiopkaDHBvbhwxxH6ybbNCsQoD+F5F
n12FzWcTm5MuwwD/o8cFc3C9T5U/aXcVYIBZY4GqOLYTh9hl09UMkG8efla5
RKJPN3Ys2v/tBugUM/HEfmCpeGCkqhsOC/leLsHnS3GzdM0q727g31uTo4fP
n1DwtomSi93w7RnPrg58XucWJEQeWXTD03b6oDt2eeeWkxt3dIPpcKJcND7f
l1JE+5TaukDKVK4iF/cDsw0iPOPFXdAZXHVGG3uf/wblD2+7ILWtTTN/mkS8
jgLXdIO6oFqg6Wv2XxJlKfIsW2h2QZaZpYQ/7j+RsWuk/pHtAk5e7d9juF/d
4eXW/yXQBUIzIis22MbDHA+d+n/BLZ0Hq+UnSDRMXxS9G/ML0k54Ribi/qei
Ma7yfKoTOOLeKvENkuiiqo9P7q9O2NVGyds/QKJkBcGGmrJOKIiiyrvg/iq8
aZfXTEInBLSi0K+9JJqddSs6dLATLDlv5eni/vwtd8xyKLoDDp5INX7ZRqKl
d9SMFWoHiO2U6snC/X5vlsCisHMHLEGuw4sWEmXEq6bs1+mAT8JbpJ/i+RDq
7TYU0tcOKd17M8zxfLHRGaPu0mgHWWehH3vw/IncS63Xl2qHaMEme84yElXt
FJCz4WuH+0aOYzUlJNKVVK3w7WqDrdweM7bfSSTLviLS8KANPN0+sI4XkGis
cPTFzZZWeHhEQPNDNonuHRyty73VArd3PKITiTh+o5Fj/zq0QJ03a31OPIlW
mQz/oJu0wMVjyZnKcXgeW/6uJmVawJYLEtY9IZHnxb7y0OpmUPTWi3gdhvc3
6FehvVQznDzptXzZn0RHq2ve8pY3gULMU9mRCyQKrqveFfC+CbSj0tvXO+L6
aKqiryQ2gUtc2LLKeRIZ/Kp4NXWtCe6Gnwp1OIvfZ6wk49fWJrA9uI3zvRWe
L0IFKe+uNsKYotrbn4Yk2niCHn5yUwM40xvG9eXx94/CozwDrgawMvrSul8W
19e8U6/6eD1sPXbsvbo0Xj9Jeh9fWT1Yjx/R2SSB5/dgdHeeZz04LYZ2VIiS
qJ/irSreXAf31TkCfnDh/n0sIvarUi30ibny2jFo6P1MiWC5XCXEqpiGL0TR
0POOvtDfAQWQ/+b5ndOtqeiMufiHDoc0oIftmtoimopy+bx/fvMgCc0690V/
wxS0l8Uh6WcDBNzY+LeqIAnJTnyZ1/pWQfBHlv0V5X+GDpNtNaY2DUQlQ6Bm
QjMBGZgIc01/bCFeGbZbi96JQ2HnWnzVcjoJXelz+ylDT1GZqcR6M2EmUS8l
lHbF9Akald5IbYjvId7ZPw1+1RONPG4q24eJ9RNiq9cku8VEoZZOIYuL5YOE
snCSzA+9SGR3W3tg7dFh4vgmd05uiQj0XVkz+Dv3GPHSKZIzfjgMKfDmD6YZ
TRBBwUYqVaOhSCLf1YA7aJKY5k3wTpQMQasWODOvs/4Qf+pGsiimwWjW/OvZ
Evm/RPwZR+OPBUGo499zW+UDpgnODoda3l2ByN1aaINM5wyx+1qOUnfJfbQ5
utdmtcQcYb1f6efDxwGIbpvyYurWPOEgW1HhZ3UPWev4GJV/XSDiRMe1VA/7
o3dnr8hoLS0SBcf5Jdec8ENzfPpcuZbLROPQw9KLZ3yRRf1+DYnYFSLadiK/
WdAH8e3nL8p/tkIUsus5M3l8UFFa+5HT5AqRXUWJpHD4ILVbt+0T6CuEwdVP
j3ZOUZHAtpyQzSUrxIPn5jUZzVRUcXl3z8Y/K4T37L0q/iQqQjxK4QJH2URt
78fPFFUq/n6a20I3ZxP03PehTxWp6E1H2XMTazYRPqAZkS1FRZJvLn4JOc8m
JHmDpf4IU9GSZVo/3202sWikePjhLAXlkNt01qaziZR+Vb5tRRTktn68LP0l
mzCf6HS0zaMgBa8CC8N3bEJ10zQjLpuCoo3PXLqfzyaKahW1JNIp6PpkfBRX
I45nlvuUziMK2mHrIkm2somjydcygwMoiFn8X6ZeF5tw39oq0k6hILPY1gK/
32xCQtFRw8edgng4Mw5Lj7OJ/obJkSZnCgJXr6bCv2xi9KHxFxUHCvL8aXjO
boFNDO0gUx6cpqD//38lRvvUElmWFPR/Y8/GEQ==
"]]}}, {{}, {},
{GrayLevel[0], Thickness[Large], Dashing[{Small, Small}],
LineBox[CompressedData["
1:eJwt2Hk4VO/7B3BClkqyFEVliRYK+aSUzk0kStmXKFK2ylSyhWypVCohHyHL
HCkqbVpI3fIhFBWJLDGLZRhrJMYyv/O9rt9f53pdZ55nzjNz3+/nuY6yxykb
z3kCAgLqggIC/7tuJJb28/l8pIWY8T1kDsCpKdW4KR4fnxywPZhqdQCevtBR
H/vDx/5FdUc23zgAumstPXq4fOT+Vti2X8QK9JfEttY28zE6ony3WqwVAHv0
050nfBTivEsvvWYNNpfrHm524+PRgeQF3hW2kGTUZq51kI+4BiRb+2yhcZrT
q27PxwZXx6Vxi+3A4bSw2vK9fBwedjVJcbEDF+ftGQL6fEw7ZxQeM2EHxzbk
x9dJ8nFaSqPuh74DBH+N9fN+P4cXto01m/U7QTw3qHn8zRz27vljcHaFM9BF
fY1iXszhpVMbFYb2OUMtYSl398EcPpgqLfj+1BlUnsq9a0icQ+ENNb+8ww/C
l4S8hTu951A+Xj9unqorqNtUP5SVmsOVvLWZ/k/dYAetRI4uMYdnty05YDDg
BtZXH0VuEpnDlKpXNhtl3SG8PMHWgjeL16ve2bZYuUODrvN0ZNcs5pneZjjU
usN5mX4L7ptZ5JcYSy6rPQKNjQv6PxyZRd1fK7sYw0ch+tjL9w9dZ1F2dSHN
Y8kx2Dh+OOm24yxqHU7eLbX5GMTJPN/hazmL4t8Djo8GHQNDG6ebUttm0TjJ
2bZOwBPyvubquUnNYuuurAlxJS8I+WQYOfN+Bj9oFTbEhvjAmoO9tj3FM2i4
8EFYQ5YPNPQlrP1WNIOSy+MeWVX5gKZ4Vz1ZMIO7PwhodC71BabZVbW9KZTz
C/hmb3zBorKp5o7fDIqsOcY+JnwClMpOyeorzmAof2tzTrkf1Er/E2CwbAZr
x9xVHYf9INST991QegY3Kp19s1ORBk0SF5NMxGawb4Smfi+IBgn2adI249Po
OtLHqdc6BULcCim/2mnUOn8pk2FzGvrkli8iw6exT6h8vlXHGUj16TyZFzyN
HvQnGr1/z8Dut7m1+f7T+Hn9ICd1iT/Q3TfFP/WZxri24sB9pv7g+tBkwXu7
aTRXe9Q4/tgfvsIp8RbNacx7FqZrG3sWXp6oEFn8i4dfrWLULpoGwtbVNJ28
Zh66PHG7P3ksEEoalx0ybODhQC63Kj42EMoMTxSdqOJh3o+nwssqAuHTYumj
1c94SLh/sS8yCQLGC7ey6Es81GRbLlDYFwwSM7zQ8U08HFSmTb46ew7c43VG
WmKmEByXR4poREBoUeKluvNTKHjTq2jlvgi43T6m+CFkCu/bDvfbnYmAT5qv
zB/QpvBQW/x++dII2FxnQAYdnMKSF7uu8mwiYb6kiYOM7hSmTD26KrsrCh7d
dCjdx5zEDwPDj4Wio2EyMSwOiUkcnvj8ckY9FkjJDoVU5gSahboPnEq5ChkW
Ov7fr/zB5zUDXPyeADEnj4SsMx/Hg0PtglM2yRAmVBDsP/gbi17pXC7QSIUj
UV/Vmh6Mous/H1L+pqTD7XfdqRnHR/BKzYupvwWZcDgkLULfcwSTRptXRL3O
hLWbDxxrcBtBkZa1ZwQqMqHkwZtNYvYjeFQ+IKmvPRM6kq59PEuMYCr3v1pX
ySzQOK4zbiE7ggXTy3/jqSzw1+Jl/g4bxk+KPy8oL82Gks61Cx+pDGG1f/zY
4cpsCN8h+DhNfghLJNTW633KBsM7LZZXJIfwlvtjY5Gv2VBmc/WmF28QG08I
Saf/zIaqSq60csMgzqtaPJHMzYbGh4UKKdGDqKPANS+TyoGhYD2NKMYAakQN
Lux3zIGnjQuraU0DGHNLb89W1xw4o9Ptc6h2AEVopnox7jkw3n+7wODNAO7k
aS0X982B6UN/tf7cpMaPms6xzuWAmEmJ3nFiAA+4aZh8TMsBVSkwtsvkYvZZ
5XaTlhy4oc0MPZ7ERTWjJcJOv3Jg0irmRVQcF016k2c9mTlQe6tC7bE/FzMq
NI/69+VAgIy56HwzLvqWreTum8qBj0ttal8P92PYurE0MXk6HFc65rDCqB9l
Uv/zuWNNh0ZDkZs6W/pR54WDyXx7Ouw8nFdltqEfHfUPDvk50UEmi7M1QK4f
Lbs2PdFyo0Ppar8VdX19aOAiPEI7SQdJtSBGRGIfXuoT7Jq8SIfn6+OOs9gc
lNhVkbHpJR1W1bsXb2jhYIFyQmz/azrEB28TC/zCQaHRGzHZJXTwrOi/J1rM
wclPKZWzSAf5w5ZMzRscTF6+PO78JzqcvyXtFLyVg7nmtdJJHXTo1+fmlWlx
sLVIa4jPoINDx39/xFU52CE7OubNpoP2hsCkjEUcrCw/FLuOQwdWRfOXD6xe
5LqosvxH6bBnMsN04fVePH35J3eVEAkvMwOT7WN68e21blUQIUHFdD87M7gX
J2ajs1xESZi+xY/S8ehF79MOPrELSCjc4FHqoN+Lif8yztyVIUHWTWNzDrMH
c2+pzg2pkNBZ+Wz1li092Ho6L1NpJwnhtlMmWzV78OeEzJGbBAnyTPA1UOlB
rsK37bNAgtXM12c7JXtQyd7TqG4XCWW6Q8ZmPd3ofbYXd5qTkJ213tMppRvp
Uy7rfG1J2KHlf+VgfDc+fhRjedeOhJ8lxY9dY7oxsOT7/Tp7EqSa9ky407rx
SfLb+apOJEQv9L7su7sbF9Mu52a7kuBxjswPnejC2EqOUt8xEubmc+vCB7rw
sh2RyPQkIS1Z93cEqwu16ZWuTV4kNDz5YHDhSxeGaN+bKfIhYVdP5+dreV0Y
ac7N2X2SBMZZjZHrGV240mVIUMWPWq/gKdmExC78LPKjeopykeKca3JEFx4/
+DEp8xQJaraKQxkOXWi7g+H8zp9aL+OodNa+Lvwzk64ZfpYEV9rDLTnGXdjo
ah+sH0BC8hWDyHsbuzD0o+95MpAE4TInqcL51P0AoSvWIdTvY5mt93SGjTYO
8U7jlHe09To9/83GZ/aXnyWdIyFgIijnVQcbJSzyxKpDSejWvK2Lr9h4ciT+
iuh5EtZH3BviPGTjId7WjWmUaV9fFkjnsHHFc4UfayNImDzTpOJ1jY207316
BpHU/P/1dNyMYuNdxdtjpZSjZf+mFQeycX/5AG6PIkHi9TKZRe5sXFOjcV0r
moQDYmu/brFnY+ar+qRsysnOW6+5W7BRVPzli8UxJCjNOAkV6bGRE1huwaLs
YemLv9ZRn68srTK9QEJe5rkw0VVs/NCY4HuPsrZR2thBcTZ+f+uv4RxLQmBi
wZPYORZq+DubP6Zcwi45UTjGwqnkz+mzlHddamMLdrBQiS7ZkXiRhLhmbtaG
7yw8LV/2vZly7doZF/tqFjYJvRdRuESCw2fFxgfPWWhQ7rs+gXKaolZCw30W
5jfPqXyk3OlnuG8mg4VdzYVHJymroaWYeiILbeDUsPplEnykDlccuMxCC2JL
jTXlx0doUefCqfGPeGMhlH8/j9hBnmGh9bwi/wzKW4RvTtZ6sbDN7uCeUsph
9llFEy4s1N7XE/yTclnek9OrrVloqmgtPEpZeBI1LXazsOp88ohIHAnm5t84
Z7ezsC+vgFhG+UYaI/euNjXe5Ma4GuUG7oh71RoWmpwxkN5EeZmhoNLocha2
PytI/4ey640lLculWHinvzVpK+XsTuXbJiIsFD9YNatPuVtb15rGY2LGrZPt
mymvjzFelDrMxBe0Kl1NyrTvNjUfupj4SOaHkDLlF2pHL3JbmDiPmWgjTXky
8KyR3FcmnqXNKQtQ3lF1YXZnBRM3x8oF9lPriZZPLvYpZqKybNP+esoffXMD
EwuZKLt55/MiygveFumUkkxcJb2PnkzZamHlYHcqEyf/ziqfoZx86Ef+4htM
tDWw0bOg3FLY7bntAhPt9M3aV1FeKTChfDSEicIH2hR/U/+Xh/X8jng/Jra3
L5wqozwwpu7AcGSixTWjBDvK2qb60hKWTFwqbWT9v3oITDH7stmYifilqbiV
qpe5rT67L2tSti69bkt519WQec+UmWjvIsqX+F99tcW9b13KRI5spypS9bck
In/LRkEm7shfm6xE+dKrtdVSfxnY+m9nUR1Vz7yh+85jAww0+neNQBhlllte
+JufDDxhJLO6juqH50ZkufFTBr59bFdzgOof9VAVuzV5DNy/2TOmj+q3tOc5
3aIZDEzr9DwXRTlGNVus7jIDbfKZ6/Oo/rQRubvf0Y2B36asO79R/f3RUJGx
zZ6BTgaBn+0oGwSln1Hcy8DByHqxpnAq/3vvJDO3MND9/reob2EkjFWntJ6Q
ZOCu/IX596g80VBQrhMI68T+Uy9GG6h8krq6aqTSqxNXaQdLaVGe5CnJXLPp
RMWszLxYKs+q25c7y63vxMWm8caaVN75ZMt2r2vpQA9FdughKg8LNMRmbfQ7
8IXvMM/cl4TE1Pmr5VU7UNiPnR9O5W2ouMiuX5IdKLCt8M8jbxIsuIJXvHt+
obKwqN98Kp+5hdOy4bd/4YpV5ivuepCguWVY895YO1q6Cwa7uJDgtTEysvhX
O254+CXf7iAJWeqLG+qq2vFKubrBXmcSpJdtCp5Ib0eVjZwIbUcS/v6lfTAz
acevHmc4bTYklBcP2fcnt2GCQGLRG2o/cjIciti0pRWll1qQd/+hnvefiPpd
q1uxNV1m3EyPhM9akmpOEq1omdrMG9YlYefKjTVRHS146xhHb5s2Cap8P5mG
Sy2488jf3KfrSRgqG7wf0PwTRweHSv9ZRcIFk8FvxSHN6GC4+0HBfOr79wwc
0DvajHe3i+jKU/uzgCX3S6FlM27Ys+jHBWr/DrfvqyVVmtHio8xpewESgry6
q6/XNqFE5P5trCk6+MT9KjuyugmTTJsX5g7QYV9t3VPx6kasTp360/yNDnJ2
hQnOyxrQ5p7Y4YBk6vyifq3EVKgB/630EktPpIPVlHeXznA9mvwuDi9LoMPV
TOWtElX1uD1Eukb0Oh3mOMmdJUH1WOcnoBBHnX96zodtVGz6hrvl3zRaBdGB
duBW6rt1XzGzbdh7oSM1/0Tl4mq1T7hY2qs2QI4O99q6r/fFvkeVRIEFd8Ny
4JC1YlHb0VwUvzjxYhEzG4olwn6UB5JEelXHCQPjbPiHJbgy2gmJTcYB3odW
Z4HqyNspg/IaIpAbE19RexfMyZa6/U4NRFrUQ1qXYwaYWkoL/XnZTIRevyeZ
3psGN92ao7RftxMWT8UY2gl3oGq/0iIraSbR/vnYd45SKgwqy0U0pLGJZH7w
6qmqFAgM2HDk5tIeQq6Wf/jN+dvQ3C5l41XNIfgts3GeK5PB/dyOXtF9XKJF
PKE+uCMR/tugf/U/kSFiQHTVo9Drt0BdvJSTu2eEuOOnJSZ5KAGUSk+YisSN
ElXZkvWioTdAgDcv35/1m3ifJCc9oxwPf63fHa5cM06M17PHPCWuQpue24o1
sX+I9169KRnMy3DaUWqJSvsEcb13eH5s50VQSO5yElaaJGYTzR78UoiFQpfs
+2MhU0R6bNUFN4sYcDSM3FP9jkdkuuhN7yiKgmeH/VQMZqaJHJU9amHnI2BS
YpdQsf0s8Tk4JWrvlTCwqd++RSl1jnCzmzhBmwoBie0LPpTenSNmjFJ7fIZC
4ENu615Xco4YapqY580OAe2Qc0fSC+eIS02tK2l1ISC56nW8QuUc0dtd3ng/
JwRqTuqy5X7PEZHvtlRUW4QAiK1LkNzHJwJ9R3mlWcHU+WJyeaE1n1jfJfNg
/e1geNJWdc/SkU+k5PZ0p18NhpVPvN7Ge/CJ6z+9l1wJDIYZ+9weiXN8oifa
Xv7G3mB4Ta4yFM3jE6ulf/oYTwYBbdFwVd5DPjHzXqeDMxgE6sHvbXY/4xOv
Jc3aEtlBkGxxyOdiKZ9Y0X3o+OiXIPAfTUsS+s4ntAp21v68FwTrXY6vJH/y
Ccf4c6fS04OAWbEt37iDTzjUtN0+cisIrFJ/vo/uo55Xt8p3MjwIxOY9MFce
5hMSGmuX1vgHAZ4Ibiwb5xPu4u677voEQdCP3W7uPD5xX751JOBwEPz/+ySi
xUZwpZVdEPwf5Y2anQ==
"]]}},
{GrayLevel[0], EdgeForm[GrayLevel[0]],
{GrayLevel[0], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{GrayLevel[0], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{GrayLevel[0], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{GrayLevel[0], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{GrayLevel[0], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{GrayLevel[0], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{GrayLevel[0], RectangleBox[{-1.9349999999999998`, 0}, {-1.925, 0}]},
{GrayLevel[0], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{GrayLevel[0], RectangleBox[{-1.9149999999999998`, 0}, {-1.905, 0}]},
{GrayLevel[0], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{GrayLevel[0], RectangleBox[{-1.8949999999999998`, 0}, {-1.885, 0}]},
{GrayLevel[0], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{GrayLevel[0], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.865, 0}, {-1.8550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.845, 0}, {-1.8350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.825, 0}, {-1.8150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{GrayLevel[0], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{GrayLevel[0], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{GrayLevel[0], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{GrayLevel[0], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{GrayLevel[0], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{GrayLevel[0], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{GrayLevel[0], RectangleBox[{-1.6849999999999998`, 0}, {-1.675, 0}]},
{GrayLevel[0], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{GrayLevel[0], RectangleBox[{-1.6649999999999998`, 0}, {-1.655, 0}]},
{GrayLevel[0], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{GrayLevel[0], RectangleBox[{-1.6449999999999998`, 0}, {-1.635, 0}]},
{GrayLevel[0], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{GrayLevel[0], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.615, 0}, {-1.6050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.595, 0}, {-1.5850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.575, 0}, {-1.5650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{GrayLevel[0], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{GrayLevel[0], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{GrayLevel[0], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{GrayLevel[0], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{GrayLevel[0], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{GrayLevel[0], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{GrayLevel[0], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{GrayLevel[0], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{GrayLevel[0], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{GrayLevel[0], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{GrayLevel[0], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{GrayLevel[0], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{GrayLevel[0], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{GrayLevel[0], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{GrayLevel[0], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{GrayLevel[0], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{GrayLevel[0], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{GrayLevel[0], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{GrayLevel[0], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{GrayLevel[0], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{GrayLevel[0], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{GrayLevel[0], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{GrayLevel[0], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{GrayLevel[0], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{GrayLevel[0], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{GrayLevel[0], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{GrayLevel[0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{GrayLevel[0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{GrayLevel[0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{GrayLevel[0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{GrayLevel[0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{GrayLevel[0], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.935, 0}, {-0.925, 0}]},
{GrayLevel[0], RectangleBox[{-0.925, 0}, {-0.915, 0}]},
{GrayLevel[0], RectangleBox[{-0.915, 0}, {-0.905, 0}]},
{GrayLevel[0], RectangleBox[{-0.905, 0}, {-0.895, 0}]},
{GrayLevel[0], RectangleBox[{-0.895, 0}, {-0.885, 0}]},
{GrayLevel[0], RectangleBox[{-0.885, 0}, {-0.875, 0}]},
{GrayLevel[0], RectangleBox[{-0.875, 0}, {-0.865, 0}]},
{GrayLevel[0], RectangleBox[{-0.865, 0}, {-0.855, 0}]},
{GrayLevel[0], RectangleBox[{-0.855, 0}, {-0.845, 0}]},
{GrayLevel[0], RectangleBox[{-0.845, 0}, {-0.835, 0}]},
{GrayLevel[0], RectangleBox[{-0.835, 0}, {-0.825, 0}]},
{GrayLevel[0], RectangleBox[{-0.825, 0}, {-0.815, 0}]},
{GrayLevel[0], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{GrayLevel[0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{GrayLevel[0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{GrayLevel[0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{GrayLevel[0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{GrayLevel[0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{GrayLevel[0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{GrayLevel[0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{GrayLevel[0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{GrayLevel[0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{GrayLevel[0], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{GrayLevel[0], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{GrayLevel[0], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.685, 0}, {-0.675, 0}]},
{GrayLevel[0], RectangleBox[{-0.675, 0}, {-0.665, 0}]},
{GrayLevel[0], RectangleBox[{-0.665, 0}, {-0.655, 0}]},
{GrayLevel[0], RectangleBox[{-0.655, 0}, {-0.645, 0}]},
{GrayLevel[0], RectangleBox[{-0.645, 0}, {-0.635, 0}]},
{GrayLevel[0], RectangleBox[{-0.635, 0}, {-0.625, 0}]},
{GrayLevel[0], RectangleBox[{-0.625, 0}, {-0.615, 0}]},
{GrayLevel[0], RectangleBox[{-0.615, 0}, {-0.605, 0}]},
{GrayLevel[0], RectangleBox[{-0.605, 0}, {-0.595, 0}]},
{GrayLevel[0], RectangleBox[{-0.595, 0}, {-0.585, 0}]},
{GrayLevel[0], RectangleBox[{-0.585, 0}, {-0.575, 0}]},
{GrayLevel[0], RectangleBox[{-0.575, 0}, {-0.565, 0}]},
{GrayLevel[0], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 18}]},
{GrayLevel[0], RectangleBox[{-0.555, 0}, {-0.545, 223}]},
{GrayLevel[0], RectangleBox[{-0.545, 0}, {-0.535, 732}]},
{GrayLevel[0], RectangleBox[{-0.535, 0}, {-0.525, 1000}]},
{GrayLevel[0], RectangleBox[{-0.525, 0}, {-0.515, 488}]},
{GrayLevel[0], RectangleBox[{-0.515, 0}, {-0.505, 92}]},
{GrayLevel[0], RectangleBox[{-0.505, 0}, {-0.495, 8}]},
{GrayLevel[0], RectangleBox[{-0.495, 0}, {-0.485, 0}]},
{GrayLevel[0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{GrayLevel[0], RectangleBox[{-0.475, 0}, {-0.46499999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{-0.465, 0}, {-0.455, 0}]},
{GrayLevel[0], RectangleBox[{-0.455, 0}, {-0.445, 0}]},
{GrayLevel[0], RectangleBox[{-0.445, 0}, {-0.435, 0}]},
{GrayLevel[0], RectangleBox[{-0.435, 0}, {-0.425, 0}]},
{GrayLevel[0], RectangleBox[{-0.425, 0}, {-0.415, 0}]},
{GrayLevel[0], RectangleBox[{-0.415, 0}, {-0.40499999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{-0.405, 0}, {-0.395, 0}]},
{GrayLevel[0], RectangleBox[{-0.395, 0}, {-0.385, 0}]},
{GrayLevel[0], RectangleBox[{-0.385, 0}, {-0.375, 0}]},
{GrayLevel[0], RectangleBox[{-0.375, 0}, {-0.365, 0}]},
{GrayLevel[0], RectangleBox[{-0.365, 0}, {-0.355, 0}]},
{GrayLevel[0], RectangleBox[{-0.355, 0}, {-0.345, 0}]},
{GrayLevel[0], RectangleBox[{-0.34500000000000003`, 0}, {-0.335, 0}]},
{GrayLevel[0], RectangleBox[{-0.335, 0}, {-0.325, 0}]},
{GrayLevel[0], RectangleBox[{-0.325, 0}, {-0.315, 0}]},
{GrayLevel[0], RectangleBox[{-0.315, 0}, {-0.305, 0}]},
{GrayLevel[0], RectangleBox[{-0.305, 0}, {-0.295, 0}]},
{GrayLevel[0], RectangleBox[{-0.295, 0}, {-0.285, 0}]},
{GrayLevel[0], RectangleBox[{-0.28500000000000003`, 0}, {-0.275, 0}]},
{GrayLevel[0], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{GrayLevel[0], RectangleBox[{-0.265, 0}, {-0.255, 0}]},
{GrayLevel[0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{GrayLevel[0], RectangleBox[{-0.245, 0}, {-0.235, 0}]},
{GrayLevel[0], RectangleBox[{-0.23500000000000001`, 0}, {-0.225, 0}]},
{GrayLevel[0], RectangleBox[{-0.225, 0}, {-0.215, 0}]},
{GrayLevel[0], RectangleBox[{-0.215, 0}, {-0.205, 0}]},
{GrayLevel[0], RectangleBox[{-0.20500000000000002`, 0}, {-0.195, 0}]},
{GrayLevel[0], RectangleBox[{-0.195, 0}, {-0.185, 0}]},
{GrayLevel[0], RectangleBox[{-0.185, 0}, {-0.175, 0}]},
{GrayLevel[0], RectangleBox[{-0.17500000000000002`, 0}, {-0.165, 0}]},
{GrayLevel[0], RectangleBox[{-0.165, 0}, {-0.155, 0}]},
{GrayLevel[0], RectangleBox[{-0.155, 0}, {-0.145, 0}]},
{GrayLevel[0], RectangleBox[{-0.14500000000000002`, 0}, {-0.135, 0}]},
{GrayLevel[0], RectangleBox[{-0.135, 0}, {-0.125, 0}]},
{GrayLevel[0], RectangleBox[{-0.125, 0}, {-0.11499999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{-0.115, 0}, {-0.105, 0}]},
{GrayLevel[0], RectangleBox[{-0.10500000000000001`, 0}, {-0.095, 0}]},
{GrayLevel[0], RectangleBox[{-0.095, 0}, {-0.08499999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.085, 0}, {-0.075, 0}]},
{GrayLevel[0], RectangleBox[{-0.07500000000000001, 0}, {-0.065, 0}]},
{GrayLevel[0], RectangleBox[{-0.065, 0}, {-0.055, 0}]},
{GrayLevel[0], RectangleBox[{-0.055, 0}, {-0.045000000000000005`, 0}]},
{GrayLevel[0], RectangleBox[{-0.045, 0}, {-0.035, 0}]},
{GrayLevel[0],
RectangleBox[{-0.034999999999999996`, 0}, {-0.024999999999999998`, 0}]}, \
{GrayLevel[0], RectangleBox[{-0.025, 0}, {-0.015, 0}]},
{GrayLevel[0], RectangleBox[{-0.015, 0}, {-0.005, 0}]},
{GrayLevel[0], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{GrayLevel[0], RectangleBox[{0.005, 0}, {0.015, 0}]},
{GrayLevel[0], RectangleBox[{0.015, 0}, {0.025, 0}]},
{GrayLevel[0],
RectangleBox[{0.024999999999999998`, 0}, {0.034999999999999996`, 0}]},
{GrayLevel[0], RectangleBox[{0.035, 0}, {0.045, 0}]},
{GrayLevel[0], RectangleBox[{0.045000000000000005`, 0}, {0.055, 0}]},
{GrayLevel[0], RectangleBox[{0.055, 0}, {0.065, 0}]},
{GrayLevel[0], RectangleBox[{0.065, 0}, {0.07500000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.075, 0}, {0.085, 0}]},
{GrayLevel[0], RectangleBox[{0.08499999999999999, 0}, {0.095, 0}]},
{GrayLevel[0], RectangleBox[{0.095, 0}, {0.10500000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{0.105, 0}, {0.115, 0}]},
{GrayLevel[0], RectangleBox[{0.11499999999999999`, 0}, {0.125, 0}]},
{GrayLevel[0], RectangleBox[{0.125, 0}, {0.135, 0}]},
{GrayLevel[0], RectangleBox[{0.135, 0}, {0.14500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.145, 0}, {0.155, 0}]},
{GrayLevel[0], RectangleBox[{0.155, 0}, {0.165, 0}]},
{GrayLevel[0], RectangleBox[{0.165, 0}, {0.17500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.175, 0}, {0.185, 0}]},
{GrayLevel[0], RectangleBox[{0.185, 0}, {0.195, 0}]},
{GrayLevel[0], RectangleBox[{0.195, 0}, {0.20500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.205, 0}, {0.215, 0}]},
{GrayLevel[0], RectangleBox[{0.215, 0}, {0.225, 0}]},
{GrayLevel[0], RectangleBox[{0.225, 0}, {0.23500000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{0.235, 0}, {0.245, 0}]},
{GrayLevel[0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{GrayLevel[0], RectangleBox[{0.255, 0}, {0.265, 0}]},
{GrayLevel[0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{GrayLevel[0], RectangleBox[{0.275, 0}, {0.28500000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{0.285, 0}, {0.295, 0}]},
{GrayLevel[0], RectangleBox[{0.295, 0}, {0.305, 0}]},
{GrayLevel[0], RectangleBox[{0.305, 0}, {0.315, 0}]},
{GrayLevel[0], RectangleBox[{0.315, 0}, {0.325, 0}]},
{GrayLevel[0], RectangleBox[{0.325, 0}, {0.335, 0}]},
{GrayLevel[0], RectangleBox[{0.335, 0}, {0.34500000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{0.345, 0}, {0.355, 0}]},
{GrayLevel[0], RectangleBox[{0.355, 0}, {0.365, 0}]},
{GrayLevel[0], RectangleBox[{0.365, 0}, {0.375, 0}]},
{GrayLevel[0], RectangleBox[{0.375, 0}, {0.385, 0}]},
{GrayLevel[0], RectangleBox[{0.385, 0}, {0.395, 0}]},
{GrayLevel[0], RectangleBox[{0.395, 0}, {0.405, 0}]},
{GrayLevel[0], RectangleBox[{0.40499999999999997`, 0}, {0.415, 0}]},
{GrayLevel[0], RectangleBox[{0.415, 0}, {0.425, 0}]},
{GrayLevel[0], RectangleBox[{0.425, 0}, {0.435, 0}]},
{GrayLevel[0], RectangleBox[{0.435, 0}, {0.445, 0}]},
{GrayLevel[0], RectangleBox[{0.445, 0}, {0.455, 0}]},
{GrayLevel[0], RectangleBox[{0.455, 0}, {0.465, 0}]},
{GrayLevel[0], RectangleBox[{0.46499999999999997`, 0}, {0.475, 0}]},
{GrayLevel[0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{GrayLevel[0], RectangleBox[{0.485, 0}, {0.495, 0}]},
{GrayLevel[0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{GrayLevel[0], RectangleBox[{0.505, 0}, {0.515, 0}]},
{GrayLevel[0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{GrayLevel[0], RectangleBox[{0.525, 0}, {0.535, 0}]},
{GrayLevel[0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{GrayLevel[0], RectangleBox[{0.545, 0}, {0.555, 0}]},
{GrayLevel[0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.565, 0}, {0.575, 0}]},
{GrayLevel[0], RectangleBox[{0.575, 0}, {0.585, 0}]},
{GrayLevel[0], RectangleBox[{0.585, 0}, {0.595, 0}]},
{GrayLevel[0], RectangleBox[{0.595, 0}, {0.605, 0}]},
{GrayLevel[0], RectangleBox[{0.605, 0}, {0.615, 0}]},
{GrayLevel[0], RectangleBox[{0.615, 0}, {0.625, 0}]},
{GrayLevel[0], RectangleBox[{0.625, 0}, {0.635, 0}]},
{GrayLevel[0], RectangleBox[{0.635, 0}, {0.645, 0}]},
{GrayLevel[0], RectangleBox[{0.645, 0}, {0.655, 0}]},
{GrayLevel[0], RectangleBox[{0.655, 0}, {0.665, 0}]},
{GrayLevel[0], RectangleBox[{0.665, 0}, {0.675, 0}]},
{GrayLevel[0], RectangleBox[{0.675, 0}, {0.685, 0}]},
{GrayLevel[0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{GrayLevel[0], RectangleBox[{0.695, 0}, {0.705, 0}]},
{GrayLevel[0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{GrayLevel[0], RectangleBox[{0.715, 0}, {0.725, 0}]},
{GrayLevel[0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{GrayLevel[0], RectangleBox[{0.735, 0}, {0.745, 0}]},
{GrayLevel[0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{GrayLevel[0], RectangleBox[{0.755, 0}, {0.765, 0}]},
{GrayLevel[0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{GrayLevel[0], RectangleBox[{0.775, 0}, {0.785, 0}]},
{GrayLevel[0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{GrayLevel[0], RectangleBox[{0.795, 0}, {0.805, 0}]},
{GrayLevel[0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.815, 0}, {0.825, 0}]},
{GrayLevel[0], RectangleBox[{0.825, 0}, {0.835, 0}]},
{GrayLevel[0], RectangleBox[{0.835, 0}, {0.845, 0}]},
{GrayLevel[0], RectangleBox[{0.845, 0}, {0.855, 0}]},
{GrayLevel[0], RectangleBox[{0.855, 0}, {0.865, 0}]},
{GrayLevel[0], RectangleBox[{0.865, 0}, {0.875, 0}]},
{GrayLevel[0], RectangleBox[{0.875, 0}, {0.885, 0}]},
{GrayLevel[0], RectangleBox[{0.885, 0}, {0.895, 0}]},
{GrayLevel[0], RectangleBox[{0.895, 0}, {0.905, 0}]},
{GrayLevel[0], RectangleBox[{0.905, 0}, {0.915, 0}]},
{GrayLevel[0], RectangleBox[{0.915, 0}, {0.925, 0}]},
{GrayLevel[0], RectangleBox[{0.925, 0}, {0.935, 0}]},
{GrayLevel[0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{GrayLevel[0], RectangleBox[{0.945, 0}, {0.955, 0}]},
{GrayLevel[0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{GrayLevel[0], RectangleBox[{0.965, 0}, {0.975, 0}]},
{GrayLevel[0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{GrayLevel[0], RectangleBox[{0.985, 0}, {0.995, 0}]},
{GrayLevel[0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{GrayLevel[0], RectangleBox[{1.0050000000000001`, 0}, {1.015, 0}]},
{GrayLevel[0], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{GrayLevel[0], RectangleBox[{1.0250000000000001`, 0}, {1.035, 0}]},
{GrayLevel[0], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{GrayLevel[0], RectangleBox[{1.0450000000000002`, 0}, {1.055, 0}]},
{GrayLevel[0], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{GrayLevel[0], RectangleBox[{1.0650000000000002`, 0}, {1.075, 0}]},
{GrayLevel[0], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{GrayLevel[0], RectangleBox[{1.0850000000000002`, 0}, {1.095, 0}]},
{GrayLevel[0], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{GrayLevel[0], RectangleBox[{1.1050000000000002`, 0}, {1.115, 0}]},
{GrayLevel[0], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{GrayLevel[0], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.135, 0}, {1.1449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.155, 0}, {1.1649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.175, 0}, {1.1849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.195, 0}, {1.2049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.215, 0}, {1.2249999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.235, 0}, {1.2449999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{GrayLevel[0], RectangleBox[{1.2550000000000001`, 0}, {1.265, 0}]},
{GrayLevel[0], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{GrayLevel[0], RectangleBox[{1.2750000000000001`, 0}, {1.285, 0}]},
{GrayLevel[0], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{GrayLevel[0], RectangleBox[{1.2950000000000002`, 0}, {1.305, 0}]},
{GrayLevel[0], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{GrayLevel[0], RectangleBox[{1.3150000000000002`, 0}, {1.325, 0}]},
{GrayLevel[0], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{GrayLevel[0], RectangleBox[{1.3350000000000002`, 0}, {1.345, 0}]},
{GrayLevel[0], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{GrayLevel[0], RectangleBox[{1.3550000000000002`, 0}, {1.365, 0}]},
{GrayLevel[0], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{GrayLevel[0], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.385, 0}, {1.3949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.405, 0}, {1.4149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.425, 0}, {1.4349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.445, 0}, {1.4549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.465, 0}, {1.4749999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.485, 0}, {1.4949999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{GrayLevel[0], RectangleBox[{1.5050000000000001`, 0}, {1.515, 0}]},
{GrayLevel[0], RectangleBox[{1.5150000000000001`, 0}, {1.525, 0}]},
{GrayLevel[0], RectangleBox[{1.5250000000000001`, 0}, {1.535, 0}]},
{GrayLevel[0], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{GrayLevel[0], RectangleBox[{1.5450000000000002`, 0}, {1.555, 0}]},
{GrayLevel[0], RectangleBox[{1.5550000000000002`, 0}, {1.565, 0}]},
{GrayLevel[0], RectangleBox[{1.5650000000000002`, 0}, {1.575, 0}]},
{GrayLevel[0], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{GrayLevel[0], RectangleBox[{1.5850000000000002`, 0}, {1.595, 0}]},
{GrayLevel[0], RectangleBox[{1.5950000000000002`, 0}, {1.605, 0}]},
{GrayLevel[0], RectangleBox[{1.6050000000000002`, 0}, {1.615, 0}]},
{GrayLevel[0], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{GrayLevel[0], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.635, 0}, {1.6449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.645, 0}, {1.6549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.655, 0}, {1.6649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.675, 0}, {1.6849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.685, 0}, {1.6949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.695, 0}, {1.7049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.715, 0}, {1.7249999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.725, 0}, {1.7349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.735, 0}, {1.7449999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{GrayLevel[0], RectangleBox[{1.7550000000000001`, 0}, {1.765, 0}]},
{GrayLevel[0], RectangleBox[{1.7650000000000001`, 0}, {1.775, 0}]},
{GrayLevel[0], RectangleBox[{1.7750000000000001`, 0}, {1.785, 0}]},
{GrayLevel[0], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{GrayLevel[0], RectangleBox[{1.7950000000000002`, 0}, {1.805, 0}]},
{GrayLevel[0], RectangleBox[{1.8050000000000002`, 0}, {1.815, 0}]},
{GrayLevel[0], RectangleBox[{1.8150000000000002`, 0}, {1.825, 0}]},
{GrayLevel[0], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{GrayLevel[0], RectangleBox[{1.8350000000000002`, 0}, {1.845, 0}]},
{GrayLevel[0], RectangleBox[{1.8450000000000002`, 0}, {1.855, 0}]},
{GrayLevel[0], RectangleBox[{1.8550000000000002`, 0}, {1.865, 0}]},
{GrayLevel[0], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{GrayLevel[0], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.885, 0}, {1.8949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.895, 0}, {1.9049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.905, 0}, {1.9149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.925, 0}, {1.9349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.935, 0}, {1.9449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.945, 0}, {1.9549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.965, 0}, {1.9749999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.975, 0}, {1.9849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.985, 0}, {1.9949999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.995, 0}, {2.005, 0}]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->{True, False},
AxesOrigin->{0, 0},
PlotRange->{{-2, 2}, Automatic},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{
3.66257949156072*^9, {3.66258021143362*^9, 3.662580221084853*^9},
3.66258047736412*^9, 3.662580807124124*^9, {3.6625975555333967`*^9,
3.662597570904398*^9}, 3.6625976164798803`*^9, {3.6625977117861757`*^9,
3.662597727818686*^9}, 3.6625978259348307`*^9, 3.662598347755871*^9,
3.6625983916944113`*^9, {3.662598462823228*^9, 3.662598491088421*^9}, {
3.663807786090611*^9, 3.6638077962324*^9}, 3.663807970206254*^9}]
}, Open ]],
Cell["\<\
From the ESS calculations:
{u1\[Rule]-0.564023,Km\[Rule]5668.75}\
\>", "Text",
CellChangeTimes->{{3.6625831016188927`*^9, 3.662583129434276*^9},
3.6625832301909657`*^9, 3.662587879844906*^9, 3.662588322881942*^9,
3.662598068763547*^9, {3.662598310571471*^9, 3.66259833774723*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[",
RowBox[{"histoplot", ",", "competitionplot", ",", "\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.564023"}], ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.564023"}], ",", "maxheight"}], "}"}]}], "}"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Black", ",", "Thin"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "4", ",", "u", ",", "tryKm"}],
"]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2"}], ",", "2"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Thick", ",", "Black", ",", "Dashed"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Axes", "\[Rule]",
RowBox[{"{",
RowBox[{"True", ",", "False"}], "}"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.6625981710969687`*^9, 3.6625981892162952`*^9}, {
3.662598313163443*^9, 3.6625983216273403`*^9}, 3.6625984027700377`*^9, {
3.6625984817991734`*^9, 3.662598485862543*^9}}],
Cell[BoxData[
GraphicsBox[{
{GrayLevel[0], EdgeForm[GrayLevel[0]],
{GrayLevel[0], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{GrayLevel[0], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{GrayLevel[0], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{GrayLevel[0], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{GrayLevel[0], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{GrayLevel[0], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{GrayLevel[0], RectangleBox[{-1.9349999999999998`, 0}, {-1.925, 0}]},
{GrayLevel[0], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{GrayLevel[0], RectangleBox[{-1.9149999999999998`, 0}, {-1.905, 0}]},
{GrayLevel[0], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{GrayLevel[0], RectangleBox[{-1.8949999999999998`, 0}, {-1.885, 0}]},
{GrayLevel[0], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{GrayLevel[0], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.865, 0}, {-1.8550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.845, 0}, {-1.8350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.825, 0}, {-1.8150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{GrayLevel[0], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{GrayLevel[0], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{GrayLevel[0], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{GrayLevel[0], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{GrayLevel[0], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{GrayLevel[0], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{GrayLevel[0], RectangleBox[{-1.6849999999999998`, 0}, {-1.675, 0}]},
{GrayLevel[0], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{GrayLevel[0], RectangleBox[{-1.6649999999999998`, 0}, {-1.655, 0}]},
{GrayLevel[0], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{GrayLevel[0], RectangleBox[{-1.6449999999999998`, 0}, {-1.635, 0}]},
{GrayLevel[0], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{GrayLevel[0], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.615, 0}, {-1.6050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.595, 0}, {-1.5850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.575, 0}, {-1.5650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{GrayLevel[0], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{GrayLevel[0], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{GrayLevel[0], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{GrayLevel[0], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{GrayLevel[0], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{GrayLevel[0], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{GrayLevel[0], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{GrayLevel[0], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{GrayLevel[0], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{GrayLevel[0], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{GrayLevel[0], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{GrayLevel[0], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{GrayLevel[0], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{GrayLevel[0], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{GrayLevel[0], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{GrayLevel[0], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{GrayLevel[0], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{GrayLevel[0], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{GrayLevel[0], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{GrayLevel[0], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{GrayLevel[0], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{GrayLevel[0], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{GrayLevel[0], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{GrayLevel[0], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{GrayLevel[0], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{GrayLevel[0], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{GrayLevel[0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{GrayLevel[0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{GrayLevel[0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{GrayLevel[0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{GrayLevel[0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{GrayLevel[0], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.935, 0}, {-0.925, 0}]},
{GrayLevel[0], RectangleBox[{-0.925, 0}, {-0.915, 0}]},
{GrayLevel[0], RectangleBox[{-0.915, 0}, {-0.905, 0}]},
{GrayLevel[0], RectangleBox[{-0.905, 0}, {-0.895, 0}]},
{GrayLevel[0], RectangleBox[{-0.895, 0}, {-0.885, 0}]},
{GrayLevel[0], RectangleBox[{-0.885, 0}, {-0.875, 0}]},
{GrayLevel[0], RectangleBox[{-0.875, 0}, {-0.865, 0}]},
{GrayLevel[0], RectangleBox[{-0.865, 0}, {-0.855, 0}]},
{GrayLevel[0], RectangleBox[{-0.855, 0}, {-0.845, 0}]},
{GrayLevel[0], RectangleBox[{-0.845, 0}, {-0.835, 0}]},
{GrayLevel[0], RectangleBox[{-0.835, 0}, {-0.825, 0}]},
{GrayLevel[0], RectangleBox[{-0.825, 0}, {-0.815, 0}]},
{GrayLevel[0], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{GrayLevel[0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{GrayLevel[0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{GrayLevel[0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{GrayLevel[0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{GrayLevel[0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{GrayLevel[0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{GrayLevel[0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{GrayLevel[0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{GrayLevel[0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{GrayLevel[0], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{GrayLevel[0], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{GrayLevel[0], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.685, 0}, {-0.675, 0}]},
{GrayLevel[0], RectangleBox[{-0.675, 0}, {-0.665, 0}]},
{GrayLevel[0], RectangleBox[{-0.665, 0}, {-0.655, 0}]},
{GrayLevel[0], RectangleBox[{-0.655, 0}, {-0.645, 0}]},
{GrayLevel[0], RectangleBox[{-0.645, 0}, {-0.635, 0}]},
{GrayLevel[0], RectangleBox[{-0.635, 0}, {-0.625, 0}]},
{GrayLevel[0], RectangleBox[{-0.625, 0}, {-0.615, 0}]},
{GrayLevel[0], RectangleBox[{-0.615, 0}, {-0.605, 0}]},
{GrayLevel[0], RectangleBox[{-0.605, 0}, {-0.595, 0}]},
{GrayLevel[0], RectangleBox[{-0.595, 0}, {-0.585, 0}]},
{GrayLevel[0], RectangleBox[{-0.585, 0}, {-0.575, 0}]},
{GrayLevel[0], RectangleBox[{-0.575, 0}, {-0.565, 0}]},
{GrayLevel[0], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 18}]},
{GrayLevel[0], RectangleBox[{-0.555, 0}, {-0.545, 223}]},
{GrayLevel[0], RectangleBox[{-0.545, 0}, {-0.535, 732}]},
{GrayLevel[0], RectangleBox[{-0.535, 0}, {-0.525, 1000}]},
{GrayLevel[0], RectangleBox[{-0.525, 0}, {-0.515, 488}]},
{GrayLevel[0], RectangleBox[{-0.515, 0}, {-0.505, 92}]},
{GrayLevel[0], RectangleBox[{-0.505, 0}, {-0.495, 8}]},
{GrayLevel[0], RectangleBox[{-0.495, 0}, {-0.485, 0}]},
{GrayLevel[0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{GrayLevel[0], RectangleBox[{-0.475, 0}, {-0.46499999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{-0.465, 0}, {-0.455, 0}]},
{GrayLevel[0], RectangleBox[{-0.455, 0}, {-0.445, 0}]},
{GrayLevel[0], RectangleBox[{-0.445, 0}, {-0.435, 0}]},
{GrayLevel[0], RectangleBox[{-0.435, 0}, {-0.425, 0}]},
{GrayLevel[0], RectangleBox[{-0.425, 0}, {-0.415, 0}]},
{GrayLevel[0], RectangleBox[{-0.415, 0}, {-0.40499999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{-0.405, 0}, {-0.395, 0}]},
{GrayLevel[0], RectangleBox[{-0.395, 0}, {-0.385, 0}]},
{GrayLevel[0], RectangleBox[{-0.385, 0}, {-0.375, 0}]},
{GrayLevel[0], RectangleBox[{-0.375, 0}, {-0.365, 0}]},
{GrayLevel[0], RectangleBox[{-0.365, 0}, {-0.355, 0}]},
{GrayLevel[0], RectangleBox[{-0.355, 0}, {-0.345, 0}]},
{GrayLevel[0], RectangleBox[{-0.34500000000000003`, 0}, {-0.335, 0}]},
{GrayLevel[0], RectangleBox[{-0.335, 0}, {-0.325, 0}]},
{GrayLevel[0], RectangleBox[{-0.325, 0}, {-0.315, 0}]},
{GrayLevel[0], RectangleBox[{-0.315, 0}, {-0.305, 0}]},
{GrayLevel[0], RectangleBox[{-0.305, 0}, {-0.295, 0}]},
{GrayLevel[0], RectangleBox[{-0.295, 0}, {-0.285, 0}]},
{GrayLevel[0], RectangleBox[{-0.28500000000000003`, 0}, {-0.275, 0}]},
{GrayLevel[0], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{GrayLevel[0], RectangleBox[{-0.265, 0}, {-0.255, 0}]},
{GrayLevel[0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{GrayLevel[0], RectangleBox[{-0.245, 0}, {-0.235, 0}]},
{GrayLevel[0], RectangleBox[{-0.23500000000000001`, 0}, {-0.225, 0}]},
{GrayLevel[0], RectangleBox[{-0.225, 0}, {-0.215, 0}]},
{GrayLevel[0], RectangleBox[{-0.215, 0}, {-0.205, 0}]},
{GrayLevel[0], RectangleBox[{-0.20500000000000002`, 0}, {-0.195, 0}]},
{GrayLevel[0], RectangleBox[{-0.195, 0}, {-0.185, 0}]},
{GrayLevel[0], RectangleBox[{-0.185, 0}, {-0.175, 0}]},
{GrayLevel[0], RectangleBox[{-0.17500000000000002`, 0}, {-0.165, 0}]},
{GrayLevel[0], RectangleBox[{-0.165, 0}, {-0.155, 0}]},
{GrayLevel[0], RectangleBox[{-0.155, 0}, {-0.145, 0}]},
{GrayLevel[0], RectangleBox[{-0.14500000000000002`, 0}, {-0.135, 0}]},
{GrayLevel[0], RectangleBox[{-0.135, 0}, {-0.125, 0}]},
{GrayLevel[0], RectangleBox[{-0.125, 0}, {-0.11499999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{-0.115, 0}, {-0.105, 0}]},
{GrayLevel[0], RectangleBox[{-0.10500000000000001`, 0}, {-0.095, 0}]},
{GrayLevel[0], RectangleBox[{-0.095, 0}, {-0.08499999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.085, 0}, {-0.075, 0}]},
{GrayLevel[0], RectangleBox[{-0.07500000000000001, 0}, {-0.065, 0}]},
{GrayLevel[0], RectangleBox[{-0.065, 0}, {-0.055, 0}]},
{GrayLevel[0], RectangleBox[{-0.055, 0}, {-0.045000000000000005`, 0}]},
{GrayLevel[0], RectangleBox[{-0.045, 0}, {-0.035, 0}]},
{GrayLevel[0],
RectangleBox[{-0.034999999999999996`, 0}, {-0.024999999999999998`, 0}]}, \
{GrayLevel[0], RectangleBox[{-0.025, 0}, {-0.015, 0}]},
{GrayLevel[0], RectangleBox[{-0.015, 0}, {-0.005, 0}]},
{GrayLevel[0], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{GrayLevel[0], RectangleBox[{0.005, 0}, {0.015, 0}]},
{GrayLevel[0], RectangleBox[{0.015, 0}, {0.025, 0}]},
{GrayLevel[0],
RectangleBox[{0.024999999999999998`, 0}, {0.034999999999999996`, 0}]},
{GrayLevel[0], RectangleBox[{0.035, 0}, {0.045, 0}]},
{GrayLevel[0], RectangleBox[{0.045000000000000005`, 0}, {0.055, 0}]},
{GrayLevel[0], RectangleBox[{0.055, 0}, {0.065, 0}]},
{GrayLevel[0], RectangleBox[{0.065, 0}, {0.07500000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.075, 0}, {0.085, 0}]},
{GrayLevel[0], RectangleBox[{0.08499999999999999, 0}, {0.095, 0}]},
{GrayLevel[0], RectangleBox[{0.095, 0}, {0.10500000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{0.105, 0}, {0.115, 0}]},
{GrayLevel[0], RectangleBox[{0.11499999999999999`, 0}, {0.125, 0}]},
{GrayLevel[0], RectangleBox[{0.125, 0}, {0.135, 0}]},
{GrayLevel[0], RectangleBox[{0.135, 0}, {0.14500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.145, 0}, {0.155, 0}]},
{GrayLevel[0], RectangleBox[{0.155, 0}, {0.165, 0}]},
{GrayLevel[0], RectangleBox[{0.165, 0}, {0.17500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.175, 0}, {0.185, 0}]},
{GrayLevel[0], RectangleBox[{0.185, 0}, {0.195, 0}]},
{GrayLevel[0], RectangleBox[{0.195, 0}, {0.20500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.205, 0}, {0.215, 0}]},
{GrayLevel[0], RectangleBox[{0.215, 0}, {0.225, 0}]},
{GrayLevel[0], RectangleBox[{0.225, 0}, {0.23500000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{0.235, 0}, {0.245, 0}]},
{GrayLevel[0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{GrayLevel[0], RectangleBox[{0.255, 0}, {0.265, 0}]},
{GrayLevel[0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{GrayLevel[0], RectangleBox[{0.275, 0}, {0.28500000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{0.285, 0}, {0.295, 0}]},
{GrayLevel[0], RectangleBox[{0.295, 0}, {0.305, 0}]},
{GrayLevel[0], RectangleBox[{0.305, 0}, {0.315, 0}]},
{GrayLevel[0], RectangleBox[{0.315, 0}, {0.325, 0}]},
{GrayLevel[0], RectangleBox[{0.325, 0}, {0.335, 0}]},
{GrayLevel[0], RectangleBox[{0.335, 0}, {0.34500000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{0.345, 0}, {0.355, 0}]},
{GrayLevel[0], RectangleBox[{0.355, 0}, {0.365, 0}]},
{GrayLevel[0], RectangleBox[{0.365, 0}, {0.375, 0}]},
{GrayLevel[0], RectangleBox[{0.375, 0}, {0.385, 0}]},
{GrayLevel[0], RectangleBox[{0.385, 0}, {0.395, 0}]},
{GrayLevel[0], RectangleBox[{0.395, 0}, {0.405, 0}]},
{GrayLevel[0], RectangleBox[{0.40499999999999997`, 0}, {0.415, 0}]},
{GrayLevel[0], RectangleBox[{0.415, 0}, {0.425, 0}]},
{GrayLevel[0], RectangleBox[{0.425, 0}, {0.435, 0}]},
{GrayLevel[0], RectangleBox[{0.435, 0}, {0.445, 0}]},
{GrayLevel[0], RectangleBox[{0.445, 0}, {0.455, 0}]},
{GrayLevel[0], RectangleBox[{0.455, 0}, {0.465, 0}]},
{GrayLevel[0], RectangleBox[{0.46499999999999997`, 0}, {0.475, 0}]},
{GrayLevel[0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{GrayLevel[0], RectangleBox[{0.485, 0}, {0.495, 0}]},
{GrayLevel[0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{GrayLevel[0], RectangleBox[{0.505, 0}, {0.515, 0}]},
{GrayLevel[0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{GrayLevel[0], RectangleBox[{0.525, 0}, {0.535, 0}]},
{GrayLevel[0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{GrayLevel[0], RectangleBox[{0.545, 0}, {0.555, 0}]},
{GrayLevel[0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.565, 0}, {0.575, 0}]},
{GrayLevel[0], RectangleBox[{0.575, 0}, {0.585, 0}]},
{GrayLevel[0], RectangleBox[{0.585, 0}, {0.595, 0}]},
{GrayLevel[0], RectangleBox[{0.595, 0}, {0.605, 0}]},
{GrayLevel[0], RectangleBox[{0.605, 0}, {0.615, 0}]},
{GrayLevel[0], RectangleBox[{0.615, 0}, {0.625, 0}]},
{GrayLevel[0], RectangleBox[{0.625, 0}, {0.635, 0}]},
{GrayLevel[0], RectangleBox[{0.635, 0}, {0.645, 0}]},
{GrayLevel[0], RectangleBox[{0.645, 0}, {0.655, 0}]},
{GrayLevel[0], RectangleBox[{0.655, 0}, {0.665, 0}]},
{GrayLevel[0], RectangleBox[{0.665, 0}, {0.675, 0}]},
{GrayLevel[0], RectangleBox[{0.675, 0}, {0.685, 0}]},
{GrayLevel[0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{GrayLevel[0], RectangleBox[{0.695, 0}, {0.705, 0}]},
{GrayLevel[0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{GrayLevel[0], RectangleBox[{0.715, 0}, {0.725, 0}]},
{GrayLevel[0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{GrayLevel[0], RectangleBox[{0.735, 0}, {0.745, 0}]},
{GrayLevel[0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{GrayLevel[0], RectangleBox[{0.755, 0}, {0.765, 0}]},
{GrayLevel[0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{GrayLevel[0], RectangleBox[{0.775, 0}, {0.785, 0}]},
{GrayLevel[0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{GrayLevel[0], RectangleBox[{0.795, 0}, {0.805, 0}]},
{GrayLevel[0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.815, 0}, {0.825, 0}]},
{GrayLevel[0], RectangleBox[{0.825, 0}, {0.835, 0}]},
{GrayLevel[0], RectangleBox[{0.835, 0}, {0.845, 0}]},
{GrayLevel[0], RectangleBox[{0.845, 0}, {0.855, 0}]},
{GrayLevel[0], RectangleBox[{0.855, 0}, {0.865, 0}]},
{GrayLevel[0], RectangleBox[{0.865, 0}, {0.875, 0}]},
{GrayLevel[0], RectangleBox[{0.875, 0}, {0.885, 0}]},
{GrayLevel[0], RectangleBox[{0.885, 0}, {0.895, 0}]},
{GrayLevel[0], RectangleBox[{0.895, 0}, {0.905, 0}]},
{GrayLevel[0], RectangleBox[{0.905, 0}, {0.915, 0}]},
{GrayLevel[0], RectangleBox[{0.915, 0}, {0.925, 0}]},
{GrayLevel[0], RectangleBox[{0.925, 0}, {0.935, 0}]},
{GrayLevel[0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{GrayLevel[0], RectangleBox[{0.945, 0}, {0.955, 0}]},
{GrayLevel[0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{GrayLevel[0], RectangleBox[{0.965, 0}, {0.975, 0}]},
{GrayLevel[0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{GrayLevel[0], RectangleBox[{0.985, 0}, {0.995, 0}]},
{GrayLevel[0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{GrayLevel[0], RectangleBox[{1.0050000000000001`, 0}, {1.015, 0}]},
{GrayLevel[0], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{GrayLevel[0], RectangleBox[{1.0250000000000001`, 0}, {1.035, 0}]},
{GrayLevel[0], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{GrayLevel[0], RectangleBox[{1.0450000000000002`, 0}, {1.055, 0}]},
{GrayLevel[0], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{GrayLevel[0], RectangleBox[{1.0650000000000002`, 0}, {1.075, 0}]},
{GrayLevel[0], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{GrayLevel[0], RectangleBox[{1.0850000000000002`, 0}, {1.095, 0}]},
{GrayLevel[0], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{GrayLevel[0], RectangleBox[{1.1050000000000002`, 0}, {1.115, 0}]},
{GrayLevel[0], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{GrayLevel[0], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.135, 0}, {1.1449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.155, 0}, {1.1649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.175, 0}, {1.1849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.195, 0}, {1.2049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.215, 0}, {1.2249999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.235, 0}, {1.2449999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{GrayLevel[0], RectangleBox[{1.2550000000000001`, 0}, {1.265, 0}]},
{GrayLevel[0], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{GrayLevel[0], RectangleBox[{1.2750000000000001`, 0}, {1.285, 0}]},
{GrayLevel[0], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{GrayLevel[0], RectangleBox[{1.2950000000000002`, 0}, {1.305, 0}]},
{GrayLevel[0], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{GrayLevel[0], RectangleBox[{1.3150000000000002`, 0}, {1.325, 0}]},
{GrayLevel[0], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{GrayLevel[0], RectangleBox[{1.3350000000000002`, 0}, {1.345, 0}]},
{GrayLevel[0], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{GrayLevel[0], RectangleBox[{1.3550000000000002`, 0}, {1.365, 0}]},
{GrayLevel[0], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{GrayLevel[0], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.385, 0}, {1.3949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.405, 0}, {1.4149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.425, 0}, {1.4349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.445, 0}, {1.4549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.465, 0}, {1.4749999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.485, 0}, {1.4949999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{GrayLevel[0], RectangleBox[{1.5050000000000001`, 0}, {1.515, 0}]},
{GrayLevel[0], RectangleBox[{1.5150000000000001`, 0}, {1.525, 0}]},
{GrayLevel[0], RectangleBox[{1.5250000000000001`, 0}, {1.535, 0}]},
{GrayLevel[0], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{GrayLevel[0], RectangleBox[{1.5450000000000002`, 0}, {1.555, 0}]},
{GrayLevel[0], RectangleBox[{1.5550000000000002`, 0}, {1.565, 0}]},
{GrayLevel[0], RectangleBox[{1.5650000000000002`, 0}, {1.575, 0}]},
{GrayLevel[0], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{GrayLevel[0], RectangleBox[{1.5850000000000002`, 0}, {1.595, 0}]},
{GrayLevel[0], RectangleBox[{1.5950000000000002`, 0}, {1.605, 0}]},
{GrayLevel[0], RectangleBox[{1.6050000000000002`, 0}, {1.615, 0}]},
{GrayLevel[0], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{GrayLevel[0], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.635, 0}, {1.6449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.645, 0}, {1.6549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.655, 0}, {1.6649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.675, 0}, {1.6849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.685, 0}, {1.6949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.695, 0}, {1.7049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.715, 0}, {1.7249999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.725, 0}, {1.7349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.735, 0}, {1.7449999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{GrayLevel[0], RectangleBox[{1.7550000000000001`, 0}, {1.765, 0}]},
{GrayLevel[0], RectangleBox[{1.7650000000000001`, 0}, {1.775, 0}]},
{GrayLevel[0], RectangleBox[{1.7750000000000001`, 0}, {1.785, 0}]},
{GrayLevel[0], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{GrayLevel[0], RectangleBox[{1.7950000000000002`, 0}, {1.805, 0}]},
{GrayLevel[0], RectangleBox[{1.8050000000000002`, 0}, {1.815, 0}]},
{GrayLevel[0], RectangleBox[{1.8150000000000002`, 0}, {1.825, 0}]},
{GrayLevel[0], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{GrayLevel[0], RectangleBox[{1.8350000000000002`, 0}, {1.845, 0}]},
{GrayLevel[0], RectangleBox[{1.8450000000000002`, 0}, {1.855, 0}]},
{GrayLevel[0], RectangleBox[{1.8550000000000002`, 0}, {1.865, 0}]},
{GrayLevel[0], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{GrayLevel[0], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.885, 0}, {1.8949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.895, 0}, {1.9049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.905, 0}, {1.9149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.925, 0}, {1.9349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.935, 0}, {1.9449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.945, 0}, {1.9549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.965, 0}, {1.9749999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.975, 0}, {1.9849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.985, 0}, {1.9949999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.995, 0}, {2.005, 0}]}}, {{}, {},
{GrayLevel[0], Thickness[Tiny], LineBox[CompressedData["
1:eJwt13k4Vd33APCQMhRCeitklkjUG73C2RFJEcpQGogSShpQ6V5DikTmMmW4
R0J1G1QiWZR5yJg57r3GzJJ5uL/9fZ7fH+c5z+c5f+x11l57rXOkz1+1uMC5
atWqUXz9765KiA2x2WxYc+mzc6dMOLo6Lxs0v8AG8faudrZCOHqbra4wNc2G
i4ysQDnlcLR7u8n5/mE2JOgdiLm2Jxxpbghor25hw+GigsAtB8MR6pmsjHvD
BtNW3dUZF8KRRWDNyz3n2HDDx1k+OzMcedUGXHEqWAH2+Pqqp3sjUFMT/1CR
/TII6n0L+uEZiSQKr4pqii8B+fqZ8+3cKPTRtZhb8NcClKChorv8McguRH2i
zX8ezP1cRNQin6C5SO8gIObgY16lg51oLCIFujbHMmdA/5K6jnB1HEo0Vr/e
+HAa7BdYfkRoAvK/bH9L6fBfMI6qRNlaz5A3V5bX9dE/MLn9yFteoWRk71sr
15wxCYZxQ1x77FJQzNe+2ESXCZhJ36CrpJKK8rq3r3slMwbPSM6mb/Op6K42
x+v4f8ZA6vRIaNxSKtKJazN5KDAG4b+Lpt3YqajQIjjs4sIopMz4lG/kpqGy
kmFh6YZRCKW6HzkuRENNL+mbn/iNQkmpkVmIAg2Nef2r6MsYAX7XrOQhcxqS
FUJ6J5KGgagM5V4kaeixGvOOS9QwWF+1+5mWTkNzZv7ZvkHD4Kw8H380k4aq
I4rlXl8fhkapfewYOg3dFDm8ds2hYXjVofZHMJeGSsUsqnPGhyBXMO5TUg0N
uUg4Wm09MAR5ywFBm6dxPDrcYeoaQ+AW5iZJnaUh3bPpZYeUh6B2531nxjwN
iSQP7ru5cQgklZw2Ja3QUL7Ula01v3+DhTQlYXktiQTkPBnUyN9gvvtH9JEt
JHq/I8iF1TMI3M+H1ovpkGhbvV2uctsgNL7KrpclSBTi9R+Px49BWOe4LL/r
AIkuFA89X5s7CIJ/jt3WNSDRP2dNmCqPB8Fh60QCYUIiSoSwjde+QZAOFj5b
eZpERnOJButCB8CfWRoxc5tEH5M8oi39B6Amok4725tEMgamPUleA7A9zszg
CoVEixFsX/XzA9AeVXqpzZdEdOXz+VaaAyDG8qqLCCSR6DnFPanMfsgIzWL4
RZOou+SdlIZGP5T6wynLVyS6e3z+4D6VfhAquDlLe43jYyJnLZl++Mn3THaM
TiKzpdp3ugL9sOR0VIHyjkSFu8f0DvX3AaPvZS7lE4lSkndcsHnSB7QibT2e
QhJp77z+8FRIH9zQPHFetYhErXm5r0/798Feaj6nxTcSCTUbzdi59cGhq38L
I4pJ5LfOKdDZsA9SXOO2TJWT6PxtMvPOTC9wX3a/r11PopU1wzV3R3pBV3n9
Qa0GEsVH7/5DZfVC8T2ax95GEjW8KdK696MXODbTVOV+kki/v7vqUXovKM9W
s1itJJI7Lj6WaNULe9q73/Z24/gZDsLJR3thwTrYMJdBotNuLzVS9XrhxsRn
/UdMEkU/1PJ5rtoLdVm81xV7SLS60EaIvqYX/kh/CUH9JOpTidkNn3pAoY29
e3qYRDuoz8cGX/aAKbvZmD5CIrfaj1nCqT3AOVl92HGURHPXmmUuPuoBfS/X
hdIxEvHlbBJZb9cDH/zdRJ0mSXSMZ3uthmUPiCfLHl/7B69/ct8jO+MeaLQa
u5GGLbFkw/Xh3x5YeOJ58ucUidQOxE+d4u0Be4+GtA0zJPKIzHoTsMKC0+dS
emOx83ryXOlTLLhpvodTYhbn40FHD0cXCyIcc5q2zpHIqkq8KeM9C3yVDSun
5nE+xXeGN7xgQVvF3mH7BVwfV3SOLiWywITLsr8a+5LQ2eJjgfh5Qphz3CKJ
vC2TP8zYsuDg+9i4dcs4n+lv3KXMWdBdHeVnj716DlSMDVmQeLIfZWM/jmek
PVNjgbXR2YMmK3i/hifsyuRZYG8/GRiDvUmHQ2JyCwtST+ektmOndEvHHORm
weyJVitbNs632m5ztwUmjC9/nnyCvcNfb33sOBMMelrsa7HdGi0qinqZcM6W
nb56VRrKlnO4P9zGBHdYKtTAnvO4cWBjLRMGnVPeXMDWLru3rFvMhJ2fv16P
wPb7Jzr3Ui4TdvMq8+VhlzqneUTSmXCjsMijG5v/ywf1fJIJI/pnP3JwpCGz
dSWjfbFM8FnuLpfCjj7zM1PwMROcbJXeamO30fsu/HePCay6ba6W2JKrZqQd
bjHBt+nlvAv2efM1XSFXmHCE9dmWgv2CJhb/6TwTFr33RoRgj0wpWDGsmeCp
KBIfi61moCnMZ8KES+6GnqnYHk8O/dijxwSpwVL5F9h5A9bBZzSZwC8flpGJ
vbLvkmGgChPMvieuZGDrB9/ifCeN83NhQvE5dlBHUEG7GBOm34XKJWFXq8Td
Wb2OCaFW3n+jsDdQMzVUOZjgzP396QPsB5+2lwvNMkBMqPCAF/bC2IuTUyMM
6DDoVLyA7aaoOPyTxQBqpoKxGTbrXPrdz60M8Ax8m7EP2ypWXiDhBwPOeIXq
S2JX1qUlU4oZUHqqccv/8qnLK6dul8eA3jPxqkyc7/cHyG96bxmwZ2aJWoCt
cEfmhHw6A6x6N62Lw45/n9q3NpEBo2p8ze7Y/rIpPDWBDCi5vST1D/aM7bb4
NxQGnJgxoA3g+nCJTlKOvMEAm/p5uw/YFtzPTK3PMcCk4OhTA+xSHXHGf5YM
0Io4JMiHreWZcE38CANY+o4lVbgeZQbiopkaDHBvbhwxxH6ybbNCsQoD+F5F
n12FzWcTm5MuwwD/o8cFc3C9T5U/aXcVYIBZY4GqOLYTh9hl09UMkG8efla5
RKJPN3Ys2v/tBugUM/HEfmCpeGCkqhsOC/leLsHnS3GzdM0q727g31uTo4fP
n1DwtomSi93w7RnPrg58XucWJEQeWXTD03b6oDt2eeeWkxt3dIPpcKJcND7f
l1JE+5TaukDKVK4iF/cDsw0iPOPFXdAZXHVGG3uf/wblD2+7ILWtTTN/mkS8
jgLXdIO6oFqg6Wv2XxJlKfIsW2h2QZaZpYQ/7j+RsWuk/pHtAk5e7d9juF/d
4eXW/yXQBUIzIis22MbDHA+d+n/BLZ0Hq+UnSDRMXxS9G/ML0k54Ribi/qei
Ma7yfKoTOOLeKvENkuiiqo9P7q9O2NVGyds/QKJkBcGGmrJOKIiiyrvg/iq8
aZfXTEInBLSi0K+9JJqddSs6dLATLDlv5eni/vwtd8xyKLoDDp5INX7ZRqKl
d9SMFWoHiO2U6snC/X5vlsCisHMHLEGuw4sWEmXEq6bs1+mAT8JbpJ/i+RDq
7TYU0tcOKd17M8zxfLHRGaPu0mgHWWehH3vw/IncS63Xl2qHaMEme84yElXt
FJCz4WuH+0aOYzUlJNKVVK3w7WqDrdweM7bfSSTLviLS8KANPN0+sI4XkGis
cPTFzZZWeHhEQPNDNonuHRyty73VArd3PKITiTh+o5Fj/zq0QJ03a31OPIlW
mQz/oJu0wMVjyZnKcXgeW/6uJmVawJYLEtY9IZHnxb7y0OpmUPTWi3gdhvc3
6FehvVQznDzptXzZn0RHq2ve8pY3gULMU9mRCyQKrqveFfC+CbSj0tvXO+L6
aKqiryQ2gUtc2LLKeRIZ/Kp4NXWtCe6Gnwp1OIvfZ6wk49fWJrA9uI3zvRWe
L0IFKe+uNsKYotrbn4Yk2niCHn5yUwM40xvG9eXx94/CozwDrgawMvrSul8W
19e8U6/6eD1sPXbsvbo0Xj9Jeh9fWT1Yjx/R2SSB5/dgdHeeZz04LYZ2VIiS
qJ/irSreXAf31TkCfnDh/n0sIvarUi30ibny2jFo6P1MiWC5XCXEqpiGL0TR
0POOvtDfAQWQ/+b5ndOtqeiMufiHDoc0oIftmtoimopy+bx/fvMgCc0690V/
wxS0l8Uh6WcDBNzY+LeqIAnJTnyZ1/pWQfBHlv0V5X+GDpNtNaY2DUQlQ6Bm
QjMBGZgIc01/bCFeGbZbi96JQ2HnWnzVcjoJXelz+ylDT1GZqcR6M2EmUS8l
lHbF9Akald5IbYjvId7ZPw1+1RONPG4q24eJ9RNiq9cku8VEoZZOIYuL5YOE
snCSzA+9SGR3W3tg7dFh4vgmd05uiQj0XVkz+Dv3GPHSKZIzfjgMKfDmD6YZ
TRBBwUYqVaOhSCLf1YA7aJKY5k3wTpQMQasWODOvs/4Qf+pGsiimwWjW/OvZ
Evm/RPwZR+OPBUGo499zW+UDpgnODoda3l2ByN1aaINM5wyx+1qOUnfJfbQ5
utdmtcQcYb1f6efDxwGIbpvyYurWPOEgW1HhZ3UPWev4GJV/XSDiRMe1VA/7
o3dnr8hoLS0SBcf5Jdec8ENzfPpcuZbLROPQw9KLZ3yRRf1+DYnYFSLadiK/
WdAH8e3nL8p/tkIUsus5M3l8UFFa+5HT5AqRXUWJpHD4ILVbt+0T6CuEwdVP
j3ZOUZHAtpyQzSUrxIPn5jUZzVRUcXl3z8Y/K4T37L0q/iQqQjxK4QJH2URt
78fPFFUq/n6a20I3ZxP03PehTxWp6E1H2XMTazYRPqAZkS1FRZJvLn4JOc8m
JHmDpf4IU9GSZVo/3202sWikePjhLAXlkNt01qaziZR+Vb5tRRTktn68LP0l
mzCf6HS0zaMgBa8CC8N3bEJ10zQjLpuCoo3PXLqfzyaKahW1JNIp6PpkfBRX
I45nlvuUziMK2mHrIkm2somjydcygwMoiFn8X6ZeF5tw39oq0k6hILPY1gK/
32xCQtFRw8edgng4Mw5Lj7OJ/obJkSZnCgJXr6bCv2xi9KHxFxUHCvL8aXjO
boFNDO0gUx6cpqD//38lRvvUElmWFPR/Y8/GEQ==
"]]}}, {{}, {},
{GrayLevel[0], Thickness[Tiny],
LineBox[{{-0.564023, 0.}, {-0.564023,
2500.1108919042317`}}]}}, {{}, {},
{GrayLevel[0], Thickness[Large], Dashing[{Small, Small}],
LineBox[CompressedData["
1:eJwt2Hk4VO/7B3BClkqyFEVliRYK+aSUzk0kStmXKFK2ylSyhWypVCohHyHL
HCkqbVpI3fIhFBWJLDGLZRhrJMYyv/O9rt9f53pdZ55nzjNz3+/nuY6yxykb
z3kCAgLqggIC/7tuJJb28/l8pIWY8T1kDsCpKdW4KR4fnxywPZhqdQCevtBR
H/vDx/5FdUc23zgAumstPXq4fOT+Vti2X8QK9JfEttY28zE6ony3WqwVAHv0
050nfBTivEsvvWYNNpfrHm524+PRgeQF3hW2kGTUZq51kI+4BiRb+2yhcZrT
q27PxwZXx6Vxi+3A4bSw2vK9fBwedjVJcbEDF+ftGQL6fEw7ZxQeM2EHxzbk
x9dJ8nFaSqPuh74DBH+N9fN+P4cXto01m/U7QTw3qHn8zRz27vljcHaFM9BF
fY1iXszhpVMbFYb2OUMtYSl398EcPpgqLfj+1BlUnsq9a0icQ+ENNb+8ww/C
l4S8hTu951A+Xj9unqorqNtUP5SVmsOVvLWZ/k/dYAetRI4uMYdnty05YDDg
BtZXH0VuEpnDlKpXNhtl3SG8PMHWgjeL16ve2bZYuUODrvN0ZNcs5pneZjjU
usN5mX4L7ptZ5JcYSy6rPQKNjQv6PxyZRd1fK7sYw0ch+tjL9w9dZ1F2dSHN
Y8kx2Dh+OOm24yxqHU7eLbX5GMTJPN/hazmL4t8Djo8GHQNDG6ebUttm0TjJ
2bZOwBPyvubquUnNYuuurAlxJS8I+WQYOfN+Bj9oFTbEhvjAmoO9tj3FM2i4
8EFYQ5YPNPQlrP1WNIOSy+MeWVX5gKZ4Vz1ZMIO7PwhodC71BabZVbW9KZTz
C/hmb3zBorKp5o7fDIqsOcY+JnwClMpOyeorzmAof2tzTrkf1Er/E2CwbAZr
x9xVHYf9INST991QegY3Kp19s1ORBk0SF5NMxGawb4Smfi+IBgn2adI249Po
OtLHqdc6BULcCim/2mnUOn8pk2FzGvrkli8iw6exT6h8vlXHGUj16TyZFzyN
HvQnGr1/z8Dut7m1+f7T+Hn9ICd1iT/Q3TfFP/WZxri24sB9pv7g+tBkwXu7
aTRXe9Q4/tgfvsIp8RbNacx7FqZrG3sWXp6oEFn8i4dfrWLULpoGwtbVNJ28
Zh66PHG7P3ksEEoalx0ybODhQC63Kj42EMoMTxSdqOJh3o+nwssqAuHTYumj
1c94SLh/sS8yCQLGC7ey6Es81GRbLlDYFwwSM7zQ8U08HFSmTb46ew7c43VG
WmKmEByXR4poREBoUeKluvNTKHjTq2jlvgi43T6m+CFkCu/bDvfbnYmAT5qv
zB/QpvBQW/x++dII2FxnQAYdnMKSF7uu8mwiYb6kiYOM7hSmTD26KrsrCh7d
dCjdx5zEDwPDj4Wio2EyMSwOiUkcnvj8ckY9FkjJDoVU5gSahboPnEq5ChkW
Ov7fr/zB5zUDXPyeADEnj4SsMx/Hg0PtglM2yRAmVBDsP/gbi17pXC7QSIUj
UV/Vmh6Mous/H1L+pqTD7XfdqRnHR/BKzYupvwWZcDgkLULfcwSTRptXRL3O
hLWbDxxrcBtBkZa1ZwQqMqHkwZtNYvYjeFQ+IKmvPRM6kq59PEuMYCr3v1pX
ySzQOK4zbiE7ggXTy3/jqSzw1+Jl/g4bxk+KPy8oL82Gks61Cx+pDGG1f/zY
4cpsCN8h+DhNfghLJNTW633KBsM7LZZXJIfwlvtjY5Gv2VBmc/WmF28QG08I
Saf/zIaqSq60csMgzqtaPJHMzYbGh4UKKdGDqKPANS+TyoGhYD2NKMYAakQN
Lux3zIGnjQuraU0DGHNLb89W1xw4o9Ptc6h2AEVopnox7jkw3n+7wODNAO7k
aS0X982B6UN/tf7cpMaPms6xzuWAmEmJ3nFiAA+4aZh8TMsBVSkwtsvkYvZZ
5XaTlhy4oc0MPZ7ERTWjJcJOv3Jg0irmRVQcF016k2c9mTlQe6tC7bE/FzMq
NI/69+VAgIy56HwzLvqWreTum8qBj0ttal8P92PYurE0MXk6HFc65rDCqB9l
Uv/zuWNNh0ZDkZs6W/pR54WDyXx7Ouw8nFdltqEfHfUPDvk50UEmi7M1QK4f
Lbs2PdFyo0Ppar8VdX19aOAiPEI7SQdJtSBGRGIfXuoT7Jq8SIfn6+OOs9gc
lNhVkbHpJR1W1bsXb2jhYIFyQmz/azrEB28TC/zCQaHRGzHZJXTwrOi/J1rM
wclPKZWzSAf5w5ZMzRscTF6+PO78JzqcvyXtFLyVg7nmtdJJHXTo1+fmlWlx
sLVIa4jPoINDx39/xFU52CE7OubNpoP2hsCkjEUcrCw/FLuOQwdWRfOXD6xe
5LqosvxH6bBnMsN04fVePH35J3eVEAkvMwOT7WN68e21blUQIUHFdD87M7gX
J2ajs1xESZi+xY/S8ehF79MOPrELSCjc4FHqoN+Lif8yztyVIUHWTWNzDrMH
c2+pzg2pkNBZ+Wz1li092Ho6L1NpJwnhtlMmWzV78OeEzJGbBAnyTPA1UOlB
rsK37bNAgtXM12c7JXtQyd7TqG4XCWW6Q8ZmPd3ofbYXd5qTkJ213tMppRvp
Uy7rfG1J2KHlf+VgfDc+fhRjedeOhJ8lxY9dY7oxsOT7/Tp7EqSa9ky407rx
SfLb+apOJEQv9L7su7sbF9Mu52a7kuBxjswPnejC2EqOUt8xEubmc+vCB7rw
sh2RyPQkIS1Z93cEqwu16ZWuTV4kNDz5YHDhSxeGaN+bKfIhYVdP5+dreV0Y
ac7N2X2SBMZZjZHrGV240mVIUMWPWq/gKdmExC78LPKjeopykeKca3JEFx4/
+DEp8xQJaraKQxkOXWi7g+H8zp9aL+OodNa+Lvwzk64ZfpYEV9rDLTnGXdjo
ah+sH0BC8hWDyHsbuzD0o+95MpAE4TInqcL51P0AoSvWIdTvY5mt93SGjTYO
8U7jlHe09To9/83GZ/aXnyWdIyFgIijnVQcbJSzyxKpDSejWvK2Lr9h4ciT+
iuh5EtZH3BviPGTjId7WjWmUaV9fFkjnsHHFc4UfayNImDzTpOJ1jY207316
BpHU/P/1dNyMYuNdxdtjpZSjZf+mFQeycX/5AG6PIkHi9TKZRe5sXFOjcV0r
moQDYmu/brFnY+ar+qRsysnOW6+5W7BRVPzli8UxJCjNOAkV6bGRE1huwaLs
YemLv9ZRn68srTK9QEJe5rkw0VVs/NCY4HuPsrZR2thBcTZ+f+uv4RxLQmBi
wZPYORZq+DubP6Zcwi45UTjGwqnkz+mzlHddamMLdrBQiS7ZkXiRhLhmbtaG
7yw8LV/2vZly7doZF/tqFjYJvRdRuESCw2fFxgfPWWhQ7rs+gXKaolZCw30W
5jfPqXyk3OlnuG8mg4VdzYVHJymroaWYeiILbeDUsPplEnykDlccuMxCC2JL
jTXlx0doUefCqfGPeGMhlH8/j9hBnmGh9bwi/wzKW4RvTtZ6sbDN7uCeUsph
9llFEy4s1N7XE/yTclnek9OrrVloqmgtPEpZeBI1LXazsOp88ohIHAnm5t84
Z7ezsC+vgFhG+UYaI/euNjXe5Ma4GuUG7oh71RoWmpwxkN5EeZmhoNLocha2
PytI/4ey640lLculWHinvzVpK+XsTuXbJiIsFD9YNatPuVtb15rGY2LGrZPt
mymvjzFelDrMxBe0Kl1NyrTvNjUfupj4SOaHkDLlF2pHL3JbmDiPmWgjTXky
8KyR3FcmnqXNKQtQ3lF1YXZnBRM3x8oF9lPriZZPLvYpZqKybNP+esoffXMD
EwuZKLt55/MiygveFumUkkxcJb2PnkzZamHlYHcqEyf/ziqfoZx86Ef+4htM
tDWw0bOg3FLY7bntAhPt9M3aV1FeKTChfDSEicIH2hR/U/+Xh/X8jng/Jra3
L5wqozwwpu7AcGSixTWjBDvK2qb60hKWTFwqbWT9v3oITDH7stmYifilqbiV
qpe5rT67L2tSti69bkt519WQec+UmWjvIsqX+F99tcW9b13KRI5spypS9bck
In/LRkEm7shfm6xE+dKrtdVSfxnY+m9nUR1Vz7yh+85jAww0+neNQBhlllte
+JufDDxhJLO6juqH50ZkufFTBr59bFdzgOof9VAVuzV5DNy/2TOmj+q3tOc5
3aIZDEzr9DwXRTlGNVus7jIDbfKZ6/Oo/rQRubvf0Y2B36asO79R/f3RUJGx
zZ6BTgaBn+0oGwSln1Hcy8DByHqxpnAq/3vvJDO3MND9/reob2EkjFWntJ6Q
ZOCu/IX596g80VBQrhMI68T+Uy9GG6h8krq6aqTSqxNXaQdLaVGe5CnJXLPp
RMWszLxYKs+q25c7y63vxMWm8caaVN75ZMt2r2vpQA9FdughKg8LNMRmbfQ7
8IXvMM/cl4TE1Pmr5VU7UNiPnR9O5W2ouMiuX5IdKLCt8M8jbxIsuIJXvHt+
obKwqN98Kp+5hdOy4bd/4YpV5ivuepCguWVY895YO1q6Cwa7uJDgtTEysvhX
O254+CXf7iAJWeqLG+qq2vFKubrBXmcSpJdtCp5Ib0eVjZwIbUcS/v6lfTAz
acevHmc4bTYklBcP2fcnt2GCQGLRG2o/cjIciti0pRWll1qQd/+hnvefiPpd
q1uxNV1m3EyPhM9akmpOEq1omdrMG9YlYefKjTVRHS146xhHb5s2Cap8P5mG
Sy2488jf3KfrSRgqG7wf0PwTRweHSv9ZRcIFk8FvxSHN6GC4+0HBfOr79wwc
0DvajHe3i+jKU/uzgCX3S6FlM27Ys+jHBWr/DrfvqyVVmtHio8xpewESgry6
q6/XNqFE5P5trCk6+MT9KjuyugmTTJsX5g7QYV9t3VPx6kasTp360/yNDnJ2
hQnOyxrQ5p7Y4YBk6vyifq3EVKgB/630EktPpIPVlHeXznA9mvwuDi9LoMPV
TOWtElX1uD1Eukb0Oh3mOMmdJUH1WOcnoBBHnX96zodtVGz6hrvl3zRaBdGB
duBW6rt1XzGzbdh7oSM1/0Tl4mq1T7hY2qs2QI4O99q6r/fFvkeVRIEFd8Ny
4JC1YlHb0VwUvzjxYhEzG4olwn6UB5JEelXHCQPjbPiHJbgy2gmJTcYB3odW
Z4HqyNspg/IaIpAbE19RexfMyZa6/U4NRFrUQ1qXYwaYWkoL/XnZTIRevyeZ
3psGN92ao7RftxMWT8UY2gl3oGq/0iIraSbR/vnYd45SKgwqy0U0pLGJZH7w
6qmqFAgM2HDk5tIeQq6Wf/jN+dvQ3C5l41XNIfgts3GeK5PB/dyOXtF9XKJF
PKE+uCMR/tugf/U/kSFiQHTVo9Drt0BdvJSTu2eEuOOnJSZ5KAGUSk+YisSN
ElXZkvWioTdAgDcv35/1m3ifJCc9oxwPf63fHa5cM06M17PHPCWuQpue24o1
sX+I9169KRnMy3DaUWqJSvsEcb13eH5s50VQSO5yElaaJGYTzR78UoiFQpfs
+2MhU0R6bNUFN4sYcDSM3FP9jkdkuuhN7yiKgmeH/VQMZqaJHJU9amHnI2BS
YpdQsf0s8Tk4JWrvlTCwqd++RSl1jnCzmzhBmwoBie0LPpTenSNmjFJ7fIZC
4ENu615Xco4YapqY580OAe2Qc0fSC+eIS02tK2l1ISC56nW8QuUc0dtd3ng/
JwRqTuqy5X7PEZHvtlRUW4QAiK1LkNzHJwJ9R3mlWcHU+WJyeaE1n1jfJfNg
/e1geNJWdc/SkU+k5PZ0p18NhpVPvN7Ge/CJ6z+9l1wJDIYZ+9weiXN8oifa
Xv7G3mB4Ta4yFM3jE6ulf/oYTwYBbdFwVd5DPjHzXqeDMxgE6sHvbXY/4xOv
Jc3aEtlBkGxxyOdiKZ9Y0X3o+OiXIPAfTUsS+s4ntAp21v68FwTrXY6vJH/y
Ccf4c6fS04OAWbEt37iDTzjUtN0+cisIrFJ/vo/uo55Xt8p3MjwIxOY9MFce
5hMSGmuX1vgHAZ4Ibiwb5xPu4u677voEQdCP3W7uPD5xX751JOBwEPz/+ySi
xUZwpZVdEPwf5Y2anQ==
"]]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->{True, False},
Frame->True,
FrameTicks->False]], "Output",
CellChangeTimes->{{3.66259818351793*^9, 3.6625981898543987`*^9},
3.662598239810951*^9, 3.662598347829685*^9, {3.6625983917715483`*^9,
3.662598417762067*^9}, {3.6625984636023073`*^9, 3.662598493038002*^9}, {
3.663807786278561*^9, 3.6638077964182034`*^9}, 3.663807970390456*^9}]
}, Open ]],
Cell["\<\
From the ESS calculations for a single species with \[Beta]=-4:
{u1\[Rule]0.5640230744006248`,Km\[Rule]5668.7485526713535`}\
\>", "Text",
CellChangeTimes->{{3.663807270021591*^9, 3.663807276804511*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Kappa]", ",", "u", ",",
"tryKm"}], "]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "0.7"}], ",", "1.5"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{", "None", "}"}]}], ",",
RowBox[{"Filling", "\[Rule]", "Bottom"}], ",",
RowBox[{"FillingStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"GrayLevel", "[", "0.8", "]"}], "}"}]}], ",",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",",
RowBox[{"{",
RowBox[{"0", ",", "maxheight"}], "}"}]}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.5640230744006248`"}], ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.5640230744006248`"}], ",",
RowBox[{"k", "[",
RowBox[{"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Kappa]", ",",
RowBox[{"-", "0.5640230744006248`"}], ",", "tryKm"}], "]"}]}],
"}"}]}], "}"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Black", ",", "Thin"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Axes", "\[Rule]",
RowBox[{"{",
RowBox[{"False", ",", "False"}], "}"}]}], ",",
RowBox[{"Ticks", "\[Rule]", "None"}], ",",
RowBox[{"AspectRatio", "\[Rule]",
RowBox[{"100", "/", "408"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.6625990392524347`*^9, 3.6625991182736807`*^9}, {
3.662599742489361*^9, 3.662599797768262*^9}, {3.662600227309654*^9,
3.662600235495182*^9}, {3.662600636715523*^9, 3.6626006574723177`*^9}, {
3.6626007550573053`*^9, 3.6626007633197927`*^9}, {3.662600810103195*^9,
3.66260092853878*^9}, {3.6626010433922157`*^9, 3.662601043726243*^9}, {
3.662602118259652*^9, 3.6626021183551702`*^9}, {3.663807500312025*^9,
3.663807520663054*^9}, {3.6638075621243877`*^9, 3.663807563819957*^9}, {
3.6638079539364853`*^9, 3.66380795585506*^9}, {3.669320381204702*^9,
3.669320383671608*^9}}],
Cell[BoxData[
GraphicsBox[{GraphicsComplexBox[CompressedData["
1:eJw1Vwk0lO37FlnbUCIqpUVJkmypvI8slSXrV9YsCVmyhCgqDIVsoWTPmw+p
hFTK141KtoR8iMHMOzPyLyTKWKLf0zn/b86ZM+c+z/1c78x1Xfcym118Lc7w
8vDwDOL3n8/hUqPjbm7DMEEs0/+mTqKO8JCZe0s5YJf+Kz3yNIme8a2QkYtm
geoO76MxV0j0svrIaWFZCtjSfYn7rpMoLPjV6DQwwGHBce3/RZDIv23/gH7M
IARoDh+w8ibRdlFdxQDoB6vrGbWLRiTqrJbxlvmnF7pvp+7320CiGT9vpY7G
f8FaUFKqhlOAbK4LH7QT/AhlqrteK90vQOWCwVouIu3gqU0rynYpQLFtDkKX
rjZDhUWLqq50AbpXDPmGQm/hhmzR5HzbXWRbeFVth8orOORqbqcViuOLlSeW
y1bCzrdZyXzb76LemqTR5AvZQH8qnDjWmI+kMnbbHnlwkwCR2zQ5r3xUEige
7GNeRvBH/CA5Yvno3bljdPe0l0S58VVtCcc8tE1MceS07WvCzablqExhLprN
TOPJdG4iDijlsFM+5aBPwivWPDP+QNwyYWmrieagzfbBjRJnOwmPGddFN8ts
dKpl7VpL938JM4E9q8VjspBTn6dUjUov0eCw5OSmhkw00m+QITXRR0RqmVQu
E8lEoUGW8jMjA0Sj0ICrv/Yd5NETWxVxkkGciZzM3RaRgSQR79DRXibRq5qz
VLzqNhIu0H4nbMEi9v2lv1p2/BYa+NgV61TBJjQnVquIqd9CT835ukKUh4nS
oNRhZ7905J8XP7M9/TORkLh5C6M6DfkO9/S3TY4QrYIik2LCaSggtMZA89wX
QmRN6ckWo1R0kj4Xr9H+lbCx7+l/n3MTofgO6xnTMWK9n/60FjsFLRfh5TF9
Ok7o3Oz5MbM/Ba3Uma/4IDJBzL8QWRS6lYykyLoS66YJwudKULbbhyS0euxJ
guKl74RxnP61puREJOoQqMY8MEmI+jwr3kMkoLKm9Brx2Uki1yzrS/V8PCI2
spWTSqaIvdcKWk3+jUMdGYseox4/iGWpg8/25cYiq3n9xDSZn8T6dj7Otajr
KNT2283q5p/E6gu8D1uDrqH8IVc7uD5NXHsy0h1hE4OeGwuKiWpxiYDIM4Wy
1tGotmBy6vdvLkF9mOfr16Eh+hoXMrqKAyF50weTTEn0prY+lqXHhmz9cp8V
gSSqPqUAEp0U3I3rjRmMJtF6Kb4dV32Z0NXBI9YcQ6K+Rw/HbixhwNyrNJvR
EBIZ+75aSpcbgHeq+hHXHUj0y3VPq4F2H2Sta1OUwfV3RkLPZPpwD4iV7ayo
5iVRDTeMVyiHS3RbHXRuaaEhZ0b3zM8Vw/Dm4qxTjy6JDPM26Ly5x4ZOFcT1
wfWmWS4zlrWLBRsmTEXUo0g06lH4Vu8dE+xszPomrpGoVFx9rM6JAb63aUJU
OIkGN/6aSO4agFbGErljZ0iUorU/jL7YB2VOVr5ndUiU/bmMLsTTC04t6UNO
oiTSkqsXvuHFJRQ1VMRLxKLRiWNjJhIOHHCTe8CSsSWRNuXeycthgaC7pY3H
RZy/fH9KUggFfKbcvTH4+cbvnOJeSjIh62edx1saicRvGdLL9IZASGdLz6rz
mE+4KiXvTwezTPEzUn9hvPca81FtXMKPbC6NiaGhrQYpW5S0hsGZ92xJ7CES
Ja5syX7SxQavDq6GnAeJQmzXLHW0ZoGzb3LIFdyPrFKC18hPMeGfonDpPbhf
penNedsnM8DIayWT7yqJiqel3b12D8IPibN1HHzffpu2lbxjP9i3zZW0GOD+
135m681TveCXbvllfi2JQp+5rmiz4BLmLU46HarRaF1ZUYhJLAdU9sjdm7Mi
UYS5hNLUGjawv3B/uVwg0cWqvcUWhRSMGzxe2Yn98OTb3k85ukxYJu8iwcJ+
Yc129rPJIVhHJ4Olg0kUeTsvcUkzHYTvtfO62ZAo3KVv8W0Vl0g+1cCRKKEh
QWU/zsdANnRMLrxw88P9U3BLd+8iBaFhZ5vvYz5pqCvYJYsJAp8/p4VivusZ
/j7yexmg2DlxjXaJRHMBL4LFq1jw8/u3oI1Y/zkXdLHViIJdMrS6eZzPzk06
8OkrAwxC73f4Y//81kjn6nzmEkc5llUbXGmIP3Rc09BsGPa2eq010CKRcsPd
5gejbFATyP9Ox/6RKktOqj3HgnM+wjrxmN/r24YOSAlTMCOSkKmJ+b/uQH+w
s5gBD30/yS7i8xsuCgW9NoPgIxr/ocCTRHWZqNY4qR8Wjp/d4XWMRHpvUWN3
Qi9UKE/91JLG+Lzqq3wNuMQjc5GH5w2i0RxzaeLZPA58FFwgjluQSE541O6r
Iht21DYb1geRSFrk0b4nLylQVrHXc8L8j0Rl8iTZMKH/RE2QA45bd922u/Jx
COY3ySfFYb3c+cqazk3TQVJosDzMDtfzw1Ie9xIucUTpQr/XCxoq/mywuvUG
G2iv50sCz5Eowz7PWUuCBZXVz2/PYL6edx3MtSxnQp1pr1EN5vPprOXDH0cZ
0Dic8vBFGK4nhZR7Iu9ZUFpkgt5jPTKf1fAruVCw4LUJGnG+1L4Zl+YlTHD5
uvG4HNYzN9JtlurjEnfP8HqYBNFQL39GyIIOC/Y8CxE6HUmiTQsrxtQGmLDz
d4i8JOa3z6lq/fdEChK+0X/vw3hX7ZrKH+xmwn79RiE77Dfryr8NL4xQoKSz
q8YYx2YPvEz9o3F9lJ5s24HzbVe+GfdUo8B79KSlLMZzGnv9M3+KS2S0j6dy
LWgoWDxH19puGCSjn63N0SQRj1wCs3iGDb1R2h4VriTy+HT8r++hLNi1PXBQ
BOtb4Jv6QXQNBTHhzz9rYDxez/fGok8YwLDaEBOE6/OyVAWxym8QDNwuzYd5
kSjwX51gx6J+sGvZeP6pIYniCSXp0MJeiM852dktg/GLNiYTiEt8sr5/4ahp
NPK6VJlx4T4Hdj4sWP3djERTrj0BnzXZEKEbdvoL7s+eqt6z7AYKbh/LP7MZ
683bdjztmisT6msTw9NxXKsXmmX8dQjuDIiiQ7g/21aruxcuHwBnHn5ulD2J
vC3SIjRILjF+yN5b+jUNheqqKDRmsEHjfcnweR/spxgHea9NLIjaw3W4g/Xv
3Ph9r3ENE1Lpj216MZ/KAvom/VYM+Fr1l7oZrjefmLCXAp9YUEUb1tuA9f/C
vNhyyoeC9THXvEpwvkr4g+n65UyYVdOIDcL6j8ubXqzs4hKbExt6RsJpaIfy
CW0lExasE2NYTmH+tI7UX1UaYcKBxdaxrZhfhfjz1OZMrG9EMw8/xsssDNcv
1GSCImfV63ysd/GAq2jxFAU9881NCxjfc1qWdTaZCW/2Ckxa4Pz7mpFPshAF
5cb04FUY7/HNB8H+Y3gehgQFxNrR0Ll+hWLZRSbwfPO7r4bPm4e++UQ9pqBq
wWh7FuYzN+66iN3fTBAqZFZmYzzDhEVi4QQFlz8IKrNxLFBpY3OokwnRU1nN
/Ph+nDr3RG0UBWuyFVY54nMRNv9OLQUKePgJ2134XPRof2D7LJcwanqzzsOQ
hpQcfxwdchoG9Q0GjQ0amP8PvGN/L2I9tAN2yGD/JY/vfh57hQXVB8Skm/C+
+ijNZ13COgoU1x5UVsd4xMTbbL4XDAijH2oqw/yFTAUlKlwahBttFrMj2H/v
Aw53eFT2QxLvq1lbvK8++rVV17C8FzKs33eR6/H3mbvZLn+ISxy+t62+0jIa
bW0UyV0s44CeXu0/CPuPLm5ymaPNBl29grgw7L+bx4zsw1sp8OvxD+bB/Kya
2jHI58mEXBq/+mMca5l7HtjHHYK5uwtEOvafZdpcVa3kAMz2l6cK4P1gTaFQ
vWw+l8hLMskMeEdDLt+L1Bpy2VBkV5H2Hc970eyDcXzbWSBXnqrhgf03pNty
qbGOCT88Py3jYD7P3TiU02bLAHP3y7fuYP+dUJ1sWDrEgtFKR5/XeD6Lc22U
uAEUWJZWGGXgfKIgBhHiTEgbzGPnYH/cuvj6RVYHl4gQ1gnSiKQhM321uw0W
LMjQPPy1GvN3xDu7+f4Y9qtj/AUFzK9FvoX+izwKrsRYCIzi31fUfDJpszYT
5qzP2tRj/7VP6p5HsxSkrh1v6cL4F2TmFIfTmbDKpr7SDT+/08RZUtWAgo86
VyUFMJ41Z9Mzmy9cok7I9shHRxq6xMM/mcVHgWxY6a0//WTyR1u7zFMKJG9X
q17Gzystc7HqKWXCzxXfJh5gvICCgYJ0ezx/v1RNdeN4de8+srqHCSo/Sr6u
xPcrjLqrrWMpoLYd5Tf8U3+z7PjOPRSspR3r2IbPn2eaVj2f5hKu30ziyo7T
ULphdXTaSuyncxVVf+ZZfWuWR4M7BQJxgynV+P5uuRH1Cgr344bC8I34PHIL
ac53gALxvUsYf/qz81OzU+QME6h01K2CY7kQ2QFXcwravl4O/LOfzSZcWVXX
yoSI4xVv/sxjqm17w92tFIRE3R3/s794/HRTHfnFJTxHLA9vNqCh//6/8fz/
67/99b/4f4rLK1M=
"], {{},
{GrayLevel[0.8], EdgeForm[None],
GraphicsGroupBox[
PolygonBox[{{1, 221, 222, 50, 220, 171, 211, 131, 163, 203, 99, 123,
155, 195, 75, 91, 115, 147, 187, 59, 68, 84, 108, 140, 180, 49, 48,
47, 46, 45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31,
30, 29, 28, 27, 26, 25, 24, 23, 22, 21, 20, 19, 18, 17, 16, 15, 14,
13, 12, 11, 10, 9, 58, 67, 83, 107, 139, 179, 8, 57, 66, 82, 106, 138,
178, 7, 74, 90, 114, 146, 186, 56, 65, 81, 105, 137, 177, 6, 73, 89,
113, 145, 185, 55, 95, 119, 151, 191, 64, 80, 104, 136, 176, 5, 98,
122, 154, 194, 72, 127, 159, 199, 88, 112, 144, 184, 54, 129, 161,
201, 94, 166, 206, 118, 150, 190, 63, 218, 168, 208, 125, 214, 157,
197, 79, 216, 164, 204, 103, 212, 135, 175, 4, 219, 170, 210, 130,
215, 162, 202, 97, 217, 167, 207, 121, 213, 153, 193, 71, 169, 209,
126, 158, 198, 87, 165, 205, 111, 143, 183, 53, 128, 160, 200, 93,
117, 149, 189, 62, 124, 156, 196, 78, 102, 134, 174, 3, 96, 120, 152,
192, 70, 86, 110, 142, 182, 52, 92, 116, 148, 188, 61, 77, 101, 133,
173, 2, 69, 85, 109, 141, 181, 51, 60, 76, 100, 132,
172}}]]}, {}, {}}], {{}, {},
{GrayLevel[0], Thickness[Tiny],
LineBox[{{-0.5640230744006248, 0.}, {-0.5640230744006248,
2500.1108919042313`}}]}}},
AspectRatio->NCache[
Rational[25, 102], 0.24509803921568626`],
Axes->{False, False},
AxesOrigin->{0, 0},
Method->{"AxesInFront" -> True},
PlotRange->{{-0.6999999551020408, 1.4999999551020409`}, {
0, 2500.1108919042317`}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02], Automatic},
Ticks->None]], "Output",
CellChangeTimes->{{3.662599048027356*^9, 3.662599118487307*^9}, {
3.662599759021966*^9, 3.662599798298171*^9}, 3.662600236269802*^9, {
3.662600638703472*^9, 3.6626006578231163`*^9}, 3.6626007638682947`*^9, {
3.662600814095531*^9, 3.662600826209643*^9}, {3.662600874001212*^9,
3.662600929941042*^9}, {3.662601057346292*^9, 3.662601057845495*^9},
3.662602118751725*^9, {3.663807501706894*^9, 3.663807521208254*^9},
3.6638075641858387`*^9, {3.66380772712016*^9, 3.663807731006621*^9}, {
3.663807786424987*^9, 3.663807796526593*^9}, 3.66380797050038*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"try\[Kappa]", "=",
RowBox[{"-", "4"}]}], ";"}]], "Input",
CellChangeTimes->{{3.6638075804908524`*^9, 3.6638075819936333`*^9},
3.66932037797295*^9}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Kappa]", ",", "u", ",",
"tryKm"}], "]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "0.7"}], ",", "1.5"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{", "None", "}"}]}], ",",
RowBox[{"Filling", "\[Rule]", "Bottom"}], ",",
RowBox[{"FillingStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"GrayLevel", "[", "0.8", "]"}], "}"}]}], ",",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",",
RowBox[{"{",
RowBox[{"0", ",", "maxheight"}], "}"}]}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0.5640230744006248`", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.5640230744006248`", ",",
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "try\[Kappa]", ",",
"0.5640230744006248`", ",", "tryKm"}], "]"}]}], "}"}]}], "}"}],
",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Black", ",", "Thin"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Axes", "\[Rule]",
RowBox[{"{",
RowBox[{"False", ",", "False"}], "}"}]}], ",",
RowBox[{"Ticks", "\[Rule]", "None"}], ",",
RowBox[{"AspectRatio", "\[Rule]",
RowBox[{"100", "/", "408"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.6625990392524347`*^9, 3.6625991182736807`*^9}, {
3.662599742489361*^9, 3.662599797768262*^9}, {3.662600227309654*^9,
3.662600235495182*^9}, {3.662600636715523*^9, 3.6626006574723177`*^9}, {
3.6626007550573053`*^9, 3.6626007633197927`*^9}, {3.662600810103195*^9,
3.66260092853878*^9}, {3.6626010433922157`*^9, 3.662601043726243*^9}, {
3.662602118259652*^9, 3.6626021183551702`*^9}, {3.663807500312025*^9,
3.663807520663054*^9}, {3.6638075621243877`*^9, 3.6638075944272823`*^9},
3.663807958975739*^9, {3.6693203724708767`*^9, 3.66932037497114*^9}}],
Cell[BoxData[
GraphicsBox[{GraphicsComplexBox[CompressedData["
1:eJw1WHk4lO/3Rkq2UiGpkL2SUbZEnUcSWdJqjSyFIpK9ENmLQvQRYsyrDSm0
2GpI+yJLiy1m3lnsKtFY83u6rt93/pnrXM/7nuW+73OeM7PO3f/AcQE+Pr7F
/Hx8/765JZZ7PT259AW/UkzvHMpCLZFhk0WCHPobVNl8UPQaerJAfLViPIsu
aub+3+G2a6i22sxDWJ6k90GNb/mV/1BEyLPhP3QGvTEmuDN/TzYKaDL4bprQ
Q1+t2MLzl7yOVCVMNM7Qu+jWj7+FRrdeR63Vq31XP22nZz5MaOQrzEGTp301
W958oTt+t0ZDPrnIIUnYyEmojW5gHFwttD4PlQuFbHMXaaYLfBtzTJrIQ8lN
zovPRb+jExm/PC5V3kBFd+hUi8Uv6YNqmgrZvvnI8Wa0rvqWZ/RxFKp2UbsA
OZ6ttBWTr6QzjckW3mABaq+7MpwWmkdftb/8q4cdFclkb3I0K80Av6WkWsEj
KrobtDzk1P77UOtz3zVQtBC99tvT7ZVZC41DIWVtxwuRyjKNfg/HRjgbEpe3
9kkhmsrJ5MtxewsPfwud3iBKQx3C4pJPrD6BsxJX77U9Da07EvJG6kQrfHxz
+/5oLg25vJeWPuj1BeR0jDkD32nItfOkTN2WdqD5vUz9uYJA/V27s2V+doL0
7Stz6YhA4cEH1Sb7v4PHS4OodZ4E8v6W/CjGjgHjrdv5AyIJtBIJ9Jq3M2HL
mPrHpUkEEqbteC18gAVNFKWUhhgCfW/7nOxawYbUXlPdHT4Eerx/wecwLS6Y
mGieH9tBoICCS5OqWX1QYbR1VQw/gfy537qaxvphy7KQXodyGjoTXrd7q98g
zL9wizUwoSG77ulL+s1DYG6Xftj9VSFCl1rsJ21GIGO4q15erRCJiQjw2Twe
BduVX1xLI6hoifFMxSeRn6CutiipJ64AyRANd+3f/oTWqtpi6Xc30IqRh6ka
536B71bBxW7ieUjCOUiXaTgGDoH3TT4vzUH332bVLZ8ag0Llp7MglI1Ajq11
5e5vaJdUZnVJX0Mt2X+9h73H4UF47rjm1FV0aMb0cubqCZj8ZXe8d0EGCnf8
kVH9bgLoKvrpTkppiNp7zIme9Ae2yjm+vuCYgqqshJZJbOOBX0XpagFmEqqn
jf2en+cB48az7FDjeNQt6U7EP+LQdU2HEp7fz0LKXfb2J9M7IMZu7qHzRgI9
UP94NMm3G5SerP/9/RCBlDO0385Z9sIBg+w060AC1YvutuCsZMJ6Xb2MV3EE
kghQOLg+i4QoRpWzbCKBftckq+sKsIEif+trThiB3i0fLvMN4MBxo8u/39gR
KDPMjPuJ5EJ5QehgjSKBfj7fPDht0g9DHOuAsS4a+kmxSI99MACjZoG7bSNp
iF3sNKAvPwSChY/2hAvRUB0vQmDxDR6UevJ5zgslIjfG18kJcS79nW+1jOqF
LPS8023rCrIdFm1qvjkkTyArAZGIfWVd0Ojp6itlSaCmWJPJszk9YJNzLFrq
FM7nV9/5yicMeC0yhK5jfWXaL1tVrUcCbYdt6VqsvyhNdqh8MQveWFlNl2N9
Hgp0zeMu44Cg+ENHDXcCqRxXcS5K5kJiW/XToM0E0ip3+ZU23AcdrbXRDj9o
SEs0Xe/u/gGI+btwj2w2DW1cLiZT9WoQPHd1nhZUpaFtis+FU3x4ENPx/s6u
sUSU0GUT1oA6YWyJRKaxHoEkbdJM6jd8h1XpLC+2M4HOUpVyoud6ofN9fkQj
xndYpUhyZRgTNE6nffqZQKCUZErq9d8kbDr0dstfzI+3GaXDwpENlc0lWiFn
CIQqQhvGmjkgV0TVFLcikEDKCf8Zwz4oyk8Orl9OoB0f9Wdim3igLyNV7qCY
gJR3pytpbuPS78k77/XwyULpjp53vC62w7Irtwf+riKQrL/6RR2bLpAJqKcO
mhKoKOL9lWrjHrC8oZpbcQLjx67KyUlkQJrPwCxxnkC2H4Rno4VI4C9S8NqK
8d3lnV4gGcUC7nqPw534PJuQvapEsmG0aIFIL54Pfk6Z2UucuZA28OOz41YC
7VOfGO+q74O80fFFWZM01BymI2ykOABfJBdFDBbRUJPpMUpYziAUthjXvdWh
ofAnx8SbDvDAYCd7TPpEEjrsdKhfaqADdFdRnjG1CETWlu0vet8NEdTXrHAH
AtlcL9lML+oFibN/NNeFEOirTDDlrxkTXlouvjYbT6C9c2qn3V6QkFOyqYeC
8daM6eZDmmywdWelFwcTKJ7cXEUp5IDyCetE6QMEsrzQXnx8aR9kJ7qIcGUJ
FOne+fflIx5cMxrZdS0zAU1drHU1+t0D2cwzJ/acJlDxX+njH/oYELU85q1N
LIFa2TJ6v46TcG3N75vPcH9Vjevt2/CVBb6bXGrMzhFoqcmtm3eNOfDG2tJM
Beujtc2af91GBuy+f+uBNj4X0G6botzB+dtrGNDw+++k9ItbFFkgnaXkHYf9
z+tn8Yz7eJBrQV+2tzweLQwf3Wqxj0tvPrWqWdA1C4XleDPSXdrhvx2FnBlp
AsXc1E+/Jd8FkSUrZk1MCLQk/EqXvVQPlD4++fqHF+5/53Xql/0ZkN76WSUj
ikB6ixJG2D+YMMOwCNbAfKsu9NZe6s2CrWf0hb9GE6imNnTJzndsOKXKL7AK
6yXjq+Xjxt1cCLKZOfXAkEAMj/oQ/pI+ENxTzpOcoyEqJeFMvMgArNA+v1Oz
BNtHJQzt4wZB5w/TRsyIhmQE9Jb67+aBYapCw0BREjLKtVVATzug63uYrrIm
gfaMPbWXzuuGzc2BIlvwPKrJ8o90CesFYUGHyKdBmK+M73W/KEzw0JR4egLz
TdEvcntZSoLjao3xe5hvCbnKzG0yOF+KusbGUALdmb6svTeZAxUa31Kn8bw8
PXfljewUF0QdfJM65Qi05l4Jn9ddHqwUdUhRaUpAxxLPl3a96oFjlFeuj/wI
JB92foz+iQHbVvT5RlwgUKVcltrhvSSsrJ9v+IP5yk0XZyvXsyB1yYBifASB
tjgtWPdmPQdiVrn4VB4l0OJWyu2fkgzweeDH5T9LoNBSw0SlNJz/tiej+/H7
JTaVubqiLLiXn+RqgedB/gXPKbKTB6FnzkXdG4hHwj77xG8XMODrkLTnLcxH
cEaqyFp5Ejw2vYjVxny5FYjRRFyZ8KrTbzYK13+qsSRqrosE+SCduQKMj258
2bf2eQYkiqnorcD+fxXn7UqNJEG68JRBMI6fUn3S16ieCS36BpeZ2B7sqqk6
tY0Fsly3jaW4XteRxgnqbx587vP7YRgej0KW3zCxd+LSD1HUrGwds5BvzYnZ
W+bt4Kg9ujNUikAPET2zV6gLdL9aew4b4/kRGhCjPv8dz/PppSJYf2U5X0YT
PRhwlK19bgHWn6rSLq40mwlebZJ6Crie7IMHI8WcWVDouPuTNZ73H8xUrfY/
Y8OD7jNbNE/i+y5TzTTfkAstQ4e5B7djfvlv6UtS+6A59WyM9TwNLRalqBX/
7QdXh0gpszIaSvblIvPwQWDppGXdBBryvi2XBogHxbfpZiPPk5BWrZ3R4dsd
MBTKXv5cg0ARqaZHbOK64UNdXZywLYF+XN2vpOneC6/MPooJYf0t+pQeO6TE
hBDqZ4osxlfhkLsjj0pCQ+h/R7gY/wu++T364mzwGehfy8H6q07YHuAcyYEh
qnLgMexPoNbHbmKEC71Hugw/KhDI90BmjD7Bg6kFKlrCQwnoerzbgZIHPXDk
Ad8gF99/nQ+1q6sbGaAQ8KFJDPNRZHhQIXEnCS1qwU5iGC8xxuQmxUcs+Bht
XLAW338mfeUu39ZywOReX+KYK4EUWxTOtgszIEeLa3IsHOtz4If12jgm+OaU
hSphvvN8AzK95kmQkk1OuYX1Mapmc7byMw/qJ0KEphcmoBe3BT9TrzJgF8dk
nRrWn+d9ywU2K0i417xo+b/7YU13vbfgISa4D2R3AK7fhXEilNJMwkbLSfVB
jM/PBvf81t8MaPDpOl+J5xn52nE7PYCESM2S1Xk4vtkfOW29h0z4qOEj+ALb
nZNh5QWaLEgZ1sqUxc8/yCgNCRjhQayRoo1hVjzaPfB6vGKGCRUfRxJ0cPy0
w+v/8AyZEOzQpvsIx9shy/W+WkWCxvIihQCcz3P+b5pKjiRcJ9Z0d2P/df6J
9evzmKDjd1UrAttxwZ+WDW0gIUw0smoD9sd3ucfSKZmEh6LHZvbg89aIxzd3
fmCC88j51mlsS5h3BTVP8UByYbnAPud4pHl03LzXlUtP9Vc3OG+XhTwtTl4s
394OaXejNzyUxPfRkljp2ZlOkJOUTgHcDy4h7ockxr+DQLq24jV8f4pWU1rj
nBnw6Qv5pAbzl7+ZICk9TDB/+V+CDM6nedpc8ZIdC5YFFWsm4X74nDo3aF/F
Bl8xu47HuB9GzmSliOpxYf/gxSYlvF+nNMtk38jpg9CQqCEvPlxvWGxM3WQ/
vN4WZ9hyn4b+nmkxqQ8cBNPAAP3TxjQkMZ3RrLadByyqT/JESxLaYGn/7mhe
B7T6b94ogftB2km4xyesGzi1OmuDDhNI5OrOP1J2vaDA/+d+Md43PUaGPPvX
MiEtoJn8ifWT7d5gK5FLwl+dzwN8GK+aFZmxj4XYoMLbGoPwPvT8g6TE8VAO
uBTUH12J5/v76x357v1cuPiYWvliHd6nbi5+Lk/lAefWzFTMVAJ6GHdA5erN
HmiSO3I1CveDfltq3uOnDLgdezW+DeOxxqJiDdUI80utSZHCeJkmjrZS77Pg
R339Pm+Mp9Wm5LmelRzgauyVTXPDetp33cNKkAFlE7d3SeJ+uCJksVk2iglX
30TfFcH5Sp5rToueIuFlvvLPVlzPtbONNbktPIgfNg5Xk0xA6165PLmRyoC8
ylciXLwP9TwtnvcSJyFf8lzjv34In5a14t+L9ZJ8q1YO6+/r6JtA83ckWHWo
ZYhj25pRF/NphAF2a/2VL2B9O36tNmj3IaHkZNrQPRy/SDJcWruMCXEBVbcq
sX1AqP1elToL3JKSJfbh5+05Ck8cBnlwyVXadCcRj57xVH+9n2DCdIqY4GYc
fzQwtmNclwmsjTtnr+B+eKxuery0goS6j4tl0nD8bRJ6G40OkbAgrMN+EPuX
vcwkVK8xoccm5ZoXtmdjNZcIqpCgS/69ScH+wvK2mwfFkhD/SF7VFZ9TciWS
4RUTTNh7q0f/7Ts5No+q/vDg9M2KZBOfeFQmyRmYG2CCt49ylyp+X2PTuJKf
OQkm2SIyAv/yow4v0ltFQq+t+QE9bA9+e2FjUMMEo0cN+9uwv6ZO78nr/CTs
EQqc+3cu5nVaqlWLhPdmjTXK2A5yOfLctJUJ9sl7OhZi23vCU6d/lgeBsh5H
3Gzi0f/+X+D7/8//fl/9z/4/X9kZ5Q==
"], {{},
{GrayLevel[0.8], EdgeForm[None],
GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl0mV0F2QUwOENgU2kFAUBiaEIUtIh3YogMClpRtdGd3e3gHSDSCMIKCnd
3d3doDTP/+zDc37vPffjfcMiosIjYwQFBQUTGhzdkODod3bv2LpP3zKFrTyj
HWP5m7tUpjlDWMEVClOWCHrzO6fJRla+JQuZyURGMvAN6UnH16TlKwrxI/Xo
xQJO8SUFKUNdejKfk6ShAD9Qhx7M4wRhVKIZg1nOZfLzPbXpzlyOk5qfacog
lnGJ72jFSP7iJqWpRTfmcIxUhNOEgSzlIvmIYgSruUEpatKV2RwlJZP5l6e0
ZQzruENFJrCRhzRmB/8zgCVcIC97eM1vbOYxkezkBcMJfIZVcp2SxDTv1lf8
Glib1+t9avCBeZs+pwvvmMURUhDLfq++YRIxzFv0CW3YxUtGs5bbVGA8G3hA
I7bzH/1ZzHnyMJFNPKIlw/iTa5RgHP9wj+p0ZiaH+YLWjGINtyhPQ/qxiHPk
pgVDWclVivMLnZjBIZLzEw3oyx+cJRfFqEZHpnOQZJSjPn1YyBlyUpSqdGAa
B0jK5yQhMZ/xKYn4hI9JSALiE4+4fEQcPiSUEGIHbhO4b+CGgbuQgyJUoT1T
2c977DuBbA==
"]]]}, {}, {}}], {{}, {},
{GrayLevel[0], Thickness[Tiny],
LineBox[{{0.5640230744006248, 0.}, {0.5640230744006248,
2500.1108919042313`}}]}}},
AspectRatio->NCache[
Rational[25, 102], 0.24509803921568626`],
Axes->{False, False},
AxesOrigin->{0, 0},
Method->{"AxesInFront" -> True},
PlotRange->{{-0.6999999551020408, 1.4999999551020409`}, {
0, 2500.1108919042317`}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02], Automatic},
Ticks->None]], "Output",
CellChangeTimes->{{3.662599048027356*^9, 3.662599118487307*^9}, {
3.662599759021966*^9, 3.662599798298171*^9}, 3.662600236269802*^9, {
3.662600638703472*^9, 3.6626006578231163`*^9}, 3.6626007638682947`*^9, {
3.662600814095531*^9, 3.662600826209643*^9}, {3.662600874001212*^9,
3.662600929941042*^9}, {3.662601057346292*^9, 3.662601057845495*^9},
3.662602118751725*^9, {3.663807501706894*^9, 3.663807521208254*^9}, {
3.6638075641858387`*^9, 3.663807594907051*^9}, 3.663807734555608*^9, {
3.663807786560906*^9, 3.6638077966623774`*^9}, 3.663807970698051*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["\<\
File: 1 - 0.85 - 0 - 0.02 - 0.0015 - (-)0.60 [Asymmetric competition - one \
species]\
\>", "Subsection",
CellChangeTimes->{{3.6580707049519672`*^9, 3.658070706349422*^9}, {
3.658070744397442*^9, 3.65807075249966*^9}, {3.658076356754607*^9,
3.6580763606504917`*^9}, {3.6625774963684072`*^9, 3.662577499079831*^9}, {
3.662577751631178*^9, 3.662577790492811*^9}, 3.662578471457584*^9, {
3.662581798018008*^9, 3.662581820815783*^9}, {3.6625978528187*^9,
3.6625978539612207`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"trysp", "=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Sigma]\[Alpha]", "=", "0.85"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Kappa]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Nu]", "=", "0.02"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Sigma]\[Nu]", "=", "0.0015"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Beta]", "=",
RowBox[{"-", "0.60"}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"tryvm", "=", "0.0015"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Mu]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Sigma]", "=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{"tryKm", "=",
RowBox[{"Km", "[",
RowBox[{"trysp", ",", "try\[Sigma]\[Alpha]", ",", "try\[Kappa]", ",",
RowBox[{"Abs", "[", "try\[Beta]", "]"}]}], "]"}]}]}], "Input",
CellChangeTimes->{{3.658074206458665*^9, 3.65807421166369*^9}, {
3.658074801389743*^9, 3.6580749396472607`*^9}, {3.658076014352268*^9,
3.658076022888116*^9}, {3.6625777618468847`*^9, 3.6625777620482903`*^9},
3.662578477841975*^9, {3.662597860953413*^9, 3.662597864320664*^9}, {
3.66259801078841*^9, 3.662598013363653*^9}, {3.669320176845848*^9,
3.669320177712854*^9}, {3.669320365253003*^9, 3.669320368402338*^9}}],
Cell[BoxData["7816"], "Output",
CellChangeTimes->{{3.658074932852392*^9, 3.658074948287805*^9},
3.658075053786251*^9, 3.658075661309265*^9, 3.6580760233468857`*^9,
3.661348768081315*^9, 3.661361475265626*^9, 3.662577504446596*^9,
3.662577549352231*^9, 3.66257779171821*^9, 3.6625779283183403`*^9,
3.662578485042122*^9, 3.66258047285019*^9, 3.662580802693659*^9,
3.6625978076065283`*^9, {3.662598003364088*^9, 3.6625980155492973`*^9},
3.662598235275938*^9, {3.66293781168999*^9, 3.6629378242255707`*^9},
3.663809220296522*^9, 3.6638095046516447`*^9, 3.663851927893591*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"data", "=",
RowBox[{"ToExpression", "[",
RowBox[{
"Import", "[", "\"\<1-0.85-0-0.02-0.0015-0.60-Burn_In.txt\>\"", "]"}],
"]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.658071226407762*^9, 3.658071244891139*^9}, {
3.658074994893792*^9, 3.6580750210197153`*^9}, {3.658075621640133*^9,
3.65807562203861*^9}, {3.658075690781049*^9, 3.65807569876371*^9}, {
3.6625777972698793`*^9, 3.662577797581771*^9}, 3.662578487313106*^9, {
3.6625978670088463`*^9, 3.6625978676566477`*^9}}],
Cell[CellGroupData[{
Cell[BoxData["data"], "Input",
CellChangeTimes->{{3.654015655270091*^9, 3.6540156561189938`*^9},
3.658075623809044*^9, {3.6625784941298647`*^9, 3.6625784947523813`*^9}}],
Cell[BoxData[
InterpretationBox[
TagBox[
PanelBox[GridBox[{
{
StyleBox[
StyleBox[
DynamicBox[ToBoxes[
FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"],
StandardForm],
ImageSizeCache->{278., {2., 8.}}],
StripOnInput->False,
DynamicUpdating->True], "Panel",
StripOnInput->False,
Background->None]},
{
ItemBox[
TagBox[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
"0.0361125`", ",", "0.0283712`", ",", "0.033241`", ",",
"0.0364452`", ",", "0.0332415`", ",", "0.0332415`", ",",
"0.0346206`", ",", "0.0346945`", ",", "0.0296335`", ",",
"0.0360072`", ",", "0.0330181`", ",", "0.0300546`", ",",
"0.0280848`", ",", "0.0302794`", ",", "0.0331752`", ",",
"0.0397154`", ",", "0.0303387`", ",", "0.0303387`", ",",
"0.040054`", ",", "0.0352261`"}], "}"}], ",",
RowBox[{"\[LeftSkeleton]", "2496", "\[RightSkeleton]"}], ",",
RowBox[{"{",
RowBox[{
"0.0371295`", ",", "0.0290426`", ",", "0.032319`", ",",
"0.0339158`", ",", "0.0337478`", ",", "0.0333587`", ",",
"0.0346206`", ",", "0.0346206`", ",", "0.0336396`", ",",
"0.0336917`", ",", "0.0361209`", ",", "0.0339773`", ",",
"0.0302794`", ",", "0.0335524`", ",", "0.0324167`", ",",
"0.0315933`", ",", "0.0293263`", ",", "0.0372485`", ",",
"0.0311408`", ",", "0.0329429`"}], "}"}]}], "}"}],
Short[#, 5]& ],
Background->GrayLevel[1],
BaseStyle->{Deployed -> False},
Frame->True,
FrameStyle->GrayLevel[0, 0.2],
StripOnInput->False]},
{
RowBox[{
ButtonBox[
StyleBox[
StyleBox[
DynamicBox[ToBoxes[
FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"],
StandardForm],
ImageSizeCache->{49., {1., 8.}}],
StripOnInput->False,
DynamicUpdating->True], "Panel",
StripOnInput->False,
Background->None],
Appearance->Automatic,
ButtonFunction:>OutputSizeLimit`ButtonFunction[
Identity, 307, 24010936893988619183, 5/2],
Enabled->True,
Evaluator->Automatic,
Method->"Queued"], "\[ThinSpace]",
ButtonBox[
StyleBox[
StyleBox[
DynamicBox[ToBoxes[
FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"],
StandardForm],
ImageSizeCache->{52., {1., 8.}}],
StripOnInput->False,
DynamicUpdating->True], "Panel",
StripOnInput->False,
Background->None],
Appearance->Automatic,
ButtonFunction:>OutputSizeLimit`ButtonFunction[
Identity, 307, 24010936893988619183, 5 2],
Enabled->True,
Evaluator->Automatic,
Method->"Queued"], "\[ThinSpace]",
ButtonBox[
StyleBox[
StyleBox[
DynamicBox[ToBoxes[
FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"],
StandardForm],
ImageSizeCache->{82., {2., 8.}}],
StripOnInput->False,
DynamicUpdating->True], "Panel",
StripOnInput->False,
Background->None],
Appearance->Automatic,
ButtonFunction:>OutputSizeLimit`ButtonFunction[
Identity, 307, 24010936893988619183, Infinity],
Enabled->True,
Evaluator->Automatic,
Method->"Queued"], "\[ThinSpace]",
ButtonBox[
StyleBox[
StyleBox[
DynamicBox[ToBoxes[
FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"],
StandardForm],
ImageSizeCache->{74., {1., 8.}}],
StripOnInput->False,
DynamicUpdating->True], "Panel",
StripOnInput->False,
Background->None],
Appearance->Automatic,
ButtonFunction:>FrontEndExecute[{
FrontEnd`SetOptions[
FrontEnd`$FrontEnd,
FrontEnd`PreferencesSettings -> {"Page" -> "Evaluation"}],
FrontEnd`FrontEndToken["PreferencesDialog"]}],
Evaluator->None,
Method->"Preemptive"]}]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxDividers->{
"Columns" -> {{False}}, "ColumnsIndexed" -> {}, "Rows" -> {{False}},
"RowsIndexed" -> {}},
GridBoxItemSize->{
"Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.5599999999999999]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[1.2]},
Offset[0.2]}, "RowsIndexed" -> {}}],
DefaultBaseStyle->{},
FrameMargins->5],
Deploy,
DefaultBaseStyle->"Deploy"],
Out[307]]], "Output",
CellChangeTimes->{
3.654015656661993*^9, 3.658071247971476*^9, 3.658075055070158*^9,
3.658075702597713*^9, 3.6613487750821867`*^9, 3.6613614757456408`*^9,
3.662577553367422*^9, 3.662577801465736*^9, 3.662577928876912*^9, {
3.6625784921416903`*^9, 3.662578495405699*^9}, 3.6625804731940117`*^9,
3.662580803017035*^9, 3.6625978079363003`*^9, {3.662598003658917*^9,
3.662598015836391*^9}, 3.662598235559142*^9, {3.662937811907404*^9,
3.662937824595667*^9}, 3.663809220585402*^9, 3.663851928194442*^9}]
}, Open ]],
Cell["\<\
The case where \[Beta] = -0.6 starts from the same burn-in population as \
\[Beta] = 0.6, but where the traits are effectively reversed in sign:\
\>", "Text",
CellChangeTimes->{3.662598001146679*^9}],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"genotypes1", "=",
RowBox[{"-",
RowBox[{"Round", "[",
RowBox[{
RowBox[{"Total", "[",
RowBox[{"Transpose", "[", "data", "]"}], "]"}], ",", "0.001"}],
"]"}]}]}], ";"}], "\[IndentingNewLine]",
RowBox[{"Length", "[", "%", "]"}], "\[IndentingNewLine]",
RowBox[{"Mean", "[", "%%", "]"}]}], "Input",
CellChangeTimes->{{3.6540156291055717`*^9, 3.654015637852762*^9}, {
3.6540156904355803`*^9, 3.6540156946030903`*^9}, {3.654015764153283*^9,
3.65401580327742*^9}, {3.658071257922381*^9, 3.6580712642191257`*^9},
3.658075625809054*^9, {3.661348776598023*^9, 3.6613487797015142`*^9}, {
3.66136146018661*^9, 3.661361467487602*^9}, {3.66136149867896*^9,
3.6613615017026176`*^9}, {3.6625784995606194`*^9, 3.662578500496483*^9},
3.662597998166849*^9}],
Cell[BoxData["2498"], "Output",
CellChangeTimes->{
3.6613487809482737`*^9, {3.661361475780387*^9, 3.6613615021844683`*^9},
3.662577556169673*^9, 3.662577804020043*^9, 3.662577928918355*^9,
3.662578501609182*^9, 3.662580473234736*^9, 3.662580803044672*^9,
3.662597807972514*^9, {3.662598003697693*^9, 3.662598015866344*^9},
3.662598235593528*^9, {3.662937811939982*^9, 3.66293782462442*^9},
3.6638092206169243`*^9, 3.6638519282277737`*^9}],
Cell[BoxData[
RowBox[{"-", "0.6598646917534008`"}]], "Output",
CellChangeTimes->{
3.6613487809482737`*^9, {3.661361475780387*^9, 3.6613615021844683`*^9},
3.662577556169673*^9, 3.662577804020043*^9, 3.662577928918355*^9,
3.662578501609182*^9, 3.662580473234736*^9, 3.662580803044672*^9,
3.662597807972514*^9, {3.662598003697693*^9, 3.662598015866344*^9},
3.662598235593528*^9, {3.662937811939982*^9, 3.66293782462442*^9},
3.6638092206169243`*^9, 3.66385192823116*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"totalsize", "=",
RowBox[{"Length", "[", "genotypes1", "]"}]}]], "Input",
CellChangeTimes->{{3.658076784459578*^9, 3.658076805699773*^9},
3.662578507433992*^9}],
Cell[BoxData["2498"], "Output",
CellChangeTimes->{{3.6580767952988997`*^9, 3.658076806295833*^9},
3.6625778063358727`*^9, 3.662577928985957*^9, 3.6625785078609056`*^9,
3.6625804732676086`*^9, 3.662580803077553*^9, 3.6625978080072603`*^9, {
3.6625980037308683`*^9, 3.662598015899736*^9}, 3.662598235626834*^9, {
3.662937811990541*^9, 3.662937824658753*^9}, 3.663809220650144*^9,
3.663851928258267*^9}]
}, Open ]],
Cell["\<\
The following sums the competitive impact felt by an individual of phenotype \
u exerted by all of the individuals on an individual of phenotype u:\
\>", "Text",
CellChangeTimes->{{3.658075190925829*^9, 3.6580752068114223`*^9}, {
3.658075541506732*^9, 3.6580755784304743`*^9}, {3.658076166027096*^9,
3.6580761819691687`*^9}, {3.658076486638575*^9, 3.65807648742222*^9}, {
3.6625803420237617`*^9, 3.662580348246387*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"competitionplot", "=",
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"Sum", "[",
RowBox[{
RowBox[{"a", "[",
RowBox[{"u", ",",
RowBox[{"genotypes1", "[",
RowBox[{"[", "i", "]"}], "]"}], ",", "try\[Sigma]\[Alpha]", ",",
"try\[Beta]"}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "genotypes1", "]"}]}], "}"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2"}], ",", "2"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Thin", ",", "Black", ",", "Dotted"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", "Automatic"}], "}"}]}],
",",
RowBox[{"AxesOrigin", "\[Rule]",
RowBox[{"{",
RowBox[{"0", ",", "0"}], "}"}]}]}], "\[IndentingNewLine]",
"]"}]}]], "Input",
CellChangeTimes->{{3.65401717055512*^9, 3.654017187280355*^9}, {
3.654017344576412*^9, 3.654017359511397*^9}, {3.65401927528238*^9,
3.654019279074164*^9}, {3.6580749961162663`*^9, 3.658075010600336*^9}, {
3.65807618793108*^9, 3.658076188490995*^9}, {3.658076231516355*^9,
3.6580762327478237`*^9}, {3.662578424430344*^9, 3.662578429869256*^9}, {
3.662578513682218*^9, 3.6625785430394173`*^9}, {3.66258043211016*^9,
3.662580434565007*^9}, 3.6625805520910788`*^9, {3.662580800601956*^9,
3.662580801001749*^9}, {3.66259820806427*^9, 3.6625982094141703`*^9}, {
3.6629378069558764`*^9, 3.6629378078424788`*^9}, 3.669320178613121*^9}],
Cell[BoxData[
GraphicsBox[{{}, {},
{GrayLevel[0], Thickness[Tiny], Dashing[{0, Small}],
LineBox[CompressedData["
1:eJwt13k0Vfv7B3BpMJVQkmSIEhKKFNLnoURmUo6bwtVVF6EUuQlpOgeVTCXH
UIdztgbzTD6mkzkzZUjGNB0kmcr57e9avz/22uu11mftvdfez/N+Pnvb3962
//Dy8PBMksf/zmpo0xcul4tL7O0M59eGg/eCAnVhkYv57xy0sNgQDlm5exRn
ZrlYOpFqkioZDnuVLP4e/8rFA2IDYhTFcNgvequ3qYeLjzb68vegcICR6Yb4
TC5er1rFp+kbDrZ3m19oOnFxjK3z8Lm+cPBvuXXhXPkyPvAgZeRzdgR0dgp9
qXT5gzl6DmOUlPsgXeG9cf/W33goOOT2v6aRkO9Rs3r9wCLeud1D4fzxh+Ac
sWfqfegC1vztfSo8LArmo65RMZrHpku0PZk10cAQ/iD5eOgXjguMMkrVigW6
6Z5LHbRZ/PCFG79saRyEerpcVT72E+9bEIs8ZfgYrq187n/p+w88nOby04v/
CbiEtGzvJqbxv/8MGE03JkDs67HHdPcpnJV2JUAyORFKBpXWvpTnYDpt9HdI
TjIoiIChXdJXbDG1IyewNwVyVKjuwyMTmPddakDv3FMYZGfLaWuPYw/HnHC6
KAPGVGP34oIRXDaVdWrrxlQQDUrXVlsxhBOe7Oc5LJcGqtqTqmkz/VilDfq3
8DHBTS04uHigH5veXpHVLMiEZMX17c21/fgH+96tIGEmiEmo+/9K6MfjMTd3
9IozYW7Oq9L4SD/+FAJ/rm5nQlUx58SXmD7sZShbaGvABIo+J0hduxfzDF/8
5RrAhJtHvrcWX+3BQgeKvnoMk+tNvllpufZg+Q/iQ9fGmMBj8fVthkUPVjZY
b0qbYELgic9NDPkefNLT6QKdwwQ/t7G6e03duN3+SiFjkQnnqQMVLnLd2Chj
zlxLjAXmTc1ZAnWdeN0BxkkLxIKw1ib1WzmdeO9cGOIzZEFdZ2PGMr0T3615
ZFt+hAVGA/UvZy52YlmKGUfBlAWHOGxiQKoT10vQy5vsWKAhUp6S7d2B/cyV
+qP+ZYG4XUakg0Q79jyFdw9HsiBHMbzEaGU71jSZ6doYzQLrhXOjeybbsPax
941HYsn7J207IFhL+qTxE3o8C5YnYgZL/NowsbErZtczFoxfv6a2tbsV5+Zq
J7NzWOBl9fDxa+UWnNHVeXywjQXET9NvsStacFZ/clZRBwuG41eB1/u3WCs0
ReVBFwtOjvp/kqG9xZEo3UfzPQtQwBntkIlmbOYiIuPwkQUijF2dhqwmnDlj
8FaCQz7vL/b6uu0N+GNcoqcDHwH3nz+rOrRQj++N2MTP8BPgcSb4Sn5zPX40
r7cnTJCA7W8O9D3zq8eeYX30l+sIiIt9wbxeV4fLNm3We7OBgP+0HupretZi
B9ZGRzNZAk5OXJhKh1q8tsst+oUcAZp0U4aceC1Wurkkyy9PwLeVqwSEy99g
5tkBzYLtBJzp8OucWP8GB4W/VRhXJsDwkqNHUm4Nfu1wQTJGkwAZRR0ZcWoN
do0c2FCsRcDSe/G2cMcanOj51rp3HwF5Bi3aAatr8M302XuiBwhQFDXktbOv
xgYlPvO2BwngZcvkN+yqxmKKY58d9AkYvLp0zoCnGrsnF4ufPkTA4495zWrp
VVjkfO5mChAgmLUzXmCpEh8L4smRO0LAuOsq85CWSnyQ5usoYERAtcTQ8i9G
JX4uxqvLIR0Y/OTsqHkl3p4oGv7SmACO5ToNnFSBaSmyXkumBKT1jd37fKsc
t09XRAxZE9AbuCk5UbMc09zU62/YECAsY5xlM/wat0lqvJCxJcDPmWgvRq+x
+/Wh05bHCTg65i4RtliKiePePrdPkO/7ToLSofRSPJ5c2yh4koCMnU06P+xL
8QHvb3URpCXcdzv+lV+C1U9+Z96xJ2CCM5mi4lOMH15JHbdxIGBrpFzOB5li
HP9kh1EZaes9NtVRzUV4PXIyVPiLgCLfnLFFlSK8YSdL4hPpbxtHfmW8L8SW
f0QnD58iQK5gA78rtRCXXOO4JpKmzV9WaRwrwHdvdG4/6khAeXyaXnBMAZ7c
auMTS/qHbre55uECzKDuoAyR/uv6fu+ElHw89rt3yes0WX8y50OsrPIx9aVR
YRbpKvz44crlPCzxn5TwJGkV3sVcj1N5OLJb957LGbJeGCpsWcE8/Dhje34s
6agjp7o7inKxnnaJ/xvSb8bCP909l4vbWe2dM6QX75TN623Kxf0bTJqknQhQ
U/ouMFWTgyud504fIf13vbRUqm8OHjKvoJ0jHeduqUqRz8ELnret7pJuFArW
X9uWjTt2qWYySPO8yrSsCM7GGm/pRBlpLcuPTpfVsrGQd5VeO+nzkyIXlQay
sOGK8POjpOmRBqH94Vn4sNUntRnSrXsuRUfqZuG8Pw33l0nzM42O0doz8b67
qtQ1zgT4TDA9ptUzcQVaLSVE+p0K/32HexkYHbcxXksaLvybVfnlFWa/Wb9O
kDSR2dCubPIKf/Mz9FxFWuTHrtmHaS9x0WbO2SXy+gFa9yQWeV/iSt0tcxzS
w34cnb+dX2Azwzb5QdKmxVaODa+fY0cvuYlG0jlLWUF7pUh3Shjnk95ySOzp
k6vp2MS1ASWQDg3xrebtJvCBIYv266S/VnWOuWsSuORrybIjabvV2vwdkSws
PK/KPkC6zPiRih6HiR/ZVu0QJb09bN6cYcbEcrJ0uXHy+0Q0OXgLpafhU/Yf
8gtJn7bZmtfnmopH5XWzrEl/m5nVuVLDwP3qcbqSpAPjWrDwDgZWetV64wNZ
H/S+0EaD8adY3SLF2Im0apCjTd/Rp5j3acKbLaRL5bR7LrNScE6dwcoOsv7y
GtvZVm1JOPuVf4EO6U6RO22hUYm44Hro7gmynmdO6AzkH6fj4SNqrtGk935M
/inVHY+dQ68JfST7IfOnp8JEbwzWyFhBsSX7562OnLoUPRqvnN3UNE4h+z+o
Q9fydBTmP6S94ippitjl1PP4Ad50fz4zkuzH43rCvCvqb2PlgFHlBLKfo9iX
Jc+Z3cTnhCOzxEm3WvVpNDeH4NQVdksRdgQk1FnjvWn+OPpH/4eLZB6EdCp1
SlVb4Ma7tC8byfxQXT/gvnq3FophBCZdIfOlezo0WWSeghwO627psCLgWvTR
Bg8tH7TGUcbjliWZX3K0u4kioajHnXKjwoyAW3HyPvvv30IdFMdQPtJH15ZR
2oTuIspwkJUZmV91cxzl1XwRyM03wLrehIBz51TcCpaj0H764eUkMv9M5P3/
uqkfg4a/K19sIvNSaaDa0jowFllVyOf/OkzAF9vT+78sPEJdb37mGBgS4Hko
kl9mlo6m4wzis8n8LRa81lV1hYGu5+ZkL2gTkLJbvCNTPhVRT7Ye/EDm+x3r
zFZ6SyrSXijdhMn8t4sbafRTZqI6Z+XSK3sJmNpmXqUyQKA77iajBbvJ/NeR
zow6koG+M+5n0xQIWOtY+DJ4OgNF1Xi+0iTnz0yQzXPPpEzk8R8S7CXnk/Nw
la1CYBYaPVj6VUrmf/kwZ/GnKxttzLx98fJmAupznY5k0/JQ+Ih+RsBaAg6y
Vat3fsxDwR1Ddl/I+ZjVvWCQpJ2PPEbKL9oLkPmxEE2uzUf8Gh827FxDwFlU
p/uPfiEqmjsvT+eygNugsUdyuhj9K99R+GGaBfuGV8jcoGAUG2zX0krOd7US
+2mNdIy2cHjOzJLzXzHqVc3HBYw4JaarJFpZIPT05b4Uiwp0stAv0aaJBb+t
Kf1cTgWyF+hTSa1hwUBWpjLeU4U2K+z7g/NYkOxzpka/sAZZSZocGIhiAd1R
ICN2sAbZUnrTWOT+5bFJ3qPvfGzUc8nL0fs+CyLlBD0SKWwkPrT/xS8aC0Ja
80X/LLCRb9D4n9EQFrhorHMqO1iLXJdMpg28WKAwVbqgW1WPfDYK7hQwZkFg
8+FbP7/XI2Mv46Bj5P6q+3mjcIZkA+pZjBu/Y0Duh/7pU9h2sQF52eXOzOux
YKp30YJPrhG1qysZlGiwoJyt86zjehMKmdMrypVkwV8JhaaeOi0o7dOWvqjP
TDjGeN9sSWlH/w1O8UTcYIKRhdjK2fweFCqgNuuTkAYPnHpCNAr7kVKDS/i2
V6lQaym9zlpsCBmc1TZfiGfA923iQe1PRhBBGxfiefgMrlze5fJg0zhyzhku
yAx/Cj39IrZudRNopk5Zuss3BZwDDn7iM/+K9C77+e79lgTVu/aHVa/moNWK
bBHffjooCpRNpJpMobLdc1uD+RNAuszDaDV1Gm2WSnm01T4eeBZ50y8N/0D5
aT13ApMewZzN6zPsHT9Rz/ls0d8ycdCn5SS149YsmljylF+gx4CPvYiofP8v
VD/qa1F+KBokY0Ypq6TnUeRVFSFnkSjIOJXCmrm6gKKce0svDEWCvX6wSd3r
ReSQ7ZbWVfQAss9ckNf9vYTuMj0jVg3eg3nBwyuLT/xBdfHH1mivigDbNj1t
6cfLiO1aj6U8wkBQT6iyLHEZVaUqW6OzYVCZ2mvmyFhGu95N7v/ndBhoXA1w
SchYRtP9GoJFVmEgLFsYIcleRnqWO58GaIVBvefeEfEfy6jY4m23xzINgF85
Utici+avcU6viaHB/MX5LRk2XPRl0Ezd9x4NMvtq0yzsuUjHJPXg8B0ayGS6
lUb8zUXSx7/w1QbQ4PeJ1HHBAC765GN/7IUTDQoZsvp8TC463vKzbGAXDbzW
TdYyX3CRkFbT5ws7aKDoX257NJuLqOssjXhkaRBjevr87TIucju85vYuMRpc
mn4SvbKDi9YmmInQ56mgcspdhvGOi36/8E/Q/0GFoRqddMMPXBR4FlsOfaWC
9eN35Tc+c1HjZScV9UEq8PMSx7ZNktczk7B5/44K2MO/s+InF617k06/3U4F
v66jTs6LXPTRynitVhMV/v//FtnGySWPsqnwf1Q8k/M=
"]]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-2, 2}, Automatic},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{{3.65401717310271*^9, 3.654017187829471*^9},
3.654017373231942*^9, {3.6540192724811373`*^9, 3.654019295101372*^9}, {
3.658076192083295*^9, 3.658076207327387*^9}, 3.658076247547501*^9,
3.6625776031328707`*^9, 3.6625778241482553`*^9, 3.662577944294787*^9,
3.662578391828827*^9, 3.662578446612812*^9, {3.662578522231292*^9,
3.662578547175063*^9}, 3.6625803856341963`*^9, 3.662580477024961*^9,
3.662580806849924*^9, 3.662597811771411*^9, {3.6625980072865047`*^9,
3.662598019611137*^9}, 3.662598239413046*^9, {3.662937812046509*^9,
3.662937828766374*^9}, 3.6638092244986563`*^9, 3.6638519321096888`*^9}]
}, Open ]],
Cell["The following adds the resource distribution (black):", "Text",
CellChangeTimes->{{3.658076288037281*^9, 3.6580763014525347`*^9}, {
3.658076373076785*^9, 3.658076378521894*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{"competitionplot", ",", "\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",", "u", ",", "tryKm"}],
"]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2"}], ",", "2"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Thick", ",", "Black"}], "}"}]}]}], "]"}]}],
"\[IndentingNewLine]", "]"}]], "Input",
CellChangeTimes->{{3.658076255457404*^9, 3.6580762835585957`*^9},
3.6580763806995564`*^9, {3.662580376998959*^9, 3.6625803805266*^9},
3.6625804458306847`*^9, 3.662580549170567*^9, {3.662580797089583*^9,
3.6625807976891613`*^9}}],
Cell[BoxData[
GraphicsBox[{{{}, {},
{GrayLevel[0], Thickness[Tiny], Dashing[{0, Small}],
LineBox[CompressedData["
1:eJwt13k0Vfv7B3BpMJVQkmSIEhKKFNLnoURmUo6bwtVVF6EUuQlpOgeVTCXH
UIdztgbzTD6mkzkzZUjGNB0kmcr57e9avz/22uu11mftvdfez/N+Pnvb3962
//Dy8PBMksf/zmpo0xcul4tL7O0M59eGg/eCAnVhkYv57xy0sNgQDlm5exRn
ZrlYOpFqkioZDnuVLP4e/8rFA2IDYhTFcNgvequ3qYeLjzb68vegcICR6Yb4
TC5er1rFp+kbDrZ3m19oOnFxjK3z8Lm+cPBvuXXhXPkyPvAgZeRzdgR0dgp9
qXT5gzl6DmOUlPsgXeG9cf/W33goOOT2v6aRkO9Rs3r9wCLeud1D4fzxh+Ac
sWfqfegC1vztfSo8LArmo65RMZrHpku0PZk10cAQ/iD5eOgXjguMMkrVigW6
6Z5LHbRZ/PCFG79saRyEerpcVT72E+9bEIs8ZfgYrq187n/p+w88nOby04v/
CbiEtGzvJqbxv/8MGE03JkDs67HHdPcpnJV2JUAyORFKBpXWvpTnYDpt9HdI
TjIoiIChXdJXbDG1IyewNwVyVKjuwyMTmPddakDv3FMYZGfLaWuPYw/HnHC6
KAPGVGP34oIRXDaVdWrrxlQQDUrXVlsxhBOe7Oc5LJcGqtqTqmkz/VilDfq3
8DHBTS04uHigH5veXpHVLMiEZMX17c21/fgH+96tIGEmiEmo+/9K6MfjMTd3
9IozYW7Oq9L4SD/+FAJ/rm5nQlUx58SXmD7sZShbaGvABIo+J0hduxfzDF/8
5RrAhJtHvrcWX+3BQgeKvnoMk+tNvllpufZg+Q/iQ9fGmMBj8fVthkUPVjZY
b0qbYELgic9NDPkefNLT6QKdwwQ/t7G6e03duN3+SiFjkQnnqQMVLnLd2Chj
zlxLjAXmTc1ZAnWdeN0BxkkLxIKw1ib1WzmdeO9cGOIzZEFdZ2PGMr0T3615
ZFt+hAVGA/UvZy52YlmKGUfBlAWHOGxiQKoT10vQy5vsWKAhUp6S7d2B/cyV
+qP+ZYG4XUakg0Q79jyFdw9HsiBHMbzEaGU71jSZ6doYzQLrhXOjeybbsPax
941HYsn7J207IFhL+qTxE3o8C5YnYgZL/NowsbErZtczFoxfv6a2tbsV5+Zq
J7NzWOBl9fDxa+UWnNHVeXywjQXET9NvsStacFZ/clZRBwuG41eB1/u3WCs0
ReVBFwtOjvp/kqG9xZEo3UfzPQtQwBntkIlmbOYiIuPwkQUijF2dhqwmnDlj
8FaCQz7vL/b6uu0N+GNcoqcDHwH3nz+rOrRQj++N2MTP8BPgcSb4Sn5zPX40
r7cnTJCA7W8O9D3zq8eeYX30l+sIiIt9wbxeV4fLNm3We7OBgP+0HupretZi
B9ZGRzNZAk5OXJhKh1q8tsst+oUcAZp0U4aceC1Wurkkyy9PwLeVqwSEy99g
5tkBzYLtBJzp8OucWP8GB4W/VRhXJsDwkqNHUm4Nfu1wQTJGkwAZRR0ZcWoN
do0c2FCsRcDSe/G2cMcanOj51rp3HwF5Bi3aAatr8M302XuiBwhQFDXktbOv
xgYlPvO2BwngZcvkN+yqxmKKY58d9AkYvLp0zoCnGrsnF4ufPkTA4495zWrp
VVjkfO5mChAgmLUzXmCpEh8L4smRO0LAuOsq85CWSnyQ5usoYERAtcTQ8i9G
JX4uxqvLIR0Y/OTsqHkl3p4oGv7SmACO5ToNnFSBaSmyXkumBKT1jd37fKsc
t09XRAxZE9AbuCk5UbMc09zU62/YECAsY5xlM/wat0lqvJCxJcDPmWgvRq+x
+/Wh05bHCTg65i4RtliKiePePrdPkO/7ToLSofRSPJ5c2yh4koCMnU06P+xL
8QHvb3URpCXcdzv+lV+C1U9+Z96xJ2CCM5mi4lOMH15JHbdxIGBrpFzOB5li
HP9kh1EZaes9NtVRzUV4PXIyVPiLgCLfnLFFlSK8YSdL4hPpbxtHfmW8L8SW
f0QnD58iQK5gA78rtRCXXOO4JpKmzV9WaRwrwHdvdG4/6khAeXyaXnBMAZ7c
auMTS/qHbre55uECzKDuoAyR/uv6fu+ElHw89rt3yes0WX8y50OsrPIx9aVR
YRbpKvz44crlPCzxn5TwJGkV3sVcj1N5OLJb957LGbJeGCpsWcE8/Dhje34s
6agjp7o7inKxnnaJ/xvSb8bCP909l4vbWe2dM6QX75TN623Kxf0bTJqknQhQ
U/ouMFWTgyud504fIf13vbRUqm8OHjKvoJ0jHeduqUqRz8ELnret7pJuFArW
X9uWjTt2qWYySPO8yrSsCM7GGm/pRBlpLcuPTpfVsrGQd5VeO+nzkyIXlQay
sOGK8POjpOmRBqH94Vn4sNUntRnSrXsuRUfqZuG8Pw33l0nzM42O0doz8b67
qtQ1zgT4TDA9ptUzcQVaLSVE+p0K/32HexkYHbcxXksaLvybVfnlFWa/Wb9O
kDSR2dCubPIKf/Mz9FxFWuTHrtmHaS9x0WbO2SXy+gFa9yQWeV/iSt0tcxzS
w34cnb+dX2Azwzb5QdKmxVaODa+fY0cvuYlG0jlLWUF7pUh3Shjnk95ySOzp
k6vp2MS1ASWQDg3xrebtJvCBIYv266S/VnWOuWsSuORrybIjabvV2vwdkSws
PK/KPkC6zPiRih6HiR/ZVu0QJb09bN6cYcbEcrJ0uXHy+0Q0OXgLpafhU/Yf
8gtJn7bZmtfnmopH5XWzrEl/m5nVuVLDwP3qcbqSpAPjWrDwDgZWetV64wNZ
H/S+0EaD8adY3SLF2Im0apCjTd/Rp5j3acKbLaRL5bR7LrNScE6dwcoOsv7y
GtvZVm1JOPuVf4EO6U6RO22hUYm44Hro7gmynmdO6AzkH6fj4SNqrtGk935M
/inVHY+dQ68JfST7IfOnp8JEbwzWyFhBsSX7562OnLoUPRqvnN3UNE4h+z+o
Q9fydBTmP6S94ippitjl1PP4Ad50fz4zkuzH43rCvCvqb2PlgFHlBLKfo9iX
Jc+Z3cTnhCOzxEm3WvVpNDeH4NQVdksRdgQk1FnjvWn+OPpH/4eLZB6EdCp1
SlVb4Ma7tC8byfxQXT/gvnq3FophBCZdIfOlezo0WWSeghwO627psCLgWvTR
Bg8tH7TGUcbjliWZX3K0u4kioajHnXKjwoyAW3HyPvvv30IdFMdQPtJH15ZR
2oTuIspwkJUZmV91cxzl1XwRyM03wLrehIBz51TcCpaj0H764eUkMv9M5P3/
uqkfg4a/K19sIvNSaaDa0jowFllVyOf/OkzAF9vT+78sPEJdb37mGBgS4Hko
kl9mlo6m4wzis8n8LRa81lV1hYGu5+ZkL2gTkLJbvCNTPhVRT7Ye/EDm+x3r
zFZ6SyrSXijdhMn8t4sbafRTZqI6Z+XSK3sJmNpmXqUyQKA77iajBbvJ/NeR
zow6koG+M+5n0xQIWOtY+DJ4OgNF1Xi+0iTnz0yQzXPPpEzk8R8S7CXnk/Nw
la1CYBYaPVj6VUrmf/kwZ/GnKxttzLx98fJmAupznY5k0/JQ+Ih+RsBaAg6y
Vat3fsxDwR1Ddl/I+ZjVvWCQpJ2PPEbKL9oLkPmxEE2uzUf8Gh827FxDwFlU
p/uPfiEqmjsvT+eygNugsUdyuhj9K99R+GGaBfuGV8jcoGAUG2zX0krOd7US
+2mNdIy2cHjOzJLzXzHqVc3HBYw4JaarJFpZIPT05b4Uiwp0stAv0aaJBb+t
Kf1cTgWyF+hTSa1hwUBWpjLeU4U2K+z7g/NYkOxzpka/sAZZSZocGIhiAd1R
ICN2sAbZUnrTWOT+5bFJ3qPvfGzUc8nL0fs+CyLlBD0SKWwkPrT/xS8aC0Ja
80X/LLCRb9D4n9EQFrhorHMqO1iLXJdMpg28WKAwVbqgW1WPfDYK7hQwZkFg
8+FbP7/XI2Mv46Bj5P6q+3mjcIZkA+pZjBu/Y0Duh/7pU9h2sQF52eXOzOux
YKp30YJPrhG1qysZlGiwoJyt86zjehMKmdMrypVkwV8JhaaeOi0o7dOWvqjP
TDjGeN9sSWlH/w1O8UTcYIKRhdjK2fweFCqgNuuTkAYPnHpCNAr7kVKDS/i2
V6lQaym9zlpsCBmc1TZfiGfA923iQe1PRhBBGxfiefgMrlze5fJg0zhyzhku
yAx/Cj39IrZudRNopk5Zuss3BZwDDn7iM/+K9C77+e79lgTVu/aHVa/moNWK
bBHffjooCpRNpJpMobLdc1uD+RNAuszDaDV1Gm2WSnm01T4eeBZ50y8N/0D5
aT13ApMewZzN6zPsHT9Rz/ls0d8ycdCn5SS149YsmljylF+gx4CPvYiofP8v
VD/qa1F+KBokY0Ypq6TnUeRVFSFnkSjIOJXCmrm6gKKce0svDEWCvX6wSd3r
ReSQ7ZbWVfQAss9ckNf9vYTuMj0jVg3eg3nBwyuLT/xBdfHH1mivigDbNj1t
6cfLiO1aj6U8wkBQT6iyLHEZVaUqW6OzYVCZ2mvmyFhGu95N7v/ndBhoXA1w
SchYRtP9GoJFVmEgLFsYIcleRnqWO58GaIVBvefeEfEfy6jY4m23xzINgF85
Utici+avcU6viaHB/MX5LRk2XPRl0Ezd9x4NMvtq0yzsuUjHJPXg8B0ayGS6
lUb8zUXSx7/w1QbQ4PeJ1HHBAC765GN/7IUTDQoZsvp8TC463vKzbGAXDbzW
TdYyX3CRkFbT5ws7aKDoX257NJuLqOssjXhkaRBjevr87TIucju85vYuMRpc
mn4SvbKDi9YmmInQ56mgcspdhvGOi36/8E/Q/0GFoRqddMMPXBR4FlsOfaWC
9eN35Tc+c1HjZScV9UEq8PMSx7ZNktczk7B5/44K2MO/s+InF617k06/3U4F
v66jTs6LXPTRynitVhMV/v//FtnGySWPsqnwf1Q8k/M=
"]]}}, {{}, {},
{GrayLevel[0], Thickness[Large], LineBox[CompressedData["
1:eJw113k0V+vXAHCRypBQdCVzKTJmSujZKJUylhAZ6kbXcJNEhigkFEmmZMxw
DuqLUmaPMXPGkCFSJEqETPH9nbvW+/5x1lmftfY65znP2ns/+4hcvGp8mZGB
gWGNuv67yyDeSTqdjplcUlXHrL3g6rJY8PIKHetFfdnl5eIFea/kxecW6JhF
kGzmveMFB/frXRyfouMD4XLP7J95gQpXYH9LLx0LnfYztB/zAvg82/Qkl47H
LQJ3jjh5g/G91hwFazruupKkUH3HBzzaAp3tK9YxJ9P7XU9rfKG7m22yynYN
fzTfalfO7g8ClVd3qOz+g0ctjpavdATCa8da5m1DK9jjStIp+9Z7YPNAfuaD
/zK+qFHY6WZyH5YivYMxWsJVSWcfZIyHQxrHR764T7/xpU2T1VuCHkGCrrxr
V8gCFg8s6jPOewz+TrY3JU7O45MmVqMX2qLBmynbw/XHL3zG8Uyop0Ic2N5u
29NDzuKqGj/E7RcP0eVjcQkOM9jGWVBCoCEBSob3sz8XncY3d+1x0jqWDGKc
oHU2aQrHhI5FcTSmwEvJYIfRzxOY98HQgh3DMxiuyxdWVh7H87vDQ5T2psGY
VPRB/OYzvs5awGohng5cvlnKMhs+YaIpjn/XvgyQUv4plTE3iJ1HpS+VrmWA
nYyfX/HQIE5lzkgT3ZAJyeLbOlvrB7F0TcH7exszgXunrMfvp4PYt0iC9TRb
Jiwu/lt1/OggNrU+H136VyZUF0+bTEYNYPYS5SPKCplgpjHtK6vcj4XeqWhH
2mVCwNEf7cU3e3HC268Xs99S8Se+Gyhe6sXMyzJmNxszgUFv6h1NrxeLCHzl
OtqSCT4m31rSRHuxbQVrW3dHJrjbjTWEtfTg8Itfzw0MZsKV4KFKW+EebDJr
+d77VyacbmnNY2noxjvYbl7fuJuA0PYW2cCX3fhpioBWiCABDd3NtPWEbvzj
xa1iNhECjg01Pp+71o35L+xJZhEn4Mh0HTnE343XZ5Rkv8kSIMdZkZJ/tQvz
+HHSlLUJ4DlLizDf2Yl5hwazmK8Q8FL8fskxpk7sYSG0uNOBAMNl+y/yPzvw
wzeKe/c7Ue9PEjnEWt+B+Q95imi5ELA+ETVc4t6B/xb5FWJ5k4DxW94yu3va
sYV2e5xkMAH/GjyKK5dow36MThX7Mgkg53W/R29ow0LTYmwLBAGjTzbCvx/e
YVOLHvHKLALOffH4KhjyDn/M39lo8IIA5GmlfHuiFfcezMo+W0AAZ9qBbi2i
BQeLzbrMV1Hr/V23rWFPE9YU7EsNHiAgPPtZ9ZHlRmylPfREdogARyu/G69b
G/G3j2rfuz4SsOftoYFn7o24rvVt4o5RAmKiczJvNTRgca3wPe4TBHgpPtJQ
cKrHM1mpx4vnqfVMOM9kQT0O1y1NU/pNgEKCbpowTz1+GR1vlLtIwHemjSwc
FW+xs096SvwKAVZd7t0T295ipDqzZshAgparpWPSq1ps115wQp2NBEFxVUGe
4Fr8OulCUBg7CasfeDruW9Zimo0gx+BWEgo025Q9mWsxi9LuFRdOEsS5tBjP
mtZgC5yj4sVDAmvevicsq1XYVU7pG4sQCRkDY2HfAivwQtR1U345Evp9eJMT
FSrwP88dIjbKk8AheDzPaLQcM+kG2U5RdrchO4tROZ6v4WnOVyBBZ8xhZ+hK
Ka4j9heIqJAwMf0zRdKlGFePcmeEaZCwO0L45UfBYkzjM9Q0PEKCobxRTWRr
ESYE865xIhKKrr8cW5EswiFus2EhQELIkptk89gbbCBhSLPSJkGSceWVo0UB
XquNtY46QYJVmmSdEGsB3trlvEfuJAmRRy16uopeYS5C0KuR8kpQ2ZIa7yt8
Rsqsd16XhGY2Pw32jnzM6H/irIweCQwvcvUr/fLxgvvWp28oK+qPWLvJ5GMX
U4Nr6vokJERo+g/ez8Puw2QzGJDQJ7kl3DyMhmnnbihIGZEAzv/kVU2+wBva
Ps6mUCZzmzolTrzAIRYxR7Ybk+CpGLZzhfE5ntOy85+hvOsId2r8zSwc9Xgm
N+wsCf63r9cw9pA4v1VqaJryVHX3mIMCiQedC2P1TEgoOx4rqTadies4dQqY
zpFwwWh3wcCldHwv3iTY2JSE73MLqjdq0/Axju2JSZR9Ytowx940LK785twE
5YQB/2bN8VTMmGBW5GZGgpSvpdGATiouYZe1KaRcKqzc60ak4H2xT54vUi5o
7qwz6EjCyuMjB6+Zk9DNGdThH5mIc0zjnbIpz5moDr0+k4BD1VN1P1E+OJI8
z9/zBOtqm80dP0+C0d4zDAaxcVg0bLLcg7KLwyZ2f7NYfDk+XCqDcu68k9hE
fxT2/dC7sET5naqwLH/CY3w+929DIQsSpn27DutfiMSFEZ362pS31gbp3BF8
hB9s2jn7N2Uzbrf0K/ghdjm5XyWQcmxCf+k7zTCcrLkmnEq5R1yzS7E2FC8G
hdFKKe/IJybjdYIxs23HcBflM2ocjBsa72KW+qqCb5Qj69z47E8F4J/WZtJr
lNsNBuRaW29jG/+HJzksqfoqCIiwS/HBxYoXWQQoP20wxAczPPAO6RYnCcp/
DQlMr2e54pMdjdcVKB/4/F415oIjnlI2E1SjLM7uEitjb4vPiN1wAsq3u/d3
89fo4SdsQlbalKW2DTkwSyuimB0mc/+5Z9Y/mXPJDH3j3imlRXnGYN+vq652
aDr08pYjlL0f6zQ5KrqgljzNYBXK676eT5Nlb6BLV17kyPz3fIfnTl2SXuj8
sRxXMcpM54Y1Nov7IZ77R4Z4KNcIh9xL5PRHRVKOU8yUA2NEXVTCA5FIq1Li
HPX9OuxlZh1s99BURdqvj5Q3+5toOoaEILuNpVP1lBsWpyWYNz9AsQb+wTTK
oc7B3MmB4UiR2tVIypmzEbd234lAz6TRCzfK9vaSdm/WI1HbMwFbeconRD3O
B2hEodhbHXLslPcP1egb+kQjpTnH9C9UPkwaX1CZXI5FWZYBHuGUm7ZmHyg8
9AQdtuLrtaac0/BbKNAjHnHzNvTLUHY6ErFFcCEBEfpZ7+qofNRbHvwzqZCE
dpivVIRRlimQmC10TUY80qlnzlBeivr0ff9SCop5p+jQS+V7Mav3++obaehU
vJd+DVUvKdI8Xbmi6chFx/z7NcpBhrntCW3p6MWqd60A5bMxn5vdJTJRdcyG
Pc5UPc6InK6WHCJRmcTVtEmqfnuPjuOdoVlogreRN4Byhf3t8o0q2ciny77u
L8r3XxQUfYzIQZM8m96rnaHyQ1UgN/IoDbEJr1bZUP2D3bLwud8sDYXrZm//
bEjVm69RtlNSLpq6O5B6kbLNaLWxmE8eYi91czOn+pHM/kW9tff5yDsndHEv
1b8aX1kfzQ8pQB/aklIOU/1RvU6qZt9IAfr5masj4jgJeT3LmknKr1EVUtb8
okNCzPJjdP/za3TZye+T/zES/kYNhy9rFKLyw5X7k7VIoDfJyfPNFqOFhaus
Z9VJcB1cy314vAT5Oqec8VUjYfxHk8ympBL0pjplJOMwCS2cl6XmdEuRpaxq
/fdDJMSfe7KvNb0MbV/laTNXIkFpdIPgHTOMInN+cORLU+svMZ2Vy8JIkB0Y
qqSo/Yh8UTuyjFHpb5modwdIYEt9rpSiV4n+fsqYMSpBwh9Ds0H6dCV6rhPi
Or2XhKG8XAksX408Xj2hRwmQkOxiVatRWIsWBFh2CVPnY4IlCy16uBZ5tAUv
fmEhIe5EQeyPzXUof9PvO8QWEiKEWR0TzeqQTRVn8t5NVP20v+ZaW65DjrKv
Nm7aQIKt3FbrMvV6ZC2v0WVKnddiM6XLh6sb0c/BT6e1hgnwadUOnP/RiHa3
9/QnUPNBT3YzB42vCXEHC5bPU/ND6OUBMZFrTWhyeOZ2Qh8BM/0repuFmxHP
xSGelg4CKupUn3XdakEKlanLOTUEnH9aqOuk2oYM5K6uuWYQUHATvd97uQ11
azzW8kwjgONcvfVwRBtqD2Kf8UkloIqz1814og1J8xYH+SQSsEPb2yDhVDs6
TdN8YxlNgHdRvKf/SjtioXGWpgYScDLtQ6u+WSfq3mB1VduWWs9dml2dcyda
fVQ0zGhNQNyVALpaQCfyCF8cx5YETEhLy0vQOtG4On/5QTMCgotuRzFt7EIO
Iz8SVvWpebF1n0VRbhcS+tXcvUudgONLNyZENr9HRaI1T6N2UPOjHjfTwute
JHfk0r20ikwIt2WZXW7sRf/kh7TSSzOh7wbD8PpQL3I3/Lb/fHEmOCRNl2zZ
1IdqnE6JshRQ8T+bXHef60NfxTwVDbOo+EcBo9q/+xCX0oJvwGMqvme+KlK5
H71V9NoSSM3PD617b8sVDiJXXKrFtzkT6vUFthpyf0KyJXbm20Uy4IcIj29n
/Gf0wKX38gH5dLjhdsD2Ie846h4RSjQ5mAa9g5zGdg0T6I/8NjZH9mdg46n+
dfPpKXSKxUNcazoFag6ohNYwTyMnq2GbAetkEGcpm0g/MYNGGvSIjk2JIFDm
eIw5eBadP8y3m680HhhWGLNcR3+hfbEBCpLH42DRqNyqbu88UjKIOUiyx8CA
ojX/3sAFxFAZtVhW/BhcTDm5RAd/I+ap/tux4Y+AL+qL2UaBJaSN5dyen34I
NIsUYu7mMqpOrtzg5nIfTDX8TjSUr6DoLfpBffzBkG/lLHr4zyr6nms+78p/
F5ZYtZmKTdZQlfXqauFefzDuUFMWiFtHn49+sKQb+QGrGltVWeI6Wjx65/CS
uh9UpfefskxbR1KHhC6s7vMDuZuetk9p6+isnqmD8LovcAgVPuCrW0d/qQ1d
H8v2hUang595fq0joeujr8w3+QJskYjgOE1HJjUDX4dqfWDp2tIumhEdqbNE
DvLn+0DuQH2GnikdiQqr9V9K9AHBXLvSBxfpyLNEa4LL3Qf+mKSPs3rSUat7
Ps/4Ph8oTBPS2JxJR1w7Jkadwrzh360/6zNz6Eh1cslZ18sbxD0qjHXy6Yiz
9p8ReXtviNK9cOVuGR19ulrsKqjpDa6z8Y+ZuujIS75k278LXiBp4SCY1kdH
LaMBcfGjXvCpVjVL6yMd5XJwL7a3eYFhXF/FnW90VLsrSMoi2wu2MJInRX7S
0Z/ZqXVarBdgR4/uynk6GlLmTWK/6wXu73WsbVboiL0Ob3Zz9YL/+39H////
/j8WZujM
"]]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-2, 2}, Automatic},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{{3.65807626463237*^9, 3.658076279167932*^9},
3.662577609843607*^9, 3.6625778242232523`*^9, 3.662577944421152*^9,
3.662578453437272*^9, {3.662578524796567*^9, 3.6625785478328342`*^9},
3.6625803857245903`*^9, 3.6625804771551647`*^9, 3.6625808069283533`*^9,
3.6625978118415537`*^9, 3.6625980196996393`*^9, 3.662598239493738*^9, {
3.662937812091043*^9, 3.6629378288763933`*^9}, 3.663809224575283*^9,
3.66385193221236*^9}]
}, Open ]],
Cell["\<\
The following adds a histogram of individuals that exist at the end of the \
burn-in period (groups into 0.01 bins), arbitrarily scaled to the same \
maximum height as the resource distribution:\
\>", "Text",
CellChangeTimes->{{3.6625803561581984`*^9, 3.662580420748272*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"bc", "=",
RowBox[{"BinCounts", "[",
RowBox[{"genotypes1", ",",
RowBox[{"{",
RowBox[{
RowBox[{"-", "2"}], ",", "2", ",", "0.01"}], "}"}]}], "]"}]}],
";"}]], "Input",
CellChangeTimes->{{3.6625796146565323`*^9, 3.6625796162285557`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"maxheight", "=",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",", "0", ",", "tryKm"}], "]"}],
"//", "N"}]}]], "Input",
CellChangeTimes->{{3.662580070809471*^9, 3.662580079704524*^9}, {
3.662580174205254*^9, 3.662580177645094*^9}}],
Cell[BoxData["3118.132863617598`"], "Output",
CellChangeTimes->{{3.662580175046308*^9, 3.662580178130217*^9},
3.6625804772349043`*^9, 3.6625808069932537`*^9, 3.662597811907279*^9,
3.662598019767288*^9, 3.662598239559758*^9, {3.66293781224*^9,
3.6629378289602547`*^9}, 3.663809224629581*^9, {3.663809499953013*^9,
3.663809507918414*^9}, 3.663851932277341*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Graphics", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"EdgeForm", "[", "Black", "]"}], ",", "Black", ",",
"\[IndentingNewLine]",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{"Black", ",",
RowBox[{"Rectangle", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2"}], ")"}], "-", "0.005"}],
",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2"}], ")"}], "+", "0.005"}],
",",
RowBox[{"bc", "[",
RowBox[{"[", "i", "]"}], "]"}]}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "bc", "]"}]}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"AspectRatio", "\[Rule]",
RowBox[{"1", "/", "GoldenRatio"}]}], ",",
RowBox[{"Frame", "\[Rule]", "True"}]}], "]"}]], "Input",
CellChangeTimes->{{3.662579808750051*^9, 3.662580000968864*^9}, {
3.662580093697451*^9, 3.662580094976821*^9}, {3.66258012727341*^9,
3.662580128536862*^9}, 3.662580189485834*^9, {3.662580451133957*^9,
3.6625804529645967`*^9}, 3.6625978056439734`*^9, 3.662598149520631*^9}],
Cell[BoxData[
GraphicsBox[
{GrayLevel[0], EdgeForm[GrayLevel[0]],
{GrayLevel[0], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{GrayLevel[0], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{GrayLevel[0], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{GrayLevel[0], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{GrayLevel[0], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{GrayLevel[0], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{GrayLevel[0], RectangleBox[{-1.9349999999999998`, 0}, {-1.925, 0}]},
{GrayLevel[0], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{GrayLevel[0], RectangleBox[{-1.9149999999999998`, 0}, {-1.905, 0}]},
{GrayLevel[0], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{GrayLevel[0], RectangleBox[{-1.8949999999999998`, 0}, {-1.885, 0}]},
{GrayLevel[0], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{GrayLevel[0], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.865, 0}, {-1.8550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.845, 0}, {-1.8350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.825, 0}, {-1.8150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{GrayLevel[0], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{GrayLevel[0], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{GrayLevel[0], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{GrayLevel[0], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{GrayLevel[0], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{GrayLevel[0], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{GrayLevel[0], RectangleBox[{-1.6849999999999998`, 0}, {-1.675, 0}]},
{GrayLevel[0], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{GrayLevel[0], RectangleBox[{-1.6649999999999998`, 0}, {-1.655, 0}]},
{GrayLevel[0], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{GrayLevel[0], RectangleBox[{-1.6449999999999998`, 0}, {-1.635, 0}]},
{GrayLevel[0], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{GrayLevel[0], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.615, 0}, {-1.6050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.595, 0}, {-1.5850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.575, 0}, {-1.5650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{GrayLevel[0], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{GrayLevel[0], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{GrayLevel[0], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{GrayLevel[0], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{GrayLevel[0], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{GrayLevel[0], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{GrayLevel[0], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{GrayLevel[0], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{GrayLevel[0], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{GrayLevel[0], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{GrayLevel[0], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{GrayLevel[0], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{GrayLevel[0], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{GrayLevel[0], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{GrayLevel[0], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{GrayLevel[0], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{GrayLevel[0], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{GrayLevel[0], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{GrayLevel[0], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{GrayLevel[0], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{GrayLevel[0], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{GrayLevel[0], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{GrayLevel[0], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{GrayLevel[0], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{GrayLevel[0], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{GrayLevel[0], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{GrayLevel[0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{GrayLevel[0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{GrayLevel[0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{GrayLevel[0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{GrayLevel[0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{GrayLevel[0], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.935, 0}, {-0.925, 0}]},
{GrayLevel[0], RectangleBox[{-0.925, 0}, {-0.915, 0}]},
{GrayLevel[0], RectangleBox[{-0.915, 0}, {-0.905, 0}]},
{GrayLevel[0], RectangleBox[{-0.905, 0}, {-0.895, 0}]},
{GrayLevel[0], RectangleBox[{-0.895, 0}, {-0.885, 0}]},
{GrayLevel[0], RectangleBox[{-0.885, 0}, {-0.875, 0}]},
{GrayLevel[0], RectangleBox[{-0.875, 0}, {-0.865, 0}]},
{GrayLevel[0], RectangleBox[{-0.865, 0}, {-0.855, 0}]},
{GrayLevel[0], RectangleBox[{-0.855, 0}, {-0.845, 0}]},
{GrayLevel[0], RectangleBox[{-0.845, 0}, {-0.835, 0}]},
{GrayLevel[0], RectangleBox[{-0.835, 0}, {-0.825, 0}]},
{GrayLevel[0], RectangleBox[{-0.825, 0}, {-0.815, 0}]},
{GrayLevel[0], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{GrayLevel[0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{GrayLevel[0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{GrayLevel[0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{GrayLevel[0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{GrayLevel[0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{GrayLevel[0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{GrayLevel[0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{GrayLevel[0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{GrayLevel[0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{GrayLevel[0], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{GrayLevel[0], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{GrayLevel[0], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 16}]},
{GrayLevel[0], RectangleBox[{-0.685, 0}, {-0.675, 124}]},
{GrayLevel[0], RectangleBox[{-0.675, 0}, {-0.665, 322}]},
{GrayLevel[0], RectangleBox[{-0.665, 0}, {-0.655, 728}]},
{GrayLevel[0], RectangleBox[{-0.655, 0}, {-0.645, 725}]},
{GrayLevel[0], RectangleBox[{-0.645, 0}, {-0.635, 456}]},
{GrayLevel[0], RectangleBox[{-0.635, 0}, {-0.625, 110}]},
{GrayLevel[0], RectangleBox[{-0.625, 0}, {-0.615, 16}]},
{GrayLevel[0], RectangleBox[{-0.615, 0}, {-0.605, 1}]},
{GrayLevel[0], RectangleBox[{-0.605, 0}, {-0.595, 0}]},
{GrayLevel[0], RectangleBox[{-0.595, 0}, {-0.585, 0}]},
{GrayLevel[0], RectangleBox[{-0.585, 0}, {-0.575, 0}]},
{GrayLevel[0], RectangleBox[{-0.575, 0}, {-0.565, 0}]},
{GrayLevel[0], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{GrayLevel[0], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{GrayLevel[0], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{GrayLevel[0], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{GrayLevel[0], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{GrayLevel[0], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{GrayLevel[0], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{GrayLevel[0], RectangleBox[{-0.495, 0}, {-0.485, 0}]},
{GrayLevel[0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{GrayLevel[0], RectangleBox[{-0.475, 0}, {-0.46499999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{-0.465, 0}, {-0.455, 0}]},
{GrayLevel[0], RectangleBox[{-0.455, 0}, {-0.445, 0}]},
{GrayLevel[0], RectangleBox[{-0.445, 0}, {-0.435, 0}]},
{GrayLevel[0], RectangleBox[{-0.435, 0}, {-0.425, 0}]},
{GrayLevel[0], RectangleBox[{-0.425, 0}, {-0.415, 0}]},
{GrayLevel[0], RectangleBox[{-0.415, 0}, {-0.40499999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{-0.405, 0}, {-0.395, 0}]},
{GrayLevel[0], RectangleBox[{-0.395, 0}, {-0.385, 0}]},
{GrayLevel[0], RectangleBox[{-0.385, 0}, {-0.375, 0}]},
{GrayLevel[0], RectangleBox[{-0.375, 0}, {-0.365, 0}]},
{GrayLevel[0], RectangleBox[{-0.365, 0}, {-0.355, 0}]},
{GrayLevel[0], RectangleBox[{-0.355, 0}, {-0.345, 0}]},
{GrayLevel[0], RectangleBox[{-0.34500000000000003`, 0}, {-0.335, 0}]},
{GrayLevel[0], RectangleBox[{-0.335, 0}, {-0.325, 0}]},
{GrayLevel[0], RectangleBox[{-0.325, 0}, {-0.315, 0}]},
{GrayLevel[0], RectangleBox[{-0.315, 0}, {-0.305, 0}]},
{GrayLevel[0], RectangleBox[{-0.305, 0}, {-0.295, 0}]},
{GrayLevel[0], RectangleBox[{-0.295, 0}, {-0.285, 0}]},
{GrayLevel[0], RectangleBox[{-0.28500000000000003`, 0}, {-0.275, 0}]},
{GrayLevel[0], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{GrayLevel[0], RectangleBox[{-0.265, 0}, {-0.255, 0}]},
{GrayLevel[0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{GrayLevel[0], RectangleBox[{-0.245, 0}, {-0.235, 0}]},
{GrayLevel[0], RectangleBox[{-0.23500000000000001`, 0}, {-0.225, 0}]},
{GrayLevel[0], RectangleBox[{-0.225, 0}, {-0.215, 0}]},
{GrayLevel[0], RectangleBox[{-0.215, 0}, {-0.205, 0}]},
{GrayLevel[0], RectangleBox[{-0.20500000000000002`, 0}, {-0.195, 0}]},
{GrayLevel[0], RectangleBox[{-0.195, 0}, {-0.185, 0}]},
{GrayLevel[0], RectangleBox[{-0.185, 0}, {-0.175, 0}]},
{GrayLevel[0], RectangleBox[{-0.17500000000000002`, 0}, {-0.165, 0}]},
{GrayLevel[0], RectangleBox[{-0.165, 0}, {-0.155, 0}]},
{GrayLevel[0], RectangleBox[{-0.155, 0}, {-0.145, 0}]},
{GrayLevel[0], RectangleBox[{-0.14500000000000002`, 0}, {-0.135, 0}]},
{GrayLevel[0], RectangleBox[{-0.135, 0}, {-0.125, 0}]},
{GrayLevel[0], RectangleBox[{-0.125, 0}, {-0.11499999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{-0.115, 0}, {-0.105, 0}]},
{GrayLevel[0], RectangleBox[{-0.10500000000000001`, 0}, {-0.095, 0}]},
{GrayLevel[0], RectangleBox[{-0.095, 0}, {-0.08499999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.085, 0}, {-0.075, 0}]},
{GrayLevel[0], RectangleBox[{-0.07500000000000001, 0}, {-0.065, 0}]},
{GrayLevel[0], RectangleBox[{-0.065, 0}, {-0.055, 0}]},
{GrayLevel[0], RectangleBox[{-0.055, 0}, {-0.045000000000000005`, 0}]},
{GrayLevel[0], RectangleBox[{-0.045, 0}, {-0.035, 0}]},
{GrayLevel[0],
RectangleBox[{-0.034999999999999996`, 0}, {-0.024999999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{-0.025, 0}, {-0.015, 0}]},
{GrayLevel[0], RectangleBox[{-0.015, 0}, {-0.005, 0}]},
{GrayLevel[0], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{GrayLevel[0], RectangleBox[{0.005, 0}, {0.015, 0}]},
{GrayLevel[0], RectangleBox[{0.015, 0}, {0.025, 0}]},
{GrayLevel[0],
RectangleBox[{0.024999999999999998`, 0}, {0.034999999999999996`, 0}]},
{GrayLevel[0], RectangleBox[{0.035, 0}, {0.045, 0}]},
{GrayLevel[0], RectangleBox[{0.045000000000000005`, 0}, {0.055, 0}]},
{GrayLevel[0], RectangleBox[{0.055, 0}, {0.065, 0}]},
{GrayLevel[0], RectangleBox[{0.065, 0}, {0.07500000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.075, 0}, {0.085, 0}]},
{GrayLevel[0], RectangleBox[{0.08499999999999999, 0}, {0.095, 0}]},
{GrayLevel[0], RectangleBox[{0.095, 0}, {0.10500000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{0.105, 0}, {0.115, 0}]},
{GrayLevel[0], RectangleBox[{0.11499999999999999`, 0}, {0.125, 0}]},
{GrayLevel[0], RectangleBox[{0.125, 0}, {0.135, 0}]},
{GrayLevel[0], RectangleBox[{0.135, 0}, {0.14500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.145, 0}, {0.155, 0}]},
{GrayLevel[0], RectangleBox[{0.155, 0}, {0.165, 0}]},
{GrayLevel[0], RectangleBox[{0.165, 0}, {0.17500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.175, 0}, {0.185, 0}]},
{GrayLevel[0], RectangleBox[{0.185, 0}, {0.195, 0}]},
{GrayLevel[0], RectangleBox[{0.195, 0}, {0.20500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.205, 0}, {0.215, 0}]},
{GrayLevel[0], RectangleBox[{0.215, 0}, {0.225, 0}]},
{GrayLevel[0], RectangleBox[{0.225, 0}, {0.23500000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{0.235, 0}, {0.245, 0}]},
{GrayLevel[0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{GrayLevel[0], RectangleBox[{0.255, 0}, {0.265, 0}]},
{GrayLevel[0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{GrayLevel[0], RectangleBox[{0.275, 0}, {0.28500000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{0.285, 0}, {0.295, 0}]},
{GrayLevel[0], RectangleBox[{0.295, 0}, {0.305, 0}]},
{GrayLevel[0], RectangleBox[{0.305, 0}, {0.315, 0}]},
{GrayLevel[0], RectangleBox[{0.315, 0}, {0.325, 0}]},
{GrayLevel[0], RectangleBox[{0.325, 0}, {0.335, 0}]},
{GrayLevel[0], RectangleBox[{0.335, 0}, {0.34500000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{0.345, 0}, {0.355, 0}]},
{GrayLevel[0], RectangleBox[{0.355, 0}, {0.365, 0}]},
{GrayLevel[0], RectangleBox[{0.365, 0}, {0.375, 0}]},
{GrayLevel[0], RectangleBox[{0.375, 0}, {0.385, 0}]},
{GrayLevel[0], RectangleBox[{0.385, 0}, {0.395, 0}]},
{GrayLevel[0], RectangleBox[{0.395, 0}, {0.405, 0}]},
{GrayLevel[0], RectangleBox[{0.40499999999999997`, 0}, {0.415, 0}]},
{GrayLevel[0], RectangleBox[{0.415, 0}, {0.425, 0}]},
{GrayLevel[0], RectangleBox[{0.425, 0}, {0.435, 0}]},
{GrayLevel[0], RectangleBox[{0.435, 0}, {0.445, 0}]},
{GrayLevel[0], RectangleBox[{0.445, 0}, {0.455, 0}]},
{GrayLevel[0], RectangleBox[{0.455, 0}, {0.465, 0}]},
{GrayLevel[0], RectangleBox[{0.46499999999999997`, 0}, {0.475, 0}]},
{GrayLevel[0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{GrayLevel[0], RectangleBox[{0.485, 0}, {0.495, 0}]},
{GrayLevel[0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{GrayLevel[0], RectangleBox[{0.505, 0}, {0.515, 0}]},
{GrayLevel[0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{GrayLevel[0], RectangleBox[{0.525, 0}, {0.535, 0}]},
{GrayLevel[0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{GrayLevel[0], RectangleBox[{0.545, 0}, {0.555, 0}]},
{GrayLevel[0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.565, 0}, {0.575, 0}]},
{GrayLevel[0], RectangleBox[{0.575, 0}, {0.585, 0}]},
{GrayLevel[0], RectangleBox[{0.585, 0}, {0.595, 0}]},
{GrayLevel[0], RectangleBox[{0.595, 0}, {0.605, 0}]},
{GrayLevel[0], RectangleBox[{0.605, 0}, {0.615, 0}]},
{GrayLevel[0], RectangleBox[{0.615, 0}, {0.625, 0}]},
{GrayLevel[0], RectangleBox[{0.625, 0}, {0.635, 0}]},
{GrayLevel[0], RectangleBox[{0.635, 0}, {0.645, 0}]},
{GrayLevel[0], RectangleBox[{0.645, 0}, {0.655, 0}]},
{GrayLevel[0], RectangleBox[{0.655, 0}, {0.665, 0}]},
{GrayLevel[0], RectangleBox[{0.665, 0}, {0.675, 0}]},
{GrayLevel[0], RectangleBox[{0.675, 0}, {0.685, 0}]},
{GrayLevel[0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{GrayLevel[0], RectangleBox[{0.695, 0}, {0.705, 0}]},
{GrayLevel[0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{GrayLevel[0], RectangleBox[{0.715, 0}, {0.725, 0}]},
{GrayLevel[0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{GrayLevel[0], RectangleBox[{0.735, 0}, {0.745, 0}]},
{GrayLevel[0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{GrayLevel[0], RectangleBox[{0.755, 0}, {0.765, 0}]},
{GrayLevel[0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{GrayLevel[0], RectangleBox[{0.775, 0}, {0.785, 0}]},
{GrayLevel[0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{GrayLevel[0], RectangleBox[{0.795, 0}, {0.805, 0}]},
{GrayLevel[0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.815, 0}, {0.825, 0}]},
{GrayLevel[0], RectangleBox[{0.825, 0}, {0.835, 0}]},
{GrayLevel[0], RectangleBox[{0.835, 0}, {0.845, 0}]},
{GrayLevel[0], RectangleBox[{0.845, 0}, {0.855, 0}]},
{GrayLevel[0], RectangleBox[{0.855, 0}, {0.865, 0}]},
{GrayLevel[0], RectangleBox[{0.865, 0}, {0.875, 0}]},
{GrayLevel[0], RectangleBox[{0.875, 0}, {0.885, 0}]},
{GrayLevel[0], RectangleBox[{0.885, 0}, {0.895, 0}]},
{GrayLevel[0], RectangleBox[{0.895, 0}, {0.905, 0}]},
{GrayLevel[0], RectangleBox[{0.905, 0}, {0.915, 0}]},
{GrayLevel[0], RectangleBox[{0.915, 0}, {0.925, 0}]},
{GrayLevel[0], RectangleBox[{0.925, 0}, {0.935, 0}]},
{GrayLevel[0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{GrayLevel[0], RectangleBox[{0.945, 0}, {0.955, 0}]},
{GrayLevel[0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{GrayLevel[0], RectangleBox[{0.965, 0}, {0.975, 0}]},
{GrayLevel[0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{GrayLevel[0], RectangleBox[{0.985, 0}, {0.995, 0}]},
{GrayLevel[0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{GrayLevel[0], RectangleBox[{1.0050000000000001`, 0}, {1.015, 0}]},
{GrayLevel[0], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{GrayLevel[0], RectangleBox[{1.0250000000000001`, 0}, {1.035, 0}]},
{GrayLevel[0], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{GrayLevel[0], RectangleBox[{1.0450000000000002`, 0}, {1.055, 0}]},
{GrayLevel[0], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{GrayLevel[0], RectangleBox[{1.0650000000000002`, 0}, {1.075, 0}]},
{GrayLevel[0], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{GrayLevel[0], RectangleBox[{1.0850000000000002`, 0}, {1.095, 0}]},
{GrayLevel[0], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{GrayLevel[0], RectangleBox[{1.1050000000000002`, 0}, {1.115, 0}]},
{GrayLevel[0], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{GrayLevel[0], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.135, 0}, {1.1449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.155, 0}, {1.1649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.175, 0}, {1.1849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.195, 0}, {1.2049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.215, 0}, {1.2249999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.235, 0}, {1.2449999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{GrayLevel[0], RectangleBox[{1.2550000000000001`, 0}, {1.265, 0}]},
{GrayLevel[0], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{GrayLevel[0], RectangleBox[{1.2750000000000001`, 0}, {1.285, 0}]},
{GrayLevel[0], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{GrayLevel[0], RectangleBox[{1.2950000000000002`, 0}, {1.305, 0}]},
{GrayLevel[0], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{GrayLevel[0], RectangleBox[{1.3150000000000002`, 0}, {1.325, 0}]},
{GrayLevel[0], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{GrayLevel[0], RectangleBox[{1.3350000000000002`, 0}, {1.345, 0}]},
{GrayLevel[0], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{GrayLevel[0], RectangleBox[{1.3550000000000002`, 0}, {1.365, 0}]},
{GrayLevel[0], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{GrayLevel[0], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.385, 0}, {1.3949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.405, 0}, {1.4149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.425, 0}, {1.4349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.445, 0}, {1.4549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.465, 0}, {1.4749999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.485, 0}, {1.4949999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{GrayLevel[0], RectangleBox[{1.5050000000000001`, 0}, {1.515, 0}]},
{GrayLevel[0], RectangleBox[{1.5150000000000001`, 0}, {1.525, 0}]},
{GrayLevel[0], RectangleBox[{1.5250000000000001`, 0}, {1.535, 0}]},
{GrayLevel[0], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{GrayLevel[0], RectangleBox[{1.5450000000000002`, 0}, {1.555, 0}]},
{GrayLevel[0], RectangleBox[{1.5550000000000002`, 0}, {1.565, 0}]},
{GrayLevel[0], RectangleBox[{1.5650000000000002`, 0}, {1.575, 0}]},
{GrayLevel[0], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{GrayLevel[0], RectangleBox[{1.5850000000000002`, 0}, {1.595, 0}]},
{GrayLevel[0], RectangleBox[{1.5950000000000002`, 0}, {1.605, 0}]},
{GrayLevel[0], RectangleBox[{1.6050000000000002`, 0}, {1.615, 0}]},
{GrayLevel[0], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{GrayLevel[0], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.635, 0}, {1.6449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.645, 0}, {1.6549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.655, 0}, {1.6649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.675, 0}, {1.6849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.685, 0}, {1.6949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.695, 0}, {1.7049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.715, 0}, {1.7249999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.725, 0}, {1.7349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.735, 0}, {1.7449999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{GrayLevel[0], RectangleBox[{1.7550000000000001`, 0}, {1.765, 0}]},
{GrayLevel[0], RectangleBox[{1.7650000000000001`, 0}, {1.775, 0}]},
{GrayLevel[0], RectangleBox[{1.7750000000000001`, 0}, {1.785, 0}]},
{GrayLevel[0], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{GrayLevel[0], RectangleBox[{1.7950000000000002`, 0}, {1.805, 0}]},
{GrayLevel[0], RectangleBox[{1.8050000000000002`, 0}, {1.815, 0}]},
{GrayLevel[0], RectangleBox[{1.8150000000000002`, 0}, {1.825, 0}]},
{GrayLevel[0], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{GrayLevel[0], RectangleBox[{1.8350000000000002`, 0}, {1.845, 0}]},
{GrayLevel[0], RectangleBox[{1.8450000000000002`, 0}, {1.855, 0}]},
{GrayLevel[0], RectangleBox[{1.8550000000000002`, 0}, {1.865, 0}]},
{GrayLevel[0], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{GrayLevel[0], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.885, 0}, {1.8949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.895, 0}, {1.9049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.905, 0}, {1.9149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.925, 0}, {1.9349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.935, 0}, {1.9449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.945, 0}, {1.9549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.965, 0}, {1.9749999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.975, 0}, {1.9849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.985, 0}, {1.9949999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.995, 0}, {2.005, 0}]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Frame->True]], "Output",
CellChangeTimes->{{3.662579824150284*^9, 3.662579924329763*^9},
3.662580001591158*^9, 3.662580129220911*^9, 3.662580190033875*^9,
3.6625804772897387`*^9, 3.6625808070482807`*^9, 3.662597811959137*^9,
3.662598019821656*^9, 3.662598239612311*^9, {3.662937812403561*^9,
3.66293782903582*^9}, 3.663809224691682*^9, 3.663851932329878*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"histoplot", "=",
RowBox[{"Graphics", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"EdgeForm", "[", "Black", "]"}], ",", "Black", ",",
"\[IndentingNewLine]",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{"Black", ",",
RowBox[{"Rectangle", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2"}], ")"}], "-", "0.005"}],
",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2"}], ")"}], "+", "0.005"}],
",",
RowBox[{"bc", "[",
RowBox[{"[", "i", "]"}], "]"}]}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "bc", "]"}]}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"AspectRatio", "\[Rule]",
RowBox[{"1", "/", "GoldenRatio"}]}], ",",
RowBox[{"Frame", "\[Rule]", "True"}], ",",
RowBox[{"FrameTicks", "\[Rule]", "False"}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.662579808750051*^9, 3.662580000968864*^9}, {
3.662580093697451*^9, 3.662580094976821*^9}, {3.66258012727341*^9,
3.662580128536862*^9}, 3.662580189485834*^9, {3.662580451133957*^9,
3.6625804529645967`*^9}, 3.6625978056439734`*^9, {3.662598140474201*^9,
3.6625981452566223`*^9}}],
Cell[BoxData[
GraphicsBox[
{GrayLevel[0], EdgeForm[GrayLevel[0]],
{GrayLevel[0], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{GrayLevel[0], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{GrayLevel[0], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{GrayLevel[0], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{GrayLevel[0], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{GrayLevel[0], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{GrayLevel[0], RectangleBox[{-1.9349999999999998`, 0}, {-1.925, 0}]},
{GrayLevel[0], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{GrayLevel[0], RectangleBox[{-1.9149999999999998`, 0}, {-1.905, 0}]},
{GrayLevel[0], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{GrayLevel[0], RectangleBox[{-1.8949999999999998`, 0}, {-1.885, 0}]},
{GrayLevel[0], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{GrayLevel[0], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.865, 0}, {-1.8550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.845, 0}, {-1.8350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.825, 0}, {-1.8150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{GrayLevel[0], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{GrayLevel[0], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{GrayLevel[0], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{GrayLevel[0], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{GrayLevel[0], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{GrayLevel[0], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{GrayLevel[0], RectangleBox[{-1.6849999999999998`, 0}, {-1.675, 0}]},
{GrayLevel[0], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{GrayLevel[0], RectangleBox[{-1.6649999999999998`, 0}, {-1.655, 0}]},
{GrayLevel[0], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{GrayLevel[0], RectangleBox[{-1.6449999999999998`, 0}, {-1.635, 0}]},
{GrayLevel[0], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{GrayLevel[0], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.615, 0}, {-1.6050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.595, 0}, {-1.5850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.575, 0}, {-1.5650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{GrayLevel[0], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{GrayLevel[0], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{GrayLevel[0], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{GrayLevel[0], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{GrayLevel[0], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{GrayLevel[0], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{GrayLevel[0], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{GrayLevel[0], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{GrayLevel[0], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{GrayLevel[0], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{GrayLevel[0], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{GrayLevel[0], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{GrayLevel[0], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{GrayLevel[0], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{GrayLevel[0], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{GrayLevel[0], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{GrayLevel[0], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{GrayLevel[0], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{GrayLevel[0], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{GrayLevel[0], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{GrayLevel[0], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{GrayLevel[0], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{GrayLevel[0], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{GrayLevel[0], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{GrayLevel[0], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{GrayLevel[0], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{GrayLevel[0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{GrayLevel[0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{GrayLevel[0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{GrayLevel[0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{GrayLevel[0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{GrayLevel[0], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.935, 0}, {-0.925, 0}]},
{GrayLevel[0], RectangleBox[{-0.925, 0}, {-0.915, 0}]},
{GrayLevel[0], RectangleBox[{-0.915, 0}, {-0.905, 0}]},
{GrayLevel[0], RectangleBox[{-0.905, 0}, {-0.895, 0}]},
{GrayLevel[0], RectangleBox[{-0.895, 0}, {-0.885, 0}]},
{GrayLevel[0], RectangleBox[{-0.885, 0}, {-0.875, 0}]},
{GrayLevel[0], RectangleBox[{-0.875, 0}, {-0.865, 0}]},
{GrayLevel[0], RectangleBox[{-0.865, 0}, {-0.855, 0}]},
{GrayLevel[0], RectangleBox[{-0.855, 0}, {-0.845, 0}]},
{GrayLevel[0], RectangleBox[{-0.845, 0}, {-0.835, 0}]},
{GrayLevel[0], RectangleBox[{-0.835, 0}, {-0.825, 0}]},
{GrayLevel[0], RectangleBox[{-0.825, 0}, {-0.815, 0}]},
{GrayLevel[0], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{GrayLevel[0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{GrayLevel[0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{GrayLevel[0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{GrayLevel[0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{GrayLevel[0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{GrayLevel[0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{GrayLevel[0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{GrayLevel[0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{GrayLevel[0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{GrayLevel[0], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{GrayLevel[0], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{GrayLevel[0], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 16}]},
{GrayLevel[0], RectangleBox[{-0.685, 0}, {-0.675, 124}]},
{GrayLevel[0], RectangleBox[{-0.675, 0}, {-0.665, 322}]},
{GrayLevel[0], RectangleBox[{-0.665, 0}, {-0.655, 728}]},
{GrayLevel[0], RectangleBox[{-0.655, 0}, {-0.645, 725}]},
{GrayLevel[0], RectangleBox[{-0.645, 0}, {-0.635, 456}]},
{GrayLevel[0], RectangleBox[{-0.635, 0}, {-0.625, 110}]},
{GrayLevel[0], RectangleBox[{-0.625, 0}, {-0.615, 16}]},
{GrayLevel[0], RectangleBox[{-0.615, 0}, {-0.605, 1}]},
{GrayLevel[0], RectangleBox[{-0.605, 0}, {-0.595, 0}]},
{GrayLevel[0], RectangleBox[{-0.595, 0}, {-0.585, 0}]},
{GrayLevel[0], RectangleBox[{-0.585, 0}, {-0.575, 0}]},
{GrayLevel[0], RectangleBox[{-0.575, 0}, {-0.565, 0}]},
{GrayLevel[0], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{GrayLevel[0], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{GrayLevel[0], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{GrayLevel[0], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{GrayLevel[0], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{GrayLevel[0], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{GrayLevel[0], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{GrayLevel[0], RectangleBox[{-0.495, 0}, {-0.485, 0}]},
{GrayLevel[0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{GrayLevel[0], RectangleBox[{-0.475, 0}, {-0.46499999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{-0.465, 0}, {-0.455, 0}]},
{GrayLevel[0], RectangleBox[{-0.455, 0}, {-0.445, 0}]},
{GrayLevel[0], RectangleBox[{-0.445, 0}, {-0.435, 0}]},
{GrayLevel[0], RectangleBox[{-0.435, 0}, {-0.425, 0}]},
{GrayLevel[0], RectangleBox[{-0.425, 0}, {-0.415, 0}]},
{GrayLevel[0], RectangleBox[{-0.415, 0}, {-0.40499999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{-0.405, 0}, {-0.395, 0}]},
{GrayLevel[0], RectangleBox[{-0.395, 0}, {-0.385, 0}]},
{GrayLevel[0], RectangleBox[{-0.385, 0}, {-0.375, 0}]},
{GrayLevel[0], RectangleBox[{-0.375, 0}, {-0.365, 0}]},
{GrayLevel[0], RectangleBox[{-0.365, 0}, {-0.355, 0}]},
{GrayLevel[0], RectangleBox[{-0.355, 0}, {-0.345, 0}]},
{GrayLevel[0], RectangleBox[{-0.34500000000000003`, 0}, {-0.335, 0}]},
{GrayLevel[0], RectangleBox[{-0.335, 0}, {-0.325, 0}]},
{GrayLevel[0], RectangleBox[{-0.325, 0}, {-0.315, 0}]},
{GrayLevel[0], RectangleBox[{-0.315, 0}, {-0.305, 0}]},
{GrayLevel[0], RectangleBox[{-0.305, 0}, {-0.295, 0}]},
{GrayLevel[0], RectangleBox[{-0.295, 0}, {-0.285, 0}]},
{GrayLevel[0], RectangleBox[{-0.28500000000000003`, 0}, {-0.275, 0}]},
{GrayLevel[0], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{GrayLevel[0], RectangleBox[{-0.265, 0}, {-0.255, 0}]},
{GrayLevel[0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{GrayLevel[0], RectangleBox[{-0.245, 0}, {-0.235, 0}]},
{GrayLevel[0], RectangleBox[{-0.23500000000000001`, 0}, {-0.225, 0}]},
{GrayLevel[0], RectangleBox[{-0.225, 0}, {-0.215, 0}]},
{GrayLevel[0], RectangleBox[{-0.215, 0}, {-0.205, 0}]},
{GrayLevel[0], RectangleBox[{-0.20500000000000002`, 0}, {-0.195, 0}]},
{GrayLevel[0], RectangleBox[{-0.195, 0}, {-0.185, 0}]},
{GrayLevel[0], RectangleBox[{-0.185, 0}, {-0.175, 0}]},
{GrayLevel[0], RectangleBox[{-0.17500000000000002`, 0}, {-0.165, 0}]},
{GrayLevel[0], RectangleBox[{-0.165, 0}, {-0.155, 0}]},
{GrayLevel[0], RectangleBox[{-0.155, 0}, {-0.145, 0}]},
{GrayLevel[0], RectangleBox[{-0.14500000000000002`, 0}, {-0.135, 0}]},
{GrayLevel[0], RectangleBox[{-0.135, 0}, {-0.125, 0}]},
{GrayLevel[0], RectangleBox[{-0.125, 0}, {-0.11499999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{-0.115, 0}, {-0.105, 0}]},
{GrayLevel[0], RectangleBox[{-0.10500000000000001`, 0}, {-0.095, 0}]},
{GrayLevel[0], RectangleBox[{-0.095, 0}, {-0.08499999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.085, 0}, {-0.075, 0}]},
{GrayLevel[0], RectangleBox[{-0.07500000000000001, 0}, {-0.065, 0}]},
{GrayLevel[0], RectangleBox[{-0.065, 0}, {-0.055, 0}]},
{GrayLevel[0], RectangleBox[{-0.055, 0}, {-0.045000000000000005`, 0}]},
{GrayLevel[0], RectangleBox[{-0.045, 0}, {-0.035, 0}]},
{GrayLevel[0],
RectangleBox[{-0.034999999999999996`, 0}, {-0.024999999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{-0.025, 0}, {-0.015, 0}]},
{GrayLevel[0], RectangleBox[{-0.015, 0}, {-0.005, 0}]},
{GrayLevel[0], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{GrayLevel[0], RectangleBox[{0.005, 0}, {0.015, 0}]},
{GrayLevel[0], RectangleBox[{0.015, 0}, {0.025, 0}]},
{GrayLevel[0],
RectangleBox[{0.024999999999999998`, 0}, {0.034999999999999996`, 0}]},
{GrayLevel[0], RectangleBox[{0.035, 0}, {0.045, 0}]},
{GrayLevel[0], RectangleBox[{0.045000000000000005`, 0}, {0.055, 0}]},
{GrayLevel[0], RectangleBox[{0.055, 0}, {0.065, 0}]},
{GrayLevel[0], RectangleBox[{0.065, 0}, {0.07500000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.075, 0}, {0.085, 0}]},
{GrayLevel[0], RectangleBox[{0.08499999999999999, 0}, {0.095, 0}]},
{GrayLevel[0], RectangleBox[{0.095, 0}, {0.10500000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{0.105, 0}, {0.115, 0}]},
{GrayLevel[0], RectangleBox[{0.11499999999999999`, 0}, {0.125, 0}]},
{GrayLevel[0], RectangleBox[{0.125, 0}, {0.135, 0}]},
{GrayLevel[0], RectangleBox[{0.135, 0}, {0.14500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.145, 0}, {0.155, 0}]},
{GrayLevel[0], RectangleBox[{0.155, 0}, {0.165, 0}]},
{GrayLevel[0], RectangleBox[{0.165, 0}, {0.17500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.175, 0}, {0.185, 0}]},
{GrayLevel[0], RectangleBox[{0.185, 0}, {0.195, 0}]},
{GrayLevel[0], RectangleBox[{0.195, 0}, {0.20500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.205, 0}, {0.215, 0}]},
{GrayLevel[0], RectangleBox[{0.215, 0}, {0.225, 0}]},
{GrayLevel[0], RectangleBox[{0.225, 0}, {0.23500000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{0.235, 0}, {0.245, 0}]},
{GrayLevel[0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{GrayLevel[0], RectangleBox[{0.255, 0}, {0.265, 0}]},
{GrayLevel[0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{GrayLevel[0], RectangleBox[{0.275, 0}, {0.28500000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{0.285, 0}, {0.295, 0}]},
{GrayLevel[0], RectangleBox[{0.295, 0}, {0.305, 0}]},
{GrayLevel[0], RectangleBox[{0.305, 0}, {0.315, 0}]},
{GrayLevel[0], RectangleBox[{0.315, 0}, {0.325, 0}]},
{GrayLevel[0], RectangleBox[{0.325, 0}, {0.335, 0}]},
{GrayLevel[0], RectangleBox[{0.335, 0}, {0.34500000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{0.345, 0}, {0.355, 0}]},
{GrayLevel[0], RectangleBox[{0.355, 0}, {0.365, 0}]},
{GrayLevel[0], RectangleBox[{0.365, 0}, {0.375, 0}]},
{GrayLevel[0], RectangleBox[{0.375, 0}, {0.385, 0}]},
{GrayLevel[0], RectangleBox[{0.385, 0}, {0.395, 0}]},
{GrayLevel[0], RectangleBox[{0.395, 0}, {0.405, 0}]},
{GrayLevel[0], RectangleBox[{0.40499999999999997`, 0}, {0.415, 0}]},
{GrayLevel[0], RectangleBox[{0.415, 0}, {0.425, 0}]},
{GrayLevel[0], RectangleBox[{0.425, 0}, {0.435, 0}]},
{GrayLevel[0], RectangleBox[{0.435, 0}, {0.445, 0}]},
{GrayLevel[0], RectangleBox[{0.445, 0}, {0.455, 0}]},
{GrayLevel[0], RectangleBox[{0.455, 0}, {0.465, 0}]},
{GrayLevel[0], RectangleBox[{0.46499999999999997`, 0}, {0.475, 0}]},
{GrayLevel[0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{GrayLevel[0], RectangleBox[{0.485, 0}, {0.495, 0}]},
{GrayLevel[0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{GrayLevel[0], RectangleBox[{0.505, 0}, {0.515, 0}]},
{GrayLevel[0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{GrayLevel[0], RectangleBox[{0.525, 0}, {0.535, 0}]},
{GrayLevel[0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{GrayLevel[0], RectangleBox[{0.545, 0}, {0.555, 0}]},
{GrayLevel[0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.565, 0}, {0.575, 0}]},
{GrayLevel[0], RectangleBox[{0.575, 0}, {0.585, 0}]},
{GrayLevel[0], RectangleBox[{0.585, 0}, {0.595, 0}]},
{GrayLevel[0], RectangleBox[{0.595, 0}, {0.605, 0}]},
{GrayLevel[0], RectangleBox[{0.605, 0}, {0.615, 0}]},
{GrayLevel[0], RectangleBox[{0.615, 0}, {0.625, 0}]},
{GrayLevel[0], RectangleBox[{0.625, 0}, {0.635, 0}]},
{GrayLevel[0], RectangleBox[{0.635, 0}, {0.645, 0}]},
{GrayLevel[0], RectangleBox[{0.645, 0}, {0.655, 0}]},
{GrayLevel[0], RectangleBox[{0.655, 0}, {0.665, 0}]},
{GrayLevel[0], RectangleBox[{0.665, 0}, {0.675, 0}]},
{GrayLevel[0], RectangleBox[{0.675, 0}, {0.685, 0}]},
{GrayLevel[0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{GrayLevel[0], RectangleBox[{0.695, 0}, {0.705, 0}]},
{GrayLevel[0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{GrayLevel[0], RectangleBox[{0.715, 0}, {0.725, 0}]},
{GrayLevel[0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{GrayLevel[0], RectangleBox[{0.735, 0}, {0.745, 0}]},
{GrayLevel[0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{GrayLevel[0], RectangleBox[{0.755, 0}, {0.765, 0}]},
{GrayLevel[0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{GrayLevel[0], RectangleBox[{0.775, 0}, {0.785, 0}]},
{GrayLevel[0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{GrayLevel[0], RectangleBox[{0.795, 0}, {0.805, 0}]},
{GrayLevel[0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.815, 0}, {0.825, 0}]},
{GrayLevel[0], RectangleBox[{0.825, 0}, {0.835, 0}]},
{GrayLevel[0], RectangleBox[{0.835, 0}, {0.845, 0}]},
{GrayLevel[0], RectangleBox[{0.845, 0}, {0.855, 0}]},
{GrayLevel[0], RectangleBox[{0.855, 0}, {0.865, 0}]},
{GrayLevel[0], RectangleBox[{0.865, 0}, {0.875, 0}]},
{GrayLevel[0], RectangleBox[{0.875, 0}, {0.885, 0}]},
{GrayLevel[0], RectangleBox[{0.885, 0}, {0.895, 0}]},
{GrayLevel[0], RectangleBox[{0.895, 0}, {0.905, 0}]},
{GrayLevel[0], RectangleBox[{0.905, 0}, {0.915, 0}]},
{GrayLevel[0], RectangleBox[{0.915, 0}, {0.925, 0}]},
{GrayLevel[0], RectangleBox[{0.925, 0}, {0.935, 0}]},
{GrayLevel[0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{GrayLevel[0], RectangleBox[{0.945, 0}, {0.955, 0}]},
{GrayLevel[0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{GrayLevel[0], RectangleBox[{0.965, 0}, {0.975, 0}]},
{GrayLevel[0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{GrayLevel[0], RectangleBox[{0.985, 0}, {0.995, 0}]},
{GrayLevel[0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{GrayLevel[0], RectangleBox[{1.0050000000000001`, 0}, {1.015, 0}]},
{GrayLevel[0], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{GrayLevel[0], RectangleBox[{1.0250000000000001`, 0}, {1.035, 0}]},
{GrayLevel[0], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{GrayLevel[0], RectangleBox[{1.0450000000000002`, 0}, {1.055, 0}]},
{GrayLevel[0], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{GrayLevel[0], RectangleBox[{1.0650000000000002`, 0}, {1.075, 0}]},
{GrayLevel[0], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{GrayLevel[0], RectangleBox[{1.0850000000000002`, 0}, {1.095, 0}]},
{GrayLevel[0], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{GrayLevel[0], RectangleBox[{1.1050000000000002`, 0}, {1.115, 0}]},
{GrayLevel[0], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{GrayLevel[0], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.135, 0}, {1.1449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.155, 0}, {1.1649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.175, 0}, {1.1849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.195, 0}, {1.2049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.215, 0}, {1.2249999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.235, 0}, {1.2449999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{GrayLevel[0], RectangleBox[{1.2550000000000001`, 0}, {1.265, 0}]},
{GrayLevel[0], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{GrayLevel[0], RectangleBox[{1.2750000000000001`, 0}, {1.285, 0}]},
{GrayLevel[0], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{GrayLevel[0], RectangleBox[{1.2950000000000002`, 0}, {1.305, 0}]},
{GrayLevel[0], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{GrayLevel[0], RectangleBox[{1.3150000000000002`, 0}, {1.325, 0}]},
{GrayLevel[0], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{GrayLevel[0], RectangleBox[{1.3350000000000002`, 0}, {1.345, 0}]},
{GrayLevel[0], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{GrayLevel[0], RectangleBox[{1.3550000000000002`, 0}, {1.365, 0}]},
{GrayLevel[0], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{GrayLevel[0], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.385, 0}, {1.3949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.405, 0}, {1.4149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.425, 0}, {1.4349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.445, 0}, {1.4549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.465, 0}, {1.4749999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.485, 0}, {1.4949999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{GrayLevel[0], RectangleBox[{1.5050000000000001`, 0}, {1.515, 0}]},
{GrayLevel[0], RectangleBox[{1.5150000000000001`, 0}, {1.525, 0}]},
{GrayLevel[0], RectangleBox[{1.5250000000000001`, 0}, {1.535, 0}]},
{GrayLevel[0], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{GrayLevel[0], RectangleBox[{1.5450000000000002`, 0}, {1.555, 0}]},
{GrayLevel[0], RectangleBox[{1.5550000000000002`, 0}, {1.565, 0}]},
{GrayLevel[0], RectangleBox[{1.5650000000000002`, 0}, {1.575, 0}]},
{GrayLevel[0], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{GrayLevel[0], RectangleBox[{1.5850000000000002`, 0}, {1.595, 0}]},
{GrayLevel[0], RectangleBox[{1.5950000000000002`, 0}, {1.605, 0}]},
{GrayLevel[0], RectangleBox[{1.6050000000000002`, 0}, {1.615, 0}]},
{GrayLevel[0], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{GrayLevel[0], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.635, 0}, {1.6449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.645, 0}, {1.6549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.655, 0}, {1.6649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.675, 0}, {1.6849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.685, 0}, {1.6949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.695, 0}, {1.7049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.715, 0}, {1.7249999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.725, 0}, {1.7349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.735, 0}, {1.7449999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{GrayLevel[0], RectangleBox[{1.7550000000000001`, 0}, {1.765, 0}]},
{GrayLevel[0], RectangleBox[{1.7650000000000001`, 0}, {1.775, 0}]},
{GrayLevel[0], RectangleBox[{1.7750000000000001`, 0}, {1.785, 0}]},
{GrayLevel[0], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{GrayLevel[0], RectangleBox[{1.7950000000000002`, 0}, {1.805, 0}]},
{GrayLevel[0], RectangleBox[{1.8050000000000002`, 0}, {1.815, 0}]},
{GrayLevel[0], RectangleBox[{1.8150000000000002`, 0}, {1.825, 0}]},
{GrayLevel[0], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{GrayLevel[0], RectangleBox[{1.8350000000000002`, 0}, {1.845, 0}]},
{GrayLevel[0], RectangleBox[{1.8450000000000002`, 0}, {1.855, 0}]},
{GrayLevel[0], RectangleBox[{1.8550000000000002`, 0}, {1.865, 0}]},
{GrayLevel[0], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{GrayLevel[0], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.885, 0}, {1.8949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.895, 0}, {1.9049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.905, 0}, {1.9149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.925, 0}, {1.9349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.935, 0}, {1.9449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.945, 0}, {1.9549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.965, 0}, {1.9749999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.975, 0}, {1.9849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.985, 0}, {1.9949999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.995, 0}, {2.005, 0}]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Frame->True,
FrameTicks->False]], "Output",
CellChangeTimes->{{3.662579824150284*^9, 3.662579924329763*^9},
3.662580001591158*^9, 3.662580129220911*^9, 3.662580190033875*^9,
3.6625804772897387`*^9, 3.6625808070482807`*^9, 3.662597811959137*^9,
3.662598019821656*^9, 3.662598151082287*^9, 3.662598239670375*^9, {
3.662937812541607*^9, 3.662937829119207*^9}, 3.6638092247499437`*^9,
3.663851932395485*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[",
RowBox[{"competitionplot", ",", "\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",", "u", ",", "tryKm"}],
"]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2"}], ",", "2"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Thick", ",", "Black"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]", "histoplot", ",",
RowBox[{"Axes", "\[Rule]",
RowBox[{"{",
RowBox[{"True", ",", "False"}], "}"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.662579485856509*^9, 3.662579491127986*^9}, {
3.6625802104607067`*^9, 3.662580220555599*^9}, {3.662580463397059*^9,
3.6625804711235657`*^9}, 3.6625805460433283`*^9, {3.662580792465548*^9,
3.662580793041589*^9}, {3.662598030154951*^9, 3.662598032331089*^9}, {
3.662598081458737*^9, 3.662598101059671*^9}}],
Cell[BoxData[
GraphicsBox[{{{}, {},
{GrayLevel[0], Thickness[Tiny], Dashing[{0, Small}],
LineBox[CompressedData["
1:eJwt13k0Vfv7B3BpMJVQkmSIEhKKFNLnoURmUo6bwtVVF6EUuQlpOgeVTCXH
UIdztgbzTD6mkzkzZUjGNB0kmcr57e9avz/22uu11mftvdfez/N+Pnvb3962
//Dy8PBMksf/zmpo0xcul4tL7O0M59eGg/eCAnVhkYv57xy0sNgQDlm5exRn
ZrlYOpFqkioZDnuVLP4e/8rFA2IDYhTFcNgvequ3qYeLjzb68vegcICR6Yb4
TC5er1rFp+kbDrZ3m19oOnFxjK3z8Lm+cPBvuXXhXPkyPvAgZeRzdgR0dgp9
qXT5gzl6DmOUlPsgXeG9cf/W33goOOT2v6aRkO9Rs3r9wCLeud1D4fzxh+Ac
sWfqfegC1vztfSo8LArmo65RMZrHpku0PZk10cAQ/iD5eOgXjguMMkrVigW6
6Z5LHbRZ/PCFG79saRyEerpcVT72E+9bEIs8ZfgYrq187n/p+w88nOby04v/
CbiEtGzvJqbxv/8MGE03JkDs67HHdPcpnJV2JUAyORFKBpXWvpTnYDpt9HdI
TjIoiIChXdJXbDG1IyewNwVyVKjuwyMTmPddakDv3FMYZGfLaWuPYw/HnHC6
KAPGVGP34oIRXDaVdWrrxlQQDUrXVlsxhBOe7Oc5LJcGqtqTqmkz/VilDfq3
8DHBTS04uHigH5veXpHVLMiEZMX17c21/fgH+96tIGEmiEmo+/9K6MfjMTd3
9IozYW7Oq9L4SD/+FAJ/rm5nQlUx58SXmD7sZShbaGvABIo+J0hduxfzDF/8
5RrAhJtHvrcWX+3BQgeKvnoMk+tNvllpufZg+Q/iQ9fGmMBj8fVthkUPVjZY
b0qbYELgic9NDPkefNLT6QKdwwQ/t7G6e03duN3+SiFjkQnnqQMVLnLd2Chj
zlxLjAXmTc1ZAnWdeN0BxkkLxIKw1ib1WzmdeO9cGOIzZEFdZ2PGMr0T3615
ZFt+hAVGA/UvZy52YlmKGUfBlAWHOGxiQKoT10vQy5vsWKAhUp6S7d2B/cyV
+qP+ZYG4XUakg0Q79jyFdw9HsiBHMbzEaGU71jSZ6doYzQLrhXOjeybbsPax
941HYsn7J207IFhL+qTxE3o8C5YnYgZL/NowsbErZtczFoxfv6a2tbsV5+Zq
J7NzWOBl9fDxa+UWnNHVeXywjQXET9NvsStacFZ/clZRBwuG41eB1/u3WCs0
ReVBFwtOjvp/kqG9xZEo3UfzPQtQwBntkIlmbOYiIuPwkQUijF2dhqwmnDlj
8FaCQz7vL/b6uu0N+GNcoqcDHwH3nz+rOrRQj++N2MTP8BPgcSb4Sn5zPX40
r7cnTJCA7W8O9D3zq8eeYX30l+sIiIt9wbxeV4fLNm3We7OBgP+0HupretZi
B9ZGRzNZAk5OXJhKh1q8tsst+oUcAZp0U4aceC1Wurkkyy9PwLeVqwSEy99g
5tkBzYLtBJzp8OucWP8GB4W/VRhXJsDwkqNHUm4Nfu1wQTJGkwAZRR0ZcWoN
do0c2FCsRcDSe/G2cMcanOj51rp3HwF5Bi3aAatr8M302XuiBwhQFDXktbOv
xgYlPvO2BwngZcvkN+yqxmKKY58d9AkYvLp0zoCnGrsnF4ufPkTA4495zWrp
VVjkfO5mChAgmLUzXmCpEh8L4smRO0LAuOsq85CWSnyQ5usoYERAtcTQ8i9G
JX4uxqvLIR0Y/OTsqHkl3p4oGv7SmACO5ToNnFSBaSmyXkumBKT1jd37fKsc
t09XRAxZE9AbuCk5UbMc09zU62/YECAsY5xlM/wat0lqvJCxJcDPmWgvRq+x
+/Wh05bHCTg65i4RtliKiePePrdPkO/7ToLSofRSPJ5c2yh4koCMnU06P+xL
8QHvb3URpCXcdzv+lV+C1U9+Z96xJ2CCM5mi4lOMH15JHbdxIGBrpFzOB5li
HP9kh1EZaes9NtVRzUV4PXIyVPiLgCLfnLFFlSK8YSdL4hPpbxtHfmW8L8SW
f0QnD58iQK5gA78rtRCXXOO4JpKmzV9WaRwrwHdvdG4/6khAeXyaXnBMAZ7c
auMTS/qHbre55uECzKDuoAyR/uv6fu+ElHw89rt3yes0WX8y50OsrPIx9aVR
YRbpKvz44crlPCzxn5TwJGkV3sVcj1N5OLJb957LGbJeGCpsWcE8/Dhje34s
6agjp7o7inKxnnaJ/xvSb8bCP909l4vbWe2dM6QX75TN623Kxf0bTJqknQhQ
U/ouMFWTgyud504fIf13vbRUqm8OHjKvoJ0jHeduqUqRz8ELnret7pJuFArW
X9uWjTt2qWYySPO8yrSsCM7GGm/pRBlpLcuPTpfVsrGQd5VeO+nzkyIXlQay
sOGK8POjpOmRBqH94Vn4sNUntRnSrXsuRUfqZuG8Pw33l0nzM42O0doz8b67
qtQ1zgT4TDA9ptUzcQVaLSVE+p0K/32HexkYHbcxXksaLvybVfnlFWa/Wb9O
kDSR2dCubPIKf/Mz9FxFWuTHrtmHaS9x0WbO2SXy+gFa9yQWeV/iSt0tcxzS
w34cnb+dX2Azwzb5QdKmxVaODa+fY0cvuYlG0jlLWUF7pUh3Shjnk95ySOzp
k6vp2MS1ASWQDg3xrebtJvCBIYv266S/VnWOuWsSuORrybIjabvV2vwdkSws
PK/KPkC6zPiRih6HiR/ZVu0QJb09bN6cYcbEcrJ0uXHy+0Q0OXgLpafhU/Yf
8gtJn7bZmtfnmopH5XWzrEl/m5nVuVLDwP3qcbqSpAPjWrDwDgZWetV64wNZ
H/S+0EaD8adY3SLF2Im0apCjTd/Rp5j3acKbLaRL5bR7LrNScE6dwcoOsv7y
GtvZVm1JOPuVf4EO6U6RO22hUYm44Hro7gmynmdO6AzkH6fj4SNqrtGk935M
/inVHY+dQ68JfST7IfOnp8JEbwzWyFhBsSX7562OnLoUPRqvnN3UNE4h+z+o
Q9fydBTmP6S94ippitjl1PP4Ad50fz4zkuzH43rCvCvqb2PlgFHlBLKfo9iX
Jc+Z3cTnhCOzxEm3WvVpNDeH4NQVdksRdgQk1FnjvWn+OPpH/4eLZB6EdCp1
SlVb4Ma7tC8byfxQXT/gvnq3FophBCZdIfOlezo0WWSeghwO627psCLgWvTR
Bg8tH7TGUcbjliWZX3K0u4kioajHnXKjwoyAW3HyPvvv30IdFMdQPtJH15ZR
2oTuIspwkJUZmV91cxzl1XwRyM03wLrehIBz51TcCpaj0H764eUkMv9M5P3/
uqkfg4a/K19sIvNSaaDa0jowFllVyOf/OkzAF9vT+78sPEJdb37mGBgS4Hko
kl9mlo6m4wzis8n8LRa81lV1hYGu5+ZkL2gTkLJbvCNTPhVRT7Ye/EDm+x3r
zFZ6SyrSXijdhMn8t4sbafRTZqI6Z+XSK3sJmNpmXqUyQKA77iajBbvJ/NeR
zow6koG+M+5n0xQIWOtY+DJ4OgNF1Xi+0iTnz0yQzXPPpEzk8R8S7CXnk/Nw
la1CYBYaPVj6VUrmf/kwZ/GnKxttzLx98fJmAupznY5k0/JQ+Ih+RsBaAg6y
Vat3fsxDwR1Ddl/I+ZjVvWCQpJ2PPEbKL9oLkPmxEE2uzUf8Gh827FxDwFlU
p/uPfiEqmjsvT+eygNugsUdyuhj9K99R+GGaBfuGV8jcoGAUG2zX0krOd7US
+2mNdIy2cHjOzJLzXzHqVc3HBYw4JaarJFpZIPT05b4Uiwp0stAv0aaJBb+t
Kf1cTgWyF+hTSa1hwUBWpjLeU4U2K+z7g/NYkOxzpka/sAZZSZocGIhiAd1R
ICN2sAbZUnrTWOT+5bFJ3qPvfGzUc8nL0fs+CyLlBD0SKWwkPrT/xS8aC0Ja
80X/LLCRb9D4n9EQFrhorHMqO1iLXJdMpg28WKAwVbqgW1WPfDYK7hQwZkFg
8+FbP7/XI2Mv46Bj5P6q+3mjcIZkA+pZjBu/Y0Duh/7pU9h2sQF52eXOzOux
YKp30YJPrhG1qysZlGiwoJyt86zjehMKmdMrypVkwV8JhaaeOi0o7dOWvqjP
TDjGeN9sSWlH/w1O8UTcYIKRhdjK2fweFCqgNuuTkAYPnHpCNAr7kVKDS/i2
V6lQaym9zlpsCBmc1TZfiGfA923iQe1PRhBBGxfiefgMrlze5fJg0zhyzhku
yAx/Cj39IrZudRNopk5Zuss3BZwDDn7iM/+K9C77+e79lgTVu/aHVa/moNWK
bBHffjooCpRNpJpMobLdc1uD+RNAuszDaDV1Gm2WSnm01T4eeBZ50y8N/0D5
aT13ApMewZzN6zPsHT9Rz/ls0d8ycdCn5SS149YsmljylF+gx4CPvYiofP8v
VD/qa1F+KBokY0Ypq6TnUeRVFSFnkSjIOJXCmrm6gKKce0svDEWCvX6wSd3r
ReSQ7ZbWVfQAss9ckNf9vYTuMj0jVg3eg3nBwyuLT/xBdfHH1mivigDbNj1t
6cfLiO1aj6U8wkBQT6iyLHEZVaUqW6OzYVCZ2mvmyFhGu95N7v/ndBhoXA1w
SchYRtP9GoJFVmEgLFsYIcleRnqWO58GaIVBvefeEfEfy6jY4m23xzINgF85
Utici+avcU6viaHB/MX5LRk2XPRl0Ezd9x4NMvtq0yzsuUjHJPXg8B0ayGS6
lUb8zUXSx7/w1QbQ4PeJ1HHBAC765GN/7IUTDQoZsvp8TC463vKzbGAXDbzW
TdYyX3CRkFbT5ws7aKDoX257NJuLqOssjXhkaRBjevr87TIucju85vYuMRpc
mn4SvbKDi9YmmInQ56mgcspdhvGOi36/8E/Q/0GFoRqddMMPXBR4FlsOfaWC
9eN35Tc+c1HjZScV9UEq8PMSx7ZNktczk7B5/44K2MO/s+InF617k06/3U4F
v66jTs6LXPTRynitVhMV/v//FtnGySWPsqnwf1Q8k/M=
"]]}}, {{}, {},
{GrayLevel[0], Thickness[Large], LineBox[CompressedData["
1:eJw113k0V+vXAHCRypBQdCVzKTJmSujZKJUylhAZ6kbXcJNEhigkFEmmZMxw
DuqLUmaPMXPGkCFSJEqETPH9nbvW+/5x1lmftfY65znP2ns/+4hcvGp8mZGB
gWGNuv67yyDeSTqdjplcUlXHrL3g6rJY8PIKHetFfdnl5eIFea/kxecW6JhF
kGzmveMFB/frXRyfouMD4XLP7J95gQpXYH9LLx0LnfYztB/zAvg82/Qkl47H
LQJ3jjh5g/G91hwFazruupKkUH3HBzzaAp3tK9YxJ9P7XU9rfKG7m22yynYN
fzTfalfO7g8ClVd3qOz+g0ctjpavdATCa8da5m1DK9jjStIp+9Z7YPNAfuaD
/zK+qFHY6WZyH5YivYMxWsJVSWcfZIyHQxrHR764T7/xpU2T1VuCHkGCrrxr
V8gCFg8s6jPOewz+TrY3JU7O45MmVqMX2qLBmynbw/XHL3zG8Uyop0Ic2N5u
29NDzuKqGj/E7RcP0eVjcQkOM9jGWVBCoCEBSob3sz8XncY3d+1x0jqWDGKc
oHU2aQrHhI5FcTSmwEvJYIfRzxOY98HQgh3DMxiuyxdWVh7H87vDQ5T2psGY
VPRB/OYzvs5awGohng5cvlnKMhs+YaIpjn/XvgyQUv4plTE3iJ1HpS+VrmWA
nYyfX/HQIE5lzkgT3ZAJyeLbOlvrB7F0TcH7exszgXunrMfvp4PYt0iC9TRb
Jiwu/lt1/OggNrU+H136VyZUF0+bTEYNYPYS5SPKCplgpjHtK6vcj4XeqWhH
2mVCwNEf7cU3e3HC268Xs99S8Se+Gyhe6sXMyzJmNxszgUFv6h1NrxeLCHzl
OtqSCT4m31rSRHuxbQVrW3dHJrjbjTWEtfTg8Itfzw0MZsKV4KFKW+EebDJr
+d77VyacbmnNY2noxjvYbl7fuJuA0PYW2cCX3fhpioBWiCABDd3NtPWEbvzj
xa1iNhECjg01Pp+71o35L+xJZhEn4Mh0HTnE343XZ5Rkv8kSIMdZkZJ/tQvz
+HHSlLUJ4DlLizDf2Yl5hwazmK8Q8FL8fskxpk7sYSG0uNOBAMNl+y/yPzvw
wzeKe/c7Ue9PEjnEWt+B+Q95imi5ELA+ETVc4t6B/xb5FWJ5k4DxW94yu3va
sYV2e5xkMAH/GjyKK5dow36MThX7Mgkg53W/R29ow0LTYmwLBAGjTzbCvx/e
YVOLHvHKLALOffH4KhjyDn/M39lo8IIA5GmlfHuiFfcezMo+W0AAZ9qBbi2i
BQeLzbrMV1Hr/V23rWFPE9YU7EsNHiAgPPtZ9ZHlRmylPfREdogARyu/G69b
G/G3j2rfuz4SsOftoYFn7o24rvVt4o5RAmKiczJvNTRgca3wPe4TBHgpPtJQ
cKrHM1mpx4vnqfVMOM9kQT0O1y1NU/pNgEKCbpowTz1+GR1vlLtIwHemjSwc
FW+xs096SvwKAVZd7t0T295ipDqzZshAgparpWPSq1ps115wQp2NBEFxVUGe
4Fr8OulCUBg7CasfeDruW9Zimo0gx+BWEgo025Q9mWsxi9LuFRdOEsS5tBjP
mtZgC5yj4sVDAmvevicsq1XYVU7pG4sQCRkDY2HfAivwQtR1U345Evp9eJMT
FSrwP88dIjbKk8AheDzPaLQcM+kG2U5RdrchO4tROZ6v4WnOVyBBZ8xhZ+hK
Ka4j9heIqJAwMf0zRdKlGFePcmeEaZCwO0L45UfBYkzjM9Q0PEKCobxRTWRr
ESYE865xIhKKrr8cW5EswiFus2EhQELIkptk89gbbCBhSLPSJkGSceWVo0UB
XquNtY46QYJVmmSdEGsB3trlvEfuJAmRRy16uopeYS5C0KuR8kpQ2ZIa7yt8
Rsqsd16XhGY2Pw32jnzM6H/irIweCQwvcvUr/fLxgvvWp28oK+qPWLvJ5GMX
U4Nr6vokJERo+g/ez8Puw2QzGJDQJ7kl3DyMhmnnbihIGZEAzv/kVU2+wBva
Ps6mUCZzmzolTrzAIRYxR7Ybk+CpGLZzhfE5ntOy85+hvOsId2r8zSwc9Xgm
N+wsCf63r9cw9pA4v1VqaJryVHX3mIMCiQedC2P1TEgoOx4rqTadies4dQqY
zpFwwWh3wcCldHwv3iTY2JSE73MLqjdq0/Axju2JSZR9Ytowx940LK785twE
5YQB/2bN8VTMmGBW5GZGgpSvpdGATiouYZe1KaRcKqzc60ak4H2xT54vUi5o
7qwz6EjCyuMjB6+Zk9DNGdThH5mIc0zjnbIpz5moDr0+k4BD1VN1P1E+OJI8
z9/zBOtqm80dP0+C0d4zDAaxcVg0bLLcg7KLwyZ2f7NYfDk+XCqDcu68k9hE
fxT2/dC7sET5naqwLH/CY3w+929DIQsSpn27DutfiMSFEZ362pS31gbp3BF8
hB9s2jn7N2Uzbrf0K/ghdjm5XyWQcmxCf+k7zTCcrLkmnEq5R1yzS7E2FC8G
hdFKKe/IJybjdYIxs23HcBflM2ocjBsa72KW+qqCb5Qj69z47E8F4J/WZtJr
lNsNBuRaW29jG/+HJzksqfoqCIiwS/HBxYoXWQQoP20wxAczPPAO6RYnCcp/
DQlMr2e54pMdjdcVKB/4/F415oIjnlI2E1SjLM7uEitjb4vPiN1wAsq3u/d3
89fo4SdsQlbalKW2DTkwSyuimB0mc/+5Z9Y/mXPJDH3j3imlRXnGYN+vq652
aDr08pYjlL0f6zQ5KrqgljzNYBXK676eT5Nlb6BLV17kyPz3fIfnTl2SXuj8
sRxXMcpM54Y1Nov7IZ77R4Z4KNcIh9xL5PRHRVKOU8yUA2NEXVTCA5FIq1Li
HPX9OuxlZh1s99BURdqvj5Q3+5toOoaEILuNpVP1lBsWpyWYNz9AsQb+wTTK
oc7B3MmB4UiR2tVIypmzEbd234lAz6TRCzfK9vaSdm/WI1HbMwFbeconRD3O
B2hEodhbHXLslPcP1egb+kQjpTnH9C9UPkwaX1CZXI5FWZYBHuGUm7ZmHyg8
9AQdtuLrtaac0/BbKNAjHnHzNvTLUHY6ErFFcCEBEfpZ7+qofNRbHvwzqZCE
dpivVIRRlimQmC10TUY80qlnzlBeivr0ff9SCop5p+jQS+V7Mav3++obaehU
vJd+DVUvKdI8Xbmi6chFx/z7NcpBhrntCW3p6MWqd60A5bMxn5vdJTJRdcyG
Pc5UPc6InK6WHCJRmcTVtEmqfnuPjuOdoVlogreRN4Byhf3t8o0q2ciny77u
L8r3XxQUfYzIQZM8m96rnaHyQ1UgN/IoDbEJr1bZUP2D3bLwud8sDYXrZm//
bEjVm69RtlNSLpq6O5B6kbLNaLWxmE8eYi91czOn+pHM/kW9tff5yDsndHEv
1b8aX1kfzQ8pQB/aklIOU/1RvU6qZt9IAfr5masj4jgJeT3LmknKr1EVUtb8
okNCzPJjdP/za3TZye+T/zES/kYNhy9rFKLyw5X7k7VIoDfJyfPNFqOFhaus
Z9VJcB1cy314vAT5Oqec8VUjYfxHk8ympBL0pjplJOMwCS2cl6XmdEuRpaxq
/fdDJMSfe7KvNb0MbV/laTNXIkFpdIPgHTOMInN+cORLU+svMZ2Vy8JIkB0Y
qqSo/Yh8UTuyjFHpb5modwdIYEt9rpSiV4n+fsqYMSpBwh9Ds0H6dCV6rhPi
Or2XhKG8XAksX408Xj2hRwmQkOxiVatRWIsWBFh2CVPnY4IlCy16uBZ5tAUv
fmEhIe5EQeyPzXUof9PvO8QWEiKEWR0TzeqQTRVn8t5NVP20v+ZaW65DjrKv
Nm7aQIKt3FbrMvV6ZC2v0WVKnddiM6XLh6sb0c/BT6e1hgnwadUOnP/RiHa3
9/QnUPNBT3YzB42vCXEHC5bPU/ND6OUBMZFrTWhyeOZ2Qh8BM/0repuFmxHP
xSGelg4CKupUn3XdakEKlanLOTUEnH9aqOuk2oYM5K6uuWYQUHATvd97uQ11
azzW8kwjgONcvfVwRBtqD2Kf8UkloIqz1814og1J8xYH+SQSsEPb2yDhVDs6
TdN8YxlNgHdRvKf/SjtioXGWpgYScDLtQ6u+WSfq3mB1VduWWs9dml2dcyda
fVQ0zGhNQNyVALpaQCfyCF8cx5YETEhLy0vQOtG4On/5QTMCgotuRzFt7EIO
Iz8SVvWpebF1n0VRbhcS+tXcvUudgONLNyZENr9HRaI1T6N2UPOjHjfTwute
JHfk0r20ikwIt2WZXW7sRf/kh7TSSzOh7wbD8PpQL3I3/Lb/fHEmOCRNl2zZ
1IdqnE6JshRQ8T+bXHef60NfxTwVDbOo+EcBo9q/+xCX0oJvwGMqvme+KlK5
H71V9NoSSM3PD617b8sVDiJXXKrFtzkT6vUFthpyf0KyJXbm20Uy4IcIj29n
/Gf0wKX38gH5dLjhdsD2Ie846h4RSjQ5mAa9g5zGdg0T6I/8NjZH9mdg46n+
dfPpKXSKxUNcazoFag6ohNYwTyMnq2GbAetkEGcpm0g/MYNGGvSIjk2JIFDm
eIw5eBadP8y3m680HhhWGLNcR3+hfbEBCpLH42DRqNyqbu88UjKIOUiyx8CA
ojX/3sAFxFAZtVhW/BhcTDm5RAd/I+ap/tux4Y+AL+qL2UaBJaSN5dyen34I
NIsUYu7mMqpOrtzg5nIfTDX8TjSUr6DoLfpBffzBkG/lLHr4zyr6nms+78p/
F5ZYtZmKTdZQlfXqauFefzDuUFMWiFtHn49+sKQb+QGrGltVWeI6Wjx65/CS
uh9UpfefskxbR1KHhC6s7vMDuZuetk9p6+isnqmD8LovcAgVPuCrW0d/qQ1d
H8v2hUang595fq0joeujr8w3+QJskYjgOE1HJjUDX4dqfWDp2tIumhEdqbNE
DvLn+0DuQH2GnikdiQqr9V9K9AHBXLvSBxfpyLNEa4LL3Qf+mKSPs3rSUat7
Ps/4Ph8oTBPS2JxJR1w7Jkadwrzh360/6zNz6Eh1cslZ18sbxD0qjHXy6Yiz
9p8ReXtviNK9cOVuGR19ulrsKqjpDa6z8Y+ZuujIS75k278LXiBp4SCY1kdH
LaMBcfGjXvCpVjVL6yMd5XJwL7a3eYFhXF/FnW90VLsrSMoi2wu2MJInRX7S
0Z/ZqXVarBdgR4/uynk6GlLmTWK/6wXu73WsbVboiL0Ob3Zz9YL/+39H////
/j8WZujM
"]]}},
{GrayLevel[0], EdgeForm[GrayLevel[0]],
{GrayLevel[0], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{GrayLevel[0], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{GrayLevel[0], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{GrayLevel[0], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{GrayLevel[0], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{GrayLevel[0], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{GrayLevel[0], RectangleBox[{-1.9349999999999998`, 0}, {-1.925, 0}]},
{GrayLevel[0], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{GrayLevel[0], RectangleBox[{-1.9149999999999998`, 0}, {-1.905, 0}]},
{GrayLevel[0], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{GrayLevel[0], RectangleBox[{-1.8949999999999998`, 0}, {-1.885, 0}]},
{GrayLevel[0], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{GrayLevel[0], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.865, 0}, {-1.8550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.845, 0}, {-1.8350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.825, 0}, {-1.8150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{GrayLevel[0], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{GrayLevel[0], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{GrayLevel[0], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{GrayLevel[0], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{GrayLevel[0], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{GrayLevel[0], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{GrayLevel[0], RectangleBox[{-1.6849999999999998`, 0}, {-1.675, 0}]},
{GrayLevel[0], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{GrayLevel[0], RectangleBox[{-1.6649999999999998`, 0}, {-1.655, 0}]},
{GrayLevel[0], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{GrayLevel[0], RectangleBox[{-1.6449999999999998`, 0}, {-1.635, 0}]},
{GrayLevel[0], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{GrayLevel[0], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.615, 0}, {-1.6050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.595, 0}, {-1.5850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.575, 0}, {-1.5650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{GrayLevel[0], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{GrayLevel[0], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{GrayLevel[0], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{GrayLevel[0], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{GrayLevel[0], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{GrayLevel[0], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{GrayLevel[0], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{GrayLevel[0], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{GrayLevel[0], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{GrayLevel[0], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{GrayLevel[0], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{GrayLevel[0], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{GrayLevel[0], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{GrayLevel[0], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{GrayLevel[0], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{GrayLevel[0], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{GrayLevel[0], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{GrayLevel[0], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{GrayLevel[0], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{GrayLevel[0], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{GrayLevel[0], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{GrayLevel[0], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{GrayLevel[0], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{GrayLevel[0], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{GrayLevel[0], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{GrayLevel[0], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{GrayLevel[0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{GrayLevel[0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{GrayLevel[0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{GrayLevel[0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{GrayLevel[0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{GrayLevel[0], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.935, 0}, {-0.925, 0}]},
{GrayLevel[0], RectangleBox[{-0.925, 0}, {-0.915, 0}]},
{GrayLevel[0], RectangleBox[{-0.915, 0}, {-0.905, 0}]},
{GrayLevel[0], RectangleBox[{-0.905, 0}, {-0.895, 0}]},
{GrayLevel[0], RectangleBox[{-0.895, 0}, {-0.885, 0}]},
{GrayLevel[0], RectangleBox[{-0.885, 0}, {-0.875, 0}]},
{GrayLevel[0], RectangleBox[{-0.875, 0}, {-0.865, 0}]},
{GrayLevel[0], RectangleBox[{-0.865, 0}, {-0.855, 0}]},
{GrayLevel[0], RectangleBox[{-0.855, 0}, {-0.845, 0}]},
{GrayLevel[0], RectangleBox[{-0.845, 0}, {-0.835, 0}]},
{GrayLevel[0], RectangleBox[{-0.835, 0}, {-0.825, 0}]},
{GrayLevel[0], RectangleBox[{-0.825, 0}, {-0.815, 0}]},
{GrayLevel[0], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{GrayLevel[0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{GrayLevel[0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{GrayLevel[0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{GrayLevel[0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{GrayLevel[0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{GrayLevel[0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{GrayLevel[0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{GrayLevel[0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{GrayLevel[0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{GrayLevel[0], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{GrayLevel[0], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{GrayLevel[0], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 16}]},
{GrayLevel[0], RectangleBox[{-0.685, 0}, {-0.675, 124}]},
{GrayLevel[0], RectangleBox[{-0.675, 0}, {-0.665, 322}]},
{GrayLevel[0], RectangleBox[{-0.665, 0}, {-0.655, 728}]},
{GrayLevel[0], RectangleBox[{-0.655, 0}, {-0.645, 725}]},
{GrayLevel[0], RectangleBox[{-0.645, 0}, {-0.635, 456}]},
{GrayLevel[0], RectangleBox[{-0.635, 0}, {-0.625, 110}]},
{GrayLevel[0], RectangleBox[{-0.625, 0}, {-0.615, 16}]},
{GrayLevel[0], RectangleBox[{-0.615, 0}, {-0.605, 1}]},
{GrayLevel[0], RectangleBox[{-0.605, 0}, {-0.595, 0}]},
{GrayLevel[0], RectangleBox[{-0.595, 0}, {-0.585, 0}]},
{GrayLevel[0], RectangleBox[{-0.585, 0}, {-0.575, 0}]},
{GrayLevel[0], RectangleBox[{-0.575, 0}, {-0.565, 0}]},
{GrayLevel[0], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{GrayLevel[0], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{GrayLevel[0], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{GrayLevel[0], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{GrayLevel[0], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{GrayLevel[0], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{GrayLevel[0], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{GrayLevel[0], RectangleBox[{-0.495, 0}, {-0.485, 0}]},
{GrayLevel[0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{GrayLevel[0], RectangleBox[{-0.475, 0}, {-0.46499999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{-0.465, 0}, {-0.455, 0}]},
{GrayLevel[0], RectangleBox[{-0.455, 0}, {-0.445, 0}]},
{GrayLevel[0], RectangleBox[{-0.445, 0}, {-0.435, 0}]},
{GrayLevel[0], RectangleBox[{-0.435, 0}, {-0.425, 0}]},
{GrayLevel[0], RectangleBox[{-0.425, 0}, {-0.415, 0}]},
{GrayLevel[0], RectangleBox[{-0.415, 0}, {-0.40499999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{-0.405, 0}, {-0.395, 0}]},
{GrayLevel[0], RectangleBox[{-0.395, 0}, {-0.385, 0}]},
{GrayLevel[0], RectangleBox[{-0.385, 0}, {-0.375, 0}]},
{GrayLevel[0], RectangleBox[{-0.375, 0}, {-0.365, 0}]},
{GrayLevel[0], RectangleBox[{-0.365, 0}, {-0.355, 0}]},
{GrayLevel[0], RectangleBox[{-0.355, 0}, {-0.345, 0}]},
{GrayLevel[0], RectangleBox[{-0.34500000000000003`, 0}, {-0.335, 0}]},
{GrayLevel[0], RectangleBox[{-0.335, 0}, {-0.325, 0}]},
{GrayLevel[0], RectangleBox[{-0.325, 0}, {-0.315, 0}]},
{GrayLevel[0], RectangleBox[{-0.315, 0}, {-0.305, 0}]},
{GrayLevel[0], RectangleBox[{-0.305, 0}, {-0.295, 0}]},
{GrayLevel[0], RectangleBox[{-0.295, 0}, {-0.285, 0}]},
{GrayLevel[0], RectangleBox[{-0.28500000000000003`, 0}, {-0.275, 0}]},
{GrayLevel[0], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{GrayLevel[0], RectangleBox[{-0.265, 0}, {-0.255, 0}]},
{GrayLevel[0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{GrayLevel[0], RectangleBox[{-0.245, 0}, {-0.235, 0}]},
{GrayLevel[0], RectangleBox[{-0.23500000000000001`, 0}, {-0.225, 0}]},
{GrayLevel[0], RectangleBox[{-0.225, 0}, {-0.215, 0}]},
{GrayLevel[0], RectangleBox[{-0.215, 0}, {-0.205, 0}]},
{GrayLevel[0], RectangleBox[{-0.20500000000000002`, 0}, {-0.195, 0}]},
{GrayLevel[0], RectangleBox[{-0.195, 0}, {-0.185, 0}]},
{GrayLevel[0], RectangleBox[{-0.185, 0}, {-0.175, 0}]},
{GrayLevel[0], RectangleBox[{-0.17500000000000002`, 0}, {-0.165, 0}]},
{GrayLevel[0], RectangleBox[{-0.165, 0}, {-0.155, 0}]},
{GrayLevel[0], RectangleBox[{-0.155, 0}, {-0.145, 0}]},
{GrayLevel[0], RectangleBox[{-0.14500000000000002`, 0}, {-0.135, 0}]},
{GrayLevel[0], RectangleBox[{-0.135, 0}, {-0.125, 0}]},
{GrayLevel[0], RectangleBox[{-0.125, 0}, {-0.11499999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{-0.115, 0}, {-0.105, 0}]},
{GrayLevel[0], RectangleBox[{-0.10500000000000001`, 0}, {-0.095, 0}]},
{GrayLevel[0], RectangleBox[{-0.095, 0}, {-0.08499999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.085, 0}, {-0.075, 0}]},
{GrayLevel[0], RectangleBox[{-0.07500000000000001, 0}, {-0.065, 0}]},
{GrayLevel[0], RectangleBox[{-0.065, 0}, {-0.055, 0}]},
{GrayLevel[0], RectangleBox[{-0.055, 0}, {-0.045000000000000005`, 0}]},
{GrayLevel[0], RectangleBox[{-0.045, 0}, {-0.035, 0}]},
{GrayLevel[0],
RectangleBox[{-0.034999999999999996`, 0}, {-0.024999999999999998`, 0}]}, \
{GrayLevel[0], RectangleBox[{-0.025, 0}, {-0.015, 0}]},
{GrayLevel[0], RectangleBox[{-0.015, 0}, {-0.005, 0}]},
{GrayLevel[0], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{GrayLevel[0], RectangleBox[{0.005, 0}, {0.015, 0}]},
{GrayLevel[0], RectangleBox[{0.015, 0}, {0.025, 0}]},
{GrayLevel[0],
RectangleBox[{0.024999999999999998`, 0}, {0.034999999999999996`, 0}]},
{GrayLevel[0], RectangleBox[{0.035, 0}, {0.045, 0}]},
{GrayLevel[0], RectangleBox[{0.045000000000000005`, 0}, {0.055, 0}]},
{GrayLevel[0], RectangleBox[{0.055, 0}, {0.065, 0}]},
{GrayLevel[0], RectangleBox[{0.065, 0}, {0.07500000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.075, 0}, {0.085, 0}]},
{GrayLevel[0], RectangleBox[{0.08499999999999999, 0}, {0.095, 0}]},
{GrayLevel[0], RectangleBox[{0.095, 0}, {0.10500000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{0.105, 0}, {0.115, 0}]},
{GrayLevel[0], RectangleBox[{0.11499999999999999`, 0}, {0.125, 0}]},
{GrayLevel[0], RectangleBox[{0.125, 0}, {0.135, 0}]},
{GrayLevel[0], RectangleBox[{0.135, 0}, {0.14500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.145, 0}, {0.155, 0}]},
{GrayLevel[0], RectangleBox[{0.155, 0}, {0.165, 0}]},
{GrayLevel[0], RectangleBox[{0.165, 0}, {0.17500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.175, 0}, {0.185, 0}]},
{GrayLevel[0], RectangleBox[{0.185, 0}, {0.195, 0}]},
{GrayLevel[0], RectangleBox[{0.195, 0}, {0.20500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.205, 0}, {0.215, 0}]},
{GrayLevel[0], RectangleBox[{0.215, 0}, {0.225, 0}]},
{GrayLevel[0], RectangleBox[{0.225, 0}, {0.23500000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{0.235, 0}, {0.245, 0}]},
{GrayLevel[0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{GrayLevel[0], RectangleBox[{0.255, 0}, {0.265, 0}]},
{GrayLevel[0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{GrayLevel[0], RectangleBox[{0.275, 0}, {0.28500000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{0.285, 0}, {0.295, 0}]},
{GrayLevel[0], RectangleBox[{0.295, 0}, {0.305, 0}]},
{GrayLevel[0], RectangleBox[{0.305, 0}, {0.315, 0}]},
{GrayLevel[0], RectangleBox[{0.315, 0}, {0.325, 0}]},
{GrayLevel[0], RectangleBox[{0.325, 0}, {0.335, 0}]},
{GrayLevel[0], RectangleBox[{0.335, 0}, {0.34500000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{0.345, 0}, {0.355, 0}]},
{GrayLevel[0], RectangleBox[{0.355, 0}, {0.365, 0}]},
{GrayLevel[0], RectangleBox[{0.365, 0}, {0.375, 0}]},
{GrayLevel[0], RectangleBox[{0.375, 0}, {0.385, 0}]},
{GrayLevel[0], RectangleBox[{0.385, 0}, {0.395, 0}]},
{GrayLevel[0], RectangleBox[{0.395, 0}, {0.405, 0}]},
{GrayLevel[0], RectangleBox[{0.40499999999999997`, 0}, {0.415, 0}]},
{GrayLevel[0], RectangleBox[{0.415, 0}, {0.425, 0}]},
{GrayLevel[0], RectangleBox[{0.425, 0}, {0.435, 0}]},
{GrayLevel[0], RectangleBox[{0.435, 0}, {0.445, 0}]},
{GrayLevel[0], RectangleBox[{0.445, 0}, {0.455, 0}]},
{GrayLevel[0], RectangleBox[{0.455, 0}, {0.465, 0}]},
{GrayLevel[0], RectangleBox[{0.46499999999999997`, 0}, {0.475, 0}]},
{GrayLevel[0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{GrayLevel[0], RectangleBox[{0.485, 0}, {0.495, 0}]},
{GrayLevel[0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{GrayLevel[0], RectangleBox[{0.505, 0}, {0.515, 0}]},
{GrayLevel[0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{GrayLevel[0], RectangleBox[{0.525, 0}, {0.535, 0}]},
{GrayLevel[0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{GrayLevel[0], RectangleBox[{0.545, 0}, {0.555, 0}]},
{GrayLevel[0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.565, 0}, {0.575, 0}]},
{GrayLevel[0], RectangleBox[{0.575, 0}, {0.585, 0}]},
{GrayLevel[0], RectangleBox[{0.585, 0}, {0.595, 0}]},
{GrayLevel[0], RectangleBox[{0.595, 0}, {0.605, 0}]},
{GrayLevel[0], RectangleBox[{0.605, 0}, {0.615, 0}]},
{GrayLevel[0], RectangleBox[{0.615, 0}, {0.625, 0}]},
{GrayLevel[0], RectangleBox[{0.625, 0}, {0.635, 0}]},
{GrayLevel[0], RectangleBox[{0.635, 0}, {0.645, 0}]},
{GrayLevel[0], RectangleBox[{0.645, 0}, {0.655, 0}]},
{GrayLevel[0], RectangleBox[{0.655, 0}, {0.665, 0}]},
{GrayLevel[0], RectangleBox[{0.665, 0}, {0.675, 0}]},
{GrayLevel[0], RectangleBox[{0.675, 0}, {0.685, 0}]},
{GrayLevel[0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{GrayLevel[0], RectangleBox[{0.695, 0}, {0.705, 0}]},
{GrayLevel[0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{GrayLevel[0], RectangleBox[{0.715, 0}, {0.725, 0}]},
{GrayLevel[0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{GrayLevel[0], RectangleBox[{0.735, 0}, {0.745, 0}]},
{GrayLevel[0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{GrayLevel[0], RectangleBox[{0.755, 0}, {0.765, 0}]},
{GrayLevel[0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{GrayLevel[0], RectangleBox[{0.775, 0}, {0.785, 0}]},
{GrayLevel[0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{GrayLevel[0], RectangleBox[{0.795, 0}, {0.805, 0}]},
{GrayLevel[0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.815, 0}, {0.825, 0}]},
{GrayLevel[0], RectangleBox[{0.825, 0}, {0.835, 0}]},
{GrayLevel[0], RectangleBox[{0.835, 0}, {0.845, 0}]},
{GrayLevel[0], RectangleBox[{0.845, 0}, {0.855, 0}]},
{GrayLevel[0], RectangleBox[{0.855, 0}, {0.865, 0}]},
{GrayLevel[0], RectangleBox[{0.865, 0}, {0.875, 0}]},
{GrayLevel[0], RectangleBox[{0.875, 0}, {0.885, 0}]},
{GrayLevel[0], RectangleBox[{0.885, 0}, {0.895, 0}]},
{GrayLevel[0], RectangleBox[{0.895, 0}, {0.905, 0}]},
{GrayLevel[0], RectangleBox[{0.905, 0}, {0.915, 0}]},
{GrayLevel[0], RectangleBox[{0.915, 0}, {0.925, 0}]},
{GrayLevel[0], RectangleBox[{0.925, 0}, {0.935, 0}]},
{GrayLevel[0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{GrayLevel[0], RectangleBox[{0.945, 0}, {0.955, 0}]},
{GrayLevel[0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{GrayLevel[0], RectangleBox[{0.965, 0}, {0.975, 0}]},
{GrayLevel[0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{GrayLevel[0], RectangleBox[{0.985, 0}, {0.995, 0}]},
{GrayLevel[0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{GrayLevel[0], RectangleBox[{1.0050000000000001`, 0}, {1.015, 0}]},
{GrayLevel[0], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{GrayLevel[0], RectangleBox[{1.0250000000000001`, 0}, {1.035, 0}]},
{GrayLevel[0], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{GrayLevel[0], RectangleBox[{1.0450000000000002`, 0}, {1.055, 0}]},
{GrayLevel[0], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{GrayLevel[0], RectangleBox[{1.0650000000000002`, 0}, {1.075, 0}]},
{GrayLevel[0], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{GrayLevel[0], RectangleBox[{1.0850000000000002`, 0}, {1.095, 0}]},
{GrayLevel[0], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{GrayLevel[0], RectangleBox[{1.1050000000000002`, 0}, {1.115, 0}]},
{GrayLevel[0], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{GrayLevel[0], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.135, 0}, {1.1449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.155, 0}, {1.1649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.175, 0}, {1.1849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.195, 0}, {1.2049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.215, 0}, {1.2249999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.235, 0}, {1.2449999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{GrayLevel[0], RectangleBox[{1.2550000000000001`, 0}, {1.265, 0}]},
{GrayLevel[0], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{GrayLevel[0], RectangleBox[{1.2750000000000001`, 0}, {1.285, 0}]},
{GrayLevel[0], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{GrayLevel[0], RectangleBox[{1.2950000000000002`, 0}, {1.305, 0}]},
{GrayLevel[0], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{GrayLevel[0], RectangleBox[{1.3150000000000002`, 0}, {1.325, 0}]},
{GrayLevel[0], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{GrayLevel[0], RectangleBox[{1.3350000000000002`, 0}, {1.345, 0}]},
{GrayLevel[0], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{GrayLevel[0], RectangleBox[{1.3550000000000002`, 0}, {1.365, 0}]},
{GrayLevel[0], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{GrayLevel[0], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.385, 0}, {1.3949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.405, 0}, {1.4149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.425, 0}, {1.4349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.445, 0}, {1.4549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.465, 0}, {1.4749999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.485, 0}, {1.4949999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{GrayLevel[0], RectangleBox[{1.5050000000000001`, 0}, {1.515, 0}]},
{GrayLevel[0], RectangleBox[{1.5150000000000001`, 0}, {1.525, 0}]},
{GrayLevel[0], RectangleBox[{1.5250000000000001`, 0}, {1.535, 0}]},
{GrayLevel[0], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{GrayLevel[0], RectangleBox[{1.5450000000000002`, 0}, {1.555, 0}]},
{GrayLevel[0], RectangleBox[{1.5550000000000002`, 0}, {1.565, 0}]},
{GrayLevel[0], RectangleBox[{1.5650000000000002`, 0}, {1.575, 0}]},
{GrayLevel[0], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{GrayLevel[0], RectangleBox[{1.5850000000000002`, 0}, {1.595, 0}]},
{GrayLevel[0], RectangleBox[{1.5950000000000002`, 0}, {1.605, 0}]},
{GrayLevel[0], RectangleBox[{1.6050000000000002`, 0}, {1.615, 0}]},
{GrayLevel[0], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{GrayLevel[0], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.635, 0}, {1.6449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.645, 0}, {1.6549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.655, 0}, {1.6649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.675, 0}, {1.6849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.685, 0}, {1.6949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.695, 0}, {1.7049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.715, 0}, {1.7249999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.725, 0}, {1.7349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.735, 0}, {1.7449999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{GrayLevel[0], RectangleBox[{1.7550000000000001`, 0}, {1.765, 0}]},
{GrayLevel[0], RectangleBox[{1.7650000000000001`, 0}, {1.775, 0}]},
{GrayLevel[0], RectangleBox[{1.7750000000000001`, 0}, {1.785, 0}]},
{GrayLevel[0], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{GrayLevel[0], RectangleBox[{1.7950000000000002`, 0}, {1.805, 0}]},
{GrayLevel[0], RectangleBox[{1.8050000000000002`, 0}, {1.815, 0}]},
{GrayLevel[0], RectangleBox[{1.8150000000000002`, 0}, {1.825, 0}]},
{GrayLevel[0], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{GrayLevel[0], RectangleBox[{1.8350000000000002`, 0}, {1.845, 0}]},
{GrayLevel[0], RectangleBox[{1.8450000000000002`, 0}, {1.855, 0}]},
{GrayLevel[0], RectangleBox[{1.8550000000000002`, 0}, {1.865, 0}]},
{GrayLevel[0], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{GrayLevel[0], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.885, 0}, {1.8949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.895, 0}, {1.9049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.905, 0}, {1.9149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.925, 0}, {1.9349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.935, 0}, {1.9449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.945, 0}, {1.9549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.965, 0}, {1.9749999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.975, 0}, {1.9849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.985, 0}, {1.9949999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.995, 0}, {2.005, 0}]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->{True, False},
AxesOrigin->{0, 0},
PlotRange->{{-2, 2}, Automatic},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{
3.66257949156072*^9, {3.66258021143362*^9, 3.662580221084853*^9},
3.66258047736412*^9, 3.662580807124124*^9, 3.66259781203299*^9,
3.6625980198997602`*^9, {3.662598094146122*^9, 3.6625981022455893`*^9},
3.662598164534665*^9, 3.662598239740546*^9, {3.662937812573144*^9,
3.662937829201747*^9}, 3.6638092248229713`*^9, 3.6638519324735327`*^9}]
}, Open ]],
Cell["\<\
From the ESS calculations:
{u1\[Rule]-0.66482,Km\[Rule]7816.38}\
\>", "Text",
CellChangeTimes->{{3.6625831016188927`*^9, 3.662583129434276*^9},
3.6625832301909657`*^9, 3.662587879844906*^9, 3.662588322881942*^9,
3.662598068763547*^9}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[",
RowBox[{"histoplot", ",", "competitionplot", ",", "\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.66482"}], ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.66482"}], ",", "maxheight"}], "}"}]}], "}"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Black", ",", "Thin"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",", "u", ",", "tryKm"}],
"]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2"}], ",", "2"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Thick", ",", "Black"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Axes", "\[Rule]",
RowBox[{"{",
RowBox[{"True", ",", "False"}], "}"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.6625981710969687`*^9, 3.6625981892162952`*^9}}],
Cell[BoxData[
GraphicsBox[{
{GrayLevel[0], EdgeForm[GrayLevel[0]],
{GrayLevel[0], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{GrayLevel[0], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{GrayLevel[0], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{GrayLevel[0], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{GrayLevel[0], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{GrayLevel[0], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{GrayLevel[0], RectangleBox[{-1.9349999999999998`, 0}, {-1.925, 0}]},
{GrayLevel[0], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{GrayLevel[0], RectangleBox[{-1.9149999999999998`, 0}, {-1.905, 0}]},
{GrayLevel[0], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{GrayLevel[0], RectangleBox[{-1.8949999999999998`, 0}, {-1.885, 0}]},
{GrayLevel[0], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{GrayLevel[0], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.865, 0}, {-1.8550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.845, 0}, {-1.8350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.825, 0}, {-1.8150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{GrayLevel[0], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{GrayLevel[0], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{GrayLevel[0], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{GrayLevel[0], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{GrayLevel[0], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{GrayLevel[0], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{GrayLevel[0], RectangleBox[{-1.6849999999999998`, 0}, {-1.675, 0}]},
{GrayLevel[0], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{GrayLevel[0], RectangleBox[{-1.6649999999999998`, 0}, {-1.655, 0}]},
{GrayLevel[0], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{GrayLevel[0], RectangleBox[{-1.6449999999999998`, 0}, {-1.635, 0}]},
{GrayLevel[0], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{GrayLevel[0], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.615, 0}, {-1.6050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.595, 0}, {-1.5850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.575, 0}, {-1.5650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{GrayLevel[0], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{GrayLevel[0], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{GrayLevel[0], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{GrayLevel[0], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{GrayLevel[0], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{GrayLevel[0], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{GrayLevel[0], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{GrayLevel[0], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{GrayLevel[0], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{GrayLevel[0], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{GrayLevel[0], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{GrayLevel[0], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{GrayLevel[0], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{GrayLevel[0], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{GrayLevel[0], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{GrayLevel[0], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{GrayLevel[0], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{GrayLevel[0], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{GrayLevel[0], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{GrayLevel[0], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{GrayLevel[0], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{GrayLevel[0], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{GrayLevel[0], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{GrayLevel[0], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{GrayLevel[0], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{GrayLevel[0], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{GrayLevel[0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{GrayLevel[0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{GrayLevel[0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{GrayLevel[0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{GrayLevel[0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{GrayLevel[0], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.935, 0}, {-0.925, 0}]},
{GrayLevel[0], RectangleBox[{-0.925, 0}, {-0.915, 0}]},
{GrayLevel[0], RectangleBox[{-0.915, 0}, {-0.905, 0}]},
{GrayLevel[0], RectangleBox[{-0.905, 0}, {-0.895, 0}]},
{GrayLevel[0], RectangleBox[{-0.895, 0}, {-0.885, 0}]},
{GrayLevel[0], RectangleBox[{-0.885, 0}, {-0.875, 0}]},
{GrayLevel[0], RectangleBox[{-0.875, 0}, {-0.865, 0}]},
{GrayLevel[0], RectangleBox[{-0.865, 0}, {-0.855, 0}]},
{GrayLevel[0], RectangleBox[{-0.855, 0}, {-0.845, 0}]},
{GrayLevel[0], RectangleBox[{-0.845, 0}, {-0.835, 0}]},
{GrayLevel[0], RectangleBox[{-0.835, 0}, {-0.825, 0}]},
{GrayLevel[0], RectangleBox[{-0.825, 0}, {-0.815, 0}]},
{GrayLevel[0], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{GrayLevel[0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{GrayLevel[0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{GrayLevel[0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{GrayLevel[0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{GrayLevel[0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{GrayLevel[0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{GrayLevel[0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{GrayLevel[0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{GrayLevel[0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{GrayLevel[0], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{GrayLevel[0], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{GrayLevel[0], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 16}]},
{GrayLevel[0], RectangleBox[{-0.685, 0}, {-0.675, 124}]},
{GrayLevel[0], RectangleBox[{-0.675, 0}, {-0.665, 322}]},
{GrayLevel[0], RectangleBox[{-0.665, 0}, {-0.655, 728}]},
{GrayLevel[0], RectangleBox[{-0.655, 0}, {-0.645, 725}]},
{GrayLevel[0], RectangleBox[{-0.645, 0}, {-0.635, 456}]},
{GrayLevel[0], RectangleBox[{-0.635, 0}, {-0.625, 110}]},
{GrayLevel[0], RectangleBox[{-0.625, 0}, {-0.615, 16}]},
{GrayLevel[0], RectangleBox[{-0.615, 0}, {-0.605, 1}]},
{GrayLevel[0], RectangleBox[{-0.605, 0}, {-0.595, 0}]},
{GrayLevel[0], RectangleBox[{-0.595, 0}, {-0.585, 0}]},
{GrayLevel[0], RectangleBox[{-0.585, 0}, {-0.575, 0}]},
{GrayLevel[0], RectangleBox[{-0.575, 0}, {-0.565, 0}]},
{GrayLevel[0], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{GrayLevel[0], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{GrayLevel[0], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{GrayLevel[0], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{GrayLevel[0], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{GrayLevel[0], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{GrayLevel[0], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{GrayLevel[0], RectangleBox[{-0.495, 0}, {-0.485, 0}]},
{GrayLevel[0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{GrayLevel[0], RectangleBox[{-0.475, 0}, {-0.46499999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{-0.465, 0}, {-0.455, 0}]},
{GrayLevel[0], RectangleBox[{-0.455, 0}, {-0.445, 0}]},
{GrayLevel[0], RectangleBox[{-0.445, 0}, {-0.435, 0}]},
{GrayLevel[0], RectangleBox[{-0.435, 0}, {-0.425, 0}]},
{GrayLevel[0], RectangleBox[{-0.425, 0}, {-0.415, 0}]},
{GrayLevel[0], RectangleBox[{-0.415, 0}, {-0.40499999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{-0.405, 0}, {-0.395, 0}]},
{GrayLevel[0], RectangleBox[{-0.395, 0}, {-0.385, 0}]},
{GrayLevel[0], RectangleBox[{-0.385, 0}, {-0.375, 0}]},
{GrayLevel[0], RectangleBox[{-0.375, 0}, {-0.365, 0}]},
{GrayLevel[0], RectangleBox[{-0.365, 0}, {-0.355, 0}]},
{GrayLevel[0], RectangleBox[{-0.355, 0}, {-0.345, 0}]},
{GrayLevel[0], RectangleBox[{-0.34500000000000003`, 0}, {-0.335, 0}]},
{GrayLevel[0], RectangleBox[{-0.335, 0}, {-0.325, 0}]},
{GrayLevel[0], RectangleBox[{-0.325, 0}, {-0.315, 0}]},
{GrayLevel[0], RectangleBox[{-0.315, 0}, {-0.305, 0}]},
{GrayLevel[0], RectangleBox[{-0.305, 0}, {-0.295, 0}]},
{GrayLevel[0], RectangleBox[{-0.295, 0}, {-0.285, 0}]},
{GrayLevel[0], RectangleBox[{-0.28500000000000003`, 0}, {-0.275, 0}]},
{GrayLevel[0], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{GrayLevel[0], RectangleBox[{-0.265, 0}, {-0.255, 0}]},
{GrayLevel[0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{GrayLevel[0], RectangleBox[{-0.245, 0}, {-0.235, 0}]},
{GrayLevel[0], RectangleBox[{-0.23500000000000001`, 0}, {-0.225, 0}]},
{GrayLevel[0], RectangleBox[{-0.225, 0}, {-0.215, 0}]},
{GrayLevel[0], RectangleBox[{-0.215, 0}, {-0.205, 0}]},
{GrayLevel[0], RectangleBox[{-0.20500000000000002`, 0}, {-0.195, 0}]},
{GrayLevel[0], RectangleBox[{-0.195, 0}, {-0.185, 0}]},
{GrayLevel[0], RectangleBox[{-0.185, 0}, {-0.175, 0}]},
{GrayLevel[0], RectangleBox[{-0.17500000000000002`, 0}, {-0.165, 0}]},
{GrayLevel[0], RectangleBox[{-0.165, 0}, {-0.155, 0}]},
{GrayLevel[0], RectangleBox[{-0.155, 0}, {-0.145, 0}]},
{GrayLevel[0], RectangleBox[{-0.14500000000000002`, 0}, {-0.135, 0}]},
{GrayLevel[0], RectangleBox[{-0.135, 0}, {-0.125, 0}]},
{GrayLevel[0], RectangleBox[{-0.125, 0}, {-0.11499999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{-0.115, 0}, {-0.105, 0}]},
{GrayLevel[0], RectangleBox[{-0.10500000000000001`, 0}, {-0.095, 0}]},
{GrayLevel[0], RectangleBox[{-0.095, 0}, {-0.08499999999999999, 0}]},
{GrayLevel[0], RectangleBox[{-0.085, 0}, {-0.075, 0}]},
{GrayLevel[0], RectangleBox[{-0.07500000000000001, 0}, {-0.065, 0}]},
{GrayLevel[0], RectangleBox[{-0.065, 0}, {-0.055, 0}]},
{GrayLevel[0], RectangleBox[{-0.055, 0}, {-0.045000000000000005`, 0}]},
{GrayLevel[0], RectangleBox[{-0.045, 0}, {-0.035, 0}]},
{GrayLevel[0],
RectangleBox[{-0.034999999999999996`, 0}, {-0.024999999999999998`, 0}]}, \
{GrayLevel[0], RectangleBox[{-0.025, 0}, {-0.015, 0}]},
{GrayLevel[0], RectangleBox[{-0.015, 0}, {-0.005, 0}]},
{GrayLevel[0], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{GrayLevel[0], RectangleBox[{0.005, 0}, {0.015, 0}]},
{GrayLevel[0], RectangleBox[{0.015, 0}, {0.025, 0}]},
{GrayLevel[0],
RectangleBox[{0.024999999999999998`, 0}, {0.034999999999999996`, 0}]},
{GrayLevel[0], RectangleBox[{0.035, 0}, {0.045, 0}]},
{GrayLevel[0], RectangleBox[{0.045000000000000005`, 0}, {0.055, 0}]},
{GrayLevel[0], RectangleBox[{0.055, 0}, {0.065, 0}]},
{GrayLevel[0], RectangleBox[{0.065, 0}, {0.07500000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.075, 0}, {0.085, 0}]},
{GrayLevel[0], RectangleBox[{0.08499999999999999, 0}, {0.095, 0}]},
{GrayLevel[0], RectangleBox[{0.095, 0}, {0.10500000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{0.105, 0}, {0.115, 0}]},
{GrayLevel[0], RectangleBox[{0.11499999999999999`, 0}, {0.125, 0}]},
{GrayLevel[0], RectangleBox[{0.125, 0}, {0.135, 0}]},
{GrayLevel[0], RectangleBox[{0.135, 0}, {0.14500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.145, 0}, {0.155, 0}]},
{GrayLevel[0], RectangleBox[{0.155, 0}, {0.165, 0}]},
{GrayLevel[0], RectangleBox[{0.165, 0}, {0.17500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.175, 0}, {0.185, 0}]},
{GrayLevel[0], RectangleBox[{0.185, 0}, {0.195, 0}]},
{GrayLevel[0], RectangleBox[{0.195, 0}, {0.20500000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{0.205, 0}, {0.215, 0}]},
{GrayLevel[0], RectangleBox[{0.215, 0}, {0.225, 0}]},
{GrayLevel[0], RectangleBox[{0.225, 0}, {0.23500000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{0.235, 0}, {0.245, 0}]},
{GrayLevel[0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{GrayLevel[0], RectangleBox[{0.255, 0}, {0.265, 0}]},
{GrayLevel[0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{GrayLevel[0], RectangleBox[{0.275, 0}, {0.28500000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{0.285, 0}, {0.295, 0}]},
{GrayLevel[0], RectangleBox[{0.295, 0}, {0.305, 0}]},
{GrayLevel[0], RectangleBox[{0.305, 0}, {0.315, 0}]},
{GrayLevel[0], RectangleBox[{0.315, 0}, {0.325, 0}]},
{GrayLevel[0], RectangleBox[{0.325, 0}, {0.335, 0}]},
{GrayLevel[0], RectangleBox[{0.335, 0}, {0.34500000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{0.345, 0}, {0.355, 0}]},
{GrayLevel[0], RectangleBox[{0.355, 0}, {0.365, 0}]},
{GrayLevel[0], RectangleBox[{0.365, 0}, {0.375, 0}]},
{GrayLevel[0], RectangleBox[{0.375, 0}, {0.385, 0}]},
{GrayLevel[0], RectangleBox[{0.385, 0}, {0.395, 0}]},
{GrayLevel[0], RectangleBox[{0.395, 0}, {0.405, 0}]},
{GrayLevel[0], RectangleBox[{0.40499999999999997`, 0}, {0.415, 0}]},
{GrayLevel[0], RectangleBox[{0.415, 0}, {0.425, 0}]},
{GrayLevel[0], RectangleBox[{0.425, 0}, {0.435, 0}]},
{GrayLevel[0], RectangleBox[{0.435, 0}, {0.445, 0}]},
{GrayLevel[0], RectangleBox[{0.445, 0}, {0.455, 0}]},
{GrayLevel[0], RectangleBox[{0.455, 0}, {0.465, 0}]},
{GrayLevel[0], RectangleBox[{0.46499999999999997`, 0}, {0.475, 0}]},
{GrayLevel[0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{GrayLevel[0], RectangleBox[{0.485, 0}, {0.495, 0}]},
{GrayLevel[0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{GrayLevel[0], RectangleBox[{0.505, 0}, {0.515, 0}]},
{GrayLevel[0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{GrayLevel[0], RectangleBox[{0.525, 0}, {0.535, 0}]},
{GrayLevel[0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{GrayLevel[0], RectangleBox[{0.545, 0}, {0.555, 0}]},
{GrayLevel[0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.565, 0}, {0.575, 0}]},
{GrayLevel[0], RectangleBox[{0.575, 0}, {0.585, 0}]},
{GrayLevel[0], RectangleBox[{0.585, 0}, {0.595, 0}]},
{GrayLevel[0], RectangleBox[{0.595, 0}, {0.605, 0}]},
{GrayLevel[0], RectangleBox[{0.605, 0}, {0.615, 0}]},
{GrayLevel[0], RectangleBox[{0.615, 0}, {0.625, 0}]},
{GrayLevel[0], RectangleBox[{0.625, 0}, {0.635, 0}]},
{GrayLevel[0], RectangleBox[{0.635, 0}, {0.645, 0}]},
{GrayLevel[0], RectangleBox[{0.645, 0}, {0.655, 0}]},
{GrayLevel[0], RectangleBox[{0.655, 0}, {0.665, 0}]},
{GrayLevel[0], RectangleBox[{0.665, 0}, {0.675, 0}]},
{GrayLevel[0], RectangleBox[{0.675, 0}, {0.685, 0}]},
{GrayLevel[0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{GrayLevel[0], RectangleBox[{0.695, 0}, {0.705, 0}]},
{GrayLevel[0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{GrayLevel[0], RectangleBox[{0.715, 0}, {0.725, 0}]},
{GrayLevel[0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{GrayLevel[0], RectangleBox[{0.735, 0}, {0.745, 0}]},
{GrayLevel[0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{GrayLevel[0], RectangleBox[{0.755, 0}, {0.765, 0}]},
{GrayLevel[0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{GrayLevel[0], RectangleBox[{0.775, 0}, {0.785, 0}]},
{GrayLevel[0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{GrayLevel[0], RectangleBox[{0.795, 0}, {0.805, 0}]},
{GrayLevel[0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{GrayLevel[0], RectangleBox[{0.815, 0}, {0.825, 0}]},
{GrayLevel[0], RectangleBox[{0.825, 0}, {0.835, 0}]},
{GrayLevel[0], RectangleBox[{0.835, 0}, {0.845, 0}]},
{GrayLevel[0], RectangleBox[{0.845, 0}, {0.855, 0}]},
{GrayLevel[0], RectangleBox[{0.855, 0}, {0.865, 0}]},
{GrayLevel[0], RectangleBox[{0.865, 0}, {0.875, 0}]},
{GrayLevel[0], RectangleBox[{0.875, 0}, {0.885, 0}]},
{GrayLevel[0], RectangleBox[{0.885, 0}, {0.895, 0}]},
{GrayLevel[0], RectangleBox[{0.895, 0}, {0.905, 0}]},
{GrayLevel[0], RectangleBox[{0.905, 0}, {0.915, 0}]},
{GrayLevel[0], RectangleBox[{0.915, 0}, {0.925, 0}]},
{GrayLevel[0], RectangleBox[{0.925, 0}, {0.935, 0}]},
{GrayLevel[0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{GrayLevel[0], RectangleBox[{0.945, 0}, {0.955, 0}]},
{GrayLevel[0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{GrayLevel[0], RectangleBox[{0.965, 0}, {0.975, 0}]},
{GrayLevel[0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{GrayLevel[0], RectangleBox[{0.985, 0}, {0.995, 0}]},
{GrayLevel[0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{GrayLevel[0], RectangleBox[{1.0050000000000001`, 0}, {1.015, 0}]},
{GrayLevel[0], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{GrayLevel[0], RectangleBox[{1.0250000000000001`, 0}, {1.035, 0}]},
{GrayLevel[0], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{GrayLevel[0], RectangleBox[{1.0450000000000002`, 0}, {1.055, 0}]},
{GrayLevel[0], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{GrayLevel[0], RectangleBox[{1.0650000000000002`, 0}, {1.075, 0}]},
{GrayLevel[0], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{GrayLevel[0], RectangleBox[{1.0850000000000002`, 0}, {1.095, 0}]},
{GrayLevel[0], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{GrayLevel[0], RectangleBox[{1.1050000000000002`, 0}, {1.115, 0}]},
{GrayLevel[0], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{GrayLevel[0], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.135, 0}, {1.1449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.155, 0}, {1.1649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.175, 0}, {1.1849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.195, 0}, {1.2049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.215, 0}, {1.2249999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.235, 0}, {1.2449999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{GrayLevel[0], RectangleBox[{1.2550000000000001`, 0}, {1.265, 0}]},
{GrayLevel[0], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{GrayLevel[0], RectangleBox[{1.2750000000000001`, 0}, {1.285, 0}]},
{GrayLevel[0], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{GrayLevel[0], RectangleBox[{1.2950000000000002`, 0}, {1.305, 0}]},
{GrayLevel[0], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{GrayLevel[0], RectangleBox[{1.3150000000000002`, 0}, {1.325, 0}]},
{GrayLevel[0], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{GrayLevel[0], RectangleBox[{1.3350000000000002`, 0}, {1.345, 0}]},
{GrayLevel[0], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{GrayLevel[0], RectangleBox[{1.3550000000000002`, 0}, {1.365, 0}]},
{GrayLevel[0], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{GrayLevel[0], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.385, 0}, {1.3949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.405, 0}, {1.4149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.425, 0}, {1.4349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.445, 0}, {1.4549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.465, 0}, {1.4749999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.485, 0}, {1.4949999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{GrayLevel[0], RectangleBox[{1.5050000000000001`, 0}, {1.515, 0}]},
{GrayLevel[0], RectangleBox[{1.5150000000000001`, 0}, {1.525, 0}]},
{GrayLevel[0], RectangleBox[{1.5250000000000001`, 0}, {1.535, 0}]},
{GrayLevel[0], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{GrayLevel[0], RectangleBox[{1.5450000000000002`, 0}, {1.555, 0}]},
{GrayLevel[0], RectangleBox[{1.5550000000000002`, 0}, {1.565, 0}]},
{GrayLevel[0], RectangleBox[{1.5650000000000002`, 0}, {1.575, 0}]},
{GrayLevel[0], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{GrayLevel[0], RectangleBox[{1.5850000000000002`, 0}, {1.595, 0}]},
{GrayLevel[0], RectangleBox[{1.5950000000000002`, 0}, {1.605, 0}]},
{GrayLevel[0], RectangleBox[{1.6050000000000002`, 0}, {1.615, 0}]},
{GrayLevel[0], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{GrayLevel[0], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.635, 0}, {1.6449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.645, 0}, {1.6549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.655, 0}, {1.6649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.675, 0}, {1.6849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.685, 0}, {1.6949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.695, 0}, {1.7049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.715, 0}, {1.7249999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.725, 0}, {1.7349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.735, 0}, {1.7449999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{GrayLevel[0], RectangleBox[{1.7550000000000001`, 0}, {1.765, 0}]},
{GrayLevel[0], RectangleBox[{1.7650000000000001`, 0}, {1.775, 0}]},
{GrayLevel[0], RectangleBox[{1.7750000000000001`, 0}, {1.785, 0}]},
{GrayLevel[0], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{GrayLevel[0], RectangleBox[{1.7950000000000002`, 0}, {1.805, 0}]},
{GrayLevel[0], RectangleBox[{1.8050000000000002`, 0}, {1.815, 0}]},
{GrayLevel[0], RectangleBox[{1.8150000000000002`, 0}, {1.825, 0}]},
{GrayLevel[0], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{GrayLevel[0], RectangleBox[{1.8350000000000002`, 0}, {1.845, 0}]},
{GrayLevel[0], RectangleBox[{1.8450000000000002`, 0}, {1.855, 0}]},
{GrayLevel[0], RectangleBox[{1.8550000000000002`, 0}, {1.865, 0}]},
{GrayLevel[0], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{GrayLevel[0], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.885, 0}, {1.8949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.895, 0}, {1.9049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.905, 0}, {1.9149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.925, 0}, {1.9349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.935, 0}, {1.9449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.945, 0}, {1.9549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.965, 0}, {1.9749999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.975, 0}, {1.9849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.985, 0}, {1.9949999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.995, 0}, {2.005, 0}]}}, {{}, {},
{GrayLevel[0], Thickness[Tiny], Dashing[{0, Small}],
LineBox[CompressedData["
1:eJwt13k0Vfv7B3BpMJVQkmSIEhKKFNLnoURmUo6bwtVVF6EUuQlpOgeVTCXH
UIdztgbzTD6mkzkzZUjGNB0kmcr57e9avz/22uu11mftvdfez/N+Pnvb3962
//Dy8PBMksf/zmpo0xcul4tL7O0M59eGg/eCAnVhkYv57xy0sNgQDlm5exRn
ZrlYOpFqkioZDnuVLP4e/8rFA2IDYhTFcNgvequ3qYeLjzb68vegcICR6Yb4
TC5er1rFp+kbDrZ3m19oOnFxjK3z8Lm+cPBvuXXhXPkyPvAgZeRzdgR0dgp9
qXT5gzl6DmOUlPsgXeG9cf/W33goOOT2v6aRkO9Rs3r9wCLeud1D4fzxh+Ac
sWfqfegC1vztfSo8LArmo65RMZrHpku0PZk10cAQ/iD5eOgXjguMMkrVigW6
6Z5LHbRZ/PCFG79saRyEerpcVT72E+9bEIs8ZfgYrq187n/p+w88nOby04v/
CbiEtGzvJqbxv/8MGE03JkDs67HHdPcpnJV2JUAyORFKBpXWvpTnYDpt9HdI
TjIoiIChXdJXbDG1IyewNwVyVKjuwyMTmPddakDv3FMYZGfLaWuPYw/HnHC6
KAPGVGP34oIRXDaVdWrrxlQQDUrXVlsxhBOe7Oc5LJcGqtqTqmkz/VilDfq3
8DHBTS04uHigH5veXpHVLMiEZMX17c21/fgH+96tIGEmiEmo+/9K6MfjMTd3
9IozYW7Oq9L4SD/+FAJ/rm5nQlUx58SXmD7sZShbaGvABIo+J0hduxfzDF/8
5RrAhJtHvrcWX+3BQgeKvnoMk+tNvllpufZg+Q/iQ9fGmMBj8fVthkUPVjZY
b0qbYELgic9NDPkefNLT6QKdwwQ/t7G6e03duN3+SiFjkQnnqQMVLnLd2Chj
zlxLjAXmTc1ZAnWdeN0BxkkLxIKw1ib1WzmdeO9cGOIzZEFdZ2PGMr0T3615
ZFt+hAVGA/UvZy52YlmKGUfBlAWHOGxiQKoT10vQy5vsWKAhUp6S7d2B/cyV
+qP+ZYG4XUakg0Q79jyFdw9HsiBHMbzEaGU71jSZ6doYzQLrhXOjeybbsPax
941HYsn7J207IFhL+qTxE3o8C5YnYgZL/NowsbErZtczFoxfv6a2tbsV5+Zq
J7NzWOBl9fDxa+UWnNHVeXywjQXET9NvsStacFZ/clZRBwuG41eB1/u3WCs0
ReVBFwtOjvp/kqG9xZEo3UfzPQtQwBntkIlmbOYiIuPwkQUijF2dhqwmnDlj
8FaCQz7vL/b6uu0N+GNcoqcDHwH3nz+rOrRQj++N2MTP8BPgcSb4Sn5zPX40
r7cnTJCA7W8O9D3zq8eeYX30l+sIiIt9wbxeV4fLNm3We7OBgP+0HupretZi
B9ZGRzNZAk5OXJhKh1q8tsst+oUcAZp0U4aceC1Wurkkyy9PwLeVqwSEy99g
5tkBzYLtBJzp8OucWP8GB4W/VRhXJsDwkqNHUm4Nfu1wQTJGkwAZRR0ZcWoN
do0c2FCsRcDSe/G2cMcanOj51rp3HwF5Bi3aAatr8M302XuiBwhQFDXktbOv
xgYlPvO2BwngZcvkN+yqxmKKY58d9AkYvLp0zoCnGrsnF4ufPkTA4495zWrp
VVjkfO5mChAgmLUzXmCpEh8L4smRO0LAuOsq85CWSnyQ5usoYERAtcTQ8i9G
JX4uxqvLIR0Y/OTsqHkl3p4oGv7SmACO5ToNnFSBaSmyXkumBKT1jd37fKsc
t09XRAxZE9AbuCk5UbMc09zU62/YECAsY5xlM/wat0lqvJCxJcDPmWgvRq+x
+/Wh05bHCTg65i4RtliKiePePrdPkO/7ToLSofRSPJ5c2yh4koCMnU06P+xL
8QHvb3URpCXcdzv+lV+C1U9+Z96xJ2CCM5mi4lOMH15JHbdxIGBrpFzOB5li
HP9kh1EZaes9NtVRzUV4PXIyVPiLgCLfnLFFlSK8YSdL4hPpbxtHfmW8L8SW
f0QnD58iQK5gA78rtRCXXOO4JpKmzV9WaRwrwHdvdG4/6khAeXyaXnBMAZ7c
auMTS/qHbre55uECzKDuoAyR/uv6fu+ElHw89rt3yes0WX8y50OsrPIx9aVR
YRbpKvz44crlPCzxn5TwJGkV3sVcj1N5OLJb957LGbJeGCpsWcE8/Dhje34s
6agjp7o7inKxnnaJ/xvSb8bCP909l4vbWe2dM6QX75TN623Kxf0bTJqknQhQ
U/ouMFWTgyud504fIf13vbRUqm8OHjKvoJ0jHeduqUqRz8ELnret7pJuFArW
X9uWjTt2qWYySPO8yrSsCM7GGm/pRBlpLcuPTpfVsrGQd5VeO+nzkyIXlQay
sOGK8POjpOmRBqH94Vn4sNUntRnSrXsuRUfqZuG8Pw33l0nzM42O0doz8b67
qtQ1zgT4TDA9ptUzcQVaLSVE+p0K/32HexkYHbcxXksaLvybVfnlFWa/Wb9O
kDSR2dCubPIKf/Mz9FxFWuTHrtmHaS9x0WbO2SXy+gFa9yQWeV/iSt0tcxzS
w34cnb+dX2Azwzb5QdKmxVaODa+fY0cvuYlG0jlLWUF7pUh3Shjnk95ySOzp
k6vp2MS1ASWQDg3xrebtJvCBIYv266S/VnWOuWsSuORrybIjabvV2vwdkSws
PK/KPkC6zPiRih6HiR/ZVu0QJb09bN6cYcbEcrJ0uXHy+0Q0OXgLpafhU/Yf
8gtJn7bZmtfnmopH5XWzrEl/m5nVuVLDwP3qcbqSpAPjWrDwDgZWetV64wNZ
H/S+0EaD8adY3SLF2Im0apCjTd/Rp5j3acKbLaRL5bR7LrNScE6dwcoOsv7y
GtvZVm1JOPuVf4EO6U6RO22hUYm44Hro7gmynmdO6AzkH6fj4SNqrtGk935M
/inVHY+dQ68JfST7IfOnp8JEbwzWyFhBsSX7562OnLoUPRqvnN3UNE4h+z+o
Q9fydBTmP6S94ippitjl1PP4Ad50fz4zkuzH43rCvCvqb2PlgFHlBLKfo9iX
Jc+Z3cTnhCOzxEm3WvVpNDeH4NQVdksRdgQk1FnjvWn+OPpH/4eLZB6EdCp1
SlVb4Ma7tC8byfxQXT/gvnq3FophBCZdIfOlezo0WWSeghwO627psCLgWvTR
Bg8tH7TGUcbjliWZX3K0u4kioajHnXKjwoyAW3HyPvvv30IdFMdQPtJH15ZR
2oTuIspwkJUZmV91cxzl1XwRyM03wLrehIBz51TcCpaj0H764eUkMv9M5P3/
uqkfg4a/K19sIvNSaaDa0jowFllVyOf/OkzAF9vT+78sPEJdb37mGBgS4Hko
kl9mlo6m4wzis8n8LRa81lV1hYGu5+ZkL2gTkLJbvCNTPhVRT7Ye/EDm+x3r
zFZ6SyrSXijdhMn8t4sbafRTZqI6Z+XSK3sJmNpmXqUyQKA77iajBbvJ/NeR
zow6koG+M+5n0xQIWOtY+DJ4OgNF1Xi+0iTnz0yQzXPPpEzk8R8S7CXnk/Nw
la1CYBYaPVj6VUrmf/kwZ/GnKxttzLx98fJmAupznY5k0/JQ+Ih+RsBaAg6y
Vat3fsxDwR1Ddl/I+ZjVvWCQpJ2PPEbKL9oLkPmxEE2uzUf8Gh827FxDwFlU
p/uPfiEqmjsvT+eygNugsUdyuhj9K99R+GGaBfuGV8jcoGAUG2zX0krOd7US
+2mNdIy2cHjOzJLzXzHqVc3HBYw4JaarJFpZIPT05b4Uiwp0stAv0aaJBb+t
Kf1cTgWyF+hTSa1hwUBWpjLeU4U2K+z7g/NYkOxzpka/sAZZSZocGIhiAd1R
ICN2sAbZUnrTWOT+5bFJ3qPvfGzUc8nL0fs+CyLlBD0SKWwkPrT/xS8aC0Ja
80X/LLCRb9D4n9EQFrhorHMqO1iLXJdMpg28WKAwVbqgW1WPfDYK7hQwZkFg
8+FbP7/XI2Mv46Bj5P6q+3mjcIZkA+pZjBu/Y0Duh/7pU9h2sQF52eXOzOux
YKp30YJPrhG1qysZlGiwoJyt86zjehMKmdMrypVkwV8JhaaeOi0o7dOWvqjP
TDjGeN9sSWlH/w1O8UTcYIKRhdjK2fweFCqgNuuTkAYPnHpCNAr7kVKDS/i2
V6lQaym9zlpsCBmc1TZfiGfA923iQe1PRhBBGxfiefgMrlze5fJg0zhyzhku
yAx/Cj39IrZudRNopk5Zuss3BZwDDn7iM/+K9C77+e79lgTVu/aHVa/moNWK
bBHffjooCpRNpJpMobLdc1uD+RNAuszDaDV1Gm2WSnm01T4eeBZ50y8N/0D5
aT13ApMewZzN6zPsHT9Rz/ls0d8ycdCn5SS149YsmljylF+gx4CPvYiofP8v
VD/qa1F+KBokY0Ypq6TnUeRVFSFnkSjIOJXCmrm6gKKce0svDEWCvX6wSd3r
ReSQ7ZbWVfQAss9ckNf9vYTuMj0jVg3eg3nBwyuLT/xBdfHH1mivigDbNj1t
6cfLiO1aj6U8wkBQT6iyLHEZVaUqW6OzYVCZ2mvmyFhGu95N7v/ndBhoXA1w
SchYRtP9GoJFVmEgLFsYIcleRnqWO58GaIVBvefeEfEfy6jY4m23xzINgF85
Utici+avcU6viaHB/MX5LRk2XPRl0Ezd9x4NMvtq0yzsuUjHJPXg8B0ayGS6
lUb8zUXSx7/w1QbQ4PeJ1HHBAC765GN/7IUTDQoZsvp8TC463vKzbGAXDbzW
TdYyX3CRkFbT5ws7aKDoX257NJuLqOssjXhkaRBjevr87TIucju85vYuMRpc
mn4SvbKDi9YmmInQ56mgcspdhvGOi36/8E/Q/0GFoRqddMMPXBR4FlsOfaWC
9eN35Tc+c1HjZScV9UEq8PMSx7ZNktczk7B5/44K2MO/s+InF617k06/3U4F
v66jTs6LXPTRynitVhMV/v//FtnGySWPsqnwf1Q8k/M=
"]]}}, {{}, {},
{GrayLevel[0], Thickness[Tiny],
LineBox[{{-0.66482, 0.}, {-0.66482, 3118.132863617598}}]}}, {{}, {},
{GrayLevel[0], Thickness[Large], LineBox[CompressedData["
1:eJw113k0V+vXAHCRypBQdCVzKTJmSujZKJUylhAZ6kbXcJNEhigkFEmmZMxw
DuqLUmaPMXPGkCFSJEqETPH9nbvW+/5x1lmftfY65znP2ns/+4hcvGp8mZGB
gWGNuv67yyDeSTqdjplcUlXHrL3g6rJY8PIKHetFfdnl5eIFea/kxecW6JhF
kGzmveMFB/frXRyfouMD4XLP7J95gQpXYH9LLx0LnfYztB/zAvg82/Qkl47H
LQJ3jjh5g/G91hwFazruupKkUH3HBzzaAp3tK9YxJ9P7XU9rfKG7m22yynYN
fzTfalfO7g8ClVd3qOz+g0ctjpavdATCa8da5m1DK9jjStIp+9Z7YPNAfuaD
/zK+qFHY6WZyH5YivYMxWsJVSWcfZIyHQxrHR764T7/xpU2T1VuCHkGCrrxr
V8gCFg8s6jPOewz+TrY3JU7O45MmVqMX2qLBmynbw/XHL3zG8Uyop0Ic2N5u
29NDzuKqGj/E7RcP0eVjcQkOM9jGWVBCoCEBSob3sz8XncY3d+1x0jqWDGKc
oHU2aQrHhI5FcTSmwEvJYIfRzxOY98HQgh3DMxiuyxdWVh7H87vDQ5T2psGY
VPRB/OYzvs5awGohng5cvlnKMhs+YaIpjn/XvgyQUv4plTE3iJ1HpS+VrmWA
nYyfX/HQIE5lzkgT3ZAJyeLbOlvrB7F0TcH7exszgXunrMfvp4PYt0iC9TRb
Jiwu/lt1/OggNrU+H136VyZUF0+bTEYNYPYS5SPKCplgpjHtK6vcj4XeqWhH
2mVCwNEf7cU3e3HC268Xs99S8Se+Gyhe6sXMyzJmNxszgUFv6h1NrxeLCHzl
OtqSCT4m31rSRHuxbQVrW3dHJrjbjTWEtfTg8Itfzw0MZsKV4KFKW+EebDJr
+d77VyacbmnNY2noxjvYbl7fuJuA0PYW2cCX3fhpioBWiCABDd3NtPWEbvzj
xa1iNhECjg01Pp+71o35L+xJZhEn4Mh0HTnE343XZ5Rkv8kSIMdZkZJ/tQvz
+HHSlLUJ4DlLizDf2Yl5hwazmK8Q8FL8fskxpk7sYSG0uNOBAMNl+y/yPzvw
wzeKe/c7Ue9PEjnEWt+B+Q95imi5ELA+ETVc4t6B/xb5FWJ5k4DxW94yu3va
sYV2e5xkMAH/GjyKK5dow36MThX7Mgkg53W/R29ow0LTYmwLBAGjTzbCvx/e
YVOLHvHKLALOffH4KhjyDn/M39lo8IIA5GmlfHuiFfcezMo+W0AAZ9qBbi2i
BQeLzbrMV1Hr/V23rWFPE9YU7EsNHiAgPPtZ9ZHlRmylPfREdogARyu/G69b
G/G3j2rfuz4SsOftoYFn7o24rvVt4o5RAmKiczJvNTRgca3wPe4TBHgpPtJQ
cKrHM1mpx4vnqfVMOM9kQT0O1y1NU/pNgEKCbpowTz1+GR1vlLtIwHemjSwc
FW+xs096SvwKAVZd7t0T295ipDqzZshAgparpWPSq1ps115wQp2NBEFxVUGe
4Fr8OulCUBg7CasfeDruW9Zimo0gx+BWEgo025Q9mWsxi9LuFRdOEsS5tBjP
mtZgC5yj4sVDAmvevicsq1XYVU7pG4sQCRkDY2HfAivwQtR1U345Evp9eJMT
FSrwP88dIjbKk8AheDzPaLQcM+kG2U5RdrchO4tROZ6v4WnOVyBBZ8xhZ+hK
Ka4j9heIqJAwMf0zRdKlGFePcmeEaZCwO0L45UfBYkzjM9Q0PEKCobxRTWRr
ESYE865xIhKKrr8cW5EswiFus2EhQELIkptk89gbbCBhSLPSJkGSceWVo0UB
XquNtY46QYJVmmSdEGsB3trlvEfuJAmRRy16uopeYS5C0KuR8kpQ2ZIa7yt8
Rsqsd16XhGY2Pw32jnzM6H/irIweCQwvcvUr/fLxgvvWp28oK+qPWLvJ5GMX
U4Nr6vokJERo+g/ez8Puw2QzGJDQJ7kl3DyMhmnnbihIGZEAzv/kVU2+wBva
Ps6mUCZzmzolTrzAIRYxR7Ybk+CpGLZzhfE5ntOy85+hvOsId2r8zSwc9Xgm
N+wsCf63r9cw9pA4v1VqaJryVHX3mIMCiQedC2P1TEgoOx4rqTadies4dQqY
zpFwwWh3wcCldHwv3iTY2JSE73MLqjdq0/Axju2JSZR9Ytowx940LK785twE
5YQB/2bN8VTMmGBW5GZGgpSvpdGATiouYZe1KaRcKqzc60ak4H2xT54vUi5o
7qwz6EjCyuMjB6+Zk9DNGdThH5mIc0zjnbIpz5moDr0+k4BD1VN1P1E+OJI8
z9/zBOtqm80dP0+C0d4zDAaxcVg0bLLcg7KLwyZ2f7NYfDk+XCqDcu68k9hE
fxT2/dC7sET5naqwLH/CY3w+929DIQsSpn27DutfiMSFEZ362pS31gbp3BF8
hB9s2jn7N2Uzbrf0K/ghdjm5XyWQcmxCf+k7zTCcrLkmnEq5R1yzS7E2FC8G
hdFKKe/IJybjdYIxs23HcBflM2ocjBsa72KW+qqCb5Qj69z47E8F4J/WZtJr
lNsNBuRaW29jG/+HJzksqfoqCIiwS/HBxYoXWQQoP20wxAczPPAO6RYnCcp/
DQlMr2e54pMdjdcVKB/4/F415oIjnlI2E1SjLM7uEitjb4vPiN1wAsq3u/d3
89fo4SdsQlbalKW2DTkwSyuimB0mc/+5Z9Y/mXPJDH3j3imlRXnGYN+vq652
aDr08pYjlL0f6zQ5KrqgljzNYBXK676eT5Nlb6BLV17kyPz3fIfnTl2SXuj8
sRxXMcpM54Y1Nov7IZ77R4Z4KNcIh9xL5PRHRVKOU8yUA2NEXVTCA5FIq1Li
HPX9OuxlZh1s99BURdqvj5Q3+5toOoaEILuNpVP1lBsWpyWYNz9AsQb+wTTK
oc7B3MmB4UiR2tVIypmzEbd234lAz6TRCzfK9vaSdm/WI1HbMwFbeconRD3O
B2hEodhbHXLslPcP1egb+kQjpTnH9C9UPkwaX1CZXI5FWZYBHuGUm7ZmHyg8
9AQdtuLrtaac0/BbKNAjHnHzNvTLUHY6ErFFcCEBEfpZ7+qofNRbHvwzqZCE
dpivVIRRlimQmC10TUY80qlnzlBeivr0ff9SCop5p+jQS+V7Mav3++obaehU
vJd+DVUvKdI8Xbmi6chFx/z7NcpBhrntCW3p6MWqd60A5bMxn5vdJTJRdcyG
Pc5UPc6InK6WHCJRmcTVtEmqfnuPjuOdoVlogreRN4Byhf3t8o0q2ciny77u
L8r3XxQUfYzIQZM8m96rnaHyQ1UgN/IoDbEJr1bZUP2D3bLwud8sDYXrZm//
bEjVm69RtlNSLpq6O5B6kbLNaLWxmE8eYi91czOn+pHM/kW9tff5yDsndHEv
1b8aX1kfzQ8pQB/aklIOU/1RvU6qZt9IAfr5masj4jgJeT3LmknKr1EVUtb8
okNCzPJjdP/za3TZye+T/zES/kYNhy9rFKLyw5X7k7VIoDfJyfPNFqOFhaus
Z9VJcB1cy314vAT5Oqec8VUjYfxHk8ympBL0pjplJOMwCS2cl6XmdEuRpaxq
/fdDJMSfe7KvNb0MbV/laTNXIkFpdIPgHTOMInN+cORLU+svMZ2Vy8JIkB0Y
qqSo/Yh8UTuyjFHpb5modwdIYEt9rpSiV4n+fsqYMSpBwh9Ds0H6dCV6rhPi
Or2XhKG8XAksX408Xj2hRwmQkOxiVatRWIsWBFh2CVPnY4IlCy16uBZ5tAUv
fmEhIe5EQeyPzXUof9PvO8QWEiKEWR0TzeqQTRVn8t5NVP20v+ZaW65DjrKv
Nm7aQIKt3FbrMvV6ZC2v0WVKnddiM6XLh6sb0c/BT6e1hgnwadUOnP/RiHa3
9/QnUPNBT3YzB42vCXEHC5bPU/ND6OUBMZFrTWhyeOZ2Qh8BM/0repuFmxHP
xSGelg4CKupUn3XdakEKlanLOTUEnH9aqOuk2oYM5K6uuWYQUHATvd97uQ11
azzW8kwjgONcvfVwRBtqD2Kf8UkloIqz1814og1J8xYH+SQSsEPb2yDhVDs6
TdN8YxlNgHdRvKf/SjtioXGWpgYScDLtQ6u+WSfq3mB1VduWWs9dml2dcyda
fVQ0zGhNQNyVALpaQCfyCF8cx5YETEhLy0vQOtG4On/5QTMCgotuRzFt7EIO
Iz8SVvWpebF1n0VRbhcS+tXcvUudgONLNyZENr9HRaI1T6N2UPOjHjfTwute
JHfk0r20ikwIt2WZXW7sRf/kh7TSSzOh7wbD8PpQL3I3/Lb/fHEmOCRNl2zZ
1IdqnE6JshRQ8T+bXHef60NfxTwVDbOo+EcBo9q/+xCX0oJvwGMqvme+KlK5
H71V9NoSSM3PD617b8sVDiJXXKrFtzkT6vUFthpyf0KyJXbm20Uy4IcIj29n
/Gf0wKX38gH5dLjhdsD2Ie846h4RSjQ5mAa9g5zGdg0T6I/8NjZH9mdg46n+
dfPpKXSKxUNcazoFag6ohNYwTyMnq2GbAetkEGcpm0g/MYNGGvSIjk2JIFDm
eIw5eBadP8y3m680HhhWGLNcR3+hfbEBCpLH42DRqNyqbu88UjKIOUiyx8CA
ojX/3sAFxFAZtVhW/BhcTDm5RAd/I+ap/tux4Y+AL+qL2UaBJaSN5dyen34I
NIsUYu7mMqpOrtzg5nIfTDX8TjSUr6DoLfpBffzBkG/lLHr4zyr6nms+78p/
F5ZYtZmKTdZQlfXqauFefzDuUFMWiFtHn49+sKQb+QGrGltVWeI6Wjx65/CS
uh9UpfefskxbR1KHhC6s7vMDuZuetk9p6+isnqmD8LovcAgVPuCrW0d/qQ1d
H8v2hUang595fq0joeujr8w3+QJskYjgOE1HJjUDX4dqfWDp2tIumhEdqbNE
DvLn+0DuQH2GnikdiQqr9V9K9AHBXLvSBxfpyLNEa4LL3Qf+mKSPs3rSUat7
Ps/4Ph8oTBPS2JxJR1w7Jkadwrzh360/6zNz6Eh1cslZ18sbxD0qjHXy6Yiz
9p8ReXtviNK9cOVuGR19ulrsKqjpDa6z8Y+ZuujIS75k278LXiBp4SCY1kdH
LaMBcfGjXvCpVjVL6yMd5XJwL7a3eYFhXF/FnW90VLsrSMoi2wu2MJInRX7S
0Z/ZqXVarBdgR4/uynk6GlLmTWK/6wXu73WsbVboiL0Ob3Zz9YL/+39H////
/j8WZujM
"]]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->{True, False},
Frame->True,
FrameTicks->False]], "Output",
CellChangeTimes->{{3.66259818351793*^9, 3.6625981898543987`*^9},
3.662598239810951*^9, {3.662937812608741*^9, 3.662937829285771*^9},
3.663809224895849*^9, 3.6638519325525217`*^9}]
}, Open ]],
Cell["\<\
From the ESS calculations for \[Beta] = -0.6:
{u1\[Rule]-0.6648199445983377`,Km\[Rule]7816.384007216777`}\
\>", "Text",
CellChangeTimes->{{3.6625831016188927`*^9, 3.662583129434276*^9},
3.6625832301909657`*^9, 3.662587879844906*^9, 3.662588322881942*^9, {
3.6629383216129417`*^9, 3.662938327635977*^9}, 3.663809088178886*^9}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{
RowBox[{"(", "2500", ")"}],
RowBox[{"a", "[",
RowBox[{"u", ",",
RowBox[{"-", "0.6648199445983377"}], ",", "try\[Sigma]\[Alpha]", ",",
"try\[Beta]"}], "]"}]}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "0.7"}], ",", "1.5"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{", "None", "}"}]}], ",",
RowBox[{"Filling", "\[Rule]", "Bottom"}], ",",
RowBox[{"FillingStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"GrayLevel", "[", "0.8", "]"}], "}"}]}], ",",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",",
RowBox[{"{",
RowBox[{"0", ",", "maxheight"}], "}"}]}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.6648199445983377`"}], ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.6648199445983377`"}], ",",
RowBox[{"k", "[",
RowBox[{"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",",
RowBox[{"-", "0.6648199445983377`"}], ",", "tryKm"}], "]"}]}],
"}"}]}], "}"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Black", ",", "Thin"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Axes", "\[Rule]",
RowBox[{"{",
RowBox[{"False", ",", "False"}], "}"}]}], ",",
RowBox[{"Ticks", "\[Rule]", "None"}], ",",
RowBox[{"AspectRatio", "\[Rule]",
RowBox[{"100", "/", "408"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.65401717055512*^9, 3.654017187280355*^9}, {
3.654017344576412*^9, 3.654017359511397*^9}, {3.65401927528238*^9,
3.654019279074164*^9}, {3.6580749961162663`*^9, 3.658075010600336*^9}, {
3.65807618793108*^9, 3.658076188490995*^9}, {3.658076231516355*^9,
3.6580762327478237`*^9}, {3.662578424430344*^9, 3.662578429869256*^9}, {
3.6625805332605762`*^9, 3.6625805414913797`*^9}, {3.662581602724835*^9,
3.662581605530455*^9}, {3.662581992245171*^9, 3.662582007124544*^9},
3.6625876775895863`*^9, {3.6625879334203587`*^9, 3.662587940361785*^9}, {
3.662588067883778*^9, 3.6625880692748327`*^9}, {3.662588103713826*^9,
3.662588106017372*^9}, {3.662597897241036*^9, 3.66259789846564*^9}, {
3.662937842099617*^9, 3.662937846980784*^9}, {3.662937942512855*^9,
3.6629380817917852`*^9}, {3.662938127607706*^9, 3.662938199845072*^9}, {
3.66293823215698*^9, 3.662938260459632*^9}, {3.662939450972671*^9,
3.6629394537095213`*^9}, 3.663808982302133*^9, {3.663809016876897*^9,
3.663809020109748*^9}, {3.663809125158538*^9, 3.6638091255833273`*^9},
3.663809175807333*^9, {3.663809209956973*^9, 3.663809232722538*^9},
3.663809275539506*^9, 3.6693201797625713`*^9}],
Cell[BoxData[
GraphicsBox[{GraphicsComplexBox[CompressedData["
1:eJw9lnk01Vsbx88lhcox1VVHA69QIXGVVPbjLUPGDJnLkItbUiKliAaVJHXI
1ZHIOfx+0qCkknPapmvMPB/zmCJ1TYcU7+9d673vXmuvvZ4/9l7P97O/63ke
Bc+TNr8L0Wi0LGr/9xzOMrP09h7GS3fGppyRZkN92LlZzpIhHCYp1XwnjQ1v
hFcyFCMH8PFR0frNeziQn2d8VGxDP35+HJZ3l3EgNPj92Azuxc9+OMisMU+H
gJpdXYbXurHbXY+g4qZ0UJbcp3Yad2Ah3Tj6NfMMaMhj+DF4bdhHVHBduyQD
Zk/5adSXN+MNqbs1+OoEON0Q2+OyrBE/0XP1O32VgBfLgvU8xetw3lWzo2ON
BETVHBa9EFGJ10SJawfSSeCQONVU9C8sJ6+bpL6bBOf0CB1Vrfe4SlSbHu5E
wj/6aP9bBWkTk4uLAvRPLJeo7mz8hIn+ttffQjMhITNIOviE9XNEn7m5pk6B
hDL/A50+8floXZGncfxHAjZJqY0cdS5GFjz/k2ZpBMyx4mksjwp0VuE+S9GE
gHaxlbJvzGtRylXvYF5fBii4Bpev+qMB7fnrxRW1sxlwpGr1alufZhRefdRb
eS4d3PnH5Lhabai45GMt40I6jHQYJcp946OrjlMNEnMcCDljqzI70oXuswv1
tL054NsalXvJoRdNWcylSLaz4VcQ6jFp60OtLAOJ5XvZIJamXyZmM4ASwsM9
pNPSoKuxKcr95SB6JnB8MiOZBq+thZvOaQ4jQURv88/ARxCQEj2rfO8j0i4/
0ZzWnwonh1s7aiZGkPhDP/ehQ6lwOoRrpOv/GdVfPJt4OTwFHDq/R++sG0Wp
a63/UDjxECC63nHW6gvKjtDT6DJNhhXiQjSr1+PIvGE+edu+ByBhMP+yVvwb
stzh4bTUJAnk2IWZjhXfkIFOqMNWYIHMl1cxahf+RkI5TuMaNvdB8nCQTt/u
CVTqHb/2lFMiPK+4x5Wem0C8JSavrvn/CWj9oGZs5iSSv+206XFSAtQnLviO
+U6hS4qarybwPbCbN7wdz5hG9FPEvMR8PIQ4f2XmVU6jvskM+0SDeEjt8XLB
N2bQes3RAykRcfDWfJmUpJ4AyfCaf5VuYsI//kD5yx14DCZ0ynqyI3OHcO/o
xev5zmwQKUf53Tfq8UN51ySlZwTMjHPep5hW41oRa9XISQIS8m83eZaUYX9h
ifNbVUggf+LDzyWLsPaDxosscxIiDpQoxSUE4q+1naBoT/k1Nf5uuS2H8uPo
1todJNy2yzSLfZiLzDN3+zYtJWG/l+qoGbMAWSoXhj0tJYBu7z61cLgUwTp3
3q9nCeAKQoVEkwXoQd/u903BTPDobZmdXjmMfc3UEjg72LCN5MzLmzTgR35y
m0vvE6AWXr7m5fMaHNIle1BtkABJw+Bxf8UK3OzpUlXCIEG5ES2G3irGLcFZ
84H7SXjg08tnPbuDXS4+ZlxxIcHbL0t/LDMZTYvtie5HJAQYOwmz2S+R7hl6
WacspZdh0R7u+h5ZbLplwmwlgKVt5L+9swSJv97yUi2GAD3FIrFbxwXoxLf3
SzTSKd5HLh2NGarCdi/TDSd/IWGdFvHO3rsU34rfzuRsJ2GLKnD74gvwH+I7
2x/aknBq+ZyCYcwFZGTW9DjVioTLNxuFkxoyUX/0i13laiToV++cv1IjQOFS
stNLDjBByejuvzT0hnHP1zZ+rBIb9su1MrhEA14lduCBXiwBxsbOxrs9a3FS
8s9F1U4CPogdmw+qr8B5wQnb8laRMMRbrD1qWoKtZQ6mTFF6vy9m5JXUcrHV
VfljbRQPdNnvw5qtiSjb3ldbkuI1ANt71JRfIC99OYsQiqeuYRU/cJaLbklw
u5/3EOCuuCvLlFGCFuK6tDr+JCDkjdfKGhsBsj80lHKby4QOZZm7qxM/4P2f
W0rbvxPAn2GVua4qw3U2eX2RlL5P0rSYcptCHHM3X9rgIAkFyxqnyvhWSAwk
TotQfPxXvarcLkOgp0s20T5T/MI8+Qt/5QrQ3ZN03OHGBJ+RcI2EmiI8JnTB
LYuqdz9CpDgoPhKbFD3smXEkofU8rXX6KcazD2zv5VD+XNx5T2DwUYDeiI7q
HNRigkjIuK7pwWEcXab9+xUGGywPfsuKbm3APwrjVnZHEWC39V/d4fm1GN+6
1ijVRsCWsYFfZlUrsYcW+2yyNOXnHDddh8wSHKC+sIK1l4THDXFnZyJ4eO9a
Di/HmQS1lRZx2cfvoTD93hG6EeW/veuqA3yy0WvtZwFP15NAc77ZccKIi5rO
GkDmAAFF918eaH1XjCIf9ysxkgmQE9pBP2kkQDkST3+alTNhRLxTxeXvD9hI
gtW0Q0CAbrtsTY9fGR6ar9/Qu5kEE1H36fwXhbg6PLA72JIEyXpb86Adbng0
b23nAzsSBp2VNMJy0lH2WgUNr99IkH+aRfPJFCBvG5dp2+NMKO3qSYhSL8aG
oxEvEql8WUqfnrw7F40Zq6ZWGFF6qrR6bcd1CrDyE3VXrUMkPLzsPdfPFyBF
/gf7jL1McP9SPJ06KUCuBvIxQipMCJZO3ufoMoynpz2zfqxmg93Yj8DArw34
7pG+dVuuE+CSfH2z4kgtTm4f6ae1EODctTEyz64SfxTXVBaXImHqaexYXVsJ
Plp0mO69hwShPTftY9t52KLCzZtB5ZNmw5uZXx6P/B5Fz4oZkzC7W2a/rGg2
Sli6agY2kuA1+Knj2Jd8JK2z4k7qEAFBh74mJt8sRi/ooZCbQoAvsf4OAgF6
Fdc/oV7DhK+hEPhzXTWO0G1pcpsmwKfS2vpRYhl2eVJBXlel3he6k6nTV4gj
v0RN3rQgoWRv+05Nr+M44U1crQfFIyWssydNOB058B7FJemQ4GcTf2knW4BE
M5SMZQIoHm10M+HDxVhFeS7hhiHl/zm77bPHbmMPfljbMKXnvLqkqO/vBZhJ
Dx04Rv3XuIrV+ZwmAdLnjt+z28eEbOaT4IAvAiRxucWGVGOCpElHUN2cAFmy
pAaPKDBBw23KpMd9GOtw72/Lk2WDvZ6wo898Ax5Yr8ariSTgSMsuq8CFWtw1
xJcVNBEwcQgbsY5V4qXf8zciSRLMs4jSmG8lOKhFxKuSmj+enRIp7RB5j28N
ct9VU/PH4TNnSAXXONQipB0TSfE2D5ZfrMx+jqqWiMuKUfNFQuYa108F+Ug/
eqCbNUyAeU5MQcTpYuT95+tm2iOqPn9n1qnspXhvdMYb6pkwkTuRaPlbNXa/
Sp86PUXAwr+/SV9+VoZF2yxE+VS/OUgjr0zMFuJ9VxxMZSje24McUw9xTuG2
2ujEIor3j9tv3+ZmcdD5svB2HarfyKaLFm1IFaDEn/O8yUAm1DSrbCoIKsaa
bx3aF6h6dmfw5uTqwVic0bslWoeqdw1bVPuVwgpwZEbYKRGKd8L54ndJ9QK0
xin4kpoREyyrtpqeY3OxZLKn7AZXEhyHNr5x+ixATo2PaaHbmPCWZZX7dkaA
ujOWn9FUYoLvtPdvIz8EyLpAjh+zngl1n+ol2BwmbtTNWbqfur9NhlcxF839
f/wfjZhbBg==
"], {{},
{GrayLevel[0.8], EdgeForm[None],
GraphicsGroupBox[
PolygonBox[{{1, 15, 16, 50, 169, 144, 168, 121, 143, 167, 99, 120, 142,
165, 78, 95, 116, 138, 161, 61, 72, 89, 110, 132, 155, 49, 48, 47,
46, 45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31, 30,
29, 28, 27, 26, 25, 24, 23, 22, 21, 60, 71, 88, 109, 131, 154, 20, 59,
70, 87, 108, 130, 153, 19, 58, 69, 86, 107, 129, 152, 18, 77, 94,
115, 137, 160, 57, 68, 85, 106, 128, 151, 17, 76, 93, 114, 136, 159,
56, 97, 118, 140, 163, 67, 170, 171, 166, 84, 105, 127, 150, 14, 98,
119, 141, 164, 75, 92, 113, 135, 158, 55, 96, 117, 139, 162, 66, 83,
104, 126, 149, 13, 74, 91, 112, 134, 157, 54, 65, 82, 103, 125, 148,
12, 73, 90, 111, 133, 156, 53, 64, 81, 102, 124, 147, 11, 52, 63, 80,
101, 123, 146, 10, 9, 8, 7, 6, 5, 4, 3, 2, 51, 62, 79, 100, 122,
145}}]]}, {}, {}}], {{}, {},
{GrayLevel[0], Thickness[Tiny],
LineBox[{{-0.6648199445983377, 0.}, {-0.6648199445983377,
2499.8771787515743`}}]}}},
AspectRatio->NCache[
Rational[25, 102], 0.24509803921568626`],
Axes->{False, False},
AxesOrigin->{0, 0},
Method->{"AxesInFront" -> True},
PlotRange->{{-0.6999999551020408, 1.4999999551020409`}, {
0, 3118.132863617598}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02], Automatic},
Ticks->None]], "Output",
CellChangeTimes->{
3.662937998734461*^9, {3.662938052961116*^9, 3.662938200317461*^9}, {
3.662938232520813*^9, 3.662938261543352*^9}, 3.662938417016946*^9,
3.662939456458362*^9, 3.663809224935296*^9, 3.66380929924433*^9,
3.663851932593742*^9}]
}, Open ]],
Cell["\<\
From the ESS calculations for \[Beta] = 0.6:
{u1\[Rule]0.6648199445983377`,Km\[Rule]7816.384007216777`}\
\>", "Text",
CellChangeTimes->{{3.662938338952545*^9, 3.662938348388536*^9}, {
3.6638090951467237`*^9, 3.663809096278565*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{
RowBox[{"(", "2500", ")"}],
RowBox[{"a", "[",
RowBox[{
"u", ",", "0.6648199445983377", ",", "try\[Sigma]\[Alpha]", ",",
RowBox[{"-", "try\[Beta]"}]}], "]"}]}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "0.7"}], ",", "1.5"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{", "None", "}"}]}], ",",
RowBox[{"Filling", "\[Rule]", "Bottom"}], ",",
RowBox[{"FillingStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"GrayLevel", "[", "0.8", "]"}], "}"}]}], ",",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",",
RowBox[{"{",
RowBox[{"0", ",", "maxheight"}], "}"}]}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0.6648199445983377", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.6648199445983377", ",",
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",", "0.6648199445983377",
",", "tryKm"}], "]"}]}], "}"}]}], "}"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Black", ",", "Thin"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Axes", "\[Rule]",
RowBox[{"{",
RowBox[{"False", ",", "False"}], "}"}]}], ",",
RowBox[{"Ticks", "\[Rule]", "None"}], ",",
RowBox[{"AspectRatio", "\[Rule]",
RowBox[{"100", "/", "408"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.65401717055512*^9, 3.654017187280355*^9}, {
3.654017344576412*^9, 3.654017359511397*^9}, {3.65401927528238*^9,
3.654019279074164*^9}, {3.6580749961162663`*^9, 3.658075010600336*^9}, {
3.65807618793108*^9, 3.658076188490995*^9}, {3.658076231516355*^9,
3.6580762327478237`*^9}, {3.662578424430344*^9, 3.662578429869256*^9}, {
3.6625805332605762`*^9, 3.6625805414913797`*^9}, {3.662581602724835*^9,
3.662581605530455*^9}, {3.662581992245171*^9, 3.662582007124544*^9},
3.6625876775895863`*^9, {3.6625879334203587`*^9, 3.662587940361785*^9}, {
3.662588067883778*^9, 3.6625880692748327`*^9}, {3.662588103713826*^9,
3.662588106017372*^9}, {3.662597897241036*^9, 3.66259789846564*^9}, {
3.662937842099617*^9, 3.662937846980784*^9}, {3.662937942512855*^9,
3.6629380817917852`*^9}, {3.662938127607706*^9, 3.662938199845072*^9}, {
3.66293823215698*^9, 3.662938260459632*^9}, {3.6629383851452017`*^9,
3.662938471447592*^9}, {3.662939461427918*^9, 3.6629394636452293`*^9},
3.663808984782583*^9, {3.663809022587697*^9, 3.663809024499971*^9},
3.663809132447978*^9, {3.663809162478979*^9, 3.663809166525505*^9},
3.663809236340238*^9, {3.663809283267026*^9, 3.663809294851027*^9},
3.6693201810292*^9}],
Cell[BoxData[
GraphicsBox[{GraphicsComplexBox[CompressedData["
1:eJw9lAk0F2sfxyXZKknWtCjdcl23aCPR83PDjRRR1giVxK0kCaks6eYva4No
s/5nLG0ou8cWWfK3ZVfIvl/JWIp33nPe+845c+Z8z5k5Z57Pd9lie8XwPDcX
F1cMc//32Z9y9LidXT8OOe57YdQyFupuuc0m8PThec7fz6UmYiFz+WrprX5f
sfrPqj2CgXGQm/3nWYHNPVjij9/8N8rEg6drwegM7sKBoUv36JfxcLXmQKfW
vc+YZexupfpnAmwXPqzgjNsxZp9pDK1LgPps6b+k81twlFLQ0LBNIsw6/bWz
7sMnvFgnk+YwmAhm9wXULPgasG4R39yCJRve8Lmq2grWYvkR+UmtBjb411jy
3/SqxN2207lF+0hIoHCMLv97/MO/tj+NRYJ5otc+ud0F2PG2hfGDFkZ7pBuv
2pyOTb8LWSSLUNCSFzwacuMJvvnkcFYtUPDv+bn+dxXGTX1bWqLRv/qXtQqD
Z81L0Nf3EvmRWhTMRRNc0TYVyCfz5tITKQpaBVaLZupxEFYSPCzbScKW064f
xC7WI3lhi73yESRYVYmLG134hMQOWv7qr0qCdZuDZN7uFhQi+rHKpYUNg+3a
jyQn25Bg5ExF0yU2uF832jE72Ink69d8mZlIBPtm/7feJl3I6c5MnZlzIkgA
95cjLd2ovdxherwnAQTiDpULGH5FxcM51aYGCdDZ0OhvndaLlPdv460siYd3
J5Y3uin2I1EOK/S+HOPP84DZ7eEDKIz/DUciIg6u9De310wNouHHOr1ivHHg
7J6nrXJ5GFXu/aCk7RALJh3zAcq1I+imhbi6dFsMQECd6az+GJK6ZCPXi2Jg
lSA3l/67cZTh69jWdO45CGkspHEEJ5GgtnOyxKlnIBlflGRaMYlmdGvu3tj3
FNaNZQQq3PwHjbeLvTZUfALCli77ug9OIf2Z4PzKjY/hVUV4nsjcFHKY/iV8
l1Q0oE29isFJ35Dzm9R9f+yMgrpHi/aj9tNog6aZQ7DKIzi5oBVESH9Hw0fT
Wa8sIsHdfCIsu/I7ypiM+kc8IAJivpyzwPdnEK/lVU7Qm3DI0uNbK6xKo8SI
5tsvxgn41+8ebnxefhMBHaK28X5v+/AewdILduxYoH5iy1fCxfgXNVZiSDoJ
bWvWa0dTWdgsRtzPkSYh5GJz6KRaMi48YGz14zcKvHRKtz2MuIbZl43Uawwo
0DwnN3I0rBDZslPWJRtRsMbYenrRsgwVrd0d2K1EwcV6A5acSTVqCVSLuf6T
hL+dDiVl8dWhOJa/r2kuCXm0Jzf/Uxq9HBRvPeRHgE1X0+z31f34Wk8JR8Yn
FrY3oCXPByXYTz/o+uPnJESbf1S3uZSLBbbeUbs8SEJoJEe/eNNrPPI05lz3
ZgqeXOhqi34ZgvPovWutdCigpI+13jldgL4c7RvbbUZB9B7ty0odpQg5Oi/o
q1Hw5p2zlk1HJSp5syVNeBUFOR5xUoImtchkD3kytZoE1a3FAg8caXTX2/N0
cjYB69/bHW/4+habrzyf4rWCgsX4NXdPqyVghSH3Nno/BU4r57ZoBd5EU7Gd
8ptNKMhQTR4ymSlCp8c/uckco+Cum4dH9Zdy9Lrj+TX97RQc+qi84FtDo05b
196LJwjYph0qu1O1H++TWTrC4xQLfflLnLO6pdglldbUCidhfomdXcrJw3Fb
f8ZFdZEwc1/DaODZG2wozCd3kemrqkjWV7GHEfiD0N5+VabPKlpVbddm85DP
vWVxERYUWG89kKIrXYquryz5LKlBwSdqefzPTZUo2Ft6fJbZD/YSFX/+JwdV
3elIXP6JBPfMc6trDGlUli87JNlIgIcDVO7XzsT6rdOGDxdJKL/3jcVWI7Gz
2gJ6xvhdyNcwXd6mj64Oz2evP0mBp/7F4ROaRYjKqdHyY/Kie+FSZt+mcnRl
z9NiNQUKbtm2Lb5/SyORHJ1nGo4E/HBfm4AIP2y44ePEAYaX5FRNc0AhRr/e
snsdZEzBdFtK3KNgf1RN85q3M34uKYfTGgM0Wnle/X6mMgEr3MdVdA368Xd3
qQLaLhY008+omCSV4pAVlSHLQ0hIrn94Y8YrH1eNxq+M7iCB8p5vnLNKw9ef
bHggIk6B/4CsvZFfFA61r08WOkxBcVSaTnNOCYo063low+iBLdV1RwsrULLS
TV8j5v1CnnYLoUQO0rG/67y+lQRJ7v1rrmjTyPAGx8mqmwB59d/v29OZ+Owu
ngzeBRIU3M4HVeVRmJ1ZdKJpJwXCdUZ6LvvPYLfJIPdbhhR0tX4YPj5SiAZ8
Wl5tZnTq5/5TzgVlKH9oFZLcRcGGFylcF5JoNKZp7X/QjYDobUOpOW4BWDz7
+vjJo8z3vEEtfkIYSUWWdw4y+TNWbIzamOKLwkSaj90zpeCZj91cTxuN7OO6
Vz3QJMB6rOR7zDca2eQKGI7KE+Aq8vSwqUU/rhKKGLlqGwvTL4JHa1tKcWCq
vJRlIAncaizj4NZ87Bj98RvRRsKyxSax5TgNJwxrJ1qLUqBYbybvvBiN9zxs
GPiHyZfLqYlHT1klSN85Zv62JtMPK8WhqZAKpCsXfH5eggI9vunMHjcO2rj7
4GOZdhLsyU0hCGh0cqKsjGeQAB+27IVlBll4xiFjTHWOhM9Om4Q/eybhQs/e
SMffKShVb1VWPOeIezNc1lMnKBB5PuvwsaAQaXuM9vQz/KyiZRNVgsrQI/9M
hTuKFPxlSHgrx9PIfMKGJ+82AUNzJ5VmHYLwK+JDjoUus2ehYy0+bwtQ9Yv6
oWCGF5+FvVhXlheSmKldbGR4ju/Q90hvpJG1Bm/NnC4Br8NSXa+O0Uih8mmJ
gRIBwkfaXWrnaCTEN7mbtY2AnWemj3yx7sdWX6nNu6xjQS+FLAucLMXKOr/e
4H9AwkunFWXtKwqw+ucksVAmPzvVtN7xTaRhhxC3VffWMXtR7hKwLPcx1mj2
77RheOqlBxZ6OZegd07ukyuZfmd49rhou1cgq/XkwWpJCsLuc/VX23LQZzfL
M1uZfAvPh9XuUGf85bnbZDrC/E/7s6Zjnlk4hJ94YTRLgvLYvMFARxL+zXuO
lcH0UcnFNOZUghOu6ArPPcjwTPEWTnlAFSLJvriFI8y+758tqpZ2LUMZthnj
ikzfRRP5izfH0Ej01C3Zn94EhPSyvon3BuP0dckuncz+uhpvNFvmX4BOHe8b
7WZ44q5zbJ87t5G1uX2iB8MzwqMk53EdjZ5MBQQpHSfAtE8m02yYRkUSvu2+
ewnIitZ/mzVDo7wX+2dzdhBg/91u7+APGv0ZJMttvoWAvPVWl9JCw1CDSjqv
5mkKhnov6TWx8v6v/wNbaBv8
"], {{},
{GrayLevel[0.8], EdgeForm[None],
GraphicsGroupBox[
PolygonBox[{{1, 17, 18, 49, 158, 136, 157, 115, 135, 156, 95, 114, 134,
155, 75, 91, 110, 130, 151, 59, 69, 85, 104, 124, 145, 48, 47, 46,
45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31, 30, 29,
28, 27, 26, 25, 24, 23, 22, 58, 68, 84, 103, 123, 144, 21, 57, 67, 83,
102, 122, 143, 20, 74, 90, 109, 129, 150, 56, 66, 82, 101, 121, 142,
19, 73, 89, 108, 128, 149, 55, 93, 112, 132, 153, 65, 81, 160, 159,
94, 113, 133, 154, 72, 88, 107, 127, 148, 54, 92, 111, 131, 152, 64,
80, 100, 120, 141, 16, 71, 87, 106, 126, 147, 53, 63, 79, 99, 119,
140, 15, 70, 86, 105, 125, 146, 52, 62, 78, 98, 118, 139, 14, 51, 61,
77, 97, 117, 138, 13, 12, 11, 10, 9, 8, 7, 6, 5, 4, 3, 2, 50, 60, 76,
96, 116, 137}}]]}, {}, {}}], {{}, {},
{GrayLevel[0], Thickness[Tiny],
LineBox[{{0.6648199445983377, 0.}, {0.6648199445983377,
2499.8771787515743`}}]}}},
AspectRatio->NCache[
Rational[25, 102], 0.24509803921568626`],
Axes->{False, False},
AxesOrigin->{0, 0},
Method->{"AxesInFront" -> True},
PlotRange->{{-0.6999999551020408, 1.4999999551020409`}, {
0, 3118.132863617598}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02], Automatic},
Ticks->None]], "Output",
CellChangeTimes->{{3.662938431037291*^9, 3.66293847175865*^9},
3.662939464025754*^9, 3.6638092249498053`*^9, 3.663809295677107*^9,
3.663851932608803*^9}]
}, Open ]],
Cell["\<\
From the ESS calculations for \[Beta] =0:
{u1\[Rule]0.`,Km\[Rule]6266.5706865775`}\
\>", "Text",
CellChangeTimes->{{3.6625831016188927`*^9, 3.662583129434276*^9},
3.6625832301909657`*^9, 3.662587879844906*^9, 3.662588322881942*^9, {
3.6629383216129417`*^9, 3.662938327635977*^9}, {3.662938496540455*^9,
3.6629385224234447`*^9}, {3.663809137462809*^9, 3.663809138612474*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"tryKm", "=",
RowBox[{"Km", "[",
RowBox[{
"trysp", ",", "try\[Sigma]\[Alpha]", ",", "try\[Kappa]", ",", "0"}],
"]"}]}]], "Input",
CellChangeTimes->{
3.663809344661622*^9, {3.663809517510982*^9, 3.663809519133181*^9},
3.669320182313093*^9, 3.669320359169561*^9}],
Cell[BoxData["6267"], "Output",
CellChangeTimes->{{3.6638093415327*^9, 3.663809345181834*^9},
3.6638095198045177`*^9, 3.663851932628561*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"maxheight", "=",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",", "0", ",", "tryKm"}], "]"}],
"//", "N"}]}]], "Input",
CellChangeTimes->{{3.662580070809471*^9, 3.662580079704524*^9}, {
3.662580174205254*^9, 3.662580177645094*^9}}],
Cell[BoxData["2500.171271275779`"], "Output",
CellChangeTimes->{{3.662580175046308*^9, 3.662580178130217*^9},
3.6625804772349043`*^9, 3.6625808069932537`*^9, 3.662597811907279*^9,
3.662598019767288*^9, 3.662598239559758*^9, {3.66293781224*^9,
3.6629378289602547`*^9}, 3.663809224629581*^9, {3.663809499953013*^9,
3.6638095214369802`*^9}, 3.663851932675332*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"2500", " ",
RowBox[{"a", "[",
RowBox[{"u", ",", "0", ",", "try\[Sigma]\[Alpha]", ",", "0"}], "]"}]}],
",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "0.7"}], ",", "1.5"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{", "None", "}"}]}], ",",
RowBox[{"Filling", "\[Rule]", "Bottom"}], ",",
RowBox[{"FillingStyle", "\[Rule]",
RowBox[{"GrayLevel", "[", "0.8", "]"}]}], ",",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",",
RowBox[{"{",
RowBox[{"0", ",", "maxheight"}], "}"}]}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",",
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",", "0", ",", "tryKm"}],
"]"}]}], "}"}]}], "}"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Black", ",", "Thin"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Axes", "\[Rule]",
RowBox[{"{",
RowBox[{"False", ",", "False"}], "}"}]}], ",",
RowBox[{"Ticks", "\[Rule]", "None"}], ",",
RowBox[{"AspectRatio", "\[Rule]",
RowBox[{"100", "/", "408"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.65401717055512*^9, 3.654017187280355*^9}, {
3.654017344576412*^9, 3.654017359511397*^9}, {3.65401927528238*^9,
3.654019279074164*^9}, {3.6580749961162663`*^9, 3.658075010600336*^9}, {
3.65807618793108*^9, 3.658076188490995*^9}, {3.658076231516355*^9,
3.6580762327478237`*^9}, {3.662578424430344*^9, 3.662578429869256*^9}, {
3.6625805332605762`*^9, 3.6625805414913797`*^9}, {3.662581602724835*^9,
3.662581605530455*^9}, {3.662581992245171*^9, 3.662582007124544*^9},
3.6625876775895863`*^9, {3.6625879334203587`*^9, 3.662587940361785*^9}, {
3.662588067883778*^9, 3.6625880692748327`*^9}, {3.662588103713826*^9,
3.662588106017372*^9}, {3.662597897241036*^9, 3.66259789846564*^9}, {
3.662937842099617*^9, 3.662937846980784*^9}, {3.662937942512855*^9,
3.6629380817917852`*^9}, {3.662938127607706*^9, 3.662938199845072*^9}, {
3.66293823215698*^9, 3.662938260459632*^9}, {3.662938530257964*^9,
3.662938619548059*^9}, {3.662938670747566*^9, 3.6629387407443237`*^9}, {
3.6629387779444113`*^9, 3.6629388076304617`*^9}, {3.6629394691668158`*^9,
3.662939476197753*^9}, {3.6638089883662*^9, 3.6638089931062727`*^9},
3.663809026356797*^9, {3.6638091500058517`*^9, 3.663809157325369*^9},
3.663809237397492*^9, {3.663809309800633*^9, 3.66380931701521*^9},
3.669320183629837*^9}],
Cell[BoxData[
GraphicsBox[{GraphicsComplexBox[CompressedData["
1:eJw1Vwk0lVsbFn+hm64MlQyZbrklxb0R0d5dQ0LJkGROppQMGZJ5KuM5QjId
5zgfZSiJcDK0jeEkQ1Q4ZCqVyJhDwr/vWv9/1vrWWc/a3373fp/3eZ+9Pyl7
d2NHTg4Ojg38/Ps/UaR/1slpAllp8ZiWHaTA7qCby7n/+YR+47SvHhXKhpVc
fKLSUeNojswUVOWnwurnpy7z7h1D5d+sgl6zqTDQ98XUEhpBOce6gnZcpUHP
DtUh7dsf0LNMgUezwzS4j19T3gux0NFlKyVP3Rz45rnoNdHaPsSYMHPyLMuB
yx7XFLpb36I+kuUYS4gOL0bzqlty96AVxgcl5EyHT7l91ey3dqGJRsuep5V0
GNNhzRMQykQv+oQ3z7HpMDcf0fR4mtFR1l1hPXkCWuSFHpVTeoGWm/8wMTLH
+FaZ2ba9ZUhr5qVQszcB+2rIU4l+WUgsd7HFJIqAu9MOWZx6lATc0VB4/20C
FngL+LoZPQEUE/uTOwMI2HL99KBzSjWI49B5KWdHwD92yH+5bNEIHh5xuSWl
RsCVjBSOjEttgHdNkTeBi4D9vHxClQadgAFS9xrX06GUlW+r8JU3wPjp+VF5
fzq0ebVzp4nzW6DyyEWjXZIO7QZcd9co9YEffUlbhptz4BeWTtru2QHg4kfu
mnHMgf4+JvuXvwyB7V3HNQLZNOjyPqY87MIIYJoaSZDjaHAX5BzW7RsF5jsi
46MEaJCXfqKF13gcnGL18AcrUuFQT2+MXelH8L3hnfcvvWxYYcTVe/PIBLCK
XOPQNqRAT2rc8r57nwFUyn2g6pAF3Sfeszrmv4CR01v284ZkQi//Gp1j1ycB
aW28byk6A14Y/Bmn0vUNFElfJb99kA5hXLf5suE0CDYY9XSuSIPbtnJyGFZ8
ByvXaos2s+7D7SdXSzu3zoLc3muW2rz34W6ivsC8bRa80jUeOSifCgWnnyXI
B8wBaa23gfsd7kF+a++jo8fnQZ64UHd8Ugp80navRmBlHpzbbVMm254MgcTH
I+SCBUDoxPmViyTD7rR1lymXRSBoGFfib5sETVe1SSmiP0Djl44eC8Zd6G8x
k/Sc+QMsGMQM1+25C2nDDpYoegkEZ7N+z/JNhAwD7h38amwQfLmh43oLGdbR
5xc2NtjAZd7E9VICCQ4K2RNR5Z9QvLTCIwsaBS59z31B1XuN+NT4rKT76TC1
mtRr39SCLr6KOh4gSMD8NWT9hL8BnXh69A6XFgEHft+jk5HPQHLXljtEXAiY
eOX93Vn1QtQzZzQ1HUzA0NNNssmpN1DOjg+13+5gvdJS7raa5AKV7ZGnEsIJ
SDIt0Cdnl4NjnZoBnu4E1HKQ+6afVAemxC/wFZ0l4O9mdovr1i9Bzsl3Cnck
CXjlzblYuQvtwHwtRmN2nA5r2IGcPBQ20As9N5MuR4aXRt4t/+CbQHt+Fqjy
OFGgfEirSOmTDhTPpxFc00qH/Nq+369LtyHPe+p827YQcF8P2AiMb0QVQ3uq
ko4RMMPitcYlt2r0rHnEJA33w937nYYNEiXIZ8lVw+gWAbOcRwYyihPRlnd8
C0I4H6drRSemCihguUFXSAT3m+epi1wEUQr8fJi6z30wX6Jn+kOsXoDvjpm3
2y/g+H/pXFccbAJOkUXyDYcI+LTCS/vSIBPc38TzVXKRDtWkG3jjr7KBx+yZ
frIfGYorPawyc3qJvPTtY4/j/A/IwZrRlDp01EHJOh3zs6fZ6WzPeDmypY7N
9lwn4Drxe6SVei6yEltgpmN+PX5bkdJOCAAh3+e+vcf7DY/t4cp8UwBk0hqr
lUMIWHhpJTkgnQGuev/Kgbh+z9QKv15YqgdbWJSkl7i+J16rrEZ0sEG3rIxE
3AAJyurclVFQm0CZtx/UDulS4KlTFqeO23eitlmN2/p1dNjO67rq3d2GvP9h
vhHcoMNPtRudl/WakMdgmUKMEgF/bjx43tRZg2Jy/3JMsCLgUvRJk8/ZT1Ep
XY2jwI+AagKMceHkVBRUcpgwwn4Fwq+1ixxMA9+EbZAAxuNQcVh+31Mgkl6j
GnWTgMe0Xw3cWK4B7r5O7oI4np20apGeaBNgbtEM5/ubgG/zuYg1CSbQi+54
NbNKh/6VDnwdxmzAqmwXtKeS4cBSRouVcAuaM5l3mxMh4FcBjoRW43q0cfAH
h+tpAt5yhUxlnUok/Z/ACfJV7Je3F2IfqD9EyjH2PGOhBKzj7llsGTAEnkTp
nxuY3+vCz5iKgg/BQwXizCoeF7Psdt8sVgn0PmzwL+H5gYZXJo206oGSw9TW
bhw/yH5gvbmcDUYeyzb6bCLDiwbVaWoaj1HjDtHM2kAC/vLfkQtSotCK4psC
Co6vc9DH3DYlBzw2Hk2ciiAgx9mw/SJSz8DZmdScUi8CHq0/GCSgnoOK+7iE
hCMJuDhQRE8jxwBxfltuXzw/dWNe/T9Jj4CDhP9jEETADZV77JOf2aB4S3pd
fxkJbvb/fkzv3AQyr6oN0FWjQNODMh9CqjtRo2Z8DVcNHR6YGt+0LMdE/Tm8
jDuYT60y22MXCpqQV+KBMx6HsZ7eJPsthdainNzEQB8LrP+wn70rNqWob21r
0AlfAsZ8lnExiUpHLwaWNw/gfpHnO5NccvUeEOr6FByI65ulIf7a07kElJHr
xN/64/wsYlluOjVAXlHWSNaGgA3ppaffVzWCyIFJDwkVAn6Wau/Wr2sD1ncU
HzZhve3mVP7dXYcN2HXO4pfKyPBYv1DH8LUWlBNZ3F29k4C6PHY/qp/WozP+
Uzm1OrifNA5Fu7Ar0Qz3dhHWFbyfm46kVzX56GehTcQM7g/+bhMDb2VbFD25
1voL8/fRQlYhqCwPLMgpUJlhWF8Xaq31rCuAIrNpa7UbAUf6WyfPfqsDArty
9moZ4Po/LuJwLmCDP3VtczmEyfCFxqEs29pi9Fhf7BsJn78Zsl8fVd2MQ/7j
2nQ7HL/G41N14d80EL0zXj4G14+h5yZsY18GzilQdTXw+Z5RSglVqaEj++YQ
Dltcf7MjveniRRFg8vShs8V4/jbtyzRDpSJA3WQafhL7b3a408rYABvEO7jr
HWwhwW/qBrZ9tGTEPxRMqcJ8G7PjNkdMZoCxyI/aWbge9vfC7oTV5CHz9UXf
Zpyfy7Vkyexod7AYNTc8/+/+sm8ox9iGoKhRKk87xjnUGwsDflRka6XAWYP3
mxQVUSToTQY91ZG7D+Nxu+nGH7QFNpjvvHczlUaCvgIUTXPLCQTPaY+vKVGg
JeXOn9JfOpEq6/vWwed0aDEkGfXclImqqMyS2hU6XHxMnurqa0KjNqdYH7Bf
cqrHmpH7a9HXSo8Zh4sE3LT+TpgLlSL4m2ReBPbbI28uHvBaz0DqylNVaTgf
unHt0upvKWCx+GraI5zv8nFBLSGeEvD8t9U7ftjPHT5+ZblOV4NYmVYROVsC
ep+fSaPENoJ/CuXKcvB54GFz5Ot8YhuItbdyKdyE+XgokQggG7wjE5JOtWTo
zDQyyklrQdU6op/EhHF8zsSCo6P1qPiBrr69NvbbBzLOm84xUBHtINcv7K8f
PCT4PwQWoE0HutI9sL6aNPpVjjhcRTNSjN1LmC9q0OAwnSsPlDqVRB/C/q1k
VtY7tVYOeGcKhdKwvwtQl11fv6gDvNNzov5nCHjNOCVMhWAD95fSga8kyNBD
eULcK+gJkvWlLszh/L6umCouu5LQXFIcVR3Hn9l3nEXjpYLpqG2Vb3C9hE5f
jufgKgOGf6+Lr2F9GRSZceoFEmi1vOH0Ol6f29JFeIQRCu4InJhvwvNbnEWN
fcILAUmworQW6+v7fsNbZb1s0HYywbW/iwST9odLsUXuIV3DnsU7mO9W9V8u
HbHp2G8bRfpxPYRIarwpgQ+QZEMt/TzWl/yuj9vz0WXwx4TEwE8c/3Fu3l5O
ejhq8LMtrsA4otVrdSOAhkIoS+6ueL+aJbv2vwuLB8y1EQdTPF6S9MjXcxrn
vzRkqlxIgmO/pvP+3paGrkt25+/C69tl9BKSSSfQ27GHHf/6s75hkFzQ7Wjk
rS60Gopx3mYoYUm5DeYF+zeSMX5jJyXCzPcBHCF/Hf+MscRi5qHtAf5I93IA
Ywhjj8fs+3J/3QUKut7SWzDm12V5d62wgbb4iwM/U0lQwXZRd9huAjVkmmaY
H6ZAm3eqhjfWO9Few2bQwqDD+fNIJ8OVidauOD55v0zHfD98mTDbhDTor8aE
sL6LPTa/ZG1+gex4JSNY+H6voK5dwT1TinzTFnpksb4jW7zjNlVnIubWKxW+
mE9rH598KatkIM8Ve6MR52vgK7bBLMH3+9u9Fi24/qkFIlZf66rBD0pmTz7W
t0FZQl2oVyPQhppb7FXxeR845q3j3wZiAufEsjhxPj+TuvZrsMEJj1Ocrg1k
uP7PrEB4cQsK1ex3NhAi4DmO/Ij55Xo0KvLWrAzfDxRY2e/OBDKQpWOHQRzW
t8r0z3OfBwuQDC2q+jDWt6K3Oe18rgea5KDYzWG+fpEYjPKiXHCB7fPaGuvL
7rwC/4mOcuAf76G+Gd//isL4i+Lz60BWspCvAL7fCOXxNOylscHRDPV/SmXI
sK20wSZg6AkSpp3jp+P8Ej/GLuz8SEZSHuEn/sTxC08vxL+8mA1UYy/oL2G9
/KP7ocWopxQMyzflW2L+8vb/pWkySCBHLrOIdrw+GnF4EB4SDFq3OX7swPNl
/dkHog8Ugvw+hayfWN+ptxqrMrvZ4L5Cf/fTtyQ4IUYJv/3uHnrSKnbSDfMd
aftsz+JAGsjaY228hOtxfesuPcrgA0SYGZwVw/oW69+9zaLCElBt1f3WcHxT
MmtUUjQSWby0yynEeFDLUJ13kIbygxSOQ7zfrOZRh0qeOJCkaVPkiMfNP0lW
XpxkA+p6TRr3ExJUnufhbmpNQ8Fsd4MVvF5vQK5asJsJWnqyr34dvz+vWjaZ
uRGDLn+f0vTEeH3PVit12ShgzzqdlfNvP8WVp8RXeAHtD+Ph0xi7tXGX6rsF
orFU1vm3GIsxBpXTfROBDCgREMWYkWFYzlhiAxmhqeGWTBLcl7zpcHmIIwqX
VJhYwePF2tnv1xXDQUZ7iHAVxsz66l0yuVeA24KFMRvjLVXu1uNyYejhKLOr
HuPEqi/0yrtHgJZK2Ny//SilnEDhzrwJeuXHeEYw7pQ4UtAV7YuMJgOPfMLY
5YfT319+scHh2G/mh5Iw///7nuf43+//3zP/x/8FX/8Pjw==
"], {{},
{GrayLevel[0.8], EdgeForm[None],
GraphicsGroupBox[
PolygonBox[{{1, 254, 255, 50, 253, 199, 245, 153, 191, 237, 115, 145,
183, 229, 85, 107, 137, 175, 221, 63, 76, 98, 128, 166, 212, 49, 48,
47, 46, 45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31,
30, 29, 28, 27, 26, 25, 24, 23, 22, 62, 75, 97, 127, 165, 211, 21, 61,
74, 96, 126, 164, 210, 20, 84, 106, 136, 174, 220, 60, 73, 95, 125,
163, 209, 19, 83, 105, 135, 173, 219, 59, 111, 141, 179, 225, 72, 94,
124, 162, 208, 18, 114, 144, 182, 228, 82, 104, 134, 172, 218, 58,
110, 140, 178, 224, 71, 147, 185, 231, 93, 123, 161, 207, 17, 198,
244, 152, 190, 236, 113, 195, 241, 143, 247, 181, 227, 81, 251, 196,
242, 149, 248, 187, 233, 103, 250, 193, 239, 133, 246, 171, 217, 57,
252, 197, 243, 150, 249, 188, 234, 109, 194, 240, 139, 177, 223, 70,
146, 184, 230, 92, 192, 238, 122, 160, 206, 16, 151, 189, 235, 112,
142, 180, 226, 80, 148, 186, 232, 102, 132, 170, 216, 56, 108, 138,
176, 222, 69, 91, 121, 159, 205, 15, 79, 101, 131, 169, 215, 55, 68,
90, 120, 158, 204, 14, 78, 100, 130, 168, 214, 54, 67, 89, 119, 157,
203, 13, 77, 99, 129, 167, 213, 53, 66, 88, 118, 156, 202, 12, 52, 65,
87, 117, 155, 201, 11, 10, 9, 8, 7, 6, 5, 4, 3, 2, 51, 64, 86, 116,
154, 200}}]]}, {}, {}}], {{}, {},
{GrayLevel[0], Thickness[Tiny],
LineBox[{{0., 0.}, {0., 2500.171271275779}}]}}},
AspectRatio->NCache[
Rational[25, 102], 0.24509803921568626`],
Axes->{False, False},
AxesOrigin->{0, 0},
Method->{"AxesInFront" -> True},
PlotRange->{{-0.6999999551020408, 1.4999999551020409`}, {
0, 2500.171271275779}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02], Automatic},
Ticks->None]], "Output",
CellChangeTimes->{
3.662937998734461*^9, {3.662938052961116*^9, 3.662938200317461*^9}, {
3.662938232520813*^9, 3.662938261543352*^9}, 3.662938417016946*^9, {
3.6629385683060102`*^9, 3.6629386012283087`*^9}, {3.662938671388874*^9,
3.662938741216281*^9}, {3.662938783755797*^9, 3.66293880868165*^9},
3.662939476595463*^9, 3.663809224970594*^9, {3.6638093179806232`*^9,
3.6638093467172937`*^9}, 3.6638095230069227`*^9, 3.663851932726544*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["\<\
File: 2 - 0.85 - 0 - 0.02 - 0.0015 - 0 [Symmetric two species]\
\>", "Subsection",
CellChangeTimes->{{3.6580707049519672`*^9, 3.658070706349422*^9}, {
3.658070744397442*^9, 3.65807075249966*^9}, {3.658076356754607*^9,
3.6580763606504917`*^9}, {3.6625774963684072`*^9, 3.662577499079831*^9}, {
3.662577751631178*^9, 3.662577790492811*^9}, {3.662581812344005*^9,
3.662581824119494*^9}}],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"trysp", "=", "2"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Sigma]\[Alpha]", "=", "0.85"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Kappa]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Nu]", "=", "0.02"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Sigma]\[Nu]", "=", "0.0015"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Beta]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"tryvm", "=", "0.0015"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Mu]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Sigma]", "=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{"tryKm", "=",
RowBox[{"Km", "[",
RowBox[{
"trysp", ",", "try\[Sigma]\[Alpha]", ",", "try\[Kappa]", ",",
"try\[Beta]"}], "]"}]}]}], "Input",
CellChangeTimes->{{3.658074206458665*^9, 3.65807421166369*^9}, {
3.658074801389743*^9, 3.6580749396472607`*^9}, {3.658076014352268*^9,
3.658076022888116*^9}, {3.6625777618468847`*^9, 3.6625777620482903`*^9}, {
3.669320185046245*^9, 3.669320185729007*^9}, {3.669320350967534*^9,
3.669320354135334*^9}}],
Cell[BoxData["11828"], "Output",
CellChangeTimes->{{3.658074932852392*^9, 3.658074948287805*^9},
3.658075053786251*^9, 3.658075661309265*^9, 3.6580760233468857`*^9,
3.661348768081315*^9, 3.661361475265626*^9, 3.662577504446596*^9,
3.662577549352231*^9, 3.66257779171821*^9, 3.6625779283183403`*^9,
3.662580263808111*^9, 3.662580489137106*^9, 3.662580824646832*^9,
3.662581608631073*^9, 3.662581717161949*^9, 3.66258198127776*^9,
3.662582015732871*^9, 3.6625825884894037`*^9, 3.662582708355915*^9,
3.662583386159219*^9, 3.662588554917327*^9, 3.662596982036273*^9, {
3.662599022309513*^9, 3.6625990266254168`*^9}, 3.662600981537437*^9,
3.662602135097731*^9, 3.662602555767625*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"data", "=",
RowBox[{"ToExpression", "[",
RowBox[{
"Import", "[", "\"\<2-0.85-0-0.02-0.0015-0-Burn_In.txt\>\"", "]"}],
"]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.658071226407762*^9, 3.658071244891139*^9}, {
3.658074994893792*^9, 3.6580750210197153`*^9}, {3.658075621640133*^9,
3.65807562203861*^9}, {3.658075690781049*^9, 3.65807569876371*^9}, {
3.6625777972698793`*^9, 3.662577797581771*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"data", "[",
RowBox[{"[", "1", "]"}], "]"}]], "Input",
CellChangeTimes->{{3.654015655270091*^9, 3.6540156561189938`*^9},
3.658075623809044*^9}],
Cell[BoxData[
InterpretationBox[
TagBox[
PanelBox[GridBox[{
{
StyleBox[
StyleBox[
DynamicBox[ToBoxes[
FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"],
StandardForm],
ImageSizeCache->{278., {2., 8.}}],
StripOnInput->False,
DynamicUpdating->True], "Panel",
StripOnInput->False,
Background->None]},
{
ItemBox[
TagBox[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.0130632`"}], ",",
RowBox[{"-", "0.0137366`"}], ",",
RowBox[{"-", "0.0153963`"}], ",",
RowBox[{"-", "0.0150711`"}], ",",
RowBox[{"-", "0.015285`"}], ",",
RowBox[{"-", "0.0150674`"}], ",",
RowBox[{"-", "0.0202253`"}], ",",
RowBox[{"-", "0.016572`"}], ",",
RowBox[{"-", "0.0101238`"}], ",",
RowBox[{"-", "0.0132367`"}], ",",
RowBox[{"-", "0.00957587`"}], ",",
RowBox[{"-", "0.0136505`"}], ",",
RowBox[{"-", "0.0152898`"}], ",",
RowBox[{"-", "0.0142481`"}], ",",
RowBox[{"-", "0.017651`"}], ",",
RowBox[{"-", "0.0190482`"}], ",",
RowBox[{"-", "0.0143529`"}], ",",
RowBox[{"-", "0.0143529`"}], ",",
RowBox[{"-", "0.0179138`"}], ",",
RowBox[{"-", "0.0139937`"}]}], "}"}], ",",
RowBox[{"\[LeftSkeleton]", "2419", "\[RightSkeleton]"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.0175232`"}], ",",
RowBox[{"-", "0.0183236`"}], ",",
RowBox[{"-", "0.0150711`"}], ",",
RowBox[{"-", "0.0150711`"}], ",",
RowBox[{"-", "0.0100278`"}], ",",
RowBox[{"-", "0.0277403`"}], ",",
RowBox[{"-", "0.019099`"}], ",",
RowBox[{"-", "0.0208783`"}], ",",
RowBox[{"-", "0.0120678`"}], ",",
RowBox[{"\[LeftSkeleton]", "3", "\[RightSkeleton]"}], ",",
RowBox[{"-", "0.0141163`"}], ",",
RowBox[{"-", "0.013921`"}], ",",
RowBox[{"-", "0.0189945`"}], ",",
RowBox[{"-", "0.015938`"}], ",",
RowBox[{"-", "0.0137014`"}], ",",
RowBox[{"-", "0.021908`"}], ",",
RowBox[{"-", "0.0143603`"}], ",",
RowBox[{"-", "0.014639`"}]}], "}"}]}], "}"}],
Short[#, 5]& ],
Background->GrayLevel[1],
BaseStyle->{Deployed -> False},
Frame->True,
FrameStyle->GrayLevel[0, 0.2],
StripOnInput->False]},
{
RowBox[{
ButtonBox[
StyleBox[
StyleBox[
DynamicBox[ToBoxes[
FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"],
StandardForm],
ImageSizeCache->{49., {1., 8.}}],
StripOnInput->False,
DynamicUpdating->True], "Panel",
StripOnInput->False,
Background->None],
Appearance->Automatic,
ButtonFunction:>OutputSizeLimit`ButtonFunction[
Identity, 1734, 24002881922036044875, 5/2],
Enabled->True,
Evaluator->Automatic,
Method->"Queued"], "\[ThinSpace]",
ButtonBox[
StyleBox[
StyleBox[
DynamicBox[ToBoxes[
FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"],
StandardForm],
ImageSizeCache->{52., {1., 8.}}],
StripOnInput->False,
DynamicUpdating->True], "Panel",
StripOnInput->False,
Background->None],
Appearance->Automatic,
ButtonFunction:>OutputSizeLimit`ButtonFunction[
Identity, 1734, 24002881922036044875, 5 2],
Enabled->True,
Evaluator->Automatic,
Method->"Queued"], "\[ThinSpace]",
ButtonBox[
StyleBox[
StyleBox[
DynamicBox[ToBoxes[
FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"],
StandardForm],
ImageSizeCache->{82., {2., 8.}}],
StripOnInput->False,
DynamicUpdating->True], "Panel",
StripOnInput->False,
Background->None],
Appearance->Automatic,
ButtonFunction:>OutputSizeLimit`ButtonFunction[
Identity, 1734, 24002881922036044875, Infinity],
Enabled->True,
Evaluator->Automatic,
Method->"Queued"], "\[ThinSpace]",
ButtonBox[
StyleBox[
StyleBox[
DynamicBox[ToBoxes[
FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"],
StandardForm],
ImageSizeCache->{74., {1., 8.}}],
StripOnInput->False,
DynamicUpdating->True], "Panel",
StripOnInput->False,
Background->None],
Appearance->Automatic,
ButtonFunction:>FrontEndExecute[{
FrontEnd`SetOptions[
FrontEnd`$FrontEnd,
FrontEnd`PreferencesSettings -> {"Page" -> "Evaluation"}],
FrontEnd`FrontEndToken["PreferencesDialog"]}],
Evaluator->None,
Method->"Preemptive"]}]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxDividers->{
"Columns" -> {{False}}, "ColumnsIndexed" -> {}, "Rows" -> {{False}},
"RowsIndexed" -> {}},
GridBoxItemSize->{
"Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.5599999999999999]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[1.2]},
Offset[0.2]}, "RowsIndexed" -> {}}],
DefaultBaseStyle->{},
FrameMargins->5],
Deploy,
DefaultBaseStyle->"Deploy"],
Out[1734]]], "Output",
CellChangeTimes->{3.654015656661993*^9, 3.658071247971476*^9,
3.658075055070158*^9, 3.658075702597713*^9, 3.6613487750821867`*^9,
3.6613614757456408`*^9, 3.662577553367422*^9, 3.662577801465736*^9,
3.662577928876912*^9, 3.6625802674214478`*^9, 3.6625804911533203`*^9,
3.662580825047888*^9, 3.6625816090321903`*^9, 3.6625817175734*^9,
3.662581981712195*^9, 3.662582016167302*^9, 3.662582708785293*^9,
3.662583386593134*^9, 3.662588555319828*^9, 3.6625969824874067`*^9,
3.66259902702894*^9, 3.662600981943037*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"genotypes1", "=",
RowBox[{"Round", "[",
RowBox[{
RowBox[{"Total", "[",
RowBox[{"Transpose", "[",
RowBox[{"data", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], ",", "0.001"}], "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{"Length", "[", "%", "]"}], "\[IndentingNewLine]",
RowBox[{"Mean", "[", "%%", "]"}]}], "Input",
CellChangeTimes->{{3.6540156291055717`*^9, 3.654015637852762*^9}, {
3.6540156904355803`*^9, 3.6540156946030903`*^9}, {3.654015764153283*^9,
3.65401580327742*^9}, {3.658071257922381*^9, 3.6580712642191257`*^9},
3.658075625809054*^9, {3.661348776598023*^9, 3.6613487797015142`*^9}, {
3.66136146018661*^9, 3.661361467487602*^9}, {3.66136149867896*^9,
3.6613615017026176`*^9}}],
Cell[BoxData["2421"], "Output",
CellChangeTimes->{
3.6613487809482737`*^9, {3.661361475780387*^9, 3.6613615021844683`*^9},
3.662577556169673*^9, 3.662577804020043*^9, 3.662577928918355*^9,
3.662580269093361*^9, 3.6625804924903507`*^9, 3.662580825081121*^9,
3.6625816090646267`*^9, 3.662581717611493*^9, 3.662581981812249*^9,
3.6625820162326813`*^9, 3.662582708839491*^9, 3.662583386692133*^9,
3.662588555350594*^9, 3.6625969825697737`*^9, 3.662599027064156*^9,
3.662600981970319*^9}],
Cell[BoxData[
RowBox[{"-", "0.3128066914498137`"}]], "Output",
CellChangeTimes->{
3.6613487809482737`*^9, {3.661361475780387*^9, 3.6613615021844683`*^9},
3.662577556169673*^9, 3.662577804020043*^9, 3.662577928918355*^9,
3.662580269093361*^9, 3.6625804924903507`*^9, 3.662580825081121*^9,
3.6625816090646267`*^9, 3.662581717611493*^9, 3.662581981812249*^9,
3.6625820162326813`*^9, 3.662582708839491*^9, 3.662583386692133*^9,
3.662588555350594*^9, 3.6625969825697737`*^9, 3.662599027064156*^9,
3.662600981971859*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"genotypes2", "=",
RowBox[{"Round", "[",
RowBox[{
RowBox[{"Total", "[",
RowBox[{"Transpose", "[",
RowBox[{"data", "[",
RowBox[{"[", "2", "]"}], "]"}], "]"}], "]"}], ",", "0.001"}], "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{"Length", "[", "%", "]"}], "\[IndentingNewLine]",
RowBox[{"Mean", "[", "%%", "]"}]}], "Input",
CellChangeTimes->{{3.6540156415511837`*^9, 3.6540156416354847`*^9}, {
3.65401570555127*^9, 3.65401570695448*^9}, {3.65401581302857*^9,
3.654015817812921*^9}, {3.65807560260693*^9, 3.6580756265451508`*^9}, {
3.6613487833977833`*^9, 3.6613487835337753`*^9}, {3.6613614832638283`*^9,
3.661361496326339*^9}}],
Cell[BoxData["2520"], "Output",
CellChangeTimes->{
3.6613487839827213`*^9, {3.661361483816585*^9, 3.6613614969501343`*^9},
3.6625775578543053`*^9, 3.662577804903142*^9, 3.6625779289520607`*^9,
3.662580269758013*^9, 3.6625804932205276`*^9, 3.662580825114416*^9,
3.662581609098485*^9, 3.6625817176611633`*^9, 3.662581981962509*^9,
3.662582016316197*^9, 3.6625827089067373`*^9, 3.6625833867752457`*^9,
3.662588555384204*^9, 3.662596982669814*^9, 3.66259902709223*^9,
3.662600982037458*^9}],
Cell[BoxData["0.2918861111111112`"], "Output",
CellChangeTimes->{
3.6613487839827213`*^9, {3.661361483816585*^9, 3.6613614969501343`*^9},
3.6625775578543053`*^9, 3.662577804903142*^9, 3.6625779289520607`*^9,
3.662580269758013*^9, 3.6625804932205276`*^9, 3.662580825114416*^9,
3.662581609098485*^9, 3.6625817176611633`*^9, 3.662581981962509*^9,
3.662582016316197*^9, 3.6625827089067373`*^9, 3.6625833867752457`*^9,
3.662588555384204*^9, 3.662596982669814*^9, 3.66259902709223*^9,
3.6626009820389433`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"totalsize", "=",
RowBox[{
RowBox[{"Length", "[", "genotypes1", "]"}], "+",
RowBox[{"Length", "[", "genotypes2", "]"}]}]}]], "Input",
CellChangeTimes->{{3.658076784459578*^9, 3.658076805699773*^9}}],
Cell[BoxData["4941"], "Output",
CellChangeTimes->{{3.6580767952988997`*^9, 3.658076806295833*^9},
3.6625778063358727`*^9, 3.662577928985957*^9, 3.662580271543414*^9,
3.662580494904459*^9, 3.6625808251465397`*^9, 3.662581609131298*^9,
3.662581717711721*^9, 3.662581982061967*^9, 3.662582016399617*^9,
3.662582708954938*^9, 3.662583386858247*^9, 3.662588555417798*^9,
3.662596982769785*^9, 3.6625990271259613`*^9, 3.662600982137024*^9}]
}, Open ]],
Cell["\<\
The following shows the competitive impact felt by an individual of phenotype \
u exerted by all of the individuals of species 1 (red) or species 2 (blue):\
\>", "Text",
CellChangeTimes->{{3.658075190925829*^9, 3.6580752068114223`*^9}, {
3.658075541506732*^9, 3.6580755784304743`*^9}, {3.658076166027096*^9,
3.6580761819691687`*^9}, {3.658076486638575*^9, 3.65807648742222*^9}, {
3.662587704021105*^9, 3.6625877056046457`*^9}, {3.662587950455853*^9,
3.6625879596227837`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"competitionplot", "=",
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"Sum", "[",
RowBox[{
RowBox[{"a", "[",
RowBox[{"u", ",",
RowBox[{"genotypes1", "[",
RowBox[{"[", "i", "]"}], "]"}], ",", "try\[Sigma]\[Alpha]", ",",
"try\[Beta]"}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "genotypes1", "]"}]}], "}"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2.5"}], ",", "2.5"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]", "Red"}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"Sum", "[",
RowBox[{
RowBox[{"a", "[",
RowBox[{"u", ",",
RowBox[{"genotypes2", "[",
RowBox[{"[", "i", "]"}], "]"}], ",", "try\[Sigma]\[Alpha]", ",",
"try\[Beta]"}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "genotypes2", "]"}]}], "}"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2.5"}], ",", "2.5"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]", "Blue"}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "2.5"}], ",", "2.5"}], "}"}], ",", "Automatic"}],
"}"}]}], ",",
RowBox[{"AxesOrigin", "\[Rule]",
RowBox[{"{",
RowBox[{"0", ",", "0"}], "}"}]}]}], "\[IndentingNewLine]",
"]"}]}]], "Input",
CellChangeTimes->{{3.65401717055512*^9, 3.654017187280355*^9}, {
3.654017344576412*^9, 3.654017359511397*^9}, {3.65401927528238*^9,
3.654019279074164*^9}, {3.6580749961162663`*^9, 3.658075010600336*^9}, {
3.65807618793108*^9, 3.658076188490995*^9}, {3.658076231516355*^9,
3.6580762327478237`*^9}, {3.662578424430344*^9, 3.662578429869256*^9}, {
3.6625805332605762`*^9, 3.6625805414913797`*^9}, {3.662581602724835*^9,
3.662581605530455*^9}, {3.662581992245171*^9, 3.662582007124544*^9},
3.6625876775895863`*^9, {3.6625879334203587`*^9, 3.662587940361785*^9}, {
3.662588067883778*^9, 3.6625880692748327`*^9}, {3.662588103713826*^9,
3.662588106017372*^9}, {3.6625884586223783`*^9, 3.6625884625719852`*^9}, {
3.6693201868469276`*^9, 3.66932018756315*^9}}],
Cell[BoxData[
GraphicsBox[{{{}, {},
{RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJwt13k0VP8bB3BMScjWJiWkzRbFt42apxCVVESLSikt8rWVTGXNlnaEsmTm
kj0qGUl6JuvXvo1BKLtBqSyRxO/TOb8/5sx5nZl77/nc+Tzv9x0lG0czWyEB
AYF+8vr77tG3b3hmhsaRy7hoZHzPB3pvLBprmaJxgirN/yiE+ICp1Ofx7F80
ztKKd96/wn1AcYvTH8cRGidl44qRl0wfyL8dItLeS+PkzfoStfm1D4isa1zO
qaRx0jUk02JafODRlVN7vaNonI9VTXsr1G5CquDleIFNNM7srFzk196E2bZG
G5acEOJ46GqAuqUfzG8qsqeCBTk+P6QT3vf6g1lB5BmVMgFOtUZMkFxEINz4
ts3+YdcMyv/qFNWPCYI3bpF2GfuncSx81+qkzDtgGmKhOP1kCnM+5DXf0L4P
RjF5psZfJvHLsf8MpFwfQkLJNd5lq18o7/e7M7EpGE76PVpYnTSOr5O/2ct6
hoLnKVq62PyfSPuh7ndUJQwENBRQ338UlUd6690HwuHjnSeBqQ3D+O+CF86x
3x7DMtELyaM7f+D5xLPHNPsi4dI/qrNbln1DDbaVUur8GDiz6VNSQcEgql+c
u0ZGMxZUGVtnHOL5uPX46aj//JnAaTNV7QrnY8Vwpf2zICZY6p+xOBzExzky
xq7e95hwU+JuKt2BjwmrjixbH8aE5vi2w1Kb+djebHrUPZ4Jt2q9X7ws78Pa
FJvt2flM6FUtOT063Iv3Qntmx/9hAqvNvPDajh70DNNyuWnPgg3dGya5Oj3o
7pFVFO7IgsIBaS2ttT14xrg3K8mFBb3j1VG9Ej24IK7PuojBAlUZk8vmrd3I
ucnz7fBjwatdBis03LoxOtvlKBVNjs/Q8W5P60LJGe3PWmUssGDPZ+syu1Bb
mt00XEHO9254MDy0C/d4x8x7Vc0CkbIXh/dd78Kedf/Jr21gwb5udc23Rl2Y
flfWf/gzC3iyqz6FdnYiz/Rhx59RFvT5LNQzku3EXYt3FHxcRoGoR8a3UNFO
ZI9fueesQME6xu649qkOrP5+OW3WCgquOniIXu/owG9q0i0KaygQtuppSkvp
wJHvelEq6ylYqZPlKrOtAwOSK9iBBhQYa+5XsdbswKm+o5s7d1Fgr9rfmqrU
gbmS+5s376bgtaK8gaFwB9pKxNp/3EeB/jx/GUZ1O/4unfYasqTApvdQRtvp
dvwwV4B1+AIFAR1DNqqH2vHlT02Wix0FKa23Frntasejr5weBNlTMFz3zkNK
rR2vbbNXTXWiQMhr9+MA/me0XGUyN49BAX19f+3BeZ9Rv/PdsOwtCt6GrTXk
W7bh85DrH57GUSBi1XdGUK8Na4fCe1WfUWCpmHBTTqkNZXjnq14lkPOnKHNM
BltRMzq4LSuZAhXOct2XXq14uFoBb2VQ8HhgwfrrSS3oYLKtzPotBb0Z9ftD
77WgRe7DlYm5FOi4hjikubTgLeVSpYF3FFTPSKZ90mtBx215f2yQ3M+FYmv0
az/iguPlooqFFLjSBeXFJ5vx0tO22cUVFOTP4uiu+tyM5Xx2QXElBVJlnse2
FzajyoC7aEEVBWmHpiKc7jcjlbBaI72Ggu6L4zINK5pxX1Um05RLwQZN9vqh
Oc0Yu/e2l1oDBd6jVw7M+dqEdVGxrTQeBUu9hu9tyW7CtWWJ4omNFJg9+iry
dG8Tvii7oZz9kQLm0bQ12VpNuIZ/sd6xhYKh5Zd21SxswrI4rwnlVgpuJ/N9
hdobsfmr1FPPNgqaHBKppUWNWLH10bJVnyhYrXPug05KI0qnmoqXEH943zV9
7kojKu3l6P75TIGEHyXvfbQRC+9kXgtup+D47tN6T7Y3Ytoiy1VKHRRM1H+6
Vi7SiN8fXczf0EmBVn/zqGYMD8UMvKeXd1Nw5buGymI/Hj5PjtALJH4z7nNi
2o6HnCz5G4PEO4RViys281Akw308sYfsp3mek5kKPHTIsdUR6KWgbEHduihh
Hq5MbnM8RGymfD3iIrcB3+ysa/9OHK5aVX4gtwG1kgIXbumjoGX9CoHNVAPW
Xdpm5EGsuOWqjkJQA/onRrvmEZ+FsgvCTg0of8+c+Ys4yWh5zFfLBjS/tLBk
PZ+CL6YutdxtDSiUGtlvS6xlWTz73coGPF/HnBNO7HpCbmucWAPa+g8o5hO/
PevgcHuYi3v86f8MEE9fyqecm7kYnmlvINFPwc7LixqPcLioKWVguo444Lqd
GCRyMT432mwPcZnPe/qa+1y0HTc7aEMsGSRzRcKVi96rjPdcJT708FzSmBUX
/y212RZA/DjibWvrTi5WBt1XDSFufSohXajCxc0a76QjiRUTbAxTpbi49GnH
cAzx2efsayHj9cjg/6r86+TXounXPtXj+NbZcU+Ih3JPdp4qqke5PhGXYOIN
Ba8WGafVY5O1pK4/8dUy4b2aofV4Wnft9BXit7XHvBZdJ15/IfcU8XRTeuaf
U/VotrTfxfjvetuF+N1G9bhhtHSl+t/19lkuq1hXj8ea1tWKEZcPpRzIXFiP
grN2MPrI/ZL6Oe0XOVWHbO46OSQ+9Mcsx6erDiWK1bJDiFvFfisdeFmHQRFb
uzSIFefvt9z0uA5H51S6jJHfz1Yu7vZyrzqcznacfkM8tHbvyBeTOmRoKYjp
EG/Qil3D1a5DmXMNdwfJfrm6acQqV64OS18PicUSzxhGFQbxazH9ZgNtkuw/
g33fJpyqa1FVzdWDRXzrkL7GEXYtDugu+2lALHVmMGy1H/k893ivF9m/h+zo
ZfMu1WJW9/eTi4mfOIdOjx6sRR7fpymli4IV3rrnCxRqsTiwpKaIzMe5wAdR
KcK1yNeLPbCPOOV+V3Xw1xo0ms6pryHzpB1zZ/Op3Br0UNjYW07mzeBty9w/
ljWobFJtGkLmMz3l2ZYSXfL9/aK/vpB5lo1yvBisWIM3cvp/7STmjQuH7OVW
4+XZwbQOkgerblhKxUxW4cH0NvOeJjKvVgOO6wur0FXpQo0ccYWeZ3XRvSoM
Utietpfky5XpZ/eHFKuQ/YAZEEvyKN9nTByMKnFSxbtfso7Mm02QPVeqEs9n
MXwVaym4qC9fceFjBYpESAeqk3yTmm14J/jfCswzq6jZSPLP+tajuV2h5SjK
s4tYUEbB1H1t4YD2UjwW/8z0J4eCGscSW7mUUmw3yNnynuRt3AGrovTLpVh4
eiLR5z0Fe2R8/RqFSzFbdMvC3ySvn4TVCalo/Icynq3n3rAp2BjtPFN+rRjX
vD4cdTL1b1/Otj6lX4wqlXqxn0kftJ148n5UvBhPzxLbdTyJAj+FDx7yzCKc
/0bR35j0ST0lNeVQXIjGlaw5X59S4JScMSE9vwCjDduVLwST+Zdw8N3Zno/X
fs71yX9AwQ8XdYnLz/NxUdIPrSX3KXDRS1bmGuWjuIlOcO5tkg/VlGm4+wd8
P3f0HteXgpEBtd3/VCDSLK8eOepK+sR3grnLJQdDtPijeRYUBJq4shPFc/C7
2MSXBHPSd4uGy0US36BVPOV99yBZT/Lgz7KWbBQIL/XbR/pYsvqTyX5DNn4W
WWyUSPpcdmnRxGHZTOS6HRnJ3UD68Zwyq849GbdrFbq7i5P8d758KyQrCRdk
xgaJilKQ517gaDaUiGutR56FzSHPB6FnttdZJ+ClQ68XxwmRPsW4ltqdcXj8
a49q1AQLlmsbq1PSkXhUJ91JqJsF3x8/OfvjiRne9dFr5bxhQUlF821t8yR6
i3T03JhjLLjA+FhipZZMV315JXfHYfL8s7Jllh8thW7ls6y6y5wFe260enIz
U+nyQ1JqivtYUKHy2cV1QQZdzFFD8TqdHK/v8rxl4BVdxeWJBVuZBfZMtzD5
tBx6vZlWqt0AE7ZqfHh1IKKAfjGOb/TYmQlCVxe2nl1SQ5c9yc77NP0U5ogf
8LEZ4tHvCB9Z+pEXDb7tPH2XuDa6s3XhfoHXkfAiKuCA53AHfd7Wilt8zmNw
pM5KdVv20K9KJtRuzw2Hk3aR8oE+fPoaZvzTztFHEHTw6hbt6EG68OhryW8W
oTBrQViv1+QQXZ/ba7w6Oxgay/2/+0n+oO/JOaaibvEQLG7YbIwsGKY3ZW9P
nPh2D+zFBldUHRulr/A90FzIvAMKqcXhwgNjdMHtued+BgfBjTf65pJR4/SM
E9+6I+8GglOCPXuj5i96jPl9Z16jP4gLbbJZ1zNJdzLZLIdqfmD476Ew1dAp
eijfT8j7xU2QzZF3NFw5TWdP9KoHOfpAiMutYK3GGbpos6C4r7Y3mAXs14hh
C0BfmXBOoaknqFr5WcR7CELx/N92dAd34PXOpUIthCBVK2m+cch1qLLp2SGj
QAMB8zHeySkGdMxKnAhbQYP3y5U3PR5jwGjChYwlq2nQxtZS5Q4xYMng4DIl
DRqsbVIsNO9gwNnLw+OaujTYeHXomXMxAyZ9Z57vO0yDUlkp2TXBDFj9bIlc
0AMaCEbw7jqtZcAWo5Ya8VAa9AdeE5pUYoBJf3Tgw3Aa6ENtj/9SBjhrKI5F
xNCg8qbSj3gJBrzLWl2TkEqDr0vHJ2dG3cCsWDugsIRc36u/c22+G9heGNMz
LqfBks0W6U25bsAQzR4pr6KBpH1+w+0sN4gx3Xq6voEGbqeMdX4muQGfB3qd
XTSYw8mU7n/gBpMMoRHbPhokRTU9TQ1yg3lLC5P7B2hQ8t7Ky8nXDTZYGy3+
8YMGEx//2Sjo5gaGgnOrrozRQD3LTrTSyQ2OxJX5TUzQoPVxjkaUnRvYGd7V
dZ+iwYdGmdhLZ93g//8/oW7/+RPbT7rB/wBsWpKQ
"]]}}, {{}, {},
{RGBColor[0, 0, 1], LineBox[CompressedData["
1:eJwt13k0Ff//B3C5FGWNikqylFK0WMry6fXKEkUSWdKiULRJl3RFqntlb7Fn
794pa7RQH4S5ZStkvZaSiOx9hIQkfed3zu+POXMe58zMeb/n/Xq+5j0KThet
TvHz8fH1Ucf/na8N7J/4+5fGvfHMdukPNgP7fZf/7JijcdU2dinUpjPQQqJr
+t9fNO6+z4Xr0nMYuFbH48/FHzTuodpUUedCBr4JjRTq7qdxL2xp85poYKCQ
etsa7nsa11TLz86DzwejvU6Y3UikcS/96tQaPeGD2Qs8H/LtoHGbXJd2K2y4
ioKnTLbLHuPnyibVVpyZ8kWp9orznIgF3FsC1eKb6q+hVVmC88ZqPq70j7aO
1HfX0ff7P+fv9f4l355ZdsN+6U0suJJw9smBefJ4/uTnbhMmWkTarJ2PnyNf
eUU8Ty9koUlyiYXpt1myTmay+bbZLUyr8mn1PPKLTGftMNIaCsTjAdHL6jOm
yQeKQwYf24PR/wQtd4nUFLlBwtoqqD0U+dTkScNbk2RCUmNLOt9t/BgWH5Td
MkHm0W3CfWLu4urFbpmTBuPkuOyhgwfXROA5LVXBjtXfST32yrDnzyPRecfn
jLKyEdIq4tmLulPRqMrQ/ev+cJD81wvOFcrFIrvTutxndx9J/pn+uWPNfRy4
uUzfRKaHPFnw8d5V2QQsitlgPGjbSf6pE2ZP2CTh1qEPk1uSW8lze5/l2UWk
oFFRh/Af2wZSvu6NV43FA/TIfDIjKVVGyvWcEFdxYONWMXeWQfcbUmCF54GP
x9g4Tt8s5pnzhpT/sasm7CQb6fqZSjyTN6RK7ZTbkBsbL9dzLGL9XpP73U9/
uXOFjT+GN+3VqiXJ03zag9ej2biQNfNgD72QrLdqNuytZaPtaSV2k18mqTgm
bTalzcHQS57BkS8yyE1Rq1+K6XKwxK/sotVoOukhpPpQ+R8OKkc572pyTCOP
TK/4Y2rIwQmS6Gg0IMic2Ffmngc4uEbDdDNHMoFcd1WhyMyVg2P3413G463I
yz7ruFPRHPTjj67Ys1MHgoKsnhXGcVA9wblKWtsRWq2fVfgkcNBao704cLcX
2J9zNR9P5eCl0+eGyqMDYZvF+xslWRzk43vx17k0DiQENAXekhysqv0QqmGd
AXd8HJsjBjjoxvhYdWRTJuhkeZmqDHNQSLlDIICWBYvTx38WfOPgPt9P/ry8
bJiXy/3WMM7B2o1d9MvSTyBoxbuRpt/U/Yb0nI7h57Ct897B1eIE7oyfqPlu
mwebb8q/9pQkUOg7fZhWlgczN6Y1q6QIzEzwVNmcmA+TdovknGQIHB73YvuZ
vYTXPPX7rgoEnn9wJUbucSFcfasXk7udQP2p6bxtMkUQot3QUa5JoIg5o8k4
oAgMrF9NtWoTmDPNEHc/+goE+XRTRnUJHLW4GlIqUgIpI66nRgwILPAvLX2i
zQX6L/NLMlYE6qq9fm4ZVwbekv9dVr9AoBavNbb0XRlkLCrvSHUncKvvt6ub
58pAU/L8YVEPAte/W2EodLIcZszXxnyiEyh1yr2ZVK0ATYnsTjMGgd+SVk2q
l1ZC76byXeeZBA4YbmtPGquEEn4zuxQWgT3De4oXK1WBfNGVC7UBBH7YSQ/o
D6qCSoOO8NVBBFby3kqnHHwLu+yZF8PDCEwV8dYS7XsH7/dPRmRGEZiQFybr
u6IaYp4XdCZEExjrwP4zuLcappUKJINjCAzPqK0oz60GbXqRmm0cgQwjJVs/
Rg24bldZ/jqBQM+RnbrDWTUweuY3KyKRQPdIizX2nTVg2LS98VgSgae6ffo1
DGrBeC1XcDiZQCu/Bu+RJe/BJk6luOEBgfuV+h0O73oPCmfKhW+wCTSt/r2r
yuM9jARrbtnEIXCXjMoiouU9vLmycd6LIFCH1B+REKqD26VCaVIPCdQ8bVXv
r1sHG/d6KOZS3pR/Lc4htQ6S+ipjWh9R7/dIlO/bxjq4H6Ab5pJGoCJ/pqO2
QD1cCwSrUcoyljyVpWfq4Sltt9XPdAL5vZd9cpFtgLFMRaHGTAIdTmQ1FWg2
wHw079ieLAKf74N3IpYNMBS0r/wlZSf5My/zAxtAubmXG5xNYJHw/GMhTgPs
cai2Gaa8dDKSOFrSACmmv2f2PCbwzdviewKTDWDnJu02Tnll3sEge/FGuK/7
ezvkEEhP7r/2WLURnhZtXBxMuTrI14tvTyPc+bTtvxrKinSJc4dONsKwSE7H
4lwCrx59dDLDrxFstuq3GFFu2qNrPxfXCPlpQR98KKtuq7ewzGuEReYwmEmZ
tcrF+GFdI4QwVi5oofxJ8JfezFAjLBZoV/pNWXPs9nZzwSbYbLTLcvUTav0/
Km58sLYJKsRWBe6k/LX8X/lJvSaQfmVYcYCy/hPz5aZ2TSCgECPqRDk6/otI
Er0JshJ+HL9I+RvLmzZ2uwkOCJgVXqFs5L5k1jCzCeqL76z2pZxk/2AsrrwJ
Sh8VBvtQnjTQGhjpaoITSnV/6JTN1ao74XcTJMm1+rpSfrjCkRe1vBk8//Tw
21GeWzBZPbCtGQaeiEbtpnzoW/Brvf3NUMvx3qxC+XGrXMFdt2bYXWlcv4iy
wOvnub2sZugJzfLtpeZ7NNvk0Y7UZpj70rGtiHJ+zKfEsKJmGNKTmQijLHLj
UmRXSzO8DXpUbE/Z5ezCEI3xZlDe3hixlnLxocTrQSI8KFEau9RLrY80bPXu
UOHBCPf4MTblCikHZ9ZxHsh8e20nRnnN/OjhNh8evEyKdi2h1t97kGW5KYYH
A7qeAa6U15fk/NNcw4OTLKeBx1T9+KcbaKoM8IAYClc3pdwa0abqy98CHk+m
Aj5T9Rd4eoGMkk4L1PuIOs1R9frZMlbsyqEWsLsnPsyirK23SbDmYgscXveb
tZByv7jNBD2theonoWNzVL3vmh0arHzdAo9elJR7UI796t+1srMFYgdnc7qo
fOwpzKh9I9UKQTtpZblUnlKIf8qWb2mFRcvjx8QoT91uKjy7rxXyltdpn6Xy
l+Y0l7b0Ziss2PZbYimV10UiljedRlshKgpkVai826s4cLWF2+B6yKkW51QC
swxc/i5WboPSlLddiSkEWvgwruUdbgOp6PreP1T/iO1/4CNQ0QYbxZZVh8QT
OLggu6C9qw0aSzbKsu9T/VbuxfTj2Tbo/aLDzaP602frd5dttrbDZYWMVTVU
/1r/evxSWmI7lGhkqL+JoPrXp99Pr75sh6W3bF3y71H5mhYcs2hsB2ttxz/s
u1T/Ul/pPr3wA1QVZThevE3gy0SDs6b0D5CWmSTZHEygsXeU07DpR9BUZxGk
PzW+iGR2qfNH0Cq6z3O7Ro3vcXp3pP9HWOPrHyDqR+Wn99VxvfyPIHz6gtte
HwJ5ll8dwuU7QG+VECPMk6qnTVrW6lMdcHJFI1PXlcpnd6shneiE5sh3PGsz
aj6FZhcYxZ1w0PfYw4i91HyjuLH+LZ3wwvVWVY0JgWPGWUOhiz7D5JyQpJYR
gcezr90lzn0Gn9Kpbx361PXeyh08jS7QE9Z84adG4C9BncJVTt0wWjT1aKUI
tV70H+9T3LvhwrEa4wFhKj9dOT0Kvt3gnZfGerqIwKcFiiIborthTD++dyeN
wNPnRBw1K7vBtlrFT2GWg7yGLoH9ql/ApELY7hD1vX+aGGjpP/EFxBJ4DGtq
P1AjFTggztcDA3P/hN0o5mB/2C1/tmgPTOaJCmcVcnC1X8Dj8g09sFLHw2Yi
j4PBR5lCSxx74Out+jj7DA6ekPPnxtX0gEyiKt/1exyUSL289dnDXhC/EFi1
/zgHL3JcJL7a9sFtD+fs2jE23vGJT7rj3AdC2cJiHv+xMdeyboOORx+Uzhmp
Sg6zcXR+x+47IZR3RSeZ97Lx/JEl9J3FfbDkr2V5Rgsbz0o/bw5X6Adu8JX5
mUI2ng78G6v1rR9OZViJSNxk4/GzCXJBNwfhun5TN7WFxJCD3joaSSNw+oHY
CZB4gALSMf3XZ0ch0vGCq+RQMrbV3BoLEB+H3VLLj+U0J6KNr5N2QtkEzC8a
C2WmxOP5JSOKdQ6TkHaGL0UjLQ7lsytjFw7/BP0Xb9fY8WLQt8DQWjxxGuhH
RNb0zUehR9r5l9pbfkHcSYnc0nORKMK/w0m9bxYax2uvJH26h8YXDsWoRs2B
t63V9KOJOyhTKHfRWHkeqi1F38/dD8dIenDE1ra/0JafG6S8LxStAg+oJb/k
wyc6d0YO2QWj6pEAm4fXFuCazAvWOxMDsbVfmBNlw487rgpIlvUHYJ1T3+6l
8jR8vq2yofEyC78IpM/EKNJQzceB8fQiCyfT3J7IrqehsZpGfsQZFsqOjKxW
UKOhnXJN75FjLHTxnJjeokfDcdKZT9yYhbOsvzn77WgoWuMi/12ahesfya4M
uUvD2IHEiDsvmahj0tEgEkU9P3HwXMlTJpoPJQXdi6VhnYhR/mgWEy+prf0Z
l0xDEQYr1D6VicUv1jekZdPQ9mnV5r3BTLSq1Agsr6Jh914Nk2QHJp5y+6lv
WkNDKSlLxsQhJjIW//ujpo6GLjMbBPcdYGKyhe7J5hYaWrLC1fiMmDjYivo9
vTT0d3oUH6zGxFkG/49TAzR8pq0aMqbCRNFV5ZlDwzR8etSzxkGRidsdTVaM
j9NQ1qfbUHsFE40XCNd5/aThOqL2SrokE+2J6oCZGRp+DxSdXSnCxLPG4Xp+
czTk3gp+d28hE////xEvM5X6hBYw8X8h6BJw
"]]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-2.5, 2.5}, Automatic},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{{3.65401717310271*^9, 3.654017187829471*^9},
3.654017373231942*^9, {3.6540192724811373`*^9, 3.654019295101372*^9}, {
3.658076192083295*^9, 3.658076207327387*^9}, 3.658076247547501*^9,
3.6625776031328707`*^9, 3.6625778241482553`*^9, 3.662577944294787*^9,
3.662578391828827*^9, 3.662578446612812*^9, 3.6625805574766693`*^9,
3.662580840309733*^9, 3.66258162442422*^9, 3.6625818707149887`*^9,
3.662582072670968*^9, 3.662583238967751*^9, {3.662583435200075*^9,
3.662583464417943*^9}, {3.6625876706874638`*^9, 3.6625876887332163`*^9},
3.6625877657034407`*^9, {3.662588106650714*^9, 3.662588117118709*^9}, {
3.662588182585125*^9, 3.662588203294806*^9}, 3.662588485947481*^9, {
3.662588547844042*^9, 3.662588562638043*^9}, 3.66259699002208*^9,
3.6625990342621107`*^9, 3.66260098937784*^9}]
}, Open ]],
Cell["\<\
The following sums the competitive impact felt by an individual of phenotype \
u exerted by all individuals (grey)\
\>", "Text",
CellChangeTimes->{{3.658075190925829*^9, 3.6580752068114223`*^9}, {
3.658075541506732*^9, 3.6580755784304743`*^9}, {3.658076166027096*^9,
3.6580761819691687`*^9}, {3.658076486638575*^9, 3.65807648742222*^9}, {
3.662587704021105*^9, 3.6625877056046457`*^9}, {3.6625879709321117`*^9,
3.662587974315638*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[",
RowBox[{"%", ",", "\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"Sum", "[",
RowBox[{
RowBox[{"a", "[",
RowBox[{"u", ",",
RowBox[{"genotypes1", "[",
RowBox[{"[", "i", "]"}], "]"}], ",", "try\[Sigma]\[Alpha]", ",",
"try\[Beta]"}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "genotypes1", "]"}]}], "}"}]}], "]"}], "+",
RowBox[{"Sum", "[",
RowBox[{
RowBox[{"a", "[",
RowBox[{"u", ",",
RowBox[{"genotypes2", "[",
RowBox[{"[", "i", "]"}], "]"}], ",", "try\[Sigma]\[Alpha]", ",",
"try\[Beta]"}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "genotypes2", "]"}]}], "}"}]}], "]"}]}],
")"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2.5"}], ",", "2.5"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Black", ",", "Thin"}], "}"}]}]}], "]"}]}],
"\[IndentingNewLine]", "]"}]], "Input",
CellChangeTimes->{{3.662587681889565*^9, 3.662587694319735*^9}, {
3.66258792777945*^9, 3.662587928809368*^9}, {3.6625880950572844`*^9,
3.662588096681275*^9}, {3.6625884667051773`*^9, 3.662588467828451*^9}, {
3.669320188197513*^9, 3.669320189297553*^9}}],
Cell[BoxData[
GraphicsBox[{{{{}, {},
{RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJwt13k0VP8bB3BMScjWJiWkzRbFt42apxCVVESLSikt8rWVTGXNlnaEsmTm
kj0qGUl6JuvXvo1BKLtBqSyRxO/TOb8/5sx5nZl77/nc+Tzv9x0lG0czWyEB
AYF+8vr77tG3b3hmhsaRy7hoZHzPB3pvLBprmaJxgirN/yiE+ICp1Ofx7F80
ztKKd96/wn1AcYvTH8cRGidl44qRl0wfyL8dItLeS+PkzfoStfm1D4isa1zO
qaRx0jUk02JafODRlVN7vaNonI9VTXsr1G5CquDleIFNNM7srFzk196E2bZG
G5acEOJ46GqAuqUfzG8qsqeCBTk+P6QT3vf6g1lB5BmVMgFOtUZMkFxEINz4
ts3+YdcMyv/qFNWPCYI3bpF2GfuncSx81+qkzDtgGmKhOP1kCnM+5DXf0L4P
RjF5psZfJvHLsf8MpFwfQkLJNd5lq18o7/e7M7EpGE76PVpYnTSOr5O/2ct6
hoLnKVq62PyfSPuh7ndUJQwENBRQ338UlUd6690HwuHjnSeBqQ3D+O+CF86x
3x7DMtELyaM7f+D5xLPHNPsi4dI/qrNbln1DDbaVUur8GDiz6VNSQcEgql+c
u0ZGMxZUGVtnHOL5uPX46aj//JnAaTNV7QrnY8Vwpf2zICZY6p+xOBzExzky
xq7e95hwU+JuKt2BjwmrjixbH8aE5vi2w1Kb+djebHrUPZ4Jt2q9X7ws78Pa
FJvt2flM6FUtOT063Iv3Qntmx/9hAqvNvPDajh70DNNyuWnPgg3dGya5Oj3o
7pFVFO7IgsIBaS2ttT14xrg3K8mFBb3j1VG9Ej24IK7PuojBAlUZk8vmrd3I
ucnz7fBjwatdBis03LoxOtvlKBVNjs/Q8W5P60LJGe3PWmUssGDPZ+syu1Bb
mt00XEHO9254MDy0C/d4x8x7Vc0CkbIXh/dd78Kedf/Jr21gwb5udc23Rl2Y
flfWf/gzC3iyqz6FdnYiz/Rhx59RFvT5LNQzku3EXYt3FHxcRoGoR8a3UNFO
ZI9fueesQME6xu649qkOrP5+OW3WCgquOniIXu/owG9q0i0KaygQtuppSkvp
wJHvelEq6ylYqZPlKrOtAwOSK9iBBhQYa+5XsdbswKm+o5s7d1Fgr9rfmqrU
gbmS+5s376bgtaK8gaFwB9pKxNp/3EeB/jx/GUZ1O/4unfYasqTApvdQRtvp
dvwwV4B1+AIFAR1DNqqH2vHlT02Wix0FKa23Frntasejr5weBNlTMFz3zkNK
rR2vbbNXTXWiQMhr9+MA/me0XGUyN49BAX19f+3BeZ9Rv/PdsOwtCt6GrTXk
W7bh85DrH57GUSBi1XdGUK8Na4fCe1WfUWCpmHBTTqkNZXjnq14lkPOnKHNM
BltRMzq4LSuZAhXOct2XXq14uFoBb2VQ8HhgwfrrSS3oYLKtzPotBb0Z9ftD
77WgRe7DlYm5FOi4hjikubTgLeVSpYF3FFTPSKZ90mtBx215f2yQ3M+FYmv0
az/iguPlooqFFLjSBeXFJ5vx0tO22cUVFOTP4uiu+tyM5Xx2QXElBVJlnse2
FzajyoC7aEEVBWmHpiKc7jcjlbBaI72Ggu6L4zINK5pxX1Um05RLwQZN9vqh
Oc0Yu/e2l1oDBd6jVw7M+dqEdVGxrTQeBUu9hu9tyW7CtWWJ4omNFJg9+iry
dG8Tvii7oZz9kQLm0bQ12VpNuIZ/sd6xhYKh5Zd21SxswrI4rwnlVgpuJ/N9
hdobsfmr1FPPNgqaHBKppUWNWLH10bJVnyhYrXPug05KI0qnmoqXEH943zV9
7kojKu3l6P75TIGEHyXvfbQRC+9kXgtup+D47tN6T7Y3Ytoiy1VKHRRM1H+6
Vi7SiN8fXczf0EmBVn/zqGYMD8UMvKeXd1Nw5buGymI/Hj5PjtALJH4z7nNi
2o6HnCz5G4PEO4RViys281Akw308sYfsp3mek5kKPHTIsdUR6KWgbEHduihh
Hq5MbnM8RGymfD3iIrcB3+ysa/9OHK5aVX4gtwG1kgIXbumjoGX9CoHNVAPW
Xdpm5EGsuOWqjkJQA/onRrvmEZ+FsgvCTg0of8+c+Ys4yWh5zFfLBjS/tLBk
PZ+CL6YutdxtDSiUGtlvS6xlWTz73coGPF/HnBNO7HpCbmucWAPa+g8o5hO/
PevgcHuYi3v86f8MEE9fyqecm7kYnmlvINFPwc7LixqPcLioKWVguo444Lqd
GCRyMT432mwPcZnPe/qa+1y0HTc7aEMsGSRzRcKVi96rjPdcJT708FzSmBUX
/y212RZA/DjibWvrTi5WBt1XDSFufSohXajCxc0a76QjiRUTbAxTpbi49GnH
cAzx2efsayHj9cjg/6r86+TXounXPtXj+NbZcU+Ih3JPdp4qqke5PhGXYOIN
Ba8WGafVY5O1pK4/8dUy4b2aofV4Wnft9BXit7XHvBZdJ15/IfcU8XRTeuaf
U/VotrTfxfjvetuF+N1G9bhhtHSl+t/19lkuq1hXj8ea1tWKEZcPpRzIXFiP
grN2MPrI/ZL6Oe0XOVWHbO46OSQ+9Mcsx6erDiWK1bJDiFvFfisdeFmHQRFb
uzSIFefvt9z0uA5H51S6jJHfz1Yu7vZyrzqcznacfkM8tHbvyBeTOmRoKYjp
EG/Qil3D1a5DmXMNdwfJfrm6acQqV64OS18PicUSzxhGFQbxazH9ZgNtkuw/
g33fJpyqa1FVzdWDRXzrkL7GEXYtDugu+2lALHVmMGy1H/k893ivF9m/h+zo
ZfMu1WJW9/eTi4mfOIdOjx6sRR7fpymli4IV3rrnCxRqsTiwpKaIzMe5wAdR
KcK1yNeLPbCPOOV+V3Xw1xo0ms6pryHzpB1zZ/Op3Br0UNjYW07mzeBty9w/
ljWobFJtGkLmMz3l2ZYSXfL9/aK/vpB5lo1yvBisWIM3cvp/7STmjQuH7OVW
4+XZwbQOkgerblhKxUxW4cH0NvOeJjKvVgOO6wur0FXpQo0ccYWeZ3XRvSoM
Utietpfky5XpZ/eHFKuQ/YAZEEvyKN9nTByMKnFSxbtfso7Mm02QPVeqEs9n
MXwVaym4qC9fceFjBYpESAeqk3yTmm14J/jfCswzq6jZSPLP+tajuV2h5SjK
s4tYUEbB1H1t4YD2UjwW/8z0J4eCGscSW7mUUmw3yNnynuRt3AGrovTLpVh4
eiLR5z0Fe2R8/RqFSzFbdMvC3ySvn4TVCalo/Icynq3n3rAp2BjtPFN+rRjX
vD4cdTL1b1/Otj6lX4wqlXqxn0kftJ148n5UvBhPzxLbdTyJAj+FDx7yzCKc
/0bR35j0ST0lNeVQXIjGlaw5X59S4JScMSE9vwCjDduVLwST+Zdw8N3Zno/X
fs71yX9AwQ8XdYnLz/NxUdIPrSX3KXDRS1bmGuWjuIlOcO5tkg/VlGm4+wd8
P3f0HteXgpEBtd3/VCDSLK8eOepK+sR3grnLJQdDtPijeRYUBJq4shPFc/C7
2MSXBHPSd4uGy0US36BVPOV99yBZT/Lgz7KWbBQIL/XbR/pYsvqTyX5DNn4W
WWyUSPpcdmnRxGHZTOS6HRnJ3UD68Zwyq849GbdrFbq7i5P8d758KyQrCRdk
xgaJilKQ517gaDaUiGutR56FzSHPB6FnttdZJ+ClQ68XxwmRPsW4ltqdcXj8
a49q1AQLlmsbq1PSkXhUJ91JqJsF3x8/OfvjiRne9dFr5bxhQUlF821t8yR6
i3T03JhjLLjA+FhipZZMV315JXfHYfL8s7Jllh8thW7ls6y6y5wFe260enIz
U+nyQ1JqivtYUKHy2cV1QQZdzFFD8TqdHK/v8rxl4BVdxeWJBVuZBfZMtzD5
tBx6vZlWqt0AE7ZqfHh1IKKAfjGOb/TYmQlCVxe2nl1SQ5c9yc77NP0U5ogf
8LEZ4tHvCB9Z+pEXDb7tPH2XuDa6s3XhfoHXkfAiKuCA53AHfd7Wilt8zmNw
pM5KdVv20K9KJtRuzw2Hk3aR8oE+fPoaZvzTztFHEHTw6hbt6EG68OhryW8W
oTBrQViv1+QQXZ/ba7w6Oxgay/2/+0n+oO/JOaaibvEQLG7YbIwsGKY3ZW9P
nPh2D+zFBldUHRulr/A90FzIvAMKqcXhwgNjdMHtued+BgfBjTf65pJR4/SM
E9+6I+8GglOCPXuj5i96jPl9Z16jP4gLbbJZ1zNJdzLZLIdqfmD476Ew1dAp
eijfT8j7xU2QzZF3NFw5TWdP9KoHOfpAiMutYK3GGbpos6C4r7Y3mAXs14hh
C0BfmXBOoaknqFr5WcR7CELx/N92dAd34PXOpUIthCBVK2m+cch1qLLp2SGj
QAMB8zHeySkGdMxKnAhbQYP3y5U3PR5jwGjChYwlq2nQxtZS5Q4xYMng4DIl
DRqsbVIsNO9gwNnLw+OaujTYeHXomXMxAyZ9Z57vO0yDUlkp2TXBDFj9bIlc
0AMaCEbw7jqtZcAWo5Ya8VAa9AdeE5pUYoBJf3Tgw3Aa6ENtj/9SBjhrKI5F
xNCg8qbSj3gJBrzLWl2TkEqDr0vHJ2dG3cCsWDugsIRc36u/c22+G9heGNMz
LqfBks0W6U25bsAQzR4pr6KBpH1+w+0sN4gx3Xq6voEGbqeMdX4muQGfB3qd
XTSYw8mU7n/gBpMMoRHbPhokRTU9TQ1yg3lLC5P7B2hQ8t7Ky8nXDTZYGy3+
8YMGEx//2Sjo5gaGgnOrrozRQD3LTrTSyQ2OxJX5TUzQoPVxjkaUnRvYGd7V
dZ+iwYdGmdhLZ93g//8/oW7/+RPbT7rB/wBsWpKQ
"]]}}, {{}, {},
{RGBColor[0, 0, 1], LineBox[CompressedData["
1:eJwt13k0Ff//B3C5FGWNikqylFK0WMry6fXKEkUSWdKiULRJl3RFqntlb7Fn
794pa7RQH4S5ZStkvZaSiOx9hIQkfed3zu+POXMe58zMeb/n/Xq+5j0KThet
TvHz8fH1Ucf/na8N7J/4+5fGvfHMdukPNgP7fZf/7JijcdU2dinUpjPQQqJr
+t9fNO6+z4Xr0nMYuFbH48/FHzTuodpUUedCBr4JjRTq7qdxL2xp85poYKCQ
etsa7nsa11TLz86DzwejvU6Y3UikcS/96tQaPeGD2Qs8H/LtoHGbXJd2K2y4
ioKnTLbLHuPnyibVVpyZ8kWp9orznIgF3FsC1eKb6q+hVVmC88ZqPq70j7aO
1HfX0ff7P+fv9f4l355ZdsN+6U0suJJw9smBefJ4/uTnbhMmWkTarJ2PnyNf
eUU8Ty9koUlyiYXpt1myTmay+bbZLUyr8mn1PPKLTGftMNIaCsTjAdHL6jOm
yQeKQwYf24PR/wQtd4nUFLlBwtoqqD0U+dTkScNbk2RCUmNLOt9t/BgWH5Td
MkHm0W3CfWLu4urFbpmTBuPkuOyhgwfXROA5LVXBjtXfST32yrDnzyPRecfn
jLKyEdIq4tmLulPRqMrQ/ev+cJD81wvOFcrFIrvTutxndx9J/pn+uWPNfRy4
uUzfRKaHPFnw8d5V2QQsitlgPGjbSf6pE2ZP2CTh1qEPk1uSW8lze5/l2UWk
oFFRh/Af2wZSvu6NV43FA/TIfDIjKVVGyvWcEFdxYONWMXeWQfcbUmCF54GP
x9g4Tt8s5pnzhpT/sasm7CQb6fqZSjyTN6RK7ZTbkBsbL9dzLGL9XpP73U9/
uXOFjT+GN+3VqiXJ03zag9ej2biQNfNgD72QrLdqNuytZaPtaSV2k18mqTgm
bTalzcHQS57BkS8yyE1Rq1+K6XKwxK/sotVoOukhpPpQ+R8OKkc572pyTCOP
TK/4Y2rIwQmS6Gg0IMic2Ffmngc4uEbDdDNHMoFcd1WhyMyVg2P3413G463I
yz7ruFPRHPTjj67Ys1MHgoKsnhXGcVA9wblKWtsRWq2fVfgkcNBao704cLcX
2J9zNR9P5eCl0+eGyqMDYZvF+xslWRzk43vx17k0DiQENAXekhysqv0QqmGd
AXd8HJsjBjjoxvhYdWRTJuhkeZmqDHNQSLlDIICWBYvTx38WfOPgPt9P/ry8
bJiXy/3WMM7B2o1d9MvSTyBoxbuRpt/U/Yb0nI7h57Ct897B1eIE7oyfqPlu
mwebb8q/9pQkUOg7fZhWlgczN6Y1q6QIzEzwVNmcmA+TdovknGQIHB73YvuZ
vYTXPPX7rgoEnn9wJUbucSFcfasXk7udQP2p6bxtMkUQot3QUa5JoIg5o8k4
oAgMrF9NtWoTmDPNEHc/+goE+XRTRnUJHLW4GlIqUgIpI66nRgwILPAvLX2i
zQX6L/NLMlYE6qq9fm4ZVwbekv9dVr9AoBavNbb0XRlkLCrvSHUncKvvt6ub
58pAU/L8YVEPAte/W2EodLIcZszXxnyiEyh1yr2ZVK0ATYnsTjMGgd+SVk2q
l1ZC76byXeeZBA4YbmtPGquEEn4zuxQWgT3De4oXK1WBfNGVC7UBBH7YSQ/o
D6qCSoOO8NVBBFby3kqnHHwLu+yZF8PDCEwV8dYS7XsH7/dPRmRGEZiQFybr
u6IaYp4XdCZEExjrwP4zuLcappUKJINjCAzPqK0oz60GbXqRmm0cgQwjJVs/
Rg24bldZ/jqBQM+RnbrDWTUweuY3KyKRQPdIizX2nTVg2LS98VgSgae6ffo1
DGrBeC1XcDiZQCu/Bu+RJe/BJk6luOEBgfuV+h0O73oPCmfKhW+wCTSt/r2r
yuM9jARrbtnEIXCXjMoiouU9vLmycd6LIFCH1B+REKqD26VCaVIPCdQ8bVXv
r1sHG/d6KOZS3pR/Lc4htQ6S+ipjWh9R7/dIlO/bxjq4H6Ab5pJGoCJ/pqO2
QD1cCwSrUcoyljyVpWfq4Sltt9XPdAL5vZd9cpFtgLFMRaHGTAIdTmQ1FWg2
wHw079ieLAKf74N3IpYNMBS0r/wlZSf5My/zAxtAubmXG5xNYJHw/GMhTgPs
cai2Gaa8dDKSOFrSACmmv2f2PCbwzdviewKTDWDnJu02Tnll3sEge/FGuK/7
ezvkEEhP7r/2WLURnhZtXBxMuTrI14tvTyPc+bTtvxrKinSJc4dONsKwSE7H
4lwCrx59dDLDrxFstuq3GFFu2qNrPxfXCPlpQR98KKtuq7ewzGuEReYwmEmZ
tcrF+GFdI4QwVi5oofxJ8JfezFAjLBZoV/pNWXPs9nZzwSbYbLTLcvUTav0/
Km58sLYJKsRWBe6k/LX8X/lJvSaQfmVYcYCy/hPz5aZ2TSCgECPqRDk6/otI
Er0JshJ+HL9I+RvLmzZ2uwkOCJgVXqFs5L5k1jCzCeqL76z2pZxk/2AsrrwJ
Sh8VBvtQnjTQGhjpaoITSnV/6JTN1ao74XcTJMm1+rpSfrjCkRe1vBk8//Tw
21GeWzBZPbCtGQaeiEbtpnzoW/Brvf3NUMvx3qxC+XGrXMFdt2bYXWlcv4iy
wOvnub2sZugJzfLtpeZ7NNvk0Y7UZpj70rGtiHJ+zKfEsKJmGNKTmQijLHLj
UmRXSzO8DXpUbE/Z5ezCEI3xZlDe3hixlnLxocTrQSI8KFEau9RLrY80bPXu
UOHBCPf4MTblCikHZ9ZxHsh8e20nRnnN/OjhNh8evEyKdi2h1t97kGW5KYYH
A7qeAa6U15fk/NNcw4OTLKeBx1T9+KcbaKoM8IAYClc3pdwa0abqy98CHk+m
Aj5T9Rd4eoGMkk4L1PuIOs1R9frZMlbsyqEWsLsnPsyirK23SbDmYgscXveb
tZByv7jNBD2theonoWNzVL3vmh0arHzdAo9elJR7UI796t+1srMFYgdnc7qo
fOwpzKh9I9UKQTtpZblUnlKIf8qWb2mFRcvjx8QoT91uKjy7rxXyltdpn6Xy
l+Y0l7b0Ziss2PZbYimV10UiljedRlshKgpkVai826s4cLWF2+B6yKkW51QC
swxc/i5WboPSlLddiSkEWvgwruUdbgOp6PreP1T/iO1/4CNQ0QYbxZZVh8QT
OLggu6C9qw0aSzbKsu9T/VbuxfTj2Tbo/aLDzaP602frd5dttrbDZYWMVTVU
/1r/evxSWmI7lGhkqL+JoPrXp99Pr75sh6W3bF3y71H5mhYcs2hsB2ttxz/s
u1T/Ul/pPr3wA1QVZThevE3gy0SDs6b0D5CWmSTZHEygsXeU07DpR9BUZxGk
PzW+iGR2qfNH0Cq6z3O7Ro3vcXp3pP9HWOPrHyDqR+Wn99VxvfyPIHz6gtte
HwJ5ll8dwuU7QG+VECPMk6qnTVrW6lMdcHJFI1PXlcpnd6shneiE5sh3PGsz
aj6FZhcYxZ1w0PfYw4i91HyjuLH+LZ3wwvVWVY0JgWPGWUOhiz7D5JyQpJYR
gcezr90lzn0Gn9Kpbx361PXeyh08jS7QE9Z84adG4C9BncJVTt0wWjT1aKUI
tV70H+9T3LvhwrEa4wFhKj9dOT0Kvt3gnZfGerqIwKcFiiIborthTD++dyeN
wNPnRBw1K7vBtlrFT2GWg7yGLoH9ql/ApELY7hD1vX+aGGjpP/EFxBJ4DGtq
P1AjFTggztcDA3P/hN0o5mB/2C1/tmgPTOaJCmcVcnC1X8Dj8g09sFLHw2Yi
j4PBR5lCSxx74Out+jj7DA6ekPPnxtX0gEyiKt/1exyUSL289dnDXhC/EFi1
/zgHL3JcJL7a9sFtD+fs2jE23vGJT7rj3AdC2cJiHv+xMdeyboOORx+Uzhmp
Sg6zcXR+x+47IZR3RSeZ97Lx/JEl9J3FfbDkr2V5Rgsbz0o/bw5X6Adu8JX5
mUI2ng78G6v1rR9OZViJSNxk4/GzCXJBNwfhun5TN7WFxJCD3joaSSNw+oHY
CZB4gALSMf3XZ0ch0vGCq+RQMrbV3BoLEB+H3VLLj+U0J6KNr5N2QtkEzC8a
C2WmxOP5JSOKdQ6TkHaGL0UjLQ7lsytjFw7/BP0Xb9fY8WLQt8DQWjxxGuhH
RNb0zUehR9r5l9pbfkHcSYnc0nORKMK/w0m9bxYax2uvJH26h8YXDsWoRs2B
t63V9KOJOyhTKHfRWHkeqi1F38/dD8dIenDE1ra/0JafG6S8LxStAg+oJb/k
wyc6d0YO2QWj6pEAm4fXFuCazAvWOxMDsbVfmBNlw487rgpIlvUHYJ1T3+6l
8jR8vq2yofEyC78IpM/EKNJQzceB8fQiCyfT3J7IrqehsZpGfsQZFsqOjKxW
UKOhnXJN75FjLHTxnJjeokfDcdKZT9yYhbOsvzn77WgoWuMi/12ahesfya4M
uUvD2IHEiDsvmahj0tEgEkU9P3HwXMlTJpoPJQXdi6VhnYhR/mgWEy+prf0Z
l0xDEQYr1D6VicUv1jekZdPQ9mnV5r3BTLSq1Agsr6Jh914Nk2QHJp5y+6lv
WkNDKSlLxsQhJjIW//ujpo6GLjMbBPcdYGKyhe7J5hYaWrLC1fiMmDjYivo9
vTT0d3oUH6zGxFkG/49TAzR8pq0aMqbCRNFV5ZlDwzR8etSzxkGRidsdTVaM
j9NQ1qfbUHsFE40XCNd5/aThOqL2SrokE+2J6oCZGRp+DxSdXSnCxLPG4Xp+
czTk3gp+d28hE////xEvM5X6hBYw8X8h6BJw
"]]}}}, {{}, {},
{GrayLevel[0], Thickness[Tiny], LineBox[CompressedData["
1:eJwt13k4F9sfB3B8JYUI2UrWJEsLl264nU8kRCpKXa7IXimFIlubtexblqxl
374zJFTO1541O0VyI8lWRCLLb+7z/P6YZ57XM3OeOTPnvD/njISVk5EtCxMT
0xR1/Hf2/nJibn2dxni/Mab9yFAIjHkKLAys0BjiVlpb2MZCwJDn4+KLJRoD
XsbztU6HgPih66tOP2iM7h1zt61XQ6D6YST78BiN4frkXC+xIxTY9/btZLTS
GEa6rX09ZqEQ7WqpfzeRxohsbrDTGgyFPGaXZ0wHaYyZ8dqipc9hsMFWR0nY
nIVRVxsUQZeNAL7+Osf0CGbGp9u/BeTsI8GoJsF6TxMTIz+qVn3hdRR4fvvL
MXxkHTsf8KprPRcDZW4Jl4tOruHcjKT7tauxYBh5VnwtfgWrJe6uj/gZBzpJ
rw11p5axsX313j6RRMhsuN3rYraEv2sL+mmeSIILvtHb3mYvYlZ1m1C/iRTw
saQVcvD9xMEaebFtx9OASVEMa/nN47JhewuH5+nw/lF8QF7PHB6xm96+1/wZ
7NjskDOvOYvzLQfPMlgy4YqK3IaBHd9wibx6796RLLA+OJRdUzOJkbf5tetN
OSDnrrZ+7dk4jhVgPp0RnQdpH4xrbx/5jC9EK1xN9iyAL/e2aegIfcK3XAo5
4vYUQUWMrPa4yQcs8Hqd3cCeDuxmX6yZNT5glpgqrH+ZDibimfdFJD7gK+I3
vPWu0mEuV4phMDmITfZIbUAudNjD2KlO3BnEsic/bua9Q4e4Cf4DHtkD+BDz
lR0msXS4iZhFOZffYfHHpmy6NXSoZmWo7/r4Dgcwdiey1tOBp8nH9HDtO6ys
27NQ+YYO+WdWHl8PfYdtSvgXFNroMHppkbdH8h1e0zv3ebqfDkbR0+zJ+v1Y
59r8CPMMHfZ/fTe/L6kXW7oqONoKEOD6XXGPoG8vrh6aVikQIqBs8Z752uVe
bCIbPTgnQsARNrn6lj97cUjaaoWbGAFGUh6PL3X34MtmcTH2sgTcNBdRe8rR
g5X/MIwYOkRARYfpHQGPLiwfznNF3IyAtf7C4lXLLqyxfkVNwpwAzWGW8VGd
Lvz02+QrMQsCmmdyTxVv68KWhv6926wJGOT4LXGK6MSZ+qVqY5cJWNdOrA0a
78BeMs8YAh4EHK0Y2LRq0o4luBr/LYwloDA341CDejt2HvIMDowjQCjR6VKE
eDuOLWf+2yKBgN5Ftkj97re4uv6iEWsyAbs8TXiSltuwbONUunwGAdX3FjhB
pxUz2g5kzpAExFoFOXbztGLRYaP++BICLmmJtji8b8F2k6SQZikBPBu0H0Vc
bcHu3x/joHICLAKjN41ENeN/pnX9FzABK6HKbP7DjdggS5D5cAsB7U4NtiK5
jVhm6XNEeSsBT0+Z1RW6NGJe/UgxpbcEHOd94NvH1ojv3rutKNJJQHxMJ8se
xTdYrSV/sa6PANUnN9abb9fjjIcy1x59IuB6TtGvrXw1eDAqNb5hgYD9W649
0ByuxpX+hx3afhIw66ywxaWgGiecEPLpXCTAWSNHqlunGosEb/PuXKLG6226
YaxXFWbTKHhBrBLwY0JeT6UF4z/kTVKnWElwLcm+EGuHMTctK6lhAwk/vXe5
LjJhbGCv+y6FjYRfPGIp5SqV2NnNY5MuOwkrqrwLf6W8wu0Lo8iNgwS2B79S
jzmXY3qV+ZNTW0kIMLhZmsVZjnuZq7TXKbMLzDWzZ5XhwFFpmTxeEjbnTP5s
GniB7f8xerjMRwL32yGDk9qlONrjXI+bAAnhcWZW9I/P8fjWN/I8giTwWvW7
bfV4jtuF5EozKPMvdKR3FZZg06nztm+ESBDaXvfrnFAxzjfvk5oSISF+9MiW
cpLEGjyHea5tJ0GksFJK5ASJ02WnFKcpix4pMxy8R2BOty+/P+0gQavNRK+q
twi7CB54n7+ThGMXT7k+4CjCtT7JukJiJOjO66VoQyH+sGHL2F3KBiJ/LTTm
5OOA7Jl8PXESTOyk0jq9cvD+8CnrcgkSHt5wCYx8no3FpYZSOCVJeO1V42Q0
k4VbirfsMqcsHWV9uNMiE4/sstv8k/L55OJdkXEZuPa04uXDUiQ8yqFxGXU8
w53crry+lOfw04EOzaeYtbpdfaM0CTLNP6ojPNOxb1Tkq6OU/+7Vyj1dkobf
kPJ+dygzpkbcO3alYkcf/ekpyuPf7BmSr5NxbmJQsNguEk6ysYel703CRV+4
XE5S3qmsq5C+NQGjPvttWZT99MaXJR7E4Zo7TB1tlKcsAhvT5mOxgoVt1w/K
xrdk4yTsYnBnrOcOARkSKoLf2KX1ReHs8j35KpQlnjqoSOhF4v1t5+4bUQ4s
Z2dNqwjHTie+JTtSHko5nXHkfCi2lBpg9qVc0BKheUT9EVYq2pgXR9lzqeMj
7AzEoTVWCbmU9WR4vYHZD89lDLwtpyxobCQCo/ewK7e1fj3l5nVppzuh3phV
cZKznbLD3xk5PmfccHmyPX8fZdbiXaPeIjew+u3WiwOUQdjgr2WGLc49yrcw
SPl7XLzNbLwRvru6v+2/614s0XXH/jyEcvnFp/9rvzfBuoFf1QL5OA2c7viv
/8LEDAe3Ixq3t1hpoGys3P/K/4grMmjNmXpJufTdufsBnh7IcaRcsoAyF2NS
qtb0Liq1Dk9OpIyi8vxr3R4gVe99lgGUb9hd+Vob7Y+SuxPsr1NOPyRvUEcE
oQDfvhITyt2ck4V1bcFoQXRKR40y23Du1vrJMMSfPSy+nfKTv1XUrH0jEHta
JVqixkdFK+bKCG8UOroW/qybcpvCwhPrtGgULG9zsoAyE9PzdevKx0huTdvN
hHL8V/4DowbxqLrTdV6GslKXq5XNQAJq7R19MU/NH5vMP+psfiWh1qX+rYGU
V8Oif476p6AArqDsE5SbNZajyIepSFK904/nv/tlTOuUhNNRPnscfyg1f/dv
3zzkPJyO1K8a1OtSXuWu+ElmPUXJNzdhJsqxS8KyyqoZyOSoqL8DlYeGlncP
lY2zUUmd9zVBKk8O7u8bzORzEFkwf6+Eyhu79ACrLy0XKfEHWBlSPu456NNd
nIe2+H985E7ls2XPR+eb/EVIT+u3X6YoCY49H4uSpopQ7vQAuxxlf7j+08qK
jkod2k1zqfzvnrqu/EiNQD5hQlfTqPrgoOVcMDBBooLdMcaXhEn4M36u+ZtJ
MWLVvHmui6o37N+cJ2g1xchW5YuCGuWcBJfdCokl6FbulxNrVP2amHVN89Iv
RXAl3dmSn3p+qluMaH45yuRSTQ3eQoLGz8XiA0IVaGdR3mQNFwmcBu6d2r4V
6D7HMe5fnFQeFt25r/3zEgm96B82oerrjKFHUCXnayRr7P1yZiMJZT6VlUWq
DKTWIlEfwERCas5aa7kjA1W+9egMXicgsPvwh5p0BlJfL8ahawScl8O/+7ZU
IRUPTRS0QsBSD/6T6UsVMpvJHz3/iwA1xSry1OMadP39xAXrbwSodPfGVjbW
IM1q/4XjM9R64znlobBSg94eJD/smyZAplFQi/1iLdocti9jdoIAPttrXViu
DrWJXpY8O0bA1JPt83sr61G9NenwZJCAFM5bKlyfG1GPZde2Aw0EJBQ/EvYU
bEIhZyf219ZR669p2uq4XhNakogvOVNLQHB2S11tYRPaNMy3dLWKAPejUiZe
7s1IyOZg6L2X1H7Eq/3WJEcrOmNRk69YRADLrW2DNsLtyGfKRzk1mgBTy9zO
sj/akYK0YuqrSALI46iR81Q7Oib3Q7o3nAArsUulJf7tqPyatBdTCLUfePMq
nHW+Hd09ohyg5EfAg+022s/aOtAG8SRdrpsEsFaRhSMPupAo8+OKLCMCNnKe
umc104scm2/yNW2gvu9uU4bqpj50UjI37iiNgFxNm/XN0n2o+5P881dMBBje
dvcu/rsPaa6cfpnxmw6xY6m3Wev6kKy2/D6zWTrIVM3eyEzsR6ZXdI3PDtJB
+1aU1YTuezSWWPUhik6HB8O9Ws5PP6Bj/55dyzGiAz3R/5TP3L+I/4Xa6wax
InBKt+EZNfmMdN1V+R0NC+DC5QTRgHvjKDJYej/45kHQ6VuHlJ9MoksiX7+o
vswBVv6YsTvLM2hCWK5/e3sW9DX7ffflnkXH7P6sceTPhLOeVqoJNXNogdBx
QvrPwJFjUrLNdB49OXtmg/7LdBDLq49lm1hAO+X49uQYpoFnmZYxd+IiOr7Z
N1ypLgWuZzqWqu5bQnaP+sZyziUBJ8tBq72fl9Emoa+sXnMJoH31TIxc1Ary
TZlcieyIA6FyUSdt6TXEkF5e0WR9DJHOgRH7+9bR92P9jV2HY8DI/6RiUikT
RLxlf2aGo0DOzPfsM29muBt/k1XhUiT0jm1KjzrLAsf0HEN+CEZAm9XnI7xi
NFAaAA3m+TD4lzXrV4wkDYLZp6K8JsJgPtOhSFiGBiWB+o2/h8NAeHJyh4Qi
Da6ED9RtaAsDG5e5xX3qNOD8bdqlkx0Gyw/WC06co4Fzn2PeffMwkMkQFgkK
o4GA8sb++qZQOKQz0M4ZRQNJi11XK6pCweDrk4DwWBp8z1fIIspC4Yai+MLj
JKr9IX5aXmYovHou056ZRwODw1pyjfdDwahe2b+2gQaum7LLCPVQsHVY0NBt
poF4kcfbIaVQcN/84kdzGw0c926+zi0XCkmGahe7eqj3KabreAqFwngvaHwa
ocF9zTuS3gshsOzO8sP2Cw38fGPP10+FANf22pyvEzTg15Dg4BsNASULHcHZ
WRrE2P0eKu0MAW3mTW2uCzR4ucq8ytUUAuefNvn++kUDc+OJcIeqELisHazu
tUKD1Nmt8fVlIfD//1W4INfHJ0sPgf8BihVIrg==
"]]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-2.5, 2.5}, Automatic},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{3.662588493285687*^9, 3.6625885701217337`*^9,
3.6625969975020247`*^9, 3.662599041604278*^9, 3.6626009970257053`*^9}]
}, Open ]],
Cell["The following adds the resource distribution (black):", "Text",
CellChangeTimes->{{3.658076288037281*^9, 3.6580763014525347`*^9}, {
3.658076373076785*^9, 3.658076378521894*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{"competitionplot", ",", "\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",", "u", ",", "tryKm"}],
"]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2.5"}], ",", "2.5"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Thick", ",", "Black"}], "}"}]}]}], "]"}]}],
"\[IndentingNewLine]", "]"}]], "Input",
CellChangeTimes->{{3.658076255457404*^9, 3.6580762835585957`*^9},
3.6580763806995564`*^9, {3.662580570699234*^9, 3.662580592937047*^9}, {
3.662581947188558*^9, 3.662581948132234*^9}}],
Cell[BoxData[
GraphicsBox[{{{{}, {},
{RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJwt13k0VP8bB3BMScjWJiWkzRbFt42apxCVVESLSikt8rWVTGXNlnaEsmTm
kj0qGUl6JuvXvo1BKLtBqSyRxO/TOb8/5sx5nZl77/nc+Tzv9x0lG0czWyEB
AYF+8vr77tG3b3hmhsaRy7hoZHzPB3pvLBprmaJxgirN/yiE+ICp1Ofx7F80
ztKKd96/wn1AcYvTH8cRGidl44qRl0wfyL8dItLeS+PkzfoStfm1D4isa1zO
qaRx0jUk02JafODRlVN7vaNonI9VTXsr1G5CquDleIFNNM7srFzk196E2bZG
G5acEOJ46GqAuqUfzG8qsqeCBTk+P6QT3vf6g1lB5BmVMgFOtUZMkFxEINz4
ts3+YdcMyv/qFNWPCYI3bpF2GfuncSx81+qkzDtgGmKhOP1kCnM+5DXf0L4P
RjF5psZfJvHLsf8MpFwfQkLJNd5lq18o7/e7M7EpGE76PVpYnTSOr5O/2ct6
hoLnKVq62PyfSPuh7ndUJQwENBRQ338UlUd6690HwuHjnSeBqQ3D+O+CF86x
3x7DMtELyaM7f+D5xLPHNPsi4dI/qrNbln1DDbaVUur8GDiz6VNSQcEgql+c
u0ZGMxZUGVtnHOL5uPX46aj//JnAaTNV7QrnY8Vwpf2zICZY6p+xOBzExzky
xq7e95hwU+JuKt2BjwmrjixbH8aE5vi2w1Kb+djebHrUPZ4Jt2q9X7ws78Pa
FJvt2flM6FUtOT063Iv3Qntmx/9hAqvNvPDajh70DNNyuWnPgg3dGya5Oj3o
7pFVFO7IgsIBaS2ttT14xrg3K8mFBb3j1VG9Ej24IK7PuojBAlUZk8vmrd3I
ucnz7fBjwatdBis03LoxOtvlKBVNjs/Q8W5P60LJGe3PWmUssGDPZ+syu1Bb
mt00XEHO9254MDy0C/d4x8x7Vc0CkbIXh/dd78Kedf/Jr21gwb5udc23Rl2Y
flfWf/gzC3iyqz6FdnYiz/Rhx59RFvT5LNQzku3EXYt3FHxcRoGoR8a3UNFO
ZI9fueesQME6xu649qkOrP5+OW3WCgquOniIXu/owG9q0i0KaygQtuppSkvp
wJHvelEq6ylYqZPlKrOtAwOSK9iBBhQYa+5XsdbswKm+o5s7d1Fgr9rfmqrU
gbmS+5s376bgtaK8gaFwB9pKxNp/3EeB/jx/GUZ1O/4unfYasqTApvdQRtvp
dvwwV4B1+AIFAR1DNqqH2vHlT02Wix0FKa23Frntasejr5weBNlTMFz3zkNK
rR2vbbNXTXWiQMhr9+MA/me0XGUyN49BAX19f+3BeZ9Rv/PdsOwtCt6GrTXk
W7bh85DrH57GUSBi1XdGUK8Na4fCe1WfUWCpmHBTTqkNZXjnq14lkPOnKHNM
BltRMzq4LSuZAhXOct2XXq14uFoBb2VQ8HhgwfrrSS3oYLKtzPotBb0Z9ftD
77WgRe7DlYm5FOi4hjikubTgLeVSpYF3FFTPSKZ90mtBx215f2yQ3M+FYmv0
az/iguPlooqFFLjSBeXFJ5vx0tO22cUVFOTP4uiu+tyM5Xx2QXElBVJlnse2
FzajyoC7aEEVBWmHpiKc7jcjlbBaI72Ggu6L4zINK5pxX1Um05RLwQZN9vqh
Oc0Yu/e2l1oDBd6jVw7M+dqEdVGxrTQeBUu9hu9tyW7CtWWJ4omNFJg9+iry
dG8Tvii7oZz9kQLm0bQ12VpNuIZ/sd6xhYKh5Zd21SxswrI4rwnlVgpuJ/N9
hdobsfmr1FPPNgqaHBKppUWNWLH10bJVnyhYrXPug05KI0qnmoqXEH943zV9
7kojKu3l6P75TIGEHyXvfbQRC+9kXgtup+D47tN6T7Y3Ytoiy1VKHRRM1H+6
Vi7SiN8fXczf0EmBVn/zqGYMD8UMvKeXd1Nw5buGymI/Hj5PjtALJH4z7nNi
2o6HnCz5G4PEO4RViys281Akw308sYfsp3mek5kKPHTIsdUR6KWgbEHduihh
Hq5MbnM8RGymfD3iIrcB3+ysa/9OHK5aVX4gtwG1kgIXbumjoGX9CoHNVAPW
Xdpm5EGsuOWqjkJQA/onRrvmEZ+FsgvCTg0of8+c+Ys4yWh5zFfLBjS/tLBk
PZ+CL6YutdxtDSiUGtlvS6xlWTz73coGPF/HnBNO7HpCbmucWAPa+g8o5hO/
PevgcHuYi3v86f8MEE9fyqecm7kYnmlvINFPwc7LixqPcLioKWVguo444Lqd
GCRyMT432mwPcZnPe/qa+1y0HTc7aEMsGSRzRcKVi96rjPdcJT708FzSmBUX
/y212RZA/DjibWvrTi5WBt1XDSFufSohXajCxc0a76QjiRUTbAxTpbi49GnH
cAzx2efsayHj9cjg/6r86+TXounXPtXj+NbZcU+Ih3JPdp4qqke5PhGXYOIN
Ba8WGafVY5O1pK4/8dUy4b2aofV4Wnft9BXit7XHvBZdJ15/IfcU8XRTeuaf
U/VotrTfxfjvetuF+N1G9bhhtHSl+t/19lkuq1hXj8ea1tWKEZcPpRzIXFiP
grN2MPrI/ZL6Oe0XOVWHbO46OSQ+9Mcsx6erDiWK1bJDiFvFfisdeFmHQRFb
uzSIFefvt9z0uA5H51S6jJHfz1Yu7vZyrzqcznacfkM8tHbvyBeTOmRoKYjp
EG/Qil3D1a5DmXMNdwfJfrm6acQqV64OS18PicUSzxhGFQbxazH9ZgNtkuw/
g33fJpyqa1FVzdWDRXzrkL7GEXYtDugu+2lALHVmMGy1H/k893ivF9m/h+zo
ZfMu1WJW9/eTi4mfOIdOjx6sRR7fpymli4IV3rrnCxRqsTiwpKaIzMe5wAdR
KcK1yNeLPbCPOOV+V3Xw1xo0ms6pryHzpB1zZ/Op3Br0UNjYW07mzeBty9w/
ljWobFJtGkLmMz3l2ZYSXfL9/aK/vpB5lo1yvBisWIM3cvp/7STmjQuH7OVW
4+XZwbQOkgerblhKxUxW4cH0NvOeJjKvVgOO6wur0FXpQo0ccYWeZ3XRvSoM
Utietpfky5XpZ/eHFKuQ/YAZEEvyKN9nTByMKnFSxbtfso7Mm02QPVeqEs9n
MXwVaym4qC9fceFjBYpESAeqk3yTmm14J/jfCswzq6jZSPLP+tajuV2h5SjK
s4tYUEbB1H1t4YD2UjwW/8z0J4eCGscSW7mUUmw3yNnynuRt3AGrovTLpVh4
eiLR5z0Fe2R8/RqFSzFbdMvC3ySvn4TVCalo/Icynq3n3rAp2BjtPFN+rRjX
vD4cdTL1b1/Otj6lX4wqlXqxn0kftJ148n5UvBhPzxLbdTyJAj+FDx7yzCKc
/0bR35j0ST0lNeVQXIjGlaw5X59S4JScMSE9vwCjDduVLwST+Zdw8N3Zno/X
fs71yX9AwQ8XdYnLz/NxUdIPrSX3KXDRS1bmGuWjuIlOcO5tkg/VlGm4+wd8
P3f0HteXgpEBtd3/VCDSLK8eOepK+sR3grnLJQdDtPijeRYUBJq4shPFc/C7
2MSXBHPSd4uGy0US36BVPOV99yBZT/Lgz7KWbBQIL/XbR/pYsvqTyX5DNn4W
WWyUSPpcdmnRxGHZTOS6HRnJ3UD68Zwyq849GbdrFbq7i5P8d758KyQrCRdk
xgaJilKQ517gaDaUiGutR56FzSHPB6FnttdZJ+ClQ68XxwmRPsW4ltqdcXj8
a49q1AQLlmsbq1PSkXhUJ91JqJsF3x8/OfvjiRne9dFr5bxhQUlF821t8yR6
i3T03JhjLLjA+FhipZZMV315JXfHYfL8s7Jllh8thW7ls6y6y5wFe260enIz
U+nyQ1JqivtYUKHy2cV1QQZdzFFD8TqdHK/v8rxl4BVdxeWJBVuZBfZMtzD5
tBx6vZlWqt0AE7ZqfHh1IKKAfjGOb/TYmQlCVxe2nl1SQ5c9yc77NP0U5ogf
8LEZ4tHvCB9Z+pEXDb7tPH2XuDa6s3XhfoHXkfAiKuCA53AHfd7Wilt8zmNw
pM5KdVv20K9KJtRuzw2Hk3aR8oE+fPoaZvzTztFHEHTw6hbt6EG68OhryW8W
oTBrQViv1+QQXZ/ba7w6Oxgay/2/+0n+oO/JOaaibvEQLG7YbIwsGKY3ZW9P
nPh2D+zFBldUHRulr/A90FzIvAMKqcXhwgNjdMHtued+BgfBjTf65pJR4/SM
E9+6I+8GglOCPXuj5i96jPl9Z16jP4gLbbJZ1zNJdzLZLIdqfmD476Ew1dAp
eijfT8j7xU2QzZF3NFw5TWdP9KoHOfpAiMutYK3GGbpos6C4r7Y3mAXs14hh
C0BfmXBOoaknqFr5WcR7CELx/N92dAd34PXOpUIthCBVK2m+cch1qLLp2SGj
QAMB8zHeySkGdMxKnAhbQYP3y5U3PR5jwGjChYwlq2nQxtZS5Q4xYMng4DIl
DRqsbVIsNO9gwNnLw+OaujTYeHXomXMxAyZ9Z57vO0yDUlkp2TXBDFj9bIlc
0AMaCEbw7jqtZcAWo5Ya8VAa9AdeE5pUYoBJf3Tgw3Aa6ENtj/9SBjhrKI5F
xNCg8qbSj3gJBrzLWl2TkEqDr0vHJ2dG3cCsWDugsIRc36u/c22+G9heGNMz
LqfBks0W6U25bsAQzR4pr6KBpH1+w+0sN4gx3Xq6voEGbqeMdX4muQGfB3qd
XTSYw8mU7n/gBpMMoRHbPhokRTU9TQ1yg3lLC5P7B2hQ8t7Ky8nXDTZYGy3+
8YMGEx//2Sjo5gaGgnOrrozRQD3LTrTSyQ2OxJX5TUzQoPVxjkaUnRvYGd7V
dZ+iwYdGmdhLZ93g//8/oW7/+RPbT7rB/wBsWpKQ
"]]}}, {{}, {},
{RGBColor[0, 0, 1], LineBox[CompressedData["
1:eJwt13k0Ff//B3C5FGWNikqylFK0WMry6fXKEkUSWdKiULRJl3RFqntlb7Fn
794pa7RQH4S5ZStkvZaSiOx9hIQkfed3zu+POXMe58zMeb/n/Xq+5j0KThet
TvHz8fH1Ucf/na8N7J/4+5fGvfHMdukPNgP7fZf/7JijcdU2dinUpjPQQqJr
+t9fNO6+z4Xr0nMYuFbH48/FHzTuodpUUedCBr4JjRTq7qdxL2xp85poYKCQ
etsa7nsa11TLz86DzwejvU6Y3UikcS/96tQaPeGD2Qs8H/LtoHGbXJd2K2y4
ioKnTLbLHuPnyibVVpyZ8kWp9orznIgF3FsC1eKb6q+hVVmC88ZqPq70j7aO
1HfX0ff7P+fv9f4l355ZdsN+6U0suJJw9smBefJ4/uTnbhMmWkTarJ2PnyNf
eUU8Ty9koUlyiYXpt1myTmay+bbZLUyr8mn1PPKLTGftMNIaCsTjAdHL6jOm
yQeKQwYf24PR/wQtd4nUFLlBwtoqqD0U+dTkScNbk2RCUmNLOt9t/BgWH5Td
MkHm0W3CfWLu4urFbpmTBuPkuOyhgwfXROA5LVXBjtXfST32yrDnzyPRecfn
jLKyEdIq4tmLulPRqMrQ/ev+cJD81wvOFcrFIrvTutxndx9J/pn+uWPNfRy4
uUzfRKaHPFnw8d5V2QQsitlgPGjbSf6pE2ZP2CTh1qEPk1uSW8lze5/l2UWk
oFFRh/Af2wZSvu6NV43FA/TIfDIjKVVGyvWcEFdxYONWMXeWQfcbUmCF54GP
x9g4Tt8s5pnzhpT/sasm7CQb6fqZSjyTN6RK7ZTbkBsbL9dzLGL9XpP73U9/
uXOFjT+GN+3VqiXJ03zag9ej2biQNfNgD72QrLdqNuytZaPtaSV2k18mqTgm
bTalzcHQS57BkS8yyE1Rq1+K6XKwxK/sotVoOukhpPpQ+R8OKkc572pyTCOP
TK/4Y2rIwQmS6Gg0IMic2Ffmngc4uEbDdDNHMoFcd1WhyMyVg2P3413G463I
yz7ruFPRHPTjj67Ys1MHgoKsnhXGcVA9wblKWtsRWq2fVfgkcNBao704cLcX
2J9zNR9P5eCl0+eGyqMDYZvF+xslWRzk43vx17k0DiQENAXekhysqv0QqmGd
AXd8HJsjBjjoxvhYdWRTJuhkeZmqDHNQSLlDIICWBYvTx38WfOPgPt9P/ry8
bJiXy/3WMM7B2o1d9MvSTyBoxbuRpt/U/Yb0nI7h57Ct897B1eIE7oyfqPlu
mwebb8q/9pQkUOg7fZhWlgczN6Y1q6QIzEzwVNmcmA+TdovknGQIHB73YvuZ
vYTXPPX7rgoEnn9wJUbucSFcfasXk7udQP2p6bxtMkUQot3QUa5JoIg5o8k4
oAgMrF9NtWoTmDPNEHc/+goE+XRTRnUJHLW4GlIqUgIpI66nRgwILPAvLX2i
zQX6L/NLMlYE6qq9fm4ZVwbekv9dVr9AoBavNbb0XRlkLCrvSHUncKvvt6ub
58pAU/L8YVEPAte/W2EodLIcZszXxnyiEyh1yr2ZVK0ATYnsTjMGgd+SVk2q
l1ZC76byXeeZBA4YbmtPGquEEn4zuxQWgT3De4oXK1WBfNGVC7UBBH7YSQ/o
D6qCSoOO8NVBBFby3kqnHHwLu+yZF8PDCEwV8dYS7XsH7/dPRmRGEZiQFybr
u6IaYp4XdCZEExjrwP4zuLcappUKJINjCAzPqK0oz60GbXqRmm0cgQwjJVs/
Rg24bldZ/jqBQM+RnbrDWTUweuY3KyKRQPdIizX2nTVg2LS98VgSgae6ffo1
DGrBeC1XcDiZQCu/Bu+RJe/BJk6luOEBgfuV+h0O73oPCmfKhW+wCTSt/r2r
yuM9jARrbtnEIXCXjMoiouU9vLmycd6LIFCH1B+REKqD26VCaVIPCdQ8bVXv
r1sHG/d6KOZS3pR/Lc4htQ6S+ipjWh9R7/dIlO/bxjq4H6Ab5pJGoCJ/pqO2
QD1cCwSrUcoyljyVpWfq4Sltt9XPdAL5vZd9cpFtgLFMRaHGTAIdTmQ1FWg2
wHw079ieLAKf74N3IpYNMBS0r/wlZSf5My/zAxtAubmXG5xNYJHw/GMhTgPs
cai2Gaa8dDKSOFrSACmmv2f2PCbwzdviewKTDWDnJu02Tnll3sEge/FGuK/7
ezvkEEhP7r/2WLURnhZtXBxMuTrI14tvTyPc+bTtvxrKinSJc4dONsKwSE7H
4lwCrx59dDLDrxFstuq3GFFu2qNrPxfXCPlpQR98KKtuq7ewzGuEReYwmEmZ
tcrF+GFdI4QwVi5oofxJ8JfezFAjLBZoV/pNWXPs9nZzwSbYbLTLcvUTav0/
Km58sLYJKsRWBe6k/LX8X/lJvSaQfmVYcYCy/hPz5aZ2TSCgECPqRDk6/otI
Er0JshJ+HL9I+RvLmzZ2uwkOCJgVXqFs5L5k1jCzCeqL76z2pZxk/2AsrrwJ
Sh8VBvtQnjTQGhjpaoITSnV/6JTN1ao74XcTJMm1+rpSfrjCkRe1vBk8//Tw
21GeWzBZPbCtGQaeiEbtpnzoW/Brvf3NUMvx3qxC+XGrXMFdt2bYXWlcv4iy
wOvnub2sZugJzfLtpeZ7NNvk0Y7UZpj70rGtiHJ+zKfEsKJmGNKTmQijLHLj
UmRXSzO8DXpUbE/Z5ezCEI3xZlDe3hixlnLxocTrQSI8KFEau9RLrY80bPXu
UOHBCPf4MTblCikHZ9ZxHsh8e20nRnnN/OjhNh8evEyKdi2h1t97kGW5KYYH
A7qeAa6U15fk/NNcw4OTLKeBx1T9+KcbaKoM8IAYClc3pdwa0abqy98CHk+m
Aj5T9Rd4eoGMkk4L1PuIOs1R9frZMlbsyqEWsLsnPsyirK23SbDmYgscXveb
tZByv7jNBD2theonoWNzVL3vmh0arHzdAo9elJR7UI796t+1srMFYgdnc7qo
fOwpzKh9I9UKQTtpZblUnlKIf8qWb2mFRcvjx8QoT91uKjy7rxXyltdpn6Xy
l+Y0l7b0Ziss2PZbYimV10UiljedRlshKgpkVai826s4cLWF2+B6yKkW51QC
swxc/i5WboPSlLddiSkEWvgwruUdbgOp6PreP1T/iO1/4CNQ0QYbxZZVh8QT
OLggu6C9qw0aSzbKsu9T/VbuxfTj2Tbo/aLDzaP602frd5dttrbDZYWMVTVU
/1r/evxSWmI7lGhkqL+JoPrXp99Pr75sh6W3bF3y71H5mhYcs2hsB2ttxz/s
u1T/Ul/pPr3wA1QVZThevE3gy0SDs6b0D5CWmSTZHEygsXeU07DpR9BUZxGk
PzW+iGR2qfNH0Cq6z3O7Ro3vcXp3pP9HWOPrHyDqR+Wn99VxvfyPIHz6gtte
HwJ5ll8dwuU7QG+VECPMk6qnTVrW6lMdcHJFI1PXlcpnd6shneiE5sh3PGsz
aj6FZhcYxZ1w0PfYw4i91HyjuLH+LZ3wwvVWVY0JgWPGWUOhiz7D5JyQpJYR
gcezr90lzn0Gn9Kpbx361PXeyh08jS7QE9Z84adG4C9BncJVTt0wWjT1aKUI
tV70H+9T3LvhwrEa4wFhKj9dOT0Kvt3gnZfGerqIwKcFiiIborthTD++dyeN
wNPnRBw1K7vBtlrFT2GWg7yGLoH9ql/ApELY7hD1vX+aGGjpP/EFxBJ4DGtq
P1AjFTggztcDA3P/hN0o5mB/2C1/tmgPTOaJCmcVcnC1X8Dj8g09sFLHw2Yi
j4PBR5lCSxx74Out+jj7DA6ekPPnxtX0gEyiKt/1exyUSL289dnDXhC/EFi1
/zgHL3JcJL7a9sFtD+fs2jE23vGJT7rj3AdC2cJiHv+xMdeyboOORx+Uzhmp
Sg6zcXR+x+47IZR3RSeZ97Lx/JEl9J3FfbDkr2V5Rgsbz0o/bw5X6Adu8JX5
mUI2ng78G6v1rR9OZViJSNxk4/GzCXJBNwfhun5TN7WFxJCD3joaSSNw+oHY
CZB4gALSMf3XZ0ch0vGCq+RQMrbV3BoLEB+H3VLLj+U0J6KNr5N2QtkEzC8a
C2WmxOP5JSOKdQ6TkHaGL0UjLQ7lsytjFw7/BP0Xb9fY8WLQt8DQWjxxGuhH
RNb0zUehR9r5l9pbfkHcSYnc0nORKMK/w0m9bxYax2uvJH26h8YXDsWoRs2B
t63V9KOJOyhTKHfRWHkeqi1F38/dD8dIenDE1ra/0JafG6S8LxStAg+oJb/k
wyc6d0YO2QWj6pEAm4fXFuCazAvWOxMDsbVfmBNlw487rgpIlvUHYJ1T3+6l
8jR8vq2yofEyC78IpM/EKNJQzceB8fQiCyfT3J7IrqehsZpGfsQZFsqOjKxW
UKOhnXJN75FjLHTxnJjeokfDcdKZT9yYhbOsvzn77WgoWuMi/12ahesfya4M
uUvD2IHEiDsvmahj0tEgEkU9P3HwXMlTJpoPJQXdi6VhnYhR/mgWEy+prf0Z
l0xDEQYr1D6VicUv1jekZdPQ9mnV5r3BTLSq1Agsr6Jh914Nk2QHJp5y+6lv
WkNDKSlLxsQhJjIW//ujpo6GLjMbBPcdYGKyhe7J5hYaWrLC1fiMmDjYivo9
vTT0d3oUH6zGxFkG/49TAzR8pq0aMqbCRNFV5ZlDwzR8etSzxkGRidsdTVaM
j9NQ1qfbUHsFE40XCNd5/aThOqL2SrokE+2J6oCZGRp+DxSdXSnCxLPG4Xp+
czTk3gp+d28hE////xEvM5X6hBYw8X8h6BJw
"]]}}}, {{}, {},
{GrayLevel[0], Thickness[Large], LineBox[CompressedData["
1:eJw12Hk4Vl20AHDeg4QipTKlEkUavnzGyl5IUipDyFymZJ4TSoYM6cs8k8xT
hveQUOy3TBmSKRJCJaKJSETuuc9z71/n+f1x9jln77XWXmfvsnDWsaYxMTFx
MzMx/e/1xuTZubU1gjEWYFJuNX0VPvluXRhaIRjnk0Qs3xF2cI5ndPHxEsF4
Oe0n4ChsBzsVXFadfxKMqq6Nba1advD8Tgz72CeCkWFmHRNQbQfsBwd2MF4S
jF1PL64tRNhDnMelM7dSCcYWh/13NVUdoZjZPYdJjmCkOxErJ3xdQF63iC1Z
mmAozfgLid11geaccdt/DhOMtnWsgZvTXWBMXeuAhQTBeNT457ggdoGt9w5U
NQgSjJCeuzYDhCsECky1hDARjGia7sf1Ua5wUdp0hquNxiCGX7DEVrgBq7X6
EX5TGmOrZeV9XglP6DH7x2DGkMY4pNkvdeWYJ9y/KOhXp09j2EnNs7ad9wRZ
ze9Nl7VojDvG7ZW1Xp5gI51oWKRKY4xOmjefavKEF8yTt45K0hgV9esbhK29
4O79kFemi8wM8cj7Z4fKrsHmN00OWdHMDC395dnd7j6g05BiKdHGxGC98YYh
dfYW+H4/7hD1YQ1bonRdsWPBUH0txa7s/F/8NNFhx63AMDgXo7fzb/IK/iM7
/6yo/z9QT687d+rLMjb/UPVtbCIa8lqu97sbL+HDNWtfFZjiwSw4ju9VwSLO
NTJjEXmUBDcvEaWcm39h7e/SoiLX0oDpgAhWvT2PdXj3bTc+8gDeRiSHFr+e
wyeFtv3L5ZIFQhy2hfMqs5gtO1IwPzkH7GUkWYeEvmNNsbqMJ8t5YCn3rqCh
YQaTtwgh/rOFIOmtuOaUM4VTK25nv71SDJkjuo3XlSfwtpBTHdzRJTAZwHdM
fft7POw3LUbYlwHHjbLvsRzv8eZ6LrM0tzI46K2RPbYyjpelI/P/8SkDL6cb
HD7j45idrd1cK7wM2Iwn3jwsGsfaMrRV0/wy2PPvI0/e4+P4Cp4oqXpfBhaf
LpSNXB7DU+tO7N29vxxq4/epTemP4DlLocssSeXAbjxpyXxsBLOYrHbIpJaD
/s68QIFdI9hXw+uT1f1ymCsSZWjODOO4wCnBpznlIMHYcZTuP4wfuW20Pkcv
h6TpLf/4FAzhljuBfMxt5eCJmIW5lgfxnOfQmbilcnjOwjgqNjqI76w6uXmv
lANP200jpcZB3F2ltNVorRweXlhJdLk3iNdVdrziY6XDx6uLvK93D+Lot57v
nXjooBP3lf3+mTfYv1X+VJ44HQ5/Hpw/lN6Pf5rvsNypTQePHwcktgX345yf
5tdv69KhejHA9K9dP95st6owpUcHZTbJ5g75fnxCYUtVnhE1nqhP4tW+13jE
zdxvnRUdPE0FFLM5X2Pug78NDbzoUNtt5L/VpxdLKR/Tkkimw983pRWrl3qx
dSdbjXIqHVTGaFMf1XuxXpLaQ4N0OrR/K9Kq4OvFlQnWB/0y6TDM+WeXFr0H
h7dqheYX0mFNLbUxfKobuw+oM0Jq6HCidmj9qn4X3rahQOLyAB1Ki3IVWo52
4e6J807nB+mwPdX5avTOLmwltK9UcYgO/YtsMWf6XuHNpy8Kso/SQcxXnyd9
uRPb7IiLvPmJDs8DFrhA/SU+JeRMDM7TIcEi3KGP5yU+3KoWnPCLDldVhTts
33bg9R9qf2j9pgMPq1pEtGMHfpvXE/b0Dx3Mw+LWf4htx7ba2mlONBJW7kmz
hYy1Yq3hyDvHuUnocm6xFihqxcRuZNTKQ0K2lnFTqXsrVvWMXKfDS8Jp3qDg
ATbKHh2LhnwkJMf30CQOvMDtFaLbTwiSIJvmutZ+vRkPSHAW3hInwaWw7Pem
zQ3YIInjc7wiCYc3OgWpjD3HF9c1/VdwlIRZN6mN7iXPcSt91aL6GAluxwpF
+9SfY5fKL2mvlEjwfJV1LsHvGT6ORJSHVUj4Ob1fQ6YD49FnG987nibBo7LA
LMEG42C/Wj3dMyT8uiHmsciEcdLWsDkZTRJ+84hk1MjUY7Wh0dy5s9T3yvIu
HM94iuecpaY0tElgC/r94KRbDVZ7MRPsbEBCqKZnVT5XDRbUyTXee5EE9q1z
7ez51Xis2EtvmDJH4cyvtqHHWI11A/24EQncr95pnlerwnML7GsjJiREJRlb
lI8+wlfVvCdumpLAa/Hm2iafR5gf+3wRMiNhy0J3Vm9pJTZx5THWMidhu2DT
b4PtFVhCsoSMu0zN50fljTUkiZ8/ehu/w4IEgdJ6UYGzJP7O4ZiYS1lYufrc
cAAdMxKezxdZkqDaqa/xrL8MR724tynWmoSTl7U8gjjLcEqt7DirDQmn5jUy
1KAU276wf+lJWVPg+EJr4UOsd6R4WfMKCfo2opk9foXY0nRD9htbEu64uofF
PCrAo7IjEUeuklDn1+Cs8y0f32OLeBhOeU+spVKPeR72ifkQd8iOhIv3K8Ri
knLx5j8qJjcpRxQSG3S6c3A3+dmojfIczh7qVsnGBmeCVw3tSRBv//k82jcL
W8zJZqZTNuxXLdKuzMQnPUt931FmfPng3S32ABsGXuszcCBh6vsVxu66+7jh
e7ROFOXzbOyRWQfTceEabV0z5R3Sp6SyNqXgM9VhvBKOJNzWmFreFZSE31q6
XNWn/MU8rDVzPgEXP77w6xZlXa99Sbts4nGs+e6aAsq1d1/YZA7E4rIzLfSX
lHdl28rs0ojBduVHxr5TDqthZ8msjcIJbHonuJ1IeJehnat88R525tz5bj/l
ko5oFeWjETifEVKiRtl3qXsUdoRhN4cbpAllDXHeG8B8G0cmL31xobxNV0cA
Pgbgc9vmTAIpt6/tcfa/dwMnLZnRoinbGuYW3rxwDf9MUhhJo8xSIfbxhoAr
jojx+5pLGfg1jy8zrLHMC1Hph5R/JCVbzSbrYMdLUqVllP1ocU0n5RXQpeY4
s3LKB1MsW7bImqPJQpMTpf/7/vz0b5zcDihiLdi8kLKu9JunIcoeKJCJpzyT
ctWgQWCorw8ql2SWTaS8gTEj2mh0C2WA6Ww4ZRRbHNJ4LQgFa0i+v07Z1cb+
c2NcCDoc7cx+hXKWwn7NJno42lIgY6VNuY9rprSp8y6SsQxZkKfMNla0qXkm
EokNOzwVppxmKKNoGRyNVlwWqteo+ZZRjbf/wBuLtBsPzLyj3Cm1kGaZGYf2
1u3RfUKZienRmmV9InKIjmq0p5z8ecs/HzWTUVWURCeifKTXw8JqKAWJ3Gjd
sImyVd6/TVa/05GfrsehYipeViPjfn0MyUCNgSWbPCi3H1uOJe88QKTEaUlF
ylbiRk1H+LNQ7YXta3VUPB4W5HjnNpaFnI8HPvGlvMpd+4vMz0ZDNoxSWcoJ
S/z7pGVzEfcBecUcKt5bOgbvSOsWIHnh3ilTKl9svd+2GO8vRPuXUp+sUvnF
vmeIJZgoQtFmVqdSKJ/2Hb7ZV1GM0rnaolqpfOyQGHXz3FKGfiSJf2Ci8tXh
9WhZ+pcyJC0hfDeEyu8QcPllYVGOJsS//mCnvPeLi3SEIh2dd9/7nbCinqfq
VjI0TaKwdy+aeqh6Ip881/5dvwIpKqjoKVFm/+42TTRUICnFd1l5l0goTHHf
K5VaiU7WNVx3pOrR9KxHpt+ZKnQn9K5IH1XPHB5cixd+WIPc61dSWKn6eOzX
YsU/22vRpJqR7HF9Erg0vXvUgmtRyPPqeFc9Kh8WvbmdTJ6g7vNSWV26JHw7
5xNez1WHVvXk/l7RIqH6Zn19mSwDcb9gSK6cIuFB4d+XNQ4MJC3XeIyJclif
0khDFgP1TJgIMKtT9UUS/xnY+Ay5GjopLp0gYek1lmeafIbWS+oINwAJigee
kVqJDWhaLPNrnRwVP339CfWtDSh+wFInW5ZaP98vPlIrDaj27uP52zJU/Wnd
psp+uRHNB+6eV5EmYbO1Uy+WbEIHpRlfUg9S9SJNcP5gfTMyCFhVattDQgaX
l8yGiVa065vTNSFqf0ypiOD33daGer3qcos2UOtvlLk6pdGGmMd998hykXC3
oKOpsbQN+Vcs8KmtJ8H7hKi+n3c7MkkYGVIhSNDx6/Ka4XyJJFSsI+up/Zrm
xTdsxd+FLHz3kk+o/d/oUlFP9b9dqK9HSPgV1R+Qp1Erl1YXujSm4TdK9Q8W
IlerKkO6kFS9q+BiL9UPvHgaxTLfhcgI02XmDjoECVqp5XR2o9OXBiRDn9CB
5RlZ+iGoF/n5q+41SKKDSbF6rlxGL9IILZLnTKBDZfxwakRtL2oyu2TxNJYO
VnZs4dKzvShoMp3YGkmHps1GlkFmfah1eCEj7zYdQmyYt4sqvEZ1ypaGSm50
WMelFWDxrR+RwYvjWhp0uLjXiCG7fgDlT4aNVp2kQ5GK1RrHngFUVhYnL3CC
Dueue9+oMBxA//lfpg0qUf3LpwfXWZoGEMvaCr/cv3QQfzbrmpf6Bv0V9A3x
2kEHNa9Yi+lTb9G31IJlztlyCBrrV3XLHkGOeaa87++VQ3lqiNbNuXHkef3H
lW/+ZeCcZcXzUX8CWSiquk0GlYCZXYpwaMAUgpNHTg7eLIZwbS8F6bQZ9DZ9
NETethBYtsR/8l/+hkS8KmMf8+bDQPvtH8Hcs8hadx+L5HgO6PlayKY0zCGl
Rzy02LAscOCc2d1pNI/EE4NjMq4+AJHi5gS26QX0WVNFbvdwGvhWq+pypy6i
4g5Rrsi+JHDJc6iSPbSEdgZ8VasxiQcumpzFwYlldFbsKavKz2hQc7wQLxm7
gn4cqgt0+/ofbK8Rdlbb8xfpmpxVv8IcDjFuYdGHB9bQV8mcg7bGwaATcv5A
ehUT5Cx/drPPvAWSxsF6OTeYgebKrx3O6guGrlW8LAHMIN/2oyf/iw+EhU69
sgxmhrzajd5ven1gokLztGgEMwiz+FO/Nz7wgIsPZSUxA4eq7q1r4AN89bn7
HlQww5nm0PQx/+vAtKvlT+pnZvgvMyrqA6c39H9anxWrR4Pa/bnvJ/Q9oflC
eFrNRRoshUp0l6h6QtVz9sRRYxqE76tpDjrsCQn3193db0GDo3JCDw05PEFP
n9WrwYkGJkst2Q/rPaCvien0z1Aa/BaQs/os4QE9OYuzOrU0UD/0e10khzt0
Wkwo84oQsDdmOGfTTxcYZ8n/Hb+bAL/WEqmz4y4wn2dbxi9OgHrER76kVy7A
PzMjtOsAAfGPVSaNH7qAlfvc4qGjBHzaKRuQYuMCy0FrJWcNCHCNHhjvf+IM
4rn8AuGRBNBcHCZlyxxBQX2oiyuWAAWDq5YWkY6g+TktNCqBgCGfKJ0iZ0dw
PbBzITGdgEw5UeXIw47w9JF4V14xAV7hvubFFQ6g0ywd0thCgFQJlAhhe7C2
XTh2qp2AgPmtnWyZ9uDN8fhneycBLFJYiSvIHtLPKV7ufU3dX36oxVbdHqb6
4dj7DwQkCfD52nTbwbI37af1JAGt0h93SlTawQbBxsLP0wRc36EcwpZoB0fM
1bfNzhIg1PhKfZOpHagxr+/0WCBgffmuW0pgBxez24J//yZgYVz5cIioHdip
3T3qt0LAZpEzJ6fY7OD/zjfg/883/gemDkOH
"]]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-2.5, 2.5}, Automatic},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{{3.65807626463237*^9, 3.658076279167932*^9},
3.662577609843607*^9, 3.6625778242232523`*^9, 3.662577944421152*^9,
3.662578453437272*^9, {3.662580571130674*^9, 3.66258059331846*^9},
3.66258084039923*^9, 3.662581624516749*^9, 3.662581732946801*^9,
3.6625819966337557`*^9, 3.6625820309687233`*^9, 3.6625827235616837`*^9,
3.662583401787512*^9, 3.6625885702370777`*^9, 3.662596997557843*^9,
3.662599041713979*^9, 3.662600997110332*^9}]
}, Open ]],
Cell["\<\
The close match between the thin and thick black indicates that this \
combination of two species uses up most of the resources available.\
\>", "Text",
CellChangeTimes->{{3.658076411800499*^9, 3.658076432335959*^9}, {
3.662581629886776*^9, 3.662581633350753*^9}}],
Cell["\<\
Bin counts for the number of each genotype (in 0.01 bins). For clarity, the \
bars in the histogram are doubled in height:\
\>", "Text",
CellChangeTimes->{{3.662583318449308*^9, 3.6625833393129597`*^9},
3.662596979916328*^9}],
Cell[BoxData[{
RowBox[{
RowBox[{"bc1", "=",
RowBox[{"2", " ",
RowBox[{"BinCounts", "[",
RowBox[{"genotypes1", ",",
RowBox[{"{",
RowBox[{
RowBox[{"-", "2.5"}], ",", "2.5", ",", "0.01"}], "}"}]}], "]"}]}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"bc2", "=",
RowBox[{"2", " ",
RowBox[{"BinCounts", "[",
RowBox[{"genotypes2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"-", "2.5"}], ",", "2.5", ",", "0.01"}], "}"}]}], "]"}]}]}],
";"}]}], "Input",
CellChangeTimes->{{3.6625796146565323`*^9, 3.6625796162285557`*^9}, {
3.662580631664425*^9, 3.6625806412550507`*^9}, {3.662580743946993*^9,
3.662580744058728*^9}, {3.662581950492279*^9, 3.6625819556038*^9}, {
3.6625969765345182`*^9, 3.6625969788448343`*^9}}],
Cell["Peak occurs at:", "Text",
CellChangeTimes->{{3.662562965019528*^9, 3.662562967234468*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"FindRoot", "[",
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",", "u", ",", "tryKm"}],
"]"}], ",", "u"}], "]"}], "\[Equal]", "0"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "1"}], ",", "0"}], "}"}]}], "]"}]], "Input",
CellChangeTimes->{{3.661345725944672*^9, 3.661345803032847*^9},
3.66258246225274*^9, {3.6625825951030903`*^9, 3.66258259541399*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"u", "\[Rule]", "0.`"}], "}"}]], "Output",
CellChangeTimes->{{3.661345728180367*^9, 3.661345803756647*^9},
3.662562912517063*^9, 3.662562977259493*^9, {3.6625810169719877`*^9,
3.6625810259057426`*^9}, 3.6625813205092173`*^9, 3.6625813677004766`*^9,
3.662582464690024*^9, {3.662582592356965*^9, 3.6625825957413263`*^9},
3.6625827236398897`*^9, 3.662583401860457*^9, 3.662588570402446*^9,
3.662596997604109*^9, 3.662599041810832*^9, 3.662600997205122*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"maxheight", "=",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",", "u", ",", "tryKm"}], "]"}],
"/.", "%"}]}]], "Input",
CellChangeTimes->{{3.662580070809471*^9, 3.662580079704524*^9}, {
3.662580174205254*^9, 3.662580177645094*^9}, {3.662582327255519*^9,
3.6625824049239683`*^9}, {3.662582469659295*^9, 3.662582473289554*^9},
3.662582599877664*^9}],
Cell[BoxData["4718.689292588146`"], "Output",
CellChangeTimes->{{3.6625823536178703`*^9, 3.662582357195736*^9}, {
3.662582387556489*^9, 3.6625824063901176`*^9}, 3.662582474209477*^9,
3.6625826001407948`*^9, 3.6625827236905603`*^9, 3.662583401911107*^9,
3.662588570452661*^9, 3.66259699763829*^9, 3.6625990418663797`*^9,
3.662600997255907*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Max", "[",
RowBox[{"Join", "[",
RowBox[{"bc1", ",", "bc2"}], "]"}], "]"}]], "Input"],
Cell[BoxData["1684"], "Output",
CellChangeTimes->{3.662580692246052*^9, 3.662580840532552*^9,
3.6625816246162786`*^9, 3.662581733047514*^9, 3.662581996747649*^9,
3.662582031068849*^9, 3.66258272374045*^9, 3.662583401961595*^9,
3.6625885705205297`*^9, 3.662596997672029*^9, 3.662599041929206*^9,
3.662600997325086*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Graphics", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"EdgeForm", "[", "Red", "]"}], ",", "Red", ",",
"\[IndentingNewLine]",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{"Red", ",",
RowBox[{"Rectangle", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2.5"}], ")"}], "-",
"0.005"}], ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2.5"}], ")"}], "+",
"0.005"}], ",",
RowBox[{"bc1", "[",
RowBox[{"[", "i", "]"}], "]"}]}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "bc1", "]"}]}], "}"}]}], "]"}], ",",
RowBox[{"EdgeForm", "[", "Blue", "]"}], ",", "Blue", ",",
"\[IndentingNewLine]",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{"Blue", ",",
RowBox[{"Rectangle", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2.5"}], ")"}], "-",
"0.005"}], ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2.5"}], ")"}], "+",
"0.005"}], ",",
RowBox[{"bc2", "[",
RowBox[{"[", "i", "]"}], "]"}]}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "bc2", "]"}]}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"AspectRatio", "\[Rule]",
RowBox[{"1", "/", "GoldenRatio"}]}], ",",
RowBox[{"Frame", "\[Rule]", "True"}]}], "]"}]], "Input",
CellChangeTimes->{{3.662579808750051*^9, 3.662580000968864*^9}, {
3.662580093697451*^9, 3.662580094976821*^9}, {3.66258012727341*^9,
3.662580128536862*^9}, 3.662580189485834*^9, {3.662580451133957*^9,
3.6625804529645967`*^9}, {3.662580652377059*^9, 3.662580753181138*^9}, {
3.6625819636696463`*^9, 3.6625819718210773`*^9}, {3.662582171463114*^9,
3.6625822820832243`*^9}, {3.6625833652761383`*^9, 3.662583366738315*^9}}],
Cell[BoxData[
GraphicsBox[{
{RGBColor[1, 0, 0], EdgeForm[RGBColor[1, 0, 0]],
{RGBColor[1, 0, 0], RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 42}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 218}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 852}]}, \
{RGBColor[1, 0, 0],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 1684}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 1440}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 532}]}, \
{RGBColor[1, 0, 0],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 72}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.275, 0}, {-0.265, 2}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.995, 0}, {2.005, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.035, 0}, {2.045, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.075, 0}, {2.085, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.115, 0}, {2.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.125, 0}, {2.135, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.165, 0}, {2.175, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.205, 0}, {2.215, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.245, 0}, {2.255, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.285, 0}, {2.295, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.325, 0}, {2.335, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.365, 0}, {2.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.375, 0}, {2.385, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.415, 0}, {2.425, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.455, 0}, {2.465, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.495, 0}, {2.505, 0}]}},
{RGBColor[0, 0, 1], EdgeForm[RGBColor[0, 0, 1]],
{RGBColor[0, 0, 1], RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.245, 0}, {0.255, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 2}]},
{RGBColor[0, 0, 1], RectangleBox[{0.265, 0}, {0.275, 92}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 696}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 1482}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 1472}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 890}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 306}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 86}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 14}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.475, 0}, {0.485, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.495, 0}, {0.505, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.515, 0}, {0.525, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.535, 0}, {0.545, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.705, 0}, {0.715, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.725, 0}, {0.735, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.745, 0}, {0.755, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.765, 0}, {0.775, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.785, 0}, {0.795, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.955, 0}, {0.965, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.975, 0}, {0.985, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.995, 0}, {1.005, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.245, 0}, {1.255, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.495, 0}, {1.505, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.745, 0}, {1.755, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.995, 0}, {2.005, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.035, 0}, {2.045, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.075, 0}, {2.085, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.115, 0}, {2.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.125, 0}, {2.135, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.165, 0}, {2.175, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.205, 0}, {2.215, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.245, 0}, {2.255, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.285, 0}, {2.295, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.325, 0}, {2.335, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.365, 0}, {2.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.375, 0}, {2.385, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.415, 0}, {2.425, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.455, 0}, {2.465, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.495, 0}, {2.505, 0}]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Frame->True]], "Output",
CellChangeTimes->{3.662582241974265*^9, 3.6625822836156483`*^9,
3.662582482488243*^9, 3.662582723894348*^9, 3.662583367434504*^9,
3.662583402109544*^9, 3.662588570664433*^9, 3.662596997829464*^9,
3.662599042079767*^9, 3.66260099747499*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"histoplot", "=",
RowBox[{"Graphics", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"EdgeForm", "[", "Red", "]"}], ",", "Red", ",",
"\[IndentingNewLine]",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{"Red", ",",
RowBox[{"Rectangle", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2.5"}], ")"}], "-",
"0.005"}], ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2.5"}], ")"}], "+",
"0.005"}], ",",
RowBox[{"bc1", "[",
RowBox[{"[", "i", "]"}], "]"}]}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "bc1", "]"}]}], "}"}]}], "]"}], ",",
RowBox[{"EdgeForm", "[", "Blue", "]"}], ",", "Blue", ",",
"\[IndentingNewLine]",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{"Blue", ",",
RowBox[{"Rectangle", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2.5"}], ")"}], "-",
"0.005"}], ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2.5"}], ")"}], "+",
"0.005"}], ",",
RowBox[{"bc2", "[",
RowBox[{"[", "i", "]"}], "]"}]}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "bc2", "]"}]}], "}"}]}], "]"}], ",",
RowBox[{"EdgeForm", "[", "Black", "]"}], ",", "Black", ",",
"\[IndentingNewLine]",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{"Black", ",",
RowBox[{"Rectangle", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2.5"}], ")"}], "-",
"0.005"}], ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2.5"}], ")"}], "+",
"0.005"}], ",", "0"}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "bc2", "]"}]}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"AspectRatio", "\[Rule]",
RowBox[{"1", "/", "GoldenRatio"}]}], ",",
RowBox[{"Frame", "\[Rule]", "True"}], ",",
RowBox[{"FrameTicks", "\[Rule]", "False"}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.662579808750051*^9, 3.662580000968864*^9}, {
3.662580093697451*^9, 3.662580094976821*^9}, {3.66258012727341*^9,
3.662580128536862*^9}, 3.662580189485834*^9, {3.662580451133957*^9,
3.6625804529645967`*^9}, {3.662580652377059*^9, 3.662580753181138*^9}, {
3.6625819636696463`*^9, 3.6625819718210773`*^9}, {3.662582171463114*^9,
3.6625822250442657`*^9}, 3.662582290948475*^9, {3.662582755800785*^9,
3.662582758849366*^9}, {3.662582799576124*^9, 3.6625828199108467`*^9}, {
3.662582946751124*^9, 3.662582948522449*^9}, {3.6625829831057663`*^9,
3.6625830522472467`*^9}}],
Cell[BoxData[
GraphicsBox[{
{RGBColor[1, 0, 0], EdgeForm[RGBColor[1, 0, 0]],
{RGBColor[1, 0, 0], RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 42}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 218}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 852}]}, \
{RGBColor[1, 0, 0],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 1684}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 1440}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 532}]}, \
{RGBColor[1, 0, 0],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 72}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.275, 0}, {-0.265, 2}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.995, 0}, {2.005, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.035, 0}, {2.045, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.075, 0}, {2.085, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.115, 0}, {2.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.125, 0}, {2.135, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.165, 0}, {2.175, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.205, 0}, {2.215, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.245, 0}, {2.255, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.285, 0}, {2.295, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.325, 0}, {2.335, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.365, 0}, {2.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.375, 0}, {2.385, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.415, 0}, {2.425, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.455, 0}, {2.465, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.495, 0}, {2.505, 0}]}},
{RGBColor[0, 0, 1], EdgeForm[RGBColor[0, 0, 1]],
{RGBColor[0, 0, 1], RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.245, 0}, {0.255, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 2}]},
{RGBColor[0, 0, 1], RectangleBox[{0.265, 0}, {0.275, 92}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 696}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 1482}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 1472}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 890}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 306}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 86}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 14}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.475, 0}, {0.485, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.495, 0}, {0.505, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.515, 0}, {0.525, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.535, 0}, {0.545, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.705, 0}, {0.715, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.725, 0}, {0.735, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.745, 0}, {0.755, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.765, 0}, {0.775, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.785, 0}, {0.795, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.955, 0}, {0.965, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.975, 0}, {0.985, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.995, 0}, {1.005, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.245, 0}, {1.255, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.495, 0}, {1.505, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.745, 0}, {1.755, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.995, 0}, {2.005, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.035, 0}, {2.045, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.075, 0}, {2.085, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.115, 0}, {2.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.125, 0}, {2.135, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.165, 0}, {2.175, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.205, 0}, {2.215, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.245, 0}, {2.255, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.285, 0}, {2.295, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.325, 0}, {2.335, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.365, 0}, {2.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.375, 0}, {2.385, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.415, 0}, {2.425, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.455, 0}, {2.465, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.495, 0}, {2.505, 0}]}},
{GrayLevel[0], EdgeForm[GrayLevel[0]],
{GrayLevel[0], RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{GrayLevel[0], RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{GrayLevel[0], RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{GrayLevel[0], RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{GrayLevel[0], RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{GrayLevel[0], RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{GrayLevel[0], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{GrayLevel[0], RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{GrayLevel[0], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{GrayLevel[0], RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{GrayLevel[0], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{GrayLevel[0], RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{GrayLevel[0], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{GrayLevel[0], RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{GrayLevel[0], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{GrayLevel[0], RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{GrayLevel[0], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{GrayLevel[0], RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{GrayLevel[0], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{GrayLevel[0], RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{GrayLevel[0], RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{GrayLevel[0], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{GrayLevel[0], RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{GrayLevel[0], RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{GrayLevel[0], RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{GrayLevel[0], RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{GrayLevel[0], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{GrayLevel[0], RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{GrayLevel[0], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{GrayLevel[0], RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{GrayLevel[0], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{GrayLevel[0], RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{GrayLevel[0], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{GrayLevel[0], RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{GrayLevel[0], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{GrayLevel[0], RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{GrayLevel[0], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{GrayLevel[0], RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{GrayLevel[0], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{GrayLevel[0], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{GrayLevel[0], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{GrayLevel[0], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{GrayLevel[0], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{GrayLevel[0], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{GrayLevel[0], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{GrayLevel[0], RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{GrayLevel[0], RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{GrayLevel[0], RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{GrayLevel[0], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{GrayLevel[0], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{GrayLevel[0], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{GrayLevel[0], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{GrayLevel[0], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{GrayLevel[0], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{GrayLevel[0], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{GrayLevel[0], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{GrayLevel[0], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{GrayLevel[0], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{GrayLevel[0], RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{GrayLevel[0], RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{GrayLevel[0], RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{GrayLevel[0], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{GrayLevel[0], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{GrayLevel[0], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{GrayLevel[0], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{GrayLevel[0], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{GrayLevel[0], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{GrayLevel[0], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{GrayLevel[0], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{GrayLevel[0], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{GrayLevel[0], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{GrayLevel[0], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{GrayLevel[0], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{GrayLevel[0], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{GrayLevel[0], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{GrayLevel[0], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{GrayLevel[0], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{GrayLevel[0], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{GrayLevel[0], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{GrayLevel[0], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{GrayLevel[0], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{GrayLevel[0], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{GrayLevel[0], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{GrayLevel[0], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{GrayLevel[0], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{GrayLevel[0], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{GrayLevel[0], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{GrayLevel[0], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{GrayLevel[0], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{GrayLevel[0], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{GrayLevel[0], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{GrayLevel[0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{GrayLevel[0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{GrayLevel[0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{GrayLevel[0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{GrayLevel[0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{GrayLevel[0], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{GrayLevel[0], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{GrayLevel[0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{GrayLevel[0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{GrayLevel[0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{GrayLevel[0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{GrayLevel[0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{GrayLevel[0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{GrayLevel[0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{GrayLevel[0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{GrayLevel[0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{GrayLevel[0], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{GrayLevel[0], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{GrayLevel[0], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 0}]},
{GrayLevel[0], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{GrayLevel[0], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{GrayLevel[0], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{GrayLevel[0], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{GrayLevel[0], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{GrayLevel[0], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{GrayLevel[0], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{GrayLevel[0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 0}]},
{GrayLevel[0], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{GrayLevel[0],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{GrayLevel[0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{GrayLevel[0],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{GrayLevel[0], RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{GrayLevel[0],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{GrayLevel[0],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{GrayLevel[0],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{GrayLevel[0],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{GrayLevel[0],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]},
{GrayLevel[0], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{GrayLevel[0],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{GrayLevel[0],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{GrayLevel[0],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{GrayLevel[0],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{GrayLevel[0],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{GrayLevel[0],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{GrayLevel[0],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{GrayLevel[0],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{GrayLevel[0],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{GrayLevel[0],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{GrayLevel[0],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{GrayLevel[0],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{GrayLevel[0],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{GrayLevel[0],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{GrayLevel[0],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{GrayLevel[0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{GrayLevel[0],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{GrayLevel[0],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 0}]},
{GrayLevel[0],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 0}]},
{GrayLevel[0],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 0}]},
{GrayLevel[0],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 0}]},
{GrayLevel[0],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 0}]},
{GrayLevel[0],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 0}]},
{GrayLevel[0],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 0}]},
{GrayLevel[0],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{GrayLevel[0],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{GrayLevel[0],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{GrayLevel[0],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{GrayLevel[0],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{GrayLevel[0],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{GrayLevel[0],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{GrayLevel[0],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{GrayLevel[0],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{GrayLevel[0],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{GrayLevel[0],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{GrayLevel[0],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{GrayLevel[0],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{GrayLevel[0],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{GrayLevel[0], RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{GrayLevel[0], RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{GrayLevel[0], RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{GrayLevel[0], RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{GrayLevel[0], RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{GrayLevel[0], RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{GrayLevel[0], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{GrayLevel[0], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{GrayLevel[0], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{GrayLevel[0], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{GrayLevel[0], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{GrayLevel[0], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{GrayLevel[0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{GrayLevel[0], RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{GrayLevel[0], RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{GrayLevel[0], RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{GrayLevel[0], RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{GrayLevel[0], RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{GrayLevel[0], RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{GrayLevel[0], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{GrayLevel[0], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{GrayLevel[0], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{GrayLevel[0], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{GrayLevel[0], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{GrayLevel[0], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{GrayLevel[0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{GrayLevel[0], RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{GrayLevel[0], RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{GrayLevel[0], RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{GrayLevel[0], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{GrayLevel[0], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{GrayLevel[0], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{GrayLevel[0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{GrayLevel[0], RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{GrayLevel[0], RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{GrayLevel[0], RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{GrayLevel[0], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{GrayLevel[0], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{GrayLevel[0], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{GrayLevel[0], RectangleBox[{1.995, 0}, {2.005, 0}]},
{GrayLevel[0], RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{GrayLevel[0], RectangleBox[{2.035, 0}, {2.045, 0}]},
{GrayLevel[0], RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{GrayLevel[0], RectangleBox[{2.075, 0}, {2.085, 0}]},
{GrayLevel[0], RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{GrayLevel[0], RectangleBox[{2.115, 0}, {2.125, 0}]},
{GrayLevel[0], RectangleBox[{2.125, 0}, {2.135, 0}]},
{GrayLevel[0], RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{GrayLevel[0], RectangleBox[{2.165, 0}, {2.175, 0}]},
{GrayLevel[0], RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{GrayLevel[0], RectangleBox[{2.205, 0}, {2.215, 0}]},
{GrayLevel[0], RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{GrayLevel[0], RectangleBox[{2.245, 0}, {2.255, 0}]},
{GrayLevel[0], RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{GrayLevel[0], RectangleBox[{2.285, 0}, {2.295, 0}]},
{GrayLevel[0], RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{GrayLevel[0], RectangleBox[{2.325, 0}, {2.335, 0}]},
{GrayLevel[0], RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{GrayLevel[0], RectangleBox[{2.365, 0}, {2.375, 0}]},
{GrayLevel[0], RectangleBox[{2.375, 0}, {2.385, 0}]},
{GrayLevel[0], RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{GrayLevel[0], RectangleBox[{2.415, 0}, {2.425, 0}]},
{GrayLevel[0], RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{GrayLevel[0], RectangleBox[{2.455, 0}, {2.465, 0}]},
{GrayLevel[0], RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{GrayLevel[0], RectangleBox[{2.495, 0}, {2.505, 0}]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Frame->True,
FrameTicks->False,
ImageMargins->None]], "Output",
CellChangeTimes->{{3.662579824150284*^9, 3.662579924329763*^9},
3.662580001591158*^9, 3.662580129220911*^9, 3.662580190033875*^9,
3.6625804772897387`*^9, {3.662580696313774*^9, 3.662580703460107*^9}, {
3.6625807358676767`*^9, 3.6625807535413103`*^9}, 3.662580840661969*^9,
3.6625816247405653`*^9, 3.6625817331683407`*^9, 3.662581996897464*^9,
3.662582031224821*^9, 3.6625820731882143`*^9, 3.662582175253334*^9,
3.662582225657587*^9, 3.662582292018343*^9, 3.662582485226413*^9,
3.6625827240513563`*^9, 3.662582759702688*^9, {3.662582805841195*^9,
3.66258282057045*^9}, 3.6625829501050587`*^9, {3.662583026378751*^9,
3.662583052815563*^9}, 3.662583402330566*^9, 3.662588570872534*^9,
3.662596998038787*^9, 3.662599042289386*^9, 3.662600997695725*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[",
RowBox[{"competitionplot", ",", "\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",", "u", ",", "tryKm"}],
"]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2.5"}], ",", "2.5"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Thick", ",", "Black"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]", "histoplot", ",",
RowBox[{"Axes", "\[Rule]",
RowBox[{"{",
RowBox[{"True", ",", "False"}], "}"}]}], ",",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "2.5"}], ",", "2.5"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "maxheight"}], "}"}]}], "}"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.662579485856509*^9, 3.662579491127986*^9}, {
3.6625802104607067`*^9, 3.662580220555599*^9}, {3.662580463397059*^9,
3.6625804711235657`*^9}, 3.6625805460433283`*^9, {3.662580784833908*^9,
3.662580785617728*^9}, {3.662581974420639*^9, 3.662581975451482*^9}, {
3.662588598984932*^9, 3.662588600311982*^9}}],
Cell[BoxData[
GraphicsBox[{{{{}, {},
{RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJwt13k0VP8bB3BMScjWJiWkzRbFt42apxCVVESLSikt8rWVTGXNlnaEsmTm
kj0qGUl6JuvXvo1BKLtBqSyRxO/TOb8/5sx5nZl77/nc+Tzv9x0lG0czWyEB
AYF+8vr77tG3b3hmhsaRy7hoZHzPB3pvLBprmaJxgirN/yiE+ICp1Ofx7F80
ztKKd96/wn1AcYvTH8cRGidl44qRl0wfyL8dItLeS+PkzfoStfm1D4isa1zO
qaRx0jUk02JafODRlVN7vaNonI9VTXsr1G5CquDleIFNNM7srFzk196E2bZG
G5acEOJ46GqAuqUfzG8qsqeCBTk+P6QT3vf6g1lB5BmVMgFOtUZMkFxEINz4
ts3+YdcMyv/qFNWPCYI3bpF2GfuncSx81+qkzDtgGmKhOP1kCnM+5DXf0L4P
RjF5psZfJvHLsf8MpFwfQkLJNd5lq18o7/e7M7EpGE76PVpYnTSOr5O/2ct6
hoLnKVq62PyfSPuh7ndUJQwENBRQ338UlUd6690HwuHjnSeBqQ3D+O+CF86x
3x7DMtELyaM7f+D5xLPHNPsi4dI/qrNbln1DDbaVUur8GDiz6VNSQcEgql+c
u0ZGMxZUGVtnHOL5uPX46aj//JnAaTNV7QrnY8Vwpf2zICZY6p+xOBzExzky
xq7e95hwU+JuKt2BjwmrjixbH8aE5vi2w1Kb+djebHrUPZ4Jt2q9X7ws78Pa
FJvt2flM6FUtOT063Iv3Qntmx/9hAqvNvPDajh70DNNyuWnPgg3dGya5Oj3o
7pFVFO7IgsIBaS2ttT14xrg3K8mFBb3j1VG9Ej24IK7PuojBAlUZk8vmrd3I
ucnz7fBjwatdBis03LoxOtvlKBVNjs/Q8W5P60LJGe3PWmUssGDPZ+syu1Bb
mt00XEHO9254MDy0C/d4x8x7Vc0CkbIXh/dd78Kedf/Jr21gwb5udc23Rl2Y
flfWf/gzC3iyqz6FdnYiz/Rhx59RFvT5LNQzku3EXYt3FHxcRoGoR8a3UNFO
ZI9fueesQME6xu649qkOrP5+OW3WCgquOniIXu/owG9q0i0KaygQtuppSkvp
wJHvelEq6ylYqZPlKrOtAwOSK9iBBhQYa+5XsdbswKm+o5s7d1Fgr9rfmqrU
gbmS+5s376bgtaK8gaFwB9pKxNp/3EeB/jx/GUZ1O/4unfYasqTApvdQRtvp
dvwwV4B1+AIFAR1DNqqH2vHlT02Wix0FKa23Frntasejr5weBNlTMFz3zkNK
rR2vbbNXTXWiQMhr9+MA/me0XGUyN49BAX19f+3BeZ9Rv/PdsOwtCt6GrTXk
W7bh85DrH57GUSBi1XdGUK8Na4fCe1WfUWCpmHBTTqkNZXjnq14lkPOnKHNM
BltRMzq4LSuZAhXOct2XXq14uFoBb2VQ8HhgwfrrSS3oYLKtzPotBb0Z9ftD
77WgRe7DlYm5FOi4hjikubTgLeVSpYF3FFTPSKZ90mtBx215f2yQ3M+FYmv0
az/iguPlooqFFLjSBeXFJ5vx0tO22cUVFOTP4uiu+tyM5Xx2QXElBVJlnse2
FzajyoC7aEEVBWmHpiKc7jcjlbBaI72Ggu6L4zINK5pxX1Um05RLwQZN9vqh
Oc0Yu/e2l1oDBd6jVw7M+dqEdVGxrTQeBUu9hu9tyW7CtWWJ4omNFJg9+iry
dG8Tvii7oZz9kQLm0bQ12VpNuIZ/sd6xhYKh5Zd21SxswrI4rwnlVgpuJ/N9
hdobsfmr1FPPNgqaHBKppUWNWLH10bJVnyhYrXPug05KI0qnmoqXEH943zV9
7kojKu3l6P75TIGEHyXvfbQRC+9kXgtup+D47tN6T7Y3Ytoiy1VKHRRM1H+6
Vi7SiN8fXczf0EmBVn/zqGYMD8UMvKeXd1Nw5buGymI/Hj5PjtALJH4z7nNi
2o6HnCz5G4PEO4RViys281Akw308sYfsp3mek5kKPHTIsdUR6KWgbEHduihh
Hq5MbnM8RGymfD3iIrcB3+ysa/9OHK5aVX4gtwG1kgIXbumjoGX9CoHNVAPW
Xdpm5EGsuOWqjkJQA/onRrvmEZ+FsgvCTg0of8+c+Ys4yWh5zFfLBjS/tLBk
PZ+CL6YutdxtDSiUGtlvS6xlWTz73coGPF/HnBNO7HpCbmucWAPa+g8o5hO/
PevgcHuYi3v86f8MEE9fyqecm7kYnmlvINFPwc7LixqPcLioKWVguo444Lqd
GCRyMT432mwPcZnPe/qa+1y0HTc7aEMsGSRzRcKVi96rjPdcJT708FzSmBUX
/y212RZA/DjibWvrTi5WBt1XDSFufSohXajCxc0a76QjiRUTbAxTpbi49GnH
cAzx2efsayHj9cjg/6r86+TXounXPtXj+NbZcU+Ih3JPdp4qqke5PhGXYOIN
Ba8WGafVY5O1pK4/8dUy4b2aofV4Wnft9BXit7XHvBZdJ15/IfcU8XRTeuaf
U/VotrTfxfjvetuF+N1G9bhhtHSl+t/19lkuq1hXj8ea1tWKEZcPpRzIXFiP
grN2MPrI/ZL6Oe0XOVWHbO46OSQ+9Mcsx6erDiWK1bJDiFvFfisdeFmHQRFb
uzSIFefvt9z0uA5H51S6jJHfz1Yu7vZyrzqcznacfkM8tHbvyBeTOmRoKYjp
EG/Qil3D1a5DmXMNdwfJfrm6acQqV64OS18PicUSzxhGFQbxazH9ZgNtkuw/
g33fJpyqa1FVzdWDRXzrkL7GEXYtDugu+2lALHVmMGy1H/k893ivF9m/h+zo
ZfMu1WJW9/eTi4mfOIdOjx6sRR7fpymli4IV3rrnCxRqsTiwpKaIzMe5wAdR
KcK1yNeLPbCPOOV+V3Xw1xo0ms6pryHzpB1zZ/Op3Br0UNjYW07mzeBty9w/
ljWobFJtGkLmMz3l2ZYSXfL9/aK/vpB5lo1yvBisWIM3cvp/7STmjQuH7OVW
4+XZwbQOkgerblhKxUxW4cH0NvOeJjKvVgOO6wur0FXpQo0ccYWeZ3XRvSoM
Utietpfky5XpZ/eHFKuQ/YAZEEvyKN9nTByMKnFSxbtfso7Mm02QPVeqEs9n
MXwVaym4qC9fceFjBYpESAeqk3yTmm14J/jfCswzq6jZSPLP+tajuV2h5SjK
s4tYUEbB1H1t4YD2UjwW/8z0J4eCGscSW7mUUmw3yNnynuRt3AGrovTLpVh4
eiLR5z0Fe2R8/RqFSzFbdMvC3ySvn4TVCalo/Icynq3n3rAp2BjtPFN+rRjX
vD4cdTL1b1/Otj6lX4wqlXqxn0kftJ148n5UvBhPzxLbdTyJAj+FDx7yzCKc
/0bR35j0ST0lNeVQXIjGlaw5X59S4JScMSE9vwCjDduVLwST+Zdw8N3Zno/X
fs71yX9AwQ8XdYnLz/NxUdIPrSX3KXDRS1bmGuWjuIlOcO5tkg/VlGm4+wd8
P3f0HteXgpEBtd3/VCDSLK8eOepK+sR3grnLJQdDtPijeRYUBJq4shPFc/C7
2MSXBHPSd4uGy0US36BVPOV99yBZT/Lgz7KWbBQIL/XbR/pYsvqTyX5DNn4W
WWyUSPpcdmnRxGHZTOS6HRnJ3UD68Zwyq849GbdrFbq7i5P8d758KyQrCRdk
xgaJilKQ517gaDaUiGutR56FzSHPB6FnttdZJ+ClQ68XxwmRPsW4ltqdcXj8
a49q1AQLlmsbq1PSkXhUJ91JqJsF3x8/OfvjiRne9dFr5bxhQUlF821t8yR6
i3T03JhjLLjA+FhipZZMV315JXfHYfL8s7Jllh8thW7ls6y6y5wFe260enIz
U+nyQ1JqivtYUKHy2cV1QQZdzFFD8TqdHK/v8rxl4BVdxeWJBVuZBfZMtzD5
tBx6vZlWqt0AE7ZqfHh1IKKAfjGOb/TYmQlCVxe2nl1SQ5c9yc77NP0U5ogf
8LEZ4tHvCB9Z+pEXDb7tPH2XuDa6s3XhfoHXkfAiKuCA53AHfd7Wilt8zmNw
pM5KdVv20K9KJtRuzw2Hk3aR8oE+fPoaZvzTztFHEHTw6hbt6EG68OhryW8W
oTBrQViv1+QQXZ/ba7w6Oxgay/2/+0n+oO/JOaaibvEQLG7YbIwsGKY3ZW9P
nPh2D+zFBldUHRulr/A90FzIvAMKqcXhwgNjdMHtued+BgfBjTf65pJR4/SM
E9+6I+8GglOCPXuj5i96jPl9Z16jP4gLbbJZ1zNJdzLZLIdqfmD476Ew1dAp
eijfT8j7xU2QzZF3NFw5TWdP9KoHOfpAiMutYK3GGbpos6C4r7Y3mAXs14hh
C0BfmXBOoaknqFr5WcR7CELx/N92dAd34PXOpUIthCBVK2m+cch1qLLp2SGj
QAMB8zHeySkGdMxKnAhbQYP3y5U3PR5jwGjChYwlq2nQxtZS5Q4xYMng4DIl
DRqsbVIsNO9gwNnLw+OaujTYeHXomXMxAyZ9Z57vO0yDUlkp2TXBDFj9bIlc
0AMaCEbw7jqtZcAWo5Ya8VAa9AdeE5pUYoBJf3Tgw3Aa6ENtj/9SBjhrKI5F
xNCg8qbSj3gJBrzLWl2TkEqDr0vHJ2dG3cCsWDugsIRc36u/c22+G9heGNMz
LqfBks0W6U25bsAQzR4pr6KBpH1+w+0sN4gx3Xq6voEGbqeMdX4muQGfB3qd
XTSYw8mU7n/gBpMMoRHbPhokRTU9TQ1yg3lLC5P7B2hQ8t7Ky8nXDTZYGy3+
8YMGEx//2Sjo5gaGgnOrrozRQD3LTrTSyQ2OxJX5TUzQoPVxjkaUnRvYGd7V
dZ+iwYdGmdhLZ93g//8/oW7/+RPbT7rB/wBsWpKQ
"]]}}, {{}, {},
{RGBColor[0, 0, 1], LineBox[CompressedData["
1:eJwt13k0Ff//B3C5FGWNikqylFK0WMry6fXKEkUSWdKiULRJl3RFqntlb7Fn
794pa7RQH4S5ZStkvZaSiOx9hIQkfed3zu+POXMe58zMeb/n/Xq+5j0KThet
TvHz8fH1Ucf/na8N7J/4+5fGvfHMdukPNgP7fZf/7JijcdU2dinUpjPQQqJr
+t9fNO6+z4Xr0nMYuFbH48/FHzTuodpUUedCBr4JjRTq7qdxL2xp85poYKCQ
etsa7nsa11TLz86DzwejvU6Y3UikcS/96tQaPeGD2Qs8H/LtoHGbXJd2K2y4
ioKnTLbLHuPnyibVVpyZ8kWp9orznIgF3FsC1eKb6q+hVVmC88ZqPq70j7aO
1HfX0ff7P+fv9f4l355ZdsN+6U0suJJw9smBefJ4/uTnbhMmWkTarJ2PnyNf
eUU8Ty9koUlyiYXpt1myTmay+bbZLUyr8mn1PPKLTGftMNIaCsTjAdHL6jOm
yQeKQwYf24PR/wQtd4nUFLlBwtoqqD0U+dTkScNbk2RCUmNLOt9t/BgWH5Td
MkHm0W3CfWLu4urFbpmTBuPkuOyhgwfXROA5LVXBjtXfST32yrDnzyPRecfn
jLKyEdIq4tmLulPRqMrQ/ev+cJD81wvOFcrFIrvTutxndx9J/pn+uWPNfRy4
uUzfRKaHPFnw8d5V2QQsitlgPGjbSf6pE2ZP2CTh1qEPk1uSW8lze5/l2UWk
oFFRh/Af2wZSvu6NV43FA/TIfDIjKVVGyvWcEFdxYONWMXeWQfcbUmCF54GP
x9g4Tt8s5pnzhpT/sasm7CQb6fqZSjyTN6RK7ZTbkBsbL9dzLGL9XpP73U9/
uXOFjT+GN+3VqiXJ03zag9ej2biQNfNgD72QrLdqNuytZaPtaSV2k18mqTgm
bTalzcHQS57BkS8yyE1Rq1+K6XKwxK/sotVoOukhpPpQ+R8OKkc572pyTCOP
TK/4Y2rIwQmS6Gg0IMic2Ffmngc4uEbDdDNHMoFcd1WhyMyVg2P3413G463I
yz7ruFPRHPTjj67Ys1MHgoKsnhXGcVA9wblKWtsRWq2fVfgkcNBao704cLcX
2J9zNR9P5eCl0+eGyqMDYZvF+xslWRzk43vx17k0DiQENAXekhysqv0QqmGd
AXd8HJsjBjjoxvhYdWRTJuhkeZmqDHNQSLlDIICWBYvTx38WfOPgPt9P/ry8
bJiXy/3WMM7B2o1d9MvSTyBoxbuRpt/U/Yb0nI7h57Ct897B1eIE7oyfqPlu
mwebb8q/9pQkUOg7fZhWlgczN6Y1q6QIzEzwVNmcmA+TdovknGQIHB73YvuZ
vYTXPPX7rgoEnn9wJUbucSFcfasXk7udQP2p6bxtMkUQot3QUa5JoIg5o8k4
oAgMrF9NtWoTmDPNEHc/+goE+XRTRnUJHLW4GlIqUgIpI66nRgwILPAvLX2i
zQX6L/NLMlYE6qq9fm4ZVwbekv9dVr9AoBavNbb0XRlkLCrvSHUncKvvt6ub
58pAU/L8YVEPAte/W2EodLIcZszXxnyiEyh1yr2ZVK0ATYnsTjMGgd+SVk2q
l1ZC76byXeeZBA4YbmtPGquEEn4zuxQWgT3De4oXK1WBfNGVC7UBBH7YSQ/o
D6qCSoOO8NVBBFby3kqnHHwLu+yZF8PDCEwV8dYS7XsH7/dPRmRGEZiQFybr
u6IaYp4XdCZEExjrwP4zuLcappUKJINjCAzPqK0oz60GbXqRmm0cgQwjJVs/
Rg24bldZ/jqBQM+RnbrDWTUweuY3KyKRQPdIizX2nTVg2LS98VgSgae6ffo1
DGrBeC1XcDiZQCu/Bu+RJe/BJk6luOEBgfuV+h0O73oPCmfKhW+wCTSt/r2r
yuM9jARrbtnEIXCXjMoiouU9vLmycd6LIFCH1B+REKqD26VCaVIPCdQ8bVXv
r1sHG/d6KOZS3pR/Lc4htQ6S+ipjWh9R7/dIlO/bxjq4H6Ab5pJGoCJ/pqO2
QD1cCwSrUcoyljyVpWfq4Sltt9XPdAL5vZd9cpFtgLFMRaHGTAIdTmQ1FWg2
wHw079ieLAKf74N3IpYNMBS0r/wlZSf5My/zAxtAubmXG5xNYJHw/GMhTgPs
cai2Gaa8dDKSOFrSACmmv2f2PCbwzdviewKTDWDnJu02Tnll3sEge/FGuK/7
ezvkEEhP7r/2WLURnhZtXBxMuTrI14tvTyPc+bTtvxrKinSJc4dONsKwSE7H
4lwCrx59dDLDrxFstuq3GFFu2qNrPxfXCPlpQR98KKtuq7ewzGuEReYwmEmZ
tcrF+GFdI4QwVi5oofxJ8JfezFAjLBZoV/pNWXPs9nZzwSbYbLTLcvUTav0/
Km58sLYJKsRWBe6k/LX8X/lJvSaQfmVYcYCy/hPz5aZ2TSCgECPqRDk6/otI
Er0JshJ+HL9I+RvLmzZ2uwkOCJgVXqFs5L5k1jCzCeqL76z2pZxk/2AsrrwJ
Sh8VBvtQnjTQGhjpaoITSnV/6JTN1ao74XcTJMm1+rpSfrjCkRe1vBk8//Tw
21GeWzBZPbCtGQaeiEbtpnzoW/Brvf3NUMvx3qxC+XGrXMFdt2bYXWlcv4iy
wOvnub2sZugJzfLtpeZ7NNvk0Y7UZpj70rGtiHJ+zKfEsKJmGNKTmQijLHLj
UmRXSzO8DXpUbE/Z5ezCEI3xZlDe3hixlnLxocTrQSI8KFEau9RLrY80bPXu
UOHBCPf4MTblCikHZ9ZxHsh8e20nRnnN/OjhNh8evEyKdi2h1t97kGW5KYYH
A7qeAa6U15fk/NNcw4OTLKeBx1T9+KcbaKoM8IAYClc3pdwa0abqy98CHk+m
Aj5T9Rd4eoGMkk4L1PuIOs1R9frZMlbsyqEWsLsnPsyirK23SbDmYgscXveb
tZByv7jNBD2theonoWNzVL3vmh0arHzdAo9elJR7UI796t+1srMFYgdnc7qo
fOwpzKh9I9UKQTtpZblUnlKIf8qWb2mFRcvjx8QoT91uKjy7rxXyltdpn6Xy
l+Y0l7b0Ziss2PZbYimV10UiljedRlshKgpkVai826s4cLWF2+B6yKkW51QC
swxc/i5WboPSlLddiSkEWvgwruUdbgOp6PreP1T/iO1/4CNQ0QYbxZZVh8QT
OLggu6C9qw0aSzbKsu9T/VbuxfTj2Tbo/aLDzaP602frd5dttrbDZYWMVTVU
/1r/evxSWmI7lGhkqL+JoPrXp99Pr75sh6W3bF3y71H5mhYcs2hsB2ttxz/s
u1T/Ul/pPr3wA1QVZThevE3gy0SDs6b0D5CWmSTZHEygsXeU07DpR9BUZxGk
PzW+iGR2qfNH0Cq6z3O7Ro3vcXp3pP9HWOPrHyDqR+Wn99VxvfyPIHz6gtte
HwJ5ll8dwuU7QG+VECPMk6qnTVrW6lMdcHJFI1PXlcpnd6shneiE5sh3PGsz
aj6FZhcYxZ1w0PfYw4i91HyjuLH+LZ3wwvVWVY0JgWPGWUOhiz7D5JyQpJYR
gcezr90lzn0Gn9Kpbx361PXeyh08jS7QE9Z84adG4C9BncJVTt0wWjT1aKUI
tV70H+9T3LvhwrEa4wFhKj9dOT0Kvt3gnZfGerqIwKcFiiIborthTD++dyeN
wNPnRBw1K7vBtlrFT2GWg7yGLoH9ql/ApELY7hD1vX+aGGjpP/EFxBJ4DGtq
P1AjFTggztcDA3P/hN0o5mB/2C1/tmgPTOaJCmcVcnC1X8Dj8g09sFLHw2Yi
j4PBR5lCSxx74Out+jj7DA6ekPPnxtX0gEyiKt/1exyUSL289dnDXhC/EFi1
/zgHL3JcJL7a9sFtD+fs2jE23vGJT7rj3AdC2cJiHv+xMdeyboOORx+Uzhmp
Sg6zcXR+x+47IZR3RSeZ97Lx/JEl9J3FfbDkr2V5Rgsbz0o/bw5X6Adu8JX5
mUI2ng78G6v1rR9OZViJSNxk4/GzCXJBNwfhun5TN7WFxJCD3joaSSNw+oHY
CZB4gALSMf3XZ0ch0vGCq+RQMrbV3BoLEB+H3VLLj+U0J6KNr5N2QtkEzC8a
C2WmxOP5JSOKdQ6TkHaGL0UjLQ7lsytjFw7/BP0Xb9fY8WLQt8DQWjxxGuhH
RNb0zUehR9r5l9pbfkHcSYnc0nORKMK/w0m9bxYax2uvJH26h8YXDsWoRs2B
t63V9KOJOyhTKHfRWHkeqi1F38/dD8dIenDE1ra/0JafG6S8LxStAg+oJb/k
wyc6d0YO2QWj6pEAm4fXFuCazAvWOxMDsbVfmBNlw487rgpIlvUHYJ1T3+6l
8jR8vq2yofEyC78IpM/EKNJQzceB8fQiCyfT3J7IrqehsZpGfsQZFsqOjKxW
UKOhnXJN75FjLHTxnJjeokfDcdKZT9yYhbOsvzn77WgoWuMi/12ahesfya4M
uUvD2IHEiDsvmahj0tEgEkU9P3HwXMlTJpoPJQXdi6VhnYhR/mgWEy+prf0Z
l0xDEQYr1D6VicUv1jekZdPQ9mnV5r3BTLSq1Agsr6Jh914Nk2QHJp5y+6lv
WkNDKSlLxsQhJjIW//ujpo6GLjMbBPcdYGKyhe7J5hYaWrLC1fiMmDjYivo9
vTT0d3oUH6zGxFkG/49TAzR8pq0aMqbCRNFV5ZlDwzR8etSzxkGRidsdTVaM
j9NQ1qfbUHsFE40XCNd5/aThOqL2SrokE+2J6oCZGRp+DxSdXSnCxLPG4Xp+
czTk3gp+d28hE////xEvM5X6hBYw8X8h6BJw
"]]}}}, {{}, {},
{GrayLevel[0], Thickness[Large], LineBox[CompressedData["
1:eJw12Hk4Vl20AHDeg4QipTKlEkUavnzGyl5IUipDyFymZJ4TSoYM6cs8k8xT
hveQUOy3TBmSKRJCJaKJSETuuc9z71/n+f1x9jln77XWXmfvsnDWsaYxMTFx
MzMx/e/1xuTZubU1gjEWYFJuNX0VPvluXRhaIRjnk0Qs3xF2cI5ndPHxEsF4
Oe0n4ChsBzsVXFadfxKMqq6Nba1advD8Tgz72CeCkWFmHRNQbQfsBwd2MF4S
jF1PL64tRNhDnMelM7dSCcYWh/13NVUdoZjZPYdJjmCkOxErJ3xdQF63iC1Z
mmAozfgLid11geaccdt/DhOMtnWsgZvTXWBMXeuAhQTBeNT457ggdoGt9w5U
NQgSjJCeuzYDhCsECky1hDARjGia7sf1Ua5wUdp0hquNxiCGX7DEVrgBq7X6
EX5TGmOrZeV9XglP6DH7x2DGkMY4pNkvdeWYJ9y/KOhXp09j2EnNs7ad9wRZ
ze9Nl7VojDvG7ZW1Xp5gI51oWKRKY4xOmjefavKEF8yTt45K0hgV9esbhK29
4O79kFemi8wM8cj7Z4fKrsHmN00OWdHMDC395dnd7j6g05BiKdHGxGC98YYh
dfYW+H4/7hD1YQ1bonRdsWPBUH0txa7s/F/8NNFhx63AMDgXo7fzb/IK/iM7
/6yo/z9QT687d+rLMjb/UPVtbCIa8lqu97sbL+HDNWtfFZjiwSw4ju9VwSLO
NTJjEXmUBDcvEaWcm39h7e/SoiLX0oDpgAhWvT2PdXj3bTc+8gDeRiSHFr+e
wyeFtv3L5ZIFQhy2hfMqs5gtO1IwPzkH7GUkWYeEvmNNsbqMJ8t5YCn3rqCh
YQaTtwgh/rOFIOmtuOaUM4VTK25nv71SDJkjuo3XlSfwtpBTHdzRJTAZwHdM
fft7POw3LUbYlwHHjbLvsRzv8eZ6LrM0tzI46K2RPbYyjpelI/P/8SkDL6cb
HD7j45idrd1cK7wM2Iwn3jwsGsfaMrRV0/wy2PPvI0/e4+P4Cp4oqXpfBhaf
LpSNXB7DU+tO7N29vxxq4/epTemP4DlLocssSeXAbjxpyXxsBLOYrHbIpJaD
/s68QIFdI9hXw+uT1f1ymCsSZWjODOO4wCnBpznlIMHYcZTuP4wfuW20Pkcv
h6TpLf/4FAzhljuBfMxt5eCJmIW5lgfxnOfQmbilcnjOwjgqNjqI76w6uXmv
lANP200jpcZB3F2ltNVorRweXlhJdLk3iNdVdrziY6XDx6uLvK93D+Lot57v
nXjooBP3lf3+mTfYv1X+VJ44HQ5/Hpw/lN6Pf5rvsNypTQePHwcktgX345yf
5tdv69KhejHA9K9dP95st6owpUcHZTbJ5g75fnxCYUtVnhE1nqhP4tW+13jE
zdxvnRUdPE0FFLM5X2Pug78NDbzoUNtt5L/VpxdLKR/Tkkimw983pRWrl3qx
dSdbjXIqHVTGaFMf1XuxXpLaQ4N0OrR/K9Kq4OvFlQnWB/0y6TDM+WeXFr0H
h7dqheYX0mFNLbUxfKobuw+oM0Jq6HCidmj9qn4X3rahQOLyAB1Ki3IVWo52
4e6J807nB+mwPdX5avTOLmwltK9UcYgO/YtsMWf6XuHNpy8Kso/SQcxXnyd9
uRPb7IiLvPmJDs8DFrhA/SU+JeRMDM7TIcEi3KGP5yU+3KoWnPCLDldVhTts
33bg9R9qf2j9pgMPq1pEtGMHfpvXE/b0Dx3Mw+LWf4htx7ba2mlONBJW7kmz
hYy1Yq3hyDvHuUnocm6xFihqxcRuZNTKQ0K2lnFTqXsrVvWMXKfDS8Jp3qDg
ATbKHh2LhnwkJMf30CQOvMDtFaLbTwiSIJvmutZ+vRkPSHAW3hInwaWw7Pem
zQ3YIInjc7wiCYc3OgWpjD3HF9c1/VdwlIRZN6mN7iXPcSt91aL6GAluxwpF
+9SfY5fKL2mvlEjwfJV1LsHvGT6ORJSHVUj4Ob1fQ6YD49FnG987nibBo7LA
LMEG42C/Wj3dMyT8uiHmsciEcdLWsDkZTRJ+84hk1MjUY7Wh0dy5s9T3yvIu
HM94iuecpaY0tElgC/r94KRbDVZ7MRPsbEBCqKZnVT5XDRbUyTXee5EE9q1z
7ez51Xis2EtvmDJH4cyvtqHHWI11A/24EQncr95pnlerwnML7GsjJiREJRlb
lI8+wlfVvCdumpLAa/Hm2iafR5gf+3wRMiNhy0J3Vm9pJTZx5THWMidhu2DT
b4PtFVhCsoSMu0zN50fljTUkiZ8/ehu/w4IEgdJ6UYGzJP7O4ZiYS1lYufrc
cAAdMxKezxdZkqDaqa/xrL8MR724tynWmoSTl7U8gjjLcEqt7DirDQmn5jUy
1KAU276wf+lJWVPg+EJr4UOsd6R4WfMKCfo2opk9foXY0nRD9htbEu64uofF
PCrAo7IjEUeuklDn1+Cs8y0f32OLeBhOeU+spVKPeR72ifkQd8iOhIv3K8Ri
knLx5j8qJjcpRxQSG3S6c3A3+dmojfIczh7qVsnGBmeCVw3tSRBv//k82jcL
W8zJZqZTNuxXLdKuzMQnPUt931FmfPng3S32ABsGXuszcCBh6vsVxu66+7jh
e7ROFOXzbOyRWQfTceEabV0z5R3Sp6SyNqXgM9VhvBKOJNzWmFreFZSE31q6
XNWn/MU8rDVzPgEXP77w6xZlXa99Sbts4nGs+e6aAsq1d1/YZA7E4rIzLfSX
lHdl28rs0ojBduVHxr5TDqthZ8msjcIJbHonuJ1IeJehnat88R525tz5bj/l
ko5oFeWjETifEVKiRtl3qXsUdoRhN4cbpAllDXHeG8B8G0cmL31xobxNV0cA
Pgbgc9vmTAIpt6/tcfa/dwMnLZnRoinbGuYW3rxwDf9MUhhJo8xSIfbxhoAr
jojx+5pLGfg1jy8zrLHMC1Hph5R/JCVbzSbrYMdLUqVllP1ocU0n5RXQpeY4
s3LKB1MsW7bImqPJQpMTpf/7/vz0b5zcDihiLdi8kLKu9JunIcoeKJCJpzyT
ctWgQWCorw8ql2SWTaS8gTEj2mh0C2WA6Ww4ZRRbHNJ4LQgFa0i+v07Z1cb+
c2NcCDoc7cx+hXKWwn7NJno42lIgY6VNuY9rprSp8y6SsQxZkKfMNla0qXkm
EokNOzwVppxmKKNoGRyNVlwWqteo+ZZRjbf/wBuLtBsPzLyj3Cm1kGaZGYf2
1u3RfUKZienRmmV9InKIjmq0p5z8ecs/HzWTUVWURCeifKTXw8JqKAWJ3Gjd
sImyVd6/TVa/05GfrsehYipeViPjfn0MyUCNgSWbPCi3H1uOJe88QKTEaUlF
ylbiRk1H+LNQ7YXta3VUPB4W5HjnNpaFnI8HPvGlvMpd+4vMz0ZDNoxSWcoJ
S/z7pGVzEfcBecUcKt5bOgbvSOsWIHnh3ilTKl9svd+2GO8vRPuXUp+sUvnF
vmeIJZgoQtFmVqdSKJ/2Hb7ZV1GM0rnaolqpfOyQGHXz3FKGfiSJf2Ci8tXh
9WhZ+pcyJC0hfDeEyu8QcPllYVGOJsS//mCnvPeLi3SEIh2dd9/7nbCinqfq
VjI0TaKwdy+aeqh6Ip881/5dvwIpKqjoKVFm/+42TTRUICnFd1l5l0goTHHf
K5VaiU7WNVx3pOrR9KxHpt+ZKnQn9K5IH1XPHB5cixd+WIPc61dSWKn6eOzX
YsU/22vRpJqR7HF9Erg0vXvUgmtRyPPqeFc9Kh8WvbmdTJ6g7vNSWV26JHw7
5xNez1WHVvXk/l7RIqH6Zn19mSwDcb9gSK6cIuFB4d+XNQ4MJC3XeIyJclif
0khDFgP1TJgIMKtT9UUS/xnY+Ay5GjopLp0gYek1lmeafIbWS+oINwAJigee
kVqJDWhaLPNrnRwVP339CfWtDSh+wFInW5ZaP98vPlIrDaj27uP52zJU/Wnd
psp+uRHNB+6eV5EmYbO1Uy+WbEIHpRlfUg9S9SJNcP5gfTMyCFhVattDQgaX
l8yGiVa065vTNSFqf0ypiOD33daGer3qcos2UOtvlLk6pdGGmMd998hykXC3
oKOpsbQN+Vcs8KmtJ8H7hKi+n3c7MkkYGVIhSNDx6/Ka4XyJJFSsI+up/Zrm
xTdsxd+FLHz3kk+o/d/oUlFP9b9dqK9HSPgV1R+Qp1Erl1YXujSm4TdK9Q8W
IlerKkO6kFS9q+BiL9UPvHgaxTLfhcgI02XmDjoECVqp5XR2o9OXBiRDn9CB
5RlZ+iGoF/n5q+41SKKDSbF6rlxGL9IILZLnTKBDZfxwakRtL2oyu2TxNJYO
VnZs4dKzvShoMp3YGkmHps1GlkFmfah1eCEj7zYdQmyYt4sqvEZ1ypaGSm50
WMelFWDxrR+RwYvjWhp0uLjXiCG7fgDlT4aNVp2kQ5GK1RrHngFUVhYnL3CC
Dueue9+oMBxA//lfpg0qUf3LpwfXWZoGEMvaCr/cv3QQfzbrmpf6Bv0V9A3x
2kEHNa9Yi+lTb9G31IJlztlyCBrrV3XLHkGOeaa87++VQ3lqiNbNuXHkef3H
lW/+ZeCcZcXzUX8CWSiquk0GlYCZXYpwaMAUgpNHTg7eLIZwbS8F6bQZ9DZ9
NETethBYtsR/8l/+hkS8KmMf8+bDQPvtH8Hcs8hadx+L5HgO6PlayKY0zCGl
Rzy02LAscOCc2d1pNI/EE4NjMq4+AJHi5gS26QX0WVNFbvdwGvhWq+pypy6i
4g5Rrsi+JHDJc6iSPbSEdgZ8VasxiQcumpzFwYlldFbsKavKz2hQc7wQLxm7
gn4cqgt0+/ofbK8Rdlbb8xfpmpxVv8IcDjFuYdGHB9bQV8mcg7bGwaATcv5A
ehUT5Cx/drPPvAWSxsF6OTeYgebKrx3O6guGrlW8LAHMIN/2oyf/iw+EhU69
sgxmhrzajd5ven1gokLztGgEMwiz+FO/Nz7wgIsPZSUxA4eq7q1r4AN89bn7
HlQww5nm0PQx/+vAtKvlT+pnZvgvMyrqA6c39H9anxWrR4Pa/bnvJ/Q9oflC
eFrNRRoshUp0l6h6QtVz9sRRYxqE76tpDjrsCQn3193db0GDo3JCDw05PEFP
n9WrwYkGJkst2Q/rPaCvien0z1Aa/BaQs/os4QE9OYuzOrU0UD/0e10khzt0
Wkwo84oQsDdmOGfTTxcYZ8n/Hb+bAL/WEqmz4y4wn2dbxi9OgHrER76kVy7A
PzMjtOsAAfGPVSaNH7qAlfvc4qGjBHzaKRuQYuMCy0FrJWcNCHCNHhjvf+IM
4rn8AuGRBNBcHCZlyxxBQX2oiyuWAAWDq5YWkY6g+TktNCqBgCGfKJ0iZ0dw
PbBzITGdgEw5UeXIw47w9JF4V14xAV7hvubFFQ6g0ywd0thCgFQJlAhhe7C2
XTh2qp2AgPmtnWyZ9uDN8fhneycBLFJYiSvIHtLPKV7ufU3dX36oxVbdHqb6
4dj7DwQkCfD52nTbwbI37af1JAGt0h93SlTawQbBxsLP0wRc36EcwpZoB0fM
1bfNzhIg1PhKfZOpHagxr+/0WCBgffmuW0pgBxez24J//yZgYVz5cIioHdip
3T3qt0LAZpEzJ6fY7OD/zjfg/883/gemDkOH
"]]}}, {
{RGBColor[1, 0, 0], EdgeForm[RGBColor[1, 0, 0]],
{RGBColor[1, 0, 0],
RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 42}]}, \
{RGBColor[1, 0, 0],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 218}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 852}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.31500000000000006`, 0}, \
{-0.30500000000000005`, 1684}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 1440}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 532}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 72}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.275, 0}, {-0.265, 2}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]}, \
{RGBColor[1, 0, 0], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.995, 0}, {2.005, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.035, 0}, {2.045, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.075, 0}, {2.085, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.115, 0}, {2.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.125, 0}, {2.135, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.165, 0}, {2.175, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.205, 0}, {2.215, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.245, 0}, {2.255, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.285, 0}, {2.295, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.325, 0}, {2.335, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.365, 0}, {2.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.375, 0}, {2.385, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.415, 0}, {2.425, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.455, 0}, {2.465, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.495, 0}, {2.505, 0}]}},
{RGBColor[0, 0, 1], EdgeForm[RGBColor[0, 0, 1]],
{RGBColor[0, 0, 1],
RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]}, \
{RGBColor[0, 0, 1], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.245, 0}, {0.255, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 2}]},
{RGBColor[0, 0, 1], RectangleBox[{0.265, 0}, {0.275, 92}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 696}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 1482}]}, \
{RGBColor[0, 0, 1],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 1472}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 890}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 306}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 86}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 14}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.475, 0}, {0.485, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.495, 0}, {0.505, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.515, 0}, {0.525, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.535, 0}, {0.545, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.705, 0}, {0.715, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.725, 0}, {0.735, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.745, 0}, {0.755, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.765, 0}, {0.775, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.785, 0}, {0.795, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.955, 0}, {0.965, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.975, 0}, {0.985, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.995, 0}, {1.005, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.245, 0}, {1.255, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.495, 0}, {1.505, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.745, 0}, {1.755, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.995, 0}, {2.005, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.035, 0}, {2.045, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.075, 0}, {2.085, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.115, 0}, {2.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.125, 0}, {2.135, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.165, 0}, {2.175, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.205, 0}, {2.215, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.245, 0}, {2.255, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.285, 0}, {2.295, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.325, 0}, {2.335, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.365, 0}, {2.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.375, 0}, {2.385, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.415, 0}, {2.425, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.455, 0}, {2.465, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.495, 0}, {2.505, 0}]}},
{GrayLevel[0], EdgeForm[GrayLevel[0]],
{GrayLevel[0], RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{GrayLevel[0], RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{GrayLevel[0], RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{GrayLevel[0], RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{GrayLevel[0], RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{GrayLevel[0], RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{GrayLevel[0], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{GrayLevel[0], RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{GrayLevel[0], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{GrayLevel[0], RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{GrayLevel[0], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{GrayLevel[0], RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{GrayLevel[0], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{GrayLevel[0], RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{GrayLevel[0], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{GrayLevel[0], RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{GrayLevel[0], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{GrayLevel[0], RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{GrayLevel[0], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{GrayLevel[0], RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{GrayLevel[0], RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{GrayLevel[0], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{GrayLevel[0], RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{GrayLevel[0], RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{GrayLevel[0], RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{GrayLevel[0], RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{GrayLevel[0], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{GrayLevel[0], RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{GrayLevel[0], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{GrayLevel[0], RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{GrayLevel[0], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{GrayLevel[0], RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{GrayLevel[0], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{GrayLevel[0], RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{GrayLevel[0], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{GrayLevel[0], RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{GrayLevel[0], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{GrayLevel[0], RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{GrayLevel[0], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{GrayLevel[0], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{GrayLevel[0], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{GrayLevel[0], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{GrayLevel[0], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{GrayLevel[0], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{GrayLevel[0], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{GrayLevel[0], RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{GrayLevel[0], RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{GrayLevel[0], RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{GrayLevel[0], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{GrayLevel[0], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{GrayLevel[0], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{GrayLevel[0], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{GrayLevel[0], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{GrayLevel[0], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{GrayLevel[0], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{GrayLevel[0], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{GrayLevel[0], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{GrayLevel[0], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{GrayLevel[0], RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{GrayLevel[0], RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{GrayLevel[0], RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{GrayLevel[0], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{GrayLevel[0], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{GrayLevel[0], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{GrayLevel[0], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{GrayLevel[0], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{GrayLevel[0], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{GrayLevel[0], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{GrayLevel[0], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{GrayLevel[0], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{GrayLevel[0], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{GrayLevel[0], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{GrayLevel[0], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{GrayLevel[0], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{GrayLevel[0], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{GrayLevel[0], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{GrayLevel[0], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{GrayLevel[0], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{GrayLevel[0], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{GrayLevel[0], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{GrayLevel[0], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{GrayLevel[0], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{GrayLevel[0], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{GrayLevel[0], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{GrayLevel[0], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{GrayLevel[0], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{GrayLevel[0], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{GrayLevel[0], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{GrayLevel[0], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{GrayLevel[0], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{GrayLevel[0], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{GrayLevel[0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{GrayLevel[0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{GrayLevel[0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{GrayLevel[0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{GrayLevel[0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{GrayLevel[0], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{GrayLevel[0], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{GrayLevel[0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{GrayLevel[0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{GrayLevel[0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{GrayLevel[0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{GrayLevel[0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{GrayLevel[0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{GrayLevel[0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{GrayLevel[0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{GrayLevel[0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{GrayLevel[0], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{GrayLevel[0], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{GrayLevel[0], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 0}]},
{GrayLevel[0], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{GrayLevel[0], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{GrayLevel[0], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{GrayLevel[0], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{GrayLevel[0], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{GrayLevel[0], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{GrayLevel[0], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{GrayLevel[0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 0}]},
{GrayLevel[0], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{GrayLevel[0],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{GrayLevel[0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{GrayLevel[0],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{GrayLevel[0], RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{GrayLevel[0],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{GrayLevel[0],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{GrayLevel[0],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{GrayLevel[0],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{GrayLevel[0],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]}, \
{GrayLevel[0], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{GrayLevel[0],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{GrayLevel[0],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{GrayLevel[0],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{GrayLevel[0],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{GrayLevel[0],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{GrayLevel[0],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{GrayLevel[0],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{GrayLevel[0],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{GrayLevel[0],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{GrayLevel[0],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{GrayLevel[0],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{GrayLevel[0],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{GrayLevel[0],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{GrayLevel[0],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{GrayLevel[0],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{GrayLevel[0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{GrayLevel[0],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{GrayLevel[0],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 0}]},
{GrayLevel[0],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 0}]},
{GrayLevel[0],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 0}]},
{GrayLevel[0],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 0}]},
{GrayLevel[0],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 0}]},
{GrayLevel[0],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 0}]},
{GrayLevel[0],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 0}]},
{GrayLevel[0],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{GrayLevel[0],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{GrayLevel[0],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{GrayLevel[0],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{GrayLevel[0],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{GrayLevel[0],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{GrayLevel[0],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{GrayLevel[0],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{GrayLevel[0],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{GrayLevel[0],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{GrayLevel[0],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{GrayLevel[0],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{GrayLevel[0],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{GrayLevel[0],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{GrayLevel[0], RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{GrayLevel[0], RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{GrayLevel[0], RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{GrayLevel[0], RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{GrayLevel[0], RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{GrayLevel[0], RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{GrayLevel[0], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{GrayLevel[0], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{GrayLevel[0], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{GrayLevel[0], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{GrayLevel[0], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{GrayLevel[0], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{GrayLevel[0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{GrayLevel[0], RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{GrayLevel[0], RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{GrayLevel[0], RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{GrayLevel[0], RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{GrayLevel[0], RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{GrayLevel[0], RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{GrayLevel[0], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{GrayLevel[0], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{GrayLevel[0], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{GrayLevel[0], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{GrayLevel[0], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{GrayLevel[0], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{GrayLevel[0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{GrayLevel[0], RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{GrayLevel[0], RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{GrayLevel[0], RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{GrayLevel[0], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{GrayLevel[0], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{GrayLevel[0], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{GrayLevel[0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{GrayLevel[0], RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{GrayLevel[0], RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{GrayLevel[0], RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{GrayLevel[0], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{GrayLevel[0], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{GrayLevel[0], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{GrayLevel[0], RectangleBox[{1.995, 0}, {2.005, 0}]},
{GrayLevel[0], RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{GrayLevel[0], RectangleBox[{2.035, 0}, {2.045, 0}]},
{GrayLevel[0], RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{GrayLevel[0], RectangleBox[{2.075, 0}, {2.085, 0}]},
{GrayLevel[0], RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{GrayLevel[0], RectangleBox[{2.115, 0}, {2.125, 0}]},
{GrayLevel[0], RectangleBox[{2.125, 0}, {2.135, 0}]},
{GrayLevel[0], RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{GrayLevel[0], RectangleBox[{2.165, 0}, {2.175, 0}]},
{GrayLevel[0], RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{GrayLevel[0], RectangleBox[{2.205, 0}, {2.215, 0}]},
{GrayLevel[0], RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{GrayLevel[0], RectangleBox[{2.245, 0}, {2.255, 0}]},
{GrayLevel[0], RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{GrayLevel[0], RectangleBox[{2.285, 0}, {2.295, 0}]},
{GrayLevel[0], RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{GrayLevel[0], RectangleBox[{2.325, 0}, {2.335, 0}]},
{GrayLevel[0], RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{GrayLevel[0], RectangleBox[{2.365, 0}, {2.375, 0}]},
{GrayLevel[0], RectangleBox[{2.375, 0}, {2.385, 0}]},
{GrayLevel[0], RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{GrayLevel[0], RectangleBox[{2.415, 0}, {2.425, 0}]},
{GrayLevel[0], RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{GrayLevel[0], RectangleBox[{2.455, 0}, {2.465, 0}]},
{GrayLevel[0], RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{GrayLevel[0], RectangleBox[{2.495, 0}, {2.505, 0}]}}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->{True, False},
AxesOrigin->{0, 0},
PlotRange->{{-2.5, 2.5}, {0, 4718.689292588146}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{
3.66257949156072*^9, {3.66258021143362*^9, 3.662580221084853*^9},
3.66258047736412*^9, {3.662580767820599*^9, 3.662580786357997*^9},
3.662580840800157*^9, 3.6625816248841467`*^9, 3.662581733309936*^9,
3.6625819970678368`*^9, 3.662582031398365*^9, 3.662582724222883*^9,
3.662583402559854*^9, {3.662588571095541*^9, 3.662588600918209*^9},
3.662596998256744*^9, 3.66259904252637*^9, 3.662600997930924*^9}]
}, Open ]],
Cell["\<\
From the ESS calculations:
{u1\[Rule]-0.29278,u2\[Rule]0.29278,n2\[Rule]2500.,Km\[Rule]11827.6}\
\>", "Text",
CellChangeTimes->{{3.6625831016188927`*^9, 3.662583129434276*^9},
3.662583207911604*^9}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[",
RowBox[{
"histoplot", ",", "\[IndentingNewLine]", "competitionplot", ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.29278"}], ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.29278"}], ",", "maxheight"}], "}"}]}], "}"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Red", ",", "Thin"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0.29278", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.29278", ",", "maxheight"}], "}"}]}], "}"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Blue", ",", "Thin"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",", "u", ",", "tryKm"}],
"]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2.5"}], ",", "2.5"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Thick", ",", "Black"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Axes", "\[Rule]",
RowBox[{"{",
RowBox[{"True", ",", "False"}], "}"}]}], ",",
RowBox[{"Ticks", "\[Rule]", "None"}]}], "]"}]], "Input",
CellChangeTimes->{{3.662581668820829*^9, 3.662581706709944*^9}, {
3.662581978163651*^9, 3.662581979123304*^9}, {3.662582704270831*^9,
3.662582705843841*^9}, {3.662582830479808*^9, 3.662582902947586*^9},
3.662583061087594*^9, {3.662583135013489*^9, 3.662583151322315*^9}, {
3.662588570334983*^9, 3.662588576362474*^9}, {3.66258861149053*^9,
3.662588619256638*^9}}],
Cell[BoxData[
GraphicsBox[{{
{RGBColor[1, 0, 0], EdgeForm[RGBColor[1, 0, 0]],
{RGBColor[1, 0, 0],
RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 42}]}, \
{RGBColor[1, 0, 0],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 218}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 852}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.31500000000000006`, 0}, \
{-0.30500000000000005`, 1684}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 1440}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 532}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 72}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.275, 0}, {-0.265, 2}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]}, \
{RGBColor[1, 0, 0], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.995, 0}, {2.005, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.035, 0}, {2.045, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.075, 0}, {2.085, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.115, 0}, {2.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.125, 0}, {2.135, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.165, 0}, {2.175, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.205, 0}, {2.215, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.245, 0}, {2.255, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.285, 0}, {2.295, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.325, 0}, {2.335, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.365, 0}, {2.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.375, 0}, {2.385, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.415, 0}, {2.425, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.455, 0}, {2.465, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.495, 0}, {2.505, 0}]}},
{RGBColor[0, 0, 1], EdgeForm[RGBColor[0, 0, 1]],
{RGBColor[0, 0, 1],
RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]}, \
{RGBColor[0, 0, 1], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.245, 0}, {0.255, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 2}]},
{RGBColor[0, 0, 1], RectangleBox[{0.265, 0}, {0.275, 92}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 696}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 1482}]}, \
{RGBColor[0, 0, 1],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 1472}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 890}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 306}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 86}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 14}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.475, 0}, {0.485, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.495, 0}, {0.505, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.515, 0}, {0.525, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.535, 0}, {0.545, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.705, 0}, {0.715, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.725, 0}, {0.735, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.745, 0}, {0.755, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.765, 0}, {0.775, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.785, 0}, {0.795, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.955, 0}, {0.965, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.975, 0}, {0.985, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.995, 0}, {1.005, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.245, 0}, {1.255, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.495, 0}, {1.505, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.745, 0}, {1.755, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.995, 0}, {2.005, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.035, 0}, {2.045, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.075, 0}, {2.085, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.115, 0}, {2.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.125, 0}, {2.135, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.165, 0}, {2.175, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.205, 0}, {2.215, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.245, 0}, {2.255, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.285, 0}, {2.295, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.325, 0}, {2.335, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.365, 0}, {2.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.375, 0}, {2.385, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.415, 0}, {2.425, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.455, 0}, {2.465, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.495, 0}, {2.505, 0}]}},
{GrayLevel[0], EdgeForm[GrayLevel[0]],
{GrayLevel[0], RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{GrayLevel[0], RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{GrayLevel[0], RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{GrayLevel[0], RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{GrayLevel[0], RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{GrayLevel[0], RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{GrayLevel[0], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{GrayLevel[0], RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{GrayLevel[0], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{GrayLevel[0], RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{GrayLevel[0], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{GrayLevel[0], RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{GrayLevel[0], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{GrayLevel[0], RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{GrayLevel[0], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{GrayLevel[0], RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{GrayLevel[0], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{GrayLevel[0], RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{GrayLevel[0], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{GrayLevel[0], RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{GrayLevel[0], RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{GrayLevel[0], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{GrayLevel[0], RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{GrayLevel[0], RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{GrayLevel[0], RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{GrayLevel[0], RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{GrayLevel[0], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{GrayLevel[0], RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{GrayLevel[0], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{GrayLevel[0], RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{GrayLevel[0], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{GrayLevel[0], RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{GrayLevel[0], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{GrayLevel[0], RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{GrayLevel[0], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{GrayLevel[0], RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{GrayLevel[0], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{GrayLevel[0], RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{GrayLevel[0], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{GrayLevel[0], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{GrayLevel[0], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{GrayLevel[0], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{GrayLevel[0], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{GrayLevel[0], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{GrayLevel[0], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{GrayLevel[0], RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{GrayLevel[0], RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{GrayLevel[0], RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{GrayLevel[0], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{GrayLevel[0], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{GrayLevel[0], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{GrayLevel[0], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{GrayLevel[0], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{GrayLevel[0], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{GrayLevel[0], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{GrayLevel[0], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{GrayLevel[0], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{GrayLevel[0], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{GrayLevel[0], RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{GrayLevel[0], RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{GrayLevel[0], RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{GrayLevel[0], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{GrayLevel[0], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{GrayLevel[0], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{GrayLevel[0], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{GrayLevel[0], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{GrayLevel[0], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{GrayLevel[0], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{GrayLevel[0], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{GrayLevel[0], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{GrayLevel[0], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{GrayLevel[0], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{GrayLevel[0], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{GrayLevel[0], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{GrayLevel[0], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{GrayLevel[0], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{GrayLevel[0], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{GrayLevel[0], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{GrayLevel[0], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{GrayLevel[0], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{GrayLevel[0], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{GrayLevel[0], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{GrayLevel[0], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{GrayLevel[0], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{GrayLevel[0], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{GrayLevel[0], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{GrayLevel[0], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{GrayLevel[0], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{GrayLevel[0], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{GrayLevel[0], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{GrayLevel[0], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{GrayLevel[0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{GrayLevel[0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{GrayLevel[0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{GrayLevel[0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{GrayLevel[0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{GrayLevel[0], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{GrayLevel[0], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{GrayLevel[0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{GrayLevel[0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{GrayLevel[0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{GrayLevel[0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{GrayLevel[0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{GrayLevel[0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{GrayLevel[0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{GrayLevel[0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{GrayLevel[0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{GrayLevel[0], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{GrayLevel[0], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{GrayLevel[0], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 0}]},
{GrayLevel[0], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{GrayLevel[0], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{GrayLevel[0], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{GrayLevel[0], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{GrayLevel[0], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{GrayLevel[0], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{GrayLevel[0], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{GrayLevel[0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 0}]},
{GrayLevel[0], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{GrayLevel[0],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{GrayLevel[0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{GrayLevel[0],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{GrayLevel[0], RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{GrayLevel[0],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{GrayLevel[0],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{GrayLevel[0],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{GrayLevel[0],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{GrayLevel[0],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]}, \
{GrayLevel[0], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{GrayLevel[0],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{GrayLevel[0],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{GrayLevel[0],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{GrayLevel[0],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{GrayLevel[0],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{GrayLevel[0],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{GrayLevel[0],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{GrayLevel[0],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{GrayLevel[0],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{GrayLevel[0],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{GrayLevel[0],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{GrayLevel[0],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{GrayLevel[0],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{GrayLevel[0],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{GrayLevel[0],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{GrayLevel[0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{GrayLevel[0],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{GrayLevel[0],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 0}]},
{GrayLevel[0],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 0}]},
{GrayLevel[0],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 0}]},
{GrayLevel[0],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 0}]},
{GrayLevel[0],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 0}]},
{GrayLevel[0],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 0}]},
{GrayLevel[0],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 0}]},
{GrayLevel[0],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{GrayLevel[0],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{GrayLevel[0],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{GrayLevel[0],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{GrayLevel[0],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{GrayLevel[0],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{GrayLevel[0],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{GrayLevel[0],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{GrayLevel[0],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{GrayLevel[0],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{GrayLevel[0],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{GrayLevel[0],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{GrayLevel[0],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{GrayLevel[0],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{GrayLevel[0], RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{GrayLevel[0], RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{GrayLevel[0], RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{GrayLevel[0], RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{GrayLevel[0], RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{GrayLevel[0], RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{GrayLevel[0], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{GrayLevel[0], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{GrayLevel[0], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{GrayLevel[0], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{GrayLevel[0], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{GrayLevel[0], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{GrayLevel[0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{GrayLevel[0], RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{GrayLevel[0], RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{GrayLevel[0], RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{GrayLevel[0], RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{GrayLevel[0], RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{GrayLevel[0], RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{GrayLevel[0], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{GrayLevel[0], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{GrayLevel[0], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{GrayLevel[0], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{GrayLevel[0], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{GrayLevel[0], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{GrayLevel[0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{GrayLevel[0], RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{GrayLevel[0], RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{GrayLevel[0], RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{GrayLevel[0], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{GrayLevel[0], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{GrayLevel[0], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{GrayLevel[0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{GrayLevel[0], RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{GrayLevel[0], RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{GrayLevel[0], RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{GrayLevel[0], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{GrayLevel[0], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{GrayLevel[0], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{GrayLevel[0], RectangleBox[{1.995, 0}, {2.005, 0}]},
{GrayLevel[0], RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{GrayLevel[0], RectangleBox[{2.035, 0}, {2.045, 0}]},
{GrayLevel[0], RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{GrayLevel[0], RectangleBox[{2.075, 0}, {2.085, 0}]},
{GrayLevel[0], RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{GrayLevel[0], RectangleBox[{2.115, 0}, {2.125, 0}]},
{GrayLevel[0], RectangleBox[{2.125, 0}, {2.135, 0}]},
{GrayLevel[0], RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{GrayLevel[0], RectangleBox[{2.165, 0}, {2.175, 0}]},
{GrayLevel[0], RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{GrayLevel[0], RectangleBox[{2.205, 0}, {2.215, 0}]},
{GrayLevel[0], RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{GrayLevel[0], RectangleBox[{2.245, 0}, {2.255, 0}]},
{GrayLevel[0], RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{GrayLevel[0], RectangleBox[{2.285, 0}, {2.295, 0}]},
{GrayLevel[0], RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{GrayLevel[0], RectangleBox[{2.325, 0}, {2.335, 0}]},
{GrayLevel[0], RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{GrayLevel[0], RectangleBox[{2.365, 0}, {2.375, 0}]},
{GrayLevel[0], RectangleBox[{2.375, 0}, {2.385, 0}]},
{GrayLevel[0], RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{GrayLevel[0], RectangleBox[{2.415, 0}, {2.425, 0}]},
{GrayLevel[0], RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{GrayLevel[0], RectangleBox[{2.455, 0}, {2.465, 0}]},
{GrayLevel[0], RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{GrayLevel[0], RectangleBox[{2.495, 0}, {2.505, 0}]}}}, {{{}, {},
{RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJwt13k0VP8bB3BMScjWJiWkzRbFt42apxCVVESLSikt8rWVTGXNlnaEsmTm
kj0qGUl6JuvXvo1BKLtBqSyRxO/TOb8/5sx5nZl77/nc+Tzv9x0lG0czWyEB
AYF+8vr77tG3b3hmhsaRy7hoZHzPB3pvLBprmaJxgirN/yiE+ICp1Ofx7F80
ztKKd96/wn1AcYvTH8cRGidl44qRl0wfyL8dItLeS+PkzfoStfm1D4isa1zO
qaRx0jUk02JafODRlVN7vaNonI9VTXsr1G5CquDleIFNNM7srFzk196E2bZG
G5acEOJ46GqAuqUfzG8qsqeCBTk+P6QT3vf6g1lB5BmVMgFOtUZMkFxEINz4
ts3+YdcMyv/qFNWPCYI3bpF2GfuncSx81+qkzDtgGmKhOP1kCnM+5DXf0L4P
RjF5psZfJvHLsf8MpFwfQkLJNd5lq18o7/e7M7EpGE76PVpYnTSOr5O/2ct6
hoLnKVq62PyfSPuh7ndUJQwENBRQ338UlUd6690HwuHjnSeBqQ3D+O+CF86x
3x7DMtELyaM7f+D5xLPHNPsi4dI/qrNbln1DDbaVUur8GDiz6VNSQcEgql+c
u0ZGMxZUGVtnHOL5uPX46aj//JnAaTNV7QrnY8Vwpf2zICZY6p+xOBzExzky
xq7e95hwU+JuKt2BjwmrjixbH8aE5vi2w1Kb+djebHrUPZ4Jt2q9X7ws78Pa
FJvt2flM6FUtOT063Iv3Qntmx/9hAqvNvPDajh70DNNyuWnPgg3dGya5Oj3o
7pFVFO7IgsIBaS2ttT14xrg3K8mFBb3j1VG9Ej24IK7PuojBAlUZk8vmrd3I
ucnz7fBjwatdBis03LoxOtvlKBVNjs/Q8W5P60LJGe3PWmUssGDPZ+syu1Bb
mt00XEHO9254MDy0C/d4x8x7Vc0CkbIXh/dd78Kedf/Jr21gwb5udc23Rl2Y
flfWf/gzC3iyqz6FdnYiz/Rhx59RFvT5LNQzku3EXYt3FHxcRoGoR8a3UNFO
ZI9fueesQME6xu649qkOrP5+OW3WCgquOniIXu/owG9q0i0KaygQtuppSkvp
wJHvelEq6ylYqZPlKrOtAwOSK9iBBhQYa+5XsdbswKm+o5s7d1Fgr9rfmqrU
gbmS+5s376bgtaK8gaFwB9pKxNp/3EeB/jx/GUZ1O/4unfYasqTApvdQRtvp
dvwwV4B1+AIFAR1DNqqH2vHlT02Wix0FKa23Frntasejr5weBNlTMFz3zkNK
rR2vbbNXTXWiQMhr9+MA/me0XGUyN49BAX19f+3BeZ9Rv/PdsOwtCt6GrTXk
W7bh85DrH57GUSBi1XdGUK8Na4fCe1WfUWCpmHBTTqkNZXjnq14lkPOnKHNM
BltRMzq4LSuZAhXOct2XXq14uFoBb2VQ8HhgwfrrSS3oYLKtzPotBb0Z9ftD
77WgRe7DlYm5FOi4hjikubTgLeVSpYF3FFTPSKZ90mtBx215f2yQ3M+FYmv0
az/iguPlooqFFLjSBeXFJ5vx0tO22cUVFOTP4uiu+tyM5Xx2QXElBVJlnse2
FzajyoC7aEEVBWmHpiKc7jcjlbBaI72Ggu6L4zINK5pxX1Um05RLwQZN9vqh
Oc0Yu/e2l1oDBd6jVw7M+dqEdVGxrTQeBUu9hu9tyW7CtWWJ4omNFJg9+iry
dG8Tvii7oZz9kQLm0bQ12VpNuIZ/sd6xhYKh5Zd21SxswrI4rwnlVgpuJ/N9
hdobsfmr1FPPNgqaHBKppUWNWLH10bJVnyhYrXPug05KI0qnmoqXEH943zV9
7kojKu3l6P75TIGEHyXvfbQRC+9kXgtup+D47tN6T7Y3Ytoiy1VKHRRM1H+6
Vi7SiN8fXczf0EmBVn/zqGYMD8UMvKeXd1Nw5buGymI/Hj5PjtALJH4z7nNi
2o6HnCz5G4PEO4RViys281Akw308sYfsp3mek5kKPHTIsdUR6KWgbEHduihh
Hq5MbnM8RGymfD3iIrcB3+ysa/9OHK5aVX4gtwG1kgIXbumjoGX9CoHNVAPW
Xdpm5EGsuOWqjkJQA/onRrvmEZ+FsgvCTg0of8+c+Ys4yWh5zFfLBjS/tLBk
PZ+CL6YutdxtDSiUGtlvS6xlWTz73coGPF/HnBNO7HpCbmucWAPa+g8o5hO/
PevgcHuYi3v86f8MEE9fyqecm7kYnmlvINFPwc7LixqPcLioKWVguo444Lqd
GCRyMT432mwPcZnPe/qa+1y0HTc7aEMsGSRzRcKVi96rjPdcJT708FzSmBUX
/y212RZA/DjibWvrTi5WBt1XDSFufSohXajCxc0a76QjiRUTbAxTpbi49GnH
cAzx2efsayHj9cjg/6r86+TXounXPtXj+NbZcU+Ih3JPdp4qqke5PhGXYOIN
Ba8WGafVY5O1pK4/8dUy4b2aofV4Wnft9BXit7XHvBZdJ15/IfcU8XRTeuaf
U/VotrTfxfjvetuF+N1G9bhhtHSl+t/19lkuq1hXj8ea1tWKEZcPpRzIXFiP
grN2MPrI/ZL6Oe0XOVWHbO46OSQ+9Mcsx6erDiWK1bJDiFvFfisdeFmHQRFb
uzSIFefvt9z0uA5H51S6jJHfz1Yu7vZyrzqcznacfkM8tHbvyBeTOmRoKYjp
EG/Qil3D1a5DmXMNdwfJfrm6acQqV64OS18PicUSzxhGFQbxazH9ZgNtkuw/
g33fJpyqa1FVzdWDRXzrkL7GEXYtDugu+2lALHVmMGy1H/k893ivF9m/h+zo
ZfMu1WJW9/eTi4mfOIdOjx6sRR7fpymli4IV3rrnCxRqsTiwpKaIzMe5wAdR
KcK1yNeLPbCPOOV+V3Xw1xo0ms6pryHzpB1zZ/Op3Br0UNjYW07mzeBty9w/
ljWobFJtGkLmMz3l2ZYSXfL9/aK/vpB5lo1yvBisWIM3cvp/7STmjQuH7OVW
4+XZwbQOkgerblhKxUxW4cH0NvOeJjKvVgOO6wur0FXpQo0ccYWeZ3XRvSoM
Utietpfky5XpZ/eHFKuQ/YAZEEvyKN9nTByMKnFSxbtfso7Mm02QPVeqEs9n
MXwVaym4qC9fceFjBYpESAeqk3yTmm14J/jfCswzq6jZSPLP+tajuV2h5SjK
s4tYUEbB1H1t4YD2UjwW/8z0J4eCGscSW7mUUmw3yNnynuRt3AGrovTLpVh4
eiLR5z0Fe2R8/RqFSzFbdMvC3ySvn4TVCalo/Icynq3n3rAp2BjtPFN+rRjX
vD4cdTL1b1/Otj6lX4wqlXqxn0kftJ148n5UvBhPzxLbdTyJAj+FDx7yzCKc
/0bR35j0ST0lNeVQXIjGlaw5X59S4JScMSE9vwCjDduVLwST+Zdw8N3Zno/X
fs71yX9AwQ8XdYnLz/NxUdIPrSX3KXDRS1bmGuWjuIlOcO5tkg/VlGm4+wd8
P3f0HteXgpEBtd3/VCDSLK8eOepK+sR3grnLJQdDtPijeRYUBJq4shPFc/C7
2MSXBHPSd4uGy0US36BVPOV99yBZT/Lgz7KWbBQIL/XbR/pYsvqTyX5DNn4W
WWyUSPpcdmnRxGHZTOS6HRnJ3UD68Zwyq849GbdrFbq7i5P8d758KyQrCRdk
xgaJilKQ517gaDaUiGutR56FzSHPB6FnttdZJ+ClQ68XxwmRPsW4ltqdcXj8
a49q1AQLlmsbq1PSkXhUJ91JqJsF3x8/OfvjiRne9dFr5bxhQUlF821t8yR6
i3T03JhjLLjA+FhipZZMV315JXfHYfL8s7Jllh8thW7ls6y6y5wFe260enIz
U+nyQ1JqivtYUKHy2cV1QQZdzFFD8TqdHK/v8rxl4BVdxeWJBVuZBfZMtzD5
tBx6vZlWqt0AE7ZqfHh1IKKAfjGOb/TYmQlCVxe2nl1SQ5c9yc77NP0U5ogf
8LEZ4tHvCB9Z+pEXDb7tPH2XuDa6s3XhfoHXkfAiKuCA53AHfd7Wilt8zmNw
pM5KdVv20K9KJtRuzw2Hk3aR8oE+fPoaZvzTztFHEHTw6hbt6EG68OhryW8W
oTBrQViv1+QQXZ/ba7w6Oxgay/2/+0n+oO/JOaaibvEQLG7YbIwsGKY3ZW9P
nPh2D+zFBldUHRulr/A90FzIvAMKqcXhwgNjdMHtued+BgfBjTf65pJR4/SM
E9+6I+8GglOCPXuj5i96jPl9Z16jP4gLbbJZ1zNJdzLZLIdqfmD476Ew1dAp
eijfT8j7xU2QzZF3NFw5TWdP9KoHOfpAiMutYK3GGbpos6C4r7Y3mAXs14hh
C0BfmXBOoaknqFr5WcR7CELx/N92dAd34PXOpUIthCBVK2m+cch1qLLp2SGj
QAMB8zHeySkGdMxKnAhbQYP3y5U3PR5jwGjChYwlq2nQxtZS5Q4xYMng4DIl
DRqsbVIsNO9gwNnLw+OaujTYeHXomXMxAyZ9Z57vO0yDUlkp2TXBDFj9bIlc
0AMaCEbw7jqtZcAWo5Ya8VAa9AdeE5pUYoBJf3Tgw3Aa6ENtj/9SBjhrKI5F
xNCg8qbSj3gJBrzLWl2TkEqDr0vHJ2dG3cCsWDugsIRc36u/c22+G9heGNMz
LqfBks0W6U25bsAQzR4pr6KBpH1+w+0sN4gx3Xq6voEGbqeMdX4muQGfB3qd
XTSYw8mU7n/gBpMMoRHbPhokRTU9TQ1yg3lLC5P7B2hQ8t7Ky8nXDTZYGy3+
8YMGEx//2Sjo5gaGgnOrrozRQD3LTrTSyQ2OxJX5TUzQoPVxjkaUnRvYGd7V
dZ+iwYdGmdhLZ93g//8/oW7/+RPbT7rB/wBsWpKQ
"]]}}, {{}, {},
{RGBColor[0, 0, 1], LineBox[CompressedData["
1:eJwt13k0Ff//B3C5FGWNikqylFK0WMry6fXKEkUSWdKiULRJl3RFqntlb7Fn
794pa7RQH4S5ZStkvZaSiOx9hIQkfed3zu+POXMe58zMeb/n/Xq+5j0KThet
TvHz8fH1Ucf/na8N7J/4+5fGvfHMdukPNgP7fZf/7JijcdU2dinUpjPQQqJr
+t9fNO6+z4Xr0nMYuFbH48/FHzTuodpUUedCBr4JjRTq7qdxL2xp85poYKCQ
etsa7nsa11TLz86DzwejvU6Y3UikcS/96tQaPeGD2Qs8H/LtoHGbXJd2K2y4
ioKnTLbLHuPnyibVVpyZ8kWp9orznIgF3FsC1eKb6q+hVVmC88ZqPq70j7aO
1HfX0ff7P+fv9f4l355ZdsN+6U0suJJw9smBefJ4/uTnbhMmWkTarJ2PnyNf
eUU8Ty9koUlyiYXpt1myTmay+bbZLUyr8mn1PPKLTGftMNIaCsTjAdHL6jOm
yQeKQwYf24PR/wQtd4nUFLlBwtoqqD0U+dTkScNbk2RCUmNLOt9t/BgWH5Td
MkHm0W3CfWLu4urFbpmTBuPkuOyhgwfXROA5LVXBjtXfST32yrDnzyPRecfn
jLKyEdIq4tmLulPRqMrQ/ev+cJD81wvOFcrFIrvTutxndx9J/pn+uWPNfRy4
uUzfRKaHPFnw8d5V2QQsitlgPGjbSf6pE2ZP2CTh1qEPk1uSW8lze5/l2UWk
oFFRh/Af2wZSvu6NV43FA/TIfDIjKVVGyvWcEFdxYONWMXeWQfcbUmCF54GP
x9g4Tt8s5pnzhpT/sasm7CQb6fqZSjyTN6RK7ZTbkBsbL9dzLGL9XpP73U9/
uXOFjT+GN+3VqiXJ03zag9ej2biQNfNgD72QrLdqNuytZaPtaSV2k18mqTgm
bTalzcHQS57BkS8yyE1Rq1+K6XKwxK/sotVoOukhpPpQ+R8OKkc572pyTCOP
TK/4Y2rIwQmS6Gg0IMic2Ffmngc4uEbDdDNHMoFcd1WhyMyVg2P3413G463I
yz7ruFPRHPTjj67Ys1MHgoKsnhXGcVA9wblKWtsRWq2fVfgkcNBao704cLcX
2J9zNR9P5eCl0+eGyqMDYZvF+xslWRzk43vx17k0DiQENAXekhysqv0QqmGd
AXd8HJsjBjjoxvhYdWRTJuhkeZmqDHNQSLlDIICWBYvTx38WfOPgPt9P/ry8
bJiXy/3WMM7B2o1d9MvSTyBoxbuRpt/U/Yb0nI7h57Ct897B1eIE7oyfqPlu
mwebb8q/9pQkUOg7fZhWlgczN6Y1q6QIzEzwVNmcmA+TdovknGQIHB73YvuZ
vYTXPPX7rgoEnn9wJUbucSFcfasXk7udQP2p6bxtMkUQot3QUa5JoIg5o8k4
oAgMrF9NtWoTmDPNEHc/+goE+XRTRnUJHLW4GlIqUgIpI66nRgwILPAvLX2i
zQX6L/NLMlYE6qq9fm4ZVwbekv9dVr9AoBavNbb0XRlkLCrvSHUncKvvt6ub
58pAU/L8YVEPAte/W2EodLIcZszXxnyiEyh1yr2ZVK0ATYnsTjMGgd+SVk2q
l1ZC76byXeeZBA4YbmtPGquEEn4zuxQWgT3De4oXK1WBfNGVC7UBBH7YSQ/o
D6qCSoOO8NVBBFby3kqnHHwLu+yZF8PDCEwV8dYS7XsH7/dPRmRGEZiQFybr
u6IaYp4XdCZEExjrwP4zuLcappUKJINjCAzPqK0oz60GbXqRmm0cgQwjJVs/
Rg24bldZ/jqBQM+RnbrDWTUweuY3KyKRQPdIizX2nTVg2LS98VgSgae6ffo1
DGrBeC1XcDiZQCu/Bu+RJe/BJk6luOEBgfuV+h0O73oPCmfKhW+wCTSt/r2r
yuM9jARrbtnEIXCXjMoiouU9vLmycd6LIFCH1B+REKqD26VCaVIPCdQ8bVXv
r1sHG/d6KOZS3pR/Lc4htQ6S+ipjWh9R7/dIlO/bxjq4H6Ab5pJGoCJ/pqO2
QD1cCwSrUcoyljyVpWfq4Sltt9XPdAL5vZd9cpFtgLFMRaHGTAIdTmQ1FWg2
wHw079ieLAKf74N3IpYNMBS0r/wlZSf5My/zAxtAubmXG5xNYJHw/GMhTgPs
cai2Gaa8dDKSOFrSACmmv2f2PCbwzdviewKTDWDnJu02Tnll3sEge/FGuK/7
ezvkEEhP7r/2WLURnhZtXBxMuTrI14tvTyPc+bTtvxrKinSJc4dONsKwSE7H
4lwCrx59dDLDrxFstuq3GFFu2qNrPxfXCPlpQR98KKtuq7ewzGuEReYwmEmZ
tcrF+GFdI4QwVi5oofxJ8JfezFAjLBZoV/pNWXPs9nZzwSbYbLTLcvUTav0/
Km58sLYJKsRWBe6k/LX8X/lJvSaQfmVYcYCy/hPz5aZ2TSCgECPqRDk6/otI
Er0JshJ+HL9I+RvLmzZ2uwkOCJgVXqFs5L5k1jCzCeqL76z2pZxk/2AsrrwJ
Sh8VBvtQnjTQGhjpaoITSnV/6JTN1ao74XcTJMm1+rpSfrjCkRe1vBk8//Tw
21GeWzBZPbCtGQaeiEbtpnzoW/Brvf3NUMvx3qxC+XGrXMFdt2bYXWlcv4iy
wOvnub2sZugJzfLtpeZ7NNvk0Y7UZpj70rGtiHJ+zKfEsKJmGNKTmQijLHLj
UmRXSzO8DXpUbE/Z5ezCEI3xZlDe3hixlnLxocTrQSI8KFEau9RLrY80bPXu
UOHBCPf4MTblCikHZ9ZxHsh8e20nRnnN/OjhNh8evEyKdi2h1t97kGW5KYYH
A7qeAa6U15fk/NNcw4OTLKeBx1T9+KcbaKoM8IAYClc3pdwa0abqy98CHk+m
Aj5T9Rd4eoGMkk4L1PuIOs1R9frZMlbsyqEWsLsnPsyirK23SbDmYgscXveb
tZByv7jNBD2theonoWNzVL3vmh0arHzdAo9elJR7UI796t+1srMFYgdnc7qo
fOwpzKh9I9UKQTtpZblUnlKIf8qWb2mFRcvjx8QoT91uKjy7rxXyltdpn6Xy
l+Y0l7b0Ziss2PZbYimV10UiljedRlshKgpkVai826s4cLWF2+B6yKkW51QC
swxc/i5WboPSlLddiSkEWvgwruUdbgOp6PreP1T/iO1/4CNQ0QYbxZZVh8QT
OLggu6C9qw0aSzbKsu9T/VbuxfTj2Tbo/aLDzaP602frd5dttrbDZYWMVTVU
/1r/evxSWmI7lGhkqL+JoPrXp99Pr75sh6W3bF3y71H5mhYcs2hsB2ttxz/s
u1T/Ul/pPr3wA1QVZThevE3gy0SDs6b0D5CWmSTZHEygsXeU07DpR9BUZxGk
PzW+iGR2qfNH0Cq6z3O7Ro3vcXp3pP9HWOPrHyDqR+Wn99VxvfyPIHz6gtte
HwJ5ll8dwuU7QG+VECPMk6qnTVrW6lMdcHJFI1PXlcpnd6shneiE5sh3PGsz
aj6FZhcYxZ1w0PfYw4i91HyjuLH+LZ3wwvVWVY0JgWPGWUOhiz7D5JyQpJYR
gcezr90lzn0Gn9Kpbx361PXeyh08jS7QE9Z84adG4C9BncJVTt0wWjT1aKUI
tV70H+9T3LvhwrEa4wFhKj9dOT0Kvt3gnZfGerqIwKcFiiIborthTD++dyeN
wNPnRBw1K7vBtlrFT2GWg7yGLoH9ql/ApELY7hD1vX+aGGjpP/EFxBJ4DGtq
P1AjFTggztcDA3P/hN0o5mB/2C1/tmgPTOaJCmcVcnC1X8Dj8g09sFLHw2Yi
j4PBR5lCSxx74Out+jj7DA6ekPPnxtX0gEyiKt/1exyUSL289dnDXhC/EFi1
/zgHL3JcJL7a9sFtD+fs2jE23vGJT7rj3AdC2cJiHv+xMdeyboOORx+Uzhmp
Sg6zcXR+x+47IZR3RSeZ97Lx/JEl9J3FfbDkr2V5Rgsbz0o/bw5X6Adu8JX5
mUI2ng78G6v1rR9OZViJSNxk4/GzCXJBNwfhun5TN7WFxJCD3joaSSNw+oHY
CZB4gALSMf3XZ0ch0vGCq+RQMrbV3BoLEB+H3VLLj+U0J6KNr5N2QtkEzC8a
C2WmxOP5JSOKdQ6TkHaGL0UjLQ7lsytjFw7/BP0Xb9fY8WLQt8DQWjxxGuhH
RNb0zUehR9r5l9pbfkHcSYnc0nORKMK/w0m9bxYax2uvJH26h8YXDsWoRs2B
t63V9KOJOyhTKHfRWHkeqi1F38/dD8dIenDE1ra/0JafG6S8LxStAg+oJb/k
wyc6d0YO2QWj6pEAm4fXFuCazAvWOxMDsbVfmBNlw487rgpIlvUHYJ1T3+6l
8jR8vq2yofEyC78IpM/EKNJQzceB8fQiCyfT3J7IrqehsZpGfsQZFsqOjKxW
UKOhnXJN75FjLHTxnJjeokfDcdKZT9yYhbOsvzn77WgoWuMi/12ahesfya4M
uUvD2IHEiDsvmahj0tEgEkU9P3HwXMlTJpoPJQXdi6VhnYhR/mgWEy+prf0Z
l0xDEQYr1D6VicUv1jekZdPQ9mnV5r3BTLSq1Agsr6Jh914Nk2QHJp5y+6lv
WkNDKSlLxsQhJjIW//ujpo6GLjMbBPcdYGKyhe7J5hYaWrLC1fiMmDjYivo9
vTT0d3oUH6zGxFkG/49TAzR8pq0aMqbCRNFV5ZlDwzR8etSzxkGRidsdTVaM
j9NQ1qfbUHsFE40XCNd5/aThOqL2SrokE+2J6oCZGRp+DxSdXSnCxLPG4Xp+
czTk3gp+d28hE////xEvM5X6hBYw8X8h6BJw
"]]}}}, {{}, {},
{RGBColor[1, 0, 0], Thickness[Tiny],
LineBox[{{-0.29278, 0.}, {-0.29278, 4718.689292588146}}]}}, {{}, {},
{RGBColor[0, 0, 1], Thickness[Tiny],
LineBox[{{0.29278, 0.}, {0.29278, 4718.689292588146}}]}}, {{}, {},
{GrayLevel[0], Thickness[Large], LineBox[CompressedData["
1:eJw12Hk4Vl20AHDeg4QipTKlEkUavnzGyl5IUipDyFymZJ4TSoYM6cs8k8xT
hveQUOy3TBmSKRJCJaKJSETuuc9z71/n+f1x9jln77XWXmfvsnDWsaYxMTFx
MzMx/e/1xuTZubU1gjEWYFJuNX0VPvluXRhaIRjnk0Qs3xF2cI5ndPHxEsF4
Oe0n4ChsBzsVXFadfxKMqq6Nba1advD8Tgz72CeCkWFmHRNQbQfsBwd2MF4S
jF1PL64tRNhDnMelM7dSCcYWh/13NVUdoZjZPYdJjmCkOxErJ3xdQF63iC1Z
mmAozfgLid11geaccdt/DhOMtnWsgZvTXWBMXeuAhQTBeNT457ggdoGt9w5U
NQgSjJCeuzYDhCsECky1hDARjGia7sf1Ua5wUdp0hquNxiCGX7DEVrgBq7X6
EX5TGmOrZeV9XglP6DH7x2DGkMY4pNkvdeWYJ9y/KOhXp09j2EnNs7ad9wRZ
ze9Nl7VojDvG7ZW1Xp5gI51oWKRKY4xOmjefavKEF8yTt45K0hgV9esbhK29
4O79kFemi8wM8cj7Z4fKrsHmN00OWdHMDC395dnd7j6g05BiKdHGxGC98YYh
dfYW+H4/7hD1YQ1bonRdsWPBUH0txa7s/F/8NNFhx63AMDgXo7fzb/IK/iM7
/6yo/z9QT687d+rLMjb/UPVtbCIa8lqu97sbL+HDNWtfFZjiwSw4ju9VwSLO
NTJjEXmUBDcvEaWcm39h7e/SoiLX0oDpgAhWvT2PdXj3bTc+8gDeRiSHFr+e
wyeFtv3L5ZIFQhy2hfMqs5gtO1IwPzkH7GUkWYeEvmNNsbqMJ8t5YCn3rqCh
YQaTtwgh/rOFIOmtuOaUM4VTK25nv71SDJkjuo3XlSfwtpBTHdzRJTAZwHdM
fft7POw3LUbYlwHHjbLvsRzv8eZ6LrM0tzI46K2RPbYyjpelI/P/8SkDL6cb
HD7j45idrd1cK7wM2Iwn3jwsGsfaMrRV0/wy2PPvI0/e4+P4Cp4oqXpfBhaf
LpSNXB7DU+tO7N29vxxq4/epTemP4DlLocssSeXAbjxpyXxsBLOYrHbIpJaD
/s68QIFdI9hXw+uT1f1ymCsSZWjODOO4wCnBpznlIMHYcZTuP4wfuW20Pkcv
h6TpLf/4FAzhljuBfMxt5eCJmIW5lgfxnOfQmbilcnjOwjgqNjqI76w6uXmv
lANP200jpcZB3F2ltNVorRweXlhJdLk3iNdVdrziY6XDx6uLvK93D+Lot57v
nXjooBP3lf3+mTfYv1X+VJ44HQ5/Hpw/lN6Pf5rvsNypTQePHwcktgX345yf
5tdv69KhejHA9K9dP95st6owpUcHZTbJ5g75fnxCYUtVnhE1nqhP4tW+13jE
zdxvnRUdPE0FFLM5X2Pug78NDbzoUNtt5L/VpxdLKR/Tkkimw983pRWrl3qx
dSdbjXIqHVTGaFMf1XuxXpLaQ4N0OrR/K9Kq4OvFlQnWB/0y6TDM+WeXFr0H
h7dqheYX0mFNLbUxfKobuw+oM0Jq6HCidmj9qn4X3rahQOLyAB1Ki3IVWo52
4e6J807nB+mwPdX5avTOLmwltK9UcYgO/YtsMWf6XuHNpy8Kso/SQcxXnyd9
uRPb7IiLvPmJDs8DFrhA/SU+JeRMDM7TIcEi3KGP5yU+3KoWnPCLDldVhTts
33bg9R9qf2j9pgMPq1pEtGMHfpvXE/b0Dx3Mw+LWf4htx7ba2mlONBJW7kmz
hYy1Yq3hyDvHuUnocm6xFihqxcRuZNTKQ0K2lnFTqXsrVvWMXKfDS8Jp3qDg
ATbKHh2LhnwkJMf30CQOvMDtFaLbTwiSIJvmutZ+vRkPSHAW3hInwaWw7Pem
zQ3YIInjc7wiCYc3OgWpjD3HF9c1/VdwlIRZN6mN7iXPcSt91aL6GAluxwpF
+9SfY5fKL2mvlEjwfJV1LsHvGT6ORJSHVUj4Ob1fQ6YD49FnG987nibBo7LA
LMEG42C/Wj3dMyT8uiHmsciEcdLWsDkZTRJ+84hk1MjUY7Wh0dy5s9T3yvIu
HM94iuecpaY0tElgC/r94KRbDVZ7MRPsbEBCqKZnVT5XDRbUyTXee5EE9q1z
7ez51Xis2EtvmDJH4cyvtqHHWI11A/24EQncr95pnlerwnML7GsjJiREJRlb
lI8+wlfVvCdumpLAa/Hm2iafR5gf+3wRMiNhy0J3Vm9pJTZx5THWMidhu2DT
b4PtFVhCsoSMu0zN50fljTUkiZ8/ehu/w4IEgdJ6UYGzJP7O4ZiYS1lYufrc
cAAdMxKezxdZkqDaqa/xrL8MR724tynWmoSTl7U8gjjLcEqt7DirDQmn5jUy
1KAU276wf+lJWVPg+EJr4UOsd6R4WfMKCfo2opk9foXY0nRD9htbEu64uofF
PCrAo7IjEUeuklDn1+Cs8y0f32OLeBhOeU+spVKPeR72ifkQd8iOhIv3K8Ri
knLx5j8qJjcpRxQSG3S6c3A3+dmojfIczh7qVsnGBmeCVw3tSRBv//k82jcL
W8zJZqZTNuxXLdKuzMQnPUt931FmfPng3S32ABsGXuszcCBh6vsVxu66+7jh
e7ROFOXzbOyRWQfTceEabV0z5R3Sp6SyNqXgM9VhvBKOJNzWmFreFZSE31q6
XNWn/MU8rDVzPgEXP77w6xZlXa99Sbts4nGs+e6aAsq1d1/YZA7E4rIzLfSX
lHdl28rs0ojBduVHxr5TDqthZ8msjcIJbHonuJ1IeJehnat88R525tz5bj/l
ko5oFeWjETifEVKiRtl3qXsUdoRhN4cbpAllDXHeG8B8G0cmL31xobxNV0cA
Pgbgc9vmTAIpt6/tcfa/dwMnLZnRoinbGuYW3rxwDf9MUhhJo8xSIfbxhoAr
jojx+5pLGfg1jy8zrLHMC1Hph5R/JCVbzSbrYMdLUqVllP1ocU0n5RXQpeY4
s3LKB1MsW7bImqPJQpMTpf/7/vz0b5zcDihiLdi8kLKu9JunIcoeKJCJpzyT
ctWgQWCorw8ql2SWTaS8gTEj2mh0C2WA6Ww4ZRRbHNJ4LQgFa0i+v07Z1cb+
c2NcCDoc7cx+hXKWwn7NJno42lIgY6VNuY9rprSp8y6SsQxZkKfMNla0qXkm
EokNOzwVppxmKKNoGRyNVlwWqteo+ZZRjbf/wBuLtBsPzLyj3Cm1kGaZGYf2
1u3RfUKZienRmmV9InKIjmq0p5z8ecs/HzWTUVWURCeifKTXw8JqKAWJ3Gjd
sImyVd6/TVa/05GfrsehYipeViPjfn0MyUCNgSWbPCi3H1uOJe88QKTEaUlF
ylbiRk1H+LNQ7YXta3VUPB4W5HjnNpaFnI8HPvGlvMpd+4vMz0ZDNoxSWcoJ
S/z7pGVzEfcBecUcKt5bOgbvSOsWIHnh3ilTKl9svd+2GO8vRPuXUp+sUvnF
vmeIJZgoQtFmVqdSKJ/2Hb7ZV1GM0rnaolqpfOyQGHXz3FKGfiSJf2Ci8tXh
9WhZ+pcyJC0hfDeEyu8QcPllYVGOJsS//mCnvPeLi3SEIh2dd9/7nbCinqfq
VjI0TaKwdy+aeqh6Ip881/5dvwIpKqjoKVFm/+42TTRUICnFd1l5l0goTHHf
K5VaiU7WNVx3pOrR9KxHpt+ZKnQn9K5IH1XPHB5cixd+WIPc61dSWKn6eOzX
YsU/22vRpJqR7HF9Erg0vXvUgmtRyPPqeFc9Kh8WvbmdTJ6g7vNSWV26JHw7
5xNez1WHVvXk/l7RIqH6Zn19mSwDcb9gSK6cIuFB4d+XNQ4MJC3XeIyJclif
0khDFgP1TJgIMKtT9UUS/xnY+Ay5GjopLp0gYek1lmeafIbWS+oINwAJigee
kVqJDWhaLPNrnRwVP339CfWtDSh+wFInW5ZaP98vPlIrDaj27uP52zJU/Wnd
psp+uRHNB+6eV5EmYbO1Uy+WbEIHpRlfUg9S9SJNcP5gfTMyCFhVattDQgaX
l8yGiVa065vTNSFqf0ypiOD33daGer3qcos2UOtvlLk6pdGGmMd998hykXC3
oKOpsbQN+Vcs8KmtJ8H7hKi+n3c7MkkYGVIhSNDx6/Ka4XyJJFSsI+up/Zrm
xTdsxd+FLHz3kk+o/d/oUlFP9b9dqK9HSPgV1R+Qp1Erl1YXujSm4TdK9Q8W
IlerKkO6kFS9q+BiL9UPvHgaxTLfhcgI02XmDjoECVqp5XR2o9OXBiRDn9CB
5RlZ+iGoF/n5q+41SKKDSbF6rlxGL9IILZLnTKBDZfxwakRtL2oyu2TxNJYO
VnZs4dKzvShoMp3YGkmHps1GlkFmfah1eCEj7zYdQmyYt4sqvEZ1ypaGSm50
WMelFWDxrR+RwYvjWhp0uLjXiCG7fgDlT4aNVp2kQ5GK1RrHngFUVhYnL3CC
Dueue9+oMBxA//lfpg0qUf3LpwfXWZoGEMvaCr/cv3QQfzbrmpf6Bv0V9A3x
2kEHNa9Yi+lTb9G31IJlztlyCBrrV3XLHkGOeaa87++VQ3lqiNbNuXHkef3H
lW/+ZeCcZcXzUX8CWSiquk0GlYCZXYpwaMAUgpNHTg7eLIZwbS8F6bQZ9DZ9
NETethBYtsR/8l/+hkS8KmMf8+bDQPvtH8Hcs8hadx+L5HgO6PlayKY0zCGl
Rzy02LAscOCc2d1pNI/EE4NjMq4+AJHi5gS26QX0WVNFbvdwGvhWq+pypy6i
4g5Rrsi+JHDJc6iSPbSEdgZ8VasxiQcumpzFwYlldFbsKavKz2hQc7wQLxm7
gn4cqgt0+/ofbK8Rdlbb8xfpmpxVv8IcDjFuYdGHB9bQV8mcg7bGwaATcv5A
ehUT5Cx/drPPvAWSxsF6OTeYgebKrx3O6guGrlW8LAHMIN/2oyf/iw+EhU69
sgxmhrzajd5ven1gokLztGgEMwiz+FO/Nz7wgIsPZSUxA4eq7q1r4AN89bn7
HlQww5nm0PQx/+vAtKvlT+pnZvgvMyrqA6c39H9anxWrR4Pa/bnvJ/Q9oflC
eFrNRRoshUp0l6h6QtVz9sRRYxqE76tpDjrsCQn3193db0GDo3JCDw05PEFP
n9WrwYkGJkst2Q/rPaCvien0z1Aa/BaQs/os4QE9OYuzOrU0UD/0e10khzt0
Wkwo84oQsDdmOGfTTxcYZ8n/Hb+bAL/WEqmz4y4wn2dbxi9OgHrER76kVy7A
PzMjtOsAAfGPVSaNH7qAlfvc4qGjBHzaKRuQYuMCy0FrJWcNCHCNHhjvf+IM
4rn8AuGRBNBcHCZlyxxBQX2oiyuWAAWDq5YWkY6g+TktNCqBgCGfKJ0iZ0dw
PbBzITGdgEw5UeXIw47w9JF4V14xAV7hvubFFQ6g0ywd0thCgFQJlAhhe7C2
XTh2qp2AgPmtnWyZ9uDN8fhneycBLFJYiSvIHtLPKV7ufU3dX36oxVbdHqb6
4dj7DwQkCfD52nTbwbI37af1JAGt0h93SlTawQbBxsLP0wRc36EcwpZoB0fM
1bfNzhIg1PhKfZOpHagxr+/0WCBgffmuW0pgBxez24J//yZgYVz5cIioHdip
3T3qt0LAZpEzJ6fY7OD/zjfg/883/gemDkOH
"]]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->{True, False},
Frame->True,
FrameTicks->False,
Ticks->None]], "Output",
CellChangeTimes->{{3.66258169015475*^9, 3.662581733443055*^9},
3.662581997232984*^9, 3.662582031572763*^9, 3.6625827243942432`*^9,
3.662582762520871*^9, {3.662582824797799*^9, 3.662582829515286*^9}, {
3.662582882412808*^9, 3.662582903659301*^9}, {3.6625831477928553`*^9,
3.662583151957732*^9}, {3.66258338396262*^9, 3.6625834027937517`*^9},
3.662588571329607*^9, {3.662588612366184*^9, 3.662588620773575*^9},
3.662596998505136*^9, 3.662599042756482*^9, 3.6626009981890087`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",", "u", ",", "tryKm"}],
"]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "0.8"}], ",", "1.2"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{", "None", "}"}]}], ",",
RowBox[{"Filling", "\[Rule]", "Bottom"}], ",",
RowBox[{"FillingStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"GrayLevel", "[", "0.8", "]"}], "}"}]}], ",",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",",
RowBox[{"{",
RowBox[{"0", ",", "5000"}], "}"}]}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.29278"}], ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.29278"}], ",",
RowBox[{"k", "[",
RowBox[{"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",",
RowBox[{"-", "0.29278"}], ",", "tryKm"}], "]"}]}], "}"}]}], "}"}],
",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Red", ",", "Thin"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0.29278", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.29278", ",",
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",", "0.29278", ",",
"tryKm"}], "]"}]}], "}"}]}], "}"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Blue", ",", "Thin"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Axes", "\[Rule]",
RowBox[{"{",
RowBox[{"False", ",", "False"}], "}"}]}], ",",
RowBox[{"Ticks", "\[Rule]", "None"}], ",",
RowBox[{"AspectRatio", "\[Rule]",
RowBox[{"100", "/", "408"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.6625990392524347`*^9, 3.6625991182736807`*^9}, {
3.662599742489361*^9, 3.662599797768262*^9}, {3.662600227309654*^9,
3.662600235495182*^9}, {3.662600636715523*^9, 3.6626006574723177`*^9}, {
3.6626007550573053`*^9, 3.6626007633197927`*^9}, {3.662600810103195*^9,
3.66260092853878*^9}, {3.662600994952506*^9, 3.662601020830427*^9}, {
3.662602129587813*^9, 3.662602129978712*^9}}],
Cell[BoxData[
GraphicsBox[{GraphicsComplexBox[CompressedData["
1:eJw1mHk8lcsfxymExLWEbikkFRHJkm0mN27Jlsh6JVu2hCwVypIlElly7dc5
1mM9D4osw7GvIZRUKpHtZjlKHdJvvF6/+/xzXp/X95mZ78zn/Xxn5ojZXTd2
3MbExMTBzMS09dv5qjwsNXUWJUsGxy23UiCvy/4dzOYziBvRLMTTiqGHR16Y
1fo0kmW+ls8VWAKfWnCUDVRPoezOOB+Nc6XQkNUmu9DvEyJTvhorcpVBxqGe
+zf2TSLauOKx9y/LYMKx3eIWYx+QqG1HcldsOdQo9K+UD3iPwr4uKD6SqIAe
nclCr3XeIfxMHAyogGpc3w5GtI2jAqmysqr2CiirGikuzD2G5id+8KbxUSFD
YShw4t4oyvuc5+B9kQodyjYd3NmH0cMipibhWCpc5bMGE6aDiKx/zbW2lQqf
RUzPcZP70I455lsfl6lwrM5PTVq2E6V49ctr7CWgwkpXwdAQDRlrDD9ZUiNg
ULBYSldBHQpkLVVXv0hAmTbvgvDBCnSv6JHtPQcCskyVpFkPpKE7CyV2fNcI
qFNop73J9ggcW6n05/Ag4JvdpQeZOMpARIxPQ6ITAZ3Urx10464F3Utq8hLm
BCSJiypd/t4MlA9UnnaFBLzMI3hw/64OkOnAyegSJ+BHxtnVC+y9QFeaRp/Y
pEIujtilN08HwHKM6jaXASrs71SLsdJ4AUbqrfYpZ1Gha1atwur3EVByf341
x5YKnemmBh0FrwBrbcCikggVxgaq7HI8Mg4kNFvfur6qgA/2zo3tm3gLNFqz
jJ9EVkCLNc+85wrvgdrSjP8vpQqYJbohWOb1AYjrr+y2ai+Hz4c94lK7P4LB
jahH9WzlUIDMYunK9QlkzET+yjxfBnU2QqTPukwB9fWM6aSbpTDmurjhzvJp
IP9a5URZSQkMFR8qdvvyGYzcnPhDaqIYOtq68IydnQXRMc93vGVQoHXNwTbp
B3PgxgfXviQxCoTpbSExc/OA78+N+VsniuBIg59/lNa/oDCrMYpxphDeYegi
17AvoKQu4HiPYwHkp7FxW04sAuuUdoUJ73z4dtDbTChhCVyTkgnfiMuD0R9d
zhjJLwM4sxIhReTC0prhKp53y2BR4ey1eRoZvt57of/03RWgV3myqnCKBLuN
NY8oKNCBUfCSLWU5By6IXtXu+z6DFANyj/0mVwx1c2T5M2e6UfR0omX8DgKy
mf2zfCe4DWXLDV5MOkbAUxaltVYXmxC8LzPtd5aAI+K62QXqT1CD0NjzeWsC
emyK9GeEF6DnjyLNn7gQMPBWEqU+4QbaXVlOIWF+mBSPk4EOGQwVne8zdyMg
ZTInzZejCtzW99ymZYv7axrtSLrbCORtvlkb6+P396SXNIa2AokQnW93ThBQ
NLx8Z010F1Dw5pEv4cU8R1DnWOv7QbTq0Nu0GSo0fvpngOrYCiiRNy9ScSPB
14ExDgrnZtE10/Wxf7Af25I4f41o9yLJCmbhHxtU6Hk/RtD0ZTviL9OgHZYg
4JO8OjmhxGZ0Y96OcNMiYNGgYrrKSg1aOVdRfQnz7dAawm2SVIIeXyplMb9K
QPvtxm07q+PQk+EB6gE8v4P337c1dqWD5RZmGt2dgHrK6qOMCCoYnaOG5doT
MGsz5+uv9jpAEhUx2jQm4GDmX8sPNVoAW7eYcNkpAsJuO6H5851g/WeKotfv
BKyAQYvSdn0gdBd70DqdCh+79EpolqyALKb9P00LSTBDorq38Ggr6mnkVgg9
ScCbezTD4eFGJKDc8IHXgIDMPjZkwchK1HM2WnIdr+9NlWexU34kpOlSJ5uN
17+fP0Ax68xNoNXecjod5+9xyGMyu6AQ1Lg716tg/9jjd1xeinkC9HMjbrlj
fyOaWfsEMpoA3KM4IvonAblZWwaV2OjgJ9u27ouyJDhIEfFx8ppF7J8imQcn
KNAm9ruP92ovarYVzgtao8JcceajTaEdaPv+P2RpBwi42qO1sHqChpqM1SXV
AQH5i6T3MOs/Q9HmBvtfm+L6UVBZVr63HI1Sbo1tOBLQik7R9DJNRr+uj1yk
4PpU9XdOuI3zY9A47a8Th7XIFQ6fBu0KELgkHSuF3w/NjHxQ7foM8ORc4CTh
/lTfN/KvpdHAqTTNpN81CDjgrp55r6QDHApMO1q8n4BdIpPLmtW9wJLDUi/o
BxXW0B7+QMkrQKxz5u33djy/BqkJ/pFWNCcXI5EuR8Cvjnob604ILWdXehmf
J6DbeROxiQ9ViN/r5imWywS8sXdB5vRmLpLoH/atdSXgWZc06YgOLZBbTdWq
wOutXGrQsvgtD1y72exogeNjtcMbhG41MHuUleZoQ8AlsWW5iXEErJou/6Gr
S0A5m/D8msUVMJacx2jUI0HAACKeKU9RlpTsV6olAV0+GHp856Kgryml48nO
BPxN1GCXIrqHgC7nbW88Xlc9T1hc8j9g5Hbmv0qYz4Bd11VUOgkwqa1UyGxH
QAblt3H+iWzkrfLlzlUcV73WPHRIOBKsHbUutMft8zJjtxuZFwMXVZuX3zD/
C8VMP6v20YH+LRn/NR4S7G2eXr8bPosc5r0U7YcokCt6sbzpfB/aJHRZqlap
UHNRjfB91YFs9dLTw0QIKHCZrXsylIac7mzOpmI/OpMkzR0Zz1DRqU+mcSaY
Rz0nVHa8AnV1G+icwX7KLRQvTPP9jYg531I77HeQaKhj2dNEMPiOcn8A650L
E+EauuXAa++npo/4/VV3hll8fS1ovMt34fMl3F/IokTxORo4OfCctV2TgMKa
R20HrTvA0S9+aw2iBLzEJXij06YXUBUmIk7g+nBucXEyOHoFtK/9I2c4SoLu
0Y7OXVJtSM5FrDJdloC/t8+Ou29vQqMmD2VnzuH6pGxo+0dcNZLPjlDY+Av7
x8W6+eV0PuqleiaqYX8vHhOb6jl1BbXe7u8qxeu5b1mzMiUrF/hr7tV6i+M0
g7rzApQqsP4UOJlhfuyW7TdqZRD4Md4XMIT5ao6ejr/1aQUM5mixM6xIcHVK
1Xr4TA1q/qIZEmVBwOkhZ818o2KkYy2YzsD+POM1chFVjUb5dzuc9fF4lsxM
0x63s8By8qOQVOyvA8k0MvUwAca315ePbvmvk9OgrJCD+jKkWHbgeHwA8lPN
DAEXZX7rDMPtoz8E0dd+FYFXSUtL6ZivoFdXPvvy0kFMxHzjwQMkGMEoil9P
SUDSZCfTWezHwm/Nedx7UkFu8o0ybay/HX3xV+IzMtLmEfl1HNefNdsvjIeZ
rqB5xnQ3Bfffb/23XWLUHfQ3m+PUQ6x/dbxTrTHLRFdTE7KacD6TNi2yvIkP
QOXq8EdVHLe6m823epgONhRSN/uZSFBXvwc9iJtFZNaFN5QeCrRnd+u76t+H
AvfVqOnh+vnAdMzPaHsnKrVwuXJlHwFzj8yojFNo6IH6kePt6vj8wpnrL3Sh
DgX7a7+Yxuej/ih3hbTgCpRoWaUxhc9Hac4lLTleqSjiRUqGGp6PnYO36aXL
CaC33mLnF6xXg9uHs4rKwK7o/ZLq+HxUOlzZEORYC+KGdvdHmOF6OhQpwypG
AyaMx5ypuN7V52c3r53sAAFkw6FWMQJmhJUrxCr0gg+TmsrRP6kwIVzU4sM9
vJ+FCMeuvyXB2qVtMrmmbYguuJM5VQbvn3E9ug7STehj5ZyrHOaPUdJ79+tU
NbJQNtrli/krD+edbpvMR+82tn34get5Ps+hTNJxdyTwktWwCK8fN79ysdsK
GbBbT/Luw34opcrSWy2qgEqcWVof5m+fhYhdwWgjOKzq7p+oR0BOMSG21+9W
gPynA5//tifBfquagIj0GvQy6UL+Et4f8877SgatFKPLe+NVKZi/h5wXhB6v
PUCk2c0cZTyepvbSiKB4JtDZrVXSgf18tdApq/uSCpYNVYI18f5Yi0rzuEdy
UNNkE8swzsefNejRfRQEpmxLUuNx+8DtfvM9F4sAs02Q7Tzmr90jwXp0Jx08
d+7Sq5MkwSU/ytUn3xJRf4HGbDf2Y8CEmvykKQU8XuQId9vaL0gT2q7WuYh8
Ny/vK/7ezq0Ph3saXgZCHj2wDPevflj/MmIOReY3/FtDtsarXeN0Ss9Cl05I
M5JwvtxOtOD0kfvAsNDQ0gjHc3cPRJqI0wGFfLrJjp0E268X7z5W9Rgx3TiV
HInH2ybhWzXMcw494GTfu1Xvp4QN6yiBkWhqQZztCtaOPk0SFZb3gE8ZvdcH
60Pit8aILm9gmGncRN7Sbo/ZCnfdQjKO/W9Ssa4xa30TYRQHhDPppw9izTfr
kZkoQwc7PxcrqP/IgRyJDWKJSbNIrqPWxKCTAh92HLFWi+1DS89SU1NWqJBg
PzLWINyJ0r9pRT3H9wP3XRZLo4001CpEoVhh/uPb7CI9A+uQ+qBP9yPM/2b+
9X95iirQfQ2Coxrz/zz/2PFfomnIR7DlzGE8P5MIV32pykeAxHqCZQNr555T
gYYWZeBzTaS0M+Y/Oirec/VULaihf6aNYP5NGS/kCS4aoNi8m2DG9wPuccsV
TrEOoOKfnPEnvh8AsJG4KNIL4s5tN1HE94MnAzWJvKErwEDJbcfQBxJ8T74Q
x+vWhmqP9c0KYv69fdS32YImZEgvfv8Cn0dnrsbEGfA+QUcHb1HlMP/cNCFL
6skC1NAQbvYK818YnLihM+KJzplwaeXj9dshoVBgmkEG6d0ShCrmzVNzRidT
vgrY/5jawY7PS9+5GAL7ixsB9dvaMTrmX9a9HHK+WQHGMzPFzldJsF7QP2ai
vQatS1QtkTH/LFEBac5/lKD3tLOWIZj/7xEXvhhdeogGuAQWpfF4cldn+uZ8
M4Ako+nHW8wTX0JoqHg5FbwyS6nzwvwLb1TuYRwiIWpu/HAtzofEFTjJvy0A
LPw7c+Ixbu8r4P25+mch8GqdMeLD85mrlUph46ADVomEa5FSJChZLfWCPz8J
xTdVTD7DftD8imKjBVJAd4NTYRDWAhNTtaalueiLTGTnS8z/N6HBvlQLE+B7
fymiHPefT9ZXum0bhjbvejrcxlrtBAtdXSMbbcY7+d/B+ebONhe994sC+aL3
dCxxvNPWmXbvAB1oF0j+PMZFguul0iH37VPQzpEAJ98tPnw1+ZqDzFCLUqby
Vv9GyYYJjuNRyNaAHGiGNWMN6X9dDwVhBdS4wK340ZvSGlyeoPoNq1zBVtw+
pUqkJwB13dHNT8LaYLyFtXc5FsxnxJsdx1rp5I5XLVJ0sO+pwm3WnzlwQ+Tg
6adVTqj5W/pgMY5L/mrMvqsZDLQzuf2it9pfX8giizsC1WAtzxKshyh6USzk
YCR/Z39aFNYzc64HVcX2oP0fuX22vlfG77cjj0T6gu/+6u3ZW/l5J5ufMPJD
VmeWorKw/pI5amcvRwfXk+Skb3zNgf/938D0/+e/+9Z/+n9e3WVz
"], {{},
{GrayLevel[0.8], EdgeForm[None],
GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl0lWYFVQYhtEzI0hLdw7dKdLdJUhICwyhCMxIdyrd3UpJI90gadAojSIg
3aF0rgMX63n3f/3tsPDI2hGhgUAghBgh7xs95P07v3c0PaJv+IHfeEJ3prKD
e9QngjFs4Cql+ZTWDGYF58hHXvKQm1zkJAfZyUZWspCZTGQkA+kJIx1pSUNq
UpGSUtSgFd+xnL9JQUmq05JvWcZfJKcE1QhnEEs5SzI+pwOjWc8VilOVFgxk
CWdISj3aM4p1XKYYnZnIVm5RheYMYDGnSUI3pvAzd6lLO0aylksUpRMT2MJN
KjOdXTygGf1ZxCkSc5jXfM+vPKYrB3jBZEJsvl3vUIeo7oP6kpmEuvfof3xN
FPc+fcaIQODdJ1oj/1KED92H9BWz+MC9V/+nI/t5zng2c4NKTGMn9/mC33lK
PxZykkTM5hce0YVJbOM2tZnBbh7SluGs5iKF+YZxbOI6FWlKX37kBAn5jK8Y
xiouUIhIxrKRa1SgCX1YwHESUIsvGcpKzvMJ5WlMb+ZzjPjUpA1D+Il/KEg5
GtGLefxJPD6mLA3pyVz+IC4fEYfYxCImMYhOtOBGwZ2DWwb3CW5MAcrQgB7M
4ShvAevzgXc=
"]]]}, {}, {}}], {{}, {},
{RGBColor[1, 0, 0], Thickness[Tiny],
LineBox[{{-0.29278, 0.}, {-0.29278, 4520.7187856970195`}}]}}, {{}, {},
{RGBColor[0, 0, 1], Thickness[Tiny],
LineBox[{{0.29278, 0.}, {0.29278, 4520.7187856970195`}}]}}},
AspectRatio->NCache[
Rational[25, 102], 0.24509803921568626`],
Axes->{False, False},
AxesOrigin->{0, 0},
Method->{"AxesInFront" -> True},
PlotRange->{{-0.7999999591836735, 1.1999999591836734`}, {0, 5000}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02], Automatic},
Ticks->None]], "Output",
CellChangeTimes->{{3.662599048027356*^9, 3.662599118487307*^9}, {
3.662599759021966*^9, 3.662599798298171*^9}, 3.662600236269802*^9, {
3.662600638703472*^9, 3.6626006578231163`*^9}, 3.6626007638682947`*^9, {
3.662600814095531*^9, 3.662600826209643*^9}, {3.662600874001212*^9,
3.662600929941042*^9}, {3.662601006206463*^9, 3.66260102140853*^9},
3.662602139115399*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["\<\
File: 2 - 0.85 - 4 - 0.02 - 0.0015 - 0 [Asymmetric resources - two species]\
\>", "Subsection",
CellChangeTimes->{{3.6580707049519672`*^9, 3.658070706349422*^9}, {
3.658070744397442*^9, 3.65807075249966*^9}, {3.658076356754607*^9,
3.6580763606504917`*^9}, {3.6625774963684072`*^9, 3.662577499079831*^9}, {
3.662577751631178*^9, 3.662577790492811*^9}, {3.6625817887548027`*^9,
3.662581831458*^9}}],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"trysp", "=", "2"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Sigma]\[Alpha]", "=", "0.85"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Kappa]", "=", "4"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Nu]", "=", "0.02"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Sigma]\[Nu]", "=", "0.0015"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Beta]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"tryvm", "=", "0.0015"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Mu]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Sigma]", "=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{"tryKm", "=",
RowBox[{"Km", "[",
RowBox[{
"trysp", ",", "try\[Sigma]\[Alpha]", ",", "try\[Kappa]", ",",
"try\[Beta]"}], "]"}]}]}], "Input",
CellChangeTimes->{{3.658074206458665*^9, 3.65807421166369*^9}, {
3.658074801389743*^9, 3.6580749396472607`*^9}, {3.658076014352268*^9,
3.658076022888116*^9}, {3.6625777618468847`*^9, 3.6625777620482903`*^9},
3.662581847840498*^9, {3.6693201915462*^9, 3.6693201923802853`*^9}, {
3.669320339194747*^9, 3.669320343366907*^9}}],
Cell[BoxData["10756"], "Output",
CellChangeTimes->{{3.658074932852392*^9, 3.658074948287805*^9},
3.658075053786251*^9, 3.658075661309265*^9, 3.6580760233468857`*^9,
3.661348768081315*^9, 3.661361475265626*^9, 3.662577504446596*^9,
3.662577549352231*^9, 3.66257779171821*^9, 3.6625779283183403`*^9,
3.662580263808111*^9, 3.662580489137106*^9, 3.662580824646832*^9,
3.662581608631073*^9, 3.662581717161949*^9, 3.662581855511919*^9,
3.66258205790613*^9, {3.662583212671132*^9, 3.6625832232873907`*^9}, {
3.662583420062113*^9, 3.6625834491842527`*^9}, 3.6625875938789062`*^9,
3.662588478190874*^9, 3.662596830466548*^9, 3.662599730013731*^9,
3.662601040278717*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"data", "=",
RowBox[{"ToExpression", "[",
RowBox[{
"Import", "[", "\"\<2-0.85-4-0.02-0.0015-0-Burn_In.txt\>\"", "]"}],
"]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.658071226407762*^9, 3.658071244891139*^9}, {
3.658074994893792*^9, 3.6580750210197153`*^9}, {3.658075621640133*^9,
3.65807562203861*^9}, {3.658075690781049*^9, 3.65807569876371*^9}, {
3.6625777972698793`*^9, 3.662577797581771*^9}, 3.662581764924226*^9}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"data", "[",
RowBox[{"[", "1", "]"}], "]"}]], "Input",
CellChangeTimes->{{3.654015655270091*^9, 3.6540156561189938`*^9},
3.658075623809044*^9}],
Cell[BoxData[
InterpretationBox[
TagBox[
PanelBox[GridBox[{
{
StyleBox[
StyleBox[
DynamicBox[ToBoxes[
FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"],
StandardForm],
ImageSizeCache->{278., {2., 8.}}],
StripOnInput->False,
DynamicUpdating->True], "Panel",
StripOnInput->False,
Background->None]},
{
ItemBox[
TagBox[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.0345557`"}], ",",
RowBox[{"-", "0.034331`"}], ",",
RowBox[{"-", "0.0306254`"}], ",",
RowBox[{"-", "0.0331047`"}], ",",
RowBox[{"-", "0.0346623`"}], ",",
RowBox[{"-", "0.0321523`"}], ",",
RowBox[{"-", "0.0278292`"}], ",",
RowBox[{"-", "0.0318517`"}], ",",
RowBox[{"-", "0.0320727`"}], ",",
RowBox[{"-", "0.0308631`"}], ",",
RowBox[{"-", "0.0337764`"}], ",",
RowBox[{"-", "0.0310824`"}], ",",
RowBox[{"-", "0.0268623`"}], ",",
RowBox[{"-", "0.0294456`"}], ",",
RowBox[{"-", "0.0314426`"}], ",",
RowBox[{"-", "0.0353142`"}], ",",
RowBox[{"-", "0.0295414`"}], ",",
RowBox[{"-", "0.0311648`"}], ",",
RowBox[{"-", "0.0329951`"}], ",",
RowBox[{"-", "0.0263313`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"\[LeftSkeleton]", "1", "\[RightSkeleton]"}], "}"}], ",",
RowBox[{"\[LeftSkeleton]", "4332", "\[RightSkeleton]"}], ",",
RowBox[{"{",
RowBox[{"\[LeftSkeleton]", "1", "\[RightSkeleton]"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.0347549`"}], ",",
RowBox[{"-", "0.0264781`"}], ",",
RowBox[{"-", "0.031051`"}], ",",
RowBox[{"-", "0.031989`"}], ",",
RowBox[{"-", "0.0346623`"}], ",",
RowBox[{"-", "0.0346628`"}], ",",
RowBox[{"-", "0.030352`"}], ",",
RowBox[{"-", "0.0280571`"}], ",",
RowBox[{"\[LeftSkeleton]", "4", "\[RightSkeleton]"}], ",",
RowBox[{"-", "0.035092`"}], ",",
RowBox[{"-", "0.0257663`"}], ",",
RowBox[{"-", "0.0274187`"}], ",",
RowBox[{"-", "0.0358847`"}], ",",
RowBox[{"-", "0.0308558`"}], ",",
RowBox[{"-", "0.0299647`"}], ",",
RowBox[{"-", "0.0316497`"}], ",",
RowBox[{"-", "0.0258137`"}]}], "}"}]}], "}"}],
Short[#, 5]& ],
Background->GrayLevel[1],
BaseStyle->{Deployed -> False},
Frame->True,
FrameStyle->GrayLevel[0, 0.2],
StripOnInput->False]},
{
RowBox[{
ButtonBox[
StyleBox[
StyleBox[
DynamicBox[ToBoxes[
FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"],
StandardForm],
ImageSizeCache->{49., {1., 8.}}],
StripOnInput->False,
DynamicUpdating->True], "Panel",
StripOnInput->False,
Background->None],
Appearance->Automatic,
ButtonFunction:>OutputSizeLimit`ButtonFunction[
Identity, 1768, 24002881922036044875, 5/2],
Enabled->True,
Evaluator->Automatic,
Method->"Queued"], "\[ThinSpace]",
ButtonBox[
StyleBox[
StyleBox[
DynamicBox[ToBoxes[
FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"],
StandardForm],
ImageSizeCache->{52., {1., 8.}}],
StripOnInput->False,
DynamicUpdating->True], "Panel",
StripOnInput->False,
Background->None],
Appearance->Automatic,
ButtonFunction:>OutputSizeLimit`ButtonFunction[
Identity, 1768, 24002881922036044875, 5 2],
Enabled->True,
Evaluator->Automatic,
Method->"Queued"], "\[ThinSpace]",
ButtonBox[
StyleBox[
StyleBox[
DynamicBox[ToBoxes[
FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"],
StandardForm],
ImageSizeCache->{82., {2., 8.}}],
StripOnInput->False,
DynamicUpdating->True], "Panel",
StripOnInput->False,
Background->None],
Appearance->Automatic,
ButtonFunction:>OutputSizeLimit`ButtonFunction[
Identity, 1768, 24002881922036044875, Infinity],
Enabled->True,
Evaluator->Automatic,
Method->"Queued"], "\[ThinSpace]",
ButtonBox[
StyleBox[
StyleBox[
DynamicBox[ToBoxes[
FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"],
StandardForm],
ImageSizeCache->{74., {1., 8.}}],
StripOnInput->False,
DynamicUpdating->True], "Panel",
StripOnInput->False,
Background->None],
Appearance->Automatic,
ButtonFunction:>FrontEndExecute[{
FrontEnd`SetOptions[
FrontEnd`$FrontEnd,
FrontEnd`PreferencesSettings -> {"Page" -> "Evaluation"}],
FrontEnd`FrontEndToken["PreferencesDialog"]}],
Evaluator->None,
Method->"Preemptive"]}]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxDividers->{
"Columns" -> {{False}}, "ColumnsIndexed" -> {}, "Rows" -> {{False}},
"RowsIndexed" -> {}},
GridBoxItemSize->{
"Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.5599999999999999]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[1.2]},
Offset[0.2]}, "RowsIndexed" -> {}}],
DefaultBaseStyle->{},
FrameMargins->5],
Deploy,
DefaultBaseStyle->"Deploy"],
Out[1768]]], "Output",
CellChangeTimes->{
3.654015656661993*^9, 3.658071247971476*^9, 3.658075055070158*^9,
3.658075702597713*^9, 3.6613487750821867`*^9, 3.6613614757456408`*^9,
3.662577553367422*^9, 3.662577801465736*^9, 3.662577928876912*^9,
3.6625802674214478`*^9, 3.6625804911533203`*^9, 3.662580825047888*^9,
3.6625816090321903`*^9, 3.6625817175734*^9, 3.662581856066216*^9,
3.662582058466477*^9, 3.662583223855639*^9, {3.662583420665516*^9,
3.66258344974146*^9}, 3.662588478737318*^9, 3.662596831034656*^9,
3.662599730597987*^9, 3.662601040829867*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"genotypes1", "=",
RowBox[{"Round", "[",
RowBox[{
RowBox[{"Total", "[",
RowBox[{"Transpose", "[",
RowBox[{"data", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], ",", "0.001"}], "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{"Length", "[", "%", "]"}], "\[IndentingNewLine]",
RowBox[{"Mean", "[", "%%", "]"}]}], "Input",
CellChangeTimes->{{3.6540156291055717`*^9, 3.654015637852762*^9}, {
3.6540156904355803`*^9, 3.6540156946030903`*^9}, {3.654015764153283*^9,
3.65401580327742*^9}, {3.658071257922381*^9, 3.6580712642191257`*^9},
3.658075625809054*^9, {3.661348776598023*^9, 3.6613487797015142`*^9}, {
3.66136146018661*^9, 3.661361467487602*^9}, {3.66136149867896*^9,
3.6613615017026176`*^9}}],
Cell[BoxData["4336"], "Output",
CellChangeTimes->{
3.6613487809482737`*^9, {3.661361475780387*^9, 3.6613615021844683`*^9},
3.662577556169673*^9, 3.662577804020043*^9, 3.662577928918355*^9,
3.662580269093361*^9, 3.6625804924903507`*^9, 3.662580825081121*^9,
3.6625816090646267`*^9, 3.662581717611493*^9, 3.6625818560961437`*^9,
3.662582058522499*^9, {3.662583217354154*^9, 3.6625832239212227`*^9}, {
3.66258342069779*^9, 3.662583449768002*^9}, 3.662587595895534*^9,
3.66258847877395*^9, 3.662596831067177*^9, 3.662599730696512*^9,
3.662601040860982*^9}],
Cell[BoxData[
RowBox[{"-", "0.6071321494464967`"}]], "Output",
CellChangeTimes->{
3.6613487809482737`*^9, {3.661361475780387*^9, 3.6613615021844683`*^9},
3.662577556169673*^9, 3.662577804020043*^9, 3.662577928918355*^9,
3.662580269093361*^9, 3.6625804924903507`*^9, 3.662580825081121*^9,
3.6625816090646267`*^9, 3.662581717611493*^9, 3.6625818560961437`*^9,
3.662582058522499*^9, {3.662583217354154*^9, 3.6625832239212227`*^9}, {
3.66258342069779*^9, 3.662583449768002*^9}, 3.662587595895534*^9,
3.66258847877395*^9, 3.662596831067177*^9, 3.662599730696512*^9,
3.662601040863352*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"genotypes2", "=",
RowBox[{"Round", "[",
RowBox[{
RowBox[{"Total", "[",
RowBox[{"Transpose", "[",
RowBox[{"data", "[",
RowBox[{"[", "2", "]"}], "]"}], "]"}], "]"}], ",", "0.001"}], "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{"Length", "[", "%", "]"}], "\[IndentingNewLine]",
RowBox[{"Mean", "[", "%%", "]"}]}], "Input",
CellChangeTimes->{{3.6540156415511837`*^9, 3.6540156416354847`*^9}, {
3.65401570555127*^9, 3.65401570695448*^9}, {3.65401581302857*^9,
3.654015817812921*^9}, {3.65807560260693*^9, 3.6580756265451508`*^9}, {
3.6613487833977833`*^9, 3.6613487835337753`*^9}, {3.6613614832638283`*^9,
3.661361496326339*^9}}],
Cell[BoxData["625"], "Output",
CellChangeTimes->{
3.6613487839827213`*^9, {3.661361483816585*^9, 3.6613614969501343`*^9},
3.6625775578543053`*^9, 3.662577804903142*^9, 3.6625779289520607`*^9,
3.662580269758013*^9, 3.6625804932205276`*^9, 3.662580825114416*^9,
3.662581609098485*^9, 3.6625817176611633`*^9, 3.662581856131297*^9,
3.662582058572379*^9, {3.66258321793729*^9, 3.662583223988018*^9}, {
3.66258342073068*^9, 3.662583449800529*^9}, 3.662587597862178*^9,
3.662588478808113*^9, 3.662596831132786*^9, 3.6625997307633667`*^9,
3.662601040894734*^9}],
Cell[BoxData["0.40777599999999986`"], "Output",
CellChangeTimes->{
3.6613487839827213`*^9, {3.661361483816585*^9, 3.6613614969501343`*^9},
3.6625775578543053`*^9, 3.662577804903142*^9, 3.6625779289520607`*^9,
3.662580269758013*^9, 3.6625804932205276`*^9, 3.662580825114416*^9,
3.662581609098485*^9, 3.6625817176611633`*^9, 3.662581856131297*^9,
3.662582058572379*^9, {3.66258321793729*^9, 3.662583223988018*^9}, {
3.66258342073068*^9, 3.662583449800529*^9}, 3.662587597862178*^9,
3.662588478808113*^9, 3.662596831132786*^9, 3.6625997307633667`*^9,
3.662601040897204*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"totalsize", "=",
RowBox[{
RowBox[{"Length", "[", "genotypes1", "]"}], "+",
RowBox[{"Length", "[", "genotypes2", "]"}]}]}]], "Input",
CellChangeTimes->{{3.658076784459578*^9, 3.658076805699773*^9}}],
Cell[BoxData["4961"], "Output",
CellChangeTimes->{{3.6580767952988997`*^9, 3.658076806295833*^9},
3.6625778063358727`*^9, 3.662577928985957*^9, 3.662580271543414*^9,
3.662580494904459*^9, 3.6625808251465397`*^9, 3.662581609131298*^9,
3.662581717711721*^9, 3.6625818561625137`*^9, 3.6625820586208897`*^9,
3.662583224086988*^9, {3.662583420763647*^9, 3.66258344983388*^9},
3.662588478839919*^9, 3.662596831168311*^9, 3.662599730796008*^9,
3.662601040929037*^9}]
}, Open ]],
Cell["\<\
The following shows the competitive impact felt by an individual of phenotype \
u exerted by all of the individuals of species 1 (red) or species 2 (blue):\
\>", "Text",
CellChangeTimes->{{3.658075190925829*^9, 3.6580752068114223`*^9}, {
3.658075541506732*^9, 3.6580755784304743`*^9}, {3.658076166027096*^9,
3.6580761819691687`*^9}, {3.658076486638575*^9, 3.65807648742222*^9}, {
3.662587704021105*^9, 3.6625877056046457`*^9}, {3.662587950455853*^9,
3.6625879596227837`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"competitionplot", "=",
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"Sum", "[",
RowBox[{
RowBox[{"a", "[",
RowBox[{"u", ",",
RowBox[{"genotypes1", "[",
RowBox[{"[", "i", "]"}], "]"}], ",", "try\[Sigma]\[Alpha]", ",",
"try\[Beta]"}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "genotypes1", "]"}]}], "}"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2.5"}], ",", "2.5"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]", "Red"}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"Sum", "[",
RowBox[{
RowBox[{"a", "[",
RowBox[{"u", ",",
RowBox[{"genotypes2", "[",
RowBox[{"[", "i", "]"}], "]"}], ",", "try\[Sigma]\[Alpha]", ",",
"try\[Beta]"}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "genotypes2", "]"}]}], "}"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2.5"}], ",", "2.5"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]", "Blue"}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "2.5"}], ",", "2.5"}], "}"}], ",", "Automatic"}],
"}"}]}], ",",
RowBox[{"AxesOrigin", "\[Rule]",
RowBox[{"{",
RowBox[{"0", ",", "0"}], "}"}]}]}], "\[IndentingNewLine]",
"]"}]}]], "Input",
CellChangeTimes->{{3.65401717055512*^9, 3.654017187280355*^9}, {
3.654017344576412*^9, 3.654017359511397*^9}, {3.65401927528238*^9,
3.654019279074164*^9}, {3.6580749961162663`*^9, 3.658075010600336*^9}, {
3.65807618793108*^9, 3.658076188490995*^9}, {3.658076231516355*^9,
3.6580762327478237`*^9}, {3.662578424430344*^9, 3.662578429869256*^9}, {
3.6625805332605762`*^9, 3.6625805414913797`*^9}, {3.662581602724835*^9,
3.662581605530455*^9}, {3.662581992245171*^9, 3.662582007124544*^9},
3.6625876775895863`*^9, {3.6625879334203587`*^9, 3.662587940361785*^9}, {
3.662588067883778*^9, 3.6625880692748327`*^9}, {3.662588103713826*^9,
3.662588106017372*^9}, {3.6625884586223783`*^9, 3.6625884625719852`*^9}, {
3.669320193047752*^9, 3.669320193796833*^9}}],
Cell[BoxData[
GraphicsBox[{{{}, {},
{RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJwtl3k4FY0Xx3ERpZJUtEklEZJQpO4pSSlRkt42InuWylbWK0Sl4qKylO2N
m+WOFqXUuZY2Ssia9a62EPFaEr/xPL8/5pnn88wzZ875nnO+M6No63HUXkRI
SIhHHrPnwC7T4ZkZCut2QMOKSj86CPyXjrZMUVi9SicY0UF0OCzdMfZygsIK
F9NxOxpGhzV6nn89flNYTV+Skjh36FB6I1aiU0BhfTJ3zV2VRQcJjcbVrK8U
lpGpufNMPR3ivGwOhiRRWKmhzYW+OnGQI3w5U2gbhXW9b8d9jz9xIGZvrCV/
RoS1rnrEqq0iARY3vb+QHiPMUqd7dLky7sPRskQ7lQohlm6RSlViXiL4D+68
cJc7gzMa52WClqbAK99EF6bZNP510qzTuvMIDsdarpl+MIVtcvXZHbvSwDjl
7eH9PycxYPsCA6/qdHj88UrD5VMTKBEzPI9mlwlnw+KWfMsew4kvllsktB9D
kA0lf97i/zDU0WPmzEQWCKkroGH4CJ66tTNCBxnw4+aD6zn1w6if6t9TkZUD
K+c6MUb2DGFJS3lnxMk8OPvuy621BkPo5BC5/cG5PEi7tMXTXGcI9zQlRGc7
5cGGlkndXOUhNCywln3nkwebc6PL7aSGsGY4o74sNg/2HH7WUVv/C0VPWSlr
V+SBc+z0kgKnX6g0pPrIVzcfXHVUxVpWDqLbsqOyIhQmXBIryvJZOIiWoU+j
hCSZcLXe2ERGZBAXM9qcJxcw4Ya3/Z0DXQMoWjzPvHM5E568SJV/VTCAJsdM
Ji9rMaFHZ5lG/L4BDNvyavq5DRMcdUWtzDz7seIIn+tRxAR3cfpEr20/sj5t
Gq16xwSfBsXkCMt+vH5GK3VjORMifKjst/r9eJT7l1FZxYTHhVdd1cT6Udjw
6Y9vXCbwdYeCJRN/oqDVKcFenAC7be3ZZWV9WDhKUdiiToBD9rbj+1724T0t
M93TmwlwkY+hfH7Sh8I6ix6FbSHA84/h2aqYPrSp9jv1VYeAAGQsbrbuQ+lV
pTt37SIgztg7aOBPL448832YdJiAD1ZSx+S1e7FNiTWm7UbA50/2wsnKvXiu
zv+LmAcBX/Qwf/WKXpTx7nny3ZOA2hWXJNeL9OLD9ZEBDl4EdHQ0vtOo7sGA
JjU9J38Cxh0zVPZe6MHIGJVjPyIJUPXTn3HP7MaLasbRrmkEsNoOq3ITunFY
ip4ynk7AcUM7S6uobpQeGO+hZRIQuuBWDtW9G9Xd3DSisghozmyzkt7ejb43
g1Rd8giIrAkhCiq7cOSp6TqvVwSs3hbfovSuC+On6/+UFRHwPJkhnkh0oWvF
0l8L3xDQ6Vh7OjS+C38zTqxPfkvAtul1khbWXXjRWCEqvJQAgerHcyPDAiw7
PhcTK0m97rbccuILMGgkNTjnCwEy/w2+bG0U4BtjJrz6SsCuErkF74sFqNyn
8O79NwLirVxex0cI0EZfJJD4Ttb7NogveUWAgYrsZWl1ZL1r6dJBrgIs8U/P
iq4n4Gf/GwcHcwFGCy6knmwkYG/Y/MXblgtwcLy0tuwHAT96FHflSAlQ30jz
F72F7KeZrrPCDB8PVVqOW7cSkLTcGufw+Biwc215XxsBwwTh2pTHx3p7b9Xa
TlKfpe8TDqXy8c4dzSAam9QnoLmEFcvHwD/9z9Q4BJgYi8gxfPno2B1W4sMl
IK3NovzKbj4y4sUPNvMJ0OJpTdZp83G5V6H+WQEB5b2LNDU38nFB5c/oDpIF
Y9+SBAv4KBdudbqxiwDf6fya3SJ83Fx0qMG0mwAJsdtzUkZ5aCxlUsAiWVXm
0GWLVh6qXV4UmdRDwBu5TYz8bzwMMS0JpfQScEhhbodkGQ976/a2OpLsrvbJ
hMXg4a4b7xlKfQTMaGWFrEjhodmTryuDSb6rF1Hoc5eHF2zwZx3JT/ftXavu
y8PLldlp3j8JMDRddyLShYcva6rDWSTXWYjc5p7hYZaM4fs5/QTYn2SX7TrC
Q3TPsD5I8n82rIkHe3k470risZskX3d8tHl0Gw+f+dVnfCRZzj3I3nwTD5sc
xE2FBgjY4W9QIy7Dw2tRKrkOJH+hrZhjK8ZD/d33zsWRfDZy0uDtOBcFQ0Me
70gevN18Se4nF81UKY08kkPiX2Vf7uCizpYHCXMGCViUfK+9qpaLQpLX8zeQ
nJ7uI6v6gYsTbpmr95C8lWFpEl7ExXONXwX/kFzO1A7pzOXiXD+euDvJloWL
C3ekcnFgV1VQEMmC4uG+BDoX3Ru9D98k2besRnE4gotijArvOJIlKggr06tc
zGpijTwg+UH1nehsNy46GB+pTCJZtdG9jHKOiwH0KxOz14vbTCfOHiPzkTMI
nr3flKe2+bUxF/8OPjo9G7+9d579kh1cfNdPxMw+33OoN9FTg4yXGbx6Nj/h
8c/VlYpc3GSnSDlJcux0trjyEi4qahPU2frWiUUahEpwkdNuUjdb//N5jpfa
/nDwMV+2ZFYfI5l92dsHOTgQrivOJ/VrkFNqp3M4KPmqNWNWX0cFUdnBeg5q
auglzuo/rsQ9YPKZg0kWoT2z/YlSKw3+t5iD+01/x+iQvHxr2gshgoMmY5X0
2X7m6IX0ncrgYA7ffHC23wZgrfgygYNLz1Vmzs7DWdNV0W6BHLR42rZaguRB
i6nST54cjE5X4M3OV8jJlvF15zkYYpEj6kNyuuOD8z9MOPi9SvmfenI+u2hL
DIzlOJhreumUEznfcwOZg/S5HMyUnLzyh9wHDb8DGZ1TbHx7Nd7yBsk+7oFz
r7LZWH7pzb4kcn/ET/Gbcp+w8absEqUb5P6pHg++NZHMxlTuWfhD7uvhI/Kw
7w4bT0hUrHYiOd7YNKvjMhsPpF7bqMMjYL32C2+ZnWykhFtHJZN+sH+zmYr1
ZjYKrbVr7CP94oJqT2uOIhstmlR+6ZL8fM2qvUbibFz02ziC1U7u0/xwGb9v
naimJns+jfQjW8ExZtu5Tky3cx1JJP0tgj1gq3qsE11ymP5ZpP89aY1c6ruv
E8fG77OZtaQ/1RYHSm/qxLkXlcyeVxMgEnzgfkR3B660m/xxk/RX6paemiPz
O3B9rOEy3zIynvIqvb6hdqR/y96zh/TnqlVHUsMa2rGyMNBBsoTsx9wi95eP
2vGUA/PhzXekX3Mj563SakdHwxFRG9L/X8dvNOo+3oa86LoTJvnkvJ/qshM2
aMO2qC5szSXfN2sehy5XbMOlG7/auuaQ+T1ZxzrU14q4Rvl8YDYBKqzVOwqC
WzEpufi2F/l+ut8ru+VqdgsyFd5aF8QT4E0VXiU12Yye8bw3XlcIKBVl7VDq
aMZ2blRbrC8B0hVBJ3eVN2PTpEpYnjcBucem7nnebkbR/liXposE8JzHZOrX
NuOKN3Y8URcCjsb1Szw82IR3hD/8eP0PAZo9zSObUxrQJtByKk+XAK9f6irL
whrwbveHkChtAl6N0c5MuzTgHEV3E1stAnaLq374sr0BM0YmCudpkPHWXb3n
XFePpW1vtu9SIvM9s1w/Y149uvC6RdYvJvWpORm89Op3TO3aai3xgwl7X7dI
/j1ejdQve5zNtjIh/8m/eh93VKMWZ/nJk+pMkEvycI5ZU437NXQdbJSZ0DAm
Hnuw7hsG2A31nVnBBCX/49Ipk1Xoq8n2UCC/r0ppo1Jg/BVbr4R4ltbkw9Tt
reIRnZ/R/bq3ZpFrPngymOOLFpehXdZN01/0PDjusC6tNoCB5tub77uzc+Dj
l+YbWy2yqU5d2+Qs1zwBffWSp+b3yqj7K7UHCrSyQcRnSet5+WpqSMcRd2X3
xzBHypxmO9BAdWxSOVF7LxOudTYYXspoo9Y+vO2Xz08HIinCPGiYTVWYejs5
cCENPNLPS/OO86kcacO9a3oewVmXxFXXad1UxjJ4H+eQAlFHfPS2JvdRL+83
8x3ckASisvGC4MkB6njf3wK/wfvQWBn+K2zhEFWoZA7jzcJ7YOlvq5tYNkz9
tu8fdy29eLgwr29t1ckRqvRKzw3zc+mgkPMhQbx3lMqRK/jkYRIL/q8MLRYm
jVHNapx9OwfugufjC4W6myeolkZyFQUxd0BKZJutBn+SKp7536fbZtFg5HYs
XpU+RX1D139qb3oT5IpWeRitn6YOJJx/6nw/CmIvRcZoNs5Q214Uaat3X4ej
EWbqKYVCEOzW2cjwjQDVU2GWmYHCcNFbeV/7pnBoEEim0y1F4I/zoc8x7GtQ
ZcvfLaNAgQ/VBSe8PoQCWzRrPH4tBa74qrm/LAmFkcdOTPkNFCjqENadKg4F
+b6+lYrqFOjc/bz5xrNQOH95eGzzDgqk7JQ+XZwaCpPXZvJMrShweoLI9PAP
hQ3/yi+PukMB07BxeRmtUNAzbqmWolNgQ3md5A31UDjUk3z9bgIFNG1C4igq
oXBRfc3ovRQKxBm4+f5RCIXiFxuqH+dQQPDxg/X0/FA4+mFrRPlHCkRYD680
76WBvdOowf5KCkgVb7Bn82ngN/fl78oqChQGDRt4sWmQclj/3Pd6CuQ/vX3/
YRMNuhvAgMOlgFNz+k+xjzSY9BP5bd9FgfTREw8zSmkwf0U5o6eXAluj1H7s
eUcDLWvjZUNDFMgu9u4Pf0EDI2HJKq9RCjCkYspUCmhwIqMibHycjKe9RPFb
Lg1cjG7tCJiiwJluSzGfbBr8/38RZLWzPFZn0uB/2wCBZg==
"]]}}, {{}, {},
{RGBColor[0, 0, 1], LineBox[CompressedData["
1:eJwt13k0VP8bB3AMbZRKWhUiiUJFsvU8kaQkSUSKzKBkCWHszVxRWrQhpCgp
SxsRUjNFCaXJMsyMXcpSsmbJ8rvfc35/3HPP64/Pued8nuf9fD5X3snL0llE
SEiog3z+e4f+3D84M0NhP+OFLadVWeOP4KUjgkkKe2zy/uFHNdZovrBl9NU4
hX13WfbeXw3WKKdzZspriMK24mg7BHdY4/voG3Naf1DYVa++GT8ds8Y5avVr
2F8o7HVxlEeuCjZ466zjvnNJFLZZqlHRpiAbzBL2TRPSprBnPAaNNTYdQTFn
ky0rjomwHYNaB8YqbVGq4YP7/evC7JGVBS/2+x5Fy5JE6oYKIfZD6TDrYe1j
GPzHwP1axwyrlMaJ+X3QAQsCEt2eHZhmPYzfeC+22BHNbxyWm06YZGnuFD+2
V8wJTZLfmO/5NcESlhBXF3KjYnpZINf36DiLl9OSl9tAw+MRt6S/Ph5lKWoa
rXkV44JhjpSn4lJ/WS4VIodKrE6i0CZZltH5YZZPdm4+28AN+ZcSorLqBln0
ZZ+i0qLcUWbeyYxhwwFWXJ3ngeUdnnhaS0VMIPOHpR1ln6DEP4NU7ebHJSW9
rHkfxZbbOfqgCl13xjOti7VOrzX4z29fTG06VBq4s5P1teHzQfX3fviTIa1v
sryddZo+3HjrdgAWxSobd1k3sRTT49xM8wNRo5s3rJ7MZfkOxS/Z1x6Mu4oE
c6esOawHBcXSC4ZC8UzGs7FFUiWsrHjbnLwl59DaRSG1OiSDNTpvpllZkoHR
3r4XbuQ9ZqV8a5lTu5iBb0JKvCz7HrFc7BrSQpcyUPEmdUe1Qzrrtea00ufV
DBxkPRB8M3zAGrF0nzm8kYFrtu7ZeH9RIuthYcGRlaYM7L+dQBtIsGTdtUdT
CwYDyz7zorceegyPXBvSS3sZeJLOLzuqmgHruCkWOn8YOEdRIBpByQRa0rEd
WYMM3BvcGFabmwXiorO4keMM/LyhxcdvyTNIjAm6IDObiSeNfJ4IenKgolvh
2lt5JrqnBMSuzi6EXznBy95bMVH/72ju5uVFYCP9qqjehokSZvRq44giCBYk
KvXYMfHJKF3S0/41nA6zNRU7wcQ+86CLbyXewBulpZZLPJhYEPb27bNtbLCJ
L9pyI4KJupve5VjEl0C/UR576DkTtWq5cW/LSyCw/YO0Zy4TNYJ/BW2cLIGm
HWd1OvOYqFS+zGjOiVL4uv5CW3kRE6WcPWtYKh+g8pWqq3spE3/dWTWs9vYj
rLL43SlVz8R7Ev5a8zvLoVFbXYM/zsTE3EsrgpdVwBvfuPXd/5gYZ5c61WVa
AdjbkDA8xcTLjz9/KH1aAfQM404hEQLpuxSsQ+iVIGvfUNs3l0DLEI5/r/gX
MNu1SXzNCgJF/KUbaSs4MKUlpl2kSaCdY2Z1gSYHxGt2mftvIzBnL5RLWHBg
m6Vy/6btBDrJnsp/GcmBcaOJ8hg9At9/Kr4mOsyBpzd6rq82JJBYRTNOq/oG
4OLh6mBOYKPYuN5Y9zd46VwuUXOAQM3+K1vMxKohd8/oMsODBH4vfSU7rFcN
PCE3m8VWBO7yFJ8wyqiGxTy/ncG2BIq+y3naQdSAUzRjvgeVQPssk4fa92qg
r3zF2jgagS9jG5MuFdWAxKLB0CJnAmlusy5uHagBoUVpoiOuBH6QsqMSx2sh
tchCbrM7gWum+2zrA2sh+9QUanoQ6N9FWKjG1oIeW+bOFk8Cld48MaiprIUU
t6p/cmcIjHQRXq6gUwczsEOn1JfAZou4BQFWdfC88JpY6lkCt+mpilV61cGL
Yygc6EfgD8nDgz7pdTBh8oKxMoDA3YWPP7+X4sL0I/3zCkEE3n1gULJUnQse
BzMzeaT/XqkudNvLBdmv8n+jgwlMd5pMX8zgwnYtiX/NIQTOlrBgOPVxgevt
m2oWTuCR9XbsbXPrQd7Ez5RHOtOQNjNPsR56rmgYnDhHoHkgPTTXth7cbpaK
UhkEptxiFkedrQd3rlJ9I+nBZ5f/HY2ph1UJhwcPMgmM+5ESKPqhHiK8/YXU
CAK7hLMKGlrqQTlUefAWad3VeaPZE/WgMK6kMkq6+VC532GNBvB3qHV7EkGg
hlfNyw37GmDeRKCP8HkCmdFNQ1PODaB/yvatBWmldwPe6UkN8C57Wq6NNL3x
3/Og/Abgrx/ctjaSwIpRsX7zbw3QUhYUc5y0jNRCdYVfDZCVgCpxpD3VVnqO
zuLBwmuDs8pJs00Vn1TK88Dx/O51o6QXO6v9uqfPg3a98Qi5KLL+57arnrXh
QYBD1Tpj0vlJhm57fHigHHlttjPpOa/MMmSu8CBCY5HKOdJ21dZd/Y94sKFS
+Uoc6ezfjus/vCfXP83XeEx6es5pl4QmHhCyqUvySFso+j30GONBmEXd9jek
70P4951SfKA7miSzSQ/bXVRYqsaHQ/aDO1mkjf1vOvXs4YPkjgalQtJx15NT
31L5cOS3sNlT0l3Zj1pvhPFhHoS/uEta99MLWdcEPlBGXGyiSV/ueH1c7yUf
VN9yDbxJN09/SJb8ygd7rSHaIdIaKzmNHd18KGj7+VmDNFOLv6pAVACaWj/9
5pKutfhud1lWABaXVRybyP1Scu9LcNQVgN2mwUvZpOlRYw2ahwVgbnJ+3P+/
etwXWT73jAB6+zdn6P9Xj7cSNk3RAvBavz9piqyfJ29p3IuHAgj8soVTSJo9
LFd3ni0ArUzjPd6kaapah9T+CuDF1RRKNdkf+bvhhsiiRgi9xDEJJj3HyfQb
V7UReA+nOLKks28fOxB+ohGq77q9tCP7azrX9eqhkEbotyyXHCD70+Kr95f1
8Y2wq9Iph0l6WCxyH+dzIzg3V32NJ/t5t/y16LSfjfD99999q0jf1k8sp4s0
wdhD0cWJZB70fZ+ayG9vguTij2EXybwQrVwjnwdN0Lx7+YB6KLmfhfs86MVN
EDDvYOttMm+6N9lxYXVNcEZi5PUUmcd+48zu6NnNcHDsut5rMq/Hs0JjHpxu
hlX+bB8xOoFFEYMFGRHNsCKNI9hP5l36uGv7s+RmaDk1on3Dn8DPCw9qFX9t
hvnJGl8WkPNB119RULu1BfZVeEbWe5P9cCBBVGDWAh3Nwg9myHkzoLxArc25
BerFbhQpkH4sGD33O74FMnT/NTuQ82npzkqlWZMtsCvYQOaxG4HjYjqFq5xa
wdD7pU+gEzk/fIa+3PVshX1JWRUnThBo1fKkXT64FXTvL9m825HA5wVrJZRv
tcJGKZYa5TiBLqclHDQ/tsI0RULanJy3tZwW0f0qbWCYq81TJuc10yBxBWdb
G7h+kimr3k/2W6aV2iGjNihmxAjoZgReIsptbO3bwOwPO6zQlEDDbbmZzlfb
wPrB6yaJXeT3kiItwgbbALoPRE1pE1gpFflTUqgdZGbuh+whz5cfl86Hpc5v
B0m3VxIx5PkjExKRXarcDuHHhmdJbibwgj1zjrhDO7wOSsvgbyDQcXUYO76y
HcR7y7vuryRw4T0/jRdpHaBuLeQyjzwfVZf5lRnmdMCCst0NX/4ycXfM2eO1
rA7Y4JxvcGWYiSHhvpdH+R1QNduxb+YPE7scvLsMFn2HF0vHDPJ+MJEt55FS
Efod4nO77J1qmOh1n7bwu3Un3P5nf68pg4lXAxPuXKV2wjNegJzVIyY+tahS
1jnTCbPdjP3L0sj7wrT2zqsXO+Ek7VxW2j3y/nFU3Gd7cSdkuz+5ohPLRLcl
OTWX5X9AaUfnu6/hTHSJnInT+vUDFn+OanxvycTjbomroxhd0Pu9/ueZfgb+
482tGrjSBXw1WtWu3wy8bRoYZp/YBcXHAlyX9jDwm/KRls25XXBSj/omp4OB
u35KpzZ+74KrQqz9HC4DN9CuK27Z0w2DTgpPUosZOHzsgmrTgh6I6Uni5kQy
8OJBf52td3pBtdpmpa40A0WXxP4In+iDU5WBPdHi57C+8nx/hOQAdAxcM3wl
HoaHg522JZYMgmjZ88j4L8HoLt67tspuGF6ftFr4khWIslkf42b1jEDA+qwj
LzkBGFxgdEgyaRTmvRsXTuf64Zl09/xt6uMgNcnffEL2LEqIaDupdU6A9VaZ
+QqnfNDYwypW5eYkRIkte/e99QwuL1ztZaw4DXIj9BRc74U3fC5c16ifAXlM
0beNd0fLyAObkvOFMLGya6uEhxuqHI04nBYqjI8Mlfd7hZ9E7o+5928eFsEU
imV7ZKILVjl17lwsS0HpelPLKSFnbBN9NBa7loK6s06bakzQcDj95LMVShR0
8j2h5DJEwxW9vTLymyhYp+18md9JQ5rv4Ki6HgW9N8/u6Kyg4QQx82S/DQU1
w22uno+lodLDFSsvxlBQiq8S27KRhjomAo7ETQoGqTS8cFeioVn3nahrcRRc
brsgelKWht6b5Ebikyk4i9rnqihFw+I8JU56FgWFPl3MuzVORcuPWyNLyyh4
z3RP0N+PVHQ+OaK/p5KCjAuz85+yqUif92qosoqCK237b58qomKyue6JmjoK
/lmtc+DnEyp2cVG/vYOC+0KT7URiqThBFxly/knBs11J2V+vUnH+qtKM7h4K
Rtt8TLp3gYpbHEyWDQxQsMo108wkhIrGwnOrzo5QkN7TIy7rT8UjDyoixsYo
uErTmTruRUU348t6IZMUFBdtPsg9RcX//x/iknsruXlUKv4PmoHf5w==
"]]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-2.5, 2.5}, Automatic},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{{3.65401717310271*^9, 3.654017187829471*^9},
3.654017373231942*^9, {3.6540192724811373`*^9, 3.654019295101372*^9}, {
3.658076192083295*^9, 3.658076207327387*^9}, 3.658076247547501*^9,
3.6625776031328707`*^9, 3.6625778241482553`*^9, 3.662577944294787*^9,
3.662578391828827*^9, 3.662578446612812*^9, 3.6625805574766693`*^9,
3.662580840309733*^9, 3.66258162442422*^9, 3.6625818707149887`*^9,
3.662582072670968*^9, 3.662583238967751*^9, {3.662583435200075*^9,
3.662583464417943*^9}, {3.6625876706874638`*^9, 3.6625876887332163`*^9},
3.6625877657034407`*^9, {3.662588106650714*^9, 3.662588117118709*^9}, {
3.662588182585125*^9, 3.662588203294806*^9}, 3.662588485947481*^9,
3.662596838415786*^9, 3.6625997378685226`*^9, 3.662601048235593*^9}]
}, Open ]],
Cell["\<\
The following sums the competitive impact felt by an individual of phenotype \
u exerted by all individuals (grey)\
\>", "Text",
CellChangeTimes->{{3.658075190925829*^9, 3.6580752068114223`*^9}, {
3.658075541506732*^9, 3.6580755784304743`*^9}, {3.658076166027096*^9,
3.6580761819691687`*^9}, {3.658076486638575*^9, 3.65807648742222*^9}, {
3.662587704021105*^9, 3.6625877056046457`*^9}, {3.6625879709321117`*^9,
3.662587974315638*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[",
RowBox[{"%", ",", "\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"Sum", "[",
RowBox[{
RowBox[{"a", "[",
RowBox[{"u", ",",
RowBox[{"genotypes1", "[",
RowBox[{"[", "i", "]"}], "]"}], ",", "try\[Sigma]\[Alpha]", ",",
"try\[Beta]"}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "genotypes1", "]"}]}], "}"}]}], "]"}], "+",
RowBox[{"Sum", "[",
RowBox[{
RowBox[{"a", "[",
RowBox[{"u", ",",
RowBox[{"genotypes2", "[",
RowBox[{"[", "i", "]"}], "]"}], ",", "try\[Sigma]\[Alpha]", ",",
"try\[Beta]"}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "genotypes2", "]"}]}], "}"}]}], "]"}]}],
")"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2.5"}], ",", "2.5"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Black", ",", "Thin"}], "}"}]}]}], "]"}]}],
"\[IndentingNewLine]", "]"}]], "Input",
CellChangeTimes->{{3.662587681889565*^9, 3.662587694319735*^9}, {
3.66258792777945*^9, 3.662587928809368*^9}, {3.6625880950572844`*^9,
3.662588096681275*^9}, {3.6625884667051773`*^9, 3.662588467828451*^9}, {
3.669320194414809*^9, 3.669320195264204*^9}}],
Cell[BoxData[
GraphicsBox[{{{{}, {},
{RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJwtl3k4FY0Xx3ERpZJUtEklEZJQpO4pSSlRkt42InuWylbWK0Sl4qKylO2N
m+WOFqXUuZY2Ssia9a62EPFaEr/xPL8/5pnn88wzZ875nnO+M6No63HUXkRI
SIhHHrPnwC7T4ZkZCut2QMOKSj86CPyXjrZMUVi9SicY0UF0OCzdMfZygsIK
F9NxOxpGhzV6nn89flNYTV+Skjh36FB6I1aiU0BhfTJ3zV2VRQcJjcbVrK8U
lpGpufNMPR3ivGwOhiRRWKmhzYW+OnGQI3w5U2gbhXW9b8d9jz9xIGZvrCV/
RoS1rnrEqq0iARY3vb+QHiPMUqd7dLky7sPRskQ7lQohlm6RSlViXiL4D+68
cJc7gzMa52WClqbAK99EF6bZNP510qzTuvMIDsdarpl+MIVtcvXZHbvSwDjl
7eH9PycxYPsCA6/qdHj88UrD5VMTKBEzPI9mlwlnw+KWfMsew4kvllsktB9D
kA0lf97i/zDU0WPmzEQWCKkroGH4CJ66tTNCBxnw4+aD6zn1w6if6t9TkZUD
K+c6MUb2DGFJS3lnxMk8OPvuy621BkPo5BC5/cG5PEi7tMXTXGcI9zQlRGc7
5cGGlkndXOUhNCywln3nkwebc6PL7aSGsGY4o74sNg/2HH7WUVv/C0VPWSlr
V+SBc+z0kgKnX6g0pPrIVzcfXHVUxVpWDqLbsqOyIhQmXBIryvJZOIiWoU+j
hCSZcLXe2ERGZBAXM9qcJxcw4Ya3/Z0DXQMoWjzPvHM5E568SJV/VTCAJsdM
Ji9rMaFHZ5lG/L4BDNvyavq5DRMcdUWtzDz7seIIn+tRxAR3cfpEr20/sj5t
Gq16xwSfBsXkCMt+vH5GK3VjORMifKjst/r9eJT7l1FZxYTHhVdd1cT6Udjw
6Y9vXCbwdYeCJRN/oqDVKcFenAC7be3ZZWV9WDhKUdiiToBD9rbj+1724T0t
M93TmwlwkY+hfH7Sh8I6ix6FbSHA84/h2aqYPrSp9jv1VYeAAGQsbrbuQ+lV
pTt37SIgztg7aOBPL448832YdJiAD1ZSx+S1e7FNiTWm7UbA50/2wsnKvXiu
zv+LmAcBX/Qwf/WKXpTx7nny3ZOA2hWXJNeL9OLD9ZEBDl4EdHQ0vtOo7sGA
JjU9J38Cxh0zVPZe6MHIGJVjPyIJUPXTn3HP7MaLasbRrmkEsNoOq3ITunFY
ip4ynk7AcUM7S6uobpQeGO+hZRIQuuBWDtW9G9Xd3DSisghozmyzkt7ejb43
g1Rd8giIrAkhCiq7cOSp6TqvVwSs3hbfovSuC+On6/+UFRHwPJkhnkh0oWvF
0l8L3xDQ6Vh7OjS+C38zTqxPfkvAtul1khbWXXjRWCEqvJQAgerHcyPDAiw7
PhcTK0m97rbccuILMGgkNTjnCwEy/w2+bG0U4BtjJrz6SsCuErkF74sFqNyn
8O79NwLirVxex0cI0EZfJJD4Ttb7NogveUWAgYrsZWl1ZL1r6dJBrgIs8U/P
iq4n4Gf/GwcHcwFGCy6knmwkYG/Y/MXblgtwcLy0tuwHAT96FHflSAlQ30jz
F72F7KeZrrPCDB8PVVqOW7cSkLTcGufw+Biwc215XxsBwwTh2pTHx3p7b9Xa
TlKfpe8TDqXy8c4dzSAam9QnoLmEFcvHwD/9z9Q4BJgYi8gxfPno2B1W4sMl
IK3NovzKbj4y4sUPNvMJ0OJpTdZp83G5V6H+WQEB5b2LNDU38nFB5c/oDpIF
Y9+SBAv4KBdudbqxiwDf6fya3SJ83Fx0qMG0mwAJsdtzUkZ5aCxlUsAiWVXm
0GWLVh6qXV4UmdRDwBu5TYz8bzwMMS0JpfQScEhhbodkGQ976/a2OpLsrvbJ
hMXg4a4b7xlKfQTMaGWFrEjhodmTryuDSb6rF1Hoc5eHF2zwZx3JT/ftXavu
y8PLldlp3j8JMDRddyLShYcva6rDWSTXWYjc5p7hYZaM4fs5/QTYn2SX7TrC
Q3TPsD5I8n82rIkHe3k470risZskX3d8tHl0Gw+f+dVnfCRZzj3I3nwTD5sc
xE2FBgjY4W9QIy7Dw2tRKrkOJH+hrZhjK8ZD/d33zsWRfDZy0uDtOBcFQ0Me
70gevN18Se4nF81UKY08kkPiX2Vf7uCizpYHCXMGCViUfK+9qpaLQpLX8zeQ
nJ7uI6v6gYsTbpmr95C8lWFpEl7ExXONXwX/kFzO1A7pzOXiXD+euDvJloWL
C3ekcnFgV1VQEMmC4uG+BDoX3Ru9D98k2besRnE4gotijArvOJIlKggr06tc
zGpijTwg+UH1nehsNy46GB+pTCJZtdG9jHKOiwH0KxOz14vbTCfOHiPzkTMI
nr3flKe2+bUxF/8OPjo9G7+9d579kh1cfNdPxMw+33OoN9FTg4yXGbx6Nj/h
8c/VlYpc3GSnSDlJcux0trjyEi4qahPU2frWiUUahEpwkdNuUjdb//N5jpfa
/nDwMV+2ZFYfI5l92dsHOTgQrivOJ/VrkFNqp3M4KPmqNWNWX0cFUdnBeg5q
auglzuo/rsQ9YPKZg0kWoT2z/YlSKw3+t5iD+01/x+iQvHxr2gshgoMmY5X0
2X7m6IX0ncrgYA7ffHC23wZgrfgygYNLz1Vmzs7DWdNV0W6BHLR42rZaguRB
i6nST54cjE5X4M3OV8jJlvF15zkYYpEj6kNyuuOD8z9MOPi9SvmfenI+u2hL
DIzlOJhreumUEznfcwOZg/S5HMyUnLzyh9wHDb8DGZ1TbHx7Nd7yBsk+7oFz
r7LZWH7pzb4kcn/ET/Gbcp+w8absEqUb5P6pHg++NZHMxlTuWfhD7uvhI/Kw
7w4bT0hUrHYiOd7YNKvjMhsPpF7bqMMjYL32C2+ZnWykhFtHJZN+sH+zmYr1
ZjYKrbVr7CP94oJqT2uOIhstmlR+6ZL8fM2qvUbibFz02ziC1U7u0/xwGb9v
naimJns+jfQjW8ExZtu5Tky3cx1JJP0tgj1gq3qsE11ymP5ZpP89aY1c6ruv
E8fG77OZtaQ/1RYHSm/qxLkXlcyeVxMgEnzgfkR3B660m/xxk/RX6paemiPz
O3B9rOEy3zIynvIqvb6hdqR/y96zh/TnqlVHUsMa2rGyMNBBsoTsx9wi95eP
2vGUA/PhzXekX3Mj563SakdHwxFRG9L/X8dvNOo+3oa86LoTJvnkvJ/qshM2
aMO2qC5szSXfN2sehy5XbMOlG7/auuaQ+T1ZxzrU14q4Rvl8YDYBKqzVOwqC
WzEpufi2F/l+ut8ru+VqdgsyFd5aF8QT4E0VXiU12Yye8bw3XlcIKBVl7VDq
aMZ2blRbrC8B0hVBJ3eVN2PTpEpYnjcBucem7nnebkbR/liXposE8JzHZOrX
NuOKN3Y8URcCjsb1Szw82IR3hD/8eP0PAZo9zSObUxrQJtByKk+XAK9f6irL
whrwbveHkChtAl6N0c5MuzTgHEV3E1stAnaLq374sr0BM0YmCudpkPHWXb3n
XFePpW1vtu9SIvM9s1w/Y149uvC6RdYvJvWpORm89Op3TO3aai3xgwl7X7dI
/j1ejdQve5zNtjIh/8m/eh93VKMWZ/nJk+pMkEvycI5ZU437NXQdbJSZ0DAm
Hnuw7hsG2A31nVnBBCX/49Ipk1Xoq8n2UCC/r0ppo1Jg/BVbr4R4ltbkw9Tt
reIRnZ/R/bq3ZpFrPngymOOLFpehXdZN01/0PDjusC6tNoCB5tub77uzc+Dj
l+YbWy2yqU5d2+Qs1zwBffWSp+b3yqj7K7UHCrSyQcRnSet5+WpqSMcRd2X3
xzBHypxmO9BAdWxSOVF7LxOudTYYXspoo9Y+vO2Xz08HIinCPGiYTVWYejs5
cCENPNLPS/OO86kcacO9a3oewVmXxFXXad1UxjJ4H+eQAlFHfPS2JvdRL+83
8x3ckASisvGC4MkB6njf3wK/wfvQWBn+K2zhEFWoZA7jzcJ7YOlvq5tYNkz9
tu8fdy29eLgwr29t1ckRqvRKzw3zc+mgkPMhQbx3lMqRK/jkYRIL/q8MLRYm
jVHNapx9OwfugufjC4W6myeolkZyFQUxd0BKZJutBn+SKp7536fbZtFg5HYs
XpU+RX1D139qb3oT5IpWeRitn6YOJJx/6nw/CmIvRcZoNs5Q214Uaat3X4ej
EWbqKYVCEOzW2cjwjQDVU2GWmYHCcNFbeV/7pnBoEEim0y1F4I/zoc8x7GtQ
ZcvfLaNAgQ/VBSe8PoQCWzRrPH4tBa74qrm/LAmFkcdOTPkNFCjqENadKg4F
+b6+lYrqFOjc/bz5xrNQOH95eGzzDgqk7JQ+XZwaCpPXZvJMrShweoLI9PAP
hQ3/yi+PukMB07BxeRmtUNAzbqmWolNgQ3md5A31UDjUk3z9bgIFNG1C4igq
oXBRfc3ovRQKxBm4+f5RCIXiFxuqH+dQQPDxg/X0/FA4+mFrRPlHCkRYD680
76WBvdOowf5KCkgVb7Bn82ngN/fl78oqChQGDRt4sWmQclj/3Pd6CuQ/vX3/
YRMNuhvAgMOlgFNz+k+xjzSY9BP5bd9FgfTREw8zSmkwf0U5o6eXAluj1H7s
eUcDLWvjZUNDFMgu9u4Pf0EDI2HJKq9RCjCkYspUCmhwIqMibHycjKe9RPFb
Lg1cjG7tCJiiwJluSzGfbBr8/38RZLWzPFZn0uB/2wCBZg==
"]]}}, {{}, {},
{RGBColor[0, 0, 1], LineBox[CompressedData["
1:eJwt13k0VP8bB3AMbZRKWhUiiUJFsvU8kaQkSUSKzKBkCWHszVxRWrQhpCgp
SxsRUjNFCaXJMsyMXcpSsmbJ8rvfc35/3HPP64/Pued8nuf9fD5X3snL0llE
SEiog3z+e4f+3D84M0NhP+OFLadVWeOP4KUjgkkKe2zy/uFHNdZovrBl9NU4
hX13WfbeXw3WKKdzZspriMK24mg7BHdY4/voG3Naf1DYVa++GT8ds8Y5avVr
2F8o7HVxlEeuCjZ466zjvnNJFLZZqlHRpiAbzBL2TRPSprBnPAaNNTYdQTFn
ky0rjomwHYNaB8YqbVGq4YP7/evC7JGVBS/2+x5Fy5JE6oYKIfZD6TDrYe1j
GPzHwP1axwyrlMaJ+X3QAQsCEt2eHZhmPYzfeC+22BHNbxyWm06YZGnuFD+2
V8wJTZLfmO/5NcESlhBXF3KjYnpZINf36DiLl9OSl9tAw+MRt6S/Ph5lKWoa
rXkV44JhjpSn4lJ/WS4VIodKrE6i0CZZltH5YZZPdm4+28AN+ZcSorLqBln0
ZZ+i0qLcUWbeyYxhwwFWXJ3ngeUdnnhaS0VMIPOHpR1ln6DEP4NU7ebHJSW9
rHkfxZbbOfqgCl13xjOti7VOrzX4z29fTG06VBq4s5P1teHzQfX3fviTIa1v
sryddZo+3HjrdgAWxSobd1k3sRTT49xM8wNRo5s3rJ7MZfkOxS/Z1x6Mu4oE
c6esOawHBcXSC4ZC8UzGs7FFUiWsrHjbnLwl59DaRSG1OiSDNTpvpllZkoHR
3r4XbuQ9ZqV8a5lTu5iBb0JKvCz7HrFc7BrSQpcyUPEmdUe1Qzrrtea00ufV
DBxkPRB8M3zAGrF0nzm8kYFrtu7ZeH9RIuthYcGRlaYM7L+dQBtIsGTdtUdT
CwYDyz7zorceegyPXBvSS3sZeJLOLzuqmgHruCkWOn8YOEdRIBpByQRa0rEd
WYMM3BvcGFabmwXiorO4keMM/LyhxcdvyTNIjAm6IDObiSeNfJ4IenKgolvh
2lt5JrqnBMSuzi6EXznBy95bMVH/72ju5uVFYCP9qqjehokSZvRq44giCBYk
KvXYMfHJKF3S0/41nA6zNRU7wcQ+86CLbyXewBulpZZLPJhYEPb27bNtbLCJ
L9pyI4KJupve5VjEl0C/UR576DkTtWq5cW/LSyCw/YO0Zy4TNYJ/BW2cLIGm
HWd1OvOYqFS+zGjOiVL4uv5CW3kRE6WcPWtYKh+g8pWqq3spE3/dWTWs9vYj
rLL43SlVz8R7Ev5a8zvLoVFbXYM/zsTE3EsrgpdVwBvfuPXd/5gYZ5c61WVa
AdjbkDA8xcTLjz9/KH1aAfQM404hEQLpuxSsQ+iVIGvfUNs3l0DLEI5/r/gX
MNu1SXzNCgJF/KUbaSs4MKUlpl2kSaCdY2Z1gSYHxGt2mftvIzBnL5RLWHBg
m6Vy/6btBDrJnsp/GcmBcaOJ8hg9At9/Kr4mOsyBpzd6rq82JJBYRTNOq/oG
4OLh6mBOYKPYuN5Y9zd46VwuUXOAQM3+K1vMxKohd8/oMsODBH4vfSU7rFcN
PCE3m8VWBO7yFJ8wyqiGxTy/ncG2BIq+y3naQdSAUzRjvgeVQPssk4fa92qg
r3zF2jgagS9jG5MuFdWAxKLB0CJnAmlusy5uHagBoUVpoiOuBH6QsqMSx2sh
tchCbrM7gWum+2zrA2sh+9QUanoQ6N9FWKjG1oIeW+bOFk8Cld48MaiprIUU
t6p/cmcIjHQRXq6gUwczsEOn1JfAZou4BQFWdfC88JpY6lkCt+mpilV61cGL
Yygc6EfgD8nDgz7pdTBh8oKxMoDA3YWPP7+X4sL0I/3zCkEE3n1gULJUnQse
BzMzeaT/XqkudNvLBdmv8n+jgwlMd5pMX8zgwnYtiX/NIQTOlrBgOPVxgevt
m2oWTuCR9XbsbXPrQd7Ez5RHOtOQNjNPsR56rmgYnDhHoHkgPTTXth7cbpaK
UhkEptxiFkedrQd3rlJ9I+nBZ5f/HY2ph1UJhwcPMgmM+5ESKPqhHiK8/YXU
CAK7hLMKGlrqQTlUefAWad3VeaPZE/WgMK6kMkq6+VC532GNBvB3qHV7EkGg
hlfNyw37GmDeRKCP8HkCmdFNQ1PODaB/yvatBWmldwPe6UkN8C57Wq6NNL3x
3/Og/Abgrx/ctjaSwIpRsX7zbw3QUhYUc5y0jNRCdYVfDZCVgCpxpD3VVnqO
zuLBwmuDs8pJs00Vn1TK88Dx/O51o6QXO6v9uqfPg3a98Qi5KLL+57arnrXh
QYBD1Tpj0vlJhm57fHigHHlttjPpOa/MMmSu8CBCY5HKOdJ21dZd/Y94sKFS
+Uoc6ezfjus/vCfXP83XeEx6es5pl4QmHhCyqUvySFso+j30GONBmEXd9jek
70P4951SfKA7miSzSQ/bXVRYqsaHQ/aDO1mkjf1vOvXs4YPkjgalQtJx15NT
31L5cOS3sNlT0l3Zj1pvhPFhHoS/uEta99MLWdcEPlBGXGyiSV/ueH1c7yUf
VN9yDbxJN09/SJb8ygd7rSHaIdIaKzmNHd18KGj7+VmDNFOLv6pAVACaWj/9
5pKutfhud1lWABaXVRybyP1Scu9LcNQVgN2mwUvZpOlRYw2ahwVgbnJ+3P+/
etwXWT73jAB6+zdn6P9Xj7cSNk3RAvBavz9piqyfJ29p3IuHAgj8soVTSJo9
LFd3ni0ArUzjPd6kaapah9T+CuDF1RRKNdkf+bvhhsiiRgi9xDEJJj3HyfQb
V7UReA+nOLKks28fOxB+ohGq77q9tCP7azrX9eqhkEbotyyXHCD70+Kr95f1
8Y2wq9Iph0l6WCxyH+dzIzg3V32NJ/t5t/y16LSfjfD99999q0jf1k8sp4s0
wdhD0cWJZB70fZ+ayG9vguTij2EXybwQrVwjnwdN0Lx7+YB6KLmfhfs86MVN
EDDvYOttMm+6N9lxYXVNcEZi5PUUmcd+48zu6NnNcHDsut5rMq/Hs0JjHpxu
hlX+bB8xOoFFEYMFGRHNsCKNI9hP5l36uGv7s+RmaDk1on3Dn8DPCw9qFX9t
hvnJGl8WkPNB119RULu1BfZVeEbWe5P9cCBBVGDWAh3Nwg9myHkzoLxArc25
BerFbhQpkH4sGD33O74FMnT/NTuQ82npzkqlWZMtsCvYQOaxG4HjYjqFq5xa
wdD7pU+gEzk/fIa+3PVshX1JWRUnThBo1fKkXT64FXTvL9m825HA5wVrJZRv
tcJGKZYa5TiBLqclHDQ/tsI0RULanJy3tZwW0f0qbWCYq81TJuc10yBxBWdb
G7h+kimr3k/2W6aV2iGjNihmxAjoZgReIsptbO3bwOwPO6zQlEDDbbmZzlfb
wPrB6yaJXeT3kiItwgbbALoPRE1pE1gpFflTUqgdZGbuh+whz5cfl86Hpc5v
B0m3VxIx5PkjExKRXarcDuHHhmdJbibwgj1zjrhDO7wOSsvgbyDQcXUYO76y
HcR7y7vuryRw4T0/jRdpHaBuLeQyjzwfVZf5lRnmdMCCst0NX/4ycXfM2eO1
rA7Y4JxvcGWYiSHhvpdH+R1QNduxb+YPE7scvLsMFn2HF0vHDPJ+MJEt55FS
Efod4nO77J1qmOh1n7bwu3Un3P5nf68pg4lXAxPuXKV2wjNegJzVIyY+tahS
1jnTCbPdjP3L0sj7wrT2zqsXO+Ek7VxW2j3y/nFU3Gd7cSdkuz+5ohPLRLcl
OTWX5X9AaUfnu6/hTHSJnInT+vUDFn+OanxvycTjbomroxhd0Pu9/ueZfgb+
482tGrjSBXw1WtWu3wy8bRoYZp/YBcXHAlyX9jDwm/KRls25XXBSj/omp4OB
u35KpzZ+74KrQqz9HC4DN9CuK27Z0w2DTgpPUosZOHzsgmrTgh6I6Uni5kQy
8OJBf52td3pBtdpmpa40A0WXxP4In+iDU5WBPdHi57C+8nx/hOQAdAxcM3wl
HoaHg522JZYMgmjZ88j4L8HoLt67tspuGF6ftFr4khWIslkf42b1jEDA+qwj
LzkBGFxgdEgyaRTmvRsXTuf64Zl09/xt6uMgNcnffEL2LEqIaDupdU6A9VaZ
+QqnfNDYwypW5eYkRIkte/e99QwuL1ztZaw4DXIj9BRc74U3fC5c16ifAXlM
0beNd0fLyAObkvOFMLGya6uEhxuqHI04nBYqjI8Mlfd7hZ9E7o+5928eFsEU
imV7ZKILVjl17lwsS0HpelPLKSFnbBN9NBa7loK6s06bakzQcDj95LMVShR0
8j2h5DJEwxW9vTLymyhYp+18md9JQ5rv4Ki6HgW9N8/u6Kyg4QQx82S/DQU1
w22uno+lodLDFSsvxlBQiq8S27KRhjomAo7ETQoGqTS8cFeioVn3nahrcRRc
brsgelKWht6b5Ebikyk4i9rnqihFw+I8JU56FgWFPl3MuzVORcuPWyNLyyh4
z3RP0N+PVHQ+OaK/p5KCjAuz85+yqUif92qosoqCK237b58qomKyue6JmjoK
/lmtc+DnEyp2cVG/vYOC+0KT7URiqThBFxly/knBs11J2V+vUnH+qtKM7h4K
Rtt8TLp3gYpbHEyWDQxQsMo108wkhIrGwnOrzo5QkN7TIy7rT8UjDyoixsYo
uErTmTruRUU348t6IZMUFBdtPsg9RcX//x/iknsruXlUKv4PmoHf5w==
"]]}}}, {{}, {},
{GrayLevel[0], Thickness[Tiny], LineBox[CompressedData["
1:eJwt13k0Ff0fB3BMpEhFGyokevKQypat+0GIUAg9LSprqVBaLI81Lmmx5JYs
pagsxZ1pIS2fW0SLSost213sa2R/lN90zu+POXNeZ87Mme/5vr/v74ySm5+D
p4iQkJCAPv6cQztth2dmCM5aH9d9ZHsKdIQsGW2cJjilTtTKN70pYLegdbx4
kuDMVLRu4A2lgKK+/y+/nwSn2SrBXu53CryKTxbndhAc86NvEnOXsEB8Xd1K
zgeCc5fJEehsZUHKyQPbItIJzqNnocly91lQIByQI6RHcLyl0zNMw66AqKfl
Rtl9Ipy3ddKdGd6pIFP/+uitJGFO06Lzr7IOpIFDWZr72ndCnMS0JBm5yAwI
GTQ+miiYwW06B3szJG5AyZk0n6Ltv3Hy19xyt69ZYJfspPj72jT+qLptp73/
FlhmPrfb2jeFRt2/Ny+anQN3KoNqA/ZMou6FHZaS5G1wjU5Z/Cl3HA2FDLKJ
zLsQdoAolJAZw79Sbmjnh+WBkIYCmsWM4KrK3KSF7gXw/fy12IKaYaSUJjaY
+9+H5XMP5Y2YDqHc26eeJVuL4IiOmmjj8kFU+/YiQDmBDSdEn9w9PX8QT762
exaezIbgGktraZFBVI0zaGlgsSH+lGeCVecA8seFbsZmsCH/UZZsCTmApx29
Kt7ksaFbZ+k6lsUALg8/86CljA3eurNctvv3o05wk4vpGBt8xS5P9rj1Y179
1RDHSTacrlXKYDr1o3WU1EK3aTYwTzN4zw36UfFaTPQZERLuPA4+oi7aj0GB
LjpnpUho1x0Kn5PWhzuWvxeWVyXBXa8lt6ysF5c6RHN0HUnwytVztijuxRuC
r1ovnUjwkU0i3ub3oquRvqzVLhL8/zNz/ZjUi8/Pfl5vv4+EfzFPpmF/Lz69
EWJv6k1CiuWpsIH/erC+JtD+TjAJFS6SO2W1e3DZmFW05w0S3r7xFM5Y04PF
AyIfr90koUofC1fK96DTbifT99kkfJE/MWe1SA/6JQXeUsklobW17sW66m7U
HVWfXcImYcI7e+2Wo91otX7quv1LEtQCDWZ8c7pQeb1ojDWXBE6znZrgShde
cmP3WfJJcDZzd3I514X5bNVikzYSoqQuFDB8u3BXWOURtS4SGnKaXRZs6kJ+
l+Ky6kES4j5HsMn3nWgXwiv0+U3CSj1Wo8qLTpyXmb9VQ4iChxl5YmnsTrxY
Xbi6T5gCrveXvVGsTnRoHEh3FaVA77fyHMf9nVg5vGjnEkkKOtQqD44Md6B0
oZDbp2UU/JvYeOFQewcuWv/eykmOAumxweKmug6s5xvvqpOnYPPLZVKvn3Wg
zfQA/9NKClguPqUsZgdSVidjkldTsCV6noyeXAf6Gady9mpS8L1baXOBZAcK
mrs9ctZT4L9d97DCTDv68fJluzZQkC63H2e3taPW06Iid20KhtnsI/X327HU
P+DY3/oU3Gx2LA8yaUddd2WYNqFgY9vGqW/a7dic2d4/bEpBec/C9ev/asc0
gxCFDjN6POOf0juk2lG80kPilTkFatI2AY5Nbai3U3xkuxUFT5f9nVf4qQ19
ilYUqllTYKMwt3VOWRvazSI6hbdR4Kv+xpqT14avNRd+vW1DAWWxZZXGmTbU
2SLMLNtOgZmt8q44nzYcum/0V9QOCr45ilwS7GvDB6SHubE9BWMHOJPXtrRh
VF/LQK4DBYYhRp/FpNvQ9o7+iJMTBVWR8rPdRNswJ+GM+wRt17gpo+cTAgzQ
4llfdaYgglWSG9AqwOUNGpHvXOjxFWlHcO8JkJHrHSO2mwKnxzKPDbMEWBVx
vegC7Y5nw71XLgvQxchjx/w9FIi/Y7vYBgtwsGr16Jy9FFyrTriYe0yAtlaD
E5G01ep8y4iDArwy1nlijLZtm7pmqaUAT4XrvP22j4KWHgnPxYYCLE8Ju73Z
lZ6voZ40/3UCHLdrGc+hnfw7V2zNYgHGeE3/9tpPgbJonFGUuAArmV8fvKL9
UML7RPN/fFz8ebhF7gAFtctUWi7z+Xg8+Vgqh7a3wqxFgzV8rDATWyN1kIIJ
FYGV9Vs+RiQdVN9FW07r5iMhNh+dwyUzeLQL9CN692TzMaz4uZiSGwVGsF+p
+AofbZ6MdO2l7Wq74uKxUD72qnYvekd70HH61Rt/PvZ4qe//j3bE7sYJZQ8+
ui8VXrXWnYKFB0vXhbvwMcbn0T5H2re8r3l8t+Zj8eIM6WDaWr6BaTqb+Rhr
I2mSSbv8pEt14gY+JnAOdj+j7RyiK9a3mo+aWdMSDbQ7IxcbWS7joxbLJG+I
9tzQosHLc/noqaayV9yDgnWBVtncaR7+/bSiX462Q4DAWWOQh3ZyJa5raZ/2
DZ0bzONhilFSkRbttMNLX1R85WHuph9cfdovPMjjMhU8vLo56Kchbf7+bSoH
SnhIpdV2/rkutqe9/l4+D1UKS178uV/NOfzCZAYPJQZqAv88385eFiwSeFjY
2rNEnvYJmwc/kyN5+Fy69Nqf92NZ2t5tDeChmZKkyDD9/iWmnbvVvXgYkle0
o452k3GkVNAuHq7bFsQsoS2kL//qtTUP72eb5bBor9Z+dEramIdBVoP5vrS3
am5fu1+Th6Vv3NLNaB9V624qUOJhxPX404toJ6qcTZyQ4SFD9x9jHj0/DxVX
bDEX4+FRQcWPPNr18sXjSRNc/N78OcmX9vQS+4KWHi7aGYcpadI2mxcjHfiJ
9peuBTl0PrzEFSrKX3LxpF/ViT/5iSeeBC18yMUe3YxKcdpfJvu4+alcHP0W
b7ePzt/YCDNlPJ6Lqs6/ooRpy/1Q3LollIuttkTRTTq/bh07i5oPcnFjXdFw
DZ13Jm/ATW0nF0ce1kn60M5viltyxoKLeSyW8hS9Xoa/PAtd8DcXM3tkbKRo
i4RbpTK7WnG6e0mRGL0erU+Fzih8aMXEg2Vfg+n1mnSE9HpCtuJKnaVCvf9Q
oLhLVqcvuBUVvt8+hbsoYGzo/mw/rxXThJVnNtF9wFyzQr93qAWlpXLPX6T7
4uMK+6zo2haMizdRb9lJ53/uE9/iGy0I32zYAY50fwviJFZsbMEL95V/+tH9
VMr6y7zLuRktJkIHC+n+E9/T6S5s1Iw7LiXUvt1K51nxTpScUjPWWbEW8izp
8eQrc2x6m3D6V0/8LAsK1nJWGpLhTTi6/REq0H2b2rNoQ3BuIxrYxXXm0v3c
UfR1++WLjSikfnf03CYKtE8l+9470Yj3Xx84461HwaeZ+fdajBrRu3JFy1Id
Oq+LJdaYff6OwVN9J+3o/eAUQ3iF5FQDBjVXPVqkSsGrWRxDldYGHN75mnhB
7ycL3oXt3lzegKkLxrrclSm4t3P6qv+lBnyk7xV1W5GCtsPj0jWrGtDmkri2
EL0/OaT0i1/fVo9iT5zJxfMpWN/dMKKZWYtXp6/f/zJCwskfGmuXRtdiuvz3
Vxt+klAyHrnvt08tauvwVS8NkWAiplZRtakWc0xV2zYPkOCgHHz18LcadK4K
Oh7RScKpfXIG2RI1WEtmV8U0kFD6eXf4kuCv2N/bE5b3lIQtpY1zfjlXY/6G
X6z6QBIK82/rVxpW487t8W7HTpOwLN3vcJJiNW421ns8E0BC7bhY8rZvn3Cd
w5GZ5X4kqIQ4L8ic+ojRwXf9DTxJeBU5KgmWH/Bp0z/xhD0J05e0xJjct5hm
fjWwjf4+8s8rmlgoU4Z3xRY2X6pig7OX8s0v/+ZhbKjNoQxpNlRWNcRrOeYy
HIQHTCzSC8FA4yW142oZY8tyt5aBlnsgcnpxk4dsNWNGXWbaybAAZkvuiHQb
qGU0PWRG3D6TB2e5tWYnspsZ8exvJ6fK7wI7nbkjbJjH8BtL2jtgcAf8bnks
aHNuZ7hUTpybfSMHXH3SVsRGdjHmi17J8NLMhnP2p/W1MnoZ5anGphX1N2HW
IlZH+NQAo/ZQpsyN4Cyoex/zI3r+ECPoV0FQXvJ1cApx000rG2YkBoruSFXP
gKMSvas+7h5hMHRj1Kbk00ChoOKKWM8og8NvbMnYnAohJWaO89PHGckmXePn
PK6A/52jj3U1JxlFvKgNZHUKSIroua1rn2LUu75as8D0Mpgf28lSuzzNYEi4
z+lrSYJlT1b4ma/+zZD3MelfTiZC8om4pPV1M4z217yzhFQCODC3a2Q+FgKv
rO9tfdIXQW1PtFNOqDDIM4/Llm47D7Udc25ddhIBQQ83UivuHHx0azeRViDg
vMWW+w/E4oA36+4EaxUB4vqxEWZCcTBy51CRrCoByUZpWDMZC7K9vcuVNAio
Sfjwr3B/LHgEDI9rGhIwOefLt1NfY2Hq7Mx9WxcC1jZYiH/OigXV27Jy5xII
+GJgNmNlHAv6lo3VkpcJKP9orauiFws23RmxiVcIOD1GFItsiIXjGoqjVzMJ
cK45lFS+OhaePVKtvlNAQIf+2ovukrHgUKHFLK8kYOB49NN5TUzwPDRqtPU9
AerXc6Xn1TIhcG7xz/cfCZhOWZctVc2ETDuDg19rCFCb2nt0WTkTumrBiC8g
4Okm67MW95gwFSjy07OTABwMP+dyhwnz5MvzunsIWKKw8qVPFhM27rdcOjRE
QIZzFudqChPMhed8PDlKgGXleSZ5iQm7st9FT0wQ4Bc5EPQhjgk+5hcM/50m
4MDhD9d6o5jw//9DaGjUaJcIZcL/AGK3QYY=
"]]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-2.5, 2.5}, Automatic},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{3.662588493285687*^9, 3.662596845742527*^9,
3.662599745125683*^9, 3.662601055412224*^9}]
}, Open ]],
Cell["The following adds the resource distribution (black):", "Text",
CellChangeTimes->{{3.658076288037281*^9, 3.6580763014525347`*^9}, {
3.658076373076785*^9, 3.658076378521894*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{"competitionplot", ",", "\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "4", ",", "u", ",", "tryKm"}],
"]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2.5"}], ",", "2.5"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Thick", ",", "Black", ",", "Dashed"}], "}"}]}]}], "]"}]}],
"\[IndentingNewLine]", "]"}]], "Input",
CellChangeTimes->{{3.658076255457404*^9, 3.6580762835585957`*^9},
3.6580763806995564`*^9, {3.662580570699234*^9, 3.662580592937047*^9}, {
3.662581887238596*^9, 3.662581893038363*^9}, {3.662582020345957*^9,
3.662582021761743*^9}}],
Cell[BoxData[
GraphicsBox[{{{{}, {},
{RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJwtl3k4FY0Xx3ERpZJUtEklEZJQpO4pSSlRkt42InuWylbWK0Sl4qKylO2N
m+WOFqXUuZY2Ssia9a62EPFaEr/xPL8/5pnn88wzZ875nnO+M6No63HUXkRI
SIhHHrPnwC7T4ZkZCut2QMOKSj86CPyXjrZMUVi9SicY0UF0OCzdMfZygsIK
F9NxOxpGhzV6nn89flNYTV+Skjh36FB6I1aiU0BhfTJ3zV2VRQcJjcbVrK8U
lpGpufNMPR3ivGwOhiRRWKmhzYW+OnGQI3w5U2gbhXW9b8d9jz9xIGZvrCV/
RoS1rnrEqq0iARY3vb+QHiPMUqd7dLky7sPRskQ7lQohlm6RSlViXiL4D+68
cJc7gzMa52WClqbAK99EF6bZNP510qzTuvMIDsdarpl+MIVtcvXZHbvSwDjl
7eH9PycxYPsCA6/qdHj88UrD5VMTKBEzPI9mlwlnw+KWfMsew4kvllsktB9D
kA0lf97i/zDU0WPmzEQWCKkroGH4CJ66tTNCBxnw4+aD6zn1w6if6t9TkZUD
K+c6MUb2DGFJS3lnxMk8OPvuy621BkPo5BC5/cG5PEi7tMXTXGcI9zQlRGc7
5cGGlkndXOUhNCywln3nkwebc6PL7aSGsGY4o74sNg/2HH7WUVv/C0VPWSlr
V+SBc+z0kgKnX6g0pPrIVzcfXHVUxVpWDqLbsqOyIhQmXBIryvJZOIiWoU+j
hCSZcLXe2ERGZBAXM9qcJxcw4Ya3/Z0DXQMoWjzPvHM5E568SJV/VTCAJsdM
Ji9rMaFHZ5lG/L4BDNvyavq5DRMcdUWtzDz7seIIn+tRxAR3cfpEr20/sj5t
Gq16xwSfBsXkCMt+vH5GK3VjORMifKjst/r9eJT7l1FZxYTHhVdd1cT6Udjw
6Y9vXCbwdYeCJRN/oqDVKcFenAC7be3ZZWV9WDhKUdiiToBD9rbj+1724T0t
M93TmwlwkY+hfH7Sh8I6ix6FbSHA84/h2aqYPrSp9jv1VYeAAGQsbrbuQ+lV
pTt37SIgztg7aOBPL448832YdJiAD1ZSx+S1e7FNiTWm7UbA50/2wsnKvXiu
zv+LmAcBX/Qwf/WKXpTx7nny3ZOA2hWXJNeL9OLD9ZEBDl4EdHQ0vtOo7sGA
JjU9J38Cxh0zVPZe6MHIGJVjPyIJUPXTn3HP7MaLasbRrmkEsNoOq3ITunFY
ip4ynk7AcUM7S6uobpQeGO+hZRIQuuBWDtW9G9Xd3DSisghozmyzkt7ejb43
g1Rd8giIrAkhCiq7cOSp6TqvVwSs3hbfovSuC+On6/+UFRHwPJkhnkh0oWvF
0l8L3xDQ6Vh7OjS+C38zTqxPfkvAtul1khbWXXjRWCEqvJQAgerHcyPDAiw7
PhcTK0m97rbccuILMGgkNTjnCwEy/w2+bG0U4BtjJrz6SsCuErkF74sFqNyn
8O79NwLirVxex0cI0EZfJJD4Ttb7NogveUWAgYrsZWl1ZL1r6dJBrgIs8U/P
iq4n4Gf/GwcHcwFGCy6knmwkYG/Y/MXblgtwcLy0tuwHAT96FHflSAlQ30jz
F72F7KeZrrPCDB8PVVqOW7cSkLTcGufw+Biwc215XxsBwwTh2pTHx3p7b9Xa
TlKfpe8TDqXy8c4dzSAam9QnoLmEFcvHwD/9z9Q4BJgYi8gxfPno2B1W4sMl
IK3NovzKbj4y4sUPNvMJ0OJpTdZp83G5V6H+WQEB5b2LNDU38nFB5c/oDpIF
Y9+SBAv4KBdudbqxiwDf6fya3SJ83Fx0qMG0mwAJsdtzUkZ5aCxlUsAiWVXm
0GWLVh6qXV4UmdRDwBu5TYz8bzwMMS0JpfQScEhhbodkGQ976/a2OpLsrvbJ
hMXg4a4b7xlKfQTMaGWFrEjhodmTryuDSb6rF1Hoc5eHF2zwZx3JT/ftXavu
y8PLldlp3j8JMDRddyLShYcva6rDWSTXWYjc5p7hYZaM4fs5/QTYn2SX7TrC
Q3TPsD5I8n82rIkHe3k470risZskX3d8tHl0Gw+f+dVnfCRZzj3I3nwTD5sc
xE2FBgjY4W9QIy7Dw2tRKrkOJH+hrZhjK8ZD/d33zsWRfDZy0uDtOBcFQ0Me
70gevN18Se4nF81UKY08kkPiX2Vf7uCizpYHCXMGCViUfK+9qpaLQpLX8zeQ
nJ7uI6v6gYsTbpmr95C8lWFpEl7ExXONXwX/kFzO1A7pzOXiXD+euDvJloWL
C3ekcnFgV1VQEMmC4uG+BDoX3Ru9D98k2besRnE4gotijArvOJIlKggr06tc
zGpijTwg+UH1nehsNy46GB+pTCJZtdG9jHKOiwH0KxOz14vbTCfOHiPzkTMI
nr3flKe2+bUxF/8OPjo9G7+9d579kh1cfNdPxMw+33OoN9FTg4yXGbx6Nj/h
8c/VlYpc3GSnSDlJcux0trjyEi4qahPU2frWiUUahEpwkdNuUjdb//N5jpfa
/nDwMV+2ZFYfI5l92dsHOTgQrivOJ/VrkFNqp3M4KPmqNWNWX0cFUdnBeg5q
auglzuo/rsQ9YPKZg0kWoT2z/YlSKw3+t5iD+01/x+iQvHxr2gshgoMmY5X0
2X7m6IX0ncrgYA7ffHC23wZgrfgygYNLz1Vmzs7DWdNV0W6BHLR42rZaguRB
i6nST54cjE5X4M3OV8jJlvF15zkYYpEj6kNyuuOD8z9MOPi9SvmfenI+u2hL
DIzlOJhreumUEznfcwOZg/S5HMyUnLzyh9wHDb8DGZ1TbHx7Nd7yBsk+7oFz
r7LZWH7pzb4kcn/ET/Gbcp+w8absEqUb5P6pHg++NZHMxlTuWfhD7uvhI/Kw
7w4bT0hUrHYiOd7YNKvjMhsPpF7bqMMjYL32C2+ZnWykhFtHJZN+sH+zmYr1
ZjYKrbVr7CP94oJqT2uOIhstmlR+6ZL8fM2qvUbibFz02ziC1U7u0/xwGb9v
naimJns+jfQjW8ExZtu5Tky3cx1JJP0tgj1gq3qsE11ymP5ZpP89aY1c6ruv
E8fG77OZtaQ/1RYHSm/qxLkXlcyeVxMgEnzgfkR3B660m/xxk/RX6paemiPz
O3B9rOEy3zIynvIqvb6hdqR/y96zh/TnqlVHUsMa2rGyMNBBsoTsx9wi95eP
2vGUA/PhzXekX3Mj563SakdHwxFRG9L/X8dvNOo+3oa86LoTJvnkvJ/qshM2
aMO2qC5szSXfN2sehy5XbMOlG7/auuaQ+T1ZxzrU14q4Rvl8YDYBKqzVOwqC
WzEpufi2F/l+ut8ru+VqdgsyFd5aF8QT4E0VXiU12Yye8bw3XlcIKBVl7VDq
aMZ2blRbrC8B0hVBJ3eVN2PTpEpYnjcBucem7nnebkbR/liXposE8JzHZOrX
NuOKN3Y8URcCjsb1Szw82IR3hD/8eP0PAZo9zSObUxrQJtByKk+XAK9f6irL
whrwbveHkChtAl6N0c5MuzTgHEV3E1stAnaLq374sr0BM0YmCudpkPHWXb3n
XFePpW1vtu9SIvM9s1w/Y149uvC6RdYvJvWpORm89Op3TO3aai3xgwl7X7dI
/j1ejdQve5zNtjIh/8m/eh93VKMWZ/nJk+pMkEvycI5ZU437NXQdbJSZ0DAm
Hnuw7hsG2A31nVnBBCX/49Ipk1Xoq8n2UCC/r0ppo1Jg/BVbr4R4ltbkw9Tt
reIRnZ/R/bq3ZpFrPngymOOLFpehXdZN01/0PDjusC6tNoCB5tub77uzc+Dj
l+YbWy2yqU5d2+Qs1zwBffWSp+b3yqj7K7UHCrSyQcRnSet5+WpqSMcRd2X3
xzBHypxmO9BAdWxSOVF7LxOudTYYXspoo9Y+vO2Xz08HIinCPGiYTVWYejs5
cCENPNLPS/OO86kcacO9a3oewVmXxFXXad1UxjJ4H+eQAlFHfPS2JvdRL+83
8x3ckASisvGC4MkB6njf3wK/wfvQWBn+K2zhEFWoZA7jzcJ7YOlvq5tYNkz9
tu8fdy29eLgwr29t1ckRqvRKzw3zc+mgkPMhQbx3lMqRK/jkYRIL/q8MLRYm
jVHNapx9OwfugufjC4W6myeolkZyFQUxd0BKZJutBn+SKp7536fbZtFg5HYs
XpU+RX1D139qb3oT5IpWeRitn6YOJJx/6nw/CmIvRcZoNs5Q214Uaat3X4ej
EWbqKYVCEOzW2cjwjQDVU2GWmYHCcNFbeV/7pnBoEEim0y1F4I/zoc8x7GtQ
ZcvfLaNAgQ/VBSe8PoQCWzRrPH4tBa74qrm/LAmFkcdOTPkNFCjqENadKg4F
+b6+lYrqFOjc/bz5xrNQOH95eGzzDgqk7JQ+XZwaCpPXZvJMrShweoLI9PAP
hQ3/yi+PukMB07BxeRmtUNAzbqmWolNgQ3md5A31UDjUk3z9bgIFNG1C4igq
oXBRfc3ovRQKxBm4+f5RCIXiFxuqH+dQQPDxg/X0/FA4+mFrRPlHCkRYD680
76WBvdOowf5KCkgVb7Bn82ngN/fl78oqChQGDRt4sWmQclj/3Pd6CuQ/vX3/
YRMNuhvAgMOlgFNz+k+xjzSY9BP5bd9FgfTREw8zSmkwf0U5o6eXAluj1H7s
eUcDLWvjZUNDFMgu9u4Pf0EDI2HJKq9RCjCkYspUCmhwIqMibHycjKe9RPFb
Lg1cjG7tCJiiwJluSzGfbBr8/38RZLWzPFZn0uB/2wCBZg==
"]]}}, {{}, {},
{RGBColor[0, 0, 1], LineBox[CompressedData["
1:eJwt13k0VP8bB3AMbZRKWhUiiUJFsvU8kaQkSUSKzKBkCWHszVxRWrQhpCgp
SxsRUjNFCaXJMsyMXcpSsmbJ8rvfc35/3HPP64/Pued8nuf9fD5X3snL0llE
SEiog3z+e4f+3D84M0NhP+OFLadVWeOP4KUjgkkKe2zy/uFHNdZovrBl9NU4
hX13WfbeXw3WKKdzZspriMK24mg7BHdY4/voG3Naf1DYVa++GT8ds8Y5avVr
2F8o7HVxlEeuCjZ466zjvnNJFLZZqlHRpiAbzBL2TRPSprBnPAaNNTYdQTFn
ky0rjomwHYNaB8YqbVGq4YP7/evC7JGVBS/2+x5Fy5JE6oYKIfZD6TDrYe1j
GPzHwP1axwyrlMaJ+X3QAQsCEt2eHZhmPYzfeC+22BHNbxyWm06YZGnuFD+2
V8wJTZLfmO/5NcESlhBXF3KjYnpZINf36DiLl9OSl9tAw+MRt6S/Ph5lKWoa
rXkV44JhjpSn4lJ/WS4VIodKrE6i0CZZltH5YZZPdm4+28AN+ZcSorLqBln0
ZZ+i0qLcUWbeyYxhwwFWXJ3ngeUdnnhaS0VMIPOHpR1ln6DEP4NU7ebHJSW9
rHkfxZbbOfqgCl13xjOti7VOrzX4z29fTG06VBq4s5P1teHzQfX3fviTIa1v
sryddZo+3HjrdgAWxSobd1k3sRTT49xM8wNRo5s3rJ7MZfkOxS/Z1x6Mu4oE
c6esOawHBcXSC4ZC8UzGs7FFUiWsrHjbnLwl59DaRSG1OiSDNTpvpllZkoHR
3r4XbuQ9ZqV8a5lTu5iBb0JKvCz7HrFc7BrSQpcyUPEmdUe1Qzrrtea00ufV
DBxkPRB8M3zAGrF0nzm8kYFrtu7ZeH9RIuthYcGRlaYM7L+dQBtIsGTdtUdT
CwYDyz7zorceegyPXBvSS3sZeJLOLzuqmgHruCkWOn8YOEdRIBpByQRa0rEd
WYMM3BvcGFabmwXiorO4keMM/LyhxcdvyTNIjAm6IDObiSeNfJ4IenKgolvh
2lt5JrqnBMSuzi6EXznBy95bMVH/72ju5uVFYCP9qqjehokSZvRq44giCBYk
KvXYMfHJKF3S0/41nA6zNRU7wcQ+86CLbyXewBulpZZLPJhYEPb27bNtbLCJ
L9pyI4KJupve5VjEl0C/UR576DkTtWq5cW/LSyCw/YO0Zy4TNYJ/BW2cLIGm
HWd1OvOYqFS+zGjOiVL4uv5CW3kRE6WcPWtYKh+g8pWqq3spE3/dWTWs9vYj
rLL43SlVz8R7Ev5a8zvLoVFbXYM/zsTE3EsrgpdVwBvfuPXd/5gYZ5c61WVa
AdjbkDA8xcTLjz9/KH1aAfQM404hEQLpuxSsQ+iVIGvfUNs3l0DLEI5/r/gX
MNu1SXzNCgJF/KUbaSs4MKUlpl2kSaCdY2Z1gSYHxGt2mftvIzBnL5RLWHBg
m6Vy/6btBDrJnsp/GcmBcaOJ8hg9At9/Kr4mOsyBpzd6rq82JJBYRTNOq/oG
4OLh6mBOYKPYuN5Y9zd46VwuUXOAQM3+K1vMxKohd8/oMsODBH4vfSU7rFcN
PCE3m8VWBO7yFJ8wyqiGxTy/ncG2BIq+y3naQdSAUzRjvgeVQPssk4fa92qg
r3zF2jgagS9jG5MuFdWAxKLB0CJnAmlusy5uHagBoUVpoiOuBH6QsqMSx2sh
tchCbrM7gWum+2zrA2sh+9QUanoQ6N9FWKjG1oIeW+bOFk8Cld48MaiprIUU
t6p/cmcIjHQRXq6gUwczsEOn1JfAZou4BQFWdfC88JpY6lkCt+mpilV61cGL
Yygc6EfgD8nDgz7pdTBh8oKxMoDA3YWPP7+X4sL0I/3zCkEE3n1gULJUnQse
BzMzeaT/XqkudNvLBdmv8n+jgwlMd5pMX8zgwnYtiX/NIQTOlrBgOPVxgevt
m2oWTuCR9XbsbXPrQd7Ez5RHOtOQNjNPsR56rmgYnDhHoHkgPTTXth7cbpaK
UhkEptxiFkedrQd3rlJ9I+nBZ5f/HY2ph1UJhwcPMgmM+5ESKPqhHiK8/YXU
CAK7hLMKGlrqQTlUefAWad3VeaPZE/WgMK6kMkq6+VC532GNBvB3qHV7EkGg
hlfNyw37GmDeRKCP8HkCmdFNQ1PODaB/yvatBWmldwPe6UkN8C57Wq6NNL3x
3/Og/Abgrx/ctjaSwIpRsX7zbw3QUhYUc5y0jNRCdYVfDZCVgCpxpD3VVnqO
zuLBwmuDs8pJs00Vn1TK88Dx/O51o6QXO6v9uqfPg3a98Qi5KLL+57arnrXh
QYBD1Tpj0vlJhm57fHigHHlttjPpOa/MMmSu8CBCY5HKOdJ21dZd/Y94sKFS
+Uoc6ezfjus/vCfXP83XeEx6es5pl4QmHhCyqUvySFso+j30GONBmEXd9jek
70P4951SfKA7miSzSQ/bXVRYqsaHQ/aDO1mkjf1vOvXs4YPkjgalQtJx15NT
31L5cOS3sNlT0l3Zj1pvhPFhHoS/uEta99MLWdcEPlBGXGyiSV/ueH1c7yUf
VN9yDbxJN09/SJb8ygd7rSHaIdIaKzmNHd18KGj7+VmDNFOLv6pAVACaWj/9
5pKutfhud1lWABaXVRybyP1Scu9LcNQVgN2mwUvZpOlRYw2ahwVgbnJ+3P+/
etwXWT73jAB6+zdn6P9Xj7cSNk3RAvBavz9piqyfJ29p3IuHAgj8soVTSJo9
LFd3ni0ArUzjPd6kaapah9T+CuDF1RRKNdkf+bvhhsiiRgi9xDEJJj3HyfQb
V7UReA+nOLKks28fOxB+ohGq77q9tCP7azrX9eqhkEbotyyXHCD70+Kr95f1
8Y2wq9Iph0l6WCxyH+dzIzg3V32NJ/t5t/y16LSfjfD99999q0jf1k8sp4s0
wdhD0cWJZB70fZ+ayG9vguTij2EXybwQrVwjnwdN0Lx7+YB6KLmfhfs86MVN
EDDvYOttMm+6N9lxYXVNcEZi5PUUmcd+48zu6NnNcHDsut5rMq/Hs0JjHpxu
hlX+bB8xOoFFEYMFGRHNsCKNI9hP5l36uGv7s+RmaDk1on3Dn8DPCw9qFX9t
hvnJGl8WkPNB119RULu1BfZVeEbWe5P9cCBBVGDWAh3Nwg9myHkzoLxArc25
BerFbhQpkH4sGD33O74FMnT/NTuQ82npzkqlWZMtsCvYQOaxG4HjYjqFq5xa
wdD7pU+gEzk/fIa+3PVshX1JWRUnThBo1fKkXT64FXTvL9m825HA5wVrJZRv
tcJGKZYa5TiBLqclHDQ/tsI0RULanJy3tZwW0f0qbWCYq81TJuc10yBxBWdb
G7h+kimr3k/2W6aV2iGjNihmxAjoZgReIsptbO3bwOwPO6zQlEDDbbmZzlfb
wPrB6yaJXeT3kiItwgbbALoPRE1pE1gpFflTUqgdZGbuh+whz5cfl86Hpc5v
B0m3VxIx5PkjExKRXarcDuHHhmdJbibwgj1zjrhDO7wOSsvgbyDQcXUYO76y
HcR7y7vuryRw4T0/jRdpHaBuLeQyjzwfVZf5lRnmdMCCst0NX/4ycXfM2eO1
rA7Y4JxvcGWYiSHhvpdH+R1QNduxb+YPE7scvLsMFn2HF0vHDPJ+MJEt55FS
Efod4nO77J1qmOh1n7bwu3Un3P5nf68pg4lXAxPuXKV2wjNegJzVIyY+tahS
1jnTCbPdjP3L0sj7wrT2zqsXO+Ek7VxW2j3y/nFU3Gd7cSdkuz+5ohPLRLcl
OTWX5X9AaUfnu6/hTHSJnInT+vUDFn+OanxvycTjbomroxhd0Pu9/ueZfgb+
482tGrjSBXw1WtWu3wy8bRoYZp/YBcXHAlyX9jDwm/KRls25XXBSj/omp4OB
u35KpzZ+74KrQqz9HC4DN9CuK27Z0w2DTgpPUosZOHzsgmrTgh6I6Uni5kQy
8OJBf52td3pBtdpmpa40A0WXxP4In+iDU5WBPdHi57C+8nx/hOQAdAxcM3wl
HoaHg522JZYMgmjZ88j4L8HoLt67tspuGF6ftFr4khWIslkf42b1jEDA+qwj
LzkBGFxgdEgyaRTmvRsXTuf64Zl09/xt6uMgNcnffEL2LEqIaDupdU6A9VaZ
+QqnfNDYwypW5eYkRIkte/e99QwuL1ztZaw4DXIj9BRc74U3fC5c16ifAXlM
0beNd0fLyAObkvOFMLGya6uEhxuqHI04nBYqjI8Mlfd7hZ9E7o+5928eFsEU
imV7ZKILVjl17lwsS0HpelPLKSFnbBN9NBa7loK6s06bakzQcDj95LMVShR0
8j2h5DJEwxW9vTLymyhYp+18md9JQ5rv4Ki6HgW9N8/u6Kyg4QQx82S/DQU1
w22uno+lodLDFSsvxlBQiq8S27KRhjomAo7ETQoGqTS8cFeioVn3nahrcRRc
brsgelKWht6b5Ebikyk4i9rnqihFw+I8JU56FgWFPl3MuzVORcuPWyNLyyh4
z3RP0N+PVHQ+OaK/p5KCjAuz85+yqUif92qosoqCK237b58qomKyue6JmjoK
/lmtc+DnEyp2cVG/vYOC+0KT7URiqThBFxly/knBs11J2V+vUnH+qtKM7h4K
Rtt8TLp3gYpbHEyWDQxQsMo108wkhIrGwnOrzo5QkN7TIy7rT8UjDyoixsYo
uErTmTruRUU348t6IZMUFBdtPsg9RcX//x/iknsruXlUKv4PmoHf5w==
"]]}}}, {{}, {},
{GrayLevel[0], Thickness[Large], Dashing[{Small, Small}],
LineBox[CompressedData["
1:eJwt2Hk0Vd/7B/A7IKJCyRwhRZlDIvcxlxAJpTITkgyRzCRJKKSMDWQe72lW
7BOSaBCReZ4iig+Z3d/5rvX7667XOnvt8+yzn/0+d53dDpdPOlNIJJIPmUT6
32/IuPEcg0HFpeosozBuKowF7VzoXqPita4tP13PUMGEs3/x1TIVP/TDeJ7r
CRVE1bzWL/9HxW+5yjsfVWKCmtgk1oExKn54Xn813ZEZWGV/7sK/UHHloBC1
tH+bwLvm0e7MRio+vdRhMmvMCl2WrhIBH6n4VJi3/+U8VigOW5aSf0/F7x+s
YfptzQYm3wWVHz+n4pF9Mi6GLZvh3hW74+EZVHyx65Jw3/oWWGeVMjmXSsU3
4pwkTd22gkvWrOmhFCoe7S70UaJ9K6jWR1r+TaDiD+pDzFmeb4Mu3lx7u0gq
HtOqqXsX5wTRt7+ughsVF6zW89bGuOHWCSxQyIWKb/5SqLR9nhvmhgNDlhyo
ONvBhIbXKtuhloPjesU5Kv7L6N6OuOrt4GIjmyBqSsUVNBKVUjt2QDHZ9ylJ
lYpzHlNvjTzEC4fMi1jSlKj4mVkz2cw7vFD/dNBVQZ6KG8vzvRgY54UBA1MZ
BykqXrN1IXs5gw92Jsi8rBUk6n/3M+M7twBECkx8jCZR8SO7WGI8NYWB00NE
WmSdgmetFLisFwpDVpVl3KtlCm77yMZwYecueG33wXRijoJvWr20JL+wC6bz
sjuPjVJwx0gz7gJ7UTitdH6Ko5GCb9zmCmOzEIOxqHvGufXE9XrnAdEHYuDb
3lR+pJaCp4R0TnJ2iUHCtcNXPN9RcOfE5MYoB3GoRbzr38oouH9zSwk5VAJk
jVq2JidT8KfaabeTByXhXRab9/67xPzFDeCquBeO/YHW2jgKfsj1USYtai84
JZU/mL9BwX0SzHLI+/dBekecqGUABZ/uetUhfkMKmJ0NFPnPU/DZK18lQz0P
QIuNgtXUGQpu8fq7mlnjAXh4WjC4ypKCazaX9MrtlQEVoz8f7E0peEbOI3+B
ERlwUXpwpkiHgi/9s/X76y4HDeTxcHVp4n7mVSw3rRTg3mpz7pa9FNx31YLP
J0EB7BYqG/vFKbiSVqn38gcFWJ5I2BElTMH3JvMwhlQUQbpZpeAzJwV/5tis
ZSSqBHEPo7+dXyTjAoKFO39yK8PpVK95uXkyPjmrraR1Shkkkqz5KbNk3CBK
nWR/Xxmqbsg65k2S8R1vL3k1CKnAjEf7v5leMv5g5HOVi6IqmKpL7gqvI+MF
EW8EPSLVYHvHB4/sRDK+ef4Lb1aNJuD7n8REJZBx07yiDR8hGniEBT91uU3G
mS7nhipcpUG9pFKP9A0yTq77IvSaFyDQ7/HxZwFkvEnqvuf9NoAh7iDpOlsy
vs7cX/fKVRvuuFjq550j4xSmraP2WdqgUangEHOGjPeG6E7fbdGG+/YTaUbm
ZNx3bfvOSE0dMKywYGvTJ+OtmFvDNyFdwIzlJ0ZlyLiJ3E+JnfN6YPuEnalB
mqhX4UdkioI+cCyMiRTtJeOOtxnsJZf1wSUzy8pzNxlnVcm6mDOtDwJTmz/+
20HG/dOFzHr/GkBkzGjupjUSzvmT1JrEYwgna9MdpRpJuGkUJr5p0AQkfoz0
fawn4a3vq3dOHz4B/0ZkrV1qSXi+uDnLy5QTkMZSa5rzjoTT931nXZM0hYFj
U0eEy0l4TXzz71cjpnCpWZ2P6x4JN37sMTXmfxI0B28kl98l4Y8Fg53sik8C
59y3rSbxJHwvU+YJ64GT8Hy7E/PtaBIu0KBk33rcHFYs4+aYrpFwFzX2hYV9
pyCmt+fz0nkSLmIk+7RnzQKsZySPPrAm4aXyzu4/1CzhAMOrVtmKhHOfTXh9
7qolfBNlrvQxJeFz1135xOctYaeTTP5vbWL+Y87mT+etIGcyJGJgLwmf7L8Y
e4HbGoL+HPG4O8xADsPnDmY22ECmveoE9DLQ/bEX9cY7bOFdq7zTbDsD9QsK
D2fY2cLGK/FzJxsZKCEsOoJr1RYiw9mMdtAZyI7W7ledYQexXG37U0MZqF5u
MDFl3B6Kr3/NPxrAQAqCuqu3uR3g88JH8WVvBgpvYjrbccQBtnZVClo7M5DV
3tz/rqQ4QFL2Y3YhIwaa+BRq1nTUEdKVPKYe8RPjT4rVn8Wd4G2u8wXT7Qy0
1BE88fuvE/Tw2g6TtjDQFj3N+e7dzrBrzazbnsRAvenrTW1RzpBdp9okPr6B
LoFntv4JFyi0oBbnP99A1nTK44R/F+D11XT38hMbKNj/+jajpIsg5uSd23F0
A+laG+RW/bgI8aZHB8jaG6hsV1ZTBa8HOEj9szh1cANVcw+57XrkAezdZlrL
fBtox79FQ6nnl8BGk41PZ2gdaSYYON9dvAxU5oAP7VfW0XPRiE0CV3zAc9aE
RPJcR5u3Hv6w5aEPdPTuUZe6sI421CvLjBp8oORla0XQmXVUJvb2WKmwL1i6
ymWKaq6jpqwNP8pnXyhoGvNx37SO9N61lWir+oFJkoXoRtoacvKmTx0xDIBA
xW3HDJLXUMwT5w6NkADIa2nwvhu3hvR+ysXHVwTABrdGrVjYGipqum63h+8a
lCaLuRg4raEeNtoOlalrwJHyp/iu7BpqVR15yPMkCBof3FIVr11FSiu1KdHG
YfBPVcfO490qirr3z1b9dhiIdazFvHixivqKdtKPfQqDQD6vLoOCVfRfY0m/
mng4SKVZhnjEr6Kth4LyI7LDISZdvPaF1SrKf+Z78GFhBBhkVZkc/b2CdPac
KCruug5/43vWmMZWkBu7p2Lb2nVID10tet+/gqqtunn2iUTBb1u1TeqtK0h2
VETC0CkKksReIJnKFcSe/K4u/G8U9OWXyG+PWUFereHmNZzR4I9lcPeJr6Ci
z1KxHV4xIJpTiacLryDu6fYqrdQY+JTc6WnFu4L+UxRxakMxIOTH29S8eQWF
SufxBG+7BTWqyddrZ5fRqJakxceKW7C1Kna+AC2j3yfYHC1XYyHv47V237PL
6D+W83lGFfGQpuivU3iKGC9d5tI0EA9xWT4VfcbLyKRw420QVwL4+F6MPQbL
qEe4a9nLNwGOiJzXFNmzjFZD67xL1O7AD3/Ia5xZQlyWweGlF+4CRXKT/+7I
JbThcNPr9rYksIm6x/OtYBFxi+2T4M1NgVA7ahn79n+o4OPwvXbZLCDJiCCd
G/Mok7cy8nteNnTdTrtZ3DaHVD+N6ZGk8kFos2vhvPYsym9R1ZyUKAab6s9x
YhqzyHjpZqqucjE88VHwMlWeRVdHcm1T9IpBsntFpWTvLKIJzA3zuxSDXEl8
nSPHLJqxSk0tySsGbZNn/S1tf1Enn03F+J4ScEva4KG7/kVdR9e/KQqVQom+
43KfPXHd4c0Wlf2lMLPysYfj7F/0zPr2ZZnDpeDjmJjjavwXbants1myKoXg
gxIKoop/Ua5Nh9x6UinsKk1O3bX4BxXxDku/YCmDi8rSzN1Cf1DqvX82gSNl
4MP8Jt9/2x8k6v3hQ95sGQS2GRhyU/6gQ18at9ZvlEGsn/OdY+MzqLoqUbCX
rxyKXjzmf02fQdbxnvMXjcrhlzKvbIr+DMqmSVZS6eVwQYXJ6oTXNLpzm+fT
tGoFeLIkL086TKNNYYymgiMV4N++OzPaYhrZZuzHzulUQLQ/bbDq8DTyylYW
LDepgLyXgRcPME+jahlb1g2nChhVmQ1jS/+NCtqtmrTuVoCjal9Bbe0UOnJ3
/aLpYAW4FKha6r+aQlWzpzu+jVaAO38i9VPRFMqWFvx5dLICvFZ1bL4mTqHM
eKWYvf9VQDAq3N5pO4Xe0rZlP2Ciwz0Dv9CZ1Um0skNwn7YkHeqtOE7xH5xE
Q1+C0qud6PCpwZmcuZewqFHgZVc6fFYjokxwEsk8fj3G70GHFkEfNgnKJBLm
rLpw1pcO/f0/q2Wbf6HDY1rCiRF0WLqQI6Xr8Qs9eHSTsyGTDtIBhxmeTyeQ
f3ckj8dXOuC9JtLD9ydQWV7Et4TvdLDUcbSwujWBDj76JFr0gw6RW+OKaZ4T
KB1/n9TYRYfOp71WnIcm0JEns8vYGB1ivodX0JvGkbxMt7TEOh12qaZ076ke
R+SNosTvDDo8zyxkSa8YRxbNt95epWAwcKHlXGTKODr8iexctgkD1Q1xNnPb
cbSsLeH2gQuDMemP9vNzYyjB7e3+LAkMgu92x7mOjiGbw94nOyQx4P7351XP
zzH0KVXLl0MKA833fFs/vBtDnQxLzFYGgxQr98qU6DGk/s85CVPGQLoqdJTt
2hi6UVq18EIVA1wsmTP04hgKOHTRB1PD4Pf0WxcX0zHEYcXZcP8IBrpRW7ar
Cowhz/fnT2/Rw6Dr127NYo4xdJNKXunUx8DrhIqbCGMUyUe6tD86ikGGgC3a
NDKKzI5+MuU1wmCuouJiR+koSnRrq39xEoMnveZ117RGkfjhgPznNhgojiiu
/Dg4ig64OecwbDGom+SSl983inYkHV/StSfWv/gtY2zrKDreH/Gu2pGon9vI
17xnBHmXcAlddsXgLd/+wrJvIyjngKhxvBsGRiKb+9lqR1CSWca/XHcMPA80
GOKFI0jh/nBNvQcGmL6umMzVEeS/PEuv98JAx1j8dIz7COrpCeF9443BD3NK
wvD5EdTLt8CT54PBPzt8OU13BFHNDsxcvoKBepDGdxbuETTzTDa89ioGnyME
Nzkwj6C3aR67bwdgYBOzolG1NIw4jqwGG1/DIDzldYFv/zBalFvxrQkk1ld+
MHygZBjd5CrruBSCgcXL7S/VHw+jUpvbteyhxHrfzU3dTx5GVpuGYp8SZm2s
sDIOHEax0tp4fRgGac134gsuDSMdzgUV03Diefz0rKXaDyMDlisZPwgbjxyQ
qzQYRjb7tGlfIzDom2R35lEfRv5vjW7qRBL7NTuZ7iU7jDrZ078+I5y0UcCy
l2cYubPGety4joE4c4xGJOswGmBZahoj/Jz9gk/v6hCq0adp6ERh0M63py95
aAj9ekO1nyZ8QYRpx5+2IcQnYb1L/QYGS3uGjxl+IsYLa2xcJ3zrQE1Y7rsh
ZCcgwNxAWEDpyQtSxRBCK86qm6IxKFYLnzqbM4Ss15PStAhrgO3uV/eH0GQZ
j/xVwl/0Na24Y4fQ7y5HRj5hG2Ph+EshQ8gyeJ79B+E/5ms1DV5DyKSMZr1K
ONy6e0ncaQixZ1XPCN/EgMu+UjbMagi99Z/6ok44+0KaU5fhEEo4p7V2irCS
Z0C6suYQajLXCHUjXHfFqvmuwhBiUT1z+hphyyAVlt8SQ+hSPs+dKMLjETwa
BnxDSHzjj+RtwptDyv8kbybqP1jHH09YNuBYzsDaIMpYeFd0i/BJ32FLmT+D
SFH+Xn84YX/PkM2Bg4PoYghTtQ/hdDfe6vrWQeTD8em4LWEi47y31w8i5/is
BH3CQ7bH99i9HkRXhTTj9hFmOTvaUVI0iCxkLhgyE5a2DItbzhxEj/3bvvYQ
6zcx4wf9O4PoXq+eSDlhH6Nn/yVFDKIuez+tYMIpBsb5/b6DKIxtt7ou4dfa
49YHXAYR3xdm7v/tR8+RiK3XTg8i5qiBpjpivyQOvvDjPjKIDLa6M+QJH5U7
IWUrN4jU1BOj+on995D+1VO8exB5Tjyk3iL8XFRYV49lEH3xOMPyheifDsFX
i4lLAwhLDky5QHhtp1lx3+QAOv7CXXmd6D+dLTe4A74NIL3jqdX8hF1YRerr
3g8g6xc6zx4T/RtLfXON6/kA6hlM+yZGuGX590BR6gD6KsB7n4/od4exU+W9
9sT8sR+WG4nzFD044yB9agB13dds2k+4qCdm51X9AfRRZmj2ZjCRRy3vQjj3
DyB3EWMLxSAMKGHHUqMn+hHN5yu3KXF+Df1CGCJf+lHRRs3+OOJ8J16ku7yh
96PY8tX6Wn8MRE/zK/8O7EeHhJ+k7/HDgKbw67vZln4UbLHT/DmRH9F7hdWm
ZvtQuvs9gS9EvnwVNnsc1d6HSlim7g5eJvp38xvPV4/6EFVZ8/H6JSLPh2PY
hRX70Jln5cMUIq8qU/bpTVj2In4T+Xp9Iv9Yz447kjV6Uah2cYSYHdGPonmR
Art7UXbs5wsrRH7OFYnjRlM9qGyPRsPDcxhI4bvU6WE96EjmS5dKKwxSJ3co
BBZ0IyHHQn8tYyJfyltPJMd3I8y59ODQcQwO+iV5lvh0I/35Oo8wQwy+MbaV
9Gl0o5VTiTblBkS/8bDv1fnehY6GRn0b1cLAj0YW5ljpRIaTdC468T6pYcLV
9/R3oi0dH8oED2LA2RhqrVnXic4q1XJdV8Sg5NTaA6+ETuR7aFz9qBwGI26L
3G1incgv+/fjkn3E+bg3zfrweAd69OXAk0EBDOR/dc7LZbUjlvkZFUHi/Xnl
r4wUb1Q7qujI/350lQ6vFyPOb7i3o/yy0J1XlumgxSJd//lQOzLzw4trF+hw
UjzwgduPNvTmvaedwQwd/M4LHM5hb0MpwWL1w310qPxuHbYzsBU9PLXlUnQ1
HXQru9nWLZuRWLOaHm8AHcqKctU+qjcjFx53hxQ/OvBlXHZLFG1GZ3xS0rmI
/xPtiyxJx398Qwa5bq5MnnTYE2TJmbXyFVV+HW5udaRDTcQCBxh8QUOcESFC
J+iwlqDEEj3wCd0KWnzqJkEHr8LyJa7ttehG0OWEmMYKsHQRf9ISXIgYucZz
3Dsr4OPnzlgl8wIa7vjpyaNnZXBY5j1m+qCWJljgcKN5cylQ/Hl6nPibaczm
KcxyfsWwicM0wmGmncbq2Xi963UhXB9o1/HJ6aWdzk+SsmQqgIqMaNPQuUGa
tKwZcvLKg8vZTpwjlqM0co7/dqX3T8HGPV34ZsQE7WJb3cqoag7cMvNXU8qc
okX7XHmv8/4JMO1IGQtbmaG58bQ+k1d7DD+bbvyN2jZLS0keSrF+kQUWQQ4q
6bVzNMlTnNn/DaaDB/uU2Ffredo5heWWLY6pIFJcf59lcoH29EvXkagd9yHo
tY75toxFmq177YREVTJ45Xm8VJFbpiXHJYb1Pk8EDoqqg+zoCk1T3mvtmNUd
0Lt0KkU6eY32Ru9B2FDJbeB7I3xZT2KDFoSN++TdjoEkn5hE+Z8MWgr7nSdM
fjfgZPQJmayXJNit8HtepTMSpM9GWTwNIYOjYZqh4q1waB9jy062oMB2j8UF
oaRg+OowqsUtQoVT3KMc8q0BMMiUv5QiRoWp1968brUBMJ/nWs4vSYXcZy9p
Rc8CgH9qSmi3DBXc74X36d4LACffuUU5dSrElJWwdlsEwMp1RqmxFRU0L6Di
mK6rIJnLL3DrDhWaFRls7b/8Qc2gu5kjmQrOE4HhW7r9wehX5s2796kQOaFQ
ZfTZH7xlRBceZFHhj//50KEyf3j3QrI5r5gKOeTVFvcr/nCyXim67iMVlBk1
tr9J/uDsuqBxtIkK5eYGsw/n/CBg86v/mr5SiTqVhM+M+EGWyWH71jYqaB0y
Uxv56AcT7aAxNEwFE7ZpZYs7frASQPnPeZwKJ3iZTHQj/GCLYF3hr0kqvG9J
nzzs6weKtga8s7NUsK4yz9O08gM9MtvXKwtU8NFaQ8eP+cHpnMaopSUqXN2l
YG6n7gfuenHqwWtUaH+ifD5Yxg/+/3s4mOwz7n4k4gf/B9Ytj90=
"]]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-2.5, 2.5}, Automatic},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{{3.65807626463237*^9, 3.658076279167932*^9},
3.662577609843607*^9, 3.6625778242232523`*^9, 3.662577944421152*^9,
3.662578453437272*^9, {3.662580571130674*^9, 3.66258059331846*^9},
3.66258084039923*^9, 3.662581624516749*^9, {3.662581870798111*^9,
3.662581893522916*^9}, 3.6625820729093847`*^9, 3.662583239217573*^9, {
3.662583435499381*^9, 3.662583464711011*^9}, 3.662588493508757*^9,
3.6625968459943857`*^9, 3.662599745372184*^9, 3.662601055736175*^9}]
}, Open ]],
Cell["\<\
The close match between the thin and thick black indicates that this \
combination of two species uses up most of the resources available.\
\>", "Text",
CellChangeTimes->{{3.658076411800499*^9, 3.658076432335959*^9}, {
3.662581629886776*^9, 3.662581633350753*^9}}],
Cell["\<\
Bin counts for the number of each genotype (in 0.01 bins). For clarity, the \
bars in the histogram are doubled in height:\
\>", "Text",
CellChangeTimes->{{3.662583318449308*^9, 3.6625833393129597`*^9}, {
3.662596866463876*^9, 3.662596892374929*^9}}],
Cell[BoxData[{
RowBox[{
RowBox[{"bc1", "=",
RowBox[{"2",
RowBox[{"BinCounts", "[",
RowBox[{"genotypes1", ",",
RowBox[{"{",
RowBox[{
RowBox[{"-", "2.5"}], ",", "2.5", ",", "0.01"}], "}"}]}], "]"}]}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"bc2", "=",
RowBox[{"2",
RowBox[{"BinCounts", "[",
RowBox[{"genotypes2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"-", "2.5"}], ",", "2.5", ",", "0.01"}], "}"}]}], "]"}]}]}],
";"}]}], "Input",
CellChangeTimes->{{3.6625796146565323`*^9, 3.6625796162285557`*^9}, {
3.662580631664425*^9, 3.6625806412550507`*^9}, {3.662580743946993*^9,
3.662580744058728*^9}, {3.662581950492279*^9, 3.6625819556038*^9}, {
3.6625968278198767`*^9, 3.662596828754018*^9}}],
Cell["Peak occurs at:", "Text",
CellChangeTimes->{{3.662562965019528*^9, 3.662562967234468*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"FindRoot", "[",
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "4", ",", "u", ",", "tryKm"}],
"]"}], ",", "u"}], "]"}], "\[Equal]", "0"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "1"}], ",", "0"}], "}"}]}], "]"}]], "Input",
CellChangeTimes->{{3.661345725944672*^9, 3.661345803032847*^9},
3.66258246225274*^9}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"u", "\[Rule]",
RowBox[{"-", "0.5640230744006249`"}]}], "}"}]], "Output",
CellChangeTimes->{{3.661345728180367*^9, 3.661345803756647*^9},
3.662562912517063*^9, 3.662562977259493*^9, {3.6625810169719877`*^9,
3.6625810259057426`*^9}, 3.6625813205092173`*^9, 3.6625813677004766`*^9,
3.662582464690024*^9, 3.662583239290604*^9, {3.6625834355813627`*^9,
3.662583464801539*^9}, 3.662588493560286*^9, 3.6625968460866623`*^9,
3.662599745465068*^9, 3.6626010558458242`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"maxheight", "=",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "4", ",", "u", ",", "tryKm"}], "]"}],
"/.", "%"}]}]], "Input",
CellChangeTimes->{{3.662580070809471*^9, 3.662580079704524*^9}, {
3.662580174205254*^9, 3.662580177645094*^9}, {3.662582327255519*^9,
3.6625824049239683`*^9}, {3.662582469659295*^9, 3.662582473289554*^9}}],
Cell[BoxData["4743.551376490018`"], "Output",
CellChangeTimes->{{3.6625823536178703`*^9, 3.662582357195736*^9}, {
3.662582387556489*^9, 3.6625824063901176`*^9}, 3.662582474209477*^9,
3.6625832393560467`*^9, {3.662583435632378*^9, 3.6625834648523006`*^9},
3.6625884935930777`*^9, 3.662596846134961*^9, 3.66259974553338*^9,
3.662601055945674*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Max", "[",
RowBox[{"Join", "[",
RowBox[{"bc1", ",", "bc2"}], "]"}], "]"}]], "Input"],
Cell[BoxData["2918"], "Output",
CellChangeTimes->{
3.662580692246052*^9, 3.662580840532552*^9, 3.6625816246162786`*^9,
3.662581733047514*^9, 3.662581996747649*^9, 3.662582031068849*^9,
3.662582073040482*^9, 3.662582479676291*^9, 3.6625832394063787`*^9, {
3.6625834356825533`*^9, 3.66258346491892*^9}, 3.662588493626154*^9,
3.662596846186039*^9, 3.662599745599297*^9, 3.662601056045574*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Graphics", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"EdgeForm", "[", "Red", "]"}], ",", "Red", ",",
"\[IndentingNewLine]",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{"Red", ",",
RowBox[{"Rectangle", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2.5"}], ")"}], "-",
"0.005"}], ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2.5"}], ")"}], "+",
"0.005"}], ",",
RowBox[{"bc1", "[",
RowBox[{"[", "i", "]"}], "]"}]}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "bc1", "]"}]}], "}"}]}], "]"}], ",",
RowBox[{"EdgeForm", "[", "Blue", "]"}], ",", "Blue", ",",
"\[IndentingNewLine]",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{"Blue", ",",
RowBox[{"Rectangle", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2.5"}], ")"}], "-",
"0.005"}], ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2.5"}], ")"}], "+",
"0.005"}], ",",
RowBox[{"bc2", "[",
RowBox[{"[", "i", "]"}], "]"}]}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "bc2", "]"}]}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"AspectRatio", "\[Rule]",
RowBox[{"1", "/", "GoldenRatio"}]}], ",",
RowBox[{"Frame", "\[Rule]", "True"}]}], "]"}]], "Input",
CellChangeTimes->{{3.662579808750051*^9, 3.662580000968864*^9}, {
3.662580093697451*^9, 3.662580094976821*^9}, {3.66258012727341*^9,
3.662580128536862*^9}, 3.662580189485834*^9, {3.662580451133957*^9,
3.6625804529645967`*^9}, {3.662580652377059*^9, 3.662580753181138*^9}, {
3.6625819636696463`*^9, 3.6625819718210773`*^9}, {3.662582171463114*^9,
3.6625822820832243`*^9}, {3.6625833930007057`*^9, 3.662583395640477*^9}}],
Cell[BoxData[
GraphicsBox[{
{RGBColor[1, 0, 0], EdgeForm[RGBColor[1, 0, 0]],
{RGBColor[1, 0, 0], RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 2}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 16}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 160}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 852}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 2292}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 2918}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 1768}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 584}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 76}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5650000000000001, 0}, {-0.555, 4}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.995, 0}, {2.005, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.035, 0}, {2.045, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.075, 0}, {2.085, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.115, 0}, {2.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.125, 0}, {2.135, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.165, 0}, {2.175, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.205, 0}, {2.215, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.245, 0}, {2.255, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.285, 0}, {2.295, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.325, 0}, {2.335, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.365, 0}, {2.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.375, 0}, {2.385, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.415, 0}, {2.425, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.455, 0}, {2.465, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.495, 0}, {2.505, 0}]}},
{RGBColor[0, 0, 1], EdgeForm[RGBColor[0, 0, 1]],
{RGBColor[0, 0, 1], RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.245, 0}, {0.255, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.265, 0}, {0.275, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 2}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 26}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 180}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 464}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 488}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 88}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 2}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.475, 0}, {0.485, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.495, 0}, {0.505, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.515, 0}, {0.525, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.535, 0}, {0.545, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.705, 0}, {0.715, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.725, 0}, {0.735, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.745, 0}, {0.755, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.765, 0}, {0.775, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.785, 0}, {0.795, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.955, 0}, {0.965, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.975, 0}, {0.985, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.995, 0}, {1.005, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.245, 0}, {1.255, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.495, 0}, {1.505, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.745, 0}, {1.755, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.995, 0}, {2.005, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.035, 0}, {2.045, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.075, 0}, {2.085, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.115, 0}, {2.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.125, 0}, {2.135, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.165, 0}, {2.175, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.205, 0}, {2.215, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.245, 0}, {2.255, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.285, 0}, {2.295, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.325, 0}, {2.335, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.365, 0}, {2.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.375, 0}, {2.385, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.415, 0}, {2.425, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.455, 0}, {2.465, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.495, 0}, {2.505, 0}]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Frame->True]], "Output",
CellChangeTimes->{
3.662582241974265*^9, 3.6625822836156483`*^9, 3.662582482488243*^9,
3.66258323960738*^9, {3.662583435834234*^9, 3.66258346507699*^9},
3.662588493770555*^9, 3.6625968463368273`*^9, 3.662599745748541*^9,
3.6626010561930513`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"histoplot", "=",
RowBox[{"Graphics", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"EdgeForm", "[", "Red", "]"}], ",", "Red", ",",
"\[IndentingNewLine]",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{"Red", ",",
RowBox[{"Rectangle", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2.5"}], ")"}], "-",
"0.005"}], ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2.5"}], ")"}], "+",
"0.005"}], ",",
RowBox[{"bc1", "[",
RowBox[{"[", "i", "]"}], "]"}]}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "bc1", "]"}]}], "}"}]}], "]"}], ",",
RowBox[{"EdgeForm", "[", "Blue", "]"}], ",", "Blue", ",",
"\[IndentingNewLine]",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{"Blue", ",",
RowBox[{"Rectangle", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2.5"}], ")"}], "-",
"0.005"}], ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2.5"}], ")"}], "+",
"0.005"}], ",",
RowBox[{"bc2", "[",
RowBox[{"[", "i", "]"}], "]"}]}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "bc2", "]"}]}], "}"}]}], "]"}], ",",
RowBox[{"EdgeForm", "[", "Black", "]"}], ",", "Black", ",",
"\[IndentingNewLine]",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{"Black", ",",
RowBox[{"Rectangle", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2.5"}], ")"}], "-",
"0.005"}], ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2.5"}], ")"}], "+",
"0.005"}], ",", "0"}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "bc2", "]"}]}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"AspectRatio", "\[Rule]",
RowBox[{"1", "/", "GoldenRatio"}]}], ",",
RowBox[{"Frame", "\[Rule]", "True"}], ",",
RowBox[{"FrameTicks", "\[Rule]", "False"}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.662579808750051*^9, 3.662580000968864*^9}, {
3.662580093697451*^9, 3.662580094976821*^9}, {3.66258012727341*^9,
3.662580128536862*^9}, 3.662580189485834*^9, {3.662580451133957*^9,
3.6625804529645967`*^9}, {3.662580652377059*^9, 3.662580753181138*^9}, {
3.6625819636696463`*^9, 3.6625819718210773`*^9}, {3.662582171463114*^9,
3.6625822250442657`*^9}, 3.662582290948475*^9, {3.662583269065585*^9,
3.662583271460498*^9}, {3.662583398837582*^9, 3.662583412630219*^9}}],
Cell[BoxData[
GraphicsBox[{
{RGBColor[1, 0, 0], EdgeForm[RGBColor[1, 0, 0]],
{RGBColor[1, 0, 0], RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 2}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 16}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 160}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 852}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 2292}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 2918}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 1768}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 584}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 76}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5650000000000001, 0}, {-0.555, 4}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.995, 0}, {2.005, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.035, 0}, {2.045, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.075, 0}, {2.085, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.115, 0}, {2.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.125, 0}, {2.135, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.165, 0}, {2.175, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.205, 0}, {2.215, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.245, 0}, {2.255, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.285, 0}, {2.295, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.325, 0}, {2.335, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.365, 0}, {2.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.375, 0}, {2.385, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.415, 0}, {2.425, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.455, 0}, {2.465, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.495, 0}, {2.505, 0}]}},
{RGBColor[0, 0, 1], EdgeForm[RGBColor[0, 0, 1]],
{RGBColor[0, 0, 1], RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.245, 0}, {0.255, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.265, 0}, {0.275, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 2}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 26}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 180}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 464}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 488}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 88}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 2}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.475, 0}, {0.485, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.495, 0}, {0.505, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.515, 0}, {0.525, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.535, 0}, {0.545, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.705, 0}, {0.715, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.725, 0}, {0.735, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.745, 0}, {0.755, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.765, 0}, {0.775, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.785, 0}, {0.795, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.955, 0}, {0.965, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.975, 0}, {0.985, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.995, 0}, {1.005, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.245, 0}, {1.255, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.495, 0}, {1.505, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.745, 0}, {1.755, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.995, 0}, {2.005, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.035, 0}, {2.045, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.075, 0}, {2.085, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.115, 0}, {2.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.125, 0}, {2.135, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.165, 0}, {2.175, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.205, 0}, {2.215, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.245, 0}, {2.255, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.285, 0}, {2.295, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.325, 0}, {2.335, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.365, 0}, {2.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.375, 0}, {2.385, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.415, 0}, {2.425, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.455, 0}, {2.465, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.495, 0}, {2.505, 0}]}},
{GrayLevel[0], EdgeForm[GrayLevel[0]],
{GrayLevel[0], RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{GrayLevel[0], RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{GrayLevel[0], RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{GrayLevel[0], RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{GrayLevel[0], RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{GrayLevel[0], RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{GrayLevel[0], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{GrayLevel[0], RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{GrayLevel[0], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{GrayLevel[0], RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{GrayLevel[0], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{GrayLevel[0], RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{GrayLevel[0], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{GrayLevel[0], RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{GrayLevel[0], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{GrayLevel[0], RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{GrayLevel[0], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{GrayLevel[0], RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{GrayLevel[0], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{GrayLevel[0], RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{GrayLevel[0], RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{GrayLevel[0], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{GrayLevel[0], RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{GrayLevel[0], RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{GrayLevel[0], RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{GrayLevel[0], RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{GrayLevel[0], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{GrayLevel[0], RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{GrayLevel[0], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{GrayLevel[0], RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{GrayLevel[0], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{GrayLevel[0], RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{GrayLevel[0], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{GrayLevel[0], RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{GrayLevel[0], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{GrayLevel[0], RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{GrayLevel[0], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{GrayLevel[0], RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{GrayLevel[0], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{GrayLevel[0], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{GrayLevel[0], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{GrayLevel[0], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{GrayLevel[0], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{GrayLevel[0], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{GrayLevel[0], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{GrayLevel[0], RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{GrayLevel[0], RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{GrayLevel[0], RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{GrayLevel[0], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{GrayLevel[0], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{GrayLevel[0], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{GrayLevel[0], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{GrayLevel[0], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{GrayLevel[0], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{GrayLevel[0], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{GrayLevel[0], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{GrayLevel[0], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{GrayLevel[0], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{GrayLevel[0], RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{GrayLevel[0], RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{GrayLevel[0], RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{GrayLevel[0], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{GrayLevel[0], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{GrayLevel[0], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{GrayLevel[0], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{GrayLevel[0], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{GrayLevel[0], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{GrayLevel[0], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{GrayLevel[0], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{GrayLevel[0], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{GrayLevel[0], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{GrayLevel[0], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{GrayLevel[0], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{GrayLevel[0], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{GrayLevel[0], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{GrayLevel[0], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{GrayLevel[0], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{GrayLevel[0], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{GrayLevel[0], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{GrayLevel[0], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{GrayLevel[0], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{GrayLevel[0], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{GrayLevel[0], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{GrayLevel[0], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{GrayLevel[0], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{GrayLevel[0], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{GrayLevel[0], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{GrayLevel[0], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{GrayLevel[0], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{GrayLevel[0], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{GrayLevel[0], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{GrayLevel[0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{GrayLevel[0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{GrayLevel[0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{GrayLevel[0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{GrayLevel[0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{GrayLevel[0], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{GrayLevel[0], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{GrayLevel[0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{GrayLevel[0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{GrayLevel[0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{GrayLevel[0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{GrayLevel[0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{GrayLevel[0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{GrayLevel[0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{GrayLevel[0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{GrayLevel[0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{GrayLevel[0], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{GrayLevel[0], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{GrayLevel[0], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 0}]},
{GrayLevel[0], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{GrayLevel[0], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{GrayLevel[0], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{GrayLevel[0], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{GrayLevel[0], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{GrayLevel[0], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{GrayLevel[0], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{GrayLevel[0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 0}]},
{GrayLevel[0], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{GrayLevel[0],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{GrayLevel[0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{GrayLevel[0],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{GrayLevel[0], RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{GrayLevel[0],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{GrayLevel[0],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{GrayLevel[0],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{GrayLevel[0],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{GrayLevel[0],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]},
{GrayLevel[0], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{GrayLevel[0],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{GrayLevel[0],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{GrayLevel[0],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{GrayLevel[0],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{GrayLevel[0],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{GrayLevel[0],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{GrayLevel[0],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{GrayLevel[0],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{GrayLevel[0],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{GrayLevel[0],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{GrayLevel[0],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{GrayLevel[0],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{GrayLevel[0],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{GrayLevel[0],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{GrayLevel[0],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{GrayLevel[0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{GrayLevel[0],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{GrayLevel[0],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 0}]},
{GrayLevel[0],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 0}]},
{GrayLevel[0],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 0}]},
{GrayLevel[0],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 0}]},
{GrayLevel[0],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 0}]},
{GrayLevel[0],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 0}]},
{GrayLevel[0],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 0}]},
{GrayLevel[0],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{GrayLevel[0],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{GrayLevel[0],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{GrayLevel[0],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{GrayLevel[0],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{GrayLevel[0],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{GrayLevel[0],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{GrayLevel[0],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{GrayLevel[0],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{GrayLevel[0],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{GrayLevel[0],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{GrayLevel[0],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{GrayLevel[0],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{GrayLevel[0],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{GrayLevel[0], RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{GrayLevel[0], RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{GrayLevel[0], RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{GrayLevel[0], RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{GrayLevel[0], RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{GrayLevel[0], RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{GrayLevel[0], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{GrayLevel[0], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{GrayLevel[0], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{GrayLevel[0], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{GrayLevel[0], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{GrayLevel[0], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{GrayLevel[0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{GrayLevel[0], RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{GrayLevel[0], RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{GrayLevel[0], RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{GrayLevel[0], RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{GrayLevel[0], RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{GrayLevel[0], RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{GrayLevel[0], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{GrayLevel[0], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{GrayLevel[0], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{GrayLevel[0], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{GrayLevel[0], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{GrayLevel[0], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{GrayLevel[0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{GrayLevel[0], RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{GrayLevel[0], RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{GrayLevel[0], RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{GrayLevel[0], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{GrayLevel[0], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{GrayLevel[0], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{GrayLevel[0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{GrayLevel[0], RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{GrayLevel[0], RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{GrayLevel[0], RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{GrayLevel[0], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{GrayLevel[0], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{GrayLevel[0], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{GrayLevel[0], RectangleBox[{1.995, 0}, {2.005, 0}]},
{GrayLevel[0], RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{GrayLevel[0], RectangleBox[{2.035, 0}, {2.045, 0}]},
{GrayLevel[0], RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{GrayLevel[0], RectangleBox[{2.075, 0}, {2.085, 0}]},
{GrayLevel[0], RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{GrayLevel[0], RectangleBox[{2.115, 0}, {2.125, 0}]},
{GrayLevel[0], RectangleBox[{2.125, 0}, {2.135, 0}]},
{GrayLevel[0], RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{GrayLevel[0], RectangleBox[{2.165, 0}, {2.175, 0}]},
{GrayLevel[0], RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{GrayLevel[0], RectangleBox[{2.205, 0}, {2.215, 0}]},
{GrayLevel[0], RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{GrayLevel[0], RectangleBox[{2.245, 0}, {2.255, 0}]},
{GrayLevel[0], RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{GrayLevel[0], RectangleBox[{2.285, 0}, {2.295, 0}]},
{GrayLevel[0], RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{GrayLevel[0], RectangleBox[{2.325, 0}, {2.335, 0}]},
{GrayLevel[0], RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{GrayLevel[0], RectangleBox[{2.365, 0}, {2.375, 0}]},
{GrayLevel[0], RectangleBox[{2.375, 0}, {2.385, 0}]},
{GrayLevel[0], RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{GrayLevel[0], RectangleBox[{2.415, 0}, {2.425, 0}]},
{GrayLevel[0], RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{GrayLevel[0], RectangleBox[{2.455, 0}, {2.465, 0}]},
{GrayLevel[0], RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{GrayLevel[0], RectangleBox[{2.495, 0}, {2.505, 0}]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Frame->True,
FrameTicks->False]], "Output",
CellChangeTimes->{{3.662579824150284*^9, 3.662579924329763*^9},
3.662580001591158*^9, 3.662580129220911*^9, 3.662580190033875*^9,
3.6625804772897387`*^9, {3.662580696313774*^9, 3.662580703460107*^9}, {
3.6625807358676767`*^9, 3.6625807535413103`*^9}, 3.662580840661969*^9,
3.6625816247405653`*^9, 3.6625817331683407`*^9, 3.662581996897464*^9,
3.662582031224821*^9, 3.6625820731882143`*^9, 3.662582175253334*^9,
3.662582225657587*^9, 3.662582292018343*^9, 3.662582485226413*^9,
3.662583239773934*^9, 3.662583272238402*^9, {3.662583436065441*^9,
3.662583465305127*^9}, 3.662588493974208*^9, 3.662596846551632*^9,
3.6625997459567337`*^9, 3.662601056410437*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[",
RowBox[{"competitionplot", ",", "\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "4", ",", "u", ",", "tryKm"}],
"]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2.5"}], ",", "2.5"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Thick", ",", "Black", ",", "Dashed"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]", "histoplot", ",",
RowBox[{"Axes", "\[Rule]",
RowBox[{"{",
RowBox[{"True", ",", "False"}], "}"}]}], ",",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "2.5"}], ",", "2.5"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "maxheight"}], "}"}]}], "}"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.662579485856509*^9, 3.662579491127986*^9}, {
3.6625802104607067`*^9, 3.662580220555599*^9}, {3.662580463397059*^9,
3.6625804711235657`*^9}, 3.6625805460433283`*^9, {3.662580784833908*^9,
3.662580785617728*^9}, {3.662581907117942*^9, 3.6625819247652273`*^9}, {
3.662583506820209*^9, 3.662583524650764*^9}}],
Cell[BoxData[
GraphicsBox[{{{{}, {},
{RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJwtl3k4FY0Xx3ERpZJUtEklEZJQpO4pSSlRkt42InuWylbWK0Sl4qKylO2N
m+WOFqXUuZY2Ssia9a62EPFaEr/xPL8/5pnn88wzZ875nnO+M6No63HUXkRI
SIhHHrPnwC7T4ZkZCut2QMOKSj86CPyXjrZMUVi9SicY0UF0OCzdMfZygsIK
F9NxOxpGhzV6nn89flNYTV+Skjh36FB6I1aiU0BhfTJ3zV2VRQcJjcbVrK8U
lpGpufNMPR3ivGwOhiRRWKmhzYW+OnGQI3w5U2gbhXW9b8d9jz9xIGZvrCV/
RoS1rnrEqq0iARY3vb+QHiPMUqd7dLky7sPRskQ7lQohlm6RSlViXiL4D+68
cJc7gzMa52WClqbAK99EF6bZNP510qzTuvMIDsdarpl+MIVtcvXZHbvSwDjl
7eH9PycxYPsCA6/qdHj88UrD5VMTKBEzPI9mlwlnw+KWfMsew4kvllsktB9D
kA0lf97i/zDU0WPmzEQWCKkroGH4CJ66tTNCBxnw4+aD6zn1w6if6t9TkZUD
K+c6MUb2DGFJS3lnxMk8OPvuy621BkPo5BC5/cG5PEi7tMXTXGcI9zQlRGc7
5cGGlkndXOUhNCywln3nkwebc6PL7aSGsGY4o74sNg/2HH7WUVv/C0VPWSlr
V+SBc+z0kgKnX6g0pPrIVzcfXHVUxVpWDqLbsqOyIhQmXBIryvJZOIiWoU+j
hCSZcLXe2ERGZBAXM9qcJxcw4Ya3/Z0DXQMoWjzPvHM5E568SJV/VTCAJsdM
Ji9rMaFHZ5lG/L4BDNvyavq5DRMcdUWtzDz7seIIn+tRxAR3cfpEr20/sj5t
Gq16xwSfBsXkCMt+vH5GK3VjORMifKjst/r9eJT7l1FZxYTHhVdd1cT6Udjw
6Y9vXCbwdYeCJRN/oqDVKcFenAC7be3ZZWV9WDhKUdiiToBD9rbj+1724T0t
M93TmwlwkY+hfH7Sh8I6ix6FbSHA84/h2aqYPrSp9jv1VYeAAGQsbrbuQ+lV
pTt37SIgztg7aOBPL448832YdJiAD1ZSx+S1e7FNiTWm7UbA50/2wsnKvXiu
zv+LmAcBX/Qwf/WKXpTx7nny3ZOA2hWXJNeL9OLD9ZEBDl4EdHQ0vtOo7sGA
JjU9J38Cxh0zVPZe6MHIGJVjPyIJUPXTn3HP7MaLasbRrmkEsNoOq3ITunFY
ip4ynk7AcUM7S6uobpQeGO+hZRIQuuBWDtW9G9Xd3DSisghozmyzkt7ejb43
g1Rd8giIrAkhCiq7cOSp6TqvVwSs3hbfovSuC+On6/+UFRHwPJkhnkh0oWvF
0l8L3xDQ6Vh7OjS+C38zTqxPfkvAtul1khbWXXjRWCEqvJQAgerHcyPDAiw7
PhcTK0m97rbccuILMGgkNTjnCwEy/w2+bG0U4BtjJrz6SsCuErkF74sFqNyn
8O79NwLirVxex0cI0EZfJJD4Ttb7NogveUWAgYrsZWl1ZL1r6dJBrgIs8U/P
iq4n4Gf/GwcHcwFGCy6knmwkYG/Y/MXblgtwcLy0tuwHAT96FHflSAlQ30jz
F72F7KeZrrPCDB8PVVqOW7cSkLTcGufw+Biwc215XxsBwwTh2pTHx3p7b9Xa
TlKfpe8TDqXy8c4dzSAam9QnoLmEFcvHwD/9z9Q4BJgYi8gxfPno2B1W4sMl
IK3NovzKbj4y4sUPNvMJ0OJpTdZp83G5V6H+WQEB5b2LNDU38nFB5c/oDpIF
Y9+SBAv4KBdudbqxiwDf6fya3SJ83Fx0qMG0mwAJsdtzUkZ5aCxlUsAiWVXm
0GWLVh6qXV4UmdRDwBu5TYz8bzwMMS0JpfQScEhhbodkGQ976/a2OpLsrvbJ
hMXg4a4b7xlKfQTMaGWFrEjhodmTryuDSb6rF1Hoc5eHF2zwZx3JT/ftXavu
y8PLldlp3j8JMDRddyLShYcva6rDWSTXWYjc5p7hYZaM4fs5/QTYn2SX7TrC
Q3TPsD5I8n82rIkHe3k470risZskX3d8tHl0Gw+f+dVnfCRZzj3I3nwTD5sc
xE2FBgjY4W9QIy7Dw2tRKrkOJH+hrZhjK8ZD/d33zsWRfDZy0uDtOBcFQ0Me
70gevN18Se4nF81UKY08kkPiX2Vf7uCizpYHCXMGCViUfK+9qpaLQpLX8zeQ
nJ7uI6v6gYsTbpmr95C8lWFpEl7ExXONXwX/kFzO1A7pzOXiXD+euDvJloWL
C3ekcnFgV1VQEMmC4uG+BDoX3Ru9D98k2besRnE4gotijArvOJIlKggr06tc
zGpijTwg+UH1nehsNy46GB+pTCJZtdG9jHKOiwH0KxOz14vbTCfOHiPzkTMI
nr3flKe2+bUxF/8OPjo9G7+9d579kh1cfNdPxMw+33OoN9FTg4yXGbx6Nj/h
8c/VlYpc3GSnSDlJcux0trjyEi4qahPU2frWiUUahEpwkdNuUjdb//N5jpfa
/nDwMV+2ZFYfI5l92dsHOTgQrivOJ/VrkFNqp3M4KPmqNWNWX0cFUdnBeg5q
auglzuo/rsQ9YPKZg0kWoT2z/YlSKw3+t5iD+01/x+iQvHxr2gshgoMmY5X0
2X7m6IX0ncrgYA7ffHC23wZgrfgygYNLz1Vmzs7DWdNV0W6BHLR42rZaguRB
i6nST54cjE5X4M3OV8jJlvF15zkYYpEj6kNyuuOD8z9MOPi9SvmfenI+u2hL
DIzlOJhreumUEznfcwOZg/S5HMyUnLzyh9wHDb8DGZ1TbHx7Nd7yBsk+7oFz
r7LZWH7pzb4kcn/ET/Gbcp+w8absEqUb5P6pHg++NZHMxlTuWfhD7uvhI/Kw
7w4bT0hUrHYiOd7YNKvjMhsPpF7bqMMjYL32C2+ZnWykhFtHJZN+sH+zmYr1
ZjYKrbVr7CP94oJqT2uOIhstmlR+6ZL8fM2qvUbibFz02ziC1U7u0/xwGb9v
naimJns+jfQjW8ExZtu5Tky3cx1JJP0tgj1gq3qsE11ymP5ZpP89aY1c6ruv
E8fG77OZtaQ/1RYHSm/qxLkXlcyeVxMgEnzgfkR3B660m/xxk/RX6paemiPz
O3B9rOEy3zIynvIqvb6hdqR/y96zh/TnqlVHUsMa2rGyMNBBsoTsx9wi95eP
2vGUA/PhzXekX3Mj563SakdHwxFRG9L/X8dvNOo+3oa86LoTJvnkvJ/qshM2
aMO2qC5szSXfN2sehy5XbMOlG7/auuaQ+T1ZxzrU14q4Rvl8YDYBKqzVOwqC
WzEpufi2F/l+ut8ru+VqdgsyFd5aF8QT4E0VXiU12Yye8bw3XlcIKBVl7VDq
aMZ2blRbrC8B0hVBJ3eVN2PTpEpYnjcBucem7nnebkbR/liXposE8JzHZOrX
NuOKN3Y8URcCjsb1Szw82IR3hD/8eP0PAZo9zSObUxrQJtByKk+XAK9f6irL
whrwbveHkChtAl6N0c5MuzTgHEV3E1stAnaLq374sr0BM0YmCudpkPHWXb3n
XFePpW1vtu9SIvM9s1w/Y149uvC6RdYvJvWpORm89Op3TO3aai3xgwl7X7dI
/j1ejdQve5zNtjIh/8m/eh93VKMWZ/nJk+pMkEvycI5ZU437NXQdbJSZ0DAm
Hnuw7hsG2A31nVnBBCX/49Ipk1Xoq8n2UCC/r0ppo1Jg/BVbr4R4ltbkw9Tt
reIRnZ/R/bq3ZpFrPngymOOLFpehXdZN01/0PDjusC6tNoCB5tub77uzc+Dj
l+YbWy2yqU5d2+Qs1zwBffWSp+b3yqj7K7UHCrSyQcRnSet5+WpqSMcRd2X3
xzBHypxmO9BAdWxSOVF7LxOudTYYXspoo9Y+vO2Xz08HIinCPGiYTVWYejs5
cCENPNLPS/OO86kcacO9a3oewVmXxFXXad1UxjJ4H+eQAlFHfPS2JvdRL+83
8x3ckASisvGC4MkB6njf3wK/wfvQWBn+K2zhEFWoZA7jzcJ7YOlvq5tYNkz9
tu8fdy29eLgwr29t1ckRqvRKzw3zc+mgkPMhQbx3lMqRK/jkYRIL/q8MLRYm
jVHNapx9OwfugufjC4W6myeolkZyFQUxd0BKZJutBn+SKp7536fbZtFg5HYs
XpU+RX1D139qb3oT5IpWeRitn6YOJJx/6nw/CmIvRcZoNs5Q214Uaat3X4ej
EWbqKYVCEOzW2cjwjQDVU2GWmYHCcNFbeV/7pnBoEEim0y1F4I/zoc8x7GtQ
ZcvfLaNAgQ/VBSe8PoQCWzRrPH4tBa74qrm/LAmFkcdOTPkNFCjqENadKg4F
+b6+lYrqFOjc/bz5xrNQOH95eGzzDgqk7JQ+XZwaCpPXZvJMrShweoLI9PAP
hQ3/yi+PukMB07BxeRmtUNAzbqmWolNgQ3md5A31UDjUk3z9bgIFNG1C4igq
oXBRfc3ovRQKxBm4+f5RCIXiFxuqH+dQQPDxg/X0/FA4+mFrRPlHCkRYD680
76WBvdOowf5KCkgVb7Bn82ngN/fl78oqChQGDRt4sWmQclj/3Pd6CuQ/vX3/
YRMNuhvAgMOlgFNz+k+xjzSY9BP5bd9FgfTREw8zSmkwf0U5o6eXAluj1H7s
eUcDLWvjZUNDFMgu9u4Pf0EDI2HJKq9RCjCkYspUCmhwIqMibHycjKe9RPFb
Lg1cjG7tCJiiwJluSzGfbBr8/38RZLWzPFZn0uB/2wCBZg==
"]]}}, {{}, {},
{RGBColor[0, 0, 1], LineBox[CompressedData["
1:eJwt13k0VP8bB3AMbZRKWhUiiUJFsvU8kaQkSUSKzKBkCWHszVxRWrQhpCgp
SxsRUjNFCaXJMsyMXcpSsmbJ8rvfc35/3HPP64/Pued8nuf9fD5X3snL0llE
SEiog3z+e4f+3D84M0NhP+OFLadVWeOP4KUjgkkKe2zy/uFHNdZovrBl9NU4
hX13WfbeXw3WKKdzZspriMK24mg7BHdY4/voG3Naf1DYVa++GT8ds8Y5avVr
2F8o7HVxlEeuCjZ466zjvnNJFLZZqlHRpiAbzBL2TRPSprBnPAaNNTYdQTFn
ky0rjomwHYNaB8YqbVGq4YP7/evC7JGVBS/2+x5Fy5JE6oYKIfZD6TDrYe1j
GPzHwP1axwyrlMaJ+X3QAQsCEt2eHZhmPYzfeC+22BHNbxyWm06YZGnuFD+2
V8wJTZLfmO/5NcESlhBXF3KjYnpZINf36DiLl9OSl9tAw+MRt6S/Ph5lKWoa
rXkV44JhjpSn4lJ/WS4VIodKrE6i0CZZltH5YZZPdm4+28AN+ZcSorLqBln0
ZZ+i0qLcUWbeyYxhwwFWXJ3ngeUdnnhaS0VMIPOHpR1ln6DEP4NU7ebHJSW9
rHkfxZbbOfqgCl13xjOti7VOrzX4z29fTG06VBq4s5P1teHzQfX3fviTIa1v
sryddZo+3HjrdgAWxSobd1k3sRTT49xM8wNRo5s3rJ7MZfkOxS/Z1x6Mu4oE
c6esOawHBcXSC4ZC8UzGs7FFUiWsrHjbnLwl59DaRSG1OiSDNTpvpllZkoHR
3r4XbuQ9ZqV8a5lTu5iBb0JKvCz7HrFc7BrSQpcyUPEmdUe1Qzrrtea00ufV
DBxkPRB8M3zAGrF0nzm8kYFrtu7ZeH9RIuthYcGRlaYM7L+dQBtIsGTdtUdT
CwYDyz7zorceegyPXBvSS3sZeJLOLzuqmgHruCkWOn8YOEdRIBpByQRa0rEd
WYMM3BvcGFabmwXiorO4keMM/LyhxcdvyTNIjAm6IDObiSeNfJ4IenKgolvh
2lt5JrqnBMSuzi6EXznBy95bMVH/72ju5uVFYCP9qqjehokSZvRq44giCBYk
KvXYMfHJKF3S0/41nA6zNRU7wcQ+86CLbyXewBulpZZLPJhYEPb27bNtbLCJ
L9pyI4KJupve5VjEl0C/UR576DkTtWq5cW/LSyCw/YO0Zy4TNYJ/BW2cLIGm
HWd1OvOYqFS+zGjOiVL4uv5CW3kRE6WcPWtYKh+g8pWqq3spE3/dWTWs9vYj
rLL43SlVz8R7Ev5a8zvLoVFbXYM/zsTE3EsrgpdVwBvfuPXd/5gYZ5c61WVa
AdjbkDA8xcTLjz9/KH1aAfQM404hEQLpuxSsQ+iVIGvfUNs3l0DLEI5/r/gX
MNu1SXzNCgJF/KUbaSs4MKUlpl2kSaCdY2Z1gSYHxGt2mftvIzBnL5RLWHBg
m6Vy/6btBDrJnsp/GcmBcaOJ8hg9At9/Kr4mOsyBpzd6rq82JJBYRTNOq/oG
4OLh6mBOYKPYuN5Y9zd46VwuUXOAQM3+K1vMxKohd8/oMsODBH4vfSU7rFcN
PCE3m8VWBO7yFJ8wyqiGxTy/ncG2BIq+y3naQdSAUzRjvgeVQPssk4fa92qg
r3zF2jgagS9jG5MuFdWAxKLB0CJnAmlusy5uHagBoUVpoiOuBH6QsqMSx2sh
tchCbrM7gWum+2zrA2sh+9QUanoQ6N9FWKjG1oIeW+bOFk8Cld48MaiprIUU
t6p/cmcIjHQRXq6gUwczsEOn1JfAZou4BQFWdfC88JpY6lkCt+mpilV61cGL
Yygc6EfgD8nDgz7pdTBh8oKxMoDA3YWPP7+X4sL0I/3zCkEE3n1gULJUnQse
BzMzeaT/XqkudNvLBdmv8n+jgwlMd5pMX8zgwnYtiX/NIQTOlrBgOPVxgevt
m2oWTuCR9XbsbXPrQd7Ez5RHOtOQNjNPsR56rmgYnDhHoHkgPTTXth7cbpaK
UhkEptxiFkedrQd3rlJ9I+nBZ5f/HY2ph1UJhwcPMgmM+5ESKPqhHiK8/YXU
CAK7hLMKGlrqQTlUefAWad3VeaPZE/WgMK6kMkq6+VC532GNBvB3qHV7EkGg
hlfNyw37GmDeRKCP8HkCmdFNQ1PODaB/yvatBWmldwPe6UkN8C57Wq6NNL3x
3/Og/Abgrx/ctjaSwIpRsX7zbw3QUhYUc5y0jNRCdYVfDZCVgCpxpD3VVnqO
zuLBwmuDs8pJs00Vn1TK88Dx/O51o6QXO6v9uqfPg3a98Qi5KLL+57arnrXh
QYBD1Tpj0vlJhm57fHigHHlttjPpOa/MMmSu8CBCY5HKOdJ21dZd/Y94sKFS
+Uoc6ezfjus/vCfXP83XeEx6es5pl4QmHhCyqUvySFso+j30GONBmEXd9jek
70P4951SfKA7miSzSQ/bXVRYqsaHQ/aDO1mkjf1vOvXs4YPkjgalQtJx15NT
31L5cOS3sNlT0l3Zj1pvhPFhHoS/uEta99MLWdcEPlBGXGyiSV/ueH1c7yUf
VN9yDbxJN09/SJb8ygd7rSHaIdIaKzmNHd18KGj7+VmDNFOLv6pAVACaWj/9
5pKutfhud1lWABaXVRybyP1Scu9LcNQVgN2mwUvZpOlRYw2ahwVgbnJ+3P+/
etwXWT73jAB6+zdn6P9Xj7cSNk3RAvBavz9piqyfJ29p3IuHAgj8soVTSJo9
LFd3ni0ArUzjPd6kaapah9T+CuDF1RRKNdkf+bvhhsiiRgi9xDEJJj3HyfQb
V7UReA+nOLKks28fOxB+ohGq77q9tCP7azrX9eqhkEbotyyXHCD70+Kr95f1
8Y2wq9Iph0l6WCxyH+dzIzg3V32NJ/t5t/y16LSfjfD99999q0jf1k8sp4s0
wdhD0cWJZB70fZ+ayG9vguTij2EXybwQrVwjnwdN0Lx7+YB6KLmfhfs86MVN
EDDvYOttMm+6N9lxYXVNcEZi5PUUmcd+48zu6NnNcHDsut5rMq/Hs0JjHpxu
hlX+bB8xOoFFEYMFGRHNsCKNI9hP5l36uGv7s+RmaDk1on3Dn8DPCw9qFX9t
hvnJGl8WkPNB119RULu1BfZVeEbWe5P9cCBBVGDWAh3Nwg9myHkzoLxArc25
BerFbhQpkH4sGD33O74FMnT/NTuQ82npzkqlWZMtsCvYQOaxG4HjYjqFq5xa
wdD7pU+gEzk/fIa+3PVshX1JWRUnThBo1fKkXT64FXTvL9m825HA5wVrJZRv
tcJGKZYa5TiBLqclHDQ/tsI0RULanJy3tZwW0f0qbWCYq81TJuc10yBxBWdb
G7h+kimr3k/2W6aV2iGjNihmxAjoZgReIsptbO3bwOwPO6zQlEDDbbmZzlfb
wPrB6yaJXeT3kiItwgbbALoPRE1pE1gpFflTUqgdZGbuh+whz5cfl86Hpc5v
B0m3VxIx5PkjExKRXarcDuHHhmdJbibwgj1zjrhDO7wOSsvgbyDQcXUYO76y
HcR7y7vuryRw4T0/jRdpHaBuLeQyjzwfVZf5lRnmdMCCst0NX/4ycXfM2eO1
rA7Y4JxvcGWYiSHhvpdH+R1QNduxb+YPE7scvLsMFn2HF0vHDPJ+MJEt55FS
Efod4nO77J1qmOh1n7bwu3Un3P5nf68pg4lXAxPuXKV2wjNegJzVIyY+tahS
1jnTCbPdjP3L0sj7wrT2zqsXO+Ek7VxW2j3y/nFU3Gd7cSdkuz+5ohPLRLcl
OTWX5X9AaUfnu6/hTHSJnInT+vUDFn+OanxvycTjbomroxhd0Pu9/ueZfgb+
482tGrjSBXw1WtWu3wy8bRoYZp/YBcXHAlyX9jDwm/KRls25XXBSj/omp4OB
u35KpzZ+74KrQqz9HC4DN9CuK27Z0w2DTgpPUosZOHzsgmrTgh6I6Uni5kQy
8OJBf52td3pBtdpmpa40A0WXxP4In+iDU5WBPdHi57C+8nx/hOQAdAxcM3wl
HoaHg522JZYMgmjZ88j4L8HoLt67tspuGF6ftFr4khWIslkf42b1jEDA+qwj
LzkBGFxgdEgyaRTmvRsXTuf64Zl09/xt6uMgNcnffEL2LEqIaDupdU6A9VaZ
+QqnfNDYwypW5eYkRIkte/e99QwuL1ztZaw4DXIj9BRc74U3fC5c16ifAXlM
0beNd0fLyAObkvOFMLGya6uEhxuqHI04nBYqjI8Mlfd7hZ9E7o+5928eFsEU
imV7ZKILVjl17lwsS0HpelPLKSFnbBN9NBa7loK6s06bakzQcDj95LMVShR0
8j2h5DJEwxW9vTLymyhYp+18md9JQ5rv4Ki6HgW9N8/u6Kyg4QQx82S/DQU1
w22uno+lodLDFSsvxlBQiq8S27KRhjomAo7ETQoGqTS8cFeioVn3nahrcRRc
brsgelKWht6b5Ebikyk4i9rnqihFw+I8JU56FgWFPl3MuzVORcuPWyNLyyh4
z3RP0N+PVHQ+OaK/p5KCjAuz85+yqUif92qosoqCK237b58qomKyue6JmjoK
/lmtc+DnEyp2cVG/vYOC+0KT7URiqThBFxly/knBs11J2V+vUnH+qtKM7h4K
Rtt8TLp3gYpbHEyWDQxQsMo108wkhIrGwnOrzo5QkN7TIy7rT8UjDyoixsYo
uErTmTruRUU348t6IZMUFBdtPsg9RcX//x/iknsruXlUKv4PmoHf5w==
"]]}}}, {{}, {},
{GrayLevel[0], Thickness[Large], Dashing[{Small, Small}],
LineBox[CompressedData["
1:eJwt2Hk0Vd/7B/A7IKJCyRwhRZlDIvcxlxAJpTITkgyRzCRJKKSMDWQe72lW
7BOSaBCReZ4iig+Z3d/5rvX7667XOnvt8+yzn/0+d53dDpdPOlNIJJIPmUT6
32/IuPEcg0HFpeosozBuKowF7VzoXqPita4tP13PUMGEs3/x1TIVP/TDeJ7r
CRVE1bzWL/9HxW+5yjsfVWKCmtgk1oExKn54Xn813ZEZWGV/7sK/UHHloBC1
tH+bwLvm0e7MRio+vdRhMmvMCl2WrhIBH6n4VJi3/+U8VigOW5aSf0/F7x+s
YfptzQYm3wWVHz+n4pF9Mi6GLZvh3hW74+EZVHyx65Jw3/oWWGeVMjmXSsU3
4pwkTd22gkvWrOmhFCoe7S70UaJ9K6jWR1r+TaDiD+pDzFmeb4Mu3lx7u0gq
HtOqqXsX5wTRt7+ughsVF6zW89bGuOHWCSxQyIWKb/5SqLR9nhvmhgNDlhyo
ONvBhIbXKtuhloPjesU5Kv7L6N6OuOrt4GIjmyBqSsUVNBKVUjt2QDHZ9ylJ
lYpzHlNvjTzEC4fMi1jSlKj4mVkz2cw7vFD/dNBVQZ6KG8vzvRgY54UBA1MZ
BykqXrN1IXs5gw92Jsi8rBUk6n/3M+M7twBECkx8jCZR8SO7WGI8NYWB00NE
WmSdgmetFLisFwpDVpVl3KtlCm77yMZwYecueG33wXRijoJvWr20JL+wC6bz
sjuPjVJwx0gz7gJ7UTitdH6Ko5GCb9zmCmOzEIOxqHvGufXE9XrnAdEHYuDb
3lR+pJaCp4R0TnJ2iUHCtcNXPN9RcOfE5MYoB3GoRbzr38oouH9zSwk5VAJk
jVq2JidT8KfaabeTByXhXRab9/67xPzFDeCquBeO/YHW2jgKfsj1USYtai84
JZU/mL9BwX0SzHLI+/dBekecqGUABZ/uetUhfkMKmJ0NFPnPU/DZK18lQz0P
QIuNgtXUGQpu8fq7mlnjAXh4WjC4ypKCazaX9MrtlQEVoz8f7E0peEbOI3+B
ERlwUXpwpkiHgi/9s/X76y4HDeTxcHVp4n7mVSw3rRTg3mpz7pa9FNx31YLP
J0EB7BYqG/vFKbiSVqn38gcFWJ5I2BElTMH3JvMwhlQUQbpZpeAzJwV/5tis
ZSSqBHEPo7+dXyTjAoKFO39yK8PpVK95uXkyPjmrraR1Shkkkqz5KbNk3CBK
nWR/Xxmqbsg65k2S8R1vL3k1CKnAjEf7v5leMv5g5HOVi6IqmKpL7gqvI+MF
EW8EPSLVYHvHB4/sRDK+ef4Lb1aNJuD7n8REJZBx07yiDR8hGniEBT91uU3G
mS7nhipcpUG9pFKP9A0yTq77IvSaFyDQ7/HxZwFkvEnqvuf9NoAh7iDpOlsy
vs7cX/fKVRvuuFjq550j4xSmraP2WdqgUangEHOGjPeG6E7fbdGG+/YTaUbm
ZNx3bfvOSE0dMKywYGvTJ+OtmFvDNyFdwIzlJ0ZlyLiJ3E+JnfN6YPuEnalB
mqhX4UdkioI+cCyMiRTtJeOOtxnsJZf1wSUzy8pzNxlnVcm6mDOtDwJTmz/+
20HG/dOFzHr/GkBkzGjupjUSzvmT1JrEYwgna9MdpRpJuGkUJr5p0AQkfoz0
fawn4a3vq3dOHz4B/0ZkrV1qSXi+uDnLy5QTkMZSa5rzjoTT931nXZM0hYFj
U0eEy0l4TXzz71cjpnCpWZ2P6x4JN37sMTXmfxI0B28kl98l4Y8Fg53sik8C
59y3rSbxJHwvU+YJ64GT8Hy7E/PtaBIu0KBk33rcHFYs4+aYrpFwFzX2hYV9
pyCmt+fz0nkSLmIk+7RnzQKsZySPPrAm4aXyzu4/1CzhAMOrVtmKhHOfTXh9
7qolfBNlrvQxJeFz1135xOctYaeTTP5vbWL+Y87mT+etIGcyJGJgLwmf7L8Y
e4HbGoL+HPG4O8xADsPnDmY22ECmveoE9DLQ/bEX9cY7bOFdq7zTbDsD9QsK
D2fY2cLGK/FzJxsZKCEsOoJr1RYiw9mMdtAZyI7W7ledYQexXG37U0MZqF5u
MDFl3B6Kr3/NPxrAQAqCuqu3uR3g88JH8WVvBgpvYjrbccQBtnZVClo7M5DV
3tz/rqQ4QFL2Y3YhIwaa+BRq1nTUEdKVPKYe8RPjT4rVn8Wd4G2u8wXT7Qy0
1BE88fuvE/Tw2g6TtjDQFj3N+e7dzrBrzazbnsRAvenrTW1RzpBdp9okPr6B
LoFntv4JFyi0oBbnP99A1nTK44R/F+D11XT38hMbKNj/+jajpIsg5uSd23F0
A+laG+RW/bgI8aZHB8jaG6hsV1ZTBa8HOEj9szh1cANVcw+57XrkAezdZlrL
fBtox79FQ6nnl8BGk41PZ2gdaSYYON9dvAxU5oAP7VfW0XPRiE0CV3zAc9aE
RPJcR5u3Hv6w5aEPdPTuUZe6sI421CvLjBp8oORla0XQmXVUJvb2WKmwL1i6
ymWKaq6jpqwNP8pnXyhoGvNx37SO9N61lWir+oFJkoXoRtoacvKmTx0xDIBA
xW3HDJLXUMwT5w6NkADIa2nwvhu3hvR+ysXHVwTABrdGrVjYGipqum63h+8a
lCaLuRg4raEeNtoOlalrwJHyp/iu7BpqVR15yPMkCBof3FIVr11FSiu1KdHG
YfBPVcfO490qirr3z1b9dhiIdazFvHixivqKdtKPfQqDQD6vLoOCVfRfY0m/
mng4SKVZhnjEr6Kth4LyI7LDISZdvPaF1SrKf+Z78GFhBBhkVZkc/b2CdPac
KCruug5/43vWmMZWkBu7p2Lb2nVID10tet+/gqqtunn2iUTBb1u1TeqtK0h2
VETC0CkKksReIJnKFcSe/K4u/G8U9OWXyG+PWUFereHmNZzR4I9lcPeJr6Ci
z1KxHV4xIJpTiacLryDu6fYqrdQY+JTc6WnFu4L+UxRxakMxIOTH29S8eQWF
SufxBG+7BTWqyddrZ5fRqJakxceKW7C1Kna+AC2j3yfYHC1XYyHv47V237PL
6D+W83lGFfGQpuivU3iKGC9d5tI0EA9xWT4VfcbLyKRw420QVwL4+F6MPQbL
qEe4a9nLNwGOiJzXFNmzjFZD67xL1O7AD3/Ia5xZQlyWweGlF+4CRXKT/+7I
JbThcNPr9rYksIm6x/OtYBFxi+2T4M1NgVA7ahn79n+o4OPwvXbZLCDJiCCd
G/Mok7cy8nteNnTdTrtZ3DaHVD+N6ZGk8kFos2vhvPYsym9R1ZyUKAab6s9x
YhqzyHjpZqqucjE88VHwMlWeRVdHcm1T9IpBsntFpWTvLKIJzA3zuxSDXEl8
nSPHLJqxSk0tySsGbZNn/S1tf1Enn03F+J4ScEva4KG7/kVdR9e/KQqVQom+
43KfPXHd4c0Wlf2lMLPysYfj7F/0zPr2ZZnDpeDjmJjjavwXbants1myKoXg
gxIKoop/Ua5Nh9x6UinsKk1O3bX4BxXxDku/YCmDi8rSzN1Cf1DqvX82gSNl
4MP8Jt9/2x8k6v3hQ95sGQS2GRhyU/6gQ18at9ZvlEGsn/OdY+MzqLoqUbCX
rxyKXjzmf02fQdbxnvMXjcrhlzKvbIr+DMqmSVZS6eVwQYXJ6oTXNLpzm+fT
tGoFeLIkL086TKNNYYymgiMV4N++OzPaYhrZZuzHzulUQLQ/bbDq8DTyylYW
LDepgLyXgRcPME+jahlb1g2nChhVmQ1jS/+NCtqtmrTuVoCjal9Bbe0UOnJ3
/aLpYAW4FKha6r+aQlWzpzu+jVaAO38i9VPRFMqWFvx5dLICvFZ1bL4mTqHM
eKWYvf9VQDAq3N5pO4Xe0rZlP2Ciwz0Dv9CZ1Um0skNwn7YkHeqtOE7xH5xE
Q1+C0qud6PCpwZmcuZewqFHgZVc6fFYjokxwEsk8fj3G70GHFkEfNgnKJBLm
rLpw1pcO/f0/q2Wbf6HDY1rCiRF0WLqQI6Xr8Qs9eHSTsyGTDtIBhxmeTyeQ
f3ckj8dXOuC9JtLD9ydQWV7Et4TvdLDUcbSwujWBDj76JFr0gw6RW+OKaZ4T
KB1/n9TYRYfOp71WnIcm0JEns8vYGB1ivodX0JvGkbxMt7TEOh12qaZ076ke
R+SNosTvDDo8zyxkSa8YRxbNt95epWAwcKHlXGTKODr8iexctgkD1Q1xNnPb
cbSsLeH2gQuDMemP9vNzYyjB7e3+LAkMgu92x7mOjiGbw94nOyQx4P7351XP
zzH0KVXLl0MKA833fFs/vBtDnQxLzFYGgxQr98qU6DGk/s85CVPGQLoqdJTt
2hi6UVq18EIVA1wsmTP04hgKOHTRB1PD4Pf0WxcX0zHEYcXZcP8IBrpRW7ar
Cowhz/fnT2/Rw6Dr127NYo4xdJNKXunUx8DrhIqbCGMUyUe6tD86ikGGgC3a
NDKKzI5+MuU1wmCuouJiR+koSnRrq39xEoMnveZ117RGkfjhgPznNhgojiiu
/Dg4ig64OecwbDGom+SSl983inYkHV/StSfWv/gtY2zrKDreH/Gu2pGon9vI
17xnBHmXcAlddsXgLd/+wrJvIyjngKhxvBsGRiKb+9lqR1CSWca/XHcMPA80
GOKFI0jh/nBNvQcGmL6umMzVEeS/PEuv98JAx1j8dIz7COrpCeF9443BD3NK
wvD5EdTLt8CT54PBPzt8OU13BFHNDsxcvoKBepDGdxbuETTzTDa89ioGnyME
Nzkwj6C3aR67bwdgYBOzolG1NIw4jqwGG1/DIDzldYFv/zBalFvxrQkk1ld+
MHygZBjd5CrruBSCgcXL7S/VHw+jUpvbteyhxHrfzU3dTx5GVpuGYp8SZm2s
sDIOHEax0tp4fRgGac134gsuDSMdzgUV03Diefz0rKXaDyMDlisZPwgbjxyQ
qzQYRjb7tGlfIzDom2R35lEfRv5vjW7qRBL7NTuZ7iU7jDrZ078+I5y0UcCy
l2cYubPGety4joE4c4xGJOswGmBZahoj/Jz9gk/v6hCq0adp6ERh0M63py95
aAj9ekO1nyZ8QYRpx5+2IcQnYb1L/QYGS3uGjxl+IsYLa2xcJ3zrQE1Y7rsh
ZCcgwNxAWEDpyQtSxRBCK86qm6IxKFYLnzqbM4Ss15PStAhrgO3uV/eH0GQZ
j/xVwl/0Na24Y4fQ7y5HRj5hG2Ph+EshQ8gyeJ79B+E/5ms1DV5DyKSMZr1K
ONy6e0ncaQixZ1XPCN/EgMu+UjbMagi99Z/6ok44+0KaU5fhEEo4p7V2irCS
Z0C6suYQajLXCHUjXHfFqvmuwhBiUT1z+hphyyAVlt8SQ+hSPs+dKMLjETwa
BnxDSHzjj+RtwptDyv8kbybqP1jHH09YNuBYzsDaIMpYeFd0i/BJ32FLmT+D
SFH+Xn84YX/PkM2Bg4PoYghTtQ/hdDfe6vrWQeTD8em4LWEi47y31w8i5/is
BH3CQ7bH99i9HkRXhTTj9hFmOTvaUVI0iCxkLhgyE5a2DItbzhxEj/3bvvYQ
6zcx4wf9O4PoXq+eSDlhH6Nn/yVFDKIuez+tYMIpBsb5/b6DKIxtt7ou4dfa
49YHXAYR3xdm7v/tR8+RiK3XTg8i5qiBpjpivyQOvvDjPjKIDLa6M+QJH5U7
IWUrN4jU1BOj+on995D+1VO8exB5Tjyk3iL8XFRYV49lEH3xOMPyheifDsFX
i4lLAwhLDky5QHhtp1lx3+QAOv7CXXmd6D+dLTe4A74NIL3jqdX8hF1YRerr
3g8g6xc6zx4T/RtLfXON6/kA6hlM+yZGuGX590BR6gD6KsB7n4/od4exU+W9
9sT8sR+WG4nzFD044yB9agB13dds2k+4qCdm51X9AfRRZmj2ZjCRRy3vQjj3
DyB3EWMLxSAMKGHHUqMn+hHN5yu3KXF+Df1CGCJf+lHRRs3+OOJ8J16ku7yh
96PY8tX6Wn8MRE/zK/8O7EeHhJ+k7/HDgKbw67vZln4UbLHT/DmRH9F7hdWm
ZvtQuvs9gS9EvnwVNnsc1d6HSlim7g5eJvp38xvPV4/6EFVZ8/H6JSLPh2PY
hRX70Jln5cMUIq8qU/bpTVj2In4T+Xp9Iv9Yz447kjV6Uah2cYSYHdGPonmR
Art7UXbs5wsrRH7OFYnjRlM9qGyPRsPDcxhI4bvU6WE96EjmS5dKKwxSJ3co
BBZ0IyHHQn8tYyJfyltPJMd3I8y59ODQcQwO+iV5lvh0I/35Oo8wQwy+MbaV
9Gl0o5VTiTblBkS/8bDv1fnehY6GRn0b1cLAj0YW5ljpRIaTdC468T6pYcLV
9/R3oi0dH8oED2LA2RhqrVnXic4q1XJdV8Sg5NTaA6+ETuR7aFz9qBwGI26L
3G1incgv+/fjkn3E+bg3zfrweAd69OXAk0EBDOR/dc7LZbUjlvkZFUHi/Xnl
r4wUb1Q7qujI/350lQ6vFyPOb7i3o/yy0J1XlumgxSJd//lQOzLzw4trF+hw
UjzwgduPNvTmvaedwQwd/M4LHM5hb0MpwWL1w310qPxuHbYzsBU9PLXlUnQ1
HXQru9nWLZuRWLOaHm8AHcqKctU+qjcjFx53hxQ/OvBlXHZLFG1GZ3xS0rmI
/xPtiyxJx398Qwa5bq5MnnTYE2TJmbXyFVV+HW5udaRDTcQCBxh8QUOcESFC
J+iwlqDEEj3wCd0KWnzqJkEHr8LyJa7ttehG0OWEmMYKsHQRf9ISXIgYucZz
3Dsr4OPnzlgl8wIa7vjpyaNnZXBY5j1m+qCWJljgcKN5cylQ/Hl6nPibaczm
KcxyfsWwicM0wmGmncbq2Xi963UhXB9o1/HJ6aWdzk+SsmQqgIqMaNPQuUGa
tKwZcvLKg8vZTpwjlqM0co7/dqX3T8HGPV34ZsQE7WJb3cqoag7cMvNXU8qc
okX7XHmv8/4JMO1IGQtbmaG58bQ+k1d7DD+bbvyN2jZLS0keSrF+kQUWQQ4q
6bVzNMlTnNn/DaaDB/uU2Ffredo5heWWLY6pIFJcf59lcoH29EvXkagd9yHo
tY75toxFmq177YREVTJ45Xm8VJFbpiXHJYb1Pk8EDoqqg+zoCk1T3mvtmNUd
0Lt0KkU6eY32Ru9B2FDJbeB7I3xZT2KDFoSN++TdjoEkn5hE+Z8MWgr7nSdM
fjfgZPQJmayXJNit8HtepTMSpM9GWTwNIYOjYZqh4q1waB9jy062oMB2j8UF
oaRg+OowqsUtQoVT3KMc8q0BMMiUv5QiRoWp1968brUBMJ/nWs4vSYXcZy9p
Rc8CgH9qSmi3DBXc74X36d4LACffuUU5dSrElJWwdlsEwMp1RqmxFRU0L6Di
mK6rIJnLL3DrDhWaFRls7b/8Qc2gu5kjmQrOE4HhW7r9wehX5s2796kQOaFQ
ZfTZH7xlRBceZFHhj//50KEyf3j3QrI5r5gKOeTVFvcr/nCyXim67iMVlBk1
tr9J/uDsuqBxtIkK5eYGsw/n/CBg86v/mr5SiTqVhM+M+EGWyWH71jYqaB0y
Uxv56AcT7aAxNEwFE7ZpZYs7frASQPnPeZwKJ3iZTHQj/GCLYF3hr0kqvG9J
nzzs6weKtga8s7NUsK4yz9O08gM9MtvXKwtU8NFaQ8eP+cHpnMaopSUqXN2l
YG6n7gfuenHqwWtUaH+ifD5Yxg/+/3s4mOwz7n4k4gf/B9Ytj90=
"]]}}, {
{RGBColor[1, 0, 0], EdgeForm[RGBColor[1, 0, 0]],
{RGBColor[1, 0, 0],
RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 2}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 16}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 160}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 852}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 2292}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 2918}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 1768}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 584}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 76}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 4}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]}, \
{RGBColor[1, 0, 0], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.995, 0}, {2.005, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.035, 0}, {2.045, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.075, 0}, {2.085, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.115, 0}, {2.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.125, 0}, {2.135, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.165, 0}, {2.175, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.205, 0}, {2.215, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.245, 0}, {2.255, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.285, 0}, {2.295, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.325, 0}, {2.335, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.365, 0}, {2.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.375, 0}, {2.385, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.415, 0}, {2.425, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.455, 0}, {2.465, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.495, 0}, {2.505, 0}]}},
{RGBColor[0, 0, 1], EdgeForm[RGBColor[0, 0, 1]],
{RGBColor[0, 0, 1],
RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]}, \
{RGBColor[0, 0, 1], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.245, 0}, {0.255, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.265, 0}, {0.275, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 2}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 26}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 180}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 464}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 488}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 88}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 2}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.475, 0}, {0.485, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.495, 0}, {0.505, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.515, 0}, {0.525, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.535, 0}, {0.545, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.705, 0}, {0.715, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.725, 0}, {0.735, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.745, 0}, {0.755, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.765, 0}, {0.775, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.785, 0}, {0.795, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.955, 0}, {0.965, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.975, 0}, {0.985, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.995, 0}, {1.005, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.245, 0}, {1.255, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.495, 0}, {1.505, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.745, 0}, {1.755, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.995, 0}, {2.005, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.035, 0}, {2.045, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.075, 0}, {2.085, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.115, 0}, {2.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.125, 0}, {2.135, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.165, 0}, {2.175, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.205, 0}, {2.215, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.245, 0}, {2.255, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.285, 0}, {2.295, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.325, 0}, {2.335, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.365, 0}, {2.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.375, 0}, {2.385, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.415, 0}, {2.425, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.455, 0}, {2.465, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.495, 0}, {2.505, 0}]}},
{GrayLevel[0], EdgeForm[GrayLevel[0]],
{GrayLevel[0], RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{GrayLevel[0], RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{GrayLevel[0], RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{GrayLevel[0], RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{GrayLevel[0], RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{GrayLevel[0], RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{GrayLevel[0], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{GrayLevel[0], RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{GrayLevel[0], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{GrayLevel[0], RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{GrayLevel[0], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{GrayLevel[0], RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{GrayLevel[0], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{GrayLevel[0], RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{GrayLevel[0], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{GrayLevel[0], RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{GrayLevel[0], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{GrayLevel[0], RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{GrayLevel[0], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{GrayLevel[0], RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{GrayLevel[0], RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{GrayLevel[0], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{GrayLevel[0], RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{GrayLevel[0], RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{GrayLevel[0], RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{GrayLevel[0], RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{GrayLevel[0], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{GrayLevel[0], RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{GrayLevel[0], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{GrayLevel[0], RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{GrayLevel[0], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{GrayLevel[0], RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{GrayLevel[0], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{GrayLevel[0], RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{GrayLevel[0], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{GrayLevel[0], RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{GrayLevel[0], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{GrayLevel[0], RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{GrayLevel[0], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{GrayLevel[0], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{GrayLevel[0], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{GrayLevel[0], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{GrayLevel[0], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{GrayLevel[0], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{GrayLevel[0], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{GrayLevel[0], RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{GrayLevel[0], RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{GrayLevel[0], RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{GrayLevel[0], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{GrayLevel[0], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{GrayLevel[0], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{GrayLevel[0], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{GrayLevel[0], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{GrayLevel[0], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{GrayLevel[0], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{GrayLevel[0], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{GrayLevel[0], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{GrayLevel[0], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{GrayLevel[0], RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{GrayLevel[0], RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{GrayLevel[0], RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{GrayLevel[0], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{GrayLevel[0], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{GrayLevel[0], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{GrayLevel[0], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{GrayLevel[0], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{GrayLevel[0], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{GrayLevel[0], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{GrayLevel[0], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{GrayLevel[0], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{GrayLevel[0], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{GrayLevel[0], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{GrayLevel[0], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{GrayLevel[0], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{GrayLevel[0], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{GrayLevel[0], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{GrayLevel[0], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{GrayLevel[0], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{GrayLevel[0], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{GrayLevel[0], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{GrayLevel[0], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{GrayLevel[0], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{GrayLevel[0], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{GrayLevel[0], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{GrayLevel[0], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{GrayLevel[0], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{GrayLevel[0], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{GrayLevel[0], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{GrayLevel[0], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{GrayLevel[0], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{GrayLevel[0], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{GrayLevel[0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{GrayLevel[0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{GrayLevel[0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{GrayLevel[0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{GrayLevel[0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{GrayLevel[0], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{GrayLevel[0], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{GrayLevel[0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{GrayLevel[0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{GrayLevel[0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{GrayLevel[0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{GrayLevel[0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{GrayLevel[0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{GrayLevel[0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{GrayLevel[0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{GrayLevel[0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{GrayLevel[0], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{GrayLevel[0], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{GrayLevel[0], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 0}]},
{GrayLevel[0], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{GrayLevel[0], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{GrayLevel[0], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{GrayLevel[0], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{GrayLevel[0], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{GrayLevel[0], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{GrayLevel[0], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{GrayLevel[0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 0}]},
{GrayLevel[0], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{GrayLevel[0],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{GrayLevel[0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{GrayLevel[0],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{GrayLevel[0], RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{GrayLevel[0],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{GrayLevel[0],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{GrayLevel[0],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{GrayLevel[0],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{GrayLevel[0],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]}, \
{GrayLevel[0], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{GrayLevel[0],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{GrayLevel[0],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{GrayLevel[0],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{GrayLevel[0],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{GrayLevel[0],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{GrayLevel[0],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{GrayLevel[0],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{GrayLevel[0],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{GrayLevel[0],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{GrayLevel[0],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{GrayLevel[0],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{GrayLevel[0],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{GrayLevel[0],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{GrayLevel[0],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{GrayLevel[0],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{GrayLevel[0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{GrayLevel[0],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{GrayLevel[0],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 0}]},
{GrayLevel[0],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 0}]},
{GrayLevel[0],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 0}]},
{GrayLevel[0],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 0}]},
{GrayLevel[0],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 0}]},
{GrayLevel[0],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 0}]},
{GrayLevel[0],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 0}]},
{GrayLevel[0],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{GrayLevel[0],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{GrayLevel[0],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{GrayLevel[0],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{GrayLevel[0],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{GrayLevel[0],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{GrayLevel[0],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{GrayLevel[0],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{GrayLevel[0],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{GrayLevel[0],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{GrayLevel[0],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{GrayLevel[0],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{GrayLevel[0],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{GrayLevel[0],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{GrayLevel[0], RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{GrayLevel[0], RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{GrayLevel[0], RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{GrayLevel[0], RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{GrayLevel[0], RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{GrayLevel[0], RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{GrayLevel[0], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{GrayLevel[0], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{GrayLevel[0], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{GrayLevel[0], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{GrayLevel[0], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{GrayLevel[0], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{GrayLevel[0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{GrayLevel[0], RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{GrayLevel[0], RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{GrayLevel[0], RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{GrayLevel[0], RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{GrayLevel[0], RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{GrayLevel[0], RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{GrayLevel[0], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{GrayLevel[0], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{GrayLevel[0], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{GrayLevel[0], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{GrayLevel[0], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{GrayLevel[0], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{GrayLevel[0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{GrayLevel[0], RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{GrayLevel[0], RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{GrayLevel[0], RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{GrayLevel[0], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{GrayLevel[0], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{GrayLevel[0], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{GrayLevel[0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{GrayLevel[0], RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{GrayLevel[0], RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{GrayLevel[0], RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{GrayLevel[0], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{GrayLevel[0], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{GrayLevel[0], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{GrayLevel[0], RectangleBox[{1.995, 0}, {2.005, 0}]},
{GrayLevel[0], RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{GrayLevel[0], RectangleBox[{2.035, 0}, {2.045, 0}]},
{GrayLevel[0], RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{GrayLevel[0], RectangleBox[{2.075, 0}, {2.085, 0}]},
{GrayLevel[0], RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{GrayLevel[0], RectangleBox[{2.115, 0}, {2.125, 0}]},
{GrayLevel[0], RectangleBox[{2.125, 0}, {2.135, 0}]},
{GrayLevel[0], RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{GrayLevel[0], RectangleBox[{2.165, 0}, {2.175, 0}]},
{GrayLevel[0], RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{GrayLevel[0], RectangleBox[{2.205, 0}, {2.215, 0}]},
{GrayLevel[0], RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{GrayLevel[0], RectangleBox[{2.245, 0}, {2.255, 0}]},
{GrayLevel[0], RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{GrayLevel[0], RectangleBox[{2.285, 0}, {2.295, 0}]},
{GrayLevel[0], RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{GrayLevel[0], RectangleBox[{2.325, 0}, {2.335, 0}]},
{GrayLevel[0], RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{GrayLevel[0], RectangleBox[{2.365, 0}, {2.375, 0}]},
{GrayLevel[0], RectangleBox[{2.375, 0}, {2.385, 0}]},
{GrayLevel[0], RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{GrayLevel[0], RectangleBox[{2.415, 0}, {2.425, 0}]},
{GrayLevel[0], RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{GrayLevel[0], RectangleBox[{2.455, 0}, {2.465, 0}]},
{GrayLevel[0], RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{GrayLevel[0], RectangleBox[{2.495, 0}, {2.505, 0}]}}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->{True, False},
AxesOrigin->{0, 0},
PlotRange->{{-2.5, 2.5}, {0, 4743.551376490018}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{
3.66257949156072*^9, {3.66258021143362*^9, 3.662580221084853*^9},
3.66258047736412*^9, {3.662580767820599*^9, 3.662580786357997*^9},
3.662580840800157*^9, 3.6625816248841467`*^9, 3.662581871161978*^9, {
3.662581903685011*^9, 3.66258192539851*^9}, 3.662582073500638*^9,
3.662582294465457*^9, 3.662582487465448*^9, 3.662583240099018*^9, {
3.662583436449092*^9, 3.66258346569453*^9}, 3.662583525325774*^9,
3.6625884943739557`*^9, 3.662596846936027*^9, 3.662599746337221*^9,
3.6626010568042583`*^9}]
}, Open ]],
Cell["\<\
From the ESS calculations:
{u1\[Rule]-0.601597,u2\[Rule]0.4235,n2\[Rule]621.766,Km\[Rule]10756.3}\
\>", "Text",
CellChangeTimes->{{3.6625831016188927`*^9, 3.662583129434276*^9},
3.6625832301909657`*^9}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[",
RowBox[{
"histoplot", ",", "\[IndentingNewLine]", "competitionplot", ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.601597"}], ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.601597"}], ",", "maxheight"}], "}"}]}], "}"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Red", ",", "Thin"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0.4235", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.4235", ",", "maxheight"}], "}"}]}], "}"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Blue", ",", "Thin"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "4", ",", "u", ",", "tryKm"}],
"]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2.5"}], ",", "2.5"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Thick", ",", "Black", ",", "Dashed"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Axes", "\[Rule]",
RowBox[{"{",
RowBox[{"True", ",", "False"}], "}"}]}], ",",
RowBox[{"Ticks", "\[Rule]", "None"}]}], "]"}]], "Input",
CellChangeTimes->{{3.662581668820829*^9, 3.662581706709944*^9}, {
3.662581978163651*^9, 3.662581979123304*^9}, {3.662582704270831*^9,
3.662582705843841*^9}, {3.662582830479808*^9, 3.662582902947586*^9},
3.662583061087594*^9, {3.662583135013489*^9, 3.662583151322315*^9}, {
3.662583236154517*^9, 3.6625832529455976`*^9}, {3.662583565931121*^9,
3.6625835699618177`*^9}, {3.662583750391429*^9, 3.66258375334219*^9}}],
Cell[BoxData[
GraphicsBox[{{
{RGBColor[1, 0, 0], EdgeForm[RGBColor[1, 0, 0]],
{RGBColor[1, 0, 0],
RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 2}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 16}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 160}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 852}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 2292}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 2918}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 1768}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 584}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 76}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 4}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]}, \
{RGBColor[1, 0, 0], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.995, 0}, {2.005, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.035, 0}, {2.045, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.075, 0}, {2.085, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.115, 0}, {2.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.125, 0}, {2.135, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.165, 0}, {2.175, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.205, 0}, {2.215, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.245, 0}, {2.255, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.285, 0}, {2.295, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.325, 0}, {2.335, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.365, 0}, {2.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.375, 0}, {2.385, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.415, 0}, {2.425, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.455, 0}, {2.465, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.495, 0}, {2.505, 0}]}},
{RGBColor[0, 0, 1], EdgeForm[RGBColor[0, 0, 1]],
{RGBColor[0, 0, 1],
RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]}, \
{RGBColor[0, 0, 1], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.245, 0}, {0.255, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.265, 0}, {0.275, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 2}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 26}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 180}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 464}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 488}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 88}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 2}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.475, 0}, {0.485, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.495, 0}, {0.505, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.515, 0}, {0.525, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.535, 0}, {0.545, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.705, 0}, {0.715, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.725, 0}, {0.735, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.745, 0}, {0.755, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.765, 0}, {0.775, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.785, 0}, {0.795, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.955, 0}, {0.965, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.975, 0}, {0.985, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.995, 0}, {1.005, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.245, 0}, {1.255, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.495, 0}, {1.505, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.745, 0}, {1.755, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.995, 0}, {2.005, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.035, 0}, {2.045, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.075, 0}, {2.085, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.115, 0}, {2.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.125, 0}, {2.135, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.165, 0}, {2.175, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.205, 0}, {2.215, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.245, 0}, {2.255, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.285, 0}, {2.295, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.325, 0}, {2.335, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.365, 0}, {2.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.375, 0}, {2.385, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.415, 0}, {2.425, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.455, 0}, {2.465, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.495, 0}, {2.505, 0}]}},
{GrayLevel[0], EdgeForm[GrayLevel[0]],
{GrayLevel[0], RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{GrayLevel[0], RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{GrayLevel[0], RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{GrayLevel[0], RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{GrayLevel[0], RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{GrayLevel[0], RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{GrayLevel[0], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{GrayLevel[0], RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{GrayLevel[0], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{GrayLevel[0], RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{GrayLevel[0], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{GrayLevel[0], RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{GrayLevel[0], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{GrayLevel[0], RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{GrayLevel[0], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{GrayLevel[0], RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{GrayLevel[0], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{GrayLevel[0], RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{GrayLevel[0], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{GrayLevel[0], RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{GrayLevel[0], RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{GrayLevel[0], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{GrayLevel[0], RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{GrayLevel[0], RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{GrayLevel[0], RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{GrayLevel[0], RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{GrayLevel[0], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{GrayLevel[0], RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{GrayLevel[0], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{GrayLevel[0], RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{GrayLevel[0], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{GrayLevel[0], RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{GrayLevel[0], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{GrayLevel[0], RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{GrayLevel[0], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{GrayLevel[0], RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{GrayLevel[0], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{GrayLevel[0], RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{GrayLevel[0], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{GrayLevel[0], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{GrayLevel[0], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{GrayLevel[0], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{GrayLevel[0], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{GrayLevel[0], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{GrayLevel[0], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{GrayLevel[0], RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{GrayLevel[0], RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{GrayLevel[0], RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{GrayLevel[0], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{GrayLevel[0], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{GrayLevel[0], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{GrayLevel[0], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{GrayLevel[0], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{GrayLevel[0], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{GrayLevel[0], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{GrayLevel[0], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{GrayLevel[0], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{GrayLevel[0], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{GrayLevel[0], RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{GrayLevel[0], RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{GrayLevel[0], RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{GrayLevel[0], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{GrayLevel[0], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{GrayLevel[0], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{GrayLevel[0], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{GrayLevel[0], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{GrayLevel[0], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{GrayLevel[0], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{GrayLevel[0], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{GrayLevel[0], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{GrayLevel[0], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{GrayLevel[0], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{GrayLevel[0], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{GrayLevel[0], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{GrayLevel[0], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{GrayLevel[0], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{GrayLevel[0], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{GrayLevel[0], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{GrayLevel[0], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{GrayLevel[0], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{GrayLevel[0], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{GrayLevel[0], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{GrayLevel[0], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{GrayLevel[0], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{GrayLevel[0], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{GrayLevel[0], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{GrayLevel[0], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{GrayLevel[0], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{GrayLevel[0], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{GrayLevel[0], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{GrayLevel[0], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{GrayLevel[0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{GrayLevel[0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{GrayLevel[0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{GrayLevel[0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{GrayLevel[0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{GrayLevel[0], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{GrayLevel[0], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{GrayLevel[0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{GrayLevel[0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{GrayLevel[0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{GrayLevel[0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{GrayLevel[0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{GrayLevel[0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{GrayLevel[0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{GrayLevel[0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{GrayLevel[0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{GrayLevel[0], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{GrayLevel[0], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{GrayLevel[0], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 0}]},
{GrayLevel[0], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{GrayLevel[0], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{GrayLevel[0], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{GrayLevel[0], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{GrayLevel[0], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{GrayLevel[0], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{GrayLevel[0], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{GrayLevel[0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 0}]},
{GrayLevel[0], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{GrayLevel[0],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{GrayLevel[0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{GrayLevel[0],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{GrayLevel[0], RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{GrayLevel[0],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{GrayLevel[0],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{GrayLevel[0],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{GrayLevel[0],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{GrayLevel[0],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]}, \
{GrayLevel[0], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{GrayLevel[0],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{GrayLevel[0],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{GrayLevel[0],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{GrayLevel[0],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{GrayLevel[0],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{GrayLevel[0],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{GrayLevel[0],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{GrayLevel[0],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{GrayLevel[0],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{GrayLevel[0],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{GrayLevel[0],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{GrayLevel[0],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{GrayLevel[0],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{GrayLevel[0],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{GrayLevel[0],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{GrayLevel[0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{GrayLevel[0],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{GrayLevel[0],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 0}]},
{GrayLevel[0],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 0}]},
{GrayLevel[0],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 0}]},
{GrayLevel[0],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 0}]},
{GrayLevel[0],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 0}]},
{GrayLevel[0],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 0}]},
{GrayLevel[0],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 0}]},
{GrayLevel[0],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{GrayLevel[0],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{GrayLevel[0],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{GrayLevel[0],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{GrayLevel[0],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{GrayLevel[0],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{GrayLevel[0],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{GrayLevel[0],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{GrayLevel[0],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{GrayLevel[0],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{GrayLevel[0],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{GrayLevel[0],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{GrayLevel[0],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{GrayLevel[0],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{GrayLevel[0], RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{GrayLevel[0], RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{GrayLevel[0], RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{GrayLevel[0], RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{GrayLevel[0], RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{GrayLevel[0], RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{GrayLevel[0], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{GrayLevel[0], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{GrayLevel[0], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{GrayLevel[0], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{GrayLevel[0], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{GrayLevel[0], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{GrayLevel[0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{GrayLevel[0], RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{GrayLevel[0], RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{GrayLevel[0], RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{GrayLevel[0], RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{GrayLevel[0], RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{GrayLevel[0], RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{GrayLevel[0], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{GrayLevel[0], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{GrayLevel[0], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{GrayLevel[0], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{GrayLevel[0], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{GrayLevel[0], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{GrayLevel[0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{GrayLevel[0], RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{GrayLevel[0], RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{GrayLevel[0], RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{GrayLevel[0], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{GrayLevel[0], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{GrayLevel[0], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{GrayLevel[0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{GrayLevel[0], RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{GrayLevel[0], RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{GrayLevel[0], RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{GrayLevel[0], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{GrayLevel[0], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{GrayLevel[0], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{GrayLevel[0], RectangleBox[{1.995, 0}, {2.005, 0}]},
{GrayLevel[0], RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{GrayLevel[0], RectangleBox[{2.035, 0}, {2.045, 0}]},
{GrayLevel[0], RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{GrayLevel[0], RectangleBox[{2.075, 0}, {2.085, 0}]},
{GrayLevel[0], RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{GrayLevel[0], RectangleBox[{2.115, 0}, {2.125, 0}]},
{GrayLevel[0], RectangleBox[{2.125, 0}, {2.135, 0}]},
{GrayLevel[0], RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{GrayLevel[0], RectangleBox[{2.165, 0}, {2.175, 0}]},
{GrayLevel[0], RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{GrayLevel[0], RectangleBox[{2.205, 0}, {2.215, 0}]},
{GrayLevel[0], RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{GrayLevel[0], RectangleBox[{2.245, 0}, {2.255, 0}]},
{GrayLevel[0], RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{GrayLevel[0], RectangleBox[{2.285, 0}, {2.295, 0}]},
{GrayLevel[0], RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{GrayLevel[0], RectangleBox[{2.325, 0}, {2.335, 0}]},
{GrayLevel[0], RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{GrayLevel[0], RectangleBox[{2.365, 0}, {2.375, 0}]},
{GrayLevel[0], RectangleBox[{2.375, 0}, {2.385, 0}]},
{GrayLevel[0], RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{GrayLevel[0], RectangleBox[{2.415, 0}, {2.425, 0}]},
{GrayLevel[0], RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{GrayLevel[0], RectangleBox[{2.455, 0}, {2.465, 0}]},
{GrayLevel[0], RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{GrayLevel[0], RectangleBox[{2.495, 0}, {2.505, 0}]}}}, {{{}, {},
{RGBColor[1, 0, 0], LineBox[CompressedData["
1:eJwtl3k4FY0Xx3ERpZJUtEklEZJQpO4pSSlRkt42InuWylbWK0Sl4qKylO2N
m+WOFqXUuZY2Ssia9a62EPFaEr/xPL8/5pnn88wzZ875nnO+M6No63HUXkRI
SIhHHrPnwC7T4ZkZCut2QMOKSj86CPyXjrZMUVi9SicY0UF0OCzdMfZygsIK
F9NxOxpGhzV6nn89flNYTV+Skjh36FB6I1aiU0BhfTJ3zV2VRQcJjcbVrK8U
lpGpufNMPR3ivGwOhiRRWKmhzYW+OnGQI3w5U2gbhXW9b8d9jz9xIGZvrCV/
RoS1rnrEqq0iARY3vb+QHiPMUqd7dLky7sPRskQ7lQohlm6RSlViXiL4D+68
cJc7gzMa52WClqbAK99EF6bZNP510qzTuvMIDsdarpl+MIVtcvXZHbvSwDjl
7eH9PycxYPsCA6/qdHj88UrD5VMTKBEzPI9mlwlnw+KWfMsew4kvllsktB9D
kA0lf97i/zDU0WPmzEQWCKkroGH4CJ66tTNCBxnw4+aD6zn1w6if6t9TkZUD
K+c6MUb2DGFJS3lnxMk8OPvuy621BkPo5BC5/cG5PEi7tMXTXGcI9zQlRGc7
5cGGlkndXOUhNCywln3nkwebc6PL7aSGsGY4o74sNg/2HH7WUVv/C0VPWSlr
V+SBc+z0kgKnX6g0pPrIVzcfXHVUxVpWDqLbsqOyIhQmXBIryvJZOIiWoU+j
hCSZcLXe2ERGZBAXM9qcJxcw4Ya3/Z0DXQMoWjzPvHM5E568SJV/VTCAJsdM
Ji9rMaFHZ5lG/L4BDNvyavq5DRMcdUWtzDz7seIIn+tRxAR3cfpEr20/sj5t
Gq16xwSfBsXkCMt+vH5GK3VjORMifKjst/r9eJT7l1FZxYTHhVdd1cT6Udjw
6Y9vXCbwdYeCJRN/oqDVKcFenAC7be3ZZWV9WDhKUdiiToBD9rbj+1724T0t
M93TmwlwkY+hfH7Sh8I6ix6FbSHA84/h2aqYPrSp9jv1VYeAAGQsbrbuQ+lV
pTt37SIgztg7aOBPL448832YdJiAD1ZSx+S1e7FNiTWm7UbA50/2wsnKvXiu
zv+LmAcBX/Qwf/WKXpTx7nny3ZOA2hWXJNeL9OLD9ZEBDl4EdHQ0vtOo7sGA
JjU9J38Cxh0zVPZe6MHIGJVjPyIJUPXTn3HP7MaLasbRrmkEsNoOq3ITunFY
ip4ynk7AcUM7S6uobpQeGO+hZRIQuuBWDtW9G9Xd3DSisghozmyzkt7ejb43
g1Rd8giIrAkhCiq7cOSp6TqvVwSs3hbfovSuC+On6/+UFRHwPJkhnkh0oWvF
0l8L3xDQ6Vh7OjS+C38zTqxPfkvAtul1khbWXXjRWCEqvJQAgerHcyPDAiw7
PhcTK0m97rbccuILMGgkNTjnCwEy/w2+bG0U4BtjJrz6SsCuErkF74sFqNyn
8O79NwLirVxex0cI0EZfJJD4Ttb7NogveUWAgYrsZWl1ZL1r6dJBrgIs8U/P
iq4n4Gf/GwcHcwFGCy6knmwkYG/Y/MXblgtwcLy0tuwHAT96FHflSAlQ30jz
F72F7KeZrrPCDB8PVVqOW7cSkLTcGufw+Biwc215XxsBwwTh2pTHx3p7b9Xa
TlKfpe8TDqXy8c4dzSAam9QnoLmEFcvHwD/9z9Q4BJgYi8gxfPno2B1W4sMl
IK3NovzKbj4y4sUPNvMJ0OJpTdZp83G5V6H+WQEB5b2LNDU38nFB5c/oDpIF
Y9+SBAv4KBdudbqxiwDf6fya3SJ83Fx0qMG0mwAJsdtzUkZ5aCxlUsAiWVXm
0GWLVh6qXV4UmdRDwBu5TYz8bzwMMS0JpfQScEhhbodkGQ976/a2OpLsrvbJ
hMXg4a4b7xlKfQTMaGWFrEjhodmTryuDSb6rF1Hoc5eHF2zwZx3JT/ftXavu
y8PLldlp3j8JMDRddyLShYcva6rDWSTXWYjc5p7hYZaM4fs5/QTYn2SX7TrC
Q3TPsD5I8n82rIkHe3k470risZskX3d8tHl0Gw+f+dVnfCRZzj3I3nwTD5sc
xE2FBgjY4W9QIy7Dw2tRKrkOJH+hrZhjK8ZD/d33zsWRfDZy0uDtOBcFQ0Me
70gevN18Se4nF81UKY08kkPiX2Vf7uCizpYHCXMGCViUfK+9qpaLQpLX8zeQ
nJ7uI6v6gYsTbpmr95C8lWFpEl7ExXONXwX/kFzO1A7pzOXiXD+euDvJloWL
C3ekcnFgV1VQEMmC4uG+BDoX3Ru9D98k2besRnE4gotijArvOJIlKggr06tc
zGpijTwg+UH1nehsNy46GB+pTCJZtdG9jHKOiwH0KxOz14vbTCfOHiPzkTMI
nr3flKe2+bUxF/8OPjo9G7+9d579kh1cfNdPxMw+33OoN9FTg4yXGbx6Nj/h
8c/VlYpc3GSnSDlJcux0trjyEi4qahPU2frWiUUahEpwkdNuUjdb//N5jpfa
/nDwMV+2ZFYfI5l92dsHOTgQrivOJ/VrkFNqp3M4KPmqNWNWX0cFUdnBeg5q
auglzuo/rsQ9YPKZg0kWoT2z/YlSKw3+t5iD+01/x+iQvHxr2gshgoMmY5X0
2X7m6IX0ncrgYA7ffHC23wZgrfgygYNLz1Vmzs7DWdNV0W6BHLR42rZaguRB
i6nST54cjE5X4M3OV8jJlvF15zkYYpEj6kNyuuOD8z9MOPi9SvmfenI+u2hL
DIzlOJhreumUEznfcwOZg/S5HMyUnLzyh9wHDb8DGZ1TbHx7Nd7yBsk+7oFz
r7LZWH7pzb4kcn/ET/Gbcp+w8absEqUb5P6pHg++NZHMxlTuWfhD7uvhI/Kw
7w4bT0hUrHYiOd7YNKvjMhsPpF7bqMMjYL32C2+ZnWykhFtHJZN+sH+zmYr1
ZjYKrbVr7CP94oJqT2uOIhstmlR+6ZL8fM2qvUbibFz02ziC1U7u0/xwGb9v
naimJns+jfQjW8ExZtu5Tky3cx1JJP0tgj1gq3qsE11ymP5ZpP89aY1c6ruv
E8fG77OZtaQ/1RYHSm/qxLkXlcyeVxMgEnzgfkR3B660m/xxk/RX6paemiPz
O3B9rOEy3zIynvIqvb6hdqR/y96zh/TnqlVHUsMa2rGyMNBBsoTsx9wi95eP
2vGUA/PhzXekX3Mj563SakdHwxFRG9L/X8dvNOo+3oa86LoTJvnkvJ/qshM2
aMO2qC5szSXfN2sehy5XbMOlG7/auuaQ+T1ZxzrU14q4Rvl8YDYBKqzVOwqC
WzEpufi2F/l+ut8ru+VqdgsyFd5aF8QT4E0VXiU12Yye8bw3XlcIKBVl7VDq
aMZ2blRbrC8B0hVBJ3eVN2PTpEpYnjcBucem7nnebkbR/liXposE8JzHZOrX
NuOKN3Y8URcCjsb1Szw82IR3hD/8eP0PAZo9zSObUxrQJtByKk+XAK9f6irL
whrwbveHkChtAl6N0c5MuzTgHEV3E1stAnaLq374sr0BM0YmCudpkPHWXb3n
XFePpW1vtu9SIvM9s1w/Y149uvC6RdYvJvWpORm89Op3TO3aai3xgwl7X7dI
/j1ejdQve5zNtjIh/8m/eh93VKMWZ/nJk+pMkEvycI5ZU437NXQdbJSZ0DAm
Hnuw7hsG2A31nVnBBCX/49Ipk1Xoq8n2UCC/r0ppo1Jg/BVbr4R4ltbkw9Tt
reIRnZ/R/bq3ZpFrPngymOOLFpehXdZN01/0PDjusC6tNoCB5tub77uzc+Dj
l+YbWy2yqU5d2+Qs1zwBffWSp+b3yqj7K7UHCrSyQcRnSet5+WpqSMcRd2X3
xzBHypxmO9BAdWxSOVF7LxOudTYYXspoo9Y+vO2Xz08HIinCPGiYTVWYejs5
cCENPNLPS/OO86kcacO9a3oewVmXxFXXad1UxjJ4H+eQAlFHfPS2JvdRL+83
8x3ckASisvGC4MkB6njf3wK/wfvQWBn+K2zhEFWoZA7jzcJ7YOlvq5tYNkz9
tu8fdy29eLgwr29t1ckRqvRKzw3zc+mgkPMhQbx3lMqRK/jkYRIL/q8MLRYm
jVHNapx9OwfugufjC4W6myeolkZyFQUxd0BKZJutBn+SKp7536fbZtFg5HYs
XpU+RX1D139qb3oT5IpWeRitn6YOJJx/6nw/CmIvRcZoNs5Q214Uaat3X4ej
EWbqKYVCEOzW2cjwjQDVU2GWmYHCcNFbeV/7pnBoEEim0y1F4I/zoc8x7GtQ
ZcvfLaNAgQ/VBSe8PoQCWzRrPH4tBa74qrm/LAmFkcdOTPkNFCjqENadKg4F
+b6+lYrqFOjc/bz5xrNQOH95eGzzDgqk7JQ+XZwaCpPXZvJMrShweoLI9PAP
hQ3/yi+PukMB07BxeRmtUNAzbqmWolNgQ3md5A31UDjUk3z9bgIFNG1C4igq
oXBRfc3ovRQKxBm4+f5RCIXiFxuqH+dQQPDxg/X0/FA4+mFrRPlHCkRYD680
76WBvdOowf5KCkgVb7Bn82ngN/fl78oqChQGDRt4sWmQclj/3Pd6CuQ/vX3/
YRMNuhvAgMOlgFNz+k+xjzSY9BP5bd9FgfTREw8zSmkwf0U5o6eXAluj1H7s
eUcDLWvjZUNDFMgu9u4Pf0EDI2HJKq9RCjCkYspUCmhwIqMibHycjKe9RPFb
Lg1cjG7tCJiiwJluSzGfbBr8/38RZLWzPFZn0uB/2wCBZg==
"]]}}, {{}, {},
{RGBColor[0, 0, 1], LineBox[CompressedData["
1:eJwt13k0VP8bB3AMbZRKWhUiiUJFsvU8kaQkSUSKzKBkCWHszVxRWrQhpCgp
SxsRUjNFCaXJMsyMXcpSsmbJ8rvfc35/3HPP64/Pued8nuf9fD5X3snL0llE
SEiog3z+e4f+3D84M0NhP+OFLadVWeOP4KUjgkkKe2zy/uFHNdZovrBl9NU4
hX13WfbeXw3WKKdzZspriMK24mg7BHdY4/voG3Naf1DYVa++GT8ds8Y5avVr
2F8o7HVxlEeuCjZ466zjvnNJFLZZqlHRpiAbzBL2TRPSprBnPAaNNTYdQTFn
ky0rjomwHYNaB8YqbVGq4YP7/evC7JGVBS/2+x5Fy5JE6oYKIfZD6TDrYe1j
GPzHwP1axwyrlMaJ+X3QAQsCEt2eHZhmPYzfeC+22BHNbxyWm06YZGnuFD+2
V8wJTZLfmO/5NcESlhBXF3KjYnpZINf36DiLl9OSl9tAw+MRt6S/Ph5lKWoa
rXkV44JhjpSn4lJ/WS4VIodKrE6i0CZZltH5YZZPdm4+28AN+ZcSorLqBln0
ZZ+i0qLcUWbeyYxhwwFWXJ3ngeUdnnhaS0VMIPOHpR1ln6DEP4NU7ebHJSW9
rHkfxZbbOfqgCl13xjOti7VOrzX4z29fTG06VBq4s5P1teHzQfX3fviTIa1v
sryddZo+3HjrdgAWxSobd1k3sRTT49xM8wNRo5s3rJ7MZfkOxS/Z1x6Mu4oE
c6esOawHBcXSC4ZC8UzGs7FFUiWsrHjbnLwl59DaRSG1OiSDNTpvpllZkoHR
3r4XbuQ9ZqV8a5lTu5iBb0JKvCz7HrFc7BrSQpcyUPEmdUe1Qzrrtea00ufV
DBxkPRB8M3zAGrF0nzm8kYFrtu7ZeH9RIuthYcGRlaYM7L+dQBtIsGTdtUdT
CwYDyz7zorceegyPXBvSS3sZeJLOLzuqmgHruCkWOn8YOEdRIBpByQRa0rEd
WYMM3BvcGFabmwXiorO4keMM/LyhxcdvyTNIjAm6IDObiSeNfJ4IenKgolvh
2lt5JrqnBMSuzi6EXznBy95bMVH/72ju5uVFYCP9qqjehokSZvRq44giCBYk
KvXYMfHJKF3S0/41nA6zNRU7wcQ+86CLbyXewBulpZZLPJhYEPb27bNtbLCJ
L9pyI4KJupve5VjEl0C/UR576DkTtWq5cW/LSyCw/YO0Zy4TNYJ/BW2cLIGm
HWd1OvOYqFS+zGjOiVL4uv5CW3kRE6WcPWtYKh+g8pWqq3spE3/dWTWs9vYj
rLL43SlVz8R7Ev5a8zvLoVFbXYM/zsTE3EsrgpdVwBvfuPXd/5gYZ5c61WVa
AdjbkDA8xcTLjz9/KH1aAfQM404hEQLpuxSsQ+iVIGvfUNs3l0DLEI5/r/gX
MNu1SXzNCgJF/KUbaSs4MKUlpl2kSaCdY2Z1gSYHxGt2mftvIzBnL5RLWHBg
m6Vy/6btBDrJnsp/GcmBcaOJ8hg9At9/Kr4mOsyBpzd6rq82JJBYRTNOq/oG
4OLh6mBOYKPYuN5Y9zd46VwuUXOAQM3+K1vMxKohd8/oMsODBH4vfSU7rFcN
PCE3m8VWBO7yFJ8wyqiGxTy/ncG2BIq+y3naQdSAUzRjvgeVQPssk4fa92qg
r3zF2jgagS9jG5MuFdWAxKLB0CJnAmlusy5uHagBoUVpoiOuBH6QsqMSx2sh
tchCbrM7gWum+2zrA2sh+9QUanoQ6N9FWKjG1oIeW+bOFk8Cld48MaiprIUU
t6p/cmcIjHQRXq6gUwczsEOn1JfAZou4BQFWdfC88JpY6lkCt+mpilV61cGL
Yygc6EfgD8nDgz7pdTBh8oKxMoDA3YWPP7+X4sL0I/3zCkEE3n1gULJUnQse
BzMzeaT/XqkudNvLBdmv8n+jgwlMd5pMX8zgwnYtiX/NIQTOlrBgOPVxgevt
m2oWTuCR9XbsbXPrQd7Ez5RHOtOQNjNPsR56rmgYnDhHoHkgPTTXth7cbpaK
UhkEptxiFkedrQd3rlJ9I+nBZ5f/HY2ph1UJhwcPMgmM+5ESKPqhHiK8/YXU
CAK7hLMKGlrqQTlUefAWad3VeaPZE/WgMK6kMkq6+VC532GNBvB3qHV7EkGg
hlfNyw37GmDeRKCP8HkCmdFNQ1PODaB/yvatBWmldwPe6UkN8C57Wq6NNL3x
3/Og/Abgrx/ctjaSwIpRsX7zbw3QUhYUc5y0jNRCdYVfDZCVgCpxpD3VVnqO
zuLBwmuDs8pJs00Vn1TK88Dx/O51o6QXO6v9uqfPg3a98Qi5KLL+57arnrXh
QYBD1Tpj0vlJhm57fHigHHlttjPpOa/MMmSu8CBCY5HKOdJ21dZd/Y94sKFS
+Uoc6ezfjus/vCfXP83XeEx6es5pl4QmHhCyqUvySFso+j30GONBmEXd9jek
70P4951SfKA7miSzSQ/bXVRYqsaHQ/aDO1mkjf1vOvXs4YPkjgalQtJx15NT
31L5cOS3sNlT0l3Zj1pvhPFhHoS/uEta99MLWdcEPlBGXGyiSV/ueH1c7yUf
VN9yDbxJN09/SJb8ygd7rSHaIdIaKzmNHd18KGj7+VmDNFOLv6pAVACaWj/9
5pKutfhud1lWABaXVRybyP1Scu9LcNQVgN2mwUvZpOlRYw2ahwVgbnJ+3P+/
etwXWT73jAB6+zdn6P9Xj7cSNk3RAvBavz9piqyfJ29p3IuHAgj8soVTSJo9
LFd3ni0ArUzjPd6kaapah9T+CuDF1RRKNdkf+bvhhsiiRgi9xDEJJj3HyfQb
V7UReA+nOLKks28fOxB+ohGq77q9tCP7azrX9eqhkEbotyyXHCD70+Kr95f1
8Y2wq9Iph0l6WCxyH+dzIzg3V32NJ/t5t/y16LSfjfD99999q0jf1k8sp4s0
wdhD0cWJZB70fZ+ayG9vguTij2EXybwQrVwjnwdN0Lx7+YB6KLmfhfs86MVN
EDDvYOttMm+6N9lxYXVNcEZi5PUUmcd+48zu6NnNcHDsut5rMq/Hs0JjHpxu
hlX+bB8xOoFFEYMFGRHNsCKNI9hP5l36uGv7s+RmaDk1on3Dn8DPCw9qFX9t
hvnJGl8WkPNB119RULu1BfZVeEbWe5P9cCBBVGDWAh3Nwg9myHkzoLxArc25
BerFbhQpkH4sGD33O74FMnT/NTuQ82npzkqlWZMtsCvYQOaxG4HjYjqFq5xa
wdD7pU+gEzk/fIa+3PVshX1JWRUnThBo1fKkXT64FXTvL9m825HA5wVrJZRv
tcJGKZYa5TiBLqclHDQ/tsI0RULanJy3tZwW0f0qbWCYq81TJuc10yBxBWdb
G7h+kimr3k/2W6aV2iGjNihmxAjoZgReIsptbO3bwOwPO6zQlEDDbbmZzlfb
wPrB6yaJXeT3kiItwgbbALoPRE1pE1gpFflTUqgdZGbuh+whz5cfl86Hpc5v
B0m3VxIx5PkjExKRXarcDuHHhmdJbibwgj1zjrhDO7wOSsvgbyDQcXUYO76y
HcR7y7vuryRw4T0/jRdpHaBuLeQyjzwfVZf5lRnmdMCCst0NX/4ycXfM2eO1
rA7Y4JxvcGWYiSHhvpdH+R1QNduxb+YPE7scvLsMFn2HF0vHDPJ+MJEt55FS
Efod4nO77J1qmOh1n7bwu3Un3P5nf68pg4lXAxPuXKV2wjNegJzVIyY+tahS
1jnTCbPdjP3L0sj7wrT2zqsXO+Ek7VxW2j3y/nFU3Gd7cSdkuz+5ohPLRLcl
OTWX5X9AaUfnu6/hTHSJnInT+vUDFn+OanxvycTjbomroxhd0Pu9/ueZfgb+
482tGrjSBXw1WtWu3wy8bRoYZp/YBcXHAlyX9jDwm/KRls25XXBSj/omp4OB
u35KpzZ+74KrQqz9HC4DN9CuK27Z0w2DTgpPUosZOHzsgmrTgh6I6Uni5kQy
8OJBf52td3pBtdpmpa40A0WXxP4In+iDU5WBPdHi57C+8nx/hOQAdAxcM3wl
HoaHg522JZYMgmjZ88j4L8HoLt67tspuGF6ftFr4khWIslkf42b1jEDA+qwj
LzkBGFxgdEgyaRTmvRsXTuf64Zl09/xt6uMgNcnffEL2LEqIaDupdU6A9VaZ
+QqnfNDYwypW5eYkRIkte/e99QwuL1ztZaw4DXIj9BRc74U3fC5c16ifAXlM
0beNd0fLyAObkvOFMLGya6uEhxuqHI04nBYqjI8Mlfd7hZ9E7o+5928eFsEU
imV7ZKILVjl17lwsS0HpelPLKSFnbBN9NBa7loK6s06bakzQcDj95LMVShR0
8j2h5DJEwxW9vTLymyhYp+18md9JQ5rv4Ki6HgW9N8/u6Kyg4QQx82S/DQU1
w22uno+lodLDFSsvxlBQiq8S27KRhjomAo7ETQoGqTS8cFeioVn3nahrcRRc
brsgelKWht6b5Ebikyk4i9rnqihFw+I8JU56FgWFPl3MuzVORcuPWyNLyyh4
z3RP0N+PVHQ+OaK/p5KCjAuz85+yqUif92qosoqCK237b58qomKyue6JmjoK
/lmtc+DnEyp2cVG/vYOC+0KT7URiqThBFxly/knBs11J2V+vUnH+qtKM7h4K
Rtt8TLp3gYpbHEyWDQxQsMo108wkhIrGwnOrzo5QkN7TIy7rT8UjDyoixsYo
uErTmTruRUU348t6IZMUFBdtPsg9RcX//x/iknsruXlUKv4PmoHf5w==
"]]}}}, {{}, {},
{RGBColor[1, 0, 0], Thickness[Tiny],
LineBox[{{-0.601597, 0.}, {-0.601597, 4743.551376490018}}]}}, {{}, {},
{RGBColor[0, 0, 1], Thickness[Tiny],
LineBox[{{0.4235, 0.}, {0.4235, 4743.551376490018}}]}}, {{}, {},
{GrayLevel[0], Thickness[Large], Dashing[{Small, Small}],
LineBox[CompressedData["
1:eJwt2Hk0Vd/7B/A7IKJCyRwhRZlDIvcxlxAJpTITkgyRzCRJKKSMDWQe72lW
7BOSaBCReZ4iig+Z3d/5rvX7667XOnvt8+yzn/0+d53dDpdPOlNIJJIPmUT6
32/IuPEcg0HFpeosozBuKowF7VzoXqPita4tP13PUMGEs3/x1TIVP/TDeJ7r
CRVE1bzWL/9HxW+5yjsfVWKCmtgk1oExKn54Xn813ZEZWGV/7sK/UHHloBC1
tH+bwLvm0e7MRio+vdRhMmvMCl2WrhIBH6n4VJi3/+U8VigOW5aSf0/F7x+s
YfptzQYm3wWVHz+n4pF9Mi6GLZvh3hW74+EZVHyx65Jw3/oWWGeVMjmXSsU3
4pwkTd22gkvWrOmhFCoe7S70UaJ9K6jWR1r+TaDiD+pDzFmeb4Mu3lx7u0gq
HtOqqXsX5wTRt7+ughsVF6zW89bGuOHWCSxQyIWKb/5SqLR9nhvmhgNDlhyo
ONvBhIbXKtuhloPjesU5Kv7L6N6OuOrt4GIjmyBqSsUVNBKVUjt2QDHZ9ylJ
lYpzHlNvjTzEC4fMi1jSlKj4mVkz2cw7vFD/dNBVQZ6KG8vzvRgY54UBA1MZ
BykqXrN1IXs5gw92Jsi8rBUk6n/3M+M7twBECkx8jCZR8SO7WGI8NYWB00NE
WmSdgmetFLisFwpDVpVl3KtlCm77yMZwYecueG33wXRijoJvWr20JL+wC6bz
sjuPjVJwx0gz7gJ7UTitdH6Ko5GCb9zmCmOzEIOxqHvGufXE9XrnAdEHYuDb
3lR+pJaCp4R0TnJ2iUHCtcNXPN9RcOfE5MYoB3GoRbzr38oouH9zSwk5VAJk
jVq2JidT8KfaabeTByXhXRab9/67xPzFDeCquBeO/YHW2jgKfsj1USYtai84
JZU/mL9BwX0SzHLI+/dBekecqGUABZ/uetUhfkMKmJ0NFPnPU/DZK18lQz0P
QIuNgtXUGQpu8fq7mlnjAXh4WjC4ypKCazaX9MrtlQEVoz8f7E0peEbOI3+B
ERlwUXpwpkiHgi/9s/X76y4HDeTxcHVp4n7mVSw3rRTg3mpz7pa9FNx31YLP
J0EB7BYqG/vFKbiSVqn38gcFWJ5I2BElTMH3JvMwhlQUQbpZpeAzJwV/5tis
ZSSqBHEPo7+dXyTjAoKFO39yK8PpVK95uXkyPjmrraR1Shkkkqz5KbNk3CBK
nWR/Xxmqbsg65k2S8R1vL3k1CKnAjEf7v5leMv5g5HOVi6IqmKpL7gqvI+MF
EW8EPSLVYHvHB4/sRDK+ef4Lb1aNJuD7n8REJZBx07yiDR8hGniEBT91uU3G
mS7nhipcpUG9pFKP9A0yTq77IvSaFyDQ7/HxZwFkvEnqvuf9NoAh7iDpOlsy
vs7cX/fKVRvuuFjq550j4xSmraP2WdqgUangEHOGjPeG6E7fbdGG+/YTaUbm
ZNx3bfvOSE0dMKywYGvTJ+OtmFvDNyFdwIzlJ0ZlyLiJ3E+JnfN6YPuEnalB
mqhX4UdkioI+cCyMiRTtJeOOtxnsJZf1wSUzy8pzNxlnVcm6mDOtDwJTmz/+
20HG/dOFzHr/GkBkzGjupjUSzvmT1JrEYwgna9MdpRpJuGkUJr5p0AQkfoz0
fawn4a3vq3dOHz4B/0ZkrV1qSXi+uDnLy5QTkMZSa5rzjoTT931nXZM0hYFj
U0eEy0l4TXzz71cjpnCpWZ2P6x4JN37sMTXmfxI0B28kl98l4Y8Fg53sik8C
59y3rSbxJHwvU+YJ64GT8Hy7E/PtaBIu0KBk33rcHFYs4+aYrpFwFzX2hYV9
pyCmt+fz0nkSLmIk+7RnzQKsZySPPrAm4aXyzu4/1CzhAMOrVtmKhHOfTXh9
7qolfBNlrvQxJeFz1135xOctYaeTTP5vbWL+Y87mT+etIGcyJGJgLwmf7L8Y
e4HbGoL+HPG4O8xADsPnDmY22ECmveoE9DLQ/bEX9cY7bOFdq7zTbDsD9QsK
D2fY2cLGK/FzJxsZKCEsOoJr1RYiw9mMdtAZyI7W7ledYQexXG37U0MZqF5u
MDFl3B6Kr3/NPxrAQAqCuqu3uR3g88JH8WVvBgpvYjrbccQBtnZVClo7M5DV
3tz/rqQ4QFL2Y3YhIwaa+BRq1nTUEdKVPKYe8RPjT4rVn8Wd4G2u8wXT7Qy0
1BE88fuvE/Tw2g6TtjDQFj3N+e7dzrBrzazbnsRAvenrTW1RzpBdp9okPr6B
LoFntv4JFyi0oBbnP99A1nTK44R/F+D11XT38hMbKNj/+jajpIsg5uSd23F0
A+laG+RW/bgI8aZHB8jaG6hsV1ZTBa8HOEj9szh1cANVcw+57XrkAezdZlrL
fBtox79FQ6nnl8BGk41PZ2gdaSYYON9dvAxU5oAP7VfW0XPRiE0CV3zAc9aE
RPJcR5u3Hv6w5aEPdPTuUZe6sI421CvLjBp8oORla0XQmXVUJvb2WKmwL1i6
ymWKaq6jpqwNP8pnXyhoGvNx37SO9N61lWir+oFJkoXoRtoacvKmTx0xDIBA
xW3HDJLXUMwT5w6NkADIa2nwvhu3hvR+ysXHVwTABrdGrVjYGipqum63h+8a
lCaLuRg4raEeNtoOlalrwJHyp/iu7BpqVR15yPMkCBof3FIVr11FSiu1KdHG
YfBPVcfO490qirr3z1b9dhiIdazFvHixivqKdtKPfQqDQD6vLoOCVfRfY0m/
mng4SKVZhnjEr6Kth4LyI7LDISZdvPaF1SrKf+Z78GFhBBhkVZkc/b2CdPac
KCruug5/43vWmMZWkBu7p2Lb2nVID10tet+/gqqtunn2iUTBb1u1TeqtK0h2
VETC0CkKksReIJnKFcSe/K4u/G8U9OWXyG+PWUFereHmNZzR4I9lcPeJr6Ci
z1KxHV4xIJpTiacLryDu6fYqrdQY+JTc6WnFu4L+UxRxakMxIOTH29S8eQWF
SufxBG+7BTWqyddrZ5fRqJakxceKW7C1Kna+AC2j3yfYHC1XYyHv47V237PL
6D+W83lGFfGQpuivU3iKGC9d5tI0EA9xWT4VfcbLyKRw420QVwL4+F6MPQbL
qEe4a9nLNwGOiJzXFNmzjFZD67xL1O7AD3/Ia5xZQlyWweGlF+4CRXKT/+7I
JbThcNPr9rYksIm6x/OtYBFxi+2T4M1NgVA7ahn79n+o4OPwvXbZLCDJiCCd
G/Mok7cy8nteNnTdTrtZ3DaHVD+N6ZGk8kFos2vhvPYsym9R1ZyUKAab6s9x
YhqzyHjpZqqucjE88VHwMlWeRVdHcm1T9IpBsntFpWTvLKIJzA3zuxSDXEl8
nSPHLJqxSk0tySsGbZNn/S1tf1Enn03F+J4ScEva4KG7/kVdR9e/KQqVQom+
43KfPXHd4c0Wlf2lMLPysYfj7F/0zPr2ZZnDpeDjmJjjavwXbants1myKoXg
gxIKoop/Ua5Nh9x6UinsKk1O3bX4BxXxDku/YCmDi8rSzN1Cf1DqvX82gSNl
4MP8Jt9/2x8k6v3hQ95sGQS2GRhyU/6gQ18at9ZvlEGsn/OdY+MzqLoqUbCX
rxyKXjzmf02fQdbxnvMXjcrhlzKvbIr+DMqmSVZS6eVwQYXJ6oTXNLpzm+fT
tGoFeLIkL086TKNNYYymgiMV4N++OzPaYhrZZuzHzulUQLQ/bbDq8DTyylYW
LDepgLyXgRcPME+jahlb1g2nChhVmQ1jS/+NCtqtmrTuVoCjal9Bbe0UOnJ3
/aLpYAW4FKha6r+aQlWzpzu+jVaAO38i9VPRFMqWFvx5dLICvFZ1bL4mTqHM
eKWYvf9VQDAq3N5pO4Xe0rZlP2Ciwz0Dv9CZ1Um0skNwn7YkHeqtOE7xH5xE
Q1+C0qud6PCpwZmcuZewqFHgZVc6fFYjokxwEsk8fj3G70GHFkEfNgnKJBLm
rLpw1pcO/f0/q2Wbf6HDY1rCiRF0WLqQI6Xr8Qs9eHSTsyGTDtIBhxmeTyeQ
f3ckj8dXOuC9JtLD9ydQWV7Et4TvdLDUcbSwujWBDj76JFr0gw6RW+OKaZ4T
KB1/n9TYRYfOp71WnIcm0JEns8vYGB1ivodX0JvGkbxMt7TEOh12qaZ076ke
R+SNosTvDDo8zyxkSa8YRxbNt95epWAwcKHlXGTKODr8iexctgkD1Q1xNnPb
cbSsLeH2gQuDMemP9vNzYyjB7e3+LAkMgu92x7mOjiGbw94nOyQx4P7351XP
zzH0KVXLl0MKA833fFs/vBtDnQxLzFYGgxQr98qU6DGk/s85CVPGQLoqdJTt
2hi6UVq18EIVA1wsmTP04hgKOHTRB1PD4Pf0WxcX0zHEYcXZcP8IBrpRW7ar
Cowhz/fnT2/Rw6Dr127NYo4xdJNKXunUx8DrhIqbCGMUyUe6tD86ikGGgC3a
NDKKzI5+MuU1wmCuouJiR+koSnRrq39xEoMnveZ117RGkfjhgPznNhgojiiu
/Dg4ig64OecwbDGom+SSl983inYkHV/StSfWv/gtY2zrKDreH/Gu2pGon9vI
17xnBHmXcAlddsXgLd/+wrJvIyjngKhxvBsGRiKb+9lqR1CSWca/XHcMPA80
GOKFI0jh/nBNvQcGmL6umMzVEeS/PEuv98JAx1j8dIz7COrpCeF9443BD3NK
wvD5EdTLt8CT54PBPzt8OU13BFHNDsxcvoKBepDGdxbuETTzTDa89ioGnyME
Nzkwj6C3aR67bwdgYBOzolG1NIw4jqwGG1/DIDzldYFv/zBalFvxrQkk1ld+
MHygZBjd5CrruBSCgcXL7S/VHw+jUpvbteyhxHrfzU3dTx5GVpuGYp8SZm2s
sDIOHEax0tp4fRgGac134gsuDSMdzgUV03Diefz0rKXaDyMDlisZPwgbjxyQ
qzQYRjb7tGlfIzDom2R35lEfRv5vjW7qRBL7NTuZ7iU7jDrZ078+I5y0UcCy
l2cYubPGety4joE4c4xGJOswGmBZahoj/Jz9gk/v6hCq0adp6ERh0M63py95
aAj9ekO1nyZ8QYRpx5+2IcQnYb1L/QYGS3uGjxl+IsYLa2xcJ3zrQE1Y7rsh
ZCcgwNxAWEDpyQtSxRBCK86qm6IxKFYLnzqbM4Ss15PStAhrgO3uV/eH0GQZ
j/xVwl/0Na24Y4fQ7y5HRj5hG2Ph+EshQ8gyeJ79B+E/5ms1DV5DyKSMZr1K
ONy6e0ncaQixZ1XPCN/EgMu+UjbMagi99Z/6ok44+0KaU5fhEEo4p7V2irCS
Z0C6suYQajLXCHUjXHfFqvmuwhBiUT1z+hphyyAVlt8SQ+hSPs+dKMLjETwa
BnxDSHzjj+RtwptDyv8kbybqP1jHH09YNuBYzsDaIMpYeFd0i/BJ32FLmT+D
SFH+Xn84YX/PkM2Bg4PoYghTtQ/hdDfe6vrWQeTD8em4LWEi47y31w8i5/is
BH3CQ7bH99i9HkRXhTTj9hFmOTvaUVI0iCxkLhgyE5a2DItbzhxEj/3bvvYQ
6zcx4wf9O4PoXq+eSDlhH6Nn/yVFDKIuez+tYMIpBsb5/b6DKIxtt7ou4dfa
49YHXAYR3xdm7v/tR8+RiK3XTg8i5qiBpjpivyQOvvDjPjKIDLa6M+QJH5U7
IWUrN4jU1BOj+on995D+1VO8exB5Tjyk3iL8XFRYV49lEH3xOMPyheifDsFX
i4lLAwhLDky5QHhtp1lx3+QAOv7CXXmd6D+dLTe4A74NIL3jqdX8hF1YRerr
3g8g6xc6zx4T/RtLfXON6/kA6hlM+yZGuGX590BR6gD6KsB7n4/od4exU+W9
9sT8sR+WG4nzFD044yB9agB13dds2k+4qCdm51X9AfRRZmj2ZjCRRy3vQjj3
DyB3EWMLxSAMKGHHUqMn+hHN5yu3KXF+Df1CGCJf+lHRRs3+OOJ8J16ku7yh
96PY8tX6Wn8MRE/zK/8O7EeHhJ+k7/HDgKbw67vZln4UbLHT/DmRH9F7hdWm
ZvtQuvs9gS9EvnwVNnsc1d6HSlim7g5eJvp38xvPV4/6EFVZ8/H6JSLPh2PY
hRX70Jln5cMUIq8qU/bpTVj2In4T+Xp9Iv9Yz447kjV6Uah2cYSYHdGPonmR
Art7UXbs5wsrRH7OFYnjRlM9qGyPRsPDcxhI4bvU6WE96EjmS5dKKwxSJ3co
BBZ0IyHHQn8tYyJfyltPJMd3I8y59ODQcQwO+iV5lvh0I/35Oo8wQwy+MbaV
9Gl0o5VTiTblBkS/8bDv1fnehY6GRn0b1cLAj0YW5ljpRIaTdC468T6pYcLV
9/R3oi0dH8oED2LA2RhqrVnXic4q1XJdV8Sg5NTaA6+ETuR7aFz9qBwGI26L
3G1incgv+/fjkn3E+bg3zfrweAd69OXAk0EBDOR/dc7LZbUjlvkZFUHi/Xnl
r4wUb1Q7qujI/350lQ6vFyPOb7i3o/yy0J1XlumgxSJd//lQOzLzw4trF+hw
UjzwgduPNvTmvaedwQwd/M4LHM5hb0MpwWL1w310qPxuHbYzsBU9PLXlUnQ1
HXQru9nWLZuRWLOaHm8AHcqKctU+qjcjFx53hxQ/OvBlXHZLFG1GZ3xS0rmI
/xPtiyxJx398Qwa5bq5MnnTYE2TJmbXyFVV+HW5udaRDTcQCBxh8QUOcESFC
J+iwlqDEEj3wCd0KWnzqJkEHr8LyJa7ttehG0OWEmMYKsHQRf9ISXIgYucZz
3Dsr4OPnzlgl8wIa7vjpyaNnZXBY5j1m+qCWJljgcKN5cylQ/Hl6nPibaczm
KcxyfsWwicM0wmGmncbq2Xi963UhXB9o1/HJ6aWdzk+SsmQqgIqMaNPQuUGa
tKwZcvLKg8vZTpwjlqM0co7/dqX3T8HGPV34ZsQE7WJb3cqoag7cMvNXU8qc
okX7XHmv8/4JMO1IGQtbmaG58bQ+k1d7DD+bbvyN2jZLS0keSrF+kQUWQQ4q
6bVzNMlTnNn/DaaDB/uU2Ffredo5heWWLY6pIFJcf59lcoH29EvXkagd9yHo
tY75toxFmq177YREVTJ45Xm8VJFbpiXHJYb1Pk8EDoqqg+zoCk1T3mvtmNUd
0Lt0KkU6eY32Ru9B2FDJbeB7I3xZT2KDFoSN++TdjoEkn5hE+Z8MWgr7nSdM
fjfgZPQJmayXJNit8HtepTMSpM9GWTwNIYOjYZqh4q1waB9jy062oMB2j8UF
oaRg+OowqsUtQoVT3KMc8q0BMMiUv5QiRoWp1968brUBMJ/nWs4vSYXcZy9p
Rc8CgH9qSmi3DBXc74X36d4LACffuUU5dSrElJWwdlsEwMp1RqmxFRU0L6Di
mK6rIJnLL3DrDhWaFRls7b/8Qc2gu5kjmQrOE4HhW7r9wehX5s2796kQOaFQ
ZfTZH7xlRBceZFHhj//50KEyf3j3QrI5r5gKOeTVFvcr/nCyXim67iMVlBk1
tr9J/uDsuqBxtIkK5eYGsw/n/CBg86v/mr5SiTqVhM+M+EGWyWH71jYqaB0y
Uxv56AcT7aAxNEwFE7ZpZYs7frASQPnPeZwKJ3iZTHQj/GCLYF3hr0kqvG9J
nzzs6weKtga8s7NUsK4yz9O08gM9MtvXKwtU8NFaQ8eP+cHpnMaopSUqXN2l
YG6n7gfuenHqwWtUaH+ifD5Yxg/+/3s4mOwz7n4k4gf/B9Ytj90=
"]]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->{True, False},
Frame->True,
FrameTicks->False,
Ticks->None]], "Output",
CellChangeTimes->{{3.66258169015475*^9, 3.662581733443055*^9},
3.662581997232984*^9, 3.662582031572763*^9, 3.6625827243942432`*^9,
3.662582762520871*^9, {3.662582824797799*^9, 3.662582829515286*^9}, {
3.662582882412808*^9, 3.662582903659301*^9}, {3.6625831477928553`*^9,
3.662583151957732*^9}, {3.662583253606268*^9, 3.6625832773575687`*^9}, {
3.662583437189005*^9, 3.662583466379074*^9}, 3.6625835706135263`*^9,
3.662583754243329*^9, 3.662588495223687*^9, 3.662596847434382*^9,
3.662599746768324*^9, 3.662601057212729*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "4", ",", "u", ",", "tryKm"}],
"]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "0.8"}], ",", "1.2"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{", "None", "}"}]}], ",",
RowBox[{"Filling", "\[Rule]", "Bottom"}], ",",
RowBox[{"FillingStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"GrayLevel", "[", "0.8", "]"}], "}"}]}], ",",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",",
RowBox[{"{",
RowBox[{"0", ",", "5000"}], "}"}]}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.601597"}], ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.601597"}], ",",
RowBox[{"k", "[",
RowBox[{"try\[Mu]", ",", "try\[Sigma]", ",", "4", ",",
RowBox[{"-", "0.601597"}], ",", "tryKm"}], "]"}]}], "}"}]}], "}"}],
",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Red", ",", "Thin"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0.4235", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.4235", ",",
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "4", ",", "0.4235", ",",
"tryKm"}], "]"}]}], "}"}]}], "}"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Blue", ",", "Thin"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Axes", "\[Rule]",
RowBox[{"{",
RowBox[{"False", ",", "False"}], "}"}]}], ",",
RowBox[{"Ticks", "\[Rule]", "None"}], ",",
RowBox[{"AspectRatio", "\[Rule]",
RowBox[{"100", "/", "408"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.6625990392524347`*^9, 3.6625991182736807`*^9}, {
3.662599742489361*^9, 3.662599797768262*^9}, {3.662600227309654*^9,
3.662600235495182*^9}, {3.662600636715523*^9, 3.6626006574723177`*^9}, {
3.6626007550573053`*^9, 3.6626007633197927`*^9}, {3.662600810103195*^9,
3.66260092853878*^9}, {3.6626010433922157`*^9, 3.662601043726243*^9}, {
3.662602118259652*^9, 3.6626021183551702`*^9}}],
Cell[BoxData[
GraphicsBox[{GraphicsComplexBox[CompressedData["
1:eJw1mHk81OsXx7VYK2VLlFKhLkolUpbvQ5dQCpWy1VXZZUmNK0SWNkpIy0gU
WRPzVba4p1KhbLn2bWa+M8ZQKTOKIv2eXq/fnX/mdV7n9ZxznvN5P+f5fr+r
jwXYu88VERGZN0dE5Pd/fXdxzJ07I/D8tOrE/esMJOO9UnzOYT7MnJ3cXc1k
IH//hzHO0zzogQWHt60lUbmj5OPWp0NgKRZP1NqRaJ/okYw8Ghc6nJIqWwNJ
9EP93eXgFRzI82v9ah1DomRthTWOPWzoKdPp9rxIIuO8kNLNYSwgWx5zuedI
5F+fqthrMQjxNcymeh8SGS78tvbC6z5Qdr0BFXtJtHHHxTXLpHvAqcKB+msd
jq/bFs6M7YQgiyvuh6YZ6MTj2RN+Eu1gy0lXMXzLQBOyLgTz4HtwjPDM00tk
oKoLvFHprCYYMM7ZGLufgXqe0Qy1NtYDTfb27gvSDKQraMhta3sJHj7VESp1
JSgiavWthtxnYChWvrLmfAna8PpUbtz7ElDMeOM2pluC5g89oru00qHQrdwt
oa0YWeQdM58VSyLEk+y3Sm0oRv0KRWtFJB8TSw12fve8+Bh5GJ1c6ytdSZhZ
jUtcHy1CD9ao6h+dekFUsNaFBpgUoaOLl65duaiOGOCOZGrcfYSoH5YTdhKN
xFs5I2vudCFaKHn1S395K7FQtkdF2qYQNdcbxjsb/0tki3m3m+YXIJ97lboT
Ux1E5rRSlf1kPvISHtxbl9tNFNh+io2yzEdXww0Wua/vI3LfdGhce5iHEpaP
9qxgDhDJS/T36X/NRY6TgQ9bdFlEXK24xzq7XHRPdWbp4yA2YX7pVo0kIwe1
tPsn3nlLEX3VVhJ75ucg+az5Tj4LucS392PPiRMPkcXMeS1L7yGiy/2sqFZF
NooPWLNvQTGPCAkV8/q5LBtFr2kr9B0bJmTGfoZFnstC7n95L+6xHCGyoyyV
O7sfIJeKta+1EkYJ71pw1kQPEEp7fT5+9AMhCFPI+Xn3PuqooYVcMvtE0FaO
fN/xKxOd+2ENPjFjhPRqoLn6ZyK5l2LSTszPxBhXubI9NwMNvD91SDH5C9GB
eqJSE+6hK5T3n7abx4mMSw6KvLB0VFTR/mTx4Dgxb9mZJ+8d76Le5XbNppEC
Is9RWuWJbRp6a2+yXldXSPC9DZ+a6dDRR1VP86YpPux8FGJiXMVAzz+4mT/O
H4a6zCy/lnkkkj3RtezmYR6QSv4ZfkYkiikuzTFaOgQD8pmbJI+TKDv1hvy1
Bg406JpfnAgjkcUfXw7yzlKQ+ceEZf8FEnn5vPEx12QDY1qFB7EkOp1gBvfu
McG5hfDRo5HowOhrlU1iAzBD03dodiXR1iyTtS3evfA2H/5cg/PJlz9qCWvo
gr6CickNsiSyL98VtqNHQHSKZB1VATrqDY8/oWs1AvECIU/4kIG8NFFOlwgf
Nk5EMl0EDIS8TZqn8nmQtcfkyr5NJEqPPVIg5jEEcWLNH7qcSHTW5rvjclUu
5EUsnxzE9WTmDnx+9I6CWuMX6bQ4EkW8O2nRcp4N3ivp2hF4P0YhCZeROgtO
+nhHDp8lkVtPkXJczgB45x5alHSCRBWH6FkFin3Q8t7W5ak5ie5PKX1v8O0G
lfWHqn+uINFN70Y1k0cCIr7pXTxDPA3NvjLT8MzjQ2zoQVpkEwMpFsVwY+2H
wfJ1t5KiPIm4RwKP64rz4KvI5K+kXSTy7pXIOvWGC/sV9rc74XnSMqDTIhLM
gdzGhsqlUST6WDC3epUmBdotp89H4XlkL7kq8VkbC5KKcvr1okkUpOnnWy0Y
BFn1ocXteJ5ZTg+o9rn3w2XY3BfrQCJp0dr3+mJCon22aPsUjY7eF6ic9gga
AdpNqaV+aQxUbVXs4KfNh/gt/LgtIwzU9WF8fUEbD0TUYyQ5f5BI87Puow9X
h0DcpdXYB8c7kV8447abCyG6U6aTwSRq8mg3WjJBwcnNhe9DMQ8S4aZbbxSx
YZ+eje4iXG/14uiV221ZYKS3ftXPcBLxW1ffKf42AE+Cta//44nn4+b647f9
+yD88LWDVtaYrzuti8aru6Fsyf1Vxmtw/19e+w6pAmImW0FWXTsNfRW069Fb
+dC5VFztVy0D+TUKbiidGwa10kHvZQtJFMZe+w9XB8//DDHplWYk+vbnYPah
MS5M/yVf2eRBoqrtVNCuexx45WddthbPcyWf7xIx9hTEfkq3tsD1DlQKwqNm
WeBu67LiBr4PTjkfSi2yZMLVqiv76Hi/zQK7DNGyfqiVv7txB+Zt05G4nIrP
AuJigBQ1Q6ejxHGL8vYJDjTJhEZdCiVRMJ/3wCqLAjOX6FFTzJtAmX5YyoEN
z59sjKzAPNJqNowkTjAhx3OgNPtvzMf5CO2qXRx4eduZaD5PIviwIKB6DgWr
veoj43F99Yd33/+Ww4LXaT7sh7/5KBT5+WSFkDDY1hC6eD8dNb7gTUfGjcDX
2TS7xTcZyKOH91jfjA/6M5mjUVwGWlO0u3PuMA/eEDYqqRokCsxeuWHw/hBk
Bsz5onKARE5d8/eKunFBVy6F8j2F9X6zj2MqwYH738se83E/bA5oFdJq2aCc
kG9siuuZ6ZvxeurOgqfXVtV/iyBRYaNz96uVg+Civ1HV0ptEyquYOxfT+0Dh
fElO3B4SvRvRuh071A0vHBjhbWoksvr8mRN1RUAYlVuv9zZJQ18k79WUcvkw
Til7agADLXXR/MRJGYbX8rWGP8VJ9OZBhK/xnzyYMju1yIbA5/dHvbr13CEQ
idnpI8DntdjTsHa0lAOyoqLFcriekobTxU88KGiUNd+jiOtdk9wvPCbPBjvm
Q+dNmFehcI9mTjATaPfQnk+nSZQ0Fj+oPNgPy+W1AyVcSPTiCu96KFdAJF7y
yJUsoqPYVZkSf0txoS2jkmaI9ZKyPGYVVk7Bd4dfPhTW00AY0/LRlw1buiSP
rsZ6zxTIEK8WsyB8rvGTd5iH3uLOCFdXDhTY+bC/Y/0cdl9UGFOg4KnExcHf
+i7arLesp5oFBx07pU5j/SO63YbPyAgJy0vhziLudKQv7nhzkEnBbFJh4Cyu
/2XWoRrGLTYQHuGt73C+Vwsuq2Zf4kDqnHxSLZJE0VLnjtmZUCCXgxy8cfzb
bAmxe3wWlM25RXzA86P/ku+MYiIFby4EbEzF64vMStjrEBuOVfpkm+H9rE+4
Xn/lExt2U1dDIvF658gM2Yl1QuKG/Keb6qZ0ZG3zDhISR0C01bLMKYWBjO7P
7Vtuwwdo8ZpRpRio/uqUts44D6rl7ujzsd7yv1JOdhUOAfl0rrvAHt8X/oxv
nb5cWEZdt8wMIpEO7WqZkywHntJWe6Rh3gJRJs+zmQ20ANcdDjj/CrMd14ID
WdB9yN4qAJ/fhLdTIS1bBkHT6NgNSTw/C1JHS98W98Hi26ecM21w/5McXZu/
dwM17pGojHlPjlN1ZMcKiKLe+XVXd6Uh/9To88/H+BAnWcgqrWagD2stlBru
DcN1Oa18viiJ/GI0X3rv5cEBfZHXg8YkYh0w8di5cAieCl7G/8L3ZcHssG/1
P/i8vk4QuYDnW1goGd0USIFs9NE907if5ufsdA6sYsO5rPGK3/Nx6/O602su
M8H/bEBF8hk8Xz6uP6cu6IeOL4UBHzFvUqsVxXoHBcTeiX0PZcvoKLJsD8NK
gQsJGVMaiSEk6pjMWHHjBQVShdsXP8b6ODGnpAZpbJCOTRqxxflWyOw7Ea3M
AjWdjjnO+D5rt4jR0PHiQFbohvVXMG+rp1/xxVQpuLQ5Pe8i7ucmlYL9b+tY
sFtGI6oT8/bGP9mlc4GQ+Gqp5Tt9ko7mlt/0nhyhwO3S5ZIaXP9QYuPUgwds
WLclQmsM54MHeg1nUjjw7Fy4fA7WY2/VMz0fS8znk/s2jjh+VVOEaaIQ8/xV
F5liPfMM8ls23aHAS6xB9iRe37pRXUVpNxuGXpbqROL9TBg2p2VNsmFU5+nn
C3h9tkLrxQNrhITkiFOekjUdaXqVBcRVsMFQQWRoPfZzlbb1p7lQwLvw0XoT
tk1uq9GOFVEwb7lDqRyOfyXNyqxjAQWDd8LVr2J/Zjl1/nkCG0x3bFPPwf5y
J5RosJUCBWatBw37ZXo2/PErlgLbumdEFfa79tt/DeKwwT0zXekM9suO+Ken
bBASS742mOsa0JFkSs3qlBsjsOOPZb2zSQykEbck6Jo9HwoXXDX6zGKg5bN7
D5t/40FLnYfFEsy/x6PmRe0lQ1DWSpo7Y/7bKsXfEUFccJXp/WWA+Zffq63q
qciB/F3yKcG4X+fLnGJZ/7LhUZzdmaM4v/bX7sy2Myy4rDkcXID7HWFVV9du
NAiuIvS/vTH/AtsvvnlVfSCb87xLG7+PKHh8IYTzeuDogW9fajD/Za0VKTLR
AsJtSu2Z6p40tKHvNOeNkA8hY0vlQp8xUKf4gWLD7GEgPxOZ/fOxvsKoT5H7
eeBnMblBA/O/ZW6oGJIZAkjkNsVi/tdZmyD1V/h5cfBkjTHm/y87u489ZygI
ESW0PuL+OUwsaGpUY0NqUJVeOubngIYonZXCBPvEZi8u5v+472ST5kw/uGlt
znHFz4sb/YqRVD++77eMv71VRUczc7LiSGUudL3cFr8N81/VYnIh8w0FSfMP
VyZjXvwOluY5hLNh2dmtpz1xPu1Xn2jsVSzYtusd/T7m3z6558etk/j9TqVx
2BbzL/bvcXs5dQouBh8MjsX9NE05MW7WxALZpsdJYngejlZq3hKTFBLxnJv0
0FN0xL+m9++8zxQwJhXU7+L6v4levLk8jw2U7A+l2d/Pj2Px6YO3OWATkujq
jvXYmuyUQbOhIO/HdS1bHL9xpwFT/DsLDA6LyvliPa8tsdxufI+CI0uOsA7h
9exsZlWSLRt8QIm4i/fTK3dStGSGDYLZoRuXf9/3f3m9jF0lJLbmLXW8sZeO
jAYDF83WsEHzRXa4Hva/He8wz3Oj4JXMXS01bKsF1jL9SQpY9qeDpnG8wGB+
IXsJBSalz5gJ2M/YkL5qezIbnFJLT1Ti/He3MKf+3E5BmJqbcSD2fytpTF5w
hYLCeKNledhv9mT8yDk+ni/amg/PYr/+VvHuWk0hoXjNRv+RER0deTtk+bme
DZnjJev2YL/RWo3IH8oUlO5OXX0F217UikbXnRQcM1BiuGFb+oTOllsCNtQ5
RV6P+X2+awu668UoYErLlfyury36vrq2DgXmYmRbGLb/nv8k3n2QDQYFmzv8
sT2W3nns+CYhkRzt+7pKl47++x4g8v/ff+9D/9n/A4zzeh4=
"], {{},
{GrayLevel[0.8], EdgeForm[None],
GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl02O4EAYUgOF7s20s2+aW7RvXWrjLruWWbdu2W7Va1rJtt2rL5nuffrzP
d57z+5wUwe2C2oYKCAgIJHTg94YK/D7nDNnrIX3PNHbxjI6MZTMPqEFLhrKG
G/xEeRrSm0WcIwfZyUZWspCZTGQkA+lJR1rSkJpUpCQFyUnGDyQlCYlJREIS
EJ94xCUOsYlFTGIQnWhEJQo/Uo4G9GIhZ4lMYcpSnz9YwBkiUZ0WDGE11ylE
GX6lJ/M5TUSCaM5gVnGNgrRlJBu4Q2nq0YN5nCICHRjDJu5TjUn8zROaMYiV
XKUAU9jB/7RhBOu5TSn285rx/MW//MJuntOdD8zlJOEJOZZ/5B1T+cxOntKe
L+zjFaP5yJ/coypfOcAbJvKJbTymKXt4wUBWcIX8HOQtk9nOf7RmLy8Zzjpu
UZJxbOEhdenGHE4QjnaMYiN3qcIEtvKIJgxgOZfJRyuGsZablOBnujKb44Sl
Mo3pzzIukZfi1KELszhGGCrxG/1YykXyUIzadGYmRwlNRYLpyxIukJui1KIT
MzhCyJ9XoBF9WMx5clGEmvzOdA7zDaodgUQ=
"]]]}, {}, {}}], {{}, {},
{RGBColor[1, 0, 0], Thickness[Tiny],
LineBox[{{-0.601597, 0.}, {-0.601597, 4738.077771093991}}]}}, {{}, {},
{RGBColor[0, 0, 1], Thickness[Tiny],
LineBox[{{0.4235, 0.}, {0.4235, 3156.52768538519}}]}}},
AspectRatio->NCache[
Rational[25, 102], 0.24509803921568626`],
Axes->{False, False},
AxesOrigin->{0, 0},
Method->{"AxesInFront" -> True},
PlotRange->{{-0.7999999591836735, 1.1999999591836734`}, {0, 5000}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02], Automatic},
Ticks->None]], "Output",
CellChangeTimes->{{3.662599048027356*^9, 3.662599118487307*^9}, {
3.662599759021966*^9, 3.662599798298171*^9}, 3.662600236269802*^9, {
3.662600638703472*^9, 3.6626006578231163`*^9}, 3.6626007638682947`*^9, {
3.662600814095531*^9, 3.662600826209643*^9}, {3.662600874001212*^9,
3.662600929941042*^9}, {3.662601057346292*^9, 3.662601057845495*^9},
3.662602118751725*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"k", "[",
RowBox[{"try\[Mu]", ",", "try\[Sigma]", ",",
RowBox[{"-", "4"}], ",", "u", ",", "tryKm"}], "]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "0.8"}], ",", "1.2"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{", "None", "}"}]}], ",",
RowBox[{"Filling", "\[Rule]", "Bottom"}], ",",
RowBox[{"FillingStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"GrayLevel", "[", "0.8", "]"}], "}"}]}], ",",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",",
RowBox[{"{",
RowBox[{"0", ",", "5000"}], "}"}]}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0.601597", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.601597", ",",
RowBox[{"k", "[",
RowBox[{"try\[Mu]", ",", "try\[Sigma]", ",",
RowBox[{"-", "4"}], ",", "0.601597", ",", "tryKm"}], "]"}]}],
"}"}]}], "}"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Red", ",", "Thin"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.4235"}], ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.4235"}], ",",
RowBox[{"k", "[",
RowBox[{"try\[Mu]", ",", "try\[Sigma]", ",",
RowBox[{"-", "4"}], ",",
RowBox[{"-", "0.4235"}], ",", "tryKm"}], "]"}]}], "}"}]}], "}"}],
",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Blue", ",", "Thin"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Axes", "\[Rule]",
RowBox[{"{",
RowBox[{"False", ",", "False"}], "}"}]}], ",",
RowBox[{"Ticks", "\[Rule]", "None"}], ",",
RowBox[{"AspectRatio", "\[Rule]",
RowBox[{"100", "/", "408"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.6625990392524347`*^9, 3.6625991182736807`*^9}, {
3.662599742489361*^9, 3.662599797768262*^9}, {3.662600227309654*^9,
3.662600235495182*^9}, {3.662600636715523*^9, 3.6626006574723177`*^9}, {
3.6626007550573053`*^9, 3.6626007633197927`*^9}, {3.662600810103195*^9,
3.662600914106184*^9}, {3.662601046165978*^9, 3.662601046557159*^9}, {
3.662602115332877*^9, 3.662602115419269*^9}}],
Cell[BoxData[
GraphicsBox[{GraphicsComplexBox[CompressedData["
1:eJw1mHk81N/3x/XJXmSnyJqUokRR4txCVEpEqxAqW6SyJCWElFS0UEkNZsg6
75Q1EyJJQpudec8YhlAzEqJ+t8fj951/5vF63Pu457zPeZ7Xfc9ouAc4HPtP
QEBAbJ6AwL/vhvbC6NRULiOgx/dALEFB0t6qIvMODDGsJEOlG3dmIH//rOjD
vzmMceHcglF+Bio5KFbQ8nyA4Z6l7k1JykR2Qi7p2cFsRpXG1/z8NVloRvtd
/BkVFmOB//uRsK4slLRaXvNgB5OxMv6JnsAFKjLLDnlmcL6fIefyQEVDj4b8
G+4odm7rZbwMCbcb7aQh04WTWrF1XYzyaemZxxeykf6mOE0lyQ7GO1ZDY7B+
DpoxbAvvu/yFURz89efzjznIs+CPp5/oJ8ZeTQupzKCnaELGGfqcWhkX/Ysz
5mnnovJYzrBkxnvGXCQhItuQizoqgk1X6TcwYr6dsR0OyUOGvLe0trYaRnUE
krLWykcXLmnce0urYAxP2WVlVOcjvbrTtJjWIoZwFqHs51uABAfy7ju33GfM
0Uy7n4gUom3Z7lZ/hG8Bg58yzc0vRN3y+VoCYgWgsatvsG55ETq++aSWr2QZ
hC5V5O4KKEIUTfUNrlPVUOjTsTewogi5LlLQUpV4Axrruj2q/xYhcsZmwl60
CT5a6LjnAB0tFLv+vbukBapDnX9NXKKj5gbTa4fNPsIh429xZ8voyOdRmeHE
1GeYIyxUhX7QkRffafcbWjuIy5MBTHUCXQ83kTi2oguydQKepW4jUILycIdK
Xw8IDGT+bjtOoIO/TmV9MOyHDqcgjyfnCfRIfVahIJAJllFhDZtiCfThk/+N
1EYSTvvF5IbHEEguQ/CQz0I2eD5fx1AJJdC22chVNt4DsE91c/yFQwS6FqBp
t6CQA45bbeZi1hAoSrMt13dsEEKOKP/UnqSjY27eizpsuKC/6JnVAiodOZdq
1a1KGIaDGrfdBXbQEXpQF3lteAQuEn8t134sQp9fBodc2ToKVmf2jxzfWYQu
zuxg+ESPQbRC4mu70EIkWyMseahvHLY2mpdfUCtAPa2n9ysmfYcH9atFF7/K
Q1dJb8s9Bj8g1E/wlaZdLsov/VS8qPcHaBttLKTRclCnsn3zlggeqFXfTt26
IBs1OpivMDTkQxDVia9tQEXf1E9YvZ8aYugHr68d/UNBM8Zv9BSGOuBWE6+e
YkSghba3+K+iu6FE1+nV8H4CqQkdl3HR6oNU5daNvqcJNHttQ29VWz/oFwtO
r48i0Iuw9R+1VEmocjXNvRJHIF5F2USkLwuEhhoUT1wiUL5d7daOcjY8slBt
PeBLoKH1Di9XLuQAdb3CwhHcP+HtYRcqdg9C6EmvwDo5Ap2tTjtCeTAEA92l
zsEtdOSWsM0napgLP9p1JtXD6MihxPr8pg4eXLn7Z326Gg11hl/zNNzOZYzx
ZPVz2ymIfkeyasy6A+JyoqOndQlky/YUkP3SBZ4/JksT7Ai0T2pFsFlkL7io
flTj+hHoafXHLdbR/aCc7hdmGoH1e6WfQ2+YsPNt7eod+HncbORqJJRZcKjn
sM2+aKynPZqfeLBhn/CzJaa4HoqLfSZKywegdrvJ69X2BLJx3n2c9YcDi11m
9R5rEuj3jxJBEashMCycPsJm0ZH75NfK/FQu8Pd9Dnp4k47uejctM8/jQXDV
g3Mdd2jIsjMizexKJxxJzjrbYUagpmcvOf4GPVDiO5RS4IrrN51RcLGuD+IX
3Wl1DCHQrn2pYRs0mfDt7+q4hMsEqtFxoLucJYGrX1X4HfMevcZVZ7KCBfKi
PsTTcALNZGmWSMkMQF+favYpDwKVO2yKvX+EAzs8A7KKTQn0ej31dvKjQXiL
Ar7xhAgkKVTbukGYD6JR0V6F2VTU+nTp2eOBXIak03/z79RRUILlOuGuX+1g
uW6l0m9tAvkVNQtvjuiCmbL2aO2dBPohL7ZCb20vZK8SsPnujefHmXLm2uF+
iKQ8U4m6QKBlIeKx7x4y4ePCKbNunG9KYnX2Rx4JnmVPbaPw82zabSQnbMKG
/AFa3s4gAhWIT94QSBqArj9cEb4TgYaPlR769YUDrRY10QYrCWQubnWgbPEQ
7HoxeVV3lI48c9WPWwRywTGecjToAR2V1iROM+7wIGfMlZ3TQkNq8RkDK006
IYVCybfdSKBvETqj9zq74a7IiW39hwl0+e9lN/+zfeDWzD/CP4vz/XEiL2ym
H/yq2ucHYx42t1ps3bKdhOKq1s/7MS/lQQslK5NZcKL8SSvlIoE+zfBmz3LY
wH7xtTHmBIHsLes1SCMOtNszsv23EOgYSMXTggfB7cybveclCLTWJYZaOs6D
CE6HxWY2FZWLW7/e1dYLrDO7f1YGEOjjciGp+bn9cFVvOa8Jz9faZTqewnwm
TAfIkNE4/sr/TnRZW7CgpClaaiqSQLGZyVfMbrChrWrGZdifQMEVjTa87Uzg
lzn+CsX+Z3PRTT08nYR2uYNxDrj+tlw6WstmwRbd0DUXw3A9cgXmilX48P6G
u+asHxU1VXN+R8RwGWvT0isXVmL/ULbUbf3QDsMLLDIDtQgUfnf+1Za9XWCc
1ruMbUOgqpRpgSyRXihWvaFz3ItAYznxCfnW/RBexKTcxTwyd0Y3b45jgqYa
OXQLxy82UHr4opeEtMu9NCGcHy1UxdhEkw1GhprKlcEECptfeSTzwgCEPFUq
gwO43j6jjvNqObBox4STx2o8n3cXRMkIDkEaMyOJju8PtlDdJskjXPCWVCca
HtPR9vFx1qWrPLgur+03N0pDCW7PxdSlOkEcbu77vQH72zHnU6sLsf/5WroO
HySQQ1TQRs7OPhhx+KZUfIZAN83t6h5y+sF6IGt5F/a/6azKq4QhCRup4X+D
cf2/KHnMS49ggcpLzRPXsJ8g7S41WgsbktL2xYVg/lXMEsZj1DkQ9MsszsiS
QBssraLp7oNQ9+vM8hXSBKq+yrl5js2Dkcg2A/48Grpy3TitLqcXdgpVP9uP
+2d+9tsK7Xv9YDRabCqG+z86lZ4X0sOE3x71qSdxfMusl826a1jAM644n4/z
4zefzw04xwb7u0+a7p8iEClKHJXbwIQLc+7iori+Qns7vEbjSfAzGonNxvX3
ShA1km1hgW6KqPADfH9eaD86GCTNh5SM6kOdV6noBOWW2SGCCZ0uR+mLcbzw
EZ/n34Wxv9goXuHheSjNuJR8QJIJztGrI4Tx/EbMNk5/cCGh8uGM4iq8/4xd
gfIdURK81BzHE7AW92etaTnCBDO32M19OJ+EnMGv4s9JkC4fuj+G9eGIdJkJ
HT4Evq5cI29HRTt2vWMk3OAyKidVd28vwX4vsmtzU0U79AsaH9XFfntZ7NG7
JeZdkLfIQOKVNYG0OwNH3fg9QHUep6fh+cvcM5dSZdYPu+oaNy3F/KEXjNNB
4dh/vhDfT+Dn3xpdK5/9iYQuwdhnW3H83us3bewV2cCSUDvmj/22/+8jy+Az
A8CWtQ93w3xojoo4CJdxwPa8UeKkHoECu8cUYHoQFko3Ko7x6WiZoWIW34EL
T4rXyfpl0FFSjPpB5mUevLT68enJLA1Z2FYpK892wIuJnokP6wkk2DFJD07t
hu1LgutGMN+ltaPaFOM+uPH3UpcU5m/bQE1rfnc/tBk0tcfj/h6QmtYfWUHC
D+vn0ZG4np4+kudvBrHgZM105wzmL3iTncGrOjYUTtps9PHB/rsx4Mt+BQ78
Vf317JYVfj+qd7304sAgyC02rpySwf3QUBTu7OXBukiFlEYpGhpvLoyPvNML
5T+nkp6cJNDEErf1G673g/i004MMfL6tR/eeojYmfL0WHHsEx2+b9LJR0WYB
M6n27HzMgy57vPKKPxv433dO+gVify/U9tdezYT27tD77zAfni/lJZZHkGBp
0ejYjOs/2fMsX7CeBR2ffC8tw/2p909y/rKAD6hgWqI+lYrqFzYzk2hMkJ+w
vjOL94ubKawhZ0kwrsiZMsXn+e+YSPcWxDw9+5zIwPF7j4s8EnUkIfz0B12L
f/mVDTPezzHBIP+c9FWsX8nt38zcy4T7LnMB+bjfw7LLwi2ekqBtqrpHE5+f
Kd8S56jJh23G9mViLlQUxdymK5jEhOWzmwtK8fp900ucc+YkuPc3KHvj8xIT
PURhiAlFCUMeYVhThx6+Lr5NgvUGZ4sIvF/UxClV4yUTVoufu2GI19WTEp3u
eZNQ45hwfxHWcgOBIc6yJFSwvob+mw8Zrn9ash4f4h1KklURFYklv9RIvs1l
GKfpvB4sxvfvBfu6t/R28HM1UY3VwOdb+H4Dwy6Q1fNZoYf5b5/JZ5lzeyB9
R+UjE8z/Hy1jtTcm/WDuMfCwD893wEjPa+kQJrgr+dbY/8tvdWrb4w8k2Mz7
Ku2G63EuZUdrjzQbznfNLKrH/MtelDJx9R+Atx9OnRvH/O/Tv9MiWswBNbl3
VVX62J8j3I5+5g8CJ87pgfhPOnq9HR3i7OLCaa9N6yoz6ehFS2mydBQPGn8+
zuPNz0aqNTWZSrwOUBzfc28j5v+KzOu2B4ndMCGw/KYv5t+PvVLlkl4fFGVI
7K/C71tPSmf3v/jaD9J755u6Yf7jrBQj47RIaFAko2JwvVbJso3jT7Hg0z41
NwPsjzJWYuW2r9jgJLNblMT8Py/pf4ukOTDzIbzTHL9/tomM/indOwhTEk1J
fbIE0vcrROLdPJh3cAKtV6IhyvhIhOu1XuhbkZhhhfm3G0utML/SDwJDHzoD
MP/nU2Yotu+ZwOrYvNURx09NNxeSV2dBoNMSCz3MX91YjpW8NxteUOeufML8
86JcJ/R0mHBvncqxPMxrMs/QteYcCTM7gr734fpXxsb7zL1iwbic039emP/h
Mt17wmJ86E03EjF9QkU/t3wzXENhgoZyZ8s3vL91YGSk8xcJjV+UYl3xeW+X
6i8//bcf7OXjVR7g+BIPtb9n7ibharDq6C6c37xxURmfKSaoirzziMNaeehm
DXc3E7qFxOOTcb8Xb9/a3JdJwvfW3V3/fi81uHnVXFbjw6Ttu3XRx6iIUDgW
/jiBCctaFYgsvN546pGJwkYSivKrzp3C51XVRh7qIpnQ2r7S6+y/+3BphYL9
DRJWzgg53sb7TU6eGXlZwoTPaodEdfD6njd5NENPzL9Ubf3Sf/fXkptvpyQw
/6ffq17HeoORSHutLh8yxpZr3bemohVdnd279Ukw+HQ4Pxyvq+hX/ZFtZ8L1
KMXpY1jf/Vp4YzKPCTl6Q1cXYF1gwN3pd5CEdY3XEo2xplxuOmkwn4TzanXD
17D2FXa/3WNBQtimrQNuWLsetHpBGWWCq35OQgTWA4V7tV8p4ftxy5K5f34x
lvbF3WMtH+rT1kZTTKjof/83CPz/53+/t/6n/w/QYVUQ
"], {{},
{GrayLevel[0.8], EdgeForm[None],
GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl1GV0l2UYwOFtCNtokJBmgCACgtLdXTJUWmBISUtId3eXpIQi0qGkdHdI
o5R0SDdc/7MP1/k997k/3u95I6LaRbYNCQoKCiY8OLphwdHvL7xD9ZC+ZRa7
eEoXJrOZe3xDG0axhmsUpwpNGMBizvE5ucjJZ+QgO9n4lKwUozJR9Oc3zvIJ
RalEY/qxiDNk4WtaM5LVXKUIFWlEX37lNJn5ilaMYBVXKEwFGtKHXzjFx9Tk
e4azkssU4gfGs55blOdberOQv8lEZyaxibtE0pJhrOASBenAONZxk3JMZQsP
aEAvFnCSjMxkJ0/oxD5eMpGN3KEGB3jNdELcd5s+pAUfmPfoc4byjuX8SwFi
2R/UN/xEDPN2fUR7Ypr36gvGEvig/pQblGU/r5gSWNn9pfepz26e0ZP5nCAD
M9jBYzoygQ3c5kumsZX/ac4QlvEP+WnHGP7gOmWoRw/mcZwIqtOMwSzlIvlo
y2jW8h+lqUt3fuYY6alGUwaxhAvkpRR16MZcjpKOqnzHQH7nPHkoSW26Mocj
pCUNqUlFSlLwEclJRlKS8CGJSURCEhCfeMQlDrEJJ4zQwF0DtwvcP3BTAv+E
3JSgFj8ym8O8B1IcgXc=
"]]]}, {}, {}}], {{}, {},
{RGBColor[1, 0, 0], Thickness[Tiny],
LineBox[{{0.601597, 0.}, {0.601597, 4738.077771093991}}]}}, {{}, {},
{RGBColor[0, 0, 1], Thickness[Tiny],
LineBox[{{-0.4235, 0.}, {-0.4235, 3156.52768538519}}]}}},
AspectRatio->NCache[
Rational[25, 102], 0.24509803921568626`],
Axes->{False, False},
AxesOrigin->{0, 0},
Method->{"AxesInFront" -> True},
PlotRange->{{-0.7999999591836735, 1.1999999591836734`}, {0, 5000}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02], Automatic},
Ticks->None]], "Output",
CellChangeTimes->{{3.662599048027356*^9, 3.662599118487307*^9}, {
3.662599759021966*^9, 3.662599798298171*^9}, 3.662600236269802*^9, {
3.662600638703472*^9, 3.6626006578231163`*^9}, 3.6626007638682947`*^9, {
3.662600814095531*^9, 3.662600826209643*^9}, {3.662600874001212*^9,
3.66260091459568*^9}, {3.662601057480276*^9, 3.662601057668611*^9},
3.662602116757893*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["\<\
File: 2 - 0.85 - 0 - 0.02 - 0.0015 - (-)0.60 [Asymmetric competition - two \
species]\
\>", "Subsection",
CellChangeTimes->{{3.6580707049519672`*^9, 3.658070706349422*^9}, {
3.658070744397442*^9, 3.65807075249966*^9}, {3.658076356754607*^9,
3.6580763606504917`*^9}, {3.6625774963684072`*^9, 3.662577499079831*^9}, {
3.662577751631178*^9, 3.662577790492811*^9}, {3.6625817887548027`*^9,
3.662581831458*^9}, {3.6625875336197453`*^9, 3.662587540234771*^9}, {
3.6625880760563097`*^9, 3.662588085847974*^9}}],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"trysp", "=", "2"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Sigma]\[Alpha]", "=", "0.85"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Kappa]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Nu]", "=", "0.02"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Sigma]\[Nu]", "=", "0.0015"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Beta]", "=",
RowBox[{"-", "0.6"}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"tryvm", "=", "0.0015"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Mu]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"try\[Sigma]", "=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{"tryKm", "=",
RowBox[{"Km", "[",
RowBox[{"trysp", ",", "try\[Sigma]\[Alpha]", ",", "try\[Kappa]", ",",
RowBox[{"Abs", "[", "try\[Beta]", "]"}]}], "]"}]}]}], "Input",
CellChangeTimes->{{3.658074206458665*^9, 3.65807421166369*^9}, {
3.658074801389743*^9, 3.6580749396472607`*^9}, {3.658076014352268*^9,
3.658076022888116*^9}, {3.6625777618468847`*^9, 3.6625777620482903`*^9},
3.662581847840498*^9, {3.6625875492192297`*^9, 3.662587569082633*^9}, {
3.662588177477862*^9, 3.662588190413258*^9}, {3.669320197215568*^9,
3.66932019774772*^9}, {3.669320315276444*^9, 3.66932031949286*^9}}],
Cell[BoxData["14492"], "Output",
CellChangeTimes->{{3.658074932852392*^9, 3.658074948287805*^9},
3.658075053786251*^9, 3.658075661309265*^9, 3.6580760233468857`*^9,
3.661348768081315*^9, 3.661361475265626*^9, 3.662577504446596*^9,
3.662577549352231*^9, 3.66257779171821*^9, 3.6625779283183403`*^9,
3.662580263808111*^9, 3.662580489137106*^9, 3.662580824646832*^9,
3.662581608631073*^9, 3.662581717161949*^9, 3.662581855511919*^9,
3.66258205790613*^9, {3.662583212671132*^9, 3.6625832232873907`*^9}, {
3.662583420062113*^9, 3.6625834491842527`*^9}, 3.662587569924766*^9,
3.66258760172948*^9, 3.662587755766041*^9, {3.662588180503467*^9,
3.662588193054311*^9}, 3.662594009614991*^9, 3.662597367835*^9,
3.662597918420068*^9, {3.662602248946433*^9, 3.6626022698135567`*^9},
3.662602335054459*^9, {3.662937850079673*^9, 3.662937859280376*^9},
3.663809551375402*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"data", "=",
RowBox[{"ToExpression", "[",
RowBox[{
"Import", "[", "\"\<2-0.85-0-0.02-0.0015-0.60-Burn_In.txt\>\"", "]"}],
"]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.658071226407762*^9, 3.658071244891139*^9}, {
3.658074994893792*^9, 3.6580750210197153`*^9}, {3.658075621640133*^9,
3.65807562203861*^9}, {3.658075690781049*^9, 3.65807569876371*^9}, {
3.6625777972698793`*^9, 3.662577797581771*^9}, 3.662581764924226*^9, {
3.662587638761613*^9, 3.662587644288443*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"data", "[",
RowBox[{"[", "1", "]"}], "]"}]], "Input",
CellChangeTimes->{{3.654015655270091*^9, 3.6540156561189938`*^9},
3.658075623809044*^9}],
Cell[BoxData[
InterpretationBox[
TagBox[
PanelBox[GridBox[{
{
StyleBox[
StyleBox[
DynamicBox[ToBoxes[
FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"],
StandardForm],
ImageSizeCache->{278., {2., 8.}}],
StripOnInput->False,
DynamicUpdating->True], "Panel",
StripOnInput->False,
Background->None]},
{
ItemBox[
TagBox[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.0292409`"}], ",",
RowBox[{"-", "0.0255692`"}], ",",
RowBox[{"-", "0.0224428`"}], ",",
RowBox[{"-", "0.0244468`"}], ",",
RowBox[{"-", "0.0290808`"}], ",",
RowBox[{"-", "0.031007`"}], ",",
RowBox[{"-", "0.0204964`"}], ",",
RowBox[{"-", "0.0198209`"}], ",",
RowBox[{"-", "0.0205762`"}], ",",
RowBox[{"-", "0.0205897`"}], ",",
RowBox[{"-", "0.0176772`"}], ",",
RowBox[{"-", "0.0202751`"}], ",",
RowBox[{"-", "0.0248409`"}], ",",
RowBox[{"-", "0.0264128`"}], ",",
RowBox[{"-", "0.0241352`"}], ",",
RowBox[{"-", "0.0237276`"}], ",",
RowBox[{"-", "0.0214412`"}], ",",
RowBox[{"-", "0.0208829`"}], ",",
RowBox[{"-", "0.0230075`"}], ",",
RowBox[{"-", "0.0230075`"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"\[LeftSkeleton]", "1", "\[RightSkeleton]"}], "}"}], ",",
RowBox[{"\[LeftSkeleton]", "686", "\[RightSkeleton]"}], ",",
RowBox[{"{",
RowBox[{"\[LeftSkeleton]", "1", "\[RightSkeleton]"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.0255692`"}], ",",
RowBox[{"-", "0.0255692`"}], ",",
RowBox[{"-", "0.0244468`"}], ",",
RowBox[{"-", "0.0215787`"}], ",",
RowBox[{"-", "0.0274739`"}], ",",
RowBox[{"-", "0.031007`"}], ",",
RowBox[{"-", "0.0205619`"}], ",",
RowBox[{"-", "0.0158404`"}], ",",
RowBox[{"\[LeftSkeleton]", "4", "\[RightSkeleton]"}], ",",
RowBox[{"-", "0.0248409`"}], ",",
RowBox[{"-", "0.022999`"}], ",",
RowBox[{"-", "0.0237276`"}], ",",
RowBox[{"-", "0.0237276`"}], ",",
RowBox[{"-", "0.0222401`"}], ",",
RowBox[{"-", "0.0208829`"}], ",",
RowBox[{"-", "0.020218`"}], ",",
RowBox[{"-", "0.0225675`"}]}], "}"}]}], "}"}],
Short[#, 5]& ],
Background->GrayLevel[1],
BaseStyle->{Deployed -> False},
Frame->True,
FrameStyle->GrayLevel[0, 0.2],
StripOnInput->False]},
{
RowBox[{
ButtonBox[
StyleBox[
StyleBox[
DynamicBox[ToBoxes[
FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"],
StandardForm],
ImageSizeCache->{49., {1., 8.}}],
StripOnInput->False,
DynamicUpdating->True], "Panel",
StripOnInput->False,
Background->None],
Appearance->Automatic,
ButtonFunction:>OutputSizeLimit`ButtonFunction[
Identity, 265, 24010936893988619183, 5/2],
Enabled->True,
Evaluator->Automatic,
Method->"Queued"], "\[ThinSpace]",
ButtonBox[
StyleBox[
StyleBox[
DynamicBox[ToBoxes[
FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"],
StandardForm],
ImageSizeCache->{52., {1., 8.}}],
StripOnInput->False,
DynamicUpdating->True], "Panel",
StripOnInput->False,
Background->None],
Appearance->Automatic,
ButtonFunction:>OutputSizeLimit`ButtonFunction[
Identity, 265, 24010936893988619183, 5 2],
Enabled->True,
Evaluator->Automatic,
Method->"Queued"], "\[ThinSpace]",
ButtonBox[
StyleBox[
StyleBox[
DynamicBox[ToBoxes[
FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"],
StandardForm],
ImageSizeCache->{82., {2., 8.}}],
StripOnInput->False,
DynamicUpdating->True], "Panel",
StripOnInput->False,
Background->None],
Appearance->Automatic,
ButtonFunction:>OutputSizeLimit`ButtonFunction[
Identity, 265, 24010936893988619183, Infinity],
Enabled->True,
Evaluator->Automatic,
Method->"Queued"], "\[ThinSpace]",
ButtonBox[
StyleBox[
StyleBox[
DynamicBox[ToBoxes[
FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"],
StandardForm],
ImageSizeCache->{74., {1., 8.}}],
StripOnInput->False,
DynamicUpdating->True], "Panel",
StripOnInput->False,
Background->None],
Appearance->Automatic,
ButtonFunction:>FrontEndExecute[{
FrontEnd`SetOptions[
FrontEnd`$FrontEnd,
FrontEnd`PreferencesSettings -> {"Page" -> "Evaluation"}],
FrontEnd`FrontEndToken["PreferencesDialog"]}],
Evaluator->None,
Method->"Preemptive"]}]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxDividers->{
"Columns" -> {{False}}, "ColumnsIndexed" -> {}, "Rows" -> {{False}},
"RowsIndexed" -> {}},
GridBoxItemSize->{
"Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.5599999999999999]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[1.2]},
Offset[0.2]}, "RowsIndexed" -> {}}],
DefaultBaseStyle->{},
FrameMargins->5],
Deploy,
DefaultBaseStyle->"Deploy"],
Out[265]]], "Output",
CellChangeTimes->{
3.654015656661993*^9, 3.658071247971476*^9, 3.658075055070158*^9,
3.658075702597713*^9, 3.6613487750821867`*^9, 3.6613614757456408`*^9,
3.662577553367422*^9, 3.662577801465736*^9, 3.662577928876912*^9,
3.6625802674214478`*^9, 3.6625804911533203`*^9, 3.662580825047888*^9,
3.6625816090321903`*^9, 3.6625817175734*^9, 3.662581856066216*^9,
3.662582058466477*^9, 3.662583223855639*^9, {3.662583420665516*^9,
3.66258344974146*^9}, 3.662587573423421*^9, 3.662587647082446*^9,
3.662587756109866*^9, {3.662588180851025*^9, 3.6625881933858147`*^9},
3.66259400989645*^9, 3.662597368119196*^9, 3.6625979187142878`*^9,
3.6626023353438873`*^9, {3.6629378503661222`*^9, 3.662937859575903*^9},
3.663809551661057*^9}]
}, Open ]],
Cell["\<\
The case where \[Beta] = -0.6 starts from the same burn-in population as \
\[Beta] = 0.6, but where the traits are effectively reversed in sign:\
\>", "Text",
CellChangeTimes->{{3.662597937109107*^9, 3.6625979813793697`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"genotypes1", "=",
RowBox[{"-",
RowBox[{"Round", "[",
RowBox[{
RowBox[{"Total", "[",
RowBox[{"Transpose", "[",
RowBox[{"data", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], ",", "0.001"}],
"]"}]}]}], ";"}], "\[IndentingNewLine]",
RowBox[{"Length", "[", "%", "]"}], "\[IndentingNewLine]",
RowBox[{"Mean", "[", "%%", "]"}]}], "Input",
CellChangeTimes->{{3.6540156291055717`*^9, 3.654015637852762*^9}, {
3.6540156904355803`*^9, 3.6540156946030903`*^9}, {3.654015764153283*^9,
3.65401580327742*^9}, {3.658071257922381*^9, 3.6580712642191257`*^9},
3.658075625809054*^9, {3.661348776598023*^9, 3.6613487797015142`*^9}, {
3.66136146018661*^9, 3.661361467487602*^9}, {3.66136149867896*^9,
3.6613615017026176`*^9}, 3.6625978936076517`*^9}],
Cell[BoxData["690"], "Output",
CellChangeTimes->{
3.6613487809482737`*^9, {3.661361475780387*^9, 3.6613615021844683`*^9},
3.662577556169673*^9, 3.662577804020043*^9, 3.662577928918355*^9,
3.662580269093361*^9, 3.6625804924903507`*^9, 3.662580825081121*^9,
3.6625816090646267`*^9, 3.662581717611493*^9, 3.6625818560961437`*^9,
3.662582058522499*^9, {3.662583217354154*^9, 3.6625832239212227`*^9}, {
3.66258342069779*^9, 3.662583449768002*^9}, 3.6625875740095663`*^9,
3.6625876480532827`*^9, 3.662587756149529*^9, {3.662588180886785*^9,
3.662588193421608*^9}, 3.6625940099311934`*^9, 3.662597368151773*^9,
3.66259791877122*^9, 3.6626023353885317`*^9, {3.662937850397276*^9,
3.662937859614756*^9}, 3.663809551692402*^9}],
Cell[BoxData["0.45598405797101477`"], "Output",
CellChangeTimes->{
3.6613487809482737`*^9, {3.661361475780387*^9, 3.6613615021844683`*^9},
3.662577556169673*^9, 3.662577804020043*^9, 3.662577928918355*^9,
3.662580269093361*^9, 3.6625804924903507`*^9, 3.662580825081121*^9,
3.6625816090646267`*^9, 3.662581717611493*^9, 3.6625818560961437`*^9,
3.662582058522499*^9, {3.662583217354154*^9, 3.6625832239212227`*^9}, {
3.66258342069779*^9, 3.662583449768002*^9}, 3.6625875740095663`*^9,
3.6625876480532827`*^9, 3.662587756149529*^9, {3.662588180886785*^9,
3.662588193421608*^9}, 3.6625940099311934`*^9, 3.662597368151773*^9,
3.66259791877122*^9, 3.6626023353885317`*^9, {3.662937850397276*^9,
3.662937859614756*^9}, 3.6638095516942873`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"genotypes2", "=",
RowBox[{"-",
RowBox[{"Round", "[",
RowBox[{
RowBox[{"Total", "[",
RowBox[{"Transpose", "[",
RowBox[{"data", "[",
RowBox[{"[", "2", "]"}], "]"}], "]"}], "]"}], ",", "0.001"}],
"]"}]}]}], ";"}], "\[IndentingNewLine]",
RowBox[{"Length", "[", "%", "]"}], "\[IndentingNewLine]",
RowBox[{"Mean", "[", "%%", "]"}]}], "Input",
CellChangeTimes->{{3.6540156415511837`*^9, 3.6540156416354847`*^9}, {
3.65401570555127*^9, 3.65401570695448*^9}, {3.65401581302857*^9,
3.654015817812921*^9}, {3.65807560260693*^9, 3.6580756265451508`*^9}, {
3.6613487833977833`*^9, 3.6613487835337753`*^9}, {3.6613614832638283`*^9,
3.661361496326339*^9}, 3.662597895863595*^9}],
Cell[BoxData["4409"], "Output",
CellChangeTimes->{
3.6613487839827213`*^9, {3.661361483816585*^9, 3.6613614969501343`*^9},
3.6625775578543053`*^9, 3.662577804903142*^9, 3.6625779289520607`*^9,
3.662580269758013*^9, 3.6625804932205276`*^9, 3.662580825114416*^9,
3.662581609098485*^9, 3.6625817176611633`*^9, 3.662581856131297*^9,
3.662582058572379*^9, {3.66258321793729*^9, 3.662583223988018*^9}, {
3.66258342073068*^9, 3.662583449800529*^9}, 3.6625875764587173`*^9,
3.66258764931915*^9, 3.662587756183793*^9, {3.6625881809202137`*^9,
3.662588193454442*^9}, 3.662594009963949*^9, 3.662597368185349*^9,
3.662597918836988*^9, 3.662602335438715*^9, {3.66293785042939*^9,
3.662937859647161*^9}, 3.663809551725013*^9}],
Cell[BoxData[
RowBox[{"-", "0.6718078929462423`"}]], "Output",
CellChangeTimes->{
3.6613487839827213`*^9, {3.661361483816585*^9, 3.6613614969501343`*^9},
3.6625775578543053`*^9, 3.662577804903142*^9, 3.6625779289520607`*^9,
3.662580269758013*^9, 3.6625804932205276`*^9, 3.662580825114416*^9,
3.662581609098485*^9, 3.6625817176611633`*^9, 3.662581856131297*^9,
3.662582058572379*^9, {3.66258321793729*^9, 3.662583223988018*^9}, {
3.66258342073068*^9, 3.662583449800529*^9}, 3.6625875764587173`*^9,
3.66258764931915*^9, 3.662587756183793*^9, {3.6625881809202137`*^9,
3.662588193454442*^9}, 3.662594009963949*^9, 3.662597368185349*^9,
3.662597918836988*^9, 3.662602335438715*^9, {3.66293785042939*^9,
3.662937859647161*^9}, 3.663809551726509*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"totalsize", "=",
RowBox[{
RowBox[{"Length", "[", "genotypes1", "]"}], "+",
RowBox[{"Length", "[", "genotypes2", "]"}]}]}]], "Input",
CellChangeTimes->{{3.658076784459578*^9, 3.658076805699773*^9}}],
Cell[BoxData["5099"], "Output",
CellChangeTimes->{{3.6580767952988997`*^9, 3.658076806295833*^9},
3.6625778063358727`*^9, 3.662577928985957*^9, 3.662580271543414*^9,
3.662580494904459*^9, 3.6625808251465397`*^9, 3.662581609131298*^9,
3.662581717711721*^9, 3.6625818561625137`*^9, 3.6625820586208897`*^9,
3.662583224086988*^9, {3.662583420763647*^9, 3.66258344983388*^9},
3.662587650368868*^9, 3.66258775621602*^9, {3.6625881809538727`*^9,
3.662588193488202*^9}, 3.6625940099990587`*^9, 3.662597368217799*^9,
3.6625979189033823`*^9, 3.662602335488984*^9, {3.662937850463475*^9,
3.6629378596814947`*^9}, 3.663809551759358*^9}]
}, Open ]],
Cell["\<\
The following shows the competitive impact felt by an individual of phenotype \
u exerted by all of the individuals of species 1 (red) or species 2 (blue):\
\>", "Text",
CellChangeTimes->{{3.658075190925829*^9, 3.6580752068114223`*^9}, {
3.658075541506732*^9, 3.6580755784304743`*^9}, {3.658076166027096*^9,
3.6580761819691687`*^9}, {3.658076486638575*^9, 3.65807648742222*^9}, {
3.662587704021105*^9, 3.6625877056046457`*^9}, {3.662587950455853*^9,
3.6625879596227837`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"competitionplot", "=",
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"Sum", "[",
RowBox[{
RowBox[{"a", "[",
RowBox[{"u", ",",
RowBox[{"genotypes1", "[",
RowBox[{"[", "i", "]"}], "]"}], ",", "try\[Sigma]\[Alpha]", ",",
"try\[Beta]"}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "genotypes1", "]"}]}], "}"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2.5"}], ",", "2.5"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Blue", ",", "Dotted"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"Sum", "[",
RowBox[{
RowBox[{"a", "[",
RowBox[{"u", ",",
RowBox[{"genotypes2", "[",
RowBox[{"[", "i", "]"}], "]"}], ",", "try\[Sigma]\[Alpha]", ",",
"try\[Beta]"}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "genotypes2", "]"}]}], "}"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2.5"}], ",", "2.5"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Red", ",", "Dotted"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "2.5"}], ",", "2.5"}], "}"}], ",", "Automatic"}],
"}"}]}], ",",
RowBox[{"AxesOrigin", "\[Rule]",
RowBox[{"{",
RowBox[{"0", ",", "0"}], "}"}]}]}], "\[IndentingNewLine]",
"]"}]}]], "Input",
CellChangeTimes->{{3.65401717055512*^9, 3.654017187280355*^9}, {
3.654017344576412*^9, 3.654017359511397*^9}, {3.65401927528238*^9,
3.654019279074164*^9}, {3.6580749961162663`*^9, 3.658075010600336*^9}, {
3.65807618793108*^9, 3.658076188490995*^9}, {3.658076231516355*^9,
3.6580762327478237`*^9}, {3.662578424430344*^9, 3.662578429869256*^9}, {
3.6625805332605762`*^9, 3.6625805414913797`*^9}, {3.662581602724835*^9,
3.662581605530455*^9}, {3.662581992245171*^9, 3.662582007124544*^9},
3.6625876775895863`*^9, {3.6625879334203587`*^9, 3.662587940361785*^9}, {
3.662588067883778*^9, 3.6625880692748327`*^9}, {3.662588103713826*^9,
3.662588106017372*^9}, {3.662597897241036*^9, 3.66259789846564*^9}, {
3.662937842099617*^9, 3.662937846980784*^9}, {3.669320198998447*^9,
3.669320199581155*^9}}],
Cell[BoxData[
GraphicsBox[{{{}, {},
{RGBColor[0, 0, 1], Dashing[{0, Small}], LineBox[CompressedData["
1:eJwt13k0VP//B3CMkuhTSokoREkkWyX0eomiUiklScm+JGuNUamUZeZmLSmK
dtmlxdJiFNFH1oqUkGQdZu7M2MIn3/s75/fHPXMe587c93nd9/P1unNVXPz3
u4uJiIh0U8f/fYb17RbMzNDK28U/u62Ut8Pes0tG26Zp5T43AmcilOxwz4LO
8eI/tPK168Tb+lTsUNko4D9/Ia1cP/27XaGmHb4jrs752Usrl1LS8rM1scM5
674uL6+jlbOOz778xckOk04d33XxFq1cY8wptu6xHeaIBj8U2UgrD/aXlSky
PoSz3C315I+KlXeG5BB34u1xUet73/uJouX7o4zzK3sP4/6KVNc1NSLlp7J1
9jTtO4Jneaa+Cd0z7GLTIb2kaUcsCUn1Kdj7l+34ZZ67TN4x3HP1oPLflGm2
d/Qa71sHj6Nl2ps9VkOT7NRii6pjns6YUR3aEnzkD3tKLYIzFuaCxyKSFjdk
jrOXdtMqD3xwxfPHaflSi8bYgpwFe+0U3FFEewXbPHKEbbLJ1fNuhAd+v5IS
ndMsYJdM/kw8auCFinO9ska28tn01t/+hTxvPGGoOatNkceu7axNfSjqi64b
OzIrKjjs0/KcjGozP9RkbJ7xe9jPNqf5Hjq6IwDvtdtWhpr1sDUO7InNzA3E
vvDFJpZLf7FzZF+747JgfHldY1u/XTu7zjDqrvunU7h+4NuITloLe0VwkcSz
AjpavGyT/M+ukT0xVrdQN4WBAVkFEzKLKtgDoSurYjrOoJ3HynufzmWxr9Wk
v/ysHYbVtd8IfdtMmFXD1e9Nu4Cbtd8+tblRAUFKriarNoWjGH3xDzf5RnCh
7zZnpF5CCWmbcBduC2TtLI6sUo/Ayz9bzIMetEPE4CMtmexIfHIryua8oAuC
HATikhLR6H/fbcFvux5oOB3bp+7MxLjQlNtxrj2gfzXiXqs7E/Nt6jWMAnrg
n9Nlx5g+TOT+3WgWx+qBnK+zmzqCmeh7RCpo0+se8GNbynlGMdFH9unnGJVe
iF2/c0tXNhM9omaSDYd6gXtmU54jn4lRRw1W/pzohZbkALXHo0zMMPAuIGb1
QbmK3gLuHyb2/PpU3bm8D6Y0n+sHirHQDTImWPv6wKzuiY71Iha6TFg7dBT1
Qcw+Q419Biw85pOqFB3eDznq778xglk49U2ynh/bD1d3Km7fEMLCmztCzzum
9oP5YpUq3hkWNmnYd+o+6wf5knC+3SUWWvQtvvfjdz8Ev7JijiawcI1bopqe
1QD88b1sG5DHwpGjzLXt/wxCxfqpdrNuFibUjbdZLhsEdZ8vh870slDb1DPm
6epB+Kw/52T+AAs9FLcPR+MgPAuyPCJJsvDbd1qBXtAgMGzcf7OmWVh26IIe
s3kQKi133HkqSyBrH91I/zYHWFf/brhiRuDVWk3f3CwOpJN3Od4WBN627ExX
L+bA34UpY1stCXxiaiW+9BMHfJk0kd/WBLauUWiYlhiCJI2w012HCNQQK3Or
Ch6CqeovGVW+BOqFBd2A8CEIvP9u2sqfQJOJVTUlcUPQPG/05PtAAm248To5
WUOw6PihpFw6gSHfnSfjO4fA5MtEov5FAquezko4vGsYOP/uClC5SmCj9st3
n+yHQfGFH8c8icDvmX6juzyGgTU4tvt4MoHc9K8OW8KHwfue9ZuoVAKXXMlS
X1k8DOYcZyHrPoHurrtfDalyoeKn307PQgL9OkS57uu5ICWzom/VMwIZh4uU
O025cLZwE/x8TmDM3hVRTfZceJJRK4clBD435tsUxXHB5N+Dq5+XESgue733
wiQX1jywrThRQ+BC7vl/FkrwYOWNPLGCjwSqfPDa8HARD+yLT+QP1RK45ZxJ
1ActHszJ+2pxqIHA0N/d6jJOPHh0wsJ84DOBzLK63Q9O8GCtjsermS8EJt8s
Pm3I4EGRjnrSghZqfesr7w8n8uAkV8FFpZWq97me+/0KHvTI1O2aaSPwvzjF
WINGHjxpin/Y/4NAae/ZL6p+8GCbfK9tbTuBa5S+i3NGeXDqcH3hpU5qf6ec
k7eIkiB6V+/YwZ8EPui3y46WICFlQYOjaheBT9/hJ3lZEkxPP7DO+UVgaYFh
r4sCCRO1vcae3QSW39aczFGmfr88NFTpN4ENdFnVLdokzPYk2xg9BA5p9ge6
bCehzCpyFaePwBG59sgcaxIiur0DQvsJnBL/lDKyn4TSNDUxsQEC53a+ehvl
RMLrLO9J0UECZWqfNDe4kxBdk+sUSnlp6aOBpb4kmORsnMuhvPpavEwOgwT9
S71abzgErrsYoT5ynoS8jP8eKA0RuOFkqJFpJAmnOFuPMSibOvjtjrpCgpLB
1iN1lC0sXZ0bEkkwKo5LVRwm0NrA/vTSmySsFatY5kHZVmU3yzmdhMnxix1Z
lB3+2ZqW/ZAE6ebAX32UXaY2FAqzSWBpb1+tzCXQu3/te5NCqj7yRe5+ygHN
yt8ii0mQ8roYdIEy493i4fo3JHgZ+TIyKF8omCu6tJIEHU/LsmrKUbdnZJ1r
SEiy6TPvphzHGtHIbiQh8amG5B/K1+kDJsIWErwzefMkedT+uXbYmLSTEJiz
ev8iyg9tPrtFdpMQmVTRLEc5x/QDo36AhKjUNzeXUH6q+SZGjiShy1bu1nzK
L+We3j0+RsKlF99+iFF+K/74edY0CW8WLT5GUut94N/6IBDjw1yVruWtlBs7
En4YS/KBxXVc8ZLy14+RZMR8PnQM5jslU07akrbt4BI+vFEbX+FNeX/h81R1
JT5YkNnLDSkvUKvlja7kg1XyUsdJ6v7VJ3dbVGnywZR5s7WEcozkVEqyLh/+
OMUmBVDeeW4hz2MTH3J/uCaoUK5yNkuR2M6HMsatHf7U/kV8sed+tebDw+o5
c6Qpb7UMMM+05UP54oA596k8lGndGbZy5sOrw8+bSqm8nLtTtFXeiw+1rtxb
xpQ3L6y/MeBHXT/hR3YRlb+i8Wkz4hwfzBz+ptyk8nnKR/aGw2Wq3vTOszNU
fvXa1w5pEnyQ29P4yIly/juH5I83+NCenNUs1Uugr2EQ51Y6dX52QvshKv+a
mSz0fcQH7chw3TSqPzJiSwaln/Hhqhzv7SKqf9xEGqG9lA/SJSUi26j+Ug3u
S8or54PaGY0Ef6r/0u2XwJ56PswPE8t4QvVr8spT1+IH+KDlKPr5F9XvB5Kv
9DuRfFh3Vu51x3dq/kg+MF0/zgeVF90iX75R+eE29TWKC6D0wM8H2V+pfJXq
mCxUFsBw78GwOdS8sdCyTPy1SgBp2pWBDU0Eit051vtUWwAaFz0b4hsJPB8R
m2BrLAA12Yq66ToC6Xs5v5PsBKD1RX4e8wOBBu/ENrsfFUCcrVG4QjWBAgOF
eEM3AZhZ+vtlvKfmq8IOo5ZAAfR4vn2d/Y5Aj56MWLlYAQSmMDzdXxN48KzL
htQKAYQLZ0k8yqfqS5OdPf6vAN4UFbnwcglsYVc12zYKYEuTtI5BDoF24mtP
z2sXAGP4smreYwLtY4XPLo4JgCch/dzxLtWfdyJ0PdcIwdjC4erzBAJT324Q
rdQRQqRD4vzHcQS2dfc3Km8Qwk67jyuTYgh01Ngd8H2rEALd3yw7xiTwaOHi
gt2OQliwaXVS4QUCj1dkaBnEC6HAYPv8wycJvNtjP51wXQhxM2Nbx3wI7JKQ
qh2+JYSFLkab47yoeWDtf+JxphD2F7pcyHcl0LV5Y7bCOyHMN5xf+uQwVX/f
h9Wio0LYeH3u/TLq+eorxVGtdxgB1UgTZTk5AjmhL8WlnEdAfWOQqir1fPbp
Z/Vaeo5AtUJ6uIYMgZ7vNbLfBo9AZyDDbbUUtd4FD90XMSMwLnpGkfuXhYeF
XXC7bASG9fPc7vewcHtbq6OP6ijE3dRMYBewcEVOVfLswVGQ2qJffXcjCw/c
KSmtIUdB62XY0h36LCSuZf+IGx8F3dyzssPrqP8fZ+NU5WaNQcXabBWNVSys
sbbLX608BsMBk2onZFlI5/a8t7IbA2Pl+JA1JBPrdGeNEu/GYGzBrMHch0w8
W2JuO//WOKy4qRc7I8bEgAzfog06f+DVplYv7eIolBbb6LKuZxLSRroqxQwi
cdvJA9c1r01D6V2vPbl5l6l5r+S/Te0vRDPSFYUWl/BqEDNx/dcZeBasqebx
8SLuj9qrnVYkglaGMdGuU+dR80jEwYdhohhyOerIQPI5bOmVvH/toBgqmMvN
u77+DNa79JgtXEHDtREaRVxVBnaJP564rkpDl5KSaE0FBo5keBXIr6IhPKtu
9pZhoDyHo6iiTcPXJqW/BTMh6BYsGNcxpuF05sTLde0hOHl5Jm/3IRrq50fn
Wt8MwVWP5BVY8TT89FiOoSgTgkaWbY3S16jvb/98qmpOCFoP3I5OSKbhZnmV
lmCREAzUVh69kUbDG69UKlp5dHz9YlVjRg4NBS9MdT7W03F/lX5UZTUNo7yu
JeyLpaO716iJ1Ucahv15FKAbSUfG3GLhx3oaTgwzH8uG0TFtz2bnz800LHDX
WtLjS8f+FjT51U1DOd3c9jxrOk4yxITufTS0MZI6kmlBx3nLKrMGBmnYwJpa
nWFCRz0nSzk+n4b06M7cHC06bhOVrD81SsPbnyZcnqnR0f5BTcTEBA2HHnPd
yhTp6LMtxvjcNA2dypoKa2Xp+P/vh7hzqtCqQ5qO/wPtgg4m
"]]}}, {{}, {},
{RGBColor[1, 0, 0], Dashing[{0, Small}], LineBox[CompressedData["
1:eJwt13k0Ff//B3BcJFRIQvlkS6WkrAmfeUlCfC6ltCiyZKvIvitrRK5L9i1r
SLZ7R5K8rz1ZIpJCKUuWyE4S3/md8/tjzpzHOTPvmTPv5+v1fo+YheP5myxM
TEwjxPF/Z78f/81vbpIYVmSj8dDZaBjzEVjqXycx1sPZfk0vRgOZ5+vKi98k
xuUTuuHGv6NBVOXuX8cFEoN8UNnnCAsV6h7GcAyNkRjCw2k2UzupwHH04z+M
dhIjK1f4D65MhceuN/Tup5AYPQe4vwXep8IzZpccJmUSo3bqlaHE7hhgu6kt
J3SdhVH0w+DWOfdY2NnXeDuLysz4pXx9NObrYzhfn2x56C0Tg2a0YJVtFQ8+
v9RvRw9vIprkRS9VpUSo9Ei2LzHYQM0vJRbVBJKBHHNRdCNpHaVpTS/FX0wF
7bTXZJ2fa6jo6PbXym/SIa/Zq9fF5DeKtv5zpDDvCZgGP971Ln8F7W7eX3T1
YBb43yAVc+1cRnTKmk0gPRuYZPYhzZBFJPoqN8bkWi58jkh68OzDPPqT+Kr4
leFT2MtpW7B4ag4FigrxNugUwC1Fabb+vb+QabBIxG/KM7BU/pJfXz+Fpq2P
zV2bfA7Snic3HXLGUZTAlb7FXaWQOWjU4KUxiky9OQ9tNSiDHwG71LQFv6NE
R09Ne9tyqIo7qDVuPIgYW2Jpr/xpwGHyw5JZbRB9+ssqRgukgbFoXqCw2CBS
ONvd+zSUBvOFEgz9qQHU/9CUMzyKBocY/6iW3RtAIhyyQtLpNEic5D/und+P
fvO/FRiupoEbxizCvfYJjbOVVvKt0qCOlaG6/+snpGLfNlX4hwY8b/2v/tvw
CV2ePvAV26RB0YX1hLtRn5BUcP+SGTsdRuxW+D6If0JnzTQdPPnpcP7xNEe6
Xh+yFx8fZz9Gh2MTnxZl03rRzlHmy35WdHCdlTm0O7gX/Xv0tLejDR0qVwKu
b9j3otC/ppdM7emgwS7d1HaiF1UymSvK3SXGk/BOsOv5gArujxwo96GD23Xh
k9lcH5DIpQ8HeWLoUNV19Z6Adzeqx7MPy1bTYaOvmPb3RjcyrTcqLK+hw6kh
lvER7W6U/CgvUK6WDq0zhYa0Xd3IfuGNwoEmOgxw/REzLHuPPmbVGYy8o8Om
VkpD+HgXGvijN1f4nQ6nq/q3/jXuRGFcxCPZcCguzFVpVu1EW/R/a0RuwUEw
xdGOKtqJlPZMv6jeikPvCnuMXs875NFdG7ljOw77fYx50tY60COPjBBfARzq
Apa4QbsdSehLSjhJ4RBvEX67h6cdmYbf2bxyEAc7TZE2289tSKlm56a6NA48
bFoR1DttyMam/PqKDA5mYY+3Dse2ov4rymRZRRzWo+TZQ4daUHu/dm3ZKRw6
HZtvChe2oIMm/ml6p3HINjRpLHZpQbjumOuQFg5n+YKCP7K3oCJZKe4/Ojgk
xb1nOSTzBil0j6YtkHG47W5t8Xq5GbW4rPLfNMQBLq3VnmM0I2bePLeucziM
C4oHeBs1o7aKh1PJF3BQSnXabPVqQh3sPE6zV3Dg9GMzu6HZhN7y3Fg/YYLD
4PWkmkXuJvRV29Xc9xoOwftq/USeNKLBkZCyBVMcurN41h2aGlB5gYxyjiUO
dwtKVnl31iM5medmXLdxOLbdIejUUB06ETGWMkt4zvnIdpfndQiXUTrddQcH
Z7UCiR7tOsQrE9cT7IiD27sscrxvLSrXZO6lOxPvp2D+qUm3Fhnmulxwc8Fh
OXGf1YpALZrRf6R03BUHD4tUr8tlDGS4fUYsxQ2HhcnDuoptCHULKPoqe+Lg
Ss83jbdGSOpy2MZ7wst++11XmBAK6osYtPPCYZVnX8ZLxRo0tpRYHO6Ng9fn
FLpw52t0Qf5IBp8PDmvZgm997F+jqpXAiXjC60p8S+oZ1SjiTGcY1RcHPyYK
Z4ZKNepyvT+wxQ+HjRYuUaaeV0jWxeaBF2Hm62x6dRyvUKoLZYjsj0OgVOAN
iewqxHy96lE5YdbZDbdg9SrUPvaLwnsPB/ag1SdnnF+iZB0qtZbwA323iqfc
L9HRwN3RfPdx4BCYb+V4WokspQa/mRIO/+rwzU6jEm1P8A/NI8xZMLX8tv8F
yjFM95sgHOFsy33E/QUSHx1pOhCAA7faqNgjnhcoiInZwpxwFJuF8kxhBdK3
e0qOJ7zj3Rd9A60KpMIUG9lEODrRxKL0K47iaoP3zBPms+jz4PXGkcEbzT+C
gTjEHr74yJkfR626aYdVCfMvdWV1F9PRWopV0WXCcTXkSgVdOuKSc/FzIiwQ
1toeN0xDghn56SGEE87pDC/70ZBi3OSOOMKCexpXLwnSEPMPya4MwkkjGttf
lpcjsVDd77mEhYtrJIT/K0esoYaaTwmneqiq+PwoQ/OCJxazCYtoVJIHAsoQ
imFdSiGczqlopb63DA3aMLQohPf1lHmlV5SiRWnfMT/CT9KOUjYNS9FVKvmj
DWHNDmPd2t4SZO1wQfA/wmfMDV2DuEoQa0VpgQxhnUXdDC0oRhpekRFbCZ99
oPl2i9tztGdSoGaI+D76wupLLQVFKPxiiAaNMPm5kmjkl2co9sBOgQDC5+CY
HnnnMxQ9zqx2lrCxtUTme98ClPFFyq+DmK+HTi5hMXg+smH7vPGQ8Gvfesfz
M09RKInBrElYMtby3/dmeUjEOjYyl8jH5XTa/pjEXITpnNllSDiigLTtfFcO
OrZWIbpM5GseZfd3ncpGj4KTaxUIS7Uu1FF9spDUi81L7UQ+r/RqFp6jZ6IL
t7e4mBNm/Bz27Nr/BPFSRFV8iXz/I69zJIs3GZmzZu7yJeojRHd8TSwoEcl7
CH+bJernp1lYS+ZiPGpz4lIyJ1wV+cY682Msku46cE+BqLfnbdRTGqoR6E2A
bnYuUZ8+v7u+wj9hqKbi0rtlon51pfj8gDkEzXLzR2gSbt2UdLwX5Ye4zYXx
d0T9zyYmWc0lnUfykZLT5UR/8GV53HjmhArW5nS6dMgBh6PJls38SmbYl65c
Tk7CRvJ91aEartjb9WvhBkS/cbK+NdHwOBT7GLG7PdcWhyyVw/qNZeGYnWKi
bakNDj3cU8WNHZEYLe50ToU1kacriictg6mY8cJvpgorHJiY8E3LmgRsa++0
8/0bRB4n+I+P6Cdhndtr5GzNcJDrdrWw6k/GFmAxVY/oh1Z5Co1Wq2mYUSuv
OxvRL62krjbKCWVhv3wLLLQu4dDc9umhvFE+ZqgR77yij4Ot5+dmk8MFWP3l
tSpfPaK+JftZg0mFmGKyPPtfXSJfPgP+PbRnmGFmw/OZMzi0Hfrq7MZfgqUK
HL0XD8T9ms7P+yfLMe39rLJrcjicSJpv/WVMwxgpK/Rjx4nxfjlPkuppGNng
uKWFLA4FyS4HjqTQsVO85adeHMZhcs4101evAjtu89n4gCSxfjzxiBMpeolt
S+GUleDHQW15hXZcsArTG2Z4buMj+oe+53ut4Cpsr6epwMIOYn5XPHc4XHuF
CQezXCnlwmGG7B1ew/0aOz7KYbDAgkOlf01NiRID+26ck582S4eTMrXlhgn1
mBhvrlvyGzoo9vTG17TUY8YHHxaIE+v5MZ+f3kfW6zF/csn+p/V0kGrZrclh
3oB5eamy5BL7gZ03HbqRdCPmIJOc5kqnw8/UPYtHa5qw4+7UuZsZdMjgdlfc
NtqCFWl0auc504HFfdeAlVAnZsJTjRvsoMPVG4XvKxU6sdRbIddfcdGh/CzW
wm3YidXfDUuQ4KCDxT67CnpoJ6atU9k9wUSHujfV0ayLnRgrNYjYadMgaI+V
Vk5HF+ZYUnvJs4cGrLXlxcNB3ZiHgLWTWzwNtnAbBljM9GKjjJqbXHzE9UO9
ms7Zg9id8qHOpcUyKE0JNfSf/4bR1Wx+1vSVgmOWFc+I8Si2ztIm165aAqb2
ySIPAsYxUx2h/NnlIgg/564inzqFibOF/DjZVQis/HFj99ZmsEoXpriQ1Hz4
2BoyG7xjDhv2pIzUl+bBRR8LpeT6eUz8n769WQ05cJtrSrzj6iImyTI73bsv
G/Y9a4pnn1zCZB7yqkXmZYJPpabRjpQVrNklpipL7gnczbtdoST7G3vPnjup
PpsG3CzKFkdH1zD9fxf/5D9IAa07F+KkY9exvW7VX/itk0DwpYijluQGdrrd
+LF+UgLEOIdRj33cxPLzNrT7e+LgfKiBTFoFE+wuD9RRN34M0ibBF3P8mKHt
MFk6likWese2ZsVeZAFxN+5OxxIqdFiMavDtI0G3evoHXmo0fGN9uhonToLm
gfBH+pHRsJhnWyIkRYKx2gnp8AfRIDQ1tVdMhgRRE3Z8HP7RYOUyvyKrSoKI
VXWfvbeiYS1o8/l/l0gQJHv6Z7pWNEjlCgmHU0iwMJGuzbFKARXt/k7uWBLc
FdzIXZihgP5E6oPoeBIMeCokfB+lgJOM6FJCGgkSis0Ot3ZToBqX6sx7RoKe
uw5TTSUUON8kH9rQTIIbu+SMbGwpcNN2SU2nlQQv5d13RZhRwJPzxUJrBwnE
PfoMyo0pkEY+ad79gQTUIWspLi0KjPeC2vdhEjhajB0ZE6PAmifLws0fJKgb
NgzcL0SBbXsaCiYmSWCh0HHKlocCcmbau+fmSCB9K2JjZSMKtJi3drgukSDT
PWb59HIUXM5+G7y6SgK11JNGcdNRYK8Vqeq7ToIR3wm+iZEo+P//RVigsCnA
QBT8D8MNHgM=
"]]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-2.5, 2.5}, Automatic},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{{3.65401717310271*^9, 3.654017187829471*^9},
3.654017373231942*^9, {3.6540192724811373`*^9, 3.654019295101372*^9}, {
3.658076192083295*^9, 3.658076207327387*^9}, 3.658076247547501*^9,
3.6625776031328707`*^9, 3.6625778241482553`*^9, 3.662577944294787*^9,
3.662578391828827*^9, 3.662578446612812*^9, 3.6625805574766693`*^9,
3.662580840309733*^9, 3.66258162442422*^9, 3.6625818707149887`*^9,
3.662582072670968*^9, 3.662583238967751*^9, {3.662583435200075*^9,
3.662583464417943*^9}, {3.6625876706874638`*^9, 3.6625876887332163`*^9},
3.6625877657034407`*^9, {3.662588106650714*^9, 3.662588117118709*^9}, {
3.662588182585125*^9, 3.662588203294806*^9}, 3.662594017674755*^9,
3.662597375883601*^9, 3.662597926304946*^9, 3.662602343443261*^9, {
3.662937857129837*^9, 3.6629378675886097`*^9}, 3.6638095593264523`*^9}]
}, Open ]],
Cell["\<\
The following sums the competitive impact felt by an individual of phenotype \
u exerted by all individuals (grey)\
\>", "Text",
CellChangeTimes->{{3.658075190925829*^9, 3.6580752068114223`*^9}, {
3.658075541506732*^9, 3.6580755784304743`*^9}, {3.658076166027096*^9,
3.6580761819691687`*^9}, {3.658076486638575*^9, 3.65807648742222*^9}, {
3.662587704021105*^9, 3.6625877056046457`*^9}, {3.6625879709321117`*^9,
3.662587974315638*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[",
RowBox[{"%", ",", "\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"Sum", "[",
RowBox[{
RowBox[{"a", "[",
RowBox[{"u", ",",
RowBox[{"genotypes1", "[",
RowBox[{"[", "i", "]"}], "]"}], ",", "try\[Sigma]\[Alpha]", ",",
"try\[Beta]"}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "genotypes1", "]"}]}], "}"}]}], "]"}], "+",
RowBox[{"Sum", "[",
RowBox[{
RowBox[{"a", "[",
RowBox[{"u", ",",
RowBox[{"genotypes2", "[",
RowBox[{"[", "i", "]"}], "]"}], ",", "try\[Sigma]\[Alpha]", ",",
"try\[Beta]"}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "genotypes2", "]"}]}], "}"}]}], "]"}]}],
")"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2.5"}], ",", "2.5"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Black", ",", "Thin", ",", "Dotted"}], "}"}]}]}], "]"}]}],
"\[IndentingNewLine]", "]"}]], "Input",
CellChangeTimes->{{3.662587681889565*^9, 3.662587694319735*^9}, {
3.66258792777945*^9, 3.662587928809368*^9}, {3.6625880950572844`*^9,
3.662588096681275*^9}, {3.662597900864519*^9, 3.662597902000256*^9}, {
3.662937855272274*^9, 3.66293785612724*^9}, {3.66932020021391*^9,
3.669320200964714*^9}}],
Cell[BoxData[
GraphicsBox[{{{{}, {},
{RGBColor[0, 0, 1], Dashing[{0, Small}], LineBox[CompressedData["
1:eJwt13k0VP//B3CMkuhTSokoREkkWyX0eomiUiklScm+JGuNUamUZeZmLSmK
dtmlxdJiFNFH1oqUkGQdZu7M2MIn3/s75/fHPXMe587c93nd9/P1unNVXPz3
u4uJiIh0U8f/fYb17RbMzNDK28U/u62Ut8Pes0tG26Zp5T43AmcilOxwz4LO
8eI/tPK168Tb+lTsUNko4D9/Ia1cP/27XaGmHb4jrs752Usrl1LS8rM1scM5
674uL6+jlbOOz778xckOk04d33XxFq1cY8wptu6xHeaIBj8U2UgrD/aXlSky
PoSz3C315I+KlXeG5BB34u1xUet73/uJouX7o4zzK3sP4/6KVNc1NSLlp7J1
9jTtO4Jneaa+Cd0z7GLTIb2kaUcsCUn1Kdj7l+34ZZ67TN4x3HP1oPLflGm2
d/Qa71sHj6Nl2ps9VkOT7NRii6pjns6YUR3aEnzkD3tKLYIzFuaCxyKSFjdk
jrOXdtMqD3xwxfPHaflSi8bYgpwFe+0U3FFEewXbPHKEbbLJ1fNuhAd+v5IS
ndMsYJdM/kw8auCFinO9ska28tn01t/+hTxvPGGoOatNkceu7axNfSjqi64b
OzIrKjjs0/KcjGozP9RkbJ7xe9jPNqf5Hjq6IwDvtdtWhpr1sDUO7InNzA3E
vvDFJpZLf7FzZF+747JgfHldY1u/XTu7zjDqrvunU7h+4NuITloLe0VwkcSz
AjpavGyT/M+ukT0xVrdQN4WBAVkFEzKLKtgDoSurYjrOoJ3HynufzmWxr9Wk
v/ysHYbVtd8IfdtMmFXD1e9Nu4Cbtd8+tblRAUFKriarNoWjGH3xDzf5RnCh
7zZnpF5CCWmbcBduC2TtLI6sUo/Ayz9bzIMetEPE4CMtmexIfHIryua8oAuC
HATikhLR6H/fbcFvux5oOB3bp+7MxLjQlNtxrj2gfzXiXqs7E/Nt6jWMAnrg
n9Nlx5g+TOT+3WgWx+qBnK+zmzqCmeh7RCpo0+se8GNbynlGMdFH9unnGJVe
iF2/c0tXNhM9omaSDYd6gXtmU54jn4lRRw1W/pzohZbkALXHo0zMMPAuIGb1
QbmK3gLuHyb2/PpU3bm8D6Y0n+sHirHQDTImWPv6wKzuiY71Iha6TFg7dBT1
Qcw+Q419Biw85pOqFB3eDznq778xglk49U2ynh/bD1d3Km7fEMLCmztCzzum
9oP5YpUq3hkWNmnYd+o+6wf5knC+3SUWWvQtvvfjdz8Ev7JijiawcI1bopqe
1QD88b1sG5DHwpGjzLXt/wxCxfqpdrNuFibUjbdZLhsEdZ8vh870slDb1DPm
6epB+Kw/52T+AAs9FLcPR+MgPAuyPCJJsvDbd1qBXtAgMGzcf7OmWVh26IIe
s3kQKi133HkqSyBrH91I/zYHWFf/brhiRuDVWk3f3CwOpJN3Od4WBN627ExX
L+bA34UpY1stCXxiaiW+9BMHfJk0kd/WBLauUWiYlhiCJI2w012HCNQQK3Or
Ch6CqeovGVW+BOqFBd2A8CEIvP9u2sqfQJOJVTUlcUPQPG/05PtAAm248To5
WUOw6PihpFw6gSHfnSfjO4fA5MtEov5FAquezko4vGsYOP/uClC5SmCj9st3
n+yHQfGFH8c8icDvmX6juzyGgTU4tvt4MoHc9K8OW8KHwfue9ZuoVAKXXMlS
X1k8DOYcZyHrPoHurrtfDalyoeKn307PQgL9OkS57uu5ICWzom/VMwIZh4uU
O025cLZwE/x8TmDM3hVRTfZceJJRK4clBD435tsUxXHB5N+Dq5+XESgue733
wiQX1jywrThRQ+BC7vl/FkrwYOWNPLGCjwSqfPDa8HARD+yLT+QP1RK45ZxJ
1ActHszJ+2pxqIHA0N/d6jJOPHh0wsJ84DOBzLK63Q9O8GCtjsermS8EJt8s
Pm3I4EGRjnrSghZqfesr7w8n8uAkV8FFpZWq97me+/0KHvTI1O2aaSPwvzjF
WINGHjxpin/Y/4NAae/ZL6p+8GCbfK9tbTuBa5S+i3NGeXDqcH3hpU5qf6ec
k7eIkiB6V+/YwZ8EPui3y46WICFlQYOjaheBT9/hJ3lZEkxPP7DO+UVgaYFh
r4sCCRO1vcae3QSW39aczFGmfr88NFTpN4ENdFnVLdokzPYk2xg9BA5p9ge6
bCehzCpyFaePwBG59sgcaxIiur0DQvsJnBL/lDKyn4TSNDUxsQEC53a+ehvl
RMLrLO9J0UECZWqfNDe4kxBdk+sUSnlp6aOBpb4kmORsnMuhvPpavEwOgwT9
S71abzgErrsYoT5ynoS8jP8eKA0RuOFkqJFpJAmnOFuPMSibOvjtjrpCgpLB
1iN1lC0sXZ0bEkkwKo5LVRwm0NrA/vTSmySsFatY5kHZVmU3yzmdhMnxix1Z
lB3+2ZqW/ZAE6ebAX32UXaY2FAqzSWBpb1+tzCXQu3/te5NCqj7yRe5+ygHN
yt8ii0mQ8roYdIEy493i4fo3JHgZ+TIyKF8omCu6tJIEHU/LsmrKUbdnZJ1r
SEiy6TPvphzHGtHIbiQh8amG5B/K1+kDJsIWErwzefMkedT+uXbYmLSTEJiz
ev8iyg9tPrtFdpMQmVTRLEc5x/QDo36AhKjUNzeXUH6q+SZGjiShy1bu1nzK
L+We3j0+RsKlF99+iFF+K/74edY0CW8WLT5GUut94N/6IBDjw1yVruWtlBs7
En4YS/KBxXVc8ZLy14+RZMR8PnQM5jslU07akrbt4BI+vFEbX+FNeX/h81R1
JT5YkNnLDSkvUKvlja7kg1XyUsdJ6v7VJ3dbVGnywZR5s7WEcozkVEqyLh/+
OMUmBVDeeW4hz2MTH3J/uCaoUK5yNkuR2M6HMsatHf7U/kV8sed+tebDw+o5
c6Qpb7UMMM+05UP54oA596k8lGndGbZy5sOrw8+bSqm8nLtTtFXeiw+1rtxb
xpQ3L6y/MeBHXT/hR3YRlb+i8Wkz4hwfzBz+ptyk8nnKR/aGw2Wq3vTOszNU
fvXa1w5pEnyQ29P4yIly/juH5I83+NCenNUs1Uugr2EQ51Y6dX52QvshKv+a
mSz0fcQH7chw3TSqPzJiSwaln/Hhqhzv7SKqf9xEGqG9lA/SJSUi26j+Ug3u
S8or54PaGY0Ef6r/0u2XwJ56PswPE8t4QvVr8spT1+IH+KDlKPr5F9XvB5Kv
9DuRfFh3Vu51x3dq/kg+MF0/zgeVF90iX75R+eE29TWKC6D0wM8H2V+pfJXq
mCxUFsBw78GwOdS8sdCyTPy1SgBp2pWBDU0Eit051vtUWwAaFz0b4hsJPB8R
m2BrLAA12Yq66ToC6Xs5v5PsBKD1RX4e8wOBBu/ENrsfFUCcrVG4QjWBAgOF
eEM3AZhZ+vtlvKfmq8IOo5ZAAfR4vn2d/Y5Aj56MWLlYAQSmMDzdXxN48KzL
htQKAYQLZ0k8yqfqS5OdPf6vAN4UFbnwcglsYVc12zYKYEuTtI5BDoF24mtP
z2sXAGP4smreYwLtY4XPLo4JgCch/dzxLtWfdyJ0PdcIwdjC4erzBAJT324Q
rdQRQqRD4vzHcQS2dfc3Km8Qwk67jyuTYgh01Ngd8H2rEALd3yw7xiTwaOHi
gt2OQliwaXVS4QUCj1dkaBnEC6HAYPv8wycJvNtjP51wXQhxM2Nbx3wI7JKQ
qh2+JYSFLkab47yoeWDtf+JxphD2F7pcyHcl0LV5Y7bCOyHMN5xf+uQwVX/f
h9Wio0LYeH3u/TLq+eorxVGtdxgB1UgTZTk5AjmhL8WlnEdAfWOQqir1fPbp
Z/Vaeo5AtUJ6uIYMgZ7vNbLfBo9AZyDDbbUUtd4FD90XMSMwLnpGkfuXhYeF
XXC7bASG9fPc7vewcHtbq6OP6ijE3dRMYBewcEVOVfLswVGQ2qJffXcjCw/c
KSmtIUdB62XY0h36LCSuZf+IGx8F3dyzssPrqP8fZ+NU5WaNQcXabBWNVSys
sbbLX608BsMBk2onZFlI5/a8t7IbA2Pl+JA1JBPrdGeNEu/GYGzBrMHch0w8
W2JuO//WOKy4qRc7I8bEgAzfog06f+DVplYv7eIolBbb6LKuZxLSRroqxQwi
cdvJA9c1r01D6V2vPbl5l6l5r+S/Te0vRDPSFYUWl/BqEDNx/dcZeBasqebx
8SLuj9qrnVYkglaGMdGuU+dR80jEwYdhohhyOerIQPI5bOmVvH/toBgqmMvN
u77+DNa79JgtXEHDtREaRVxVBnaJP564rkpDl5KSaE0FBo5keBXIr6IhPKtu
9pZhoDyHo6iiTcPXJqW/BTMh6BYsGNcxpuF05sTLde0hOHl5Jm/3IRrq50fn
Wt8MwVWP5BVY8TT89FiOoSgTgkaWbY3S16jvb/98qmpOCFoP3I5OSKbhZnmV
lmCREAzUVh69kUbDG69UKlp5dHz9YlVjRg4NBS9MdT7W03F/lX5UZTUNo7yu
JeyLpaO716iJ1Ucahv15FKAbSUfG3GLhx3oaTgwzH8uG0TFtz2bnz800LHDX
WtLjS8f+FjT51U1DOd3c9jxrOk4yxITufTS0MZI6kmlBx3nLKrMGBmnYwJpa
nWFCRz0nSzk+n4b06M7cHC06bhOVrD81SsPbnyZcnqnR0f5BTcTEBA2HHnPd
yhTp6LMtxvjcNA2dypoKa2Xp+P/vh7hzqtCqQ5qO/wPtgg4m
"]]}}, {{}, {},
{RGBColor[1, 0, 0], Dashing[{0, Small}], LineBox[CompressedData["
1:eJwt13k0Ff//B3BcJFRIQvlkS6WkrAmfeUlCfC6ltCiyZKvIvitrRK5L9i1r
SLZ7R5K8rz1ZIpJCKUuWyE4S3/md8/tjzpzHOTPvmTPv5+v1fo+YheP5myxM
TEwjxPF/Z78f/81vbpIYVmSj8dDZaBjzEVjqXycx1sPZfk0vRgOZ5+vKi98k
xuUTuuHGv6NBVOXuX8cFEoN8UNnnCAsV6h7GcAyNkRjCw2k2UzupwHH04z+M
dhIjK1f4D65MhceuN/Tup5AYPQe4vwXep8IzZpccJmUSo3bqlaHE7hhgu6kt
J3SdhVH0w+DWOfdY2NnXeDuLysz4pXx9NObrYzhfn2x56C0Tg2a0YJVtFQ8+
v9RvRw9vIprkRS9VpUSo9Ei2LzHYQM0vJRbVBJKBHHNRdCNpHaVpTS/FX0wF
7bTXZJ2fa6jo6PbXym/SIa/Zq9fF5DeKtv5zpDDvCZgGP971Ln8F7W7eX3T1
YBb43yAVc+1cRnTKmk0gPRuYZPYhzZBFJPoqN8bkWi58jkh68OzDPPqT+Kr4
leFT2MtpW7B4ag4FigrxNugUwC1Fabb+vb+QabBIxG/KM7BU/pJfXz+Fpq2P
zV2bfA7Snic3HXLGUZTAlb7FXaWQOWjU4KUxiky9OQ9tNSiDHwG71LQFv6NE
R09Ne9tyqIo7qDVuPIgYW2Jpr/xpwGHyw5JZbRB9+ssqRgukgbFoXqCw2CBS
ONvd+zSUBvOFEgz9qQHU/9CUMzyKBocY/6iW3RtAIhyyQtLpNEic5D/und+P
fvO/FRiupoEbxizCvfYJjbOVVvKt0qCOlaG6/+snpGLfNlX4hwY8b/2v/tvw
CV2ePvAV26RB0YX1hLtRn5BUcP+SGTsdRuxW+D6If0JnzTQdPPnpcP7xNEe6
Xh+yFx8fZz9Gh2MTnxZl03rRzlHmy35WdHCdlTm0O7gX/Xv0tLejDR0qVwKu
b9j3otC/ppdM7emgwS7d1HaiF1UymSvK3SXGk/BOsOv5gArujxwo96GD23Xh
k9lcH5DIpQ8HeWLoUNV19Z6Adzeqx7MPy1bTYaOvmPb3RjcyrTcqLK+hw6kh
lvER7W6U/CgvUK6WDq0zhYa0Xd3IfuGNwoEmOgxw/REzLHuPPmbVGYy8o8Om
VkpD+HgXGvijN1f4nQ6nq/q3/jXuRGFcxCPZcCguzFVpVu1EW/R/a0RuwUEw
xdGOKtqJlPZMv6jeikPvCnuMXs875NFdG7ljOw77fYx50tY60COPjBBfARzq
Apa4QbsdSehLSjhJ4RBvEX67h6cdmYbf2bxyEAc7TZE2289tSKlm56a6NA48
bFoR1DttyMam/PqKDA5mYY+3Dse2ov4rymRZRRzWo+TZQ4daUHu/dm3ZKRw6
HZtvChe2oIMm/ml6p3HINjRpLHZpQbjumOuQFg5n+YKCP7K3oCJZKe4/Ojgk
xb1nOSTzBil0j6YtkHG47W5t8Xq5GbW4rPLfNMQBLq3VnmM0I2bePLeucziM
C4oHeBs1o7aKh1PJF3BQSnXabPVqQh3sPE6zV3Dg9GMzu6HZhN7y3Fg/YYLD
4PWkmkXuJvRV29Xc9xoOwftq/USeNKLBkZCyBVMcurN41h2aGlB5gYxyjiUO
dwtKVnl31iM5medmXLdxOLbdIejUUB06ETGWMkt4zvnIdpfndQiXUTrddQcH
Z7UCiR7tOsQrE9cT7IiD27sscrxvLSrXZO6lOxPvp2D+qUm3Fhnmulxwc8Fh
OXGf1YpALZrRf6R03BUHD4tUr8tlDGS4fUYsxQ2HhcnDuoptCHULKPoqe+Lg
Ss83jbdGSOpy2MZ7wst++11XmBAK6osYtPPCYZVnX8ZLxRo0tpRYHO6Ng9fn
FLpw52t0Qf5IBp8PDmvZgm997F+jqpXAiXjC60p8S+oZ1SjiTGcY1RcHPyYK
Z4ZKNepyvT+wxQ+HjRYuUaaeV0jWxeaBF2Hm62x6dRyvUKoLZYjsj0OgVOAN
iewqxHy96lE5YdbZDbdg9SrUPvaLwnsPB/ag1SdnnF+iZB0qtZbwA323iqfc
L9HRwN3RfPdx4BCYb+V4WokspQa/mRIO/+rwzU6jEm1P8A/NI8xZMLX8tv8F
yjFM95sgHOFsy33E/QUSHx1pOhCAA7faqNgjnhcoiInZwpxwFJuF8kxhBdK3
e0qOJ7zj3Rd9A60KpMIUG9lEODrRxKL0K47iaoP3zBPms+jz4PXGkcEbzT+C
gTjEHr74yJkfR626aYdVCfMvdWV1F9PRWopV0WXCcTXkSgVdOuKSc/FzIiwQ
1toeN0xDghn56SGEE87pDC/70ZBi3OSOOMKCexpXLwnSEPMPya4MwkkjGttf
lpcjsVDd77mEhYtrJIT/K0esoYaaTwmneqiq+PwoQ/OCJxazCYtoVJIHAsoQ
imFdSiGczqlopb63DA3aMLQohPf1lHmlV5SiRWnfMT/CT9KOUjYNS9FVKvmj
DWHNDmPd2t4SZO1wQfA/wmfMDV2DuEoQa0VpgQxhnUXdDC0oRhpekRFbCZ99
oPl2i9tztGdSoGaI+D76wupLLQVFKPxiiAaNMPm5kmjkl2co9sBOgQDC5+CY
HnnnMxQ9zqx2lrCxtUTme98ClPFFyq+DmK+HTi5hMXg+smH7vPGQ8Gvfesfz
M09RKInBrElYMtby3/dmeUjEOjYyl8jH5XTa/pjEXITpnNllSDiigLTtfFcO
OrZWIbpM5GseZfd3ncpGj4KTaxUIS7Uu1FF9spDUi81L7UQ+r/RqFp6jZ6IL
t7e4mBNm/Bz27Nr/BPFSRFV8iXz/I69zJIs3GZmzZu7yJeojRHd8TSwoEcl7
CH+bJernp1lYS+ZiPGpz4lIyJ1wV+cY682Msku46cE+BqLfnbdRTGqoR6E2A
bnYuUZ8+v7u+wj9hqKbi0rtlon51pfj8gDkEzXLzR2gSbt2UdLwX5Ye4zYXx
d0T9zyYmWc0lnUfykZLT5UR/8GV53HjmhArW5nS6dMgBh6PJls38SmbYl65c
Tk7CRvJ91aEartjb9WvhBkS/cbK+NdHwOBT7GLG7PdcWhyyVw/qNZeGYnWKi
bakNDj3cU8WNHZEYLe50ToU1kacriictg6mY8cJvpgorHJiY8E3LmgRsa++0
8/0bRB4n+I+P6Cdhndtr5GzNcJDrdrWw6k/GFmAxVY/oh1Z5Co1Wq2mYUSuv
OxvRL62krjbKCWVhv3wLLLQu4dDc9umhvFE+ZqgR77yij4Ot5+dmk8MFWP3l
tSpfPaK+JftZg0mFmGKyPPtfXSJfPgP+PbRnmGFmw/OZMzi0Hfrq7MZfgqUK
HL0XD8T9ms7P+yfLMe39rLJrcjicSJpv/WVMwxgpK/Rjx4nxfjlPkuppGNng
uKWFLA4FyS4HjqTQsVO85adeHMZhcs4101evAjtu89n4gCSxfjzxiBMpeolt
S+GUleDHQW15hXZcsArTG2Z4buMj+oe+53ut4Cpsr6epwMIOYn5XPHc4XHuF
CQezXCnlwmGG7B1ew/0aOz7KYbDAgkOlf01NiRID+26ck582S4eTMrXlhgn1
mBhvrlvyGzoo9vTG17TUY8YHHxaIE+v5MZ+f3kfW6zF/csn+p/V0kGrZrclh
3oB5eamy5BL7gZ03HbqRdCPmIJOc5kqnw8/UPYtHa5qw4+7UuZsZdMjgdlfc
NtqCFWl0auc504HFfdeAlVAnZsJTjRvsoMPVG4XvKxU6sdRbIddfcdGh/CzW
wm3YidXfDUuQ4KCDxT67CnpoJ6atU9k9wUSHujfV0ayLnRgrNYjYadMgaI+V
Vk5HF+ZYUnvJs4cGrLXlxcNB3ZiHgLWTWzwNtnAbBljM9GKjjJqbXHzE9UO9
ms7Zg9id8qHOpcUyKE0JNfSf/4bR1Wx+1vSVgmOWFc+I8Si2ztIm165aAqb2
ySIPAsYxUx2h/NnlIgg/564inzqFibOF/DjZVQis/HFj99ZmsEoXpriQ1Hz4
2BoyG7xjDhv2pIzUl+bBRR8LpeT6eUz8n769WQ05cJtrSrzj6iImyTI73bsv
G/Y9a4pnn1zCZB7yqkXmZYJPpabRjpQVrNklpipL7gnczbtdoST7G3vPnjup
PpsG3CzKFkdH1zD9fxf/5D9IAa07F+KkY9exvW7VX/itk0DwpYijluQGdrrd
+LF+UgLEOIdRj33cxPLzNrT7e+LgfKiBTFoFE+wuD9RRN34M0ibBF3P8mKHt
MFk6likWese2ZsVeZAFxN+5OxxIqdFiMavDtI0G3evoHXmo0fGN9uhonToLm
gfBH+pHRsJhnWyIkRYKx2gnp8AfRIDQ1tVdMhgRRE3Z8HP7RYOUyvyKrSoKI
VXWfvbeiYS1o8/l/l0gQJHv6Z7pWNEjlCgmHU0iwMJGuzbFKARXt/k7uWBLc
FdzIXZihgP5E6oPoeBIMeCokfB+lgJOM6FJCGgkSis0Ot3ZToBqX6sx7RoKe
uw5TTSUUON8kH9rQTIIbu+SMbGwpcNN2SU2nlQQv5d13RZhRwJPzxUJrBwnE
PfoMyo0pkEY+ad79gQTUIWspLi0KjPeC2vdhEjhajB0ZE6PAmifLws0fJKgb
NgzcL0SBbXsaCiYmSWCh0HHKlocCcmbau+fmSCB9K2JjZSMKtJi3drgukSDT
PWb59HIUXM5+G7y6SgK11JNGcdNRYK8Vqeq7ToIR3wm+iZEo+P//RVigsCnA
QBT8D8MNHgM=
"]]}}}, {{}, {},
{GrayLevel[0], Thickness[Tiny], Dashing[{0, Small}],
LineBox[CompressedData["
1:eJwt13k4FW0bAHAcvEIhlS1E0W5JlK255ZVEEkWRpeOolNdOSipRCV9vlnOy
Z1+zOzMUnpM1a8dakqVS2VJElizffNf1/THXc/3+mOee65l7mZGjupk7cXFw
cIyT1//WgG8nZ9bWKKyS28kyEuaR8NV/y1z/MoXllbZ8pMEyEkyFh+aJRQpL
23+R18cmErZpuq+4/aKwVDvTn7ylRUJNaCTf8FcKayL9blLR9UjgU3orw2qj
sPIEjPVLEyMh2tvB+G48haWx81PF2ngk5HF6pXMcorDKD7QVD4ZGAY+T4QEJ
Wy7WnmdLjsZr0SD6rt4lNYKTdeYnqKwFMMC8Ns5xdzMHy9q09wZLIgb8f+i6
PPm8hh6PBlVy88ZB+fW4q4WnVtH6p978GzgTwDTy7LbV2GUU6rvR8YRDEhgm
Vpken1xCbOpEc8TNZMhsvNHrZbOIhrNL4x+1p4BdcPTmN9nz6DjPpYUhWhrc
dqAUCIj+Rl5xE607eTOAY78s0r8/i9KnpGIz6jLhfVjsw7yeGZSZ3feQszsb
tvJfyZk9Oo3WuYrtQt9y4Zr6Hp7+rT+QjXlzt6hZPjgeGsyurZ1AweLPrt1o
L4Q9flprrumjqKb3TX6oZDGkDFjU3dD7gpLth4q7nEvgW+BmHUPxT+izSreR
TFwpvKDvMhi1HEDS1+LXf2opAz6bb46cOgNo1Oo+rzG7DCy3Zd6TlBtALi2p
PsXdZTCTu51lMvEBue4Kz/AdKIPdLBnt4jsfkJd1Qc/HqTKIGd+kejO7H91d
HKw7JMIEH4xTWnCpD32VkXKus2BCDTdLW2GoD3E8OrbaZcUE4ebb1kfq+pDG
UZOgYRsmPD+z/NT9cR/ilr9g8tORCSPO8xt75PvQt+nNl8e9mGAe/Z0vyfgd
Cjbx3GUQxQSVsb5Z5cReZGASEOL3hgneP/fvFgvuRS2QnT/UyYTy+UDb1au9
yDg6sFy/lwl6vHsaWg/3IvvwHE+uAXK/7TefOnf3IH5eJTnrcfJ5bSW10gR6
0AGbC8Vu3Di86LC+s+VmF2rJ8nCX0cBh9V1B6YpDFwrdymO/VROHo8NcoyOG
XajouEbXFh0cWqZyzUo3dyFbfKce51EcPgj8kTMr7kSvKqdG8k7isGYQX/do
tANd0uz8fJaGw98v+tetWLLRwviE0vhjHApyMzQbtdmo4VyhZG4EDuLxbs4R
29hI5Px8uFM0Dr3zvJHG3W9Q6eu5hfZYHBT8LYUTl9rR6xK++GvpONQEzgmC
YRsqLt0Q0FSOA4P6yKVbuA0VsHd4wEscnPWlW6+8b0UMo3dVJVU4CPMYhEX8
04pGjVwsH9XgYB8Sve5zVAtaM5vVWm3BYfmxGu+D4Sbk5O8Tzz2IA9ut0Uky
twmlpet/VR7GIc3Mpr7AqwmxGz9ctPyEw4mNQcFveZsQrcX2U/RXHGLpnVy7
979GHtMRzW+ncNBI8FhrudGAVtcqbb1WceAP4LF30G9AIQ5ipWYcBAzYxlbP
CjagtVw+8d1cBATLvgqQTq5Hgwcs17XwENCVKrzs2lCHsmoIqy5BAtxzChdE
RGtRB01o36wEASobXIOODtcgmmyF72UpAqY9923wyq9BX6Z8L/RuJcBTJ2d7
t2ENCqzPm82UJcDnTaop49YrRAikaYoqEKBx8GJfg9Er5FbgesRRkYDfMbK0
+S2v0JTFh56CnQRcpybcOFfMQpeoHeWH9xDwa3yvkXorQtNf3qiLKRPgXZZt
x7iE0MZmFVxfhbw/QMF7ngMh+1DVmmuqBCwIyz6rUK9G/bNrNwrUCFjW2Din
+6wSMU3pZ1YPEcAbtJB8zLMCTRoJ7WzECHho4oNnCVYgSoOjyHMggG/LTAtf
Vjni1CECwvUI4M+Z+N3cT6BP6NV7TJ8AoTeDJqcMcIR+3U1wP0bAkxgbatEQ
E/X9g8JVDQnYSH13XeQmE+lO05a/k94015HaVVCGWMf4z583IkBcqn7BSrwU
VbwQpiwZExA7orehoqQEffu7aIxhQoBkQfV2yZMlSIOaYKp8kgBpvXLTD4HF
qPH6kShzUwKS+NVpuluLUYzLnOcAadnu4htJeBHqH1tiO54iQL/d0uhVbyFi
bFDnczQj4NhFM+8ggUIURo372E/6+KzRMwMoQEmMQk2z0wSYSOrONeU8R9O+
4Zf2mhNgmq+xLXwwD72+WqYdSfo0qBibiuYh1G7yZJa05aXtKZ23ctDxFnZ5
ngUBoR5eIZHMbHS4fvL7KumqW7Vu5lNZ6LmvHfvkGQJ+PhS12rgzC/HTrjvE
kN4R5Xik0z4TbX/4OGmQ9LmkUoXImAz025QjbNtZAsJyKOvNO9JRboKSoh3p
GZTW33E0DY0+dLzaSlqx5VdNhH8q6hM32rRC+nyvfu7pshRE25TjutuSgPCP
UREi35ORYxDHzdOkWZOf/ToUkpFdT4eGD+nRH5dZ8lVJaOVTekY06VO8fP+m
KiWiv0Z5GwtJ41uzbeWT49GfoND4BtIyasf3pYrEocfMxu19pO8bjS7JBcWg
l/02Dt9IT9qHNKXMMpB00djpadIWvrti5C7REWEgsfib9Ivw15dS3kahu3wx
lguk5dKuqMsZRaICQvzaHOmQCj7ulBdPkKuTxaEp0oPPTmfonXuMFj15Kj+R
zm+NOKqnHYYO/ju92Enaf7FjCGRC0L2Soelq0kaKGwOA8z6ylk5MzyQtZmEu
CSOB6MiZ5Y2hpFvWdrjdeRyAdKV7dJ1JXzmfkXP7zHW0LYBb8W/S3KUKIwGS
HkiyzKVVkjRImOgusZwQn9ac6nfyfH/GxNKmY82RR1Wo1UvSt7ii648d1sTo
0rJH7pNWinNs3KRhj7lfyfl6gvSgRPGUgJALhvcqmAuStlB7V/lAzxuzaqYH
NpHvG++zuvfQ/yaW0rjmc4/0etbE9jrru9gfLzeVQ6Q9Ll0bq4t+gLFXsv5E
kfmUqrnXpL74ESaYnbJBh3S34ERBfXs4Vh/FNTlE5mPCeXUtx+AITDwgil+K
NAcHc82x+immO6a9YEfme+zYJtURk1gszY9x5wtZHwe6vKm0/jis949g/2XS
tMyD9bSFRCzb44GoA1lPNEXr+gMSqRjP/PEiGbIeVaT4Bz2HUzEP2upKEFmv
K0IvfpdkpWGi99CeLycIYCxK7FLTyMCitQ/vjCfru7G1L1TNIhv7ub+np4fs
D1f83jfa7M3BrMsP7uUnzbejnzuYkov9HthUqmlAwAn/D7e7S/Ow2B2h1FCy
v7TuHvL02VSIbU4Q8Z8h+5NLz1Bh4mQh9nNG5BkH6Qfg/ptKLcIUVhN4+Y8Q
sHPSXS1Mqxjr1zfN2aBDxtP3zO8fL8HyRU4FDJH97nDsTMsPy1LM/HzeSqMG
Gf+H5zilthSrOq3QnadOQE6c18598WUYO3fff5zIfjk+7Z1yyxjHxOO/eKco
kfGTr9Oln1dgWzzundPdQYDO7/lSVfEX2C9J26sf5AkQNPHrNAh+gen8afvj
K0fm67yfkOuFl1ir6L/ZSTIETJnefFQtWIW5Xb3hVy5OQPnt6upCDRaWeaj7
hjg5X7T2vyoxe1qLvfFW1X32Awf17l5GdVMtdnjAZab7Ow4q/pM39y3XYpXa
eiJ/TeKg2CSmz3exDnu4lc5wGMVB1Mm1C+2px5SF8gXHyHk5mSA1q1TdgIml
D20278DhmaCv+vovTdgBsd1JMYU4xJWGSfiLNWNmbm0rDvnk/LZOWRk1asZo
rqvyink4hGe31tcVNGPHz0o1Z2bi4Pf3dstbfi2Y4arWcGAiDua32L4TAm2Y
pWhCX0ooDly+mz/QJNjYTqRQnUTFwdoht7P8IBuzGi6baLPHoeQE1iRoxsYC
x5trFy/gQJV1xssesLEo+bYgQyvye+J15RPuWTZ2+c4B5ktjHIKkaAbp7R2Y
TPEPd/6DOHC/Kin4HNSFjV/2FrDjwuEvQbNA6lQvppXro1HHYELQcK++Z9oA
Vu3m8/tQbhkUxT8wuz3zEeMK4VmfXFEKbqk04RHLL9jhIitLgdwSsLsaJ/0w
cBQbOW7g9i2nGB6d9tVUS5jAPp1Jfd9eVATcm+hf7yxNYfcu9NzfdqoQ3rbc
/xksNI3FqfnfcnbJh7P+VI242hmMKz7Wztg9D1wEJuTbrWcxl+1rzISMHJDN
a2Dwjs9hRecH//GezQL/cn0Lofh57I3EUCJVLRPcM11wDeVFLCYi5NR4RjoI
ch2iKn1Zwk4mHFDuEU4Dg3/O0PdELWOV1IV7PkkpIF4h7WawYxWr47YQ+Wyb
DJGeIREqb9ewe8Oi1o+1ksD8wan9iTgHOCOnPVs2J8Aem+Cz6QGckNuqHHhS
MQ56v65LjTrLBaMG5qJ07Rhop37R2yhLgUG7XUFtsQz4yJ21QJenwDC/n/Lb
SAbMZl4plFCkAF5gk/w5jAESExNb5fZToOpwTAv3bQbQvGbmlbUp0Cy/vPsK
lQFLQWv5J60oICx1SaxkLwMUMyQkH/1LgSm7Hj1jFh00DfvZglEUmB9Qc8+r
oIPJWMLDJwwKVN6T19tQSgeP/dvmniZSQPWYX0N/Bh0qmYrszDwKfM14oMcI
o4N5g9qDukYKdI5UrQ+xooPTlTmd4y0U0IkZ+Spymg5+/MSvlnYKCF1vP510
gg6JploXu3ooUPao+l21Lh1Ge0Hn02cKBOgO/kdmBx2W/Lh+OX2jgDpMvK2U
psN6qbqcsXEKZCw75dmK0eGAvaHY9DQFPJ8GjGfy08GAc1279xwFFtz+OnOK
mw7n0pqDFxYoILHw7ujSSjRcNQjXvrVMAX6lMWbWfDT8/38UWo8pP7eajob/
AkxOWXo=
"]]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-2.5, 2.5}, Automatic},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{3.6625877045371027`*^9, 3.662587775069962*^9,
3.662588143027347*^9, 3.662588213195469*^9, 3.662594025646743*^9,
3.6625973836768007`*^9, 3.662597933990513*^9, 3.6626023513562737`*^9,
3.6629378877736692`*^9, 3.663809567267302*^9}]
}, Open ]],
Cell["The following adds the resource distribution (black):", "Text",
CellChangeTimes->{{3.658076288037281*^9, 3.6580763014525347`*^9}, {
3.658076373076785*^9, 3.658076378521894*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{"%", ",", "\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",", "u", ",", "tryKm"}],
"]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2.5"}], ",", "2.5"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Thick", ",", "Black"}], "}"}]}]}], "]"}]}],
"\[IndentingNewLine]", "]"}]], "Input",
CellChangeTimes->{{3.658076255457404*^9, 3.6580762835585957`*^9},
3.6580763806995564`*^9, {3.662580570699234*^9, 3.662580592937047*^9}, {
3.662581887238596*^9, 3.662581893038363*^9}, {3.662582020345957*^9,
3.662582021761743*^9}, {3.662587713197647*^9, 3.6625877134454536`*^9}, {
3.662587923313238*^9, 3.662587923472983*^9}, {3.6625941307001953`*^9,
3.6625941345546303`*^9}}],
Cell[BoxData[
GraphicsBox[{{{{{}, {},
{RGBColor[0, 0, 1], Dashing[{0, Small}], LineBox[CompressedData["
1:eJwt13k0VP//B3CMkuhTSokoREkkWyX0eomiUiklScm+JGuNUamUZeZmLSmK
dtmlxdJiFNFH1oqUkGQdZu7M2MIn3/s75/fHPXMe587c93nd9/P1unNVXPz3
u4uJiIh0U8f/fYb17RbMzNDK28U/u62Ut8Pes0tG26Zp5T43AmcilOxwz4LO
8eI/tPK168Tb+lTsUNko4D9/Ia1cP/27XaGmHb4jrs752Usrl1LS8rM1scM5
674uL6+jlbOOz778xckOk04d33XxFq1cY8wptu6xHeaIBj8U2UgrD/aXlSky
PoSz3C315I+KlXeG5BB34u1xUet73/uJouX7o4zzK3sP4/6KVNc1NSLlp7J1
9jTtO4Jneaa+Cd0z7GLTIb2kaUcsCUn1Kdj7l+34ZZ67TN4x3HP1oPLflGm2
d/Qa71sHj6Nl2ps9VkOT7NRii6pjns6YUR3aEnzkD3tKLYIzFuaCxyKSFjdk
jrOXdtMqD3xwxfPHaflSi8bYgpwFe+0U3FFEewXbPHKEbbLJ1fNuhAd+v5IS
ndMsYJdM/kw8auCFinO9ska28tn01t/+hTxvPGGoOatNkceu7axNfSjqi64b
OzIrKjjs0/KcjGozP9RkbJ7xe9jPNqf5Hjq6IwDvtdtWhpr1sDUO7InNzA3E
vvDFJpZLf7FzZF+747JgfHldY1u/XTu7zjDqrvunU7h+4NuITloLe0VwkcSz
AjpavGyT/M+ukT0xVrdQN4WBAVkFEzKLKtgDoSurYjrOoJ3HynufzmWxr9Wk
v/ysHYbVtd8IfdtMmFXD1e9Nu4Cbtd8+tblRAUFKriarNoWjGH3xDzf5RnCh
7zZnpF5CCWmbcBduC2TtLI6sUo/Ayz9bzIMetEPE4CMtmexIfHIryua8oAuC
HATikhLR6H/fbcFvux5oOB3bp+7MxLjQlNtxrj2gfzXiXqs7E/Nt6jWMAnrg
n9Nlx5g+TOT+3WgWx+qBnK+zmzqCmeh7RCpo0+se8GNbynlGMdFH9unnGJVe
iF2/c0tXNhM9omaSDYd6gXtmU54jn4lRRw1W/pzohZbkALXHo0zMMPAuIGb1
QbmK3gLuHyb2/PpU3bm8D6Y0n+sHirHQDTImWPv6wKzuiY71Iha6TFg7dBT1
Qcw+Q419Biw85pOqFB3eDznq778xglk49U2ynh/bD1d3Km7fEMLCmztCzzum
9oP5YpUq3hkWNmnYd+o+6wf5knC+3SUWWvQtvvfjdz8Ev7JijiawcI1bopqe
1QD88b1sG5DHwpGjzLXt/wxCxfqpdrNuFibUjbdZLhsEdZ8vh870slDb1DPm
6epB+Kw/52T+AAs9FLcPR+MgPAuyPCJJsvDbd1qBXtAgMGzcf7OmWVh26IIe
s3kQKi133HkqSyBrH91I/zYHWFf/brhiRuDVWk3f3CwOpJN3Od4WBN627ExX
L+bA34UpY1stCXxiaiW+9BMHfJk0kd/WBLauUWiYlhiCJI2w012HCNQQK3Or
Ch6CqeovGVW+BOqFBd2A8CEIvP9u2sqfQJOJVTUlcUPQPG/05PtAAm248To5
WUOw6PihpFw6gSHfnSfjO4fA5MtEov5FAquezko4vGsYOP/uClC5SmCj9st3
n+yHQfGFH8c8icDvmX6juzyGgTU4tvt4MoHc9K8OW8KHwfue9ZuoVAKXXMlS
X1k8DOYcZyHrPoHurrtfDalyoeKn307PQgL9OkS57uu5ICWzom/VMwIZh4uU
O025cLZwE/x8TmDM3hVRTfZceJJRK4clBD435tsUxXHB5N+Dq5+XESgue733
wiQX1jywrThRQ+BC7vl/FkrwYOWNPLGCjwSqfPDa8HARD+yLT+QP1RK45ZxJ
1ActHszJ+2pxqIHA0N/d6jJOPHh0wsJ84DOBzLK63Q9O8GCtjsermS8EJt8s
Pm3I4EGRjnrSghZqfesr7w8n8uAkV8FFpZWq97me+/0KHvTI1O2aaSPwvzjF
WINGHjxpin/Y/4NAae/ZL6p+8GCbfK9tbTuBa5S+i3NGeXDqcH3hpU5qf6ec
k7eIkiB6V+/YwZ8EPui3y46WICFlQYOjaheBT9/hJ3lZEkxPP7DO+UVgaYFh
r4sCCRO1vcae3QSW39aczFGmfr88NFTpN4ENdFnVLdokzPYk2xg9BA5p9ge6
bCehzCpyFaePwBG59sgcaxIiur0DQvsJnBL/lDKyn4TSNDUxsQEC53a+ehvl
RMLrLO9J0UECZWqfNDe4kxBdk+sUSnlp6aOBpb4kmORsnMuhvPpavEwOgwT9
S71abzgErrsYoT5ynoS8jP8eKA0RuOFkqJFpJAmnOFuPMSibOvjtjrpCgpLB
1iN1lC0sXZ0bEkkwKo5LVRwm0NrA/vTSmySsFatY5kHZVmU3yzmdhMnxix1Z
lB3+2ZqW/ZAE6ebAX32UXaY2FAqzSWBpb1+tzCXQu3/te5NCqj7yRe5+ygHN
yt8ii0mQ8roYdIEy493i4fo3JHgZ+TIyKF8omCu6tJIEHU/LsmrKUbdnZJ1r
SEiy6TPvphzHGtHIbiQh8amG5B/K1+kDJsIWErwzefMkedT+uXbYmLSTEJiz
ev8iyg9tPrtFdpMQmVTRLEc5x/QDo36AhKjUNzeXUH6q+SZGjiShy1bu1nzK
L+We3j0+RsKlF99+iFF+K/74edY0CW8WLT5GUut94N/6IBDjw1yVruWtlBs7
En4YS/KBxXVc8ZLy14+RZMR8PnQM5jslU07akrbt4BI+vFEbX+FNeX/h81R1
JT5YkNnLDSkvUKvlja7kg1XyUsdJ6v7VJ3dbVGnywZR5s7WEcozkVEqyLh/+
OMUmBVDeeW4hz2MTH3J/uCaoUK5yNkuR2M6HMsatHf7U/kV8sed+tebDw+o5
c6Qpb7UMMM+05UP54oA596k8lGndGbZy5sOrw8+bSqm8nLtTtFXeiw+1rtxb
xpQ3L6y/MeBHXT/hR3YRlb+i8Wkz4hwfzBz+ptyk8nnKR/aGw2Wq3vTOszNU
fvXa1w5pEnyQ29P4yIly/juH5I83+NCenNUs1Uugr2EQ51Y6dX52QvshKv+a
mSz0fcQH7chw3TSqPzJiSwaln/Hhqhzv7SKqf9xEGqG9lA/SJSUi26j+Ug3u
S8or54PaGY0Ef6r/0u2XwJ56PswPE8t4QvVr8spT1+IH+KDlKPr5F9XvB5Kv
9DuRfFh3Vu51x3dq/kg+MF0/zgeVF90iX75R+eE29TWKC6D0wM8H2V+pfJXq
mCxUFsBw78GwOdS8sdCyTPy1SgBp2pWBDU0Eit051vtUWwAaFz0b4hsJPB8R
m2BrLAA12Yq66ToC6Xs5v5PsBKD1RX4e8wOBBu/ENrsfFUCcrVG4QjWBAgOF
eEM3AZhZ+vtlvKfmq8IOo5ZAAfR4vn2d/Y5Aj56MWLlYAQSmMDzdXxN48KzL
htQKAYQLZ0k8yqfqS5OdPf6vAN4UFbnwcglsYVc12zYKYEuTtI5BDoF24mtP
z2sXAGP4smreYwLtY4XPLo4JgCch/dzxLtWfdyJ0PdcIwdjC4erzBAJT324Q
rdQRQqRD4vzHcQS2dfc3Km8Qwk67jyuTYgh01Ngd8H2rEALd3yw7xiTwaOHi
gt2OQliwaXVS4QUCj1dkaBnEC6HAYPv8wycJvNtjP51wXQhxM2Nbx3wI7JKQ
qh2+JYSFLkab47yoeWDtf+JxphD2F7pcyHcl0LV5Y7bCOyHMN5xf+uQwVX/f
h9Wio0LYeH3u/TLq+eorxVGtdxgB1UgTZTk5AjmhL8WlnEdAfWOQqir1fPbp
Z/Vaeo5AtUJ6uIYMgZ7vNbLfBo9AZyDDbbUUtd4FD90XMSMwLnpGkfuXhYeF
XXC7bASG9fPc7vewcHtbq6OP6ijE3dRMYBewcEVOVfLswVGQ2qJffXcjCw/c
KSmtIUdB62XY0h36LCSuZf+IGx8F3dyzssPrqP8fZ+NU5WaNQcXabBWNVSys
sbbLX608BsMBk2onZFlI5/a8t7IbA2Pl+JA1JBPrdGeNEu/GYGzBrMHch0w8
W2JuO//WOKy4qRc7I8bEgAzfog06f+DVplYv7eIolBbb6LKuZxLSRroqxQwi
cdvJA9c1r01D6V2vPbl5l6l5r+S/Te0vRDPSFYUWl/BqEDNx/dcZeBasqebx
8SLuj9qrnVYkglaGMdGuU+dR80jEwYdhohhyOerIQPI5bOmVvH/toBgqmMvN
u77+DNa79JgtXEHDtREaRVxVBnaJP564rkpDl5KSaE0FBo5keBXIr6IhPKtu
9pZhoDyHo6iiTcPXJqW/BTMh6BYsGNcxpuF05sTLde0hOHl5Jm/3IRrq50fn
Wt8MwVWP5BVY8TT89FiOoSgTgkaWbY3S16jvb/98qmpOCFoP3I5OSKbhZnmV
lmCREAzUVh69kUbDG69UKlp5dHz9YlVjRg4NBS9MdT7W03F/lX5UZTUNo7yu
JeyLpaO716iJ1Ucahv15FKAbSUfG3GLhx3oaTgwzH8uG0TFtz2bnz800LHDX
WtLjS8f+FjT51U1DOd3c9jxrOk4yxITufTS0MZI6kmlBx3nLKrMGBmnYwJpa
nWFCRz0nSzk+n4b06M7cHC06bhOVrD81SsPbnyZcnqnR0f5BTcTEBA2HHnPd
yhTp6LMtxvjcNA2dypoKa2Xp+P/vh7hzqtCqQ5qO/wPtgg4m
"]]}}, {{}, {},
{RGBColor[1, 0, 0], Dashing[{0, Small}], LineBox[CompressedData["
1:eJwt13k0Ff//B3BcJFRIQvlkS6WkrAmfeUlCfC6ltCiyZKvIvitrRK5L9i1r
SLZ7R5K8rz1ZIpJCKUuWyE4S3/md8/tjzpzHOTPvmTPv5+v1fo+YheP5myxM
TEwjxPF/Z78f/81vbpIYVmSj8dDZaBjzEVjqXycx1sPZfk0vRgOZ5+vKi98k
xuUTuuHGv6NBVOXuX8cFEoN8UNnnCAsV6h7GcAyNkRjCw2k2UzupwHH04z+M
dhIjK1f4D65MhceuN/Tup5AYPQe4vwXep8IzZpccJmUSo3bqlaHE7hhgu6kt
J3SdhVH0w+DWOfdY2NnXeDuLysz4pXx9NObrYzhfn2x56C0Tg2a0YJVtFQ8+
v9RvRw9vIprkRS9VpUSo9Ei2LzHYQM0vJRbVBJKBHHNRdCNpHaVpTS/FX0wF
7bTXZJ2fa6jo6PbXym/SIa/Zq9fF5DeKtv5zpDDvCZgGP971Ln8F7W7eX3T1
YBb43yAVc+1cRnTKmk0gPRuYZPYhzZBFJPoqN8bkWi58jkh68OzDPPqT+Kr4
leFT2MtpW7B4ag4FigrxNugUwC1Fabb+vb+QabBIxG/KM7BU/pJfXz+Fpq2P
zV2bfA7Snic3HXLGUZTAlb7FXaWQOWjU4KUxiky9OQ9tNSiDHwG71LQFv6NE
R09Ne9tyqIo7qDVuPIgYW2Jpr/xpwGHyw5JZbRB9+ssqRgukgbFoXqCw2CBS
ONvd+zSUBvOFEgz9qQHU/9CUMzyKBocY/6iW3RtAIhyyQtLpNEic5D/und+P
fvO/FRiupoEbxizCvfYJjbOVVvKt0qCOlaG6/+snpGLfNlX4hwY8b/2v/tvw
CV2ePvAV26RB0YX1hLtRn5BUcP+SGTsdRuxW+D6If0JnzTQdPPnpcP7xNEe6
Xh+yFx8fZz9Gh2MTnxZl03rRzlHmy35WdHCdlTm0O7gX/Xv0tLejDR0qVwKu
b9j3otC/ppdM7emgwS7d1HaiF1UymSvK3SXGk/BOsOv5gArujxwo96GD23Xh
k9lcH5DIpQ8HeWLoUNV19Z6Adzeqx7MPy1bTYaOvmPb3RjcyrTcqLK+hw6kh
lvER7W6U/CgvUK6WDq0zhYa0Xd3IfuGNwoEmOgxw/REzLHuPPmbVGYy8o8Om
VkpD+HgXGvijN1f4nQ6nq/q3/jXuRGFcxCPZcCguzFVpVu1EW/R/a0RuwUEw
xdGOKtqJlPZMv6jeikPvCnuMXs875NFdG7ljOw77fYx50tY60COPjBBfARzq
Apa4QbsdSehLSjhJ4RBvEX67h6cdmYbf2bxyEAc7TZE2289tSKlm56a6NA48
bFoR1DttyMam/PqKDA5mYY+3Dse2ov4rymRZRRzWo+TZQ4daUHu/dm3ZKRw6
HZtvChe2oIMm/ml6p3HINjRpLHZpQbjumOuQFg5n+YKCP7K3oCJZKe4/Ojgk
xb1nOSTzBil0j6YtkHG47W5t8Xq5GbW4rPLfNMQBLq3VnmM0I2bePLeucziM
C4oHeBs1o7aKh1PJF3BQSnXabPVqQh3sPE6zV3Dg9GMzu6HZhN7y3Fg/YYLD
4PWkmkXuJvRV29Xc9xoOwftq/USeNKLBkZCyBVMcurN41h2aGlB5gYxyjiUO
dwtKVnl31iM5medmXLdxOLbdIejUUB06ETGWMkt4zvnIdpfndQiXUTrddQcH
Z7UCiR7tOsQrE9cT7IiD27sscrxvLSrXZO6lOxPvp2D+qUm3Fhnmulxwc8Fh
OXGf1YpALZrRf6R03BUHD4tUr8tlDGS4fUYsxQ2HhcnDuoptCHULKPoqe+Lg
Ss83jbdGSOpy2MZ7wst++11XmBAK6osYtPPCYZVnX8ZLxRo0tpRYHO6Ng9fn
FLpw52t0Qf5IBp8PDmvZgm997F+jqpXAiXjC60p8S+oZ1SjiTGcY1RcHPyYK
Z4ZKNepyvT+wxQ+HjRYuUaaeV0jWxeaBF2Hm62x6dRyvUKoLZYjsj0OgVOAN
iewqxHy96lE5YdbZDbdg9SrUPvaLwnsPB/ag1SdnnF+iZB0qtZbwA323iqfc
L9HRwN3RfPdx4BCYb+V4WokspQa/mRIO/+rwzU6jEm1P8A/NI8xZMLX8tv8F
yjFM95sgHOFsy33E/QUSHx1pOhCAA7faqNgjnhcoiInZwpxwFJuF8kxhBdK3
e0qOJ7zj3Rd9A60KpMIUG9lEODrRxKL0K47iaoP3zBPms+jz4PXGkcEbzT+C
gTjEHr74yJkfR626aYdVCfMvdWV1F9PRWopV0WXCcTXkSgVdOuKSc/FzIiwQ
1toeN0xDghn56SGEE87pDC/70ZBi3OSOOMKCexpXLwnSEPMPya4MwkkjGttf
lpcjsVDd77mEhYtrJIT/K0esoYaaTwmneqiq+PwoQ/OCJxazCYtoVJIHAsoQ
imFdSiGczqlopb63DA3aMLQohPf1lHmlV5SiRWnfMT/CT9KOUjYNS9FVKvmj
DWHNDmPd2t4SZO1wQfA/wmfMDV2DuEoQa0VpgQxhnUXdDC0oRhpekRFbCZ99
oPl2i9tztGdSoGaI+D76wupLLQVFKPxiiAaNMPm5kmjkl2co9sBOgQDC5+CY
HnnnMxQ9zqx2lrCxtUTme98ClPFFyq+DmK+HTi5hMXg+smH7vPGQ8Gvfesfz
M09RKInBrElYMtby3/dmeUjEOjYyl8jH5XTa/pjEXITpnNllSDiigLTtfFcO
OrZWIbpM5GseZfd3ncpGj4KTaxUIS7Uu1FF9spDUi81L7UQ+r/RqFp6jZ6IL
t7e4mBNm/Bz27Nr/BPFSRFV8iXz/I69zJIs3GZmzZu7yJeojRHd8TSwoEcl7
CH+bJernp1lYS+ZiPGpz4lIyJ1wV+cY682Msku46cE+BqLfnbdRTGqoR6E2A
bnYuUZ8+v7u+wj9hqKbi0rtlon51pfj8gDkEzXLzR2gSbt2UdLwX5Ye4zYXx
d0T9zyYmWc0lnUfykZLT5UR/8GV53HjmhArW5nS6dMgBh6PJls38SmbYl65c
Tk7CRvJ91aEartjb9WvhBkS/cbK+NdHwOBT7GLG7PdcWhyyVw/qNZeGYnWKi
bakNDj3cU8WNHZEYLe50ToU1kacriictg6mY8cJvpgorHJiY8E3LmgRsa++0
8/0bRB4n+I+P6Cdhndtr5GzNcJDrdrWw6k/GFmAxVY/oh1Z5Co1Wq2mYUSuv
OxvRL62krjbKCWVhv3wLLLQu4dDc9umhvFE+ZqgR77yij4Ot5+dmk8MFWP3l
tSpfPaK+JftZg0mFmGKyPPtfXSJfPgP+PbRnmGFmw/OZMzi0Hfrq7MZfgqUK
HL0XD8T9ms7P+yfLMe39rLJrcjicSJpv/WVMwxgpK/Rjx4nxfjlPkuppGNng
uKWFLA4FyS4HjqTQsVO85adeHMZhcs4101evAjtu89n4gCSxfjzxiBMpeolt
S+GUleDHQW15hXZcsArTG2Z4buMj+oe+53ut4Cpsr6epwMIOYn5XPHc4XHuF
CQezXCnlwmGG7B1ew/0aOz7KYbDAgkOlf01NiRID+26ck582S4eTMrXlhgn1
mBhvrlvyGzoo9vTG17TUY8YHHxaIE+v5MZ+f3kfW6zF/csn+p/V0kGrZrclh
3oB5eamy5BL7gZ03HbqRdCPmIJOc5kqnw8/UPYtHa5qw4+7UuZsZdMjgdlfc
NtqCFWl0auc504HFfdeAlVAnZsJTjRvsoMPVG4XvKxU6sdRbIddfcdGh/CzW
wm3YidXfDUuQ4KCDxT67CnpoJ6atU9k9wUSHujfV0ayLnRgrNYjYadMgaI+V
Vk5HF+ZYUnvJs4cGrLXlxcNB3ZiHgLWTWzwNtnAbBljM9GKjjJqbXHzE9UO9
ms7Zg9id8qHOpcUyKE0JNfSf/4bR1Wx+1vSVgmOWFc+I8Si2ztIm165aAqb2
ySIPAsYxUx2h/NnlIgg/564inzqFibOF/DjZVQis/HFj99ZmsEoXpriQ1Hz4
2BoyG7xjDhv2pIzUl+bBRR8LpeT6eUz8n769WQ05cJtrSrzj6iImyTI73bsv
G/Y9a4pnn1zCZB7yqkXmZYJPpabRjpQVrNklpipL7gnczbtdoST7G3vPnjup
PpsG3CzKFkdH1zD9fxf/5D9IAa07F+KkY9exvW7VX/itk0DwpYijluQGdrrd
+LF+UgLEOIdRj33cxPLzNrT7e+LgfKiBTFoFE+wuD9RRN34M0ibBF3P8mKHt
MFk6likWese2ZsVeZAFxN+5OxxIqdFiMavDtI0G3evoHXmo0fGN9uhonToLm
gfBH+pHRsJhnWyIkRYKx2gnp8AfRIDQ1tVdMhgRRE3Z8HP7RYOUyvyKrSoKI
VXWfvbeiYS1o8/l/l0gQJHv6Z7pWNEjlCgmHU0iwMJGuzbFKARXt/k7uWBLc
FdzIXZihgP5E6oPoeBIMeCokfB+lgJOM6FJCGgkSis0Ot3ZToBqX6sx7RoKe
uw5TTSUUON8kH9rQTIIbu+SMbGwpcNN2SU2nlQQv5d13RZhRwJPzxUJrBwnE
PfoMyo0pkEY+ad79gQTUIWspLi0KjPeC2vdhEjhajB0ZE6PAmifLws0fJKgb
NgzcL0SBbXsaCiYmSWCh0HHKlocCcmbau+fmSCB9K2JjZSMKtJi3drgukSDT
PWb59HIUXM5+G7y6SgK11JNGcdNRYK8Vqeq7ToIR3wm+iZEo+P//RVigsCnA
QBT8D8MNHgM=
"]]}}}, {{}, {},
{GrayLevel[0], Thickness[Tiny], Dashing[{0, Small}],
LineBox[CompressedData["
1:eJwt13k4FW0bAHAcvEIhlS1E0W5JlK255ZVEEkWRpeOolNdOSipRCV9vlnOy
Z1+zOzMUnpM1a8dakqVS2VJElizffNf1/THXc/3+mOee65l7mZGjupk7cXFw
cIyT1//WgG8nZ9bWKKyS28kyEuaR8NV/y1z/MoXllbZ8pMEyEkyFh+aJRQpL
23+R18cmErZpuq+4/aKwVDvTn7ylRUJNaCTf8FcKayL9blLR9UjgU3orw2qj
sPIEjPVLEyMh2tvB+G48haWx81PF2ngk5HF6pXMcorDKD7QVD4ZGAY+T4QEJ
Wy7WnmdLjsZr0SD6rt4lNYKTdeYnqKwFMMC8Ns5xdzMHy9q09wZLIgb8f+i6
PPm8hh6PBlVy88ZB+fW4q4WnVtH6p978GzgTwDTy7LbV2GUU6rvR8YRDEhgm
Vpken1xCbOpEc8TNZMhsvNHrZbOIhrNL4x+1p4BdcPTmN9nz6DjPpYUhWhrc
dqAUCIj+Rl5xE607eTOAY78s0r8/i9KnpGIz6jLhfVjsw7yeGZSZ3feQszsb
tvJfyZk9Oo3WuYrtQt9y4Zr6Hp7+rT+QjXlzt6hZPjgeGsyurZ1AweLPrt1o
L4Q9flprrumjqKb3TX6oZDGkDFjU3dD7gpLth4q7nEvgW+BmHUPxT+izSreR
TFwpvKDvMhi1HEDS1+LXf2opAz6bb46cOgNo1Oo+rzG7DCy3Zd6TlBtALi2p
PsXdZTCTu51lMvEBue4Kz/AdKIPdLBnt4jsfkJd1Qc/HqTKIGd+kejO7H91d
HKw7JMIEH4xTWnCpD32VkXKus2BCDTdLW2GoD3E8OrbaZcUE4ebb1kfq+pDG
UZOgYRsmPD+z/NT9cR/ilr9g8tORCSPO8xt75PvQt+nNl8e9mGAe/Z0vyfgd
Cjbx3GUQxQSVsb5Z5cReZGASEOL3hgneP/fvFgvuRS2QnT/UyYTy+UDb1au9
yDg6sFy/lwl6vHsaWg/3IvvwHE+uAXK/7TefOnf3IH5eJTnrcfJ5bSW10gR6
0AGbC8Vu3Di86LC+s+VmF2rJ8nCX0cBh9V1B6YpDFwrdymO/VROHo8NcoyOG
XajouEbXFh0cWqZyzUo3dyFbfKce51EcPgj8kTMr7kSvKqdG8k7isGYQX/do
tANd0uz8fJaGw98v+tetWLLRwviE0vhjHApyMzQbtdmo4VyhZG4EDuLxbs4R
29hI5Px8uFM0Dr3zvJHG3W9Q6eu5hfZYHBT8LYUTl9rR6xK++GvpONQEzgmC
YRsqLt0Q0FSOA4P6yKVbuA0VsHd4wEscnPWlW6+8b0UMo3dVJVU4CPMYhEX8
04pGjVwsH9XgYB8Sve5zVAtaM5vVWm3BYfmxGu+D4Sbk5O8Tzz2IA9ut0Uky
twmlpet/VR7GIc3Mpr7AqwmxGz9ctPyEw4mNQcFveZsQrcX2U/RXHGLpnVy7
979GHtMRzW+ncNBI8FhrudGAVtcqbb1WceAP4LF30G9AIQ5ipWYcBAzYxlbP
CjagtVw+8d1cBATLvgqQTq5Hgwcs17XwENCVKrzs2lCHsmoIqy5BAtxzChdE
RGtRB01o36wEASobXIOODtcgmmyF72UpAqY9923wyq9BX6Z8L/RuJcBTJ2d7
t2ENCqzPm82UJcDnTaop49YrRAikaYoqEKBx8GJfg9Er5FbgesRRkYDfMbK0
+S2v0JTFh56CnQRcpybcOFfMQpeoHeWH9xDwa3yvkXorQtNf3qiLKRPgXZZt
x7iE0MZmFVxfhbw/QMF7ngMh+1DVmmuqBCwIyz6rUK9G/bNrNwrUCFjW2Din
+6wSMU3pZ1YPEcAbtJB8zLMCTRoJ7WzECHho4oNnCVYgSoOjyHMggG/LTAtf
Vjni1CECwvUI4M+Z+N3cT6BP6NV7TJ8AoTeDJqcMcIR+3U1wP0bAkxgbatEQ
E/X9g8JVDQnYSH13XeQmE+lO05a/k94015HaVVCGWMf4z583IkBcqn7BSrwU
VbwQpiwZExA7orehoqQEffu7aIxhQoBkQfV2yZMlSIOaYKp8kgBpvXLTD4HF
qPH6kShzUwKS+NVpuluLUYzLnOcAadnu4htJeBHqH1tiO54iQL/d0uhVbyFi
bFDnczQj4NhFM+8ggUIURo372E/6+KzRMwMoQEmMQk2z0wSYSOrONeU8R9O+
4Zf2mhNgmq+xLXwwD72+WqYdSfo0qBibiuYh1G7yZJa05aXtKZ23ctDxFnZ5
ngUBoR5eIZHMbHS4fvL7KumqW7Vu5lNZ6LmvHfvkGQJ+PhS12rgzC/HTrjvE
kN4R5Xik0z4TbX/4OGmQ9LmkUoXImAz025QjbNtZAsJyKOvNO9JRboKSoh3p
GZTW33E0DY0+dLzaSlqx5VdNhH8q6hM32rRC+nyvfu7pshRE25TjutuSgPCP
UREi35ORYxDHzdOkWZOf/ToUkpFdT4eGD+nRH5dZ8lVJaOVTekY06VO8fP+m
KiWiv0Z5GwtJ41uzbeWT49GfoND4BtIyasf3pYrEocfMxu19pO8bjS7JBcWg
l/02Dt9IT9qHNKXMMpB00djpadIWvrti5C7REWEgsfib9Ivw15dS3kahu3wx
lguk5dKuqMsZRaICQvzaHOmQCj7ulBdPkKuTxaEp0oPPTmfonXuMFj15Kj+R
zm+NOKqnHYYO/ju92Enaf7FjCGRC0L2Soelq0kaKGwOA8z6ylk5MzyQtZmEu
CSOB6MiZ5Y2hpFvWdrjdeRyAdKV7dJ1JXzmfkXP7zHW0LYBb8W/S3KUKIwGS
HkiyzKVVkjRImOgusZwQn9ac6nfyfH/GxNKmY82RR1Wo1UvSt7ii648d1sTo
0rJH7pNWinNs3KRhj7lfyfl6gvSgRPGUgJALhvcqmAuStlB7V/lAzxuzaqYH
NpHvG++zuvfQ/yaW0rjmc4/0etbE9jrru9gfLzeVQ6Q9Ll0bq4t+gLFXsv5E
kfmUqrnXpL74ESaYnbJBh3S34ERBfXs4Vh/FNTlE5mPCeXUtx+AITDwgil+K
NAcHc82x+immO6a9YEfme+zYJtURk1gszY9x5wtZHwe6vKm0/jis949g/2XS
tMyD9bSFRCzb44GoA1lPNEXr+gMSqRjP/PEiGbIeVaT4Bz2HUzEP2upKEFmv
K0IvfpdkpWGi99CeLycIYCxK7FLTyMCitQ/vjCfru7G1L1TNIhv7ub+np4fs
D1f83jfa7M3BrMsP7uUnzbejnzuYkov9HthUqmlAwAn/D7e7S/Ow2B2h1FCy
v7TuHvL02VSIbU4Q8Z8h+5NLz1Bh4mQh9nNG5BkH6Qfg/ptKLcIUVhN4+Y8Q
sHPSXS1Mqxjr1zfN2aBDxtP3zO8fL8HyRU4FDJH97nDsTMsPy1LM/HzeSqMG
Gf+H5zilthSrOq3QnadOQE6c18598WUYO3fff5zIfjk+7Z1yyxjHxOO/eKco
kfGTr9Oln1dgWzzundPdQYDO7/lSVfEX2C9J26sf5AkQNPHrNAh+gen8afvj
K0fm67yfkOuFl1ir6L/ZSTIETJnefFQtWIW5Xb3hVy5OQPnt6upCDRaWeaj7
hjg5X7T2vyoxe1qLvfFW1X32Awf17l5GdVMtdnjAZab7Ow4q/pM39y3XYpXa
eiJ/TeKg2CSmz3exDnu4lc5wGMVB1Mm1C+2px5SF8gXHyHk5mSA1q1TdgIml
D20278DhmaCv+vovTdgBsd1JMYU4xJWGSfiLNWNmbm0rDvnk/LZOWRk1asZo
rqvyink4hGe31tcVNGPHz0o1Z2bi4Pf3dstbfi2Y4arWcGAiDua32L4TAm2Y
pWhCX0ooDly+mz/QJNjYTqRQnUTFwdoht7P8IBuzGi6baLPHoeQE1iRoxsYC
x5trFy/gQJV1xssesLEo+bYgQyvye+J15RPuWTZ2+c4B5ktjHIKkaAbp7R2Y
TPEPd/6DOHC/Kin4HNSFjV/2FrDjwuEvQbNA6lQvppXro1HHYELQcK++Z9oA
Vu3m8/tQbhkUxT8wuz3zEeMK4VmfXFEKbqk04RHLL9jhIitLgdwSsLsaJ/0w
cBQbOW7g9i2nGB6d9tVUS5jAPp1Jfd9eVATcm+hf7yxNYfcu9NzfdqoQ3rbc
/xksNI3FqfnfcnbJh7P+VI242hmMKz7Wztg9D1wEJuTbrWcxl+1rzISMHJDN
a2Dwjs9hRecH//GezQL/cn0Lofh57I3EUCJVLRPcM11wDeVFLCYi5NR4RjoI
ch2iKn1Zwk4mHFDuEU4Dg3/O0PdELWOV1IV7PkkpIF4h7WawYxWr47YQ+Wyb
DJGeIREqb9ewe8Oi1o+1ksD8wan9iTgHOCOnPVs2J8Aem+Cz6QGckNuqHHhS
MQ56v65LjTrLBaMG5qJ07Rhop37R2yhLgUG7XUFtsQz4yJ21QJenwDC/n/Lb
SAbMZl4plFCkAF5gk/w5jAESExNb5fZToOpwTAv3bQbQvGbmlbUp0Cy/vPsK
lQFLQWv5J60oICx1SaxkLwMUMyQkH/1LgSm7Hj1jFh00DfvZglEUmB9Qc8+r
oIPJWMLDJwwKVN6T19tQSgeP/dvmniZSQPWYX0N/Bh0qmYrszDwKfM14oMcI
o4N5g9qDukYKdI5UrQ+xooPTlTmd4y0U0IkZ+Spymg5+/MSvlnYKCF1vP510
gg6JploXu3ooUPao+l21Lh1Ge0Hn02cKBOgO/kdmBx2W/Lh+OX2jgDpMvK2U
psN6qbqcsXEKZCw75dmK0eGAvaHY9DQFPJ8GjGfy08GAc1279xwFFtz+OnOK
mw7n0pqDFxYoILHw7ujSSjRcNQjXvrVMAX6lMWbWfDT8/38UWo8pP7eajob/
AkxOWXo=
"]]}}}, {{}, {},
{GrayLevel[0], Thickness[Large], LineBox[CompressedData["
1:eJw12Hk4VV+4B3DOkST9KpGhUUqlKCnK0HolJJJUKhqEZCoHxxwRyZQyT2Um
JOKcvYtkHZkyZJ5ChkSmEoU0ufs+z71/7efz11p7rff9rvUsCVM7g2s0Li6u
ldxcXP/79fx8YmZxkc7hWG+zz+DYwYjH2tmeP3QOf1QnrbffDvRW9c+/WKBz
1Ddwn929aAebDzH+2n2nc4ZyklVWbGLAm6BwvoEROqd894xyzGUG8Ml2buS8
o3NovnN3JQYYEMk00fFOoHMU61zDNb/Yw1Nux3QuRTpHSPOEa5gcEw6ezuGN
k6dzXPaEPjqsyYSq9EFLub10TvtUgspfIyYMaOnLmO6kc45Xhorl+zFhbagM
Wb6OzvFfLWE10sWEO+Kj1f5cdE5JWCgz188JzstfmhCopXE+3fMW7B9zhiXX
tPaJXaJxdCrmw6S+uEHLZblzExdonOetK/Paedwh8fy6W68NaZxiaXQier07
KOhOVV7Vp3H+vapU0NV1Bwv5mAs56jTO2zVeacG57vCW+7O3sjSNE7SzUNuE
4QEhif6Nl+a5OV+0S98lLPGENV2Vtqlh3BwFx+sCovu9waA83mxnLRcn0/Ow
l8iCL3hMqdo+HFrEiMSM3toAeOkSb51/8h/Oj5SmFy4NBb3ws5v/xf3B/kH3
ZEO1wkHr8Wu9Y5O/8PZNzOGuL1GQWe3W4Wi8gF0+dpSIv4qDy36Rwo1Z81jA
cirxhUYieJnQ85avmcMTY8UxcowU4JLZhNXv/sBckmZeyl1p0B0cd+9p+wxW
l15RvSUmE9bzW2b/ODKND4pw8m+oZoPNAeklPeun8IzNZOPz7blgptiXVV4+
gZv0hFwmF/NA2lVp8Wb6KBZJUB2j1T6HlA+nK9zUhnHTBPey8fWF8NlHWEVL
9CPOVv9wVh2xgN8zfyqC/yNuOSnMPaHOAllX7bSBP4P4k0aK+sNjLHC+6cnv
PjiIeaXC77aeYgGv8XBXbs4gZmiveq1izoKt+wknQdVB/DJ64l9MAAtMR87k
f7g6gFOrHTaaNrKgOGqHxqjhB6wS+8iy9gwb+Iw/m3GrfMBXlF5Nsc6zwXBz
5h1xiQ/4qmZYYvxFNszkSHJ0J3px3PJCmyvmbNjJ2ahccLsXt77ZFVrlyIbY
cSE596wePG9C01kWzgYnxL1B4Nd7LORIJJyuZ8MbHo7ytv73uCFD0bmvkQ2r
ar2MDle8x80H5VQtWtmQe+ZPDCP0PX77wCXQtpsNn6zmBdu3vMdaQSLjp0fZ
YBD5hS9RpwsvLdPTDKETsHfs/Y89jztwzuf1gTGKBDC/yewU8aPMx034KxHw
ct7n0j/rDuy9mMHjqEqAGq90Vf3BDvzKeSm/ujoBBpLuMVZt7XjfapVAjh4B
TpfEldKWt2PZBx2qe68RUNxsdHuteyu+73xo8P0DAv515bH+mrRib+0gcZtw
Ao4M0EY/abViC9JPfyGSgLqvOfos4VZ8SHL4mUA8Ab3Lf0voF7TgsqOp/61M
J2BRI6EicLQZJypl3/R5QcDR4p5lfw2bsOXPEAnhXgLycjIOVSs3YSTw7aVD
HwGiCXZWYZubcJUV83H9AAEd87zhOm2N2Hrj8DGnYQK2eRiuevyrAcszJ3nj
vxLwxmdWALTeYZ2lC6v3cpEQbRpo27bqHaaHtI+dopFgpb6h3rK7Hpvm4N92
PCSsWqIRHHajHqcNKdUk85FwJSBy2VBEHd7g8WyibRUJf0Llef0HavD+6G/G
/ptJaLKrviaeU4PzOz1O2WwhIU3fuDLPsQYLs77Z6W4l4bigr18nbw2uc4+Q
pO8gIS6qhbZT5i2+dGbN8SN7SFB4ZL9Y51aFeU2OveZVJYGRnf9z9ZpyPDf+
cjrlLAl7/7vpe2TgDW6unLOfMSRh2mH3f47P3mBVxQxvdJ4EB5VsyTatN3jt
/k+ajUYkODWm6kXfKsMCJxQsKq+Q8H18l/aBeowbB2rslluRwGRnXY62wNgX
dMK2WpMw57mNOc+F8UP7gweVbEj4uWpTUtGBUvzb84SQ8Q3qfxUEZ1WTSnBf
3O15B3sSeH1/Jms6FGGzPA2u364k3NN1Ip8IFGFBi+7DvW4k8K2dqeN78hJL
ZzF/F7mTwJ89MVfb8wJ/dxP7Yn2LhJWNfbonNUhct2/jk9TbJDyMNTZ93k/g
N0nvaq97kyBo2uWy2p3Aqzi2Vjt9SBCabU5tzWPjdr//1qbeIUF0XeXPc6Is
fCdNR9LqLrWen9T+KyosxOEpXUKC/iSI55VKip8oxDv3ZHu9oLxB7aVer08B
1rboK5q/R4J6g6F2WUc+NtF3rToRRILmVX2m7/J8nHFo1r6b8rEf2kkakIeN
3jpGmAWToCuuOluTnYsJX6aiTQgJhhaSKS23sjF3Utefk6EkBNk7BoQTWdj4
Y8G2Usqvb5XbGXx9gsNSeUZ2PCBha4TZ4ZYrmdha23D3D8rnE1nbwmMz8J7h
nwVnHpIQnE1fYdCcjq9aXmwooDyD03qaj6Th7vDS2qthJEjVfX8T5pGKo0/e
yGFTvtChnnOKnYI/blTdzBNOAmdyyLV5WzL+sqPgXSzl0anrnC2vE7Hih9VL
+iif5OV7kCr7GF+IEWjZFEHCRvlju1NXx+OkDUa74yjf1R79JeEbi2NrnYqa
KE9eCahJ+RGNldDrHp5IEk4774iVsIjCQ/WiEQcoF4e8tUjpjMBqBg79ppQl
0iwPSGiH44vKBCeEckARH09K8UNM+DQosCj3JZ3KUDsfio/m5qp1UH5WH3ZE
TTkYP2hEg7OUPRaa+2FjAGbddxMWjCJBW0rQE7jvYoe1J/qkKYucNhCHTz5Y
fnu+MlCuW9xqdzvUE69fHi1jQNnyQka21xkXzJOwwDKhzMPa9slT3B7fV21t
sKEMYrqqvzjXsPjnDV6OlL/FxplPxxngHrGOMhfKt2iRlZoHD6HG4YU4V8qy
8WbVQgpXUNloAK8z5T6xgq/LV9qik3p+SxmUT8t3lfirMdHHxq+PLCiT78/d
uefhjgrY9VUXKK/gTEhWGHmjV82Sd7Upo4in/hUuvqg68HfnAcr2FjZjFZH+
6Oy7i3gj5dRDu3QrCwJRmriBMg/lNoGJvMqGEJTk+VlnhFof3oGc1VUTD9D7
B9LTFZQfXTigZOYXhnxdpXclUz6gHmUzJBiBTCbnF1woN+yefWSWEokImYxL
upS5uIhFs9IYJD08NTRO7W/cmJDcJ904NJVaxEtQ3tfKNDXviUenXr8q9aBs
nrm/0vznY/Q9q+XrP6p+/j6InPvkn4Ru7tp8/RXlOpVfEYVByajdVsSJSdlc
yqhyn1gqWvH4rkEvVZ971/H3OQykInq62pZgyn9XFs8VPklDf+LkAhQoRy+I
7ZBXyEAi94+J+FL1Xl3/Pkj+dBaSb/2s+Z3qH0vX7mrjXdnIrF+H4UmZb2sP
jx89B/FGTUfTKR/36PVqYz1Flv58H+j3Sajf2e/gJJSPpH4tO9NG9a9te3/+
48l81Naw2u4wZX9gzJmaPkevJpMC0wNJ2D7JkA9WKkBZfXGl5gHUeOoOz3rG
C1Fu0z05gsqTg3EzdVOGLDSooGCw6EeNP+UwTi9nIfGvik4alLPjHbfvTmCj
bXIV5ZVUHo1PM1Nu6ZAov+9yaDSVZ7bJLlEbcovQQpSvshuVjypz8yw50WJ0
KNef7etCgoCua4uGXzHajlcoBjlT/TDvuvLmxVeIVfDaKJhJwlc998BSgdeI
1V+46zKDhJdepaX5Chy0fZ+Ko+Z1EpKz/70rsuWg8c1Xq1dbUP3WdvhDeSoH
vT1/Wva9OZUv0vh3539l6E2UkuJFUxIW2vFBrs9lyBFVaMlfIkFJpqxQP6Yc
ndDn4pIyoOqnrSO6tKYcDSlsLK3Tp/bPY9J9959ydFSzQPzmSSp/akTU+a5W
oBKr0oIsXRLWXLvZiqUrUZDxbatZTSovHq37IVtahabuz0R+USIhScD5wIrh
GhSKqtovUedjPCtYzEOkFl0LGXoZu5Haf6OUv6Patej4ZOSppvUkhGTVV1bk
1aJdCb8zD4iR4HpU0vCWax3qDtm80LWaBINbTc4Ty98hD079wh3qvKY5C/ea
izUh4bvHn1sPEmBkktPycn8TorUU71zZT0DhcVQjoN+EGPVln/Op+4PpJiuS
7d+EknG2wkgndR94W/KQ50cTKrw9rC7VQIDvOnON9IZmlJN47shsEQE8ZYV5
Q76tyLOEY9oVSsDFp1oZikmtKLVvjI8vhAB2VG9CcHErmsof3LQ/kABza95A
+elW9E5UNdPHl4DKNUZmvpfbkGsoDc24EOBvwS0qeagdHUu2XZA2IWCpgL6P
6dcOpPXhSf4SWQLObzfiKCzrRDP8O3LbpQnIOWK+yL+1E6XblNukbidAz83V
k3WhE50ZK1PaJ0FA9EiyG09lJ3oqa62xS4gAqbJp+8yELqSwxMfLb4ENGs4R
puPHutFJUs6gv4wNvgMd6g5pH5CJHNshTpsNzxP89b1mBtEviWp+IV0W2KWa
r/pkOIz2zAkEdgsVwmXr+A33fEZRdfOzbWJdzyHwlPMh+UcTyGBlUMl2iXzg
EYoauf3rKwKHP0/WaORCZ93db34rp9HRtyJty6Oy4ayHqUJ8+QxabFiL9xCZ
YLt8YkuD0Q80JvwxYWZdOmx6WhXNOz6LtuyqUVqTlwIeL9VPr0yYR9eXPtRR
sU0ERqYtqbBnAWWYvjC02x0PAjRFU9nhX6i1vsFK9V8UaNw4EyUd8QeNJzfU
3TkbDqJFG+w0tv5DFaNj+2TTQiHcISBsb+ciiiiaLN85HQAG/idlHpNc8DDn
WOJJEz+QNvY7m+7JDYXJkm3V973hgj0pyOPDDaIdoTWBXt4QcG+00cyPG7SM
fHsM7bxhmKV7XDKYG9wWstQET3lDsoAwSo3lBuFzv0NXCHuDcGnGjmQWN4yJ
1bdKHr4NXBLVvxPGuOF+RKj3ZWdP6BhZlhpxlgZCEecEdLe5Q9WZwEdF52nw
5IFlJ17hDuQbvph+YxocfmfQcnTODaITl4bsMqWB/ZdqhTvVbnDWcIlz+U0a
mPPntNZYu0FbJdfx7/doIHPfe/tdtiu0pM9PGxTTAO32cnU44wINpsNqgpvo
4Na1NfJCBRMGeZ78jNpCB8M7p3Ii85jwI9MyX0yKDjLdrNiPsUwQm5hYLyFD
h4tdTk3kDSaYO87M71Gmg18P2xaJMuGX7+KzE+fo8Py0sWk1wxGkMsTEAx/Q
wajkSp/pHgc4pNXTJBBBh9423oWP6xxAd+zRvYfRdLjP5ejD5HMAe5nNszGP
6TBwoTSvbtAeSgippsyndGC9DlHTjrIHgyp5/4pqOny9f/yOyyIDrlnOqhyr
owOtsFx52RcGuPK/+F7XQIf1fv7Pn3Yz4LGe0tXWdjqILMQmbSEZMNoBKh+H
6LDESfNy5w0G/HKlfb/2mQ4j86dKvhgzYMW6iuyxcTroLNH0FDrOgH1XtESm
p+lwNmHkd7gUAzS4lzUwZ+nAoMWljQsx4Hxard/Pn9R6laA7BnQGWGuEKN/6
Q83X761Y1JAd/N/7Bvz/+8b/AG0KZvs=
"]]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-2.5, 2.5}, Automatic},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{{3.65807626463237*^9, 3.658076279167932*^9},
3.662577609843607*^9, 3.6625778242232523`*^9, 3.662577944421152*^9,
3.662578453437272*^9, {3.662580571130674*^9, 3.66258059331846*^9},
3.66258084039923*^9, 3.662581624516749*^9, {3.662581870798111*^9,
3.662581893522916*^9}, 3.6625820729093847`*^9, 3.662583239217573*^9, {
3.662583435499381*^9, 3.662583464711011*^9}, 3.662587714569668*^9,
3.66258777513518*^9, 3.6625881431149282`*^9, 3.662588213274667*^9,
3.662594025732318*^9, 3.66259413189614*^9, 3.662597383787098*^9,
3.662597934072576*^9, 3.6626023514460583`*^9, 3.662937887968569*^9,
3.663809567347706*^9}]
}, Open ]],
Cell["\<\
The close match between the thin and thick black indicates that this \
combination of two species uses up most of the resources available.\
\>", "Text",
CellChangeTimes->{{3.658076411800499*^9, 3.658076432335959*^9}, {
3.662581629886776*^9, 3.662581633350753*^9}}],
Cell["\<\
Bin counts for the number of each genotype (in 0.01 bins). For clarity, the \
bars in the histogram are doubled in height:\
\>", "Text",
CellChangeTimes->{{3.662583318449308*^9, 3.6625833393129597`*^9}, {
3.662596866463876*^9, 3.662596892374929*^9}}],
Cell[BoxData[{
RowBox[{
RowBox[{"bc1", "=",
RowBox[{"2",
RowBox[{"BinCounts", "[",
RowBox[{"genotypes1", ",",
RowBox[{"{",
RowBox[{
RowBox[{"-", "2.5"}], ",", "2.5", ",", "0.01"}], "}"}]}], "]"}]}]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"bc2", "=",
RowBox[{"2",
RowBox[{"BinCounts", "[",
RowBox[{"genotypes2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"-", "2.5"}], ",", "2.5", ",", "0.01"}], "}"}]}], "]"}]}]}],
";"}]}], "Input",
CellChangeTimes->{{3.6625796146565323`*^9, 3.6625796162285557`*^9}, {
3.662580631664425*^9, 3.6625806412550507`*^9}, {3.662580743946993*^9,
3.662580744058728*^9}, {3.662581950492279*^9, 3.6625819556038*^9}, {
3.662588118943726*^9, 3.662588120031605*^9}, {3.6625969971247253`*^9,
3.662596997868536*^9}, {3.662597906431405*^9, 3.6625979074232473`*^9}}],
Cell["Peak occurs at:", "Text",
CellChangeTimes->{{3.662562965019528*^9, 3.662562967234468*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"FindRoot", "[",
RowBox[{
RowBox[{
RowBox[{"D", "[",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",", "u", ",", "tryKm"}],
"]"}], ",", "u"}], "]"}], "\[Equal]", "0"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "1"}], ",", "0"}], "}"}]}], "]"}]], "Input",
CellChangeTimes->{{3.661345725944672*^9, 3.661345803032847*^9},
3.66258246225274*^9, 3.662588219092043*^9}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"u", "\[Rule]", "0.`"}], "}"}]], "Output",
CellChangeTimes->{{3.661345728180367*^9, 3.661345803756647*^9},
3.662562912517063*^9, 3.662562977259493*^9, {3.6625810169719877`*^9,
3.6625810259057426`*^9}, 3.6625813205092173`*^9, 3.6625813677004766`*^9,
3.662582464690024*^9, 3.662583239290604*^9, {3.6625834355813627`*^9,
3.662583464801539*^9}, 3.662587733296154*^9, 3.662587775201715*^9,
3.662588146083415*^9, {3.662588213341176*^9, 3.662588219724992*^9},
3.662594025798562*^9, 3.662597383868997*^9, 3.6625979341391993`*^9,
3.662602351540077*^9, 3.662937888101141*^9, 3.663809567395924*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"maxheight", "=",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",", "u", ",", "tryKm"}], "]"}],
"/.", "%"}]}]], "Input",
CellChangeTimes->{{3.662580070809471*^9, 3.662580079704524*^9}, {
3.662580174205254*^9, 3.662580177645094*^9}, {3.662582327255519*^9,
3.6625824049239683`*^9}, {3.662582469659295*^9, 3.662582473289554*^9},
3.662588221811846*^9}],
Cell[BoxData["5781.4715275775625`"], "Output",
CellChangeTimes->{{3.6625823536178703`*^9, 3.662582357195736*^9}, {
3.662582387556489*^9, 3.6625824063901176`*^9}, 3.662582474209477*^9,
3.6625832393560467`*^9, {3.662583435632378*^9, 3.6625834648523006`*^9},
3.662587735430732*^9, 3.66258777523449*^9, 3.662588146964872*^9, {
3.662588213374008*^9, 3.662588222241417*^9}, 3.662594025832531*^9,
3.6625973839193907`*^9, 3.662597934172222*^9, 3.662602351590672*^9,
3.662937888168601*^9, 3.663809567426605*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Max", "[",
RowBox[{"Join", "[",
RowBox[{"bc1", ",", "bc2"}], "]"}], "]"}]], "Input"],
Cell[BoxData["2186"], "Output",
CellChangeTimes->{
3.662580692246052*^9, 3.662580840532552*^9, 3.6625816246162786`*^9,
3.662581733047514*^9, 3.662581996747649*^9, 3.662582031068849*^9,
3.662582073040482*^9, 3.662582479676291*^9, 3.6625832394063787`*^9, {
3.6625834356825533`*^9, 3.66258346491892*^9}, 3.662587736465025*^9,
3.662587775268847*^9, 3.662588148449337*^9, 3.662588213406611*^9,
3.662594025866521*^9, 3.6625973839695807`*^9, 3.66259793420562*^9,
3.662602351641036*^9, 3.662937888251596*^9, 3.663809567460223*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Graphics", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"EdgeForm", "[", "Blue", "]"}], ",", "Blue", ",",
"\[IndentingNewLine]",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{"Blue", ",",
RowBox[{"Rectangle", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2.5"}], ")"}], "-",
"0.005"}], ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2.5"}], ")"}], "+",
"0.005"}], ",",
RowBox[{"bc1", "[",
RowBox[{"[", "i", "]"}], "]"}]}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "bc1", "]"}]}], "}"}]}], "]"}], ",",
RowBox[{"EdgeForm", "[", "Red", "]"}], ",", "Red", ",",
"\[IndentingNewLine]",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{"Red", ",",
RowBox[{"Rectangle", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2.5"}], ")"}], "-",
"0.005"}], ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2.5"}], ")"}], "+",
"0.005"}], ",",
RowBox[{"bc2", "[",
RowBox[{"[", "i", "]"}], "]"}]}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "bc2", "]"}]}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"AspectRatio", "\[Rule]",
RowBox[{"1", "/", "GoldenRatio"}]}], ",",
RowBox[{"Frame", "\[Rule]", "True"}]}], "]"}]], "Input",
CellChangeTimes->{{3.662579808750051*^9, 3.662580000968864*^9}, {
3.662580093697451*^9, 3.662580094976821*^9}, {3.66258012727341*^9,
3.662580128536862*^9}, 3.662580189485834*^9, {3.662580451133957*^9,
3.6625804529645967`*^9}, {3.662580652377059*^9, 3.662580753181138*^9}, {
3.6625819636696463`*^9, 3.6625819718210773`*^9}, {3.662582171463114*^9,
3.6625822820832243`*^9}, {3.6625833930007057`*^9, 3.662583395640477*^9}, {
3.6625881544318027`*^9, 3.662588158111795*^9}, {3.662588236660927*^9,
3.662588244430152*^9}}],
Cell[BoxData[
GraphicsBox[{
{RGBColor[0, 0, 1], EdgeForm[RGBColor[0, 0, 1]],
{RGBColor[0, 0, 1], RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.245, 0}, {0.255, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.265, 0}, {0.275, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 2}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 144}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 916}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 314}]},
{RGBColor[0, 0, 1], RectangleBox[{0.475, 0}, {0.485, 4}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.495, 0}, {0.505, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.515, 0}, {0.525, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.535, 0}, {0.545, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.705, 0}, {0.715, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.725, 0}, {0.735, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.745, 0}, {0.755, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.765, 0}, {0.775, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.785, 0}, {0.795, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.955, 0}, {0.965, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.975, 0}, {0.985, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.995, 0}, {1.005, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.245, 0}, {1.255, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.495, 0}, {1.505, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.745, 0}, {1.755, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.995, 0}, {2.005, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.035, 0}, {2.045, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.075, 0}, {2.085, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.115, 0}, {2.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.125, 0}, {2.135, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.165, 0}, {2.175, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.205, 0}, {2.215, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.245, 0}, {2.255, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.285, 0}, {2.295, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.325, 0}, {2.335, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.365, 0}, {2.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.375, 0}, {2.385, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.415, 0}, {2.425, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.455, 0}, {2.465, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.495, 0}, {2.505, 0}]}},
{RGBColor[1, 0, 0], EdgeForm[RGBColor[1, 0, 0]],
{RGBColor[1, 0, 0], RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.715, 0}, {-0.705, 10}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.705, 0}, {-0.695, 212}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.695, 0}, {-0.6849999999999999, 650}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 1706}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 2186}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 2170}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 1254}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 494}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 110}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 24}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 2}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.995, 0}, {2.005, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.035, 0}, {2.045, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.075, 0}, {2.085, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.115, 0}, {2.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.125, 0}, {2.135, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.165, 0}, {2.175, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.205, 0}, {2.215, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.245, 0}, {2.255, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.285, 0}, {2.295, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.325, 0}, {2.335, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.365, 0}, {2.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.375, 0}, {2.385, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.415, 0}, {2.425, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.455, 0}, {2.465, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.495, 0}, {2.505, 0}]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Frame->True]], "Output",
CellChangeTimes->{
3.662582241974265*^9, 3.6625822836156483`*^9, 3.662582482488243*^9,
3.66258323960738*^9, {3.662583435834234*^9, 3.66258346507699*^9},
3.66258773734153*^9, 3.662587775416357*^9, {3.6625881509108953`*^9,
3.6625881615592117`*^9}, {3.662588213552479*^9, 3.662588244917453*^9},
3.662594026006328*^9, 3.662597384113347*^9, 3.6625979343605223`*^9,
3.662602351790262*^9, 3.66293788842937*^9, 3.663809567605476*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"histoplot", "=",
RowBox[{"Graphics", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"EdgeForm", "[", "Blue", "]"}], ",", "Blue", ",",
"\[IndentingNewLine]",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{"Blue", ",",
RowBox[{"Rectangle", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2.5"}], ")"}], "-",
"0.005"}], ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2.5"}], ")"}], "+",
"0.005"}], ",",
RowBox[{"bc1", "[",
RowBox[{"[", "i", "]"}], "]"}]}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "bc1", "]"}]}], "}"}]}], "]"}], ",",
RowBox[{"EdgeForm", "[", "Red", "]"}], ",", "Red", ",",
"\[IndentingNewLine]",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{"Red", ",",
RowBox[{"Rectangle", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2.5"}], ")"}], "-",
"0.005"}], ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2.5"}], ")"}], "+",
"0.005"}], ",",
RowBox[{"bc2", "[",
RowBox[{"[", "i", "]"}], "]"}]}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "bc2", "]"}]}], "}"}]}], "]"}], ",",
RowBox[{"EdgeForm", "[", "Black", "]"}], ",", "Black", ",",
"\[IndentingNewLine]",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{"Black", ",",
RowBox[{"Rectangle", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2.5"}], ")"}], "-",
"0.005"}], ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"i", "/", "100"}], "-", "2.5"}], ")"}], "+",
"0.005"}], ",", "0"}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "bc2", "]"}]}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"AspectRatio", "\[Rule]",
RowBox[{"1", "/", "GoldenRatio"}]}], ",",
RowBox[{"Frame", "\[Rule]", "True"}], ",",
RowBox[{"FrameTicks", "\[Rule]", "False"}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.662579808750051*^9, 3.662580000968864*^9}, {
3.662580093697451*^9, 3.662580094976821*^9}, {3.66258012727341*^9,
3.662580128536862*^9}, 3.662580189485834*^9, {3.662580451133957*^9,
3.6625804529645967`*^9}, {3.662580652377059*^9, 3.662580753181138*^9}, {
3.6625819636696463`*^9, 3.6625819718210773`*^9}, {3.662582171463114*^9,
3.6625822250442657`*^9}, 3.662582290948475*^9, {3.662583269065585*^9,
3.662583271460498*^9}, {3.662583398837582*^9, 3.662583412630219*^9}, {
3.6625882565107613`*^9, 3.662588273949301*^9}}],
Cell[BoxData[
GraphicsBox[{
{RGBColor[0, 0, 1], EdgeForm[RGBColor[0, 0, 1]],
{RGBColor[0, 0, 1], RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.245, 0}, {0.255, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.265, 0}, {0.275, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 2}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 144}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 916}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 314}]},
{RGBColor[0, 0, 1], RectangleBox[{0.475, 0}, {0.485, 4}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.495, 0}, {0.505, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.515, 0}, {0.525, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.535, 0}, {0.545, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.705, 0}, {0.715, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.725, 0}, {0.735, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.745, 0}, {0.755, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.765, 0}, {0.775, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.785, 0}, {0.795, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.955, 0}, {0.965, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.975, 0}, {0.985, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.995, 0}, {1.005, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.245, 0}, {1.255, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.495, 0}, {1.505, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.745, 0}, {1.755, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.995, 0}, {2.005, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.035, 0}, {2.045, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.075, 0}, {2.085, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.115, 0}, {2.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.125, 0}, {2.135, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.165, 0}, {2.175, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.205, 0}, {2.215, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.245, 0}, {2.255, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.285, 0}, {2.295, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.325, 0}, {2.335, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.365, 0}, {2.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.375, 0}, {2.385, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.415, 0}, {2.425, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.455, 0}, {2.465, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.495, 0}, {2.505, 0}]}},
{RGBColor[1, 0, 0], EdgeForm[RGBColor[1, 0, 0]],
{RGBColor[1, 0, 0], RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.715, 0}, {-0.705, 10}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.705, 0}, {-0.695, 212}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.695, 0}, {-0.6849999999999999, 650}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 1706}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 2186}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 2170}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 1254}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 494}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 110}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 24}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 2}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.995, 0}, {2.005, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.035, 0}, {2.045, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.075, 0}, {2.085, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.115, 0}, {2.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.125, 0}, {2.135, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.165, 0}, {2.175, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.205, 0}, {2.215, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.245, 0}, {2.255, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.285, 0}, {2.295, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.325, 0}, {2.335, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.365, 0}, {2.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.375, 0}, {2.385, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.415, 0}, {2.425, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.455, 0}, {2.465, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.495, 0}, {2.505, 0}]}},
{GrayLevel[0], EdgeForm[GrayLevel[0]],
{GrayLevel[0], RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{GrayLevel[0], RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{GrayLevel[0], RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{GrayLevel[0], RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{GrayLevel[0], RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{GrayLevel[0], RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{GrayLevel[0], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{GrayLevel[0], RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{GrayLevel[0], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{GrayLevel[0], RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{GrayLevel[0], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{GrayLevel[0], RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{GrayLevel[0], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{GrayLevel[0], RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{GrayLevel[0], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{GrayLevel[0], RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{GrayLevel[0], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{GrayLevel[0], RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{GrayLevel[0], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{GrayLevel[0], RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{GrayLevel[0], RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{GrayLevel[0], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{GrayLevel[0], RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{GrayLevel[0], RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{GrayLevel[0], RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{GrayLevel[0], RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{GrayLevel[0], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{GrayLevel[0], RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{GrayLevel[0], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{GrayLevel[0], RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{GrayLevel[0], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{GrayLevel[0], RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{GrayLevel[0], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{GrayLevel[0], RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{GrayLevel[0], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{GrayLevel[0], RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{GrayLevel[0], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{GrayLevel[0], RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{GrayLevel[0], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{GrayLevel[0], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{GrayLevel[0], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{GrayLevel[0], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{GrayLevel[0], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{GrayLevel[0], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{GrayLevel[0], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{GrayLevel[0], RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{GrayLevel[0], RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{GrayLevel[0], RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{GrayLevel[0], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{GrayLevel[0], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{GrayLevel[0], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{GrayLevel[0], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{GrayLevel[0], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{GrayLevel[0], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{GrayLevel[0], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{GrayLevel[0], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{GrayLevel[0], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{GrayLevel[0], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{GrayLevel[0], RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{GrayLevel[0], RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{GrayLevel[0], RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{GrayLevel[0], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{GrayLevel[0], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{GrayLevel[0], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{GrayLevel[0], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{GrayLevel[0], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{GrayLevel[0], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{GrayLevel[0], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{GrayLevel[0], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{GrayLevel[0], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{GrayLevel[0], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{GrayLevel[0], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{GrayLevel[0], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{GrayLevel[0], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{GrayLevel[0], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{GrayLevel[0], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{GrayLevel[0], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{GrayLevel[0], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{GrayLevel[0], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{GrayLevel[0], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{GrayLevel[0], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{GrayLevel[0], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{GrayLevel[0], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{GrayLevel[0], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{GrayLevel[0], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{GrayLevel[0], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{GrayLevel[0], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{GrayLevel[0], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{GrayLevel[0], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{GrayLevel[0], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{GrayLevel[0], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{GrayLevel[0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{GrayLevel[0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{GrayLevel[0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{GrayLevel[0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{GrayLevel[0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{GrayLevel[0], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{GrayLevel[0], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{GrayLevel[0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{GrayLevel[0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{GrayLevel[0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{GrayLevel[0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{GrayLevel[0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{GrayLevel[0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{GrayLevel[0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{GrayLevel[0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{GrayLevel[0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{GrayLevel[0], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{GrayLevel[0], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{GrayLevel[0], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 0}]},
{GrayLevel[0], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{GrayLevel[0], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{GrayLevel[0], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{GrayLevel[0], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{GrayLevel[0], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{GrayLevel[0], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{GrayLevel[0], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{GrayLevel[0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 0}]},
{GrayLevel[0], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{GrayLevel[0],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{GrayLevel[0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{GrayLevel[0],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{GrayLevel[0], RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{GrayLevel[0],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{GrayLevel[0],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{GrayLevel[0],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{GrayLevel[0],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{GrayLevel[0],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]},
{GrayLevel[0], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{GrayLevel[0],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{GrayLevel[0],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{GrayLevel[0],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{GrayLevel[0],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{GrayLevel[0],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{GrayLevel[0],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{GrayLevel[0],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{GrayLevel[0],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{GrayLevel[0],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{GrayLevel[0],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{GrayLevel[0],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{GrayLevel[0],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{GrayLevel[0],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{GrayLevel[0],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{GrayLevel[0],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{GrayLevel[0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{GrayLevel[0],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{GrayLevel[0],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 0}]},
{GrayLevel[0],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 0}]},
{GrayLevel[0],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 0}]},
{GrayLevel[0],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 0}]},
{GrayLevel[0],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 0}]},
{GrayLevel[0],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 0}]},
{GrayLevel[0],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 0}]},
{GrayLevel[0],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{GrayLevel[0],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{GrayLevel[0],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{GrayLevel[0],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{GrayLevel[0],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{GrayLevel[0],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{GrayLevel[0],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{GrayLevel[0],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{GrayLevel[0],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{GrayLevel[0],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{GrayLevel[0],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{GrayLevel[0],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{GrayLevel[0],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{GrayLevel[0],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{GrayLevel[0], RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{GrayLevel[0], RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{GrayLevel[0], RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{GrayLevel[0], RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{GrayLevel[0], RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{GrayLevel[0], RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{GrayLevel[0], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{GrayLevel[0], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{GrayLevel[0], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{GrayLevel[0], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{GrayLevel[0], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{GrayLevel[0], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{GrayLevel[0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{GrayLevel[0], RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{GrayLevel[0], RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{GrayLevel[0], RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{GrayLevel[0], RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{GrayLevel[0], RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{GrayLevel[0], RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{GrayLevel[0], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{GrayLevel[0], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{GrayLevel[0], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{GrayLevel[0], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{GrayLevel[0], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{GrayLevel[0], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{GrayLevel[0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{GrayLevel[0], RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{GrayLevel[0], RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{GrayLevel[0], RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{GrayLevel[0], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{GrayLevel[0], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{GrayLevel[0], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{GrayLevel[0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{GrayLevel[0], RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{GrayLevel[0], RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{GrayLevel[0], RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{GrayLevel[0], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{GrayLevel[0], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{GrayLevel[0], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{GrayLevel[0], RectangleBox[{1.995, 0}, {2.005, 0}]},
{GrayLevel[0], RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{GrayLevel[0], RectangleBox[{2.035, 0}, {2.045, 0}]},
{GrayLevel[0], RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{GrayLevel[0], RectangleBox[{2.075, 0}, {2.085, 0}]},
{GrayLevel[0], RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{GrayLevel[0], RectangleBox[{2.115, 0}, {2.125, 0}]},
{GrayLevel[0], RectangleBox[{2.125, 0}, {2.135, 0}]},
{GrayLevel[0], RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{GrayLevel[0], RectangleBox[{2.165, 0}, {2.175, 0}]},
{GrayLevel[0], RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{GrayLevel[0], RectangleBox[{2.205, 0}, {2.215, 0}]},
{GrayLevel[0], RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{GrayLevel[0], RectangleBox[{2.245, 0}, {2.255, 0}]},
{GrayLevel[0], RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{GrayLevel[0], RectangleBox[{2.285, 0}, {2.295, 0}]},
{GrayLevel[0], RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{GrayLevel[0], RectangleBox[{2.325, 0}, {2.335, 0}]},
{GrayLevel[0], RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{GrayLevel[0], RectangleBox[{2.365, 0}, {2.375, 0}]},
{GrayLevel[0], RectangleBox[{2.375, 0}, {2.385, 0}]},
{GrayLevel[0], RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{GrayLevel[0], RectangleBox[{2.415, 0}, {2.425, 0}]},
{GrayLevel[0], RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{GrayLevel[0], RectangleBox[{2.455, 0}, {2.465, 0}]},
{GrayLevel[0], RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{GrayLevel[0], RectangleBox[{2.495, 0}, {2.505, 0}]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Frame->True,
FrameTicks->False]], "Output",
CellChangeTimes->{{3.662579824150284*^9, 3.662579924329763*^9},
3.662580001591158*^9, 3.662580129220911*^9, 3.662580190033875*^9,
3.6625804772897387`*^9, {3.662580696313774*^9, 3.662580703460107*^9}, {
3.6625807358676767`*^9, 3.6625807535413103`*^9}, 3.662580840661969*^9,
3.6625816247405653`*^9, 3.6625817331683407`*^9, 3.662581996897464*^9,
3.662582031224821*^9, 3.6625820731882143`*^9, 3.662582175253334*^9,
3.662582225657587*^9, 3.662582292018343*^9, 3.662582485226413*^9,
3.662583239773934*^9, 3.662583272238402*^9, {3.662583436065441*^9,
3.662583465305127*^9}, 3.662587740194337*^9, 3.662587775635377*^9,
3.6625882137623777`*^9, 3.662588275140965*^9, 3.662594026212221*^9,
3.6625973843259*^9, 3.662597934567154*^9, 3.662602352010769*^9,
3.662937888628325*^9, 3.6638095678201017`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[",
RowBox[{"competitionplot", ",", "\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",", "u", ",", "tryKm"}],
"]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2.5"}], ",", "2.5"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Thick", ",", "Black"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]", "histoplot", ",",
RowBox[{"Axes", "\[Rule]",
RowBox[{"{",
RowBox[{"True", ",", "False"}], "}"}]}], ",",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "2.5"}], ",", "2.5"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "maxheight"}], "}"}]}], "}"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.662579485856509*^9, 3.662579491127986*^9}, {
3.6625802104607067`*^9, 3.662580220555599*^9}, {3.662580463397059*^9,
3.6625804711235657`*^9}, 3.6625805460433283`*^9, {3.662580784833908*^9,
3.662580785617728*^9}, {3.662581907117942*^9, 3.6625819247652273`*^9}, {
3.662583506820209*^9, 3.662583524650764*^9}, {3.662587747828969*^9,
3.662587747988434*^9}, {3.6625879196583347`*^9, 3.662587919849329*^9}}],
Cell[BoxData[
GraphicsBox[{{{{}, {},
{RGBColor[0, 0, 1], Dashing[{0, Small}], LineBox[CompressedData["
1:eJwt13k0VP//B3CMkuhTSokoREkkWyX0eomiUiklScm+JGuNUamUZeZmLSmK
dtmlxdJiFNFH1oqUkGQdZu7M2MIn3/s75/fHPXMe587c93nd9/P1unNVXPz3
u4uJiIh0U8f/fYb17RbMzNDK28U/u62Ut8Pes0tG26Zp5T43AmcilOxwz4LO
8eI/tPK168Tb+lTsUNko4D9/Ia1cP/27XaGmHb4jrs752Usrl1LS8rM1scM5
674uL6+jlbOOz778xckOk04d33XxFq1cY8wptu6xHeaIBj8U2UgrD/aXlSky
PoSz3C315I+KlXeG5BB34u1xUet73/uJouX7o4zzK3sP4/6KVNc1NSLlp7J1
9jTtO4Jneaa+Cd0z7GLTIb2kaUcsCUn1Kdj7l+34ZZ67TN4x3HP1oPLflGm2
d/Qa71sHj6Nl2ps9VkOT7NRii6pjns6YUR3aEnzkD3tKLYIzFuaCxyKSFjdk
jrOXdtMqD3xwxfPHaflSi8bYgpwFe+0U3FFEewXbPHKEbbLJ1fNuhAd+v5IS
ndMsYJdM/kw8auCFinO9ska28tn01t/+hTxvPGGoOatNkceu7axNfSjqi64b
OzIrKjjs0/KcjGozP9RkbJ7xe9jPNqf5Hjq6IwDvtdtWhpr1sDUO7InNzA3E
vvDFJpZLf7FzZF+747JgfHldY1u/XTu7zjDqrvunU7h+4NuITloLe0VwkcSz
AjpavGyT/M+ukT0xVrdQN4WBAVkFEzKLKtgDoSurYjrOoJ3HynufzmWxr9Wk
v/ysHYbVtd8IfdtMmFXD1e9Nu4Cbtd8+tblRAUFKriarNoWjGH3xDzf5RnCh
7zZnpF5CCWmbcBduC2TtLI6sUo/Ayz9bzIMetEPE4CMtmexIfHIryua8oAuC
HATikhLR6H/fbcFvux5oOB3bp+7MxLjQlNtxrj2gfzXiXqs7E/Nt6jWMAnrg
n9Nlx5g+TOT+3WgWx+qBnK+zmzqCmeh7RCpo0+se8GNbynlGMdFH9unnGJVe
iF2/c0tXNhM9omaSDYd6gXtmU54jn4lRRw1W/pzohZbkALXHo0zMMPAuIGb1
QbmK3gLuHyb2/PpU3bm8D6Y0n+sHirHQDTImWPv6wKzuiY71Iha6TFg7dBT1
Qcw+Q419Biw85pOqFB3eDznq778xglk49U2ynh/bD1d3Km7fEMLCmztCzzum
9oP5YpUq3hkWNmnYd+o+6wf5knC+3SUWWvQtvvfjdz8Ev7JijiawcI1bopqe
1QD88b1sG5DHwpGjzLXt/wxCxfqpdrNuFibUjbdZLhsEdZ8vh870slDb1DPm
6epB+Kw/52T+AAs9FLcPR+MgPAuyPCJJsvDbd1qBXtAgMGzcf7OmWVh26IIe
s3kQKi133HkqSyBrH91I/zYHWFf/brhiRuDVWk3f3CwOpJN3Od4WBN627ExX
L+bA34UpY1stCXxiaiW+9BMHfJk0kd/WBLauUWiYlhiCJI2w012HCNQQK3Or
Ch6CqeovGVW+BOqFBd2A8CEIvP9u2sqfQJOJVTUlcUPQPG/05PtAAm248To5
WUOw6PihpFw6gSHfnSfjO4fA5MtEov5FAquezko4vGsYOP/uClC5SmCj9st3
n+yHQfGFH8c8icDvmX6juzyGgTU4tvt4MoHc9K8OW8KHwfue9ZuoVAKXXMlS
X1k8DOYcZyHrPoHurrtfDalyoeKn307PQgL9OkS57uu5ICWzom/VMwIZh4uU
O025cLZwE/x8TmDM3hVRTfZceJJRK4clBD435tsUxXHB5N+Dq5+XESgue733
wiQX1jywrThRQ+BC7vl/FkrwYOWNPLGCjwSqfPDa8HARD+yLT+QP1RK45ZxJ
1ActHszJ+2pxqIHA0N/d6jJOPHh0wsJ84DOBzLK63Q9O8GCtjsermS8EJt8s
Pm3I4EGRjnrSghZqfesr7w8n8uAkV8FFpZWq97me+/0KHvTI1O2aaSPwvzjF
WINGHjxpin/Y/4NAae/ZL6p+8GCbfK9tbTuBa5S+i3NGeXDqcH3hpU5qf6ec
k7eIkiB6V+/YwZ8EPui3y46WICFlQYOjaheBT9/hJ3lZEkxPP7DO+UVgaYFh
r4sCCRO1vcae3QSW39aczFGmfr88NFTpN4ENdFnVLdokzPYk2xg9BA5p9ge6
bCehzCpyFaePwBG59sgcaxIiur0DQvsJnBL/lDKyn4TSNDUxsQEC53a+ehvl
RMLrLO9J0UECZWqfNDe4kxBdk+sUSnlp6aOBpb4kmORsnMuhvPpavEwOgwT9
S71abzgErrsYoT5ynoS8jP8eKA0RuOFkqJFpJAmnOFuPMSibOvjtjrpCgpLB
1iN1lC0sXZ0bEkkwKo5LVRwm0NrA/vTSmySsFatY5kHZVmU3yzmdhMnxix1Z
lB3+2ZqW/ZAE6ebAX32UXaY2FAqzSWBpb1+tzCXQu3/te5NCqj7yRe5+ygHN
yt8ii0mQ8roYdIEy493i4fo3JHgZ+TIyKF8omCu6tJIEHU/LsmrKUbdnZJ1r
SEiy6TPvphzHGtHIbiQh8amG5B/K1+kDJsIWErwzefMkedT+uXbYmLSTEJiz
ev8iyg9tPrtFdpMQmVTRLEc5x/QDo36AhKjUNzeXUH6q+SZGjiShy1bu1nzK
L+We3j0+RsKlF99+iFF+K/74edY0CW8WLT5GUut94N/6IBDjw1yVruWtlBs7
En4YS/KBxXVc8ZLy14+RZMR8PnQM5jslU07akrbt4BI+vFEbX+FNeX/h81R1
JT5YkNnLDSkvUKvlja7kg1XyUsdJ6v7VJ3dbVGnywZR5s7WEcozkVEqyLh/+
OMUmBVDeeW4hz2MTH3J/uCaoUK5yNkuR2M6HMsatHf7U/kV8sed+tebDw+o5
c6Qpb7UMMM+05UP54oA596k8lGndGbZy5sOrw8+bSqm8nLtTtFXeiw+1rtxb
xpQ3L6y/MeBHXT/hR3YRlb+i8Wkz4hwfzBz+ptyk8nnKR/aGw2Wq3vTOszNU
fvXa1w5pEnyQ29P4yIly/juH5I83+NCenNUs1Uugr2EQ51Y6dX52QvshKv+a
mSz0fcQH7chw3TSqPzJiSwaln/Hhqhzv7SKqf9xEGqG9lA/SJSUi26j+Ug3u
S8or54PaGY0Ef6r/0u2XwJ56PswPE8t4QvVr8spT1+IH+KDlKPr5F9XvB5Kv
9DuRfFh3Vu51x3dq/kg+MF0/zgeVF90iX75R+eE29TWKC6D0wM8H2V+pfJXq
mCxUFsBw78GwOdS8sdCyTPy1SgBp2pWBDU0Eit051vtUWwAaFz0b4hsJPB8R
m2BrLAA12Yq66ToC6Xs5v5PsBKD1RX4e8wOBBu/ENrsfFUCcrVG4QjWBAgOF
eEM3AZhZ+vtlvKfmq8IOo5ZAAfR4vn2d/Y5Aj56MWLlYAQSmMDzdXxN48KzL
htQKAYQLZ0k8yqfqS5OdPf6vAN4UFbnwcglsYVc12zYKYEuTtI5BDoF24mtP
z2sXAGP4smreYwLtY4XPLo4JgCch/dzxLtWfdyJ0PdcIwdjC4erzBAJT324Q
rdQRQqRD4vzHcQS2dfc3Km8Qwk67jyuTYgh01Ngd8H2rEALd3yw7xiTwaOHi
gt2OQliwaXVS4QUCj1dkaBnEC6HAYPv8wycJvNtjP51wXQhxM2Nbx3wI7JKQ
qh2+JYSFLkab47yoeWDtf+JxphD2F7pcyHcl0LV5Y7bCOyHMN5xf+uQwVX/f
h9Wio0LYeH3u/TLq+eorxVGtdxgB1UgTZTk5AjmhL8WlnEdAfWOQqir1fPbp
Z/Vaeo5AtUJ6uIYMgZ7vNbLfBo9AZyDDbbUUtd4FD90XMSMwLnpGkfuXhYeF
XXC7bASG9fPc7vewcHtbq6OP6ijE3dRMYBewcEVOVfLswVGQ2qJffXcjCw/c
KSmtIUdB62XY0h36LCSuZf+IGx8F3dyzssPrqP8fZ+NU5WaNQcXabBWNVSys
sbbLX608BsMBk2onZFlI5/a8t7IbA2Pl+JA1JBPrdGeNEu/GYGzBrMHch0w8
W2JuO//WOKy4qRc7I8bEgAzfog06f+DVplYv7eIolBbb6LKuZxLSRroqxQwi
cdvJA9c1r01D6V2vPbl5l6l5r+S/Te0vRDPSFYUWl/BqEDNx/dcZeBasqebx
8SLuj9qrnVYkglaGMdGuU+dR80jEwYdhohhyOerIQPI5bOmVvH/toBgqmMvN
u77+DNa79JgtXEHDtREaRVxVBnaJP564rkpDl5KSaE0FBo5keBXIr6IhPKtu
9pZhoDyHo6iiTcPXJqW/BTMh6BYsGNcxpuF05sTLde0hOHl5Jm/3IRrq50fn
Wt8MwVWP5BVY8TT89FiOoSgTgkaWbY3S16jvb/98qmpOCFoP3I5OSKbhZnmV
lmCREAzUVh69kUbDG69UKlp5dHz9YlVjRg4NBS9MdT7W03F/lX5UZTUNo7yu
JeyLpaO716iJ1Ucahv15FKAbSUfG3GLhx3oaTgwzH8uG0TFtz2bnz800LHDX
WtLjS8f+FjT51U1DOd3c9jxrOk4yxITufTS0MZI6kmlBx3nLKrMGBmnYwJpa
nWFCRz0nSzk+n4b06M7cHC06bhOVrD81SsPbnyZcnqnR0f5BTcTEBA2HHnPd
yhTp6LMtxvjcNA2dypoKa2Xp+P/vh7hzqtCqQ5qO/wPtgg4m
"]]}}, {{}, {},
{RGBColor[1, 0, 0], Dashing[{0, Small}], LineBox[CompressedData["
1:eJwt13k0Ff//B3BcJFRIQvlkS6WkrAmfeUlCfC6ltCiyZKvIvitrRK5L9i1r
SLZ7R5K8rz1ZIpJCKUuWyE4S3/md8/tjzpzHOTPvmTPv5+v1fo+YheP5myxM
TEwjxPF/Z78f/81vbpIYVmSj8dDZaBjzEVjqXycx1sPZfk0vRgOZ5+vKi98k
xuUTuuHGv6NBVOXuX8cFEoN8UNnnCAsV6h7GcAyNkRjCw2k2UzupwHH04z+M
dhIjK1f4D65MhceuN/Tup5AYPQe4vwXep8IzZpccJmUSo3bqlaHE7hhgu6kt
J3SdhVH0w+DWOfdY2NnXeDuLysz4pXx9NObrYzhfn2x56C0Tg2a0YJVtFQ8+
v9RvRw9vIprkRS9VpUSo9Ei2LzHYQM0vJRbVBJKBHHNRdCNpHaVpTS/FX0wF
7bTXZJ2fa6jo6PbXym/SIa/Zq9fF5DeKtv5zpDDvCZgGP971Ln8F7W7eX3T1
YBb43yAVc+1cRnTKmk0gPRuYZPYhzZBFJPoqN8bkWi58jkh68OzDPPqT+Kr4
leFT2MtpW7B4ag4FigrxNugUwC1Fabb+vb+QabBIxG/KM7BU/pJfXz+Fpq2P
zV2bfA7Snic3HXLGUZTAlb7FXaWQOWjU4KUxiky9OQ9tNSiDHwG71LQFv6NE
R09Ne9tyqIo7qDVuPIgYW2Jpr/xpwGHyw5JZbRB9+ssqRgukgbFoXqCw2CBS
ONvd+zSUBvOFEgz9qQHU/9CUMzyKBocY/6iW3RtAIhyyQtLpNEic5D/und+P
fvO/FRiupoEbxizCvfYJjbOVVvKt0qCOlaG6/+snpGLfNlX4hwY8b/2v/tvw
CV2ePvAV26RB0YX1hLtRn5BUcP+SGTsdRuxW+D6If0JnzTQdPPnpcP7xNEe6
Xh+yFx8fZz9Gh2MTnxZl03rRzlHmy35WdHCdlTm0O7gX/Xv0tLejDR0qVwKu
b9j3otC/ppdM7emgwS7d1HaiF1UymSvK3SXGk/BOsOv5gArujxwo96GD23Xh
k9lcH5DIpQ8HeWLoUNV19Z6Adzeqx7MPy1bTYaOvmPb3RjcyrTcqLK+hw6kh
lvER7W6U/CgvUK6WDq0zhYa0Xd3IfuGNwoEmOgxw/REzLHuPPmbVGYy8o8Om
VkpD+HgXGvijN1f4nQ6nq/q3/jXuRGFcxCPZcCguzFVpVu1EW/R/a0RuwUEw
xdGOKtqJlPZMv6jeikPvCnuMXs875NFdG7ljOw77fYx50tY60COPjBBfARzq
Apa4QbsdSehLSjhJ4RBvEX67h6cdmYbf2bxyEAc7TZE2289tSKlm56a6NA48
bFoR1DttyMam/PqKDA5mYY+3Dse2ov4rymRZRRzWo+TZQ4daUHu/dm3ZKRw6
HZtvChe2oIMm/ml6p3HINjRpLHZpQbjumOuQFg5n+YKCP7K3oCJZKe4/Ojgk
xb1nOSTzBil0j6YtkHG47W5t8Xq5GbW4rPLfNMQBLq3VnmM0I2bePLeucziM
C4oHeBs1o7aKh1PJF3BQSnXabPVqQh3sPE6zV3Dg9GMzu6HZhN7y3Fg/YYLD
4PWkmkXuJvRV29Xc9xoOwftq/USeNKLBkZCyBVMcurN41h2aGlB5gYxyjiUO
dwtKVnl31iM5medmXLdxOLbdIejUUB06ETGWMkt4zvnIdpfndQiXUTrddQcH
Z7UCiR7tOsQrE9cT7IiD27sscrxvLSrXZO6lOxPvp2D+qUm3Fhnmulxwc8Fh
OXGf1YpALZrRf6R03BUHD4tUr8tlDGS4fUYsxQ2HhcnDuoptCHULKPoqe+Lg
Ss83jbdGSOpy2MZ7wst++11XmBAK6osYtPPCYZVnX8ZLxRo0tpRYHO6Ng9fn
FLpw52t0Qf5IBp8PDmvZgm997F+jqpXAiXjC60p8S+oZ1SjiTGcY1RcHPyYK
Z4ZKNepyvT+wxQ+HjRYuUaaeV0jWxeaBF2Hm62x6dRyvUKoLZYjsj0OgVOAN
iewqxHy96lE5YdbZDbdg9SrUPvaLwnsPB/ag1SdnnF+iZB0qtZbwA323iqfc
L9HRwN3RfPdx4BCYb+V4WokspQa/mRIO/+rwzU6jEm1P8A/NI8xZMLX8tv8F
yjFM95sgHOFsy33E/QUSHx1pOhCAA7faqNgjnhcoiInZwpxwFJuF8kxhBdK3
e0qOJ7zj3Rd9A60KpMIUG9lEODrRxKL0K47iaoP3zBPms+jz4PXGkcEbzT+C
gTjEHr74yJkfR626aYdVCfMvdWV1F9PRWopV0WXCcTXkSgVdOuKSc/FzIiwQ
1toeN0xDghn56SGEE87pDC/70ZBi3OSOOMKCexpXLwnSEPMPya4MwkkjGttf
lpcjsVDd77mEhYtrJIT/K0esoYaaTwmneqiq+PwoQ/OCJxazCYtoVJIHAsoQ
imFdSiGczqlopb63DA3aMLQohPf1lHmlV5SiRWnfMT/CT9KOUjYNS9FVKvmj
DWHNDmPd2t4SZO1wQfA/wmfMDV2DuEoQa0VpgQxhnUXdDC0oRhpekRFbCZ99
oPl2i9tztGdSoGaI+D76wupLLQVFKPxiiAaNMPm5kmjkl2co9sBOgQDC5+CY
HnnnMxQ9zqx2lrCxtUTme98ClPFFyq+DmK+HTi5hMXg+smH7vPGQ8Gvfesfz
M09RKInBrElYMtby3/dmeUjEOjYyl8jH5XTa/pjEXITpnNllSDiigLTtfFcO
OrZWIbpM5GseZfd3ncpGj4KTaxUIS7Uu1FF9spDUi81L7UQ+r/RqFp6jZ6IL
t7e4mBNm/Bz27Nr/BPFSRFV8iXz/I69zJIs3GZmzZu7yJeojRHd8TSwoEcl7
CH+bJernp1lYS+ZiPGpz4lIyJ1wV+cY682Msku46cE+BqLfnbdRTGqoR6E2A
bnYuUZ8+v7u+wj9hqKbi0rtlon51pfj8gDkEzXLzR2gSbt2UdLwX5Ye4zYXx
d0T9zyYmWc0lnUfykZLT5UR/8GV53HjmhArW5nS6dMgBh6PJls38SmbYl65c
Tk7CRvJ91aEartjb9WvhBkS/cbK+NdHwOBT7GLG7PdcWhyyVw/qNZeGYnWKi
bakNDj3cU8WNHZEYLe50ToU1kacriictg6mY8cJvpgorHJiY8E3LmgRsa++0
8/0bRB4n+I+P6Cdhndtr5GzNcJDrdrWw6k/GFmAxVY/oh1Z5Co1Wq2mYUSuv
OxvRL62krjbKCWVhv3wLLLQu4dDc9umhvFE+ZqgR77yij4Ot5+dmk8MFWP3l
tSpfPaK+JftZg0mFmGKyPPtfXSJfPgP+PbRnmGFmw/OZMzi0Hfrq7MZfgqUK
HL0XD8T9ms7P+yfLMe39rLJrcjicSJpv/WVMwxgpK/Rjx4nxfjlPkuppGNng
uKWFLA4FyS4HjqTQsVO85adeHMZhcs4101evAjtu89n4gCSxfjzxiBMpeolt
S+GUleDHQW15hXZcsArTG2Z4buMj+oe+53ut4Cpsr6epwMIOYn5XPHc4XHuF
CQezXCnlwmGG7B1ew/0aOz7KYbDAgkOlf01NiRID+26ck582S4eTMrXlhgn1
mBhvrlvyGzoo9vTG17TUY8YHHxaIE+v5MZ+f3kfW6zF/csn+p/V0kGrZrclh
3oB5eamy5BL7gZ03HbqRdCPmIJOc5kqnw8/UPYtHa5qw4+7UuZsZdMjgdlfc
NtqCFWl0auc504HFfdeAlVAnZsJTjRvsoMPVG4XvKxU6sdRbIddfcdGh/CzW
wm3YidXfDUuQ4KCDxT67CnpoJ6atU9k9wUSHujfV0ayLnRgrNYjYadMgaI+V
Vk5HF+ZYUnvJs4cGrLXlxcNB3ZiHgLWTWzwNtnAbBljM9GKjjJqbXHzE9UO9
ms7Zg9id8qHOpcUyKE0JNfSf/4bR1Wx+1vSVgmOWFc+I8Si2ztIm165aAqb2
ySIPAsYxUx2h/NnlIgg/564inzqFibOF/DjZVQis/HFj99ZmsEoXpriQ1Hz4
2BoyG7xjDhv2pIzUl+bBRR8LpeT6eUz8n769WQ05cJtrSrzj6iImyTI73bsv
G/Y9a4pnn1zCZB7yqkXmZYJPpabRjpQVrNklpipL7gnczbtdoST7G3vPnjup
PpsG3CzKFkdH1zD9fxf/5D9IAa07F+KkY9exvW7VX/itk0DwpYijluQGdrrd
+LF+UgLEOIdRj33cxPLzNrT7e+LgfKiBTFoFE+wuD9RRN34M0ibBF3P8mKHt
MFk6likWese2ZsVeZAFxN+5OxxIqdFiMavDtI0G3evoHXmo0fGN9uhonToLm
gfBH+pHRsJhnWyIkRYKx2gnp8AfRIDQ1tVdMhgRRE3Z8HP7RYOUyvyKrSoKI
VXWfvbeiYS1o8/l/l0gQJHv6Z7pWNEjlCgmHU0iwMJGuzbFKARXt/k7uWBLc
FdzIXZihgP5E6oPoeBIMeCokfB+lgJOM6FJCGgkSis0Ot3ZToBqX6sx7RoKe
uw5TTSUUON8kH9rQTIIbu+SMbGwpcNN2SU2nlQQv5d13RZhRwJPzxUJrBwnE
PfoMyo0pkEY+ad79gQTUIWspLi0KjPeC2vdhEjhajB0ZE6PAmifLws0fJKgb
NgzcL0SBbXsaCiYmSWCh0HHKlocCcmbau+fmSCB9K2JjZSMKtJi3drgukSDT
PWb59HIUXM5+G7y6SgK11JNGcdNRYK8Vqeq7ToIR3wm+iZEo+P//RVigsCnA
QBT8D8MNHgM=
"]]}}}, {{}, {},
{GrayLevel[0], Thickness[Large], LineBox[CompressedData["
1:eJw12Hk4VV+4B3DOkST9KpGhUUqlKCnK0HolJJJUKhqEZCoHxxwRyZQyT2Um
JOKcvYtkHZkyZJ5ChkSmEoU0ufs+z71/7efz11p7rff9rvUsCVM7g2s0Li6u
ldxcXP/79fx8YmZxkc7hWG+zz+DYwYjH2tmeP3QOf1QnrbffDvRW9c+/WKBz
1Ddwn929aAebDzH+2n2nc4ZyklVWbGLAm6BwvoEROqd894xyzGUG8Ml2buS8
o3NovnN3JQYYEMk00fFOoHMU61zDNb/Yw1Nux3QuRTpHSPOEa5gcEw6ezuGN
k6dzXPaEPjqsyYSq9EFLub10TvtUgspfIyYMaOnLmO6kc45Xhorl+zFhbagM
Wb6OzvFfLWE10sWEO+Kj1f5cdE5JWCgz188JzstfmhCopXE+3fMW7B9zhiXX
tPaJXaJxdCrmw6S+uEHLZblzExdonOetK/Paedwh8fy6W68NaZxiaXQier07
KOhOVV7Vp3H+vapU0NV1Bwv5mAs56jTO2zVeacG57vCW+7O3sjSNE7SzUNuE
4QEhif6Nl+a5OV+0S98lLPGENV2Vtqlh3BwFx+sCovu9waA83mxnLRcn0/Ow
l8iCL3hMqdo+HFrEiMSM3toAeOkSb51/8h/Oj5SmFy4NBb3ws5v/xf3B/kH3
ZEO1wkHr8Wu9Y5O/8PZNzOGuL1GQWe3W4Wi8gF0+dpSIv4qDy36Rwo1Z81jA
cirxhUYieJnQ85avmcMTY8UxcowU4JLZhNXv/sBckmZeyl1p0B0cd+9p+wxW
l15RvSUmE9bzW2b/ODKND4pw8m+oZoPNAeklPeun8IzNZOPz7blgptiXVV4+
gZv0hFwmF/NA2lVp8Wb6KBZJUB2j1T6HlA+nK9zUhnHTBPey8fWF8NlHWEVL
9CPOVv9wVh2xgN8zfyqC/yNuOSnMPaHOAllX7bSBP4P4k0aK+sNjLHC+6cnv
PjiIeaXC77aeYgGv8XBXbs4gZmiveq1izoKt+wknQdVB/DJ64l9MAAtMR87k
f7g6gFOrHTaaNrKgOGqHxqjhB6wS+8iy9gwb+Iw/m3GrfMBXlF5Nsc6zwXBz
5h1xiQ/4qmZYYvxFNszkSHJ0J3px3PJCmyvmbNjJ2ahccLsXt77ZFVrlyIbY
cSE596wePG9C01kWzgYnxL1B4Nd7LORIJJyuZ8MbHo7ytv73uCFD0bmvkQ2r
ar2MDle8x80H5VQtWtmQe+ZPDCP0PX77wCXQtpsNn6zmBdu3vMdaQSLjp0fZ
YBD5hS9RpwsvLdPTDKETsHfs/Y89jztwzuf1gTGKBDC/yewU8aPMx034KxHw
ct7n0j/rDuy9mMHjqEqAGq90Vf3BDvzKeSm/ujoBBpLuMVZt7XjfapVAjh4B
TpfEldKWt2PZBx2qe68RUNxsdHuteyu+73xo8P0DAv515bH+mrRib+0gcZtw
Ao4M0EY/abViC9JPfyGSgLqvOfos4VZ8SHL4mUA8Ab3Lf0voF7TgsqOp/61M
J2BRI6EicLQZJypl3/R5QcDR4p5lfw2bsOXPEAnhXgLycjIOVSs3YSTw7aVD
HwGiCXZWYZubcJUV83H9AAEd87zhOm2N2Hrj8DGnYQK2eRiuevyrAcszJ3nj
vxLwxmdWALTeYZ2lC6v3cpEQbRpo27bqHaaHtI+dopFgpb6h3rK7Hpvm4N92
PCSsWqIRHHajHqcNKdUk85FwJSBy2VBEHd7g8WyibRUJf0Llef0HavD+6G/G
/ptJaLKrviaeU4PzOz1O2WwhIU3fuDLPsQYLs77Z6W4l4bigr18nbw2uc4+Q
pO8gIS6qhbZT5i2+dGbN8SN7SFB4ZL9Y51aFeU2OveZVJYGRnf9z9ZpyPDf+
cjrlLAl7/7vpe2TgDW6unLOfMSRh2mH3f47P3mBVxQxvdJ4EB5VsyTatN3jt
/k+ajUYkODWm6kXfKsMCJxQsKq+Q8H18l/aBeowbB2rslluRwGRnXY62wNgX
dMK2WpMw57mNOc+F8UP7gweVbEj4uWpTUtGBUvzb84SQ8Q3qfxUEZ1WTSnBf
3O15B3sSeH1/Jms6FGGzPA2u364k3NN1Ip8IFGFBi+7DvW4k8K2dqeN78hJL
ZzF/F7mTwJ89MVfb8wJ/dxP7Yn2LhJWNfbonNUhct2/jk9TbJDyMNTZ93k/g
N0nvaq97kyBo2uWy2p3Aqzi2Vjt9SBCabU5tzWPjdr//1qbeIUF0XeXPc6Is
fCdNR9LqLrWen9T+KyosxOEpXUKC/iSI55VKip8oxDv3ZHu9oLxB7aVer08B
1rboK5q/R4J6g6F2WUc+NtF3rToRRILmVX2m7/J8nHFo1r6b8rEf2kkakIeN
3jpGmAWToCuuOluTnYsJX6aiTQgJhhaSKS23sjF3Utefk6EkBNk7BoQTWdj4
Y8G2Usqvb5XbGXx9gsNSeUZ2PCBha4TZ4ZYrmdha23D3D8rnE1nbwmMz8J7h
nwVnHpIQnE1fYdCcjq9aXmwooDyD03qaj6Th7vDS2qthJEjVfX8T5pGKo0/e
yGFTvtChnnOKnYI/blTdzBNOAmdyyLV5WzL+sqPgXSzl0anrnC2vE7Hih9VL
+iif5OV7kCr7GF+IEWjZFEHCRvlju1NXx+OkDUa74yjf1R79JeEbi2NrnYqa
KE9eCahJ+RGNldDrHp5IEk4774iVsIjCQ/WiEQcoF4e8tUjpjMBqBg79ppQl
0iwPSGiH44vKBCeEckARH09K8UNM+DQosCj3JZ3KUDsfio/m5qp1UH5WH3ZE
TTkYP2hEg7OUPRaa+2FjAGbddxMWjCJBW0rQE7jvYoe1J/qkKYucNhCHTz5Y
fnu+MlCuW9xqdzvUE69fHi1jQNnyQka21xkXzJOwwDKhzMPa9slT3B7fV21t
sKEMYrqqvzjXsPjnDV6OlL/FxplPxxngHrGOMhfKt2iRlZoHD6HG4YU4V8qy
8WbVQgpXUNloAK8z5T6xgq/LV9qik3p+SxmUT8t3lfirMdHHxq+PLCiT78/d
uefhjgrY9VUXKK/gTEhWGHmjV82Sd7Upo4in/hUuvqg68HfnAcr2FjZjFZH+
6Oy7i3gj5dRDu3QrCwJRmriBMg/lNoGJvMqGEJTk+VlnhFof3oGc1VUTD9D7
B9LTFZQfXTigZOYXhnxdpXclUz6gHmUzJBiBTCbnF1woN+yefWSWEokImYxL
upS5uIhFs9IYJD08NTRO7W/cmJDcJ904NJVaxEtQ3tfKNDXviUenXr8q9aBs
nrm/0vznY/Q9q+XrP6p+/j6InPvkn4Ru7tp8/RXlOpVfEYVByajdVsSJSdlc
yqhyn1gqWvH4rkEvVZ971/H3OQykInq62pZgyn9XFs8VPklDf+LkAhQoRy+I
7ZBXyEAi94+J+FL1Xl3/Pkj+dBaSb/2s+Z3qH0vX7mrjXdnIrF+H4UmZb2sP
jx89B/FGTUfTKR/36PVqYz1Flv58H+j3Sajf2e/gJJSPpH4tO9NG9a9te3/+
48l81Naw2u4wZX9gzJmaPkevJpMC0wNJ2D7JkA9WKkBZfXGl5gHUeOoOz3rG
C1Fu0z05gsqTg3EzdVOGLDSooGCw6EeNP+UwTi9nIfGvik4alLPjHbfvTmCj
bXIV5ZVUHo1PM1Nu6ZAov+9yaDSVZ7bJLlEbcovQQpSvshuVjypz8yw50WJ0
KNef7etCgoCua4uGXzHajlcoBjlT/TDvuvLmxVeIVfDaKJhJwlc998BSgdeI
1V+46zKDhJdepaX5Chy0fZ+Ko+Z1EpKz/70rsuWg8c1Xq1dbUP3WdvhDeSoH
vT1/Wva9OZUv0vh3539l6E2UkuJFUxIW2vFBrs9lyBFVaMlfIkFJpqxQP6Yc
ndDn4pIyoOqnrSO6tKYcDSlsLK3Tp/bPY9J9959ydFSzQPzmSSp/akTU+a5W
oBKr0oIsXRLWXLvZiqUrUZDxbatZTSovHq37IVtahabuz0R+USIhScD5wIrh
GhSKqtovUedjPCtYzEOkFl0LGXoZu5Haf6OUv6Patej4ZOSppvUkhGTVV1bk
1aJdCb8zD4iR4HpU0vCWax3qDtm80LWaBINbTc4Ty98hD079wh3qvKY5C/ea
izUh4bvHn1sPEmBkktPycn8TorUU71zZT0DhcVQjoN+EGPVln/Op+4PpJiuS
7d+EknG2wkgndR94W/KQ50cTKrw9rC7VQIDvOnON9IZmlJN47shsEQE8ZYV5
Q76tyLOEY9oVSsDFp1oZikmtKLVvjI8vhAB2VG9CcHErmsof3LQ/kABza95A
+elW9E5UNdPHl4DKNUZmvpfbkGsoDc24EOBvwS0qeagdHUu2XZA2IWCpgL6P
6dcOpPXhSf4SWQLObzfiKCzrRDP8O3LbpQnIOWK+yL+1E6XblNukbidAz83V
k3WhE50ZK1PaJ0FA9EiyG09lJ3oqa62xS4gAqbJp+8yELqSwxMfLb4ENGs4R
puPHutFJUs6gv4wNvgMd6g5pH5CJHNshTpsNzxP89b1mBtEviWp+IV0W2KWa
r/pkOIz2zAkEdgsVwmXr+A33fEZRdfOzbWJdzyHwlPMh+UcTyGBlUMl2iXzg
EYoauf3rKwKHP0/WaORCZ93db34rp9HRtyJty6Oy4ayHqUJ8+QxabFiL9xCZ
YLt8YkuD0Q80JvwxYWZdOmx6WhXNOz6LtuyqUVqTlwIeL9VPr0yYR9eXPtRR
sU0ERqYtqbBnAWWYvjC02x0PAjRFU9nhX6i1vsFK9V8UaNw4EyUd8QeNJzfU
3TkbDqJFG+w0tv5DFaNj+2TTQiHcISBsb+ciiiiaLN85HQAG/idlHpNc8DDn
WOJJEz+QNvY7m+7JDYXJkm3V973hgj0pyOPDDaIdoTWBXt4QcG+00cyPG7SM
fHsM7bxhmKV7XDKYG9wWstQET3lDsoAwSo3lBuFzv0NXCHuDcGnGjmQWN4yJ
1bdKHr4NXBLVvxPGuOF+RKj3ZWdP6BhZlhpxlgZCEecEdLe5Q9WZwEdF52nw
5IFlJ17hDuQbvph+YxocfmfQcnTODaITl4bsMqWB/ZdqhTvVbnDWcIlz+U0a
mPPntNZYu0FbJdfx7/doIHPfe/tdtiu0pM9PGxTTAO32cnU44wINpsNqgpvo
4Na1NfJCBRMGeZ78jNpCB8M7p3Ii85jwI9MyX0yKDjLdrNiPsUwQm5hYLyFD
h4tdTk3kDSaYO87M71Gmg18P2xaJMuGX7+KzE+fo8Py0sWk1wxGkMsTEAx/Q
wajkSp/pHgc4pNXTJBBBh9423oWP6xxAd+zRvYfRdLjP5ejD5HMAe5nNszGP
6TBwoTSvbtAeSgippsyndGC9DlHTjrIHgyp5/4pqOny9f/yOyyIDrlnOqhyr
owOtsFx52RcGuPK/+F7XQIf1fv7Pn3Yz4LGe0tXWdjqILMQmbSEZMNoBKh+H
6LDESfNy5w0G/HKlfb/2mQ4j86dKvhgzYMW6iuyxcTroLNH0FDrOgH1XtESm
p+lwNmHkd7gUAzS4lzUwZ+nAoMWljQsx4Hxard/Pn9R6laA7BnQGWGuEKN/6
Q83X761Y1JAd/N/7Bvz/+8b/AG0KZvs=
"]]}}, {
{RGBColor[0, 0, 1], EdgeForm[RGBColor[0, 0, 1]],
{RGBColor[0, 0, 1],
RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]}, \
{RGBColor[0, 0, 1], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.245, 0}, {0.255, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.265, 0}, {0.275, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 2}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 144}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 916}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 314}]},
{RGBColor[0, 0, 1], RectangleBox[{0.475, 0}, {0.485, 4}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.495, 0}, {0.505, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.515, 0}, {0.525, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.535, 0}, {0.545, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.705, 0}, {0.715, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.725, 0}, {0.735, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.745, 0}, {0.755, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.765, 0}, {0.775, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.785, 0}, {0.795, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.955, 0}, {0.965, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.975, 0}, {0.985, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.995, 0}, {1.005, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.245, 0}, {1.255, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.495, 0}, {1.505, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.745, 0}, {1.755, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.995, 0}, {2.005, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.035, 0}, {2.045, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.075, 0}, {2.085, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.115, 0}, {2.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.125, 0}, {2.135, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.165, 0}, {2.175, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.205, 0}, {2.215, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.245, 0}, {2.255, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.285, 0}, {2.295, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.325, 0}, {2.335, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.365, 0}, {2.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.375, 0}, {2.385, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.415, 0}, {2.425, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.455, 0}, {2.465, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.495, 0}, {2.505, 0}]}},
{RGBColor[1, 0, 0], EdgeForm[RGBColor[1, 0, 0]],
{RGBColor[1, 0, 0],
RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.715, 0}, {-0.705, 10}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.705, 0}, {-0.695, 212}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.695, 0}, {-0.6849999999999999, 650}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 1706}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 2186}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 2170}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 1254}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 494}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 110}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 24}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 2}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]}, \
{RGBColor[1, 0, 0], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.995, 0}, {2.005, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.035, 0}, {2.045, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.075, 0}, {2.085, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.115, 0}, {2.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.125, 0}, {2.135, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.165, 0}, {2.175, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.205, 0}, {2.215, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.245, 0}, {2.255, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.285, 0}, {2.295, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.325, 0}, {2.335, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.365, 0}, {2.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.375, 0}, {2.385, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.415, 0}, {2.425, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.455, 0}, {2.465, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.495, 0}, {2.505, 0}]}},
{GrayLevel[0], EdgeForm[GrayLevel[0]],
{GrayLevel[0], RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{GrayLevel[0], RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{GrayLevel[0], RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{GrayLevel[0], RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{GrayLevel[0], RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{GrayLevel[0], RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{GrayLevel[0], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{GrayLevel[0], RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{GrayLevel[0], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{GrayLevel[0], RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{GrayLevel[0], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{GrayLevel[0], RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{GrayLevel[0], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{GrayLevel[0], RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{GrayLevel[0], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{GrayLevel[0], RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{GrayLevel[0], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{GrayLevel[0], RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{GrayLevel[0], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{GrayLevel[0], RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{GrayLevel[0], RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{GrayLevel[0], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{GrayLevel[0], RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{GrayLevel[0], RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{GrayLevel[0], RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{GrayLevel[0], RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{GrayLevel[0], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{GrayLevel[0], RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{GrayLevel[0], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{GrayLevel[0], RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{GrayLevel[0], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{GrayLevel[0], RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{GrayLevel[0], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{GrayLevel[0], RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{GrayLevel[0], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{GrayLevel[0], RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{GrayLevel[0], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{GrayLevel[0], RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{GrayLevel[0], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{GrayLevel[0], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{GrayLevel[0], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{GrayLevel[0], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{GrayLevel[0], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{GrayLevel[0], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{GrayLevel[0], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{GrayLevel[0], RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{GrayLevel[0], RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{GrayLevel[0], RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{GrayLevel[0], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{GrayLevel[0], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{GrayLevel[0], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{GrayLevel[0], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{GrayLevel[0], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{GrayLevel[0], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{GrayLevel[0], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{GrayLevel[0], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{GrayLevel[0], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{GrayLevel[0], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{GrayLevel[0], RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{GrayLevel[0], RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{GrayLevel[0], RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{GrayLevel[0], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{GrayLevel[0], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{GrayLevel[0], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{GrayLevel[0], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{GrayLevel[0], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{GrayLevel[0], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{GrayLevel[0], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{GrayLevel[0], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{GrayLevel[0], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{GrayLevel[0], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{GrayLevel[0], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{GrayLevel[0], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{GrayLevel[0], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{GrayLevel[0], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{GrayLevel[0], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{GrayLevel[0], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{GrayLevel[0], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{GrayLevel[0], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{GrayLevel[0], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{GrayLevel[0], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{GrayLevel[0], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{GrayLevel[0], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{GrayLevel[0], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{GrayLevel[0], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{GrayLevel[0], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{GrayLevel[0], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{GrayLevel[0], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{GrayLevel[0], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{GrayLevel[0], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{GrayLevel[0], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{GrayLevel[0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{GrayLevel[0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{GrayLevel[0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{GrayLevel[0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{GrayLevel[0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{GrayLevel[0], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{GrayLevel[0], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{GrayLevel[0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{GrayLevel[0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{GrayLevel[0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{GrayLevel[0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{GrayLevel[0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{GrayLevel[0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{GrayLevel[0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{GrayLevel[0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{GrayLevel[0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{GrayLevel[0], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{GrayLevel[0], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{GrayLevel[0], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 0}]},
{GrayLevel[0], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{GrayLevel[0], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{GrayLevel[0], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{GrayLevel[0], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{GrayLevel[0], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{GrayLevel[0], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{GrayLevel[0], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{GrayLevel[0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 0}]},
{GrayLevel[0], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{GrayLevel[0],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{GrayLevel[0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{GrayLevel[0],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{GrayLevel[0], RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{GrayLevel[0],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{GrayLevel[0],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{GrayLevel[0],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{GrayLevel[0],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{GrayLevel[0],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]}, \
{GrayLevel[0], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{GrayLevel[0],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{GrayLevel[0],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{GrayLevel[0],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{GrayLevel[0],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{GrayLevel[0],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{GrayLevel[0],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{GrayLevel[0],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{GrayLevel[0],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{GrayLevel[0],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{GrayLevel[0],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{GrayLevel[0],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{GrayLevel[0],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{GrayLevel[0],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{GrayLevel[0],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{GrayLevel[0],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{GrayLevel[0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{GrayLevel[0],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{GrayLevel[0],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 0}]},
{GrayLevel[0],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 0}]},
{GrayLevel[0],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 0}]},
{GrayLevel[0],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 0}]},
{GrayLevel[0],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 0}]},
{GrayLevel[0],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 0}]},
{GrayLevel[0],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 0}]},
{GrayLevel[0],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{GrayLevel[0],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{GrayLevel[0],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{GrayLevel[0],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{GrayLevel[0],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{GrayLevel[0],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{GrayLevel[0],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{GrayLevel[0],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{GrayLevel[0],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{GrayLevel[0],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{GrayLevel[0],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{GrayLevel[0],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{GrayLevel[0],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{GrayLevel[0],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{GrayLevel[0], RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{GrayLevel[0], RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{GrayLevel[0], RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{GrayLevel[0], RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{GrayLevel[0], RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{GrayLevel[0], RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{GrayLevel[0], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{GrayLevel[0], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{GrayLevel[0], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{GrayLevel[0], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{GrayLevel[0], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{GrayLevel[0], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{GrayLevel[0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{GrayLevel[0], RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{GrayLevel[0], RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{GrayLevel[0], RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{GrayLevel[0], RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{GrayLevel[0], RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{GrayLevel[0], RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{GrayLevel[0], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{GrayLevel[0], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{GrayLevel[0], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{GrayLevel[0], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{GrayLevel[0], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{GrayLevel[0], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{GrayLevel[0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{GrayLevel[0], RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{GrayLevel[0], RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{GrayLevel[0], RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{GrayLevel[0], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{GrayLevel[0], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{GrayLevel[0], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{GrayLevel[0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{GrayLevel[0], RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{GrayLevel[0], RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{GrayLevel[0], RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{GrayLevel[0], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{GrayLevel[0], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{GrayLevel[0], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{GrayLevel[0], RectangleBox[{1.995, 0}, {2.005, 0}]},
{GrayLevel[0], RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{GrayLevel[0], RectangleBox[{2.035, 0}, {2.045, 0}]},
{GrayLevel[0], RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{GrayLevel[0], RectangleBox[{2.075, 0}, {2.085, 0}]},
{GrayLevel[0], RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{GrayLevel[0], RectangleBox[{2.115, 0}, {2.125, 0}]},
{GrayLevel[0], RectangleBox[{2.125, 0}, {2.135, 0}]},
{GrayLevel[0], RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{GrayLevel[0], RectangleBox[{2.165, 0}, {2.175, 0}]},
{GrayLevel[0], RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{GrayLevel[0], RectangleBox[{2.205, 0}, {2.215, 0}]},
{GrayLevel[0], RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{GrayLevel[0], RectangleBox[{2.245, 0}, {2.255, 0}]},
{GrayLevel[0], RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{GrayLevel[0], RectangleBox[{2.285, 0}, {2.295, 0}]},
{GrayLevel[0], RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{GrayLevel[0], RectangleBox[{2.325, 0}, {2.335, 0}]},
{GrayLevel[0], RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{GrayLevel[0], RectangleBox[{2.365, 0}, {2.375, 0}]},
{GrayLevel[0], RectangleBox[{2.375, 0}, {2.385, 0}]},
{GrayLevel[0], RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{GrayLevel[0], RectangleBox[{2.415, 0}, {2.425, 0}]},
{GrayLevel[0], RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{GrayLevel[0], RectangleBox[{2.455, 0}, {2.465, 0}]},
{GrayLevel[0], RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{GrayLevel[0], RectangleBox[{2.495, 0}, {2.505, 0}]}}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->{True, False},
AxesOrigin->{0, 0},
PlotRange->{{-2.5, 2.5}, {0, 5781.4715275775625`}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{
3.66257949156072*^9, {3.66258021143362*^9, 3.662580221084853*^9},
3.66258047736412*^9, {3.662580767820599*^9, 3.662580786357997*^9},
3.662580840800157*^9, 3.6625816248841467`*^9, 3.662581871161978*^9, {
3.662581903685011*^9, 3.66258192539851*^9}, 3.662582073500638*^9,
3.662582294465457*^9, 3.662582487465448*^9, 3.662583240099018*^9, {
3.662583436449092*^9, 3.66258346569453*^9}, 3.662583525325774*^9, {
3.662587743035309*^9, 3.662587775858734*^9}, 3.662588213981824*^9,
3.662588278110413*^9, 3.662594026425694*^9, 3.662597384548532*^9,
3.662597934811454*^9, 3.6626023522279453`*^9, 3.662937888857376*^9,
3.663809568057295*^9}]
}, Open ]],
Cell["\<\
From the ESS calculations:
{u1\[Rule]-0.671655,u2\[Rule]0.444446,n2\[Rule]655.562,Km\[Rule]14491.9}\
\>", "Text",
CellChangeTimes->{{3.6625831016188927`*^9, 3.662583129434276*^9},
3.6625832301909657`*^9, 3.662587879844906*^9, 3.662588322881942*^9}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[",
RowBox[{
"histoplot", ",", "\[IndentingNewLine]", "competitionplot", ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.671655"}], ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.671655"}], ",", "maxheight"}], "}"}]}], "}"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Red", ",", "Thin"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0.444446", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.444446", ",", "maxheight"}], "}"}]}], "}"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Blue", ",", "Thin"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",", "u", ",", "tryKm"}],
"]"}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "2.5"}], ",", "2.5"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Thick", ",", "Black"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Axes", "\[Rule]",
RowBox[{"{",
RowBox[{"True", ",", "False"}], "}"}]}], ",",
RowBox[{"Ticks", "\[Rule]", "None"}]}], "]"}]], "Input",
CellChangeTimes->{{3.662581668820829*^9, 3.662581706709944*^9}, {
3.662581978163651*^9, 3.662581979123304*^9}, {3.662582704270831*^9,
3.662582705843841*^9}, {3.662582830479808*^9, 3.662582902947586*^9},
3.662583061087594*^9, {3.662583135013489*^9, 3.662583151322315*^9}, {
3.662583236154517*^9, 3.6625832529455976`*^9}, {3.662583565931121*^9,
3.6625835699618177`*^9}, {3.662583750391429*^9, 3.66258375334219*^9}, {
3.662587886925008*^9, 3.662587910914248*^9}, {3.662588300748231*^9,
3.6625883395862837`*^9}}],
Cell[BoxData[
GraphicsBox[{{
{RGBColor[0, 0, 1], EdgeForm[RGBColor[0, 0, 1]],
{RGBColor[0, 0, 1],
RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]}, \
{RGBColor[0, 0, 1], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.245, 0}, {0.255, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.265, 0}, {0.275, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 2}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 144}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 916}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 314}]},
{RGBColor[0, 0, 1], RectangleBox[{0.475, 0}, {0.485, 4}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.495, 0}, {0.505, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.515, 0}, {0.525, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.535, 0}, {0.545, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.705, 0}, {0.715, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.725, 0}, {0.735, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.745, 0}, {0.755, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.765, 0}, {0.775, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.785, 0}, {0.795, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.955, 0}, {0.965, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.975, 0}, {0.985, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{0.995, 0}, {1.005, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.245, 0}, {1.255, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.495, 0}, {1.505, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.745, 0}, {1.755, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{1.995, 0}, {2.005, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.035, 0}, {2.045, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.075, 0}, {2.085, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.115, 0}, {2.125, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.125, 0}, {2.135, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.165, 0}, {2.175, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.205, 0}, {2.215, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.245, 0}, {2.255, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.285, 0}, {2.295, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.325, 0}, {2.335, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.365, 0}, {2.375, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.375, 0}, {2.385, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.415, 0}, {2.425, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.455, 0}, {2.465, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{RGBColor[0, 0, 1],
RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{RGBColor[0, 0, 1], RectangleBox[{2.495, 0}, {2.505, 0}]}},
{RGBColor[1, 0, 0], EdgeForm[RGBColor[1, 0, 0]],
{RGBColor[1, 0, 0],
RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.715, 0}, {-0.705, 10}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.705, 0}, {-0.695, 212}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.695, 0}, {-0.6849999999999999, 650}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 1706}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 2186}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 2170}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 1254}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 494}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 110}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 24}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 2}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]}, \
{RGBColor[1, 0, 0], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{1.995, 0}, {2.005, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.035, 0}, {2.045, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.075, 0}, {2.085, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.115, 0}, {2.125, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.125, 0}, {2.135, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.165, 0}, {2.175, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.205, 0}, {2.215, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.245, 0}, {2.255, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.285, 0}, {2.295, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.325, 0}, {2.335, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.365, 0}, {2.375, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.375, 0}, {2.385, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.415, 0}, {2.425, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.455, 0}, {2.465, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{RGBColor[1, 0, 0],
RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{RGBColor[1, 0, 0], RectangleBox[{2.495, 0}, {2.505, 0}]}},
{GrayLevel[0], EdgeForm[GrayLevel[0]],
{GrayLevel[0], RectangleBox[{-2.495, 0}, {-2.4850000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.485, 0}, {-2.475, 0}]},
{GrayLevel[0], RectangleBox[{-2.475, 0}, {-2.4650000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.465, 0}, {-2.455, 0}]},
{GrayLevel[0], RectangleBox[{-2.455, 0}, {-2.4450000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.445, 0}, {-2.435, 0}]},
{GrayLevel[0], RectangleBox[{-2.435, 0}, {-2.4250000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.425, 0}, {-2.415, 0}]},
{GrayLevel[0], RectangleBox[{-2.415, 0}, {-2.4050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.405, 0}, {-2.395, 0}]},
{GrayLevel[0], RectangleBox[{-2.395, 0}, {-2.3850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.385, 0}, {-2.375, 0}]},
{GrayLevel[0], RectangleBox[{-2.375, 0}, {-2.365, 0}]},
{GrayLevel[0], RectangleBox[{-2.3649999999999998`, 0}, {-2.355, 0}]},
{GrayLevel[0], RectangleBox[{-2.355, 0}, {-2.345, 0}]},
{GrayLevel[0], RectangleBox[{-2.3449999999999998`, 0}, {-2.335, 0}]},
{GrayLevel[0], RectangleBox[{-2.335, 0}, {-2.325, 0}]},
{GrayLevel[0], RectangleBox[{-2.3249999999999997`, 0}, {-2.315, 0}]},
{GrayLevel[0], RectangleBox[{-2.315, 0}, {-2.305, 0}]},
{GrayLevel[0], RectangleBox[{-2.3049999999999997`, 0}, {-2.295, 0}]},
{GrayLevel[0], RectangleBox[{-2.295, 0}, {-2.285, 0}]},
{GrayLevel[0], RectangleBox[{-2.2849999999999997`, 0}, {-2.275, 0}]},
{GrayLevel[0], RectangleBox[{-2.275, 0}, {-2.265, 0}]},
{GrayLevel[0], RectangleBox[{-2.2649999999999997`, 0}, {-2.255, 0}]},
{GrayLevel[0], RectangleBox[{-2.255, 0}, {-2.245, 0}]},
{GrayLevel[0], RectangleBox[{-2.245, 0}, {-2.2350000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.235, 0}, {-2.225, 0}]},
{GrayLevel[0], RectangleBox[{-2.2249999999999996`, 0}, {-2.215, 0}]},
{GrayLevel[0], RectangleBox[{-2.215, 0}, {-2.205, 0}]},
{GrayLevel[0], RectangleBox[{-2.205, 0}, {-2.1950000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.195, 0}, {-2.185, 0}]},
{GrayLevel[0], RectangleBox[{-2.185, 0}, {-2.1750000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-2.175, 0}, {-2.165, 0}]},
{GrayLevel[0], RectangleBox[{-2.165, 0}, {-2.1550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.155, 0}, {-2.145, 0}]},
{GrayLevel[0], RectangleBox[{-2.145, 0}, {-2.1350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-2.135, 0}, {-2.125, 0}]},
{GrayLevel[0], RectangleBox[{-2.125, 0}, {-2.115, 0}]},
{GrayLevel[0], RectangleBox[{-2.1149999999999998`, 0}, {-2.105, 0}]},
{GrayLevel[0], RectangleBox[{-2.105, 0}, {-2.095, 0}]},
{GrayLevel[0], RectangleBox[{-2.0949999999999998`, 0}, {-2.085, 0}]},
{GrayLevel[0], RectangleBox[{-2.085, 0}, {-2.075, 0}]},
{GrayLevel[0], RectangleBox[{-2.0749999999999997`, 0}, {-2.065, 0}]},
{GrayLevel[0], RectangleBox[{-2.065, 0}, {-2.055, 0}]},
{GrayLevel[0], RectangleBox[{-2.0549999999999997`, 0}, {-2.045, 0}]},
{GrayLevel[0], RectangleBox[{-2.045, 0}, {-2.035, 0}]},
{GrayLevel[0], RectangleBox[{-2.035, 0}, {-2.0250000000000004`, 0}]},
{GrayLevel[0], RectangleBox[{-2.025, 0}, {-2.015, 0}]},
{GrayLevel[0], RectangleBox[{-2.0149999999999997`, 0}, {-2.005, 0}]},
{GrayLevel[0], RectangleBox[{-2.005, 0}, {-1.995, 0}]},
{GrayLevel[0], RectangleBox[{-1.9949999999999999`, 0}, {-1.985, 0}]},
{GrayLevel[0], RectangleBox[{-1.9849999999999999`, 0}, {-1.975, 0}]},
{GrayLevel[0], RectangleBox[{-1.9749999999999999`, 0}, {-1.965, 0}]},
{GrayLevel[0], RectangleBox[{-1.9649999999999999`, 0}, {-1.955, 0}]},
{GrayLevel[0], RectangleBox[{-1.9549999999999998`, 0}, {-1.945, 0}]},
{GrayLevel[0], RectangleBox[{-1.9449999999999998`, 0}, {-1.935, 0}]},
{GrayLevel[0], RectangleBox[{-1.935, 0}, {-1.9250000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-1.9249999999999998`, 0}, {-1.915, 0}]},
{GrayLevel[0], RectangleBox[{-1.915, 0}, {-1.9050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.9049999999999998`, 0}, {-1.895, 0}]},
{GrayLevel[0], RectangleBox[{-1.895, 0}, {-1.8850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8849999999999998`, 0}, {-1.875, 0}]},
{GrayLevel[0], RectangleBox[{-1.875, 0}, {-1.8650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8649999999999998`, 0}, {-1.855, 0}]},
{GrayLevel[0], RectangleBox[{-1.855, 0}, {-1.8450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8449999999999998`, 0}, {-1.835, 0}]},
{GrayLevel[0], RectangleBox[{-1.835, 0}, {-1.8250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.8249999999999997`, 0}, {-1.815, 0}]},
{GrayLevel[0], RectangleBox[{-1.815, 0}, {-1.8050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.805, 0}, {-1.7950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.795, 0}, {-1.7850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.785, 0}, {-1.7750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.775, 0}, {-1.7650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.765, 0}, {-1.7550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.755, 0}, {-1.745, 0}]},
{GrayLevel[0], RectangleBox[{-1.7449999999999999`, 0}, {-1.735, 0}]},
{GrayLevel[0], RectangleBox[{-1.7349999999999999`, 0}, {-1.725, 0}]},
{GrayLevel[0], RectangleBox[{-1.7249999999999999`, 0}, {-1.715, 0}]},
{GrayLevel[0], RectangleBox[{-1.7149999999999999`, 0}, {-1.705, 0}]},
{GrayLevel[0], RectangleBox[{-1.7049999999999998`, 0}, {-1.695, 0}]},
{GrayLevel[0], RectangleBox[{-1.6949999999999998`, 0}, {-1.685, 0}]},
{GrayLevel[0], RectangleBox[{-1.685, 0}, {-1.6750000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6749999999999998`, 0}, {-1.665, 0}]},
{GrayLevel[0], RectangleBox[{-1.665, 0}, {-1.6550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6549999999999998`, 0}, {-1.645, 0}]},
{GrayLevel[0], RectangleBox[{-1.645, 0}, {-1.6350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6349999999999998`, 0}, {-1.625, 0}]},
{GrayLevel[0], RectangleBox[{-1.625, 0}, {-1.6150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.6149999999999998`, 0}, {-1.605, 0}]},
{GrayLevel[0], RectangleBox[{-1.605, 0}, {-1.5950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.5949999999999998`, 0}, {-1.585, 0}]},
{GrayLevel[0], RectangleBox[{-1.585, 0}, {-1.5750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.5749999999999997`, 0}, {-1.565, 0}]},
{GrayLevel[0], RectangleBox[{-1.565, 0}, {-1.5550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.555, 0}, {-1.5450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.545, 0}, {-1.5350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.535, 0}, {-1.5250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.525, 0}, {-1.5150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.515, 0}, {-1.5050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.505, 0}, {-1.495, 0}]},
{GrayLevel[0], RectangleBox[{-1.4949999999999999`, 0}, {-1.485, 0}]},
{GrayLevel[0], RectangleBox[{-1.4849999999999999`, 0}, {-1.475, 0}]},
{GrayLevel[0], RectangleBox[{-1.4749999999999999`, 0}, {-1.465, 0}]},
{GrayLevel[0], RectangleBox[{-1.4649999999999999`, 0}, {-1.455, 0}]},
{GrayLevel[0], RectangleBox[{-1.4549999999999998`, 0}, {-1.445, 0}]},
{GrayLevel[0], RectangleBox[{-1.4449999999999998`, 0}, {-1.435, 0}]},
{GrayLevel[0], RectangleBox[{-1.4349999999999998`, 0}, {-1.425, 0}]},
{GrayLevel[0], RectangleBox[{-1.4249999999999998`, 0}, {-1.415, 0}]},
{GrayLevel[0], RectangleBox[{-1.4149999999999998`, 0}, {-1.405, 0}]},
{GrayLevel[0], RectangleBox[{-1.4049999999999998`, 0}, {-1.395, 0}]},
{GrayLevel[0], RectangleBox[{-1.3949999999999998`, 0}, {-1.385, 0}]},
{GrayLevel[0], RectangleBox[{-1.3849999999999998`, 0}, {-1.375, 0}]},
{GrayLevel[0], RectangleBox[{-1.375, 0}, {-1.3650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.365, 0}, {-1.3550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.355, 0}, {-1.3450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.345, 0}, {-1.3350000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.335, 0}, {-1.3250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.325, 0}, {-1.3150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.315, 0}, {-1.3050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.305, 0}, {-1.2950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.295, 0}, {-1.2850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.285, 0}, {-1.2750000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.275, 0}, {-1.2650000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.265, 0}, {-1.2550000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.255, 0}, {-1.245, 0}]},
{GrayLevel[0], RectangleBox[{-1.2449999999999999`, 0}, {-1.235, 0}]},
{GrayLevel[0], RectangleBox[{-1.2349999999999999`, 0}, {-1.225, 0}]},
{GrayLevel[0], RectangleBox[{-1.2249999999999999`, 0}, {-1.215, 0}]},
{GrayLevel[0], RectangleBox[{-1.2149999999999999`, 0}, {-1.205, 0}]},
{GrayLevel[0], RectangleBox[{-1.2049999999999998`, 0}, {-1.195, 0}]},
{GrayLevel[0], RectangleBox[{-1.1949999999999998`, 0}, {-1.185, 0}]},
{GrayLevel[0], RectangleBox[{-1.1849999999999998`, 0}, {-1.175, 0}]},
{GrayLevel[0], RectangleBox[{-1.1749999999999998`, 0}, {-1.165, 0}]},
{GrayLevel[0], RectangleBox[{-1.1649999999999998`, 0}, {-1.155, 0}]},
{GrayLevel[0], RectangleBox[{-1.1549999999999998`, 0}, {-1.145, 0}]},
{GrayLevel[0], RectangleBox[{-1.1449999999999998`, 0}, {-1.135, 0}]},
{GrayLevel[0], RectangleBox[{-1.1349999999999998`, 0}, {-1.125, 0}]},
{GrayLevel[0], RectangleBox[{-1.125, 0}, {-1.1150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.115, 0}, {-1.1050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.105, 0}, {-1.0950000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.095, 0}, {-1.0850000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.085, 0}, {-1.0750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.075, 0}, {-1.0650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.065, 0}, {-1.0550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.055, 0}, {-1.0450000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{-1.045, 0}, {-1.0350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.035, 0}, {-1.0250000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.025, 0}, {-1.0150000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.015, 0}, {-1.0050000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{-1.005, 0}, {-0.995, 0}]},
{GrayLevel[0], RectangleBox[{-0.995, 0}, {-0.985, 0}]},
{GrayLevel[0], RectangleBox[{-0.985, 0}, {-0.975, 0}]},
{GrayLevel[0], RectangleBox[{-0.975, 0}, {-0.965, 0}]},
{GrayLevel[0], RectangleBox[{-0.965, 0}, {-0.955, 0}]},
{GrayLevel[0], RectangleBox[{-0.955, 0}, {-0.945, 0}]},
{GrayLevel[0], RectangleBox[{-0.945, 0}, {-0.9349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9349999999999999, 0}, {-0.9249999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9249999999999999, 0}, {-0.9149999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9149999999999999, 0}, {-0.9049999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.9049999999999999, 0}, {-0.8949999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8949999999999999, 0}, {-0.8849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8849999999999999, 0}, {-0.8749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8750000000000001, 0}, {-0.8650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8650000000000001, 0}, {-0.8550000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8550000000000001, 0}, {-0.8450000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8450000000000001, 0}, {-0.8350000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8350000000000001, 0}, {-0.8250000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.8250000000000001, 0}, {-0.8150000000000001, 0}]},
{GrayLevel[0], RectangleBox[{-0.8150000000000001, 0}, {-0.805, 0}]},
{GrayLevel[0], RectangleBox[{-0.805, 0}, {-0.795, 0}]},
{GrayLevel[0], RectangleBox[{-0.795, 0}, {-0.785, 0}]},
{GrayLevel[0], RectangleBox[{-0.785, 0}, {-0.775, 0}]},
{GrayLevel[0], RectangleBox[{-0.775, 0}, {-0.765, 0}]},
{GrayLevel[0], RectangleBox[{-0.765, 0}, {-0.755, 0}]},
{GrayLevel[0], RectangleBox[{-0.755, 0}, {-0.745, 0}]},
{GrayLevel[0], RectangleBox[{-0.745, 0}, {-0.735, 0}]},
{GrayLevel[0], RectangleBox[{-0.735, 0}, {-0.725, 0}]},
{GrayLevel[0], RectangleBox[{-0.725, 0}, {-0.715, 0}]},
{GrayLevel[0], RectangleBox[{-0.715, 0}, {-0.705, 0}]},
{GrayLevel[0], RectangleBox[{-0.705, 0}, {-0.695, 0}]},
{GrayLevel[0], RectangleBox[{-0.695, 0}, {-0.6849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6849999999999999, 0}, {-0.6749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6749999999999999, 0}, {-0.6649999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6649999999999999, 0}, {-0.6549999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6549999999999999, 0}, {-0.6449999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6449999999999999, 0}, {-0.6349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6349999999999999, 0}, {-0.6249999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6250000000000001, 0}, {-0.6150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6150000000000001, 0}, {-0.6050000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.6050000000000001, 0}, {-0.5950000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.5950000000000001, 0}, {-0.5850000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.5850000000000001, 0}, {-0.5750000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.5750000000000001, 0}, {-0.5650000000000001, 0}]},
{GrayLevel[0], RectangleBox[{-0.5650000000000001, 0}, {-0.555, 0}]},
{GrayLevel[0], RectangleBox[{-0.555, 0}, {-0.545, 0}]},
{GrayLevel[0], RectangleBox[{-0.545, 0}, {-0.535, 0}]},
{GrayLevel[0], RectangleBox[{-0.535, 0}, {-0.525, 0}]},
{GrayLevel[0], RectangleBox[{-0.525, 0}, {-0.515, 0}]},
{GrayLevel[0], RectangleBox[{-0.515, 0}, {-0.505, 0}]},
{GrayLevel[0], RectangleBox[{-0.505, 0}, {-0.495, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4950000000000002, 0}, {-0.4850000000000002, 0}]},
{GrayLevel[0], RectangleBox[{-0.485, 0}, {-0.475, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4750000000000002, 0}, {-0.4650000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{-0.46499999999999997`, 0}, {-0.45499999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4550000000000002, 0}, {-0.4450000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{-0.44499999999999995`, 0}, {-0.43499999999999994`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.43500000000000016`, 0}, {-0.42500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.42499999999999993`, 0}, {-0.4149999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.41500000000000015`, 0}, {-0.40500000000000014`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.4049999999999999, 0}, {-0.3949999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.39500000000000013`, 0}, {-0.3850000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3849999999999999, 0}, {-0.3749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3750000000000001, 0}, {-0.3650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3649999999999999, 0}, {-0.35499999999999987`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3550000000000001, 0}, {-0.3450000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.34499999999999986`, 0}, {-0.33499999999999985`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3350000000000001, 0}, {-0.32500000000000007`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.32499999999999984`, 0}, {-0.31499999999999984`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.31500000000000006`, 0}, {-0.30500000000000005`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.3049999999999998, 0}, {-0.2949999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{-0.29500000000000004`, 0}, {-0.28500000000000003`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.2849999999999998, 0}, {-0.2749999999999998, 0}]},
{GrayLevel[0], RectangleBox[{-0.275, 0}, {-0.265, 0}]},
{GrayLevel[0],
RectangleBox[{-0.2649999999999998, 0}, {-0.2549999999999998, 0}]},
{GrayLevel[0], RectangleBox[{-0.255, 0}, {-0.245, 0}]},
{GrayLevel[0],
RectangleBox[{-0.24500000000000022`, 0}, {-0.2350000000000002, 0}]},
{GrayLevel[0], RectangleBox[{-0.235, 0}, {-0.22499999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.2250000000000002, 0}, {-0.2150000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{-0.21499999999999997`, 0}, {-0.20499999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.20500000000000018`, 0}, {-0.19500000000000017`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.19499999999999995`, 0}, {-0.18499999999999994`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.18500000000000016`, 0}, {-0.17500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.17499999999999993`, 0}, {-0.16499999999999992`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.16500000000000015`, 0}, {-0.15500000000000014`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.15499999999999992`, 0}, {-0.1449999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{-0.14500000000000013`, 0}, {-0.13500000000000012`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.1349999999999999, 0}, {-0.12499999999999989`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.1250000000000001, 0}, {-0.1150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{-0.11499999999999988`, 0}, {-0.10499999999999987`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.1050000000000001, 0}, {-0.09500000000000008, 0}]},
{GrayLevel[0],
RectangleBox[{-0.09499999999999986, 0}, {-0.08499999999999985, 0}]},
{GrayLevel[0],
RectangleBox[{-0.08500000000000008, 0}, {-0.07500000000000007, 0}]},
{GrayLevel[0],
RectangleBox[{-0.07499999999999984, 0}, {-0.06499999999999984, 0}]},
{GrayLevel[0],
RectangleBox[{-0.06500000000000006, 0}, {-0.055000000000000056`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.05499999999999982, 0}, {-0.044999999999999825`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.04500000000000003, 0}, {-0.03500000000000004, 0}]},
{GrayLevel[0],
RectangleBox[{-0.0349999999999998, 0}, {-0.024999999999999804`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.02500000000000002, 0}, {-0.015000000000000017`, 0}]},
{GrayLevel[0],
RectangleBox[{-0.014999999999999788`, 0}, {-0.004999999999999787, 0}]}, \
{GrayLevel[0], RectangleBox[{-0.005, 0}, {0.005, 0}]},
{GrayLevel[0],
RectangleBox[{0.004999999999999787, 0}, {0.014999999999999788`, 0}]},
{GrayLevel[0],
RectangleBox[{0.015000000000000017`, 0}, {0.02500000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{0.024999999999999804`, 0}, {0.0349999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.03500000000000004, 0}, {0.04500000000000003, 0}]},
{GrayLevel[0],
RectangleBox[{0.044999999999999825`, 0}, {0.05499999999999982, 0}]},
{GrayLevel[0],
RectangleBox[{0.055000000000000056`, 0}, {0.06500000000000006, 0}]},
{GrayLevel[0],
RectangleBox[{0.06499999999999984, 0}, {0.07499999999999984, 0}]},
{GrayLevel[0],
RectangleBox[{0.07500000000000007, 0}, {0.08500000000000008, 0}]},
{GrayLevel[0],
RectangleBox[{0.08499999999999985, 0}, {0.09499999999999986, 0}]},
{GrayLevel[0],
RectangleBox[{0.09500000000000008, 0}, {0.1050000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.10499999999999987`, 0}, {0.11499999999999988`, 0}]},
{GrayLevel[0],
RectangleBox[{0.1150000000000001, 0}, {0.1250000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.12499999999999989`, 0}, {0.1349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.13500000000000012`, 0}, {0.14500000000000013`, 0}]},
{GrayLevel[0],
RectangleBox[{0.1449999999999999, 0}, {0.15499999999999992`, 0}]},
{GrayLevel[0],
RectangleBox[{0.15500000000000014`, 0}, {0.16500000000000015`, 0}]},
{GrayLevel[0],
RectangleBox[{0.16499999999999992`, 0}, {0.17499999999999993`, 0}]},
{GrayLevel[0],
RectangleBox[{0.17500000000000016`, 0}, {0.18500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{0.18499999999999994`, 0}, {0.19499999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{0.19500000000000017`, 0}, {0.20500000000000018`, 0}]},
{GrayLevel[0],
RectangleBox[{0.20499999999999996`, 0}, {0.21499999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{0.2150000000000002, 0}, {0.2250000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.22499999999999998`, 0}, {0.235, 0}]},
{GrayLevel[0],
RectangleBox[{0.2350000000000002, 0}, {0.24500000000000022`, 0}]},
{GrayLevel[0], RectangleBox[{0.245, 0}, {0.255, 0}]},
{GrayLevel[0],
RectangleBox[{0.2549999999999998, 0}, {0.2649999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.265, 0}, {0.275, 0}]},
{GrayLevel[0],
RectangleBox[{0.2749999999999998, 0}, {0.2849999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.28500000000000003`, 0}, {0.29500000000000004`, 0}]},
{GrayLevel[0],
RectangleBox[{0.2949999999999998, 0}, {0.3049999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.30500000000000005`, 0}, {0.31500000000000006`, 0}]},
{GrayLevel[0],
RectangleBox[{0.31499999999999984`, 0}, {0.32499999999999984`, 0}]},
{GrayLevel[0],
RectangleBox[{0.32500000000000007`, 0}, {0.3350000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.33499999999999985`, 0}, {0.34499999999999986`, 0}]},
{GrayLevel[0],
RectangleBox[{0.3450000000000001, 0}, {0.3550000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.35499999999999987`, 0}, {0.3649999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.3650000000000001, 0}, {0.3750000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.3749999999999999, 0}, {0.3849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.3850000000000001, 0}, {0.39500000000000013`, 0}]},
{GrayLevel[0],
RectangleBox[{0.3949999999999999, 0}, {0.4049999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.40500000000000014`, 0}, {0.41500000000000015`, 0}]},
{GrayLevel[0],
RectangleBox[{0.4149999999999999, 0}, {0.42499999999999993`, 0}]},
{GrayLevel[0],
RectangleBox[{0.42500000000000016`, 0}, {0.43500000000000016`, 0}]},
{GrayLevel[0],
RectangleBox[{0.43499999999999994`, 0}, {0.44499999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{0.4450000000000002, 0}, {0.4550000000000002, 0}]},
{GrayLevel[0],
RectangleBox[{0.45499999999999996`, 0}, {0.46499999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{0.4650000000000002, 0}, {0.4750000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.475, 0}, {0.485, 0}]},
{GrayLevel[0],
RectangleBox[{0.4850000000000002, 0}, {0.4950000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.495, 0}, {0.505, 0}]},
{GrayLevel[0],
RectangleBox[{0.5049999999999998, 0}, {0.5149999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.515, 0}, {0.525, 0}]},
{GrayLevel[0],
RectangleBox[{0.5249999999999998, 0}, {0.5349999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.535, 0}, {0.545, 0}]},
{GrayLevel[0],
RectangleBox[{0.5449999999999998, 0}, {0.5549999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.555, 0}, {0.5650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.5649999999999998, 0}, {0.5749999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.5750000000000001, 0}, {0.5850000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.5849999999999999, 0}, {0.5949999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.5950000000000001, 0}, {0.6050000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6049999999999999, 0}, {0.6149999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6150000000000001, 0}, {0.6250000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6249999999999999, 0}, {0.6349999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6350000000000001, 0}, {0.6450000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6449999999999999, 0}, {0.6549999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6550000000000001, 0}, {0.6650000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.6649999999999999, 0}, {0.6749999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.6750000000000002, 0}, {0.6850000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.6849999999999999, 0}, {0.695, 0}]},
{GrayLevel[0],
RectangleBox[{0.6950000000000002, 0}, {0.7050000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.705, 0}, {0.715, 0}]},
{GrayLevel[0],
RectangleBox[{0.7150000000000002, 0}, {0.7250000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.725, 0}, {0.735, 0}]},
{GrayLevel[0],
RectangleBox[{0.7350000000000002, 0}, {0.7450000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.745, 0}, {0.755, 0}]},
{GrayLevel[0],
RectangleBox[{0.7549999999999998, 0}, {0.7649999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.765, 0}, {0.775, 0}]},
{GrayLevel[0],
RectangleBox[{0.7749999999999998, 0}, {0.7849999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.785, 0}, {0.795, 0}]},
{GrayLevel[0],
RectangleBox[{0.7949999999999998, 0}, {0.8049999999999998, 0}]},
{GrayLevel[0], RectangleBox[{0.805, 0}, {0.8150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8149999999999998, 0}, {0.8249999999999998, 0}]},
{GrayLevel[0],
RectangleBox[{0.8250000000000001, 0}, {0.8350000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8349999999999999, 0}, {0.8449999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.8450000000000001, 0}, {0.8550000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8549999999999999, 0}, {0.8649999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.8650000000000001, 0}, {0.8750000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8749999999999999, 0}, {0.8849999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.8850000000000001, 0}, {0.8950000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.8949999999999999, 0}, {0.9049999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.9050000000000001, 0}, {0.9150000000000001, 0}]},
{GrayLevel[0],
RectangleBox[{0.9149999999999999, 0}, {0.9249999999999999, 0}]},
{GrayLevel[0],
RectangleBox[{0.9250000000000002, 0}, {0.9350000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.9349999999999999, 0}, {0.945, 0}]},
{GrayLevel[0],
RectangleBox[{0.9450000000000002, 0}, {0.9550000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.955, 0}, {0.965, 0}]},
{GrayLevel[0],
RectangleBox[{0.9650000000000002, 0}, {0.9750000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.975, 0}, {0.985, 0}]},
{GrayLevel[0],
RectangleBox[{0.9850000000000002, 0}, {0.9950000000000002, 0}]},
{GrayLevel[0], RectangleBox[{0.995, 0}, {1.005, 0}]},
{GrayLevel[0], RectangleBox[{1.005, 0}, {1.0149999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0150000000000001`, 0}, {1.025, 0}]},
{GrayLevel[0], RectangleBox[{1.025, 0}, {1.0349999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0350000000000001`, 0}, {1.045, 0}]},
{GrayLevel[0], RectangleBox[{1.045, 0}, {1.0549999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0550000000000002`, 0}, {1.065, 0}]},
{GrayLevel[0], RectangleBox[{1.065, 0}, {1.0749999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.0750000000000002`, 0}, {1.085, 0}]},
{GrayLevel[0], RectangleBox[{1.085, 0}, {1.0949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.0950000000000002`, 0}, {1.105, 0}]},
{GrayLevel[0], RectangleBox[{1.105, 0}, {1.1149999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1150000000000002`, 0}, {1.125, 0}]},
{GrayLevel[0], RectangleBox[{1.125, 0}, {1.1349999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1350000000000002`, 0}, {1.145, 0}]},
{GrayLevel[0], RectangleBox[{1.145, 0}, {1.1549999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1550000000000002`, 0}, {1.165, 0}]},
{GrayLevel[0], RectangleBox[{1.165, 0}, {1.1749999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1750000000000003`, 0}, {1.185, 0}]},
{GrayLevel[0], RectangleBox[{1.185, 0}, {1.1949999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.1950000000000003`, 0}, {1.205, 0}]},
{GrayLevel[0], RectangleBox[{1.205, 0}, {1.2149999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.2150000000000003`, 0}, {1.225, 0}]},
{GrayLevel[0], RectangleBox[{1.225, 0}, {1.2349999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.2350000000000003`, 0}, {1.245, 0}]},
{GrayLevel[0], RectangleBox[{1.245, 0}, {1.255, 0}]},
{GrayLevel[0], RectangleBox[{1.255, 0}, {1.2649999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.2650000000000001`, 0}, {1.275, 0}]},
{GrayLevel[0], RectangleBox[{1.275, 0}, {1.2849999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.2850000000000001`, 0}, {1.295, 0}]},
{GrayLevel[0], RectangleBox[{1.295, 0}, {1.3049999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.3050000000000002`, 0}, {1.315, 0}]},
{GrayLevel[0], RectangleBox[{1.315, 0}, {1.3249999999999997`, 0}]},
{GrayLevel[0], RectangleBox[{1.3250000000000002`, 0}, {1.335, 0}]},
{GrayLevel[0], RectangleBox[{1.335, 0}, {1.3449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.3450000000000002`, 0}, {1.355, 0}]},
{GrayLevel[0], RectangleBox[{1.355, 0}, {1.3649999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.3650000000000002`, 0}, {1.375, 0}]},
{GrayLevel[0], RectangleBox[{1.375, 0}, {1.3849999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.3850000000000002`, 0}, {1.395, 0}]},
{GrayLevel[0], RectangleBox[{1.395, 0}, {1.4049999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.4050000000000002`, 0}, {1.415, 0}]},
{GrayLevel[0], RectangleBox[{1.415, 0}, {1.4249999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.4250000000000003`, 0}, {1.435, 0}]},
{GrayLevel[0], RectangleBox[{1.435, 0}, {1.4449999999999998`, 0}]},
{GrayLevel[0], RectangleBox[{1.4450000000000003`, 0}, {1.455, 0}]},
{GrayLevel[0], RectangleBox[{1.455, 0}, {1.4649999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.4650000000000003`, 0}, {1.475, 0}]},
{GrayLevel[0], RectangleBox[{1.475, 0}, {1.4849999999999999`, 0}]},
{GrayLevel[0], RectangleBox[{1.4850000000000003`, 0}, {1.495, 0}]},
{GrayLevel[0], RectangleBox[{1.495, 0}, {1.505, 0}]},
{GrayLevel[0], RectangleBox[{1.505, 0}, {1.5149999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5149999999999997`, 0}, {1.5249999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5250000000000004`, 0}, {1.5350000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{1.5350000000000001`, 0}, {1.545, 0}]},
{GrayLevel[0], RectangleBox[{1.545, 0}, {1.5549999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5549999999999997`, 0}, {1.5649999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5650000000000004`, 0}, {1.5750000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.5750000000000002`, 0}, {1.585, 0}]},
{GrayLevel[0], RectangleBox[{1.585, 0}, {1.5949999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.5949999999999998`, 0}, {1.6049999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6050000000000004`, 0}, {1.6150000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.6150000000000002`, 0}, {1.625, 0}]},
{GrayLevel[0], RectangleBox[{1.625, 0}, {1.6349999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6349999999999998`, 0}, {1.6449999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6450000000000005`, 0}, {1.6550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.6550000000000002`, 0}, {1.665, 0}]},
{GrayLevel[0], RectangleBox[{1.665, 0}, {1.6749999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6749999999999998`, 0}, {1.6849999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.6850000000000005`, 0}, {1.6950000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.6950000000000003`, 0}, {1.705, 0}]},
{GrayLevel[0], RectangleBox[{1.705, 0}, {1.7149999999999999`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7149999999999999`, 0}, {1.7249999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7250000000000005`, 0}, {1.7350000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.7350000000000003`, 0}, {1.745, 0}]},
{GrayLevel[0], RectangleBox[{1.745, 0}, {1.755, 0}]},
{GrayLevel[0], RectangleBox[{1.755, 0}, {1.7649999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7649999999999997`, 0}, {1.7749999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.7750000000000004`, 0}, {1.7850000000000001`, 0}]},
{GrayLevel[0], RectangleBox[{1.7850000000000001`, 0}, {1.795, 0}]},
{GrayLevel[0], RectangleBox[{1.795, 0}, {1.8049999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8049999999999997`, 0}, {1.8149999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8150000000000004`, 0}, {1.8250000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.8250000000000002`, 0}, {1.835, 0}]},
{GrayLevel[0], RectangleBox[{1.835, 0}, {1.8449999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8449999999999998`, 0}, {1.8549999999999995`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8550000000000004`, 0}, {1.8650000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.8650000000000002`, 0}, {1.875, 0}]},
{GrayLevel[0], RectangleBox[{1.875, 0}, {1.8849999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8849999999999998`, 0}, {1.8949999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.8950000000000005`, 0}, {1.9050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{1.9050000000000002`, 0}, {1.915, 0}]},
{GrayLevel[0], RectangleBox[{1.915, 0}, {1.9249999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9249999999999998`, 0}, {1.9349999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9350000000000005`, 0}, {1.9450000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.9450000000000003`, 0}, {1.955, 0}]},
{GrayLevel[0], RectangleBox[{1.955, 0}, {1.9649999999999999`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9649999999999999`, 0}, {1.9749999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{1.9750000000000005`, 0}, {1.9850000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{1.9850000000000003`, 0}, {1.995, 0}]},
{GrayLevel[0], RectangleBox[{1.995, 0}, {2.005, 0}]},
{GrayLevel[0], RectangleBox[{2.005, 0}, {2.0149999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.0149999999999997`, 0}, {2.0249999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.0250000000000004`, 0}, {2.035, 0}]},
{GrayLevel[0], RectangleBox[{2.035, 0}, {2.045, 0}]},
{GrayLevel[0], RectangleBox[{2.045, 0}, {2.0549999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.0549999999999997`, 0}, {2.0649999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.0650000000000004`, 0}, {2.075, 0}]},
{GrayLevel[0], RectangleBox[{2.075, 0}, {2.085, 0}]},
{GrayLevel[0], RectangleBox[{2.085, 0}, {2.0949999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{2.0949999999999998`, 0}, {2.1049999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.1050000000000004`, 0}, {2.115, 0}]},
{GrayLevel[0], RectangleBox[{2.115, 0}, {2.125, 0}]},
{GrayLevel[0], RectangleBox[{2.125, 0}, {2.135, 0}]},
{GrayLevel[0], RectangleBox[{2.135, 0}, {2.1449999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.1450000000000005`, 0}, {2.1550000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{2.1550000000000002`, 0}, {2.165, 0}]},
{GrayLevel[0], RectangleBox[{2.165, 0}, {2.175, 0}]},
{GrayLevel[0], RectangleBox[{2.175, 0}, {2.1849999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.1850000000000005`, 0}, {2.1950000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.1950000000000003`, 0}, {2.205, 0}]},
{GrayLevel[0], RectangleBox[{2.205, 0}, {2.215, 0}]},
{GrayLevel[0], RectangleBox[{2.215, 0}, {2.2249999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.2250000000000005`, 0}, {2.2350000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.2350000000000003`, 0}, {2.245, 0}]},
{GrayLevel[0], RectangleBox[{2.245, 0}, {2.255, 0}]},
{GrayLevel[0], RectangleBox[{2.255, 0}, {2.2649999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.2649999999999997`, 0}, {2.2749999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.2750000000000004`, 0}, {2.285, 0}]},
{GrayLevel[0], RectangleBox[{2.285, 0}, {2.295, 0}]},
{GrayLevel[0], RectangleBox[{2.295, 0}, {2.3049999999999997`, 0}]},
{GrayLevel[0],
RectangleBox[{2.3049999999999997`, 0}, {2.3149999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.3150000000000004`, 0}, {2.325, 0}]},
{GrayLevel[0], RectangleBox[{2.325, 0}, {2.335, 0}]},
{GrayLevel[0], RectangleBox[{2.335, 0}, {2.3449999999999998`, 0}]},
{GrayLevel[0],
RectangleBox[{2.3449999999999998`, 0}, {2.3549999999999995`, 0}]},
{GrayLevel[0], RectangleBox[{2.3550000000000004`, 0}, {2.365, 0}]},
{GrayLevel[0], RectangleBox[{2.365, 0}, {2.375, 0}]},
{GrayLevel[0], RectangleBox[{2.375, 0}, {2.385, 0}]},
{GrayLevel[0], RectangleBox[{2.385, 0}, {2.3949999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.3950000000000005`, 0}, {2.4050000000000002`, 0}]},
{GrayLevel[0], RectangleBox[{2.4050000000000002`, 0}, {2.415, 0}]},
{GrayLevel[0], RectangleBox[{2.415, 0}, {2.425, 0}]},
{GrayLevel[0], RectangleBox[{2.425, 0}, {2.4349999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.4350000000000005`, 0}, {2.4450000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.4450000000000003`, 0}, {2.455, 0}]},
{GrayLevel[0], RectangleBox[{2.455, 0}, {2.465, 0}]},
{GrayLevel[0], RectangleBox[{2.465, 0}, {2.4749999999999996`, 0}]},
{GrayLevel[0],
RectangleBox[{2.4750000000000005`, 0}, {2.4850000000000003`, 0}]},
{GrayLevel[0], RectangleBox[{2.4850000000000003`, 0}, {2.495, 0}]},
{GrayLevel[0], RectangleBox[{2.495, 0}, {2.505, 0}]}}}, {{{}, {},
{RGBColor[0, 0, 1], Dashing[{0, Small}], LineBox[CompressedData["
1:eJwt13k0VP//B3CMkuhTSokoREkkWyX0eomiUiklScm+JGuNUamUZeZmLSmK
dtmlxdJiFNFH1oqUkGQdZu7M2MIn3/s75/fHPXMe587c93nd9/P1unNVXPz3
u4uJiIh0U8f/fYb17RbMzNDK28U/u62Ut8Pes0tG26Zp5T43AmcilOxwz4LO
8eI/tPK168Tb+lTsUNko4D9/Ia1cP/27XaGmHb4jrs752Usrl1LS8rM1scM5
674uL6+jlbOOz778xckOk04d33XxFq1cY8wptu6xHeaIBj8U2UgrD/aXlSky
PoSz3C315I+KlXeG5BB34u1xUet73/uJouX7o4zzK3sP4/6KVNc1NSLlp7J1
9jTtO4Jneaa+Cd0z7GLTIb2kaUcsCUn1Kdj7l+34ZZ67TN4x3HP1oPLflGm2
d/Qa71sHj6Nl2ps9VkOT7NRii6pjns6YUR3aEnzkD3tKLYIzFuaCxyKSFjdk
jrOXdtMqD3xwxfPHaflSi8bYgpwFe+0U3FFEewXbPHKEbbLJ1fNuhAd+v5IS
ndMsYJdM/kw8auCFinO9ska28tn01t/+hTxvPGGoOatNkceu7axNfSjqi64b
OzIrKjjs0/KcjGozP9RkbJ7xe9jPNqf5Hjq6IwDvtdtWhpr1sDUO7InNzA3E
vvDFJpZLf7FzZF+747JgfHldY1u/XTu7zjDqrvunU7h+4NuITloLe0VwkcSz
AjpavGyT/M+ukT0xVrdQN4WBAVkFEzKLKtgDoSurYjrOoJ3HynufzmWxr9Wk
v/ysHYbVtd8IfdtMmFXD1e9Nu4Cbtd8+tblRAUFKriarNoWjGH3xDzf5RnCh
7zZnpF5CCWmbcBduC2TtLI6sUo/Ayz9bzIMetEPE4CMtmexIfHIryua8oAuC
HATikhLR6H/fbcFvux5oOB3bp+7MxLjQlNtxrj2gfzXiXqs7E/Nt6jWMAnrg
n9Nlx5g+TOT+3WgWx+qBnK+zmzqCmeh7RCpo0+se8GNbynlGMdFH9unnGJVe
iF2/c0tXNhM9omaSDYd6gXtmU54jn4lRRw1W/pzohZbkALXHo0zMMPAuIGb1
QbmK3gLuHyb2/PpU3bm8D6Y0n+sHirHQDTImWPv6wKzuiY71Iha6TFg7dBT1
Qcw+Q419Biw85pOqFB3eDznq778xglk49U2ynh/bD1d3Km7fEMLCmztCzzum
9oP5YpUq3hkWNmnYd+o+6wf5knC+3SUWWvQtvvfjdz8Ev7JijiawcI1bopqe
1QD88b1sG5DHwpGjzLXt/wxCxfqpdrNuFibUjbdZLhsEdZ8vh870slDb1DPm
6epB+Kw/52T+AAs9FLcPR+MgPAuyPCJJsvDbd1qBXtAgMGzcf7OmWVh26IIe
s3kQKi133HkqSyBrH91I/zYHWFf/brhiRuDVWk3f3CwOpJN3Od4WBN627ExX
L+bA34UpY1stCXxiaiW+9BMHfJk0kd/WBLauUWiYlhiCJI2w012HCNQQK3Or
Ch6CqeovGVW+BOqFBd2A8CEIvP9u2sqfQJOJVTUlcUPQPG/05PtAAm248To5
WUOw6PihpFw6gSHfnSfjO4fA5MtEov5FAquezko4vGsYOP/uClC5SmCj9st3
n+yHQfGFH8c8icDvmX6juzyGgTU4tvt4MoHc9K8OW8KHwfue9ZuoVAKXXMlS
X1k8DOYcZyHrPoHurrtfDalyoeKn307PQgL9OkS57uu5ICWzom/VMwIZh4uU
O025cLZwE/x8TmDM3hVRTfZceJJRK4clBD435tsUxXHB5N+Dq5+XESgue733
wiQX1jywrThRQ+BC7vl/FkrwYOWNPLGCjwSqfPDa8HARD+yLT+QP1RK45ZxJ
1ActHszJ+2pxqIHA0N/d6jJOPHh0wsJ84DOBzLK63Q9O8GCtjsermS8EJt8s
Pm3I4EGRjnrSghZqfesr7w8n8uAkV8FFpZWq97me+/0KHvTI1O2aaSPwvzjF
WINGHjxpin/Y/4NAae/ZL6p+8GCbfK9tbTuBa5S+i3NGeXDqcH3hpU5qf6ec
k7eIkiB6V+/YwZ8EPui3y46WICFlQYOjaheBT9/hJ3lZEkxPP7DO+UVgaYFh
r4sCCRO1vcae3QSW39aczFGmfr88NFTpN4ENdFnVLdokzPYk2xg9BA5p9ge6
bCehzCpyFaePwBG59sgcaxIiur0DQvsJnBL/lDKyn4TSNDUxsQEC53a+ehvl
RMLrLO9J0UECZWqfNDe4kxBdk+sUSnlp6aOBpb4kmORsnMuhvPpavEwOgwT9
S71abzgErrsYoT5ynoS8jP8eKA0RuOFkqJFpJAmnOFuPMSibOvjtjrpCgpLB
1iN1lC0sXZ0bEkkwKo5LVRwm0NrA/vTSmySsFatY5kHZVmU3yzmdhMnxix1Z
lB3+2ZqW/ZAE6ebAX32UXaY2FAqzSWBpb1+tzCXQu3/te5NCqj7yRe5+ygHN
yt8ii0mQ8roYdIEy493i4fo3JHgZ+TIyKF8omCu6tJIEHU/LsmrKUbdnZJ1r
SEiy6TPvphzHGtHIbiQh8amG5B/K1+kDJsIWErwzefMkedT+uXbYmLSTEJiz
ev8iyg9tPrtFdpMQmVTRLEc5x/QDo36AhKjUNzeXUH6q+SZGjiShy1bu1nzK
L+We3j0+RsKlF99+iFF+K/74edY0CW8WLT5GUut94N/6IBDjw1yVruWtlBs7
En4YS/KBxXVc8ZLy14+RZMR8PnQM5jslU07akrbt4BI+vFEbX+FNeX/h81R1
JT5YkNnLDSkvUKvlja7kg1XyUsdJ6v7VJ3dbVGnywZR5s7WEcozkVEqyLh/+
OMUmBVDeeW4hz2MTH3J/uCaoUK5yNkuR2M6HMsatHf7U/kV8sed+tebDw+o5
c6Qpb7UMMM+05UP54oA596k8lGndGbZy5sOrw8+bSqm8nLtTtFXeiw+1rtxb
xpQ3L6y/MeBHXT/hR3YRlb+i8Wkz4hwfzBz+ptyk8nnKR/aGw2Wq3vTOszNU
fvXa1w5pEnyQ29P4yIly/juH5I83+NCenNUs1Uugr2EQ51Y6dX52QvshKv+a
mSz0fcQH7chw3TSqPzJiSwaln/Hhqhzv7SKqf9xEGqG9lA/SJSUi26j+Ug3u
S8or54PaGY0Ef6r/0u2XwJ56PswPE8t4QvVr8spT1+IH+KDlKPr5F9XvB5Kv
9DuRfFh3Vu51x3dq/kg+MF0/zgeVF90iX75R+eE29TWKC6D0wM8H2V+pfJXq
mCxUFsBw78GwOdS8sdCyTPy1SgBp2pWBDU0Eit051vtUWwAaFz0b4hsJPB8R
m2BrLAA12Yq66ToC6Xs5v5PsBKD1RX4e8wOBBu/ENrsfFUCcrVG4QjWBAgOF
eEM3AZhZ+vtlvKfmq8IOo5ZAAfR4vn2d/Y5Aj56MWLlYAQSmMDzdXxN48KzL
htQKAYQLZ0k8yqfqS5OdPf6vAN4UFbnwcglsYVc12zYKYEuTtI5BDoF24mtP
z2sXAGP4smreYwLtY4XPLo4JgCch/dzxLtWfdyJ0PdcIwdjC4erzBAJT324Q
rdQRQqRD4vzHcQS2dfc3Km8Qwk67jyuTYgh01Ngd8H2rEALd3yw7xiTwaOHi
gt2OQliwaXVS4QUCj1dkaBnEC6HAYPv8wycJvNtjP51wXQhxM2Nbx3wI7JKQ
qh2+JYSFLkab47yoeWDtf+JxphD2F7pcyHcl0LV5Y7bCOyHMN5xf+uQwVX/f
h9Wio0LYeH3u/TLq+eorxVGtdxgB1UgTZTk5AjmhL8WlnEdAfWOQqir1fPbp
Z/Vaeo5AtUJ6uIYMgZ7vNbLfBo9AZyDDbbUUtd4FD90XMSMwLnpGkfuXhYeF
XXC7bASG9fPc7vewcHtbq6OP6ijE3dRMYBewcEVOVfLswVGQ2qJffXcjCw/c
KSmtIUdB62XY0h36LCSuZf+IGx8F3dyzssPrqP8fZ+NU5WaNQcXabBWNVSys
sbbLX608BsMBk2onZFlI5/a8t7IbA2Pl+JA1JBPrdGeNEu/GYGzBrMHch0w8
W2JuO//WOKy4qRc7I8bEgAzfog06f+DVplYv7eIolBbb6LKuZxLSRroqxQwi
cdvJA9c1r01D6V2vPbl5l6l5r+S/Te0vRDPSFYUWl/BqEDNx/dcZeBasqebx
8SLuj9qrnVYkglaGMdGuU+dR80jEwYdhohhyOerIQPI5bOmVvH/toBgqmMvN
u77+DNa79JgtXEHDtREaRVxVBnaJP564rkpDl5KSaE0FBo5keBXIr6IhPKtu
9pZhoDyHo6iiTcPXJqW/BTMh6BYsGNcxpuF05sTLde0hOHl5Jm/3IRrq50fn
Wt8MwVWP5BVY8TT89FiOoSgTgkaWbY3S16jvb/98qmpOCFoP3I5OSKbhZnmV
lmCREAzUVh69kUbDG69UKlp5dHz9YlVjRg4NBS9MdT7W03F/lX5UZTUNo7yu
JeyLpaO716iJ1Ucahv15FKAbSUfG3GLhx3oaTgwzH8uG0TFtz2bnz800LHDX
WtLjS8f+FjT51U1DOd3c9jxrOk4yxITufTS0MZI6kmlBx3nLKrMGBmnYwJpa
nWFCRz0nSzk+n4b06M7cHC06bhOVrD81SsPbnyZcnqnR0f5BTcTEBA2HHnPd
yhTp6LMtxvjcNA2dypoKa2Xp+P/vh7hzqtCqQ5qO/wPtgg4m
"]]}}, {{}, {},
{RGBColor[1, 0, 0], Dashing[{0, Small}], LineBox[CompressedData["
1:eJwt13k0Ff//B3BcJFRIQvlkS6WkrAmfeUlCfC6ltCiyZKvIvitrRK5L9i1r
SLZ7R5K8rz1ZIpJCKUuWyE4S3/md8/tjzpzHOTPvmTPv5+v1fo+YheP5myxM
TEwjxPF/Z78f/81vbpIYVmSj8dDZaBjzEVjqXycx1sPZfk0vRgOZ5+vKi98k
xuUTuuHGv6NBVOXuX8cFEoN8UNnnCAsV6h7GcAyNkRjCw2k2UzupwHH04z+M
dhIjK1f4D65MhceuN/Tup5AYPQe4vwXep8IzZpccJmUSo3bqlaHE7hhgu6kt
J3SdhVH0w+DWOfdY2NnXeDuLysz4pXx9NObrYzhfn2x56C0Tg2a0YJVtFQ8+
v9RvRw9vIprkRS9VpUSo9Ei2LzHYQM0vJRbVBJKBHHNRdCNpHaVpTS/FX0wF
7bTXZJ2fa6jo6PbXym/SIa/Zq9fF5DeKtv5zpDDvCZgGP971Ln8F7W7eX3T1
YBb43yAVc+1cRnTKmk0gPRuYZPYhzZBFJPoqN8bkWi58jkh68OzDPPqT+Kr4
leFT2MtpW7B4ag4FigrxNugUwC1Fabb+vb+QabBIxG/KM7BU/pJfXz+Fpq2P
zV2bfA7Snic3HXLGUZTAlb7FXaWQOWjU4KUxiky9OQ9tNSiDHwG71LQFv6NE
R09Ne9tyqIo7qDVuPIgYW2Jpr/xpwGHyw5JZbRB9+ssqRgukgbFoXqCw2CBS
ONvd+zSUBvOFEgz9qQHU/9CUMzyKBocY/6iW3RtAIhyyQtLpNEic5D/und+P
fvO/FRiupoEbxizCvfYJjbOVVvKt0qCOlaG6/+snpGLfNlX4hwY8b/2v/tvw
CV2ePvAV26RB0YX1hLtRn5BUcP+SGTsdRuxW+D6If0JnzTQdPPnpcP7xNEe6
Xh+yFx8fZz9Gh2MTnxZl03rRzlHmy35WdHCdlTm0O7gX/Xv0tLejDR0qVwKu
b9j3otC/ppdM7emgwS7d1HaiF1UymSvK3SXGk/BOsOv5gArujxwo96GD23Xh
k9lcH5DIpQ8HeWLoUNV19Z6Adzeqx7MPy1bTYaOvmPb3RjcyrTcqLK+hw6kh
lvER7W6U/CgvUK6WDq0zhYa0Xd3IfuGNwoEmOgxw/REzLHuPPmbVGYy8o8Om
VkpD+HgXGvijN1f4nQ6nq/q3/jXuRGFcxCPZcCguzFVpVu1EW/R/a0RuwUEw
xdGOKtqJlPZMv6jeikPvCnuMXs875NFdG7ljOw77fYx50tY60COPjBBfARzq
Apa4QbsdSehLSjhJ4RBvEX67h6cdmYbf2bxyEAc7TZE2289tSKlm56a6NA48
bFoR1DttyMam/PqKDA5mYY+3Dse2ov4rymRZRRzWo+TZQ4daUHu/dm3ZKRw6
HZtvChe2oIMm/ml6p3HINjRpLHZpQbjumOuQFg5n+YKCP7K3oCJZKe4/Ojgk
xb1nOSTzBil0j6YtkHG47W5t8Xq5GbW4rPLfNMQBLq3VnmM0I2bePLeucziM
C4oHeBs1o7aKh1PJF3BQSnXabPVqQh3sPE6zV3Dg9GMzu6HZhN7y3Fg/YYLD
4PWkmkXuJvRV29Xc9xoOwftq/USeNKLBkZCyBVMcurN41h2aGlB5gYxyjiUO
dwtKVnl31iM5medmXLdxOLbdIejUUB06ETGWMkt4zvnIdpfndQiXUTrddQcH
Z7UCiR7tOsQrE9cT7IiD27sscrxvLSrXZO6lOxPvp2D+qUm3Fhnmulxwc8Fh
OXGf1YpALZrRf6R03BUHD4tUr8tlDGS4fUYsxQ2HhcnDuoptCHULKPoqe+Lg
Ss83jbdGSOpy2MZ7wst++11XmBAK6osYtPPCYZVnX8ZLxRo0tpRYHO6Ng9fn
FLpw52t0Qf5IBp8PDmvZgm997F+jqpXAiXjC60p8S+oZ1SjiTGcY1RcHPyYK
Z4ZKNepyvT+wxQ+HjRYuUaaeV0jWxeaBF2Hm62x6dRyvUKoLZYjsj0OgVOAN
iewqxHy96lE5YdbZDbdg9SrUPvaLwnsPB/ag1SdnnF+iZB0qtZbwA323iqfc
L9HRwN3RfPdx4BCYb+V4WokspQa/mRIO/+rwzU6jEm1P8A/NI8xZMLX8tv8F
yjFM95sgHOFsy33E/QUSHx1pOhCAA7faqNgjnhcoiInZwpxwFJuF8kxhBdK3
e0qOJ7zj3Rd9A60KpMIUG9lEODrRxKL0K47iaoP3zBPms+jz4PXGkcEbzT+C
gTjEHr74yJkfR626aYdVCfMvdWV1F9PRWopV0WXCcTXkSgVdOuKSc/FzIiwQ
1toeN0xDghn56SGEE87pDC/70ZBi3OSOOMKCexpXLwnSEPMPya4MwkkjGttf
lpcjsVDd77mEhYtrJIT/K0esoYaaTwmneqiq+PwoQ/OCJxazCYtoVJIHAsoQ
imFdSiGczqlopb63DA3aMLQohPf1lHmlV5SiRWnfMT/CT9KOUjYNS9FVKvmj
DWHNDmPd2t4SZO1wQfA/wmfMDV2DuEoQa0VpgQxhnUXdDC0oRhpekRFbCZ99
oPl2i9tztGdSoGaI+D76wupLLQVFKPxiiAaNMPm5kmjkl2co9sBOgQDC5+CY
HnnnMxQ9zqx2lrCxtUTme98ClPFFyq+DmK+HTi5hMXg+smH7vPGQ8Gvfesfz
M09RKInBrElYMtby3/dmeUjEOjYyl8jH5XTa/pjEXITpnNllSDiigLTtfFcO
OrZWIbpM5GseZfd3ncpGj4KTaxUIS7Uu1FF9spDUi81L7UQ+r/RqFp6jZ6IL
t7e4mBNm/Bz27Nr/BPFSRFV8iXz/I69zJIs3GZmzZu7yJeojRHd8TSwoEcl7
CH+bJernp1lYS+ZiPGpz4lIyJ1wV+cY682Msku46cE+BqLfnbdRTGqoR6E2A
bnYuUZ8+v7u+wj9hqKbi0rtlon51pfj8gDkEzXLzR2gSbt2UdLwX5Ye4zYXx
d0T9zyYmWc0lnUfykZLT5UR/8GV53HjmhArW5nS6dMgBh6PJls38SmbYl65c
Tk7CRvJ91aEartjb9WvhBkS/cbK+NdHwOBT7GLG7PdcWhyyVw/qNZeGYnWKi
bakNDj3cU8WNHZEYLe50ToU1kacriictg6mY8cJvpgorHJiY8E3LmgRsa++0
8/0bRB4n+I+P6Cdhndtr5GzNcJDrdrWw6k/GFmAxVY/oh1Z5Co1Wq2mYUSuv
OxvRL62krjbKCWVhv3wLLLQu4dDc9umhvFE+ZqgR77yij4Ot5+dmk8MFWP3l
tSpfPaK+JftZg0mFmGKyPPtfXSJfPgP+PbRnmGFmw/OZMzi0Hfrq7MZfgqUK
HL0XD8T9ms7P+yfLMe39rLJrcjicSJpv/WVMwxgpK/Rjx4nxfjlPkuppGNng
uKWFLA4FyS4HjqTQsVO85adeHMZhcs4101evAjtu89n4gCSxfjzxiBMpeolt
S+GUleDHQW15hXZcsArTG2Z4buMj+oe+53ut4Cpsr6epwMIOYn5XPHc4XHuF
CQezXCnlwmGG7B1ew/0aOz7KYbDAgkOlf01NiRID+26ck582S4eTMrXlhgn1
mBhvrlvyGzoo9vTG17TUY8YHHxaIE+v5MZ+f3kfW6zF/csn+p/V0kGrZrclh
3oB5eamy5BL7gZ03HbqRdCPmIJOc5kqnw8/UPYtHa5qw4+7UuZsZdMjgdlfc
NtqCFWl0auc504HFfdeAlVAnZsJTjRvsoMPVG4XvKxU6sdRbIddfcdGh/CzW
wm3YidXfDUuQ4KCDxT67CnpoJ6atU9k9wUSHujfV0ayLnRgrNYjYadMgaI+V
Vk5HF+ZYUnvJs4cGrLXlxcNB3ZiHgLWTWzwNtnAbBljM9GKjjJqbXHzE9UO9
ms7Zg9id8qHOpcUyKE0JNfSf/4bR1Wx+1vSVgmOWFc+I8Si2ztIm165aAqb2
ySIPAsYxUx2h/NnlIgg/564inzqFibOF/DjZVQis/HFj99ZmsEoXpriQ1Hz4
2BoyG7xjDhv2pIzUl+bBRR8LpeT6eUz8n769WQ05cJtrSrzj6iImyTI73bsv
G/Y9a4pnn1zCZB7yqkXmZYJPpabRjpQVrNklpipL7gnczbtdoST7G3vPnjup
PpsG3CzKFkdH1zD9fxf/5D9IAa07F+KkY9exvW7VX/itk0DwpYijluQGdrrd
+LF+UgLEOIdRj33cxPLzNrT7e+LgfKiBTFoFE+wuD9RRN34M0ibBF3P8mKHt
MFk6likWese2ZsVeZAFxN+5OxxIqdFiMavDtI0G3evoHXmo0fGN9uhonToLm
gfBH+pHRsJhnWyIkRYKx2gnp8AfRIDQ1tVdMhgRRE3Z8HP7RYOUyvyKrSoKI
VXWfvbeiYS1o8/l/l0gQJHv6Z7pWNEjlCgmHU0iwMJGuzbFKARXt/k7uWBLc
FdzIXZihgP5E6oPoeBIMeCokfB+lgJOM6FJCGgkSis0Ot3ZToBqX6sx7RoKe
uw5TTSUUON8kH9rQTIIbu+SMbGwpcNN2SU2nlQQv5d13RZhRwJPzxUJrBwnE
PfoMyo0pkEY+ad79gQTUIWspLi0KjPeC2vdhEjhajB0ZE6PAmifLws0fJKgb
NgzcL0SBbXsaCiYmSWCh0HHKlocCcmbau+fmSCB9K2JjZSMKtJi3drgukSDT
PWb59HIUXM5+G7y6SgK11JNGcdNRYK8Vqeq7ToIR3wm+iZEo+P//RVigsCnA
QBT8D8MNHgM=
"]]}}}, {{}, {},
{RGBColor[1, 0, 0], Thickness[Tiny],
LineBox[{{-0.671655, 0.}, {-0.671655,
5781.4715275775625`}}]}}, {{}, {},
{RGBColor[0, 0, 1], Thickness[Tiny],
LineBox[{{0.444446, 0.}, {0.444446, 5781.4715275775625`}}]}}, {{}, {},
{GrayLevel[0], Thickness[Large], LineBox[CompressedData["
1:eJw12Hk4VV+4B3DOkST9KpGhUUqlKCnK0HolJJJUKhqEZCoHxxwRyZQyT2Um
JOKcvYtkHZkyZJ5ChkSmEoU0ufs+z71/7efz11p7rff9rvUsCVM7g2s0Li6u
ldxcXP/79fx8YmZxkc7hWG+zz+DYwYjH2tmeP3QOf1QnrbffDvRW9c+/WKBz
1Ddwn929aAebDzH+2n2nc4ZyklVWbGLAm6BwvoEROqd894xyzGUG8Ml2buS8
o3NovnN3JQYYEMk00fFOoHMU61zDNb/Yw1Nux3QuRTpHSPOEa5gcEw6ezuGN
k6dzXPaEPjqsyYSq9EFLub10TvtUgspfIyYMaOnLmO6kc45Xhorl+zFhbagM
Wb6OzvFfLWE10sWEO+Kj1f5cdE5JWCgz188JzstfmhCopXE+3fMW7B9zhiXX
tPaJXaJxdCrmw6S+uEHLZblzExdonOetK/Paedwh8fy6W68NaZxiaXQier07
KOhOVV7Vp3H+vapU0NV1Bwv5mAs56jTO2zVeacG57vCW+7O3sjSNE7SzUNuE
4QEhif6Nl+a5OV+0S98lLPGENV2Vtqlh3BwFx+sCovu9waA83mxnLRcn0/Ow
l8iCL3hMqdo+HFrEiMSM3toAeOkSb51/8h/Oj5SmFy4NBb3ws5v/xf3B/kH3
ZEO1wkHr8Wu9Y5O/8PZNzOGuL1GQWe3W4Wi8gF0+dpSIv4qDy36Rwo1Z81jA
cirxhUYieJnQ85avmcMTY8UxcowU4JLZhNXv/sBckmZeyl1p0B0cd+9p+wxW
l15RvSUmE9bzW2b/ODKND4pw8m+oZoPNAeklPeun8IzNZOPz7blgptiXVV4+
gZv0hFwmF/NA2lVp8Wb6KBZJUB2j1T6HlA+nK9zUhnHTBPey8fWF8NlHWEVL
9CPOVv9wVh2xgN8zfyqC/yNuOSnMPaHOAllX7bSBP4P4k0aK+sNjLHC+6cnv
PjiIeaXC77aeYgGv8XBXbs4gZmiveq1izoKt+wknQdVB/DJ64l9MAAtMR87k
f7g6gFOrHTaaNrKgOGqHxqjhB6wS+8iy9gwb+Iw/m3GrfMBXlF5Nsc6zwXBz
5h1xiQ/4qmZYYvxFNszkSHJ0J3px3PJCmyvmbNjJ2ahccLsXt77ZFVrlyIbY
cSE596wePG9C01kWzgYnxL1B4Nd7LORIJJyuZ8MbHo7ytv73uCFD0bmvkQ2r
ar2MDle8x80H5VQtWtmQe+ZPDCP0PX77wCXQtpsNn6zmBdu3vMdaQSLjp0fZ
YBD5hS9RpwsvLdPTDKETsHfs/Y89jztwzuf1gTGKBDC/yewU8aPMx034KxHw
ct7n0j/rDuy9mMHjqEqAGq90Vf3BDvzKeSm/ujoBBpLuMVZt7XjfapVAjh4B
TpfEldKWt2PZBx2qe68RUNxsdHuteyu+73xo8P0DAv515bH+mrRib+0gcZtw
Ao4M0EY/abViC9JPfyGSgLqvOfos4VZ8SHL4mUA8Ab3Lf0voF7TgsqOp/61M
J2BRI6EicLQZJypl3/R5QcDR4p5lfw2bsOXPEAnhXgLycjIOVSs3YSTw7aVD
HwGiCXZWYZubcJUV83H9AAEd87zhOm2N2Hrj8DGnYQK2eRiuevyrAcszJ3nj
vxLwxmdWALTeYZ2lC6v3cpEQbRpo27bqHaaHtI+dopFgpb6h3rK7Hpvm4N92
PCSsWqIRHHajHqcNKdUk85FwJSBy2VBEHd7g8WyibRUJf0Llef0HavD+6G/G
/ptJaLKrviaeU4PzOz1O2WwhIU3fuDLPsQYLs77Z6W4l4bigr18nbw2uc4+Q
pO8gIS6qhbZT5i2+dGbN8SN7SFB4ZL9Y51aFeU2OveZVJYGRnf9z9ZpyPDf+
cjrlLAl7/7vpe2TgDW6unLOfMSRh2mH3f47P3mBVxQxvdJ4EB5VsyTatN3jt
/k+ajUYkODWm6kXfKsMCJxQsKq+Q8H18l/aBeowbB2rslluRwGRnXY62wNgX
dMK2WpMw57mNOc+F8UP7gweVbEj4uWpTUtGBUvzb84SQ8Q3qfxUEZ1WTSnBf
3O15B3sSeH1/Jms6FGGzPA2u364k3NN1Ip8IFGFBi+7DvW4k8K2dqeN78hJL
ZzF/F7mTwJ89MVfb8wJ/dxP7Yn2LhJWNfbonNUhct2/jk9TbJDyMNTZ93k/g
N0nvaq97kyBo2uWy2p3Aqzi2Vjt9SBCabU5tzWPjdr//1qbeIUF0XeXPc6Is
fCdNR9LqLrWen9T+KyosxOEpXUKC/iSI55VKip8oxDv3ZHu9oLxB7aVer08B
1rboK5q/R4J6g6F2WUc+NtF3rToRRILmVX2m7/J8nHFo1r6b8rEf2kkakIeN
3jpGmAWToCuuOluTnYsJX6aiTQgJhhaSKS23sjF3Utefk6EkBNk7BoQTWdj4
Y8G2Usqvb5XbGXx9gsNSeUZ2PCBha4TZ4ZYrmdha23D3D8rnE1nbwmMz8J7h
nwVnHpIQnE1fYdCcjq9aXmwooDyD03qaj6Th7vDS2qthJEjVfX8T5pGKo0/e
yGFTvtChnnOKnYI/blTdzBNOAmdyyLV5WzL+sqPgXSzl0anrnC2vE7Hih9VL
+iif5OV7kCr7GF+IEWjZFEHCRvlju1NXx+OkDUa74yjf1R79JeEbi2NrnYqa
KE9eCahJ+RGNldDrHp5IEk4774iVsIjCQ/WiEQcoF4e8tUjpjMBqBg79ppQl
0iwPSGiH44vKBCeEckARH09K8UNM+DQosCj3JZ3KUDsfio/m5qp1UH5WH3ZE
TTkYP2hEg7OUPRaa+2FjAGbddxMWjCJBW0rQE7jvYoe1J/qkKYucNhCHTz5Y
fnu+MlCuW9xqdzvUE69fHi1jQNnyQka21xkXzJOwwDKhzMPa9slT3B7fV21t
sKEMYrqqvzjXsPjnDV6OlL/FxplPxxngHrGOMhfKt2iRlZoHD6HG4YU4V8qy
8WbVQgpXUNloAK8z5T6xgq/LV9qik3p+SxmUT8t3lfirMdHHxq+PLCiT78/d
uefhjgrY9VUXKK/gTEhWGHmjV82Sd7Upo4in/hUuvqg68HfnAcr2FjZjFZH+
6Oy7i3gj5dRDu3QrCwJRmriBMg/lNoGJvMqGEJTk+VlnhFof3oGc1VUTD9D7
B9LTFZQfXTigZOYXhnxdpXclUz6gHmUzJBiBTCbnF1woN+yefWSWEokImYxL
upS5uIhFs9IYJD08NTRO7W/cmJDcJ904NJVaxEtQ3tfKNDXviUenXr8q9aBs
nrm/0vznY/Q9q+XrP6p+/j6InPvkn4Ru7tp8/RXlOpVfEYVByajdVsSJSdlc
yqhyn1gqWvH4rkEvVZ971/H3OQykInq62pZgyn9XFs8VPklDf+LkAhQoRy+I
7ZBXyEAi94+J+FL1Xl3/Pkj+dBaSb/2s+Z3qH0vX7mrjXdnIrF+H4UmZb2sP
jx89B/FGTUfTKR/36PVqYz1Flv58H+j3Sajf2e/gJJSPpH4tO9NG9a9te3/+
48l81Naw2u4wZX9gzJmaPkevJpMC0wNJ2D7JkA9WKkBZfXGl5gHUeOoOz3rG
C1Fu0z05gsqTg3EzdVOGLDSooGCw6EeNP+UwTi9nIfGvik4alLPjHbfvTmCj
bXIV5ZVUHo1PM1Nu6ZAov+9yaDSVZ7bJLlEbcovQQpSvshuVjypz8yw50WJ0
KNef7etCgoCua4uGXzHajlcoBjlT/TDvuvLmxVeIVfDaKJhJwlc998BSgdeI
1V+46zKDhJdepaX5Chy0fZ+Ko+Z1EpKz/70rsuWg8c1Xq1dbUP3WdvhDeSoH
vT1/Wva9OZUv0vh3539l6E2UkuJFUxIW2vFBrs9lyBFVaMlfIkFJpqxQP6Yc
ndDn4pIyoOqnrSO6tKYcDSlsLK3Tp/bPY9J9959ydFSzQPzmSSp/akTU+a5W
oBKr0oIsXRLWXLvZiqUrUZDxbatZTSovHq37IVtahabuz0R+USIhScD5wIrh
GhSKqtovUedjPCtYzEOkFl0LGXoZu5Haf6OUv6Patej4ZOSppvUkhGTVV1bk
1aJdCb8zD4iR4HpU0vCWax3qDtm80LWaBINbTc4Ty98hD079wh3qvKY5C/ea
izUh4bvHn1sPEmBkktPycn8TorUU71zZT0DhcVQjoN+EGPVln/Op+4PpJiuS
7d+EknG2wkgndR94W/KQ50cTKrw9rC7VQIDvOnON9IZmlJN47shsEQE8ZYV5
Q76tyLOEY9oVSsDFp1oZikmtKLVvjI8vhAB2VG9CcHErmsof3LQ/kABza95A
+elW9E5UNdPHl4DKNUZmvpfbkGsoDc24EOBvwS0qeagdHUu2XZA2IWCpgL6P
6dcOpPXhSf4SWQLObzfiKCzrRDP8O3LbpQnIOWK+yL+1E6XblNukbidAz83V
k3WhE50ZK1PaJ0FA9EiyG09lJ3oqa62xS4gAqbJp+8yELqSwxMfLb4ENGs4R
puPHutFJUs6gv4wNvgMd6g5pH5CJHNshTpsNzxP89b1mBtEviWp+IV0W2KWa
r/pkOIz2zAkEdgsVwmXr+A33fEZRdfOzbWJdzyHwlPMh+UcTyGBlUMl2iXzg
EYoauf3rKwKHP0/WaORCZ93db34rp9HRtyJty6Oy4ayHqUJ8+QxabFiL9xCZ
YLt8YkuD0Q80JvwxYWZdOmx6WhXNOz6LtuyqUVqTlwIeL9VPr0yYR9eXPtRR
sU0ERqYtqbBnAWWYvjC02x0PAjRFU9nhX6i1vsFK9V8UaNw4EyUd8QeNJzfU
3TkbDqJFG+w0tv5DFaNj+2TTQiHcISBsb+ciiiiaLN85HQAG/idlHpNc8DDn
WOJJEz+QNvY7m+7JDYXJkm3V973hgj0pyOPDDaIdoTWBXt4QcG+00cyPG7SM
fHsM7bxhmKV7XDKYG9wWstQET3lDsoAwSo3lBuFzv0NXCHuDcGnGjmQWN4yJ
1bdKHr4NXBLVvxPGuOF+RKj3ZWdP6BhZlhpxlgZCEecEdLe5Q9WZwEdF52nw
5IFlJ17hDuQbvph+YxocfmfQcnTODaITl4bsMqWB/ZdqhTvVbnDWcIlz+U0a
mPPntNZYu0FbJdfx7/doIHPfe/tdtiu0pM9PGxTTAO32cnU44wINpsNqgpvo
4Na1NfJCBRMGeZ78jNpCB8M7p3Ii85jwI9MyX0yKDjLdrNiPsUwQm5hYLyFD
h4tdTk3kDSaYO87M71Gmg18P2xaJMuGX7+KzE+fo8Py0sWk1wxGkMsTEAx/Q
wajkSp/pHgc4pNXTJBBBh9423oWP6xxAd+zRvYfRdLjP5ejD5HMAe5nNszGP
6TBwoTSvbtAeSgippsyndGC9DlHTjrIHgyp5/4pqOny9f/yOyyIDrlnOqhyr
owOtsFx52RcGuPK/+F7XQIf1fv7Pn3Yz4LGe0tXWdjqILMQmbSEZMNoBKh+H
6LDESfNy5w0G/HKlfb/2mQ4j86dKvhgzYMW6iuyxcTroLNH0FDrOgH1XtESm
p+lwNmHkd7gUAzS4lzUwZ+nAoMWljQsx4Hxard/Pn9R6laA7BnQGWGuEKN/6
Q83X761Y1JAd/N/7Bvz/+8b/AG0KZvs=
"]]}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->{True, False},
Frame->True,
FrameTicks->False,
Ticks->None]], "Output",
CellChangeTimes->{{3.66258169015475*^9, 3.662581733443055*^9},
3.662581997232984*^9, 3.662582031572763*^9, 3.6625827243942432`*^9,
3.662582762520871*^9, {3.662582824797799*^9, 3.662582829515286*^9}, {
3.662582882412808*^9, 3.662582903659301*^9}, {3.6625831477928553`*^9,
3.662583151957732*^9}, {3.662583253606268*^9, 3.6625832773575687`*^9}, {
3.662583437189005*^9, 3.662583466379074*^9}, 3.6625835706135263`*^9,
3.662583754243329*^9, 3.662587776669527*^9, {3.6625878981310787`*^9,
3.6625879053710117`*^9}, 3.66258821421025*^9, 3.662588282880913*^9, {
3.66258833210124*^9, 3.662588340553083*^9}, 3.662594026642303*^9,
3.662597384769925*^9, 3.662597935029359*^9, 3.662602352469803*^9,
3.662937889242938*^9, 3.6638095682857647`*^9}]
}, Open ]],
Cell["\<\
From the ESS calculations for \[Beta] = -0.6:
{u1\[Rule]-0.671655,u2\[Rule]0.444446,n2\[Rule]655.562,Km\[Rule]14491.9}\
\>", "Text",
CellChangeTimes->{{3.6625831016188927`*^9, 3.662583129434276*^9},
3.6625832301909657`*^9, 3.662587879844906*^9, 3.662588322881942*^9, {
3.6629383216129417`*^9, 3.662938327635977*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{"5000", "-", "655.562"}], ")"}],
RowBox[{"a", "[",
RowBox[{"u", ",",
RowBox[{"-", "0.671655"}], ",", "try\[Sigma]\[Alpha]", ",",
"try\[Beta]"}], "]"}]}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "0.8"}], ",", "1.6"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{", "None", "}"}]}], ",",
RowBox[{"Filling", "\[Rule]", "Bottom"}], ",",
RowBox[{"FillingStyle", "\[Rule]",
RowBox[{"{", "LightRed", "}"}]}], ",",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",",
RowBox[{"{",
RowBox[{"0", ",", "maxheight"}], "}"}]}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"655.562", " ",
RowBox[{"a", "[",
RowBox[{
"u", ",", "0.444446", ",", "try\[Sigma]\[Alpha]", ",", "try\[Beta]"}],
"]"}]}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "0.8"}], ",", "1.6"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{", "None", "}"}]}], ",",
RowBox[{"Filling", "\[Rule]", "Bottom"}], ",",
RowBox[{"FillingStyle", "\[Rule]",
RowBox[{"{", "LightBlue", "}"}]}], ",",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",",
RowBox[{"{",
RowBox[{"0", ",", "maxheight"}], "}"}]}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.671655"}], ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.671655"}], ",",
RowBox[{"k", "[",
RowBox[{"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",",
RowBox[{"-", "0.671655"}], ",", "tryKm"}], "]"}]}], "}"}]}], "}"}],
",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Red", ",", "Thin"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0.444446", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.444446", ",",
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",", "0.444446", ",",
"tryKm"}], "]"}]}], "}"}]}], "}"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Blue", ",", "Thin"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Axes", "\[Rule]",
RowBox[{"{",
RowBox[{"False", ",", "False"}], "}"}]}], ",",
RowBox[{"Ticks", "\[Rule]", "None"}], ",",
RowBox[{"AspectRatio", "\[Rule]",
RowBox[{"100", "/", "408"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.65401717055512*^9, 3.654017187280355*^9}, {
3.654017344576412*^9, 3.654017359511397*^9}, {3.65401927528238*^9,
3.654019279074164*^9}, {3.6580749961162663`*^9, 3.658075010600336*^9}, {
3.65807618793108*^9, 3.658076188490995*^9}, {3.658076231516355*^9,
3.6580762327478237`*^9}, {3.662578424430344*^9, 3.662578429869256*^9}, {
3.6625805332605762`*^9, 3.6625805414913797`*^9}, {3.662581602724835*^9,
3.662581605530455*^9}, {3.662581992245171*^9, 3.662582007124544*^9},
3.6625876775895863`*^9, {3.6625879334203587`*^9, 3.662587940361785*^9}, {
3.662588067883778*^9, 3.6625880692748327`*^9}, {3.662588103713826*^9,
3.662588106017372*^9}, {3.662597897241036*^9, 3.66259789846564*^9}, {
3.662937842099617*^9, 3.662937846980784*^9}, {3.662937942512855*^9,
3.6629380817917852`*^9}, {3.662938127607706*^9, 3.662938199845072*^9}, {
3.66293823215698*^9, 3.662938260459632*^9}, {3.662939450972671*^9,
3.6629394537095213`*^9}, {3.669320202231213*^9, 3.6693202028988247`*^9}}],
Cell[BoxData[
GraphicsBox[{GraphicsComplexBox[CompressedData["
1:eJw1lwk0Vt33x4UylAYpU4oMlUqIZOoclSFTQpEMJVN6iyYlhAoVwptEecyZ
eQz34iE24TVFosGUyhRRhkoeGv6ntf6/u9az7vquffZz9t73s/c9V8rRw9yZ
k4ODY5b8/t5PD5v4x8WNgdSbJcHcXEz8Y263GVN4FHq5FoKjlxZglz89Igcv
jcBZuK04kVSAZQImrmV+GYJ654c9A/KFeLlpUFKOxyAUVZp+uM0sxL3LX7F2
t38ApfnYf5doFuEfB6I9/Y3fg2fmvYWI0iL8ZVJoT5LZW2AZ93PF7SrGuiMr
BO8L94Ch6LeMC1nFWPPFmOSvNW+g32WkRZqfwuxkpQ3enZ1wZe/ApXfOFD7s
am3t1tgOp6166Io8CgvcFV91JK4FWPIcOstHKMwh6mjGJVkPN6StJLQEaWwn
1sqvsLUK1J5JP22Sp3F3XLjyY8FC+IXuHS9SpnEF/8aezLeRUBxz48TxTTQW
4OVyWyGSiFRSchYtLKXxA4+ObRsbKHSs++2dq30UPior1Kx+qRoZZA4aGiRR
2Fp/MKGctwG9jtrZzHWQwtkq94Oi/VoR6+3uqICpYuwQv3+htuYFErC3VcsP
K8YpZWZ1WYtfoWVS8/S1NcXY4L2f+TrBLiQcXuwYzSjCD87En9Jc0YvuuBcK
XJYqwuvXmETpmfQj3rcWW+XuF2JupxVoMus9+igxOGS7vBDfN6zRLjQZQC6N
k4eTvAvwwuB4QNPYIDrxslf28TMmFuTKkNvsPozw/bymRlY+1t2R8/In/0d0
Q01woiwqD2/5gIaFI0cRtwMbDQTk4gFdE43bAp/QS76Eq1xXc3BpaeoDz5xx
dElDdIPwyWyszbxjlbD9M3rn7KmT4ZyF3xWXb9jb/gXV5ie/WXMsE4smasvG
bJ1Ci1Lzu23cM3Cudo/trvEp5JRWnGQVnI5bHR/FrqqYRm3SFguKsY9xQ3Pa
4pV+M+jJaL5d8tM0fJDV4XXg4Fck08OvWjiUinUWafPnS3xD8gsDa82EUvGy
sMk21f5vSNCpgfOATQp2Zvz3YC7/O1qh68vlE5eMY6aHo/rPzaLNi43r4z8n
YeVEnfxJxR8o0VC8N9A4Cdt21rRpcsyh9YfQTyejRGxveEcyp2YOLQ6Tvx2w
MQFfhwthcXFspCShFPtqJB4redS6pnWNgoPl3l184UycwV1fMWXSAUjvLmd4
KIVtFUaOr77fBr08mvp0C4WDO6sKcm0bIcf+NeX2m8LCFkPyrWJPYdPGdvMI
SRqL2+QljCWUgsuXhCwlJRrfWrf21ArDx2B/4gWf8w4ap83XiLde9EUzgv12
THEaP1TqXCIXnovyNF3XXZulsIyd3/vmrnIU4yB6SLOa8FfiozJfVYsYGly/
0rwpPMXtfyRlOxuhUS4q5ToDm2bf+rpefQz2j2u0/dFnYjMLn8/Uyk4YllnJ
kCbr94IztzdfOwzfPZ8oX0nhZsXPxxctNAH38uPXmmcovGxXqrYboxYIyh8+
itJYS6Py5dLhcrA8dnrXQwUaS2SKfMwtzYFvXL+XppJ8ZEROyo0HXICmKv49
fBtp3G7j/jZmWTpCTY6Hni+isf1IRvDs81IUsXjMp7ONwl2f9f+Iij1FknY9
4d7hFM7IuFmR/mMO1cnw/BLoYGCVfg6WinAriGK9CqtuCu/ziuSwrvoPHnEu
EhzmpbG0p6yIcmw17HLlCVCUo/G8N8OtwZoCmxlf1QjS3yNSm14PljGAESwh
xt5K42O13lbJYvfQl66I+5ZCNFbmXh/bE1yIjGp55ZZ+orC6o/c04yQb3RC/
GKepwsB9+qfVbU+NQXSP8zd/WSZOu3pkifD5Tljc1xsR70Fh49UO+VNu7cAr
lH0ugqbwPw7crK3NzXB0gv0uYoLwkMHZQNvXQeStSFfltTQ2lq+fXHfrCcgV
NvN1b6Px6GfRdJ8v+WA0zRdtRuKtay9PHawMgsCgVp1XMjQ+PUkbHHyWgszL
QZCfh+QnX3k0zKgEie/d7VL/isKxfPlDWfo1qP8uHx/nAwpzevN8yeybQ9OZ
F7bIzTOwQfDXZTKvW4GN6LrUDgoPpWVYXw9vgIOpOtYtXDRmfLiZ7H+0Bl5p
yLcFSNOY3/3xja4FGsosEkp4SDxVr4Wy8eoUUNQohZfbacy91z3hpdoddOgP
Y1ZKhMZ/4kMenWllIuWxzDi3KQpH7/wpnWTARpPbUYfpMQb+t24fJdb3FKx+
KOvaStB4myHNmtdhQUDZWikBRRqbOwpv7g/IhFHjH6+ziOaor/xU+/EQkqj/
fvvnemL/FSrRlAfAxTGhmrCZxp9u3zcpoYsgOfKiWCOJzyxGxlrP6AE8L6jA
HVto3B85W/XoGhsturyQ7ibAwGkxtn1XA8dA07ApWUeIiU2X1wk2pnTCvqG1
5XXuFDarPHYjN7YduCsVGLmFFH4yu2K4WqkFGruVRq3GCG/Hi0JtoQ4qP3BZ
I8KL5cYDfo+PVoJMzWO5XsKTi0Hr9en9BZC1zG3mDolH4sKfnIdPQoEuU5ve
SHhksY5d27otGcXH6bWE8tHYoFV/n9VtGlVcno3dRHi+Inzizbn+amRbts0v
7xGFCz4Y8Mg/J/Opp2qZ0fIEbN4zUfJItQ3Cb1g/3/mcwqpaxTeFvzcAn2Pd
OmnSTzYPVVzkymvALfiw3krSb4KOW1adaC2BHLGBgHTSj6ne9/ky81NBS+mc
eTrp15xE2RgJ9Ztok2lm3hTpZ2PX7S8ObM9HMsjihO9XMg/itbWlNNlo5OOb
jKmzDHzQ7+uVGq1aaOtZq5FN5pHKXnX9G6vLQWvHVi87Mq92L44N0V2XDY47
Z4Z3kP0aTVytvgnYw6bppNk7ZN65lF6yCFWrBrd2T4YHeb/OBIr27gkphgOQ
50OTeon3yQqvuf4Qquu3rpok7+cwtlrXunNslPXugUSzJAPvV9ZxjC6pgCiF
1S61hD9Oozg9IYs8ONNRqMdF/DnPS80elKfBfXWpwWGiu3ZGG3ZfToIrltxH
pkh/yZgrbTvvWQYXj9jv/MvXGYhp9BpOB+FjvR9WEj0Qtap6+1Ah8LafWtVA
/BU304/FwtjIIsBwi/B8PObd82r7nfAxUE8wG09ZysQyXfOxkhWdcEvEt87C
jcLmgj1n7hS0Q7plxyeaSWGnp2t8Qp1boLf/0gH6I4VTtPi/MCfrYImLH6DV
NLZev7Tu1NNKeL9HZciS8CN5Ls+mJacAGh/e40km+xvWSSnOVtwFa5HEwlrC
z/sEhThR2yRkEhpZWs9PY8/1AmVam2k0c3puvqOHwm4J5e2vsqqRppPF/E8G
hXlixu65N84h+96lpSdFErDVzbFQK+c2MFVk2nq1UrifhyU2sLkR7Hu9tjf+
oXCZV1ij96caUHgb131IisZr7cetZHeVgoS10e2z5HmubTnMOuabBtppbXy8
5HlfM+USfKoeiPLHNvB0iNH4gjHHhJpdHrq35lzgn28UjjPrbzqhwkbBKkfS
G64wcP5Ro16hM7Wgt+/D2hayfveehXB933Koik0z+E14zD5ircYey4YDE3te
nyb7xYxrablxn4ZxwbMbjEk8dfda6X7XasDvfq3vIPWY9euV4poqhhvdl1vT
SL04/NO9fCXioTZi8qwXqedAXpeTnTsbCbNEegLkyfxT4Mqy3vAE9PeuzzIj
/FyKPzrbIJkPHgxZo23Ef8nZQS2hezRoZGp9UyTaKMhyPkw3GTZ8Pj/sRNZv
Nv16fld3Geg9DWHYEV7er7S6Il+cAXdTfpY5ED0S3rlkxrgIgmPG+ZuJf0jf
YeVjQWzU3dY8VsnFwDao5/COJ0wIVlCQ8iT25S6uzfFOJXDynzWR3SRfRb3L
HJDNguZFPlWlpL71xW/eRJlmQbCkm+Yk+f8vQVbRV9cXQ5cnD64h/pHsrpjj
QbkgHjwc/Ir4/77kwAytoSBiVW/xRWLvv3/Q+5RPIRgc/7odiO6+ICTa8y8b
cQtNnbw4FY/Lo6JeR90bg1dRpvkWPEy8XHttn3FDJ/wSl+UVc6XwSy3Rk95P
2uHidAhm5VN4d6bIf57+LeD78aD5ADlfv5DfldjNUw+KV0M9qsj52mbdPx9b
ZiuhmkNocgWpv28QQ2/3uwJ4dPOhUTbZ39NLlP1CIhKubMoLFST9P7JR0URq
NBGFLf49dZycr7kbPM4zf1DI/JOxdkYvhd+fcG0NiahGYy12m6UTKaw8pd7D
Xz+HTrjwPjonkYBtul29VP3aQHVqh17MMwoXfa5wbtjbCPMiKpyihOdRpzLv
VM6nsCPBTXSazB8RW2OfEPdSOF96vsSM1Ov5V9Uo1cE0GNStlVQj9W43Gkrc
fNEfPVceUdYh820JnGIrfM9FOTMFDvCdwnXZCis5ldjo0hWFHMqPgd/qXw7b
E1QLSz+Y/D5KeNbQsi3MKigHj6Y1fc8Iz07+u1d0muWA//RF3ltkv7n/cEpE
oCfcUl+pmEN4/hbIduENqIYQs5DOQMLznI+WrrMMBY9MCxMeknpdaHeRUxyP
hwvmQzZlpJ7Lebfk/HJhozQPc5bdDgY23Ob0rNziCawQLbm0hvCpUK/elhyS
Dzojy3gQ8ef9Z/9xrwYasu7enVlHNHe+SodLbjIU9ew7xSDr5Y0tY2IFWLCv
TPynKuErTl3NjFssE17IyDoEET0aqiJvGVgEbPlJZhPxL9qVfmUhkI0GPajG
f3kZmF/lbczNVQUQ12YodY3YVzo1fv4dWwIbmsMeV5N8lfd3SUu9Y4H05CK1
0L/zoq+UeZrOgpCoyU0riX3qRllpn3kxeJoIL1QQ/wMbWWc1JnKhRGDn7wli
57hY3fH5OwXidV6PnIn9/b2C+BZmIdSnTzyp/ZtPm5PD1Qg2mlU5pK/7PR7X
2laetb9SANaMwOgYYv/mf/V3UkUxAG9rTd7f9Z7XRYvsaZDPTa7YR/RQxPnB
CJEiSCk+tfVvfhMhs54in4rgsqWvYT3RPy//Dt0SToH9k/6o60T3PfhymEe/
EMz/9XdiEZ0vWtehHsNGuu3fr6WNx+P/fT9z/P/1v++H/+n/Axcqpoc=
"], {{},
{RGBColor[1, 0.85, 0.85], EdgeForm[None],
GraphicsGroupBox[
PolygonBox[{{1, 245, 246, 50, 244, 191, 236, 146, 182, 227, 110, 138,
174, 219, 82, 102, 130, 166, 211, 62, 74, 94, 122, 158, 203, 49, 48,
47, 46, 45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31,
30, 29, 28, 27, 26, 25, 24, 23, 22, 21, 61, 73, 93, 121, 157, 202, 20,
60, 72, 92, 120, 156, 201, 19, 81, 101, 129, 165, 210, 59, 71, 91,
119, 155, 200, 18, 80, 100, 128, 164, 209, 58, 106, 134, 170, 215, 70,
90, 118, 154, 199, 17, 109, 137, 173, 218, 79, 142, 178, 223, 99,
127, 163, 208, 57, 144, 180, 225, 105, 186, 231, 133, 169, 214, 69,
188, 233, 140, 176, 221, 89, 183, 228, 117, 237, 153, 198, 16, 243,
190, 235, 145, 240, 181, 226, 108, 241, 187, 232, 136, 238, 172, 217,
78, 242, 189, 234, 141, 239, 177, 222, 98, 184, 229, 126, 162, 207,
56, 143, 179, 224, 104, 185, 230, 132, 168, 213, 68, 139, 175, 220,
88, 116, 152, 197, 15, 107, 135, 171, 216, 77, 97, 125, 161, 206, 55,
103, 131, 167, 212, 67, 87, 115, 151, 196, 14, 76, 96, 124, 160, 205,
54, 66, 86, 114, 150, 195, 13, 75, 95, 123, 159, 204, 53, 65, 85, 113,
149, 194, 12, 52, 64, 84, 112, 148, 193, 11, 10, 9, 8, 7, 6, 5, 4, 3,
2, 51, 63, 83, 111, 147, 192}}]]}, {}, {}}],
GraphicsComplexBox[CompressedData["
1:eJw1mHk8VdsXwA2JUOSVkLmXaDJUyrh2KvMUDcYSIjJmCBHhco8kShdFAylT
pgZRuSlzkUyVKPMz3nvupXKj+u33+fze+ed81mftvfbaa33XXvscBVd/m5M8
XFxcy7m5uP59nx6ziM7KmqSzvNKVFOP90I+FPdZl6yboK4fYRa25/sjjT5+E
Vcg4nW+9PS0oOAD9HTNzvoAxSu/s6Pc2WBOIVllSbhf7j9CDjznkOzwNRJ9X
9VTv6RiiK6Z7HhcKOoN+mKQHRJsP0tN212m1qAQhBnON/m3rAbpTK0cxmhOE
DoyLiF1b10dvdGkzob0LRjrvJ+V/rf1At3Afiqm4HYI4d9Tlwru66C4qa7n4
UkLRYU87u1PNHXTnO/Wc+pCzaGXK+tVHst7QaQO81x67hiEuSVdrXvkG+l3T
3LTPfuHIWapNcPuWWnpdtZ5CXFAE+pR1SSNfrIJ+VZ4Az6xz6JmgYl/BQCo9
XNNRQ6shEq0U4D0lInELhi/7vr85HoUy/Du3KjY9Ao2CasH8zdHIfuOaVq2Q
lyDZvzg7rxaD7IxGbtYINIECO9NodCAGFe28RkmPagPhqFu+dhcvoOPZ+xdf
172Hm9GvL5WpxqLcp9b1hXw9cEwq0v/WSCwyHoyykRb7CD6VRjWqyXEowzfb
S0fkM2y5+aK/RS0eya61SDO0+AJHtLmfyw/Fo2XuIsAsHIT1Kf7AH0tB10zr
9CoshoHdxW6K3pyAFkemY1omR0AkNeRLZ1MCEuO9r6TsPQbeomZLXgcT0QHV
4u4lwX8gOvuCeFRfIlIZgrF1qROAdilFiVtQ0fABC21i5RQk/XwbuamMiqqq
8jICiqfhdlNSfyM/gfTKko7e3DYL3S/315oZE+jrwxo5gw4GwM751evCCSR5
S28jbQsJvM81RSbSCFSi1+ekOU0Cl9zJroM0ArW53shc/YwFdpQin+p4AjW1
3uUTjWLD2YUDjtnHCWRV3RlqYjUHOTG+R+4qEGgvt55gqcw8hMUKJfJ1UJFw
MrN915d50BGz0605Q0UncxozFkq/wWlR3rDCpUREY42lfQn8DvFQvcczJhFp
3NpbylT7AcPByjwGiwnIqauuXYdrAfzc+OY1XBLQMdMk+eK6BVDW+n0lqomC
YulByVlZHLDppatIiFOQuv9rz7sfJ+guF6xz2lf7o4SrjZc7LCchrueR7q9o
Knp7fmEisn8KBv+aNB8ZoKKIHRlnE31mQLvb08BqM4FSKnJ1yN+zkFToGBnn
RiABjtSuqqtMaPwrck6QSiBXhtBej4skGN+/FJ6B46PbUfNzgy0L3IlvzNOp
BGoVl38nKs2GNR61CneCCST0Sqd26zgbLsqq/uO6j0DGA4kvzz2Zg0dLo8ut
F6noniFthhU1Dyrb3a/Y51ERuSz6SO42DpQdUjuR5k9BlkXUOVmtSbpS9PqK
y61+yE47TjuYOQGc+iGr3x5UdHQ4dzVvyBR8sQGWdBMVZYbk8C8JzUCA7U+4
Lkkgj3KaiRFtFl4MP+a5foRAwb3eRUvqTEAj9EGNCwSqbfx7x3lHEiKmPqt/
SSfQfELrlm1yLDjjxqskieW3zwd2pE2zwEd6bJN5FIG8DMkTNyvYkLx/rFPD
hkDmZg9uDMfOgarydRlpETw/z2vxncU8yCPWH7UaKrp/P/7ZvR8LsH3mzqsX
NyjIYL3ly+/7piFiXJgSNEdFTqzUf8TaZkCgVWbPkBaBnlSWbsvyZACR/7ad
159AOevf0AO/McHHMV835xKB+MXnLC2fkTD8R8zjrwwCxUsWt0glssDfKPKM
2UUCNQe4eqeas6GEc3S8xptAD/QSpZ5JzcGpXb8z1XcQSMs1nJXjxgHx4x9a
uPdRUL/RaS0nr0l6X03+P/r3/dDLS0MijfQJSJ2JkNnkQEXSaxY2Gu6dgouB
l+8ZPaOiAtptqyefp6H5zahwtyiBOstSO9gnZuFQZY7qLSsCbW4QOynHzYS5
tSbmFjheMxrqW5P2kSByyLw86SqBrF1t6tX5WFDgOi3tfg3H97Kux8EuFpRs
Krq/Gecjk9q642gGG4Tat5StsSeQJQ9aIe41B2tNlMUJCQJdt+nioe+ah2Nm
/r91GqiIJ5yfUdC/ANVjTt3FFRTEb5HXrSU6DavfyN7onKCi02Lpqm3ZM8Co
aBjX1SCQYmXBo/07GMB15KVQoBeBbASDItLrmVAX7sBYSiLQztg/Rg55JARL
35b7hfkenNdwlfNlAbnhb27BFAK17KvLtt7JhvE0H/0enJ/+6BMzQVxzsPRu
uUSoDoHSdyxtuG3MAfA5eOqwPQX9LM9+daN1FmRM7e7oOGPe/nnF/OTKhPO9
T+Kb8HmS6iChfSaIBFlVODeM45FZbHBVWYsF3BnzgoFXCPRm8jz3e142ZLs5
aMri8yqYlha76S8SHsi+Lp6+TKC+wvHDBl0koFdGZn3YX2X9Derid1gQ9uJt
tBqu1y+p32tvnOfAGy5WYcZWCrpLc+qPuDBJn+FdKVR0zQ8FV6X+ZNyfgO1x
uxj5tlT0p0Sx3HPTFPDaDX5Bj6lIbVNu0NXX03DZJtj0iDCBqGUr05uNZmHU
VfQClznm77nHq/IJzKvZN33dcwTi8apSTt1NgguNsfc19v+3FU105wIJAUtF
d8bx/sw5p6PVm3D+PT7xLcUSqLywKntHEhsiX1h1uzkRqN15xUtVpznouCfG
kZchEEOFmvBEZR6MU0V+FbRSUfmQMf/mdwswMqd4MPM5BU2NtR1z/D4FVhf4
H7qPUBE795ptUfwMfOvZpGm1nUAfKzaGSUkyINez+hrFA9cDd9OHjSVMCEfr
NqQQBDJ7StnvkkGCr+buPd04finDoaUKLiwwC/t+2RDH1/QB+VhNmQ0P3PyW
HTiD6/u25WHrOTaEt3nEnAUCGWTr6SnocOCRQs/pUHcKKi+XTAgsn4W9fA+5
v2N+Jb+KW5w2ZcImPe3D/HEEup96UzPMkwRTmVF9bxwPw6yEr5u3siB9bqbG
GteHuW2pVMUPFlQeuCwBOJ4KV3TUyeUkGJ1d/rAd80d+9bExbiLBxO5xPReu
/94tnlES6SyIvHv9QgveTzJn90fpQA5MiM2efbebgnqWilTjrUg4VlxxRB+f
Z7nBq8JUxVjQ7koatWJ5QUxOhneACdIUF8ujyQSSNQ83O1RGQsIKQVUxbF+D
n7lWJoIFzmO6pk+wPvzvK3o+0SRoC9SOGuJ4Tb34bahkyILei4NSEbh/vg5y
sdf9SsIGFPXzFtarKT/Ol0rmQPZrRpyDAgUJ6PdsS7o0Sffg9YkYTfZDluYT
/rzZExArZrp03JqKAji7Q8KkpmClu0m0ZiUVBTNz+WKrpiHo3IMmUUHcf1Tf
hjzUnoW1mj8GlU2xf09FA8P7GWCc17xlawSBVsX/VLqqToJDyKC8Heavx/Cp
5mMWCfvdRDfKYX+ES3mTFepwfUU+3DOA86Grvf39nTg29LmXzPAcw/kX8rvx
/PAcpPSNap2Uw/V4zdW4csM88HxcbWPfRkX8tMmr3s0LwDjT+VnoFQU5aoxs
8JmcAgmVZX73BqlI8zRtLDMM9x+JlLiDWwn0UH3Unk+YAV2/zzjxnySQw6+A
BMYtJshcdF33Dtfnka5mA7c0EniWPbN9iv07+SmzO9eeBVandiv1Y/4EXamv
5BXZkNL7lRoSRKAY9QaidoYNs9w23/z3EijL+kvLiZ0c4DlHK1rmTUEX1T56
OuXNgvUOrjZTOwI19r1c3KHPhKlcsTw5XG+VxUM7z50gwVbWqlIJ8yeTWsBX
shH3tz7HT1WYP2EBw013WCzIa9ZYbxyJ+bicSu3mImGkSi1xD+Zv6WeZtVkd
CQO1vqnCmI8HikRe1iVczzvKnC7h83P4wUd3Z28OGEjft/HSo6DBdYxtiSYk
5Ds/WhrH9sNPq90sF2IB7dE+aSm8fv6qljdvOpjw6oFqSQnuXyqez02OFpKw
oOOsKIjtr/gtqnsziAXmRw0E3XD/i4ceHf9wEvLOhW9eh+NV90je9z6w4H1F
dsQC5q89Je8ofCIhzpaeQ8f6xP7DGo4UDhgNVdA5ShS0yT54qvI3Cf1asSYF
eH2UY2DonEOCd9uQ0jQenx3iuCfEl4RV7uYf/tWP1ascOtBGwpv4Hzwk1oup
a1ocfEyCsHLOgbXYP78VVuBFISHncE9hINY/tZNx1Bojge/QvRPnsPwpaI1k
3xUODO9XWKxeT0E1aWm9aVcn6S3MnxOxVD/0XDy9aCVtAkLObCl9ZklFhbde
feBaMwWlp7ZeKSunIpptnmV4xTRw6/45NiOA+6d/8bjyzlkYP97yR9sE38+e
nGx27mXAwqebkIv7Q/pq6Xvp20noEV73RB7zjwxaWkIYJDQ5DmlqYX98qFZX
JGtZcLjlBtsM95/YWK9puxg2JOQfsu/A/Pu5yq+Is5mDUK9BH4o8Hv/GSqVc
fh50iRdkWTsVaZBafYINC/AhZiO7vp6C0j/6JswPT0FG+auwA1+pyO4dbXvq
mRl4nFAwb72FQLcDX7dG8DHga628gqE7gdQXGwY6s5hwkOlR4Iv573eZqnNP
IUFN245SgP3r6C70dDvCgqL9D+v/xvdJb93uZgk5Njy/+oEthO+TjeFcd0Mm
2bD27FtZbwMC1RdtF+VR50DiEY3db3woKCyg6uP77FkQKPeSCjqK708f19pK
7GFChcjASCG+X+zR4n0UeQzzr5IsyovzS71YnemjyIKRFSytScynz3DatiwG
C1KOO79sxfw3yoSeurTIhETVJ5RpzF8s9f0781oSJk7yXhfF+ZeQva7pkMQC
IX4r+VnM/yoBleJfHhxY+L5QswtRkEe+yAOqIQmhck3B1dj+qMde9UABFvDF
/fUB8PqRwrIbyluZsPJiScBhzH/p/ECz3T0SZsfpsAzbD+YovDsWwIIuyXH9
Kry+YNv3moBQEjodzwb+wvO3lqtzndJlwa579MhdON+HpBt6US8JSZ26V9tw
PCs174UtXuDAriKTr80qFHTlECUqaJGEH0Mqas14fuNm94Zj10l4GWtsOYjH
K/JGVYV6k+CTkKuShPXeNmZdhq14v8tpPBysz6w9+tamkoSGzevs12D/5mkB
td6xJGy/xh5zwnr9cf0+7WES6r/UmadgeVm7+/GIyxzY0zt0KkmWgjoO3H99
Ih2P96kYbcT6UN+U9yb1JDjutjXhx/bufrreeriEBP+ToU2rsGzMHftRr58E
g0Nd3uV4fI2IQpPjbfy9xvxTN49ll90CPfs6SOj1728Yw3Jy3pp2q6ckpD2/
Mf+vf6WS9Z1aNA441OvoTEpQ0H//D7j+//z3/fSf/D/IJQGO
"], {{},
{RGBColor[0.87, 0.94, 1], EdgeForm[None],
GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl1FWQEFQUgOFNGkRCJHVBGgWlW7praVBikYZdSrq7u7uUNAglpZTuVLpT
pbu/nX345j93zsx9uTM3LCIqPDIoICAgkFiBMQ0NjJm/MofoAX3NbP7iMV2Y
xCb+pTZtGclqrlCcykQwgGWc5ktykZMv+JwcFKMSTenPUv4hO0WpSBP6sYS/
yUYt2jCCVVymCBVoTF9+5BRZqUlrhvMrlyhMB8axjpuUpxF9+IGTZKEzE9nI
HcKZzjbu04ph/MJFCjGTHTwkirH8zg3KMYU/+J9v2ckTerOYE2RmP6+YFRDz
aH/KIzoR5LxHnzOBt2zgNjUItt+rL5jGO7Zyj5bR19nv0qcM5Q0/c4GC7OMl
M9jOAyLZzTPG8BvXKctkNvMf39CLRRwnEx0Zz3puUZ2pbOEuLRjCT5ynAO0Z
zVquUYaG9GQhx8hINZozmJWcIz/tGMUarlKaBvRgAUf5jKp8xyBWcJZ8lKI+
3ZnPETJQhWYMZDlnyEtJ6tGNeRwmPXkoQV26MpdDhPEpn5COtKQhNalIycek
4COSk4ykJOFDEvMBiUhIAuITj7jEITaxCCWEYKL/gdx8TR2+Zw4HeQ+TYIFZ
"]]]}, {}, {}}], {{}, {},
{RGBColor[1, 0, 0], Thickness[Tiny],
LineBox[{{-0.671655, 0.}, {-0.671655, 4614.013198661617}}]}}, {{}, {},
{RGBColor[0, 0, 1], Thickness[Tiny],
LineBox[{{0.444446, 0.}, {0.444446, 5237.750521492276}}]}}},
AspectRatio->NCache[
Rational[25, 102], 0.24509803921568626`],
Axes->{False, False},
AxesOrigin->{0, 0},
Method->{"AxesInFront" -> True},
PlotRange->{{-0.7999999510204082, 1.5999999510204082`}, {
0, 5781.4715275775625`}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02], Automatic},
Ticks->None]], "Output",
CellChangeTimes->{
3.662937998734461*^9, {3.662938052961116*^9, 3.662938200317461*^9}, {
3.662938232520813*^9, 3.662938261543352*^9}, 3.662938417016946*^9,
3.662939456458362*^9, 3.663809568510668*^9}]
}, Open ]],
Cell[TextData[{
"From the ESS calculations for \[Beta] = 0.6:\n",
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"u1", "\[Rule]",
RowBox[{"-", "0.44444578872920065`"}]}], ",",
RowBox[{"u2", "\[Rule]", "0.6716550549590458`"}], ",",
RowBox[{"n2", "\[Rule]", "4344.437649615975`"}], ",",
RowBox[{"Km", "\[Rule]", "14491.895229742673`"}]}], "}"}]], "Output",
GeneratedCell->False,
CellAutoOverwrite->False,
CellChangeTimes->{{3.661355400057754*^9, 3.661355484875826*^9},
3.661355639112556*^9, 3.661355814416032*^9, 3.661355846086014*^9, {
3.6613562926598473`*^9, 3.661356320327838*^9}, {3.661356359681973*^9,
3.6613563764858828`*^9}, 3.661356924616371*^9, {3.661357004487162*^9,
3.6613570209907017`*^9}, {3.661357089615758*^9, 3.66135710493612*^9}, {
3.661357148109284*^9, 3.661357162793375*^9}, {3.6613572897937613`*^9,
3.6613573291108103`*^9}, 3.661359422393593*^9, 3.661360622647628*^9,
3.661360695006824*^9, 3.661360760280407*^9, 3.661361148692198*^9, {
3.661362595113431*^9, 3.6613626434369926`*^9}, 3.66136326637789*^9,
3.6613635531441307`*^9, 3.661364489454585*^9, {3.661366798646145*^9,
3.661366832314844*^9}, {3.661367556869445*^9, 3.6613675766392927`*^9}, {
3.661369272108698*^9, 3.66136932599811*^9}, 3.662562738262789*^9, {
3.662562802107106*^9, 3.6625628174230967`*^9}}]
}], "Text",
CellChangeTimes->{{3.662938338952545*^9, 3.662938348388536*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{
RowBox[{"(", "4344.437649615975`", ")"}],
RowBox[{"a", "[",
RowBox[{"u", ",", "0.671655", ",", "try\[Sigma]\[Alpha]", ",",
RowBox[{"-", "try\[Beta]"}]}], "]"}]}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "0.8"}], ",", "1.6"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{", "None", "}"}]}], ",",
RowBox[{"Filling", "\[Rule]", "Bottom"}], ",",
RowBox[{"FillingStyle", "\[Rule]",
RowBox[{"{", "LightRed", "}"}]}], ",",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",",
RowBox[{"{",
RowBox[{"0", ",", "maxheight"}], "}"}]}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{"5000", "-", "4344.437649615975`"}], ")"}], " ",
RowBox[{"a", "[",
RowBox[{"u", ",",
RowBox[{"-", "0.444446"}], ",", "try\[Sigma]\[Alpha]", ",",
RowBox[{"-", "try\[Beta]"}]}], "]"}]}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "0.8"}], ",", "1.6"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{", "None", "}"}]}], ",",
RowBox[{"Filling", "\[Rule]", "Bottom"}], ",",
RowBox[{"FillingStyle", "\[Rule]",
RowBox[{"{", "LightBlue", "}"}]}], ",",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",",
RowBox[{"{",
RowBox[{"0", ",", "maxheight"}], "}"}]}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0.671655", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.671655", ",",
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",", "0.671655", ",",
"tryKm"}], "]"}]}], "}"}]}], "}"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Red", ",", "Thin"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.444446"}], ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.444446"}], ",",
RowBox[{"k", "[",
RowBox[{"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",",
RowBox[{"-", "0.444446"}], ",", "tryKm"}], "]"}]}], "}"}]}], "}"}],
",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Blue", ",", "Thin"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Axes", "\[Rule]",
RowBox[{"{",
RowBox[{"False", ",", "False"}], "}"}]}], ",",
RowBox[{"Ticks", "\[Rule]", "None"}], ",",
RowBox[{"AspectRatio", "\[Rule]",
RowBox[{"100", "/", "408"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.65401717055512*^9, 3.654017187280355*^9}, {
3.654017344576412*^9, 3.654017359511397*^9}, {3.65401927528238*^9,
3.654019279074164*^9}, {3.6580749961162663`*^9, 3.658075010600336*^9}, {
3.65807618793108*^9, 3.658076188490995*^9}, {3.658076231516355*^9,
3.6580762327478237`*^9}, {3.662578424430344*^9, 3.662578429869256*^9}, {
3.6625805332605762`*^9, 3.6625805414913797`*^9}, {3.662581602724835*^9,
3.662581605530455*^9}, {3.662581992245171*^9, 3.662582007124544*^9},
3.6625876775895863`*^9, {3.6625879334203587`*^9, 3.662587940361785*^9}, {
3.662588067883778*^9, 3.6625880692748327`*^9}, {3.662588103713826*^9,
3.662588106017372*^9}, {3.662597897241036*^9, 3.66259789846564*^9}, {
3.662937842099617*^9, 3.662937846980784*^9}, {3.662937942512855*^9,
3.6629380817917852`*^9}, {3.662938127607706*^9, 3.662938199845072*^9}, {
3.66293823215698*^9, 3.662938260459632*^9}, {3.6629383851452017`*^9,
3.662938471447592*^9}, {3.662939461427918*^9, 3.6629394636452293`*^9}, {
3.669320204081451*^9, 3.669320204782305*^9}}],
Cell[BoxData[
GraphicsBox[{GraphicsComplexBox[CompressedData["
1:eJw1lwk0ld/XxyVSZKYQiqIyhSaK9kER0aBEpkoypdLkl1CoTIkQIsM1D9fs
ecw8XFemzA1IIiqSqYnb5D3Wev93rWfdtdc5Zz/fvffnnLMfGbvLpufZ2djY
FvGz9H/hg8md2NgJStWuXtumhY7mFzSOFqwdp+599ModfJGLHBYHxI7c+EjF
74j5Rf+dhzb5fLmdNT1GNSdVFf8RLEB8h+/T6JdHKdd1qvxcQoXoDd/LCo2u
EWrqi6qLYUYhmjd87HbHeJg63a+/T25bEZqeEdlHO/qWGqjunjxbV4QOfOQX
ilo7QH1d+Lda16gY7e2e2PBX9DW1vH1WVqaxGLGS1dZ79PZSq7YfkbfWLUFm
jhYWTs1d1AtCNFgivwTxhq4TPBnbRklom1XG8RKITdzu6PINjdS/lghdbScC
2Ui0c6so1lKC/iMFagUE6o99qJ4uVEQphYJB/ySBqrhlB7LePqK+55wwbxIl
Ee/K5U78Ykmg7qbcaa9EopjLPUqyTQRUvZladU2dRKfkRFo1b9TB56uq9eny
JLIwGE2sXNkE+twqwWJcJMrZEXX/sXc7rFAKfffsJYFOx+//3VDfDeSDI790
nxAopfwoM5vzJfibOXZ9OkCgg8PeppJCfdAplalBnyxBMRfjnffyv4GuxWeG
UoElSFrUJFzfZAi8BvVX2wmWIA57fpjJHgbvQ/d8ZeKKUZRRvXaRyXs457ax
9ZZgMfo9OunTMjEKQfG31sbeL0JCyzPlt7h8gC1hEXI+i4XowDb6iz/cn0A/
Jycx/kIh2joCH9Y+Gofx7py2+boC9P6AyZ4g3s8QsTtJVqswH5WVpca40Sch
s1T58cngPKRdEGyeqDwFf+p4vdI9c9G7ksr1ul3TQFOrsQ+yoiPxJG25aMVZ
4Fo3fyXtRA7K1R6w3jU5CzJRQ5+9TmWjdrunTwSr5uDUuPdduWNZqKk1jVPA
+ysYijmM3bXLREcqetwNj3yDeeWoOnHnDKSzTJs7X+o7OORYDtd6p6PVITMd
O4e+A3PMhb85Jw2dT3gWs5D/A/bmmqrYdaai6LkP4UNXfoLULjYm8KQi9SSd
/BnVebjwaYD52zQFWffWd+xlW4BAb0XyZWQysjUK3kCvX4DgOcdkjwka8qOu
hcTGsoCv03eV7A4aUrvc4JjWN05FK/jd8jmci/x7awtzrZuplZfKnpRqEWjt
8TGFdgkGRfNdp3HlIYHWWeYlTiSWUYUPdfaWdRIoUHKNM79ROnVwYq6EbzmJ
0n7Vr2u/7gXn9OgrJDeSKE6td4X8w1wYJYr2vFYj0SYb7+HWvkpwPdnKl6GC
+Sr13PGrtgE2DfAHG4iTaNk+rYjNeq2wOUlWOnOWQJZPudYboC5oHr6Z2ltO
IJ+c1nel53rhRIj7JNcVAs1y3DmZoswC49pPM1kPaehwTuA3ac0JKqPNIKyR
Jxe1qk6dWfa7heqXLPoaI0eg1btStZ0SGqgBcUc9PU8Cae2pecHzoZL65vbR
+h9FIKkssU+5ZXRKp6b75bIFAm0SOyc/6XON4qgOOfZVkkRdli5vo1dngE9P
Z2D5NhLZfsz0/9lZBiYtOjbCOL6+KYNFcQkGRExP80VsIFEuI0xsLr0ZNttx
Z1z+Q6CCnT1nBRc7ILRpE2dDE4HcUgMu1kT0wO5Nntpy9wmUmXmvKmN+AbxU
Sy0Mqmhoo5ucmPqTOsosLEuHkUigXx4JTk0WBBXjf1nOfIhAH2U2vxotT6CC
8+MM/6wmkVWDh3myRCQIyhMFultIpM4h/WTAvwj0eNgV6/D+nuw13ZM0UgOt
zxtfKypivbcLnAfONQLXXpmKZgESnawY57EdboN4psFzxiiBNO085hLOscAs
Zu/v+DM0NGhwQdPaeYJytk/q8v9MR66nOSoUW1upll29lYQ4gfwz2ZtIWyZ1
L6L7+wCuj7FC44xkYDUlItalUFlGoPEp8QzP6Xyqvp5oEvhKIGZXZepozX2q
Obn9rReu/4UZ8uCR5ylAu6SpvRPz8Uuh5lTIoVLoDdKbHcP5fbIqfyzboB6e
PCr6yMB8sd+veGP2ugnMeJv0x5eRSIks+Wa6rwNEbH+lvO/A71vvQCCFHtBT
dHZ7EUogdg+u6azBBVBwDf9s0kNDCSP3ku+cqqdyRV0zdkYTiNsl/W7fb5Ly
lhBNVHhNoNpXIjlIOIXaozGesHUliTh0XRJf7A6G62H6rzrlSLQYH/D0YnsB
6F/3v3oV5zdQzIl3p001hNhm+HIrY71xokdcwpmgkZB0WwWfv7meQp0MwTa4
oXxT2eIzgR5v/7ORdpAFi/RltQL/0RBbY83nhk/HoPHC2NXNmJ+dz6SvDhln
w6hr16NpVRLVJ0eUnDlRASrfHpz5h/kT6xkRD/7CAIE1Qz7CUiQizteethCP
hTHHyPPXFUg0pnnT7p98CUQaetos1f9wmLbjKgcKTnM27uDeSqKhRz9rn95m
Qa3FAQ8TIxpKi7YevOU7QQ1MhZ+a6aej6p/8H+rU2qgzvE3384UJpHem+IE1
xaR29vDUCl0k0AlZQ+/0UzXUMOe9C7dLCORwsN1vbn8h9Sl6qP3vNN5P1xbp
cdUPKJn8OrGctSSqqLC6raiUDOddVbJO4vwcbDfQMw8i4W4oz8UdWN/NtWdf
XxmqgwfHn63dh/Or7HBYe6VbEzwIk/IM4sD8Xk+r/va2HVyPqe207sH70/al
OfvPbpiq9n0VGUmgwpGDXAqdC/AlKkL63Vsasozb4SBfWU892gdnBsIJJGS3
VfBseykl0uNQ69FLoFSPqFVZ+akU2aagkM5JInqSXLSU5j2oVtrDfXsTiYwd
lbsNlfPBS3vgvgrW96ry68/FuCoY3NiXN4z138xq1lHfwoSjFs7J+3F8r6wz
VW/ktIJdpLpX4BSBdOO1tWX2siDrlYq+hR8NNZs4mn/ntaXijh2ffSxNIr9H
zMzK3ExYt1p4tw2ur8B+qQTFiHKwm5k1Csf2wrvHq03vMkC94J/HIJ4fKBL/
5o94NNgK1hSdw/XjWX/I+8vJYigU3/yjBeuLV2s++iK1Fga2/7PbiOsfwtrd
J3mFBRNhfKSbGQ1JywkIX3NNA822kCA2zE9uoLpbPW8Z3A0SjLqH99epidni
5tJC8O3RWUzB/va4v93osr4GGmLUQjfifmH8900t9qkcEAmYjHDF868ucrVG
rakEJ7YumiX2V3si3UBgvgT27dlun4rXq24h0yVCWJA0s0p3O9DQyn0vlYMf
TlBjzigpvZuO7Bming/Ot1E1+ZLHMgRw/6DFPV0ww6Se/k3KzHYhkIU0D9OZ
UUNtvf9G0bKIQBuu5Fm20Qsp3WfyVRdxfo2YMqo/q0Kpt4W8ZZVrSDScqBIr
bk2DsluDG4exXjdp3nKtLSQYsYe+NsN6nBIru15m14HBrVmb75gvxiuxS2e1
miAja8vBXlz/1heSMsy8djB1Oeok/ALX72/I1tE33RD8V+XqVBSBuKInIl2a
FyCa0bKTPkpD5e4hzR6f66nHlVoBmWEEWmM7aS63q4x6J7SyMK4b221mFVZe
aVRWcICKNeb39uHlQgxNX5i59I+vE59f14zZvuy2yYN9or8OcWJ9f3nKL3zQ
rALOtz/+O4DPP6dtsnujvzXAdVvS+6AYiVzbr5ztcG8F6G9ZLjFDoNijQy1n
d7Cg5J23+2IADUVPamk5cVygBjoXUxvxeZB9I4aRNZgBg7rGRryYp91R7wUF
1cohN3z/5RfYHneY5iw9zIBFpZiiivUk+joZLH4k7jHsnlDa8xLfH4nhRPDo
dBH87jLxasL6mH4PGyt0a+FLwTCRjfl6n9dnb+PCgkRHz1JOKxrazz2qfDY+
FbSEGcYJWH9v//xYRm4pbB63HirFvHyxsqyjDhdCz5kfmx5if2ebUp4cqa2G
G/+Fb4jF9eIbOWQ+K5kDx8YX/2zD8+OOtu/zJCuAGNv6NB/zdayJz4wrrARS
LJabEHh9wKCZutV9FsjcvKZN7achGS+/jiufSYhxCW3lw+PyfpalVn/zIS9L
fNwU29b0uZDnXlmQX156OAvHfzN35PKP2mK44hsctRTfM/eA9G7pIijqNlm2
5L9+TYaMSA0duPSQaRrWo/B+7x7x0wR8kZZNXdLff01EfCCCBeVGJv7ZmjRU
GR7+KjxygvKI0NfzbacjjSyxZ2532iijEubcBn4CdSvsSurnaqSuE8yha864
v5F0/dT2s4bi3K51Q7+QQF73E/Q13hVSVskavGlfcH/gLs7qlnpEiUYN++tg
vj/KqprIjCdB0i5/4VScL46my1cL5gkID2XO22M9w2cd2wPC6uDNyb90E9y/
8/LfXhEq2wTWHJm33FeQqJLj1PHcqHaImQl6OoX57nruFNHb0Q2+OsPlYjEE
Up/VHOBuXACNYTaZiI80NG5f7pHKzqCmBww7QvD9KWZt7BngUkYlyRj5ZXcR
qPPbzvCdo2mUxuwiWynu/7oOjSVtuX4HxL65rHbHfK+gnFkqP3LhigwMTeP8
PSIk5C1WVUFheJehO+Zj+GvH7oP9DbB58WdCM+a7lPM165d1K+T51EqPYL6Z
OSoC7GosCPu1/HNvMA0tPEMpYb5u1Nd1np7WmG+tcbaupOsZgDKk7o1iPlq1
Dzy/y1YOta1CF7/j+p5ReMrutIMBfsKJnvL4Ps0w99O4ORAJU2J6/4VgvseN
nAXfVRbB6kbyEhPnz0Jx9o6SUC28J7SMJzHffCu30v864P7n6nmBbhsa6vMy
3muxIxXmKON3zli/g59lkrhXKXCfRpc6cHy7RPkNqiQKgV2szsEH+/t+mfM4
42E1bOszMe/B9Uo5Ttp/IrKBtp0+wo/nq7C2sabuVYD6/B2O11h/nE/DG3ar
EjgdcGi2Eq8v3pVx87cvCz5l6Qn7G9AQselD4FgFCRHJLbKyeLzie0ODaVQ+
FBydO6aD7Rkpq7gGkSwwexNmcxfHzzgf/XM2uBg8vB3PLN0PAqpaSu2fC8Hd
+9i6XGyfCOLfxmNGh5iCi7xBWM/1p7N1IooEVK8pko7F4xwd9qdvheH+oFJH
8pIWDQ33Rw+hxjzwHB64K7G0vm9x+bhsMQhvbDm+5D8lJV2T6VcIp2Zl8p5g
eyWfZQdPQwl8W55+bel9Kt+UJlhfi2GS8ejxUr69anqkX5kWwaz4jqKleIe3
BJRIRRIQqRs8t5S/fHFmj2Y0C4TlRX0+7KKh/33Ps/3/73/fM/+z/w8nWt+K
"], {{},
{RGBColor[1, 0.85, 0.85], EdgeForm[None],
GraphicsGroupBox[
PolygonBox[{{1, 254, 255, 50, 253, 199, 245, 153, 191, 237, 115, 145,
183, 229, 85, 107, 137, 175, 221, 63, 76, 98, 128, 166, 212, 49, 48,
47, 46, 45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31,
30, 29, 28, 27, 26, 25, 24, 62, 75, 97, 127, 165, 211, 23, 61, 74, 96,
126, 164, 210, 22, 84, 106, 136, 174, 220, 60, 73, 95, 125, 163, 209,
21, 83, 105, 135, 173, 219, 59, 111, 141, 179, 225, 72, 94, 124, 162,
208, 20, 114, 144, 182, 228, 82, 149, 187, 233, 104, 134, 172, 218,
58, 151, 189, 235, 110, 140, 178, 224, 71, 147, 185, 231, 93, 192,
238, 123, 161, 207, 19, 252, 198, 244, 152, 249, 190, 236, 113, 250,
195, 241, 143, 247, 181, 227, 81, 251, 196, 242, 148, 248, 186, 232,
103, 193, 239, 133, 246, 171, 217, 57, 197, 243, 150, 188, 234, 109,
194, 240, 139, 177, 223, 70, 146, 184, 230, 92, 122, 160, 206, 18,
112, 142, 180, 226, 80, 102, 132, 170, 216, 56, 108, 138, 176, 222,
69, 91, 121, 159, 205, 17, 79, 101, 131, 169, 215, 55, 68, 90, 120,
158, 204, 16, 78, 100, 130, 168, 214, 54, 67, 89, 119, 157, 203, 15,
77, 99, 129, 167, 213, 53, 66, 88, 118, 156, 202, 14, 52, 65, 87, 117,
155, 201, 13, 12, 11, 10, 9, 8, 7, 6, 5, 4, 3, 2, 51, 64, 86, 116,
154, 200}}]]}, {}, {}}], GraphicsComplexBox[CompressedData["
1:eJw1lHs01HkYxl0PTYsSCbNUu7XlFqOLSXpflVxKbLsuW1K/cb8UkjRatxFG
KcY1pVAII7LVKSnfFWKyg1i7mhBJmS4u28X8UrvbnrM95zznc56/P+c8Szhh
O/0U5OTkXD73P4aMOccXFEiJWpTGD9NZfJyRWbnW6owTjQpbiYExH/3/kSxy
iXpG2MN6KQNVqfhtwqu4iomnRFrclOy4PBXVdyQXC8NGyc12jzTjMyn4SL2v
3qp7hDS33oiTypJxxjEnPH77MDnzQFGueHcyTkxqbSx2HSQBHWlxYuExtHum
oZmrIyH9j7yYlbNJaP1AuviT9p8kmyU4QdySkC6xMOT29pKmgZR3WSU8dAvw
9Axs7yb3KtrPff8hEdVO6c93L+gg102Loi09E1FOl+OquLiV2BsZNm8RJuAe
PTHDzLiR3JbtleeoJeDDgpOsMs060laeqrtdHIcNjKWSisFMkhCqP7crIxbV
VBUDNRYVQfHSuC7jiJ8xP6zHZGnbNch576moaXcUf1qmdZ8d9Sv0B5lv81oX
g572o+dvqbZByybbgVwDLlatzk3OiRVDvKGT/omFR3Bv4ZbZ5qYHMFzU08Mz
isYLN11bKpX7gBu0YapszWF0GI7dydTsh1ezHKHJ7ijM318YZK3xCPrEFivh
1CE00HYWbHUegg0s9UFZfSQq+WrAZOUweItqn3/4eBBznZps6pyfAPH1Z1xh
H8TZ0ZcJIukovPjOIXJdUgRqKl5aviJ4DDyRaTIxHI52q4S/f2Q8B359argp
OxxXjsCYTuY4NIwvsJ6wD8Mnds7r09ReQNCym9NZ5gfwxo2L+eHClzD7t0g7
SWM/2tQe9zhv+hq23Q7avE89FB9fvWW4qXsCePeVj5YohaBukc2yPOMpeKzZ
Xaq9KBirbSRea19OwXNRe3n8+iAUc86ent8wDZsDDomYboHYdr9UeV7sX2Ap
aWjo4AegS33PYUeXN5DheBG51/3RVt6GUfP1W4A5DHb1pB9+lT7ZuWboLdzN
d+p0Bz/0O3cvX1bzDtK3ah04zffFvOkxwVDEexhivMs4NuaDrCLbmknzGchV
I+Me233Qq7ep01pOBqGsJeytlzno7XR8sbBJBtG8bPNVhhzkkcj0ggIaMvUV
74akUmgR1hxQ2j9OlLt21Yzs4+OUUrz7BVMauI+trEJ7KNxRxX9jwJaSqacd
Zj4xfLx06VhD+YwMfFz683NkFLI53OlzPjTU3smIvlZN4YB9CNsrSEok87cs
EKXwUYGrMlExIIO6BPOk3rkczLH8+E2xAw1HSwL38AiFQ5nvG8/G0ZC6wu9H
hTMUluZ5DcQkSsm285Fvn6bz8cqIg4pRlwxqxN6Nsdoc3FRoY7PEmoar3nNE
b9opTKfX9TMjaDD0aJ3yuEih+YrrZXrpNHQJ1hRezaRQdWOf6fGTUvJpYYX2
6ww+quRJs4PbZVDWuirTTY+DBa5DImo1DSbDIsNaMYVPLvf77gmmoTyE665c
QWHqgBtrdzINaeVGzF25FD6M1NKVZNFQWU161dMpvCUQ/CHIlpKDLSp1YQI+
sqbYEkarDJiWvOV3mRxsqTKbp2BBQ8dgY6RaN4XqqiuFn/xpOP3biVqvKgp/
WVt+ZDaRBrMelnxNPoVKnb57YzJo2KGrI0+dorBGt6WHnUdDXPZCrTtpFH75
M7n/88Xnl/0vlBVj+Q==
"], {{},
{RGBColor[0.87, 0.94, 1], EdgeForm[None],
GraphicsGroupBox[
PolygonBox[{{1, 78, 79, 50, 77, 70, 76, 64, 69, 75, 59, 63, 68, 74, 55,
58, 62, 67, 73, 52, 54, 57, 61, 66, 72, 49, 48, 47, 46, 45, 44, 43,
42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31, 30, 29, 28, 27, 26,
25, 24, 23, 22, 21, 20, 19, 18, 17, 16, 15, 14, 13, 12, 11, 10, 9, 8,
7, 6, 5, 4, 3, 2, 51, 53, 56, 60, 65, 71}}]]}, {}, {}}], {{}, {},
{RGBColor[1, 0, 0], Thickness[Tiny],
LineBox[{{0.671655, 0.}, {0.671655, 4614.013198661617}}]}}, {{}, {},
{RGBColor[0, 0, 1], Thickness[Tiny],
LineBox[{{-0.444446, 0.}, {-0.444446, 5237.750521492276}}]}}},
AspectRatio->NCache[
Rational[25, 102], 0.24509803921568626`],
Axes->{False, False},
AxesOrigin->{0, 0},
Method->{"AxesInFront" -> True},
PlotRange->{{-0.7999999510204082, 1.5999999510204082`}, {
0, 5781.4715275775625`}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02], Automatic},
Ticks->None]], "Output",
CellChangeTimes->{{3.662938431037291*^9, 3.66293847175865*^9},
3.662939464025754*^9, 3.663809568528228*^9}]
}, Open ]],
Cell["\<\
From the ESS calculations for \[Beta] =0:
{u1\[Rule]-0.29278,u2\[Rule]0.29278,n2\[Rule]2500.,Km\[Rule]11827.6}\
\>", "Text",
CellChangeTimes->{{3.6625831016188927`*^9, 3.662583129434276*^9},
3.6625832301909657`*^9, 3.662587879844906*^9, 3.662588322881942*^9, {
3.6629383216129417`*^9, 3.662938327635977*^9}, {3.662938496540455*^9,
3.6629385224234447`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"tryKm", "=",
RowBox[{"Km", "[",
RowBox[{
"trysp", ",", "try\[Sigma]\[Alpha]", ",", "try\[Kappa]", ",", "0"}],
"]"}]}]], "Input",
CellChangeTimes->{{3.66380959505363*^9, 3.663809599133728*^9},
3.669320205531103*^9, 3.669320291407361*^9}],
Cell[BoxData["11828"], "Output",
CellChangeTimes->{{3.663809583862496*^9, 3.663809599681102*^9}}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"maxheight", "=",
RowBox[{
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",", "0", ",", "tryKm"}], "]"}],
"//", "N"}]}]], "Input",
CellChangeTimes->{{3.663809621988844*^9, 3.663809627867792*^9}}],
Cell[BoxData["4718.689292588146`"], "Output",
CellChangeTimes->{{3.6638096121682568`*^9, 3.663809628401252*^9}}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Show", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"2500", " ",
RowBox[{"a", "[",
RowBox[{"u", ",", "0.29278", ",", "try\[Sigma]\[Alpha]", ",", "0"}],
"]"}]}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "0.8"}], ",", "1.6"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{", "None", "}"}]}], ",",
RowBox[{"Filling", "\[Rule]", "Bottom"}], ",",
RowBox[{"FillingStyle", "\[Rule]", "LightBlue"}], ",",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",",
RowBox[{"{",
RowBox[{"0", ",", "maxheight"}], "}"}]}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"2500", " ",
RowBox[{"a", "[",
RowBox[{"u", ",",
RowBox[{"-", "0.29278"}], ",", "try\[Sigma]\[Alpha]", ",", "0"}],
"]"}]}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "0.8"}], ",", "1.6"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{", "None", "}"}]}], ",",
RowBox[{"Filling", "\[Rule]", "Bottom"}], ",",
RowBox[{"FillingStyle", "\[Rule]",
RowBox[{"{", "LightRed", "}"}]}], ",",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",",
RowBox[{"{",
RowBox[{"0", ",", "maxheight"}], "}"}]}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"2500", " ",
RowBox[{"a", "[",
RowBox[{"u", ",", "0.29278", ",", "try\[Sigma]\[Alpha]", ",", "0"}],
"]"}]}], ",",
RowBox[{"{",
RowBox[{"u", ",",
RowBox[{"-", "0.8"}], ",", "1.6"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{", "None", "}"}]}], ",",
RowBox[{"Filling", "\[Rule]", "Bottom"}], ",",
RowBox[{"FillingStyle", "\[Rule]",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"Opacity", "[", "0.5", "]"}], ",", "LightBlue"}], "]"}]}],
",",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",",
RowBox[{"{",
RowBox[{"0", ",", "maxheight"}], "}"}]}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.292785"}], ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.29278"}], ",",
RowBox[{"k", "[",
RowBox[{"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",",
RowBox[{"-", "0.29278"}], ",", "tryKm"}], "]"}]}], "}"}]}], "}"}],
",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Red", ",", "Thin"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0.292780", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0.29278", ",",
RowBox[{"k", "[",
RowBox[{
"try\[Mu]", ",", "try\[Sigma]", ",", "0", ",", "0.29278", ",",
"tryKm"}], "]"}]}], "}"}]}], "}"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Blue", ",", "Thin"}], "}"}]}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"Axes", "\[Rule]",
RowBox[{"{",
RowBox[{"False", ",", "False"}], "}"}]}], ",",
RowBox[{"Ticks", "\[Rule]", "None"}], ",",
RowBox[{"AspectRatio", "\[Rule]",
RowBox[{"100", "/", "408"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.65401717055512*^9, 3.654017187280355*^9}, {
3.654017344576412*^9, 3.654017359511397*^9}, {3.65401927528238*^9,
3.654019279074164*^9}, {3.6580749961162663`*^9, 3.658075010600336*^9}, {
3.65807618793108*^9, 3.658076188490995*^9}, {3.658076231516355*^9,
3.6580762327478237`*^9}, {3.662578424430344*^9, 3.662578429869256*^9}, {
3.6625805332605762`*^9, 3.6625805414913797`*^9}, {3.662581602724835*^9,
3.662581605530455*^9}, {3.662581992245171*^9, 3.662582007124544*^9},
3.6625876775895863`*^9, {3.6625879334203587`*^9, 3.662587940361785*^9}, {
3.662588067883778*^9, 3.6625880692748327`*^9}, {3.662588103713826*^9,
3.662588106017372*^9}, {3.662597897241036*^9, 3.66259789846564*^9}, {
3.662937842099617*^9, 3.662937846980784*^9}, {3.662937942512855*^9,
3.6629380817917852`*^9}, {3.662938127607706*^9, 3.662938199845072*^9}, {
3.66293823215698*^9, 3.662938260459632*^9}, {3.662938530257964*^9,
3.662938619548059*^9}, {3.662938670747566*^9, 3.6629387407443237`*^9}, {
3.6629387779444113`*^9, 3.6629388076304617`*^9}, {3.6629394691668158`*^9,
3.662939476197753*^9}, {3.669320206714892*^9, 3.669320207997908*^9}}],
Cell[BoxData[
GraphicsBox[{GraphicsComplexBox[CompressedData["
1:eJw1lwk0Vev7x1XE5We8ZKh0VVeGhFBkeN4mlAzpJkpclVkZmkgoJZIMp0yZ
z1aUqZR5OGSez+CYM6YMmQuH5P+21v/utc7a67ue/Qzvfj7v854tdcnV1HYj
GxvbL/z7fXceNfSLjR2n6Hv3dapdjkRLy+omOaJjFIJbNNdPKwrZrfeIGd/8
QslM4G2UV4pGu+99802f/kxZJ4WSBiViEJ9RQHKG6whFe463dQ9nLOrlYxap
U4coR56XCobyvkBLJ567+Z0apIytxxYqc8ah6RlhnWSTT5Ro/+/Z4eLx6PgX
fqFI0R5K2lqRsJxsAtKkjf+1JtJJKRDhzamVTkSsFOUdXgwGxeyf61mjB5PQ
WXtzc4d6KqWLWhHoJJ6MeEO3CprFNlGKMnjNLSKSEZv4JZNNf9VQPGbd5BL5
UtBFiRbuffLlFFfypr5HPimoO/bp/pdC7yg2loLpz6ZSUAn3zp70T+GU6vY0
9aTTZMTLtcmBXywJ+E78oR6eSkbRrvS9O+s+wItvB0w/zJGRxd/CjRo3K8Da
pbLacS+BzPVGEou56mBF0c7IzJJAb1QjA577tIBUyZOqiDsEso4/tlpVSYPU
xeQvioEEIheaVL/mYMKg9YbkmAcE0h/0Md0m1AWjUo8kRN0IFH013lGTvxeW
8xaOKBgRSFLEMELXsB92lfocCxQnEPsVfph5PQidiXb+Lj1kFHmyUvud4TCM
dlUpCQaR0erI5L2G8RFw0/xaESZHRkKb0qRlnEahVWrs652GFHRcMaP9J/dX
eB4k+V7gXAqSHYJR0fAx4G7299o/moyGjxseesw7AelN7LNmbsmooICIdsuY
hHKFsuLTPUlIOyf4XKLCFDz0ylccH0hEA++LdxyhToPcom/NWnMCEk/S/jtK
fhYOOLGOH2qKR5naPZYHJmfh2cyWnHNtcajlUlyMYMkcWKTQHzZUvEB1jakc
Aj7z4CHS8X5PfSwyLqLfOmG8AKYH//zfoYoYdHiDNnf29u/gPFYgn18Vjf4X
MtOq1v8d7JmtljX9Ucg2oTZ6OfsHiIiUbjkzHYmi5kYj+t0X4en7nNRgkUi0
P+lw9ozSEswEHi2+pf8cWTIqWzXZliE/cTLT1eMZsjoZ/FdG5TL0RcYczcsl
IX/K9ZDYWBYg0lfjstEIpOxaZZ/aNUYZfz8zMdMaiV4oMzZLP80E9w0brT43
k9Huiz6DjV3FwJHXxVkqgHnI91ZdKa+CeI1SA29dAm3Q0SLtOdoI5vdeBEZe
JdD5OM4deogKf9dZL9T5E+jem8aB/MsM2K0rp5SK+bh5yp5n5EkHxF6upNd6
E2hWmrc/I7wbnO+fiZn+F/tX3lhD2X3wV7NLS68agZ5N5wWSqANAK93JiFkl
o1PnHHSo3kNQeFmhezmXjGbZ/czICizQfbAg94cBCRm9CVqQ1Bin3L26nt4Z
E4mo550+Rf3vFch5KHTvKSIjqy9pjxbbCkArZZ9lygYCdU3prYtLfIRHQh4n
ljQIlPkxTGzuZT24BNeu3bUlUI4a3UZwvRVe2xXvkvYjkBsReLWMRAfnyq9S
K3g9IRv77GvrmZDvdUNm7z0CxT84LnaF1gUGoxo7lhwI5BkdpFLe3wural82
BR7B+e7fD/nGNwDnKzTGWNwESv9UUj4gNARXaeqGu+vIKC3tYcmrpWWoYfwz
QfIloUmG6aGkoTKIm2HKsO3A/r45jj2Xa0D+L6mYudMEMisa47EabIKyeTmt
hBsE6tsq/ZRjAw2SCqV23gogUMQ7XtO3qu1gwb5Dcd8jAllFzWevG3WC1ITg
rOMtAh1rbCcWjHsg6NiulvVzBNK45DWXcJkFhDPLT1SMhPr0nDUsHccptLGc
kSWfSOQ8k6dv3EyGaNoD7qVsMlqRK7MIMciH2D/M+qtZZBTzR/bn13qVQK3i
cD+tQqCNAUW9Zzvr4NOTq1o8NgTam/d+wVSnFQ6MTCmv3CXQ2A67D0iODvdp
vZxF+H1GX9yyRd2eCWWuyqQNmJ/5dzZqFe5dMMVz2iTVhUBB/qTWn7d6YTDg
/AZvfQJ5G3wNFc/uB03J70YXhAjUkTzqa98/CDJ8y0qjVDLa6MU5nd63DOrF
Kj/DY0goSMyBV+1iKdjqBsqxRAkU80LE2CmiGpJCMx3MT+H+ewu1fRRsAsUu
yVRNdwLF9W4xe5VMhbJfkk+1HxKIa9+3GJVmBkQOtcrz4nqd5vZedJ/qgMuv
xDUPehHoxfJshfFsNwyUW7U/w/PyucrPXcn6LLCW57X0USYhMza7syE3GuAo
y1Y1w5FA+/Nn29oobRCWbeAmcp9Ay9KvpQ+t0uHhyi7FBRz/XlpK0T9yHaAl
vPmRmC+B2JbK9VnZzeAi8JCz+Daen5Zq1VdsaPDV/WacO+6vhJoij0JCO7jx
WRly4v73hy+Wx/mywL1jwr/zVwRKjbLsu3N/nNL8uWf3M7dIVFR0wVd+bwoM
m9qebXxNRvotekfPPc6DgubTglU/yMhT1KbTvb8CvroYNo8qEkjBzkiby60O
WpbHdxdZEWjyRmrpwqcWcPOMDWzB+3m3FfPcxkUacM09ue2D69/2RGXK7QAT
Csziv7Tjfm5vmDk6fbgLoqONN9teI5CAp+i2bUd7wZmubWNpQKBTShICb336
obV3ZH1JhEBX/Ves5KsHYazxh+hbJhm9HdLnlGtbhj2+58wTX5JQR/H84vqL
EvBQrDhrI4z3W3r94f0y1fBCWMzE4wTmwTJN6eabRmD7562UuyuB7miGFd9y
o4KzrKZ1MD6fjrlc0PoRzQC/42tZNrjeWcmTqm9KO0Bj5WHFI3y+1fD7tflU
dAPfyZrL9Xi9R+K1taU0WZCm8OOBjg4J3R9aydfhbYCLfWLh8fbY/+ZQjJt1
Gyytctn8jeeBqq1Y42otHThjNd+s4/ibmeXhT1lMyHSa2yqH54l815k3GXrN
oJ9QBKp4P66VZMmoKdMgZfLBg1XcP7PridnTDu3w+vq1IgLrENbBrm3uLCiV
76n14CGhaz8+yuUmtsKj6zxlopiPzKFFAT8rOkgI6kUN43xCSiyd9WgmoOzC
V5KYr1LvxDkmlQr0gUqvIcxz88zdH+5s7aD8yCPjFeandEzjgaciA2QWR9+2
Y3+dn6XWzyNowFxqtO/C9v5Fir0zDc8TLqNpc+yvJJP3UiKEBfmD/u+Oz0cg
Lh2mQvDTcUrs+ETYiGMkGkzcFytumQwR6srz+9LIyE2St1BLJg/+5JgyKlsg
I4fEYirzdQVo+ZYwZPcR6GOH2DUbrTq42VRBfXyRQI3t26Sqs1ogRcU1SBnz
dWQtRHaklwZSFwRnzHF9A1IfzXklmbCm8C1fHfczt/2AAYdcF9wwlBoF3O/2
+e6P8rK9MO3XMlyL93ce+b2Jt20/5NsWmVTi/a++wG7MWzAI6LqWpEAXGXFG
jT9zql+Gok5WnEwmCa3xFDqPapSAhOa0ZTieLw6KOzWjFqoga+XKxLIegVxa
3G1abzVCPf+vWwGYZyfnpm9W5lQ4xMMUkMf1XOL5k6/DhwEndBUUA3C9uXld
SbqpHTDs71Qog9dzfmttx/P0bnjsx37ykzWBYk36G2xUWVD90CWNfIyEtpjW
fI3urod53V8joXYEojIt1pBiG9hv7UlLw/yYslPj+jLpoBHkJ/2brwZnw5+y
Q0wI2JHzZxa2V+hL9rILN8Pjns+fnW4S6Nvk+Pnt4jSQs+0tKcY83RAyu9dm
1A6kvmMqk1gPZ3VduejEgodrsd+rBEnI8KxmmP+1VlB5Vdgb7IP7cS972PoY
HfiLrfipOF97beCbOD8mxNkI85MwX5kZPbvKC6ngfqHROQLzMRGqWmf6hQHN
Fsfl+zA/PYFz/1iIMOBsmI3SF+y/by8r4q4XDRzjVSZ/8/cz8rbGqYJ2qN7x
80Iu9g/sO7v/QgALWPsEXZ4uR6DNlO2PpATocHZ/v18C9pduIZyEcxkwdrEp
UwPrLbX/LksM0eGZ9tasVaz5QtwXT52ggbhMm6c6jh96BCDRkw4lat7xs9ie
eML/XfQJBgRfbnhbjrVR8z2FzNc0mDy9QXAz1t3XhcV7SCxo2DRmyvYtAhVH
RHREPBunED3IM8QuEn3ZqWQoNZYEzz81rA+8JCP2OlePnKUPIJtfeLBonowG
bexbAsMqYNXxi9FJBQLx8vtuDt1ZBxaeKHIWnw/F7BZnMiNbYCP/a8lhPG+o
zQ4kRisNpO+2rxzD+dHVx6G9gkxQvGor44h58jnf0yog2QWaDQI/MjDfB5Q0
o1S29YKfrXz0HUP8vi+wzf1r0Q8juhfzU8Xw+uS59XzfDoKTT3W1TjcZ7Z/V
6OGuWQaqiy5xLYeEwj9ISJv/UQKpN5sSXgkSaHC+9aB+dxUEHuEnH8J853N0
slYsG6EkrpWTD/N96cE4x5lTVOja9WOVhef5XM/0rVo3BnxkfYBIXK/whmSm
cEwHXCo4c9gT8/13iuP55Phu6PfQvmKH/99Vv9knsFGZBdp+sglMPRKyCZa7
V02phyE/fs/NmO8KjihFWdE2yFqVtLbH/A4xMthbkugwTDNSXcPx5QqE9y+3
M2Hc+47EFLbz3H9wXXmlCQZ8VF6wY74/b+K6IchLg8RqzfEYzPPGYeVxyuF2
yLNbQry4/3xcshlrdizYEx1+bUqYhLQCblc6mbWCRFPn+hHMt4VJsIHJQTq8
pGRvrcH5DggZDzpeZ8KI+hnDRsx3atWyVm4mFTZvDVi0x3x6WQkoHe1mgGP6
bc0fOL7juZayE1wMyFbshanffB4TzXC7SoO18LyyEGx/YnuGrPWmHUZFdK58
wv65B155rt5ngfHuGfnc1QgUGcqaFtxEB9fNZTyh2D8v3o/B/pIBxTo22kZY
v4zUsuFpp8NkTa3mr9/nSWoY/2FtGoTWe3lK4PjbhbamhzrT4R6Hl+wEtiuI
W0kEaTHAk3sCNWKt+zlRNzmBBkdLmPkz+Hn21ivWd8JYUPu0NH/nTAR6r/Cu
Yn6MBrFZJlXO+Pkq1e/7vxXRQVrda/n3fNF8R/dyPU0H5aWvw91YGxSKfHPY
yYBnwUVs/Vjfnjm8XXk7Hdq2TTAysA5cfBgmN00Hh2GNX0tYr3tc7sgKoAPN
zmDmB9b8d17pp5kxYNOGILZcrLPFq+kaUSwQFl8J6B+LQP99v7P9//Xf98t/
+v8A4JDznw==
"], {{},
{RGBColor[0.87, 0.94, 1], EdgeForm[None],
GraphicsGroupBox[
PolygonBox[{{1, 253, 254, 50, 252, 197, 243, 151, 189, 235, 113, 142,
180, 226, 84, 105, 134, 172, 218, 63, 76, 97, 126, 164, 210, 49, 48,
47, 46, 45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31,
30, 29, 62, 75, 96, 125, 163, 209, 28, 61, 74, 95, 124, 162, 208, 27,
60, 73, 94, 123, 161, 207, 26, 83, 104, 133, 171, 217, 59, 72, 93,
122, 160, 206, 25, 82, 103, 132, 170, 216, 58, 109, 138, 176, 222, 71,
145, 183, 229, 92, 121, 159, 205, 24, 150, 188, 234, 112, 141, 179,
225, 81, 147, 185, 231, 102, 191, 237, 131, 169, 215, 57, 251, 195,
241, 148, 247, 186, 232, 108, 249, 192, 238, 137, 245, 175, 221, 70,
250, 194, 240, 144, 246, 182, 228, 91, 248, 190, 236, 120, 244, 158,
204, 23, 196, 242, 149, 187, 233, 111, 193, 239, 140, 178, 224, 80,
146, 184, 230, 101, 130, 168, 214, 56, 107, 136, 174, 220, 69, 143,
181, 227, 90, 119, 157, 203, 22, 110, 139, 177, 223, 79, 100, 129,
167, 213, 55, 106, 135, 173, 219, 68, 89, 118, 156, 202, 21, 78, 99,
128, 166, 212, 54, 67, 88, 117, 155, 201, 20, 77, 98, 127, 165, 211,
53, 66, 87, 116, 154, 200, 19, 52, 65, 86, 115, 153, 199, 18, 17, 16,
15, 14, 13, 12, 11, 10, 9, 8, 7, 6, 5, 4, 3, 2, 51, 64, 85, 114, 152,
198}}]]}, {}, {}}], GraphicsComplexBox[CompressedData["
1:eJw1WHk81Ov3l3TrVta4KKE96rq2ROjzcFOWSCqVbNm1ivQNWRJDUihrlmE+
oWwVSRLHvmabGWPsFFkSlXUSfo/X63fnn3m9X8/zes77LO9zzsw2m+sm9txc
XFzrVnFxrXxfHjL0jYsbBaXPd5pPRSajuXlV45eiI/BT3uCd0J8pyGG5U+yE
+xcIjmIb77ibgnb6jfs8nxiErpGJDupoCuIzCkzOvP4ZBLvqvbyO0VAXX1uh
assA6D1NHZOk0dCcXqSL7/F+GDB4SGGM0dDEpPDhZOMeuHSQ+uHwPhLpfOEX
ihLthANFKT6FZiRSbx2VXhRph7K9b2OEb5OIk6Ig5cFgwBUJ54VlConOOJ47
51TbAsL33g9XBZCI99EWQdO4Bhi322bn5UYiLnEb49XSVXBt5yOefcYkstjc
uF5uXwkolzPeGkmTqCPuoWKq0GuI23Lce18PDRWt3975vCccXLOO1ws/pCHe
daud+MWohFrpFuYfB2ko5jp9//aaN0Qd2+YWqykFnd8lXK/mXkr025yK/2yX
gs4d+5z0fl0N8Vp+S6bBWDLKUI4KjPRuJFyCpQreX05GVglHFirKWol17xOG
RT5TEe2dceWLNW3ENtddJoLMJKTb720iIcQm4j8NBVYzElHM1QRndf4uQqdY
rzmgPQFJihhGHDXsJV7YdlBLq+MRjx0/Mfminzgzfeh+Vv1TFKVfpvna8BNR
cIJaklschxY+f/WrG/1MWFsHXVQoikVCq9N37700RMSyA+dmmmOQzj+ZzN/r
h4kpkwtmvOxoJDNADImGjxCud5Lqxuai0Ccdw0P3eceIO6J1o9Y7olBBARnj
kvmVsA07TvLqRCLNlyFnk/7+Rhy8V3o3xPsJ6st7L6XdMkFYB78en8x+jMSp
mrui930ntgabyCpMR6AszU5zla/fiVQN97wYnQjUaBMfK1j0g3h74Tb/jfBw
VFP/bI2A909CxFAok9EThk4U0m/pnZgi5hr8dF+GPUJaqzTX52ydJoYtpxNU
zj5EG0Mnmw70ThMW+/QkpbVCkX1idcx8zgxhX34wPmnbAxT9Yyii98YsoaAo
AoxtIUiRqpUzKT9HzPrdO31R8T4yZ5Q1qXPNE+5LFXy5h4KRpX6IdGbZPCHm
0NnuZBmE/MEtNC6OQwgdKzdFNylI4XqF4zP2CBxO1nA/3ZyMnLOURcz5BiAs
KcVysQbXc1lSWPN0L4i46+b/3kiizZeFnm9+0wU7lG+pr9IhUWnXHfG6aDag
vxyqDl8m0dNCXumim23wQPSzTuVdEqXzVBV9N6RDhciiRXsQiczlvlhvimqC
UR6+sQVvElEYJa+yzGsh8IXfoR+2JBI9NSjbuLkclOR2s36rkWiLWXbSaFIB
TPJJbEnjIlGwxF/O/Pqp4GPNnqt/S0PfeXxNaX9zCDPutqHWYQoyygieklQb
BYE/Kyo5r5MRrSfAUf/6AGhfLSy/ko/9ybBVHa7ug+wAfkub3zQUkL3JzcK/
G+65XDSiqpKI+2K1yD9nO0B6Xx7HBfO5VOUlba7DgtDflZqemK/xKa9vbwQY
kJXdyhjB/miDPY/Hny1gEWRkzMb+1st/s161UAeXOn5qEldItFGF1HRKrICS
DmpkII6XxqFi5oah96A7U208J0Circ/FhrMKMkHWSLfbqZ6G0tMDitLm5gnn
AC2bou1BaILd8aVgey/ENdcqJEqQ6NVewZ72oU6w/3qXYo3172OqtNWW1Q5N
wnGktCu2n02V2vyMCWy9sIM/cP9YyucL2f+gFcIqZagNuL8o93IVKos2gono
lxYFDxL9eyuc61xJNehq3ZSMxP1ph8suMcXYUqCka/BG/k0iNRuPH4m2HOKg
QU7pi2wK6j52Wc3ceRQ8sl16/yGT0eHZrPAy6gAIGLfL9WTSUAG/LYUj2g86
92RlC6doqNAoku0z2g1PtM/H8CmS6NmOr5tsCjogIuGlgaIViUwacpOzsllQ
9ki+YswTn3ua/iHqygCbtXU5T3B8j2+yyvnu1AIvzGd5rt4j0RUrnsJ99fUw
1xCWv3wd1086d02+ZSXIF10cmdbH92WrJiWCP8CHSfGwcjESjXwTT/OayAGJ
olPfhxg0xO2xduJ59zzh+S7czQMFoWuGGkUVD3ohcXry7rgwiYbqIrQ5x7vA
10DKtRW/JyV+bku0Chtk8ymnGq+RKDePRb20sQ30XY65+2A+Jj2jtEfjraB7
73qlC+arS5nauJPVCHkf3XzfeJFo8Fn6Of+HNRD2rdfKDvubOBCQ4nu+DLhM
fTQGlUgUqfR7R7Iuh3A31KSn1lPQxaQU0d+zbLBW7Tvk7khivR5J3tDTBhGx
Fs3lviT6vS+ZafKSDibHJe2WsT0XFvsN9+lm8GP2f1nrR6LuJ3xS8rfa4cnq
zbdV3Un0Kd2JWqfOBBXpzisSOP8Zj5Ru1Mu0QpBhxK/hQBJJq/DZ65z7CPqP
HDfevEWi3vDZkngfDqHX1mbRE05Bz6LNuz3vjoK3xmPByvhkFMqttWuxYABk
M4G9Op2G2rO8vDQU+8Gr7q8uw0kaOk09/YB/aw/kOXcF5siRaDpg8bHXcAck
Bq3ZuWhOoqNGTf3MARbs2crwDcb1Z8RXKVRLY8CTAqO0k9gf4+IL97JiWyBw
Wf2nNK7fD7P8Q6UKDbCTXSNbfQPXq3XuA3OohP1R7jtiDEl0erued+r5Yjg3
/C4sHOvDQbfR/8eRV3DC/2tuGJuGXg3orpVtnid4rf6YvXQiCOUEXU3VK+2F
n5FLN39j/fltNpm579cFq+3S3X4cw/H0vPT0pQMbhJxUXHivkihN5WffY9QG
158v6mb44/i7nH1JbKXDpvIjnzMxX5PO8bfxB5pgrnqG2neHRAc08gJEZ2rg
nbkyyrtIIrOnyg6735eB58S8/5wK7hcJmprb1DmEo1IY60AHBeUu50WL7OmA
pW1xVzztSXRL27pfSZAFd01mHdJ9sH3gHVjdT4eEpuqJBWzPU5Zu6ZnXDPt7
lcLncL7/npFO0ktrhwa5X1xv8H7Akg3o+3GdCTJSUVVhgSvxSfH2MmuF0Qx6
/EWcf9mQtfzFBR/Bac8Fo87/kSiUc5AtcYNDzFATkjSpFGSpG2Md4MEC/QIN
M3Xsz68vIxx7LQY8LHm6qRrbP+Zs06Gs1gIbsnfvWIlHiXyRlTabCVZZCtUI
5+u53p3onqJW+OYWx717JT6xirUpPnSQC6pRmsJ4YqehVcpaJqg+PCsbg/lw
LVTZiXNa4EtmdrEl5iu/Nz91cyiHsChemgr2p6B1h9v+Dnk4Cp9s+703xiaj
N+seTG6uHACOqAvj8TMaclxYO2tB9MPbcZFwoW80lFLzZrBdpQdaTknGzO8n
UUI+xSR4uQPWdzpI91zA84q/m2t0gQW/yvqgBe9fO9m/YqWLGNAYJlQlu8JX
qPNqyKsW2K+767g79seuXMTrgX0D8GsFTtJwf6VprJ94OVkJV02X+z4Zkeic
5IZK5/JiaOp5Rb0hifV0I9usIfMV5G8LOtfXSUNro0efXKqdJ6qOm5mNmAah
pp2Up6GdvcBxVAhZ4iNRo3aukcnTLhiXZ1p4HSWRWObU+Q8+bNB3PjS1B88P
6fnl5TSzNigrXryrhuNNP/ToQOwBOhRcUIqqwHzPBow+OGvfBIloe/J1PJ96
1xZu/rS3FiaudJsxbUj07lZorcdYGQjHMr964fkWZ9xbd1GZQ3D/s9/cv5+C
zOQ1TbcTHZCwenfQ/+xI9H31NS7dfSzgnRdcvwnXn9f9I47m83RwnV84M43t
+TKblFQ+N0OyR0ajM553rF0ZFqYl7dDxNEluHMfHeDxieU0IE0I3qBRp43zK
jLevZrq2wuImi4hYnO9/lHkGbw9/hKiAH8NBOP6fstl2Fpc4RJMMS9E1jYLY
f6b6xT5hAZfi2yNRuH82v5LyKznPgJ6ugrYcbF+/pL9C6GQLZB1zduXF/Vf1
Z62v6U8mNMZf7RjA2HtTnoQKsxV+DTafNcT399g4G/2KpsN0Qxpa0Y/TFzPf
/G1M4LVYWmeO+bRV/h67IdgKlPNXTqRivkHdZxQvBHKI9trXOa/vU5DHkYeh
10MYoNM/kXRz5b10aZlhHjqIlRnqhmPcOsMyy6yhgzS/TNJKPzZ3vgU9Z5jg
f1PblI3f27U1141XhgGR5WecOvA5w1dHIJBshbprC5W/sP07TQtaeg50CJYN
0RzG5zdtCeLhNwYEqEe2NOLzDjdh8c7HHCJXy3W/rRcFvY+IYEU8GYXwvV16
8tHJqHbDK6ZM/QD0wUn18yQNvdxulDeh0w/Ra2b8p77SUG2XneCHf3sgcVJp
jwTWw3dDg9xHGzpB20a5wgDrwef7J4Gpde0g2VKm6obzwaf5V/fxGga42uv2
iGA+TA1xW48PLRB3olQwCetB9blYtYtvA2yvGc3jx/2mVVaF2rG2CpKeW9gH
ncD9TuLKcMNsMdCn72VYS2H/AhOPqva9ggKmfNeabhpS/K7Wub5qnpgO7Dvw
3CwIWboJieQM98IgkyWxxIvnhamNl0p6F1TzizWV4H3pyr/vCstD2NAXZUbP
w/tlD/sPgdeObeDedt91GdffB+qL25VadFC/WjLbiPmadTjeOuDdBKtsx9Tf
Yj3kfiuyr9GuBUfGbhNbvM+N2L3zILnLYUP/aIsG3i8rM+QEuBU4RIHspVKZ
QQrKqV31dq9BB9yln8+fxvezB28KmKiy4K+EBoUa/J7DhFVGMA8DHnMJCU1i
e/4yhpLCC83A3WtJScF8ZEuuFZvXt4Oh+/Z+CtYDb2Msv0AMEzaWBwRvxvUg
fHLqKJdvKxwXJqJycX4V7/s3mS5/hNPHQk16VuK/TiZz0YFDGDzzeMqbQUFR
Y5nhtGQWjNLtIhDWw3sR9YoxewYIcVtDCrbfMCJVuMqiBYK8DfM0cf3P0JvD
rJeZsGRz+O0rjJ1uN1nZ9LfCnVMHHljh+0I1ARG7STrc/h7WvIjxrpqLYSDH
BH0DVK+B+ZTKiMklbW2Fod3t22ow31yVtNsLdznEnzwpe449pCC7F8+b46MZ
ILkun2q78t5GjSubBOmw5tzI4ySMP5j9TGxn0IFml/rvEsbi+t7NwzZ4/7Df
m/gGvyfg3/hW7QAD1D9Kqrfg85JB61OvX7YCrxazXwBjRyXRQHdXOvDTGfnf
MFY4cvREzC8GGBv1bszD/Hia7Kw8wzhEvfHI6xkfChpuc/15WYYO/suWau/w
/fCdMjvlx+lgxfWIOo/xoAGP5mNDBlxO+/jjPcYai4YbmkLoEELaFsxh/CW8
SNS3iA6/7U8urej30Lto+QEJBnzp04gfwPixc/+ShBmeX/7j9X0Y54hX0tWi
OYTJSTfb1v9R0H//L3D9/+e/31f/4f8DJ/6g3g==
"], {{},
{RGBColor[1, 0.85, 0.85], EdgeForm[None],
GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl0mV0F2QUwOENgU2kFAUBiaEIUtIh3YogMClpRtdGd3e3gHSDSCMIKCnd
3d3doDTP/+zDc373nvfjfcMiosIjYwQFBQUTGhzdkODoObs5tu7Tt0xhK89o
x1j+5i6Vac4QVnCFwpQlgt78zmmykZVvyUJmMpGRDHxDetLxNWn5ii9JQxip
SUVKUvAFyUlGUj4nCYn5jE9JxCd8TCF+pB69WMApElKQMtSlJ/M5SQIq0YzB
LOcyBfiBOvRgHieIz880ZRDLuER+vqc23ZnLceLRljGs4w7hNGEgS7nId0Qx
gtXcoDTj2cADatGNORwjLpP5l6e0YTRruU1FdvOKiWziEY3Zzn8M4B1LuEA+
Yvkfe/Q1vxHDvlkfE8kH9h36P8MJfLBVcp1SxLTv0pf8Gni2r9f71GQbz+nK
bI7yEXt5wyS28ITW7OQFo1jDLSowgY08pBH9Wcx58tKSYfzJNUoyjn+4Rw26
MIsjxKEVI/mLm5SnIf1YxDny0IKhrOQqJahOZ2ZymA/5iQb05Q/Okpvi/EIn
ZnCIUMpRnz4s5Ay5KEY1OjKdg4SQk6JUpQPTOEDswB0DtwjcK3BDclCEKrRn
Kvt5D907gWw=
"]]]}, {}, {}}], GraphicsComplexBox[CompressedData["
1:eJw1lwk0Vev7x1XE5We8ZKh0VVeGhFBkeN4mlAzpJkpclVkZmkgoJZIMp0yZ
z1aUqZR5OGSez+CYM6YMmQuH5P+21v/utc7a67ue/Qzvfj7v854tdcnV1HYj
GxvbL/z7fXceNfSLjR2n6Hv3dapdjkRLy+omOaJjFIJbNNdPKwrZrfeIGd/8
QslM4G2UV4pGu+99802f/kxZJ4WSBiViEJ9RQHKG6whFe463dQ9nLOrlYxap
U4coR56XCobyvkBLJ567+Z0apIytxxYqc8ah6RlhnWSTT5Ro/+/Z4eLx6PgX
fqFI0R5K2lqRsJxsAtKkjf+1JtJJKRDhzamVTkSsFOUdXgwGxeyf61mjB5PQ
WXtzc4d6KqWLWhHoJJ6MeEO3CprFNlGKMnjNLSKSEZv4JZNNf9VQPGbd5BL5
UtBFiRbuffLlFFfypr5HPimoO/bp/pdC7yg2loLpz6ZSUAn3zp70T+GU6vY0
9aTTZMTLtcmBXywJ+E78oR6eSkbRrvS9O+s+wItvB0w/zJGRxd/CjRo3K8Da
pbLacS+BzPVGEou56mBF0c7IzJJAb1QjA577tIBUyZOqiDsEso4/tlpVSYPU
xeQvioEEIheaVL/mYMKg9YbkmAcE0h/0Md0m1AWjUo8kRN0IFH013lGTvxeW
8xaOKBgRSFLEMELXsB92lfocCxQnEPsVfph5PQidiXb+Lj1kFHmyUvud4TCM
dlUpCQaR0erI5L2G8RFw0/xaESZHRkKb0qRlnEahVWrs652GFHRcMaP9J/dX
eB4k+V7gXAqSHYJR0fAx4G7299o/moyGjxseesw7AelN7LNmbsmooICIdsuY
hHKFsuLTPUlIOyf4XKLCFDz0ylccH0hEA++LdxyhToPcom/NWnMCEk/S/jtK
fhYOOLGOH2qKR5naPZYHJmfh2cyWnHNtcajlUlyMYMkcWKTQHzZUvEB1jakc
Aj7z4CHS8X5PfSwyLqLfOmG8AKYH//zfoYoYdHiDNnf29u/gPFYgn18Vjf4X
MtOq1v8d7JmtljX9Ucg2oTZ6OfsHiIiUbjkzHYmi5kYj+t0X4en7nNRgkUi0
P+lw9ozSEswEHi2+pf8cWTIqWzXZliE/cTLT1eMZsjoZ/FdG5TL0RcYczcsl
IX/K9ZDYWBYg0lfjstEIpOxaZZ/aNUYZfz8zMdMaiV4oMzZLP80E9w0brT43
k9Huiz6DjV3FwJHXxVkqgHnI91ZdKa+CeI1SA29dAm3Q0SLtOdoI5vdeBEZe
JdD5OM4deogKf9dZL9T5E+jem8aB/MsM2K0rp5SK+bh5yp5n5EkHxF6upNd6
E2hWmrc/I7wbnO+fiZn+F/tX3lhD2X3wV7NLS68agZ5N5wWSqANAK93JiFkl
o1PnHHSo3kNQeFmhezmXjGbZ/czICizQfbAg94cBCRm9CVqQ1Bin3L26nt4Z
E4mo550+Rf3vFch5KHTvKSIjqy9pjxbbCkArZZ9lygYCdU3prYtLfIRHQh4n
ljQIlPkxTGzuZT24BNeu3bUlUI4a3UZwvRVe2xXvkvYjkBsReLWMRAfnyq9S
K3g9IRv77GvrmZDvdUNm7z0CxT84LnaF1gUGoxo7lhwI5BkdpFLe3wural82
BR7B+e7fD/nGNwDnKzTGWNwESv9UUj4gNARXaeqGu+vIKC3tYcmrpWWoYfwz
QfIloUmG6aGkoTKIm2HKsO3A/r45jj2Xa0D+L6mYudMEMisa47EabIKyeTmt
hBsE6tsq/ZRjAw2SCqV23gogUMQ7XtO3qu1gwb5Dcd8jAllFzWevG3WC1ITg
rOMtAh1rbCcWjHsg6NiulvVzBNK45DWXcJkFhDPLT1SMhPr0nDUsHccptLGc
kSWfSOQ8k6dv3EyGaNoD7qVsMlqRK7MIMciH2D/M+qtZZBTzR/bn13qVQK3i
cD+tQqCNAUW9Zzvr4NOTq1o8NgTam/d+wVSnFQ6MTCmv3CXQ2A67D0iODvdp
vZxF+H1GX9yyRd2eCWWuyqQNmJ/5dzZqFe5dMMVz2iTVhUBB/qTWn7d6YTDg
/AZvfQJ5G3wNFc/uB03J70YXhAjUkTzqa98/CDJ8y0qjVDLa6MU5nd63DOrF
Kj/DY0goSMyBV+1iKdjqBsqxRAkU80LE2CmiGpJCMx3MT+H+ewu1fRRsAsUu
yVRNdwLF9W4xe5VMhbJfkk+1HxKIa9+3GJVmBkQOtcrz4nqd5vZedJ/qgMuv
xDUPehHoxfJshfFsNwyUW7U/w/PyucrPXcn6LLCW57X0USYhMza7syE3GuAo
y1Y1w5FA+/Nn29oobRCWbeAmcp9Ay9KvpQ+t0uHhyi7FBRz/XlpK0T9yHaAl
vPmRmC+B2JbK9VnZzeAi8JCz+Daen5Zq1VdsaPDV/WacO+6vhJoij0JCO7jx
WRly4v73hy+Wx/mywL1jwr/zVwRKjbLsu3N/nNL8uWf3M7dIVFR0wVd+bwoM
m9qebXxNRvotekfPPc6DgubTglU/yMhT1KbTvb8CvroYNo8qEkjBzkiby60O
WpbHdxdZEWjyRmrpwqcWcPOMDWzB+3m3FfPcxkUacM09ue2D69/2RGXK7QAT
Csziv7Tjfm5vmDk6fbgLoqONN9teI5CAp+i2bUd7wZmubWNpQKBTShICb336
obV3ZH1JhEBX/Ves5KsHYazxh+hbJhm9HdLnlGtbhj2+58wTX5JQR/H84vqL
EvBQrDhrI4z3W3r94f0y1fBCWMzE4wTmwTJN6eabRmD7562UuyuB7miGFd9y
o4KzrKZ1MD6fjrlc0PoRzQC/42tZNrjeWcmTqm9KO0Bj5WHFI3y+1fD7tflU
dAPfyZrL9Xi9R+K1taU0WZCm8OOBjg4J3R9aydfhbYCLfWLh8fbY/+ZQjJt1
Gyytctn8jeeBqq1Y42otHThjNd+s4/ibmeXhT1lMyHSa2yqH54l815k3GXrN
oJ9QBKp4P66VZMmoKdMgZfLBg1XcP7PridnTDu3w+vq1IgLrENbBrm3uLCiV
76n14CGhaz8+yuUmtsKj6zxlopiPzKFFAT8rOkgI6kUN43xCSiyd9WgmoOzC
V5KYr1LvxDkmlQr0gUqvIcxz88zdH+5s7aD8yCPjFeandEzjgaciA2QWR9+2
Y3+dn6XWzyNowFxqtO/C9v5Fir0zDc8TLqNpc+yvJJP3UiKEBfmD/u+Oz0cg
Lh2mQvDTcUrs+ETYiGMkGkzcFytumQwR6srz+9LIyE2St1BLJg/+5JgyKlsg
I4fEYirzdQVo+ZYwZPcR6GOH2DUbrTq42VRBfXyRQI3t26Sqs1ogRcU1SBnz
dWQtRHaklwZSFwRnzHF9A1IfzXklmbCm8C1fHfczt/2AAYdcF9wwlBoF3O/2
+e6P8rK9MO3XMlyL93ce+b2Jt20/5NsWmVTi/a++wG7MWzAI6LqWpEAXGXFG
jT9zql+Gok5WnEwmCa3xFDqPapSAhOa0ZTieLw6KOzWjFqoga+XKxLIegVxa
3G1abzVCPf+vWwGYZyfnpm9W5lQ4xMMUkMf1XOL5k6/DhwEndBUUA3C9uXld
SbqpHTDs71Qog9dzfmttx/P0bnjsx37ykzWBYk36G2xUWVD90CWNfIyEtpjW
fI3urod53V8joXYEojIt1pBiG9hv7UlLw/yYslPj+jLpoBHkJ/2brwZnw5+y
Q0wI2JHzZxa2V+hL9rILN8Pjns+fnW4S6Nvk+Pnt4jSQs+0tKcY83RAyu9dm
1A6kvmMqk1gPZ3VduejEgodrsd+rBEnI8KxmmP+1VlB5Vdgb7IP7cS972PoY
HfiLrfipOF97beCbOD8mxNkI85MwX5kZPbvKC6ngfqHROQLzMRGqWmf6hQHN
Fsfl+zA/PYFz/1iIMOBsmI3SF+y/by8r4q4XDRzjVSZ/8/cz8rbGqYJ2qN7x
80Iu9g/sO7v/QgALWPsEXZ4uR6DNlO2PpATocHZ/v18C9pduIZyEcxkwdrEp
UwPrLbX/LksM0eGZ9tasVaz5QtwXT52ggbhMm6c6jh96BCDRkw4lat7xs9ie
eML/XfQJBgRfbnhbjrVR8z2FzNc0mDy9QXAz1t3XhcV7SCxo2DRmyvYtAhVH
RHREPBunED3IM8QuEn3ZqWQoNZYEzz81rA+8JCP2OlePnKUPIJtfeLBonowG
bexbAsMqYNXxi9FJBQLx8vtuDt1ZBxaeKHIWnw/F7BZnMiNbYCP/a8lhPG+o
zQ4kRisNpO+2rxzD+dHVx6G9gkxQvGor44h58jnf0yog2QWaDQI/MjDfB5Q0
o1S29YKfrXz0HUP8vi+wzf1r0Q8juhfzU8Xw+uS59XzfDoKTT3W1TjcZ7Z/V
6OGuWQaqiy5xLYeEwj9ISJv/UQKpN5sSXgkSaHC+9aB+dxUEHuEnH8J853N0
slYsG6EkrpWTD/N96cE4x5lTVOja9WOVhef5XM/0rVo3BnxkfYBIXK/whmSm
cEwHXCo4c9gT8/13iuP55Phu6PfQvmKH/99Vv9knsFGZBdp+sglMPRKyCZa7
V02phyE/fs/NmO8KjihFWdE2yFqVtLbH/A4xMthbkugwTDNSXcPx5QqE9y+3
M2Hc+47EFLbz3H9wXXmlCQZ8VF6wY74/b+K6IchLg8RqzfEYzPPGYeVxyuF2
yLNbQry4/3xcshlrdizYEx1+bUqYhLQCblc6mbWCRFPn+hHMt4VJsIHJQTq8
pGRvrcH5DggZDzpeZ8KI+hnDRsx3atWyVm4mFTZvDVi0x3x6WQkoHe1mgGP6
bc0fOL7juZayE1wMyFbshanffB4TzXC7SoO18LyyEGx/YnuGrPWmHUZFdK58
wv65B155rt5ngfHuGfnc1QgUGcqaFtxEB9fNZTyh2D8v3o/B/pIBxTo22kZY
v4zUsuFpp8NkTa3mr9/nSWoY/2FtGoTWe3lK4PjbhbamhzrT4R6Hl+wEtiuI
W0kEaTHAk3sCNWKt+zlRNzmBBkdLmPkz+Hn21ivWd8JYUPu0NH/nTAR6r/Cu
Yn6MBrFZJlXO+Pkq1e/7vxXRQVrda/n3fNF8R/dyPU0H5aWvw91YGxSKfHPY
yYBnwUVs/Vjfnjm8XXk7Hdq2TTAysA5cfBgmN00Hh2GNX0tYr3tc7sgKoAPN
zmDmB9b8d17pp5kxYNOGILZcrLPFq+kaUSwQFl8J6B+LQP99v7P9//Xf98t/
+v8A4JDznw==
"], {{},
{RGBColor[0.87, 0.94, 1], Opacity[0.5], EdgeForm[None],
GraphicsGroupBox[
PolygonBox[{{1, 253, 254, 50, 252, 197, 243, 151, 189, 235, 113, 142,
180, 226, 84, 105, 134, 172, 218, 63, 76, 97, 126, 164, 210, 49, 48,
47, 46, 45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31,
30, 29, 62, 75, 96, 125, 163, 209, 28, 61, 74, 95, 124, 162, 208, 27,
60, 73, 94, 123, 161, 207, 26, 83, 104, 133, 171, 217, 59, 72, 93,
122, 160, 206, 25, 82, 103, 132, 170, 216, 58, 109, 138, 176, 222, 71,
145, 183, 229, 92, 121, 159, 205, 24, 150, 188, 234, 112, 141, 179,
225, 81, 147, 185, 231, 102, 191, 237, 131, 169, 215, 57, 251, 195,
241, 148, 247, 186, 232, 108, 249, 192, 238, 137, 245, 175, 221, 70,
250, 194, 240, 144, 246, 182, 228, 91, 248, 190, 236, 120, 244, 158,
204, 23, 196, 242, 149, 187, 233, 111, 193, 239, 140, 178, 224, 80,
146, 184, 230, 101, 130, 168, 214, 56, 107, 136, 174, 220, 69, 143,
181, 227, 90, 119, 157, 203, 22, 110, 139, 177, 223, 79, 100, 129,
167, 213, 55, 106, 135, 173, 219, 68, 89, 118, 156, 202, 21, 78, 99,
128, 166, 212, 54, 67, 88, 117, 155, 201, 20, 77, 98, 127, 165, 211,
53, 66, 87, 116, 154, 200, 19, 52, 65, 86, 115, 153, 199, 18, 17, 16,
15, 14, 13, 12, 11, 10, 9, 8, 7, 6, 5, 4, 3, 2, 51, 64, 85, 114, 152,
198}}]]}, {}, {}}], {{}, {},
{RGBColor[1, 0, 0], Thickness[Tiny],
LineBox[{{-0.292785, 0.}, {-0.29278, 4520.7187856970195`}}]}}, {{}, {},
{RGBColor[0, 0, 1], Thickness[Tiny],
LineBox[{{0.29278, 0.}, {0.29278, 4520.7187856970195`}}]}}},
AspectRatio->NCache[
Rational[25, 102], 0.24509803921568626`],
Axes->{False, False},
AxesOrigin->{0, 0},
Method->{"AxesInFront" -> True},
PlotRange->{{-0.7999999510204082, 1.5999999510204082`}, {
0, 4718.689292588146}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02], Automatic},
Ticks->None]], "Output",
CellChangeTimes->{
3.662937998734461*^9, {3.662938052961116*^9, 3.662938200317461*^9}, {
3.662938232520813*^9, 3.662938261543352*^9}, 3.662938417016946*^9, {
3.6629385683060102`*^9, 3.6629386012283087`*^9}, {3.662938671388874*^9,
3.662938741216281*^9}, {3.662938783755797*^9, 3.66293880868165*^9},
3.662939476595463*^9, 3.66380956854676*^9, 3.663809634885528*^9}]
}, Open ]]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["SAMPLE ONE-SPECIES SIMULATION (BURN IN)", "Section",
CellChangeTimes->{{3.6682833484947433`*^9, 3.6682833574212093`*^9}, {
3.669332795192395*^9, 3.6693328018451443`*^9}}],
Cell[BoxData[
RowBox[{"FileLocation", " ", "=", " ",
"\"\\""}]], "Input",
CellChangeTimes->{{3.703191006168285*^9, 3.7031910522507143`*^9},
3.703192496912471*^9, {3.7031932757464952`*^9, 3.703193284100492*^9}}],
Cell[BoxData[{
RowBox[{
RowBox[{"CreateDirectory", "[",
RowBox[{"StringJoin", "[",
RowBox[{"BaseDirectory", ",", "FileLocation"}], "]"}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"SetDirectory", "[",
RowBox[{"StringJoin", "[",
RowBox[{"BaseDirectory", ",", "FileLocation"}], "]"}], "]"}],
";"}]}], "Input",
CellChangeTimes->{{3.669309251034725*^9, 3.669309290527883*^9}, {
3.669309812910254*^9, 3.6693098237183237`*^9}, {3.669311387392653*^9,
3.669311388478731*^9}, {3.6693114493198013`*^9, 3.669311452117076*^9}, {
3.6693123889098473`*^9, 3.669312390727306*^9}, {3.6693364338400097`*^9,
3.6693364353960123`*^9}, {3.703191022941924*^9, 3.703191028749366*^9}, {
3.7031932502989693`*^9, 3.703193294780004*^9}}],
Cell[BoxData[{
RowBox[{
RowBox[{"loci", "=", "20"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"F", "=", "4"}], ";"}], " ",
RowBox[{"(*", " ", "Fecundity", " ", "*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"\[Sigma]\[Nu]", "=",
RowBox[{"15", "/", "10000"}]}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{"Mutational", " ", "effect", " ", "size"}], " ", "*)"}],
" "}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"initpopsize", "=", "2500"}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{"initial", " ", "size", " ", "of", " ", "the", " ", "population"}],
" ", "*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"maxtrait", "=",
RowBox[{"-", "0.5640230743993504`"}]}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{
"ESS", " ", "Trait", " ", "for", " ", "the", " ", "specified", " ",
"parameter", " ", "set"}], " ", "*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"totpops", "=", "1"}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{"number", " ", "of", " ", "species"}], " ",
"*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"r", "=", "1"}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{"intrinsic", " ", "growth", " ", "rate"}], " ",
"*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"pmut", " ", "=", " ", "0.02"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"\[Sigma]k", "=", "1"}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{
"width", " ", "of", " ", "the", " ", "resource", " ", "distribution"}],
" ", "*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"\[Mu]", "=", "0"}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{
"mean", " ", "of", " ", "the", " ", "resource", " ", "distribution"}], " ",
"*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"Km", "=", "5669"}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{
"scaling", " ", "parameter", " ", "for", " ", "the", " ", "height", " ",
"of", " ", "the", " ", "resource", " ", "distribution"}], " ",
"*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"\[Kappa]", "=", "4"}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{
"skew", " ", "parameter", " ", "for", " ", "the", " ", "resource", " ",
"distribution"}], " ", "*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"\[Sigma]\[Alpha]", "=",
RowBox[{"85", "/", "100"}]}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{
"width", " ", "of", " ", "the", " ", "competition", " ", "function"}], " ",
"*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"\[Beta]", "=", "0"}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{
"asymmetry", " ", "parameter", " ", "for", " ", "the", " ", "competition",
" ", "function"}], " ", "*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"vm", "=", "0"}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{
RowBox[{"environmental", " ", "change", " ", "speed"}], ",", " ",
RowBox[{
"set", " ", "to", " ", "zero", " ", "for", " ", "burn", " ", "in"}]}],
" ", "*)"}], "\[IndentingNewLine]",
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"popn", "=",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"Table", "[",
RowBox[{
RowBox[{"maxtrait", "/", "loci"}], ",",
RowBox[{"{",
RowBox[{"j", ",", "1", ",", "loci"}], "}"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",", "initpopsize"}], "}"}]}], "]"}]}], ";"}],
" ",
RowBox[{"(*", " ",
RowBox[{"initial", " ",
RowBox[{"population", ".", " ", "All"}], " ", "individuals", " ", "are",
" ",
RowBox[{"equal", ".", " ", "The"}], " ", "sum", " ", "of", " ", "the",
" ", "allelic", " ", "values", " ", "is", " ", "the", " ", "ESS", " ",
"trait"}], " ", "*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"\[Omega]", "[",
RowBox[{"\[Sigma]_", ",", "\[Kappa]_"}], "]"}], ":=",
FractionBox[
RowBox[{
SqrtBox["\[Pi]"], " ", "\[Sigma]"}],
SqrtBox[
RowBox[{
RowBox[{"-", "2"}], "+", "\[Pi]", "+",
FractionBox["2",
RowBox[{"1", "+",
SuperscriptBox["\[Kappa]", "2"]}]]}]]]}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{
RowBox[{"scale", " ", "parameter", " ", "for", " ", "the", " ", "skew"}],
"-",
RowBox[{"normal", " ", "distribution"}]}], " ",
"*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"\[Xi]t", "[",
RowBox[{
"\[Kappa]_", " ", ",", "\[Sigma]_", ",", "\[Nu]_", ",", "vm_", ",",
"t_"}], "]"}], ":=",
RowBox[{
FractionBox[
RowBox[{
RowBox[{
SqrtBox[
RowBox[{"1", "+",
SuperscriptBox["\[Kappa]", "2"]}]], " ", "\[Nu]"}], "-",
FractionBox[
RowBox[{
SqrtBox["2"], " ", "\[Kappa]", " ", "\[Sigma]"}],
SqrtBox[
RowBox[{
RowBox[{"-", "2"}], "+", "\[Pi]", "+",
FractionBox["2",
RowBox[{"1", "+",
SuperscriptBox["\[Kappa]", "2"]}]]}]]]}],
SqrtBox[
RowBox[{"1", "+",
SuperscriptBox["\[Kappa]", "2"]}]]], "+",
RowBox[{"vm", "*", "t"}]}]}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{
RowBox[{
"location", " ", "parameter", " ", "for", " ", "the", " ", "skew"}], "-",
RowBox[{"normal", " ", "distribution"}]}], " ",
"*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"k", "[",
RowBox[{"u_", ",", "t_"}], "]"}], ":=",
RowBox[{"Km", "*",
RowBox[{"PDF", "[",
RowBox[{
RowBox[{"SkewNormalDistribution", "[",
RowBox[{
RowBox[{"\[Xi]t", "[",
RowBox[{
"\[Kappa]", ",", "\[Sigma]k", ",", "\[Mu]", ",", "vm", ",", "t"}],
"]"}], ",",
RowBox[{"\[Omega]", "[",
RowBox[{"\[Sigma]k", ",", "\[Kappa]"}], "]"}], ",", "\[Kappa]"}],
"]"}], ",", "u"}], "]"}]}]}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{"skew", "-",
RowBox[{"normal", " ", "resource", " ", "distribution"}]}], " ",
"*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"a", "[",
RowBox[{"u1_", ",", "u2_", ",", "\[Sigma]\[Alpha]_", ",", "\[Beta]_"}],
"]"}], ":=",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{"1", "+",
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{"u1", "-", "u2", "+", "\[Beta]"}], ")"}], "^", "2"}],
")"}], "/",
RowBox[{"(",
RowBox[{"2", "*",
RowBox[{"(",
RowBox[{"\[Sigma]\[Alpha]", "^", "2"}], ")"}]}], ")"}]}],
")"}]}], ")"}], "^",
RowBox[{"(",
RowBox[{"-", "1"}], ")"}]}], ")"}], "*",
RowBox[{"(",
RowBox[{"1", "+",
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{"\[Beta]", "^", "2"}], ")"}], "/",
RowBox[{"(",
RowBox[{"2", "*",
RowBox[{"(",
RowBox[{"\[Sigma]\[Alpha]", "^", "2"}], ")"}]}], ")"}]}], ")"}]}],
")"}]}]}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{"competition", " ", "function"}], " ",
"*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"W", "[",
RowBox[{
"u_", ",", "v_", ",", "vcount_", ",", "\[Sigma]\[Alpha]_", ",", "t_",
",", "\[Beta]_"}], "]"}], ":=",
RowBox[{"1", "+",
RowBox[{"r",
RowBox[{"(",
RowBox[{"1", "-",
RowBox[{
RowBox[{"Sum", "[",
RowBox[{
RowBox[{
RowBox[{"a", "[",
RowBox[{"u", ",",
RowBox[{"v", "[",
RowBox[{"[", "i", "]"}], "]"}], ",", "\[Sigma]\[Alpha]", ",",
"\[Beta]"}], "]"}], "*",
RowBox[{"vcount", "[",
RowBox[{"[", "i", "]"}], "]"}]}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "v", "]"}]}], "}"}]}], "]"}], "/",
RowBox[{"k", "[",
RowBox[{"u", ",", "t"}], "]"}]}]}], ")"}]}]}]}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{"fitness", " ", "function"}], " ", "*)"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"baby", "=",
RowBox[{"Table", "[",
RowBox[{"null", ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",", "loci"}], "}"}]}], "]"}]}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{"shell", " ", "of", " ", "a", " ", "new", " ", "individual"}], " ",
"*)"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"generation", "=",
RowBox[{"List", "[", "]"}]}], ";"}], "\[IndentingNewLine]",
"\[IndentingNewLine]",
RowBox[{"(*",
RowBox[{
"flatgentraits", " ", "flattens", " ", "the", " ", "population", " ",
"list", " ", "to", " ", "the", " ", "trait", " ", "values", " ",
RowBox[{"(",
RowBox[{"to", " ", "three", " ", "decimal", " ", "places"}], ")"}], " ",
"from", " ", "the", " ", "full", " ",
RowBox[{"genomes", ".", " ", "For"}], " ", "calculation", " ", "of", " ",
"the", " ", "fitness", " ",
RowBox[{"function", "."}]}], " ", "*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"flatgentraits", "=", "\[IndentingNewLine]",
RowBox[{"Flatten", "[", "\[IndentingNewLine]",
RowBox[{"Table", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Chop", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"SetPrecision", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Total", "[",
RowBox[{"popn", "[",
RowBox[{"[", "i", "]"}], "]"}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"If", "[",
RowBox[{
RowBox[{
RowBox[{"Abs", "[",
RowBox[{"IntegerPart", "[",
RowBox[{
RowBox[{"Total", "[",
RowBox[{"popn", "[",
RowBox[{"[", "i", "]"}], "]"}], "]"}], "*", "1000"}],
"]"}], "]"}], "<", "10"}], ",", "\[IndentingNewLine]", "1",
",", "\[IndentingNewLine]",
RowBox[{"If", "[",
RowBox[{
RowBox[{
RowBox[{"Abs", "[",
RowBox[{"IntegerPart", "[",
RowBox[{
RowBox[{"Total", "[",
RowBox[{"popn", "[",
RowBox[{"[", "i", "]"}], "]"}], "]"}], "*", "1000"}],
"]"}], "]"}], "<", "100"}], ",", "\[IndentingNewLine]", "2",
",", "\[IndentingNewLine]", "3"}], "]"}]}], "]"}]}], "]"}],
",", "\[IndentingNewLine]", "0.001"}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "popn", "]"}]}], "}"}]}], "]"}], "]"}]}],
";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"pop", "=",
RowBox[{"Transpose", "[",
RowBox[{"Tally", "[", "flatgentraits", "]"}], "]"}]}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{
RowBox[{
"Also", " ", "for", " ", "calculation", " ", "of", " ", "the", " ",
"fitness", " ", "function"}], ",", " ",
RowBox[{
"tallies", " ", "up", " ", "the", " ", "number", " ", "of", " ", "times",
" ", "a", " ", "trait", " ", "value", " ", "is", " ", "found", " ", "in",
" ", "the", " ", "population"}]}], " ", "*)"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"fit", "=",
RowBox[{"W", "[",
RowBox[{"u1", ",",
RowBox[{"pop", "[",
RowBox[{"[", "1", "]"}], "]"}], ",",
RowBox[{"pop", "[",
RowBox[{"[", "2", "]"}], "]"}], ",", "\[Sigma]\[Alpha]", ",", "0", ",",
"\[Beta]"}], "]"}]}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{
"the", " ", "fitness", " ", "landscape", " ", "for", " ", "the", " ",
"initial", " ", "population"}], " ", "*)"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"For", "[",
RowBox[{
RowBox[{"generations", "=", "1"}], ",",
RowBox[{"generations", "\[LessEqual]", "5000"}], ",",
RowBox[{"generations", "++"}], ",", " ",
RowBox[{"(*", " ",
RowBox[{"each", " ", "generation"}], "*)"}], "\[IndentingNewLine]",
RowBox[{"{", "\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{
RowBox[{"popnlength", "=",
RowBox[{"Length", "[", "popn", "]"}]}], ";", " ",
RowBox[{"(*", " ",
RowBox[{"number", " ", "of", " ", "individuals", " ", "present"}], " ",
"*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"For", "[",
RowBox[{
RowBox[{"individual", "=", "1"}], ",",
RowBox[{"individual", "\[LessEqual]", "popnlength"}], ",",
RowBox[{"individual", "++"}], ",", " ",
RowBox[{"(*", " ",
RowBox[{
"for", " ", "each", " ", "individual", " ", "in", " ", "the", " ",
"generation"}], "*)"}], "\[IndentingNewLine]",
RowBox[{"{", "\[IndentingNewLine]",
RowBox[{
RowBox[{"mate", "=",
RowBox[{"RandomChoice", "[", "popn", "]"}]}], ";", " ",
RowBox[{"(*", " ",
RowBox[{
"choose", " ", "a", " ", "random", " ", "mate", " ", "from", " ",
"the", " ", "population"}], " ", "*)"}], "\[IndentingNewLine]",
"\[IndentingNewLine]",
RowBox[{"For", "[", " ",
RowBox[{
RowBox[{"offspring", "=", "1"}], ",",
RowBox[{"offspring", "\[LessEqual]", "F"}], ",",
RowBox[{"offspring", "++"}], ",",
RowBox[{"(*", " ",
RowBox[{
"Each", " ", "mating", " ", "pair", " ", "has", " ", "4", " ",
"offspring"}], " ", "*)"}], "\[IndentingNewLine]",
RowBox[{"{", "\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{
RowBox[{"For", "[",
RowBox[{
RowBox[{"locus", "=", "1"}], ",",
RowBox[{"locus", "\[LessEqual]", "loci"}], ",",
RowBox[{"locus", "+=", "2"}], ",",
RowBox[{"(*", " ",
RowBox[{
"this", " ", "loop", " ", "chooses", " ", "the", " ",
"genome", " ", "of", " ", "the", " ", "offspring"}], " ",
"*)"}], "\[IndentingNewLine]",
RowBox[{"{", "\[IndentingNewLine]",
RowBox[{
RowBox[{"alleleFromMom", "=",
RowBox[{"RandomChoice", "[",
RowBox[{"popn", "[",
RowBox[{"[",
RowBox[{"individual", ",",
RowBox[{"locus", ";;",
RowBox[{"locus", "+", "1"}]}]}], "]"}], "]"}], "]"}]}],
";",
RowBox[{"(*", " ",
RowBox[{
RowBox[{"For", " ", "each", " ", "locus"}], ",", " ",
RowBox[{
"randomly", " ", "choose", " ", "one", " ", "of", " ",
"2", " ", "maternal", " ", "alleles", " ", "to", " ",
"give", " ", "to", " ", "offspring"}]}], " ", "*)"}],
"\[IndentingNewLine]",
RowBox[{"alleleFromDad", "=",
RowBox[{"RandomChoice", "[",
RowBox[{"mate", "[",
RowBox[{"[",
RowBox[{"locus", ";;",
RowBox[{"locus", "+", "1"}]}], "]"}], "]"}], "]"}]}], ";",
RowBox[{"(*", " ",
RowBox[{
"for", " ", "a", " ", "given", " ", "locus", " ", "choose",
" ", "one", " ", "for", " ", "2", " ", "paternal", " ",
"alleles", " ", "to", " ", "give", " ", "to", " ",
"offspring"}], " ", "*)"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"baby", "[",
RowBox[{"[",
RowBox[{"locus", ";;",
RowBox[{"locus", "+", "1"}]}], "]"}], "]"}], "=",
RowBox[{"{",
RowBox[{"alleleFromMom", ",", "alleleFromDad"}], "}"}]}],
";"}], " ",
RowBox[{"(*", " ",
RowBox[{
"each", " ", "offspring", " ", "locus", " ", "gets", " ",
"one", " ", "maternal", " ", "allele", " ", "and", " ",
"one", " ", "paternal", " ", "allele"}], " ", "*)"}],
"\[IndentingNewLine]", "}"}]}], "]"}], ";",
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"rand", "=",
RowBox[{"RandomReal", "[", "]"}]}], ";", " ",
RowBox[{"(*", " ",
RowBox[{
"choose", " ", "a", " ", "random", " ", "real", " ", "number",
" ", "between", " ", "0", " ", "and", " ", "1"}], " ", "*)"}],
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"If", "[",
RowBox[{
RowBox[{
RowBox[{"RandomReal", "[", "]"}], "\[LessEqual]", "pmut"}],
",",
RowBox[{"(*", " ",
RowBox[{
RowBox[{
"choose", " ", "a", " ", "random", " ", "real", " ",
"number", " ", "between", " ", "0", " ", "and", " ", "1"}],
",", " ",
RowBox[{
"if", " ", "this", " ", "is", " ", "less", " ", "than", " ",
"0.02"}], ",", " ",
RowBox[{
"then", " ", "offspring", " ", "will", " ", "get", " ", "a",
" ", "mutation", " ", "at", " ", "a", " ", "random", " ",
"locus"}]}], " ", "*)"}], "\[IndentingNewLine]",
RowBox[{"{",
RowBox[{
RowBox[{"mutno", "=",
RowBox[{"RandomChoice", "[",
RowBox[{"Table", "[",
RowBox[{"i", ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",", "loci"}], "}"}]}], "]"}],
"]"}]}], ";",
RowBox[{"(*", " ",
RowBox[{"choose", " ", "a", " ", "random", " ", "locus"}],
" ", "*)"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"baby", "[",
RowBox[{"[", "mutno", "]"}], "]"}], "=",
RowBox[{"Chop", "[",
RowBox[{
RowBox[{"RandomVariate", "[",
RowBox[{"NormalDistribution", "[",
RowBox[{
RowBox[{"baby", "[",
RowBox[{"[", "mutno", "]"}], "]"}], ",",
"\[Sigma]\[Nu]"}], "]"}], "]"}], ",", "0.00001"}],
"]"}]}]}], "}"}], ",",
RowBox[{"(*", " ",
RowBox[{"mutates", " ", "the", " ",
RowBox[{"offspring", "'"}], "s", " ", "locus"}], " ",
"*)"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"{", "}"}], ";"}]}], "]"}], ";",
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"If", "[",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{"fit", "/", "F"}], ")"}], "/.",
RowBox[{"u1", "\[Rule]",
RowBox[{"Total", "[", "baby", "]"}]}]}], ")"}], ">",
"rand"}], ",", " ",
RowBox[{"(*", " ",
RowBox[{
RowBox[{"delete", " ",
RowBox[{"(", "kill", ")"}], " ", "the", " ", "offspring",
" ", "if", " ", "its", " ", "fitness", " ", "is", " ",
"less", " ", "than", " ", "rand"}], ",", " ",
RowBox[{"otherwise", " ", "do", " ", "nothing", " ",
RowBox[{"(",
RowBox[{"offspring", " ", "lives"}], ")"}]}]}], " ",
"*)"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"AppendTo", "[",
RowBox[{"generation", ",", "baby"}], "]"}], ";"}], "}"}],
";", " ",
RowBox[{"(*", " ",
RowBox[{"saves", " ", "the", " ",
RowBox[{"baby", "'"}], "s", " ", "trait"}], " ", "*)"}],
"\[IndentingNewLine]",
RowBox[{"{", "}"}]}]}], "]"}], ";"}], "\[IndentingNewLine]",
"\[IndentingNewLine]", "}"}]}], "]"}], ";"}],
"\[IndentingNewLine]", "\[IndentingNewLine]", "}"}]}], "]"}], ";",
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"popn", "=", " ", "generation"}], " ", ";",
RowBox[{"(*", " ",
RowBox[{
"resets", " ", "the", " ", "population", " ", "to", " ", "the", " ",
"newly", " ", "created", " ", "generation"}], " ", "*)"}],
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"(*",
RowBox[{
"flatgentraits", " ", "flattens", " ", "the", " ", "population", " ",
"list", " ", "to", " ", "the", " ", "trait", " ", "values", " ",
RowBox[{"(",
RowBox[{"to", " ", "three", " ", "decimal", " ", "places"}], ")"}],
" ", "from", " ", "the", " ", "full", " ",
RowBox[{"genomes", ".", " ", "For"}], " ", "calculation", " ", "of",
" ", "the", " ", "fitness", " ",
RowBox[{"function", "."}]}], " ", "*)"}], "\[IndentingNewLine]",
RowBox[{"flatgentraits", "=", "\[IndentingNewLine]",
RowBox[{"Flatten", "[", "\[IndentingNewLine]",
RowBox[{"Table", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Chop", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"SetPrecision", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Total", "[",
RowBox[{"popn", "[",
RowBox[{"[", "i", "]"}], "]"}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"If", "[",
RowBox[{
RowBox[{
RowBox[{"Abs", "[",
RowBox[{"IntegerPart", "[",
RowBox[{
RowBox[{"Total", "[",
RowBox[{"popn", "[",
RowBox[{"[", "i", "]"}], "]"}], "]"}], "*", "1000"}],
"]"}], "]"}], "<", "10"}], ",", "\[IndentingNewLine]", "1",
",", "\[IndentingNewLine]",
RowBox[{"If", "[",
RowBox[{
RowBox[{
RowBox[{"Abs", "[",
RowBox[{"IntegerPart", "[",
RowBox[{
RowBox[{"Total", "[",
RowBox[{"popn", "[",
RowBox[{"[", "i", "]"}], "]"}], "]"}], "*", "1000"}],
"]"}], "]"}], "<", "100"}], ",", "\[IndentingNewLine]",
"2", ",", "\[IndentingNewLine]", "3"}], "]"}]}], "]"}]}],
"]"}], ",", "\[IndentingNewLine]", "0.001"}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "popn", "]"}]}], "}"}]}], "]"}], "]"}]}],
";", "\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"pop", "=",
RowBox[{"Transpose", "[",
RowBox[{"Tally", "[", "flatgentraits", "]"}], "]"}]}], ";",
RowBox[{"(*", " ",
RowBox[{
RowBox[{
"Also", " ", "for", " ", "calculation", " ", "of", " ", "the", " ",
"fitness", " ", "function"}], ",", " ",
RowBox[{
"tallies", " ", "up", " ", "the", " ", "number", " ", "of", " ",
"times", " ", "a", " ", "trait", " ", "value", " ", "is", " ",
"found", " ", "in", " ", "the", " ", "population"}]}], " ", "*)"}],
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"generation", "=",
RowBox[{"List", "[", "]"}]}], ";", " ",
RowBox[{"(*", " ",
RowBox[{"reset", " ", "the", " ", "generation", " ", "list", " ",
RowBox[{"(",
RowBox[{
"all", " ", "individuals", " ", "die", " ", "at", " ", "the", " ",
"end", " ", "of", " ", "a", " ", "generation"}], ")"}]}], " ",
"*)"}], "\[IndentingNewLine]",
RowBox[{"(*",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--", "-"}]}]}]}]}]}]}]}]}], "*)"}],
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"fit", "=",
RowBox[{"W", "[",
RowBox[{"u1", ",",
RowBox[{"pop", "[",
RowBox[{"[", "1", "]"}], "]"}], ",",
RowBox[{"pop", "[",
RowBox[{"[", "2", "]"}], "]"}], ",", "\[Sigma]\[Alpha]", ",",
"generations", ",", "\[Beta]"}], "]"}]}], ";", " ",
RowBox[{"(*", " ",
RowBox[{
"the", " ", "fitness", " ", "landscape", " ", "for", " ", "the", " ",
"initial", " ", "population"}], " ", "*)"}], "\[IndentingNewLine]",
"\[IndentingNewLine]",
RowBox[{"Print", "[",
RowBox[{"StringJoin", "[",
RowBox[{"\"\\"", ",",
RowBox[{"ToString", "[", "generations", "]"}]}], "]"}], "]"}], ";",
" ",
RowBox[{"(*", " ",
RowBox[{
RowBox[{
"prints", " ", "this", " ", "after", " ", "the", " ", "generation",
" ", "is", " ", "finished"}], " ", "-", " ",
RowBox[{
"for", " ", "keeping", " ", "track", " ", "of", " ", "the", " ",
"progress", " ", "of", " ", "the", " ", "simulation"}]}], " ",
"*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"(*",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--", "-"}]}]}]}]}]}]}]}]}], "*)"}],
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"If", "[",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{"generations", "/", "100"}], ")"}], "\[Element]",
"Integers"}], ",", "\[IndentingNewLine]",
RowBox[{"{",
RowBox[{
RowBox[{"Export", "[",
RowBox[{
RowBox[{"StringJoin", "[",
RowBox[{"\"\\"", ",",
RowBox[{"ToString", "[", "generations", "]"}], ",",
"\"\<.txt\>\""}], "]"}], ",", "popn", ",", "\"\\""}],
"]"}], ";"}], "}"}], ",", "\[IndentingNewLine]",
RowBox[{"{", "}"}]}], "]"}], ";", " ",
RowBox[{"(*", " ",
RowBox[{
"exports", " ", "it", " ", "to", " ", "the", " ", "directory", " ",
"set", " ", "above"}], " ", "*)"}], "\[IndentingNewLine]",
"\[IndentingNewLine]",
RowBox[{"flatgentraits", "=",
RowBox[{"List", "[", "]"}]}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{
"reset", " ", "flatgentraits", " ", "for", " ", "the", " ", "next", " ",
"generation"}], " ", "*)"}], "\[IndentingNewLine]",
"\[IndentingNewLine]", "}"}]}], "]"}], ";"}]}], "Input",
CellChangeTimes->{{3.668888984951531*^9, 3.6688889854062634`*^9}, {
3.66930918807134*^9, 3.669309212432753*^9}, {3.669309834058649*^9,
3.6693098413783617`*^9}, {3.669309966580695*^9, 3.669310006380342*^9}, {
3.669310051926878*^9, 3.669310069346891*^9}, {3.669310162597433*^9,
3.669310165040966*^9}, {3.669310335189988*^9, 3.669310351372654*^9}, {
3.669310617152007*^9, 3.669310633857506*^9}, {3.669310837115121*^9,
3.669310859206573*^9}, {3.669311310815605*^9, 3.6693113193207912`*^9}, {
3.669311352126965*^9, 3.669311494914784*^9}, {3.6693118736726503`*^9,
3.669311876093917*^9}, {3.669312113600205*^9, 3.669312122256719*^9}, {
3.669312196850903*^9, 3.6693122099938507`*^9}, {3.66931228751337*^9,
3.669312302224262*^9}, {3.669312343651585*^9, 3.669312352735407*^9}, {
3.669312705728459*^9, 3.669312717953796*^9}, {3.66931277335156*^9,
3.669312788620843*^9}, {3.669313048440168*^9, 3.669313079673869*^9}, {
3.669313111110766*^9, 3.669313188305979*^9}, {3.669313274086602*^9,
3.669313279775774*^9}, {3.669313333093274*^9, 3.669313339596451*^9}, {
3.669313378735187*^9, 3.669313435769166*^9}, {3.669313523830118*^9,
3.669313575029971*^9}, {3.669315218017289*^9, 3.66931528958681*^9},
3.669315393428851*^9, {3.669315524105156*^9, 3.669315525761629*^9}, {
3.66931556684367*^9, 3.6693155674219933`*^9}, {3.669315611545164*^9,
3.669315615501277*^9}, {3.669317709072835*^9, 3.66931771601311*^9}, {
3.669320210815916*^9, 3.669320215765823*^9}, 3.669336440798684*^9, {
3.669338309037764*^9, 3.669338382006372*^9}, {3.669340221397132*^9,
3.669340327463354*^9}, {3.669340406024024*^9, 3.669340463248927*^9}, {
3.669340569153451*^9, 3.669340699549101*^9}, {3.66934079600659*^9,
3.6693408808225517`*^9}, {3.6693801128869667`*^9, 3.66938051202216*^9}, {
3.669380592843482*^9, 3.6693806983410397`*^9}, {3.669380745147662*^9,
3.6693807779490147`*^9}, {3.6693808100633307`*^9, 3.669380875717517*^9}, {
3.669380928892997*^9, 3.669381031292893*^9}, {3.6693810953051643`*^9,
3.669381141162147*^9}, {3.669381298380204*^9, 3.6693813147015123`*^9}, {
3.6693819235729847`*^9, 3.669381951946947*^9}, {3.703191067189232*^9,
3.703191100327792*^9}}]
}, Open ]],
Cell[CellGroupData[{
Cell["SAMPLE ONE-SPECIES SIMULATION (WITH ENVIRONMENTAL CHANGE)", "Section",
CellChangeTimes->{{3.6682833484947433`*^9, 3.668283367564701*^9}, {
3.669315205415257*^9, 3.669315212010606*^9}, {3.669315443897904*^9,
3.669315455452187*^9}, {3.6693327839574537`*^9, 3.6693327877245293`*^9}}],
Cell["\<\
For further information about parts of the simulation or definitions of the \
parameters see \[OpenCurlyDoubleQuote]SAMPLE ONE-SPECIES SIMULATION (BURN IN)\
\[CloseCurlyDoubleQuote] section. \
\>", "Text",
CellChangeTimes->{{3.6693813463053017`*^9, 3.6693813511766157`*^9}, {
3.6693813866402397`*^9, 3.669381421643956*^9}, 3.6693846028938847`*^9}],
Cell[BoxData[{
RowBox[{
RowBox[{"SetDirectory", "[",
RowBox[{"StringJoin", "[",
RowBox[{
"BaseDirectory", ",", "\"\\""}],
"]"}], "]"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"popn", "=",
RowBox[{"ToExpression", "[",
RowBox[{
"Import", "[", "\"\<1-0.85-4-0.02-0.0015-0-Burn_In.txt\>\"", "]"}],
"]"}]}], ";"}]}], "Input",
CellChangeTimes->{{3.669315975843009*^9, 3.669316033063388*^9}, {
3.669317273311452*^9, 3.669317278050555*^9}, {3.7031926147959003`*^9,
3.703192652286827*^9}}],
Cell[BoxData[{
RowBox[{
RowBox[{"CreateDirectory", "[",
RowBox[{"StringJoin", "[",
RowBox[{
"BaseDirectory", ",",
"\"\\""}], "]"}], "]"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"SetDirectory", "[",
RowBox[{"StringJoin", "[",
RowBox[{
"BaseDirectory", ",",
"\"\\""}], "]"}], "]"}],
";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"loci", "=", "20"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"F", "=", "4"}], ";"}], " "}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"\[Sigma]\[Nu]", "=",
RowBox[{"15", "/", "10000"}]}], ";"}], " "}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"maxtime", "=", "15000"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"initpopsize", "=", "2500"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"maxtrait", "=",
RowBox[{"-", "0.5640230743993504`"}]}], ";"}],
" "}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"totpops", "=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"r", "=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"pmut", " ", "=", " ", "0.02"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"\[Sigma]k", "=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"\[Mu]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"Km", "=", "5669"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"\[Kappa]", "=", "4"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"\[Sigma]\[Alpha]", "=",
RowBox[{"85", "/", "100"}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"\[Beta]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"vm", "=", "0.0005"}], ";"}], "\[IndentingNewLine]",
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"\[Omega]", "[",
RowBox[{"\[Sigma]_", ",", "\[Kappa]_"}], "]"}], ":=",
FractionBox[
RowBox[{
SqrtBox["\[Pi]"], " ", "\[Sigma]"}],
SqrtBox[
RowBox[{
RowBox[{"-", "2"}], "+", "\[Pi]", "+",
FractionBox["2",
RowBox[{"1", "+",
SuperscriptBox["\[Kappa]", "2"]}]]}]]]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"\[Xi]t", "[",
RowBox[{
"\[Kappa]_", " ", ",", "\[Sigma]_", ",", "\[Nu]_", ",", "vm_", ",",
"t_"}], "]"}], ":=",
RowBox[{
FractionBox[
RowBox[{
RowBox[{
SqrtBox[
RowBox[{"1", "+",
SuperscriptBox["\[Kappa]", "2"]}]], " ", "\[Nu]"}], "-",
FractionBox[
RowBox[{
SqrtBox["2"], " ", "\[Kappa]", " ", "\[Sigma]"}],
SqrtBox[
RowBox[{
RowBox[{"-", "2"}], "+", "\[Pi]", "+",
FractionBox["2",
RowBox[{"1", "+",
SuperscriptBox["\[Kappa]", "2"]}]]}]]]}],
SqrtBox[
RowBox[{"1", "+",
SuperscriptBox["\[Kappa]", "2"]}]]], "+",
RowBox[{"vm", "*", "t"}]}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"k", "[",
RowBox[{"u_", ",", "t_"}], "]"}], ":=",
RowBox[{"Km", "*",
RowBox[{"PDF", "[",
RowBox[{
RowBox[{"SkewNormalDistribution", "[",
RowBox[{
RowBox[{"\[Xi]t", "[",
RowBox[{
"\[Kappa]", ",", "\[Sigma]k", ",", "\[Mu]", ",", "vm", ",", "t"}],
"]"}], ",",
RowBox[{"\[Omega]", "[",
RowBox[{"\[Sigma]k", ",", "\[Kappa]"}], "]"}], ",", "\[Kappa]"}],
"]"}], ",", "u"}], "]"}]}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"a", "[",
RowBox[{"u1_", ",", "u2_", ",", "\[Sigma]\[Alpha]_", ",", "\[Beta]_"}],
"]"}], ":=",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{"1", "+",
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{"u1", "-", "u2", "+", "\[Beta]"}], ")"}], "^", "2"}],
")"}], "/",
RowBox[{"(",
RowBox[{"2", "*",
RowBox[{"(",
RowBox[{"\[Sigma]\[Alpha]", "^", "2"}], ")"}]}], ")"}]}],
")"}]}], ")"}], "^",
RowBox[{"(",
RowBox[{"-", "1"}], ")"}]}], ")"}], "*",
RowBox[{"(",
RowBox[{"1", "+",
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{"\[Beta]", "^", "2"}], ")"}], "/",
RowBox[{"(",
RowBox[{"2", "*",
RowBox[{"(",
RowBox[{"\[Sigma]\[Alpha]", "^", "2"}], ")"}]}], ")"}]}], ")"}]}],
")"}]}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"W", "[",
RowBox[{
"u_", ",", "v_", ",", "vcount_", ",", "\[Sigma]\[Alpha]_", ",", "t_",
",", "\[Beta]_"}], "]"}], ":=",
RowBox[{"1", "+",
RowBox[{"r",
RowBox[{"(",
RowBox[{"1", "-",
RowBox[{
RowBox[{"Sum", "[",
RowBox[{
RowBox[{
RowBox[{"a", "[",
RowBox[{"u", ",",
RowBox[{"v", "[",
RowBox[{"[", "i", "]"}], "]"}], ",", "\[Sigma]\[Alpha]", ",",
"\[Beta]"}], "]"}], "*",
RowBox[{"vcount", "[",
RowBox[{"[", "i", "]"}], "]"}]}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "v", "]"}]}], "}"}]}], "]"}], "/",
RowBox[{"k", "[",
RowBox[{"u", ",", "t"}], "]"}]}]}], ")"}]}]}]}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"baby", "=",
RowBox[{"Table", "[",
RowBox[{"null", ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",", "loci"}], "}"}]}], "]"}]}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"generation", "=",
RowBox[{"List", "[", "]"}]}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"flatgentraits", "=", "\[IndentingNewLine]",
RowBox[{"Flatten", "[", "\[IndentingNewLine]",
RowBox[{"Table", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Chop", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"SetPrecision", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Total", "[",
RowBox[{"popn", "[",
RowBox[{"[", "i", "]"}], "]"}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"If", "[",
RowBox[{
RowBox[{
RowBox[{"Abs", "[",
RowBox[{"IntegerPart", "[",
RowBox[{
RowBox[{"Total", "[",
RowBox[{"popn", "[",
RowBox[{"[", "i", "]"}], "]"}], "]"}], "*", "1000"}],
"]"}], "]"}], "<", "10"}], ",", "\[IndentingNewLine]", "1",
",", "\[IndentingNewLine]",
RowBox[{"If", "[",
RowBox[{
RowBox[{
RowBox[{"Abs", "[",
RowBox[{"IntegerPart", "[",
RowBox[{
RowBox[{"Total", "[",
RowBox[{"popn", "[",
RowBox[{"[", "i", "]"}], "]"}], "]"}], "*", "1000"}],
"]"}], "]"}], "<", "100"}], ",", "\[IndentingNewLine]", "2",
",", "\[IndentingNewLine]", "3"}], "]"}]}], "]"}]}], "]"}],
",", "\[IndentingNewLine]", "0.001"}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "popn", "]"}]}], "}"}]}], "]"}], "]"}]}],
";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"pop", "=",
RowBox[{"Transpose", "[",
RowBox[{"Tally", "[", "flatgentraits", "]"}], "]"}]}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"fit", "=",
RowBox[{"W", "[",
RowBox[{"u1", ",",
RowBox[{"pop", "[",
RowBox[{"[", "1", "]"}], "]"}], ",",
RowBox[{"pop", "[",
RowBox[{"[", "2", "]"}], "]"}], ",", "\[Sigma]\[Alpha]", ",", "0", ",",
"\[Beta]"}], "]"}]}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"For", "[",
RowBox[{
RowBox[{"generations", "=", "1"}], ",",
RowBox[{"generations", "\[LessEqual]", "15000"}], ",",
RowBox[{"generations", "++"}], ",", "\[IndentingNewLine]",
RowBox[{"{", "\[IndentingNewLine]",
RowBox[{
RowBox[{"popnlength", "=",
RowBox[{"Length", "[", "popn", "]"}]}], ";", "\[IndentingNewLine]",
"\[IndentingNewLine]",
RowBox[{"For", "[",
RowBox[{
RowBox[{"individual", "=", "1"}], ",",
RowBox[{"individual", "\[LessEqual]", "popnlength"}], ",",
RowBox[{"individual", "++"}], ",", "\[IndentingNewLine]",
RowBox[{"{", "\[IndentingNewLine]",
RowBox[{
RowBox[{"mate", "=",
RowBox[{"RandomChoice", "[", "popn", "]"}]}], ";", " ",
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"For", "[", " ",
RowBox[{
RowBox[{"offspring", "=", "1"}], ",",
RowBox[{"offspring", "\[LessEqual]", "F"}], ",",
RowBox[{"offspring", "++"}], ",", "\[IndentingNewLine]",
RowBox[{"{", "\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{
RowBox[{"For", "[",
RowBox[{
RowBox[{"locus", "=", "1"}], ",",
RowBox[{"locus", "\[LessEqual]", "loci"}], ",",
RowBox[{"locus", "+=", "2"}], ",", "\[IndentingNewLine]",
RowBox[{"{", "\[IndentingNewLine]",
RowBox[{
RowBox[{"alleleFromMom", "=",
RowBox[{"RandomChoice", "[",
RowBox[{"popn", "[",
RowBox[{"[",
RowBox[{"individual", ",",
RowBox[{"locus", ";;",
RowBox[{"locus", "+", "1"}]}]}], "]"}], "]"}], "]"}]}],
";", "\[IndentingNewLine]",
RowBox[{"alleleFromDad", "=",
RowBox[{"RandomChoice", "[",
RowBox[{"mate", "[",
RowBox[{"[",
RowBox[{"locus", ";;",
RowBox[{"locus", "+", "1"}]}], "]"}], "]"}], "]"}]}], ";",
"\[IndentingNewLine]",
RowBox[{
RowBox[{"baby", "[",
RowBox[{"[",
RowBox[{"locus", ";;",
RowBox[{"locus", "+", "1"}]}], "]"}], "]"}], "=",
RowBox[{"{",
RowBox[{"alleleFromMom", ",", "alleleFromDad"}], "}"}]}],
";"}], "\[IndentingNewLine]", "}"}]}], "]"}], ";",
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"rand", "=",
RowBox[{"RandomReal", "[", "]"}]}], ";", "\[IndentingNewLine]",
"\[IndentingNewLine]",
RowBox[{"If", "[",
RowBox[{
RowBox[{
RowBox[{"RandomReal", "[", "]"}], "\[LessEqual]", "pmut"}],
",", "\[IndentingNewLine]",
RowBox[{"{",
RowBox[{
RowBox[{"mutno", "=",
RowBox[{"RandomChoice", "[",
RowBox[{"Table", "[",
RowBox[{"i", ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",", "loci"}], "}"}]}], "]"}],
"]"}]}], ";", "\[IndentingNewLine]",
RowBox[{
RowBox[{"baby", "[",
RowBox[{"[", "mutno", "]"}], "]"}], "=",
RowBox[{"Chop", "[",
RowBox[{
RowBox[{"RandomVariate", "[",
RowBox[{"NormalDistribution", "[",
RowBox[{
RowBox[{"baby", "[",
RowBox[{"[", "mutno", "]"}], "]"}], ",",
"\[Sigma]\[Nu]"}], "]"}], "]"}], ",", "0.00001"}],
"]"}]}]}], "}"}], ",", "\[IndentingNewLine]",
RowBox[{
RowBox[{"{", "}"}], ";"}]}], "]"}], ";",
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"If", "[",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{"fit", "/", "F"}], ")"}], "/.",
RowBox[{"u1", "\[Rule]",
RowBox[{"Total", "[", "baby", "]"}]}]}], ")"}], ">",
"rand"}], ",", " ", "\[IndentingNewLine]",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"AppendTo", "[",
RowBox[{"generation", ",", "baby"}], "]"}], ";"}], "}"}],
";", " ", "\[IndentingNewLine]",
RowBox[{"{", "}"}]}]}], "]"}], ";"}], "\[IndentingNewLine]",
"\[IndentingNewLine]", "}"}]}], "]"}], ";"}],
"\[IndentingNewLine]", "\[IndentingNewLine]", "}"}]}], "]"}], ";",
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"popn", "=", " ", "generation"}], " ", ";",
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"flatgentraits", "=", "\[IndentingNewLine]",
RowBox[{"Flatten", "[", "\[IndentingNewLine]",
RowBox[{"Table", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Chop", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"SetPrecision", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Total", "[",
RowBox[{"popn", "[",
RowBox[{"[", "i", "]"}], "]"}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"If", "[",
RowBox[{
RowBox[{
RowBox[{"Abs", "[",
RowBox[{"IntegerPart", "[",
RowBox[{
RowBox[{"Total", "[",
RowBox[{"popn", "[",
RowBox[{"[", "i", "]"}], "]"}], "]"}], "*", "1000"}],
"]"}], "]"}], "<", "10"}], ",", "\[IndentingNewLine]", "1",
",", "\[IndentingNewLine]",
RowBox[{"If", "[",
RowBox[{
RowBox[{
RowBox[{"Abs", "[",
RowBox[{"IntegerPart", "[",
RowBox[{
RowBox[{"Total", "[",
RowBox[{"popn", "[",
RowBox[{"[", "i", "]"}], "]"}], "]"}], "*", "1000"}],
"]"}], "]"}], "<", "100"}], ",", "\[IndentingNewLine]",
"2", ",", "\[IndentingNewLine]", "3"}], "]"}]}], "]"}]}],
"]"}], ",", "\[IndentingNewLine]", "0.001"}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "popn", "]"}]}], "}"}]}], "]"}], "]"}]}],
";", "\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"pop", "=",
RowBox[{"Transpose", "[",
RowBox[{"Tally", "[", "flatgentraits", "]"}], "]"}]}], ";",
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"generation", "=",
RowBox[{"List", "[", "]"}]}], ";", "\[IndentingNewLine]",
"\[IndentingNewLine]",
RowBox[{"(*",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--", "-"}]}]}]}]}]}]}]}]}], "*)"}],
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"fit", "=",
RowBox[{"W", "[",
RowBox[{"u1", ",",
RowBox[{"pop", "[",
RowBox[{"[", "1", "]"}], "]"}], ",",
RowBox[{"pop", "[",
RowBox[{"[", "2", "]"}], "]"}], ",", "\[Sigma]\[Alpha]", ",",
"generations", ",", "\[Beta]"}], "]"}]}], ";", "\[IndentingNewLine]",
"\[IndentingNewLine]",
RowBox[{"Print", "[",
RowBox[{"StringJoin", "[",
RowBox[{"\"\\"", ",",
RowBox[{"ToString", "[", "generations", "]"}]}], "]"}], "]"}], ";",
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"(*",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--", "-"}]}]}]}]}]}]}]}]}], "*)"}],
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"If", "[",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{"generations", "/", "100"}], ")"}], "\[Element]",
"Integers"}], ",", "\[IndentingNewLine]",
RowBox[{"{",
RowBox[{
RowBox[{"Export", "[",
RowBox[{
RowBox[{"StringJoin", "[",
RowBox[{"\"\\"", ",",
RowBox[{"ToString", "[", "generations", "]"}], ",",
"\"\<.txt\>\""}], "]"}], ",", "popn", ",", "\"\\""}],
"]"}], ";"}], "}"}], ",", "\[IndentingNewLine]",
RowBox[{"{", "}"}]}], "]"}], ";", "\[IndentingNewLine]",
"\[IndentingNewLine]",
RowBox[{"flatgentraits", "=",
RowBox[{"List", "[", "]"}]}], ";"}], "\[IndentingNewLine]",
"\[IndentingNewLine]", "}"}]}], "]"}], ";"}]}], "Input",
CellChangeTimes->{{3.668888988084244*^9, 3.668888988607544*^9}, {
3.669315190536315*^9, 3.669315237603853*^9}, {3.669315506862618*^9,
3.669315507298616*^9}, {3.669315537966569*^9, 3.669315574999789*^9}, {
3.669315619198956*^9, 3.6693156253811607`*^9}, {3.6693157715385447`*^9,
3.669315824036318*^9}, {3.6693158951632557`*^9, 3.669315902209271*^9},
3.669315972533307*^9, {3.669317315497567*^9, 3.6693173160162973`*^9}, {
3.669317353684116*^9, 3.669317359691597*^9}, {3.669317738753483*^9,
3.669317748329026*^9}, {3.669320219083314*^9, 3.6693202234825478`*^9}, {
3.669381155485877*^9, 3.669381288985745*^9}, 3.669381545424363*^9, {
3.669381766422771*^9, 3.669381769699621*^9}, {3.669381836099635*^9,
3.669381837918413*^9}, {3.703191150996253*^9, 3.703191157942951*^9}}]
}, Open ]],
Cell[CellGroupData[{
Cell["SAMPLE TWO-SPECIES SIMULATION (WITH ENVIRONMENTAL CHANGE)", "Section",
CellChangeTimes->{{3.6682833958442917`*^9, 3.668283403716055*^9}, {
3.6693154943480797`*^9, 3.6693155000867767`*^9}, {3.6693327892702427`*^9,
3.6693327897445507`*^9}}],
Cell["\<\
For further information about parts of the simulation or definitions of the \
parameters see \[OpenCurlyDoubleQuote]SAMPLE ONE-SPECIES SIMULATION (BURN IN)\
\[CloseCurlyDoubleQuote] section. \
\>", "Text",
CellChangeTimes->{
3.66938144633681*^9, {3.669384571276998*^9, 3.669384593927814*^9}}],
Cell[BoxData[{
RowBox[{
RowBox[{
"BurnInLocation", " ", "=", " ",
"\"\\""}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"SetDirectory", "[",
RowBox[{"StringJoin", "[",
RowBox[{"BaseDirectory", ",", "BurnInLocation"}], "]"}], "]"}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"community", "=",
RowBox[{"ToExpression", "[",
RowBox[{
"Import", "[", "\"\<2-0.85-4-0.02-0.0015-0-Burn_In.txt\>\"", "]"}],
"]"}]}], ";"}]}], "Input",
CellChangeTimes->{{3.669315975843009*^9, 3.669316033063388*^9}, {
3.669317273311452*^9, 3.669317278050555*^9}, {3.669317500231001*^9,
3.6693175003502817`*^9}, {3.669381691273883*^9, 3.669381693016163*^9}, {
3.703191210295092*^9, 3.703191246896339*^9}}],
Cell[BoxData[{
RowBox[{
RowBox[{"CreateDirectory", "[",
RowBox[{"StringJoin", "[",
RowBox[{
"BaseDirectory", ",", "\"\\""}],
"]"}], "]"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"SetDirectory", "[",
RowBox[{"StringJoin", "[",
RowBox[{
"BaseDirectory", ",", "\"\\""}],
"]"}], "]"}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"loci", "=", "20"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"F", "=", "4"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"\[Sigma]\[Nu]", "=",
RowBox[{"15", "/", "100"}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"maxtime", "=", "15000"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"initpopsize", "=",
RowBox[{"{",
RowBox[{"4378", ",", "622"}], "}"}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"maxtrait", "=",
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.6015968154944004`"}], ",", "0.42350036015936704`"}],
"}"}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"species", "=", "2"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"r", "=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"\[Sigma]k", "=", "1"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"\[Mu]", "=", "0"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"Km", "=", "10756"}], ";"}], " "}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"\[Kappa]", "=", "4"}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"\[Sigma]\[Alpha]", "=",
RowBox[{"85", "/", "100"}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"vm", "=", "0.0005"}], ";"}], "\[IndentingNewLine]",
"\[IndentingNewLine]",
RowBox[{"(*",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--",
RowBox[{"--", "-"}]}]}]}]}]}]}]}]}]}]}],
"*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"\[Omega]", "[",
RowBox[{"\[Sigma]_", ",", "\[Kappa]_"}], "]"}], ":=",
FractionBox[
RowBox[{
SqrtBox["\[Pi]"], " ", "\[Sigma]"}],
SqrtBox[
RowBox[{
RowBox[{"-", "2"}], "+", "\[Pi]", "+",
FractionBox["2",
RowBox[{"1", "+",
SuperscriptBox["\[Kappa]", "2"]}]]}]]]}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"\[Xi]t", "[",
RowBox[{
"\[Kappa]_", " ", ",", "\[Sigma]_", ",", "\[Mu]_", ",", "vm_", ",",
"t_"}], "]"}], ":=",
RowBox[{
FractionBox[
RowBox[{
RowBox[{
SqrtBox[
RowBox[{"1", "+",
SuperscriptBox["\[Kappa]", "2"]}]], " ", "\[Mu]"}], "-",
FractionBox[
RowBox[{
SqrtBox["2"], " ", "\[Kappa]", " ", "\[Sigma]"}],
SqrtBox[
RowBox[{
RowBox[{"-", "2"}], "+", "\[Pi]", "+",
FractionBox["2",
RowBox[{"1", "+",
SuperscriptBox["\[Kappa]", "2"]}]]}]]]}],
SqrtBox[
RowBox[{"1", "+",
SuperscriptBox["\[Kappa]", "2"]}]]], "+",
RowBox[{"vm", "*", "t"}]}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"k", "[",
RowBox[{"u_", ",", "t_"}], "]"}], ":=",
RowBox[{"Km", "*",
RowBox[{"PDF", "[",
RowBox[{
RowBox[{"SkewNormalDistribution", "[",
RowBox[{
RowBox[{"\[Xi]t", "[",
RowBox[{
"\[Kappa]", ",", "\[Sigma]k", ",", "\[Mu]", ",", "vm", ",", "t"}],
"]"}], ",",
RowBox[{"\[Omega]", "[",
RowBox[{"\[Sigma]k", ",", "\[Kappa]"}], "]"}], ",", "\[Kappa]"}],
"]"}], ",", "u"}], "]"}]}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"a", "[",
RowBox[{"u_", ",", "v_", ",", "\[Sigma]\[Alpha]_"}], "]"}], ":=",
RowBox[{
RowBox[{"(",
RowBox[{"1", "+",
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{"u", "-", "v"}], ")"}], "^", "2"}], ")"}], "/",
RowBox[{"(",
RowBox[{"2", "*",
RowBox[{"(",
RowBox[{"\[Sigma]\[Alpha]", "^", "2"}], ")"}]}], ")"}]}], ")"}]}],
")"}], "^",
RowBox[{"(",
RowBox[{"-", "1"}], ")"}]}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"W", "[",
RowBox[{
"u_", ",", "v_", ",", "vcount_", ",", "\[Sigma]\[Alpha]_", ",", "t_"}],
"]"}], ":=",
RowBox[{"1", "+",
RowBox[{"r",
RowBox[{"(",
RowBox[{"1", "-",
RowBox[{
RowBox[{"Sum", "[",
RowBox[{
RowBox[{
RowBox[{"a", "[",
RowBox[{"u", ",",
RowBox[{"v", "[",
RowBox[{"[", "i", "]"}], "]"}], ",", "\[Sigma]\[Alpha]"}],
"]"}], "*",
RowBox[{"vcount", "[",
RowBox[{"[", "i", "]"}], "]"}]}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "v", "]"}]}], "}"}]}], "]"}], "/",
RowBox[{"k", "[",
RowBox[{"u", ",", "t"}], "]"}]}]}], ")"}]}]}]}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"baby", "=",
RowBox[{"Table", "[",
RowBox[{"null", ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",", "loci"}], "}"}]}], "]"}]}], ";"}], " ",
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"generation", "=",
RowBox[{"List", "[", "]"}]}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"flatgentraits", "=", "\[IndentingNewLine]",
RowBox[{"Flatten", "[", "\[IndentingNewLine]",
RowBox[{"Table", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Table", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Chop", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"SetPrecision", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Total", "[",
RowBox[{"community", "[",
RowBox[{"[",
RowBox[{"j", ",", "i"}], "]"}], "]"}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"If", "[",
RowBox[{
RowBox[{
RowBox[{"Abs", "[",
RowBox[{"IntegerPart", "[",
RowBox[{
RowBox[{"Total", "[",
RowBox[{"community", "[",
RowBox[{"[",
RowBox[{"j", ",", "i"}], "]"}], "]"}], "]"}], "*",
"1000"}], "]"}], "]"}], "<", "10"}], ",",
"\[IndentingNewLine]", "1", ",", "\[IndentingNewLine]",
RowBox[{"If", "[",
RowBox[{
RowBox[{
RowBox[{"Abs", "[",
RowBox[{"IntegerPart", "[",
RowBox[{
RowBox[{"Total", "[",
RowBox[{"community", "[",
RowBox[{"[",
RowBox[{"j", ",", "i"}], "]"}], "]"}], "]"}], "*",
"1000"}], "]"}], "]"}], "<", "100"}], ",",
"\[IndentingNewLine]", "2", ",", "\[IndentingNewLine]",
"3"}], "]"}]}], "]"}]}], "]"}], ",", "0.001"}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[",
RowBox[{"community", "[",
RowBox[{"[", "j", "]"}], "]"}], "]"}]}], "}"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"j", ",", "1", ",", "species"}], "}"}]}], "]"}], "]"}]}],
";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"alltraits", "=",
RowBox[{"Transpose", "[",
RowBox[{"Tally", "[", "flatgentraits", "]"}], "]"}]}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"fit", "=",
RowBox[{"W", "[",
RowBox[{"u1", ",",
RowBox[{"alltraits", "[",
RowBox[{"[", "1", "]"}], "]"}], ",",
RowBox[{"alltraits", "[",
RowBox[{"[", "2", "]"}], "]"}], ",", "\[Sigma]\[Alpha]", ",", "0"}],
"]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"For", "[",
RowBox[{
RowBox[{"generations", "=", "1"}], ",",
RowBox[{"generations", "\[LessEqual]", "15000"}], ",",
RowBox[{"generations", "++"}], ",", "\[IndentingNewLine]",
RowBox[{"{", "\[IndentingNewLine]",
RowBox[{
RowBox[{"For", "[",
RowBox[{
RowBox[{"populations", "=", "1"}], ",",
RowBox[{"populations", "<=", "species"}], ",",
RowBox[{"populations", "++"}], ",", "\[IndentingNewLine]",
RowBox[{"{", "\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{
RowBox[{"popn", "=",
RowBox[{"community", "[",
RowBox[{"[", "populations", "]"}], "]"}]}], ";",
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"popnlength", "=",
RowBox[{"Length", "[", "popn", "]"}]}], ";", "\[IndentingNewLine]",
"\[IndentingNewLine]",
RowBox[{"For", "[",
RowBox[{
RowBox[{"individual", "=", "1"}], ",",
RowBox[{"individual", "\[LessEqual]", "popnlength"}], ",",
RowBox[{"individual", "++"}], ",", "\[IndentingNewLine]",
RowBox[{"{", "\[IndentingNewLine]",
RowBox[{
RowBox[{"mate", "=",
RowBox[{"RandomChoice", "[", "popn", "]"}]}], ";",
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"For", "[", " ",
RowBox[{
RowBox[{"offspring", "=", "1"}], ",",
RowBox[{"offspring", "\[LessEqual]", "F"}], ",",
RowBox[{"offspring", "++"}], ",", "\[IndentingNewLine]",
RowBox[{"{", "\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{
RowBox[{"For", "[",
RowBox[{
RowBox[{"locus", "=", "1"}], ",",
RowBox[{"locus", "\[LessEqual]", "loci"}], ",",
RowBox[{"locus", "+=", "2"}], ",", "\[IndentingNewLine]",
RowBox[{"{", "\[IndentingNewLine]",
RowBox[{
RowBox[{"alleleFromMom", "=",
RowBox[{"RandomChoice", "[",
RowBox[{"popn", "[",
RowBox[{"[",
RowBox[{"individual", ",",
RowBox[{"locus", ";;",
RowBox[{"locus", "+", "1"}]}]}], "]"}], "]"}], "]"}]}],
";", "\[IndentingNewLine]",
RowBox[{"alleleFromDad", "=",
RowBox[{"RandomChoice", "[",
RowBox[{"mate", "[",
RowBox[{"[",
RowBox[{"locus", ";;",
RowBox[{"locus", "+", "1"}]}], "]"}], "]"}], "]"}]}], ";",
"\[IndentingNewLine]",
RowBox[{
RowBox[{"baby", "[",
RowBox[{"[",
RowBox[{"locus", ";;",
RowBox[{"locus", "+", "1"}]}], "]"}], "]"}], "=",
RowBox[{"{",
RowBox[{"alleleFromMom", ",", "alleleFromDad"}], "}"}]}],
";"}], "\[IndentingNewLine]", "}"}]}], "]"}], ";",
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"rand", "=",
RowBox[{"RandomReal", "[", "]"}]}], ";",
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"If", "[",
RowBox[{
RowBox[{
RowBox[{"RandomReal", "[", "]"}], "\[LessEqual]",
"0.02"}], ",", "\[IndentingNewLine]",
RowBox[{"{",
RowBox[{
RowBox[{"mutno", "=",
RowBox[{"RandomChoice", "[",
RowBox[{"Table", "[",
RowBox[{"i", ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",", "loci"}], "}"}]}], "]"}],
"]"}]}], ";", "\[IndentingNewLine]",
RowBox[{
RowBox[{"baby", "[",
RowBox[{"[", "mutno", "]"}], "]"}], "=",
RowBox[{"Chop", "[",
RowBox[{
RowBox[{"RandomVariate", "[",
RowBox[{"NormalDistribution", "[",
RowBox[{
RowBox[{"baby", "[",
RowBox[{"[", "mutno", "]"}], "]"}], ",",
"\[Sigma]\[Nu]"}], "]"}], "]"}], ",", "0.00001"}],
"]"}]}]}], "}"}], ",", "\[IndentingNewLine]",
RowBox[{
RowBox[{"{", "}"}], ";"}]}], "]"}], ";",
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"If", "[",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{"fit", "/", "F"}], ")"}], "/.",
RowBox[{"u1", "\[Rule]",
RowBox[{"Total", "[", "baby", "]"}]}]}], ")"}], ">",
"rand"}], ",", "\[IndentingNewLine]",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"AppendTo", "[",
RowBox[{"generation", ",", "baby"}], "]"}], ";"}], "}"}],
";", "\[IndentingNewLine]",
RowBox[{"{", "}"}]}]}], "]"}], ";"}],
"\[IndentingNewLine]", "\[IndentingNewLine]", "}"}]}], "]"}],
";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "}"}]}],
"]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{
RowBox[{"community", "[",
RowBox[{"[", "populations", "]"}], "]"}], "=", " ",
"generation"}], " ", ";", "\[IndentingNewLine]",
"\[IndentingNewLine]",
RowBox[{"generation", "=",
RowBox[{"List", "[", "]"}]}], ";"}], "\[IndentingNewLine]",
"\[IndentingNewLine]", "}"}]}], "]"}], ";", "\[IndentingNewLine]",
"\[IndentingNewLine]",
RowBox[{"flatgentraits", "=", "\[IndentingNewLine]",
RowBox[{"Flatten", "[", "\[IndentingNewLine]",
RowBox[{"Table", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Table", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Chop", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"SetPrecision", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Total", "[",
RowBox[{"community", "[",
RowBox[{"[",
RowBox[{"j", ",", "i"}], "]"}], "]"}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"If", "[",
RowBox[{
RowBox[{
RowBox[{"Abs", "[",
RowBox[{"IntegerPart", "[",
RowBox[{
RowBox[{"Total", "[",
RowBox[{"community", "[",
RowBox[{"[",
RowBox[{"j", ",", "i"}], "]"}], "]"}], "]"}], "*",
"1000"}], "]"}], "]"}], "<", "10"}], ",",
"\[IndentingNewLine]", "1", ",", "\[IndentingNewLine]",
RowBox[{"If", "[",
RowBox[{
RowBox[{
RowBox[{"Abs", "[",
RowBox[{"IntegerPart", "[",
RowBox[{
RowBox[{"Total", "[",
RowBox[{"community", "[",
RowBox[{"[",
RowBox[{"j", ",", "i"}], "]"}], "]"}], "]"}], "*",
"1000"}], "]"}], "]"}], "<", "100"}], ",",
"\[IndentingNewLine]", "2", ",", "\[IndentingNewLine]",
"3"}], "]"}]}], "]"}]}], "]"}], ",", "0.001"}], "]"}],
",", "\[IndentingNewLine]",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[",
RowBox[{"community", "[",
RowBox[{"[", "j", "]"}], "]"}], "]"}]}], "}"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"j", ",", "1", ",", "species"}], "}"}]}], "]"}], "]"}]}],
";", "\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"alltraits", "=",
RowBox[{"Transpose", "[",
RowBox[{"Tally", "[", "flatgentraits", "]"}], "]"}]}], ";",
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"Print", "[",
RowBox[{"StringJoin", "[",
RowBox[{"\"\\"", ",",
RowBox[{"ToString", "[", "generations", "]"}]}], "]"}], "]"}], ";",
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"fit", "=",
RowBox[{"W", "[",
RowBox[{"u1", ",",
RowBox[{"alltraits", "[",
RowBox[{"[", "1", "]"}], "]"}], ",",
RowBox[{"alltraits", "[",
RowBox[{"[", "2", "]"}], "]"}], ",", "\[Sigma]\[Alpha]", ",",
"generations"}], "]"}]}], ";", "\[IndentingNewLine]",
"\[IndentingNewLine]",
RowBox[{"If", "[",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{"generations", "/", "100"}], ")"}], "\[Element]",
"Integers"}], ",", "\[IndentingNewLine]",
RowBox[{"{",
RowBox[{"Export", "[",
RowBox[{
RowBox[{"StringJoin", "[",
RowBox[{"\"\\"", ",",
RowBox[{"ToString", "[", "generations", "]"}], ",",
"\"\<.txt\>\""}], "]"}], ",", "community", ",",
"\"\\""}], "]"}], "}"}], ",", "\[IndentingNewLine]",
RowBox[{"{", "}"}]}], "]"}], ";", "\[IndentingNewLine]",
"\[IndentingNewLine]",
RowBox[{"flatgentraits", "=",
RowBox[{"List", "[", "]"}]}], ";"}], "\[IndentingNewLine]",
"\[IndentingNewLine]", "}"}]}], "]"}], ";"}]}], "Input",
CellChangeTimes->{{3.6693157018762302`*^9, 3.669315757875724*^9}, {
3.669317518194785*^9, 3.6693176304413*^9}, {3.6693177612780046`*^9,
3.6693177671622877`*^9}, {3.669319904710745*^9, 3.6693200539596043`*^9},
3.669320224617299*^9, 3.6693270572026443`*^9, {3.669381455407057*^9,
3.669381525834345*^9}, {3.669381567814311*^9, 3.6693815685009127`*^9}, {
3.66938171347451*^9, 3.669381758741233*^9}, {3.669381850351012*^9,
3.6693818988411837`*^9}}]
}, Open ]],
Cell[CellGroupData[{
Cell["SAMPLE DATA COMPILING AND PLOT CREATION (ONE-SPECIES)", "Section",
CellChangeTimes->{{3.6682833958442917`*^9, 3.668283403716055*^9}, {
3.669333929080217*^9, 3.669333938560677*^9}, {3.669334231818487*^9,
3.669334252091309*^9}}],
Cell[CellGroupData[{
Cell["Data Compiling (Genomes -> Traits)", "Subsection",
CellChangeTimes->{{3.669334470092435*^9, 3.669334500091028*^9}, {
3.669337930210537*^9, 3.669337936812113*^9}}],
Cell["\<\
To run this analysis, the raw output from the simulations is needed. This \
part of the data analysis takes the raw simulation data, which keeps tract of \
each allele in each individual in each species, and summarizes by calculating \
the trait from each individual\[CloseCurlyQuote]s genome. The output is a \
file that has the trait values for each individual in each generation for all \
replicates.
If there is a particular set of simulations that you wish to re-analyze, the \
full data sets have been deposited on Dryad.
WARNING: You may have to adjust the file import mechanism here as some data \
sets have different file names.\
\>", "Text",
CellChangeTimes->{{3.669332905601553*^9, 3.6693329385364113`*^9}, {
3.669333199493228*^9, 3.6693331996972027`*^9}, {3.669333541408976*^9,
3.6693336710667048`*^9}, {3.669333906421401*^9, 3.669333925345778*^9}, {
3.669334507096463*^9, 3.669334689758906*^9}, {3.703192032404847*^9,
3.7031920703281927`*^9}, {3.703192127667088*^9, 3.703192142656651*^9}, {
3.703192234234558*^9, 3.7031922764998093`*^9}}],
Cell[BoxData[{
RowBox[{
RowBox[{
RowBox[{"ImportAll", "=",
RowBox[{"List", "[", "]"}]}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{
"RawFileLocation", " ", "=", " ",
"\"\\""}], ";"}],
"\[IndentingNewLine]"}], "\n",
RowBox[{
RowBox[{
RowBox[{"For", "[",
RowBox[{
RowBox[{"b", "=", "1"}], ",",
RowBox[{"b", "\[LessEqual]", "5"}], ",",
RowBox[{"b", "++"}], ",", " ",
RowBox[{"(*", " ",
RowBox[{"for", " ", "replicates", " ", "1", " ", "to", " ", "5"}], " ",
"*)"}], "\[IndentingNewLine]",
RowBox[{"{", "\[IndentingNewLine]",
RowBox[{
RowBox[{"SetDirectory", "[",
RowBox[{"StringJoin", "[",
RowBox[{
"BaseDirectory", ",", "RawFileLocation", ",", "\"\<(\>\"", ",",
RowBox[{"ToString", "[", "b", "]"}], ",", "\"\<)\>\""}], "]"}],
"]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"import", "=",
RowBox[{"List", "[", "]"}]}], ";", "\[IndentingNewLine]",
"\[IndentingNewLine]",
RowBox[{"For", "[",
RowBox[{
RowBox[{"i", "=", "100"}], ",",
RowBox[{"i", "\[LessEqual]", "5000"}], ",",
RowBox[{"i", "=",
RowBox[{"i", "+", "100"}]}], ",", " ",
RowBox[{"(*", " ",
RowBox[{
"import", " ", "all", " ", "burn", " ", "in", " ", "files", " ",
RowBox[{"(",
RowBox[{
RowBox[{"50", " ", "total"}], " ", "-", " ",
RowBox[{
"one", " ", "every", " ", "100", " ", "generations", " ", "for",
" ", "5000", " ", "total", " ", "generations"}]}], ")"}]}], " ",
"*)"}], "\[IndentingNewLine]",
RowBox[{"{",
RowBox[{
RowBox[{"envchange", "=",
RowBox[{"ToExpression", "[",
RowBox[{"Import", "[",
RowBox[{"StringJoin", "[",
RowBox[{"\"\\"", ",",
RowBox[{"ToString", "[", "i", "]"}], ",", "\"\<.txt\>\""}],
"]"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]",
RowBox[{"AppendTo", "[",
RowBox[{"import", ",", "envchange"}], "]"}], ";"}], "}"}]}],
"]"}], ";", " ",
RowBox[{"(*", " ",
RowBox[{
RowBox[{
RowBox[{
"add", " ", "each", " ", "burn", " ", "in", " ", "file", " ", "to",
" ", "the", " ", "list", " ", "\"\\""}], " ", "-", " ",
RowBox[{
"at", " ", "the", " ", "end", " ", "of", " ", "the", " ",
"loop"}]}], ",", " ",
RowBox[{
"\"\\"", " ", "holds", " ", "the", " ", "data", " ", "from",
" ", "all", " ", "50", " ", "files"}]}], " ", "*)"}],
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"SetDirectory", "[",
RowBox[{"StringJoin", "[",
RowBox[{
"BaseDirectory", ",", "RawFileLocation", ",", "\"\<(\>\"", ",",
RowBox[{"ToString", "[", "b", "]"}], ",", "\"\<)\>\""}], "]"}],
"]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"For", "[",
RowBox[{
RowBox[{"i", "=", "100"}], ",",
RowBox[{"i", "\[LessEqual]", "15000"}], ",",
RowBox[{"i", "=",
RowBox[{"i", "+", "100"}]}], ",", " ",
RowBox[{"(*", " ",
RowBox[{
"import", " ", "all", " ", "environmental", " ", "change", " ",
"files", " ",
RowBox[{"(",
RowBox[{
RowBox[{"150", " ", "total"}], " ", "-", " ",
RowBox[{
"one", " ", "every", " ", "100", " ", "generations", " ", "for",
" ", "15000", " ", "total", " ", "generations"}]}], " "}]}],
"*)"}], "\[IndentingNewLine]",
RowBox[{"{",
RowBox[{
RowBox[{"envchange", "=",
RowBox[{"ToExpression", "[",
RowBox[{"Import", "[",
RowBox[{"StringJoin", "[",
RowBox[{"\"\\"", ",",
RowBox[{"ToString", "[", "i", "]"}], ",", "\"\<.txt\>\""}],
"]"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]",
RowBox[{"AppendTo", "[",
RowBox[{"import", ",", "envchange"}], "]"}]}], "}"}]}], "]"}],
";", " ",
RowBox[{"(*", " ",
RowBox[{
RowBox[{
RowBox[{
"add", " ", "each", " ", "environmental", " ", "change", " ",
"file", " ", "to", " ", "the", " ", "list", " ",
"\"\\""}], " ", "-", " ",
RowBox[{
"at", " ", "the", " ", "end", " ", "of", " ", "the", " ",
"loop"}]}], ",", " ",
RowBox[{
"\"\\"", " ", "holds", " ", "all", " ", "of", " ", "the",
" ", "burn", " ", "in", " ", "data", " ", "as", " ", "well", " ",
"as", " ", "all", " ", "of", " ", "the", " ", "environmental", " ",
"change", " ", "data", " ",
RowBox[{"(",
RowBox[{"200", " ", "files", " ", "total"}], ")"}]}]}], " ",
"*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"FlatTraits", "=", " ",
RowBox[{"(*", " ",
RowBox[{
"FlatTraits", " ", "takes", " ", "the", " ", "individual", " ",
"genomes", " ", "in", " ", "the", " ", "list", " ",
"\"\\"", " ", "and", " ", "calculates", " ", "the", " ",
"trait", " ",
RowBox[{"values", ".", " ", "FlatTraits"}], " ", "holds", " ",
"the", " ", "trait", " ", "value", " ", "data", " ", "for", " ",
"all", " ", "burn", " ", "in", " ", "and", " ", "environmental",
" ", "change", " ", "files", " ",
RowBox[{"(",
RowBox[{"200", " ", "total"}], ")"}]}], " ", "*)"}],
"\[IndentingNewLine]",
RowBox[{"Table", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Table", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"N", "[",
RowBox[{
RowBox[{"Round", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"Total", "[",
RowBox[{"import", "[",
RowBox[{"[",
RowBox[{"i", ",", "j"}], "]"}], "]"}], "]"}], "*",
"1000"}], "\[IndentingNewLine]", ",", "3"}], "]"}], "/",
"1000"}], "]"}], "\[IndentingNewLine]", ",",
RowBox[{"{",
RowBox[{"j", ",", "1", ",",
RowBox[{"Length", "[",
RowBox[{"import", "[",
RowBox[{"[", "i", "]"}], "]"}], "]"}]}], "}"}]}], "]"}], ",",
"\[IndentingNewLine]",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[", "import", "]"}]}], "}"}]}], "]"}]}], ";",
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"AppendTo", "[",
RowBox[{"ImportAll", ",", "FlatTraits"}], "]"}], ";", " ",
RowBox[{"(*", " ",
RowBox[{
RowBox[{
"ImportAll", " ", "will", " ", "hold", " ", "FlatTraits", " ", "for",
" ", "each", " ", "of", " ", "the", " ", "5", " ", "replicates",
" ", "after", " ", "the", " ", "outer", " ", "loop", " ", "has",
" ",
RowBox[{"finished", ".", " ", "After"}], " ", "each", " ",
"replicate", " ", "loop"}], ",", " ",
RowBox[{
"FlatTraits", " ", "is", " ", "appended", " ", "ontop", " ",
RowBox[{"ImportAll", ".", " ", "At"}], " ", "the", " ", "end"}],
",", " ",
RowBox[{
"this", " ", "list", " ", "holds", " ", "the", " ", "trait", " ",
"data", " ", "from", " ", "the", " ", "200", " ", "files", " ",
"for", " ", "each", " ", "of", " ", "the", " ", "5", " ",
"replicates"}]}], " ", "*)"}], "\[IndentingNewLine]",
"\[IndentingNewLine]",
RowBox[{"import", "=",
RowBox[{"List", "[", "]"}]}], ";", " ",
RowBox[{"(*", " ",
RowBox[{
"the", " ", "list", " ", "\"\\"", " ", "resets", " ",
"every", " ", "replicate", " ", "loop"}], " ", "*)"}],
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"Print", "[",
RowBox[{"StringJoin", "[",
RowBox[{"\"\\"", ",",
RowBox[{"ToString", "[", "b", "]"}], ",", "\"\< Finished\>\""}],
"]"}], "]"}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{
RowBox[{
"this", " ", "prints", " ", "a", " ", "statement", " ", "for", " ",
"every", " ", "replicate", " ", "loop", " ", "that", " ",
"finishes"}], ",", " ",
RowBox[{
"to", " ", "keep", " ", "track", " ", "of", " ", "the", " ",
"progress"}]}], " ", "*)"}], "\[IndentingNewLine]",
"\[IndentingNewLine]", "}"}]}], "]"}], ";"}],
"\[IndentingNewLine]"}], "\n",
RowBox[{
RowBox[{"SetDirectory", "[",
RowBox[{"StringJoin", "[",
RowBox[{"BaseDirectory", ",", "\"\\""}], "]"}],
"]"}], "\n"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"Export", "[",
RowBox[{
"\"\\"", ",", "ImportAll", ",",
"\"\\""}], "]"}], " ",
RowBox[{"(*", " ",
RowBox[{"exports", " ", "the", " ", "trait", " ", "data", " ",
RowBox[{"(",
RowBox[{"compiled", " ", "data"}], ")"}], " ", "to", " ",
RowBox[{"file", ".", " ", "This"}], " ", "files", " ", "holds", " ",
"the", " ", "200", " ", "files", " ", "for", " ", "each", " ", "of", " ",
"the", " ", "5", " ", "replicates"}], " ", "*)"}]}]}], "Input",
CellChangeTimes->{{3.619528177553927*^9, 3.6195281908591022`*^9}, {
3.669333760002945*^9, 3.669333769265181*^9}, {3.669334153711043*^9,
3.669334155812299*^9}, {3.669334276729076*^9, 3.669334378919011*^9}, {
3.669336302043023*^9, 3.669336364443502*^9}, {3.669382008189694*^9,
3.669382085358344*^9}, {3.669382217644072*^9, 3.669382218974648*^9}, {
3.669383045098343*^9, 3.669383234198761*^9}, {3.6693833065868683`*^9,
3.6693836480747957`*^9}, {3.703192161212358*^9, 3.703192229867899*^9}, {
3.703192286768338*^9, 3.7031923669092607`*^9}}]
}, Open ]],
Cell[CellGroupData[{
Cell["Creating the Plot", "Subsection",
CellChangeTimes->{{3.669334707026833*^9, 3.669334710478998*^9}, {
3.669336271190941*^9, 3.66933627585236*^9}}],
Cell["\<\
The plot produced by this code takes in the data file we created above and \
outputs a trait-by-generation plot of the mean traits for all 5 replicates in \
each generation and their standard errors. The grey dashed line in the plots \
is the location of the peak of the resource curve. \
\>", "Text",
CellChangeTimes->{{3.6693349791064157`*^9, 3.6693350904430857`*^9}, {
3.669335309063498*^9, 3.669335314295865*^9}, 3.66933790738498*^9}],
Cell[BoxData[{
RowBox[{
RowBox[{
RowBox[{"Needs", "[", "\"\\"", "]"}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{
"needed", " ", "to", " ", "use", " ", "some", " ", "plotting", " ",
"commands"}], " ", "*)"}], "\[IndentingNewLine]"}], "\n",
RowBox[{
RowBox[{"f", "[",
RowBox[{"vm_", ",", "t_"}], "]"}], ":=",
RowBox[{"Piecewise", "[",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",",
RowBox[{"0", "<", "t", "\[LessEqual]", "5000"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"vm", "*",
RowBox[{"(",
RowBox[{"t", "-", "5000"}], ")"}]}], ",",
RowBox[{"t", ">", "5000"}]}], "}"}]}], "}"}], "]"}], " ",
RowBox[{"(*", " ",
RowBox[{
"this", " ", "function", " ", "is", " ", "used", " ", "to", " ", "show",
" ", "the", " ", "peak", " ", "of", " ", "the", " ", "resource", " ",
"function", " ", "in", " ", "the", " ", "plots"}], " ",
"*)"}]}]}], "Input",
CellChangeTimes->{
3.6693350552565603`*^9, {3.669383662696323*^9, 3.6693836940886583`*^9}}],
Cell[BoxData[{
RowBox[{
RowBox[{"SetDirectory", "[",
RowBox[{"StringJoin", "[",
RowBox[{"BaseDirectory", ",", "\"\\""}], "]"}],
"]"}], "\n"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"fast1850psss", "=",
RowBox[{"ToExpression", "[",
RowBox[{"Import", "[", "\"\\"", "]"}],
"]"}]}], ";"}], " ",
RowBox[{"(*", " ",
RowBox[{
"import", " ", "the", " ", "compiled", " ", "data", " ", "file", " ",
RowBox[{"(",
RowBox[{"created", " ", "above"}], ")"}]}], " ", "*)"}],
"\n"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"MTf1850psss", "=", " ",
RowBox[{"(*", " ",
RowBox[{
"calculates", " ", "the", " ", "mean", " ", "trait", " ", "value", " ",
"for", " ", "each", " ", "generation", " ", "in", " ", "each", " ",
"replicate"}], " ", "*)"}], "\[IndentingNewLine]",
RowBox[{"Table", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"i", "*", "100"}], ",", "\[IndentingNewLine]",
RowBox[{"N", "[",
RowBox[{"Mean", "[",
RowBox[{"fast1850psss", "[",
RowBox[{"[",
RowBox[{"c", ",", "i"}], "]"}], "]"}], "]"}], "]"}]}], "}"}],
",", "\[IndentingNewLine]",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[",
RowBox[{"fast1850psss", "[",
RowBox[{"[", "c", "]"}], "]"}], "]"}]}], "}"}]}], "]"}],
"\[IndentingNewLine]", ",",
RowBox[{"{",
RowBox[{"c", ",", "1", ",", "5"}], "}"}]}], "]"}]}], ";"}], " ",
"\[IndentingNewLine]"}], "\n",
RowBox[{
RowBox[{
RowBox[{"PSf1850psss", "=", " ",
RowBox[{"(*", " ",
RowBox[{
"calculates", " ", "the", " ", "population", " ", "size", " ", "for",
" ", "each", " ", "generation", " ", "in", " ", "each", " ",
"replicate"}], " ", "*)"}], "\[IndentingNewLine]",
RowBox[{"Table", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"i", "*", "100"}], ",", "\[IndentingNewLine]",
RowBox[{"Length", "[",
RowBox[{"fast1850psss", "[",
RowBox[{"[",
RowBox[{"c", ",", "i"}], "]"}], "]"}], "]"}]}], "}"}], ",",
"\[IndentingNewLine]",
RowBox[{"{",
RowBox[{"i", ",", "1", ",",
RowBox[{"Length", "[",
RowBox[{"fast1850psss", "[",
RowBox[{"[", "c", "]"}], "]"}], "]"}]}], "}"}]}], "]"}],
"\[IndentingNewLine]", ",",
RowBox[{"{",
RowBox[{"c", ",", "1", ",", "5"}], "}"}]}], "]"}]}], ";"}],
"\[IndentingNewLine]"}], "\n",
RowBox[{
RowBox[{
RowBox[{"MTfwE1850psss", "=", " ",
RowBox[{"(*", " ",
RowBox[{
RowBox[{
"calculates", " ", "the", " ", "mean", " ", "trait", " ", "value", " ",
"for", " ", "each", " ", "generation", " ", "across", " ", "all", " ",
"5", " ", "replicates", " ",
RowBox[{"(",
RowBox[{
"average", " ", "of", " ", "the", " ", "means", " ", "calculated",
" ", "in", " ", "MTf1850psss"}], ")"}]}], ",", " ",
RowBox[{
"as", " ", "well", " ", "as", " ", "the", " ", "standard", " ", "error",
" ", "of", " ", "that", " ", "mean"}]}], " ", "*)"}],
"\[IndentingNewLine]",
RowBox[{"Table", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"j", "*", "100"}], ",",
RowBox[{"Mean", "[",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Table", "[",
RowBox[{
RowBox[{"MTf1850psss", "[",
RowBox[{"[",
RowBox[{"i", ",", "j", ",", "2"}], "]"}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",", "5"}], "}"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"Abs", "[", "#", "]"}], ">", "0"}], "&"}]}], "]"}],
"]"}]}], "}"}], ",", "\[IndentingNewLine]",
RowBox[{"ErrorBar", "[",
RowBox[{
RowBox[{"StandardDeviation", "[",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Table", "[",
RowBox[{
RowBox[{"MTf1850psss", "[",
RowBox[{"[",
RowBox[{"i", ",", "j", ",", "2"}], "]"}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",", "5"}], "}"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"Abs", "[", "#", "]"}], ">", "0"}], "&"}]}], "]"}],
"]"}], "/",
RowBox[{"Sqrt", "[",
RowBox[{"Length", "[",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Table", "[",
RowBox[{
RowBox[{"MTf1850psss", "[",
RowBox[{"[",
RowBox[{"i", ",", "j", ",", "2"}], "]"}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",", "5"}], "}"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"Abs", "[", "#", "]"}], ">", "0"}], "&"}]}], "]"}],
"]"}], "]"}]}], "]"}]}], "}"}], ",", "\[IndentingNewLine]",
RowBox[{"{",
RowBox[{"j", ",", "1", ",",
RowBox[{"Length", "[",
RowBox[{"MTf1850psss", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}]}], "}"}]}], "]"}]}], ";"}],
"\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"PSfwE1850psss", "=", " ",
RowBox[{"(*", " ",
RowBox[{
RowBox[{
"calculates", " ", "the", " ", "mean", " ", "population", " ", "size",
" ", "across", " ", "all", " ", "5", " ", "replicates"}], ",", " ",
RowBox[{
"as", " ", "well", " ", "as", " ", "the", " ", "standard", " ", "error",
" ", "in", " ", "the", " ", "mean", " ", "population", " ",
RowBox[{"size", "."}]}]}], " ", "*)"}], "\[IndentingNewLine]",
RowBox[{"Table", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"j", "*", "100"}], ",",
RowBox[{"Mean", "[",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Table", "[",
RowBox[{
RowBox[{"PSf1850psss", "[",
RowBox[{"[",
RowBox[{"i", ",", "j", ",", "2"}], "]"}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",", "5"}], "}"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"Abs", "[", "#", "]"}], ">", "0"}], "&"}]}], "]"}],
"]"}]}], "}"}], ",", "\[IndentingNewLine]",
RowBox[{"ErrorBar", "[",
RowBox[{
RowBox[{"StandardDeviation", "[",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"PSf1850psss", "[",
RowBox[{"[",
RowBox[{"i", ",", "j", ",", "2"}], "]"}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",", "5"}], "}"}]}], "]"}], "]"}], "/",
RowBox[{"Sqrt", "[",
RowBox[{"Length", "[",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Table", "[",
RowBox[{
RowBox[{"MTf1850psss", "[",
RowBox[{"[",
RowBox[{"i", ",", "j", ",", "2"}], "]"}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "1", ",", "5"}], "}"}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"Abs", "[", "#", "]"}], ">", "0"}], "&"}]}], "]"}],
"]"}], "]"}]}], "]"}]}], "}"}], ",", "\[IndentingNewLine]",
RowBox[{"{",
RowBox[{"j", ",", "1", ",",
RowBox[{"Length", "[",
RowBox[{"PSf1850psss", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}]}], "}"}]}], "]"}]}], ";"}],
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"(*", " ",
RowBox[{
"MTfwE1850psssPlot", " ", "is", " ", "a", " ", "plot", " ", "of", " ",
"the", " ", "mean", " ", "trait", " ", "values", " ", "and", " ", "their",
" ", "standard", " ", "errors", " ", "for", " ", "each", " ",
"generation", " ", "across", " ", "all", " ",
RowBox[{"replicates", "."}]}], " ", "*)"}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{"MTfwE1850psssPlot", "=",
RowBox[{"Show", "[",
RowBox[{
RowBox[{"ErrorListPlot", "[",
RowBox[{"MTfwE1850psss", ",",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "20000"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.05"}], ",", "0.4"}], "}"}]}], "}"}]}], ",",
RowBox[{"PlotStyle", "\[Rule]", "Black"}]}], "]"}], ",",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"f", "[",
RowBox[{"0.0005", ",", "t"}], "]"}], ",",
RowBox[{"{",
RowBox[{"t", ",", "0", ",", "20000"}], "}"}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{"Dashed", ",", "Gray"}], "}"}]}]}], "]"}], ",",
RowBox[{"AxesLabel", "\[Rule]",
RowBox[{"{",
RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}],
",",
RowBox[{"AxesOrigin", "\[Rule]",
RowBox[{"{",
RowBox[{"0", ",", "0"}], "}"}]}]}], "]"}]}], "\n",
"\[IndentingNewLine]",
RowBox[{"(*", " ",
RowBox[{
"PSfwE1850psssPlot", " ", "is", " ", "a", " ", "plot", " ", "of", " ",
"the", " ", "mean", " ", "population", " ", "sizes", " ", "and", " ",
"their", " ", "standard", " ", "errors", " ", "for", " ", "each", " ",
"generation", " ", "across", " ", "all", " ", "replicates"}], " ",
"*)"}]}], "\[IndentingNewLine]",
RowBox[{"PSfwE1850psssPlot", "=",
RowBox[{"ErrorListPlot", "[",
RowBox[{"PSfwE1850psss", ",",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "20000"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "2600"}], "}"}]}], "}"}]}], ",",
RowBox[{"PlotStyle", "\[Rule]", "Black"}], ",",
RowBox[{"AxesLabel", "\[Rule]",
RowBox[{"{",
RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}],
",",
RowBox[{"AxesOrigin", "\[Rule]",
RowBox[{"{",
RowBox[{"0", ",", "0"}], "}"}]}]}], "]"}]}]}], "Input",
CellChangeTimes->{{3.638820246197877*^9, 3.638820271325193*^9}, {
3.63882030445426*^9, 3.638820313139844*^9}, 3.6388219089541492`*^9,
3.6390610721242723`*^9, {3.6390611470618877`*^9, 3.639061200560751*^9}, {
3.6390612321134*^9, 3.639061256447206*^9}, {3.639061395809617*^9,
3.639061420822051*^9}, {3.6406270690275517`*^9, 3.640627100787932*^9}, {
3.640627169193825*^9, 3.6406271944257507`*^9}, {3.640627281426819*^9,
3.640627294304286*^9}, {3.640627343441321*^9, 3.6406273573531237`*^9}, {
3.6406274981686993`*^9, 3.640627540148568*^9}, {3.663628517228094*^9,
3.663628518151758*^9}, {3.663630733556872*^9, 3.663630754852029*^9},
3.663630856283393*^9, {3.663630931819044*^9, 3.663630941160594*^9},
3.66363107878126*^9, {3.6693351233756733`*^9, 3.6693351600817423`*^9}, {
3.669335301183338*^9, 3.669335326404928*^9}, {3.669335793766945*^9,
3.669335794319648*^9}, {3.669336375982213*^9, 3.6693363882321873`*^9}, {
3.669383699632287*^9, 3.669383707642754*^9}, {3.66938412158534*^9,
3.669384404243063*^9}, {3.669384509092355*^9, 3.669384550106167*^9}, {
3.7031923409589243`*^9, 3.703192373384392*^9}}]
}, Open ]]
}, Open ]]
},
Evaluator->"Local2",
WindowSize->{1250, 755},
WindowMargins->{{0, Automatic}, {Automatic, 0}},
PrintingCopies->1,
PrintingPageRange->{1, Automatic},
PrivateNotebookOptions->{"VersionedStylesheet"->{"Default.nb"[8.] -> False}},
ShowSelection->True,
FrontEndVersion->"9.0 for Mac OS X x86 (32-bit, 64-bit Kernel) (January 25, \
2013)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[557, 20, 4245, 84, 513, "Text"],
Cell[4805, 106, 685, 12, 68, "Text"],
Cell[5493, 120, 414, 9, 28, "Input"],
Cell[CellGroupData[{
Cell[5932, 133, 153, 2, 80, "Section"],
Cell[6088, 137, 1343, 22, 51, "Text"],
Cell[7434, 161, 1808, 55, 200, "Input"],
Cell[CellGroupData[{
Cell[9267, 220, 901, 22, 46, "Input"],
Cell[10171, 244, 816, 11, 28, "Output"],
Cell[10990, 257, 840, 12, 32, "Output"]
}, Open ]],
Cell[11845, 272, 210, 4, 30, "Text"],
Cell[12058, 278, 864, 28, 93, "Input"],
Cell[12925, 308, 242, 5, 30, "Text"],
Cell[CellGroupData[{
Cell[13192, 317, 528, 13, 28, "Input"],
Cell[13723, 332, 751, 12, 28, "Output"]
}, Open ]],
Cell[14489, 347, 467, 9, 49, "Text"],
Cell[14959, 358, 1075, 31, 54, "Input"],
Cell[16037, 391, 317, 6, 30, "Text"],
Cell[CellGroupData[{
Cell[16379, 401, 265, 5, 28, "Input"],
Cell[16647, 408, 817, 12, 28, "Output"]
}, Open ]],
Cell[17479, 423, 446, 8, 30, "Text"],
Cell[17928, 433, 1689, 36, 51, "Input"],
Cell[19620, 471, 1111, 20, 108, "Text"],
Cell[20734, 493, 978, 33, 114, "Input"],
Cell[CellGroupData[{
Cell[21737, 530, 570, 13, 28, "Input"],
Cell[22310, 545, 6337, 109, 246, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[28696, 660, 191, 2, 80, "Section"],
Cell[28890, 664, 486, 8, 49, "Text"],
Cell[29379, 674, 99, 1, 30, "Text"],
Cell[29481, 677, 1282, 33, 97, "Input"],
Cell[CellGroupData[{
Cell[30788, 714, 109, 1, 35, "Subsubsection"],
Cell[30900, 717, 141, 3, 28, "Input"],
Cell[31044, 722, 399, 7, 49, "Text"],
Cell[CellGroupData[{
Cell[31468, 733, 2713, 62, 114, "Input"],
Cell[34184, 797, 1251, 20, 28, "Output"],
Cell[35438, 819, 14781, 246, 246, "Output"]
}, Open ]],
Cell[50234, 1068, 625, 12, 49, "Text"],
Cell[CellGroupData[{
Cell[50884, 1084, 1203, 23, 28, "Input"],
Cell[52090, 1109, 313, 5, 28, "Output"]
}, Open ]],
Cell[52418, 1117, 330, 6, 30, "Text"],
Cell[CellGroupData[{
Cell[52773, 1127, 3126, 75, 165, "Input"],
Cell[55902, 1204, 1232, 20, 28, "Output"],
Cell[57137, 1226, 13301, 221, 247, "Output"]
}, Open ]],
Cell[70453, 1450, 431, 7, 30, "Text"],
Cell[CellGroupData[{
Cell[70909, 1461, 924, 20, 28, "Input"],
Cell[71836, 1483, 739, 11, 28, "Output"]
}, Open ]],
Cell[72590, 1497, 416, 7, 49, "Text"],
Cell[CellGroupData[{
Cell[73031, 1508, 1159, 30, 80, "Input"],
Cell[74193, 1540, 8844, 150, 228, "Output"]
}, Open ]],
Cell[83052, 1693, 203, 4, 30, "Text"],
Cell[CellGroupData[{
Cell[83280, 1701, 2991, 74, 165, "Input"],
Cell[86274, 1777, 1061, 17, 28, "Output"],
Cell[87338, 1796, 13176, 220, 238, "Output"]
}, Open ]],
Cell[100529, 2019, 469, 8, 30, "Text"],
Cell[CellGroupData[{
Cell[101023, 2031, 925, 20, 28, "Input"],
Cell[101951, 2053, 710, 11, 28, "Output"]
}, Open ]],
Cell[102676, 2067, 440, 7, 49, "Text"],
Cell[CellGroupData[{
Cell[103141, 2078, 1170, 30, 80, "Input"],
Cell[104314, 2110, 8473, 144, 228, "Output"]
}, Open ]],
Cell[112802, 2257, 188, 4, 30, "Text"],
Cell[CellGroupData[{
Cell[113015, 2265, 3070, 76, 182, "Input"],
Cell[116088, 2343, 1073, 17, 28, "Output"],
Cell[117164, 2362, 14756, 245, 238, "Output"]
}, Open ]],
Cell[131935, 2610, 412, 7, 30, "Text"],
Cell[CellGroupData[{
Cell[132372, 2621, 927, 20, 28, "Input"],
Cell[133302, 2643, 691, 11, 28, "Output"]
}, Open ]],
Cell[134008, 2657, 442, 7, 49, "Text"],
Cell[CellGroupData[{
Cell[134475, 2668, 1218, 30, 80, "Input"],
Cell[135696, 2700, 8439, 143, 229, "Output"]
}, Open ]],
Cell[144150, 2846, 181, 4, 30, "Text"],
Cell[CellGroupData[{
Cell[144356, 2854, 3067, 75, 165, "Input"],
Cell[147426, 2931, 620, 12, 28, "Output"],
Cell[148049, 2945, 14602, 245, 238, "Output"]
}, Open ]],
Cell[162666, 3193, 472, 8, 30, "Text"],
Cell[CellGroupData[{
Cell[163163, 3205, 949, 20, 28, "Input"],
Cell[164115, 3227, 739, 11, 28, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[164903, 3244, 160, 2, 35, "Subsubsection"],
Cell[165066, 3248, 479, 8, 49, "Text"],
Cell[165548, 3258, 155, 3, 30, "Text"],
Cell[165706, 3263, 194, 4, 28, "Input"],
Cell[CellGroupData[{
Cell[165925, 3271, 4587, 118, 216, "Input"],
Cell[170515, 3391, 1057, 18, 28, "Output"],
Cell[171575, 3411, 13712, 229, 243, "Output"]
}, Open ]],
Cell[185302, 3643, 399, 7, 30, "Text"],
Cell[CellGroupData[{
Cell[185726, 3654, 1518, 34, 46, "Input"],
Cell[187247, 3690, 973, 16, 28, "Output"]
}, Open ]],
Cell[188235, 3709, 235, 5, 30, "Text"],
Cell[CellGroupData[{
Cell[188495, 3718, 5138, 125, 233, "Input"],
Cell[193636, 3845, 1623, 25, 28, "Output"],
Cell[195262, 3872, 1360, 18, 28, "Output"],
Cell[196625, 3892, 13396, 222, 248, "Output"]
}, Open ]],
Cell[210036, 4117, 402, 7, 30, "Text"],
Cell[CellGroupData[{
Cell[210463, 4128, 1548, 35, 46, "Input"],
Cell[212014, 4165, 944, 16, 28, "Output"]
}, Open ]],
Cell[212973, 4184, 176, 4, 30, "Text"],
Cell[CellGroupData[{
Cell[213174, 4192, 4675, 120, 233, "Input"],
Cell[217852, 4314, 1191, 20, 28, "Output"],
Cell[219046, 4336, 928, 13, 28, "Output"],
Cell[219977, 4351, 13112, 219, 249, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[233126, 4575, 1648, 36, 46, "Input"],
Cell[234777, 4613, 432, 8, 28, "Output"]
}, Open ]],
Cell[235224, 4624, 188, 4, 30, "Text"],
Cell[CellGroupData[{
Cell[235437, 4632, 5118, 125, 233, "Input"],
Cell[240558, 4759, 1664, 26, 28, "Output"],
Cell[242225, 4787, 1398, 19, 28, "Output"],
Cell[243626, 4808, 13770, 228, 249, "Output"]
}, Open ]],
Cell[257411, 5039, 354, 7, 30, "Text"],
Cell[CellGroupData[{
Cell[257790, 5050, 1546, 35, 46, "Input"],
Cell[259339, 5087, 943, 16, 28, "Output"]
}, Open ]],
Cell[260297, 5106, 179, 4, 30, "Text"],
Cell[CellGroupData[{
Cell[260501, 5114, 4937, 123, 250, "Input"],
Cell[265441, 5239, 1365, 22, 28, "Output"],
Cell[266809, 5263, 1102, 15, 28, "Output"],
Cell[267914, 5280, 13042, 216, 242, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[280993, 5501, 1594, 35, 46, "Input"],
Cell[282590, 5538, 1039, 17, 28, "Output"]
}, Open ]]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[283690, 5562, 328, 4, 80, "Section"],
Cell[284021, 5568, 193, 4, 30, "Text"],
Cell[CellGroupData[{
Cell[284239, 5576, 198, 2, 44, "Subsection"],
Cell[CellGroupData[{
Cell[284462, 5582, 1107, 27, 182, "Input"],
Cell[285572, 5611, 436, 7, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[286045, 5623, 900, 22, 28, "Input"],
Cell[286948, 5647, 6350, 110, 246, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[293335, 5762, 448, 10, 46, "Input"],
Cell[293786, 5774, 419, 6, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[294242, 5785, 491, 12, 28, "Input"],
Cell[294736, 5799, 303, 4, 28, "Output"]
}, Open ]],
Cell[295054, 5806, 97, 1, 30, "Text"],
Cell[CellGroupData[{
Cell[295176, 5811, 765, 21, 28, "Input"],
Cell[295944, 5834, 358, 7, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[296339, 5846, 985, 24, 28, "Input"],
Cell[297327, 5872, 8448, 144, 246, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[305812, 6021, 494, 11, 46, "Input"],
Cell[306309, 6034, 362, 6, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[306708, 6045, 493, 12, 28, "Input"],
Cell[307204, 6059, 296, 5, 28, "Output"]
}, Open ]],
Cell[307515, 6067, 97, 1, 30, "Text"],
Cell[CellGroupData[{
Cell[307637, 6072, 746, 20, 28, "Input"],
Cell[308386, 6094, 337, 6, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[308760, 6105, 979, 24, 28, "Input"],
Cell[309742, 6131, 8194, 140, 246, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[317973, 6276, 609, 14, 28, "Input"],
Cell[318585, 6292, 21693, 363, 247, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[340327, 6661, 298, 4, 44, "Subsection"],
Cell[CellGroupData[{
Cell[340650, 6669, 1163, 28, 182, "Input"],
Cell[341816, 6699, 74, 1, 28, "Output"]
}, Open ]],
Cell[341905, 6703, 187, 2, 30, "Text"],
Cell[CellGroupData[{
Cell[342117, 6709, 1640, 50, 91, "Input"],
Cell[343760, 6761, 200, 5, 49, "Output"],
Cell[343963, 6768, 74, 1, 28, "Output"],
Cell[344040, 6771, 87, 1, 28, "Output"],
Cell[344130, 6774, 72, 1, 28, "Output"]
}, Open ]],
Cell[344217, 6778, 148, 2, 30, "Text"],
Cell[CellGroupData[{
Cell[344390, 6784, 465, 12, 28, "Input"],
Cell[344858, 6798, 149, 4, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[345044, 6807, 700, 16, 28, "Input"],
Cell[345747, 6825, 6395, 111, 247, "Output"]
}, Open ]],
Cell[352157, 6939, 478, 8, 28, "Input"],
Cell[CellGroupData[{
Cell[352660, 6951, 1634, 50, 91, "Input"],
Cell[354297, 7003, 279, 8, 51, "Output"],
Cell[354579, 7013, 105, 2, 28, "Output"],
Cell[354687, 7017, 89, 1, 28, "Output"],
Cell[354779, 7020, 89, 1, 28, "Output"]
}, Open ]],
Cell[354883, 7024, 148, 2, 30, "Text"],
Cell[CellGroupData[{
Cell[355056, 7030, 467, 12, 28, "Input"],
Cell[355526, 7044, 170, 5, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[355733, 7054, 714, 17, 28, "Input"],
Cell[356450, 7073, 6640, 115, 246, "Output"]
}, Open ]],
Cell[363105, 7191, 469, 8, 28, "Input"],
Cell[CellGroupData[{
Cell[363599, 7203, 1642, 50, 91, "Input"],
Cell[365244, 7255, 277, 8, 51, "Output"],
Cell[365524, 7265, 87, 1, 28, "Output"],
Cell[365614, 7268, 89, 1, 28, "Output"],
Cell[365706, 7271, 106, 2, 28, "Output"]
}, Open ]],
Cell[365827, 7276, 174, 2, 30, "Text"],
Cell[CellGroupData[{
Cell[366026, 7282, 465, 12, 28, "Input"],
Cell[366494, 7296, 148, 4, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[366679, 7305, 715, 17, 28, "Input"],
Cell[367397, 7324, 6794, 117, 246, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[374228, 7446, 735, 15, 28, "Input"],
Cell[374966, 7463, 19195, 323, 246, "Output"]
}, Open ]]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[394222, 7793, 329, 4, 80, "Section"],
Cell[394554, 7799, 601, 15, 63, "Input"],
Cell[395158, 7816, 320, 6, 30, "Text"],
Cell[CellGroupData[{
Cell[395503, 7826, 431, 7, 44, "Subsection"],
Cell[CellGroupData[{
Cell[395959, 7837, 1232, 29, 182, "Input"],
Cell[397194, 7868, 527, 7, 28, "Output"]
}, Open ]],
Cell[397736, 7878, 482, 9, 28, "Input"],
Cell[CellGroupData[{
Cell[398243, 7891, 848, 16, 63, "Input"],
Cell[399094, 7909, 410, 6, 28, "Output"],
Cell[399507, 7917, 444, 7, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[399988, 7929, 191, 4, 28, "Input"],
Cell[400182, 7935, 347, 5, 28, "Output"]
}, Open ]],
Cell[400544, 7943, 437, 7, 30, "Text"],
Cell[CellGroupData[{
Cell[401006, 7954, 1687, 41, 80, "Input"],
Cell[402696, 7997, 12111, 206, 248, 5364, 95, "CachedBoxData", "BoxData", \
"Output"]
}, Open ]],
Cell[414822, 8206, 186, 2, 30, "Text"],
Cell[CellGroupData[{
Cell[415033, 8212, 787, 19, 80, "Input"],
Cell[415823, 8233, 11043, 187, 247, "Output"]
}, Open ]],
Cell[426881, 8423, 286, 5, 49, "Text"],
Cell[427170, 8430, 301, 9, 28, "Input"],
Cell[CellGroupData[{
Cell[427496, 8443, 310, 8, 28, "Input"],
Cell[427809, 8453, 286, 4, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[428132, 8462, 1182, 35, 63, "Input"],
Cell[429317, 8499, 27112, 408, 238, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[456466, 8912, 1610, 42, 63, "Input"],
Cell[458079, 8956, 27326, 411, 238, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[485442, 9372, 886, 22, 63, "Input"],
Cell[486331, 9396, 38210, 589, 246, "Output"]
}, Open ]],
Cell[524556, 9988, 320, 7, 49, "Text"],
Cell[CellGroupData[{
Cell[524901, 9999, 1337, 35, 80, "Input"],
Cell[526241, 10036, 38286, 588, 238, "Output"]
}, Open ]],
Cell[564542, 10627, 191, 4, 49, "Text"],
Cell[CellGroupData[{
Cell[564758, 10635, 2247, 55, 97, "Input"],
Cell[567008, 10692, 7931, 132, 103, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[574988, 10830, 495, 8, 44, "Subsection"],
Cell[CellGroupData[{
Cell[575508, 10842, 1257, 29, 182, "Input"],
Cell[576768, 10873, 645, 9, 28, "Output"]
}, Open ]],
Cell[577428, 10885, 510, 11, 28, "Input"],
Cell[CellGroupData[{
Cell[577963, 10900, 174, 2, 28, "Input"],
Cell[578140, 10904, 6753, 173, 164, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[584930, 11082, 831, 16, 63, "Input"],
Cell[585764, 11100, 529, 8, 28, "Output"],
Cell[586296, 11110, 561, 9, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[586894, 11124, 191, 4, 28, "Input"],
Cell[587088, 11130, 487, 7, 28, "Output"]
}, Open ]],
Cell[587590, 11140, 437, 7, 30, "Text"],
Cell[CellGroupData[{
Cell[588052, 11151, 1685, 41, 80, "Input"],
Cell[589740, 11194, 5984, 102, 246, "Output"]
}, Open ]],
Cell[595739, 11299, 186, 2, 30, "Text"],
Cell[CellGroupData[{
Cell[595950, 11305, 848, 19, 80, "Input"],
Cell[596801, 11326, 12055, 204, 246, "Output"]
}, Open ]],
Cell[608871, 11533, 257, 5, 30, "Text"],
Cell[609131, 11540, 352, 10, 28, "Input"],
Cell[609486, 11552, 97, 1, 30, "Text"],
Cell[CellGroupData[{
Cell[609608, 11557, 469, 14, 28, "Input"],
Cell[610080, 11573, 601, 10, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[610718, 11588, 407, 9, 28, "Input"],
Cell[611128, 11599, 434, 6, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[611599, 11610, 1182, 35, 63, "Input"],
Cell[612784, 11647, 27183, 409, 237, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[640004, 12061, 1610, 42, 63, "Input"],
Cell[641617, 12105, 27522, 414, 238, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[669176, 12524, 944, 22, 63, "Input"],
Cell[670123, 12548, 39280, 607, 246, "Output"]
}, Open ]],
Cell[709418, 13158, 299, 6, 49, "Text"],
Cell[CellGroupData[{
Cell[709742, 13168, 1344, 36, 80, "Input"],
Cell[711089, 13206, 39130, 603, 238, "Output"]
}, Open ]],
Cell[750234, 13812, 213, 4, 49, "Text"],
Cell[CellGroupData[{
Cell[750472, 13820, 2361, 57, 114, "Input"],
Cell[752836, 13879, 6972, 118, 103, "Output"]
}, Open ]],
Cell[759823, 14000, 191, 5, 28, "Input"],
Cell[CellGroupData[{
Cell[760039, 14009, 2286, 55, 114, "Input"],
Cell[762328, 14066, 7349, 128, 103, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[769726, 14200, 504, 9, 44, "Subsection"],
Cell[CellGroupData[{
Cell[770255, 14213, 1372, 30, 182, "Input"],
Cell[771630, 14245, 600, 8, 28, "Output"]
}, Open ]],
Cell[772245, 14256, 539, 11, 28, "Input"],
Cell[CellGroupData[{
Cell[772809, 14271, 174, 2, 28, "Input"],
Cell[772986, 14275, 5718, 146, 164, "Output"]
}, Open ]],
Cell[778719, 14424, 210, 4, 30, "Text"],
Cell[CellGroupData[{
Cell[778954, 14432, 833, 17, 63, "Input"],
Cell[779790, 14451, 461, 7, 28, "Output"],
Cell[780254, 14460, 490, 8, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[780781, 14473, 191, 4, 28, "Input"],
Cell[780975, 14479, 419, 6, 28, "Output"]
}, Open ]],
Cell[781409, 14488, 437, 7, 30, "Text"],
Cell[CellGroupData[{
Cell[781871, 14499, 1801, 42, 80, "Input"],
Cell[783675, 14543, 6002, 103, 246, "Output"]
}, Open ]],
Cell[789692, 14649, 186, 2, 30, "Text"],
Cell[CellGroupData[{
Cell[789903, 14655, 787, 19, 80, "Input"],
Cell[790693, 14676, 11160, 190, 246, "Output"]
}, Open ]],
Cell[801868, 14869, 286, 5, 49, "Text"],
Cell[802157, 14876, 301, 9, 28, "Input"],
Cell[CellGroupData[{
Cell[802483, 14889, 310, 8, 28, "Input"],
Cell[802796, 14899, 375, 5, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[803208, 14909, 1467, 39, 63, "Input"],
Cell[804678, 14950, 27375, 411, 240, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[832090, 15366, 1612, 42, 63, "Input"],
Cell[833705, 15410, 27425, 413, 238, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[861167, 15828, 982, 23, 63, "Input"],
Cell[862152, 15853, 38403, 593, 246, "Output"]
}, Open ]],
Cell[900570, 16449, 253, 6, 49, "Text"],
Cell[CellGroupData[{
Cell[900848, 16459, 1199, 34, 80, "Input"],
Cell[902050, 16495, 38217, 588, 238, "Output"]
}, Open ]],
Cell[940282, 17086, 343, 6, 49, "Text"],
Cell[CellGroupData[{
Cell[940650, 17096, 3036, 67, 114, "Input"],
Cell[943689, 17165, 5381, 95, 103, "Output"]
}, Open ]],
Cell[949085, 17263, 244, 5, 49, "Text"],
Cell[CellGroupData[{
Cell[949354, 17272, 3015, 66, 97, "Input"],
Cell[952372, 17340, 4988, 88, 103, "Output"]
}, Open ]],
Cell[957375, 17431, 396, 7, 49, "Text"],
Cell[CellGroupData[{
Cell[957796, 17442, 305, 8, 28, "Input"],
Cell[958104, 17452, 145, 2, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[958286, 17459, 310, 8, 28, "Input"],
Cell[958599, 17469, 377, 5, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[959013, 17479, 2942, 64, 97, "Input"],
Cell[961958, 17545, 7697, 129, 103, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[969704, 17680, 405, 7, 44, "Subsection"],
Cell[CellGroupData[{
Cell[970134, 17691, 1206, 29, 182, "Input"],
Cell[971343, 17722, 714, 10, 28, "Output"]
}, Open ]],
Cell[972072, 17735, 457, 10, 28, "Input"],
Cell[CellGroupData[{
Cell[972554, 17749, 174, 4, 28, "Input"],
Cell[972731, 17755, 6622, 170, 164, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[979390, 17930, 795, 17, 63, "Input"],
Cell[980188, 17949, 510, 8, 28, "Output"],
Cell[980701, 17959, 542, 9, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[981280, 17973, 718, 16, 63, "Input"],
Cell[982001, 17991, 513, 8, 28, "Output"],
Cell[982517, 18001, 530, 8, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[983084, 18014, 232, 5, 28, "Input"],
Cell[983319, 18021, 455, 6, 28, "Output"]
}, Open ]],
Cell[983789, 18030, 496, 8, 30, "Text"],
Cell[CellGroupData[{
Cell[984310, 18042, 2489, 59, 97, "Input"],
Cell[986802, 18103, 10908, 184, 246, "Output"]
}, Open ]],
Cell[997725, 18290, 455, 8, 30, "Text"],
Cell[CellGroupData[{
Cell[998205, 18302, 1498, 39, 80, "Input"],
Cell[999706, 18343, 15218, 257, 246, "Output"]
}, Open ]],
Cell[1014939, 18603, 186, 2, 30, "Text"],
Cell[CellGroupData[{
Cell[1015150, 18609, 741, 18, 80, "Input"],
Cell[1015894, 18629, 16281, 274, 246, "Output"]
}, Open ]],
Cell[1032190, 18906, 277, 5, 30, "Text"],
Cell[1032470, 18913, 241, 5, 30, "Text"],
Cell[1032714, 18920, 800, 22, 46, "Input"],
Cell[1033517, 18944, 97, 1, 30, "Text"],
Cell[CellGroupData[{
Cell[1033639, 18949, 516, 14, 28, "Input"],
Cell[1034158, 18965, 513, 8, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1034708, 18978, 435, 10, 28, "Input"],
Cell[1035146, 18990, 358, 5, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1035541, 19000, 115, 3, 28, "Input"],
Cell[1035659, 19005, 330, 5, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1036026, 19015, 2579, 70, 80, "Input"],
Cell[1038608, 19087, 84368, 1395, 237, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1123013, 20487, 3776, 97, 97, "Input"],
Cell[1126792, 20586, 124389, 2091, 238, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1251218, 22682, 1231, 31, 63, "Input"],
Cell[1252452, 22715, 144753, 2775, 246, "Output"]
}, Open ]],
Cell[1397220, 25493, 213, 5, 49, "Text"],
Cell[CellGroupData[{
Cell[1397458, 25502, 2027, 55, 114, "Input"],
Cell[1399488, 25559, 144933, 2776, 238, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1544458, 28340, 2668, 71, 114, "Input"],
Cell[1547129, 28413, 7249, 126, 103, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[1554427, 28545, 417, 7, 44, "Subsection"],
Cell[CellGroupData[{
Cell[1554869, 28556, 1232, 29, 182, "Input"],
Cell[1556104, 28587, 696, 10, 28, "Output"]
}, Open ]],
Cell[1556815, 28600, 482, 10, 28, "Input"],
Cell[CellGroupData[{
Cell[1557322, 28614, 174, 4, 28, "Input"],
Cell[1557499, 28620, 6840, 176, 164, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1564376, 28801, 795, 17, 63, "Input"],
Cell[1565174, 28820, 582, 9, 28, "Output"],
Cell[1565759, 28831, 614, 10, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1566410, 28846, 718, 16, 63, "Input"],
Cell[1567131, 28864, 583, 9, 28, "Output"],
Cell[1567717, 28875, 600, 9, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1568354, 28889, 232, 5, 28, "Input"],
Cell[1568589, 28896, 484, 7, 28, "Output"]
}, Open ]],
Cell[1569088, 28906, 496, 8, 30, "Text"],
Cell[CellGroupData[{
Cell[1569609, 28918, 2488, 59, 97, "Input"],
Cell[1572100, 28979, 10705, 180, 246, "Output"]
}, Open ]],
Cell[1582820, 29162, 455, 8, 30, "Text"],
Cell[CellGroupData[{
Cell[1583300, 29174, 1498, 39, 80, "Input"],
Cell[1584801, 29215, 14856, 252, 246, "Output"]
}, Open ]],
Cell[1599672, 29470, 186, 2, 30, "Text"],
Cell[CellGroupData[{
Cell[1599883, 29476, 806, 19, 80, "Input"],
Cell[1600692, 29497, 18277, 307, 246, "Output"]
}, Open ]],
Cell[1618984, 29807, 277, 5, 30, "Text"],
Cell[1619264, 29814, 264, 5, 30, "Text"],
Cell[1619531, 29821, 788, 22, 46, "Input"],
Cell[1620322, 29845, 97, 1, 30, "Text"],
Cell[CellGroupData[{
Cell[1620444, 29850, 469, 14, 28, "Input"],
Cell[1620916, 29866, 528, 9, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1621481, 29880, 407, 9, 28, "Input"],
Cell[1621891, 29891, 360, 5, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1622288, 29901, 115, 3, 28, "Input"],
Cell[1622406, 29906, 407, 6, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1622850, 29917, 2579, 70, 80, "Input"],
Cell[1625432, 29989, 84372, 1394, 241, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1709841, 31388, 3670, 95, 97, "Input"],
Cell[1713514, 31485, 124265, 2087, 238, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1837816, 33577, 1248, 31, 63, "Input"],
Cell[1839067, 33610, 146817, 2807, 246, "Output"]
}, Open ]],
Cell[1985899, 36420, 217, 5, 49, "Text"],
Cell[CellGroupData[{
Cell[1986141, 36429, 2092, 55, 114, "Input"],
Cell[1988236, 36486, 146946, 2807, 238, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2135219, 39298, 2672, 71, 114, "Input"],
Cell[2137894, 39371, 7082, 123, 103, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2145013, 39499, 2718, 71, 114, "Input"],
Cell[2147734, 39572, 7244, 126, 103, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[2155027, 39704, 526, 9, 44, "Subsection"],
Cell[CellGroupData[{
Cell[2155578, 39717, 1372, 30, 182, "Input"],
Cell[2156953, 39749, 908, 13, 28, "Output"]
}, Open ]],
Cell[2157876, 39765, 535, 11, 28, "Input"],
Cell[CellGroupData[{
Cell[2158436, 39780, 174, 4, 28, "Input"],
Cell[2158613, 39786, 7035, 179, 164, "Output"]
}, Open ]],
Cell[2165663, 39968, 236, 4, 30, "Text"],
Cell[CellGroupData[{
Cell[2165924, 39976, 847, 18, 63, "Input"],
Cell[2166774, 39996, 755, 11, 28, "Output"],
Cell[2167532, 40009, 774, 11, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2168343, 40025, 772, 17, 63, "Input"],
Cell[2169118, 40044, 750, 11, 28, "Output"],
Cell[2169871, 40057, 782, 12, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2170690, 40074, 232, 5, 28, "Input"],
Cell[2170925, 40081, 657, 9, 28, "Output"]
}, Open ]],
Cell[2171597, 40093, 496, 8, 30, "Text"],
Cell[CellGroupData[{
Cell[2172118, 40105, 2657, 64, 97, "Input"],
Cell[2174778, 40171, 10838, 182, 246, "Output"]
}, Open ]],
Cell[2185631, 40356, 455, 8, 30, "Text"],
Cell[CellGroupData[{
Cell[2186111, 40368, 1558, 40, 80, "Input"],
Cell[2187672, 40410, 15235, 258, 248, "Output"]
}, Open ]],
Cell[2202922, 40671, 186, 2, 30, "Text"],
Cell[CellGroupData[{
Cell[2203133, 40677, 929, 21, 80, "Input"],
Cell[2204065, 40700, 21380, 359, 248, "Output"]
}, Open ]],
Cell[2225460, 41062, 277, 5, 30, "Text"],
Cell[2225740, 41069, 264, 5, 30, "Text"],
Cell[2226007, 41076, 885, 23, 46, "Input"],
Cell[2226895, 41101, 97, 1, 30, "Text"],
Cell[CellGroupData[{
Cell[2227017, 41106, 491, 14, 28, "Input"],
Cell[2227511, 41122, 655, 10, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2228203, 41137, 435, 10, 28, "Input"],
Cell[2228641, 41149, 525, 7, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2229203, 41161, 115, 3, 28, "Input"],
Cell[2229321, 41166, 548, 8, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2229906, 41179, 2681, 72, 80, "Input"],
Cell[2232590, 41253, 84562, 1396, 237, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2317189, 42654, 3722, 96, 97, "Input"],
Cell[2320914, 42752, 124407, 2089, 238, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2445358, 44846, 1331, 32, 63, "Input"],
Cell[2446692, 44880, 144895, 2775, 246, "Output"]
}, Open ]],
Cell[2591602, 47658, 263, 5, 49, "Text"],
Cell[CellGroupData[{
Cell[2591890, 47667, 2183, 57, 114, "Input"],
Cell[2594076, 47726, 145115, 2777, 238, "Output"]
}, Open ]],
Cell[2739206, 50506, 334, 6, 49, "Text"],
Cell[CellGroupData[{
Cell[2739565, 50516, 4116, 102, 148, "Input"],
Cell[2743684, 50620, 13576, 229, 103, "Output"]
}, Open ]],
Cell[2757275, 50852, 1448, 26, 43, "Text"],
Cell[CellGroupData[{
Cell[2758748, 50882, 4238, 103, 148, "Input"],
Cell[2762989, 50987, 9741, 164, 103, "Output"]
}, Open ]],
Cell[2772745, 51154, 378, 7, 49, "Text"],
Cell[CellGroupData[{
Cell[2773148, 51165, 279, 7, 28, "Input"],
Cell[2773430, 51174, 98, 1, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2773565, 51180, 261, 7, 28, "Input"],
Cell[2773829, 51189, 113, 1, 28, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2773979, 51195, 4962, 123, 182, "Input"],
Cell[2778944, 51320, 20741, 343, 103, "Output"]
}, Open ]]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[2799746, 51670, 179, 2, 80, "Section"],
Cell[2799928, 51674, 244, 4, 28, "Input"],
Cell[2800175, 51680, 765, 16, 46, "Input"],
Cell[2800943, 51698, 30352, 731, 2278, "Input"]
}, Open ]],
Cell[CellGroupData[{
Cell[2831332, 52434, 292, 3, 80, "Section"],
Cell[2831627, 52439, 361, 6, 30, "Text"],
Cell[2831991, 52447, 577, 15, 46, "Input"],
Cell[2832571, 52464, 18658, 474, 2142, "Input"]
}, Open ]],
Cell[CellGroupData[{
Cell[2851266, 52943, 250, 3, 80, "Section"],
Cell[2851519, 52948, 305, 6, 30, "Text"],
Cell[2851827, 52956, 823, 21, 80, "Input"],
Cell[2852653, 52979, 19135, 475, 2159, "Input"]
}, Open ]],
Cell[CellGroupData[{
Cell[2871825, 53459, 238, 3, 80, "Section"],
Cell[CellGroupData[{
Cell[2872088, 53466, 171, 2, 44, "Subsection"],
Cell[2872262, 53470, 1077, 19, 144, "Text"],
Cell[2873342, 53491, 10435, 234, 828, "Input"]
}, Open ]],
Cell[CellGroupData[{
Cell[2883814, 53730, 153, 2, 44, "Subsection"],
Cell[2883970, 53734, 452, 7, 49, "Text"],
Cell[2884425, 53743, 1092, 30, 80, "Input"],
Cell[2885520, 53775, 11953, 295, 692, "Input"]
}, Open ]]
}, Open ]]
}
]
*)
(* End of internal cache information *)