(* Content-type: application/mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 7.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 145, 7] NotebookDataLength[ 1652514, 32818] NotebookOptionsPosition[ 1632540, 32257] NotebookOutlinePosition[ 1632964, 32274] CellTagsIndexPosition[ 1632921, 32271] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["\<\ EE 80656 2013: Advanced Semiconductor Physics Supporting Simulations (DJ)\ \>", "Title", CellChangeTimes->{{3.4928610189729767`*^9, 3.4928610290651293`*^9}, { 3.492861126987772*^9, 3.492861131163456*^9}, {3.4928645245656643`*^9, 3.492864525651825*^9}, {3.5235999969299726`*^9, 3.5235999972657413`*^9}, { 3.558880023769704*^9, 3.558880031309629*^9}, {3.558880139026999*^9, 3.558880148009981*^9}, {3.567773220746505*^9, 3.567773237960698*^9}}], Cell["\<\ Topics: [1] The Ballistic Transistor [2] Time-Independent Perturbation Theory [3] Time-Dependent Perturbation Theory [4] Charge Transport Properties of Semiconductors [5] Quantum Theory of Optical Properties of Semiconductors [6] Tunneling Transport in Semiconductors [7] Coherent Transport: The Bottom-up Approach\ \>", "Subtitle", CellChangeTimes->{{3.492861057187982*^9, 3.492861060546566*^9}, 3.492861117650868*^9, {3.5637175727190037`*^9, 3.563717700815504*^9}, { 3.563717761790472*^9, 3.5637177820616417`*^9}}], Cell[CellGroupData[{ Cell["[1] The Ballistic Transistor", "Section", CellChangeTimes->{{3.558880162123597*^9, 3.558880176788707*^9}, { 3.561471541397271*^9, 3.5614715450426683`*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"Define", " ", "constants"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"h", "=", FractionBox[ RowBox[{"6.63", "*", SuperscriptBox["10", RowBox[{"-", "34"}]]}], RowBox[{"2", "*", "\[Pi]"}]]}], " ", ";"}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{"Planck", "'"}], "s", " ", "Constant"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "=", RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "19"}]]}]}], ";"}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{"Electron", " ", "charge"}], ",", " ", "Coulomb"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"m0", "=", RowBox[{"9.1", "*", SuperscriptBox["10", RowBox[{"-", "31"}]]}]}], ";"}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{"Free", " ", "electron", " ", "mass"}], ",", " ", "kg"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"mt", "=", RowBox[{"0.2", "*", "m0"}]}], ";"}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{"Transverse", " ", "effective", " ", "mass"}], ",", " ", "Silicon"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"mGaN", "=", RowBox[{"0.2", "*", "m0"}]}], ";"}], " ", RowBox[{"(*", " ", RowBox[{ "Electron", " ", "effective", " ", "mass", " ", "of", " ", "GaN"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"kb", "=", RowBox[{"1.38", "*", SuperscriptBox["10", RowBox[{"-", "23"}]]}]}], ";"}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{"Boltzmann", " ", "Constant"}], ",", " ", RowBox[{"J", "/", "K"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"eps0", "=", RowBox[{"8.85", "*", SuperscriptBox["10", RowBox[{"-", "12"}]]}]}], ";"}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{"Permitivitty", " ", "of", " ", "vacuum"}], ",", " ", RowBox[{"F", "/", "m"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"epsOX", "=", RowBox[{"3.9", "*", "eps0"}]}], ";"}], " ", RowBox[{"(*", " ", RowBox[{"Dielectric", " ", "constant", " ", "of", " ", "SiO2"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"epsAlOX", "=", RowBox[{"9.0", "*", "eps0"}]}], ";"}], " ", RowBox[{"(*", " ", RowBox[{"Dielectric", " ", "constant", " ", "of", " ", "SiO2"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"epsAlN", "=", RowBox[{"9.0", "*", "eps0"}]}], ";"}], " ", RowBox[{"(*", " ", RowBox[{"Dielectric", " ", "constant", " ", "of", " ", "AlN"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Mv", "=", "2.5"}], ";"}], " ", RowBox[{"(*", " ", RowBox[{"Valley", " ", "degeneracy", " ", "of", " ", "Silicon"}], " ", "*)"}]}]}]], "Input", CellChangeTimes->{{3.449460296094182*^9, 3.4494605510938873`*^9}, { 3.449460587060587*^9, 3.449460592403948*^9}, {3.449460714050856*^9, 3.449460729684712*^9}, {3.449462007556885*^9, 3.449462052203145*^9}, { 3.4874739218197536`*^9, 3.4874739419316397`*^9}, {3.554990575853877*^9, 3.5549906460022173`*^9}, {3.55888018045172*^9, 3.5588801867177896`*^9}, 3.5593094273488626`*^9}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"F", "[", "u_", "]"}], ":=", RowBox[{"NIntegrate", "[", RowBox[{ FractionBox[ SqrtBox["y"], RowBox[{"1", "+", RowBox[{"Exp", "[", RowBox[{"y", "-", "u"}], "]"}]}]], ",", RowBox[{"{", RowBox[{"y", ",", "0", ",", "100"}], "}"}]}], "]"}]}], " ", RowBox[{"(*", RowBox[{"Fermi", " ", "Dirac", " ", "Integral"}], " ", "*)"}]}], "\[IndentingNewLine]", RowBox[{"LogPlot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"F", "[", "u", "]"}], ",", RowBox[{"Exp", "[", "u", "]"}], ",", FractionBox[ SuperscriptBox["u", RowBox[{"3", "/", "2"}]], RowBox[{"3", "/", "2"}]]}], "}"}], ",", RowBox[{"{", RowBox[{"u", ",", RowBox[{"-", "10"}], ",", "10"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}]}], "]"}]}], "Input", CellChangeTimes->{{3.449461122183476*^9, 3.449461124335548*^9}, { 3.4494612203590097`*^9, 3.449461377073328*^9}, {3.4494625297051992`*^9, 3.449462536477598*^9}, {3.4494925821225147`*^9, 3.4494925996569653`*^9}, { 3.554990678160409*^9, 3.554990709183053*^9}}], Cell[BoxData[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAfedN8v//I8BrbkQ42T0kwOZ7FvXb /CPAMFRdPrU6JMBOEN/3t/kjwBtye0SRNyTAIDlw/W/zI8Bad8dQSTEkwMKK kgjg5iPAzpCfabkkJMAILtcewM0jwDZ2V5yZCyTAlHRgS4CbI8C5lCQGWtkj wKsBc6QANyPA8VtZ7dp0I8AFZUcyGV0iwAccPyL1miLAE9jFbKKRIcCr5Eaw gM8hwFLDmmMpyiDAXD41CAsIIcB77z1skOMfwHR2u1yvLyDAuHeaaq9PHsBB LWkrjcsewE6SVSD+mRzApLW3KPUVHcBHnb1OSOwawDIsJzplaBvApsd51nNb GcAOR9izxdcZwF6ElBXPqBfArR1IVHclGMB+YAOuCxMWwDds/kItkBbAAC0f v0OFFMBZHYUtFQMVwNqLmYer1RLADM5Qz5pUE8AcCmip9EIRwNV/cFJzwxHA azUqBdscD8BHZqphdhEQwGM33qjDwwvAe7lAImTRDMAqeDr/bqQIwPxo1RmE vAnAod1TxHlBBcAvesmwYGoGwOeBFTxHGALAIVl1hFNYA8C6lShF6Fb9v9qt vi1IEADAMOnZ9C+d9r9TziqSa9D5v0S62wn9VvC/QYoEIF4V9L9wqa/4ERPj vwng4sXeMey/VmYjodJ8yb8LjM9nWIzhv8fM2YozU8g/yPJkInjLzr86LcGy UJfjP/PLP9i/BbI/AnYV3GQZ8D8YL6jZc6DVPwcMUIFi7vY/2T3zhHNM4z+D 4NZDcqP9P++sjx5j3Oo/sJuGUH7yAUDngu09y6PwP2+iZBDkVgVAfiucfMPO 8z9eapodh4EIQL3nZUHjgPY/iVF2OTOcC0BpOO+xFe74PwQUleZ/+g5A4iOA ia1Z+z/Xy4XwhA8RQMdopt7hbv0/VXtiNprDEkApTt5RD4b/P2wL6yLOWhRA J9VhOjGrAEAfq8aWBuoVQI1iiBQlgAFAe7hDUw+bF0CLsgF9k1gCQHCmbLY2 LxlAB3jViWQWA0AMAjdiLuUaQIsFEUA/2ANARW1UlSqTHECwEaxg04sEQBi5 HW9FJB5A1Dcb5bMqBUCScoiRMNcfQPdGxMZyzgVAUoZPLZ22IEA5Py9YCWAG QCpbhFWkfSFARyCayoboBkDW5gmik1UiQB8k7Hs1dgdAzmLlQRIfI0Bqoqd2 4/QHQOEEp/iVIiNAOo7+pQ33B0D0pmivGSYjQL3OZHM3+QdAGevrHCEtI0BQ b+boif0HQGRz8vcvOyNAQmRsQioGCED6g/+tTVcjQCOmvcxYFwhAJqUZGomP I0CWKdEkbjkIQDlH29AMkyNAc5tLVow7CEBM6ZyHkJYjQIbb7imqPQhAcS0g 9ZedI0B3vS645EEIQLy1JtCmqyNALV8JdFVKCEBSxjOGxMcjQNnmoYQlWwhA ZWj1PEjLI0BjBWrnPV0IQHgKt/PLziNA+8lP7lVfCECdTjph09UjQD1k7+iE YwhA6NZAPOLjI0DLytyU3msIQPp4AvNl5yNAEwrtG/RtCEANG8Sp6eojQKGn D0gJcAhAMl9HF/HxI0CxPgWQMnQIQEUBCc509SNA4rMUrEZ2CEBYo8qE+Pgj QMZ+r21aeAhAakWMO3z8I0B2uPPUbXoIQH3nTfL//yNAa2v/4YB8CEAZgy0O "]]}, {Hue[0.9060679774997897, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJxF1P0zE3AcwPFZVmPK4zCNPehc7W44Ls5DF2k3d2U0bXW5pLHOaTXhxA3l DFF3YcYZ+8FDi9uVrruQq6MmQi1XZ9J6UMs8deVpLGetuuPz/eF9r//gTROI uUIsBoOJ+9d/C2filq1W3/5tjRJ3k34TyXH6st79G0kNy7SIV5DPK2vwU0Yk 3n/Cp/81sjYn5dj1RqTaJrsNE4rECdlBpLN00PX9C1FLNQ3kahSpB0aooOTX IVGVgQL2XFVkdMb7gJwaHvVPAxlkK59yYn94gaqhfF12EglMltYS37R7gEUp O+4TXN1BDJPSF1PqBn642VCuHncByfbpHatHnMGLBxk4PdkRTA393K7REEBG Xrj1chsebP6UOJAfjQNniomRbE8s2Cvfz5rlW/q2DZybXA1QroFHe/V2Fv4i mNnRaXZ2NYD8C77NbwuGwaFXk5XBiS8PD28Zznz2MKHeAGJziR/TSIvgLoeE YsHPNbBkSheT1WoBHzSWJRQt20RtK25Jc/rOx4HJGQrv8mI8WHEiNyy4iQDa usmN1zb2gBOjpYtSR2eQJxGEKDQuoIiwQNeecQMp6sG6nfNEUNITk+jY6AFm qkRdIQEk0AEbKvCf9gJZl07KGTIy6PnYW8za5wPWZN2oDpyggNyyeKayiwoy kqS8tkIaqDPatch4dFArmI52ofiCX23vmuV05KoqvZPkhyQtLJBpTGRa9vJ6 QARyo8R6L+4U0u8OyaviNjKMrR9zkCGPzzWVV9UhrzCppnol8skjvzGVGskd DC4bGEIK002RsaPIPPvulVEtUskJP/9uHDmri4r8ZkBu5GFXhDPI3XsHOubm kUHn2B5LS0iWjZ02x4Q83ToiNZuRGaxbEQWbyK1vgX8BD741vw== "]]}, {Hue[0.1421359549995791, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwVkmk81PsegMcYZjCZbFeTyuHv0iFSSiG+v3LcVJIkaVAaU5dCu6MsfUKT raOydLMcWdKRkD1L/j/LpBpJ2YoS2TLkzNgTOd0Xz+d5+bx5tLinHY9TKRTK tZ/838iSMzi6fMpKtcopJqrYGAdR4wX/2XoYAhZjWFcsdbBRkmejqukVMLDw rYTPa3APu3BcgRUDdYdMSU13DXzA5F01f3s8UDRzQ6fXsnHZ+0Oh1wOTINS3 +uD2G+p4GR4lGjj3oF6tOGvI9l8Y4nL5Db9nQuKDFKGlpRo+e+LUSEN8Nlgm fpo7elgVZ5gZ2AkKc+BAdXDEwm0V3MYczRc0P4IPinb1Dv3KWLb3odKz0QIY HGT+8dhGGacc3mzuGV4IQ+lkZk2ZEt5snXCqX7kY/FZZbpo3UcLN66ZTPNNL 4GS3esSlquWYQild8qwpB37kSm/DRha+O6K6YcCuAlYWd55aSWPhja0XuLzu Slh7Gmvl2yliXvYmAW/uKeT8rWpX852JF2PjZwb4JPBvqAmNPZhYuG0+rigK w9YTvB7tJgXM0+UINrLroFJGUtZVLo+NNeR7zvXWgWnYU9urpvJ4kVU5U/Sg HgLPVM8dq5TDid/Ya01MBSBjHc63bGHgxqb3USYHnsND/Zg3fAM69groanQ1 eAFysicuFdfJYoZONy1c+iXUv/tUeNBdFu8O/BDSViyERH0HcnWKDG769dO5 i6qv4ctYJlFmTsM+7Z8KUsdew1F9j9fuX6QxH52Z4XJbIE9u4I3B/6Sx3tgZ k2jzN7D9pe1o0yIVe1mfy+sWvQXXB6VT0T1SeOvdCeHfzq0gcXJSqEmSwoy/ z4mk61thT/m/f5xwkcI5Sef11iW3QemMQPFTJwWLJBfSg/Z0wFyQcr5QuET6 3Ps9YfWj9yDtV7RFx3uB3DYzW7xhRRcYRde/HqMtkEy7gLc24V1wm5ZqsD/j O5k3G8Dyc+sG89lWXNE3T47bX46sYX4EkzdjrnVnv5FPQmpqCkx7YY2zV+yP VzPkvZwfryp8euFwyH36tZAZMqLN6mN9Ri+YP7y1n2U8Q7rok987FftA+nOo p1riNPmtndxKGe6Dwg3CJivfKdLcsLbI4U4/cAZmwdt6gtzc1pFY86Ifetbt pkhkJkjjwLHL6xb6wYo/n676QkLqvlC3ZhwbgKj9wzxiv4RUOe7XSuoPAuEf U6boJSbHUjSmjGqGwOf05fJS969kGtN/87LBEYgO2kAd1B4mk4qj2YHqIsiP N5QXCIbIRE764pddIrDousB18R4iY/5qEjTki+BT+U33P4oGyYDfCOeggFFI LbA1EtsNkI5BLf6jCl+Bao2lgtP6SKq/2gceWwwlRiJDcH1Pcjwevn2ySQw9 u3qqWp+8I4t2wwumgxiSJu13XlJ/R3I1vctK+GLQFaf/OtLZQdY9r75JmxKD xQjnrwVeGxmmwbPJapZAmOstP2fOa5JWW5TfHzYJaDJvsziiinTL3Xl/S9ok 8B+1inPPVJAlCR+SoysnwV0+6pqDaznJOykbaSKZhNha8aZNZsWkQIXjGXZk Cv5kn9VnG2aT/BNSKwizaWB6uzvGVt0GOtPhKnd8BuyTKojvJrXgosfBpnKz 4NhCZ2uo1sHDHbwleZ1ZOHh335+mk3VgfykguPjwLCwVNFV65zdA4tC9SzTB LOxQstCnsJ+Dbq3kbHbyHOhEd8S34Waw8Y/jimznoWzkAM+/pB3Cejusz2Uu whbbtMwXqb3QU7HHN6B6EfS1dS7Cs5/fxOHEkPZFaA+9bBs33gtim4cjUfQf 8D28sbPdqg+O5AbHZp76ASc+73nc9LEPzP11uttMlqA6aP2ux2r98E3GrEKD S0EOdwTBeX6D8DiZ7xAyIYX8mFIDSq9HQKjCH2ZRqKjxuLKz/eQIDEVfC0lf RkXKR+qunv75xaqg8EcNa6moQpuX43FUBBFuoQyFo1SkdP9uKnVcBB6rQ/Ad IRWVlX5m/1d2DJanXTQuzJJGcVd77hfqjMPpDN7yAWcZ9DzhVowRSwJHTiat vn6VgboV8FqbY1MQud/fzCRFAbE9/GcUrGaBppowdGVeEaHhD8m2UvPQKbwm DmcpISst27wpxwU4GMg1TapXRnSVkayC5B/gozCq3cxRRSG+9r7NOylIM/dZ oqxIDY36Pr6RoC+FAp9YH2AlqyPC62snhUVFZ7J9ykzXs1HD88ao3nYqYlK3 cI0GVyJUuu1aY5o0svF1StCPW4USS/S39x6moRUVq0/b6KxBJbfFuh8Xaej2 uYhbxp2ayL7Ddu++bBnkyN9nmFr2CzokZD+4byGL9F3DD2YFayGt82lFjo2y qGNILiPuoDaKNevmUF3oqJk7uF1Zk0CvWA7rifd01Ed7MJegTaD3Lqmph7rp aCrbq4CtS6AMvV1Z0R/piD06ukrLkEBRbk6BE310xDs/MbvegkC4xs2pSkRH 82FLeXsPEajSV7HVbIGOdO+zV0bGEsiuOk5mdA0Dme3sbmHGEYjV9aZRWYuB 7EZSrt9MJNAZCV3PnGCgs4a/TN9JJdB1ZVH1dT0Gqi7VbcnOJVAam7d7jTED OT4z4Tc0/uzr9smbbWeg417T22yFBFp7aFUex5qBAuTLJ4XNBCKWXRkPtGGg VHvzY63tBNrB/W3f010M9KUDbfvcT6BInZgYC0cGmg+gTh4fJhDlQq0Bx4mB lmk05IyICNSpvf5UgDMDbTy6U10iIZBBqbmwmMNANlJyzRemCbR3VmOsxY2B XDJfhs/NEWiDc3Xe1yMMdNImxiJogUANTpbL5Y8xUPDw3omlJQLZ8LCKricD /QMno//w "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesOrigin->{-10, -16.701332827268814`}, BaseStyle->{FontSize -> 15}, CoordinatesToolOptions:>{"DisplayFunction" -> ({ Part[#, 1], Exp[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ Part[#, 1], Exp[ Part[#, 2]]}& )}, Frame->True, FrameLabel->{ FormBox["\"u\"", TraditionalForm], FormBox["\"Fermi Dirac integrals\"", TraditionalForm]}, FrameTicks->{{{{-16.11809565095832, FormBox[ TemplateBox[{"10", RowBox[{"-", "7"}]}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {-11.512925464970229`, FormBox[ TemplateBox[{"10", RowBox[{"-", "5"}]}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {-6.907755278982137, FormBox["0.001`", TraditionalForm]}, {-2.3025850929940455`, FormBox["0.1`", TraditionalForm]}, {2.302585092994046, FormBox["10", TraditionalForm]}, {6.907755278982137, FormBox["1000", TraditionalForm]}, {-13.633189001170319`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.98260143502917, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.591735126342158`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.311433161188, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.09274396022317, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-11.913403031567354`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-11.761386824268728`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-11.629459281226179`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-9.028018815182229, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-8.377431249041079, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.986564940354067, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.706262975199909, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.487573774235079, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.308232845579262, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.156216638280637, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.024289095238088, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.422848629194137, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.7722610630529876`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.3813947543659757`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.101092789211817, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.882403588246988, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.703062659591171, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.551046452292545, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.419118909249997, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.1823215567939546, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.8329091229351039, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.2237754316221159`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.5040773967762742`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.7227665977411037`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9021075263969205`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0541237336955462`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.186051276738094, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.787491742782046, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.438079308923196, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.8289456176102075`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.1092475827643655`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.327936783729195, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.507277712385012, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.659293919683638, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.7912214627261855`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{-16.11809565095832, FormBox["\"\"", TraditionalForm]}, {-11.512925464970229`, FormBox["\"\"", TraditionalForm]}, {-6.907755278982137, FormBox["\"\"", TraditionalForm]}, {-2.3025850929940455`, FormBox["\"\"", TraditionalForm]}, {2.302585092994046, FormBox["\"\"", TraditionalForm]}, {6.907755278982137, FormBox["\"\"", TraditionalForm]}, {-13.633189001170319`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.98260143502917, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.591735126342158`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.311433161188, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.09274396022317, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-11.913403031567354`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-11.761386824268728`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-11.629459281226179`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-9.028018815182229, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-8.377431249041079, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.986564940354067, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.706262975199909, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.487573774235079, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.308232845579262, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.156216638280637, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.024289095238088, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.422848629194137, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.7722610630529876`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.3813947543659757`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.101092789211817, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.882403588246988, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.703062659591171, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.551046452292545, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.419118909249997, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.1823215567939546, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.8329091229351039, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.2237754316221159`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.5040773967762742`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.7227665977411037`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9021075263969205`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0541237336955462`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.186051276738094, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.787491742782046, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.438079308923196, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.8289456176102075`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.1092475827643655`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.327936783729195, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.507277712385012, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.659293919683638, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.7912214627261855`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}, {Automatic, Automatic}}, GridLines->{None, None}, Method->{}, PlotRange->{{-10, 10}, {-16.701332827268814`, 9.999999591836735}}, PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}, Ticks->{Automatic, {{-16.11809565095832, FormBox[ TemplateBox[{"10", RowBox[{"-", "7"}]}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {-11.512925464970229`, FormBox[ TemplateBox[{"10", RowBox[{"-", "5"}]}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {-6.907755278982137, FormBox["0.001`", TraditionalForm]}, {-2.3025850929940455`, FormBox["0.1`", TraditionalForm]}, {2.302585092994046, FormBox["10", TraditionalForm]}, {6.907755278982137, FormBox["1000", TraditionalForm]}, {-13.633189001170319`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.98260143502917, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.591735126342158`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.311433161188, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.09274396022317, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-11.913403031567354`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-11.761386824268728`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-11.629459281226179`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-9.028018815182229, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-8.377431249041079, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.986564940354067, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.706262975199909, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.487573774235079, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.308232845579262, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.156216638280637, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.024289095238088, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.422848629194137, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.7722610630529876`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.3813947543659757`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.101092789211817, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.882403588246988, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.703062659591171, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.551046452292545, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.419118909249997, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.1823215567939546, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.8329091229351039, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.2237754316221159`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.5040773967762742`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.7227665977411037`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9021075263969205`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0541237336955462`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.186051276738094, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.787491742782046, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.438079308923196, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.8289456176102075`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.1092475827643655`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.327936783729195, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.507277712385012, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.659293919683638, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.7912214627261855`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}]], "Output", CellChangeTimes->{{3.449461289090167*^9, 3.449461378241737*^9}, 3.449462537410811*^9, {3.449492586572715*^9, 3.449492600220207*^9}, 3.487472587740663*^9, 3.554990656249847*^9, 3.554990712248867*^9, 3.557261484117024*^9, 3.5588802185260143`*^9, 3.559309319618367*^9, 3.5593096347074833`*^9, 3.568983323329837*^9, 3.569590101051936*^9, 3.573209733114716*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["1) Ballistic Silicon MOSFETs", "Subtitle", CellChangeTimes->{{3.487474870070266*^9, 3.4874749064759293`*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ RowBox[{"Ballistic", " ", "Silicon", " ", "MOSFETs"}], ",", " ", RowBox[{"Following", " ", RowBox[{"Natori", "'"}], "s", " ", "JAP"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Cox", "[", "tox_", "]"}], ":=", FractionBox["epsOX", RowBox[{"tox", "*", SuperscriptBox["10", RowBox[{"-", "9"}]]}]]}], " ", RowBox[{"(*", " ", RowBox[{"F", "/", SuperscriptBox["m", "2"]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"vd", "[", RowBox[{"VD_", ",", "T_"}], "]"}], ":=", FractionBox[ RowBox[{"q", "*", "VD"}], RowBox[{"kb", "*", "T"}]]}], " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"I0Si", "[", "T_", "]"}], ":=", RowBox[{ FractionBox[ RowBox[{ SqrtBox["2"], "*", "q", "*", SuperscriptBox[ RowBox[{"(", RowBox[{"kb", "*", "T"}], ")"}], FractionBox["3", "2"]]}], RowBox[{ SuperscriptBox["\[Pi]", "2"], "*", SuperscriptBox["h", "2"]}]], "*", "2.5", "*", SqrtBox["mt"]}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Rho]", "[", RowBox[{"VG_", ",", "VT_", ",", "tox_", ",", "T_"}], "]"}], ":=", FractionBox[ RowBox[{"2", "*", "\[Pi]", "*", SuperscriptBox["h", "2"], "*", RowBox[{"Cox", "[", "tox", "]"}], "*", RowBox[{"(", RowBox[{"VG", "-", "VT"}], ")"}]}], RowBox[{"q", "*", "kb", "*", "T", "*", "mt", "*", "Mv"}]]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"u", "[", RowBox[{"VD_", ",", "VG_", ",", "VT_", ",", "tox_", ",", "T_"}], "]"}], ":=", RowBox[{ RowBox[{"Log", "[", RowBox[{ RowBox[{"\[Sqrt]", RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"1", "+", RowBox[{"Exp", "[", RowBox[{"vd", "[", RowBox[{"VD", ",", "T"}], "]"}], "]"}]}], ")"}], "2"], "+", RowBox[{"4", "*", RowBox[{"Exp", "[", RowBox[{"vd", "[", RowBox[{"VD", ",", "T"}], "]"}], "]"}], "*", RowBox[{"(", RowBox[{ RowBox[{"Exp", "[", RowBox[{"\[Rho]", "[", RowBox[{"VG", ",", "VT", ",", "tox", ",", "T"}], "]"}], "]"}], "-", "1"}], ")"}]}]}], ")"}]}], "-", RowBox[{"(", RowBox[{"1", "+", RowBox[{"Exp", "[", RowBox[{"vd", "[", RowBox[{"VD", ",", "T"}], "]"}], "]"}]}], ")"}]}], "]"}], "-", RowBox[{"Log", "[", "2.0", "]"}]}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"ISibyW", "[", RowBox[{"VD_", ",", "VG_", ",", "VT_", ",", "tox_", ",", "T_"}], "]"}], ":=", RowBox[{ RowBox[{"I0Si", "[", "T", "]"}], "*", RowBox[{"(", RowBox[{ RowBox[{"F", "[", RowBox[{"u", "[", RowBox[{"VD", ",", "VG", ",", "VT", ",", "tox", ",", "T"}], "]"}], "]"}], " ", "-", " ", RowBox[{"F", "[", RowBox[{ RowBox[{"u", "[", RowBox[{"VD", ",", "VG", ",", "VT", ",", "tox", ",", "T"}], "]"}], " ", "-", " ", RowBox[{"vd", "[", RowBox[{"VD", ",", "T"}], "]"}]}], "]"}]}], ")"}], "*", SuperscriptBox["10", RowBox[{"-", "3"}]]}]}], " ", RowBox[{"(*", " ", RowBox[{"In", " ", RowBox[{"A", "/", "mm"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"IsatSibyW", "[", RowBox[{"VG_", ",", "VT_", ",", "tox_", ",", "T_"}], "]"}], ":=", RowBox[{ RowBox[{"I0Si", "[", "T", "]"}], "*", RowBox[{"F", "[", RowBox[{"(", RowBox[{"Log", "[", RowBox[{ RowBox[{"Exp", "[", RowBox[{"\[Rho]", "[", RowBox[{"VG", ",", "VT", ",", "tox", ",", "T"}], "]"}], "]"}], "-", "1"}], "]"}], ")"}], "]"}]}]}], " ", RowBox[{"(*", " ", RowBox[{"A", "/", "m"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"vinjSiMOS", "[", RowBox[{"VG_", ",", "VT_", ",", "tox_", ",", "T_"}], "]"}], ":=", RowBox[{ FractionBox[ RowBox[{"IsatSibyW", "[", RowBox[{"VG", ",", "VT", ",", "tox", ",", "T"}], "]"}], RowBox[{ RowBox[{"Cox", "[", "tox", "]"}], "*", RowBox[{"(", RowBox[{"VG", "-", "VT"}], ")"}]}]], "*", SuperscriptBox["10", "2"]}]}], " ", RowBox[{"(*", " ", RowBox[{"cm", "/", "s"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"ISibyW", "[", RowBox[{"VD", ",", "1.25", ",", "0", ",", "5", ",", "77"}], "]"}], ",", RowBox[{"ISibyW", "[", RowBox[{"VD", ",", "1", ",", "0", ",", "5", ",", "77"}], "]"}], ",", RowBox[{"ISibyW", "[", RowBox[{"VD", ",", "0.75", ",", "0", ",", "5", ",", "77"}], "]"}], ",", RowBox[{"ISibyW", "[", RowBox[{"VD", ",", "0.5", ",", "0", ",", "5", ",", "77"}], "]"}], ",", RowBox[{"ISibyW", "[", RowBox[{"VD", ",", "0.25", ",", "0", ",", "5", ",", "77"}], "]"}], ",", RowBox[{"ISibyW", "[", RowBox[{"VD", ",", "0.01", ",", "0", ",", "5", ",", "77"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"VD", ",", "0", ",", "0.2"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"PlotRange", "\[Rule]", "All"}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"PlotLabel", "\[Rule]", "\"\\""}]}], "]"}], "\[IndentingNewLine]", RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{"vinjSiMOS", "[", RowBox[{"VG", ",", "0", ",", "5", ",", "77"}], "]"}], "}"}], ",", RowBox[{"{", RowBox[{"VG", ",", "0", ",", "2"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"PlotRange", "\[Rule]", "All"}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"PlotLabel", "\[Rule]", "\"\\""}]}], "]"}]}], " ", "*)"}]}]}]], "Input", CellChangeTimes->{{3.449460562222568*^9, 3.449461116282196*^9}, { 3.4494613907131147`*^9, 3.4494613914777803`*^9}, {3.449461426115614*^9, 3.449461466649365*^9}, {3.449461600987772*^9, 3.4494616575862083`*^9}, { 3.449461997223049*^9, 3.4494620018958397`*^9}, {3.449462072610474*^9, 3.44946211920747*^9}, {3.44946217109407*^9, 3.449462188733097*^9}, { 3.44950323928097*^9, 3.4495034267107687`*^9}, {3.4495034870546427`*^9, 3.449503539707686*^9}, 3.449503599320434*^9, {3.4495036319146633`*^9, 3.4495036479044533`*^9}, {3.4874724686155157`*^9, 3.487472536710566*^9}, { 3.487472635591345*^9, 3.487472741203631*^9}, {3.4874731743577843`*^9, 3.487473205284824*^9}, 3.4874735044733562`*^9, {3.487473867513051*^9, 3.48747386856815*^9}, {3.4874751412634077`*^9, 3.487475156864409*^9}, { 3.5549909356981697`*^9, 3.554990939459464*^9}, {3.5588802067873373`*^9, 3.558880211530479*^9}, {3.559309435753358*^9, 3.559309443466331*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ RowBox[{ "Plot", " ", "the", " ", "drain", " ", "characteristics", " ", "of", " ", "a", " ", "Ballistic", " ", "Silicon", " ", "MOSFET", " ", "at", " ", "T"}], "=", RowBox[{"300", "K"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"ISibyW", "[", RowBox[{"VD", ",", "1.25", ",", "0", ",", "5", ",", "300"}], "]"}], ",", RowBox[{"ISibyW", "[", RowBox[{"VD", ",", "1", ",", "0", ",", "5", ",", "300"}], "]"}], ",", RowBox[{"ISibyW", "[", RowBox[{"VD", ",", "0.75", ",", "0", ",", "5", ",", "300"}], "]"}], ",", RowBox[{"ISibyW", "[", RowBox[{"VD", ",", "0.5", ",", "0", ",", "5", ",", "300"}], "]"}], ",", RowBox[{"ISibyW", "[", RowBox[{"VD", ",", "0.25", ",", "0", ",", "5", ",", "300"}], "]"}], ",", RowBox[{"ISibyW", "[", RowBox[{"VD", ",", "0.01", ",", "0", ",", "5", ",", "300"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"VD", ",", "0", ",", "0.8"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{"0", ",", "3"}], "}"}]}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\<\!\(\*SubscriptBox[\(V\), \(ds\)]\) (Volt)\>\"", ",", "\"\<\!\(\*SubscriptBox[\(I\), \(D\)]\)/W (mA/\[Mu]m)\>\""}], "}"}]}], ",", RowBox[{"PlotLabel", "\[Rule]", "\"\\""}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}]}], "]"}]}]], "Input", CellChangeTimes->{{3.487475173478635*^9, 3.487475214079968*^9}, 3.4874753381880093`*^9, {3.487475492271779*^9, 3.487475498904523*^9}, { 3.487475623635268*^9, 3.487475642225478*^9}, {3.487475867479726*^9, 3.487475871902646*^9}, {3.487475927649158*^9, 3.487475944968227*^9}, { 3.554990973927641*^9, 3.554990989159918*^9}, {3.554991091093738*^9, 3.554991091533724*^9}, {3.558880311484728*^9, 3.558880339904183*^9}, { 3.5588803853455343`*^9, 3.558880424571966*^9}}], Cell[BoxData[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwt13c8lW0YB3DZe0VmQiWVUXopla6ySklklYSk7JmQElJaMhpGEpVSyN4r svfe+yxHIusQGe/znOf85fP9/O5x3cuDlLXrxRv0dHR0HAx0dOjPj78KPZsf G5zINS50t9318oQDvWB5lsABUPztEmma6AZLwr4ZYQInwQXvryifGADHE1Nl 7wvoQ7pSx0v6xHAYnay2uS1gBQ9ETyZEfUqAzJAOencBN1hRfRzL8TEDREf6 2l0EAiBov2zJVGw5tDCbFzoLhMNRu3Old4LaQGD8/OUXFQmwdV3x24WqMXBX isUzEb+C73po1jHSBJyRunNulvEb7A7q1tpLRwZJXtPsgV3fYCS88jaTKBla pvmD0m2+wYLCvN3T82TY9+2Z9GXCN6j+mNlWmk0Gwg7fa6n4ZLgwEpDacG8S TLguj17EpYLeyvOXHFumQH5N5bQa/XfoTie0pwlPAeOUQPoe6e+wqPqu98SB Kciua7u/du07/DMdYdxtOQW8D89IfBn/DsvmTpGsJVNQv3r46spYGhCHx2Kk PX6DhOfz6VbXDMjh+rflSus0bGvquLYjMANsLurr6ZKmgWuXaI/Lyww4cU/4 2e71aVjr/FrGlZsBRzrOfA/bNwMDh2rCzq1mQMzct9JTD2fgzQKdUu3DTHhc GPFj26E/wHnLy6ssJgtInoRtB2AWGBtLf3GlZME258ctUjqz8E+ayfJqSRao c9r+x2I4C786Xp1eG8mCDGMc+/ebs1CnlCl8dFc2iGX9/GXzYhaC5qeKctOy IebX333BfbOw6n5tM7UyB8ST0iNjb8xB/66q/K7OHDBQ+m3s5TwHBb0ybmv4 HGC8Ovha+/Yc3Fb7PXaOMRf6s5bjax/OwSyr989fmrnwJTPVUPfTHEzEhzyS rcmFnt9z1ddH5qCrOZ8jsS4PvPKbzH7rzkN2gGhVY18epBdmZPkbzsPLQ373 Fsh5cGPsmyyb2TxciFGfVmfLB/HdN59s3JyHBpvmlnGdfPijLd5yK2AeKv7h InY05kPFsqV9aOY8pO3lFo5tLoDR6OgD+ZwLIKxWz7t9tABedZxUDuNfgCD9 h2zxswVwMLErz1x4AS55r65+3FoIFX1JV/p2LgBDNWk4+XIhRPlvXDE8iuRW Pz4VEQtBSkfp17UbC/Dzlu+748uFoHrUgxjpsADyj5XflLEWga65DO9P1wWg T0sJ/rm/CFbFzKX/3VmA7/+i7Bvci+Avm0Pgygskj3JTHFgvArlbXx4ezFkA p+T9suY8xdCU822tpWABektJkiOSxdDXKWJ9vXQBUgnm/DiNYoj1Ld/tXrMA pko6lMmnxfC5r5gg1YfkzVLFK4IlYLpRO49bQXLGTm0RhVJYD1Q6rnp4EZ55 2j3QgVIocvnsXXx0EcoI66V39Esh3WrcWeXEIuyqllUe8CgFrpXSgm1aizD/ 6P7O2PxSMNhlyfbg4iKEsuyj236qDHB1X8K5nBbhp/ePY+cvloG+DL5T0nUR KBNG3n7Xy+DBWsVjeY9FMK/znxl+VAZxHkwuh3wWYd/T7qH3DWVQq2TiOB+0 CDXsgYWSRj9gN71nlfbbRVj13UbRv/EDIqW2H196twjyUykHAr1+gFbV4c74 +EV43diTNB79A4zvqj0bT1wE6xC5yI/DP4DMV6Mumb4Im8xOqi8PlcPMa76l Vz8XIfaJ0DaB0nKYlV38/Za4CLIzf4yFq8uhurPB0n9iEfIM696IN5dDwGhd g+XkIrRJ3BHcPVwOcRWySQLTi8CcOyCgsl4OB2Qnz1xYXASP8bitl9QqYJZ3 PISbngJ0p70MzbUqoCbXczaXgQIvUvVeWZ2vgKnDb39cZqLAV+9NfvurFXCK QaYkkpUCI1zX+H39KkDlxdxvEjcFdI7u4ntXWgGjDKIMJFEK9MSv6SdUV8CH IT5tU3EK2DB1hyc2V8CA/w2L6u0UuN/2iPf7cAUMbYJstCQFcm5O8JStV8Bi 0sMWYRkKSL5K5h5T+wnTQtPZzw9QYHnqAOeusp+wQynGxkqDAg2Byk7dNT9B 2vAihGlS4L3Q0abg1p9w28TjSLEWBTQ1NEImx36Cov1sPPsZCrx8a8yZzlAJ 5vhby491KSCn48t5VKcSotq2q9EbI+sfve80ZVAJzdbb5plMKNDpGdT0zqwS vq6JyrKYUsA3ISRk07ESSnQvKtBfpkDt8nvO6tBKIOGPqQ+aU8D6SyWnflcl jJfNX5KwoYDK8TqnLcOV4C1hWrSGmK2jqSmLWAnCTF0LfTcokLHeHSK4XAmZ 62YMz20psG5E5hwUqYI99LKSPQ4UiGbg4rppWQWGKSLPOd0p0GJlwnXvVxW0 UjqnRe5RQDDRLixmvgru+AYnZiI2n/Dly1+tgoGt2Uun/SjwyzlecJ69Gu43 cfu63acA813ydrv91XBTwN0wM4AC8MZXwcipGk7NL8wuPqRAcF9IhrtnNfIu LRq9HyHzicUrhd2rhjT/bLcVxOYfK1UaQqqBc0Viz0owBXzSOeHk92qwejMU +usJsp769xfkZqrh0xWJyKgQ5Lw4M9t1lqpB/8nQVdYXFDihX2lou1ENr28y ifogbuqZMP3IXQP9bYfvGIVSgIw/YCWsWAPis5aCW8KR89/46cboVgNvvvHX 7H9FgQiliYihuRq4xd0r0BNNQb7XN5XbV2pgkSOVXzYG6S9I6qveUgtJQg76 dxCfWCHsSOerhe1HA1+KvKXA7x+474EHa6HNzM7KIJYCZ86P1Mu410L2Y5+I +DgKLJZddRa7UwvRCj5GJMTxB4Z5eQNr4e4xVXe59xRY2jpkuhKO5If/leYh ThzoJzZm1ILN0aTmynjk/th1b3GfrYXNjfOMFR8okNpv9PnG31r4cWsf7wZi 03NdZ8zo6kC0SD3k6EcKpCl0hmnw1sG3yssDmYjNKW3btx2oA/WLhLmYTxQo eNCkWuxaBwsjKjsNPlPALa7SnelPHfT8Yv56/Sty38BVOWm5DtZ2NuNeIzYc F105Q1cP5a9M46sRq+z2CAjhq4fnJnkfd3+jwL9UybCt/9XD/qNDi6OIg0v8 UqXu1MPTdZbWEynIeVrsdasMrIeJkse5dojt6boP3XhWD4FtdgdeItbVlCv+ GlsPpg9eTeAR8zcN1CuW1cPwSI/Pg1QKxA0enlBjaIDTN1nZvn+nQKgfPnmU owFC/57LaEMcsCPMJVCgAVQFB/8tILa+TqJU7W4A+9DAINU0CshOvWbUPdMA r78vO5cjzlmdkzJ70QB7eULdytKR9y6Sau4l1AhqePvagEwK8q5vqD/c0Qgv 1HiGohG/LpCQfbmnEY4crczLQGxhGrHw/XAjhGoGlI8iXnjt9Yxo2ggbRXv+ O5ZFAXHeUwVG0Y2gWzfJTUYcaLkaZ53QCDuvFP1cQ0xKyw5y+9oIeMYMTb5s 5H6fl7kQUtAIt00nclQRaz7nIFX2NYJrloHhE8TOzD1bD4k0QcOfhV/iORTo MA5bOSnVBO8PFecpID7y+cyo3t4muBUab3oSMb1mcbKDahPoHTETvY44MjDh 1MfLTRDEHJf2BXHZmoMr39smsC0JsJXJpQDvwmbDH9FmaM0wjWTPo0CxB7Et eWcz+G+f7BJGfHO+oeeGXDO86lGbkUFcMvcGN6jWDB9McrLUEdvN7l+ttWoG vdPKL3wQl0+b7k340gw6nC59w4gdndUUr6Q3wxWjdzOTiLdNSytvK2gGNyYF IgWx0+/pkyH1zTCXUOXJlU8B4amgSz6/m8HGIEzmGGI3cvpjfaUWSNa/LxyB WMzuzQuOYy0Q1F11ORZxzYTvqxqNFsg1VAn4jFh8Qiv+uHEL6OZl+hUiriMO 5sn6tIDclsfqY4gl8SwkurIWYNE2kd9bQIH2YUvNTJ1WUHA5eigZ8djzLEeN i60wrXbdIxPxrCrTq26zVvhxeup9AWLuyOTxFcdWINf2ltcg1tWj3FcPbYVo ZZDHIa4re1bY2dEKyZWprYKFFOhzGh67MdgKD9oUVsUQT4geYP2Lb4VmtR4B acTM3t0m4pRW6Iw/LKaA+KMQr28WRxuMjr1300I81mom9E++De5oPLN0R0yW YdyvqdQG/516+94L8azf9xMvVNrASlOu7S7izf10N3dAG+yJt+IIRizx5HOO hn4bpDj+IMYgNj85axDi0QbCSXjtH4h7Mx6FbM9vA/y2ptAtRcj3YUQ5U7y4 DfoK6kWYEJtxkrrFfrSBYYz2O1bEI7baO0Rr2yD5HM8THsQECZasbb1tMJ/B sS6OeDbkSS/PchukeoU6qyDOKjqyxv2vDd5++HJHFfEtMlmSe7MN2o1c7h9H vKSh48DJ0g6uZhc91BGvr7Ktswq1g2jreSY9xOz2z6XpD7fDt5A3pOuImyKP nd5yrB2O6wc/uon4RdWUIx20w10POQl7xLySurkb2u1gxtt93AXxtl7OM/9M 2uGEnfJBH8Q7tUKdF73awX4zjf454uNSEQWkvHaY3Uj5nIpY0tbU+XhxO9Sl lP5IQ8z0fbv0yx/t8KzMpCsDccuR5Odqde2Q0GA6nYPYSr/S4nV/OzSLi42V IH7oT2FUX2uHpiWLrkbEdtXFhVF0HUAJ0YxrRnye44HLNGMHnMh8eK0VrS+K uy+aqwNIXFpDHYi/pu1J+SPRAQbhvO/60fUOXzaIO9UB39lq9UiIM3ZKMi9o dUDembKOCcRv7ElFZ852QL5P5cVJxBYUj12LFztAplHy9G/0PDhDls/adEDS JNDPIxY4Xhb3N7gDtu552LCG+Opb6V+GTR3wiKNnnKeYAmt5f9It2zrgfRLD BC/it50ltx27OsDZNG+SD3EPp+mWoCGkntmfE1sR6/s/F8763QERdyVqhRBr 2Cxq83J1govJgNAOxLiACk5xvk5wv8T1F3VAXGjHHsFOaDTb0SOJuKRH1gK2 d0Lp4OJzacQqOldvu8h3glLpwshuxHsVaj41ne8EO/xjGTnEdWdf2fcZdIKi +xoJ9U1bK0WCcSfkSMR9lkf8MWG16N/VTlCJ8NyuiFh8q2LHPpdOmHajLB9E zPM3iu5paCfyd93UlcOIKRX2V7VakflXGf+dRJy3pJud1NkJnQHxr08h9tl/ gI29rxPyAz/LqSNefb2U0zLWCb/iGC9pFKPf5yDOS/OdQOIJfKeFmJ07rthB sAvqfo6M6iBuUg/gaxbpAqcLXNZnEb/wvm6rKNEFDgxEHGre8b1bF2W64NJ6 3Ng5xII5eQ5+R7pAfTCy6TxiSbM2kfArXfDu0DN7A3Q/Q7Nd5y27QGpypBf1 p8rIaiObLmBX5NO6iFhG/qq7iHMX6NeJiBsi3k/3q+7j/S6o+s1VaoTu7xcG n9wPXfDcfKnJFPG5eZWegYkuMByjO3wV8YmythLZ312wZ6jtIWqlZw6fvGa7 wJHQ245aVPq9G/9KF4hxv7S3QEw2YOI4y94Nl0f+hFkifpjZCYVy3bA8vF54 Dd0/P2cZloPd8JNr5xpqRx0WLmPlbjjjEKdmjfji+NGBWbVu+Po7qgy1JN9H T9kL3WC11FFwHb0fbm7foty7Yf5rS9gNxBnH2cOJt7vhuTBbHepPrIleh3y7 YWRP1ibqZwm9Gq0PumGWwcT5JuJLbSdGmF93Q/BFTnVb9LwVubZ65XXDjjn7 DjvECn++3TP61w19WrgoR8RDEWc9L212gw19cynqp/9NOZoz9IDlE3M8asId uSs2HD2wf6+TvBPiGMZ0VU+xHogJty1FzSias/TqWA883BXY7Iw4q8RoJgp6 IJ9FaAa1pSWFGKvRA471FtwuiIsSVbo/neuBzNeMeqhdFQuzs6/0wGuW8nrU A5plbp13eyD6TWS2K+InExZ2vf490NoW1Ypa+dmm5WBQDxx/YzSFOrz15AX8 8x4w2s0i7YZYy6xSfiG2B8LmzUNQZ7jW/eIv6QFhUwNjd8TBbztsLq71wIyc XokHYhPjp79T6XohQqSgA/Ue3pOeLEy9IOhMIqOue/Q9qISrF/K9ogVuIWZz f/JRZkcvDMUY26MOOX1ibPVUL1yYyGP1RGxOT7E11u4F3WfFYqjlSlP+pJ/t hZJjYQqom5VENm0Me+H2dIIham6Jxe2tNr2g0xMcizpi8duVT497gd75p/Rt xNbpVvj1573wcoCghFrJQcjxUngvsFUMq6PuGH3oyxXTC6atBtaoBRotY7yT e2HPXqN41JEfBHvPNfcC5xgfvxfid3qBFxf5+2CTXmIYtczYiSlGoT54XLs8 gTrDfS1IUAzJt+XPo65+7Z2rsrMPZApJLN6IZwache8c6gNjaf6DqMHWbGTd sA/KBbvuo274K+TNfakPnChST1AbPevm2WHeB1wfLkWgtvuuf+qkTR+o7Ar+ hDp8QTvxgWcfUG701qDG+R9yYHnTh3yHnrD5IHbim6MXjukDEYeHfKiXPqbF ysb1Qc+mowhqjpq9zTqf+2BfAv1e1P9xSh4Iye2D5K7zp1E/iuZc4u3pA9z9 hwGoZTOJgaJC/TBd8JqEmtB/OWWbWD8MChr/Rv2BvqWLf0c/qJayz6MWNcrb w7GnH26qnFunzrcc3PxPpR+STu3fegfdj+OyIsMmiHcGH0edfOOder9ZP1R+ 9j2F2jaU16nboh9cN29qox4b/VvWfLMffCL59FF3PKi3KfPqB1Y6kjXq3DqH jPjIfhjQvhuM2mNupD/2LVKv2o9nqBVEDRmi3/fDFMffUNRfHI+ZhH/pB9nF c1Goo7k51wLy+sGM4peE+p7R99PWPf1wOlekBrX62J+RXdsGYE9xzxpqaSnf aG/RAcDLqtP5It5izXixQWIAKOFfGFCX44WrXfcMgLOCITtqtYlTKUVHBkCl S0MI9ZGZV976V5Dx+uIVUQsrShz8ZDkA6/aPlFAvu379Rbk+ACJidsqo8+ZK rsY6DQBXM/8x1IcoRA2S3wDQ1XBqo1ZYO8x7L2EAzj0vNUPNrfazviVxAB5v qFxFPe2nGyT1bQDki79Yok7dtFqqyRyAt9neNqj3Mjwb4qscgP+q251R72If +ppEHACClY0/ahHhgFOd+wYh5U7ge9RZinycQwqDMOu+NwG17umPPQSlQcge a/2A+r5XlePS0UF4dED4M2pcF2ukyLlBUJewSaHOHxHxy9JxENzZLuaj1vom nWvnOgjppWUFqEfKs/3dbw2C8qB0EWq+2W6BoLuDsO4+U4LaS08UvjwfhJaH Vj9Rn+T49Op3yiBoXUlsQt0v/Z8FJX0QtFn7m1F7HK2W3cgeBL5XnK2oP9tP lPKUDMKmrls7ava6/WSlpkFgEhDvQd31MOf4nd+DYCL1awS17UY1kUl+CDqq 382gHrsqEFulPASHjUNmUV8qtdYPOjEEQvQ+86jP3NssotMfAuZ5mSXU+1aP hP/zGAKJFfl11B8vP9YqujsEkm41G6jFCrtXfR4OgeNuB7q7iDl9PG4svRmC 2tFnDKinKSlH5wqGYO2RMxvqm8arf9IrhsCHPMKOeiTnzGeXhiGYdzrAibrl FpHn9+AQHLAmc6POmJMgkjaGIG9jfCvqW9MRYUOaw5BaliuOWo6NTY3VZBjY fuRIoCbtCvh1yHYYMmRTJVGbmbtoPX86DIIHFHahFvAhzue9HQZ2j57dqJtf mSfgUoZhEHz2oD7ZePafasswpJi77kO9Sqr4emN0GHgEvu5HnU2vahIxOwzB noLyqJ0kMhhKt4xAfpifAmqZo3syyfwjcCh2TBF1jLsg50nlEXhCv0uJuj/f GGyjTEdgp6/xf6j1ImXPxnuPwHyoogrq8KDz8klRI3BCd+0w6g43D970/BHw f/hAFfVWi6iFvN4R0NBcP4ra6FxJT9nyCMA15+OoI4+MF9YIjcKrD51qqPt2 M8e1HB6FGreSE6hFt+4P6DEdhTg+vpPU9bv2nL4QNwqBTCfUUQc0BfLU4UbB 9WivBuq3ryMdJQXGwLvUWAv1grpT65DKGDyPKtVGrcnxKCnPewxGX1ifQf26 M84/vGAMdo5066Bm5ZG8vvPvGBz249BFfe/sR+28w+NgQjSmWpI1eH/WvXG4 vRFOdWW1PW9axTg0pxZTzfiniImDHgf22+/qo9YS5vxnq46DU+HhVCd8r9gX qYmDTwoRVK+pe5tVaeOAnfU8df5LfXLP5s/gQOkT5mxnXKHkORxUHdejmpsh elLvPOIuzA7R50X8LuAgQuE1dbwaeQadFAMc+FRilqos8Ok3xEG/yRuq711y +cpiggPz3QbU/n3TO/uUL+FA5E4kNf8vqJ/FxgypT/MiNQ8TDjv80hwHAh2Y f33XtC23wAGfhSHV2hqrkTNWOLjgOmyK+mNfeo34dRxUuhtR83XnG0tnb+Dg QMAINb/EICZzxxYHff7G1Dwnus04yR4H7YwmVPMqBD/qdsSByxPMjpXHchlc cJDJbkp1zaU5wkE3HCQ8xyw980XAygMH0xHj1PHvB5lrhnri4Dgvjup+YX7P Ei8cwAvM/6XVfvrlg4NVVjzV4Rp+ncJ3kXrXLlPH+92nxHDaDwcrt82oPu1C Vrrtj+yHJwFbH8N760+BSD02V6j5RrThy/YgHKgOYDZTYPu5+QgHIXrmVOdW ls3JP0HaV2COcHF0jY/BgcVBK6qdRYSneVNwEHblOtV1ac3i8B0ZrwTzLs0g Xed0HEyI2VAd0H/kXmwmDnS2zFDrGXSZSanPxgGjJWYVxsTB5VwcNBRjfhlz mUOmAAexQn+onlHgOWZUhIN7Hph1qqocHpTg4IfWTer4dH8UG0bKcUBYwpwv Erv3WDUOXBNtqeZP179sX4vct4A5an8XTeanUfU4cNezo+YN/cUF1Y046JKd p+a7Xd3JC804SL2LecQ1WXK9FQevT9lT20e64S8xdyDjv8Cs5y4ewdOFg5d9 mJk9jOuFe3CwJu1AtfetWtX9A8h+5mIme6omq43g4J2WIza/9/bn1iQcaF11 ojrVd4vT4xkc3HRwpto1oF6+fQMHMTddqVYKjvgjyoOH/9TcqS6MkLqVpoiH 1w89qT4Zl7l0Sh8PlkbeVDdtGv5TtcJDc6gP9l6tlzYPuuHBMesO1e9fnaZX 8MHDgeO+VBOqohn3BeBhuByzCp88094HeNAcx/z4agWT7EM8ZHOH3qS+x2/G zHuC8XBfAfO+pUlmmSd4WDuPuSWUn3VXCB6EQzC77znGJh2OB7Z6zAWXQjgk ovHwFMKo3ng6zCWagIdvmZj1e9y5RT7iIbgZ8wdpZh7hRDyot9jLoZ53ecsj 9AUPvozh1FyzWIF321c8ZDA6UPNIlkpewWSk/w7ME4amfAKpePhnhLU/kjDF tzUNDx5GWP7stz8/fwYeHrtgHjoisJUvC9nPJ5jlH33dypuDh/4SrP/99uMC PHl4MC7G8rbt7QLcBXgw+oPl0g43BLmK8HCENYLqW3krgpwleKBjdqS2r6IP 3cZRhgddVSzfdkFaiL0cD+9VsNwuNk+I7ScebttjeeHEWWHWKjwcCsTM/t+o MEsNHgqiMZsH3BJhrsMDUwbmTeF3ooxNeOT/acwfM6vE6NvwwM3xkmr6snTF c4IE0E14TfX1hrcar80IIOcXSbU1c63xpC8BUvZHUX1NfcH2RCwB7lZgHqs/ wq4TT4AvHZitDO6nGn4igD8es6Tgh/VLnwnQPEVr31epZ5FEAKZFzAnvSPHX vxHgmSJhgNrfim3OLoUAOc3nqH8vSe6SU3f5ToDMbsxjE3qvbqUT4NFprH1C ijvBJ5MAt4lYbuX6Wvl+NgGkTLFc8lB+cFAuAaYWaf2X+nuf5BPgyRrmhKI1 2dBCAmxj1MX639/h+6qYAN63af3V1RujSwkweg/zGNMN8fc/CHBeFGufUP/Y +VMFAV5K0fq/SC77Wons10taf4NmnrRqAuAVsXxMYNYqu5YAgwm0+vv4swrq ESfR1v9OmaGskQBjmlh7SatLRpXNBCg9R+u/8+7nulak/ou0+SfilprbkfOq pPVPKT/d2UmA3nra/K746L5uZH9v0vorMf8a7iUg/4/T+i/JHsP3EyDsFmbL onMh5EEC/LuDOXGFfi6ZQACxN5h/HSkydp4mwM50zCWs5Jm4PwSw3kGkzvei T/BJyxwBKoqx3OKrhtTmAgFG9mP5AR/3IsUlAjAqYe4Uav4dvkoAyROYvfJl d8xvIPPrYD7z2KRAegsRpojYeCKmDw0MGYiQOUWrRybrVxATEeznaPUsjQbl sBCBfxnzixqu7UQ2IqSu0eqJPJYnyEmEHU60em7aX9DmJkKcO+YtKlFkL14i SHOdp7bvYKoOTOInwgN+zInd86J9AkToEsJ8+7NkDqsQEYS3Y9a+rXdeVYQI yiHYeMJa90j2YkTw2oPlkwLJ/m+3EyFCDnMRoVe4cQcR3h/EHJLDlPVPigjB CVj/T5k4TSYtIoxPYi5K+9HLbUcEblkS1TbihKtf3YjQpoyZ+xkr4dQdIjBq YMaXiyaF+hHBWQdzwbKcw2AgEbIvYJbemte45SERGi9ifqEA8rLBROg3xvxX py5U7wky/yXM1jcMZj2fEcHhbi4bWm9TwIBBbAgR+iyw/PC769kVoUSov4b5 Y/5vAXI4cl42mDk7b3txvyLCK1vMXjMbvf+9IYKTA+ZxtieqV6KIAM6YdXfz xQbGEIHNDXPeybdrSbFEMHmJzS9pvtOiJY4IT29j+XPv1B+L8USoi8LypZfK UmIfiTDji+VWaWUPTiUSIdIPswqxTSv0K7J/DzBziONZB1OJMPuYNt9TljDP XGT9EbT+y/sFucuI4BKLWVnhRJ/ZT+Q8EjCz39CPTaohQlQiZs+A/rXmOiJ0 fsE8GmttsdiArOcb5rP5Uz9Em4mgmoI5p8NT6lQrEf40YfU/ZXtMeNFJhEPt mC1OxiQN9BLhWjfmuivSbFsGiODRi/mQd4rDniEi3O3H/P7lf03nR4gQMIiZ Na1U3nOMCL2OQql+iD3qtcPe4ojgO4rlw4TW2XICEVzHMZ+hu3xxgkQEKzzm LDFcNtckEXSJmMUPOwr+N0WEgxOYH19c9DKbJoLAJOZ5Z7++gD9EOH0Hm8/8 KfPRpDnk/d3FvIt3a+LXBaTeGaz9VOQO7mQKEfbN0ubbLueTskyEnjnMvolH cKkrRPBbwMyWZZCXvk6EiiXM0T8cnmVtIcHiCmYrbe/FbAYSjD7F5tvTHGSR y0QC4XUsnzEMr8tjIUHiBua8gXdKBWwkeBSKtfe79u1dIQcJMrfkUXNNci5z MRcJDjFg5nT96VbCg+SMmDspLQOlfCTYz4yZW+7Q/nopEtznw3zWOupu10ES bIph5p/8ROw+RIJT2zH3u2Zc6FUmgb8E5oSlksK+wyQo2oHZzq9+54AqCXTT sfoOMPa8GDxGgn3SWL78DLc8pEaCnEwsL+P7c20ESPBiF5YHR/9rHD2FjLcb s94OVpVxDRKQZDALfhFIwGmRwCYP6z8kJ8VOOE2Cg3uxPDFb3pOoQwKjfZid jh4dIZ0jQWMh1v5QhfYZ8nkS8vsNy1dPG2ZNXiBBsjzmny2W4lMGJBApxdo/ M3YK/m1IAvkyzAZDPrPTxiQ4+QOz8PVHZn9MSbB8EOs/NhlRNXuZBIyHMLsu J0cvXCXBNmXMG4xVTkvXSLDjMOYX/MMnV26QYLsqZnHJJYE1exJsPYYZ/4Xe f92RBGzHMSfL80xuOJNgg2aPHDFDOjcSzKlhVj0mW7rFgwRHInz0AtHzawFX BU8S4ADLf1mZSl3xIsH4ScyVCy6dj31IMHIK87vg4Ec5viToVaftf2ruJJc/ Cao0MdN1EM7bBpHgizZmm+0a20RDSKB3FnOd3YeRptckaDuP+cO/gvCVSGR/ 9TD7hrapy8SQIOgCZkMp8uLFWBJc1scsl7P5xT8Oud+fsPqZTgtdTo1H7qMB lo/0K3D0f0DGv4g5z0m7lCmRBO8MMYdtXnVV+kICOyPMJ3e/6HyeTIIVY8zz Z0sOE9NI8MAUc+Nw5yRfJgk0L9Huj9tU7IlsEjBcxuzHwKDnmEuCCppNIkXp ovNJ0JWK1ae4VymrqpAEKlewnLVEx2aumAQzNI/rXdsmUUaCT+aYi8Z96s6W k8D0Ku1+snyVS6wiQaEFZgn53vD1OhIIWmF+4KN8OaOdBPnWmImVr6SuD5BA 7QbmVDP9rLop5D7YY/ac49RQWCfBVRfMigVOkbtPTMDIXdr532+aFPefgNZH tPcsdlCE8n4Cvj+lnV/BmzPNZROw5QVt/1jOWBW2TIBfKOYC41XvzyPIeGGY F+91BsWSJuBhOOYDialhETMTsDsCc8vhmDch8xNwi2anxkexj5cmoJzmY4L3 JB79nQASzeyWHh8erE4Ax0vMfV/tdgWsTYAizUnzFkl+GxPwCZ8qHoX4yRkr jy90ZLhLy+3eX1NrpSfDJ5rPLFqz/mUkQwPNsmdtOiVZyDBH8yTlpr0HBxmO v6K9rw/2m5U8ZHhEs9yKy35bYTIIvMacpu9pyi5Fhvc0Z23eT9dXIsOHN5hz 056yRGmQISwScwlnfP7Om2RQjqa9N4cc24wnZIiLoY3nOcDQGk2GA28xR9+n S5j+SoYimnvg0a25ZDI00rx1C/tpSioZBmnW/xkqupJGBmYVJTwgDg3aOrOW QQYhmhs1oyvosskgQzMr8/Y3jLnI/F/dFHMQa9d+sGPNJ8N3moOeyBznLCSD Ma19uU4KD28xGWxo3mA/gN9aSgZPmo815eQJ/SDDFK2/zwvVZ2IVZPhLc55e 2dUdlWRIoLVf4NE4uLOaDNu+YfmB9lrGPbVk2E2zy0vdvn31yHpp7VMN21MU GslwipZPCpj4KzWTgUzLZXoGLqq0kmGJZpsoS5mj7WRwoLUfEbFvPtVNhmCa L7/z8NTpR+qhOfLq8unzg8j6ae6SuCdmMEwGw8PYeHxjdH+MRslQR8v1Pjz6 eWmcDM60PMSaPdIcTwZfmut3htlbEckwTWvPTNyqZjNBhlWaNb9E89pNIveH 1v5oSoqF9xwZeSeYFTPKUoNXyLBOc7JSnWHoOhm2HsG8K7d99c2WSdhLs7WX SUsMwyQcojn+8OCHOKZJAJqH/lre/sAyCTo0ixYRznxmm4SiZKyeQ/249k9i kyCYgln375jZR/lJsKVZsYRODqc4Ce408wdIrkspTcJdmikaJ1uu/TeJfL+w 8ftYrOI/qEyCDM3vw+JPSR2bhCM02wiN4hNgEs7RPCtjIZtwZhLcaPZTGXaK N5iElzSnefbff3d7EjiOYh7L6g6PiZmEWzT/D/7dkuA= "]]}, {Hue[0.9060679774997897, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwt2Hc8VX8YB3BEkZGEUFYa+hmJKCmPpLQpQrKSPUKERIiGlVUiDaFkZpOV vffe4y7XvqUo83fOPfcvr/fr83yf7zrHdYmaOtwwZ6Cjo2PaQkeH/oyf/u7S 8vy6MssplY8Pdr9UtmHgKc/mlgFl28ub9m9tYYnPIzOUWwXcjVhT9799BKcS 08Qfc2vC1hDcRkdMEIxN1Zg94DaBy2d4EynRsZAV3MngxO0I80tSO+Nep4LA aH/HPW4feCHW8dfjRTG0bjX4bs8dBgEdvL77tJuAe+LqrZCKOMgxPPBILWgI 9HndlPbg4kDwOlsGT8kQfLwcJ5jM8AkWF6vvNM8OwX/5vyaqz34CoeWYj1NX h0El6I3NWs0nqOk83DzKMQK28hOPbBvjwa1O/3Zo0ChUBrh8uNiVCM9VXKLd C8bBSTYWz0T8CgUh/9qnbfBwQfThZQpjMjikNx7c5o0HEU7dnMH9iDUgjCsS D61zXH7fzJLh79Bnh6UiPPyXHLjvFiEZ9ngQ9v9kIQBB2ONOGj4FOD5HCiYn EkCH/dbYDVwayG15oYhrJoLUmoL6aYZ02FH/tatllAiMM9zfDu1LhymPq2ZJ FCLk1Lc/XruTDtZHR67v5yYBp/8FoS8T6bB2ZbZGTZ8EDSvHDf+NZ0C8TtSv PXgSCLkEzbU5ZML0Dbb3bJOTwNvceUfYNxOmyvt76f9OAvt+gd57EZmwqVVl O8FMhrWur2XseZmgeFMp2fg/MgzK1YZeXsmEE08qw/XsyPB6kU62zj8LdkUL /Do9SwY2Z1fXsphssI9LfLI4NAWMTaXT7KnZULF2Runk9BSs7mMyNizJBv5P pyZs/07BdGek+tpoNnzysuYL456GetksvpP7c0AJ/1Vh5PI0+P2aKcrLyIHX f6pZI/OnYcXpzmZaVS78GY/Q/OE5AwP7qwu6u3LhhniAUtbzGSjsO+i4hs8F XfPLeyMiZuDB6dnxy4x5cPfOgZ8iX2eAwuxWOa2WB6nff11x6ZyByY/BT8Vr 88DlatatdbFZ6G4pYE2szwd33UGG1aJZyPERqG7qzwfmp+yspKpZiJDz8lwk 54Oq0EprRfMsaMSozqmyFEC34mT95dFZaDRraZ24WABfE66cSaWbg4pVXLhw UwFw5mfe/qI6BxmHOfhiWwph7rVcHl3JHPCdbuAUHCuE82J32Yur5sBP05/l I6UQYm8nkcyb5kDPbWUlftd3UJ2KcA4ZnIMtNaSRlFvfodaOTf/gXyQ3+ZFQ RPwOlQ8EPCNk5qHS2ePdqeXvcG16r5jx8XmQei7/uoy5CD5JbHwVVJ4HhozU Z5USiMurvjpenof01TfWjU5FUG59acjRHMnfOB4ZXC8C++PuO+ei5sEuRULc YEcxHFvKGZh4Nw99pSSRUZFi2NNVOdQQPw9pBAMu3NlicA9ZxDlnzIOu7MU/ UwHF0DltcEO2BslbRIv/8ZTA7Vd8srYUJGfsOs8vXQpnDun0GSovQKCL1ZOL UAq3wnQ0WlQXoIywXvpQsxR4jltQZNUXYH+NuPzg/VJoS2JZHtdYgF9PH4vF FpRCFMVvV6PJArzc9h+d4JkyONcgfXTcZwEq3X4oXb1RBve8bJOL/Bfgz6S2 m9fdMkiy3mYZ/GIBDOq950eelkGQXewST9gC/BfQM/yhsQzWU4+qVH1YgNrt vt9FtH/AjVNn1l8VLcCKB+8fTfMfIB745f1M6QJIzaTK+Lr+gOtTboEnKxbg VVNv0kT0DxDz5nlRUbcApsGSUfEjPyApVK3mQfcCbG61U4yQKwfO+dVg/9kF iH2xm5e7tBx4bh60bGelgPj8wk2+mnI4JbXy/B8bBfK16l/vbSmH+XR2XhEO CrQLPeQ5MFIO8jItL805KbA1b5BbYb0cJrTqnnRyU+D+xPtdeqcroOg9YeCE IAXo1F21DM5VwL26OmklIQqEpF2LNLlaAVZh/ipKwhT46rbJZW1YAfyqmunH RCkwyn6Hy8OrAob82qTYD1Dg4sn9O9+VVkDdP5FSPUkK9H5c04yrqYD7R/cy KEpRwIypJyyxpQJs1Swv75amwOP2p5zpIxWQbFa42nKEArkWkzvK1ivg91sJ 9f1yFBCJTOEYP10Jd+e6d7grUmB5RoZtf1klWNpm7+1To0Cjr7xdT20lkHYo fw45R4EPu082P2urBJG9lRaq5ymgdvZs8NR4JeQmhX7+ok6BiLc32b5tqYL9 1prP9C9RQPKiB9vJi1XQpcur56yB7H/ssd3M9SoovZStu0OTAl0ufs3v9KtA E1felozYIy44eNO2Ch42zx4fvE6BuuUPbDUvq4B1f/HVw9oUMP1SxabZXQUn rQ5+9NOjgMKpejv6kSpw/DTVynyLAiydzc3ZxCrQr7LJCEacud4TzLNcBRWx jgFh+hRY1yazDfFXw5szntsCDCgQvYWd3cK4Gh6tsDaDCQVaTXTYPaer4dam sX6/BQV4Eq1CY35Vw4uGy42ylhQwmPTYWbBSDcb29HeDEU/bf+T5tb0GQh1f 8Z62Qu7/EVnQSqIGTDJ/Fr+ypgC89pDWtqsBcsOnD0J2FHjWH5zp5FIDZ3xl PO0Qt+75KBvqWQO6zB0fvyM2iK9SaAyuATE9jvLr9hRw/8YGKuk18KubN/Lh PWQ/DR80JOdrIFtKcfarI3JfbFkdF5dqwEMyaH4GsbJmlZblRg280zbVlHai QHPvpG48Ry2I2z05kYWYjJcx4TtSCzVX6Kq+3Ufuf6PSkdGxFs4U7VwJc6FA uOxk+PDPWnjL9pxvzo2C/D1gId/xrxaMy05nCboj43lI/TX0dXDlkkbfVcTK /wjC33bWwQhrWlsa4tkfuHTfo3Xwa4gcYv6QAheujjYcdKoDA6VBwSoPCvwu M7Tf87AORhs1GOcQf5QZ4eT0rYOOkNLnvI8osLRrWPdfWB2kiApaWyFOHBwg NmXWQbNIUcY2T+T5seqhd6LUQfEXTSZ5LwqkDWh/Nv9bBxast8VuIda93H1B n64ebpQSZzwRZ0h3hZ7lrAeJgVjvKsQGf9oFeWXqQbqZqe7KYwoUPmlWLHao h7H4pUea3hRwfF/lxLRQD+4R4rdEfZHnDRzkk5br4Y6dvYMyYq0JgX8X6Bqg Qbzr5G3ECgfu+wTvbICk9LXFSMSraSKhu441gMBVYGR4gtx3iVea6MMGcI7U ONmB2N3osGOVbwOc26f1dwqxNV2PnHlgA1C+vHJl8KPAFTXJ4q+xDWDAZZgv i5irebDhSFkDXPP30A5D/H7o+OTpLY1QcDgoXMWfAi+98CljrI2AXw56dxOx j3DoPV/uRsjgOe9kg9j0LulP9YFGeEfa6RGJWHzmFeOVC40w2ja7G484d+Wn qH5II8hVeS27P0Xed/40A9fdTXC9dv7tk2cUOGJtruov3AShjIGtYYhfFQqJ Rxxqglsxk2MfEBvphi+mH28Crb9H3xchXnzlGkjUbQJjj85ACuK9nGcKtaOb gHRAw1XnOQV8jVfem8Y1gcHztRRTxKSMHD/Hr02gseNE5T3EmVcPagQXNkEv t0vMM8RqQcjHen8TqPO//pWL2H5r7y45/mZ4OcAeyPaCAp03Q/+piDaDl6bF tt2IT3y+MHbtcDNsFtvbiiJmUCtOsVFsBtsPnmR5xFG+cWfibzXDtyWRUkPE ZWs2DjvfNkPm4RmGZMSci5uNCwItcDI90v1IAAWK7xPbU8RagGffoZHjiC1+ NfaaS7bAh8wqCRXEJT9f44ZOt8ChpbXnmoitKBIrdSYt4L4QruqIuHxO93Dc lxagd3+8kIrY1v70kdvfWuCH0GWOHMS8c/vkeQtboHnaWaAIsd3snEpwQwuM ab1brUPMN+On5z7bAnZ3vEg4xI7kb881ZVuhXSvmGU8gBfZYvQ5hVWqFz4o/ w/Ygrp30iKw92wpmJLcgUcR7J899PHWzFW4l5l+XQlxPHMoXd2+F7TfMD6kh FsFvI9GVtYIxUwS/A+KOEWO1rIttsGb9iqcY8XhQtu3ZG23QKcap/wMxRZEp ske/DXhXwyOrEHNEpUz8s22Drc/5SE2Ir1z781j1ZRv84JNnG0bnKwv83tXZ Bt13yc4riPvtRsbNh9qgGmfGs4F4UkCG+S++DY7dDkynD0J+f7r16Oz90wZR i0cqmRHH7+b0yGZth+VJV29exONt+rtXpdrh0nSRoQxi8kFGCTXZdhif8XeR Q0zxSlcOUWiH+TsGfgqINyXoLIShHU6ffRpwCrHQi8+5ZzXbgZ9pXvECYgMV yvXg++3gXEFRMkLcl/k0WLCgHRYtss88RRw9Kp+1t7gd7g+n6D5HrM9G6tnz ox3q7D5ZBSAetTwvLFDXDrWphY9CEBOEtmXz9rVD2fUBy9foeoJf9O1YbofS u113EhFnF51Y41hth/f1O6W+IHYmk0U4NtvB7yX97yTES2cv2rBt64DqIKEH qYjXV1jWmXd3wDc/63PZiLdbB+1jON4BvJfaD/5A3BylpE6v1AF5H+qzyhGH VM/Y0gHiRDbFSsScIlfyNs53AGVb7KkaxLx9bBdWdTrgr0wNXxNisXMv7X+7 dsBAabJkL+JTouGFpPwOSH8a/m8KsYilrv2p4g5Q5buqMIOYKV1wX8SPDjiy q91hFnHriZSg0/UdMJVydWAesYlmldGrgQ54lM32fBGxv/cfRtW1Dui666u9 htiqpvj7G7pOkBVyvrOO+Crrk3tzjJ2QGvvVdgNd3xuO/mj2TtjUXnWjC0b+ Hso4lLog1AlvIxicGBE3j9y6/v5MJ7g/dplmRZwpJrJ18VwnECo7WtkQv7Ym FV241AkdzsOZ7IiN/tzf//tGJzyR4bq3AzGFLXj5klkn9NkltnAh5j5V9v7v s06ItzI6yI/Y8O2+aa3mTsjp33l3P+K1/IVvxu2dkBTdvIb6bVfJA9vuTjBM 2fn6AOJeNl16v+FO4Ay7UHEQsaZ3EF/2bCfsNWhiPoz4rNnv85zsXfDfi126 UohxPhVse3d2gXYDyxBqn/cvOw/xdMFRwx+G0ohLesWNQLALrtG5GB9BrHDR 8ME9qS7oNNLVPor4sHRtQvPVLvilHLRVHnH9pUjr/utdoMLd6YbawtLkCOFm F7x2ZyKjjo9bKVo17ALhp6dqFBDv3XWk8797XeB/XM75BOIdf9/QBbzsgqEm 249KiP9UWBuea+sC282DF88gzl+6kpPU1QXGF0MTULtLyLBs7+8CKz+WddQr r5ZyW8e7YJ/H6XTVYPTz2Y9N71cXrDiTGNQQb+d4X2zD0w0DY/D0PHp/qj47 W/i74aroWAfqELe7lkeEukHUIVdQHTHnxOFdvw92Q+A/lhzUPLn5Nl4nuoHO Oab7AmIR/Xb+sNvdkPFo8/cl9Dxf5jj8Mu4GXMCC/GXECVVRNdpm3TAXdswV 9UEpQyd++254YV39G7UE3XR9/ONuuKwsOX0FPd8vW9zzPnWDt8TLgmuIL/9S 6B2c7Aa5t9qT1xErl7WXiM92w4MZEZ4biGUDbRJcKd2g0++qilpg3wdHrn/d EDpfFYuafJ2J9dL2HghpYryohdg/qwu+S/bAy/OCodro+XnZH9x2tAdC3Vjz Udte3MZ+U74H0uhfD6O+MXFykHK6ByzCH4vfRPe7M95FXKMHRg7UFKMucXRM fuPUA1tW/7broM//qe1hxAc9cKGe8xfqBOZEVzmPHth+u4tLF3FgXN/Ztic9 UNupr4Var115dOurHpBwDW5H/ecI+y7X/B4w3yJToodYeiHZU3u1Bwayyw31 EQ+HX3LR2+wB/pidLqgDjs3YGmzphYntUoGoCQ8lb5ux9kJ1eVUe6hjGb4ou e3rh5UXf7bcRMwrkLkUq9YLQ5pcU1Nkl2vNvoBdMSrpLURsb/yHGnu2FzZau dtRFiQo9CZd7gaXi4hJqhyPfc3Ju98J4+14wQDyoVubY9agXnB+W1qN+MWlk 1efdC5qdJwZQywduGg/59cLBoaAp1GFtKhr4oF6w0illMUR8Tr9KajG2F6Sy blxAnelQP81V0guBNdFlqJ+97TS7sdYLl7PHw40Q69wMmE2j6wPx6J0fUR/i VHHZxtQHIykiaajrn6b7lbD3wbBFXw1qFqcX8QeF+2AlqmAZdbC68vjKmT44 POB/0xixAcMfy5vn+6DGNd8EtWRp6sK3S31wf6DRFnWLLP+mmVYf3LZ654ua Q+i3YJtZH+xymUtFHf47+XbC8z74WOm/itr0mwl+PagPNsS3MJmgz6fNblu9 sD7wG7LmQN055u/BHtMHCWzzIqi5m4xj3FL6wDqpRw111CeevsstfZA2Y/gC 9btrvjd+c/VDHP3YJuqD48ozjLv7oblSZesd9Lyc1vx49vTDRtUrNtQ1r9zy FMT6gajKxo96ftCe76FcP3TfVD+KGiz1R9e1+iHFnsUYdePf3W4cev2QV/vU DLV2YM8OYYN+EKz6ZY3aKl3zjIpZP4QMJrigDls8n/jEpR9uztgHoMZ5y9ls e90P4qSMTNR2O38y8MX0g0+vSR7qpfiMWPH3/fA4fWsRatbawy0XP/dDRol8 FepjbCIywXn9cDiCpQf102i2Jc7efpC5m7uEWjyL6CuwewC666plTdHne+BW Ku+eAdBxFldA/YmhtZtLeADOGj1TRC2gnX+I9dAAFIftV0HNuvysZVVhAA4C 41XU86fE+Ud0BuBdjpE56hTzd6oD+gPQ33neCrXlS067HqMBIB6QtEU9Pva3 rMViAC75jjmi7nzSYFbmOgC+NYuPUOfV22R+jBoApR24MNT3f44OxL4dgFlr s0jU0gJaW6I/DICgwdhr1F9slXTCvgxAplDDW9TRHGxrPvnIeguvJaL21E5X N+0dgK3M2vmoVccXRvfzDkJt8ote1PtEPaLdBAYBrxzSj5relPFGo9AgJBSH DqIux/PVOBwaBD8fj1HUpyfPpBadGIQfbfwk1CfmI900bw/Clg2H36j5jggd TTAeBNWHYkuolx2+Tv+5i/SX7FlGnf+zxDDWbhBsNKRXUcv9IZ4leQ1C/0YC 8oUb2d/acU7PuEGI7u9kR81xurKhNXEQyslnd6Ce87riJ5o8CLgHOZyo0zZN lmqzBqGI9+Uu1Ie3BA7vrELqh1j4Ue/fPvw1iTgI23LMxFDz8/mc6fpvCBrC 8uRRX1GP7yXIDkHFveTjqB+7VtsunRyC7uehiqhx3cxR/JeHYDb3/GnqfOHh 08a2Q2A9cU0N9Wh5jreT8xCY+v8+h3onpYfb79EQEGbi1FG7XhOAL0FDcEu1 /hJqFdaEyNnUIQgoHNVEff9kjfhGzhAwC127gfqz9WTpjpIhMC8p0kK9vV6C LNs8BOm9d3VQd/vnnno4i6znV9Rt1JYbNUQmqWHoOtFnhnrckDu2Wn4YKBQ6 C9R6paaafsrDUK3CbYn6gudmEZ3mMDwcVbdG/d/KibDV+8NgpW9nj3rP954V d/9haFswdEDN5n7ffOn1MFi/kHOinv+f1JM/C4fhPmucC3X/uRc+32scBpnw 466oW52JO2aHhuH0jXo31Jk/hYikjWF4GtvrgfpTZrGGGecIrCdKeqKOcNAr mhAdAb2fnl6onefCQ4fVRqD3NLsPakkWltPMOiMw6Cfmi5q032daznIERgQM n6DWN7h3LihgBB7P3vdH3RJpEIdLRfrzaz6jnnfTpVXF1hHg/in4AnUOg6JO OGUEzD+EBKA+ePJQFplrFKbVrYJQxzjxsKnIj4LueFQwdf/JWyzf6I7Cb/Pt L1GH+V2VSnozCnbr+8NQ7zJ6s5jfNwp+0+3hqKNOTHyv3T0Gt/2yI1EL7JLw 6dUdA2XbkVfU9Tn0qmu8HwMF0Y3XqH2afXfU48bgvBnrG9RvX0XZinCPQ6X0 12jUi6p2bcMK4yCMW6JajfVpUr7bOPib2MagftX13juscBx4lOljUTPvELkr 9ncc9PWBas9L8efzj0+Al5E91SLMzySyPSfgz3Q41VU11pwZFRNwRjONar3+ srGcmgnwfZtO9ez0rm/fGyYgeDSDagWXsqiSpgmIbf4WR13/utXjHy0T0GWT SXXjs10WlW0TELIti2puzrKrNR0T0BKP+eu+XYJNPRMw1Z1N9Sl5q9n2gQk4 S59L9bMyru6uoQn4/DcnCnW7emlx78gE/D2UR80FOiwTBsYm4PR3zGb6XEHD ExPgnpZHrQ/2LjlMnpqAmNECqnMTLeoXf05A4+p3qjekdmYuLSLzexdRfaGg +M2/PxNQx1BMdYSKhffa8gTwipZQ+w83cFpu/puAx58wH9QqvsawNgFZIqVU Ow6bKzBtTAATQyl1fJE5pxAzHQ6895RRc8aFIiZWBhyIvMGsrbjj7D4uHDBf rqQ60e+uj+I+HHz+XkN181d24XP/4SBCr47q3y0FpZqySD25nmplXdPPWsdw EHKxgeoX42whOgo4OJSCudO6wOXWCRz0sjRSvXfxjoHBSRz8bmqgrs/Ck03N +BQOntRieSZTgYSpMmKxJqpXXt7ZZa6Cg2VcI7X+HB/bqqUqDo4rN1Edl17x X5Qa0v9UM7V+TdVNv/o8DoTom6Ow50cy8NcFHJStY3mOPe67yGUc5Bu0UG0T fZXfSwMHlbtbqRatKnQf0MLBeivm/jmxfnk9HHg9aaM6lC/0eIQBDnRk26me TlezLDfCAcy2Uec7f3Ylat4EBwtn2qmO7/9Wu/cuDn5EYV63N1+6ZI4Duv2d Kahtq5TyttzDwQXbLqoH+LhcSlxxYPC5m+pjGXUJ0+44iCzsoo4PO+vVxfcI BxqM3VTP9stuUffCgboGZvV7ZNkH3jho6Oyhjo/f8sE0wRcHUzgs34jWiujw w0GMRA/V+tIslZtPcRDgjDmvquyn1AvkvIowh9+zdfgYg4PawT6q7fn55jhT cdDdNkD10L351IYcZD3Fg1RfrK62eVKCgyvvh6imWzjSOFqOg6Htw1QX8Mce VqrBgbQrZq5vmres63CgTRihrvee2taANw04+MQ3SnXjQHFhTRMOzK5gPuDg RF5sQXJvzKMOKSLrbTjIeDBC7RfliNfb2onsLxHzNae94Tu6ccDZhXnr/ZsN fL04sDg5Rh1fdv8l/b5+HKRKj1JzN+c6RYlBHHTcxizjQnf/2DAO+iqwerKL YsrpUSTPxfJGN8EgUxIO6u6MUZ3mQW/3fB4HCszjVJs9OpkYRsHBAZsJ6nhB T+fhmF84MInA3OuZxp3wGwcnijC/9CJeSVvCQeYE5vOPhZ7m/UX6M+Oo3nis W1q2grhkjPp5k+8d9qduDXn+b2K5g0+DVMcGDgRYxqm5uC+DxSAdHvKlMY/7 Kn3AM+DhWy1WH/3EpXeWEQ9RM5g1/dI5lrbiwfY9Vs/sTzq/yYwH7WN4al7h L+zNzIoHaT3MHk/1Cnay4yHrEWbZZ+ELAjvwMPwB81LQrSwzYTyYpBGo/h4u 6pxxBA9Ln4kp2OcLk3bXcTyU7SFR7flm6thfwANvCOZj0fvs6VXx8OMr5rno 25+3q+HB/jqBur4vMa9Gdp3Hg/oYlhu9beERvIAHx+dYzhu79drBS3jgiMfc FgvPjlzBg9iRSWr9i3fuZSeu4UHlImaV91lLZzTxYE7B6iOmzi2r3MDDSU8s x8sPLoM2Hsz2Ean5sSf3/irr4KEyHcuftTL8O62HB8lazIctJVaUDPBwYwlz 86bWqqIJHiIOkKkWukJePWGKnNcpzA7RnmvHzfBA0cJcTuBcV7DAQ7MNZq6j n9flrfBQyEGizm/mpbhxzAYPY2+wPK+hZUPODjlvJSzfymu6KXsPD3ursVzP dGnzqCMepgcwp2QE0h29j4cWT6x+dUWIXsYFD3IRmK+o59AfccWDRRLmD5Hq DNLueBA+MkUdTxkbYpDywMPsWcxnJB23SHrioYOI1Ue4MzJKPMaD0gpmQnU0 438+eHjAMUn1c8MKJnF/POgoYP5vaWrrwRd48DDE7Kn6eNuBQDzUOmJufcnF vD8YDzg/zCJDX5jFXuJh9NFsJ2qnQ0os+8LwEPcSc6VzG4toBB7ES7B67vK7 20Ve4SGsFbMF29/twlF46K/B6gv1glmFovEw1Yd5+2cRNsG3yP0ykqn1t3/m su19hwdPXsxppy+y7/mAB1ZxzBsBI+wCcXhwUsSsVizNyfsVD9ZemANnvbm4 MvEwUoaZV2Pf7u3leIg9OUV1fFb1HoZ2PBilY2Yo+3bkMg8BNM7PUH238e3Z V/oEULSfpdp0a93NKQ8C7B/AfEd10VI5lgCN8nPY+95wYvvFjwSwVsFscv1x mlYCAbouYRbh+bSu95kAyxq0+v6qa0ZJBGC7iTnuHenj3WQCvNm3vM8MHW/C 8tMqlQCvD9Hs8Er+cQ4BdinR/FjYI7KYAL1XMY8zme/98IMAv3VoeUhK2dcq AhCNMYtcb9mRUUOAa2a0em6KSU4dAdKsMMf1c2UXNhBg0442/p38lrImAswN 4HHo9zUREz3tqhYCSIxiHhd79Lm+jQDGOMxxk++XWjoIQPCijU8tV+/qIgDj E9r8Dvjo/h4CCDyjzS+7dXqkjwAHA2nzL4kr4QcI0LyE9TMuuhxMHiJAzQpm mcCHB/hHCWAahdUz6CeVXRwnQMxbzF2He3Q9cASo/YA58R/DzxQCAYJYCdTx rg0ygUMkAqx/wXL1GCMxtikCMKdi5rMOLjk1QwCWb5inTxTdtJ9DziMbs4y7 U9GRJQLcr8TsWiAu/GuDAGodmPl1/a9rbSGCcz/mkqUxv9xtRPAcwxxSyy5I ZCHCIg6zUZRSPg8bEZg0sPXJWFhrnOcgQs0UltMrvCG7chKh9iaWdzLV+CZx EYH/FubEnl8C/dxEMDXA/OCzSC7zbiIkGmM+/+DaVUV+IpxYoe3vnCfJeg8R 2C2wfIo7xfutIBEi6P5S8yJCH1+TMBFu2mF5cC5T9qooEe450OZfLOEt+48I jx5h5pNzeeQjRwTW55inGeK5s+SR+USxfsWdbekTx4nAsB9zcPz6ea6TRLAJ xeqN7kuMq54iwp2J9nj0/zNHVG89dFYmwjFJrJ6O6zlXogoRJqQxd07kpnar EuH5UcwJWTg1pnNEOHgMs7TMdY5AHSJIXqDtJ+NHH4cVEWL1MXMEMhPOPCSC ui1mU/PrFJdAIiR5YGbreuDKEUkEnC/mfJW3a0mxROh+gTnILe3H749EkA3G bJJR9uRMIhG8QzE3NagTLL8QQTgcswKx/dzLr0QojsAcR6eflJtChBuvMLPu xTMPpRGh/moHdf+ux+1s6L8RQVcD8/iNP02HsohAH4PVX773WOpaDhEC3tLW F7At1CWPCGzvMIt8DqO8LSBC8Hvaesv5b1R8J8KUDtZvaSg+Z7KYCD5xtPUv S/BwlBHh9yfM8tLK/fqVROhIxLzdXDM2qZYIH5Mwu/gMrLXUE4EuGfNYrKnR 70YiGKdgvlQw80OghQjfUzHndrqInmkjwi8zbH4jlZikwT7kfmwwM2eUSrmM E+GoA+YRQhulnECEOCfM2XtwOexTRNjignnvcVueYzNEOPIA8/Mbv13154iw HiecYIH4l71Xv88CEfbHYzYI2Hoy6ScRLiRg3s+5K/HrIhGyHmLjZ6KEOVL+ IPfjQZtPUNI9dRl5/x5h9kg8gUv7R4QmT8yqEueuZKwSodULM0v29fxv68j7 noz1bz9hJJK1SYQWbyyP/mETmE1PgkYfzCbn3X7nbCGBVRpWf6jFzyiPiQTG 6ZjntcLq87eRINMPq88ffCdbyEKCBH/MXneS331nJcGrp5jVyHlbi9lJcDAL G8/mUOlYsoMEu7Ixd/1pHSzdSYI1mt96Dqn92EUClQBsvOkWckY5DwkOBGI+ HPibr3I3CZiDMFM46f2q+EkQko+NL3zDPle9hwT2BZi9hQR0awVJ8DkEqz// +WBFnTAJfF5i5pCUk2gQJcGtUMyS6uZdrYdJ8DUC8yXTN4+6j5Kg7zVmrqkE Yo8cCVQrsP4DDpkaffLIeioxxy2VfO8/ToImmq28GsQGFUkwFY2Nl2HsDRlS QvrHYF4OxC0PnybB9hqsvmznwp1RIMG+WCx/Fr3aNHaGBL61WM7zhTsOd44E lDrMiTlSLsSLJNBrwGx38uQo6TLSrxGzXMX5C+SrJOCNw/qtqGtlT2mQoIbm ylbjvTPXSeD0CXPgTbtns1okEIzHfH3YnTJ3kwQ2LVg/vrtP9Rd0SXAvgfb+ T4VXU26RgDsR81fHD9K/bpPgO80OyynRi4Yk5PsrZoXHBQx/jEkQ347122Cs tlu6Q4KzHZhrg9p7l++S4HQSVh/CNaLyz5wEgzRrx0ylrFiSwPUr7X0TWeJe sybBjmTM+C8M3uu2yPnSnCK1Y2rDHnmeUjDfz92jRedIgh6aFZXES+nvk+C6 jV2CLXq/reAg7UICljQsnzbRFb3tSoIkmqsW73U9d0fWm4753bNnT3M9SDBK 87W0vCl2bxJwfMNM10m4aulHghOZmM0Ez/IKBJPgUTbmeqtPo82vSPAlF3Po pqGD7BcSFBVi1okSoIsuIIFXCWZiVaTo3UESiFVhdvnJdlZ6nQT19ZiPFNpF HVCeBLEO2vofN0/t9Z6Ei320+QpfX2gpm4TiIcxJv4ySvDYmYesYZvFLZl0i 28hgQXPKJ+vNqh1kqKLZ9qrdax5uMizQLPnvnoQlHxn2jGNm03BcChUggwzN c4lOFYV7yTBWyfs5AHHryv3gCSEy/KY5Q9NFd7so0s/sUJwi4pdfHuyTEyPD FnPMDmuuc7cPkIGPZs0b7oX+h8ggSbPM14d+6YfJoF+F9ePc8LjWK0EGLVr+ U8uTf1OKDFY0dyZ7EQ7JkCGKVp+9+fibpiwZkmmOuOnj8fAYGUppdk71PRev QIZc2nhtej/OphNkmKDlx3T9hxZPkmGAlv9meO50DsiwQXNeRsC2N2fJsM8C cxRjUOePc2SQo9lVP/g9WZ0M52jWyQyx2nmJDE7VWH+FraFyJ6+Q4QnNvAZh G6bXyBBJ83JWeEOQJhkSaO7fFvkq9wYZcmguNHxlPKJNhhRa/4csb/5I3yJD I80n82KCfAzJME2zAGusTrIxGbhrsPGrJu9EO++QgdkSy4fz38+u3EXug+YS to8FYhZkUKXVlxcn77BxI0MezVU2uZaZL8ggUov5XsSV/v8ayGBdh1mgiHDh M8sU3K7H7KUwYvfx+hQIN2Aez+4Ji4mZglSa/wd/XTPX "]]}, {Hue[0.1421359549995791, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwt13c8VW8cB3BEU0VRRhkNFKmfot2niGhKhBLSQGQlpBRpSkaDlpJoWMnO lr33HnHvPffeVBpCGfU75x7/8Hq/Ps86z/M9554jb+VocEKAj48vnvxD/Y/o e+9adX3/FlMdx89+9te3nBIQz0sUWwWhYkOJNxdOYEjCMyFQbCsenpPrsr9w FpsiY5UuiunDIHeAK3vhKj5+Kjp+VswS1uba0lvO38c7/3oBZzEnWJTH7Ohx j4JUd2udg5g39OcGJ/ueSkH1ZLP3p8WCcF7mwtAl9SJkCW07rXQoCANn0v5N CSzCG0EFeeazILxy2/LJiVuEKwLfb5goB8M4xdmW+agY6//6mmhp3sGx0cN+ m/+WIHIwZljC6R6YKuuED+eU4zxrVL2w4gFOHBp5cEGkFmK9e0xv54ejb03+ yTzlJhya575RmhGOk0oRn7T1m/BsV/jCNwLPwS7ZNzfRtQnLU3/2Fmo9x6s/ njWbs5uw9VboqbGi5+hNH1OW3dMMO/Xe83blEVgt6hX8xboFH266PtVriETs GONT5402TM0N824ZiMSZzHSBkTdt2POr2OqEWBQ21TkKj5S3odVcUtHHKApC VyXvRQi3o391ztv0lijEfZs+eCegndyvKfmKnS8h7f9Jr9u/A85qj5lCxGts 35nl+dSlC7ry53Z9F3yDoPfbjlkGdkFOxDipfckb8Gu82SYY24Xqr3N83x5/ g06Ni2k/WF1Y/sZvkSnrDR4krfW2MuoGS9bzaCwzGjED327fW/URB2eafjRg xKL1Pcd6hk0PVoxp7NgsEAdvd4PzV117IPhZ7K3iojj47f6g9d27B0mltRfH jsZB8YXncOjDHohc0ZV52RsH0y+/Z60q70HZyNojf3risSdndsYVpV7IuN76 WuOYAMNfLkItbb2YV1l/VNYnAe2BOqz9RC9mLpFqdriTgN+F93Znfu/FWMPr nJkpCfiXodBuOoWB9tXFgbtGEpAWYddavJqB+wN8aiVX3qFRZd5Vm5sMCJ9x c8t5mAiD1PcvxJWYEKzI7psZkwj9tsVyZ/9jYnSRkMWRrERY8ltcK9zARF/9 3R1j3YnI0rDZsXoPE6Vq7yQ2LEnCbecDSw2cmfD9+TkjJT4JidLx0yJSmRhx PvovtiAZ8/aabhlSZ6FtSWFaY0MyUks74r9vYiG9RcFpjJkMB2+3ym4tFs5u /tKzSzAFhU67dEL2s/B9qvuHvu0psP1gnXHGngXOM/+rSsUpcBVxGfr1jIVi g2+b9ZtT4Lyer2LVSxYihQyG3NkpSGJHqh6NZcHKbr51yeRUFByt7HyWzkK3 RoTuyR2p2PNm3CakloXGqrQZkaWpaAyU/en6l4Ukb6nCitZUyHwM9uETJHBn tdeFAW4qFloY3/CZRmDfQ82vmtPS8Hu5usZxMQLlx6uqe/XSYFsYHhO3jED+ KCNYtiINVx+bZB0xIBC/bJbE46p0zOb/VBn6hIDE5jKRhR/TseCe0dDO5wR8 9a9Me/Y9HQsXvv44EEXAxH1kJGLue6wsOrle8S2BSUXsrmjT92hb4Tkink/m lrkvMoj3eKYbJbqYSeDDGc8nm4bf4/3gLK8NHAIrrqvfz5maAYdI/jzdzwQE 4mOufVDOwNOsUyI7BwjEjYbaljtn4KWMVFKvABsCoU4r28cz4JXJunZGjg37 aGUls9mZeNnlvplvCRst2Wy5brlMWHX7NFxRZCOWZTaHoZUJExefrrOqbBir 6Q1+upmJqZfS5P9sJPMq+cw/4lm46RP1LdiIzAUbdCRVs9GVpxfn6suGn6vN ZT1ko+5kjNGsa2zksMazz+lno6il8OvzG2wsKVJSb3fJhrzdK9m022z8vHpx 8eO0bDwXeMZ5FMpGwJTlfAu35eBjeUOSQTQbH9xzN+4xyIGsl4Z0cCwbgxxD d69jOWBcfrC6PJ4Ns9JL/V1Xc3D4q0CUShIby282dT4tz8EWmfqipEw2iqf7 vJczzMW0wiOPGyvYGPGcN6h/IhepAhHbC6rYWPE5ZpWPWy4eKrfsjqth415F 86veB7nQb/0TcaaBDSt/lZCIrlysUTf2Lm9n499k+/V3Vudh6eK6e2+4bDy+ MX+eWHYeZD315Bz4OVDq/2YkUZSH9RbMpA8CHKQeKL2/oCoPtqWFW8QEOaiV OSe+tCsP3fVnDeMnczA5pV1MYzwP0n3XVufO4MClN2yuyeZ86N9zWmcqzgHf DrcDZtr5KDVS0fCex8Ht2L13Lffk49pmyYDI+Ry8dv83x/ZIPhSGXh4jJDno nnl0jqdXPt4Zjm/XleFAb8MS0SfZ+QgzvpsWqsBB87Mx/fCifPhoLhkOUeTg uFBTUGRVPm4aWHPvKnFwsfaqSFxXPjpvn/51bTkHySc5s3PG84GlsjBQ5UDu bvSsns0foGGmzvRR52D48yrhJTkfsClC/tYJTQ7KfdTtm4o/4KeJwPI1Whw8 nb+h8lrNB7BneGTzbedgu5aW/6eeD1hlsqL5rjYHdx4ZCb+dVADLBD+TCF0O VPQ8hTfoFaDzXHb58b3k9X+8aP95fwH27Pn2S2wfBw2uvpVPDhXA6E6LeQFp z3B//392BbjlJDNJej8HJcNPhYsCChDOd18w9QAHVi8LhPUbC3CFa+z71IQD jU2l9vxdBfhyf/mTNaYcTKuvrEwkCjDeE6heRjphvMlffLgA6qb8f74e4mDc kCvcIVmIC9cllykc4eDBpJkzT1oU4pv3ax3DoxxUWx6ceaGvEKJl9gE5NhyI R9oEPvxZiNetakuX2HJgxvEUTRspxBK3paU3SPedfib+c3oRNo76bdx3ijz/ 89yFNspFiO2fO6/OjgPc91Q1tC+CncF792gHDq61+ic4uxZh6Za9jfyO5HzS z9QCLxTBWjHb3IS0WUSBRrl/EWYLfBOc5MSBx1thbI0rQlLq3Mq9zuT1lD3d p9JfBMa0eEb+GfK8hN/V6Q0VQUt29riwKwdb9AsOWP8tgoKQg5Ux6cpmjnHE rGLM5+sW6yPNZa6ylFhZjBqLDJ0pbuT5//3gJOhUDLH4MK1FHhwEq3GCO38U YyiYNZs4zyHff06q1/0pho3pFCfpC2R/cXZrEX8JJuvp7ttPessfluxb0RIY 7+wKzCT9JZcR5/NfCRQGStf7eXGgu6e7TMG5BJtOxCiLXuLgV86R09LnSvD8 YYvQVtLPVnWJiPiUwKWg0cmB9NDcTuM/QWT/5cbjZaQj29uIioQSFDH9hS94 k/Vj08Tv/L0EgSdyOyt9OIhtM4w68bsEa4UT1w+SNt7VqHuIrxQK5z5oLLzM QbxqQ6CWSCn29BaI2ZM2G6xdOG9VKfRUb3oI+XKQfrlyfaZjKWY0PXmkeIUD p7ACZ6FvpSgT3fJB9RpZb3BUfzVcCr5pupv2kT7QK/VHl68MtxJ9rBxJayx1 8fYXLcNFiY+p8aRHY+UC564pQ4udbsiy6+R5Z3nFyp8rA2NUr1fkBnme5suc CnzKoF/89qIKaVu+ptUn/Mpwz6iwcQfp3dtVMl8/LoN8VlOcF+k5le1lK3PK oMFaq8gmHdaxlrN5Ujm+xy+rjr7JQYAXM/rjjHLkqz7U/UDaWzbQwUesHH5M s2ttpK2OsQcLl5Zjubn+3il+5PPs8z3B3brlsBUJk7MknTzyQ/7Q7XIY/gnY N+UWeb9Lxpq5za9Aa2vvnZX+HKy0PaF5RbYCM1ykbUH6XrqM0h3FCrArJST3 kTY3Dh6IW1uB8o3VUxxID9xz8yOMK7D1Nt/yaNILRLalGz6ogFpJfJX0bQ58 LEbCrMIrECDvabuMNDs+ydfpdQU0L1mzNEgn7FHY559egazjLI/9pLffmsEu aK3AqBljyVXSpyc3z10tWQnj02fK2aTrjQL/bJWvRObAl/M/Sa+L0v24d1kl vt5UEP1LWmB7ZvSp9ZXQy/rEEQvgIMQnfFuEaSV+Z47u2UY6Z+yUo+ijSqRI vVxzn7TIwL/yb1JVaEo1EVEO5CDThaiNXlyF3QYNp9aQPvmzvPmEShWOdVfH biad9eM+o2NzFVgHdbn7SNt8Vx4psayC7wKZ7WdI5301Xhb+sgoLukQKU0jb nd688vDbKuyq2ZqUTXre10Xq89KrIDn79e0i0vZfvm71L6vCFYtBwSbSEp99 TTy+VGGOzeFJA6SduG+v66tV482h+fbKQRxI29y/PWNjNX6vnamoRrqY43m3 WKsa6d8ta9eRXsDRfrbJqBr+u9v7tUmXEh2pSh7VcDKbZGlBWo45hc2XUw1r 1vL1gaTruiy2v9OrwaGDjj1M0j23Eu20DGog6Ov7nEv6+3qhu02HasCQNTv4 lfSskOjeP3Y14G5sfTxEevfewYuaATVw55g8nBpMzpfj976hvgZeySc8lpNu te/qOdFRg8Vujb6qpDlSq6b+ZtbgeE77FTXSk92bDi4YrMFwhYTNBtIR80U8 E2fUIslxbaoe6Z6aQ/NHV9QiXFX4+knSXAVB5e1qtRhT6x+2Jf3dK27LbY1a /NYetDhN+p8y30lZ1GKyVZW4K2mZG1HJWvq1ENQWl/Yhbbb1+35/l1ocdSp5 +pB0S8JV/4VptVjSzD+viPSDbvV3CzJrMU2p0KaE9CFhdpN0bi26bX+mlJHu ttaRlSqpxfXGElSTZslMSZzXUotL7KI5LdR6/G+0zB6uxalK+XwO6cSMdWOz Rmsx/Dgy7xPpM1yu3Kx/tXgpcDjzM+khLb1TwlPqkPY3KOIb6fGRaeNT59fB Osts/TDp6ba3FgmsrcPRjJFgoTvk8z1k4w7+jXUQFmDpTSF9u/CzHR/qwP4a Oz6VtIjc7pS/OnWwlRUyFSY9r0VYd/RgHSpauj7OIb1YO+D0L7c6lPYe05Al vUk+OJ2dWoe3OUwtddJy1sanN2XWoak6KlKDtFDcwkV3cuvgaFnHv4509bro W5tL69Bn4PduA2lL/QLze211iP5APmxJX7k0KKg5VoeZBVtS9EjbFGW+D+Wr x87FxT07Se+Zcdnhq2A95sVtm7abWl/orNYHM+tRcX3N/r2kX8crxnyTqUdt LSPbgLreLtP9YdvqoVzLFTlMOmGx3OQB7Xq03N4824z0fVt2hu7OethzR6cf IW0+6LLkl0E90Fc7Yk76u7D/8M7j9bD1uptlRVpsU07Y72v1WIQp1bakjzxa 1Hegsh4xX4r2u5EeS/321qK2Hjevj4xRftSQddausR7DcwJfupNuFjbm9+2s x7s89i8P0vqXbkkkfqnH1eici+dJax3/pSMyswGufIY7vUkzvPOFF4g24KDd zi7K3mEB9YriDQh+0OHgQzqrWckcCxtgurrj9mXSGnpHzjqsaMBnq/jMK6SX qRa/qNzTgNw9jm03SJfuvGvbur8By8RCjG+SPmltuZJl1ACL036NlCPCRzJG jzRAdQ+73I/0grkr65c7NKC5NfONP+nZv0P5bgY0IPKStloQ6cF82yPaNQ04 FFnkHUI6dWh30quGBuhudyUoeyivmja9tQFdyZJ6oaRH7g0lV/c0IMHVcOaD O9Tvs6+wyc8GGHjV3XxIevqssMxT4o0oTFc2ekKdn6a3aJVkI6IUvKMp33Y/ Zr1SphHjvgN/KYv0Lpv7S6ER14u3RYWRFk9OPeW1rhEm299znlL1eKhWMuhw IzRujGs/p/YzIMnxp0Ujkvz3BlB+URBSZHi8EcFne5soK6w44ix5uhHSWxqs Ikgr8/WVRlxsxPzlMq4vqP19Ockj5XkjfN/0n40iveunRnM7pxEsDVuBN6S3 5NRmKX1pxPNTtuqU1fxOvXD73gi7QcKastSip05z/jRiV7dJBWXufqEZO6c3 YcZHPf9oqv7fNeC9ShPm+DkNx1D753VaYcp/TWhdULEolrSd3pSZRupNEDqX soeyQe+G9u+bm1CYgQjKcqIRrkr7muB8R1MnjqoPJ6c3oc5NuFIx6BlP1f+m 6UHE2SYU3Kp9RvnF1Ei31Z5NWHVnVyFlv/AWrZrLTXhlpCT8lrRJ7Zbuyfea IFp+N5Ty4MqZc91Sm6DIHQ9LIK367c0Fw9Em9N3gd0wk3Rm809XkH9nep+M6 5ZtrPtuZTWqGFr9nOGXWOZXDx2c0w7J1Uh3lh4Jv17tKN6P/ktXKJNKCUslD dzc2Qy0xs5dyYpZhfyiaIRc2b5iyhcUg8VirGV9ztggnk86I1Gh6sasZHgWD 6pQdV75PSjrcDN/4Wdcpt2/PcWo434yCDQfkUkjf4JjbtFxqxmh4nBpldb9/ Fh2+zbiX1rGdclDN1n3MW82Qt0ixoax9qGDFwONmvG8+GU85wbG0b05WMxpf LlBLJX3tUf1xg7FmNFyxWZhG+qDRzS+xfC0YFZJQoawostV1ilAL7OoiNlAu vRrnmzWzBTOv7TCmPM35RoSCbAvMrlQHUPbfsaVnZFsLNqbuGKZsJjBobaTT AuGGnEnppFWyY7693dmC5W/nilCuUpP8d/xACxRdjypRniXza2HN8RZkDV4y phz8683hF9dbMOX74gTKVm8tmeO3WpDcl5pBWe3UfDuToBZUL1lRRLn+4xXP mQ9bwIwqb6MsVmHx0D26Bfo7i/nfkw55Lt6yq6oF7cdHd1N+stfH4NecVuy6 LFJPWaFny2fB+a0QqFZpo5zgPOYrLt0Kme8beigX3XNP0VjcCj9viX7K/e2n Jc6tboXLMdFpGaRhfah7/EArYupnb6Jc/nu++yyTVggHKWlSNvRrmi1r1oo8 1TW6lG3i9LdtPd6KEI+FhpSDBnQiL7u2Ijdtqx1lxqXVp6bcb0VN9u8Qyvai PwQkHrYiavC/J5SHIuIfK4W1In/A/DnlGcXLqvSiWvHf7scxlNcIy63yT2nF +vazuZSvPhAeEmluRc6vARZlpXeEj9T8Nrw80aaYSdV3m2nMPOk2bDr8XJny c4HqxjmybXBvNl5JWcowVXGGYhu0L73XoDxj+FrVqEYbLCTnalPu36Qk2XWw DQl/FSwpR594otl2qA01ic7HKFsHiNg3mbfBpCLsJOWej79zqk624cyXP/aU 6y+XHc9xa8P6c0bnKKeUnkp4FtKGkc3hQZRdfnS3PX7UhhWRZ+9SVpU6MOnB 0zbk3d4QQvml3caDQS/bsM80/jHlB7OEx7xT2yCuvvsl5QuGcTusmtsg2W+S QVmz51v3knntmFGGbsqL5D0fuEu14+bfcz2U+a0EDcpl2sn3g3cMynlMiSJH xXYU7xXmUN7M2RaTsa4dKgk3v1Fe13/XXf9wO1KyfP5Rllgp898Li3b0eDrw Z5EednzdN3isHRUeuyZRTv2RdeSxfTvcdf5Nprx6kNBie7Xj4KnVsyirjq0V uRDeTv5upUpT/uq121f+TTt2Z/6VoRz7z3Ko+F07yK/1RZSXTfLrFC1oB2cx lCgvmd75+hXRDqPPjaspS0p4b2tY3gFLD1Vdyrt3RDSz1DpgX2W5k/JFt0K7 oQ0dmJoWsJsyo3FqiOSuDpgPvdTnzRcc3Gdh14GjRo4mlLvzki45n+lAFkfv EGXR701ivuc74BwvZ0bZba8UXt7qwIvqVxaUt854cfdLTAcUvxiepBxly8me ndWBVr1QW8rTS5W5apUdENUIsafceCV507kvHcAdRxfK65m/Tz4Z60CDpthZ yk+3bQ7OFe7E6FCcO2Xrv0WE0IpOvD926wJlk2wrfd8tnXjxZf8lyroX/mXw 6XfCeUG4D+XlI+uCRl06MfbhwDXK0u+bRjyudCKsYPcNysIeLieG7neiX/iM H2//B2M2/EjvhKaFQwDl6jPE7C8dnUj+InqHcsIPGYL9txPr4pfdp3zH0SSj V74LKw4vfUD5zNfgwM7tXehSmfKYMnuJd99q6y7ye7gyjPIhMwftWze7MJbx /Bnlqrtm4YyYLoR/qn3O27+KnaPrq7uwRbL/BWWFDYrvuHO6YW6x8BVvvW8m WYcad8NQUiyacpDvnhWvQrthmVgWS3mueehAaks3+jO94ymHrOt9Xzz/I6TO DiRQlpqr7N1s/BHFJ0LeUfau9JldyviI81lWyZQHNO1rOjV6kCvam0p5+4yr r1Lde1Cfb5tG+V5D2KWg9B4wT1XzPHW23LHFv3twdtf8dMoXdkbopK7tRbTe Hp7lpl5TTrzQi7kqHjwXFNmKxOf3IntJKM+C3zKEZggwULohlmdtCeFRa00G /qvI5DnpNOO93C4GuIHZPMsXpHu0HWDgiGYuz61fF7eqmzAwKpbHc6BE4No7 ZgzoM2n3xW23zjNnIPWmWCNlHa2RkH5LBjT7aUe0vi1ecIyBGbUOvPMZP31i aOcJBvzUHHk2mSStcM6agcn3aCc/qDV6ZcvA1V+0RVSvXW2yI3NDJ57tCjam THJgQGfNfN74i/pfilm6MODUT7tNYo5rlhsD1ZESPO9w4KqdvcSA52QpnlMK cn6suMEA21SaZxFTV3kzPwZCY2nb9y/b7+fPQMqFs7z5Sn0/eqcHMHBm3wJe vljyfgI7iNyvhW68/GL8zh6xuwyM99N5uxafiNZ9Bmoz6VyjLQXOoQzo3VrI y4Md7ByfPWRgUytt3YfN1aNhDJQ4yvD8r2CbqkkEA5sFZXk+ZDp85FokAwf2 0E7tj72d/JKB2Pu051yxyma8ZuDW4XO8+U5LSnwViWHALoJ2h0N/TFkSA2mp njzrFRaeupzFACP3PM+Rpp6PEnIY0Li8iDce37eV5d15DDhuvcDLza4Qf4QL yOvnX8zL0yQfL9tYxMD8rbQdtk++GVpG5pm0lzo6cweqGNi7ZgnPIU5Mk8n1 DPRH0J7sYlQm0cyA6+ylPOe4BPAvamVAveAibz73MyXrldsZ+HSOzle58rms 6WTAIp4213V99OZuBsIsL/Hah591Yej0kOctrsDLTd1ipPQZZL3r0p7jzjIw ZZH1cp52ufvCW1ZsBnTjaF/2OFhgx2VA7Ig3b7yN5wJHXfsY6JytyMt/nStd ffELAy5bacd68ttf72egpZ9u7+hdtqLuL7kei8s8q10L/iY1m4mFKb48vw+W PxO/kon/5l3jeWvYu6Ft+kz4yt3gufLfgdH1lkzECd6k7weroX//OTGxs5X2 07s7BFQ9mNDa5Mczq/CB4HJvJvye0NYQXSG07DITwsm0rx/JF1K6woRNdcv0 bOr+fWM0WfEaE54E7eVDnyYr3GDCcIx2dcCcqUv8mTi+rJVnZ8WN0xYFMfHU iHa6if8MmQdMhMXQ/nuza6ZUOBP2f2k/XzR5tkQkE7EKbTxvz1QVmfeaCZW9 tEOmFIiIRzMRdZQ254CxqFgsE99daa8L/yw6N54JfW+sotbv9+XSnDkJTGy9 S3vevkXzp+cx4bRkK88R7wqlBWqZkIihLTT9+HGVerJ/YTtvPBurSXEHG5kI b6JdkREx6N3MRAGbtupczS0xrUykD9P+VeBd86+TCXnJDp4zXHMtDXuZ6FxP W6d5k+/4JyZMz9GuX5sR9fInE7tTafeNJPf9nsTCH6VOngVy3q7cJc7Cyzu0 T8zb53F2Pgsx4W4E5VKH/rxnkiwIRmry1q9ccntauTQLlgm0A2RXGPxayMKT LNo/3CsfycixkFZK27DWjqm7iIWkRtppSjNUzixhIbiHtpRPtGuYAgvOg/R8 Pf99Evq5nIW7wu48v2QohuqsZGHjYtrTNpZ8dPqPhW1LtXj97e+eVHq8moXd q2jXfBZyLlIn22+krbY96v23tSwI69DOiVrU+WArC3CivXNK+N9teizkP6Ad Z4Ed9rtYCI+gLZLeHRiyh4VrKfT8Z0QutubtY0E0lc6bbRbKf97Pwotc2uvz s2zFDVlYWEb7iaRZIg6ycLGeNp/L6IitCQvFHbSPlT/SuneIBal+evxFAdn3 HpqxcPYrnTP29xBPzVnoHqQdIT5pbaQlC0ZTPHjtrdqW3nhjRbafvJ1ub2m3 PPkkC+/n0bbiJlTmnGIhQWHCwxtFG11YSNee8OQSo0+eLIQcm/CSru65t1iY 9IT2Uc0B6y2Pyf2tpW15Udbzbia5Pyu0ebbI2OXP7SD3z4t25B+BH9EsFpyC afetyzA6/ZWFA5G0s6Zy+8O+sdD/mvbtVvEb1T9YOB9H2/y1lvy/ARbG39Fe 5eGcsXKIBde3cY9yqXrVfXbA8jcLnRl03jC/6kvQCAubcifm54xczR9jIbCA tluakuzPvyy05NH9da8fTF/ET2BuJZ1LGl/Zf2ASAe3aifUqJPb5ChGwa5xY 79BH3+QpBK62TqwvZGOquDCBsB7a/BqhXDcRAje4tHXO7t2zXpIAe5i2f7JQ 4qg8gReTdXiuH8ial7OcQKkYbYnVrue9VxMwXUS7TyBC7J06gddLaWfW18T1 riXQr0TbP2JcZ84GAstVaJu7KPdobiJgUNfF+x5eqWl67swWAreU43nXyzfn +pzIrQTeqtKu702OadQkUPEf7RfvGNuFtAnUdNH9XX1EutV3EOhbS+c6+7e4 n9Qj8HUD7fny9iKhuwh82kyb+/3hm5I9BDq20s7IK9H8vY9AiRbtW0GDHUoG BGJ0aJtZLj5rakjguh5t1VX7Z/kdJLB3kJ6fj+/SqwwTAsv20XldTezWz4cI fN9PO+JZe5v0EQLxhrRdHaee2W1BwJivm9dfBxrCXkcJzD80sd7Zx6PijhFI EKJzbnfwlu4TBI5aTKw3Prdllg2B8aO0A4m6R4ftCUy1pn18AevIaycCf+xo V689nVvtQsDGgfb6A0Nyg64Eap1oRzpcuiztTuC/M7Rn+U1lbTtH4JIMPb9H VLC2zXkCTHc6Z+ZJvQrwIrDGk/bezhdTUy4R8LpAO31Y5VSHD4EPF2kvmpta wX+FwI9l9Hi3VbFC6Rq5Xyq0f+uVBuy9QdbvVbq91Yn93139CDy4Tnvtk2NJ +QEEem/RFm446zbrLgHxINpu/X9b1twn928jPV7vtBvrD4eS13OPzncvFX3s 85CsP9B56tZHY68eE1DeRlvObLF5dRgBjUcT5+8em/vrGQEZbTofuqMuLx1B QO4pnVvG51zeFklAOJx2RdkOlvVLAkPPaWsQtdoBrwmU76b7h/MdepUcTSAt is5nLGBO7YglcFmfzi2HlcVn5RB4aU47ud5VflsNWf92tG9Ou8663UCgzIG2 +daHr9pbCNQ70y49vGgafzsB/TO0V7vHnFLsJFDpSvvpnTWVe7oJyAZ5ORaT nhqfvcK1h8DdYNouZTqBjxgElp6j23exar7nsQjc8aSty2dqwGGT9XSedqI0 I2nmJwJHvGgvWGsnvuYzgdyLtK8b/HI79JXA74f0+D9Pe7V6fyPv98e0zW5O 3vDqB/m8eEJ7icjcyNcDZP1eoft/DpGdFT1IQPPqxHwLVTxihgl4XKPtGbmO EfuHvD+v056WuD/17TiBaX60H+Se8kvkZ8PMf+K825+opU9j42MQ7YbB6vZs UTbW3ac9S2W1cpk8G85htHdahZ5v/I+N2VG0P1RbLPi8n42YRNrrNypl87uw YZ5D+2CIFN+DNDZs6mm7/hDWUh1no6mH9sp0+5ClW8jnQB/tvouVnxZcIt8b f0ycX/p93aocDkSHab/6af7K6y8H/SO0lXYeb5CbwoX5KO3o57b/CmZzUTFh uz3298XFuOAbo63yx0HZWoKL1RMW3uc0FCjFxe4Jf410zk9fwEVYsYDHLur5 MOLi3yvDRcF3hTkKdzmI13c1ni7PRfVE7jjm9vXwUi7+TXjV63O+ccu4WFFC W+Sv595mZS60J/zjwAXJfyu4sP1Bj1f/xouluIqLMxN54r+Lb/XVuAidyO8Y eXueW8NF3ITPxPhoR2hwkTrR3pDfV6RiHRdtE/ka4ysdAxu46J3IxeKuvlyw mYvhCf8SuO6sDS6kftLtG01ubHLYxsXKCafE35wSqsXF9glnCT9LW3ySC7cB 2gWnkq0TbnBx/hdthzu7W5eXcTE2SFsqg6UbNe0TpIZpe2l02T/b/wl8v2n3 JDYFPXz4CZET/h/Qu2EH "]]}, {Hue[0.37820393249936934`, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwt13c8VW8cB3CJZIVQslvIToUk30JlNKxUkkpERig/IkQSopKyIwllZY9s 2Xvve3W5rnsRIZSV3zn33H94vV+f7zPOc55z7nn2mjsYWNLT0dGlIH/Q/wlT 35xb/fXVVB66TimqeKvZ0PNW5vDIg4/ytdrrtTdgmc896zXPKUjRc71NX2sP qonpEl48esD2l22rd40n/JistfiP5xZEpG8oUr6/hOzgLnonHkeIvZ0mWF0a C/wjA533ebwhdwrvfzMxA9q2mX6z5wmBBxEKrw5olkEp42l7CZMQCKi7oJNU XgYpDGJ7iR9CYMp9THtWuRye0c8FXJV6A5ln+cp7pSvg+D/fqxrqoSCsO5A7 H1AJiUtpf/gc38E+2Udx+6y/w+PxtWM1zZHApjDfZs5WB9ZEwqQXVxRIyB5d sThTB8ZjtbHHr0TB3Wh+JfCqA3nCa8bMsSiQD4mNc/9VBxPD+3ujVqLBTklp L0NHPRh06zo7iMdCzUD3rGBgI/CMXrj2sioezhQkxNoNtoDJLtcTAmPxsDV0 i/wj5lb4oBsvlEL/EXrKnPWvHW8FyYKF0RqNj1BibxkSE9kKp4IibNZrP0Kq rIGewOU2sD02+ti2KQHMLopNjNe2w/dA5zjt7kS4YR8TPqDeCdsrYr37fydC 8XxLLPfVTriwWGduyZME0j+KzJXsO2HAbI+4z+UkUNpm+U85ohNmj5RnFvUn QdGl3U/2T3Ui689UJY5Lhl3/if15FdQFTgoxREbSFxg48pg9rrQbtPa66c4x pMBKurVxYFs3iHJeyR06kALb6BdrbxC6oW1mp2+mRQpE31QS/b61ByRTXuy7 Np4CcmyW29y0e2BcxP12OjEVDrsy1yZ09IAx+7UfBmPpsNBzcG1HWy/IrCue O0mfAeu9ttcl8L3AMM2TKb4vAwxiEjOkfvZCbkOH1/rtDBBUfms4x9wHnM+0 hJNHM8Ajymb8gWYfNK4q3VghfIVkk6heq/w+EHYOmml3yIJLvXdEHvj3w66W rtsiPlnQZMosMveuH9gP8PfdD80Cx3obDeOEfljv/lLOnp8FTl69BsOl/TB0 pO617moWxOzetrV5rh/CftMp1D/LhvZ+XbrLRgMQrKuVvCs8G46vsXLdujUA zz695r/7ORsiZE3KjewG4IGh8FbGpmzQiLMxWPMdAL3cEz3qHDngHBa+71TO ALA9dHEpj8qBLt8gfDnLIDA0l02xp+XAw39P0x14B2FtH+PNG6U5kOxyNZ9V dBCmut6eWx/JgShp1x+MxwahQSGbT+VALshFf/BjNBsE34Xp4vyvuQDqE23a 6YOw6nR7M706DxJtC/YlqwzB4IGawp7uPCCTq5Is1YegqF/McZ2YB9xPPjLv 0hmC/07+JOgy5MPovhOt2teGYG676/cpzXzwk9TI23QZAvKHYD+JunwwjP1x vyhzCOoMfp3U68sHZpcNm5CCIUhkNFh2nciHJpJqqknZEJjb7raq31YAp5cd tOuahmBEMUHr7rkCUHmnaLs+PgQ9rYWsiQ0FsHdtgffPrmHI9eavaR4ogFkB JssNwWEIPeLp8ZtSABnKjy/+2TcMl6LUZ9SZC2Ht3znNOtlhaLJobRvVLoRl HVH67jPDULU29kakuRBSL7F8/+Y0DF8P7eCLaS0CwZQ5da2qYeA72cgp9KMI +GPdenTrhsFX7xnzh7kikH91rEqjeRiuuq6uJnB/A4dz+1i4eodha+0EPvXa N3h+jWF8PwXJb1V8KiZ9AytXmQQ1Nhx8f+j+XvXPN1B1SkwK5cSBjP+xsPLt xfCk0dEex4MD+q9pz79LFYOi+K8P+kI4yFiLuNfkVAyDhqljNTJIHuEoN7RR DEZHZBlHz+PALlVKwpSjBAx6jARi9HDQXzYhOiJaAuZHY9TOG+Egfdx055hG Cdw/enr17XUcXFHQXpoMLIH+WZJZyT0kb91bssJbCorvo1XcnyE5Q/fZPbJl 0NfE8OpoHg5eOFs/1YYyuHxUtGmiAAfl4xtlbnplwL9F52noNxwcqJU4NvSg DM543vnYV46DBT+v/TGFZfCmp0uWuxEHr5gk6YROl0PRn8zWezjk+l0rTlww KAcn0xaH4hEcLJGNXD3vlIPsxIot4ygOTBuezOL9ysFY/3byCxIOJAN7cXFN 5fCkOTnAcBYHdSw+30SNKgBXnzU4+Q8Hq+67lvQsK4DSa75GosODzHSavI9L BTissJzA0+PhXXPf59HICnjOP3C6bBsezIOlwxPwFZB+1vGz5g48bG6zOx56 pBKM70QZuwviISZg9y6eskoYi7JtbTiGB4nZX5f5aish0mJA5oASHgoMG8IE Wyth99C1ux7KeOgQduM9iK8E/8/4x/tP4GFb/hCP4kYlsEUEr50/hYcHo8hr 9WQVmP/XdYRbBw9051wMTc8gzsg4B7p4eJl+8e2tC1WQGaQcZ30eD19cN3fe u1EFOdcOSOdexMMI++2d7p5V0O489Z+EIR60VQ5wvS+rgkXz1enI63jo+7Cu F19bBdOnXv+JMcWDBWNvSGJrFUgryHx6fwMPXh1+nBn4Kii8KzsXfhMPeXfJ HOUbVTAkdXvZ4Q4eRN+m7iCc/A459nxKRTZ4+DMtz3ag/DsI/+u1q3bFQ5PP Mbveuu9Amnti+O4RHuJ2q7Q8b/8O4xSR/Xfc8KCpoRE8SfgOjslHQ1fd8RAa fZktc2s1pJWGAZcXHqS13dlUtKthp5uu7Jgvcv0/vOym9avBT8x48+0zPHQ7 +7a8N0Es8JFJ0w8P7vHBwZu21TBWsdge9xwP9X/i2GpfVcNWU/4SCETuX3I1 m15PNTy73ZGn8AoPiqoNdlvw1dA5brXZiJi5q6Ulh1QN7nO2NTdf4yFrozeY 9081MA8caH0egocNIwrb8J4a0LunpFEdiofIrezsd2/WgJFH1sLfcDy03TJm 95iqAQ3zA8IOcXjgTbR+HbWAeD1MuxexKdmdq3C1BjpemHupfMDDlP0H3gWW WujEqbLTxyP3/zFFyFqqFkqdhDb9PuIBwtxljexqoSOoROBOIh6eDwRnOTnX wgHWHFIx4jaBDwqvPWrB8or9MFcS0n9CtWJTcC1Ua4galCF+lMkGpzJqYY5z KYHlM3I9jXGXpGdrgd7N09U7BblfbNmd2su1YGqlOtaMWE2v2tDqH1L/xSF8 VyoeWvrIVxJ21EGcNfNYCmIKUf4Wn1wddCQxHGtIQ+7/v++ODI51UPBQ9Bgp Aw9vFMhvcPN1IKkjfzQtG498j9091rlSB5YHv5aPIqbwTgzUbqmHrj6P+t05 yHgr4yKZXPVwMbbn6lPEPyvGMnwO14NmoHaMfi4etC6MNIo51YMy0/nYwTw8 LJbfsBdwqwdK9afw7fl4+CCP5+T0qQfFwKOiSoiXuXFXVkLqwTBvLyUUceLQ IKk5qx4+3va3OlOA7B/r3i1Oc/XAW1i6GV6Ih/RBoyTLv/XgLxf2sALxFd0e LRO6BjglKeBPRvxVtvu1BmcDJCpWhCgWIeu71CG0S74BnoQSznYgLnracrzE oQFuemesLXzDg2NstRPjrwag5zzDtlaC7DdwOPb5TwN0D8a9FSjFg+Eo/4oW XSPU+hLqTiBWPPjAO5irEWwMPY4+RryWLvqa+2gj0AVpaCwjfl7qmb7XrRG4 rqSM4suQ+2l2yLHapxFcGH0DVhDfo+s9YvmiEb4u9pN5yvFwXlO65EtMI6h1 dnfpIN7ZMtQoV94I70Ta7HMRxw4rkU9ubQK6rPZLjyrw8MqTmPqDtQnid//q eI3YW+T1fR+eJhDqO8n7GbH5nYmlmoNNwNQ6PNmDWGL6HcN5rSbY8onYLVOJ vA9W5/eavGwCXxYP6V7ETXvSTV12N4Nn/q/MjSo8yN2zVH8m0gwCyScD2b8j 79MiYYlQ8WbI+KemKoTY7Mqb3xlKzZAb0SKvivj3O5cXpCvNkBD/98YjxIKc p4uMIpuBgZuOdwqxz83VWPP4ZhDU28j5g3jia66v45dm8EjhlGesRvb3BbFL wUXN4N9T0CCCWDOIdaJ6oBmqs556GCK239bHfWRPC7jMNMvlI+66/Hrl1N4W WJ3vGqtErJyk9ePioRb4afXGrQUxvWZJqs3xFkiQOmNIRBzuE3864VoLhGoN lHPU4KF83caBKxqp5xDPvIOY8/dm0y/+Vjg5GRW1grjkAakjdX8rBF8gLdLX 4uHuQlOfpXQr4G+nK7EhLp0PGxs+2QrL2RnOwoit56RW62+1gvDOa92nEVfO XDkUn9wK++XFrj5DbGt/Uu56ZisYfvtxLhjxrpl9x3YVtQKhv2XfO8R2P2dO BTe2wvA9gZhPiPmmfa8++tkKAnHXY6oQO1Iy/fUU2uCv8QmmVcQC1mEvWU+0 wZxd4He6OjzUkd3f1mm0wRhewY4JsSD5zAdV5BwwYKgXxIO4gTRcIPGoDR5N Jm3IIBYlMk3QlSPnBN3qgRuIO/E3NbO126GqP+9pDmJCUI6thkE7uHeTNQoR zx1nfNtr0g5aB0f+liDeEZ46umLbDhp3QtVqEZ+/uOSl/qodFg66qvaj45W/ +Nbd1Q78CaKCK4gH7PAEy+F2mNb4IL6BmMwvv/0vsR2e1OdJbKlH3p+uvcaC S+2wvIODjRlxwm5O9xzWDpjlMDPhQ0xoN9m9JtMBL2dcpI4hpogxSGkqdIAJ 4833yojnPDPUXip2wGS5LYMq4k0pursi0AEVvReK1RELByTlaeh1gJFcYsUl xKan5vSDH3TAA7HbGtaI+7P8goUKO+CrnlvxW8SRI8eyBUs6wG5YiT0csQnb RK9ARQeM7TY3iUQ8YnVWhL++Aw5pyY2/RzwuzJSzq78DsrgECpPQ+QQH9HP8 Qdr/PG9ZgDinWHl9x1oH2JIbLYoQP6RQRHdsdoCur/vNYsTLGto2bEydoFqU eLYc8cYq88b23Z1wuukKvhYxy72gffRKnWBgWnWsB3FL+IlzW050woOpTzO9 iF/WTNvSAVI/Z/mxHzGn6Pn8f2c7wTosa30I8a5+Nq01407QUbH3HUW8/8wr +0WXTvD0KB6cQay6903RREEnaO+rn9jagOwPqyv2qiWdUHHc5xwjYsYMoX2h FZ2Q9jcxcRviNuXUoJMNncAddtGIGfEtvWqzd4OdcH9N/MUOxM+eLDGor3dC mdbnK3yIrWtLvkXQdUGptbjvHsQXWJ/en2HoguxrMWn8iHdF7BiIZO+CJ5FP fgsi/vJVPO2XcBdEJ3De2ou4BX9NP/Z0FwRex+ccQpy1X3Tb7zNdwHdAKlsS cdi9iWItnS64FD6WLoXYbOnBgUUDJG9IeS+DeI4t+I+ORRc85dM3O4yYR7U8 9u/zLmgfCnFQRnwjet+UYUsXXEuZXdBEvF7wK/NmRxd4pwrFnUEc3V36n20P cs7tSz93FnEf25Utvrgu8FNdDTuHWO9JEF/Ozy54XFwmooNYw2LxLCd7N8iC 1PRFxGPeVWyCXN0QkCDodQmxd+yrLnHebsjHf+HQQ1zaJ2EGQt3gZ/NBVh+x ovaN/+7LdMMm7y1TQ8SHZOs+tVzoBh/chtsVxA06b+8N6HeDUbDoX9R3rW7J jV/uhnQrzv+uIk6IXy1eu9ENvyrv2F5DLMgt1yV5vxsm9h7SuY6Y428EXeCr bgjLCe0yQ7xUde/GmfZuWO0bErVEXLB8PvdzdzcIWz33Q/1ISp6ZZaAbnD+L T6Jefbec14ac4/cmXc+424D+PvuyXV3ohoe7mg5ZI2bZEVtiw9sD9WksSzbo /VP35mrd0wOH9K/r2CJ+6XrHSk64B1j3tcah5hw9xL0o1gNbpnjO2CHmzSuw 8VTugaF8b397dD+adOwJud4DOq8zSA7oer7KdVi42QPXC9dkHBF/qg6vNbLo Acne4P9Qi8nccNpj3wN2Qm70Toil6KYaErx6oPVMMfcDdH2Ttz7K/9gDzkou vM6IdRcU+4bIPUBuavvoilitvKNU4mcPWG9v7UGt8MLmk8tcDySUaTE9Qsy/ L85x50oP1J4vsEFN0Wdk1WHphcXwj1Ju6P7P7oZv0r3w8M+3cHd0/TztxZgO 90KY3M7vqG21mdgvH+uFrvmVn6gNRlWG5k72Qi2zz+nH6PVyJThLXOqF1C+e JNSljo4pEU698H76IL8nuv9VWUJI//WC8dK6GupP2xNdjrj3QkuUyx3UL+L7 Ndqf9kIkn34a6qsdaiPb3vUi55pCRS/0fsuxc7sU9MJKP9/JJ4hlf6V4GK31 wjFLlh0+iHFvdJyvbvaCWRxBDHXg0Wlb0619cMTYG1CPu0lft2Dtg/3C2xxR RzFkHncW6IPJMYs21Az8ectvT/TBLfcc76eIc0qNZiOgD+bPcoSjvnlziRSj 0QeOuUfTUBcnKvZ+0u2D7NafPagd5L7l5l7vg6BOOjFfxEOa5Y7dj/vAb/Rk BeoAspl1/5M+qN0X3Yn62IvNm8O+fbD2o46IOqT91CViUB94tcUwPUN8xqRa 5ndMH3Dw615AneXQMLWztA+0ljY6UD+P7rIwWO8D5zm1Uj/ExpcDf6bT9UOc 8GwTanHOU85MjP1Q9MVtEHWDX4ZvKXs/6J8WWkbN7BSQICbSD4WvE2WeIw4+ p0ZYPd0PDCyc4ahN6ZesLp/th8qS1wmopcvSfmXq9EOkCOkr6laFPZsWhv3w 4LpMPeodwotC7Rb9QFHSWUb9ZjHl+if/fjC7SL7oj9g88xZxI6gf1GvdrqFW sNltezWkHxiTl++g7vrxzJ09qh+eCQU9Qs3TfDPKNbUfAmQC4lGHf+Tt123t Bz/OimnU7y/6GCzuHABurhbHAPT5IahNM+wegN8BFFfUWU7rvrwCA1BHt+iF uvada77i/gGIXmkLRj07ZM/ndmQARhLaPqMGK5ORDcMB+EVuGULd9He3646r A/BQcJqA2uhFL4eI6QDkSsxNoLbO0Dt9ymIAfLl6FlCH/D6b+NR5ADJNF5gD 0ef9yREbprABOFD75RhqO655er4oJL89poJ6OeFrjETsACzo7jqFmrXuUKt2 0gBUKWvpoD7KJiofnD8A3/0UzFD7RbItc/YNwHPdSF/UEtkkH/7dg8jz51uH enzwWtougUFY+6zThPojfVvPTpFBeFe81oqa36hAnFV8EPicLXqp4/153rqm OAjJImVE1LOqEnvwxoPAaYn/hzrV8r36oMkgSJ1no3+B2OoVp12v2SAcrjFl RE348be89e4gOJmlsKLuetpoUe6C9HdtaTfq/AabrA/hg0A5pSKH+sH8yGBM 9CAw3uFUQC3Lb7g1Mm4QEgKJR1En254wDkkeBM+/11VQR+5gW/cuGIQLhwma qD2MMs6Z9w1C/d6lq6jVCb9GDuwaAqXfFA/UW8wZDJqEh8A+SdEHdSWRr9ZB fAgqRWv8UJ8kn04rVh6C2gXpV6iVZ9+66l0fgskNwTjUfxy+TC3dGQI1upWP qAvmS2/E2A1Br9rnJNRHlkgaE55DUC4dn06d/7oSp0f8EBzpcy9GPeN53ndv CjKfhOQy1Ombt5brsofg+tbmStSHtr7AcVUPwUehf3WoD7DgvnwmIe1DPbtQ 7+HzPt0tOQzqFvgJ1F4uNbbLKsNw6TbfNOqxnu3he3SHIYvt9C9q/2/eTN20 HQYCN88f1FxzvTy+j4chorhiFbXLRX5IDhoG+uTr/1CfYv309mfaMLzx7GII Qpx0j1zGUToMa4XB21GzNEhRFFqGQVSGixV1z7M8Vbefw+DfJcCFGjmrkxhl cNBX8FgAtZbHZjGdHg62j2wRRS25qhyy9gAH5ia/DqBme/TAcjkMBxb/iRxC PbOUpjJfhINDBWUyqNsekjh+DuPgQpSHPOqseWHSxD8cNL7QOIo61OFq8ehe 5D0QWqOI+uHMm9c4TeQ9pCt5HLWJ6f0zQYHIOVa4WQ31qWadteNtyDl5uOE0 ajEV8WzKzhFYIHWcpc4nZatVxJUR8HY8oIWa2yzid0H/CKj72p1Hzc8t5d13 5Qe8rvExQO3d4sPRMPYDKoO+GKL+rW7XjlMkgAl5+BJqTVa/zwWuBLh9yk4P 9bvu2CchRQQIetlHtSPp266XxQQYMBikWvdPb0ZgKQHKT966Q50f84Lm83IC JDeOUHN6gR24p5UE8P5sSc1HpCUfPvlOgBwDa6qL1c6yeNQQQK95glofrmf+ 8VEdAbruTVLtZO6l/F8DAXRlHan1552j252aCLD/3Sw1l3hecPd+CwE4ROep Zojs2rBpI4BQlyu1npAy+86qgwCz+u5Ul5awSFt0EaCu2YPqiFax6ls9BMiH J1Q/+KFucqOPAG98Nqj9XZw3m782QIC+yU2qJbc+DjAeIoDpeXp91Iy8ESKG OALIpzBQTRDLLbg0QoAI6SBsPOX2C+cJBJDzekl1pM70uNYYAbbFsVLrnU2Z PM6MEyB6nJ1qvfv7udUnCFB2kJNqKW9IVaMQIO9lOLX9ttDrp09MEWAqgoea j31yHVD6SQCNpWhqXp7/1uHoLAF+L/JR8+j6zG2H5wiQIiBAtctgc6zMAgHU TgpRrT9NPiq5SICSayJUS29sbRFbJoC0016qt3OI3tn/F7n+zM/U/sdFVVdF VglwpSyF6gqFq28E15H2UeLYeJrOEnv+EeBR7CFsPOOQCl66UbB+L0W1rHvD zA6GUWAIlqOaFEsnuH37KExZH6H6fZWyzha2UXh4RIlqI5Ljo1WOUViaVqFa /k8wxx+uUaifqaSOz8qckvybexQaQtWo+QR/7ck53lFIuXmK6u/Soz0/d4+C s1EdtT5ObcN2cg9Sz9dAtZvenq0TAqOQmn4GG8/8WPSY0CiEW5/DxnPWP/xD ZBTCzrdS69me2zcM7x0F1h4dak6JCLw5sH8UCJkd1LwmJWm55+AogNxFav6h pOplp/goDPZdonrHVoWparlR4LtoTLWHTsLZAqVRuB9gSrXo9udSOR6jwNkV SHV17T3Or1WjwO6fSjXDr2JGVvoxiGyupPoMH9ualfoY6J7opDq/unxeJmAM co6PUH3QwYnyu3UMhN+SqVZ4/uYXPwcR8NMzVJ+KzV4+rUeE9PAFqls2DdeO 3yLCR//fVF81X9487EiEPVaLVMe9PUcv+wip78A8XhPJIOlNhKuKS1Qrcskw HnpKBKlLmP1vVDFKPCOCkoSyezDigZTL28SfE+HdKcySy5PbxAKIkH8Vc9ur ndsPBBPhYgBmJ/ETzPtCiLClEDNP5R0W0XdE6B/HXHQ1mFU4kgidXMepZkkS ZROKJgIpPvcQ+vtwfT6PTfA9EYYLMKef1GYXiCNCgSFW/y8Qz84fj8x3DMv1 +px27EkgQrwXln/ct42DL5EIGWx51HzhfjTH7mQilH7Bcs0SWc5dX4jgWYY5 nKmakzeVCOxdmMmGV7h40olgeBNrrxw/zcX9lQg+DzG/+Plk584sIjzxx7zr 0r7dLJVE6BbNpzohu0aAvoMITJmYGVksLKS7iBCldYLav7X51gzjHiIQTDA3 FycsefcR4QcJq5flVldLGyDCmBeWv7Edfd47RITYEMyL1d7tmzgicAkUUOuv CIrySf4gQkAulhc7V9wyGiVCSQ1moVazFC8iEZIvYvXeB//NfyEh87+JmegZ q9JNJoK0I+azfaq+G5NE+OqNOUUW1yz+kwjCfKrU/tj8H/MYzBJBRwKzww/+ Gx5zRFDIxuq7lIqTkheIcFALy6dW86b+bh0HqMJMX54pp8s7DgPyJ6l+JSJj sCg0DnqWmPl9Up1jxcYhKwIz4fAk44LkOAhmYU4eE484KzeOfCdgZj5R/8Px 8Dh0d2O2e3tXIubIOHj+wNw+zehUe2wctk9jVtBM+vZLaRxutCsMot/vYe81 6flVxqF2ixo1/7tI1NFUHYe/bJivX/B9e19tHNj4MJcn7cNFnhoHhv2Ynxnf tp/RHId4Zcw6TPH/TmuPQ8sFzH3WQnun9cdh2AXznaZojXcm43AuDvNt9d9W ajFIfThQfbNYN5gyPA6rF05R7VIoIbLwbxwU32MOzmPMWdtLgoARzHJGt8dN xUjAM4G563fprnJJErjOYE6snsqclSaBwDzm/97yaYvIkSBvEfPZO2fHLh0m wZm/mPmOOD/2PkICZh1JZfQ8aPZAiqCuSoKmK5g/ZY9pMp4hwboFZll5/R0v jEnQ7Im5+GtF/w5rEiS8w2xuqT/n/IIEV0sxswoStw+nk0BwBLOLkp3NlkwS sBAwEwyWmsWzSaBSaFwahlj3vpfMxVwSDBKxvCCQ6bVzPgmKSZhFk0LmogtJ EEbGHFS5x6DqGwmyy7H2y8MJueQSEpycxvJbf6R4d5STQO87ljftzHc5WkmC 7lksPyarNmDynQS4WiyP164/7lNDAuMFLGex1Iv5XEeCnYuYnb0H11sbSMDe jNX/iDE3W2wigdsfLNcpnK7gbyWB2ArmvC7nvafbSbCrA6vf/rVMxplAggYc ZtPAbSqf50ngScGsYx7xuOfwBKSxXaH6+AmJsi0PJsBKHLNxOD9dZOEEhKhi dp5n05DdmIBmXcxyRXbhB9XIcNAY85RXy6TgEzLU3MAcsPPbr92+ZJAwwyyW nLS0058MQTQv/Yp5xBlIhuxHOtFb0N/L46Fr7EFkKN3ehzvUiIe3vgFerC/J wO2G5eatXluYX5OBnxnL4xavsG+Gk6GH5kGBw3uW4sjgz4JZz4YoP/qVDEOs mBuKwrRay8nAw46ZgXDfqLqODF9oPsWkdetbGxmUdmDm0FcjFnSQwYTmkeij d/O6yPDJC5tPxrjkZHYPGT7Qcg/ZvXaZfWSYpOX839kfpA6RQeoJ5qLLq65J I2Swp9n/w9xqAoEMdzmw9saTE57xY2TIoOUHj+Dp4sbJ0Erzoke3b8wEGepo 9dV1jduiKGRg9cbyUM7KwPApMkjSfNukgO3dTzJo0yyfmP76zSwZrGjenEnY +XqODH40tylFhQUvINdHc6zPa74Xi2Sootmu2S/Gf5kMhZzY+Cd4PYT9/iLr TzPLzQcfn66Sgc8Hqx/4Yn3Ae50M7FxY/nnB7LPnP2R+NAdo3XqQTEeB+7R6 67jbJ9vpKRBEs9ai+fa/DBRIpVlCx6JblIkC9TRvj7eM02amAInmyaW79x6w UmCI1n+TrvXRGHYKLNOc+vHeZjUHBbh3Yn7xx6bpJxcFLj/F2ttesAvj5aGA Di0//8n+ltouCtylWXrlvpQVHwU+0+pnEp2qigQpgKP5q57zFZa9FOD0xZyz 6ZWpp0CBfprzvwYyRWhQ4OUz2n648e4m3ogCx/wwl7J9KNx/lwIdNKtZJBLr 7lOA/znmypIUDhtXCtyiOZ4rbSjUjQJONPtYpSeVPKZAzZDEHoMm5Hkpy3Ac 96TAW1quzp15gt2bAp9o3ncva5viU2R9aPX0FdmdZs+Q9rR8jCf3vf9zCvTQ XG2TZ5UVQAGxYayeTvr4ibwXFPhNy9VmynYUBVOAzh/z46/qYyWvkPWgucih Pr8iBJk/rf2y/PnA6lAKSNHyIwsdpvXvKKBCs2PuZfnmcAoE0uq/Og9tbY+k gDEt/+Q2oz8Sj+wXmiO96OJnvlCgguY+8Hs4n0qBFpq5t7CcW0pH7gfNet9f 8a98pYDzoD99di3yveDLPbueRQEFHDbe9m1CYQz5FNCl2TdATJXtGwXMaa7U TuPgLKGAA83/WOSJ3GUUcKf5REtewe4KCnTR+n/08vgLgSoK4GkuuFh+Q6Sa Au9p9b85NA7vr6VAMs3ynfUM4vUUyKH5fuj5AclGCrAMYe2vvX/grD1IATOa NZMjOa0nKZBO81MroXHbaQpY47H2FRIJhQ4zyH6heX1SLOjhL2S+NKukpZm5 zlPAl+Y8mXzGJ0sUCKdZLqs8/fkKsv9pPpDfuRq2ZRIaaeYvHtdKYp6EKZo9 FfF2H/QnATeCmZDTGxIVNQlBPzD/D4da/ss= "]]}, {Hue[0.6142719099991583, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwt13dcTW8cB/DSokE7lZlUhMjPyPpQocw0lFAZaWqQ7EhWaVkpREII7dLW Xve299S4K5WiRYPfOZ37T73er8/3Oc/3PM9zz7l34XFnQ+tpPDw8VcQf8n/4 9xS30jsHtugbzbyxuNNli/00maw46ZU4WMrb5vxnH0ZmX4oJkN4KT74D1sJ/ LLDpzSc1D2kDVJgnMKx+O+Fbd/7Jc9JWOCn+UXvViAdifaumuUq74PaniYKY Pn8otDVUOklfR9mjmk3jtBcoEzySclo6EE95bodL6UUhXWDbaTXzQGjGmw+d yI/CB36VhV0vA6HNuGVhpx2Nm9MG7pqp38fIydD3hXNjoPXXy0xH+wHMhWvu yMjE4s3wx9HZLo+Qm5H/tnM8DpcZ42vyaMFgW+q/lH2XBNuu9m4PiRDkxC/K UWlPwsHO/FAt0xB4V6iY8Ml/wcr2AIHozhCU1Y/ZLvD5AlbzotqQP0+hZ93x vd0uGYbVu92cVUNxh2fF9TXzUyHdsfeQX3YYhHOXcPZbZsBc9vxGxc4wLJvT IiPun4GXu8Pmfpj2CqVv7TY+T8/A0qRfHXk6r7CPrvdDTj4TW+89sZ/If4VQ L+nEkPJMOKzpuOxQEg6fg5G7zOSzkOPt9kK/+g1+1susNbfNxvSvodfrB9/A hr/7nPWVbOwdKjhuLf0WAqra2SaB2WiwkFf1NHkLvm3+15hfsvFjdWZ0cv1b jN6PbcgWyCHWXyhbtSUCJbx8512f58BV81mXAPM91AvuGX9LzIXewou7B/g/ 4K+m0wGdglwsEDeNb1L+gHYtjcP+dbko65P0ij75Ae7Jc+iNI7lY+sFH6RDj A6zxImHn2jww5l869qkrEstzHeb7xeThoNihb4adnzBoa2+2/mE+lk+s3bl5 2mcIbTtYFBqWD/4e6WhVpc9YMnbKo/dzPuKLKjwmjn1GtFWf5I6ifIjf1JsX 0fEZd+6lbu0dz0fx2Lqjf9qjoNqovXu2ZQHmud3rK3eOwdp4WsMDmULI0quO zfeMQcmHdJ01CwshpqxQ5/QgBhKLHWyzlhViovp9plhiDBbm9lnc1ylE0+qC gN1jMRCcKPVa6FKIx4M8moU3YyF312BQNr8Qvrv1ImSDYjHjeaKMcXkhbr4O UDj1LhZHs81GLzcW4ozRPD6BkljoHo645NtXCIP4jTXas+IwvOG4RIJ0EUTP urtnhsQh9IrgkJZlEfhpGd/FPsYhqiJSX9O2CONKApZH0+Nw0mjAWs61CN+r Hu6caIvDQLzA2fc3ilCkGTt7g3I8bEKKrLrfFMHrV09qYlQ87Ms+W05jFWHM 9di/T7kJ6LGSN3c4XIxG5bwvNdUJSHfN/Jx/rBjJ9SouE10JYA8vCJO0Lca5 zb3tu/kT4WGql3XTrRgD08/nfNdNhE+5lBfdtxjsl7631AoSIXm43e5vajEK DPs3G9Ql4k74aKhfVjHeCBiOnGclYoXP/k7xgmIcd5CzKRRMwtzssKHBimK0 rQ3XO7UzCVv+Cb9fwSpGTekXkTdFSThyZ0jTe2YJ4q8r5NEakjAQoxt6QqoE D1ZfvTLISYKe9z+n1bNLsD9Eu097xheo/0h4Gr+wBCUnS8s69L/Acf6PXev/ K0H2eOf9+bQvqOcdcD5pWoKoJTNnPytNhs0Hn0l6UAlmby4Wn/stGa7aFw8X PS2Bl8HNGS8HktFVwCua+qIEZufHxsKlUrClXTLtekQJ+PJZrZGHUtCQq/wm NJHIrb6+TmWmYP+v7jTVqhLknL30fNNoCp6yfos9qC3B8jtrHmdOTwVPteLY YEMJpkV9vJ2jngp2n2nfi28l+Dz+xK7ENRWtk18MHvYS+RMXjabJVGRGX5sj KECDY6S62pFZaVC025vzS4iG+gzWgrYFaXi4P165QZiGT4wjkp06aVD7LXnC T5wGU0394W7vNBx6rRnyWpHISxem/ZFJx8rDHdJ+K4mcv3qH/IoMFBi86840 ocHHzfaGPjIwOO/Js3pTGjIZkxkXDTKQsKJLsecQDcr5amuazmQg3TA/eZoF Db9ueSx69iUD+t6WScPWNPgLLeWZuy0Tu/M9eIfdaMg5/3XjXsNMpM0OU81y p2GYbXz+6olMYMnO2tsXaDhSdO1H6y3iOWYh8kvwCg1LvWtbXpRkYvDdNbPq GzQUCHumLDD+ikaR9Py3ATSMXZIdNrD+ilCxhg0r7tOwvOfjSk/3rzjq+Kwh 7gENj2h17zqCvyI10Sw+5jENx32XBYW3fsVBlVrmtWc0/BN01HqwOgsCLi8n zkbQ8OyunKx0RhYCZzQ19abQoPaj32R2fhbm3DerHE2lIcmo6PGc0iwMbPQ2 5EmnoWLeRZnFrVnISwgTEc6kQTCxSXrtZBayVA4M8eTQcKYjVMpsczbmf7cy 8SymgWenu9GR7dmwU35406aEBr9P+x5a7c2GucXNh7tpNLw//0/S7mg2tnwy OilWSkOb2DHJS1ezMS1R4tCFChr0NyhLPM/IxoOTt97119FQ93LCICw/G9eW KIok1dNwUqA28E1pNvYEnQi+1ECDR8Ut8c+t2fhyTWXb30YaEk6xZ2VOZmNm mOS2gRYaFjyMnNm+OQdl76vu3uikYbRnpahyZg7iaWENl3ppKPFc41hbkIMT My7bK/TR8EJuA/12eQ5azj+2Siasq6Pj292eg99KHO/+HzQ8eGoiGs2Xiy3/ Hd62+ycNy/QviW7Qz4V0yujbtGHi/r95OPYcyEWd1i5DnREaqt286M/Nc1Ec xHxZTPhSmK/vP4dcCPwbXFY1SkPh6AvRfP9cbCw/61T9h9i/iFxRg5pciLva nQ2ZpGHtpiJH3tZcrLlqXCD6l4YZVXR6HDMX8WZRPzwIx0zW+sqM5uLsuTCa 5T8aJo05os3yeagavjBdmpeOYD4xsVOWebizbJqgPj8dZVYHxa58z4ML3x27 0Rl0yLyxDQj5lYdMm8xl24XpOMK+JPFlLA+uWtdXPyD8/fRLmV/C+bCOTJJc KkKH4GXOXFv1fHzv99U7IEoHHl9aYeyYj29XPWZcm0nH7QbfGFe3fAQWLa/M Jlym+FIz4Eo+RofbR/hmEdcPz11b4psPy0j747cJX4gWxVbiPVZoye7yEqcj pvjF/mU/8jHdqbP6uCQdo6Kxlfoj+ZDdslP9OeEtBrlGNn/zIaF2abSGML2O bRo+swD3390d1JWig9O10mq2RgF2Fux9MU+ajgV/c1z4XQrQx5tUkyJDx31N 9v2WnwWQ0ctqfzKbTnwfO7Wm8k8BQpd9MMgmzJFhNeTzFuLgudqj3wlv+cOY Hy1RiHHZMKON8nT0fu387LmqEDuE5hQ0ENbb21as4loIfbGKu9MU6RjKPHpa 8WIhhiq116oQfrmyVVzcsxClK9/76xMekWox/RNYiIJrrjoBhN80NTJpMYVY VhZRJTuHDh7bWl7XgUKs9PizQm4uHZ8ajd9a/y6EXOcJ1hrCprtr9Mx5ipA+ 7GtsTDhqRXWAjngRbN9UmQYSPjJcMVd2ZRE+Lq8XFZhHR/INulaacxEeNgpk dxB2Cc11Fegn3pMLxe84LqDjOJzXvBstglpn0LpbhI06FP7o8RQjymPt+1DC axefue4rUYwQOSN6KeHxTwsCpP4rRp7/+1XqC4n9Tr/6aeHFYtwMyf3dRPiC xRKXXM9ipHp+GeonbMdTu9rah3hvhpim8ivRsUd3Wdr7Z8U4GEh/s5ywJL2p WCOzGH/L/ASuEg5tXsfezFeCjEx5e8lFdPhf7Yr8JlKCHxNvoUz4+vwAJ0/p EqQ78LHXED5+gjWct5h4b2nM/GxGWK3nEf8evRJodqktek44YeznQnO/EjA1 quQVlekokf90xF2OBuENf4UnCGvYWWvfnE/D7IVF4tMX0/EoeZ7aA1Ua+geu /ZEibGF6f/DzOhpqz1W6qRMefOTuwyTeExoj1xUOEZ4jvi3ZOJiGaFHlI9GE PS3HQo+HEc/NtP0xKYRZUfFeLu+J56CIZ08u4Zi9Kvt9k4nPLT9TroGw7j0R Vi7xHPuXobb/H+HTgnVSq4lzNd/6rp2+Ch1VJgF/thLreIpfSd+Q8Pq3et/2 LaEjLmC71GHC03TTIu216Lgq/8fGkXCQZ9i28EN0HL0cNtufcOaEvbPEUzrO BVVnlxIWH/xX0q9Qin23X5yFKh1pZ5gVkYtKIeew0HcH4VO/Suqsl5VCSlHk wV7C6T8fdzZvLsWHmJpThwnbDqiPFVqVYnqtu5Y74aw+0yVhEaW4NmPWx/eE HU5v1jgcXYqf5fnRUYRl+5TWyCaXYmlx4psEwo69fVt9i0vx6ijLMovw7B4v swu9pTi8aXh+PWEXTvQdA80yGNqVcXjV6FC0fewnsrEMKp6P+IQIF7AvPSzQ KcOVnt/iooTnsLe/3GRShhXOavyyhIuYzUlqF8rAc71j/xLCC7qEWDyZZRit eRKyl3Blq6VurH45dkf9o/kRbr8X56BjWI6hlB+n7hMe0BJ4WGteDuPex78f EZ4ZFNnxx6EcSz878jwnvGffsIe2fznmbSl684GcL9MnpbqqHN0uDKNcwg2O re3WzeV4eVrIuoAwW2Hl9N9d5Ug9uN2pmLDg+dqDc4bL8Vj1hF054XA58Utx IhWwqjnA30z2U24uN768Ak5SKa0DhDkq/Oq6mhVQMQ2/OEj2d/XzFr+1FXDz q545QvifOs+p+agA3xuTxeOE5919m6BjUAH2jc/8AsQ5ObJ14IDvmQpkPOl9 Kke4PuaW79wvFYgcMQtYTzi4bU3snLQKmBptN9xA2FyUVav4tQKvZ42KbyLc ZrNjvkJhBVRDKz1BmDFPKE62vgLzrC9r7iA84Hu3ftZoBQwXTW8wJM9l6vqJ mePE+JU1h40Jn+VwFsz8V4HyixPNJoRHdPTtRYUqETD9dqUZ4cmxGZPT5Srx 2df+gQVhYbt7StPWVeLbmaQzdoTpQRt38m6sxLHT67LsCfvl9TjwoBKGeU+E HQmLL9iT+HdHJWZJSAU5EZatF9UbP1iJs9Ny754lvGi7/+khd8K3t3ZdIbxp 4f1kVlIleLNnPfMjvMDG9PSmtErMib4c4U9Y4PNcpQdfKzG+XCM6gHDZ+sh7 m4uIfsfuJt8nbGWQa/GosRJtvcUfHxO+eW2YX3uiEgIl5gqhhG3z01Ke8FTh bJ/9JOm9Ijec+virkLdmWdsLsr8nMxuCxarQa98QHEb4fZTqx/55VaAlXx18 Td5v66EDoduq0Hy3XzuScMyiBYKD26sg3JTG95HwYztWqt6uKhRIPcghbTF8 RnnIsAomY84bPpP7Ieo7uutkFdbu8pSKISy9KTP09+0qeFaqOScSPvpU6bsR vQpGuhk9mYQnkvqjLSuqIHvg1umvhJ9Wp59zqKlCrIjkD9J1oqa8Xi1VCG30 6skibHDt3uy43irk68xryCGsc3Joh7hYNUxDP10qINx5PVt0jkQ1SmMlvpO+ HupfpSpTjZYxe7NCwul1ahaYW43s4t+rigiv1T96zml5NQ7pVzYUE16youA1 fW81HEafjNIJF+16aNdwoBqrQ9eblhI+ZWOlwTCpRu6ngUTS4WFjqeNHq9G7 N8qljPAcKY2qpU7VKFeJaC4nPOv3Ex5v/2oU+Oz3riI8nG13dHt5NdzalQ7U E04a2RP/rroag41nQ0lfUF85Q7ihGivWT3BIjz0aSShrr0bsotSrDUvI97OX qNmvanC8lF80kud1ZmiavUwNlEZPpDeT+6d9XaJUvgaPV0tPkvY7f8JGY14N +hvkN7eQ57VjidSQSg1s/RenkZZJSLK/ur4GmcFB0a3keTSvkA88XIMToUqX v5Hr6R/v/MuyBgc5Q7GkX+cG5RufrEGvw3oOaZXlR13lT9dg/UNRo3bC6jzf i8I9anDc/z+lDnJ9I/guJL6qAY9W9LtOwrt/ra1rYtdgOmu3GZPwlsyKdLXe Gvxj/vEgrelj/9p9oAZOaVvfklZQeuEi+acGmwRfDZDmHBAQ2SVci8AExg0W ef5jq5GyrBbBgapBbHL9rp5WEVpVi91b+b6QdtAXEjNZU4s0/Xv1pA07NjQN bK7FZaFwOQ55vxLhbmr7azFXpP8h6XQXlw9PXGuR0/Pzajd5/jcJBzLP1aIg sT2E9Ovpb9xXX6qFnczdRNI+YfU65Tdq8V/6eA9ps4otbYKPapER/tHkO7nf GmJS7km1qLn5eE4P4RX9H64Yj9dCfFjsai/hlvu73Mz+1eL7Zk4Aae//ehyO 8NXBeuWjcNKMi8sOnxSpwzcnk0LSIfzRWm6KdRB1ZM3sI8yvkDDycGMd1svK BpGOSzf+8QR1EPDeGUHa0nKY+UynDvc+7E0infpmbe3r3XVY7P2zlrSzRkp8 /OE6zMu0l/pBuEk306X6ch3Mzzy4Q/ou28K2/lodttdcfEx6jc8/y2avOhzr 031NOrB86/6ue3Vo+HM6k/R289zlg8/qoH142yDpGOei75LpdXi+V960n/Dt p1UnDSfqEDbhMWOA8EET795PPPWwWv1YmrSq+FY3IYF6NBfdnE+66NZnr3Sx elSuMF5Deobr3XCV+fWQ1ztsSdp355b2sW2EU25GkT4ybdjGZEc9+kWmJ5Ne lvGxP3pXPS5WncomXaop/++kUT0Wza6oJj1z3tDc8pP1GA64PUr6/tCHw6/v 1MNweeKGn4SPR1t1Td6rh9OVPG3SmvZyDmaB9TjDF7uLdNW3m5fEQuqhwjEy Jy1Nsww5H1kP/d7IC6SDXsnU7y6th/KOp7Gkn+/zNBySbMA1/wuyv8jPT/uW Hn65BgyZ1CqSjnGd8JJRbIAgTXch6fxH5xPXLmqA6Z1v6qR/NJ2efXF1A+Ri 1m0lDRvztkmjBijmNJ8iXfJb7vxMswZ0X7d0IG3sUztr/pEGWMTPciFt+9lg 29aTDQjLmrhAOnBwx5sbbg1onBfiQ7rz2mp7occNMJ5M/UjaUeLntNkhDRjz zogmPRIe9UwttAG16d7xpEUKlpTqv23AR6sdaaT/E12w0jeR6K/XrIT0rWDR EfG6Bsy+mcoirRbL9FSQa0Tio8vyg4RfTSurkZzfCMnOnfNJKxgnqYqoNkI/ uFaZtMjo7dLxtY3ozQ7RIP1jk5p868FGiPBq6JK28Rd3rLVoxN34dfqk27/9 ziw91QiJysq9pKtuFJ/MdG+E2RF9U9KJRfYxL4Ma8bpx2Jb0CgUjvuAXjbhj rneadITDxoOBEY3os7zvSjp4pujE9aRG6PptvUj6ivHnncfrGiG8Mfguae32 /jZl2SZ4rqt4TTqra3a+s2oTdkhfjCS9mb3tY+r6Jkw8540lvf7Hw/MGh5uw P7Y/nXTSz/SjzxybUL4hLYf06mGmDutqE3ZpvCkkHfN75tJVAU3wZWqVTvU7 sU78SlgTzuxJqiL96Z/VSEFsE0T0jOpJL+HzaZHIbUJ7f0MzaWXhlvfvmE24 OvyKMbXeYgIBv0aaYCfN5pCeJ7Hi3Obpzfisc6CX9HNp08N35ZvRec95gLT8 7Ovbqpc2Iy/w8hDpzprpQfK7m/He+vnY1Pz373+3dGiGz/ObPEOE3fcpIOJe M7oOrxckvVXk9cPej80wvJImQlq4SJ2jSW+GrYHXLNI1NxM2XexthveJhVKk id/WTIHlLfD1vqRIeunY+sDxMy1YNu67iHTf8McNP5NbcNP4ryrpmJ/zmKy/ LQi67Lec9Nm++wEtuq04ujdDc2p+2q5xrbJWRFuLaZEW/cBn88S0DSLqFhtJ B3rtXf7uSRvmHXPRJi1l8WQwqb4NY6rqOqSD1nekFMh9w7YE/l2kFaTUr9eZ fkNirv+Ur9M9ZxV1foOz2QyQHtR2LG9Z2w7zuMV7SM95dyFN37QdfoInp6wr cutd0vl22HqFTNls8725fXfaoWsaO2VH5/sPFwW3Y8SucMo/xyVXrXrejuOf 6FN2v/uobEtYO/bVVk45eZ9J6PZwYj6rmimPS8s67nnTjjXMuilvaa7bYBTR Drfbw6un+n31ZIb5+3b8S/lqTTrHxqzBKrIdL5flTFlghfw7m0/tsGybmKrX G2o85xTVDiGewqncJ/Wp7rmYdkyP4P2P9KydczpvJLTD66DglB9Vh14LTG7H tgHhKU+fteDEot/tUIzRm/KVXeE7ktZ1INfZfcoLpt9Wj7vSgcb8p1POzbcT j8ruQCtf4pT5+1MFRKZ1IrKjYMrbZ4uO22h3IlqiZsqJuZk/l9/txHOPtikv dnblDJZ2Yvgvc8qat+/3K8zqwn3ZnilvDY0d2WbQhbW1P6ZM/2c0rmXVBe+g /imbHR/5t8qlC7X6A1N+8XDntBUXuuDzgjIjL5h/6fUuzB+gvFZiucCSG12Y wf9zyneOZguo3ewCJ9XxwCjhhg8mgqq3u+BWRnnpSLegyt0uVHZQvqLtIbTY h8iDzs0m3w9l/pLTlX0Jf6C8oDli+iL/LlQrnJ6qd1XdOEMpsAuXllNONvMV mRfcBRN3yn+9W8UUwrrgmU7ZoM51pnx4F8JLKb9SEpw1+00XnrdR/uX0dJZc RBfaAt2n5tNNWyEu+74Ld15RDhLKFZeJ7MIjcaeperaRqYT0py70LqC8PqxH QiqqC4FVVL1P7zVJyZguPOukLLtfSU44qwthR89POTw2T3FaRRe+lFOuWpf6 NuIXcf2PF6Y8LTNaY7cMA3qnLk5ZwTPSLVSFAXoyZU3dtyn96xio47805cy3 Si3BWxl4okZ5l1DY3236DHTvoiye3BYQtJcB38OU62znLuw5wECzA2Wt7HQ7 GWMGOs5Sfi5/JA4HGai5TJnnzPiYnRkD8V6UT5Q81XlkzsB5tq3PJGEl/4xH IUcYiHpA5Z0H2pkvLBgoC6EcLsO37o0VA61hlI83Lr774TgDLe8oK4XqNUad ZKAkijveymFpwikGIhK545X9L6fYMnAmnTueE0PPtGdAdb4dNf+n6rl5jsR6 FHPHO484FTsx4FrBHb9aPqvMhYHJOu740Y0SNWeI/lu59R6e8W3uDGz+zs0F C026LzFQMMK1jOHTvzcYUJp1mbJya5vUPQYeq1Du/KjkOS+AgbFV3Hy17aIl D4n+NlNWGvVxW/GYgUhtbn3q5/zVTxiYr0c53KNCViuEgTt7KR/THrTZ8oxY ryjq/qysZvy0/UjsZz3XHvMvPUxj4Nck5XYB6zkvvjLAK2RP5X6Rme9zGWDP orzgQOmsqHwGKurvRTDIeukBq/hCBsJmU3lYg2RccjEDfXO445+v4cukMfCF QdUvsDIzzi1loJ/DHb/o8tuicgbm9VEOY4eOlFYykLycO/5j1s7qagaqVnHn d+4Kbqglztcayu2agt9b6xngaHHnH1Hb2NXIQNdmypapu305zQxYCPhOXX+l z8XF8m0MSO6g8mnm7zL12xnQ2UW5ekmt6aVOBn5KUPVv/kz7GclgwMuQyneG WCwS7WbgqTnl7+tTTU73MXDrOOWVF1xTNUYYaHel7P5Fbf6vvww8v05Z787B ZCVeJtJ2UteXN715wIiPCf3dlL+rxH33EmBi+z2qPn3km1eCEBNf/Sn7FYjN Zc5gYtUDyhZBG5NkRJl4+pg7/ym7/TtmMvEnmDLv2iccd3EmGiyp61cJ5Hu+ k2RC5QT3/mp/KTRIM+FwivK5twsSpssx8d6O8o5z+/ZqyTNh/IG6Xrd05LWn c5l4HU3ZN0EgbnwhE1WJ3H5urt69TJmJlmTKGsbHGEdUmPiWRplHOeCqnxoT x25w+xlMl81cysTBW9x+cr9H/1jGRHIeVX/u4Wz9+RpMhBZS3nFiR+f+VUxc KKE8e7Xb5eurmagNpMZbnFFv197EROszyq9jO3UFtjNxNoLyipUHZvocZOJw KuXUqK/1M22ZiKJTPm59YMDNh4l7vZRF5nRNb/7ERLiQH3VeDYdpqrFEf8KU k7yFAtwSif0Ro7zgbeDA0y9MbJ5F+V6WvGF2ChOJ4pRHmsPj2WlMqEtSthpV l5mZycSTSzpOskuJ3xuSie7/ZTEhIkPla1ZsaTDPYcLlKpWH6RdqeeYR9ydH 5cLWBs/eFTCxVZ6y2/XGidIi4jx4UvXfnh23GCphYvQG5V1fer4qlBL7OZeq T6hyW7itnIkvzpltcYTn/Zi8YVPJJH4XUvaecYfhV82E6RnKQ8riOxJqif0/ S9lia8i7pnom6nyo6xcdVprB28SEoi/l1ec/2qu2MOF8nqp/8eA/+t42oj9/ Kp8elbHcrZ2JmgDKZ4p3BDztJO7/PuVWRvlAFoMJPKCsx3PIkM0i1uMh5TjF znixbibiPKjrz1nnIPNfD7E+1yjfMRxyN+9j4lcQVf/r9NWG6/1MyAZTPuIt uOHdTybWh1AO/mrvE8fLgtErytXDZU0ZEizUvac8IM7rlSvPIr4/Up65bLV6 8UIW6NGUQ7X2/KMtZuFcLOVlO62ry5awIBdPeajUdXOFOgtMrtOMPd5VLmch 9wXV741mH4lqDRYuJnL36/iTyzWrWDAOo3LJ7tfM2tUsCH6h8kbnmP31a1ig cR02kp7SsI4Fv2TKtleLFzVpsbA3hfJK/jq/5o0siKZSHvXpHG3ZzEIx15kS /cfawIJXGuXbweO0b9tY2B9Bzb9v/vS1HTosDKVTuUyEdFjndhY+ZlBuWbZQ mLGTBctMym/il7sx9VmQ+Mo9D9k79Dh7WXDNopxTZjmn5wALJdmU27vv5w0c YsEuj/Jf/jzHkWMs9BdQLrhXUTd6goWXsVQ/fpKtW/9Ys7AxjrJxSHfkmA2x X1zPWTAiPWHHgks85a6IadcmHVgQSqAcuXxW99/TLExm2UxeJM9fgqIRjwsL molUrrVRLYP3DAuqOVQuWQbnFW4sWCdR+Xcr04WH3YnzkEvluYNO1XcusBD6 hcqf3759K+ESC2uTKZ+Tf7Gu4woLGvlU/b5Pid1i11g4lULlqih9tsGThcMF VM5Txdhr40XeP+XGkxP/Ht5iYUEaVR83KhWXdYeFGK7v+aif7PNmYWs65ZNz dWQVfFko5VpW58yls4EsdGVQLrJ91UZ/xMJwJuWAf0edNSNY4MulfDBIgSf4 CwtZBZSZuQ8Xnmgi+iul7PZTVGfFJAu/qyhX1aT3fpjLhms9ZY1kx6DFW9jY 0Uy57YOuw4l9bEy0UPZ9NmfrKws27rdx+310d2nWKTb2f6O80W9I+psTG0Lt lF3uBZSzXNj4j+sI76U+P86wcYzrljv5uiNubPhyLXnb6t+kOxu/PHwVtqkT z4+b4ykCF9lgcnOPG0FuYpfZmNVBOeH6Kg2Zq2ys5/q7B717zjU2nl+jxqcU 5TgqeLJxj5vflUzpl/NiI4Fr0yPRZ2RusdHCtUrE22HJO2zwd1LO03owLnaP DUOuj5d68M4IYOMF16vkzt0UvM9GHtc8xxyE+B+y0cN1eeQxH97HRL9d3Ofp kKnYvyA2zhnoGZQvo+P0ln2BE8FsmHHzTXd1pcaesnGVa+GqDUGjz9kI47pR cZX88As2crk2sO9a2RHFRjWDez6SH+uVZrJRzqScbDJ2/m0bGw/YlN/9snh3 9S8bst2UE6O8hZ7ocBDVQznXPsEm5i4HgX2Uo9ya+MqDOejhOtiDJ6zvPQf4 QbkOt87+jORAn2spXuGdw584MOLaIMdf4U8UB09P3PvQo0GHv5fUj4kYDpJU q+IuLqKDphuczRPPQRbX0wXnPuZP5OALt35H4Svb6V84yOba667KJtEUDlq5 9Rf8tHwUszngU6Ps9GBPw9JiDlS4/mRU+XEFjYMVXHdLH7ymWcrBOq5V6poM 15ZzsJXrk08sVTZUcrDmJDXfKzPGn83VHBhw8zZ5u9JttRzs4OZzmvvCttdz cIybH3p+xk2/kQM7roOOju7c28yBK9c1864oHmjlwIY7XqKdp9/4GwfOXO97 dSvHrIMDd66LFwXYWTE5uMW1bkSwuG03B4+5/qoW/sW5j4PXXG/4+NHi/E8O 4rg+77hS8/IgB6lcJyxPFLg2zEE1t59fP7Qab4xy0MS1Rkzmp9t/OOjgOlKz yMh/koN+rpUTK8ce83Zjguvj7gfLQvi6wbeE8st1za9CBbrxmztfy2/Lc6+E ujHJtUIqQ+/tjG7wW1OOKD7h90ayGwu5Xt3YWflasRubuJYNnfa6a243TLjX H7NSclu0oBuHuW5V1t5+Qqkb+7n1WZxjsq+ViXquX3/yZHeqdMOJW3/b5VWy 0pJunOPa7r9s7+Pq3bDl1u/53W4evrwb17n5SblvXWHoRjTXV9e2Or480I0m roNMmodDT3SDdynlKLdGj+fnurGY6w03zXKfeXRjDdeFD+uFnt3pxg6u/RXl IhV8u7GPa+PXB/c8DezGQa7X2bjPbXrQjch1fxSPbCLWTz3oh/zjbnzmevJH 4tdDT7phxa1vj6sNDAnpRgI3/x/B2cnN "]]}, {Hue[0.8503398874989481, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwt2Hc8VX8YB3ApssmM7FQqlShNfaKpIaHIr9JQCWUkK3JVVFKakiIJDUJW Skiy95aiy91JaVBEfufec/7q9X59nu/zXedc96ZzwN36kLCQkJDJRCEh/r8J n196157fvmrrN3rzJf+Zq1yEld5kKhrCvXWF/+vYSRiaGpARqbga+ola5zxj FbEyMVX/tKIVDq68M5lxTw+feKVOJxX3oVhbTPhPzCI8j2gS9lT0QMyjEza+ N9ZCrbuj8bgiDf5lh5MrTtqiTnT3y2OKV2HS7fJtWNgJr0XMjuk7XEXRhvsm t2yd8GTSTB3G/augzx6W+J7khHPCAxfs517DYsf++ZwNh7Ds31n7NebXEfND s/XFhcNIHEz5PdXjJr7GW6ttHHPGKebfxe+qo1FmifnZz47BmUHnnZ5yB9e1 U3OnDB3Dzt7S2GV2dxDoqGytvuo4DOmRIum9d5BQ6TVzSe1xsD9Mb70zHIPA +IJsP447rJs3e7vPioXH98dhAyKeUOzZuutycTzWDu8v2yh+Ag7Kvium9cbD 5omp6MiME7i/OV7jifAD0EpeCJ8zP4E5uT963q15gFlbRLV1T53A6ku3XUZL HyDnTUVy2OcTcF3cc8q1KgHvC4WLvhd74+1F7ziL5kS0hUm3nLXxgVhRLK39 ZyI0NlZybF19sPVX2YFDikmQ9dhSN37GBx17VWeF7EhC/q/VzoznPvhqXJie 154E5/rt5kxpX+L8JxfP+piMpRNbJ/cW+sLT6C5DhPUY2/fcCr0p4o+NOv6b ByY9wR47C4bXVH9oy9lldeo9geVMPUnDuf6o65c/m+70BP7+e1dvsPLHnCfh uruYT/BI3XtCf7Q/mFoB+1MZTzGvTzhjkV4A8mXsK6MmpuChW5+Y3OIAXB9b vDBkegqk7eSdatYFYPWH70I7D6Zg2X7NXO7hAMRGHY0f701Bem8OM+tRAHZK 7/pk3ZsKzS8j2TnTT2HeqMkGU+FnUFK49S3T6BQm9Smmz9J9hjMmipE3zE4h q6Lh9Oj+Z8j69Dh6fO8pyJ3bqJnc8wxrir3Vz0efQuXIkj3D9DSsezB5iY9o IDS9L/XXu2fgRoJUOKcuEMo1Tfu1QjJw6w5nfcyHQEjrqbUdv54BSxWO5kJu IEabHxdK52SgZkUuU3JCEDqNyyI3j2TAZ7hX69TCINz6KWRUfu45Koa8U1wu ByFi88Zk5ajnyJ027+PJ6CCcexipdvjRczgsCZrj/DAIXjaaE0WqnmN0qekH 4ZdBsMpa0WIum4mY9L4EJUYQpE74+BTeycT+5i2fOoxOY1J1wWfplEy0e+08 7bryNP7qijjueZ0JQxFxBe660/jcdGPDaHcmko5frrlvfxoVRs+nLtfLwtwi y1UyQadx9kffq5y0LHB6v++SensaI577x1NLsnE36VJaimkw3uu9e9HSnI2I /TsP2q4NRl77TI9RRjb2R45afN0UjJOmX+ibJ+VgxoT26UN2wRgQ8337eW0O ympzV+/yDAbnfkSoflkOjGe+MQt7EIwy62+mVm05eJ1b/mjbo2AkilgP+bJz YBQoNVnqWTAOuKocKRfNReHAsPrevGB0myRsPLwhF4/fWF9xqQtGS+0LycSK XHxrfbVoxZ9gZNHU3lV35EKUneWxeiwY142DAn9ycxFRZa6tMYGGbXfM+83F X2Dz0wX/RERpqHKqreuxeIFdO3RX35Klofhv7zWt6hc4uHnzpGwdGtJmy0y9 W5sHYdbHKzCnYapppZzGpzyY8ea5Wqyl4azVOfH7A3kICJgx13I9Dfa+IyMJ Ci8hXJcUtnETDRNL2V1Pd72EYVTcyARrIt9X9PAVi8iXBg9f20fD2xMB91b+ fokvn/Zc2XaAhnnnF98qFHuF9Wr/CsScaBBOSwl7O/cVmnl/VI4foeHZ39tH qzxf4b+Rv50ix4n8tseCzrFXxLkVnvAKoMHt6Vz93bL5mK1vHPz1FA3tBWzt bu18pFb8e3c4iIZU5m753jX5UO86o7eFRoOdkcUg72I+Zq1RWNgXSuS1OvnD Sq8xy3O7wZmrRD6peb3q/AJcyd4ht/UhDeHezmcsUICs+Iz6/xJpKGSOFfhb FeBtjyTrSBINeqX6izu9CrDk06e5fo9o+BF6evrdFwVw/ejf5Z9Cw5XJc4Q0 zAqhlyK5cnIWsX/fohVbrQvxPUJny1fCgxxb36CDhUjTElNszqZhd0Xw167Q QmS1NPTcyqVhzsXWj3FVhQiNNZCb8IqGMomQl9q2RZhz54GT1xsaRgKUB60O FcGj6F/AkmLiPPtSDEN8ilCicSZ2hPDN6rZHPdFFMKg5qHaqhIYDEQZRCV1F 6Exk+h0qo2Fc1G3ZdeM3cK0Lq2NU03D3goqyYsEbVOQodSa20qD/9duOqaVv wH7/2G9OGw25NhW31GvfwPveyfdphBs0/ZVmdL3BCZ09/VntNIjmdCqajL1B eKdDWvp7Grx6YhXsTYux5HrauHsXDUIbfGx2ryuGx38OUxiEL6da3ti3tRhz n3XL7eim4bHvuPzRPcWo1D3LWPyJhm7p/fIBQcWQ/nxSvY9Og8VyvSn3CopR nu39awaThrb7o1bxpcUYllESvUjYSaT1amJtMVi9lnP7CJ9uCJV71lWMj7Vr X6ayaMg+zJEtHCtGxmtVrRkcGrRvPJWhm75FmJhLzxceDb/7DKX0Ct9iideU MtZX4n0JWezWWvYW8ePTrRd/oyFOZXlNWP1bXHH6KXuO8No1ayJ49Leoq5Od rTVAw/WYHVLpE0twr1hKYst3GgwsAqSWW5SAC97KMz+J/X867da3vQQLX19t KiXc7H225p5DCaZOrcoT+0VDQHxExLhrCczChE5HEC7/HSdVeqUEpv3MaRGD xP0ll0hZtZRgcXu82rHfNJisrHCb0FUCy5ei55IJizfV1GSySsDmrLH/RDhj rDVC6XcJPB+s37DtDw1jtlypD6rvMKfosbP+MA3RE6WlDzu+w7aiqKE3IzTU 7dspHfj5Hbyfy/ncHKNBKdE58s6Pd3iwLVM3n/BuTsCUFyPvcO/0bs8ewp+P 3Vf6IVEKvdidfwz+Efd/iqvhPLcUBhqmpUWEcStgvq1bKa4+H1RuHachrCMi w9O7FA05yzYNEa6bdt8oMrAUHbcrDFSEQrA7ocSkKqIUvl+ahO0J+6VLYfWz UkReiJjcRjijMm6bwddSKLltU3o3IQS/pZ43WgyVwn6m6C064VVWJTZH/pXC bNOx+lHCNW0cuwSZMgyUfPFZJBwCLsNw39QFZThemZYQT1j731uPSR5leONo /sdtYgiuGXGuffxehtAVCx+/nxRCfJ87vLhxuAwXOgtMvxLmKrE7SieUw2bl vARhEWK+YaZW+pRyxCmFvp9D+EtR77OQheVYnPRQxp/wxq3dlTM9y2F5/uhP KdEQ/Crcc2yafzlirBJSNAnfN+ySkwspx92Qq8sMCQ8pfLQbvlqOgemaHdaE Ezvfs6oziPn2Vc+JIizk3DrBc6AcMgca/ZUmhyD1vW3SoT/lyDoX+0qPsN3m lo0OQhWoNhtvMyacNr85co1cBZQSuh9uJ7x7sEFD2bACz4x3375EOO9MzbJ8 9wr8W6s3b5iwR2yJp8i3Cmh06RsUiIXgANwXP/pdgdJnP49VErbpURveKFQJ ySf/IlsJm8zwokVMqURtqoZPP+G/qdqRCosq8S1lY/M08RCEvQ5K1fGvRMvY sOIJwn57Z3uUhFQiTu9ScBDho0KtxofCK4nvozr15wlvWWuQ//guMV7cQ/Me YfmazsoFhZXIMJQOLSEc+2EJx3RiFTKMGlOkJUJwJYjx9JNkFeay6KHKhGla kcdDFKsQFixkoUX4wEH24LsZVZC943jJkLB+381JWzZWwfvnd1Frwtkj33Uc LlfhrYyVxDXCVaqpu31UqhHkUpoqJBmCBUcPmZ/TqkbTrdmJooRv5mnqX59V jd1mWpelCO+1u/bz2ZJquKzdtGgq4Z83fcJZdtUQK7f/MJ+wupxZnm10NWiV hk92EQ5xHIk9EF+N1hybyr2E2WlZZz0eV2NUVabrIOGMrTO3ReRVQz+t6tMx wmsvSbJLOqrxtSB8RwjhY6JtCsaqNZA58kctmXDTjsjh1To1qJw658xTwkuT Nn6ynF2DW/053WmEhdfmP3VZVoPZTiv9XhCOCok3S9hVg64XjQsqCBeOurhP ialBjNqxMg5huZ/jVd/UaiFhvMhQWyoE+V6shqfTazEkfiZnOuHDP6raDhnU 4sWUmwtnEX79/VbvB9Na+E9zlplP2Hlg7kj5vlqkn3Les4Lwm3672fHJxPim eCdbwq7HTBf8l16LLEvZ/XaElft1Fyvn1UL6aMoOB8JuX/pXR1TWwsIgb9Y+ wlP7ztr7famFU6e1pythD276eSujOtyQupRCIzzN+dZlyRV1UDFnGJ8lXMYJ uFG2pg6fHsXkhBJW56y7v3JHHf7N3psUTriC9SFX368O/72fvvQmYW3GZLZQ YR160hSXJRNu7HJc+9yiHme3xsuXEaZfynRdY12PTbmnP5YTHlgmcqPVoR7J DVUPKgnLRD3tGXath63TC81awlssB0+bX6lHo8ouRjN/vsLwl81N9Zho8d8D OuEOty76oQ/1+BD+aWYvYY6aodgfRj3YC30fMwiL+rbuVB+sh8/JKfFswgkq cgGZkg1gxI3s/8JfT72Dyt95DVA3+7z0N2HuzElz1xo1IHV8w7k//PUFPVt1 2aQBXy9Y1AwTHp8rdFgLDYiS9bIeJax5ISl7jVUD2uQtlk6QJj4PVg9sj/Bq wF2pXg8Jwu0ZoREaLxrgFTOzSo1wdPfi5+r5DZj/rvXJNMIOUuzWaUUNWObj dV6dcPeR9Vpq5Q1YpHR8pSZhpubkTOX2Blg7SV/RITwQcaFd9ncDsvbPb5lF OPPV0lGZvw0Yun/jpj7hE1yutsx4A9hhejazCQ+tsXCRmtwI/+8jVXMIj42I j4mpNOLltKSkeYQljl7SFV7SiC92bAljwjVRKzZMWNGIbV2WGXxfftfnKoRG RIQusl1EWE57S86/9Y2Y5+tzezFh5XapjX93NoL4hi65lPD0dVeO/fJphO6m 9PSVhFfqXMtj5zYiVaFlZC1h7SN2x1bmN4L+yCt4HWGRZxq614sawVzfKLye cN3Sp5dMKxqJ5+KEyAbC+6xK9t5834j0S9J/NxI+Fzw4yXy0Edd/cZ9uIexc mv/ytlATNJUipm0lvFXyzPH+SU3YZC5+iW/l2zId0dJNaFJ9fNiS8OO0WSnf NJuw2j9ezoq/365d22PNmnAgc2yhDeGM6dqiP9c1Qcg7/hrft46yX23c1IT9 M2wH+N476KX3y7oJW+e9fWrLvw+piN+bnJogOdldcSdhxZWFsX/CmrBP+sNr e8J7YnQ/29Q0wSIkyXMP4dHcb+mODU04zJDO5Dum+fVJ15YmLH1X+p3vNim7 CWc/NuHP/ovuewlbBV+amvmlCQ6zvx90JLzG6dd6OelmWHadXbifcC+tWEp9 SjP8J5Q4802LvdI0S6kZe0OC7vP9uk1/LzSakah5RPIAYROLPSePz2vGVjl0 8T17ftnDmq3NmB924agT4YpNN452bG/G+e2caL4PH9m3gLmjGfeGqsr5Togf efV3TzOiDofqHSKsrrCgac7xZsypvtzBt+yf20IXrzSjQK/S4AjhweKje9bV N2O6bMelo4Rzh7ZkPWpuRlL/8+d8+801FJfoIObzmtrO98jNoew6ejMOKddr u0jz/z6flbL/Qey3bCCdbwmZ2HwXpRYMWX197cq/P3PalFrVFnwyVOri+7Lv wSMLNIl8S8Mo33I9sxV+zWzB+6vrV7gRVsrOdQla2gLDYlo239oODapX/2sB XeV89DH+eV7Jcv/h2IKZk55l8f2wJKrU1qkF4SbpdXzPnLfHU/VYCy6llk08 Tniu0OeKhNMtCO7b7MK3SfJEv5wHLSgwuTzXnfDmHyZtnZwWfJzuEuJBeFVh w2v9Ly2YvjvvJt9G4S4PfQZacCbO5RHfarpxHvLDLbCaLl7LN3e7iOQmiVY0 +MYpefKf/+fNeGnQirokbizffkHHZk5e2Iq8f6ZpfLtaTJbesbgVw9tOF/Jt 3bO8c8C0FS2nTLv51p6S4K2/rRX1y99O8+I/Hx4eT257tuKR3a1IvjNWSlxl nWyFvGpqLN8PxRJ9jANaoTSSkcJ3eHz7mvozrVg7e7SUb/uGVd2iN1vxZ33V CN+DC6QVfHJb0YP8PScIz//2JND2bysyimKkvAlfXNTnuntiG2yM1bX4Zvob /Ock2QZzBc+FfN+ZlL7Me1obdv29Zsv3JLXsoRsr2uBp3Hmbb0fHQdbdNW24 rD/5Md+vEk1aH25uQ0WddB7f7gteZmX91wZX/bhWvjvXFno0n2qDP3uK7EnC i8PHHT+cbcPQTlUNvq/Wr97GuNSG5A/jc/he51Ay7+fdNnyYcXgd3xnuFZ/l X7ehcVGOD99hMU1O1qNtaDD+Usd3Reizs6+l2+GzbTKTb3HPCwkztdpx0L9o hO+IDavoI2btcPWv1vYhXGukOu5k047tEWaL+JbR/KVR79SOrPeb1/F97deT /x6eb8fZPuvDfDd9OhcgfacdjX8tvPlWrHa84/u0HV/cxs7yvSN3eV5Pfju8 7hy8wXfUA6X2zbXt8I4NTuC7I2JgMKe7Habpy5/xrepXrag90I4C28KXfDsc TDYOn9CBwq3SFXzfswyx/iXfgV++ci18f+08NtXfuAOmc6LYfOOIQ/eYTQdK w71G+b76c33iGe8O5J2kSfvy359gY5fJtzpgK8bR4HuRlLZhRE4HPsRmzuM7 NFpqSK6tA2OPvq7ku01vOP/WUAfMRy5t4Fv/OStETeU9dn0v38H315X6ql07 30OCFuHMd06FS8b9qPfo3Nnuz3eg7bMNB9reQ3JR10W+zenfuvWUOxHsVx3N 9/zRJXKB8Z2w+FaQzbfqVJpZ85wPMPKSL+B7teTDG19SPuAg7RKDb+K3Dktk 3kewN/eV8d0/mLL8e95HrDZdWsX3if5rkR/XdqHp8e0awfjqTX+X1XVB7ea6 Or6lnkw8ctuuGxlnAuv5Vth7+2duezfuu1s18K2mMJfWZvcJ35T6BabVhMhW 9H7CqRlHG/n+ae5W/9GEjrSLbwVWf+SXb2FHh/0KhsBrJUMf5frSUWUxLrC9 6SWN/vN0HK2UbOLbzf3ajenRdBzboyLw97/yCxfeo+OZlprAPhdu1q2Kp+Ny i7rAeZY7Ytcl0CE9R1Pgv4rKblsS6bAM1BJ41Ye25TbJRP2biZ/8+et9cFvc 4TEd5joo5T/fb4/Yd+x7SsePo6sFFpmv+uhIKh0h6WYCb/z1/uTxNDrUu8QE 48Nfxaw9mUHk6hIC19D+UwjMpOOjvaTAshvUe89k07HoupTA1tJdGRdz6bhe IS3wzebY4Kt5dLTIWQj6ex44vfRkBR2uU60Ftvy+9/uuDjpE/R0EnjPx1IWd nXT88f+PXJ/SbS2bj3RkHNQV9KPPzMrd1k3M7zhd4NdL67duodNx9vheQX30 pj7mxl46hA47Cuy9e3LgOiYdC/7bJ7DV8ekK5mw6zJbNEoyfS8PTVVw6emfr CxxTni66cICO2W1zBRaT1T44/Q8d7Y4LBGZqrxzRGqGjabuLoF+Rkf019VE6 +g1cBY5Z662v+o+OERE3gX12Xi1SEuqBUYUReT7OqTvlhXuwNNZY4PkBFf0y k3qgEHpcUC8RwTwnKdqDHWaLBTkrVkhdTKwHa2Z4CPI36epZkyR6cOIH6XvF SzdNkOrB58dLBPV+zbY9Y9I9UDvvJchtWR5+I7I9qFy2TJAb/o6Q/T2lB8fG SUuKP0n+qdAD0Q5vQT1brdR0QKkHC0JXCPK3Bj0tX1R6MNPBR5Dfzy++3Dir B+bqgQIHbkpYn7ukBz0nQgTWFgubmxlIjD97U+CS0qNyacU9kNqQIPCkb69E JIV7MT85ReB1U6X+HjHvhcS1TIFzSgq/z7vQizGxPIFnuHtyf9b2wuJPvsBG Yde+qckyoJRYKPDq2OdDZlYMfI15I3BYnfCwqT0Dt+tI14zb/F22j4GdQsUC u0cHji5xYuDcVNLyC5PGFjszQHzBENgpaNm/RS4M/FhBOqey9p+xGwMXNpAW VT4wbnScgYk2pO0PDI0v9GBgPF/zwAvCT9PChRZ6MZB8lMz/jmhOMPRmoN6b 9JYNWRMW+DDQFUw67sYG4fl+DDSGkzYz8JhoEMiASzxp5rvoSXNoDNzLIW0y ZZ7I7DMMyLwhfX5PsYj+OQZE9bUE83c82SE6K4yBDUak5wzxRGdeYMBjJem6 K/JiehEM+FqR9py1Qlz3KgPaTqTfnqgX17nOwPz2/bP5vx8U3xyU0L7JQAWd 9GGpPxJaUQz008j6PPsISc1oBuzDSUskaUtpxDAgMUbW//c9W0r9HgNf7pF5 qqmF9LQ44v6SSf+72CWtFs/A2akHBPVWbZ4yqgkMTM8j8we6orJTE4l+xaR/ HI+RVUlm4GMl6bX58+WUHzNwp4l01OQSOaWnDJh9IM2xsZuimMpAC4P00vi+ KQppDDzbQc4X/iVYXj6DAZW9pJW36apIvGEgNo50wvN304QbGDjZSVpEwsnJ oIkBpp+2oJ/zgYnPdrYQ58Ej8+pXCYO0NgYWXSDz+Qrmq1I6GCiMJH3NtSes tZOBi0IHBfW/Smj14x+J5zWOzO3UtafO+cTAClkyf+VdtM+2hwE/ZdIatXuf nGYwYJlN1tNm/Pv+mMWAUz5pRlDs8mYO8fy8Jb2+beXZMR4D6Ubk+CfzP1bP +sJA5DLSUudPKVp/ZUCynax3/6S2J3CAuO8u0k1LXiUl/2DgBJP055Hsz38m MuGmoiOwcGH6gs1KTBxcT/qQ8ja/kypMbMsh+1cc//rmvioTH16Rnlt+Wbxq GhO73pC+ojXP+pcGE5WlpL/71sRoajOJ3yekbRtcGRt1mTjdQPqFvqTBCT0m 3rWSVgt56h07k4mumOaY5TIhCHpvUVCuz4RYPGn6Qp7IjzlMzEgivSb8gqX6 PCasP5Pjk3tn3V6/gIkd30i73Tisf9eYCaNh0kZrk15+W0L0F3YSuDBJ92P0 aibilEhvmhz/z8yCifuzSMvldUdGbSX2Z0i6zVlDp287E+ylpJcVvz6qZMuE hinpe6q7M7GTCcMJLYL1CXn9HTlqz4TzOjI/WBWz5qYDE4fFyVz3SsHNO7uZ WLuVzHu301lxe5mYsJ10gtLEJYn7mMi2JX3g/YwLTw4w4WhP1e9znZN9mIm7 jlTOzagpdGEi6zDl3yumtHgxEeRNWbR8By+AOO8Qynpd3QqXmGiPIb3f/OeR VXeZUMwkve+0VsCNfCaufCDt+GpzBPcDcZ/jpH1e6Gv9+MeEivYhgSOyRTL/ 6rAwvoJ008/XyoVzWLAwJz3V2PsUzZgFq42kPwsnKD5fzEKlBen8pvpnPUtY MN1M9UsYWy+/nIVnW0jv9ZpLN1/JwvrU0XWz+P+fab7L/8QqFtKekRaSPy+f uJoF4WkqUmayxPw92Skt5iw4qZN++Lx3rcg6Ft5qkOYO3HlSvpUFlemk5xtu lwnfycIifdKN9amr+xxYSJ9D2ttd7MQWRxY05pFeDxOpoP0sbJtPWkXWKenZ QRYulpDr4XZfW9V9iIUnhmT+Kq2oXcaZha5SMj9waPuAdzgL19tIS6ozxD6k slDKJO2zxM1lQjoLUSzSdOvB6lnPWdhnTfbbfPz0PMssFgxsSOdenBzpncPC MIes1066OhDzgoUiWzK/9EbVuvglC6E7SA99SMji5LOw+TNZv+/3XCWZQhYk 7ch88fxVHQ5vif3Yk5Y4ZHX3URkLQg7UedDej9ZWsJBH+dPdA3t/VbHg8R/p TS/6itRqWdDbTTq7yVvHrJ6FjgFyvovi55mXm1lY+oP03tV3HnW2E+fxk3TF f7riEzpZWPGLtLFvisusjywwKMddX1SztZuF8EHSYmkF87zpLAR67qx3UAiB V+X6yJheFpqHyLyLWT/whsmC92/SG4V2WXPYLCj9IZ05rTdLmsdCJmX1Ja5K i/qI+x0mfd76l49DP7Hek2T/H8eCOmjfWDg3Qua7L4ouf/SdBTcfMteTU0h8 /JOFP5T7orRkng6yYDxKzadh4JfymwVpPzIPSFzamzpMPN9jZC6euT03fYwF m3+ko4tcwjMnsPHfOOnczntGeeJs7JkwJnDzYF1nwRQ2tkwkLWNgPLdSh40f oqQ3Hbh9qmUhG7YSpOV5D1mtxmwUUH7vnrGtfTEb0yVJxw+9ftmxhI2LlJ2D Kqd3LmNj3XlyvYaT2i5/WMHGdiky/x3e+/ujKRvZlAunfNvfDTZUpEmHRf+t /mTGhh9lSy0xk541bHRQVkpWjO9dx0bkRbL/RwMdCeYGNqJkyDwxa543y4KN n5Tdli/vZm9mw0qWtHHx+o3crWykUB7ZYJPJ28aGqBzpt3WO6n3b2Xh5iewf vsMt7IsNYSrf/tFvoH8HG24RZD71YKjDNzs2XKaQOZ137d3ALjbeUHb//TT6 5x42XOVJ/5v0zm1oPxsKCqTLLjW0/T7IBkPe5PlP4RBclu9aPXyIjcUKpG3v 8J6OHGHjPGV17SHF0aPE+UWS8z+dJ8v7d4wN66ukl63QL5jgxcY3yvJ1cJ/v zYb5NdKf99np/OfDxi3KJT+PN5/3Y4NF+V5YWGh2ABt2yuR8J1XjlvQEshF2 ncwtU3N40sFstFKehdq7y0PY0LtBWqiJufXIWTY8Kb93Gh2/EcpGIeXM3wqZ b86zMXsq2f9S+Fyn/ots7LhJ5k4aa5TVItiIp2ya4VCx/gobk1XJeuU1XgEn rrKx8BaZf2u9aBB/nY0AyhXOD7prbrLRTdU/+Jt3dTiKWJ8a6YArDeYz7xD3 RdlGh/vL+i4b6ZQNsseTg2PZaI8i+4lsUNmVep8N9duku9/Pl3z/gJhvGlmf 67a+QCSReD8oR47vcTdKZqOXqne+flLH8TExfzTp1TMuN196yoYTZdW8xNC8 VDaK1MnxPza9XsJKY2OMcnVXM2/KczZ075D1iR59d1dlseFIOWjiREvXHDZi Ke+MUhOKfsHGe8qvevwqNr1hozSGtOa89qtjFWw8vkv6d9FX8znVbOJzmXSD tejgzlo2lO+RfsLSeHS2no0D2uR6zvgt3pXRyEY05f8kt0p2NbORS9UvinMq EG9jo4+y1MJAd5MONrRiSbNKbugc7GTjqA45vnBnSnPkRzZCqTyK9zb0dTcb Lyi7B3Yu4dHZ+EfVb5T9wVNisLFAl7ROgvg9cxYb+yiPLNKxdOewcZVyc/lS oXs8NlLjyH6pDlaZFX1sfKAc2n/EabCfDfH7pPfSgpV1B4jPx+nk+CUKtyss f7BxhMrlktMCTv1i4yZl3tIyg8dDbEjGFBcVTyc+P6q7ulv+sCGkR46/u3fw 6oS/bBhQ9v4utWb+GBv2lKczmCpu0hxcmUG6qeX1lycaHKTNJP2kVr+9YgYH JrNI08puFnPmcfCScu67BYHfFnDQQfnL2yqT3ws5WBpHrke3+ND3f8YcTNUn c/sioVRREw58qfxKwd3DMks52Enl7/JNdJSXc+BNeeRl4weNlRxcp7wgzy1q xioOvlPjI+6qr36wl4Nn8aQ/n67hqQdzMCeB9MuKt25qIRz8mUuOvyD/8pvK WQ6kDUjb7U73UgrlQJfyzOSkQfnzHCyhPPjtrp/cRQ62UH637Ppf6UscOFI+ UHt6gngkBxcox/2ykx6P4qCV8vtpC1UH4zjQmUfayoVh2JPGQTrlirxbG2sL OTCeT3r15I37XtYR5085b8eIb1I3B1oLSJ+/PzCSQOdA89kplci1xPvGYwfF 93KwnMp/BTafvcvmwJayYWJq5LWvxPooj/cnyEcOcHCLct2SO7cifnDwgLJb dejd80PE/VJeoRSoGfqHgzLKEo5eD86McNBEueOxsx5tlINuyo9+7H0U9I8w tb4LG/d5JQtx8ZvKneP2m9YLczHRkHqffh0Q+zOJC1nK+pucmrUnc6FOWSz+ UJyFOBf6lHmDh496SXKxiHLVZudFd6W5MKP89MHR8RJZLszTyPnDf7tUfZnC hR2Vu251u6WkyMVBylseHtu3SpkLd8oGw8fnHpnKRQBlqW0eQ5FqXIRS7k/0 LM5T5+Iq5TQrbzsJHS6SKWeOn063MuJimHJO2sXJt9dwsX4hdZ97bjp22XIR Qfm11P0X0w9zUUf53oH4M1ucuWilHJT3YOtJFy66KK9ySmSUHeein/Kb/Cey Lr5cSBiRjp+S0nndnwt5yiFHUpPyT3GhStlcIX2FNI2LmZR1j2aImpzhYh5l 4aLnjXvPcWFMuVcx6975MC6WUy5xyT6ScYELLIhPmBVG/L01WLYiO5yLjVS+ qr9AJi+CC0vKp9LMe/OvcGFLOc+9PKfoKhcOlIcMt1wsuc6FI2XjHw27y29y cYhymnfnxPpoLjwp9y12bG+K4cKXsv5vxtO2e1wEUn7o37+9O56L85SjTwvF 9z/mIpZyG0JPfH/KxUPKChMkNgymcvGYstXbK2rDacR+V+laZwfTcOWswtfR DC6yqP1Wr40uFsriYh2Vi4lq3JqUw0UhlZ+9MHOl1EsuKii/sUiRlcvnwp6q /ydhyFAo4BLvD5mvqMnOVSniYj+V+11eFj6tmNg/5VzLwj1aJVzQqfqfsmsW Ti/lgkXZsLF80qxyLk5Q9cevb+mYU8mFH+VUm8aU+dVc/KLqeYo7g41quQih 8pltndYm9VyMUbnTbceZyxu5mGBI+oE9c9i0mYvLVH236tFas1YuJKl81z0v b4v3XChSjtrze8PWD1zEUfUtmoHTtndxkUB5Cl3om+0nLnSoessHoW/te7iY QXltcrScM4+LxZTPHNFguvZxsYxykX7CC/d+LlZRXp6Sstf3O3EflBdkFKaG DXOxg7LaK+bGJHEevCiPBU1SY0ny4EOZbqbXpyfDwzC1vhKRta+d5HgYo5xc efByojwPNKre+H1v48NpPERSVo4VfsjQ4EEeZP3IPl3v6do8KFHu0jNfd1CX hxiq/g13v/JDPR5iKT9MDeH0zuRBk6oP83iQpzubh0QqP7qo+OKBuTw8orzl D90hYR4P+lT9gtdCBr0LeHhG5fI07TEdIx6eUx5cs7pu/yIeFlL1HZP33X9g wsMLKs+vDvboWcrDK8pxkffNdFbwsIyqD7Epkt9vykMxlTupfGLEg4fVVB5k 0uV2fzsPOyjvGxk1/WTDgx3ltYXqslo7eXCgLLF+9/M4Bx4cKfeLB57p3s3D AcoNtXdtNB15cKKcdS1fb+9+Hg5TjtrxYTD2IA++mxPXHYs4A3/Vv2Vdh3hw o/LdXWrRGs48HKeMB8uP7nHhwYOy7iGH5bFuPJygLDI7QLLrOA9nqX7cL3c+ qnsS/ak8zfv96XsneThF+drS4W0ffXkIouw9OlVHPYB4PigvP2dfcvc0D+co l99on3z3PA8RlJ/a/e7ovMjDFcpXpqk8VYvg4SE1v+cnk1MOV3i4TuW2D3du ibnKwy3KS474aHRe5yGKstrcqK+qt3iIpjz2Nado123ieaNMz2y9eucOD+lU //8B0fKfCQ== "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesOrigin->{0, 0}, BaseStyle->{FontSize -> 15}, Frame->True, FrameLabel->{ FormBox[ "\"\\!\\(\\*SubscriptBox[\\(V\\), \\(ds\\)]\\) (Volt)\"", TraditionalForm], FormBox[ "\"\\!\\(\\*SubscriptBox[\\(I\\), \\(D\\)]\\)/W (mA/\[Mu]m)\"", TraditionalForm]}, GridLines->Automatic, PlotLabel->FormBox["\"Ballistic Si MOSFET, 300K\"", TraditionalForm], PlotRange->{{0, 0.8}, {0, 3}}, PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Automatic}]], "Output", CellChangeTimes->{3.4874752184316196`*^9, 3.4874753603389482`*^9, 3.487475529514275*^9, 3.487475667514922*^9, 3.554991026797483*^9, 3.554991128309209*^9, 3.5572615260740547`*^9, 3.5588803753302193`*^9, 3.559309359727653*^9, 3.5593094917013063`*^9, 3.568983366113332*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ RowBox[{ "Plot", " ", "the", " ", "source", " ", "injection", " ", "velocity", " ", "of", " ", "a", " ", "Ballistic", " ", "Silicon", " ", "MOSFET", " ", "at", " ", "T"}], "=", RowBox[{"300", "K"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{"vinjSiMOS", "[", RowBox[{"VG", ",", "0", ",", "5", ",", "300"}], "]"}], "}"}], ",", RowBox[{"{", RowBox[{"VG", ",", "0", ",", "2"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"PlotRange", "\[Rule]", "All"}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\<\!\(\*SubscriptBox[\(V\), \(g\)]\)-\!\(\*SubscriptBox[\(V\), \ \(T\)]\)\>\"", ",", "\"\<\!\(\*SubscriptBox[\(v\), \(inj\)]\)(cm/s)\>\""}], "}"}]}], ",", RowBox[{"PlotLabel", "\[Rule]", "\"\\""}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}]}], "]"}]}]], "Input", CellChangeTimes->{{3.5588804285857077`*^9, 3.558880480950863*^9}}], Cell[BoxData[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwVzXs01HkcxnGkrVwb2u3MMNpxKZcuNt3VfnxSkUvWpZWS5ggzxm1+ksq2 p8RYXZQtaYqkiOJkWKPLJgrpsBjTKLVpCEkRkplB+O7sH895n9dfDys4xidU S0NDw1O9/+sW2i99/DH050L/ZUYfvoahtjOD30nfAiHJZsLqsTB0uCbMLqf7 QRLSzYWKMHRvbv/rKj0E7tPiN29XhaF/iOrReXocPOqoEhdPhuHbFX84p9GT YULTdB+lycHc771STtEz4N7qhGfEgIOJc8uXnKTng0NXYKO1LQd3BVwXjXwR w/3UWe7OoRzUJYmBLmbV4MNZNyjO5qCV91B/7ek6ONglEbnLOHioZT0IxxpA FrzcvtaAiwvFNLmmpgQunE9vPbqNi3e7nZskG59DkFhLwEziYg3vqknAYBvk rEvQkldxUbF4k+GdqHaIPex3q0nJRa2J4vkmVv/Crp9IdKFDOK4h7Lu+JR3g LXWovhkZjk3Jq1rqbTthw6aZiyX54bgofWDi9lAX5Ce0dhe8C8cBVaf8hX03 rDAsai1j8DD/08NGg7M9kD6u7CrZxUMDZuFwb28vvM3ZXSi6yMMz4RVhuZZ9 EDu+PaW8hYdKp+Je7rEP8OnAe/sivQiMW1kn/qG2H7yJcUXWtgjsLKk7LWV9 gieyz2nHBRH4jdeWZZMwADpbT5YG1EagHc6ZCXs4CE5JLhM/Tkegyw0Wp2zh EAjzmI9fO0biIeY+83eBw+CRlTJyJD4Slw7u1G33HIECdvBHjdJINDYcmVs3 OQLO8h5O/FAkaldniSyyv8DXlwulDdZRGLHq4et57qOgt8Mmah43Cou3B+dW KUdBEZ+ja10QhYoBxvy+zK/w234PsWlXFFb4uszK2DIGpb+wMsbNovGYq+Ca uG8MTh8s9C0IiEbWW7dXeQIFcE/w79leiMYNa5Mz6CuV0Kdhl5kujcZAM8mE pkwJ320s2V+rG4OKxrRufqIKGh+wLWRuMSjUDorzsRyH0b1pjDuCGDSWV9zQ qhsH9toFjF+rY3D274l+66kJ4I+Hvm+bjkGN20GibqNJ2PwEq/RN+Rh7RZRm VDMJKidXxmVHPj6yS51Li/4GHpzjgam7+Uhzi116wmAKLBiF+nsO8bFjWavs SOUUmE0VCf/M5GNpDlj2Bk0DsHV8i8v5uFe0hsacmYYlZTZ861Y+HhdcT+wo moENDxpps4f5eKefmWXgQeCsiZfgqS6FqVcFbPkOAqKdoU1b9SgM8flsVeJN 4J/aM0b1aptWVpZ6+hO4kmKQXa9P4alze+rPBBOIK3+V98yQQu6ay190jhCo sWGnNBhTaJ68wHVOAYFLLM3MJhMKZ9Yd1W+/RaD1Wl+VhymFrz/3PC8oJlB4 t72vSe10//K928oI9E+9cWhmUkhsfQ4IKtX/xtya5kUUdkjP5cySEQh4yilr saDwfopqv+wFgTcLRht3WFKY4bjPJu8VAR1HQU+L2u43l4s3ywnoBT6lSawo /Ptwc0PiRwI7F98KliyhMHPZ6nPegwResuPivKwppLqz/VjDBJTGrgKJ2tYe kZ2Pxwjkrp6dL7GhUFuzLT9dRWCO51CZly2FXRWOPPYkgQfL5VUStSt5eSvs pwk4idoavewovLRIV0EIAfM86QuJ2v8BzrVcPA== "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesOrigin->{0, 1.2*^7}, BaseStyle->{FontSize -> 15}, Frame->True, FrameLabel->{ FormBox[ "\"\\!\\(\\*SubscriptBox[\\(V\\), \ \\(g\\)]\\)-\\!\\(\\*SubscriptBox[\\(V\\), \\(T\\)]\\)\"", TraditionalForm], FormBox[ "\"\\!\\(\\*SubscriptBox[\\(v\\), \\(inj\\)]\\)(cm/s)\"", TraditionalForm]}, GridLines->Automatic, PlotLabel->FormBox["\"Ballistic Si MOSFET, 300K\"", TraditionalForm], PlotRange->{All, All}, PlotRangeClipping->True, PlotRangePadding->{Automatic, Automatic}]], "Output", CellChangeTimes->{3.4874752184316196`*^9, 3.4874753603389482`*^9, 3.487475529514275*^9, 3.487475667514922*^9, 3.554991026797483*^9, 3.554991128309209*^9, 3.5572615260740547`*^9, 3.558880375695511*^9, 3.5588804847024317`*^9, 3.559309362904697*^9, 3.559309498520877*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["2) Ballistic AlN/GaN HEMTs", "Subtitle", CellChangeTimes->{{3.487474892613493*^9, 3.4874749014762173`*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"For", " ", "Ballistic", " ", RowBox[{"AlN", "/", "GaN"}], " ", "HEMTs"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"CAlN", "[", "tAlN_", "]"}], ":=", FractionBox["epsAlN", RowBox[{"tAlN", "*", SuperscriptBox["10", RowBox[{"-", "9"}]]}]]}], " ", RowBox[{"(*", " ", RowBox[{"F", "/", SuperscriptBox["m", "2"]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"vd", "[", RowBox[{"VD_", ",", "T_"}], "]"}], ":=", FractionBox[ RowBox[{"q", "*", "VD"}], RowBox[{"kb", "*", "T"}]]}], " ", "\[IndentingNewLine]", RowBox[{ RowBox[{"I0GaN", "[", "T_", "]"}], ":=", RowBox[{ FractionBox[ RowBox[{ SqrtBox["2"], "*", "q", "*", SuperscriptBox[ RowBox[{"(", RowBox[{"kb", "*", "T"}], ")"}], FractionBox["3", "2"]]}], RowBox[{ SuperscriptBox["\[Pi]", "2"], "*", SuperscriptBox["h", "2"]}]], "*", "1", "*", SqrtBox["mGaN"]}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Rho]GaN", "[", RowBox[{"VG_", ",", "VT_", ",", "tAlN_", ",", "T_"}], "]"}], ":=", FractionBox[ RowBox[{"2", "*", "\[Pi]", "*", SuperscriptBox["h", "2"], "*", RowBox[{"CAlN", "[", "tAlN", "]"}], "*", RowBox[{"(", RowBox[{"VG", "-", "VT"}], ")"}]}], RowBox[{"q", "*", "kb", "*", "T", "*", "mt", "*", "1"}]]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"uGaN", "[", RowBox[{"VD_", ",", "VG_", ",", "VT_", ",", "tAlN_", ",", "T_"}], "]"}], ":=", RowBox[{ RowBox[{"Log", "[", RowBox[{ RowBox[{"\[Sqrt]", RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"1", "+", RowBox[{"Exp", "[", RowBox[{"vd", "[", RowBox[{"VD", ",", "T"}], "]"}], "]"}]}], ")"}], "2"], "+", RowBox[{"4", "*", RowBox[{"Exp", "[", RowBox[{"vd", "[", RowBox[{"VD", ",", "T"}], "]"}], "]"}], "*", RowBox[{"(", RowBox[{ RowBox[{"Exp", "[", RowBox[{"\[Rho]GaN", "[", RowBox[{"VG", ",", "VT", ",", "tAlN", ",", "T"}], "]"}], "]"}], "-", "1"}], ")"}]}]}], ")"}]}], "-", RowBox[{"(", RowBox[{"1", "+", RowBox[{"Exp", "[", RowBox[{"vd", "[", RowBox[{"VD", ",", "T"}], "]"}], "]"}]}], ")"}]}], "]"}], "-", RowBox[{"Log", "[", "2.0", "]"}]}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"IbyWGaNHEMT", "[", RowBox[{"VD_", ",", "VG_", ",", "VT_", ",", "tAlN_", ",", "T_"}], "]"}], ":=", RowBox[{ RowBox[{"I0GaN", "[", "T", "]"}], "*", RowBox[{"(", RowBox[{ RowBox[{"F", "[", RowBox[{"uGaN", "[", RowBox[{"VD", ",", "VG", ",", "VT", ",", "tAlN", ",", "T"}], "]"}], "]"}], " ", "-", " ", RowBox[{"F", "[", RowBox[{ RowBox[{"uGaN", "[", RowBox[{"VD", ",", "VG", ",", "VT", ",", "tAlN", ",", "T"}], "]"}], " ", "-", " ", RowBox[{"vd", "[", RowBox[{"VD", ",", "T"}], "]"}]}], "]"}]}], ")"}], "*", SuperscriptBox["10", RowBox[{"-", "3"}]]}]}], " ", RowBox[{"(*", " ", RowBox[{"In", " ", RowBox[{"A", "/", "mm"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"IsatGaNbyW", "[", RowBox[{"VG_", ",", "VT_", ",", "tAlN_", ",", "T_"}], "]"}], ":=", RowBox[{ RowBox[{"I0GaN", "[", "T", "]"}], "*", RowBox[{"F", "[", RowBox[{"(", RowBox[{"Log", "[", RowBox[{ RowBox[{"Exp", "[", RowBox[{"\[Rho]GaN", "[", RowBox[{"VG", ",", "VT", ",", "tAlN", ",", "T"}], "]"}], "]"}], "-", "1"}], "]"}], ")"}], "]"}]}]}], " ", RowBox[{"(*", " ", RowBox[{"A", "/", "m"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"IbyWGaNHEMT", "[", RowBox[{"VD", ",", "1.25", ",", "0", ",", "2", ",", "77"}], "]"}], ",", RowBox[{"IbyWGaNHEMT", "[", RowBox[{"VD", ",", "1", ",", "0", ",", "2", ",", "77"}], "]"}], ",", RowBox[{"IbyWGaNHEMT", "[", RowBox[{"VD", ",", "0.75", ",", "0", ",", "2", ",", "77"}], "]"}], ",", RowBox[{"IbyWGaNHEMT", "[", RowBox[{"VD", ",", "0.5", ",", "0", ",", "2", ",", "77"}], "]"}], ",", RowBox[{"IbyWGaNHEMT", "[", RowBox[{"VD", ",", "0.25", ",", "0", ",", "2", ",", "77"}], "]"}], ",", RowBox[{"IbyWGaNHEMT", "[", RowBox[{"VD", ",", "0.01", ",", "0", ",", "2", ",", "77"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"VD", ",", "0", ",", "0.2"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"PlotRange", "\[Rule]", "All"}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{ "PlotLabel", "\[Rule]", "\"\\""}]}], "]"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"vinjGaN", "[", RowBox[{"VG_", ",", "VT_", ",", "tAlN_", ",", "T_"}], "]"}], ":=", RowBox[{ FractionBox[ RowBox[{"IsatGaNbyW", "[", RowBox[{"VG", ",", "VT", ",", "tAlN", ",", "T"}], "]"}], RowBox[{ RowBox[{"CAlN", "[", "tAlN", "]"}], "*", RowBox[{"(", RowBox[{"VG", "-", "VT"}], ")"}]}]], "*", SuperscriptBox["10", "2"]}]}], " ", RowBox[{"(*", " ", RowBox[{"cm", "/", "s"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{"vinjGaN", "[", RowBox[{"VG", ",", "0", ",", "2", ",", "77"}], "]"}], "}"}], ",", RowBox[{"{", RowBox[{"VG", ",", "0", ",", "2.0"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"PlotRange", "\[Rule]", "All"}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{ "PlotLabel", "\[Rule]", "\"\\""}]}], "]"}], "*)"}]}]}]], "Input", CellChangeTimes->{{3.449462146985653*^9, 3.4494621600054913`*^9}, { 3.44946220968456*^9, 3.4494622295176897`*^9}, {3.449462286482733*^9, 3.449462392435218*^9}, {3.449462439802479*^9, 3.449462441359233*^9}, { 3.449462592853601*^9, 3.449462608688654*^9}, {3.4494627162221813`*^9, 3.449462730236549*^9}, 3.487472799417671*^9, {3.487472831794476*^9, 3.487472957654887*^9}, {3.487472994320723*^9, 3.4874729946405363`*^9}, { 3.4874730512746477`*^9, 3.487473051667053*^9}, {3.4874730876684427`*^9, 3.48747311728333*^9}, {3.487473469323155*^9, 3.487473494468314*^9}, 3.48747366983951*^9, {3.487474726822947*^9, 3.487474765223205*^9}, { 3.4874752480821247`*^9, 3.487475257115074*^9}, {3.4874783753645678`*^9, 3.487478394323612*^9}, {3.5549913654127274`*^9, 3.554991375266069*^9}, { 3.559309502167654*^9, 3.559309507785528*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"GaNHEMTBallistic300K", "=", RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"IbyWGaNHEMT", "[", RowBox[{"VD", ",", "1", ",", "0", ",", "4", ",", "300"}], "]"}], ",", RowBox[{"IbyWGaNHEMT", "[", RowBox[{"VD", ",", "0.75", ",", "0", ",", "4", ",", "300"}], "]"}], ",", RowBox[{"IbyWGaNHEMT", "[", RowBox[{"VD", ",", "0.5", ",", "0", ",", "4", ",", "300"}], "]"}], ",", RowBox[{"IbyWGaNHEMT", "[", RowBox[{"VD", ",", "0.25", ",", "0", ",", "4", ",", "300"}], "]"}], ",", RowBox[{"IbyWGaNHEMT", "[", RowBox[{"VD", ",", "0.01", ",", "0", ",", "4", ",", "300"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"VD", ",", "0", ",", "0.8"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{ "PlotLabel", "\[Rule]", "\"\\""}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{"0", ",", "8"}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}]}], "]"}]}]], "Input", CellChangeTimes->{{3.487474804026428*^9, 3.487474842177257*^9}, 3.487474944836275*^9, {3.487475279228634*^9, 3.487475289547014*^9}, { 3.487475537879777*^9, 3.4874755500958433`*^9}, 3.487476352930181*^9, { 3.487476441813167*^9, 3.487476480925618*^9}, {3.487476511329968*^9, 3.48747651772268*^9}, {3.48747660092309*^9, 3.487476604535707*^9}, { 3.487476951215867*^9, 3.487476967903994*^9}, {3.487478633716308*^9, 3.487478653538825*^9}, 3.554991418073224*^9, {3.554991474625757*^9, 3.5549914887262907`*^9}, {3.5593095278517838`*^9, 3.5593095286262493`*^9}}], Cell[BoxData[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwd1Hc4Vm0YAHA7Wcl6DyWjkmREpe0+bWlRQhJCmWWEhKSiIRUpMw2RsmWE kJIvZO/xer0ToayMqHzP469z/a5zPfd57nFuJRvX4+d4uLi4kri5uPAzYbDQ s/a2kZ5np+nMqHeUnhOPdNk7qfWQsWHWefMtL5gifLMeSpFwd5Z2QvBWMOxI TFMNkDKEa0uFNo4GP4He7xV2XlLWcPA5dysjOAmyQ5t43KXcYIi7y6ExOA/k aB2NF6UCoebP3p2JwRVQJ2BReEEqDIaD0l7+DmoFKcaRU/c/vYDW6lH3x459 4K4Tx+LnvIHX8ZJu9xNGYYXnvR/1rlmweFPrtebRSZh1PzufVp4Lly5tEnyf OgcZa8WIuNoCkH6zssw6gIs05WveL6tZAl6m01Xm5rxk3B2KjFRJGaxQjj0w ryRATg+tF1lV+hn4jzZclXwnSNZZm4j6D36BnyWFektchclwnf5w6th/IBNU 9eDUmCjpFl/uzj9SCUyZG92e6uJktWyahTflGziGWpeGuC0lxSfmq0fkauHK 0VT/oxESZGOP1d7sg/Vww/y4knGpJNmeFRwq/74BFp/p6RCqlyJ3KIUX9OU3 QrKeQis1T5pUtDe9sONDIzSMn/AMLZQm+dPllR99bITMLR/4tpVIk3VbUu7t rGyEGT2P8QdfpElrw3LLx52N8EznS5NCszQZdG2Sb/efRvBgiOlQR6TJmp5T RvG7msB1gJuWs0aGPBOrPHiipgnk3u/2CQ6TIf/kj2RaNTTBoqARP9cIGTK2 udjLuaUJTEjnM6aRMmSbiCn3TWoTTFw4l6f4VIY0vHaPeDfcBN1XhmJjkmXI PXa/9ouLNsOBPN1jK0tlyLWa/72qOdIMI+qbnR9+lyErDSIcO4yaYTuT1Nww LEOet7fWYp9sBi8nqayWnzJkwovZorkzzcDM6BsW/yVDLpfUalK72Az+6oGb Lv6TIZfMRHHdfdAMxbNTlh8kKOTkJ8cz++qbIX06/lXcVgqZP3U4J7m5GQwc pdap7qCQPuvWLxbqaIal91ZMZetRyNnHU7l19GaIvC9xsmQPheRyuCliNt4M rqWpajlHKKSQWPwHJ+kWMI70H5A7SyEVzRtkw063wL7Sav/OYArJfJDjOm7V AhvCsudE71DIV+WRFcZ2LaAweKgIQiikisYZd9kL6LxE3nTsAwq5jmuwMiGg BXLfu/qvj6KQuq95ffJetoC22BLhjmQKeWhct62rvwWylrr6yH+lkHqlDcWq wy1wRF9mz3glhdQJcXrlPdoCOXwCfl+qKaSc8jM3id8tEDhbrXu2jkIOGPEL Gwi1QtD963N+rRQyKLsZCtVbYaWfeOFmFoUsdnN7G+XeCrMubisb/1DIrB1C YRyvVrhrLTJ98h+6v2Ci9wZfdJ5Gs+mYp5AhL9r31N9ohXVHGIvbeAjSrEGP JvC4FULe+FTkChLkpJaopHd+K+ycqLnBLUWQmiNv/Y3nWsFmc+QljipBUsMN PM3mW+G0mla1sBpB3t045GzB2wZ6T2L01q8jSPYV9dN2wm2gXTp6+5IGQcbw ZW71XNYGHty361jaBMknlzsVsb0Ngh+ofnLZRpBde0vdmv3a4LCAv4GGAUHe 6bd0aL/WBma6vYNyhwhyU8i8VffNNthsy8UROEyQYfXkMda9NghSOvmz8whB 7jMv15iIawMhxbOhLkYEmeVaOShR3AbpNoLZ+8wI8lZsk93xP23ge4HvXqsd QZqcvDucxtUOsaN+ognnCHKNOOm5iL8dGLkhgy7nCbIyOP1msWg7yESFlf61 J8jF7ncSVBTaQVhYVFrEmSBDD+jRZ3e1w0q57MweN4K04Jm0P7m/HSYkFIXC 3QlSvSR1JNOgHX5fOd6/24Mga3Vk5+1OtAPboH9DwiWCFFvxS77erh1Obaox P+ZNkOG/3p5+dbsdms+68Zz3I0ibTGvW33vt8EFvOoPHnyB1nCjOZmHtoPBp Df8z5KbeIF/RmHbwnuQpaLhKkFLfrGIup7TDgO7LKyqBBBn5Urr9UG07VPwo 8HoSRJBPj14//kuiA/RvF6iEhxKkCl1viI/SAfKK1OR55Cz3Pzell3VAkMvM jgv3CbLi8eU83ZUdoDfLfLvvAUH+7LpAXNnQAclnb5UMPSRIsDen/T3RAa8l 7u8UiyDI6hnKZTGzDrCK96y4iGwc0rpEwaIDvlJv+9UhO6Qb7iLtOsAi3cvn 3mPUv4n9iTc8O8CPq40+94Qgmdc2OC160gGZeeMf30cTpMvSMR4ipgOqVm5g CscQ5FRCRpxqfAcwfYsMrJCF/1tbezCpA1R2mf/ijSXIjSKK60PzOmDI4X7j 3jiCDI4WmRJv64BBiV2DSfEEqZrNuS5H6QTidmfnz5doPjtPpcos64Qrasoq GgkE+ZKnrkVCoROAozjghCxnnL9GeE0nvFNJa2QjC0/fqp3T7YQXB2+canqF 6rFDVbbHpBOG6HZqT5IIMuXc092d5p1Aa2s9/g3Z/oG4S6tlJxgUtXJzvyZI eu9Mae35TsgyvDLthNx0o8qu1LsTPlplWGxNJsi8Sqes55GdUDyxlF32hiA9 xmidcbGdELWkamAEWVPuBG/0s05Q36V8c8VbgnztvN0k7HUnHHHd6++LHC0m 8icwvxPCuzKiNVII0t84/YBNWydMiQtsuZ5KkLvpI7RVMl1QsIqezkonSGUl 3+jLcl2QYTgwuziDILlt+I5Xr+iCia3xA1rIZSyiwnVNFzC/Rr31Rd7Zvyu1 aEsX5CRqdglnEuSWnxGXDU93wf6pwnfyWQRJaK3QfmXVBfETfW56yNOubwYn bbugj5DssUTOHys+E+fSBarvAz4/Q94wydnTd7ULHCOobXLZKL8/m8X9X3QB 1ZGnmu8d+j92fq6qS+yCbw82f1JE/nH18E2lt13wxYnHYwdy2rz11H/ZXZDy S4D3EvJa3hDq0vIuqP+9aZKKvEqI+iaZ0wXaY6/eJOYQpCwRuKtZrRsKGg29 FuUR5DutpSJUzW5oPPzASw758IGENrZON9yfKtPXQA7w/uI8ta0bXju/djyO zGwRjJQ91A3nB169iEVOCw8ftHLuhvcG8ttW5qP981Y5z8G1G3zOZ0RvQKaV 5Vxzv9QNz2yON+xBXjraKnXTrxseGOyssUX2PioHr+91gxPTnCsBmRR+FTGc 2g1xaeJJlPcE2am80XIysxskn6SWrEb22Fah+i+nG778fpu7ATnJsb9kSXE3 BJcLwzFkocp1Azo13bDyUlttEHJLUO6OK8Pd4KU/JDWIbP+vgsOvQQVCJVzn eQGqj+YF8pw2FaLXXL6Rgkw/IxX3ZRMVmOG8eXnIZiU2hjf1qMD1eXv5N2R9 //kiLkMqbCreFDqFrDa7JWzOgwqBx6zFDhQSZN9a+qD5ZSo8+WyVYoiccOr2 viI/KqxNt9MwR15W2DrrE0SFZINr312QRXw8zk09ocLyve1kOPKPydRtYwVU yKwXf9mKnLL6xBPDEiqEtmhW9yCfPzk7kvmJCiIVojQOMi1XP+liNRXm1b// N4lcd4mzZLibCrqmEwlSRWifja3g9P2jgrvA3eyjyJd+hD+k7u2BwIoQnzxk m9wR3zUHe8BUtUXvA7Kh35HzHkd6IHKv0VQZsvrixTsFTXrgNe/VrTXIfasC BzfY94BMSIIUE9nc4uK+e3d7QCth207hD6g+K2vWt93vgW7TF2vEkTcPrl2u 9KgHarWc+KWRpXw44/mxPTD8PCVuBXJthMULZmoPtNke09VGJr8ZzG2t64E/ 5Zl6xsiaj970BTX1wLdHHy+YIcufEmiqb+sBkbqljyyQZ/s+vTnX2wNKokNF dsg5PFtNwkd7gKZjHeaJrLJtTfaABA1iHaesHyGLvOW1jzKlgaj7LPkVOXe/ g230aRpIWaZJVSNbsGusYqxoUJoYyahBTleINIuzp0HvkLF9E/LRSFWD55dp UFm2cVUPctjNIxrJUTQYEhxyG0PeovRu7Zs4GhSEO/ZOINNLZVTePqfBCW8J /Slk7dneFanJNBhbtExwDrnJzUM88z0NOpbc2stXTJCSllET+e008B4xLJJG Lp6bG3nfTQO/psJGCrJdjPVwQS8NogLl2bLIuS1rOUX9NLDV5Z+VRzY+VNxW Ok2D+y+fD61GjtzCKPyP0gvBveMjG5HlJNcFtpn2grTHsa/HkDmVSSKaFr2w sTjW0wg5K0AxJti6F4y335E/gXxgUPrdRsdecJW/bGOC7PmJi/3Itxf0hLsL LZBrXdsOHIvvhbRGyTcOyNGrjVpev+yFm9NPpJzwfbu/Wf9L6oXJEpurzsiz +z9dSc/ohfa3PHsvIqusSEsVLusFrgHb15eQA2uuL6lk9oJk3dOvV5EP3fgT p9DfC2bmsn8DkGW2XFa9PNQL/UmuWoHI6a9cdqn86oWhtdUhN5AvlKRu/cxD hwpVivxt5NjHkc6KUnSokmzIf4g8sdulnqpLB4u0ytFnyLqLNZ6xttDB0Er2 03Nkn/ofLoPb6DAn7/rwBfK/065CM3p0UJvZoZKALOjlsU/yAB3ERPt2JCEv T/b5cNCUDnfuOUikIlte2BpieIoOXDM6FdgvN8yamZ6mQ8M2A+80nG+Z35Sd FR0+lbs2pyOv7wzQDrSnwyltQd8s5L3Cwcn5l+mgr9vpl4d8q3Gfd8kVOlxt PSSdj1wVJbDvix8dlv/UT8c+uuoOs/EaHdoKRjveI5vtvCf/4zYdiBlThSJk F9fwiJXRdKAs83QuRX7cHH8trIAO1KdlMv8hu3EKZe4XofdxD4OxD023pt8t RvGXmUxg8ywTo94oo4OOd/O3r8juNgFbvCpRfTc1u1Xh749Zjp3qoMOyH6Oh NchqvH53TLrooG55YhibXzpK4QQVxZNrMqjF87yl/shhOh2sZ9X565DXBUKK 3gAd+AIeudbj+i5RtF05Q4f7ErTlTchsxR2zCrMoH4vfF7E/6piFL/+D+vnC sAzb2yTsozQXA8Lci6yb8TzHcy0XFGTAoZ3p0S3In9UZLcMUBhj7PuprQ/Y3 SNifv5kB81yJ/N3Ijg5Vq2lbGdA0/OIAtsmtUT6BHQxQnxi/g73+s175SZIB vmT8YiqOv7UbJvUZsFpuG28Pzn+t1NaN5gxYoc3dSUPefmA7YWHBAGav9NJe ZNVzNtM3LRmgfThGH5vnZVZesw0DVhmP52G/J47oXHJG99kkHUJHVhS8te6d PwMeTZyQZSKLqqQLdQUwIJj4q489u6flO/d1BuysVPPBbrmm/MYomAEpdKIV ++506aqx+wwQ+nn2Lgt5vG9afv1zBnyszaCykcsrHMUzPjHA0bhlUz+y2DGp maxyBqRJTJ7ENuso7c2pYEC6WqUX9vCgZGZhFQPUDt7JxZYSLz1S0ciA66ZB mgP4/zaXuEdlMMBOaJH0d+QMVrFHL4sBhg4v12PPuNibMzkM2CPy+xB26LXi tQPfGVD+lnkdOzfxfOXEGAOqfLMGsflGiviFeZhgMPkhaxDX1+fcD1E+JgiI XarEjuYWbxUXYIJrw2gvtrrUuUQZISaoR+wWG8L7b+uSPcoSTOgOO+KAnXjT NnCrMhOe63lKDCPvI0Tm7HczofSq+e4fyC/SP6lF7mXC9qTjJ7H/7L5s/mU/ E4TFZB2wcy4wCxUPMSGhVeI+tlJ5gU/nCSacWV7Zgv33wrkpg3NMuJOSePon rh/vMpUr9kx4NvjBGTs3uuFksiMT7P+98cN2Lt+ex3uRCVNOAnHYnYSEZ7E3 E5yWdrVj55WXjmncYUJKORiMIIuf8lSyCGFCKJtjiu3yc61RSCgT4g44nMNe Kfskqy+MCckkbyB2+EVn1+cxqF5CT3OwL8gSP8RTmaD3NklqFHm1q/vARC2q z9KTZdg01xTFv/XI/tersCPdWGYCTeh+16OasAU8TlYRbUwwo1xnYw94bk3Z SWNCJo/hojHkNF9ul9s/mXCcS/ggtp3ftsSwUSaMTQ4YYsv7X6LGjDNh/mmO GfaDq5zDaVNMeMlZ4oDtGlil0fiPCUl3vgdj69wKH5FbwgJrxwOl2IO3qtes WsqC/nMCFdivbvNaa0iyQIeV+w1b6q5XA1BYMKDI6MCeuncq206BBY3CvuPY heFKlzK0WHDrYYPyODIZnz21y5AFX+UWXcF+9H3fNHmcBfOu7KvYrE1d02DM gtWsvBvYt+p4fu80Y4FijG4ods38ibmt1iw4Y5P1DNvMZmpe240FzbzPPmGn ZIRwaXuw4IBAbQX23OwK7vWeLMhfNl6F/SziAI+mDwsuR6xowmZ/ieZTC2TB cAkPE9t9zfbFymEs8PwpyjWB99el+sVKj1gg3fGaF1uqzFZI8TELYks2L8Iu MAsVXhHNguJjIIb9726PqNwLFkRcH1yGHTJ8TUIiiwUU6qdN2AnZX5bxNLBg h9CELTa/kJ2dehML+GZbz2M72PCmm7SwoPdFtiO2puRuvdQOFtTYHXfFLvL8 aG3MQPlp7/TFbtpclPR6nAUG578+wN4Udupnwy8W0CW3h2NHD8zozk2xQGPj mwhsy5jNlcfmWBDf6RqNPTibOzjDy4af0nkvsXlKM7UOSbNhcbxKDvY5mWM+ XhQ2fJnanoddefFn2XNZNsxsOvQe+4GCxvFf8mx4fMH8A7bc9RTPeBU2HJXc Vo6tszepcGQzGzKiFjdh21bH7nlszoZJ8X3D2MoPSh7HWLDhfnfqD2ymEZ3z zJINzr/ERrBtOlffeWvDhjrpmrEFD2TVlDqxQctgxfSCBb6e/O7LhmKLddy/ cLzq769/+rMhotKKB5t5X2RmIoAN+56G8WLbSB+P/XeDDUIBg/wLXtVDk7zH hn9tfkLYZ3dP2OvFsYFvibwktqKATOGeeDaYPl4thU2v2iJ08Dkb/CLXSWNb GwWknXjFBmWZ9ZQFWy8ec0hlw67E5csWHKDgG/GBDYKLgpWxrYoOhQ50o3ih pVrY60OurJalsUEi/dF6bB7z5NKDdDY8OWOrjZ34m2cshc2GzIv/dLAHtxSd vPCDDSluy3Wxvd+rKoz/Y4PA8O/t2Pq3TQqUuTlon6TuwJY1DTI6wcsBodQz O7GLp3pv5i7igPtwkR42t27UgLc4B5oIq13Yobn87+aUOLCXZbIfW8v4LNtC hQONoUEHsFETZUrVOJA0kaqPTWzw9AvcwIHmpYMG2K+ymXv593HAcr/SMeyi jI/tYg4cGE5/ZIL9kNMYe9qFA7c1HUyx7Zazz7xx44BMwxYzbLEQQfauKxzQ vlV7aqE/54xGPUM44Kj71QJ781PbnE8POHBUO+AMtkizl7dYBAeU3TUtsfPJ 2D/JcRxYVX7LClt4OUuwO40DKxWX2Cy8v7vooWceB77Ygu1Cf6bXSYuVcmCR pq0ddm6Tp9Kueg58fn/3PLbFXYFtyWMcuKZyxgnbN3ELM+03BxzWr3PGjv7o FPKOuw+C00YW3DxZ11WytA82rnO4gD0qzn2zXLYPdI4SFxfyU9+wrkqpD5yW f1ywgU2UX4t2Hwz1cLlh34qe+9a7qw/eNGq4Y3+us1o+ZNQH5012e2Bv3a5a wu3RB5FGWp7YXE3sI/Y3++DkXwUv7EqHl7Sax32g2fJnwQ/nz7jqvO6D9FX/ eWObRMpxRb/vA9XN/pexOeURSrZdfZD08KsPtueYyB7Nv32gn0+/stDvluLh t/L98GFnqe/CPBS4RK7W64cte4P9FuYlbjn50rIf3CpV/BfmM6Dm+/Jr/eBy O2fBlQVP9GtL+2EiIfAqdvK4ZfLVf/3gTN8VgJ2XcXdR1J4B+Bf4dMHlTrn2 WXcGYLWD1jXsi48Od6hVDcDnuB0Lliti6yct/g7CXRULvqrb4/Lc6DuoldQu mP6uNSwm5juMmTcv+H+/ebz1 "]]}, {Hue[0.9060679774997897, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwl1Hc81d8fB3AzmfdmjzJLJCMtUt6fjAYqCiEhJXtmNSlNox8RSpNSVpQR ZSQqZV9cmzuMyzeVWaH6neP+dR/Px7mf93jdcz9Krv4H3bg4ODgonBwc+DN9 vCy48ZqVYUDCyexO/iRDLy6Jd6/EdaA653Dw02NBMCd9puB/4gR8LlBecf7Y Jdj+JFftgrglrI/c8tn92C0YHPtwIkTcBTqbp+vtjqXDy1gKV6B4APxSiR6F Y69AdqCr1U88EvJpx9onXN5D0zLHMl/xeJDd8Ph5njMFxOn77OOqH8Gq3A1m WQpMCNRNY/IOP4crZl+Vso98BfngmIlm/wJIT8p56p87BfOBx/7l1hRB14Do tUcRP+GFuoh0WmMpaLmzXq/6sQCHedp2yWhVgJc+iaxlzUGkXZeSFK94B5p/ s036b3MRP//TEVpd+R4Cji1UMR/wEE0utsLnxmuB59hns9I3y4gE3dGEvsmP oFJXdfFo0nIi4H5NIO/3OpjYkKRzkRAgvsjkOoZK1QPnOq3jlgOChLanm9Fl hXqg2gVFjzAFiaRSebVba+uBoqq/4fSYIOF0OGE6b2s9SBrsmEmcESSmk0Kj hw/Xw5lckRUPBYSIleSdpdap9VB5708h/xYhwncZVWyjTANYclrEKEULERSb //0mlBpAc9svd+P/CRF6T/cM7ldvgO5N5MhjSUIEl8nbbC/9BuBzf+9w64EQ kXzx0c50+wZwu5R/+eMrIaJy0ct/xd0GWLvvP4GwHiGCPP3vy3fZRnj8L7js q6ow8TZouCVbpRFIzG6TOQ1h4uTUF6rb+kZoG15UXtARJsonbzN6dzTC6yjf lrltwoTHD435Ty6NsLpS413xfmHi3cRh9UeZjWCexHHTMkSYCGDlX7PUbYIw njjPH5XChJzH7ThBgybYmvUi7FiNMPFx9EziR+MmoAnm5jd+EiZWjpo+3G7T BPfVT99NaREm6oZ7S9TCm+DJO0OzSbowocjkG+GobALlwkvZb7lFiNZ+Z5OX e5uhJtrvQI6xCEGLeeVtfLAZ8k6sX+m/W4T4oc+b2OHQDFOPPHdomYsQIsnZ 9N/ezWCfUxfx4KAIYbF/9oLRzWYYuaohtfuYCFFXGV3WRmmGoffm5mXnUb1m B6kFzRb4RD5Vo14oQrBUeTRMdFvgguI9EYcSVP98nmHclhZwED7YcaVMhPin wXFSAVqgOel3X3OVCCF//WmRsWUL3Kg5J6TVIEI4Ej+sYoNaYNBi/qP4kAjR WXAldtXrFvD+5hl6j0wiUgc2v1z5FlnBTk1MjEQ4CI10yFW1QIf/sM5VCRIx 4L5LQfZTC9jYVB04JksihuT5Xkl2tsBO2SmBryok4kfs9U7SzxYIu/eq0mYL iRDwjFHm2toK8zNuoXF2JKIh2WA3p0Er+GW810lyIBFxtf95c0AraNoYp6U4 kgiyokXx312t0BurEJfkQiIkO4X2LNi2QkCH8nZ3DxKhYnrTdya0FRoz1t0K CiMR25USSkdKWuENw0JGL5FEKLof9t3+thX9r5P8/iaRCN68Vcq3qloh22/A oTqZRDTpZcfsqGuFaxGSAjvukggXyxqnpO5W2DOcbyj0mERcjpjlMVpshWKt YIbwCxLh8eFtWQoHBY4a7X77MJ9E7BO85DfBQ4GqXs0grZdovhSRrlRhdF4t HWtURCKev1ib812eAjL3nkyYvkH79ttb3d9Jgb8qwlYVH0hEgYrismlTCjyR u6mi8IlE3PYcebPHjAJegclyF+pIhNNs0OqZgxSgl3Pc3FiP8hSK/Wl2ggKc 5Xt+nWshEeLbK+//ukqBMxvKKuJ6SMTRu8rjhxoo8Pp7VsiHryRiseR7vnML eo+dkAp5P0Ei7raVh3i3U0BVZGdAxTcSQRU6zBnVRwGdh9vc836QCMuIGOlX Xylga2RWHDJDIoxPzOwiC7fB4kxxUfYCiWBEVgutXNEG3B5+f64vkojI+zcp ayXawFvcJdTtD4kop6o5wao2qOF+yivzj0Rs2Xs0xE+zDT49+hO+mZNMqGt9 zGjY1wb/O5jh6MRDJurMEj27rNrAdoVoZRXySXcX7SGbNjBwMbNU5CUT6Y/m 3ywcbYNeVz7hQeSVYtqUdX5tMLZngHyIj0yQfqVw3LjZBj/1I69ICpCJ2WrP o6bNbZBbaTwoTiITJXMWhc/a2mBNVKKJG3K4hg6/QFcbaE77jBchzyfNFTXR 2iCaW+GvFZlMcHhECdlNtcGmYw8Do1aQCQGR+2+9JNqBv+oJvVaMTDQYRa5o lGkH+pb3/ALiZCIu7Li7tnw7eKl+jt6PTKari82otsNR24P3O5Alikq8zuu1 w7erfzT6JMiEokOLTPyRdtCqYKxukCITjJuF/lPO7ZDX8fkSnzSZyKhJ/mB9 oh2mloccMEJW1TwaKOPbDv5n9LaVIGtwjNelX2iHRzKU8BQZMrElkzu8+HE7 JB87k0fIkQnzqS3UntF26A13Fd8iTyYMK1vK1b62Q1r1xRYXZN1or4zQH+0Q 3zOqEoMsq/wgQPR3O/hGWSUNILOseAXNBDrg9bIXxZEKZOLyyzYoW98BwRcn a18povzO+6rybegAiexVxzuRvffyCdts7oAQqZ7MBeSD9G09P3Z0wMJaW2Vj JbTvivRgtQMdYF6jz9GEXB4QkJUS2AGXfDj425XJRMF2gfjhkA6orzZ1mUbO WP4kdOOZDljj/cBTVIVMRD/qNG6+1AGbHgTcPoBs12I4sCypA2YPxLt9RJ7V FhYLLekAbXPPS5mryYTW96xz1gsdsIy0bctmVTLRl2AWbPcPzV9Zk2iGfGPT f96O3FS4Fapb5Yw8dHr9kROCVHh67+rFG8h3ePL1g+WoUPht77seZB7ZorlE AyqEGmy6EryWTLwqt/6WAlRQVrwycxXZ2Xl2OM2YCrXRfnp3kN882dKRYU6F l/WpUIHsr11WWHiECtb1izbcamSix6QyoO0sFToXBmavIV8fdfLojKCCRN7j 3hTkzdH/nHujqDDo2ZH2DDm+mTjAjKHCbO547kdkU4cazek0KjQbrJLjVkf5 +deNi5ZToZrxyT8E+epdyomDi1SI3isuZbSOTNja3Piay9EJZ0reMvYjo5GC +Xg7QfpqYNwR5LoreVHlwp0gEmJzMRiZP/B6uqpCJ+yEb/89QY7dbUib39kJ 4jX2Kzg0yIQj16y7za5OcH5vOy2AvL4i53u+WSeQ+neUSSA36sr8O3GoE2pr RifXIYvIz6xqPtEJojFW8tbICTNZRzKudULXxmsPHiO75rsw/8R0QnX8xsFs ZF0vKW+7+E7gfDnFV4RMGbx8RvhOJ7hZ3xf9iCxe73wnLLsTPIq0xcaQkx9L dJo3doKnZM30uvVk4t7+iwdnRLugzY07+yGyKs3wPx6pLujX+zL6FLkgcDFK Qq4L7LsDJXORPySFFW9R6YLyazO7SpG/9fhKn97YBRcVc381I4O7w8CfQ12Q zfW7fBH5yy+pMBG7LrCgyMtwaZIJ6+gOkoJjF6gamHjwIXvkWe4kTnRBUJsA bQVy/PSuJ5eCu+Arha6nisyI2OjFd7sLyhofZ1kg+6yY5JK+0wW6uq3GVshz 6S/S1O53gTOljWKDLPhRvXHv0y74drKy2Ql5k5CiTmxxF9x2FNoTgHwlVWiO TO0C5pa+PQnIai+HL8pKdYOxZ+uGBuShbvscSblumLVTutKM/JirqV1UoRu4 naJaKMiy1iVrBdd2g9anugPduN/Pq40LW7pB1Pro1DDyt+1qMv223eB23Ljz D3K22z2jboduOOKiXsShRSbcb5J9Opy6YaBkWzQ3Mm3wV2XjSdRPX1GZH5ly 6fOJytBuCO0u5BJHLq7zKniY3A30035JashBkwPdaXe7gTlpLaiBrCV7iDv1 QTectLI/p4mc6W1gG5/ZDbkZ0xa6yKkiQouRJd3wJORblgHyOeu83a7UbvC3 SXTah2xE+z6wWrIHKnKV+H2RlZXOpIbJ9gB5DSePPzKnK8/BL/I9kG5V9TsA +R1T+oP/2h44lC9EDUbeMboz541eDyj52x46h6z3LTHM8kgPWO++5R2NLK0t vyHDuQdmxs1lY5F/+j8fnz3eAx/XZNXGIZdMlh9N8+mB/7meFUpA3jg7bDxy vgcOlBZ6puD9FreSzz3qAd5TlcczkEV2vP/c9KQHLqdUtD5BnjhvEaWU1QPy DXzbM5Fz/7nMfXzZA2P5GbxZyOrc0X0ranogYPaf7wvk1QJ9z58N98DaoxvS SpFlpCN3tq3rhbwsufQvyK+0Vwj1afVC8eua1Hpki93p1CHdXrh4VjKuAflC aK333LZeYD6n+DUhM9qXJ8uY90LcLkKKgvsnJIw7e/fCJHcaRzeyaZZysYd/ L2hlh7ZjD7wrjAg81QuXda0ye5BX/OgQjzrbCyEmkiZ9yKH7ZSEzphc8bdw8 BpEJwYzErzm98OWxjN0wcrfyJqfZ/F54c44sMoLvw7YPan8Le4F+c/977Kee oxWk8l7YN1+whoUsUKfB0m3oBSu1i13jyO2Xi7af/toLQHs3+R3fx78fhnk1 +2DjHj+h3zgfLV/CbUMfuL3tvo9NOyqeVru5D7KDP2nOI9tVuFpGGfZBga3+ 3gXkPef+veGw7ANnKt3vD/K6eb34haA+6H53PpxTm0yMqNPGHcL64Maexmns dPtrpm/O9sFPyW5fLmS5so758Mt9UFSr68SNLBQe5DZ3uw+erNurw4s8MZuz bbK0DzwFKu4tR85ec+i2ZUUfXC+14OVHPmkz/z2/ug+UGZ99sAeK9jz1+9IH 63pT9ASQm04Nk7729sF61+YaQeSCSfnhkb99cC3tT7YI8qmJhP/1mfTD9VOR jWLIrkXfz6zd2w8b7lpKiSNbnt13MmhfP3wJcXXBXs/Pv2O5bT+UDx/8gT2y OnJ8o3s/XFBL45NEdnD0M4250Q+R2kclpJH3qDToUOP6gTypYo29dVx9pdKt ftDu3HMLWzx8eKrkbj+oJBUKySA3Jjo+YuT0Q8RR/Xlsot5sQb+pH1xHjpbJ IWvdej5ymdIPnXeqv2Gvsl9Gaab2w53MNJWVyPMj1c/dBvtBz6w0BruQS982 4Uc/bHtdZrMKWXXb2pcs0QEYd+CkyOO8s7jdUw4PgLXdqmAl5KJdHsdTjwyA rciaVGzHoQbnO87IktS32HkKyXZp7gMgZL2VSxl5f7Ka2cOwAXjPFIrBjo/a p/ksZQDcOgviVJD1lF6pP08bAE/VnFxsWqWkatbDATjyw6Eee8P8oHzOswGY L+jnW41MCQgi578eAIpO1HlsMaeU6ZLOAdA6zjiyBrl8YeH7694ByEu/HIp9 4o7L19LBAdjaMhKPXdSuPvxmdABOWU7UYlubl1Mrfw7Au1Ni61SRk/XoZR+l BoFVajyGLSumEUk9PAhzB/8zVEMernsqpOU4CDHtRtbYBRcU71xxGQSuAldP 7N3jEq82eQ6CSe6fW9jB1RxDt84MQsqmAiZ2oz9194H7g1AiFXFWHTl1jVV7 5uNByO+6F4d9orfe5e9TdH4y5iH2/K7q03kvBuH3o7732KryuTmC7wbhVa8j 3zrkyIaLpDrGIBQKbruObX5pMU1hdBBsB+6mYEvqhamF/Yf6P2jLxM7L8Nmp OjMImYebarF9K3L033PR4KrWzF/su0nJ3oriNAi0PuyjgTxt5NPct4UG1Xbz muuRt/BrPmDq0eDAkUN62OHNEz7j22gQK5JohP33iL/AL0MafB/+ZIu9PCTI VGw3DcSvCl/AXvks/O3ewzRYa2hQh+3kqx9taU+DuvCVrdiPN87bHT5CgzwS qxtb9d3ZuRPONNipCf9h63Rf2BDpTgO16ikhTWQTwSvPSsJQfc40C+yrraah Fadp8L9yfWvszynLTGvP0iB49sMR7P2rrzNaI2iQGfLMC9tuR8yqiWs00N2Z eA3bxz8hUSWVBkEcmyqxk9ruR8SX0sDrZ76CFnLAcJlk3BsaJEXorME2/9mR d6OcBpNtGeuwueRE+i69o4HAneObsQNdL+iF1NHA7LmZGfb+SadJ+y4aFO5v DcRex332um0PDRxfx4Vi80qkKBzqo4F1nuFZ7HK95n0WNBrk6kZcxtaIhGxD Fg3kFc4nYy8nKR5X+YXyL7tUij2kuH1eYZ4Gt42Sy7GrdO0SVi7SoEfg0Tvs UNv4KgkOOvjnJtdhD9/nWLl8OR3u6Ip1Yb9fT2//KkWHHzyOs9jnzNJ3lWyl gyKpXF0b2dPj85oBfTrYRHNpYtte/cGzbDsdgp8SOtg67w1rbAg6TBRkbMEe 1u+F2T102NrBZ4y9X11cf5MDHUKT7B2wDXYbSDs60oGfV/kotpqb688oJzq8 CGM6Y3M9Lihuc6XD8C9LN+zX0vt0T3nTIfdWlz+24vKrGq/O0eE+f3YUtrBq nkDPBTp6X/BdxZ43bh/jvEiHZEnn69jtEcrPra7QoXloIRb7xs/K1ZNxdCgZ +3Ybe2rk5yqdh3RgWH3MxK754El+UU0HvRv3arFFDoj/Kqihg2zzpo/Ydl2V g4Uf6BAo+PkT9tdxsfyyz3R46D7yBVucXLnvQyuqrz3Tgn3CQTSmj06Hqstu fdgvmOVBg0w6uG+u7cf+5ePuwBimg1eJwiB2bES5OmuMDhf0G+jYRU9O1k1P 0mG5BccoNs/3N7yCXAzI39H+YynfcLcJYR4GbKzmnMJO5SR3kJcxgKqzfhp7 vbjbE0kBBmynhM9iW+uTjJVFGVDZ+OM39pOo45H6ygxI+OjKpYNsKi204G7E ADee8BXYj/Kq1yWbMGBK3lMUe9EozKF2FwM0th8Wwy70ZZQpmjNA//t6CWyl mtLw7kMMYAWWS2P/8XWbM3NjwOlVfgrYdtxyqqfdGVC+aZsidlFqi80zTwaI d/EoYXvXGBRz+zHAtDtRGbtbWjS4PJQBgpMpa7CLayonNa+j/eVMNbDJ9sFK jtEMqPkytWSfb+pW0bEMOKr0YD22isztgpF4BnTm/9DETvDz9n94hwEN6RE6 2L4y0hPkHAYInbTcjL3GP5A13ciAIFvqDuzkAKbdMgoDrKUrDbGXBdl8lqYy wGziMWCzgvWzdwwwIGL2yE7s3DOcPte+MWBDzwMT7FXnTvXdmWJAaoObKfbN 88MWuXMM4OdQ24XtH/lZs/UvmofvyW5s3asJ32VJTNh1PNAMO+Mat4umGBPU 4mTNscVvhLSAFBNGZt8veS7G/uUJBSbYsPj2YZclKJ16oc2ELAu/A9jE/Zdz Oy2ZoNpceAj7ahPX7x12TIgdzrLGbvh3aEHfhQkx+kk2S7+P69y/DQGoX+KB w9gPEndzaYUzYUeloh32UG0qz7pIJjw8ML7kwLUG/MrxTHR/vBywS+1iBeVT mVD7T+4I9t8b/cKyj5hgn1u/5OivEaKiBUxQNhU7ip3+slaOq4UJMkqOztha YkaGOV1M2No2seQ3wVUu1nQmhB0444JN2frmaeYUstK5Y9jj80Xjv7iHgCvV 1xWbqzJf21xiCGY2mR/Hlr2YHXxfdQhWa8mcWMrX5GnZ961DsFumZclmfI/+ 7tw7BO23o9ywj3+5a5zkMAQtgatPYrsu+2QzdmYIRjZouGMfM5p2N0wbgkwe UQ9slwsKZxLfDsEHL8qSnd+Yx7J6h0BLO8QTO7aI99WC0jBo9j/0WtrnRVWn iMcwqM07eGMLrmQu780dhl93fi3Z8caybc8mh0F0xNdnaT7XlLPtG0bgdnD5 kvUN1Co4g0bAKXOZL7ZtsixH6usRaPMkLzl4UshY688ItAZKLVm71Cd5jeEo JOqtXPL4hYaxlRGjEFuusOS60tt7GitHQb9Exg/72ZTTs/N/RyEkVW7JxS9u 8KUYs2Cz1Kol13gVuRdcZ8E5DfklG05UiJTGsmBRj+1S/0/FVfEsMNjF9pyO xY2aWyyosWB741SL46ckFmw7xHZAoY1OfTIL0u3ZfhHcw92cygLDTGIpr/82 O3dS7rLA5CT7XO0nM5t6jwUXfNg+WepxoecBC7KC2M44PWE18IgFteFsyy/O /Rp+woKWy2ynXuB4NPGcBY/j2abClVOT2SwITmZbjFNg92wuC/TvsW35/qbs 7xcs2MRiz3MzSuzbYgEL+ifYrjdJreYoZEH4NNvLl626zVPMgrM+i4HYuz49 9lj+mgV/AtmOuq66XaiMBQFhbL/bm0Miv2WBC//Opef/CugwxSpYUCbCtkFD UYlUFQuWibMdHqcfLVfNAlMZtqdJxhtUPrDgngrbfrcsutZ9Rvtrsm1/Lyh4 bzfKy5ptk8xUsscYC46Fs12llv7af4IF3yPZ3paT4xQ2yQLrG2yH+ejonp1m wVeOP0vzFmkW80bMsiA+gX0+9U2/+9JPFjy8zbZ2QWXu1d8skBFmf98n0Dgy eoEFEivYztatO3TzDwv4JNgenbZYe+sfC848ZT+/urh1/jbnGNhnse0aatt0 h3sMtPLYfri19/F93jFYKGC775dzyGO+MagsYlv2zdCep/xjMKHBrn9+S7/P Q6sx2HmPbdqrjvg7d8bA8Cvb/wezwZA7 "]]}, {Hue[0.1421359549995791, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwt13k4VF8YB/AZKdmKspWSVKhIqWyV9xaJSilbJISibJFfJFlLkorIkqQs WZOEkH3LNvZ9GTOWWUTIVtbfvW7/jOfzvN8z55z3nHsfs9PM/vINFgKBcBr9 wP7GjOQ6kZ5cUo49pSPEfv+l8m0W/uIMvoMQM8H+sIpsA7NCrukv+RCoFB7d 6kd2g+NxqZLufFpw9EY+1YwcAP3MCov/+Eyh0td293HyW/gS0MziwHcHvh2L V+7sS4Wt5M4mOz5PmJVvZJj35kP9OqNcW75AIMg3VkS21wEfVdPgecl7eLRF 0YMx2QcOspGDa4cTwX1BciuvCA1EnJ6NNdinA/2VwZOBuVGYd7i+klqWCStW +7qtNv+GtL0bhCJJOWBx0dnkjeoM6LO2qG05UABx1+TbNNz/QKSfoABfQTF8 bfalVBosgOSvcV2himLwGDz/pcR8AbK1q15vIxWDNMdF4W+2C9Aocp9/T18x PG5RTw7yWoB1Wd18ckvFwK8qCWuTFsCRGrX5yokSyHT2iBmYXQANpd28bwtK IMyeJcngxSLM/TzItbuwFM4wIxWupSxBjddRm7bKUviUuqIVmrkE7wSV6nwb SuFg6YVfPwqWQFVFJYBJKYVv8mIJfI1L8OqNLtfnNWUw1lIbrT29BFIarlxK GmUg33VP2eLYMph9LOPSai2DgrB8RnbZMsgdr7Ih9pXBJFeV4d/aZWBvrqvL GC4DykUf6uHWZUhfagvgnysD79PSYkFDy7Ckw+Dq2VIOutcuSYyyrkD4Gm7u myblQNLOlBBTXYF6Uz1ut5Fy+KC6rOmZvwL8cVYvI36Xw1HZBja1shUworvy fpsvB8l8tkTWmhUYsY3m/81RAeHushE2HSuw7gFju9X+CkhaMypDn1wBeO16 QMemAhasg++WbSIg6dXvLkr9qgCrXcL+OSoEZI7rS5PGbAVUuB7KTFIjIMpa ZdqWyxVQvTtZJ0yDgNS10/VjNlRC+nbWBcuLBIQxeNBUSKYSiqTyf5ENCYjo cukd1juVkGrIx7/bgYAEydKDeicrgcn7Ypw3koAcj7t5tOlvJXD8SBn3jULH 89M6K4g/YCF2IeFPNDrf36Edn3l/QNN0mlpzHAEZLRr45HXoB2xzOWRhnEZA 1DXJ1eIOP0BBz92xp5iAEKzaiA4TP0BeejzNaZCApHbpxN/48wNSLa41+QwT EP1zreqGhCp4H240+JJOQNIOtLxU4amCQ1/ukN/9JCBGM43bBQ5Wgc9Evk34 FAHJ8a5T/G5fBbnGZzsXWIjInagyh7XjVeDO1nkuZAcRMQP7owlzVfA4Wtvr 9k4iok3d+ledUA1bnhc6ndhFROT2OHoG8FaDm2l1TJc4EVlIFX25+Ug1aJ29 5/pTmoj45j9M3Xm/Ghxe3xd2OUZEXIz33inzqgarsf9qhE8QkVuEtsM3/Ksh Nr3KLl+ZiJxXlfqeGFkNFvfL4qdPEpFNdd3VMoXVkDZBO3RSnYhE9cjTT6yp gWie3ElNHSLy4uFgcj9nDUQITyeW6hIRzx0v7bz4aoB6aPDlEX10/ea0mfI9 NXA0JXthoyERkfwZwnpevQbE2ay+xpsQkcz5yZ2Gz2vA8+FX+sXbRKRmS6rR PcFamCU5vst9SERkbt049WhHLcTxHJSrciciITkikq8kauHYbFZpqwcRMdYP mvokXwsqrRKVdC8iMhVyz39YvxZaVAtrZh4TkW08J3N0wmuBdUeYZeZzIuJl Mh9l9r4WnnAMZMS+ICK0tK8+dxJrgRwVJhb0koika4pfDMiphdbCOdebQURE 9RknrayzFvbbb7u+EEJEbNe1bz68pQ7Uuy88bYwkIs26L/8iO+vAgCv+Xuxb IqIQr95/YW8dxClcy3aKIiIsqt+TbyvWAVNMUmFTNBEJ9Xp/MsagDr6fEAxW jCEihYu37Xnf1IEnaYL7eCIR4ZlaqRnfSoLfhSz1Yl+JyHfH4cbkXSR4mVHb 3Yz65u+a9htSJEgXSb3slUlE8idfD/ScIMHzO6cDu7KIiNXE/vkfpiSot5yK cM4hIsVj+nvffyTBdqW7r2wKiIi17QmZq59JsJyqVsJaSEQExsSOCuSQQHJd xLNI1DajY0hANQlmJ5Hl8iIiIvTT54rLKAlCLhulsJWi95Px+YmWbD2UqCeF XKgkIsJWr59zHquHJ87adU2oK+muwZUq9bA8E1+r/QPtP/109HHdelgrmLNf p4qIVA33ZEu61INSSH2uWg0RER1koxEK60HK7MvJGRIRaeozUf2i0QAVHL9L /FqJCOVZhrXK5QZ4d0TuJx31hOLa4DbDBojUUz2o1kZENoQmU/9aN8Dlz8n8 hHb0/l6YcT/1ogEEG9Ue3epA5yv0z21pbgCtI+vf8HUTkU6bPsqNngYQ6uK6 eRM1fevB9X8GG6DjHd36G+p1zm1622YaYL+3uJR+DxGJEeRxzeBshKftip+f 96LraTAUXJBuBGGh7QqdZCLCEGfdryrbCNwL52xF+tH1Pfyk/FyuEThch2fN Ua/sJ9zcAY3g8cSfewy1iF98popWI1QbnLs7RyEiRsjEpQDHRtC7NmL9a4CI dKQ/Dtj+rREOXHCtt6MRkXDy0S/bvjeCsmXiwDvUhly0NuGiRkh3S31Sj5ps qbZj649GeGjD6ydFJyJDImwZAh2NIKLX6zaIeiLAr2PjXCNw/o5gVWYSkYw8 hcUNC40gMEJ6bYn6LoMhumGlEdwsblQGop5V0bjNxdYE5Z92sg+gXppnX1ov 2ARe/qJSniNEhOPWMzEW+SbIrhOMSvlJROpCj50hHmuC0x1evg2on5f/tCZA Ewi/2rxtCjWP6PmsZbUm8DwXf0FxFL1vHVzqC3pN4MI/OlyCetfpF7bT95pg slDzQfkYETm+MyiHlt0EuyYcacHj6P2w1Lc9/r0J0grrGemo137aLvaqqAn0 r8p+IKGuV0h+dqKqCcy6J+XWTRARU60y45CuJlg5J8ThhPqRxwzrqcUmSG4r oZ+aRJ+Piu+5YYRmUPB8GHUVtSant90YazNUh7HyOaEWCNvQGc7dDAaffp2O Q52YJpEyLtIMhz1k64m/0f32GVyKOtkMKbW5U19Qp+8SXTd1uhmK6FZLlahf 36LlqZ9tBuqCWFMPauMZx93Tl5thF7Wjk3UKPQ+ugLmzFs0gKdbjrIOa73hh 1B/fZpAP7bMYQX3tjdiIdl0zeIfJnpyeJiKL2eOfTRqb4dxrbleWGSLypiX/ P+vWZtBmZAbyoG7n0if69DbDWdlPV6RQa3k8E8oYbYaf9QtXzVCrWEyr8XC3 QN2De3erUA94lnBt420BAjX+Uytqz6gXzRL8LXB+5noNBXV+u6QxbG+BqZDw 1D+o5TSu/Wcn3QLNP32FJWaJyN4DlbF1mi0w2hbR54666mzwrc5LLWB+SNz0 KeqblqYyQ7otsHLXoDoYdcz7+byFay1g+emjViLqbZtlmvfZtUDaoqFiI+qN f8IIT1+0AL+RabzwHBGZKbl17XRDCwic6TaOQZ09e/5rQksLHCXWVyajdtl/ kJ2jswXSWYuFvqKeD5nNrKegdSufB2WoCVY+XFd+t4CYQsKpQdQcG6K+3+Zv hUCBwHU7/qDnd8qTl7SlFRgv1kuKo37ubG4pI9IKWglNctKoeah7N0+Lt8Il PqHtx1DzZ2bffqjQCgMyKbx6qEUNG7cEXm2FooPsZX6oB158tf9t0gp5dL2G F6hjy0IrdCxaATGuqg1BLS59zWGLbSskln9//R71fsJIVYx7KywPX3L8hlru 4xqXrA+tUOGhe2cA9bnfcu3d9Fa4eizL7cBfIqJc2JgvOdoK1zYtlciilvW/ HXtvohXW3z61KId6q9i7O5v+toK1p5wWoGZcWst5lqMNYn7XuFxE/ehLC+RK tUFW6OygLWqXh7bibIfa4FBt8WMH1NYabNy6R9ugr1dK5D/Ul6lK3RMn2iCv +OxhN9SivDFOkhfbwE7x0ORT1Pl37iSFObQBz91HDbGo049zBA7/1wYLkUdp H1HHro+7d9i1DVJDf00nofZ/36HS4N0GA/3V859RX2lUJq8LaYOTt/STv6Oe keHefC+7Dbw3Zic1oT4wnuSms9AGfHGsCX9Q9waddbqy0gYdzs/z51E/PfLT 2mhNO6RU8pAWUQ/dl7pqwdkOBzjl+wnzRCSC9bOik3A7XLmiWb0eNevWzNng Y+3wo+tdoSDqjHydX2HQDtxOx55uQW1iMjMcqdIOt0m+F4VR58XJtcWea4c4 ee0GEdT2Mrlfv15tB87i/rd7UHerFt5pedAORjkmLrKo/ejGVh0e7WB+4hXL EdRH/VdMenzaYfnlhqdHUQc2IBcHn7XDkOr6ZwqoTxuWSU9FtgP76LS5Mup0 +6qRTfntIHVG0EEDte+bZovLi+3guDFG5hpqPd2no6mEDkiTAmtj1BI8iBPb 2g6Y94mNNUFd9fiTTz53B5g7DHKYoWZ38IsR39EBGm7imTdRB5xRpsyf7AAe UryLPWojlhlLXbUOyA25/+gOaqmClPHPZzvgkXHQcwfUJNktKxbaHaB+Pyns LuoNItPbGyw6QPYwBDijDppOuhr7pAMSramL7qjNPpsOLj3rgCND4hQP1LK3 Ba2vBHZAxLmtJZ6om/sfuXJHdICYyC43b9R8tSYRzskdEJli1vEYdegH/o5z pA6ICg+VCED99oLX5elNnWAV2agdhlqcovyTVbATXq1LHMWc7rDowy/cCfXH OR6Fo64Icc6S29UJZmcepkWg/tVtK3T/cCcoynv8jkQNlobkJe1O8DUeVHyP uuaPoPOGK53QtZtQgFnHv23jDqNOMMzrVf6A2uqT1knEohMqIqjKMdj5TanF eTt1wtly24NxqAc8Dt9me90JlAD+3gTUNryTLEIRnTB69MX5RNSzMWmRklHo euSmv2PmrNxL0ojvhIW0V2FJqI9wiR4MyOoEUL9+KgX143CuWZ52dH4Ze6s0 1JJfhr22CnaB5AO7dZmoh7oMUgSEu4B6MVgf8weW+tZNO7pAvHsmAfNWnWwJ TokuMFZ5oJaFzTfnS1qQ64IEjVzXbKwfxyW39Ol1gQPNuyQHdfKNt6e6DLtA 9ps2Wy5qyxc8Nm3GXfD46sPzmCn9fwpJN7vgpC61FXOzd7VF4b0uOEQXIOeh zqq6nR4d2gW6X31a8lE7TpK7It90gbfm640FqA9s1V4T/q4LKtkFz2H+aH1M L/BjF8jr3inGHL6Ba9EzuwvqpaLjClG76Xw6Y9beBUUvOHSKUZ+ijJN3C3SD /vab+mWoxXa6hjtv7QYt/3dPMBPNWC/XiHTDt3yDb5iLB4Uq7CW6QcDnGn85 6hP0kyl5Ct2w60ZBLWaFX8HOWle7oZdrRKwStZCMyKFYk25QRCjnMM/ZJ47M mHfD1u02TpizJ/OvRdp0w6UV9XLMh2eGVWgPuyGKdsTkB7a/RXket/fdcIU7 17sKez5OlFbXx3WDesOjeMxjD8/77EzqBoc9sz8wp66YzlZ+6QbW2yTOatR7 1/j38pZ1Q8VRy5eYd3P0JiYMd0OAOfuTGtRbhDxPtuzrgezg9yfqsPeVDC9X 74EeEGHw6GI+fyamfUi2B349VLfB7H6v3HpWqQdMFDe+wTzQuj50y7keSJTm mMKcGhQ0YmLdA0MREpEk7P2TJJZlZd8Df/3VP2MmF3/1cLjbA5syFcow8060 8fk86AGqo98I5nsXtsLHZz2QqvNbrh41whkbPJrSA/o5l35g7hI7YjzzuQdi 6t90YnZUqpBc/toDT4TzmJjjb9ELNub3QEKAG2cDao6q/QzZuh4wrxXWxNz6 KPP4/dEe6DshWI0Z/e0/vFa6F/4I/PexEevPAVvkxqFeMMtVzcRMucYXWX60 Fy7yTpRgvlJgpuWj3AuXInt6Mau7reQRtHrhOttG3ibU++YVAhcce8E7Q/4u Ztpeyoihcy90PRlzxxxj8OR03oNeiHr6yB+zcG7bvMujXlB4r/8BM5eL443Z 171QqP6GhHlsJkVpMqcXSNdbRZux52mP9mutgl5gW1O6D/NN3fnxzyW94Pz2 9RHM5Ez1eLuaXsgdHD+Duf7u8MbRnl7Imrhnizl9UmSYttwLkYVsmZjvjgW9 7FXtA56S9oMt2Ps1c9xVQqMPqr50ymPWeqB501GzD6TzqpQxS7Gzn1iv1wfB qnfPY6bt9hw5bNkH3AZzNzEbGtmdfva0D0jp1HDM6rvqDrY/7wM/3Y53mOVH 9m7b+aoPvKoL4jDzuQz/zn7TB5W819Ixk4KN3g+k9MH3RmYlZqT27IJifR/s HzGaxHzgVSLtUXMfRN+zm8W83WBdc0N7H4SWOy5gnqeVJN7o7wMdHd21rai/ sijqBU30gYaRtxBmcSWJL4xNZLA5/fY4Zq6kNZZh+mSgvH/jhjlTzco8/CoZ 2Neu88RsNFRnEmFChqeOt3wwf9oReiXSkgxyG4T8MV8IlTwb7UyG0PP8YZgD fTSlE8LIMOQQ8xmzws6MvYmRZHjBHpyBmVIoIJ4UTYZbvW5ZmA/N94ukJJAh 0OLYd8zNdxx5Pn8jQzpysxLzZuOwqewOMiisePVgzl9YGP/WQ4YT9evJmC0i TEdz+snQau9PWV1/697hPDoZLmW6DmPWOZffXjhHBik/vnHMoQrU3ErBfoj+ oURsw97nm/d7tuv3Q1dB4k7Mw1XxXAeM+iEh/vMuzOnuohGPTfthQ3b6Hsxn RvgzjtzqhzKx2L2YnUoIQ69c+2FI7vwhzCT79jMXo/phfk0WYA7fc6n144d+ yDCwPYnZoqfWdDm+H3ZNiqpgnlcruf8prR/Ysx6oYRYXSU1B//cB/+uL5zF7 1nltrBroBxl3eQPM57wXI3fQ+2GtVaohZgEFZ0nnn/0w+FjECPOnWJuT4tNo fmDWGLNtQYpiKQsFRMceWGB+ExJqLcpHAbd6sh3mqVM2Db1yFMhdVPbCLMcu /W5QgQJ1r5S8Mbs0jNmMKFHgctFhH8zLV+05/ihTQHBA5DHm9f85nt58hgJt 9zv9MG9LcPmuoU+Bap7Bl5iNbRX9tQwoIPskLxDzh8PzV/SvUqDRLihodb/F D2YtTCjwyF8uGPPBLvdDnpYUGEuxCsWsyvk4IduZAo9XHN9irg5bd7r8AQUq lgeiMF/Y7TfQ5EEBpVea0ZivnHi2fewJBdqfc8ZgtrEPCt4VToFvyccSMIe0 RHkE5lDg/H239NV+zrV9eppPAUa07xfMLMIber2LKeDNeJaB2cHMXeG/KgqI /X2SuTrfpPGkQScFrpSp5WBeyx+2Q7uXAvZSB3Ix5ys0aJ6nUGD7de48zPs9 IVmZQYH7A+XfV/u1UdR81x8KBH9cLMRcJHslaNsiBfhzS4sw39MLLOInUCFZ 7VHx6n2MImxbv54KIjZLJZhLpaito4JUoHeWl2N2Oxujli1PBUZAQfVq/0qV y3QRKlxsn6tZHa/YAzPqVLgvsbtudf17+RSPGFLh9YRe/ep+P6RntZhRQTPb ogHzNyFN2bvWVNjkeb0Rs+h63/0ZblQIrFRtxtzqIZZ46TEVDtntbsH8dK5w 9+RzKgx/ILZi/k2b234wmgovyeFtmMsqbvGklVCh9pFdJ2Y+nkLNiiYqZDx+ 07X6PBhuetZLpcJmm5RuzJlxN6umJqmwUpfdg5l1PG8tJ8sAJPW978Wso7hR RWzTAMzJ+PZhjvMx91QUG4AXI2fJmE8LcS1YnhoADoO8fsxLtjdmz94YgKzT fFTMWWWFk9J+A5DRJDGw+nxsERrjSRkAzwubBzHvsXdgTJEGYOf36VXL+gaN b904CLc99g5jRqK+zJ7UGoQjPRtpq/dD4hi7WOAg1KkOrzrmS7kwS+Mg7FlZ S1/tb+FnmXP8Q3AlL3DV5jVvVEIMh4BxJ3bV109NWSpHDkHjvvRVm+SdC2D0 DMHOgNxVB2SuzVjYOQzy/I+YmPPSijo2WA1Dkmrlap1z2+D6ntRhaGerWbXR 03VKCZPDwFNct+qWmfruAl4aiBeRVn3WLOxB6yEaWL6pX7XVw+pd3Yo0kK/D 7Ru+UNt/kgYyi7j5P/K9HzhNA4/NDauO+yrtNKxBA5N9uG2UlMi0czT4eBT3 4RI1dYYmDZoR3PNntDOYF2kwcA53ab3Jtp+XaHCqv+cXZn9dG99RbRpkXsfr l3pdJsZ0aXDPBreQ+WPDcX0abHfGTWEGlU8Y0CDFC7f9XHL41DUauIbiXmYt t5m9TgN6Mu7KZ43tc+Y08JEqo2B+vqkP+XuDBm5yuHUimMnzljS4huDeJjrL t3gL7ddZ3IMfWTyWrGnw1aJ3db3J0huZy7Y00LTD7ZgprE24Q4Opm3he8Zhk AdGRBse88HqV1QdyXQgNTgr2rVovdCsh/BsNAkNxy+yVzSjPpUFXFO71+RoW k99psDEeN/XCdQGRQhrIpuLOo7pUnS1Gzy+mfHW+YKdAV+dSGiB5eN2GLVEq rpwGUiW4T78pIjdW0mBtFW4R6Y7ApSoakOpxzxX9OrWvFu1PG+7Gy+tm9Eg0 kOjFnTS8PcGngQbkJnw+b5ejBulN6Pl34r7KqcnZ10KDRjLuI+8sCtjbacA1 i4/nOuRmL9dJg6uLuIfLgnead9OgaBLPq2/8zeQfpMEWjopVpxpqZVT9pIHz TtyPxywtZsbQ9SuQV8cbe3oIiE3QIPEEbvnNYVUXftPAVBbP83xMc30wTYNS dbzOVKiUSpylwU/jucXV+1fbR279Q4PKU3g+0ngmkLhAg7RbeN1pkkvlwBIN FuxwJ48nLB1doYH2ZTxPGTuVc4JIB2l93AKjfY6n19Bh8Sru8yMu0ppr6VBk itubsZmhw0YH1if49+XQ0mKM2Onw+RnuX0Ma1yw46VBqh+d3DQ4J2nDTQe8u 7vkeLZZn/HRQeoy7uTV/NGk7HZxCcXtWhpTQpekwn41bJscmdI8yHYTbcK/7 0umpqkaHy4O4yUmq1uYX6ECcxH32oyvF8TIdEuZwZ8Wk63rroftbxj3y/hyP /xU6mBMrVy0aTasJMqRDMCtuvSivxxFGdFDf+2d1PwGR25APxnSwlMJdGvFt PtGUDpPceP5P2OWsdDM6sPDiPhA6Zp9jQYeIo3jeIsRvX/FNOnAJ4vXGwMLo htvo/rbhPvZ8mq/fjg41Yrg3+ZquLN2jg8AB3CPudcxtHnSYVcDttyl3XNCH DruVcYt/jJ/Z9IQOiiq4Z8YjXXie0kHDEp+/XPHVAvczOpTfwh3s4+fO+Rzt vw1uM5I7kf0lHZLscL+b1udeCaWDjAvuLuFDW2be0cHQC7fW7cGD1DQ6pL/C XZXzWp1USIfKGNw5uvPO8WQ6+BXhTvhtnPBwGe1nJ+6stKdsYSoMKGH5u+qy 25mW6X4MuLUTd479j6yiQAaY7Mad5tS9piGcAcckcEvODSa3v2XAO0ncsffH LpHfM2BhL26KkuOegRgGJOzDLbI4+2c4jgGX9+O+WvCgjvmRAfP/HO5OeD+W yIDImIMBmH38xI9z5TLgbQJuu1fnO/dVMwBScRu8dXTS6GKAfzpu1Y/hPFZM Bvhm4i6SjPlmP8aA+1m4lVJSjJ0nGWCZjdvZ5qDsgykGFBaX2LajzpTOWusx w4BL3/D671+KXd5zDCj/Z5n0wlTfvwwQLMXzNg4qnv4L6P5y8HqybJX2iyUG COXipk+dl3i1wgCrMjy/O6tp/jWRCTP/6mb39Ooj1jDBLA93tHzPh6i1TEgr x/O9f0z++8DGBIXveH1r3pB6PDsTfCrw+sdq8+dxm5hw8Qfuw10DTbHCTGCv xi0QxRI7uJ0JIUX4+HlTMaddokxY/ue+3adOm4sxwbIYdzHjukDsbiak1+Dj Y1O96APiTBCsxe1750OO2F4mRJXg+VtHSp6a7WcCsRT3+T8UwxhpJlj8s0w+ QWpAhgmJdfj4TZ6iSztlmbC3DK/PqCD1148wwf+fO9lMoz/IMaGGhOe/13rc oSowQb0cr797GX1y5zEm+NbjdS/tok3XTzBh4J8tBPsH3wMTjCvw/Jme5UzK SSZENOD1fdEivqKqTJj6Z25zZX1TNSacb8Q9IW4s+V6dCbH/3DLy8G//WSY8 CYlOxn7fZadF1ezQZIJWE15/41gQaXKRCfH//FCuzyb6Epp/jedN5xdP9Gsz QbMZr6sWbtu4Q48J0f8s4X2cYnyFCe6heJ5DzejLO0MmNPzzGLubN9mICa9a 8HwjKVJbxIQJlH/+GvR9t/F1Jsi04g7V7ZmJMmeC2z+L3TBUirJhQlIb7jSn Lve3/zGhuh33j+AOtsgnTGB24qZktAVGRDChqxv3/7wEjxY= "]]}, {Hue[0.37820393249936934`, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwt13c8Vl8cB3AZJSu7UkmbaCkpjU9RSlOhIUUiijISUjSUlmRV5KdEIcnO yM7O3jy2xzN4UmSVkd+9rn94vV+f7zn33O85916WGFsdN+Xm4uJyIH6Qv4N7 UuxKHx7babdMfUTzkuvOy9xSWXGS61FrcyhAv+w8huc5xTyX3AXFC0Yj68ps sP19pLyLpDZWVKTsFy67i7buPJPrkkY4ytRxyS/1Qqx7FbeNpDVOLJXeW1ry DjKtDZVXJe9gNUOr/k9hLMpmGqRckfSEv8liw7CUbEh2HD79LDsImVymE+nr q2CjHEDnY4Qj71bYg1YDGmTtnvaWW8VgR3rqOa/SdkiXVJ1ffDcGwj76x3c3 t0N4uUzdVe8Y3D4qnM7qacd4dXiG8JcYKKp/q5rL3wHaxvznB0djsNJszSSP egdeDHApF9yPxZ7iB868CR0QumZvn+Efh1m0Mp9Lnp0YtTk/GZmTgPfnXQ+L KnShcXluUk11AhRmP5ilvakLyfUrrcfpCXAq0qt6gC5c3/Gj/SDvF1SP1D2u 1utCH7/Dt549XzDBMREdudsF1lv3B/L5X/A65vyWMw1dqClNEnxfmAgtuRVF d50ZiL8jk1vckIg6ZcexWw8Z8N7ofGuAnYi+P+GtV7wYOOqv3qs+OwkXuf7F rP/AwHeT0rIOrSSYLI46o1bCQPZYp9fi4iR8/P3vm8E8JqIUROYFlCYjUV9z Fy2ciXk7ikQXtSWj4433Z404Jly1789+25eMfosZA0GpTJxyGB0NlkjB/av7 hFTLmODJY7ZEnE5B964bHyt/E7lRZshXRgrmpp69/W0rC9yvrNfRJr5iscXP t+EZLFhGKMobzEnFz/kSx73zWahPZ8q1yqUipzpov3UZC5FdBuKdGqlwPu0x b3YrCyeVtYa6H6eiUFetI2qcyEuXpP6VSsNhdwOjClU2TvJWa85fm47LUoLC AR/YeGJnfk8L6VAMWuY/9omNjK6J9Bva6bjRNRp1LI6N5XnyKjTbdJRWxPu1 ZrDx+4HLsoCkdKR5GR+5Vc+Gx6zVXIt2ZyA0bGZ12cxu5AvcTZHTzYTvNiUT 0XPdGHWSHtI2zYRk1bVLGy90Yw3n0/q79pngPxAnd9i8G77FdWEdfplwnv2z 1MS2G8buSi+DWzIhsydDY6VbNyZnWm713piFwBnOWaOfuhHwaK60ZHoWmsdN Czb1d0P+5y+9eXlZWFFkPWNisBuJOoUvFpZmoUFZ7VDGn25UyN6QWtGSBb+m JlUlrh7M/EKT3DyRhT5Bc+NEkR7YdgRKnNqRDb0Wg7anq3vAtc9ex2BvNvqX FZ/uXtODZ5FHfIwOZ+OTxyO7XRt6EO4wKX7pbDaKxAqjmlR70Cp8XtzJORvb VJjrC/b0QEttudh/6dkYDtq91elsD+rejmsH5WWDltLEum7UAxO+Ws/3pdkI 9JXPs7jQA5eKB6KfW7Jx5q3gOs1LPUi4yJqTMZGNfAWbL4l2PZDziRBp3/EN 3cs2rPZ40oMRznqh5RnfsE1q3Ot4XA++31WxrM3/BmedT7F1CT14M1etxK38 G4bCPqrpJfVgj4aGe3f7N6jqlsfuTuuB92s9oWieHOgHrNJpzOuBkpaTkJpW DnY9qFMWaiDuv83FknMsBz/TOkO30XpQbeda8p9+DrJSLyy/2NwDpyB390mL HPgpHDCObO9BwcgboTyPHOz4Vjj4j90D49AcIe2aHIQKZIXm/unB5u2FljNa clB10HrRx9EezK4qKYlj5AC0I8qPx3sQM1HrLjWSgxvPFupv5+JgQpct1DQ/ FwohPa+sZnHgxyMsfNEwF7Ts4uNiUhyUGZ0QvtWTi9v+dy7cXMOB1Hvz5/6/ cxFiKi1SspYDA5aTWNJoLhQD9Irmr+eg58pbqd8CeTD9E/A4UpmDmTfZi8wV 8/CmNr82WpUDvHBaq2uZh+rB5++Ud3Pg1uAeY2OXhxkTAsIn1YnrLXir/PxW HhatnN/lqEHMH5yz+bt7Hu4du9CTsJcDx2gh7Pqch41tLRyRAxzEFL05qvQz D9FyqzSPHudgRCi2Ums4D3Z5kU2HdDjYqZ2jY/YvDz8+uKzdr8tBSR3rZLBI Pvr9dy7ecoIDNn290bx1+TAeKoudOM2B3L9v1rzW+bh2avn7Zec58FJmeTX3 5yM31E377xUO8b24qFL5Nx+a/EIP468S46WYDXkzCjBhUSdlaUVc72/X4mix ApQeuH+gwZqDH5mdn+9uKIDux++2gdc42H+4tWilTQGuvZdKb3HkYDDj7JUF NwpgqPFC+vYNDt6ubxEVvVuAsX77f7JOHAxLNJ/861kA/k88bvo3OXhPa2QU xxTg+mb94ixnDrjMa2fY9BXgrL1P9aF7HEQ26n4w/VOARV3P7jYQPnmwZr8+ VyHePo/tNXblIGpt9XMN0UKs0HklaHef6O9QxSLp9YXYpuUd8dCNg+R7JVtT rQqh/zGr0P4JB9aBOTZ8vwqhnGck4ObFgTGsVMJGCvFZWufYCGGdDpm/+7mK MJh6z8nMm4PNK2zvuIsVQXrsocseHw7GIuWeS2wqArf6Ib9+X2K/05wjl9wo QnVv7EkZP2I/zylY59wtglaD/4QT4UtctRtNnxShuTg+ikb40B6l1PCAIlx6 /nPbK38OxEtoResyiuDw2lCDL4CDwCZV1g6e79jk/mQsMZADD2d6RJsg4Xpf k9lvOLiz+PnVu5Lf0Xx11bg+YeMLzKHcFd8RPDgrc4ywPMeX99D+76ji9y/e GMRBwmj/Ev1n38GlHBp9O5iD7/MjDeznFmNmTNNmn1AO1l0yVb+/uBhV8Yvm FBP2TZaV915VDK/AVcbcYRycO+k18Fm1GNGbrjtbER7wtX/COFkM559PIjTC OVgoujtZ168YS9VNOms+cnDXcDTQOKgYuSzeQd4IDphR8a7W4cWoC83w3kQ4 5vDKo+7JxZjNl3zTm/Cep4LMnIZiZLNq5ml94uDKzDqJjfNL0H3E1yg4koMq ved/dy0pweLgtPRiwls+7G87olCCxuaGpEHC3HtSIy5vLcE75xduez9z8PJu 0O7g0yX48HlPWCfhjPHLVmKvS6A580eSYDQHogOT33/JlMI36U+ObCwHqbaM iohlpbBdvuAnCF/8/b3OVKkU314PZBsRTut/0dm0oxT3LuPyO8LmfYqjBUal kLWQqpWN4yCr96RCUGgpAlX1iwXiObC4smPdmehSFOa9HFxJWLp3qYp0MjG/ n0ONOmHLH7273ItKUWq7IPUG4Xkc11OOP0phnbllSxdha3b0Q23lMmhe2OoR mcDBAvMXzwS3laHlfqx9LuF8lpNPvkYZVBmVcs2EF7L2vt2uV4Zufc80gS8c FDKaEuUdy3Bp/uFlpoTl6LOYXBllSBMYUp6TyEFli+GeWK1y8LvEqW5P4qD9 aZyFxvFyfE3vljtMuG8rn0+tfjlQntN6lrDIy4iOvxblcN0vQ3MhfOjIkIu6 Rzm+DMo3ZRAuzHiSUl1VjoCwhcaqyRw0WLa0mzaVQ/vF3IK9hFky6/n/0Mux z23ZLF3CMx1qTywcKkfsXtZ8a8LBc0Wd4gQr8JCj6htKuL1cf+7YmgrwWDUo CKcQ76OVvIp7lCvwOkvx8nzCfc6fdz7bXIENIYJPVxCeVOS6uBgVaNeNs9pB WPbRhwQN7Qp4OaqWWhA22NV3zN22AnJHbi3IIVwf88B9UVIF6pY295/9Snwf WlViF6ZWwHqwZ8tFwvpCzNoFmRVIe7bU8irhVjPNxTIFFVhhV/TKhXCX7Kw4 6foKLN0tOPsN4T73R/VzRiqQfSrEqZFw3Nct4yJjFajd/sy/nfA1NltOZLIC dyxMwliEhzW0LgvNqkRymrPnEOGJ0dkT/HMrUWOb9p9oKgcCl54u5VatxDvx rZkahEtebts3Y1slWHzabVqEn+VyLLhQCaV9iX1HCYvKHfryT7MSC4QnWGcI S9cL7R87UQktmS1K1wgv2+txZdC+Evu9XOTfEt6+xCuZmViJj343i3oJy5md vLI9tRJlHafifxPm+7xoqXdmJeKUr3qOEC7bEvF0R2ElHpzNWz4jjQMj7Zxz vo2VOBsVlyJB+P7tIV718UoMreyI3kzYPC815RVXFdYbzG9WI3xY8N7VXt4q BJnZT+wkLP1KpMFPuAoMzzly+wiHR6369Eu2ChcMvrFOEC5pOX0scHcVaHtN /ewIxyyTmzmwtwrmqY+XORJ+cYn5df+BKvRlXP9wk/C5Idvlg8erkDqb1+Me 4T4h95EDJlXwLn88+Jyw5PaMwD9uVbAoGV79kfDZ10t7dEqqILE7o7yW8Hji r2jDiiqkPb2v3ED4dXXadYuaKjj7ujynEa4TOjnDtbkKUlKaW9oIa99+Oi/u RxWuZb/XZBPWMBnUFBWuhvn1PcZ/CXfeyRZaKFaN3b2vro4RvhPoUbVKqhqz F/dfnyCcVid/DouqMdzddX1GOvF90Tp7/eqaalTcXLR9NmGFtfkhJYcJL63k zCVceMDnUsOxalRn/vg8n/BFM6N1XXrVGDn/zWIB4eCg0a9jZ6uxVDqPJkt4 ocS6qtVXqzHZsefhCsJz/rzieuxRDa6Sb0uVCQ9lXzq7t7waWlnRIfsJJw4f ig+rroblrUGBA4QdFdfPFmioho3Ww6sHCY/6DieUtRP39zN99ZF08vvsKnTq dzWOuNxw1CEsIBKYelmqBqvqFWzOEi5RvyNWOr8G8sXh784RfuZwwWydbA1O 8c0sNyQs2qEgMbiyhvi7/JacMWGphMTLzltqwNqx5e1FwnL6FfM9z9TARz9F 3Ipwp0e81W/DGsRGFUtaEw7JeZmna1KDZpfNkjaEV645azP/Sg0uG20QvEZY kaunMNilBlW6N2n2ZH9DeRy/vKuBwdfFvC6ED/7eXEdj1aA9QiPqCeGdGRVp 8j9qsL1pn8lTwspPLofY99XA2PH6PHfCMkvfWIv/rUFSrOHNZ4TZx/gEDwjU 4lHsb0VPwvdjq5GiVIs/W8a3vSD753xl5awNtfgVnFhH2kJrlrCeSi0uSHRY vSR8vEON1rejFo31LwJfkfcrFmwnf7QWs8/1Mv0Jp1lbf3xlU4uS4vBNbwjH bBfwZFyvxd/09cmkQ/jf2290qgU7zETtLeEnQfUa5fdqYRPfohZE+FTFztaZ vrUIunFNKZjc73XCEvaJtVhoNqP2A+G1vz7e0h2rhcOR99qRhJu9DtidmqyF sPfJj6Qfb+JYGPDUYUXVphmfCXfdUDpjIliHjGXXo0j780ZvtVtQh8zMPZNR hHllEoZ9ttXhTf33m7GE49J0f75CHcRE+QpJGxoOMQI06vD92kOJOMJf32+u DTlYB9oqi3DSVutS4uPP1IF9rrUonjBtT4Z19c069AnTf3wh/Ih1zrz+dh1K bpquTSSs8mTSsMm1Dj6hWlakPct3HaU/rcO5dzt+kd6rn7NmIKAOyzHBSiL7 Z1XYI55Wh8+60hkphN1eV5kcH6+DHr2NL53wCb3HPyK56tFReUSN9CrRXXaz +OoxP23TVdKFDz67pgnX49jvyzWkZ9s8Cl65uB7JAx9eZxB237ezfXR3PawP 356TRdiAe8hMT7Me9R/Ht5FWSv/0K/pAPVqc+cxJlyrPnzTRqcddgcwM0iKy g4vKTeohyu67mE3Ya/DjmZCH9ZDYdCjkG2HjaCP6xNN6nCgWLCKtfHmuxSnP eoTcNv9JuqrtvpOwfz34v0+o5hCWLDb0d4ioB8+/+HzSL99J1R8srcdjebnq XML/Hbl7fFC8AZ8XLInKJ5+f9p0c3rkNqL56r4B0jM24q9SCBsRahLaTzvN1 +LJ5WQPMSlTECwj/pF2Zd2NjA6yVHtqShpl+64ROA059spQvJPz9z1wHkVMN SPuqvJO07pPaOYsNGrAm/psOafPP2rt3mTQg4+9eF9KeA5rv79k14NjergrS nbc3Xp71ogExYRzLIsKWYv3c8/wbkL7D7zbp4eCoAPnABjiHzfUmLZivUKr1 gZi/2SOR9CYhufXuXxrQd/nKBOkHfkLDonUNEA7TcP1OWD6WcVdmbiN6Zs60 LSbPd+PpT9ILGtH60uU26XfcZTXiixuhGFfvTlpGN3GV4KpGvFmlEEZacMSt dGxzIzosTtBI/9wuP7/lRCOahedvKyEcYfqfeqN+I3LNojVJm3mIWtaea0Tf GcXjpNvb/mSUXmyEqVqFOemqe0UmGfaNMPrc4Ev6S+HlmLcvG3EleC6btG1/ a2PA60a86hX7TXqtjA6P35tG3FMYGCMdarHthGcosf7nV+aUEvYTERq/k9gI 8ctHVUjf0v28z7iuEaM3f90ird7+q3W5NA2DQxPjpJcucfJzkKEh/Og/3jLC M4x5j3+XpeGK5g8h0ln0eXlWq2jQdHu4kPQO1u5PX7fQoCZbpkZ6y08fB+0z NGwXKbhGet462Q0hhjQMLPVxIj1iFd4zdIEGfu2jd0kn9qedDbCk4XfRcw/S G4cYGkxnGm64a4aTXjuuKnoriAaZ7KgG0iI7vhWVvadh1ky7VtK9zodcl3yk YSRBsYt05KTRcH4sDeIpVr9IK/A8aRbLoSFkfD9fOeHlAs3hYQwa1qabrCU9 f96d3dWrm2DLt9GBdNw6MaHmtYS5pW6SPrQvuK5LuQk3+vpcSLvY51oMqzVh 7uOnbqQ7a/hfzj/YhP7Fx1+QjvTy6jG0aMKGq1tjSe/9uPSLuVUTko08Eki3 ZsXftrnWhNGUliTSYn21kq43m5AndzGDtP0RGYQ+bUKWqHQx6V2CIT4/PjWh 5o4InXTj0k3nhqKbcNiJzSBtq5Yn/y++CQvD89ikP1xipc9Ja0Jfm8FP0gKF imzlkiaIvlf/S7rmfsL2Gz+asGBfjXAFeR7/5TH41jTDZ5mPMunla6/sMt3Q DG379k2k289KBuSqNGPSRU6V9Kl0Y23Xnc3guvx6G+n9tya/cmk3o/uC1h7S q0e3eI7ZNmPhd29d0kyF9h59h2ZU73x8gnTw6Yd7v95sxtWvtqdIL0ipHXW8 34ycNjUD0kKOtqbDL5oRoPjiAuneoU9q/cnN+Lna0Ib0Rb3RX9HZRP3WUDvS rQn7P1z9TqxXvtmBdNk1xpwfTc14pyfnQjqmX5bB/NeMl4tqH5O+1uv1vHlP C5QbPd6Q1r55+KLt4RaUPWoIIq00e/YO/hMtqJCVDZla//I7PRvNWpDJcAsj rW9wde/Txy04JV4ZTVq1R2HhEu8WqCzKjSUt6cj4nfi6BU4dGfGkS30Mgjo/ teDoGtsk0ruKD4xtLWvBIbEHGaRHmdnhpm0t6FQvzyYdz731hFdfCwLecOeR Xqm2KpYt3gqlmXzFU/35yGP26mQrZCpe15L+vPjlqQCzVnwoa6knfeSl/IG3 Dq2IE+ShkfZ0Pbwm7FUrNq9Z2kq6ytpWNDqpFcL19A7SEudeDSTWt+L8WSMG ad2DaXUZI60ou+/PJv1yS0dK/tw2jPR5ckjLSCjeqTvZhkbI9JO2y+bq8nZq Q/BGn4Gp+7Wq23c0sA36gyuHp9YvG/lJMKsNys+W/SF9p+TunMLONqz6vGOU 9GvflxZyku34yvNrgvSAumV58+Z2RI+lcVUSXhjmmKp1sh1uS3R5SO8RfBCW 6NCOp0uv8ZG2tPLyWebXjmRt2VmkfasDb3smt0NFLJ6fNP8cuQvL/rSD8fCn AOlbB4I1E1U7oNL+W4i0HL+bYtytDswvqRMhnZN3STQquwPCyhvmkOb99ZVP kLsTq1xqRUnvnSc0ZqbeiQwOtxjpLzkZ/WsedcKtduWUV1jZsAdKOxEeuWvK ym5ev2Tm0GGjkiRIeldg7PBubTqyFuROma5CG4EuHaP5lN3KuP/uOEXHDKu8 KTfIvPq7XZ+OumzKCmaKo9sM6GBK5E/ZKT5zVO0ckZuPS5MumdQZ22pEx9kU yuIbPkyomNPBNTgx5VPGw5MbrAkvm5xyRNQTrg22dOhdKpqab2xUdsZ6OzqC 4igf2hc/Y509HdvGKL/x2ce91pGOMk2uuaT72pq41zjRIexBebeSNY/SLTqC ayh7O/LyKrrQwZIunhrflevHu/oOHYoGlDeLreFTuEdHURDlh2ez+eTv02HO njE1vuGj3sxVbnRkKHJPefVw98yVj+iwvUq5zEOcf7k7HWP9lG1WbZu91JMO sWs8U37y47a4eAwd8fKzphwcm7uAu4IO19MCUzY35vl8ooaOuZmU10qo7/zU QMd/SwWn7GXR4VZLoyNQh/Jgzp3yyWY6Ft2nfHKh3LzVbXTIJVD+apdppNtB x7Hmt1Pnd1HpuY8udDrOCAZN+c6Kf/3hDDp27xaaqqc7B6pVs+g4bUVZs267 60Q3HX/+oyz08Kbk8Z90VA1TrlL9+iH0Nx3NR4SnfM5ftfDoGB0hfyn3jCb0 /OHpgm+gyJRjPg3cPMzfBbFeyvYGysLBQl0YUJsz5caESr0SkS4cOk95u7DN m2HRLqg/pPzWVJQlJ9GFmkjK3BnR6w5KdSH6e8jU/Sjv+ZDyS7ULrT8+TPnC 99cavvpdiE8Lm/J59QGznQFdeGERMWXDrwfd2U1daDGNnLJ7Al/c2BIGTIc+ T/lrVGa9iDkD1yWjp2xseqzP7gkDKvcoCy6k8zdFMuDWRjnx8azndl8YeDlI 2WhEUUokg4Ey/pgpq6zd2aD/jYH/xCkLmGoHhOUzoLqQst2dxvHSQgYG5Si3 BRifG/zOQMgKygeSOJkypQxorqacUGW3ZHc5A3q/jh4m31eyPyfumVUy0D5A +fHsh13PqhmYbSWaMHVelotqJtQyUDNO5ed2+YfR6hlgOlD5RodPl1c1M+B7 hzJ/VPoau3YGpB9TjlvQGS/czYCfP2WDxzPVwvoZsP1IuXqojJYuxoRaG+UD xq9u1mxg4pqw2JTFu0MYtRuZkBWl3GgVc7RehYlsccpBw2kpDapMnJWibO5c tIy2lYmD77Sn1ruet+5Z0zYmHshQ+ciTzpHmHUyILKKcIfbrfCuY4IRT9W5+ Y8Vtu5kw/0T5yGL+zR0aTDxeTtVLhUoGde5lYnwl5WalJQJd+4h6Bcrv49fY MbSYKFekbKmm1so8yMS6tZQ3ZmvuZx9moj2Fmn90n05c91EmVNIofyszXMg5 xsRaFar+iZ6l2w8dJhxVKR9rduzr1WNCMoeqn3fhgf6vk0zo5FFu7/bK7TvN hHsB5XDrN2t/nyH6VUTZaiTCb+AsE6/Vqfk2uyRxDxkykbOH8j/eXMvh80yw NSnnP62oG7lA9LeKGv9MvGXXX1NiPTWUdf27I0bNiOvVUV4oNyw5fomJwAbK 9FDu2xMWTITTKEesmdP97woTUc2UbRMW6HBZMxHdSnnrNvn0GbZM2EZWylST +18Gq7V2TJR1UnmP0cklZ+yJ+hgqzxm4Wv3QkYkZLCr/z83tQYITExLd0/sX +aVb+DYTK3opc1V1HTZzZWJZP+VGk/FJnwdMtGZQ88WNSMRlPWRCcIjKnz5R NOl9zMTIMGWTRRrSMu5MfMil6nfE6BdqejDxbZTKpTVsna55MhE0TvlX7WOl IG8mbvyjXGj+rrXEl4nDXMem/G4s2fPvSyYWclN28qhQX+nPBIuHss4S9uDx ACY+81FWSpgMvR3IxMZq6vp8++aejnzLhOJsKm9tXCvY+I6JTgHKiZaa6Xzv mXglRPn55Fkr5VAmNEUo71rxrPppBJGLUf59IE2VEcVEvSTl4pbqbrFYJqyl Kb+35gTsjGeimE5d35mH54jFF2L8fCo/8VKGyy+JiR4mla9TUI7LTSH2eyGV 86dpmfSnMqEsS7njyHlp2QwmEhZT/trhWHggi4kNSyhbzgpXep/LhNxyyrJr 6j0nCpmYXEn5nqPK6ZhKJnyUKDNyfJZcoDHxYwPlSH3tuEIO8bxuo2zXL6Sx doKJ3Xspr0u2fLliJwu085R7XEq6F95moduecuOCDfOH3rAgc5tyYfKL/aUZ LKxwm+7frP1GKWUsHHhMOVlv1OFDKwsq7pQfvu0bDW5nwWPaJ7qZzkGdLLCn vWJjC9ebLhZ2PaM8eKvaNYDJwuZXx1ybyPOdXzTTn81C73TuLZr1+GUPC+oe lM/rJwr5/mDh1bTXv4987vWTBc60y1T9X7j/ZsHz+XQ/ix8EPBxmQdmT8jap W7IP/rBwd9oChrbv7o2yUDnthnDz5XfGWVjsRTns97kw538sCAdQ63u038g2 lIuN7Onc/M35HeXcbEh6U94/aMz/h5cN02nLHzCplpvFRuK0u4cuXrIVZEPP h3LEu0uTOXPY+D1tpb9XFc3msbHkBeUobbuTAkvY2PuSctykS7S2MhuX/Ch/ iXo865UGG0avp/fjrK9hiy4bG/+jnCb0NmnZRTbaAinvNHlPz7/KRsQbylmp H+dcdmDD8i3lu2aRH1JvslE0bXWJ6G3Cd9hYEUR56aWYmZvvsaEzbe7M2Mpz 99m4Pe1Oyfj/Hrqx8WnaOZcTzGIesbFfWyuFSb6PlLZuS3jCxox30+vpTRdJ dmdDYdo3o9Q7Uz3Y0J52slXBl0xPNhynvfF3hUGBLxv5046yo/GU+7EhHkw5 5EbvsdYgNsKm7efCFdQbzoZKCOU6PLjWH8HGqWlLzBDYNxTJxs1pa3/zkPkb xYawDrVeD1eJn+MxbKybdvEev2yueDb6TIh/tMjne+aiF7xf2Lg2nWsWvDPn T2LDd9quj1ZuF0oh+mVK1Ts+2/pkQTYbVdO+6n2oYXURG4cvUj79n62dViOx XjPKe0L9RM272RAyp3zPbFGXBYcNtxPU/JnywUlWvWwETXu8e+XTa7/Y+Dpt tU+fzjn0s2EzPd7Bcr3yzQE2ONN5wpovfLeH2AiZzn//3Np4b4SNtGmvi8mI dPtLnKeTVL2ljcadJ2PE+Ok8QrlQx2OCjQvTOWvg0CrvSaKf017+pXL0xYxu bLhE1Rvbnyjz5+mG1rTfqja9C+TrhuG0m/8YXn83qxt10+Nlvnbt/zC7G73T dt7cQhzVbjzTp9weV+vp79+NKwaU/wdmDfwG "]]}, {Hue[0.6142719099991583, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwt13k8FH8YB3A5K5KfO8qdCNFBujyFilSURBIqKfcRKZVIqRyFsJuSO5H7 vs/c933FrrXLLpEI5ajfzOz+w+v9+jzPfJ/5zuzsrOQNp4u3mJmYmEKQP+j/ uKkit9YXFzTSAgx/DG0+rmHLLFCZza8CTQmxnXcdd8CSsGfmG/7jMGSOI3I6 KsHRhFQ5L34DuP38bfFZh2NAoNVaufNbwkH5E+WVtucgK7CL2YXfGfbWZ9S1 Wl4DkdGBTkd+b5hPyjayPeQAbexmRQ78wbBkR7oeEPMIStlOOMiZBkMQc+qf OoHHkMwqKzkeHQxerpl30vwfwzPmuZcmCiHAp1xjfe+uFxz662uipRkKWUKG bg4S3pCw+GVZ2DkMkjRkj7NRfOAheVX1azMevkeHrg6efg53xok0r//eQZeZ QqL6o+dwmVQbdcj4Hbi7SnWZZz4HFeIbtgzSO8hPPPWESdgPJoale9/9iQRX ZWehELIfXOzWc3PaFQXKQu8t01xfAv/YuStBVTFAOZo2Zns9AEwFPY6IkmIA LyKZeSEgAKL1YnYkM8eC/a4FTua8ANidPz/2VSsWqm1uqlZwBMLxAJztWm0s FBi6b09JCQQ71bGHdk1xsPnX37ajE0FQ/crto253Amgl8iUeEAmGjRVR3v0L CWBAeGpeoRAM537V3bjFnwjRvH/klY8Fw4D5tl0+RolwoHS7TLlFMMzuL88o 7E+EyMrwlcj4YGT/Oap2ffsErH35J81kQ8Bl3/txNspnUJqvfOQqHAo6kg/0 5liTwahANNBdNhQkeIxzhmSS4cP29mbLA6HQNsPrm2GVDGJi+L1z+qGwO9lf 6go5GTzEa3//eh4KZHHP66njKdB3yEQ1ZSYULm+5QrhISoWgj1eTbFPfgtKa 2uljzGlwaeVkUUzBW2Cd5s/YJZUGHyf01quq30JOQ4fX2vU0uD57+VndwFvg eaYj9mksDcKqZJ2GWMKgceXgtT/EdHgweuGH9uUwEHMLmGl3yoQ9ayvHid/D QLCl67q4TyaMHUzBOS6FwRYZkT7H0ExI1DS6Rf0XBmvdn8u35GWCmKXD7Efe cBjaX/dGbyUTpFeqXUUPhkP4AtO++mdZ0GZpO+P0KBwC9XQ+CUZkgaBRUHTt s3B4Fv9GxDopC8hF4pSNQeHgaijGwtaUBTPsnBkmUeFgkHOkR3NrNtSc+9kv URYOXHfv3St/lw1XptWWnf6EA2tz2dSWL9lgPkxSSWeKgFUpNotrpdnwKLWJ 5RtHBEx1vT29NpoNnqO58+yCEdCwL0v4sEwOmBqHXo3aGwG+89PFeek5YH/I XmzyVgSsuFz/l1qTC1N+K7vKaiJgUOZrQU93LjCHqTxuaYiAwn5Z57XxXKD6 ceV3tEaA+7HvRD3WPNjAESFf2B8Bcxs9qqe080BAyNKFbToCJqMDn8vV5UG+ VOLUl604qLv445hBXx48/8Riw8ePgwS2i0seE3kQkBAt7CKMgxt2Qrfr2fPB oKDCdKskDkbV4nSsT+eDg57K68G9OOhpLeBMaMgHTT4vm7wLOMjxFvnaPJAP 1mFxLK+McBC6//GjBWo+sOkPrRtewYH+O80ZzU0FoLuH27TDEgdNVq1tY7oF cPFeWbSVEw6qVkkh4s0FsISfd9ocgIN0eW7h962FwC534GNZKQ6EjzXy7CAU wn7FX+zDFTjwNXi2KXquEKYswtLnqnFg4rGyEsdXBDbKMixsjThgqZ0YSblS BElLKvndPUhuWRFfTCmC0v82ugpP46D6rueHo8tF0Nj6cUP1DA6UXqiGl28s Br9qS5LVHA6Y07/4VSsUw57kXf0RizhIW8XZNLkUQ7VgrHbaPyTHOSsPrRcD r9H+B1m8eLBPUZAz21oCmq2s+sv8eOgvm5AYlSiBiffs1geF8JBKNuMlaZWA k/jRN59E8WC8T3eR9qoEeH9LndOUQfJWyZI/AqWgUnF488MDSM7afWrbnjKo bbysqXMBD/5ud57qQhmsPkg1nbyIh3LyetkDgzKQ5jl//eklPMjUyqkOuZaB J8fm66nGeJh/7iX9vqAM3u0OPNx5DQ+vOXYz7ThRDrzvvr22tsFDtUfFkXMX y8H+efKGRls8LE5e8nh8sxxskvcs77LHg1nDk9mR5+Wwu/5j4LAjHna/6v32 sakcbkbanRVxw0PdZp8iiUsVUJcydXj9MR5WPAUXDW5VwEPb7bkKT/CgNP1F xedeBQy0aaoYe+MhrLkvaQxfAc9Jy+cTn+LhRqBiRNxIBTDXrs+JvcDDP3b7 Q6H7K6GUvXQy6A0e3r8UEuQvq4S5YofLLz/iQW72h5FwbSX4btB6YxSNh3zD hvDtrZXg9v0fUSIGDx1iDwR2jlTCZbF5YlYsHtjzhvjV1ivhfllnS1kCHlzH ovhMjlVBSPcVNp8UPDCdvmdodrIKfp7b1Lr3Cx6CUs+/tTxXBaO7NeeIiD97 /OO1uVYF5MO5JofT8DC65Tqv5+MqkNRwEB3KwIPuYZn/PpRVQVMRKbIjFw99 0WsGMbVVwK4m338nDw9WbL3BCa1V8BeX8/kfYq+O5zxpI1VgGzwpLF+Ah1zr ya3l61VQ+c7mlV0RHiTepnATj1XD6z+3nbLK8LA8rcIlU14NLAovmC/X4qHJ R9W+t64asgR09ToQfxQ63OLXXg37r+gb69bhQVtLK5BGrIYgWn/twXo8hEYa cWWw1EDqHrIheyMeFHU9uQ7r1sCJfT+67FuQ8yd42U9fqIGr+ualPYi73Xxb PpjWAM7dEH+kFQ+eMYGB/+xqIIY/dh97Gx7qlz9y1b6ugYEp1iNv2pHr96mG y6CnBm7qCfS7duFB7WiD/YaRGri2N0a8GfGmrpaWbArSj1t9KtWNh8z13kCB 5RpYkTSLb0O8fonKNbztKxTsYfff3osHPMuWLdYWX6GG6NUX3I9HntOXtzya +gpiwSbBtGE8CCTcefNu/itYn9jJtfMbcn9Oev5XsPIVeR/xXrZAPOUQLTC/ uRYS31+U6kHM/pC6445CLaiods7kjeABwj33XLKvhbDfOx5bEvDgNxCY6eJW CxxSEa/fIm4Tjd735lEthA7+lq5DbBZXo9YUWAs244oEeSIe7mdwwfG0WngZ 7VkwjTiz8aO+4mwtHNASp14hIdeLK6tTd6kWZJgFKp4j1jCoMbz9txaUEj0U shC39E0ax3HXQdMe/wb2cTxQx1UshZXrQLgsUDkNscTfamdW5zoQ6YzymyTj IWTfZMi3n3VwbnNtiPAkHnkfs1bt/FMHJSlNR9URUwUmBmo31IOB/KkPxog1 /pDFM/6rh0My9g/DEX+vIKX57K0HmcC81i1UPOicG22UdakH0jSX8U/Ev8qv OYg+qIfRLsVILhoeolVGeHh86iH2E3zYhXiJ75vxn+B60PD6TDBDnDA0SGnO rIenNmJuXxEz3end4DJXDx+Eug1fTiHPr8FLibd+18P3npzmaMTGej06pkwN 0KIUwlmAOH1P9xstngYgLRpRyIjNFjt2CKo0QJ7qpa0a03gofNpyqMSpAVzs 8V8mEDtH1biw/WiAnaSeY/wzyP0GTqpJyw1Qhidv24XYcEzkjw5TI+h83l57 CLHaTlfvwP8aQVL+r7854tVUiTd8BxohfYiDlIjYr/RxquSDRpgu19qpOItc T3N55xqfRrA2tlA8itiGqXf/Lf9GkGtb2nQW8VltxZLP7xtBhu/UGTvEvC1D jcrljdCTMTaVhDhq+ODkMZYmIBn4sYr8QJ6vj8dTCJxNcNfcKX4XYm/xN44+ /E1Q0cYtror4xs2Jxa87m0CbNpKmj1huOoz1rE4T7El5st8Xce7KT0nToCa4 fYNzNxlx07ZUs3tCzZD23mb+zRwelG1uaT4TbwbtK3US7xCHFYrJhe5qhjzH WfU4xObGIQtpB5vBJdt9Vy7ihbB7/hTjZiDNSLD0I97Oc6LwEr4ZJj+eHRP+ iQcfi5WoGzHNsEhz/iqBeCI9x9f5czOs1niHySHOPCerH1jYDIrxomsHEWsH cE7UDDTDipjyrBFiB/Y+vv3bWsBVa873NeIuozd/jku2gOJ/vmfCEasn6hDO y7eAanYW0wfEzNolKbaHWiCGy/toMuIIn5gTcVdaIHOr1FI14vI1W6f/Ilsg p/lI6AJinoV/TT9EWuGeheyNM/N4KHGldKRIt0K0pHSrPmLr+aa+W4qtUPni u7wR4tKf4aThY61g5XmvyALxnTmFlXrLVpBgsj7ghrhyxlg+5lMr1NUZFkYi tnM4pnw1oxU83uQYRCMWnJFSFSxsBQ0HjpF4xPbfZ44HNiL9GzZ2pSIWnvY1 uf+9FQjeHSrliJ2pGS8M9rXBLNF9eBSx6J3wIM4jbVBStbeKhLhu0vNtnVYb fF/I+zCBePvkyeijRm0wZuijOou4gTKcL3e/DcpcmX6uIZYY55hgKm+D2KD0 ROEFPHSOWGhn6bbDU2WlZF3ExIBsO62L7ZB4psvmLOK5Q2xve03bIeCJpbQ+ Yu6IlLE/du3QdPy5zyXEZ88vemm+bgd12ZFpc8QN5f5F3V3tIDTU8sIV8YD9 CPHWcDtoWR4huCGeFFHZ+Hu8Heruxql4IGb36L28fbEdUpvwVQ8RxwnxeGZz dsC/1o6oZ+g87aZCq0odYLdl79lwxFRZVgXtfR0g2SZ2BofO9zhNI0itA6Zr aJrvEP9TYLIWhw5YvHJpZxRisZeJuVoGHSAfNpKegNjs+NyFQFekfzCCkI24 P/N54I6CDmhUt93Yghg/qpq1vaQDOgNTLVsRm3JN9IpWIPVCuXltiEdvnxIX qe+Asnrly52IyWIc2YL9HZDdVeDSh84T+LJ/63IHmAzbbyMizi5WX+Ne7QCJ mIcnxhDfpVIluP91gKDYV2sS4iUtXVsujk5QjhBNJiNeX9m0vlGoE3KW3m6h Id5sEyDFfLATZGYPXf2JuCXiyOkNRzohM6bvyjzioK/TdkzQCY8p3JcXEPNI nM37e6oTjpU7nV5ELNjPpbN6uRPIfJ7cfxBLn3zt8OteJ8TcfL6P6RfyvJcM KZzI74TO06RFLsQSt40djpZ0glUEZ/UWxGxpO6RCKzrB8aF4IDfiNvWUgGMN naC+Ki3Cg9jSoMY8bLATRLsUxPgQP3uyyKq51glpfZ+bhBHfqS0pwjF1wTb1 fx7bEJ/jfOo4w9oF5Z7h0iKIBXHcA/gtXRCZ6O8uivhz+q4vP8S6wPoaF5sY 4paRKxeiTnRBVblhnxTiTGkJ9oWTXWCS7msjjTjcZqJY50wX3PygtorafNFV 5tfFLmhckxXZiXiOK3D5jFUXqE+Wn9qFmP9oedRvP+R4md+vKSC+Fik1ZdjS Bfqxc+/3IV7L/5Fh0dEFJeSN/1BHdpe62/V0QZHx7uv7EfdxGW/w/dYFhmWJ UgcQGzwJEM7+3gXu30siVRFrWf06xbOlG7wLpa+rIyZ5V3Ft/68bHA4q5qP2 jnrdtUugG86K3958CHFpn5w57OgGK0mvTNRqutfcHZW6gfr0wsJhxPJ76uJb znXDQsoOo2OIG868tRm40A0bHHd8RG1921KZbNQNPpedJ1DHxawUr17rhr43 TO4aiLfzKXftduyGOQthf0C89TeO6dXrbhA3DQ0/gXixyubayfZuOEYYOnIS cf7S2Zyk7m5YWxG9h/q+gsqmzQPd4HqmIQP1SthSbhuxG+7In5M89Qv9fvbl MpnvBuN5r3XUm7mjSmwFeqAz/+F7HfT6aXr/17qtBxSFeltQB3ncvK0s1gM6 1lnrqHnG5Pl+yfaAn/PiNV3EArn5to/Ve8DmbKDwGfR+NO3YFny1B7zmb3vo ofv5Osdp3qIHBH2PxKKOr4movWTVAyZrSU2oZZWuuWxz6AFnR9XtZxErME01 xHn1QMn9G8Wo1T6x3M+L7YF41y/j5xDrzav1DU32wEk+x5/6iDXKO0rlvvcA W9gPbgPE+/xt4+/N9YBxkogiahGpj868f3rAcy76FmrqBTbOM5t7Ieq3SS/q Z1ndUKTYC9yOAUkX0P177CDLsbcXjomHV6K20+XYYqTaC4Ie1oOoL44dHpo7 1gvfb17ffBE93//i3OT0eyGr8pQN6lJn52ScSy8U8faLGqL3/9HNwRT3XhA7 JbYXdfzGhHv7PXtB3+zMKdT+Mf1a7U97YYptwAm1SYfGKHtYL9y1C6tEvai8 he9efi+wOtmYXEK850fyo0urveAgGnbLCPG3kDNuJv96gf8R9S7qVwem7cxY +uB1i8JT1OQHiletOPtAlFfsI+p3rBmH3ET7YIZtuAc1q0ju0tsjfdB+X+Lo ZcTZpZdmcdAHR5p9dFBbWCxS3mv1wa7A+EuoixPUeuP1+uBxVIk9aiflopyc q33g8V/Ge9RD2uXO3Q/74FC2+S/ULyfN7/Q/6YO9yZL/UKv6/7MY9u2DALGk TcaIg9uP648H9IEJZbcY6pOmNUoL7/tg6XrMKdSZTg1TvKV9kPKAGIraL7LL 6uJaH8i3yomaIN7Fc9yNg60f+b4bU0Dd8DzNt3RLP1hNOR5FvcnlZZyseD/k RiaboQ48rUFcOdEPsefn8agVy778yDjTD1LtCUmoW/dt+2dl2A8Ovx3zUHOL /drRbtUP9tvwHahDfiVfjX/RDxJiiqxX0PvNVsjOJLgfsgjjW1F3EZ55bnnX D2o6o6Ko+Zst3nmkIPnO+/tRR8QK9Ou19oOoSYI56g/nfS7+4h0AgfmhL6hr wzzy1KQHgG38aCnq2SEH4Qf7B+C9+etm1HDbdHTdcAAck0KpqO+kGZw4bjUA qy+5l1EHL5xKeOo2AEOkZ6ym6OfvyX5bjvABUOKZ34Gas06+VTdxAD6Fzsij PsAloRKYNwDZAZmqqJ/juZZ4+gbAhZdbD7VcFsVHRGgQ7g8uuGD9y36tq2qI pVOfop49Krdt5PIgUKPYQ1F3PW20Kr83CJ28XTGo8xpsM6MjBuFVbEgaajw3 15p3/iCYWF4rQf3oUtrpG32DsOvp51rUmsQfozKCQ2DIFzyEWn32rYfB1SH4 5VA8i3rP2kGeRzFDMO1g8xe1zOZvn5MoQ5BcaMN9FfE2Ye8T3buH4VzdSSHU xznj337/MgyTJ4QVUSO/vShsSt9gUNxpH+qZxS+HfxZ+g5CX9bqo786EvPmm PQLM3ZbnsP7mM6uH2kbgO/m7PmquZJbbOONRoIb7n0Qd7HtOKQk3Cq1Hv5ij 5jPHLeT3j8KLXrBAfUmvtK98GcnFn2KOUB8rqhMiwI06vdOoD2bc/dK0iwCn 2+9gHtjJHtV2kAAfvj7DLHe9PbwDCLDzaijmBx/wr7tOEwCfGY1Z6vC6f7ce Ac5ofcLc1H/9RY8+ARTqUjG7utf59hoS4PqhHMwifArefcYE8NOIvY+a0pDI tccM8YNKLM/0knj33JIA/pR0LH904P3OESsCfF9rxfLTUwLZB2wIcCShB/Oo EWfzuAsB5svHMLtVMZFDPQmQGD6LebPS0toJXwLkyq9ijsFPC/wMIIDnIw4d 1HbnreN0ggnQHLQFsxrr2J6YMALovOHDzFx8tWQZT4AQqQ0PULc69Z3WjyLA GCsHZvzOCz2fYpH9VNuJ1VsNN1v+TSSA3MpuzMohp2aMUghATlfBvHKq6kFa OgHKL6lhDs7ODzUrIICV2wnMsmKpXzgrCaBvehbzz25Z9ZtfCbBacAFz6avY r8UNBEjiMMb8ErZf4G1FzkfXDLPhYsSITScBOMV1sfnEvvxnW9VLgLCT5zFP WQYuCQ8RQLXMDqvPE+TwdR4lwH1bEyz3bvHZ2kAiQEK9O5ZHhkXYSfATYW17 BeYFTfv2b2pEKDVbx7w96X6JrjERDi3swe5fbc7nSfkeRNjkcwWzybGAHTMv kH53e8z2TiFvpfFEwLF5Yf65yrt37wciNBx4ivney7A2jRgiZOj7YS48bxR1 Mo4ISUYvMa/yC9qfTUDyy/6YNYb7Dht+IkJV+NUv2PyxuE2mn4kgxVExiX4+ /Ysjtd0zifA7tw5zWHfUk+BCInBua8PsTCkSDComQvVNR6xfb7k37VUpEa5+ 7MRy2U3z2n7lREgmumA5syj3t6eVRCDg72Iu1ji1+dFXIrCt38PscsNL3b2B CFwXPDHL+eVbO7YQ4Xj4Y8zE5Nmw2x1EmGn0xlxaslnRqosIL8yfYsa1ytZY 9hDB7IcvZleCpum1PiL4LE1g85z/af7zygARyE+omHezPHx5eYgIQQEvsXo2 AZy44TcixG3xp68nm5OvP0qEHYEB9PXU28+dJRJBwGcW68efmSbrkIhw2+s1 lruZcTw6SSbCJfufWG7gKM2nOUGE9BshWK7gDSkaVCJ8ag/FHFmfwb53jgjN 1/GYN26VuCn9mwjuFVGYKVFM2zduHANWShLmasWxnu9CYzB7PgvzA4NtLBOi Y5ATlINZxe3CXoL4GLRU5WHm8nNoGJYcA2p/PmYq7pXFgPQY2E0XYP6anLjU s3MMbO6JUNF5o0uqgjp3jUHbM1HMnq0jMm3yYxArWILVXyb8KWlSGIMNEqWY 9/0UMKxXGgOabBlmbpZ9UzXKY2CqUI55iv+8T+XeMbBQqsBcK2srXLZ/DDiS JLHjx6j7ZRSpjsGB3VVY/uhM3Kn8g2MgFi2N5RIb/RSyHyHn9+I45ppaG570 qjG4e8cIM+uPYjZOZhKcib6J+aQw1+ptTRLs3+GIOceBVCShRwKL806YJWsK 7w8akgDuOmMemJEeUDUhgfoGF8xvhN8cDDUjgX4g3VNp2rcrzUmwLXd5EH1/ OaW1EjFrSYKH8t+XriGOG8io236TBIuHf2P5usOtpTO3SLCcTs/tao7ksTiS oDtrBvOgMK9b6T0SnEiZxRys9bhb+CEJMqR+YD7tSN3n/oQEKXi641g+3oj3 IUFVF91/8Yahnb7I/FxzmE33bKr+95wEsifpzqsp/6n0kgTDemvYPCGOdk7R 70iwe2Uds8M24RmeLyTw9PuHuSG9dTukIfszuYD1y2j7nnXIIIGS4C/M3oPq j95nkeCJNt3DjrNfGnNIYOJKtxprwvByHgmKoukOfXeFU7aQBAktdM/u2Xrk UjGyf3/o1v361fZpKbJ/C0xD6PoJVzwjM8tJkGiwiOVMP5SbRitJUPmQbrNn lD9cNSRocduA1Rdsey9/pJYE8R30nDfD4IpNPQmcVuh21GZ/hWskgfI8vb5p sKSwtpkE5WeXsHynkwt1oZUE2u50RziPm7B3kaC/gm52V6NG4T4S/Nu4jLnc 9fUGqQHk+KvM2PE87tYfUhgiQbUBPVdxY3I98I0EEm50U90OpRwbJcGrWyz0 9T12BNyYIIHxLN2pnhvsX8ySYM2FFbOTd6NS518ShNmyYd7nF/JDZOs41Buw Yy4KkbybrjwO16Y5MB+Pylo6YTAOHnqbMLvsOrJJKngcJl05McdlfRVl7hgH wuYtmJnLM5T1BMhgeJ4b882mSK0wUzLgD27FfIO93ojmSYaFQLqvay7c1nhP hqN9dBMb1TfrRpMhdpRuywteqYbxZCBM0C0hELtukkiGH1OM+oGa8+ZJZFic pTvmw0T0zWQyXOawnZdF+y03/bzzhQy6nHRLyChqOqaRYUAyveol2j95/u3d DDL8x0fPY764kO9nkYEqyOh3ClP1yiGDqRK9XmJ/gZ9vHhnE9jL6lwb7XxaQ Ya8Uo794Te51ERnGdjL6vcQ935aQwV+e4Q+qLOXNZOT7nW6LYr1A6jAZgizo ZjZNKtclkkHTmu6EP8w/U8hk6LKn+16jiv/wBBnyn9LXP/3OXJqLRoYTd+m5 sE1g6dFpMgi8oudT6sVGDjNkUAukW+W+S7HyEhmc8HTfK5ATn/9Lhl0JdOu8 uFwotYECV8Lox9tm/OyCIQsFlHB0T8lmT/myUeDPO7pLlwi+uRwUKP9Ad1Dd lh2UTRTwjKbbPOJIvgAXBYZyGetb2+if4qbAqwK6N6jhqPd4KPAyiV7fxVbr k8RLAfkUxvn3zosM8FPAoYJe754okbtRiAKXM+j5Kffz5w5to0DgV3pO4095 ErmDAqGNdAfmsmWvSlLgcRvd8VkkbbaTFDCfp7s4vaKf+w4FGnkyMHP7bySf eECBlR1037h1Yc7NnwLSu+nm6na/x/0WOR9luvOPR64lvUf2S5XuAI/Uil/R FGBRp9syvfzpiQQKRB+mu7nxNPn2JwrQjtCtRuk4+fozBfYcozuGyTQpN4UC Lhp0c24f3zicSgH+jRulaxeQ63XQ3nZDBgX0N9FNvLjYvCuLAjKa9Ho9Ry+l 8znI9eCk5/mvON645VEgSJsxX+W2i1VFyPqnGPMtKwhwl1NAXZfuzbcM3ifV USDvHN25XW6SJ9opwHyR7o3pZUpuRAqImdJt9or9cNJPCuCu033mBu5hz94J yLxP96EjcmUbXCeg6hXdDXdiR1vCJoA7hO7LESJM+IIJ0MTRLabUH7zeMAH/ 3tFNqXkreXNoAp5/oFtn6zxNYHwCcqPoTjU1yG6YnoD+j3Sbez8RlJqbAKto unk+pXs+/DUBPximqdcpfl6agPx0l4O4ZeT9pnlktOf3BKww/N58MXjD6gRo ZNDt9pNLa8/6BDxhWLnQPmKnxiRsz6d7yquFtv3JJPwppruhMFyntXwSvMrp Tpo3T3r8dxJEqujOS3/FgdOigkIN3TW2ubczX1Ih+SvdTIqHjuT6UyGbYY2Z Mu7CQCqUMVzoVJ9XEUyFdoaXVM6+qgmlQj/D++c7zOrDqEBk2DnHSKU5ggo0 htPdhlja8VSYlh7IkCLgYVrVor8rkgqrjFxueTyl7wMVWGrpti684zX0kQqc DMc/mLkwGkMFAYaJh113kuKosINhsbWl35QEKuxkGO/FFDPzmQqqDPfB87s/ U6igwTDfhs2nF1OpcIphg+rXIn/SEcvQ53vtyze7lkkFS/JC6yaed9Csja9i yqHCJUa+kX1HOGseFZwZue9L2aNcRVR4wnCl7petPCVUuMuo/7tZZZyvjAqe DB9pyc0XqqCCD8P3gw75i1ZR4RXD+efLr4nXUCGE4YWtWnula6mAY9gx9OzA 7kYqJDKs/QnPc4eG7NdOukWKyTqJm2hwk+H1x6wiFE4aPKHQ5yOekJmW4abB c4Zr2LRLrXhoyO9puj813gxK4KVBCMOvgnzNyfw0iGDY/kK8sowQDT4wvH+Q 1BkvSoNPDAtGMceP70DqGeuvWEq5SUvQIJLhERnNkzelaBDDcCX1umC8DA1K GP3xqT6TJFkaJDNyP+fYQil5GmQwbHOg6tUNBRrkMHz2N9E0TokGhQwrlzIp kpRp0M04Hq+3xLrkPhpUM/IBDsvoWDUaNDNsJUQYjwEajDB8evhvLvEEDX4z +ndHi/lJaNPAiH2heX86Hrbc1DC2PEUDpgl6PidrLhejQwM2hrunHv8hnKHB Jobz06OaxM/RwJrRH+la9t5CnwZ2DD9WG7GPvkADQUZ9utug1wd3GlxkmJjd G/zuHQ2eMfw/hEIc3g== "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesOrigin->{0, 0}, BaseStyle->{FontSize -> 15}, Frame->True, FrameLabel->{ FormBox["\"Vd\"", TraditionalForm], FormBox["\"Id/W, mA/micron\"", TraditionalForm]}, GridLines->Automatic, PlotLabel->FormBox[ "\"Ballistic AlN/GaN HEMT, 300K, tAlN=4nm\"", TraditionalForm], PlotRange->{{0, 0.8}, {0, 8}}, PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Automatic}]], "Output", CellChangeTimes->{3.487474845521246*^9, 3.487474964488237*^9, 3.4874753089801207`*^9, 3.4874755711213827`*^9, 3.487476540733489*^9, 3.4874766243250217`*^9, 3.487476987015334*^9, 3.487478479194899*^9, 3.487478695287354*^9, 3.5549914405406313`*^9, 3.554991513712219*^9, 3.557261560569418*^9, 3.559309553858127*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"vinjGaN", "[", RowBox[{"VG_", ",", "VT_", ",", "tAlN_", ",", "T_"}], "]"}], ":=", RowBox[{ FractionBox[ RowBox[{"IsatGaNbyW", "[", RowBox[{"VG", ",", "VT", ",", "tAlN", ",", "T"}], "]"}], RowBox[{ RowBox[{"CAlN", "[", "tAlN", "]"}], "*", RowBox[{"(", RowBox[{"VG", "-", "VT"}], ")"}]}]], "*", SuperscriptBox["10", "2"]}]}], " ", RowBox[{"(*", " ", RowBox[{"cm", "/", "s"}], " ", "*)"}]}], "\[IndentingNewLine]", RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{"vinjGaN", "[", RowBox[{"VG", ",", "0", ",", "4", ",", "300"}], "]"}], "}"}], ",", RowBox[{"{", RowBox[{"VG", ",", "0", ",", "2.0"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"PlotRange", "\[Rule]", "All"}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{ "PlotLabel", "\[Rule]", "\"\\""}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}]}], "]"}]}], "Input"], Cell[BoxData[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwVjnk41HkcxylFqxxdGnYqRa1ydCpRH58oSiojqUVkMyOVXOXODF+lJBa1 QqV02SnjLO1Mt8i4NhL1jBnHrIgMuc9f9o/383pez+uft7b7aYbHNDk5Odup /c/dHu0fXnV4bPtz7ka9r31MVLDQ9JHQLMF2q8m43CgT199KSc+nHQAz0/f3 tORYaFNZn3eDdgyeBrKD7Wez0PHY0PNEWgBsdo5TqdRhYaPRBYs4GgFVQ6HV VwcWZizYd/4SLRk2SnnZeUUs5Cjlr7xIuwue3bl2IWxPPHT4Nq+ntwCqZzjk KW7xQmWK42y1+CXsq/drLmk8gbp23e1vY4thfPjLg+XhpzCwygRS+stAKcZ6 TpX5adQoUBfLy1cDV8a1cPXzwSctFhXVZjXQ5sRoa7D3xTdeN7QOd32E40ON tXqGfjiwYqvq41P1cKZt6cOzg344bYSrpqX7BdZeOPw+rtwfjSm3J/bZIqiX Cx1zuRKAFWRDVckqCTC923jOu87gkoTOkazuJtAou3folepZ7BySiOvWtMDm +IR3j4rP4t1vfKHKlVbwdTpRtp8Eogr9gUwqlUJdaZKpqlkQXj5eyMzQaQPf bPPGzNYgHDTnSj0jvsLk75+rfK4GY8C64oKFb9uBSjzj8WlTCEqyi2M/aH+D Zw2SvVrSEBzz+pimF9IJ535MKD+6GIqrUXGSye+CmkHbmYu0w9DqjjYrV6Mb HGu0j9LfhGEg3XVZs7MMRrb599x2CEf9LgfletseaA01X8pvDcd5qj1KxaM9 kP5AZXhN6DlUeJnGW57eCydfX5HRZ0bgiQ38z7NsfoCEU6SmnxqB3F3uGS8G f4DQIWEydj4bBzo11dqu9YGFKwTqHWRjob3V9GTLftipdlDdLJ2NEdbRtwra +mG9B/8xV8RG7cbdDZnRA5DU35czoMnBLZtIMm3dIMRc3/9fqgsHnRdXj8jX DsLBKG95WSoHB4RxLT6cIVhiI1Q8L+JgisKRAIbOMHybvUt3cFEkzhMX3plW PAwd5eeUw+wjcUY454CJ7wgw+dELDBIjUS7rCK9l7igYMSKbhssj0S+VFzf3 zSioWt9c+2VWFD5fHaOk7j0GfPqzSvGOKFTf7acfqTIO3VnuK03Co1Bk8G9t sGAcTrO6xIlFUZhzE3SkRybAhB/d5yqLQheesTp9cgIaRFqlsToE2dG3OaK/ J+FTZKnlHReCj9vpaSp7KJBxnxKnRIIxN6LdxHspKPXvebsjieAxxnfdbDsK Csf6ho2SCf4qEOTYOlLAjnKzVLhG8FK8U8lldwp8OvrcHl0n6Gl8vfeXYArc m1fkjWYQXEbmWyvep4CvXPI8nkdwcnPYnPqHFMQLGoqCcgh+/t5ac59Lgb2n JOtoLsEEx3yXnbkU7CmpPLU+nyC1iuEfLaCgSYcR/ukJQdGH+JvTaykQNcwX aL4gWHR+6I/aOgrqNlELp78kmGzqqpfZQMEKYS+rc8pt7hkWbBdP9bj+Tv5r gv8EVZZxOii4ej8pzPkdwWsGG+PtuijQeNpywbKEoG9L+gFtGQXMSYuL+qUE f9tzUvKqf+qP4Xbv8fcEFeQ/3k0YouBhcrOdtIxgU6Gpl9soBb4GKasrhAQF XplGayYoaDZmjeWXE/xrifIARVEw1r3vdVoFwZ/RdXQJ "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesOrigin->{0, 1.2*^7}, BaseStyle->{FontSize -> 15}, Frame->True, FrameLabel->{ FormBox["\"Vg\"", TraditionalForm], FormBox["\"vinj(cm/s)\"", TraditionalForm]}, GridLines->Automatic, PlotLabel->FormBox[ "\"Ballistic AlN/GaN HEMT, 300K, tAlN=4nm\"", TraditionalForm], PlotRange->{All, All}, PlotRangeClipping->True, PlotRangePadding->{Automatic, Automatic}]], "Output", CellChangeTimes->{3.487474845521246*^9, 3.487474964488237*^9, 3.4874753089801207`*^9, 3.4874755711213827`*^9, 3.487476540733489*^9, 3.4874766243250217`*^9, 3.487476987015334*^9, 3.487478479194899*^9, 3.487478695287354*^9, 3.5549914405406313`*^9, 3.554991513712219*^9, 3.55726156092235*^9, 3.5593095747022667`*^9}] }, Open ]], Cell["\<\ [2] Time Independent Perturbation Theory\ \>", "Section", CellChangeTimes->{{3.558880162123597*^9, 3.558880176788707*^9}, { 3.5614713141646137`*^9, 3.561471323495611*^9}, {3.561471552581688*^9, 3.561471553314472*^9}}], Cell[CellGroupData[{ Cell[TextData[StyleBox["1) Chapter 14, Herb Kroemer's QM Text & Related \ Simulations", "Subtitle"]], "Subsubtitle", CellChangeTimes->{{3.492861069259028*^9, 3.492861088522004*^9}}], Cell["14.3) Simple 2-state Degenerate perturbation theory", "Subsubtitle", CellChangeTimes->{{3.492863387548832*^9, 3.4928633981154327`*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"h", "=", RowBox[{ FractionBox["6.63", RowBox[{"2", "*", "\[Pi]"}]], "*", SuperscriptBox["10", RowBox[{"-", "34"}]]}]}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{"Reduced", " ", RowBox[{"Planck", "'"}], "s", " ", "constant"}], ",", " ", RowBox[{"J", ".", "s"}]}], " ", "*)"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "=", RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "19"}]]}]}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{"Electron", " ", "Charge"}], ",", " ", "Coulomb"}], " ", "*)"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"me", "=", RowBox[{"9.1", "*", SuperscriptBox["10", RowBox[{"-", "31"}]]}]}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{"Free", " ", "electron", " ", "mass"}], ",", " ", "kg"}], " ", "*)"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"E0", "[", "k_", "]"}], "=", FractionBox[ RowBox[{ SuperscriptBox["h", "2"], "*", SuperscriptBox[ RowBox[{"(", RowBox[{"k", "*", SuperscriptBox["10", "10"]}], ")"}], "2"]}], RowBox[{"2", "*", "me", "*", "q"}]]}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{"in", " ", "eV"}], ",", " ", RowBox[{"k", " ", "is", " ", "in", " ", RowBox[{"1", "/", "m"}]}], ",", " ", RowBox[{"of", " ", "the", " ", "order", " ", "of", " ", "2", RowBox[{"\[Pi]", "/", "a"}]}], ",", " ", RowBox[{"a", " ", "is", " ", RowBox[{"in", " ", "~", "angstroms"}]}]}], " ", "*)"}], ";"}], "\[IndentingNewLine]", RowBox[{"Plot", "[", RowBox[{ RowBox[{"E0", "[", "k", "]"}], ",", RowBox[{"{", RowBox[{"k", ",", RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}]}], "]"}]}], "Input", CellChangeTimes->{{3.492860146253565*^9, 3.492860147143314*^9}, { 3.492860220136598*^9, 3.492860274442319*^9}, {3.492860325235713*^9, 3.4928603283956203`*^9}, {3.492861171855748*^9, 3.492861332025774*^9}, { 3.4928614144527073`*^9, 3.4928615278305693`*^9}, {3.4928624109944477`*^9, 3.4928624198421373`*^9}, {3.4928634103667917`*^9, 3.492863421142714*^9}, 3.492863550302842*^9, {3.493518816848771*^9, 3.4935188197652197`*^9}, { 3.524211871764771*^9, 3.5242118725397577`*^9}, 3.5242244324709663`*^9, { 3.524387013852339*^9, 3.524387015694379*^9}, {3.5249960006819353`*^9, 3.524996002032401*^9}, {3.559309660601816*^9, 3.559309673328208*^9}}], Cell[BoxData[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJw12Pc/1X38+HFRWSUpMrIz45iXEJ5vKhURyggZDbqskJyk7Gwue8/IKitk exnHJntvMhI6RkJxPt/v7fb5/PT4Fx63O/ej5zpPycnIyBiOkZH9/+KAaZVE IqHgyKyIzhgc9nyf13//gIT4Fe+QSYTgsKISCf7tXyQ08IqbGOuNwyQFNR4t /SAhyyxDPSt7HHblrM941wgJuYxTKnKr4TBsYbMjvpCE5LM0XowcimI6ft0f pUxJ6J8uX++nFqIYvsfH1rLuCJ3TKZSkUhDBBgdpVxvMD5EoEz9hqF0IY69/ fv7Kxb/IC3+yty5BACuzJpw4M3WAfrdRraWH8mFmwRLEMa99JHsulPrAnhfb i3D1R7CH9Pzyt0rCuLEMummWuLldZKCh3uB0kxNLUpNwHAj4heInRjIFy9kw LxvzV0K3d1DmhyiGpWhmzJUiD++4voVYieIOtywZMXOPnkvDOZvorH2mcVU6 AxZduxiXZEVEp6XIdWdY6LGqGcFTn3g20PtD9YY+LlqMlx5TuZ/yA9GxdFWL tp/EPgv7W80vrKDfNCEXMzzJsZnmYi4ZmSXkIyWJ1bkcwqJItCT6soAWmuUX yGR/w1m3XBncsTlUL22/5626Cb5fBNvof8+ireXh6r8Sm3Cwkf1ge20WEa3m KzzZN2HeNOtNxegs0p9dNi3aIcJn5YxGlaJZ1Ov/yTwtgwg6J5I19U1nkV3v RelOCiIIsHB3k7nOoA4nSaG4hHUQkfkp8mF7Et3dIvf/Rf0dLHDu7pVTk0gh GZmwfFuBVP4z/d2tk6hft2z1Qd0KMFwQw+8mTiIyojqPxIsV+P3bruHm9Ulk 3MZHLzu9DI2VG7qrUROIizp4KbtyCQwUN9zEZMZReweP2xnfbxDxj1vfNa5x dPbysb/tj79BpyjdJQOacUQezyyWrvwNlDhw7R7TY2g5eav0w+EC8JJsz/X7 jqEi9XtAiV+Ajfr1bKeRUaRxpVVT5Pk8eF9f7618NYJyNV0MjpxmofHW2l3p xyNIdWcIpvVmgUzjx9cCjREUO6QwMCY7C290v3dl8IygthidvzcPZsDZYrEt pGsYyVMetFHRzcAz/6l6c65hRKXBubQKU3Cnq7uIum0Qadk0iUl0j0Fgb5eY z+dB9OoD7bHJ2DFoG+wsOEoaRPR6z4TrHo3Bjan2T9sOgyiC3fSd4P4oKG00 50yxDaKuGyrG0YKjIE5fl1b8fACJ/ZkO6QkfBsb7BWEPLvSj7H0HspaQAfjM H1R1g6Ifnfs8Z4B/NABa+5bfJH72ofy19QmDKwMQmMItS9PahwxWJsw/zfXD 0UrUTJVzH8rcP20bLdsPS29dcReHe9F5nw6P5z97we5ueFytUA8qsVe76kfe DTk7amvRx3oQuY1a5E55F8zHH8fsxr6iD9beWKNtF+h9wy9zBHxFy/i0BLfx TgAXExmPlW5kQPDVcK3oAPqMy4Mq2V1oVeR4gY9vG3zebT7TdqkD9Sg0Phix IkBo3vtGpf12NPuYEZ0RIIC1ifvLsu529PTvkHnlQhNcapGdeO/cjlo9U03N TJogJvpj1tu2NrQ6dU/h0KARXkuHK0rZtKKiCeXXjo/rQW/FlpiLtaIfLDZf 6vjrQSpJLYOLsRXJRlKa7Q0iWKM4Tk1X14IyD3a/RC/VgcmA8+DKmRakaMMs YHe+FlQcja1TSgjIdvwpfUxCJXDwy3Ew+hOQ3LtnMnpilfBnjLEvyJiA1hlU R/YIFVCq3CPjcoKAKEbCAxa3yoH/rAr5ff0mtHHMpsj4wRegKRKIp/7TgBrn hSkbtUrgw8RiyHefOtSS9qG4r/8jjL9hSk2WqkPj+PBWI/gIdBw3i7TnaxHz A85K+/w8cDbL6a+EWnRenlvsamguqC5aXQg8qEbnnWstdB5lw8rGzzRh+0qE G9Y/Hng/Ay6GcX2e5qhE23efDDaMvQctCe2miO4KtDDA4OFj9h4qXnxePBCu QKoHulZ5jukQsOck3Ln4BV3y+n5+UycVhMkPSqyNSpG3reDW1cY4MMkQbuak KUUvsrxOUh7FQsR1o+GBihJUtc3Vv6wQCwe+NXtXmUqQWqfQf6tN0dBJ6654 qq8YudjZpO3sRgBZfqFmvXsx4lRbtrNVjwBpzVlTJ1wxYpbP2vnzPhySwpS9 JoOKEJ0+kc/QKAxGhalCH4QUoNM01iAzHwSY7b9FDav5qPLkey3vmkDIKezo F7qVjxhEzHv/JAWAi3TIhQPyT6iLiGd7bu8HrEoM6QmvcpHeI8pZE3Nv8PJ4 0UQ+nIOeZbo/pbT1gh+Ng4tWUjlI8IzHgwk3T6i5GSt8dSMLGdZKstJaucND 7YulE48zUXKn0Y2W4Vewtv1L7iUhA7EEyV03MMDDm5geRMeXgexD/W62LL6E pAmvTuWldJRj5mQkc+kFiLgZa0+opiN/sXM2skMOUM0lM+KUnYYwFR5Ppgh7 KO3sb77bl4KcLHgcuk1sYJDet88rIhkd8MyXFXNawbau3FTZvSQkbulFobln CZKzqTtsw/Go2PdJZQHxMWjz3SO7GxuHDsyzuF/QPwJ7q5OnvAxi0Q6hLeLn TTMo3LHhXRmPQofXTDi5/z6Ar3JcYmxJkYhVdknGal8PNtwG5DUfRqDEq2Jm vPz34TTBV9WTIxy5acol3vHSBgMGp8xn6D/kM0fV28mmCbFJ49VflUPQwHXu kOnw2zDMrzwgTQhEyy3Vtn0WN+B8cfZqgqo/qrMcdchMUIZ7V+nIj7W/Q5Wa G5KFhgoQ0ezEYqnujdxpxduHFGWg9+6EeHe3B+o64ZxVMy0OHKXeYRZpb5Ca q0d062tBSGzTQpIf8IjOgt0mpoQLmKfYN45yHVFn7Lv0zp7zcHlhSC7moTVS LWk8PWJyEvhP2cfiLM2Rn6ostyTzlpLHoOAgW5MGmtvDVw6+7FASOTNldUJU Gv6ce2I4ox2nNLzplUq/ZwAqOz3ZxanzSsS7AlvPHS0gRCEvwY71SMk1UrXD Wtoevl4efeZjdgaO3FwSU8VeQl+E0vT3XlbwsPpkMyD8GojkZ3VuO10CCr0Z RUp+dwi5Qnst5Y8INHEF+CXTe0Hq9sk5OXcp8Inhsb8S6gMk/+DlJ0pyoHqq xqCP1g/WjJj+0aoGoPTSVbYOCAAJmf5vh6+vQdvvDaETlMEg/jCxXwp/EwJt /RlSfULh1/ulhdv96pC1Gfb2omcY1FMYnuJS1QJLS2GLL0cRYB9j5WwRqgu3 ePCG3opRMOV8vqXYxQAEp5o0td5EQ56Fu4BtlBGs6jy8srofC7LyXWdYRcyh 43Te5XLZeJC8zTuRSvYYPrbtcvrgE2B6xrBwau0J2CiFUXH8SgL1TGtHz1P/ gsb+5N9VqRSg7b9uvgzWgCsV2ix3TIU3fkcGJ4JsYS9qbk1wLw2qCAHF0tIO UEnjOtT4MgOGd+aIK6nOkCbKOFDIkwlv58Pa/si+Al+twt6knkyIuH++imLW Be7HLHQ6C2UBY0vc6pb+WyBy32kUnsoBqZ+dWDbeC0auL6ELgbnQif917sQb b6iz9Kg9fiUPklSonR76+UBQfmnFdNhHWEj5OX742Rf45dgLI64XwEXH8muH D4PglHH5J/fNAsCfknITSwiGbTftPJuUQqD9HnfDeCoEzOYbdXjfFIFdaXit jkIY4AR/axwOFUNkQzzmeiwS2ktMrxcHlILQ2bQ3t6XiQaFZpElgthRYiWLH rlAnQNHwvnKKTBkIE6W70ucTIGY/EoIWyiDuXso/P1OT4Am0yT9VLIfle7/z pHnSgNQhLsGyWQlNjSoWtqyZ4Dh5WPjfzSpgr5Yy1kzPhKX1DtzJlCqgum76 a13oA3TRPxXZVqsGb0qLs/9iWZCgFy/QnVkDArqSRE2vHPhn/hiHpwGCc7Qt t8Ye5AOuSn9TPBfBW2Y/5y+b+cAfkU+Y3UcQnCkSzxxUALTpn/5J06iHFFm+ WuvGQvirZTBJ2qiH24JLKIu7GKaKCoWQRCOMcu7jSS0lMJ5keO6CYSM0Jh6W MXKWwrD/iUM7r0Y40nOy28CXwlczo16OgUZ4HlShuXy5DOroKfFuTk0gu5bY tZv0BVLtTQiK5QSwCvlaG5xRCUnG1AXRMwQIONp930FZBXG3SmPXKZthvyCc vNOmCsK4aKyTDZqhv5td4pxcNXj0lp093G8GG4pw9YbxGjAXP21ao9AKXNmb 8mrc9cBLrN6Xb2wH0WI2Ldr+JnjTfc1nZ70d0uzmgkMZCTCc10lXwNIBX9Qi yH0eECDw6QQvt0MHEEzK4prnCUAcP9Cg5OqEJ7tk9hkHzVDXLPd+4G0XtCzk d7RDGxgmlqvZyPUAVbmJeANnN5S+giG+pz0Qccs/MMihG+j0Wk1nwnqgZi+J va2pGxroR5x0Vnpgq9RvI/bfr3D+muvdJPVeWEx6dDWiqgdcKxJcvA56Ac8Y W78n2we3M8a6NQ36oY4z1ESUbRCI7wosmm37IXmmiFVXbRDinnmTrnr3w4Sv /nyJyyCsiIpKCBX0Az5IPIppbBD8KzyiKI4PwCXbs172CUPQ1i1gVFE4AHcj Qn2dBUbg5t7LFW7KIfj+2Fmy02ocbmgwUPwqGwE2hqNA9c5ZCDWn3txvHwGc kuPTkuVZGH1JNnM0NQIOI24SUsfnwCplo4rq5Cjgtc1TXivOQejPDseLeqMQ /1i9U7B4DkbDveev7Y6CHFmpA3nyPFgN7zREyIzDFOsIMe///fx/piMe4uWT UDv0pKI3fQV81xRgqWsSopMzkthbV8DN5f1h4vwkRJJ8cn3XVsAu0vY1Jd0U 7IeLKeZf+Q6arRRO00+mwIHIe+dOz3egExO3DGaYBqaoAKp+ih8QeuSvsWI7 AyLOt/788VyHVk3201oMc9Cio/btyb+bsM7N6NafsABua+KXnu3uwkuny+b/ MS1BeyxGvs93CCOT9DoWbSvw+Ii2eNyAHDNzUVimvPMDxG/m6oqonMSaLl8J bDqxAbvfL5VNr9Fg/NQ1K5m3iDDoe5niZOEZjL3G+sYJ/034Jnt5q9qYASM7 IM91nN+Cvzme5s81GbHf2rUmzXw7UDVr+NsSY8YmpE3Z+Hx+gadkeUlQDhtm r09/lmdyFyatNTF/WU6MJeqbwXH2PeC+lrbva8KNFRilZW+/2of1xXeGS+a8 mL6i+6222gN4rkzdE2zMhxWb2PLI//0DzOmBny49FcD2aK5RVOoeAs9XWKgs FcJ0+q7KsMcdQZPO46yZX5cxmqu0DTXJR8DkRzkoQCaCNWSOqxtnHEFZstqi A40IJv7KxTyx4Ai+OeR/puUUweg4y4NZmo9gu2xxT/eWCNZuI7nAuHUEfZ+4 pG4kimAYlVAY3R0SZOjWm4SqiGJ7DnusBdok+DqAkZ3TEMUKJ1o/aOiTQFXa 7F28vijGUWhRHfyIBPxJrvKfbESxv7qZSzQuJIim5NNaiRHFyjM4FSmzSCCj oSJU/UMUszv9szXrIwnuEIuOm+yKYvz4Oh3VYhJ8flnXRH4Mh0WpPXz2roYE zwS+rGkz4TDHzYRIigES+PMzr55UxmHCRlYcGaMkYJp8O1+hjsPmCHK5KtMk IL7wqrPRw2FacaN1nt9JEKX2jHvcGodRkefc5v5JgocBt3MinXEYssYP1u+Q wDGvneGuJw5zHlI1NTsgwUj+itmpYBz2vx4C/+ch/wPJfaOS "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesOrigin->{0, 0}, BaseStyle->{FontSize -> 15}, Frame->True, FrameLabel->{ FormBox[ "\"k (\\!\\(\\*SuperscriptBox[\\(10\\), \\(10\\)]\\)/m)\"", TraditionalForm], FormBox["\"Energy (eV)\"", TraditionalForm]}, GridLines->Automatic, PlotRange->{{-2, 2}, {0., 15.294521887620952`}}, PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}]], "Output", CellChangeTimes->{ 3.524387018705596*^9, 3.5243880701258297`*^9, 3.524996006134479*^9, 3.524997707724983*^9, 3.52536599541684*^9, 3.525425238554484*^9, 3.5254255584640923`*^9, 3.525425969301238*^9, 3.5254277287820663`*^9, 3.526831965501059*^9, 3.528447290701754*^9, 3.559309373905458*^9, 3.559309578057695*^9, {3.5593096465594263`*^9, 3.5593096738189096`*^9}, 3.559484433828124*^9, 3.559913577038908*^9, 3.560076899775548*^9, 3.569348105161273*^9, 3.56958842709405*^9, 3.569588620017756*^9, 3.569762211267212*^9, 3.570554744155511*^9, 3.570797772364242*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"Hkk", "[", RowBox[{"n_", ",", "m_", ",", "L_"}], "]"}], "=", RowBox[{ FractionBox["1", "L"], "*", RowBox[{ SubsuperscriptBox["\[Integral]", "0", "L"], RowBox[{ RowBox[{"Exp", "[", RowBox[{"\[ImaginaryI]", "*", FractionBox[ RowBox[{"2", "\[Pi]"}], "L"], "*", RowBox[{"(", RowBox[{"n", "-", "m"}], ")"}], "*", "x"}], "]"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}]}]], "Input", CellChangeTimes->{{3.559483582916155*^9, 3.559483624628974*^9}, { 3.569588429825272*^9, 3.5695885736274137`*^9}}], Cell[BoxData[ RowBox[{"-", FractionBox[ RowBox[{"\[ImaginaryI]", " ", RowBox[{"(", RowBox[{"1", "-", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "2"}], " ", "\[ImaginaryI]", " ", RowBox[{"(", RowBox[{"m", "-", "n"}], ")"}], " ", "\[Pi]"}]]}], ")"}]}], RowBox[{"2", " ", RowBox[{"(", RowBox[{"m", "-", "n"}], ")"}], " ", "\[Pi]"}]]}]], "Output", CellChangeTimes->{ 3.559483625505885*^9, 3.5693481082326097`*^9, {3.569588482046213*^9, 3.569588544259273*^9}, 3.569588626215218*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"G", "=", "2"}], ";"}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{ SuperscriptBox["10", "10"], " ", RowBox[{"1", "/", "m"}]}], ",", " ", RowBox[{"reciprocal", " ", "lattice", " ", "vector"}]}], " ", "*)"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"F", "=", RowBox[{"E0", "[", RowBox[{"G", "/", "2"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Eprime", "[", RowBox[{"k_", ",", "G_"}], "]"}], "=", RowBox[{"E0", "[", RowBox[{"k", "-", FractionBox["G", "2"]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Epos", "[", RowBox[{"k_", ",", "G_", ",", "UG_"}], "]"}], "=", RowBox[{"F", "+", RowBox[{"Eprime", "[", RowBox[{"k", ",", "G"}], "]"}], "+", SqrtBox[ RowBox[{ RowBox[{"4", "*", "F", "*", RowBox[{"Eprime", "[", RowBox[{"k", ",", "G"}], "]"}]}], "+", SuperscriptBox[ RowBox[{"(", "UG", ")"}], "2"]}]]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Eneg", "[", RowBox[{"k_", ",", "G_", ",", "UG_"}], "]"}], "=", RowBox[{"F", "+", RowBox[{"Eprime", "[", RowBox[{"k", ",", "G"}], "]"}], "-", SqrtBox[ RowBox[{ RowBox[{"4", "*", "F", "*", RowBox[{"Eprime", "[", RowBox[{"k", ",", "G"}], "]"}]}], "+", SuperscriptBox[ RowBox[{"(", "UG", ")"}], "2"]}]]}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ RowBox[{"UnitStep", "[", RowBox[{"k", "-", "1"}], "]"}], "*", RowBox[{"Epos", "[", RowBox[{"k", ",", "2", ",", "UG"}], "]"}]}], "+", RowBox[{ RowBox[{"UnitStep", "[", RowBox[{ RowBox[{"-", "k"}], "+", "1"}], "]"}], "*", RowBox[{"Eneg", "[", RowBox[{"k", ",", "2", ",", "UG"}], "]"}]}]}], ",", RowBox[{"E0", "[", "k", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", "0.1", ",", "1.5"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "10"}], "}"}]}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"UG", ",", "0", ",", "2"}], "}"}]}], "]"}]}], "Input", CellChangeTimes->{{3.492862021926733*^9, 3.492862366242612*^9}, { 3.4928624455975*^9, 3.492862470998375*^9}, {3.492862965943407*^9, 3.492862986333193*^9}, {3.492863021815831*^9, 3.492863149658161*^9}, { 3.4928631918845997`*^9, 3.4928632651964006`*^9}, {3.4928635265648003`*^9, 3.4928635302267017`*^9}, {3.492864549626988*^9, 3.492864645634274*^9}, { 3.49286468089325*^9, 3.492864694715438*^9}, {3.524211894255597*^9, 3.524211937042554*^9}, {3.5242615738184233`*^9, 3.524261584032875*^9}, { 3.524996152765874*^9, 3.524996152851891*^9}, {3.5593096917750273`*^9, 3.559309746500492*^9}}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`UG$$ = 1.425, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`UG$$], 0, 2}}, Typeset`size$$ = {360., {122., 128.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`UG$8232$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`UG$$ = 0}, "ControllerVariables" :> { Hold[$CellContext`UG$$, $CellContext`UG$8232$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot[{UnitStep[$CellContext`k - 1] $CellContext`Epos[$CellContext`k, 2, $CellContext`UG$$] + UnitStep[-$CellContext`k + 1] $CellContext`Eneg[$CellContext`k, 2, $CellContext`UG$$], $CellContext`E0[$CellContext`k]}, {$CellContext`k, 0.1, 1.5}, Frame -> True, FrameLabel -> { "k (\!\(\*SuperscriptBox[\(10\), \(10\)]\)/m)", "Energy (eV)"}, GridLines -> Automatic, PlotStyle -> Thick, PlotRange -> {-1, 10}, BaseStyle -> {FontSize -> 15}], "Specifications" :> {{$CellContext`UG$$, 0, 2}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{403., {165., 171.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{{3.492862322146282*^9, 3.492862334959539*^9}, 3.49286236924343*^9, {3.492862457399811*^9, 3.492862482816287*^9}, 3.492862987592106*^9, {3.4928630326042*^9, 3.492863052604498*^9}, { 3.492863084567862*^9, 3.4928631499795523`*^9}, 3.492863229370824*^9, { 3.492863260098879*^9, 3.492863265624202*^9}, 3.492863532670083*^9, 3.4928645645181417`*^9, {3.49286459976952*^9, 3.492864646095175*^9}, 3.492864695352476*^9, 3.4946718644345093`*^9, 3.4946722430860653`*^9, 3.494672312089712*^9, 3.4998754278645763`*^9, 3.5236000381401*^9, 3.524211719824396*^9, 3.524211896206583*^9, 3.524211938576515*^9, 3.5242615852161293`*^9, 3.524387027150423*^9, 3.5243880767262278`*^9, 3.524996153312749*^9, 3.524997718644145*^9, 3.525366002460544*^9, 3.525425242141893*^9, 3.525425976086526*^9, 3.5254277317782507`*^9, 3.52683197460221*^9, {3.5593096864556923`*^9, 3.559309747238797*^9}, 3.5594844477792377`*^9, 3.5599136176110973`*^9, 3.5600769051097107`*^9, 3.569348111735079*^9, 3.5695886310090103`*^9, 3.5697622155726357`*^9, 3.570554749175735*^9, 3.570562858645791*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["14.4) Higher order interactions", "Subsubtitle", CellChangeTimes->{{3.492861791225871*^9, 3.492861798545197*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ RowBox[{"2", "x2", " ", "matrix"}], ",", " ", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "G"}], "/", RowBox[{"2", " ", "<->", " ", RowBox[{"+", "G"}]}]}], "/", "2"}], " ", "interaction"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"m22", "[", RowBox[{"F1_", ",", "UG_"}], "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"F1", ",", RowBox[{"-", "UG"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "UG"}], ",", "F1"}], "}"}]}], "}"}]}], "\[IndentingNewLine]", RowBox[{"MatrixForm", "[", RowBox[{"m22", "[", RowBox[{"F1", ",", "UG"}], "]"}], "]"}], "\[IndentingNewLine]", RowBox[{"Eigenvalues", "[", RowBox[{"m22", "[", RowBox[{"F1", ",", "UG"}], "]"}], "]"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Eigenvalues", "[", RowBox[{"m22", "[", RowBox[{"4.0", ",", "UG"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"UG", ",", "0", ",", "1"}], "}"}]}], "]"}]}]}]], "Input", CellChangeTimes->{{3.52439106603046*^9, 3.524391138746468*^9}, { 3.52439119604587*^9, 3.524391198236755*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"F1", ",", RowBox[{"-", "UG"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "UG"}], ",", "F1"}], "}"}]}], "}"}]], "Output", CellChangeTimes->{3.5243911417134027`*^9, 3.559309786693857*^9, 3.559484657018948*^9, 3.5599136231469*^9, 3.560076908596633*^9, 3.569348121280264*^9, 3.56958864455634*^9, 3.5705547534214*^9}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"F1", RowBox[{"-", "UG"}]}, { RowBox[{"-", "UG"}], "F1"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{3.5243911417134027`*^9, 3.559309786693857*^9, 3.559484657018948*^9, 3.5599136231469*^9, 3.560076908596633*^9, 3.569348121280264*^9, 3.56958864455634*^9, 3.570554753423765*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"F1", "-", "UG"}], ",", RowBox[{"F1", "+", "UG"}]}], "}"}]], "Output", CellChangeTimes->{3.5243911417134027`*^9, 3.559309786693857*^9, 3.559484657018948*^9, 3.5599136231469*^9, 3.560076908596633*^9, 3.569348121280264*^9, 3.56958864455634*^9, 3.570554753477921*^9}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`UG$$ = 0, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`UG$$], 0, 1}}, Typeset`size$$ = {161., {3., 8.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`UG$2975$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`UG$$ = 0}, "ControllerVariables" :> { Hold[$CellContext`UG$$, $CellContext`UG$2975$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Eigenvalues[ $CellContext`m22[4., $CellContext`UG$$]], "Specifications" :> {{$CellContext`UG$$, 0, 1}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{253., {46., 52.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{3.5243911417134027`*^9, 3.559309786693857*^9, 3.559484657018948*^9, 3.5599136231469*^9, 3.560076908596633*^9, 3.569348121280264*^9, 3.56958864455634*^9, 3.570554753558054*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ RowBox[{"4", "x4", " ", "matrix"}], ",", " ", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "3"}], RowBox[{ RowBox[{"G", "/", RowBox[{"2", " ", "<->", " ", RowBox[{"-", "G"}]}]}], "/", "2"}]}], " ", "<->", " ", RowBox[{"+", "G"}]}], "/", RowBox[{"2", " ", "<->", " ", RowBox[{"+", "3"}]}]}], RowBox[{"G", "/", "2"}], " ", "interaction"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"m44", "[", RowBox[{"F1_", ",", "UG_"}], "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"9", "*", "F1"}], ",", RowBox[{"-", "UG"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "UG"}], ",", "F1", ",", RowBox[{"-", "UG"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"-", "UG"}], ",", "F1", ",", RowBox[{"-", "UG"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"-", "UG"}], ",", RowBox[{"9", "*", "F1"}]}], "}"}]}], "}"}]}], "\[IndentingNewLine]", RowBox[{"MatrixForm", "[", RowBox[{"m44", "[", RowBox[{"F1", ",", "UG"}], "]"}], "]"}], "\[IndentingNewLine]", RowBox[{"Eigenvalues", "[", RowBox[{"m44", "[", RowBox[{"F1", ",", "UG"}], "]"}], "]"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Eigenvalues", "[", RowBox[{"m44", "[", RowBox[{"4.0", ",", "UG"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"UG", ",", "0", ",", "1"}], "}"}]}], "]"}]}]}]], "Input", CellChangeTimes->{{3.492828734057878*^9, 3.492828837590001*^9}, { 3.492861742772832*^9, 3.4928617629302893`*^9}, {3.494672056630246*^9, 3.494672065332055*^9}, {3.494672258224374*^9, 3.494672258978039*^9}, { 3.494672345571515*^9, 3.494672350794056*^9}, {3.52439062093482*^9, 3.524390675289542*^9}, {3.524390718722568*^9, 3.52439080642278*^9}, { 3.524390858357388*^9, 3.524390858965186*^9}, 3.524390920163322*^9, 3.524390953789555*^9, {3.524391174845538*^9, 3.524391220652676*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"9", " ", "F1"}], ",", RowBox[{"-", "UG"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "UG"}], ",", "F1", ",", RowBox[{"-", "UG"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"-", "UG"}], ",", "F1", ",", RowBox[{"-", "UG"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"-", "UG"}], ",", RowBox[{"9", " ", "F1"}]}], "}"}]}], "}"}]], "Output", CellChangeTimes->{ 3.492828847001396*^9, 3.4946718693931417`*^9, 3.494672065979311*^9, { 3.494672248571203*^9, 3.494672260516962*^9}, 3.494672317806672*^9, 3.494672352175301*^9, 3.499875450678155*^9, 3.5242616388471107`*^9, 3.5243907417296543`*^9, 3.5243908084501257`*^9, 3.524390859710136*^9, 3.524390920611207*^9, 3.524390954487323*^9, 3.559309799367729*^9, 3.559484717662277*^9, 3.5599136258508244`*^9, 3.560076911495915*^9, 3.56934812361016*^9, 3.569588651922546*^9, 3.570554755032872*^9}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { RowBox[{"9", " ", "F1"}], RowBox[{"-", "UG"}], "0", "0"}, { RowBox[{"-", "UG"}], "F1", RowBox[{"-", "UG"}], "0"}, {"0", RowBox[{"-", "UG"}], "F1", RowBox[{"-", "UG"}]}, {"0", "0", RowBox[{"-", "UG"}], RowBox[{"9", " ", "F1"}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{ 3.492828847001396*^9, 3.4946718693931417`*^9, 3.494672065979311*^9, { 3.494672248571203*^9, 3.494672260516962*^9}, 3.494672317806672*^9, 3.494672352175301*^9, 3.499875450678155*^9, 3.5242616388471107`*^9, 3.5243907417296543`*^9, 3.5243908084501257`*^9, 3.524390859710136*^9, 3.524390920611207*^9, 3.524390954487323*^9, 3.559309799367729*^9, 3.559484717662277*^9, 3.5599136258508244`*^9, 3.560076911495915*^9, 3.56934812361016*^9, 3.569588651922546*^9, 3.570554755035042*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"10", " ", "F1"}], "+", "UG", "-", SqrtBox[ RowBox[{ RowBox[{"64", " ", SuperscriptBox["F1", "2"]}], "-", RowBox[{"16", " ", "F1", " ", "UG"}], "+", RowBox[{"5", " ", SuperscriptBox["UG", "2"]}]}]]}], ")"}]}], ",", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"10", " ", "F1"}], "+", "UG", "+", SqrtBox[ RowBox[{ RowBox[{"64", " ", SuperscriptBox["F1", "2"]}], "-", RowBox[{"16", " ", "F1", " ", "UG"}], "+", RowBox[{"5", " ", SuperscriptBox["UG", "2"]}]}]]}], ")"}]}], ",", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"10", " ", "F1"}], "-", "UG", "-", SqrtBox[ RowBox[{ RowBox[{"64", " ", SuperscriptBox["F1", "2"]}], "+", RowBox[{"16", " ", "F1", " ", "UG"}], "+", RowBox[{"5", " ", SuperscriptBox["UG", "2"]}]}]]}], ")"}]}], ",", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"10", " ", "F1"}], "-", "UG", "+", SqrtBox[ RowBox[{ RowBox[{"64", " ", SuperscriptBox["F1", "2"]}], "+", RowBox[{"16", " ", "F1", " ", "UG"}], "+", RowBox[{"5", " ", SuperscriptBox["UG", "2"]}]}]]}], ")"}]}]}], "}"}]], "Output", CellChangeTimes->{ 3.492828847001396*^9, 3.4946718693931417`*^9, 3.494672065979311*^9, { 3.494672248571203*^9, 3.494672260516962*^9}, 3.494672317806672*^9, 3.494672352175301*^9, 3.499875450678155*^9, 3.5242616388471107`*^9, 3.5243907417296543`*^9, 3.5243908084501257`*^9, 3.524390859710136*^9, 3.524390920611207*^9, 3.524390954487323*^9, 3.559309799367729*^9, 3.559484717662277*^9, 3.5599136258508244`*^9, 3.560076911495915*^9, 3.56934812361016*^9, 3.569588651922546*^9, 3.570554755093791*^9}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`UG$$ = 0, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`UG$$], 0, 1}}, Typeset`size$$ = {161., {3., 8.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`UG$3001$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`UG$$ = 0}, "ControllerVariables" :> { Hold[$CellContext`UG$$, $CellContext`UG$3001$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Eigenvalues[ $CellContext`m44[4., $CellContext`UG$$]], "Specifications" :> {{$CellContext`UG$$, 0, 1}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{253., {46., 52.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{ 3.492828847001396*^9, 3.4946718693931417`*^9, 3.494672065979311*^9, { 3.494672248571203*^9, 3.494672260516962*^9}, 3.494672317806672*^9, 3.494672352175301*^9, 3.499875450678155*^9, 3.5242616388471107`*^9, 3.5243907417296543`*^9, 3.5243908084501257`*^9, 3.524390859710136*^9, 3.524390920611207*^9, 3.524390954487323*^9, 3.559309799367729*^9, 3.559484717662277*^9, 3.5599136258508244`*^9, 3.560076911495915*^9, 3.56934812361016*^9, 3.569588651922546*^9, 3.570554755186062*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[StyleBox["2) Chapter 15, Herb Kroemer's QM Text & Related \ Simulations", "Subtitle"]], "Subsubtitle", CellChangeTimes->{{3.492861069259028*^9, 3.4928611014194098`*^9}}], Cell["\<\ 15.2.2) Non-degenerate perturbation theory on 1D free electrons\ \>", "Subsubtitle", CellChangeTimes->{{3.493033188297213*^9, 3.4930332216946583`*^9}, { 3.524588347646823*^9, 3.524588347852538*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ RowBox[{"Brilloiun", "-", RowBox[{ "Wigner", " ", "perturbation", " ", "model", " ", "for", " ", "1", "D", " ", "electrons", " ", "in", " ", "W", RowBox[{"(", "x", ")"}]}]}], "=", RowBox[{ RowBox[{"-", "2"}], "*", "UG", "*", RowBox[{"Cos", "[", "Gx", "]"}]}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{"Solve", "[", RowBox[{ RowBox[{ RowBox[{"x", "-", RowBox[{"E0", "[", "k", "]"}], "-", RowBox[{"2", "*", SuperscriptBox["UG", "2"], "*", FractionBox[ RowBox[{"x", "-", RowBox[{"E0", "[", "k", "]"}], "-", RowBox[{"4", "*", "F"}]}], RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"x", "-", RowBox[{"E0", "[", "k", "]"}], "-", RowBox[{"4", "*", "F"}]}], ")"}], "2"], "-", RowBox[{"16", "*", RowBox[{"E0", "[", "k", "]"}], "*", "F"}]}]]}]}], "\[Equal]", "0"}], ",", "x"}], "]"}], ";"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{"Solve", "[", RowBox[{ RowBox[{ RowBox[{"x", "-", "A", "-", RowBox[{"2", "*", SuperscriptBox["UG", "2"], "*", FractionBox[ RowBox[{"x", "-", "A", "-", RowBox[{"4", "*", "B"}]}], RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"x", "-", "A", "-", RowBox[{"4", "*", "B"}]}], ")"}], "2"], "-", RowBox[{"16", "*", "A", "*", "B"}]}]]}]}], "\[Equal]", "0"}], ",", "x"}], "]"}], ";"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Esol1", "[", RowBox[{"A_", ",", "B_", ",", "UG_"}], "]"}], "=", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Solve", "[", RowBox[{ RowBox[{ RowBox[{"x", "-", "A", "-", RowBox[{"2", "*", SuperscriptBox["UG", "2"], "*", FractionBox[ RowBox[{"x", "-", "A", "-", RowBox[{"4", "*", "B"}]}], RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"x", "-", "A", "-", RowBox[{"4", "*", "B"}]}], ")"}], "2"], "-", RowBox[{"16", "*", "A", "*", "B"}]}]]}]}], "\[Equal]", "0"}], ",", "x"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], "[", RowBox[{"[", "2", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Esol2", "[", RowBox[{"A_", ",", "B_", ",", "UG_"}], "]"}], "=", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Solve", "[", RowBox[{ RowBox[{ RowBox[{"x", "-", "A", "-", RowBox[{"2", "*", SuperscriptBox["UG", "2"], "*", FractionBox[ RowBox[{"x", "-", "A", "-", RowBox[{"4", "*", "B"}]}], RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"x", "-", "A", "-", RowBox[{"4", "*", "B"}]}], ")"}], "2"], "-", RowBox[{"16", "*", "A", "*", "B"}]}]]}]}], "\[Equal]", "0"}], ",", "x"}], "]"}], "[", RowBox[{"[", "2", "]"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], "[", RowBox[{"[", "2", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Esol3", "[", RowBox[{"A_", ",", "B_", ",", "UG_"}], "]"}], "=", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Solve", "[", RowBox[{ RowBox[{ RowBox[{"x", "-", "A", "-", RowBox[{"2", "*", SuperscriptBox["UG", "2"], "*", FractionBox[ RowBox[{"x", "-", "A", "-", RowBox[{"4", "*", "B"}]}], RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"x", "-", "A", "-", RowBox[{"4", "*", "B"}]}], ")"}], "2"], "-", RowBox[{"16", "*", "A", "*", "B"}]}]]}]}], "\[Equal]", "0"}], ",", "x"}], "]"}], "[", RowBox[{"[", "3", "]"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], "[", RowBox[{"[", "2", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Ebw1", "[", RowBox[{"k_", ",", "UG_"}], "]"}], "=", RowBox[{"Esol1", "[", RowBox[{ RowBox[{"E0", "[", "k", "]"}], ",", "F", ",", "UG"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Ebw2", "[", RowBox[{"k_", ",", "UG_"}], "]"}], "=", RowBox[{"Esol2", "[", RowBox[{ RowBox[{"E0", "[", "k", "]"}], ",", "F", ",", "UG"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Ebw3", "[", RowBox[{"k_", ",", "UG_"}], "]"}], "=", RowBox[{"Esol3", "[", RowBox[{ RowBox[{"E0", "[", "k", "]"}], ",", "F", ",", "UG"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"E0", "[", "k", "]"}], ",", RowBox[{"Ebw1", "[", RowBox[{"k", ",", "UG"}], "]"}], ",", RowBox[{"Ebw2", "[", RowBox[{"k", ",", "UG"}], "]"}], ",", RowBox[{"Ebw3", "[", RowBox[{"k", ",", "UG"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", RowBox[{"-", "1.5"}], ",", "1.5"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"-", "2"}], ",", "20"}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "20"}], "}"}]}], ",", RowBox[{"AspectRatio", "\[Rule]", "1.5"}]}], "]"}], ",", RowBox[{"{", RowBox[{"UG", ",", "0", ",", "2"}], "}"}]}], "]"}]}]}]], "Input", CellChangeTimes->{{3.492859966286974*^9, 3.492860011689217*^9}, { 3.49286028631623*^9, 3.492860393325412*^9}, {3.493033108970579*^9, 3.493033141286716*^9}, {3.4930335265309553`*^9, 3.49303355131336*^9}, { 3.493033896905757*^9, 3.493034217141308*^9}, {3.493034251535763*^9, 3.493034358046301*^9}, {3.4930344041767807`*^9, 3.493034435015909*^9}, { 3.493034990461965*^9, 3.493034990635481*^9}, {3.49303504275112*^9, 3.493035081430706*^9}, {3.493041620213056*^9, 3.493041648357946*^9}, 3.4930416784122143`*^9, {3.5242120432887697`*^9, 3.5242120522607183`*^9}, { 3.5242617117524757`*^9, 3.524261744195541*^9}, {3.524387141283868*^9, 3.5243871509392023`*^9}, {3.524996167597094*^9, 3.524996167706318*^9}}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`UG$$ = 0., Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`UG$$], 0, 2}}, Typeset`size$$ = {302., {211., 221.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`UG$3054$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`UG$$ = 0}, "ControllerVariables" :> { Hold[$CellContext`UG$$, $CellContext`UG$3054$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot[{ $CellContext`E0[$CellContext`k], $CellContext`Ebw1[$CellContext`k, $CellContext`UG$$], $CellContext`Ebw2[$CellContext`k, $CellContext`UG$$], $CellContext`Ebw3[$CellContext`k, $CellContext`UG$$]}, \ {$CellContext`k, -1.5, 1.5}, Frame -> True, FrameLabel -> { "k (\!\(\*SuperscriptBox[\(10\), \(10\)]\)/m)", "Energy (eV)"}, GridLines -> Automatic, PlotRange -> {-2, 20}, PlotStyle -> Thick, BaseStyle -> {FontSize -> 20}, AspectRatio -> 1.5], "Specifications" :> {{$CellContext`UG$$, 0, 2}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{345., {256., 262.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{ 3.492860012493964*^9, 3.49286040598031*^9, 3.493033564184799*^9, { 3.493033938292856*^9, 3.493033971742655*^9}, 3.493034031627276*^9, { 3.493034062404078*^9, 3.49303413943934*^9}, 3.493034219251684*^9, 3.493034360604192*^9, 3.4930344364136887`*^9, 3.493034991140181*^9, 3.4930350835008698`*^9, {3.493041621290242*^9, 3.493041679354403*^9}, 3.4946719119508266`*^9, 3.494672357557684*^9, 3.4998753725053253`*^9, 3.499875457735746*^9, 3.5242120066442747`*^9, {3.52421204539736*^9, 3.524212053509103*^9}, 3.524261652795768*^9, {3.524261730854022*^9, 3.524261746242979*^9}, 3.5243871535231857`*^9, 3.524388085104184*^9, 3.5249961682841988`*^9, 3.52499773354161*^9, 3.525366013424474*^9, 3.525425256995756*^9, 3.525425993492578*^9, 3.52542773912103*^9, 3.5593098192212543`*^9, 3.559484898321381*^9, 3.559913587476803*^9, 3.5599136283611193`*^9, 3.560076914127223*^9, 3.569348126841173*^9, 3.569762234269562*^9, 3.5705547661541653`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ RowBox[{"Compare", " ", "energy", " ", "of", " ", "state"}], " ", "|", RowBox[{"0", ">", " ", RowBox[{ RowBox[{"from", " ", "Brillouin"}], "-", RowBox[{"Wigner", " ", "Theory"}]}]}]}], " ", "*)"}], RowBox[{"(*", " ", RowBox[{ RowBox[{ "with", " ", "results", " ", "from", " ", "Degenerate", " ", "perturbation", " ", "theory", " ", "for", " ", "states"}], " ", "|", RowBox[{"G", ">", " ", "<->"}], " ", "|", RowBox[{"0", ">", " ", "<->"}], " ", "|", RowBox[{ RowBox[{"-", "G"}], ">"}]}], " ", "*)"}], " ", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"m33", "[", RowBox[{"F1_", ",", "UG_"}], "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"4", "*", "F1"}], ",", RowBox[{"-", "UG"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "UG"}], ",", "0", ",", RowBox[{"-", "UG"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"-", "UG"}], ",", RowBox[{"4", "*", "F1"}]}], "}"}]}], "}"}]}], "\[IndentingNewLine]", RowBox[{"MatrixForm", "[", RowBox[{"m33", "[", RowBox[{"F1", ",", "UG"}], "]"}], "]"}], "\[IndentingNewLine]", RowBox[{"Eigenvalues", "[", RowBox[{"m33", "[", RowBox[{"F1", ",", "UG"}], "]"}], "]"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Eigenvalues", "[", RowBox[{"m33", "[", RowBox[{"F1", ",", "UG"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"F1", ",", "3.9", ",", "4.1"}], "}"}], ",", RowBox[{"{", RowBox[{"UG", ",", "0", ",", "1"}], "}"}]}], "]"}]}]}]], "Input", CellChangeTimes->{{3.492828734057878*^9, 3.492828837590001*^9}, { 3.492861742772832*^9, 3.4928617629302893`*^9}, {3.494672056630246*^9, 3.494672065332055*^9}, {3.494672258224374*^9, 3.494672258978039*^9}, { 3.494672345571515*^9, 3.494672350794056*^9}, {3.5243878649352293`*^9, 3.524387916797057*^9}, {3.524387983643097*^9, 3.524388004360571*^9}, { 3.524388034784689*^9, 3.5243880494075737`*^9}, {3.52438810095463*^9, 3.524388163052352*^9}, {3.524390488009704*^9, 3.524390488583933*^9}, { 3.5243906826504507`*^9, 3.524390691369691*^9}, {3.5245880247511*^9, 3.5245881681887493`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"4", " ", "F1"}], ",", RowBox[{"-", "UG"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "UG"}], ",", "0", ",", RowBox[{"-", "UG"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"-", "UG"}], ",", RowBox[{"4", " ", "F1"}]}], "}"}]}], "}"}]], "Output", CellChangeTimes->{ 3.524387917717025*^9, 3.5243880055911293`*^9, {3.524388035746393*^9, 3.524388049783305*^9}, 3.524388089333609*^9, 3.5243881636092043`*^9, 3.524390489869946*^9, 3.524390692309815*^9, 3.524993265132388*^9, 3.559309835606441*^9, 3.5599136454996357`*^9, 3.560076917550644*^9}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { RowBox[{"4", " ", "F1"}], RowBox[{"-", "UG"}], "0"}, { RowBox[{"-", "UG"}], "0", RowBox[{"-", "UG"}]}, {"0", RowBox[{"-", "UG"}], RowBox[{"4", " ", "F1"}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{ 3.524387917717025*^9, 3.5243880055911293`*^9, {3.524388035746393*^9, 3.524388049783305*^9}, 3.524388089333609*^9, 3.5243881636092043`*^9, 3.524390489869946*^9, 3.524390692309815*^9, 3.524993265132388*^9, 3.559309835606441*^9, 3.5599136454996357`*^9, 3.560076917552586*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"4", " ", "F1"}], ",", RowBox[{ RowBox[{"2", " ", "F1"}], "-", RowBox[{ SqrtBox["2"], " ", SqrtBox[ RowBox[{ RowBox[{"2", " ", SuperscriptBox["F1", "2"]}], "+", SuperscriptBox["UG", "2"]}]]}]}], ",", RowBox[{ RowBox[{"2", " ", "F1"}], "+", RowBox[{ SqrtBox["2"], " ", SqrtBox[ RowBox[{ RowBox[{"2", " ", SuperscriptBox["F1", "2"]}], "+", SuperscriptBox["UG", "2"]}]]}]}]}], "}"}]], "Output", CellChangeTimes->{ 3.524387917717025*^9, 3.5243880055911293`*^9, {3.524388035746393*^9, 3.524388049783305*^9}, 3.524388089333609*^9, 3.5243881636092043`*^9, 3.524390489869946*^9, 3.524390692309815*^9, 3.524993265132388*^9, 3.559309835606441*^9, 3.5599136454996357`*^9, 3.560076917554537*^9}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`F1$$ = 3.9, $CellContext`UG$$ = 0, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`F1$$], 3.9, 4.1}, { Hold[$CellContext`UG$$], 0, 1}}, Typeset`size$$ = {169., {3., 8.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`F1$4739$$ = 0, $CellContext`UG$4740$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`F1$$ = 3.9, $CellContext`UG$$ = 0}, "ControllerVariables" :> { Hold[$CellContext`F1$$, $CellContext`F1$4739$$, 0], Hold[$CellContext`UG$$, $CellContext`UG$4740$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Eigenvalues[ $CellContext`m33[$CellContext`F1$$, $CellContext`UG$$]], "Specifications" :> {{$CellContext`F1$$, 3.9, 4.1}, {$CellContext`UG$$, 0, 1}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{253., {60., 66.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{ 3.524387917717025*^9, 3.5243880055911293`*^9, {3.524388035746393*^9, 3.524388049783305*^9}, 3.524388089333609*^9, 3.5243881636092043`*^9, 3.524390489869946*^9, 3.524390692309815*^9, 3.524993265132388*^9, 3.559309835606441*^9, 3.5599136454996357`*^9, 3.560076917631301*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ RowBox[{"k", ".", "p"}], " ", "Bandstructure"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{"4", "-", RowBox[{"Band", " ", "with", " ", "Spin"}], "-", "Orbit"}], " ", "\[Rule]", " ", RowBox[{"8", "X8", " ", "Hamiltonian"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{ "From", " ", "Wave", " ", "Mechanics", " ", "in", " ", "heterostructures"}], ",", " ", RowBox[{"Gerald", " ", "Bastard"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"kt", "[", RowBox[{"kx_", ",", "ky_", ",", "kz_"}], "]"}], ":=", SqrtBox[ RowBox[{ SuperscriptBox["kx", "2"], "+", SuperscriptBox["ky", "2"], "+", SuperscriptBox["kz", "2"]}]]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"kp", "[", RowBox[{"kx_", ",", "ky_"}], "]"}], ":=", RowBox[{ FractionBox["1", SqrtBox["2"]], "*", RowBox[{"(", RowBox[{"kx", "+", RowBox[{"\[ImaginaryI]", "*", "ky"}]}], ")"}], "*", SuperscriptBox["10", "10"]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"km", "[", RowBox[{"kx_", ",", "ky_"}], "]"}], ":=", RowBox[{ FractionBox["1", SqrtBox["2"]], "*", RowBox[{"(", RowBox[{"kx", "-", RowBox[{"\[ImaginaryI]", "*", "ky"}]}], ")"}], "*", SuperscriptBox["10", "10"]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"kzn", "[", "kz_", "]"}], ":=", RowBox[{"kz", "*", SuperscriptBox["10", "10"]}]}], ";"}], "\[IndentingNewLine]", " ", RowBox[{ RowBox[{ RowBox[{"kdotp8x8", "[", RowBox[{ "kx_", ",", "ky_", ",", "kz_", ",", "Eg_", ",", "\[CapitalDelta]_", ",", "Phbar_"}], "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Eg", "+", RowBox[{"E0", "[", RowBox[{"kt", "[", RowBox[{"kx", ",", "ky", ",", "kz"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"-", SqrtBox[ FractionBox["2", "3"]]}], "*", "Phbar", "*", RowBox[{"kzn", "[", "kz", "]"}]}], ",", RowBox[{"Phbar", "*", RowBox[{"kp", "[", RowBox[{"kx", ",", "ky"}], "]"}]}], ",", RowBox[{ SqrtBox[ FractionBox["1", "3"]], "*", "Phbar", "*", RowBox[{"kzn", "[", "kz", "]"}]}], ",", "0", ",", RowBox[{ RowBox[{"-", SqrtBox[ FractionBox["1", "3"]]}], "*", "Phbar", "*", RowBox[{"km", "[", RowBox[{"kx", ",", "ky"}], "]"}]}], ",", "0", ",", RowBox[{ RowBox[{"-", SqrtBox[ FractionBox["2", "3"]]}], "*", "Phbar", "*", RowBox[{"km", "[", RowBox[{"kx", ",", "ky"}], "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", SqrtBox[ FractionBox["2", "3"]]}], "*", "Phbar", "*", RowBox[{"kzn", "[", "kz", "]"}]}], ",", RowBox[{"E0", "[", RowBox[{"kt", "[", RowBox[{"kx", ",", "ky", ",", "kz"}], "]"}], "]"}], ",", "0", ",", "0", ",", RowBox[{ SqrtBox[ FractionBox["1", "3"]], "*", "Phbar", "*", RowBox[{"km", "[", RowBox[{"kx", ",", "ky"}], "]"}]}], ",", "0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"Phbar", "*", RowBox[{"km", "[", RowBox[{"kx", ",", "ky"}], "]"}]}], ",", "0", ",", RowBox[{"E0", "[", RowBox[{"kt", "[", RowBox[{"kx", ",", "ky", ",", "kz"}], "]"}], "]"}], ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ SqrtBox[ FractionBox["1", "3"]], "*", "Phbar", "*", RowBox[{"kzn", "[", "kz", "]"}]}], ",", "0", ",", "0", ",", RowBox[{ RowBox[{"-", "\[CapitalDelta]"}], "+", RowBox[{"E0", "[", RowBox[{"kt", "[", RowBox[{"kx", ",", "ky", ",", "kz"}], "]"}], "]"}]}], ",", RowBox[{ SqrtBox[ FractionBox["2", "3"]], "*", "Phbar", "*", RowBox[{"km", "[", RowBox[{"kx", ",", "ky"}], "]"}]}], ",", "0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{ SqrtBox[ FractionBox["1", "3"]], "*", "Phbar", "*", RowBox[{"kp", "[", RowBox[{"kx", ",", "ky"}], "]"}]}], ",", "0", ",", RowBox[{ SqrtBox[ FractionBox["2", "3"]], "*", "Phbar", "*", RowBox[{"kp", "[", RowBox[{"kx", ",", "ky"}], "]"}]}], ",", RowBox[{"Eg", "+", RowBox[{"E0", "[", RowBox[{"kt", "[", RowBox[{"kx", ",", "ky", ",", "kz"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"-", SqrtBox[ FractionBox["2", "3"]]}], "*", "Phbar", "*", RowBox[{"kzn", "[", "kz", "]"}]}], ",", RowBox[{"Phbar", "*", RowBox[{"km", "[", RowBox[{"kx", ",", "ky"}], "]"}]}], ",", RowBox[{ SqrtBox[ FractionBox["1", "3"]], "*", "Phbar", "*", RowBox[{"kzn", "[", "kz", "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", SqrtBox[ FractionBox["1", "3"]]}], "*", "Phbar", "*", RowBox[{"kp", "[", RowBox[{"kx", ",", "ky"}], "]"}]}], ",", "0", ",", "0", ",", "0", ",", RowBox[{ RowBox[{"-", SqrtBox[ FractionBox["2", "3"]]}], "*", "Phbar", "*", RowBox[{"kzn", "[", "kz", "]"}]}], ",", RowBox[{"E0", "[", RowBox[{"kt", "[", RowBox[{"kx", ",", "ky", ",", "kz"}], "]"}], "]"}], ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", "0", ",", RowBox[{"Phbar", "*", RowBox[{"kp", "[", RowBox[{"kx", ",", "ky"}], "]"}]}], ",", "0", ",", RowBox[{"E0", "[", RowBox[{"kt", "[", RowBox[{"kx", ",", "ky", ",", "kz"}], "]"}], "]"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", SqrtBox[ FractionBox["2", "3"]]}], "*", "Phbar", "*", RowBox[{"kp", "[", RowBox[{"kx", ",", "ky"}], "]"}]}], ",", "0", ",", "0", ",", "0", ",", RowBox[{ SqrtBox[ FractionBox["1", "3"]], "*", "Phbar", "*", RowBox[{"kzn", "[", "kz", "]"}]}], ",", "0", ",", "0", ",", RowBox[{ RowBox[{"-", "\[CapitalDelta]"}], "+", RowBox[{"E0", "[", RowBox[{"kt", "[", RowBox[{"kx", ",", "ky", ",", "kz"}], "]"}], "]"}]}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"MatrixForm", "[", " ", RowBox[{"kdotp8x8", "[", RowBox[{ "kx", ",", "ky", ",", "kz", ",", "Eg", ",", "\[CapitalDelta]", ",", "Phbar"}], "]"}], "]"}], "\[IndentingNewLine]", RowBox[{"Eigenvalues", "[", " ", RowBox[{"kdotp8x8", "[", RowBox[{ "0", ",", "0", ",", "0", ",", "1.42", ",", "0.34", ",", "Phbar"}], "]"}], "]"}]}]}]], "Input", CellChangeTimes->{{3.524989619490088*^9, 3.524989630670164*^9}, { 3.524990287670987*^9, 3.52499029127809*^9}, 3.5249906800999413`*^9, { 3.5249911425955887`*^9, 3.524991634632049*^9}, {3.524991684917354*^9, 3.524991721341242*^9}, {3.52499176831046*^9, 3.524991989094056*^9}, { 3.5249920197128077`*^9, 3.5249924602080193`*^9}, 3.524992508413535*^9, { 3.524992588618091*^9, 3.524992602630555*^9}, {3.5249927220175037`*^9, 3.524992887671958*^9}, 3.524992925608008*^9, 3.524993044460669*^9, { 3.52499308502125*^9, 3.524993188243813*^9}, {3.5249932312642593`*^9, 3.5249932328253813`*^9}, {3.5249932909752903`*^9, 3.524993293943458*^9}, { 3.524993428464929*^9, 3.524993516483755*^9}, {3.524993553040609*^9, 3.5249938200394287`*^9}, {3.524993856275778*^9, 3.5249939918820467`*^9}, { 3.524994367992765*^9, 3.5249944134413567`*^9}, {3.524994579404004*^9, 3.52499462510398*^9}, {3.524994685587429*^9, 3.524994709271721*^9}, { 3.5249954479307413`*^9, 3.524995449322613*^9}, {3.524995599239612*^9, 3.524995606024682*^9}, 3.524996212811914*^9, {3.5249962503976316`*^9, 3.524996395069839*^9}, {3.524996435645102*^9, 3.524996464810713*^9}, { 3.524996589152802*^9, 3.5249967290424547`*^9}, {3.524996794759605*^9, 3.524996829519116*^9}, 3.5249968642429523`*^9, {3.524997043816024*^9, 3.524997236516128*^9}, {3.524997309228545*^9, 3.524997314651845*^9}, { 3.524997379512253*^9, 3.524997395880012*^9}, {3.525174137284184*^9, 3.525174167662015*^9}, {3.525174206977022*^9, 3.525174268045413*^9}, { 3.525174324606845*^9, 3.525174358300324*^9}, {3.525174390687407*^9, 3.525174391340663*^9}, {3.5251745082177057`*^9, 3.52517450910424*^9}, { 3.525365083257679*^9, 3.525365140516243*^9}, {3.525365170709477*^9, 3.5253651757020483`*^9}, {3.52536520985664*^9, 3.52536521049609*^9}, { 3.525425317027776*^9, 3.5254253392655287`*^9}, {3.5254254762873707`*^9, 3.525425477037697*^9}}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { RowBox[{"Eg", "+", RowBox[{"3.823630784038357`", " ", RowBox[{"(", RowBox[{ SuperscriptBox["kx", "2"], "+", SuperscriptBox["ky", "2"], "+", SuperscriptBox["kz", "2"]}], ")"}]}]}], RowBox[{ RowBox[{"-", "10000000000"}], " ", SqrtBox[ FractionBox["2", "3"]], " ", "kz", " ", "Phbar"}], RowBox[{"5000000000", " ", SqrtBox["2"], " ", RowBox[{"(", RowBox[{"kx", "+", RowBox[{"\[ImaginaryI]", " ", "ky"}]}], ")"}], " ", "Phbar"}], FractionBox[ RowBox[{"10000000000", " ", "kz", " ", "Phbar"}], SqrtBox["3"]], "0", RowBox[{ RowBox[{"-", "5000000000"}], " ", SqrtBox[ FractionBox["2", "3"]], " ", RowBox[{"(", RowBox[{"kx", "-", RowBox[{"\[ImaginaryI]", " ", "ky"}]}], ")"}], " ", "Phbar"}], "0", RowBox[{"-", FractionBox[ RowBox[{"10000000000", " ", RowBox[{"(", RowBox[{"kx", "-", RowBox[{"\[ImaginaryI]", " ", "ky"}]}], ")"}], " ", "Phbar"}], SqrtBox["3"]]}]}, { RowBox[{ RowBox[{"-", "10000000000"}], " ", SqrtBox[ FractionBox["2", "3"]], " ", "kz", " ", "Phbar"}], RowBox[{"3.823630784038357`", " ", RowBox[{"(", RowBox[{ SuperscriptBox["kx", "2"], "+", SuperscriptBox["ky", "2"], "+", SuperscriptBox["kz", "2"]}], ")"}]}], "0", "0", RowBox[{"5000000000", " ", SqrtBox[ FractionBox["2", "3"]], " ", RowBox[{"(", RowBox[{"kx", "-", RowBox[{"\[ImaginaryI]", " ", "ky"}]}], ")"}], " ", "Phbar"}], "0", "0", "0"}, { RowBox[{"5000000000", " ", SqrtBox["2"], " ", RowBox[{"(", RowBox[{"kx", "-", RowBox[{"\[ImaginaryI]", " ", "ky"}]}], ")"}], " ", "Phbar"}], "0", RowBox[{"3.823630784038357`", " ", RowBox[{"(", RowBox[{ SuperscriptBox["kx", "2"], "+", SuperscriptBox["ky", "2"], "+", SuperscriptBox["kz", "2"]}], ")"}]}], "0", "0", "0", "0", "0"}, { FractionBox[ RowBox[{"10000000000", " ", "kz", " ", "Phbar"}], SqrtBox["3"]], "0", "0", RowBox[{ RowBox[{"3.823630784038357`", " ", RowBox[{"(", RowBox[{ SuperscriptBox["kx", "2"], "+", SuperscriptBox["ky", "2"], "+", SuperscriptBox["kz", "2"]}], ")"}]}], "-", "\[CapitalDelta]"}], FractionBox[ RowBox[{"10000000000", " ", RowBox[{"(", RowBox[{"kx", "-", RowBox[{"\[ImaginaryI]", " ", "ky"}]}], ")"}], " ", "Phbar"}], SqrtBox["3"]], "0", "0", "0"}, {"0", RowBox[{"5000000000", " ", SqrtBox[ FractionBox["2", "3"]], " ", RowBox[{"(", RowBox[{"kx", "+", RowBox[{"\[ImaginaryI]", " ", "ky"}]}], ")"}], " ", "Phbar"}], "0", FractionBox[ RowBox[{"10000000000", " ", RowBox[{"(", RowBox[{"kx", "+", RowBox[{"\[ImaginaryI]", " ", "ky"}]}], ")"}], " ", "Phbar"}], SqrtBox["3"]], RowBox[{"Eg", "+", RowBox[{"3.823630784038357`", " ", RowBox[{"(", RowBox[{ SuperscriptBox["kx", "2"], "+", SuperscriptBox["ky", "2"], "+", SuperscriptBox["kz", "2"]}], ")"}]}]}], RowBox[{ RowBox[{"-", "10000000000"}], " ", SqrtBox[ FractionBox["2", "3"]], " ", "kz", " ", "Phbar"}], RowBox[{"5000000000", " ", SqrtBox["2"], " ", RowBox[{"(", RowBox[{"kx", "-", RowBox[{"\[ImaginaryI]", " ", "ky"}]}], ")"}], " ", "Phbar"}], FractionBox[ RowBox[{"10000000000", " ", "kz", " ", "Phbar"}], SqrtBox["3"]]}, { RowBox[{ RowBox[{"-", "5000000000"}], " ", SqrtBox[ FractionBox["2", "3"]], " ", RowBox[{"(", RowBox[{"kx", "+", RowBox[{"\[ImaginaryI]", " ", "ky"}]}], ")"}], " ", "Phbar"}], "0", "0", "0", RowBox[{ RowBox[{"-", "10000000000"}], " ", SqrtBox[ FractionBox["2", "3"]], " ", "kz", " ", "Phbar"}], RowBox[{"3.823630784038357`", " ", RowBox[{"(", RowBox[{ SuperscriptBox["kx", "2"], "+", SuperscriptBox["ky", "2"], "+", SuperscriptBox["kz", "2"]}], ")"}]}], "0", "0"}, {"0", "0", "0", "0", RowBox[{"5000000000", " ", SqrtBox["2"], " ", RowBox[{"(", RowBox[{"kx", "+", RowBox[{"\[ImaginaryI]", " ", "ky"}]}], ")"}], " ", "Phbar"}], "0", RowBox[{"3.823630784038357`", " ", RowBox[{"(", RowBox[{ SuperscriptBox["kx", "2"], "+", SuperscriptBox["ky", "2"], "+", SuperscriptBox["kz", "2"]}], ")"}]}], "0"}, { RowBox[{"-", FractionBox[ RowBox[{"10000000000", " ", RowBox[{"(", RowBox[{"kx", "+", RowBox[{"\[ImaginaryI]", " ", "ky"}]}], ")"}], " ", "Phbar"}], SqrtBox["3"]]}], "0", "0", "0", FractionBox[ RowBox[{"10000000000", " ", "kz", " ", "Phbar"}], SqrtBox["3"]], "0", "0", RowBox[{ RowBox[{"3.823630784038357`", " ", RowBox[{"(", RowBox[{ SuperscriptBox["kx", "2"], "+", SuperscriptBox["ky", "2"], "+", SuperscriptBox["kz", "2"]}], ")"}]}], "-", "\[CapitalDelta]"}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{ 3.52499347962283*^9, 3.524993518597993*^9, 3.524993593053748*^9, 3.524993828077774*^9, 3.5249939939723377`*^9, 3.5249945808368473`*^9, { 3.524994620515294*^9, 3.524994626089075*^9}, 3.524994712179654*^9, 3.5249954542807207`*^9, 3.524995607627264*^9, 3.524996213710237*^9, { 3.524996278337165*^9, 3.524996398535118*^9}, 3.524996465810726*^9, 3.524996626249469*^9, {3.524996703573739*^9, 3.5249967298051767`*^9}, { 3.524996803902288*^9, 3.524996821225965*^9}, 3.52499686545723*^9, { 3.5249970469449053`*^9, 3.5249970719203663`*^9}, 3.524997126375618*^9, 3.524997172835393*^9, 3.524997240902103*^9, 3.524997315779619*^9, 3.524997445292601*^9, 3.524997749172215*^9, 3.525174238300009*^9, 3.5251742695319366`*^9, 3.525174359324369*^9, 3.525365141957243*^9, 3.5253652113654003`*^9, 3.5253660268241167`*^9, 3.5254252699515543`*^9, { 3.5254253213667192`*^9, 3.5254253411675797`*^9}, 3.525425480434943*^9, 3.525425567075947*^9, 3.5254260131439037`*^9, 3.525427755203845*^9, 3.5593098707276497`*^9, 3.559484940825849*^9, 3.559913681156063*^9, 3.560076920123043*^9, 3.570554783880376*^9, 3.57079778106824*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{"1.42`", ",", "1.42`", ",", RowBox[{"-", "0.34`"}], ",", RowBox[{"-", "0.34`"}], ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], "}"}]], "Output", CellChangeTimes->{ 3.52499347962283*^9, 3.524993518597993*^9, 3.524993593053748*^9, 3.524993828077774*^9, 3.5249939939723377`*^9, 3.5249945808368473`*^9, { 3.524994620515294*^9, 3.524994626089075*^9}, 3.524994712179654*^9, 3.5249954542807207`*^9, 3.524995607627264*^9, 3.524996213710237*^9, { 3.524996278337165*^9, 3.524996398535118*^9}, 3.524996465810726*^9, 3.524996626249469*^9, {3.524996703573739*^9, 3.5249967298051767`*^9}, { 3.524996803902288*^9, 3.524996821225965*^9}, 3.52499686545723*^9, { 3.5249970469449053`*^9, 3.5249970719203663`*^9}, 3.524997126375618*^9, 3.524997172835393*^9, 3.524997240902103*^9, 3.524997315779619*^9, 3.524997445292601*^9, 3.524997749172215*^9, 3.525174238300009*^9, 3.5251742695319366`*^9, 3.525174359324369*^9, 3.525365141957243*^9, 3.5253652113654003`*^9, 3.5253660268241167`*^9, 3.5254252699515543`*^9, { 3.5254253213667192`*^9, 3.5254253411675797`*^9}, 3.525425480434943*^9, 3.525425567075947*^9, 3.5254260131439037`*^9, 3.525427755203845*^9, 3.5593098707276497`*^9, 3.559484940825849*^9, 3.559913681156063*^9, 3.560076920123043*^9, 3.570554783880376*^9, 3.5707977810736513`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"GaAs", ",", " ", RowBox[{"Eg", "=", RowBox[{"1.42", " ", "eV"}]}], ",", " ", RowBox[{"\[CapitalDelta]", "=", RowBox[{"0.34", " ", "eV"}]}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{"Phbar", "=", FractionBox[ RowBox[{ SuperscriptBox["h", "2"], "*", RowBox[{"(", FractionBox[ RowBox[{"2", "*", "\[Pi]"}], RowBox[{"5", "*", SuperscriptBox["10", RowBox[{"-", "10"}]]}]], ")"}]}], RowBox[{"me", "*", "q"}]]}], ";", " ", RowBox[{"nonzero", " ", "momentum", " ", "matrix", " ", "element"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1.42", "+", FractionBox[ RowBox[{ SuperscriptBox["h", "2"], "*", SuperscriptBox[ RowBox[{"(", RowBox[{"kx", "*", SuperscriptBox["10", "10"]}], ")"}], "2"]}], RowBox[{"2", "*", "me", "*", "1.0", "*", "q"}]]}], ",", RowBox[{"1.42", "+", FractionBox[ RowBox[{ SuperscriptBox["h", "2"], "*", SuperscriptBox[ RowBox[{"(", RowBox[{"kx", "*", SuperscriptBox["10", "10"]}], ")"}], "2"]}], RowBox[{"2", "*", "0.067", "*", "me", "*", "1.0", "*", "q"}]]}], ",", RowBox[{ RowBox[{"Eigenvalues", "[", " ", RowBox[{"kdotp8x8", "[", RowBox[{ "kx", ",", "0", ",", "0", ",", "1.42", ",", "0.34", ",", "Phbar"}], "]"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], ",", RowBox[{ RowBox[{"Eigenvalues", "[", " ", RowBox[{"kdotp8x8", "[", RowBox[{ "kx", ",", "0", ",", "0", ",", "1.42", ",", "0.34", ",", "Phbar"}], "]"}], "]"}], "[", RowBox[{"[", "2", "]"}], "]"}], ",", RowBox[{ RowBox[{"Eigenvalues", "[", " ", RowBox[{"kdotp8x8", "[", RowBox[{ "kx", ",", "0", ",", "0", ",", "1.42", ",", "0.34", ",", "Phbar"}], "]"}], "]"}], "[", RowBox[{"[", "3", "]"}], "]"}], ",", RowBox[{ RowBox[{"Eigenvalues", "[", " ", RowBox[{"kdotp8x8", "[", RowBox[{ "kx", ",", "0", ",", "0", ",", "1.42", ",", "0.34", ",", "Phbar"}], "]"}], "]"}], "[", RowBox[{"[", "4", "]"}], "]"}], ",", RowBox[{ RowBox[{"Eigenvalues", "[", " ", RowBox[{"kdotp8x8", "[", RowBox[{ "kx", ",", "0", ",", "0", ",", "1.42", ",", "0.34", ",", "Phbar"}], "]"}], "]"}], "[", RowBox[{"[", "5", "]"}], "]"}], ",", RowBox[{ RowBox[{"Eigenvalues", "[", " ", RowBox[{"kdotp8x8", "[", RowBox[{ "kx", ",", "0", ",", "0", ",", "1.42", ",", "0.34", ",", "Phbar"}], "]"}], "]"}], "[", RowBox[{"[", "6", "]"}], "]"}], ",", RowBox[{ RowBox[{"Eigenvalues", "[", " ", RowBox[{"kdotp8x8", "[", RowBox[{ "kx", ",", "0", ",", "0", ",", "1.42", ",", "0.34", ",", "Phbar"}], "]"}], "]"}], "[", RowBox[{"[", "7", "]"}], "]"}], ",", RowBox[{ RowBox[{"Eigenvalues", "[", " ", RowBox[{"kdotp8x8", "[", RowBox[{ "kx", ",", "0", ",", "0", ",", "1.42", ",", "0.34", ",", "Phbar"}], "]"}], "]"}], "[", RowBox[{"[", "8", "]"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"kx", ",", RowBox[{"-", "0.1"}], ",", "0.1"}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"-", "0.5"}], ",", "1.6"}], "}"}]}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "20"}], "}"}]}], ",", RowBox[{"AspectRatio", "\[Rule]", "1.5"}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}]}], "]"}], ",", RowBox[{"{", RowBox[{"Phbar", ",", "0", ",", FractionBox[ RowBox[{ SuperscriptBox["h", "2"], "*", RowBox[{"(", FractionBox[ RowBox[{"2", "*", "\[Pi]"}], RowBox[{"5", "*", SuperscriptBox["10", RowBox[{"-", "10"}]]}]], ")"}]}], RowBox[{"me", "*", "q"}]]}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.52536605297372*^9, 3.5253660697298203`*^9}, { 3.525425419765588*^9, 3.5254254535323553`*^9}, {3.525425491807397*^9, 3.525425500380362*^9}, {3.525425627418483*^9, 3.525425639042082*^9}, 3.5254279832693377`*^9}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`Phbar$$ = 0, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`Phbar$$], 0, 9.609832304939747*^-10}}, Typeset`size$$ = {333., {211., 221.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`Phbar$2458$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`Phbar$$ = 0}, "ControllerVariables" :> { Hold[$CellContext`Phbar$$, $CellContext`Phbar$2458$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot[{1.42 + $CellContext`h^2 (($CellContext`kx 10^10)^2/((( 2 $CellContext`me) 1.) $CellContext`q)), 1.42 + $CellContext`h^2 (($CellContext`kx 10^10)^2/((((2 0.067) $CellContext`me) 1.) $CellContext`q)), Part[ Eigenvalues[ $CellContext`kdotp8x8[$CellContext`kx, 0, 0, 1.42, 0.34, $CellContext`Phbar$$]], 1], Part[ Eigenvalues[ $CellContext`kdotp8x8[$CellContext`kx, 0, 0, 1.42, 0.34, $CellContext`Phbar$$]], 2], Part[ Eigenvalues[ $CellContext`kdotp8x8[$CellContext`kx, 0, 0, 1.42, 0.34, $CellContext`Phbar$$]], 3], Part[ Eigenvalues[ $CellContext`kdotp8x8[$CellContext`kx, 0, 0, 1.42, 0.34, $CellContext`Phbar$$]], 4], Part[ Eigenvalues[ $CellContext`kdotp8x8[$CellContext`kx, 0, 0, 1.42, 0.34, $CellContext`Phbar$$]], 5], Part[ Eigenvalues[ $CellContext`kdotp8x8[$CellContext`kx, 0, 0, 1.42, 0.34, $CellContext`Phbar$$]], 6], Part[ Eigenvalues[ $CellContext`kdotp8x8[$CellContext`kx, 0, 0, 1.42, 0.34, $CellContext`Phbar$$]], 7], Part[ Eigenvalues[ $CellContext`kdotp8x8[$CellContext`kx, 0, 0, 1.42, 0.34, $CellContext`Phbar$$]], 8]}, {$CellContext`kx, -0.1, 0.1}, PlotRange -> {-0.5, 1.6}, Frame -> True, PlotStyle -> Thick, FrameLabel -> { "kx (\!\(\*SuperscriptBox[\(10\), \(10\)]\)/m)", "Energy (eV)"}, BaseStyle -> {FontSize -> 20}, AspectRatio -> 1.5, GridLines -> Automatic], "Specifications" :> {{$CellContext`Phbar$$, 0, 9.609832304939747*^-10}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{376., {256., 262.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{3.5253661002274637`*^9, 3.525425457365223*^9, 3.525425595687149*^9, 3.525425646161689*^9, 3.525426020427249*^9, 3.52542775920651*^9, 3.525427984117243*^9, 3.559309875555777*^9, 3.5594849442603197`*^9, 3.559913685726774*^9, 3.560076925305901*^9, 3.570554787357053*^9, 3.570797785629485*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0, 0, 1.42`, 0.34`, 0\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.571161776202407*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0.`, 0.`, 1.42`, 0.34`, 0.`\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5711617762094316`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09607426775969391`\\\ )\\), 0, 0, 1.42`, 0.34`, 0\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5711617762115393`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.571161776214347*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0, 0, 1.42`, 0.34`, 0\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.57260449169138*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0.`, 0.`, 1.42`, 0.34`, 0.`\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.572604491693327*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09607426775969391`\\\ )\\), 0, 0, 1.42`, 0.34`, 0\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.572604491695095*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.57260449169681*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0, 0, 1.42`, 0.34`, 0\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5727773601187973`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0.`, 0.`, 1.42`, 0.34`, 0.`\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.572777360121489*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09607426775969391`\\\ )\\), 0, 0, 1.42`, 0.34`, 0\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5727773601239643`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.572777360161242*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0, 0, 1.42`, 0.34`, 0\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5732098644816723`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0.`, 0.`, 1.42`, 0.34`, 0.`\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5732098644867477`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09607426775969391`\\\ )\\), 0, 0, 1.42`, 0.34`, 0\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573209864488694*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573209864520018*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0, 0, 1.42`, 0.34`, 0\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573483485306429*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0.`, 0.`, 1.42`, 0.34`, 0.`\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573483485308928*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09607426775969391`\\\ )\\), 0, 0, 1.42`, 0.34`, 0\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573483485311174*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5734834853134537`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0, 0, 1.42`, 0.34`, 0\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573821193753236*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0.`, 0.`, 1.42`, 0.34`, 0.`\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573821193755821*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09607426775969391`\\\ )\\), 0, 0, 1.42`, 0.34`, 0\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573821193758233*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573821193836488*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0, 0, 1.42`, 0.34`, 0\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573990266803759*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0.`, 0.`, 1.42`, 0.34`, 0.`\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573990266806797*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09607426775969391`\\\ )\\), 0, 0, 1.42`, 0.34`, 0\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5739902668096046`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573990266812393*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0, 0, 1.42`, 0.34`, 0\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5745903942345657`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0.`, 0.`, 1.42`, 0.34`, 0.`\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.574590394241105*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09607426775969391`\\\ )\\), 0, 0, 1.42`, 0.34`, 0\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.574590394244293*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.574590394248683*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0, 0, 1.42`, 0.34`, 0\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575201925399356*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0.`, 0.`, 1.42`, 0.34`, 0.`\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575201925410666*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09607426775969391`\\\ )\\), 0, 0, 1.42`, 0.34`, 0\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575201925413698*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.57520192541667*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0, 0, 1.42`, 0.34`, 0\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575372283199114*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0.`, 0.`, 1.42`, 0.34`, 0.`\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5753722832053747`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09607426775969391`\\\ )\\), 0, 0, 1.42`, 0.34`, 0\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575372283208959*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575372283212678*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0, 0, 1.42`, 0.34`, 0\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5753802558554077`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0.`, 0.`, 1.42`, 0.34`, 0.`\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575380255859397*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09607426775969391`\\\ )\\), 0, 0, 1.42`, 0.34`, 0\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575380255862339*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575380255864285*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0, 0, 1.42`, 0.34`, 0\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575736856296967*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0.`, 0.`, 1.42`, 0.34`, 0.`\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575736856302766*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09607426775969391`\\\ )\\), 0, 0, 1.42`, 0.34`, 0\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575736856306118*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5757368563094263`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0, 0, 1.42`, 0.34`, 0\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.57574931371239*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0.`, 0.`, 1.42`, 0.34`, 0.`\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.57574931371926*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09607426775969391`\\\ )\\), 0, 0, 1.42`, 0.34`, 0\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5757493137263403`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5757493137716703`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0, 0, 1.42`, 0.34`, 0\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5757936359109077`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0.`, 0.`, 1.42`, 0.34`, 0.`\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5757936359146433`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09607426775969391`\\\ )\\), 0, 0, 1.42`, 0.34`, 0\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575793635918107*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.57579363592148*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0, 0, 1.42`, 0.34`, 0\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.576405715197835*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0.`, 0.`, 1.42`, 0.34`, 0.`\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.576405715202359*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09607426775969391`\\\ )\\), 0, 0, 1.42`, 0.34`, 0\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.576405715206355*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5764057152102118`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ RowBox[{"General", ":", " ", RowBox[{"Any", " ", "bandgap"}]}], ",", " ", RowBox[{"any", " ", "SO", " ", "coupling"}], ",", " ", RowBox[{"Eg", " ", RowBox[{"(", "eV", ")"}]}], ",", " ", RowBox[{"\[CapitalDelta]", " ", RowBox[{"(", "eV", ")"}]}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"Eigenvalues", "[", " ", RowBox[{"kdotp8x8", "[", RowBox[{ "kx", ",", "0", ",", "0", ",", "Eg", ",", "\[CapitalDelta]", ",", FractionBox[ RowBox[{ SuperscriptBox["h", "2"], "*", RowBox[{"(", FractionBox[ RowBox[{"2", "*", "\[Pi]"}], RowBox[{"5", "*", SuperscriptBox["10", RowBox[{"-", "10"}]]}]], ")"}]}], RowBox[{"me", "*", "q"}]]}], "]"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], ",", RowBox[{ RowBox[{"Eigenvalues", "[", " ", RowBox[{"kdotp8x8", "[", RowBox[{ "kx", ",", "0", ",", "0", ",", "Eg", ",", "\[CapitalDelta]", ",", FractionBox[ RowBox[{ SuperscriptBox["h", "2"], "*", RowBox[{"(", FractionBox[ RowBox[{"2", "*", "\[Pi]"}], RowBox[{"5", "*", SuperscriptBox["10", RowBox[{"-", "10"}]]}]], ")"}]}], RowBox[{"me", "*", "q"}]]}], "]"}], "]"}], "[", RowBox[{"[", "2", "]"}], "]"}], ",", RowBox[{ RowBox[{"Eigenvalues", "[", " ", RowBox[{"kdotp8x8", "[", RowBox[{ "kx", ",", "0", ",", "0", ",", "Eg", ",", "\[CapitalDelta]", ",", FractionBox[ RowBox[{ SuperscriptBox["h", "2"], "*", RowBox[{"(", FractionBox[ RowBox[{"2", "*", "\[Pi]"}], RowBox[{"5", "*", SuperscriptBox["10", RowBox[{"-", "10"}]]}]], ")"}]}], RowBox[{"me", "*", "q"}]]}], "]"}], "]"}], "[", RowBox[{"[", "3", "]"}], "]"}], ",", RowBox[{ RowBox[{"Eigenvalues", "[", " ", RowBox[{"kdotp8x8", "[", RowBox[{ "kx", ",", "0", ",", "0", ",", "Eg", ",", "\[CapitalDelta]", ",", FractionBox[ RowBox[{ SuperscriptBox["h", "2"], "*", RowBox[{"(", FractionBox[ RowBox[{"2", "*", "\[Pi]"}], RowBox[{"5", "*", SuperscriptBox["10", RowBox[{"-", "10"}]]}]], ")"}]}], RowBox[{"me", "*", "q"}]]}], "]"}], "]"}], "[", RowBox[{"[", "4", "]"}], "]"}], ",", RowBox[{ RowBox[{"Eigenvalues", "[", " ", RowBox[{"kdotp8x8", "[", RowBox[{ "kx", ",", "0", ",", "0", ",", "Eg", ",", "\[CapitalDelta]", ",", FractionBox[ RowBox[{ SuperscriptBox["h", "2"], "*", RowBox[{"(", FractionBox[ RowBox[{"2", "*", "\[Pi]"}], RowBox[{"5", "*", SuperscriptBox["10", RowBox[{"-", "10"}]]}]], ")"}]}], RowBox[{"me", "*", "q"}]]}], "]"}], "]"}], "[", RowBox[{"[", "5", "]"}], "]"}], ",", RowBox[{ RowBox[{"Eigenvalues", "[", " ", RowBox[{"kdotp8x8", "[", RowBox[{ "kx", ",", "0", ",", "0", ",", "Eg", ",", "\[CapitalDelta]", ",", FractionBox[ RowBox[{ SuperscriptBox["h", "2"], "*", RowBox[{"(", FractionBox[ RowBox[{"2", "*", "\[Pi]"}], RowBox[{"5", "*", SuperscriptBox["10", RowBox[{"-", "10"}]]}]], ")"}]}], RowBox[{"me", "*", "q"}]]}], "]"}], "]"}], "[", RowBox[{"[", "6", "]"}], "]"}], ",", RowBox[{ RowBox[{"Eigenvalues", "[", " ", RowBox[{"kdotp8x8", "[", RowBox[{ "kx", ",", "0", ",", "0", ",", "Eg", ",", "\[CapitalDelta]", ",", FractionBox[ RowBox[{ SuperscriptBox["h", "2"], "*", RowBox[{"(", FractionBox[ RowBox[{"2", "*", "\[Pi]"}], RowBox[{"5", "*", SuperscriptBox["10", RowBox[{"-", "10"}]]}]], ")"}]}], RowBox[{"me", "*", "q"}]]}], "]"}], "]"}], "[", RowBox[{"[", "7", "]"}], "]"}], ",", RowBox[{ RowBox[{"Eigenvalues", "[", " ", RowBox[{"kdotp8x8", "[", RowBox[{ "kx", ",", "0", ",", "0", ",", "Eg", ",", "\[CapitalDelta]", ",", FractionBox[ RowBox[{ SuperscriptBox["h", "2"], "*", RowBox[{"(", FractionBox[ RowBox[{"2", "*", "\[Pi]"}], RowBox[{"5", "*", SuperscriptBox["10", RowBox[{"-", "10"}]]}]], ")"}]}], RowBox[{"me", "*", "q"}]]}], "]"}], "]"}], "[", RowBox[{"[", "8", "]"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"kx", ",", RowBox[{"-", "0.1"}], ",", "0.1"}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"-", "0.7"}], ",", "1.5"}], "}"}]}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "20"}], "}"}]}], ",", RowBox[{"AspectRatio", "\[Rule]", "1.5"}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}]}], "]"}], ",", RowBox[{"{", RowBox[{"Eg", ",", "0.2", ",", "1.6"}], "}"}], ",", RowBox[{"{", RowBox[{"\[CapitalDelta]", ",", "0", ",", "0.5"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{ 3.5249972668373623`*^9, {3.52499763271874*^9, 3.524997640671328*^9}, { 3.524997865497552*^9, 3.524997883199709*^9}, {3.5249979159991283`*^9, 3.524997945308926*^9}, 3.5249979831748743`*^9, {3.5249980291264668`*^9, 3.524998045812223*^9}, {3.525425011306328*^9, 3.5254250435186777`*^9}, { 3.5254257327419643`*^9, 3.525425775921474*^9}, 3.525427972762026*^9}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`Eg$$ = 0.2, $CellContext`\[CapitalDelta]$$ = 0, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`Eg$$], 0.2, 1.6}, { Hold[$CellContext`\[CapitalDelta]$$], 0, 0.5}}, Typeset`size$$ = { 326., {211., 221.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`Eg$2838$$ = 0, $CellContext`\[CapitalDelta]$2839$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`Eg$$ = 0.2, $CellContext`\[CapitalDelta]$$ = 0}, "ControllerVariables" :> { Hold[$CellContext`Eg$$, $CellContext`Eg$2838$$, 0], Hold[$CellContext`\[CapitalDelta]$$, \ $CellContext`\[CapitalDelta]$2839$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot[{ Part[ Eigenvalues[ $CellContext`kdotp8x8[$CellContext`kx, 0, 0, $CellContext`Eg$$, $CellContext`\[CapitalDelta]$$, \ $CellContext`h^2 ((2 (Pi/(5 10^(-10))))/($CellContext`me $CellContext`q))]], 1], Part[ Eigenvalues[ $CellContext`kdotp8x8[$CellContext`kx, 0, 0, $CellContext`Eg$$, $CellContext`\[CapitalDelta]$$, \ $CellContext`h^2 ((2 (Pi/(5 10^(-10))))/($CellContext`me $CellContext`q))]], 2], Part[ Eigenvalues[ $CellContext`kdotp8x8[$CellContext`kx, 0, 0, $CellContext`Eg$$, $CellContext`\[CapitalDelta]$$, \ $CellContext`h^2 ((2 (Pi/(5 10^(-10))))/($CellContext`me $CellContext`q))]], 3], Part[ Eigenvalues[ $CellContext`kdotp8x8[$CellContext`kx, 0, 0, $CellContext`Eg$$, $CellContext`\[CapitalDelta]$$, \ $CellContext`h^2 ((2 (Pi/(5 10^(-10))))/($CellContext`me $CellContext`q))]], 4], Part[ Eigenvalues[ $CellContext`kdotp8x8[$CellContext`kx, 0, 0, $CellContext`Eg$$, $CellContext`\[CapitalDelta]$$, \ $CellContext`h^2 ((2 (Pi/(5 10^(-10))))/($CellContext`me $CellContext`q))]], 5], Part[ Eigenvalues[ $CellContext`kdotp8x8[$CellContext`kx, 0, 0, $CellContext`Eg$$, $CellContext`\[CapitalDelta]$$, \ $CellContext`h^2 ((2 (Pi/(5 10^(-10))))/($CellContext`me $CellContext`q))]], 6], Part[ Eigenvalues[ $CellContext`kdotp8x8[$CellContext`kx, 0, 0, $CellContext`Eg$$, $CellContext`\[CapitalDelta]$$, \ $CellContext`h^2 ((2 (Pi/(5 10^(-10))))/($CellContext`me $CellContext`q))]], 7], Part[ Eigenvalues[ $CellContext`kdotp8x8[$CellContext`kx, 0, 0, $CellContext`Eg$$, $CellContext`\[CapitalDelta]$$, \ $CellContext`h^2 ((2 (Pi/(5 10^(-10))))/($CellContext`me $CellContext`q))]], 8]}, {$CellContext`kx, -0.1, 0.1}, PlotRange -> {-0.7, 1.5}, Frame -> True, PlotStyle -> Thick, FrameLabel -> { "kx (\!\(\*SuperscriptBox[\(10\), \(10\)]\)/m)", "Energy (eV)"}, BaseStyle -> {FontSize -> 20}, AspectRatio -> 1.5, GridLines -> Automatic], "Specifications" :> {{$CellContext`Eg$$, 0.2, 1.6}, {$CellContext`\[CapitalDelta]$$, 0, 0.5}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{369., {270., 276.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{ 3.5249972747162647`*^9, 3.5249973405289707`*^9, 3.5249976620573874`*^9, 3.524997809045905*^9, {3.524997866491955*^9, 3.524997885034683*^9}, { 3.524997917566359*^9, 3.524997946153741*^9}, 3.5249979841167*^9, { 3.524998031805564*^9, 3.5249980465807533`*^9}, 3.5253661050273523`*^9, 3.525425778842156*^9, 3.525426042635972*^9, 3.525427782534944*^9, 3.52542797380175*^9, 3.525434103568276*^9, 3.559309896373056*^9, 3.559484953713238*^9, 3.559913772335622*^9, 3.560076928405078*^9, 3.570554829460465*^9, 3.5707977920422564`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0, 0, 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\ \\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\ \[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.57116177649389*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0.`, 0.`, 0.2`, 0.`, \\(1.2566370614359173`*^10\\\\ \ h\\^2\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.571161776512828*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09607426775969391`\\\ )\\), 0, 0, 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\ \\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\ \[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.571161776516045*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.571161776518423*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0, 0, 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\ \\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\ \[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5726044923593893`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0.`, 0.`, 0.2`, 0.`, \\(1.2566370614359173`*^10\\\\ \ h\\^2\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.57260449236169*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09607426775969391`\\\ )\\), 0, 0, 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\ \\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\ \[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.572604492363929*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.572604492366088*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0, 0, 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\ \\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\ \[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.572777360490531*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0.`, 0.`, 0.2`, 0.`, \\(1.2566370614359173`*^10\\\\ \ h\\^2\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.572777360492696*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09607426775969391`\\\ )\\), 0, 0, 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\ \\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\ \[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.57277736049477*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.572777360496807*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0, 0, 0.2`, 0, 8.74494739749517`*^-40\\/me\\)\\)]\\)\\)]\\)\[NoBreak] \ does not exist. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573209865190481*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0.`, 0.`, 0.2`, 0.`, 8.74494739749517`*^-40\\/me\\)\\)]\\)\\)]\\)\ \[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.57320986519351*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09607426775969391`\\\ )\\), 0, 0, 0.2`, 0, 8.74494739749517`*^-40\\/me\\)\\)]\\)\\)]\\)\[NoBreak] \ does not exist. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573209865195512*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573209865197403*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0, 0, 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\ \\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\ \[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5734834857882757`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0.`, 0.`, 0.2`, 0.`, \\(1.2566370614359173`*^10\\\\ \ h\\^2\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573483485790855*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09607426775969391`\\\ )\\), 0, 0, 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\ \\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\ \[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573483485793249*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573483485795527*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0, 0, 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\ \\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\ \[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5738211943539*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0.`, 0.`, 0.2`, 0.`, \\(1.2566370614359173`*^10\\\\ \ h\\^2\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573821194356434*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09607426775969391`\\\ )\\), 0, 0, 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\ \\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\ \[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.57382119435885*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573821194361134*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0, 0, 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\ \\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\ \[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573990267257348*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0.`, 0.`, 0.2`, 0.`, \\(1.2566370614359173`*^10\\\\ \ h\\^2\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.57399026726009*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09607426775969391`\\\ )\\), 0, 0, 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\ \\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\ \[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5739902672627*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5739902672651787`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0, 0, 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\ \\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\ \[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575380256654797*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0.`, 0.`, 0.2`, 0.`, \\(1.2566370614359173`*^10\\\\ \ h\\^2\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5753802566579027`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09607426775969391`\\\ )\\), 0, 0, 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\ \\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\ \[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575380256660236*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575380256662539*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0, 0, 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\ \\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\ \[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575748563695744*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0.`, 0.`, 0.2`, 0.`, \\(1.2566370614359173`*^10\\\\ \ h\\^2\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575748563705278*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09607426775969391`\\\ )\\), 0, 0, 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\ \\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\ \[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5757485637089663`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575748563712599*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0, 0, 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\ \\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\ \[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575749314296543*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0.`, 0.`, 0.2`, 0.`, \\(1.2566370614359173`*^10\\\\ \ h\\^2\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575749314300901*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09607426775969391`\\\ )\\), 0, 0, 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\ \\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\ \[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575749314304775*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5757493143085203`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0, 0, 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\ \\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\ \[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575793637027313*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0.`, 0.`, 0.2`, 0.`, \\(1.2566370614359173`*^10\\\\ \ h\\^2\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575793637031205*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09607426775969391`\\\ )\\), 0, 0, 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\ \\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\ \[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5757936370350113`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575793637038711*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0, 0, 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\ \\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\ \[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5764057164945107`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09999999591836735`\\\ )\\), 0.`, 0.`, 0.2`, 0.`, \\(1.2566370614359173`*^10\\\\ \ h\\^2\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.576405716500679*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(2\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.09607426775969391`\\\ )\\), 0, 0, 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\ \\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\ \[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.576405716504265*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.576405716507865*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ RowBox[{"General", ":", " ", RowBox[{"Any", " ", "bandgap"}]}], ",", " ", RowBox[{"any", " ", "SO", " ", "coupling"}], ",", " ", RowBox[{"Eg", " ", RowBox[{"(", "eV", ")"}]}], ",", " ", RowBox[{"\[CapitalDelta]", " ", RowBox[{"(", "eV", ")"}]}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"ContourPlot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Eigenvalues", "[", " ", RowBox[{"kdotp8x8", "[", RowBox[{ "kx", ",", "0", ",", "kz", ",", "Eg", ",", "\[CapitalDelta]", ",", FractionBox[ RowBox[{ SuperscriptBox["h", "2"], "*", RowBox[{"(", FractionBox[ RowBox[{"2", "*", "\[Pi]"}], RowBox[{"5", "*", SuperscriptBox["10", RowBox[{"-", "10"}]]}]], ")"}]}], RowBox[{"me", "*", "q"}]]}], "]"}], "]"}], "[", RowBox[{"[", "7", "]"}], "]"}], "}"}], ",", RowBox[{"{", RowBox[{"kx", ",", RowBox[{"-", "0.5"}], ",", "0.5"}], "}"}], ",", RowBox[{"{", RowBox[{"kz", ",", RowBox[{"-", "0.5"}], ",", "0.5"}], "}"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "20"}], "}"}]}], ",", RowBox[{"AspectRatio", "\[Rule]", "1"}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}]}], "]"}], ",", RowBox[{"{", RowBox[{"Eg", ",", "0.2", ",", "1.6"}], "}"}], ",", RowBox[{"{", RowBox[{"\[CapitalDelta]", ",", "0", ",", "0.5"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.5254278793828373`*^9, 3.5254279664571953`*^9}, { 3.5254280161388693`*^9, 3.525428016440557*^9}, {3.525428076687212*^9, 3.5254280831033783`*^9}, {3.5254281480300703`*^9, 3.525428214685319*^9}, 3.525428261899253*^9, {3.5254282995436373`*^9, 3.525428341880468*^9}, 3.5254283729834127`*^9, {3.525428423983327*^9, 3.5254284364287357`*^9}, { 3.525428482474266*^9, 3.525428506453691*^9}, {3.525428540349427*^9, 3.525428554083892*^9}}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`Eg$$ = 0.2, $CellContext`\[CapitalDelta]$$ = 0, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`Eg$$], 0.2, 1.6}, { Hold[$CellContext`\[CapitalDelta]$$], 0, 0.5}}, Typeset`size$$ = { 360., {166., 175.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`Eg$5790$$ = 0, $CellContext`\[CapitalDelta]$5791$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`Eg$$ = 0.2, $CellContext`\[CapitalDelta]$$ = 0}, "ControllerVariables" :> { Hold[$CellContext`Eg$$, $CellContext`Eg$5790$$, 0], Hold[$CellContext`\[CapitalDelta]$$, \ $CellContext`\[CapitalDelta]$5791$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> ContourPlot[{ Part[ Eigenvalues[ $CellContext`kdotp8x8[$CellContext`kx, 0, $CellContext`kz, $CellContext`Eg$$, $CellContext`\ \[CapitalDelta]$$, $CellContext`h^2 (( 2 (Pi/(5 10^(-10))))/($CellContext`me $CellContext`q))]], 7]}, {$CellContext`kx, -0.5, 0.5}, {$CellContext`kz, -0.5, 0.5}, FrameLabel -> { "kx (\!\(\*SuperscriptBox[\(10\), \(10\)]\)/m)", "kz (\!\(\*SuperscriptBox[\(10\), \(10\)]\)/m)"}, BaseStyle -> {FontSize -> 20}, AspectRatio -> 1, GridLines -> Automatic], "Specifications" :> {{$CellContext`Eg$$, 0.2, 1.6}, {$CellContext`\[CapitalDelta]$$, 0, 0.5}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{403., {224., 230.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{{3.525428004213464*^9, 3.5254280175547037`*^9}, 3.525428084121217*^9, {3.525428157893422*^9, 3.5254282154718323`*^9}, 3.525428263158697*^9, {3.5254283016853*^9, 3.525428342415447*^9}, 3.5254283735203857`*^9, 3.5254284377399282`*^9, {3.525428482954239*^9, 3.525428506988168*^9}, {3.525428540888734*^9, 3.525428554981525*^9}, 3.5593099264827757`*^9, 3.55948496279983*^9, 3.5599138059415827`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.49992857142857144`\\\ )\\), 0, \\(\\(-0.49992857142857144`\\)\\), 0.2`, 0, \\(4000000000\\\\ \ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not \ exist. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5711617768092546`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.49992857142857144`\\\ )\\), 0.`, \\(\\(-0.49992857142857144`\\)\\), 0.2`, 0.`, \ \\(1.2566370614359173`*^10\\\\ h\\^2\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\ \[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.571161776811606*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.4285`\\)\\), 0, \\(\ \\(-0.49992857142857144`\\)\\), 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\ \\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.571161776813805*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.571161776815981*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.49992857142857144`\\\ )\\), 0, \\(\\(-0.49992857142857144`\\)\\), 0.2`, 0, \\(4000000000\\\\ \ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not \ exist. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.572604492874043*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.49992857142857144`\\\ )\\), 0.`, \\(\\(-0.49992857142857144`\\)\\), 0.2`, 0.`, \ \\(1.2566370614359173`*^10\\\\ h\\^2\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\ \[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.572604492876279*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.4285`\\)\\), 0, \\(\ \\(-0.49992857142857144`\\)\\), 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\ \\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.572604492878388*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.572604492880422*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.49992857142857144`\\\ )\\), 0, \\(\\(-0.49992857142857144`\\)\\), 0.2`, 0, \\(4000000000\\\\ \ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not \ exist. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.572777360930449*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.49992857142857144`\\\ )\\), 0.`, \\(\\(-0.49992857142857144`\\)\\), 0.2`, 0.`, \ \\(1.2566370614359173`*^10\\\\ h\\^2\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\ \[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.572777360933014*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.4285`\\)\\), 0, \\(\ \\(-0.49992857142857144`\\)\\), 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\ \\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.572777360935458*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5727773609378633`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.49992857142857144`\\\ )\\), 0, \\(\\(-0.49992857142857144`\\)\\), 0.2`, 0, \ 8.74494739749517`*^-40\\/me\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573209865757886*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.49992857142857144`\\\ )\\), 0.`, \\(\\(-0.49992857142857144`\\)\\), 0.2`, 0.`, \ 8.74494739749517`*^-40\\/me\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573209865760446*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.4285`\\)\\), 0, \\(\ \\(-0.49992857142857144`\\)\\), 0.2`, 0, \ 8.74494739749517`*^-40\\/me\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\ \\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573209865762941*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573209865765321*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.49992857142857144`\\\ )\\), 0, \\(\\(-0.49992857142857144`\\)\\), 0.2`, 0, \\(4000000000\\\\ \ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not \ exist. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5734834863879223`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.49992857142857144`\\\ )\\), 0.`, \\(\\(-0.49992857142857144`\\)\\), 0.2`, 0.`, \ \\(1.2566370614359173`*^10\\\\ h\\^2\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\ \[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5734834863904247`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.4285`\\)\\), 0, \\(\ \\(-0.49992857142857144`\\)\\), 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\ \\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573483486392643*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573483486394805*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.49992857142857144`\\\ )\\), 0, \\(\\(-0.49992857142857144`\\)\\), 0.2`, 0, \\(4000000000\\\\ \ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not \ exist. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573821194902755*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.49992857142857144`\\\ )\\), 0.`, \\(\\(-0.49992857142857144`\\)\\), 0.2`, 0.`, \ \\(1.2566370614359173`*^10\\\\ h\\^2\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\ \[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5738211949053373`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.4285`\\)\\), 0, \\(\ \\(-0.49992857142857144`\\)\\), 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\ \\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573821194907901*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573821194910508*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.49992857142857144`\\\ )\\), 0, \\(\\(-0.49992857142857144`\\)\\), 0.2`, 0, \\(4000000000\\\\ \ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not \ exist. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5739902678021393`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.49992857142857144`\\\ )\\), 0.`, \\(\\(-0.49992857142857144`\\)\\), 0.2`, 0.`, \ \\(1.2566370614359173`*^10\\\\ h\\^2\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\ \[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5739902678047543`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.4285`\\)\\), 0, \\(\ \\(-0.49992857142857144`\\)\\), 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\ \\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.573990267807262*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.57399026780962*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.49992857142857144`\\\ )\\), 0, \\(\\(-0.49992857142857144`\\)\\), 0.2`, 0, \\(4000000000\\\\ \ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not \ exist. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.574418028665826*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.49992857142857144`\\\ )\\), 0.`, \\(\\(-0.49992857142857144`\\)\\), 0.2`, 0.`, \ \\(1.2566370614359173`*^10\\\\ h\\^2\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\ \[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5744180286734877`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.4285`\\)\\), 0, \\(\ \\(-0.49992857142857144`\\)\\), 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\ \\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5744180286760893`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.574418028678594*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.49992857142857144`\\\ )\\), 0, \\(\\(-0.49992857142857144`\\)\\), 0.2`, 0, \ \\(7.8539816339744825`*^28\\\\ h\\^2\\)\\/me\\)\\)]\\)\\)]\\)\[NoBreak] does \ not exist. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\ \\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575368511469891*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.49992857142857144`\\\ )\\), 0.`, \\(\\(-0.49992857142857144`\\)\\), 0.2`, 0.`, \ \\(7.8539816339744825`*^28\\\\ h\\^2\\)\\/me\\)\\)]\\)\\)]\\)\[NoBreak] does \ not exist. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\ \\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575368511473729*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.4285`\\)\\), 0, \\(\ \\(-0.49992857142857144`\\)\\), 0.2`, 0, \\(7.8539816339744825`*^28\\\\ h\\^2\ \\)\\/me\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\ \[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575368511476469*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575368511479238*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.49992857142857144`\\\ )\\), 0, \\(\\(-0.49992857142857144`\\)\\), 0.2`, 0, \\(4000000000\\\\ \ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not \ exist. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5753802573359222`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.49992857142857144`\\\ )\\), 0.`, \\(\\(-0.49992857142857144`\\)\\), 0.2`, 0.`, \ \\(1.2566370614359173`*^10\\\\ h\\^2\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\ \[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5753802573384733`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.4285`\\)\\), 0, \\(\ \\(-0.49992857142857144`\\)\\), 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\ \\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575380257341084*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.57538025734345*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.49992857142857144`\\\ )\\), 0, \\(\\(-0.49992857142857144`\\)\\), 0.2`, 0, \\(4000000000\\\\ \ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not \ exist. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.57574880811891*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.49992857142857144`\\\ )\\), 0.`, \\(\\(-0.49992857142857144`\\)\\), 0.2`, 0.`, \ \\(1.2566370614359173`*^10\\\\ h\\^2\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\ \[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575748808127178*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.4285`\\)\\), 0, \\(\ \\(-0.49992857142857144`\\)\\), 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\ \\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575748808130559*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5757488081337767`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.49992857142857144`\\\ )\\), 0, \\(\\(-0.49992857142857144`\\)\\), 0.2`, 0, \\(4000000000\\\\ \ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not \ exist. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575793637277973*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.49992857142857144`\\\ )\\), 0.`, \\(\\(-0.49992857142857144`\\)\\), 0.2`, 0.`, \ \\(1.2566370614359173`*^10\\\\ h\\^2\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\ \[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5757936372828293`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.4285`\\)\\), 0, \\(\ \\(-0.49992857142857144`\\)\\), 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\ \\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575793637287181*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.575793637290957*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.49992857142857144`\\\ )\\), 0, \\(\\(-0.49992857142857144`\\)\\), 0.2`, 0, \\(4000000000\\\\ \ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not \ exist. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5764057178309317`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.49992857142857144`\\\ )\\), 0.`, \\(\\(-0.49992857142857144`\\)\\), 0.2`, 0.`, \ \\(1.2566370614359173`*^10\\\\ h\\^2\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\ \[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.576405717834777*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.4285`\\)\\), 0, \\(\ \\(-0.49992857142857144`\\)\\), 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\ \\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.576405717838605*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.57640571784221*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.49992857142857144`\\\ )\\), 0, \\(\\(-0.49992857142857144`\\)\\), 0.2`, 0, \\(4000000000\\\\ \ h\\^2\\\\ \[Pi]\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not \ exist. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5764057958720093`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.49992857142857144`\\\ )\\), 0.`, \\(\\(-0.49992857142857144`\\)\\), 0.2`, 0.`, \ \\(1.2566370614359173`*^10\\\\ h\\^2\\)\\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\ \[NoBreak] does not exist. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/partw\\\", ButtonNote -> \ \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.5764057958797073`*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"Part", "::", "partw"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Part \[NoBreak]\\!\\(7\\)\[NoBreak] of \ \[NoBreak]\\!\\(Eigenvalues[\\(\\(kdotp8x8[\\(\\(\\(\\(-0.4285`\\)\\), 0, \\(\ \\(-0.49992857142857144`\\)\\), 0.2`, 0, \\(4000000000\\\\ h\\^2\\\\ \[Pi]\\)\ \\/\\(me\\\\ q\\)\\)\\)]\\)\\)]\\)\[NoBreak] does not exist. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/partw\\\", \ ButtonNote -> \\\"Part::partw\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.576405795882287*^9}], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "stop"}], "MessageName"], RowBox[{ ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Part :: \ partw\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \ calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.576405795884799*^9}] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Effective Mass Equation", "Subtitle", CellChangeTimes->{{3.526030792632044*^9, 3.5260307979509993`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ "Illustrate", " ", "Envelope", " ", "Function", " ", "in", " ", "Bulk"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"G_", ",", "x_"}], "]"}], ":=", RowBox[{ RowBox[{"Cos", "[", RowBox[{"G", "*", "x"}], "]"}], "+", RowBox[{"Cos", "[", RowBox[{"2", "*", "G", "*", "x"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Env", "[", RowBox[{"k_", ",", "x_"}], "]"}], ":=", RowBox[{"Exp", "[", RowBox[{"\[ImaginaryI]", "*", "k", "*", "x"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"u", "[", RowBox[{"1", ",", "x"}], "]"}], ",", RowBox[{"Re", "[", RowBox[{"Env", "[", RowBox[{"k", ",", "x"}], "]"}], "]"}], ",", RowBox[{"Re", "[", RowBox[{ RowBox[{"u", "[", RowBox[{"1", ",", "x"}], "]"}], "*", RowBox[{"Env", "[", RowBox[{"k", ",", "x"}], "]"}]}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"-", "50"}], ",", "50"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"-", "3"}], ",", "3"}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "20"}], "}"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"k", ",", "0.0001", ",", "0.1"}], "}"}]}], "]"}]}]}]], "Input", CellChangeTimes->{{3.526030804387965*^9, 3.526031132156588*^9}, { 3.526031169480589*^9, 3.526031219253316*^9}, 3.526031713202587*^9, { 3.526032007124445*^9, 3.526032033432433*^9}, 3.526032064676914*^9}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`k$$ = 0.0001, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`k$$], 0.0001, 0.1}}, Typeset`size$$ = { 360., {120., 129.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`k$4775$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`k$$ = 0.0001}, "ControllerVariables" :> { Hold[$CellContext`k$$, $CellContext`k$4775$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot[{ $CellContext`u[1, $CellContext`x], Re[ $CellContext`Env[$CellContext`k$$, $CellContext`x]], Re[$CellContext`u[ 1, $CellContext`x] $CellContext`Env[$CellContext`k$$, \ $CellContext`x]]}, {$CellContext`x, -50, 50}, Frame -> True, PlotRange -> {-3, 3}, PlotStyle -> Thick, FrameLabel -> {"x (Ang)", "wavefunctions (a.u.)"}, BaseStyle -> {FontSize -> 20}], "Specifications" :> {{$CellContext`k$$, 0.0001, 0.1}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{403., {164., 170.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{{3.526030961704067*^9, 3.526030982251904*^9}, { 3.526031018236928*^9, 3.52603108522653*^9}, 3.526031132719234*^9, { 3.526031177836667*^9, 3.526031185023285*^9}, 3.5260317143582706`*^9, 3.526032034632001*^9, 3.526032065604426*^9, 3.526152642592927*^9, 3.559309952135948*^9, 3.5599138109367*^9, 3.560076934398253*^9, 3.570554881558317*^9, 3.570797796145233*^9, 3.571161785265136*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ "Illustrate", " ", "Envelope", " ", "Function", " ", "in", " ", "a", " ", "Quantum", " ", "Well"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"G_", ",", "x_"}], "]"}], ":=", RowBox[{ RowBox[{"Cos", "[", RowBox[{"G", "*", "x"}], "]"}], "+", RowBox[{"Cos", "[", RowBox[{"2", "*", "G", "*", "x"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"EnvQW", "[", RowBox[{"L_", ",", "x_"}], "]"}], ":=", RowBox[{ SqrtBox[ FractionBox["2", "L"]], "*", RowBox[{"Cos", "[", RowBox[{"\[Pi]", "*", FractionBox["x", "L"]}], "]"}], "*", RowBox[{"(", RowBox[{ RowBox[{"UnitStep", "[", RowBox[{"x", "+", FractionBox["L", "2"]}], "]"}], "-", RowBox[{"UnitStep", "[", RowBox[{"x", "-", FractionBox["L", "2"]}], "]"}]}], ")"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"u", "[", RowBox[{"1", ",", "x"}], "]"}], ",", RowBox[{"EnvQW", "[", RowBox[{"L", ",", "x"}], "]"}], ",", RowBox[{ RowBox[{"u", "[", RowBox[{"1", ",", "x"}], "]"}], "*", RowBox[{"EnvQW", "[", RowBox[{"L", ",", "x"}], "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"-", "20"}], ",", "20"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"-", "1.4"}], ",", "2.4"}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "20"}], "}"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"L", ",", "10", ",", "50"}], "}"}]}], "]"}]}]}]], "Input", CellChangeTimes->{{3.526031238452858*^9, 3.526031395888743*^9}, { 3.526031465129898*^9, 3.526031479192431*^9}, {3.526031512077306*^9, 3.526031517186943*^9}, {3.526031654864293*^9, 3.5260317018184347`*^9}, { 3.52603180908575*^9, 3.52603183232722*^9}, {3.526032089814769*^9, 3.526032115763749*^9}, {3.5260324099693327`*^9, 3.526032416443822*^9}, { 3.5260325682064247`*^9, 3.526032580788962*^9}, {3.526152669781867*^9, 3.526152671489195*^9}}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`L$$ = 10, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`L$$], 10, 50}}, Typeset`size$$ = {360., {109., 118.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`L$5024$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`L$$ = 10}, "ControllerVariables" :> { Hold[$CellContext`L$$, $CellContext`L$5024$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot[{ $CellContext`u[1, $CellContext`x], $CellContext`EnvQW[$CellContext`L$$, $CellContext`x], $CellContext`u[ 1, $CellContext`x] $CellContext`EnvQW[$CellContext`L$$, \ $CellContext`x]}, {$CellContext`x, -20, 20}, Frame -> True, PlotRange -> {-1.4, 2.4}, PlotStyle -> Thick, FrameLabel -> {"x (Ang)", "Wavefunctions (a.u.)"}, BaseStyle -> {FontSize -> 20}], "Specifications" :> {{$CellContext`L$$, 10, 50}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{403., {153., 159.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{ 3.5260313968871927`*^9, {3.526031470177381*^9, 3.5260314802028008`*^9}, 3.526031517885706*^9, {3.5260316560245657`*^9, 3.526031703356224*^9}, { 3.526031813644536*^9, 3.526031833703924*^9}, 3.526032116450742*^9, 3.526032418628541*^9, 3.526032582541325*^9, {3.526152656427128*^9, 3.526152674279751*^9}, 3.559309959000165*^9, 3.5599138149106617`*^9, 3.560076986856689*^9, 3.5705548927389174`*^9, 3.5707977996366577`*^9, 3.571161787472816*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ "Illustrate", " ", "Envelope", " ", "Function", " ", "in", " ", "a", " ", "Quantum", " ", "Well"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"u", "[", RowBox[{"G_", ",", "x_"}], "]"}], ":=", RowBox[{ RowBox[{"Cos", "[", RowBox[{"G", "*", "x"}], "]"}], "+", RowBox[{"Cos", "[", RowBox[{"2", "*", "G", "*", "x"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"EnvQW", "[", RowBox[{"L_", ",", "x_"}], "]"}], ":=", RowBox[{ SqrtBox[ FractionBox["2", "L"]], "*", RowBox[{"Cos", "[", RowBox[{"\[Pi]", "*", FractionBox["x", "L"]}], "]"}], "*", RowBox[{"(", RowBox[{ RowBox[{"UnitStep", "[", RowBox[{"x", "+", FractionBox["L", "2"]}], "]"}], "-", RowBox[{"UnitStep", "[", RowBox[{"x", "-", FractionBox["L", "2"]}], "]"}]}], ")"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"u", "[", RowBox[{"1", ",", "x"}], "]"}], "*", RowBox[{"EnvQW", "[", RowBox[{"L", ",", "x"}], "]"}]}], ")"}], "2"], ",", SuperscriptBox[ RowBox[{"(", RowBox[{"EnvQW", "[", RowBox[{"L", ",", "x"}], "]"}], ")"}], "2"]}], "}"}], ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"-", "50"}], ",", "50"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"-", "0.01"}], ",", "0.3"}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\<|\[Psi]\!\(\*SuperscriptBox[\(|\), \(2\)]\) (a.u.)\>\""}], "}"}]}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "20"}], "}"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"L", ",", "10", ",", "50"}], "}"}]}], "]"}]}]}]], "Input", CellChangeTimes->{{3.526031864099868*^9, 3.526031920892576*^9}, { 3.5260319526118402`*^9, 3.5260319579207783`*^9}, {3.526032138154606*^9, 3.526032227718124*^9}, {3.52603243860884*^9, 3.526032533124555*^9}}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`L$$ = 10, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`L$$], 10, 50}}, Typeset`size$$ = {360., {114., 123.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`L$5081$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`L$$ = 10}, "ControllerVariables" :> { Hold[$CellContext`L$$, $CellContext`L$5081$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot[{($CellContext`u[ 1, $CellContext`x] $CellContext`EnvQW[$CellContext`L$$, \ $CellContext`x])^2, $CellContext`EnvQW[$CellContext`L$$, $CellContext`x]^2}, \ {$CellContext`x, -50, 50}, Frame -> True, PlotRange -> {-0.01, 0.3}, PlotStyle -> Thick, FrameLabel -> { "x (Ang)", "|\[Psi]\!\(\*SuperscriptBox[\(|\), \(2\)]\) (a.u.)"}, BaseStyle -> {FontSize -> 20}], "Specifications" :> {{$CellContext`L$$, 10, 50}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{403., {158., 164.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{{3.52603187367076*^9, 3.526031922091002*^9}, 3.52603195931621*^9, {3.52603217404545*^9, 3.52603222987008*^9}, { 3.526032450441494*^9, 3.52603253374012*^9}, 3.526056709858433*^9, 3.5261527000064077`*^9, 3.559309966243876*^9, 3.5599138220518084`*^9, 3.560077017887558*^9, 3.5705549060946617`*^9, 3.570797802315703*^9, 3.5711617904548473`*^9}] }, Open ]], Cell["\<\ [3] Time Dependent Perturbation Theory\ \>", "Section", CellChangeTimes->{{3.558880162123597*^9, 3.558880176788707*^9}, { 3.5614713141646137`*^9, 3.561471344934833*^9}, {3.56147156531428*^9, 3.56147156631452*^9}}] }, Open ]], Cell[CellGroupData[{ Cell["Time-Dependent Perturbation Thoery (Kroemer Chapter 19)", "Subtitle", CellChangeTimes->{{3.526205317831943*^9, 3.526205328035173*^9}}], Cell["\<\ Section 19.2: 2-level system excited by a step perturbation\ \>", "Subsubtitle", CellChangeTimes->{{3.5262053421459*^9, 3.5262053559766197`*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ConSq", "[", RowBox[{"W12_", ",", "\[Delta]e_"}], "]"}], ":=", FractionBox[ SuperscriptBox["W12", "2"], RowBox[{ SuperscriptBox[ RowBox[{"(", FractionBox["\[Delta]e", "2"], ")"}], "2"], "+", SuperscriptBox["W12", "2"]}]]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[CapitalOmega]", "[", RowBox[{"W12_", ",", "\[Delta]e_"}], "]"}], ":=", SqrtBox[ RowBox[{ SuperscriptBox[ RowBox[{"(", FractionBox["\[Delta]e", "2"], ")"}], "2"], "+", SuperscriptBox["W12", "2"]}]]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"c1sq", "[", RowBox[{"t_", ",", "W12_", ",", "\[Delta]e_"}], "]"}], ":=", RowBox[{"1", "-", RowBox[{ RowBox[{"ConSq", "[", RowBox[{"W12", ",", "\[Delta]e"}], "]"}], "*", SuperscriptBox[ RowBox[{"Sin", "[", RowBox[{ RowBox[{"\[CapitalOmega]", "[", RowBox[{"W12", ",", "\[Delta]e"}], "]"}], "*", "t"}], "]"}], "2"]}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"c2sq", "[", RowBox[{"t_", ",", "W12_", ",", "\[Delta]e_"}], "]"}], ":=", RowBox[{ RowBox[{"ConSq", "[", RowBox[{"W12", ",", "\[Delta]e"}], "]"}], "*", SuperscriptBox[ RowBox[{"Sin", "[", RowBox[{ RowBox[{"\[CapitalOmega]", "[", RowBox[{"W12", ",", "\[Delta]e"}], "]"}], "*", "t"}], "]"}], "2"]}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"c1sq", "[", RowBox[{"t", ",", "W12", ",", "\[Delta]e"}], "]"}], ",", RowBox[{"c2sq", "[", RowBox[{"t", ",", "W12", ",", "\[Delta]e"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"t", ",", "0", ",", "100"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{"0", ",", "1"}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "20"}], "}"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"W12", ",", "0.02", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Delta]e", ",", "0", ",", "1"}], "}"}]}], "]"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"ConSq", "[", RowBox[{"W12", ",", "\[Delta]e"}], "]"}], ",", RowBox[{"{", RowBox[{"\[Delta]e", ",", RowBox[{"-", "1"}], ",", "1"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{"0", ",", "1"}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\<\[Delta]E\>\"", ",", "\"\<\!\(\*SuperscriptBox[\(C\), \(2\)]\)\>\""}], "}"}]}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "20"}], "}"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"W12", ",", "0.02", ",", "1"}], "}"}]}], "]"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"ConSq", "[", RowBox[{"W12", ",", "\[Delta]e"}], "]"}], ",", RowBox[{"{", RowBox[{"W12", ",", "0", ",", "5"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{"0", ",", "1"}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\<\!\(\*SubscriptBox[\(W\), \(12\)]\)\>\"", ",", "\"\<\!\(\*SuperscriptBox[\(C\), \(2\)]\)\>\""}], "}"}]}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "20"}], "}"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"\[Delta]e", ",", "0.02", ",", "1"}], "}"}]}], "]"}]}], "Input", CellChangeTimes->{{3.5262053756233473`*^9, 3.526205444047757*^9}, { 3.526205483063484*^9, 3.526205763218452*^9}, {3.526205816699287*^9, 3.526206102483132*^9}, {3.5262061941366577`*^9, 3.526206196774181*^9}, { 3.526206413953909*^9, 3.526206456921604*^9}, {3.526206487016931*^9, 3.526206600213105*^9}, {3.572604523099967*^9, 3.572604531790945*^9}}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`W12$$ = 0.10500000000000001`, $CellContext`\[Delta]e$$ = 0.17200000000000001`, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`W12$$], 0.02, 1}, { Hold[$CellContext`\[Delta]e$$], 0, 1}}, Typeset`size$$ = { 360., {117., 126.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`W12$5247$$ = 0, $CellContext`\[Delta]e$5248$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`W12$$ = 0.02, $CellContext`\[Delta]e$$ = 0}, "ControllerVariables" :> { Hold[$CellContext`W12$$, $CellContext`W12$5247$$, 0], Hold[$CellContext`\[Delta]e$$, $CellContext`\[Delta]e$5248$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot[{ $CellContext`c1sq[$CellContext`t, $CellContext`W12$$, $CellContext`\ \[Delta]e$$], $CellContext`c2sq[$CellContext`t, $CellContext`W12$$, $CellContext`\ \[Delta]e$$]}, {$CellContext`t, 0, 100}, Frame -> True, PlotRange -> {0, 1}, PlotStyle -> Thick, FrameLabel -> {"time", "Probability"}, BaseStyle -> {FontSize -> 20}], "Specifications" :> {{$CellContext`W12$$, 0.02, 1}, {$CellContext`\[Delta]e$$, 0, 1}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{403., {175., 181.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{{3.5262056587770987`*^9, 3.526205670191382*^9}, { 3.52620570111722*^9, 3.526205726440853*^9}, {3.5262057593842382`*^9, 3.526205764157556*^9}, {3.526206080533169*^9, 3.526206103670208*^9}, 3.5262061990179787`*^9, 3.526206457822487*^9, {3.526206580215581*^9, 3.526206601024325*^9}, 3.5593099787805557`*^9, 3.560077048070842*^9, 3.572604500476824*^9, 3.572604532924961*^9}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`W12$$ = 0.02, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`W12$$], 0.02, 1}}, Typeset`size$$ = { 360., {116., 125.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`W12$5276$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`W12$$ = 0.02}, "ControllerVariables" :> { Hold[$CellContext`W12$$, $CellContext`W12$5276$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot[ $CellContext`ConSq[$CellContext`W12$$, $CellContext`\[Delta]e], \ {$CellContext`\[Delta]e, -1, 1}, Frame -> True, PlotRange -> {0, 1}, PlotStyle -> Thick, FrameLabel -> {"\[Delta]E", "\!\(\*SuperscriptBox[\(C\), \(2\)]\)"}, BaseStyle -> {FontSize -> 20}], "Specifications" :> {{$CellContext`W12$$, 0.02, 1}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{403., {160., 166.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{{3.5262056587770987`*^9, 3.526205670191382*^9}, { 3.52620570111722*^9, 3.526205726440853*^9}, {3.5262057593842382`*^9, 3.526205764157556*^9}, {3.526206080533169*^9, 3.526206103670208*^9}, 3.5262061990179787`*^9, 3.526206457822487*^9, {3.526206580215581*^9, 3.526206601024325*^9}, 3.5593099787805557`*^9, 3.560077048070842*^9, 3.572604500476824*^9, 3.57260453336801*^9}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`\[Delta]e$$ = 0.803, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`\[Delta]e$$], 0.02, 1}}, Typeset`size$$ = { 360., {118., 127.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`\[Delta]e$5311$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`\[Delta]e$$ = 0.02}, "ControllerVariables" :> { Hold[$CellContext`\[Delta]e$$, $CellContext`\[Delta]e$5311$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot[ $CellContext`ConSq[$CellContext`W12, $CellContext`\[Delta]e$$], \ {$CellContext`W12, 0, 5}, Frame -> True, PlotRange -> {0, 1}, PlotStyle -> Thick, FrameLabel -> { "\!\(\*SubscriptBox[\(W\), \(12\)]\)", "\!\(\*SuperscriptBox[\(C\), \(2\)]\)"}, BaseStyle -> {FontSize -> 20}], "Specifications" :> {{$CellContext`\[Delta]e$$, 0.02, 1}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{403., {162., 168.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{{3.5262056587770987`*^9, 3.526205670191382*^9}, { 3.52620570111722*^9, 3.526205726440853*^9}, {3.5262057593842382`*^9, 3.526205764157556*^9}, {3.526206080533169*^9, 3.526206103670208*^9}, 3.5262061990179787`*^9, 3.526206457822487*^9, {3.526206580215581*^9, 3.526206601024325*^9}, 3.5593099787805557`*^9, 3.560077048070842*^9, 3.572604500476824*^9, 3.57260453344167*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"cm2", "[", RowBox[{"\[Gamma]_", ",", "d\[Omega]_", ",", "g0_"}], "]"}], ":=", RowBox[{ FractionBox["1", "g0"], "*", FractionBox["\[Gamma]", RowBox[{ SuperscriptBox["\[Gamma]", "2"], "+", SuperscriptBox["d\[Omega]", "2"]}]]}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"cm2", "[", RowBox[{"\[Gamma]", ",", "d\[Omega]", ",", "g0"}], "]"}], ",", RowBox[{"{", RowBox[{"d\[Omega]", ",", RowBox[{"-", "1"}], ",", "1"}], "}"}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{"0", ",", "10"}], "}"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"\[Gamma]", ",", "0.1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"g0", ",", "1", ",", "5"}], "}"}]}], "]"}]}], "Input", CellChangeTimes->{{3.52663970479519*^9, 3.526639921408881*^9}}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`g0$$ = 1.28, $CellContext`\[Gamma]$$ = 0.1, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`\[Gamma]$$], 0.1, 1}, { Hold[$CellContext`g0$$], 1, 5}}, Typeset`size$$ = {360., {118., 123.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`\[Gamma]$17937$$ = 0, $CellContext`g0$17938$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`g0$$ = 1, $CellContext`\[Gamma]$$ = 0.1}, "ControllerVariables" :> { Hold[$CellContext`\[Gamma]$$, $CellContext`\[Gamma]$17937$$, 0], Hold[$CellContext`g0$$, $CellContext`g0$17938$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot[ $CellContext`cm2[$CellContext`\[Gamma]$$, $CellContext`d\[Omega], \ $CellContext`g0$$], {$CellContext`d\[Omega], -1, 1}, PlotStyle -> Thick, PlotRange -> {0, 10}], "Specifications" :> {{$CellContext`\[Gamma]$$, 0.1, 1}, {$CellContext`g0$$, 1, 5}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{403., {174., 180.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{3.526639890619066*^9, 3.5266399228077383`*^9, 3.559309989345315*^9, 3.560077064978401*^9, 3.572604568708846*^9, 3.572608178862808*^9}] }, Open ]], Cell["\<\ [4] Quantum theory of Optical properties of Semiconductors\ \>", "Section", CellChangeTimes->{{3.558880162123597*^9, 3.558880176788707*^9}, { 3.5614713141646137`*^9, 3.561471323495611*^9}, {3.5614713536240683`*^9, 3.5614713685260878`*^9}, {3.56147159539712*^9, 3.5614715961699467`*^9}, 3.572604675273786*^9}], Cell[CellGroupData[{ Cell["\<\ Absorption coefficient in bulk semiconductors and Gain Spectra\ \>", "Subsubtitle", CellChangeTimes->{{3.492861069259028*^9, 3.4928611014194098`*^9}, { 3.496030277369309*^9, 3.496030287282919*^9}, 3.561471413370453*^9}], Cell["S. L. Chuang's text", "Subsubtitle", CellChangeTimes->{{3.493033188297213*^9, 3.4930332216946583`*^9}, { 3.496030297283578*^9, 3.4960303016591043`*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"abs", "[", RowBox[{"en_", ",", "mreff_", ",", "Eg_", ",", "refindex_"}], "]"}], ":=", RowBox[{ FractionBox[ FractionBox[ RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "19"}]]}], ")"}], FractionBox["5", "2"]], "*", SuperscriptBox[ RowBox[{"(", RowBox[{"9.1", "*", SuperscriptBox["10", RowBox[{"-", "31"}]]}], ")"}], FractionBox["1", "2"]]}], RowBox[{"4", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{"3", "*", SuperscriptBox["10", "8"]}], ")"}], "*", RowBox[{"(", RowBox[{"8.85", "*", SuperscriptBox["10", RowBox[{"-", "12"}]]}], ")"}], "*", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["6.63", RowBox[{"2", "\[Pi]"}]], "*", SuperscriptBox["10", RowBox[{"-", "34"}]]}], ")"}], "2"]}]], "refindex"], "*", SuperscriptBox["10", RowBox[{"-", "2"}]], "*", RowBox[{"(", FractionBox["20", "en"], ")"}], "*", SuperscriptBox[ RowBox[{"(", RowBox[{"2", "*", "mreff"}], ")"}], FractionBox["3", "2"]], "*", SqrtBox[ RowBox[{"en", "-", "Eg"}]], "*", RowBox[{"UnitStep", "[", RowBox[{"en", "-", "Eg"}], "]"}]}]}], ";"}], " ", RowBox[{"(*", " ", RowBox[{"Optical", " ", "absorption", " ", "coefficient", " ", "in", " ", SuperscriptBox["cm", RowBox[{"-", "1"}]]}], " ", "*)"}]}], "\[IndentingNewLine]", RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"abs", "[", RowBox[{"en", ",", FractionBox["1", RowBox[{ FractionBox["1", "0.067"], "+", FractionBox["1", "0.4"]}]], ",", "1.4", ",", "3.3"}], "]"}], ",", RowBox[{"abs", "[", RowBox[{"en", ",", FractionBox["1", RowBox[{ FractionBox["1", "0.2"], "+", FractionBox["1", "2"]}]], ",", "3.4", ",", "2.3"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"en", ",", "0", ",", "6"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\<(h\[Omega]) (eV)\>\"", ",", "\"\<\[Alpha] (1/cm)\>\""}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}]}], "]"}]}], "Input", CellChangeTimes->{{3.496029999590694*^9, 3.496030042015704*^9}, { 3.496030072698101*^9, 3.496030100250124*^9}, {3.496030147740657*^9, 3.496030148073421*^9}, {3.496031628005974*^9, 3.496031683323639*^9}, { 3.496031722534049*^9, 3.496031726067157*^9}, 3.496031758086671*^9, { 3.496053296821012*^9, 3.4960535793330183`*^9}, {3.4960536141209087`*^9, 3.4960538832449293`*^9}, {3.4960539302826977`*^9, 3.496053940512205*^9}, { 3.496053986923566*^9, 3.496053991265411*^9}, {3.496054057770998*^9, 3.496054247800026*^9}, {3.496054583830792*^9, 3.4960546018461637`*^9}, { 3.496054699322193*^9, 3.496054716242141*^9}, 3.4960547831627407`*^9, 3.496054954910266*^9, 3.496055083009385*^9, {3.496055168712884*^9, 3.496055173322484*^9}, {3.49605524849778*^9, 3.496055328936523*^9}, { 3.4960554491305227`*^9, 3.4960554577230663`*^9}, 3.496055496843584*^9, { 3.496055547434701*^9, 3.4960555477724447`*^9}, {3.49605565614192*^9, 3.496055656534733*^9}, {3.496055829282629*^9, 3.49605583106604*^9}, { 3.4960560149674273`*^9, 3.496056022710022*^9}, {3.496056125273325*^9, 3.496056132375411*^9}, 3.496056224249825*^9, {3.49605630050721*^9, 3.496056335494203*^9}, {3.496056365661442*^9, 3.49605636591778*^9}, { 3.496056455804118*^9, 3.49605645660961*^9}, 3.496056601635557*^9, { 3.49605669446906*^9, 3.496056754687234*^9}, {3.4960569698990307`*^9, 3.496056977722048*^9}, 3.496057059089107*^9, {3.496057098729702*^9, 3.4960572703542356`*^9}, {3.496069347221929*^9, 3.496069352033288*^9}, { 3.4960695675086193`*^9, 3.4960696283299427`*^9}, {3.4960696622730837`*^9, 3.496069696272544*^9}, {3.4960699660849867`*^9, 3.496069984242983*^9}, { 3.496070038569968*^9, 3.496070043568925*^9}, 3.5274045728564672`*^9, { 3.527404731172083*^9, 3.5274047338913507`*^9}, {3.5274047754992228`*^9, 3.527404777869869*^9}, {3.527405037715687*^9, 3.527405043090559*^9}, { 3.527405705184717*^9, 3.527405709769799*^9}, {3.5274058320284243`*^9, 3.5274058717153683`*^9}, 3.527405988296564*^9, {3.527415636349245*^9, 3.527415672563263*^9}, {3.527415740053523*^9, 3.5274157596779213`*^9}, { 3.527415832461267*^9, 3.527415832994376*^9}, {3.527568123789497*^9, 3.527568149592991*^9}, {3.562352237271841*^9, 3.562352237655164*^9}}], Cell[BoxData[ GraphicsBox[{{{}, {}, {Hue[0.67, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJxTTMoPSmViYGAwBGIQ/cM7b25AfoMdAxS0pahrnFeLs4fxz757ktWrlgfn f9js3JOjVgfnN4l9lolR64PzTx/3ehqsNg/Oz19QdtJfbR2cf7CnZ7ev2j44 n5WtiP1l1nk437M+sXVr2HU4f3tl6t2lF+/B+TejsvWLyh/D+YLuvWkHHZ7D +QJXUjeZR7+G85UVcla2Jr2H8y3u5p52nPQR4Z5fDT5XZn+G869IFn3LX4zg P7NIXsC9GsHnKXf94rQLwQ/7zDln4w0E/9XrSa/7RL/A+SJ3l3R59iP4an+m mjydhuBbSrffa5iH4MdFZhrtWIvgr7yqe0vtDIJvd26bJgvnVzg/Y/+JE/ua EPyflgJKJl0IfteW8OqVExH81Suf6U5ZgOC/m8wyOXMfgl/P5/Pm3lEEX6Bz smvIWQTfsE7ph90dBL8kwyFW5BeCz/q4fVsn4zc4f1rsef7/HAj+9qC4Qy/F EXyPs0ul4+UR/Bvub0uuqCH4v2xq1PebIvjd2w83mNgi+DJG3LdWuiD4a9YE Gcv7IPi26rN6pgQj+OcWPnzKGY3gH9mibjQhDsEHACuPyEs= "]], LineBox[CompressedData[" 1:eJwd13k8VN0bAPAxY+4MeZNSY4+skWR9KdwHFUmhN0uWLCVCjXoRWlAoZMvS JrskS2ULiUhSqWyz3IpK8qKUVDN2v9Nv/pnP9zP33HnO9pznKHgz9/iQSSSS qQCJ9OebLlF8zfgoDx948uXUK/0ciBKr/3H4GA8fFy+uq/ycD2IXl6zfh/Hw i1LGvQPKJVCAWRbtjeLhMuabg/87UAY60ckLz87z8HumLbZewnfg8RzLEU/h 4YEL9O4JpXuwN1T2bk0WDz9+Ec6U51TB8ORBIfUcHh5Dnlj+brYasJGfD8Qr eDhzjva2nFkHlz23rE6o4eHbyM4p+1Pug9rbs0eXHvBwq8+16ml59bCjW0xh /DkPl5zn4gdyGuFio1ZcyygPvx5pbZ+h1gyy+ife603y8EcBcf67p5uh8k6z 4W0+D+9cu+Z1dWsLvC7a9SUD4+PJn0/uLsl/BCtTAuz8lfg4U8br+HtqGxQK VZe+1+Dj3T0q7oX72kAvZpbsoMvH7ySbf44pawPH8Pha3JyPP2GSM8jWj+Hq gRKp1Z58/ILcLnH14HYI3CnRtsGPj8cuXZBVa20HU934w1uD+HiJMN2gQOQJ DJED6v+N4uM169stbHKfwIaCjY69eXx8oxr/NlbbAc0fatNSPvLxn255C0Nl nZDaqWJUMsbH033EVM+MdIL33csfmn/wcevlkW24/DOgRYVrfROYxiOe66rb pj0Du7UmL23WTeOhEz+7jf2fwyf3drrwgWmcIfKlK3ruBdRt07+rEDCNn3Dy uvlFvQsuaN50Mvp3Gl/mn7fiyb4u2LBw/qbfuWn8OnVWrq+2C0Kzd259WjiN a6840Fzh+xLob3sjY4ancTV2Re31mleg6fyRt+gzgxfKyhS8jOqG7JX4YuKR GRwr6Th/PbUbhF9mUyVDZvDdFkP/bM/rhlEzZ3HdmBm8QsIgU6+lG4o0Xmv7 FszgrU9T3kTNdYPUUlPg68EZfDz2ja7R0R6Ib5AKdhuZwcUKsgWWneqB6X/D To5NzODk6J/MR/E9wBrVTaAszOD69Pp0TlEPpPbeLvlbehbPlSh3f0T0AHbz ylCu0yweaTO+rM20F0I8eWMbPGZxP+O24F/WvTAstfdHw6FZnP2o01PUqRda U0RJ/SGz+CUZ1a6lo71wKjxOlp4xi49pcH733OiFKZtg56DuWbzesNkliN8L gz9tX8GOOfzKt91mItl9kCzNUQyyn8NfFh8nJ93sA1OL/eG5++bwjTyxTzN3 +yD3UqDS4uE5fHxr8+srT/rAUzs+4kHCHD5yS/Dp5EQffDrapmLQNYfXfM5w 1tnSD6NjepEatvO4x+Cdf5Se9cMVsaZ+F6d5/D8BnZzInn6wMrJQT/CYx+9/ SDbsIvqh9II9a5Q5jyd8UvxgNN4P/qpHNW6mzuPs7W8i/IVZMHGwhCPfO49P bZ+/usWKBVPvJTetcVjAS/TMyF6NLJA/wNdb676A4w/Gg5cescB2pN9IzWcB 71NM+Cv9KQvKv6ZYbA5ZwBtHm6jX+llwaIbqtD9zAReq7nRe/40Fb1ZOnb7J WsBdZd4Ke6xlQ+u25y8MHBdxV9hqeSuCDZOdJd34/kX889djT1ZEsUHOJpZl dWgRb9MavBsUy4aIPfDeJXQRVy5iiTBS2aDnUTd1JmsRN7TvO7NUxIZbYQWS T9mL+Orv/5JtXrIhtSzC18lpCX9jmHZSR4IDrgLbulj7l3BMUOmQkwwHVJxE tfceWsL7+AzbUHkONJGLZu1ClnC9ZEezAjUOjO57mWSdvoTHXvUrqTbkAE6X rzF5vYSvD9DG2504cKLKm3RJkQRSRj7GnDQOuA081bFXJcFT79KbNpkcMKdr +qzQQL/zXzAeXuGAyH7+s2QdEqx0LtVIyeVAgdDF9EQzEriI3fk4Xc6BV561 KrEeJIjbm3RttAPFJ0rfFXadBLcyt1j78jlQPhl980IuCaYkEijxsxzQ6Z1b ulJIgn0pu7nFCyi+zO9VDWUkCCpP/NFN4YKzNEdi7gEJ9o5RKyZEuZCgenP4 9DsS7Hd7G2ipyoVv+NZT52QFYB/TKev2Hi4EKzSz0hUEwH5+cdrYgQuzZEOt ImUBCIpX3fHCiQu0Do2hdk0BULLVfvbWjQvyNqusMFMB2LrTZbTrEBf2OA+t it8vAHtLY879CudCXVBUWXKuAKT80DU+cwP9/4PJmn2FAvC4iiUSkssFD8yr WalEAF5/6h/yy+cCPdusp7FSAKItGJWWxVxweUrmjzwUgOG6FPWhci4sysaa 4+8EYCrV8XvSAy5sexFPfJcgQ3GciTLB5oLUmtmhRhkynBY5knKCi/rn6f81 Vp4M2XJNR1a94UIWz3pJWo0MveeN0i0GuDCqIKJs9TcZ6KqbuLGfuHAxLDko z4EMGvX07xnfudCvnE6zv0QG5RHd9B9UAnaoShgeySKDwTom05NGQLPaDb/4 a2QIat3Q2EUnoFSj5FlrARkWfXxv3VhGwBntB4k61WR4zd9moSBGgJrJJ1Hx fjIctb1tUiVNwA1TP9jEJUO3nFnMjAwBK2EiyOYdGUpS5wJM5QhYMOf3xAyT wfnpO/VWeQJ6rZZl/P6F4m9xa7itTMCpvboSnNUUiDijVbhCi4AfDvVWPyUp 4C39y0V3EwGHnEzCReUoMDA69PEfbQLsXSzfWKpQYPbABr9kXQJUPF2z6w0o EK0rXDD2NwHdAefkrzlRwPHogNQWIEDpXJ+a+1UKSBpqv3G1JcC5iqJ96AYF Mm5QvY3sCLj4UdeImU+BxF+xUqvtCfiNZ+yILqXASeX1Kk/3ENAxv9e/uIEC wTm3Pq12JOBwKLtsgqDASh+fFx5uBOQUYzW8AQoMmp9wUXBH/es3aFr6SIEg uvuWj8ibdS93iY1T4F1e4qyrBwEik04T+rMUaDivXWziTUDlYWLjGSlBWKbx zrnal4ChK0J/n5cThK0mL766+BHA6DTCU9cJglr97CTpMAFRKtdsC9QFoUDL 3d7KH43HJ5egjs2CsFkurKg9kIBfbu/uLXcVBEXGCbmQYwQY2b3Xy70uCE5A MmkNJ6BplDrhnSsIlD275HQiCDCN3lCsUigInH6n3nzkrVXhqytvC4LGkaL7 p08SsFtcnNfUIAhTFm1XVU8T4M21uv+GIwh69X5dW6MIGA5iMnPeCsKeau/A QmRfoSxV7/eCULMmcIoUTUDg5k+Xx0YEgR9jW1uPHJp9Omz6N4p/7pSB9DkC Ej2rjNaIU6F3paJiRSwBy2e4PwgGFah6u8pnkVPTlkpvSFPhikmwpmUcAVlt NlLKilSouYXJDCDnKf03q6tDhZ0tqzvnzxOw7uFf1Xx9Kizw6VrmFwgodtAL eGBEBaX+f7PikG/HRb81N6NCYwDbXySegJpR6SZ7Oyosd83cLpJAgEG0efDq vVQoOCf+agdyg+ThDYQTFW7IGO6PQ262rsv29KDCiZzA7HnkznK708yjVLC2 ti4fSCRgICjWNOkiFa4/kf51PIkA0qNHsgWp6PnjPNdiZCXR+fm6DCrscXGu ZiP7Vxx/8CGbCveCmPoGyQRMj3kY6lVQoWVVZ8kosrTRdcaOe1TodG4vX5mC 5usCm+deS4Uc+xu3tyDHquyqPf+QCuS54MwE5JUHNuu8fUkFio+LpUwq6k9V iNhkDxUkj3zWMUXeJ3BvUpCNxtfLSt4DOS9X9c7GQSpktMwI5iA//uadbDGE 4ikPXXyAPGKSc8R5hArByWqLXGTNd+Ibzn5D81UWLr4ijQA7Dbtll6eoEPTR WFMdOTgicbyMR4VjlNN2FsiNEuRS1iIVvj2vaDyOPOhrcmGcjIGpXD0lHlng fpjvEoaB1cPjrjnIVg7fldeLYpDuILelAzmgSJ1qugoDgy9yT7jIyT99hvcw MBinf/caR64yz3/sK41Bm0/6yjlkVtq7glNrMUiJFOUKX0Lj+YFxNk0Rg6vZ PtWSyDKb/vG6qYqB68usYlVk71fP1nZrYeBeeqEXkONkqUvDuhiIhm0TtUEu DYTBmb8x6ChiHXJE7npw8uFyYwzybPTeeCBPCt/PVgQM5Lxc/f2QV7lMnTTc ikFLqYVEELJBqabrLisM6p4MD4ciu0z7bfa2wSBKU7/nFPJpyyLJE3YYROup D0Yj52W9n07ci8Ft4XqROOT2z1LcPGcMxJp73OOR/9NzvF/rhtobH+5NRBaO Sct67omBhAMzIAl5Y19XyPuDGHQ39K1PRrZfR3f45YcBQyB2+R8HH7PQEzqC gUNJkNSf5688OrNK7hgGJ1ac2/3nfQ9EG6d0QjA4E19SdgF5cP/vHstwDKZ3 dOrEIpMrN91zO41BQsir4Shk5YWA1GPRGATLFrSdRLayKWHGxWIgaK7+MgQ5 8PrQ7uvxKL5+GyoTOWVcduPdJAwy674F+CJXGe3760kaBu9afgr8GU+lqYTs jEwMAjL/Cfgz3pm3mzQOXsXgkqej/C5k7MC3Rt0bGDpHqxUskMOk5a0p+Wi9 kOWDDJHH++yJ3iIMvE/tEdFEdr14zq/gFgZ3dZd48simCyNxZncxqFfKasSQ 79ZKrBGrwaD/zeeMabR+FI5aF3+4j4Has4hHY8iC7yseR7ZgEM8zWP4c+cWj YFLzKwxyfBQun0U2Dr+ZktSL1t9c53ImcqU2V86djYFKj+qAC/Klgi0m8wMY BDnURW1Cdo4hR2yewGDBM/t3H9pPz431hIR/YPC1+IL+n/225bfPFeIXBrsI Zk8+styhZ3Vh8xi0xz5eewR52DL1Z90yGixv8FObR/vdkdR2Nk6UBrWSUi6D yE/rf4o5rqJBRNLA1xbk2+udNv2WosF3X0nDaOSgZXJHdNVpkDxUFzqP8svC q7KRO1Y0EPz0S+ZPPjp6fiAk0oYGjYbbSyuRP+CiVFs7GrRL7MuLQ26/e1zx mxMNvNUke/SQEy4ZeW7wpQHQDHclXCRgjeNT4lYsDZTY+VpSKB9uNy4Cn3ga hEiKFoyjfHliXXSJQhINmE9akhqRud82h1zLoMHY89leZ+Tr5ytXXCykgYOD imIKys/yDZmWzFb0/jzGzk8ov6vLHKzVX0DxM1WVNWPQfiKbyUyR6PDPive1 E3/Ok1HZc5WCdBjZ6vm6AvlrDcdOVYQOPyVTczYg39m186uENB38v0Gj0lkC 9CJ1FOcNUXt3G+ulSALwIVJaWzAd9I8H9nii829F5JRcdxgdvGiCTSLIQ9LD 5QOn6GAGoer16LyMcXjaOR1DB/N9vIy/kJ93JpG0MulATFyprApD83NHKuh6 LR1c1247OBKC9sMpPdtgHh3CN38x5jMJuLrG7y+VMCH4sH1SmYvqgXoZu53f TgpBIF9EOwiZu84wvi5SCDQT1MdoyBJadKrleSF4q3XXy8ALnYeWt+Z9s4Qg yeXFqRRUX2SEjX4prRGCF4H/5uug+iT5jd9zzR9CkH6/ocPUgYCzOYfP6/sL g38B59aZ7QTo/v+zDOKyImePa6B67tWVjuSgZaCTLuusrYjy09H0SdnjIjCU vL1sfp4LX7zUJPZ5/wXU6OO2U6heTVwYFxw8tBxM7Q3jG8u40PjV8vtyF1Hw KjB5iJ3lAlvZcGiz0gogJZhOGTtzwW/9Aa304hXw27twg746F1odXU+ayYlB T3Cv0uAiB3Sdx0vF88Ugr39w+53XHAg8t51jIr0SoplTL68XcuDCIfqsQPpK WLbKzO5sGAceynotjYuvgop7J+xI1hxoWIyjqCevgoZGlbVjcug+Um0xniQm DprdLx0KJ9nwRP5Qx8VL4tCqqLK7+jEbYu475H8UXg0+b7kdFtfY4Lbu3X7X pNXwX5VE1cgRNszVaUlr0NbAZTFVX+FtbDhFGevKPLMG7iksboqTZcMaJSMv ZRIDPqa7hW77yYITRx1/CYczIOPuXBqziwUyBgc7VU4yoLVJNezxCxY8WjiW bX6aAcaJrMMMZOGkpK0R0QxUv9xntjxjQU5Ze8ZYPAP2hOZSV6D7aMeojn7n NQYILgeX6lYWiB8QDY1tYoDYqvJb5PssaFCXtc5vZoBRaM6SUx0L9k+pyz18 xIBKurR3RS0LbkVv7/jVzoDTZ6t3ONewYEve6TUHXzIgRsC3sPIeC7wHvtSZ D6L35S9GuZezgFY8k7D/AwNC9EpTq8vQfTiQ5hExxIDHOR/KhJB5c+toVSMM uBTJE6wrZUGClIuTwnfUfrLVTLSEBVpDvhomPxjQ1MKu8LnJgv7SkCXnnwww cQtXbipmgZxRWkkqH8V30O/vw0UseEzKPVk+w4Bacm1PSyEL/DrLbTvnGNDe k3JiDbJIaqPi8AID0kan1Y4UsOCeUyd/aYkBn90mPz/OZ8H/AJIcVSQ= "]]}, {Hue[0.9060679774997897, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJxTTMoPSmViYGBwAWIQ/cM7b25AfoMdAxS0pahrnFeLs4fxz757ktWrlgfn f9js3JOjVgfnN4l9lolR64PzTx/3ehqsNg/Oz19QdtJfbR2cf7CnZ7ev2j44 n5WtiP1l1nk437M+sXVr2HU4f3tl6t2lF+/B+TejsvWLyh/D+YLuvWkHHZ7D +QJXUjeZR7+G85UVcla2Jr2H8y3u5p52nPQR4Z5fDT5XZn+G8zP2nzixr+kr nD8zebmUaMJ3OF834uG3f6k/4fx7n/3POXj+hvM/3Zc0EAv9C+dPWF2VHh7+ H85X4+fwrZjN4ADjbytoWN03nxHOv6I6mT1wEhOcr9J8WSN2JjOcbxlw32T+ bBY4/25Bq11vDyucv8kykvfoRDY4Xyzs+M0Vrexwvv0jhomHSjjg/JliGbxq FZxw/g6ZAO931Qj+DSWLzm31CL6EPgerezuCP819xZ/0aQj+lIoXr1duQfD7 bmWc0v2I4K97EMDx7QuCf/aZhdu+Hwg+z2eOQ34MXHB+N/fKnfn8CH6HzcsV G3UR/KZ5me2mWQi+U3TaG788BJ9ZIjkwowjBb5kYIz27CsFva/Ffz9CN4Hdm mV4/vRrB91I3snm6HsHneqK38N9mBL8rViPbcA+C3xMg/X/aGQR/ghmjetJb BD/g89/u6o8IvuCGXx+mfEXwJ2l+2XX8L4I/Wea5ny4fN5wfcvPxZjchBF9k 2gOJBDEEfwr/rUeT5JDUn7nmvkYJwRftvLzmqBqCf831guB9LQR/GtPZsh96 CH7Y/pO3BY1x8wExOez9 "]], LineBox[CompressedData[" 1:eJwV0H04lAkXBvCnKNYzM2aY5kmiCBWiVkmk7oeSvnu1JGSQj5JNKbSsXoSi iFATUkNeKn2oKCqEFW8UUbSiKCUUMsYgZmf/ONe5fv/c17mPloe/ndd0giBi ZfPvpv6shsFKEh2bfDjrHYvRalaZs86ChHuaN/M6qwKCkTIl17UkPvgoFAcu robj3cf+wdYkti4UvmJm1ELNv7g5cQOJyd19wiPZdfjboGjV9c0kjjbrnK9y fYm0nruZldtJFHHX6a8cbIBTzm259p0kvFffTTad8wrqHvn7xLtkJlPFp5Y1 IaMt59fFbiRmOTRHRZq8hosg64KVJ4mobL6qmfYbzLW//NN5Hwm9py6BpTNb cOmFoDrhEAkqTIl3qbAVc4shl3qURKH3fHrm8bfIyO5Zm36MRDk/iT8DfyP9 mFlxbjiJ5kjNDe1323BRu/VGeSIJnWOPhIb8DsxmhvdUp5AY/eT0WpN4D8Ho Qt16AYkUu5YlkZfe40JdcObbKyS+jTQELPf5gNQgKunHHRLWaq3tN2M6wXUv q5fcl/3j4et4u+edSNnsoyR9+G9fyD9ndSF5/oMT5FMSv6gsSfQ914Wk/zsE 6TSS+C3haER6/EfEa553dhgi0VAob+3r3A3GL2sELiOy/kf2FLYndePMcHez xxgJU7HXo2vPunG6ZsU2/2kMRM68Xeu67DNiA17jFIeB/TlbPB9MfkZ0NVev ZBkDs758qdwT1oOwg8mDGgEMVCRNuucZ9GFTxbL2jkAGFpy4JWnf0YfZvIba y38wsKl5xLQ+sA/3nzCytSIYOHxCat5e2odeRoy9biIDr5IaMju39sPxxrES w1sM9HrmihzcvmF5z54oi14GBChVzHUZwPTVPw/9/MbARql5YEPIABrOpu15 MsTA8KiiXL1gAAdWtpiuHWPgiO2jLLp5AFkxO75aKTKxyPJeZrLOINi61ts2 6TExcNmNl5s6iD73RbN3ezCxdPthBcn+ITj5tRkc8GbiYvB5vbLgIdQEJawN 82UifcHJqCPRQ8g5LfIWBjDhu8yj7OqVIfALywu/RjLh3BVkb/RmCE2Ku3eG ZDOx4vbsfPk1P/DodmxC+icmrF06GxumDUO/ZHXWzR4m1qyUv5PIHIagaqCw rJ+JhDnN6VZqwwh8a9/+UcREV9CkStjSYRjLaRsazmDB3evo/7a7DiPboaT2 sS4LqwbTnU88GMbpyV75Dm8WyIkzKk1uItgeTqm57stCUBT//W5fEeS7Lc8E H2SBdbrIsOWICMfrElU5QSz8VrsgtjBGhEPpptrrolm43vyQkMsXwWFV5Nrr 2SzUR+ya910kgnagWkjQBxb0C6Z6vMNHUNK/YYDlpIymnx9zT4aLYZqQEVez Rxn2HlYbB0+Kcdd4SDfSXRlxN0zy7M6KcS0gzWVknzIuGN4qk88UQyDpr20L VoYw1HPlvEdiBMmfu5qXqoxKddbC5SIxTOa+223VqIzDYS/qOR6jeKNr1mWu w4ZOpHsIy0iCT41+1tBjY2a53Afhcgl+hAmvrl/EBlPtaJOxhQTKb5R8dhiy Ed3REWZhK4FtTHuf13I2NjDVU1U8JCj5HDmSuI4NIxP5jX+lSHA5t17xiycb b6uIfd5iCfYt3mucnMOGm5H4YdWNMWgqJfcE5rLxvDx+Qd2dMTT1Vggdr7HR J1wveVk4hjX52lzNm2y8mhz9Vlc2BlXjLknefTbO/AzxzWgaQ+ly94rSSjZC FTIEKeNj4IJv39vJRst4khNhM46nDs6htCYHKpXbNf2axlF9blbNlvkcKLbm +U9rHUfdi5dcR20OiuZLfJLfjaPVZt2tg3ocXJ9UdrrZPY5B0yWd6UYc2Bfs TC8eHYcmJbURr+HAf023pan6BEJaslRu8DlwuDSS0MyfgIlj7zWukAO7nsEH lh8m4HfCpsVSXQXl3Kl+tfs/ccpbcXxasgoM6vvb8rwm8UTDXdrLVcXQvO9e GkpTKJ6KkdNPUIUWe1PrjvgpvLhn3RvP4cJl4c7SrzOl+Gu+d/WZc1w8F6ho /tdPiqgH9sJOpVlYHDtYkPxEChftd67O8bNge+FSka08QU8UGasbKPDgZlWs NaVF0H/Kfa1LPc5DpkZnWqU5QU9Zm5MZ4TycC5zB17Mg6Iio0xuzInn4WHCv 7ZTMMTOMqm/F8JAktZZuWU3QZxWOlD1L4KGhceNwoyVBZ5GTBWOZPBipbrn9 AgRdq8q5sKeMhwzD0MAUG4Lm6axy1yUoTPw+8tHxPwSNi9GjitMp2L1k+ebI vJ/1Kr5fjkJIYnjxkMyPJb4l9xQoZAle34+1I2iP+gxVK2UKsVs05j/YSdC3 gohqV00KXRtuv1dwIGib2mf6gtUUXKetvx/hRNDBBx1ESn9Q0IkIZb/zIOi5 pp41eqEUQs2CuAv2EnT55OEMqzBZntlQ236ZleLj14VEUBCbfC4Uy5x5oyrl ayyFuArzi0wvgq7u+XVFTRqFrWeqzJb6EDR3r3JQ9GMKvdrGBRsPEHSxvsYm YSmFO6kf3WJldv2hr/mknII+v7ulRua8CJtqURUF+xfr527wI2iLK2E8z3oK I4vzptG/y/q19xVZdVB4/Haxo74/QSvkjMW5fqBwrwJx3jLn+ynwQ7ookCGH orNkFk9oK9z9TGFFa1yL2iGCjpvjtEtrgIIn/ejbjMMEbdzlY2A5RMFc7toB yNx8LVDqOEwh/EvCvRCZNVcl5SaOUiiOKhB+l7mSuByaP0ZBa7Ou7aIAgt5X k7+9ZkJ23zbpQ3eZGYklCz5NUvj6zUmUJnPBrppRqZSCU+DO8SaZ/wHwLNuz "]]}, {}}, {{}, {}, {}, {}}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesOrigin->{0, 0}, BaseStyle->{FontSize -> 15}, Frame->True, FrameLabel->{ FormBox["\"(h\[Omega]) (eV)\"", TraditionalForm], FormBox["\"\[Alpha] (1/cm)\"", TraditionalForm]}, GridLines->Automatic, PlotRange->{{0, 6}, {0., 134746.49722949677`}}, PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}]], "Output", CellChangeTimes->{3.5275681508705807`*^9, 3.5284473098768253`*^9, 3.5303909652013197`*^9, 3.562344191728129*^9, 3.562352239001066*^9, 3.573483495448781*^9, 3.57349152728646*^9, 3.573701636468485*^9, 3.57382120827256*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"fc", "[", RowBox[{ "en_", ",", "mreff_", ",", "mceff_", ",", "Eg_", ",", "Fc_", ",", "T_"}], "]"}], ":=", FractionBox["1", RowBox[{"1", "+", RowBox[{"Exp", "[", RowBox[{ FractionBox["40", RowBox[{"T", "/", "300"}]], "*", RowBox[{"(", RowBox[{"Eg", "+", RowBox[{ FractionBox["mreff", "mceff"], "*", RowBox[{"(", RowBox[{"en", "-", "Eg"}], ")"}]}], "-", "Fc"}], ")"}]}], "]"}]}]]}], ";"}], " ", RowBox[{"(*", " ", RowBox[{"CB", " ", "occupation", " ", "function"}], " ", "*)"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"fv", "[", RowBox[{ "en_", ",", "mreff_", ",", "mveff_", ",", "Eg_", ",", "Fv_", ",", "T_"}], "]"}], ":=", FractionBox["1", RowBox[{"1", "+", RowBox[{"Exp", "[", RowBox[{ RowBox[{"-", FractionBox["40", RowBox[{"T", "/", "300"}]]}], "*", RowBox[{"(", RowBox[{ RowBox[{ FractionBox["mreff", "mveff"], "*", RowBox[{"(", RowBox[{"en", "-", "Eg"}], ")"}]}], "+", "Fv"}], ")"}]}], "]"}]}]]}], ";"}], " ", RowBox[{"(*", " ", RowBox[{"VB", " ", "occupation", " ", "function"}], " ", "*)"}]}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"fv", "[", RowBox[{"en", ",", FractionBox["1", RowBox[{ FractionBox["1", "0.2"], "+", FractionBox["1", "2.0"]}]], ",", "2.0", ",", "3.4", ",", "Fv", ",", "300"}], "]"}], ",", RowBox[{"fc", "[", RowBox[{"en", ",", FractionBox["1", RowBox[{ FractionBox["1", "0.2"], "+", FractionBox["1", "2.0"]}]], ",", "0.2", ",", "3.4", ",", "Fc", ",", "300"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"en", ",", "0", ",", "6"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"-", "1.1"}], ",", "1.1"}], "}"}]}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\<(h\[Omega]) (eV)\>\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"Fv", ",", "1.7", ",", RowBox[{"-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{"Fc", ",", "1.7", ",", "5"}], "}"}]}], "]"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"fv", "[", RowBox[{"en", ",", FractionBox["1", RowBox[{ FractionBox["1", "0.2"], "+", FractionBox["1", "2.0"]}]], ",", "2.0", ",", "3.4", ",", "Fv", ",", "300"}], "]"}], "-", RowBox[{"fc", "[", RowBox[{"en", ",", FractionBox["1", RowBox[{ FractionBox["1", "0.2"], "+", FractionBox["1", "2.0"]}]], ",", "0.2", ",", "3.4", ",", "Fc", ",", "300"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"en", ",", "0", ",", "6"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"-", "1.1"}], ",", "1.1"}], "}"}]}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\<(h\[Omega]) (eV)\>\"", ",", "\"\<(fv-fc)\>\""}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"Fv", ",", "1.7", ",", RowBox[{"-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{"Fc", ",", "1.7", ",", "5"}], "}"}]}], "]"}]}], "Input", CellChangeTimes->{{3.527568212122666*^9, 3.527568230135042*^9}, { 3.527568961456242*^9, 3.5275690241521053`*^9}, {3.562352250808148*^9, 3.5623522512166777`*^9}, {3.573701787611841*^9, 3.573701805814208*^9}, { 3.573701873490337*^9, 3.5737018790983667`*^9}, {3.573701946840543*^9, 3.573701947211879*^9}, 3.5737020304413347`*^9, 3.5737027394017267`*^9, 3.573702836865329*^9, {3.573703128955287*^9, 3.573703188079949*^9}, { 3.5737032599928493`*^9, 3.57370326757612*^9}}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`Fc$$ = 1.7, $CellContext`Fv$$ = 1.7, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`Fv$$], 1.7, -1}, { Hold[$CellContext`Fc$$], 1.7, 5}}, Typeset`size$$ = { 360., {111., 118.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`Fv$6122$$ = 0, $CellContext`Fc$6123$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`Fc$$ = 1.7, $CellContext`Fv$$ = 1.7}, "ControllerVariables" :> { Hold[$CellContext`Fv$$, $CellContext`Fv$6122$$, 0], Hold[$CellContext`Fc$$, $CellContext`Fc$6123$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot[{ $CellContext`fv[$CellContext`en, 1/(1/0.2 + 1/2.), 2., 3.4, $CellContext`Fv$$, 300], $CellContext`fc[$CellContext`en, 1/(1/0.2 + 1/2.), 0.2, 3.4, $CellContext`Fc$$, 300]}, {$CellContext`en, 0, 6}, Frame -> True, GridLines -> Automatic, PlotRange -> {-1.1, 1.1}, FrameLabel -> {"(h\[Omega]) (eV)", "fc, fv"}, PlotStyle -> Thick, BaseStyle -> {FontSize -> 15}], "Specifications" :> {{$CellContext`Fv$$, 1.7, -1}, {$CellContext`Fc$$, 1.7, 5}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{403., {168., 174.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{ 3.52756823475089*^9, 3.5275690261517763`*^9, 3.5284473139073133`*^9, 3.528447483059758*^9, 3.530390971379539*^9, 3.5623442196923923`*^9, 3.562352174968663*^9, 3.562352252849524*^9, 3.573483499912902*^9, 3.573491531833798*^9, 3.573701639390003*^9, 3.5737018090718412`*^9, 3.573701881300618*^9, 3.573701949137917*^9, 3.573702033744385*^9, 3.573702742386011*^9, 3.573702840346023*^9, {3.573703134876112*^9, 3.573703151779523*^9}, 3.573703189497004*^9, 3.573703269568445*^9, 3.5738212025970583`*^9}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`Fc$$ = 3.085, $CellContext`Fv$$ = 0.30000000000000004`, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`Fv$$], 1.7, -1}, { Hold[$CellContext`Fc$$], 1.7, 5}}, Typeset`size$$ = { 360., {111., 118.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`Fv$6156$$ = 0, $CellContext`Fc$6157$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`Fc$$ = 1.7, $CellContext`Fv$$ = 1.7}, "ControllerVariables" :> { Hold[$CellContext`Fv$$, $CellContext`Fv$6156$$, 0], Hold[$CellContext`Fc$$, $CellContext`Fc$6157$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot[{$CellContext`fv[$CellContext`en, 1/(1/0.2 + 1/2.), 2., 3.4, $CellContext`Fv$$, 300] - $CellContext`fc[$CellContext`en, 1/( 1/0.2 + 1/2.), 0.2, 3.4, $CellContext`Fc$$, 300]}, {$CellContext`en, 0, 6}, Frame -> True, GridLines -> Automatic, PlotRange -> {-1.1, 1.1}, FrameLabel -> {"(h\[Omega]) (eV)", "(fv-fc)"}, PlotStyle -> Thick, BaseStyle -> {FontSize -> 15}], "Specifications" :> {{$CellContext`Fv$$, 1.7, -1}, {$CellContext`Fc$$, 1.7, 5}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{403., {168., 174.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{ 3.52756823475089*^9, 3.5275690261517763`*^9, 3.5284473139073133`*^9, 3.528447483059758*^9, 3.530390971379539*^9, 3.5623442196923923`*^9, 3.562352174968663*^9, 3.562352252849524*^9, 3.573483499912902*^9, 3.573491531833798*^9, 3.573701639390003*^9, 3.5737018090718412`*^9, 3.573701881300618*^9, 3.573701949137917*^9, 3.573702033744385*^9, 3.573702742386011*^9, 3.573702840346023*^9, {3.573703134876112*^9, 3.573703151779523*^9}, 3.573703189497004*^9, 3.573703269568445*^9, 3.573821202640596*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"gain", "[", RowBox[{ "en_", ",", "mreff_", ",", "mceff_", ",", "mveff_", ",", "Eg_", ",", "refindex_", ",", "Fc_", ",", "Fv_", ",", "T_"}], "]"}], ":=", RowBox[{ RowBox[{"abs", "[", RowBox[{"en", ",", "mreff", ",", "Eg", ",", "refindex"}], "]"}], "*", RowBox[{"(", RowBox[{ RowBox[{"fc", "[", RowBox[{ "en", ",", "mreff", ",", "mceff", ",", "Eg", ",", "Fc", ",", "T"}], "]"}], "-", RowBox[{"fv", "[", RowBox[{ "en", ",", "mreff", ",", "mveff", ",", "Eg", ",", "Fv", ",", "T"}], "]"}]}], ")"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"abs", "[", RowBox[{"en", ",", FractionBox["1", RowBox[{ FractionBox["1", "0.2"], "+", FractionBox["1", "2"]}]], ",", "3.4", ",", "2.3"}], "]"}], ",", RowBox[{"-", RowBox[{"abs", "[", RowBox[{"en", ",", FractionBox["1", RowBox[{ FractionBox["1", "0.2"], "+", FractionBox["1", "2"]}]], ",", "3.4", ",", "2.3"}], "]"}]}], ",", RowBox[{"-", RowBox[{"gain", "[", RowBox[{"en", ",", FractionBox["1", RowBox[{ FractionBox["1", "0.2"], "+", FractionBox["1", "2"]}]], ",", "0.2", ",", "2", ",", "3.4", ",", "2.3", ",", "Fc", ",", "Fv", ",", "T"}], "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{"en", ",", "0", ",", "6"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\<(h\[Omega]) (eV)\>\"", ",", "\"\<\[Alpha]0\[Times](fv-fc) (1/cm)\>\""}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "2"}], "*", SuperscriptBox["10", "5"]}], ",", RowBox[{"2", "*", SuperscriptBox["10", "5"]}]}], "}"}]}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"Fv", ",", RowBox[{"-", "1"}], ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"Fc", ",", "0", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"T", ",", "300", ",", "77"}], "}"}]}], "]"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"abs", "[", RowBox[{"en", ",", FractionBox["1", RowBox[{ FractionBox["1", "0.2"], "+", FractionBox["1", "2"]}]], ",", "3.4", ",", "2.3"}], "]"}], ",", RowBox[{"-", RowBox[{"abs", "[", RowBox[{"en", ",", FractionBox["1", RowBox[{ FractionBox["1", "0.2"], "+", FractionBox["1", "2"]}]], ",", "3.4", ",", "2.3"}], "]"}]}], ",", RowBox[{"gain", "[", RowBox[{"en", ",", FractionBox["1", RowBox[{ FractionBox["1", "0.2"], "+", FractionBox["1", "2"]}]], ",", "0.2", ",", "2", ",", "3.4", ",", "2.3", ",", "Fc", ",", "Fv", ",", "T"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"en", ",", "0", ",", "6"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\<(h\[Omega]) (eV)\>\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "2"}], "*", SuperscriptBox["10", "5"]}], ",", RowBox[{"2", "*", SuperscriptBox["10", "5"]}]}], "}"}]}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"Fv", ",", RowBox[{"-", "1"}], ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"Fc", ",", "0", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"T", ",", "300", ",", "77"}], "}"}]}], "]"}]}], "Input", CellChangeTimes->{ 3.5275681823399897`*^9, {3.52756824839707*^9, 3.527568250676723*^9}, { 3.527568284747074*^9, 3.52756828605227*^9}, {3.52756832179214*^9, 3.527568323833432*^9}, {3.5275690636236563`*^9, 3.52756912790091*^9}, { 3.562352329912073*^9, 3.562352334089246*^9}, {3.562352441854731*^9, 3.562352446613304*^9}}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`Fc$$ = 3.65, $CellContext`Fv$$ = -0.04499999999999993, $CellContext`T$$ = 300., Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`Fv$$], -1, 2}, { Hold[$CellContext`Fc$$], 0, 5}, { Hold[$CellContext`T$$], 300, 77}}, Typeset`size$$ = { 360., {106., 113.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`Fv$17264$$ = 0, $CellContext`Fc$17265$$ = 0, $CellContext`T$17266$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`Fc$$ = 0, $CellContext`Fv$$ = -1, $CellContext`T$$ = 300}, "ControllerVariables" :> { Hold[$CellContext`Fv$$, $CellContext`Fv$17264$$, 0], Hold[$CellContext`Fc$$, $CellContext`Fc$17265$$, 0], Hold[$CellContext`T$$, $CellContext`T$17266$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot[{ $CellContext`abs[$CellContext`en, 1/(1/0.2 + 1/2), 3.4, 2.3], -$CellContext`abs[$CellContext`en, 1/(1/0.2 + 1/2), 3.4, 2.3], -$CellContext`gain[$CellContext`en, 1/(1/0.2 + 1/2), 0.2, 2, 3.4, 2.3, $CellContext`Fc$$, $CellContext`Fv$$, \ $CellContext`T$$]}, {$CellContext`en, 0, 6}, Frame -> True, GridLines -> Automatic, FrameLabel -> {"(h\[Omega]) (eV)", "\[Alpha]0\[Times](fv-fc) (1/cm)"}, PlotStyle -> Thick, PlotRange -> {(-2) 10^5, 2 10^5}, BaseStyle -> {FontSize -> 15}], "Specifications" :> {{$CellContext`Fv$$, -1, 2}, {$CellContext`Fc$$, 0, 5}, {$CellContext`T$$, 300, 77}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{403., {177., 183.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{3.527568353564824*^9, 3.527569129027545*^9, 3.528447322680896*^9, 3.528447500012673*^9, 3.530390975157199*^9, 3.5623442234194613`*^9, 3.56235108063575*^9, 3.562352336660487*^9, 3.562352461194633*^9, 3.5734835183602*^9, 3.573491538144611*^9, 3.573703000082664*^9}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`Fc$$ = 0, $CellContext`Fv$$ = -1, $CellContext`T$$ = 300, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`Fv$$], -1, 2}, { Hold[$CellContext`Fc$$], 0, 5}, { Hold[$CellContext`T$$], 300, 77}}, Typeset`size$$ = { 360., {106., 113.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`Fv$17298$$ = 0, $CellContext`Fc$17299$$ = 0, $CellContext`T$17300$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`Fc$$ = 0, $CellContext`Fv$$ = -1, $CellContext`T$$ = 300}, "ControllerVariables" :> { Hold[$CellContext`Fv$$, $CellContext`Fv$17298$$, 0], Hold[$CellContext`Fc$$, $CellContext`Fc$17299$$, 0], Hold[$CellContext`T$$, $CellContext`T$17300$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot[{ $CellContext`abs[$CellContext`en, 1/(1/0.2 + 1/2), 3.4, 2.3], -$CellContext`abs[$CellContext`en, 1/(1/0.2 + 1/2), 3.4, 2.3], $CellContext`gain[$CellContext`en, 1/(1/0.2 + 1/2), 0.2, 2, 3.4, 2.3, $CellContext`Fc$$, $CellContext`Fv$$, $CellContext`T$$]}, \ {$CellContext`en, 0, 6}, Frame -> True, GridLines -> Automatic, FrameLabel -> {"(h\[Omega]) (eV)", "Gain (1/cm)"}, PlotStyle -> Thick, PlotRange -> {(-2) 10^5, 2 10^5}, BaseStyle -> {FontSize -> 15}], "Specifications" :> {{$CellContext`Fv$$, -1, 2}, {$CellContext`Fc$$, 0, 5}, {$CellContext`T$$, 300, 77}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{403., {177., 183.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{3.527568353564824*^9, 3.527569129027545*^9, 3.528447322680896*^9, 3.528447500012673*^9, 3.530390975157199*^9, 3.5623442234194613`*^9, 3.56235108063575*^9, 3.562352336660487*^9, 3.562352461194633*^9, 3.5734835183602*^9, 3.573491538144611*^9, 3.5737030001394672`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ RowBox[{"Spontaneous", " ", "emission"}], ",", " ", "Photoluminescence"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Rsp", "[", RowBox[{ "en_", ",", "mreff_", ",", "mceff_", ",", "mveff_", ",", "Eg_", ",", "refindex_", ",", "Fc_", ",", "Fv_", ",", "T_"}], "]"}], ":=", RowBox[{ RowBox[{"abs", "[", RowBox[{"en", ",", "mreff", ",", "Eg", ",", "refindex"}], "]"}], "*", RowBox[{"fc", "[", RowBox[{ "en", ",", "mreff", ",", "mceff", ",", "Eg", ",", "Fc", ",", "T"}], "]"}], "*", RowBox[{"(", RowBox[{"1", "-", RowBox[{"fv", "[", RowBox[{ "en", ",", "mreff", ",", "mveff", ",", "Eg", ",", "Fv", ",", "T"}], "]"}]}], ")"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"abs", "[", RowBox[{"en", ",", FractionBox["1", RowBox[{ FractionBox["1", "0.2"], "+", FractionBox["1", "2"]}]], ",", "3.4", ",", "2.3"}], "]"}], ",", RowBox[{"-", RowBox[{"abs", "[", RowBox[{"en", ",", FractionBox["1", RowBox[{ FractionBox["1", "0.2"], "+", FractionBox["1", "2"]}]], ",", "3.4", ",", "2.3"}], "]"}]}], ",", RowBox[{"Rsp", "[", RowBox[{"en", ",", FractionBox["1", RowBox[{ FractionBox["1", "0.2"], "+", FractionBox["1", "2"]}]], ",", "0.2", ",", "2", ",", "3.4", ",", "2.3", ",", "Fc", ",", "Fv", ",", "T"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"en", ",", "3", ",", "5"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\<(h\[Omega]) (eV)\>\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "0.6"}], "*", SuperscriptBox["10", "5"]}], ",", RowBox[{"0.6", "*", SuperscriptBox["10", "5"]}]}], "}"}]}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"Fv", ",", RowBox[{"-", "1"}], ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"Fc", ",", "0", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"T", ",", "300", ",", "77"}], "}"}]}], "]"}]}]}]], "Input", CellChangeTimes->{{3.527568520193035*^9, 3.527568585845372*^9}, { 3.5275686572595177`*^9, 3.527568672247004*^9}, {3.527568732712628*^9, 3.527568739443902*^9}, {3.527568806823016*^9, 3.527568807313101*^9}, { 3.5275692609014482`*^9, 3.52756930009696*^9}, {3.527569350475502*^9, 3.5275693579902897`*^9}, {3.562352550820167*^9, 3.562352551444449*^9}, { 3.562352658929041*^9, 3.562352659521018*^9}}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`Fc$$ = 3.43, $CellContext`Fv$$ = 0.040000000000000036`, $CellContext`T$$ = 300., Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`Fv$$], -1, 2}, { Hold[$CellContext`Fc$$], 0, 5}, { Hold[$CellContext`T$$], 300, 77}}, Typeset`size$$ = { 360., {107., 114.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`Fv$4642$$ = 0, $CellContext`Fc$4643$$ = 0, $CellContext`T$4644$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`Fc$$ = 0, $CellContext`Fv$$ = -1, $CellContext`T$$ = 300}, "ControllerVariables" :> { Hold[$CellContext`Fv$$, $CellContext`Fv$4642$$, 0], Hold[$CellContext`Fc$$, $CellContext`Fc$4643$$, 0], Hold[$CellContext`T$$, $CellContext`T$4644$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot[{ $CellContext`abs[$CellContext`en, 1/(1/0.2 + 1/2), 3.4, 2.3], -$CellContext`abs[$CellContext`en, 1/(1/0.2 + 1/2), 3.4, 2.3], $CellContext`Rsp[$CellContext`en, 1/(1/0.2 + 1/2), 0.2, 2, 3.4, 2.3, $CellContext`Fc$$, $CellContext`Fv$$, $CellContext`T$$]}, \ {$CellContext`en, 3, 5}, Frame -> True, GridLines -> Automatic, FrameLabel -> {"(h\[Omega]) (eV)", "Rsp (a.u.)"}, PlotStyle -> Thick, PlotRange -> {(-0.6) 10^5, 0.6 10^5}, BaseStyle -> {FontSize -> 15}], "Specifications" :> {{$CellContext`Fv$$, -1, 2}, {$CellContext`Fc$$, 0, 5}, {$CellContext`T$$, 300, 77}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{403., {178., 184.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{3.527568595174169*^9, 3.527568683453579*^9, 3.527568739908711*^9, 3.527568827119006*^9, 3.52756930216433*^9, 3.527569360327703*^9, 3.528447332440878*^9, 3.5284476790175037`*^9, 3.530390979671069*^9, 3.5623525526428623`*^9, 3.562352660485112*^9, 3.5734836090479193`*^9, 3.573491544541546*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ "Quantum", " ", "Well", " ", "Gain", " ", "and", " ", "PL", " ", "Spectrum"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"abs2D", "[", RowBox[{"en_", ",", "mreff_", ",", "Eg_", ",", "refindex_"}], "]"}], ":=", RowBox[{"1", "*", RowBox[{"(", RowBox[{ RowBox[{"UnitStep", "[", RowBox[{"en", "-", "Eg"}], "]"}], "+", RowBox[{"UnitStep", "[", RowBox[{"en", "-", RowBox[{"(", RowBox[{"Eg", "+", "0.4"}], ")"}]}], "]"}]}], ")"}]}]}], ";"}], " ", RowBox[{"(*", " ", RowBox[{ "Optical", " ", "absorption", " ", "coefficient", " ", "for", " ", "a", " ", "QW", " ", "in", " ", SuperscriptBox["cm", RowBox[{"-", "1"}]]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"gain2D", "[", RowBox[{ "en_", ",", "mreff_", ",", "mceff_", ",", "mveff_", ",", "Eg_", ",", "refindex_", ",", "Fc_", ",", "Fv_", ",", "T_"}], "]"}], ":=", RowBox[{ RowBox[{"abs2D", "[", RowBox[{"en", ",", "mreff", ",", "Eg", ",", "refindex"}], "]"}], "*", RowBox[{"(", RowBox[{ RowBox[{"fc", "[", RowBox[{ "en", ",", "mreff", ",", "mceff", ",", "Eg", ",", "Fc", ",", "T"}], "]"}], "-", RowBox[{"fv", "[", RowBox[{ "en", ",", "mreff", ",", "mveff", ",", "Eg", ",", "Fv", ",", "T"}], "]"}]}], ")"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"abs2D", "[", RowBox[{"en", ",", FractionBox["1", RowBox[{ FractionBox["1", "0.067"], "+", FractionBox["1", "0.4"]}]], ",", "1.4", ",", "3.3"}], "]"}], ",", RowBox[{"-", RowBox[{"abs2D", "[", RowBox[{"en", ",", FractionBox["1", RowBox[{ FractionBox["1", "0.067"], "+", FractionBox["1", "0.4"]}]], ",", "1.4", ",", "3.3"}], "]"}]}], ",", RowBox[{"gain2D", "[", RowBox[{"en", ",", FractionBox["1", RowBox[{ FractionBox["1", "0.067"], "+", FractionBox["1", "0.4"]}]], ",", "0.067", ",", "0.4", ",", "1.4", ",", "3.3", ",", "Fc", ",", "Fv", ",", "T"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"en", ",", "0", ",", "3"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\<(h\[Omega]) (eV)\>\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"PlotRange", "\[Rule]", "All"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"Fv", ",", RowBox[{"-", "1"}], ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"Fc", ",", "0", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"T", ",", "300", ",", "77"}], "}"}]}], "]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Rsp2D", "[", RowBox[{ "en_", ",", "mreff_", ",", "mceff_", ",", "mveff_", ",", "Eg_", ",", "refindex_", ",", "Fc_", ",", "Fv_", ",", "T_"}], "]"}], ":=", RowBox[{ RowBox[{"abs2D", "[", RowBox[{"en", ",", "mreff", ",", "Eg", ",", "refindex"}], "]"}], "*", RowBox[{"fc", "[", RowBox[{ "en", ",", "mreff", ",", "mceff", ",", "Eg", ",", "Fc", ",", "T"}], "]"}], "*", RowBox[{"(", RowBox[{"1", "-", RowBox[{"fv", "[", RowBox[{ "en", ",", "mreff", ",", "mveff", ",", "Eg", ",", "Fv", ",", "T"}], "]"}]}], ")"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"abs2D", "[", RowBox[{"en", ",", FractionBox["1", RowBox[{ FractionBox["1", "0.067"], "+", FractionBox["1", "0.4"]}]], ",", "1.4", ",", "3.3"}], "]"}], ",", RowBox[{"-", RowBox[{"abs2D", "[", RowBox[{"en", ",", FractionBox["1", RowBox[{ FractionBox["1", "0.067"], "+", FractionBox["1", "0.4"]}]], ",", "1.4", ",", "3.3"}], "]"}]}], ",", RowBox[{"Rsp2D", "[", RowBox[{"en", ",", FractionBox["1", RowBox[{ FractionBox["1", "0.067"], "+", FractionBox["1", "0.4"]}]], ",", "0.067", ",", "0.4", ",", "1.4", ",", "3.3", ",", "Fc", ",", "Fv", ",", "T"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"en", ",", "0", ",", "3"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\<(h\[Omega]) (eV)\>\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"PlotRange", "\[Rule]", "All"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"Fv", ",", RowBox[{"-", "1"}], ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"Fc", ",", "0", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"T", ",", "300", ",", "77"}], "}"}]}], "]"}]}]}]], "Input", CellChangeTimes->{{3.527569830351552*^9, 3.527569910253191*^9}, { 3.527569944343071*^9, 3.5275700375078173`*^9}, {3.527570072948393*^9, 3.5275701234819603`*^9}, {3.527570206784801*^9, 3.5275703194920807`*^9}, { 3.562352595385632*^9, 3.5623526011773987`*^9}, {3.562352635896475*^9, 3.5623526518709183`*^9}}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`Fc$$ = 1.99, $CellContext`Fv$$ = -0.09499999999999997, $CellContext`T$$ = 300., Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`Fv$$], -1, 2}, { Hold[$CellContext`Fc$$], 0, 5}, { Hold[$CellContext`T$$], 300, 77}}, Typeset`size$$ = { 360., {111., 117.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`Fv$4690$$ = 0, $CellContext`Fc$4691$$ = 0, $CellContext`T$4692$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`Fc$$ = 0, $CellContext`Fv$$ = -1, $CellContext`T$$ = 300}, "ControllerVariables" :> { Hold[$CellContext`Fv$$, $CellContext`Fv$4690$$, 0], Hold[$CellContext`Fc$$, $CellContext`Fc$4691$$, 0], Hold[$CellContext`T$$, $CellContext`T$4692$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot[{ $CellContext`abs2D[$CellContext`en, 1/(1/0.067 + 1/0.4), 1.4, 3.3], -$CellContext`abs2D[$CellContext`en, 1/(1/0.067 + 1/0.4), 1.4, 3.3], $CellContext`gain2D[$CellContext`en, 1/(1/0.067 + 1/0.4), 0.067, 0.4, 1.4, 3.3, $CellContext`Fc$$, $CellContext`Fv$$, \ $CellContext`T$$]}, {$CellContext`en, 0, 3}, Frame -> True, GridLines -> Automatic, FrameLabel -> {"(h\[Omega]) (eV)", "QW Gain (1/cm)"}, PlotStyle -> Thick, PlotRange -> All, BaseStyle -> {FontSize -> 15}], "Specifications" :> {{$CellContext`Fv$$, -1, 2}, {$CellContext`Fc$$, 0, 5}, {$CellContext`T$$, 300, 77}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{403., {182., 188.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{ 3.527569911782135*^9, 3.527569945631373*^9, 3.527570045713236*^9, 3.5275701253061647`*^9, {3.5275702102267447`*^9, 3.5275702380155773`*^9}, 3.527570325742621*^9, 3.528447342555728*^9, {3.5303909835479317`*^9, 3.530390998018773*^9}, 3.562344232307116*^9, 3.5623526022962503`*^9, 3.5623526879194*^9, 3.573491549101125*^9}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`Fc$$ = 0, $CellContext`Fv$$ = -1, $CellContext`T$$ = 300, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`Fv$$], -1, 2}, { Hold[$CellContext`Fc$$], 0, 5}, { Hold[$CellContext`T$$], 300, 77}}, Typeset`size$$ = { 360., {111., 117.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`Fv$4725$$ = 0, $CellContext`Fc$4726$$ = 0, $CellContext`T$4727$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`Fc$$ = 0, $CellContext`Fv$$ = -1, $CellContext`T$$ = 300}, "ControllerVariables" :> { Hold[$CellContext`Fv$$, $CellContext`Fv$4725$$, 0], Hold[$CellContext`Fc$$, $CellContext`Fc$4726$$, 0], Hold[$CellContext`T$$, $CellContext`T$4727$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot[{ $CellContext`abs2D[$CellContext`en, 1/(1/0.067 + 1/0.4), 1.4, 3.3], -$CellContext`abs2D[$CellContext`en, 1/(1/0.067 + 1/0.4), 1.4, 3.3], $CellContext`Rsp2D[$CellContext`en, 1/(1/0.067 + 1/0.4), 0.067, 0.4, 1.4, 3.3, $CellContext`Fc$$, $CellContext`Fv$$, $CellContext`T$$]}, \ {$CellContext`en, 0, 3}, Frame -> True, GridLines -> Automatic, FrameLabel -> {"(h\[Omega]) (eV)", "QW Rsp (a.u.)"}, PlotStyle -> Thick, PlotRange -> All, BaseStyle -> {FontSize -> 15}], "Specifications" :> {{$CellContext`Fv$$, -1, 2}, {$CellContext`Fc$$, 0, 5}, {$CellContext`T$$, 300, 77}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{403., {182., 188.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{ 3.527569911782135*^9, 3.527569945631373*^9, 3.527570045713236*^9, 3.5275701253061647`*^9, {3.5275702102267447`*^9, 3.5275702380155773`*^9}, 3.527570325742621*^9, 3.528447342555728*^9, {3.5303909835479317`*^9, 3.530390998018773*^9}, 3.562344232307116*^9, 3.5623526022962503`*^9, 3.5623526879194*^9, 3.573491549148182*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ "Intersubband", " ", "Matrix", " ", "Elements", " ", "Illustration"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Sin", "[", RowBox[{ FractionBox[ RowBox[{"2", "\[Pi]"}], "1"], "*", "x"}], "]"}], ",", SuperscriptBox[ RowBox[{"Sin", "[", RowBox[{ FractionBox[ RowBox[{"2", "\[Pi]"}], "1"], "*", FractionBox["x", "2"]}], "]"}], "2"], ",", "x"}], "}"}], ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}]}], "]"}], "\[IndentingNewLine]", RowBox[{ SubsuperscriptBox["\[Integral]", "0", "a"], RowBox[{ RowBox[{"Sin", "[", RowBox[{ FractionBox[ RowBox[{"2", "\[Pi]"}], "a"], "*", "x"}], "]"}], "*", SuperscriptBox[ RowBox[{"Sin", "[", RowBox[{ FractionBox[ RowBox[{"2", "\[Pi]"}], "a"], "*", FractionBox["x", "2"]}], "]"}], "2"], RowBox[{"\[DifferentialD]", "x"}]}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Minter", "[", RowBox[{"N_", ",", "a_"}], "]"}], ":=", RowBox[{ SubsuperscriptBox["\[Integral]", "0", RowBox[{"N", "*", "a"}]], RowBox[{"x", "*", RowBox[{"Sin", "[", RowBox[{ FractionBox[ RowBox[{"2", "\[Pi]"}], "a"], "*", "x"}], "]"}], "*", SuperscriptBox[ RowBox[{"Sin", "[", RowBox[{ FractionBox[ RowBox[{"2", "\[Pi]"}], "a"], "*", FractionBox["x", "2"]}], "]"}], "2"], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Mintra", "[", RowBox[{"N_", ",", "a_"}], "]"}], ":=", RowBox[{ SubsuperscriptBox["\[Integral]", "0", RowBox[{"N", "*", "a"}]], RowBox[{"x", "*", SuperscriptBox[ RowBox[{"Sin", "[", RowBox[{ FractionBox[ RowBox[{"2", "\[Pi]"}], "a"], "*", FractionBox["x", "2"]}], "]"}], "2"], "*", SuperscriptBox[ RowBox[{"Sin", "[", RowBox[{ FractionBox[ RowBox[{"2", "\[Pi]"}], "a"], "*", FractionBox["x", "2"]}], "]"}], "2"], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Minter", "[", RowBox[{"N", ",", "1"}], "]"}], ",", RowBox[{"Mintra", "[", RowBox[{"N", ",", "1"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"N", ",", "1", ",", "100"}], "}"}]}], "]"}]}]}]], "Input", CellChangeTimes->{{3.528452926984933*^9, 3.528453085365635*^9}, { 3.528453126187989*^9, 3.528453275666263*^9}, {3.5284533647215357`*^9, 3.528453542010541*^9}, {3.528453608969686*^9, 3.528453628671035*^9}, { 3.528453664628916*^9, 3.528453665504983*^9}, {3.5284537210965223`*^9, 3.528453753181679*^9}}], Cell[BoxData[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[CompressedData[" 1:eJwU2nk4VO8XAHDfQlIRihYVQptsCUkdFS2i7DuhtEgllRZLEkWLpVUSIhKS oizhUPZ935LsZoaZixnbzOB3f3/Nc547933Pu9z3ns88I+18xcRlEQ8Pzw5e Hp7/fyqCOG1hYQFLXh+u7d/9fv+V2c1Bs+wFXHHlZP7S53chPUNFnjm5gB9b ctwePgsF1a2GzkMjC8jfUSB9JTwGNEQCOqvbFvBW7obYB0+/gE7/eOWbLwu4 tNU4dbMvgsnDmpRdpxYwIPlSW59OHTw/8OfYTpsFXD5w5Wblunpo5lCG5c0X cIaSWjPwoh4s3Hll1x1fwKC7faPmQQ1ga703ikdjAUW1JHdPXWyCMzs+PakR WsCnidl3X8i2wc26gEvnCuaRa9ZumnWiG56MeLaxsufxS/RqDYGybohbcuGA f8Y8vuY461Tv/wfVYLj6XdI86jklvzUR7wGZ9NX5jc/m0S/pRsYXnl6oDUtc vv/cPA6EjrwNL+2DgdQIzyqneVTn5XxvmeuD2fJHPVZ280hVlBn6pdYPsv9d ybxmPI9bljREvXjfD3euath92juPh99ZH2N7DoC8SXnKqpXzWD5NV+YID4H2 5dzVcYLz6Ey7c87hwBAYP0q9q8Q3jxs/WRfbegyB968wU332HO6zk/CQbhqC RlVrzt2BOdya+/xJYegw+IjR9Eey53CbyNjV5ywKPFPqyryVMYeMjo7Vapuo kHS8diN/2hzSdX4WOR2jQuP9bxNS8XPY0Gij5BRFha2sO5EWT+cwVNSh/I82 DZqbl9GKnOawVCllvcy5Ebh35ntBit0c2t3dmEl/OAKKLIfnLy3nsPir7bXj SSMQJPZN+4LhHOp+sD39c3gE9plYha7cM4dq2UctTjmNAq33vzPsXXNYxZ5w SfMdhYirKZoDinMYuL/r9+O3ozARNt+bJTuHb/gDY4imUUis+6B2auUcCjb1 fT4JdDA9dWLpsWVzuOxQF5vXmg48xPRfVf45POFPVdTzoION0PGH/FwuCsaI /TwTTwdhw/GOz8NcPG1q3riahwF5XZFpr/u4GOP/L0dCnAGubrr37/3losF3 8VfvdzCg+PFrBfMmLkqaprQeN2fArcp9d7kFXKylvQ8aj2OAnM2w6VAOF4sW stZs/86ARmrY1vpMLhbMlMtQShmgsHSgIT6Zi76pkY+ZFAZ0RDxNfJrAxb8T Ac46swx4sFXD62YsF6+aYLzIUgJ6jzySPf6Kiz0usa46WwgIads1qxbORetj HTff7SZA+9zfmo1PuPg7MGje5xABrx4o35y4x8Wv3kVR5fYEHBLvPN7lzcXL omeOq7oSMJZwX6r0Jhc326S/3+hJgH5Ja8WbS1xUe0sE+T4hYNrML/r+eS4O HIoqHH9FwIeBbdcunebiWadz9KFYAhYW+0gesObi9++ngy0yCEh9Lj++3YyL ld/4vtT/JMBmc33JqpNcxNYk9erfBGQe3HyFosvF+LBAxuFGApwaqw81Ahe9 bGcHStoJEHL2XJOnxcWgd/0VJd0E/BzfRE/YzUUTKbPAwwMEnL9XURSqzMWk FRb/HaUSsFrk2qvbO7ioemRsWyWdgF+xkhdPy3Nx6w85evU4Ae7KpWAozUXx 55NaRpMEbCi8skpDkou5CbZ8ZjMEVIvuvq4lwcWmeWirZhNwx4XdtE+UiyLN FbxVXAK2ZuOuAyvI9X9n9uDEPAGtgoHPdQW4+E9P1MJygYAAe33mkcVc/AbL 3AfJeFe6sOnxeQ6mv9zYOEPGfYtavp2Y5aDhxH/e4WQcZh4pasLi4EzsgStf yPb2J53yMCc4qBSk88VkjgA6W7bRisZBL0nNA14cAqIMaSp2gxy8YqCpsG2W XJ/YL+Gnejj42GXLbbspAmYmro87/+Gg9ESR6momAYl6WsZnWzkoHxbpYkoQ YBaxkH6hgYPThWulJEYIWDxSvPJSNQc3ffPxcBwi4Nu+R+7uZRxcstBxWamX AMewk/XXfnHw/UWJbQF/yPXoX6V8M5+DEhHMHw4tBOTt7gy9k81Bx888ylhL gGtQDOGTwcGhRQmfE8oIWPvnzMl7aRwUy193XLSQAE8/QijoAweTb9239f1C gGxT5uXHMRw8MLlUyDeRgCa5O7UhkRwU7Xh4ivcdAcpVvCEvwzho9f2FR0IQ Ad0bKukRjzkoPHzQv9CHgCfuoYZRD8j+SuVqnD0IoK5etyLem4OqY9+K99kQ EHH+n1viTQ7+ujlZ42lIwOGfH6o/eXDwbenbKg0dAuIclZ6kn+fgIieRqyay BNil6C4rMOOg0UP66bEhBgjOL71YdJKDk7vnF11pZUCOUV1lsT4H7YbpDjdL GCA+Zf2oSoeDxUc8TeXJ57tO58rSDgUO7jqql8drwQDf52oXurZwcG3S7K/2 A+TzPTRb/k+Gg5bvnAo1dzIg6HFA0NAaDlY6X/z7bhEDDra+WcLi5WC2jEgm XxIdvl8s5hP+y8agv1XCkX9HQVPqskpiGxu31Dun/Vc4CrnNEvb7Gtl4w3I2 dPj9KBTuu5h5sYyNqjll+5TPjEKlsOjp8q9sDJV2SCvuG4GejFOF9x6wUeVi 8FPvcho4n186uuYeG5ukDSaWx9NgUDJDIt2LjYWrVDbL+dCAFsh/pdudjX7s jNeEEg0mLT9v2GvLxgNrVPh4wqggyGXfYSmx0VP0qs8XLQo8Tf+Q+Hg7G1uN LlqJCFFgpcuJRhk5Nvb5GCby9w7D6tr324zXsZEtlFWRFjgMUrFH2z/zsnHl M+XeZZVDsFv31e5zHbOo3y44mgmD4PhEZazDfxad3h38wx7ohTuZzx7U+Mzi 31tSzyG9F152MSWLbs3iKQ2Bkv1evVCp8ONY0uVZHLMx6riyshd21WjFe9rM YsFEdG2GRg/wC+laiKnO4mun7jVzrC5IDbXIM+idQZPLzvbWaS0w88wrCGEG r7faD1+fz4ZhySLaYa0Z8vwS1m3v/AGtifyGtWozeDo1UarxRyZk5IaL/N02 gwdcFPvSL6XD5b6PkWyxGXxz+M65AscY6FdpTt1NmcbVqRVfdNPisLZeoSEl bBrTTO4qtxaWYJ6Nx65dj6cx8VR+akJdKaYMZL3MDZzGlXzhXcu6yzBo5qBN xZ1pFA5TbQ+arcBDUtb9Q2em8ZDnOu387bWYfSVwUnrPNArw1iePaDZhvFD3 2ojeKSztScxv1PyDz2xhyZ6uKQzqK5L7/e0P+ifFsjpap5B9RN5YU6ELnQ+e rltfPYUfTjn5J234izKelICYH1Oou6S0wIXdjXF/J4jEx1PIIyp++rdBLz7b bvb3yIMp3PDn+hOXwF70v/m9kuI3hbfOixfl5Peis8ithO2eU5jntfj09Z19 KK03Z5PmOIUv/T1vSiztx9jUJaXfd0/hP/v4FQfSBzBs9nyGhfIU+TpYFxre P4B+hytjp7dPodvnqk2B4oPo2PPEa4/UFM7PfRs09hrETatEVfIFp/CiaUrM BZ0hjPaSjCr+N4nt8z/3NmcNY0i5T7BL5ySOh/9YSwwMo+/qf578LZOY/Knm Y4wIBR2+vDc+WjmJARdacgsuUHBDv/yS6sxJ3K/Y4/FvFRWj9FU8moInUXTF lm1LLGgou0y/sj5gEnn31RCvb9MwpcpZpvbuJL6SPKr5K4qGuQYvGstvTGK1 ZqFSby8NO05MqxY4TaLy2SANrXMj6Ci88vFPu0lUDGz1C3o4gpS6rf3ZlpMo KMFSd/s4gjNGNs8zDCfxG9t1bnxwBMVN85lJeyZR1X6ynWo/itFirccT1SbR N0b5dOudUZRrZsTHK01ihJlpqtnrUVQzlzKLliPzqS36zVs3iiaW9zOfi0xi +gYfxy176Bhqe+yGL5WFn1dKf9k4Q0dxSecarwEWSpnFbZlewcDorjtyt/+x 0Krx/GHbzQxMs09tudbCQk1p/Z0lBgysPiWsfqGIhVN+K/+TiGSgmdTWkLN5 LDT7Icujm8rAPz06Q6ezWKjV/0mHnc9AmpPHK4fPLEzpfXrjvx4GCpxpmTJ9 w8Kvd9xir20kMEyWccL4BQubvimE9SsQKDHI//FEKAtvrrxU16lFoPxZTctj gSy8+GPexcGcwDR54y+H/VgoK5NiQXMiUH34whJdLxa+fRhawb1EoN75t1n7 r7JQeWzIOzOAwOqtmcLabizUDz/nYh1KoBm1+tyecywMzdOWCnhD4BnXeQk1 exb+dDxx1TWVwNHtEu4qViw02ONYIPedwGsjSuWKpix85elx/Gw+gf5uTre2 HWNh0tXkj57VBHaHOETlHmLhvzee6U1NBGp9tS08vp+F6/w022M6CXzVZDXQ pcnCw/T5hc4eAicmzQUu72Kh6He3ZYFDBJ5YY6qwsJOFIho5Pe9GCEzWMjIK 28pC4eb083JjBPLbG16X3szCLMvvIetZBDrd1Y/4toGF5ywKdPymCcx7fyTv 0BpyfHetr5iyCVxTrNvTLMrChL7kFS+5BF4fOsB7dgULzyhcEtGbJ7BeALZO L2Fha+O4x+kFAhV2aBsELSLXZ4/0zjEyDjLc4752jonrKu7sGyHjgSvqL5Kn mWgwu+qDGRnrPNuVvXeCiWPG704rkO1FZSp3VY8yUcTB6p4H2d9M604eh2Em ir+Q5ttC5mM2u12W6GXivMrF2WNkvunrtx7162Ji+4r9F/8wCVy+X85NpI2J Z232uP4hCDzvKBMW18BEAcdnAvrkfBT7b8rcVc3E5m2rbLeQ87UpQbK9uJSJ E/Kbbl8j5/NO2VqueRETdxcmeSuS891KFZca/slEeq+WvxW5HqrLV+ne+sFE njvMpPEqAkMURc4v/crEQ7T7ouzfBNKMhJ5EpjBR6opy/9WfBB6+tix9RyIT ve7UHbD+RuB8Ft+M4Vsm7i9bbXwzmkCbzkWS/14y8fiD/XZpzwn8wV0A9zAm bt9hm2weRODlA+yHzwKZaH/uVc/kFQIrT0+nbPZj4suoJA3CmdzPD1h1mXeY aMt+/sWa3M9/KxkSbVeYeD20leOvSaAmfWTveVcm/mZdMz24jcAXwtRTs2eY uCj4euO1tQQamPV/XG/DxNSPE+cVZxiY97dNw1GXiYbcluuCXxi4hqfFdnw/ E5Nv1HicfsvA6zKNd/33MNFRm7VB5SEDFc5Vl31QZKLEPB9jhz0Do8YKLalr mOg692Nj8iIGzogWeN0RY+Lpdp2NGTQ6mu3+GbNMiIn3DHWJXY10XH7n+/DO xUzcIKxQGh1DR6/FyTc96BOYOXdaRF6NjpffOPA7Uibw09Gd8X/X0tFZSeyl Yf8EZrSMFEkvjKK+rfe3rR0T6LpgYGRcPoprMk7Qu4sncChnV661+ShmOjOd j0dNoN/i+vobNiOYNPNxXPP1BDZuG/61Y88Ivg2x85N/NoHNXyczb0iMoH9u ybv/gibw/OvXX8saaWgsGtGedW0Cu7pWiV/TpSGjSPuE7PEJPKL6VNGFPM/7 LMe7RA5PYEXvmrPvRinYQk+4uKAzgbziD/I8iimYt1Y4uFN9Am3+G9Od9qDg 46u9v8NkJvCs+Zbw21XDuFX6wZ652XF0dT5pN+U6hE5+dbKtSeN40kNF5/v5 frToiNn/N34cX9hHN/Wp96O+qrvVQPQ4Rg2ukyvj7Ue1gZVPJl6MIzckYOFH TB8KHDVhCt0bx9qPmHu0sRfThFuKjliPY52+NrNnew9yojsdcpaO44GwRSoz Dh34Mn8wIsp1DLd/SL8n0FaMDrcifTVcxlBdYBvv8arfuHXXyTONp8bw5qfv aWr4C3OTspUEzMfQPyBWf2ViIXY/f1x6DcawSvrN5o6ebNziqsLSXzWGHdej Hw92x6DHTnb0hBd5jtyInzXtywHe+NOuW68S+Kthyi517ie8WlOz2+EsuS83 Ld/4cE0B/FwcW11hROA5x98zJ+SLgLdTjx0rRz7n4czbHyxKSF+Gm5+sI/fl t5xwpQ81kPtv6/JUGQbGJcXzK1JbwVv7v8+RaxiYwxQrlDnVBvvedBgGCzHw UGKCbF5zGxSaPAo9y6bjYzPnXy0F7VBWMiIqTe5D4e7Wcx4hndCckrb21T06 /rizU7psbTcwbqpt8esZxYOnD/Z5uPZBevPy8sutozgZy3NOMLoPrqoMnrev JvdZh8AO64Y+YNFeJmtlj2LMN3GjtRr9wLGf3jkZOooRTx6dE1roBwHdXDVX GMXtd7WvyPgNwuaVOgfNokeQzexXoRygQIhy7x3X5yPoRhxafOEyBWaM/DP8 gkYwP1nk4+1IClSHF8t+9hjBvbGf9x8Zp8B1sWNL+I+MoHb+thW+b6hQKm5S nUXQ0N8vdTqjiQbKGkze2gEaahVvj22boUGk5Yt9Ax00bD730v3uhhG4EtGa trKYhmIfVWhWLiOwZp1t+IUIGoa567lIEyPguuGMxfoDNAwvuSx5jzYKzfv4 QlXUaVj+nGL+bgkd9jsklh3ZQUNLowhdNVk6iMVQNK+vpuF/NjT1els65Eld Wl9DpeKlE9dSvhXTQf6AkFl/NxV3Zi7NffWXDmFOX57MNlFRO9f24/gkHVzi xufkCqgY2GHtJCjHACFZzx7fZ1RsjbuQ8dObAbd0Jda+fEjFT9N2S46HM6Dv TLZxijcV0/pGeE4kMCArgf2r7SwVNzxtv/m5igEypW85dFsq/tvKp7e0mwFP hrTVeI2peF/7smUbwQDHLXcTlPdSsXrH3SUVIgRUHpHqPqxMxanM40tHpQlQ O18kbi9Hxcyu2DV+KgQs/bQ4KFiYim4NVrrsEwRcr/hQGMNLxW2tzh3/7Eg/ UvVmv89S8KLF4Uu7XUnvbg9y7eun4AnrYzFK9wnY1OCYs6ODglvKiiOiQ0hf 3twjcKOWghL7ukbvvSF9vUHUsuA3BRcdc7rYEU+ASzEtYUkOBdMOhQ19+ExA o+tvllEaBQ3Wi+wa+EF6XiTqUGQ8BY+IzWx5jQSscTDsVQghz6GTF69Z1hEQ wCuv7HmfgqfphwLOtBIwnjzvi7co+C1c8ttAFwEOxm01ApcpmEAo97T1keOf /iJpcpqCYakKrH0UAjSigy6+taJgSfOOVnE6AR90nXIHDCl4VO+nu/M4AStH 9ixVPETBn4Id6VKTBPiEi1rd1KSg93dWoPEMATSNkcTCnRQk4oheFpsAi+7f k0s3U5Czd0OO4BwBvwOidE3XUDBz66FFz+dJj++48TxqBQWVb7/58XSBgKgG w77BRRR8+LuygU3GS2/JqyjNDCOfBsu4k4w9Ny7cvUUfRu8PCRoK///9o7it tqhvGGu8egPHyPZPXkzfsKx9GF8VSB7cwiUgTyTYzaxmGAUp+6/Xz/7/9xan n+9+DeNUxXv50SkCXjpoCQ6Tdf60g8jZO0wCFvGJWSt/HsaW8KoDXgQBl1NG Pt6OG0Yx9t0qBo2AP8bFU79eD2PK05MSLYMEHJ2J0lv+dJj0T/VexR4Cvkff eGHuP4x9JTPG7A4CZPRO9EffHMY1bUdu7GkiIGREXpXiNoyZvFG/R6oI4IQv +Kk4DyN9+RF7kWICzmu2192xHMZVZktdkn8S0NydvrHYYBgb9UV4sr4RkLbD Oc9CYxitnGrDdsQQsL5Ra1mswjA+ec/z9/kLAoJuidlQpYfxmunVC+7BBDiV FE97LR/GJRdjBR9eJWDVqS273vcOoZjlOlflvQTc4+Pxp7UOYeo1tXgdBQIY Ke31u6qHcIX7blqpJAFlM8GXS38MIX+W1g91LgPuPBv9NPJ4CHXe3bZOyWTA kGbJjNq9IRwvV+e9/p4Bpv/eHfH1HMIwPZHN358yQEHh5OBKpyH8GT0tGXeG Af9Kvkqpqw+hvjDfZpXlDPA2ndXVVBhCj7JPr05N0WFNr84FLZkhnKbvzl7X Qwcjbt3X/UJDOKf4yl7zGx0KVRkHjwwNYtvJ6bl1xnSIjdnuYvVqECV6gp81 3B4F7Z0ewTZPBlEuUqF+ym4U2nNzPtv5D+LLnzf702AUVrYenXK8PIge1tdP diwehXvLzz28cHgQdVQVpjc/HAHn2/Gf7kwN4GDH5bec2zSY5x+p8R4dwPr1 60MeWJDn6QvVCd++AdxU1iSdqkqDxi9FWvdrye83D5tXUKlwaOhf1ePEARSh 3Txna0oFWVNJRpTFAN4Um/7lsIoCgwovVfFHP55ODqtUMRmE7b4JDEpKP87P emjv3TQIl+u+J4u+78eBPp3lgyMDMHO1Vebs434ser70woaAARDMkhBb4diP m3M2jGql94PygUimDengkQE53rnpXvAyj8mcsu3D91vTD0u86QIR30/qiv/1 or06TbRhdQUoqBMKCcwudN/zxvpAdyOeVbx7N+dvF8a8EbP+6tSEMfLCjTVl XZhhdOdl2UATikoo3Zx624XmOSf0/1KbcXr6ctER3S7UK4hKuki04q8chjnt xR+sClF2FRzqRKt9DF8l9U5k+BTyZmuSvt/t23BIqhNHOo9VRXr0YtVOIVkr wU5MEEn8rZDai/s3Klb4dXdg/+lGKZuNfbh54ZJY44MONFjZUJQ/34eMQvrH 623tqHlvh3NZ2gDe16XX59xqwywfx06VkmH8dXT0pNrpNmQ0XHqjMzGMPIYj tWmGbWir1391YCN5LplTq+Nl2vCLWJkpxZOCnmcHy59Wt2Kx1LsHVdJUPB/0 t9BJqpWsS99Y2zrTMPFJF3QJtuKkUtMt5yAaDoT9KbCYbEG+Nc/lmJ9p6PSm I+94ZQv+SWA8SpumoU1yS/bu6y2YfZ73q1fgCBpU16QvLW/GOA/fouHgUXxU X60U8K0Zqf22efuSRrG8uSptPqoZJdnd5WKlo6j3tyKVebUZNasNePfz0HE/ oyTp7/pmPDbO4vG5TEfvieItVvzN6Hoi+kZJEB1zp34nNo41obzYS5FHcXTU WCj6UFbShJ8vvZ4MbKaj8sqC2K9XmvBHVYmrtioDL6/K36Rg04SX+BP4bY4y MHVNXnSibhMKPgr3GCPr923SuVFv1zahxpdrex+Q9f15uZz14rxNGPCouDuA rP8Tt2VHhjEakeHQ1c1OY6CM6o+IwN+NKL3hYNTxZgY6qn+X4ElrRMU69je5 IQbGaGW+uhPRiA8nTDpuTDNQ8tC3F1cuNWLRkIzMzTUErjZLC7OWaMS3Dibl k6YEfpN/nKu3uBHz7k4UvnAk0Gj23IAK0YC693c25LgR+ChaWlOwrAEr+8N8 Xt4ncMvVeaepbw0YvJNWeDyE9N2hP4/7ohtw35MDrg8jSG9RXvzL9WzAt6Fo HJJC4NufV5d+dG7Al/GzetaZpI9CTux6fqIBLSqtl3/KI7DFcYf9Xa0GrJF6 GeBTTKDHLoGHF+XJ9lsgrJX0njD/YLqlaAMORNeIZjYSmNpe1Hlovh7Htz0b X91B4LGUaF5lWj1u8C8S43YTOOTjpSjZWo+BV92dzw4QeN/IykrgVz3ydb4o N6MSKLV5tz/rM3k/P/+uMjqB+ZMiqT1v6vHRtHdY/jjpw3JGS3VgPa6Le9Gg MUngdGTVQvbVeixXqqTsniHr5ktJ2xLs61FUxacyi/Sxik6gafixepyrJNzy ST/Xijr7+Oyux9Guw+WHSV9fHNz/8YJ0PcpvetRqSvpbIHt9g/mKehTQ+vB8 gIz1V49P3p+ow/4W57kZMg7MTT5mV1mHAfGeYuFkXHjqzDu1uDo8b3+tLZVs j827cXz5nTqMKqozMJgjUC25TXfQuA6PBAzeusIh/XoyPCJ/Wx32ao07i88S mMTSH335Xx1K6IiuOjBFYN8bXp3LHbVoHqb/mpggUBIKnh/+Wot8Mb6z0qTf LQZuDm8MrkUv2RvH2mkEhgWr7J12rMX7A62vRUm/VyqOhNRp1uLXS4rT9aTf eZs/9H1cWYsmDcNeYn8IhNsO6n6UGhQ3M9LubCZ9v3HNI6vCGjwv8cpIrpbA zN8Nf5UjavDez7JGVimBW4X0AnuP1KCkVvAz6SwCnTPm23M21aD7+pcr7qYR GGWVrfBsuhqPc+9fdUogcGX8juaDH6vxS+uz+9/Dyfk7Orhl/d1qZARL+W55 SGAAPdqLaVGNig8vsjd6EzijIbr5A3818ss/kYs5Q6Dq3ypP7+4q9ElIU9pq RaCbf2Cl2Y8qnCuT99A4TmBv9cxVvrNVKGi67CJViZwfj28lf/dVod+zp4+f SJPzI+G29sfqKkx4EJr9Q5ScD6d/hWdLKtFizw2p90wGfpsqES6XrcSSP72U ZtLzIclxv/bPVuBOIeFtO6IYeNHh7o3vNRW4gvY+apJ83mVLNf/EeVbgVZ7E cAp5Hrx6mZLoU16Ojsymc8aLGehxLMiaFVWOrxZZDZmO0PHk3JnlF6+W4z4T CtaQjhJw2ehhta4cUxJiDm+LpeMdtfB9u9zKMF1pi9cT0vMWlEtjn3TK8MTy lDcWa+i4K0o/Xmp1GYqGtrW+5Yzi6GLepUIFpVg/4pD3pnAUHZo8mynCpXhv j6GMhy7pMA+7i9EZxXj+/oXzq9RGcKP8no2rg4pxi03wsibhEeR0rG54bFeM fYmh4uIjNMw8UKd+m68Yz9Yk8inE0lBe5OAiM8vfGL0peEcyLw0F07e8Wcop woNrm3KeZpF18J/Bp9SAAoz9VaZ+snIQO73FY97tKsBI2zveTm8HUWjjkXTj vnwE+u68DW6D6OmY1JgD+XjrUs3618sH8fCgq8Qj9k+MDNM7FHdsACkMIna7 ew4ykp/ElWT24fZF7IyLtpm4TWDq6o9P3WhvLJn55/QHHDGnjS/9Voc5gl4t v27EwzGORv+2I7UQu3N10xeZD/D+0+WlDSfq4IHRl/qoug9QE8f3ZnJ7PZi9 6q/y3JYIj3mbeHepNMCYtMGv7X+TgHCxdGfvaQL5PRu+PNNNg8hFGc/ytNqg IuOU7tfgTJjifTN3mdoN2iUKv7f0ZMKGB88sVjv+g/TW2QPR6t+BhUpnFFv/ wavZ5/C4/zvo9+lstXLsgTNQruWyLwsOd98dtzvSCwuVyiprx3Og3MRZOYy/ H3b3/bfxnhVC0Pe7850Hh0Ax13Jc+ROCgoWU0273IZB/9rm4ZxYh54tOsca7 IVj2PnV3rGEhvPI8XqUyNQRcI6uuBUYhOAzoDAzHD8Pf9C/bUOUXCNryrq2g U6AzykZMwuYXLDu3q8F0NRVag/jmLvv/AoWhU9u9talQ62hbv7HpF9BPjdnE B1OhYOWSm77Xf0M7IXps7yYaxLg7FO/LKgbHi3fExDRGIMpuadrLf8Vwfn+c zi6rEYg4mvmavqQE1nWGK1NujUCYlODFd1YlkF9jay2UMwJ+9d9F5mZLwFnC W2m/2ih45zlyzGRK4ZSlUfmU8SjcSlo2mKpfCl9bzxnpXBkFdz+nbLu3pSBi +fFMQNIoOCmvOJWnXQbqP5xvF6+mg4Nk9tFVLmUwfOeS3YwSHWwETqu6PS2D U1TR8pxjdDDpyeaT7C4Dv0eUxH4vOhwMO5Pqdbcc+k9nD5Z3kv72Fn7V9LEc nhuan3EYp4PW+dy7O+rL4XzU6hu+SxigqrPS9I9UBazxymHaqTJg89jPWa1f FfBngW79yJ+st2sOBbDoFfBI+sIE+xUDWpOrhNLWVoKrXVZMdzIDHrn82Sx9 tRLK17dXz9UzYODg6bTOqEpgly1/p9nPgH1SI5ovysnrfF0ygywGjHWyDZdI VUG8tuLyZ+IE6Gf7txcer4KOpaHN4fKkH18Knr5zk7z+56jkInUCLI3W3aLX VsGB973Cu0wJSN8Zt+gjuwp24+HdTEcCBJdtf+ooXw3e78VqZC4TUFCyJ67J pxqc5gJP1z0gvRtfpPD0UzVsSvMbO/6MAA+/Y1mHW6pB+F3oco13BFTbNxzg +a8GarzPBoZ9JEBur3V1jkIN+FMtd1h9JcB3Ta/FNasaCNK1aHiaS0D75Ple hYAaYN5nGaj8Jn2efmsq5k8NPJy5v7WokYChpzz3rJfUAj2+WOcz6Tmdi0HL xHbVgqerXgw/6b3IoytfVTvUwpKUUvka0oNMuQipB49qgaHxOY9nhACDxVIp 8KMWrjYsOvae9GRiz8fds721oPbC80ca6U2eAqXCbyvqwMXWfmLrNAE2b7P0 3fbUwW/xb6PCpJ8zb0GLnEsdnFslHnGa9KyQRdmpf2F1YLe/gbqZ9PP5XSdp EXl18J9BY4cR6eGilW3XTSh1oDKc5kwj4xU3vyzwCdaDZkn8vTEyznVhFvdt qocnGS/UT5PxOTONR7i7HowjlgccJNtbdcjrZNTxenh3dt+VELK/IhVcddup HsL4eXiOkPlcllrcaX6zHrarNOu4kfmuFz4So/q0HujQs3+eHE/53KMzwvH1 cGxsbOkcOd4bo7XbRrProX3d7czz5HzI/BElymvrwdoh3PTAEAG1FRaZCQP1 8LBgev4BOZ9e2ZG3/dn1kKUu3LCnk/T6x+79p1Y2gL7OvyFr0s/NL2V4teUb YMJAzHGY9PO9gLMVa7QboEaN7dBHrp/iteSQSeMGsIkIFDhO+vmPE8O08VwD HFY/FiBN+jnISHXtF58G2Lj7DtcliYC+nbnx5z81gJnd+og9zwkIlZw/r4cN kFS6ekPFQwK0lx1UlGlpgNtmYU5lXgS8olRk/+FpBLDrFRBxJuBYfEfNCatG 6Gz7d+/fFgLGAtPOllxqBKn9e25prPn//wXuL+y93wgNVj8c+AQIoOzcqbIt rRE6VDZv5B1iQFC234vFvE2we3tg58u3DFB+a77zztomOHVpNDPhIQPafbaX jik2wVZh+/8UrzFg66Hm6b/WTVAhs9vh01EGlNdssc3+0gSMI+kp5nQ6uKdz mYolTcB7oT54Vwvp6ecNTxI6m2A84tjEkzw6nLfyKnjG1wxpIqfWZQbTQaC/ VvqSbTO0yDw92bOBDkdmblCkl7SAtIj97HrFUWB06t+LkGyB1GlxpK0YhVf5 m9YJq7bA3+iPLG36CAz5Vxzn2rXA08Otk5eSR+DBig1fWr+1gNm1JT9EN41A qUzxjccOraD9oU93fJwKl/neCC263grxA1KfoZIK4pRLH28Ft8J2w9ln6+Oo cPazRIdLZiusFLOL8zWiAr/mRW0dwTYoLOVW8CVRQM9QdPHk9zaIyLewLTg4 DCFOS8dnK9ogE/ViHSWGof0Gz7/5v20w26CS8WlkCFyjGbkC/O1whlY8rPp8 CEKISg9Ji3bIOeJuqdY9CO3h9/sOTbWDt2fTyNMzA+Dayip6pt4JNn927fyq 0Quhp9r8lLO6oGLx69uDR5qh7MSGFUaivWCyYPbhzs9KXKXYK+4h2QurXsxl m2RWoeOKBKkX8r3AeZYpk59ajewqBbV2rV543pTwZk9ULSoc07Z1PN0LK9yr ud9Id4Qdsv3kntkLV5YeXPeOvwVtNN/ohVv0QeCmf1vs7bowUcL+ZIZjH6RU NP93vLYLmVNS1i2ufTDzNKW5FP7ik+9Jbmvv9sGWyz1OTtLdiKrZz99/7IN1 yeddx7v/oezOtt6vM30QJKg4Ox/bi3Tp1b6Nkf3gafA0ckPtAGp6vb9a9KEf Bv8db3SaG0D/5p0u6Wn9YLldRMVCYRDFHx42CPnVD0nZZyMNggdx/+jNdfq0 fug/2tZtB0MY+qPzR9GeAQj3rDC78XYYO4XPJacfGoBrCtuYrqTPZS8w38UY DsCxnoHN/MQwZq9fHujjNABPNnwt3n6Agj1++0z3BA/A6sSkpZK9FFQ5Hkuk tw+A2U93p/XCNPT+oNAf0zcAcQwPtswuGpbOZbeGjA5AfXEOpdSC9Hd6Q74b zyCY3ddJ6o2iof/qxU+2bh2ELYbK+8xkR7Dpn8vW2JuDQKtctBw3jeLGPRPr Q+8NgiZF9+fJfaN4/pmvsO/jQRD75DR33WYUubqvp2xjBmHH2SN+Xs9HUTa5 vFiibBDCYhNK3Eif37i+wylUfAjS1+fWPCyho7ggkWchPQRtqdI/1nbTMTvm 25qNCkOQff9Tq9wUHbmVe+pTDwwBFEWKpcgy0F/6KFS6DYHYd7djDl5k/Z21 7G34zSH494qS9iOUgSUGdVNW/kPQaDat/CCegQK3LNKGXw9Bn4nu9uAKsp6v PbOB7/cQ7F/1sXm1MIHKZ7berq4ZgpL0peMbNhHYMDvS/Lx9COLTUj9GKhK4 Su7aExnGEOx9lFI/RvriR646hTozBFsuxWKFNYGWRuxDXxcPg7WA4EHxcwRG et3jwNphOHnLbfVSPwK1RfQsl8gOQ0ZvwlTaYwL/Jgpk1CoOw1bptsdlrwj0 1a4WerVnGKR6DOJN3pO+bQx1tdcdhv7gmhVGpL9/nTMtlT05DCs3RUYj6e/T c+Iyo9ZkPH95x/t8AhO3RnfcuTIM9QZhUTk1BB4tcNp98M4wOBUUa46RfqOa yoUvDRwGs8JGnQjSd4+olNH60GGoLaC++tpLoMLd1KMRkcPgYpC9SXuY9O8q 9w+nEobBK8rtl8YogVeSd/FsSR8Gt4nM8x/GSL/pTNsycofhIV/h/D0Wgd9a crO+lwxDg/W+a/XTBJpd9BXzqR+GsKf2WaGkryd5Dl7R/TMMiW8bC5D09atX fFXLhoYhRbT+riPpYU2FCvmmMfJ+nWXMq6SXO4ue+EdyhiHc7KcYi4y9LI26 nfgpIOLx5t8QGUvSxbS2iVDgVH6PhT4ZF/i3vRxbT4HT1ie8N5LtOa55O54l T4F3ttLm5Pse/0tzMLyrQoGEzHXUNWQ+cYdkPh3WpsDlFT4HgcxXt2OQV+gI BUzeLL/cyiRw6PInxxZjCgx2CXl1k55+yHspL8qOAqEX9L0sR0jvRiqvOXOO vP6U//6B/3taiXVthwcFutmCn6JIT7uVZNVNeFOg1D6G/0IngStsvXbkPqQA L/EoK7GJwLSx/Q/vPaNA8qRYp3k1gUYPFvUffUeBHlgI8SwmcGJ96f6V5Dm9 Nix0ViCPwBdfgyPbvlFAfiEAVmQQ2Na10uRsOQXkjgv95xZD+vmxS/v1RgqI Oo5V3XtJYN6eXIf7XRRQeLrKXZLcb7GvTl+MHaOAjvgWSs91AkX1ssfT2BSY SS0RXXaB9DZz+a18XirY3OUrzrUj8LzRj4DONVSIljf1TjlIrse84DKqDBXq XOcoo2oEGnw+FT6tQIW1+/w+ZsoTqCK4NHrVASrg4q+zbQIEsn/bZp24QIXF ueE3r5cx0M0jfZ/9NSro1TbSGN8Z2C3FV3zRhwruZuIx4+Tz+csnrT4onApT jUsHw3wZ+FjjP9qvHCpMWArzgSID5wfN3Rt+UyEke/GzxWsZ6P4ieepfDRVm zFp+m5C+Nhs3XTzXSwX/BjnXZ610lExJlNQQpIGt8ZursTfpGGLNidNbRYPb BUsqfjvQkUfAaJvZRhpktT96e12PjgNnZndfVaXBxfRj+/1E6Ph5o8HJFBsa TOstydD/MIr7n43f25RCA+fIutxl30cwXeewgOJ3GlCaR8s0X46gDBEZoo00 2Lhq61H29RHkN9B9a91EI98sfpHau0awju915nMODRaJWX6uTqah423t4SUG I8Anh/NhD6i4/Ux5C8NiBFoT/kzx21ORecKsuMVpBF5a+f0Q2EXFB7Ju7+Nv jsCo2+awb38pmFr31hbiRyCtTUTr+04Kzspx6jzZI9Dv/PnCtpwhfNaYkz1I uon6dAWl4n4/2uXrfazOGAX7P/VJpob9KJfU8DKjYBQC91pOB4j3Y7YP1eNe 8yjEl1fv6PvYh91b1+7cwEMHBYGhqrjSXtx+99Z7M0vSTY8VVQ/Q/uHvHRqP fvMx4Ldz6xGKVjs6KJnFjwszILhp+rdRcRvOqF7N27SOAWXDffo2hm2ooJXC 8FJkgOkoDls6tOKLo5tM1SwZkG05k6Hi3YxnXZZIJiQxQNG7LZH/Uz0KxLR9 fnCcrFMX5+ibfypC+aV5lA9Hx0Aqys+872YeTJQpusYZjsHmX1m5Wq4FUPDg /UiMyRjUhxlsE1YsBAveh4xIuzEwzF0arbbpFwQuGLPC3MeA2XsiaeN8CQxM Di94R5DXxxp8lVNqIK5PTMKcMgYR3TKaJmatcPn9gwgT+hgsyyHS0ytaQctx dq3RxBioi39PzNrfBo1/uyWPc8fA7Hozb/aWdviv45PMgZXj4NwUlGM82QGO daC4U3McHNbnq5/z+Qsb8i7q8QWNQ25hj0b6uj5YtZbNvvx0HJKtF9LfmfTB cs+g9PZn4yCdreyo+agPuEoJ61PfjYPyZqMbV8m6ozO+e9wkYxwGY/rs2+r7 4dVj4+jY7nHwWq5vHe0+CCGUf6aCA+PwKCmiYjRuEAL1Li+9Th2H7uP/3exo HoTrC4+uH2GNw0OFUN5HGkNgcq1Yn7F0AlQ+z6cqke8xIVuN6b27J0AoSUW1 wYUC/NklqQlaE+B//dT7d+EUmFtl5iysMwH1X4pWcPIoMFrrXtOnPwHqB2zr XUSpUHkwOT7YcQIYpXHLhrKo8HD7BqO2xxOQ59t0c2yUBr4PU/gOhE9ASd5W /RsiI+A5sOdn8qsJsv7/WHt39wicjbaQ930/Ad+XU89s9h4BXdEwrmzWBLxw W+v3fPEo8LAXffLom4DkB5/8X7BHwbG/g3l3eAIOYVXD0dV0KKxO3/90dALs 2ZRPj5To4Bfj0PxxagKGMm5bf3emw4Ju7kKXIBMe/jfZ9vY3HRwUw/Vpwkw4 G5gU8LWTDgUS519Or2JCQ4TTV+NxOvjSVu8Q3cSEJQb3tipvYMB86FWLI7uY oO1476DdFQY43D763kyTCYMSda/z/BlQ4Lxp1GkfE9w+FrZ9eMkA390197yP MMH8TCGxLJcB3Rs/VAcbMKHnQ5DmoyoG7BfwknhtzIQHEhcNQ7sYMNe59fNX WyaoBbk2KMwxwK54YbrAkQktCdsKi5cTkPe59WC1CxPYO4/d6VtPgLdfQPvQ FSbIFoefSdMkgCvXs1gygAk6wfv4/d0IsBPOOrEtmAnqHY0aB2+R9888faMe woQN9TlPH9wn76/aq2QcQeZzmnc6MoKArkzROw7vmDA35J7lGkd6LZpafDGO CStlD07lpxDAcX9t8yCVCUGfFR0YeaSvbS4nPP/KhLdE3KGqYtLDh/TGYn8w Qb9XUWpHNQHrdkruTfvJhKMG1a0rSG/eEWcG/ixkQlSQk8E10v+dCxX15SVM OD5cdM72HwFa1Nj1rZVMuLg6TaR0gIDIxptn++uY8OFms1oGlQD2zxNfx5qZ IO7bkC/DIPtPkOPOdTAheUzp7aoJsv8Q7uFl/5hQvutCftAk2f+tpvA1A0xw DxwUvztDwG2n5C45KhPyVLlvp0l/t+vf27KLwYTfJcyDE6TPNdWsPHSYTOja sYj3Cun3iA1K+YYzZH7NBh2XSN/P8PML2M4x4UgZpYBBxlZjXSbnF7Hg3PfO b+NknN2R8e7GEhZcXhD/7knGa34/ovgvZ4HXj3tlPmR7t1KddoWJsODVCwad f47s/6Wm7ztxFkTTpRRFOWT/d4UrktezICaiKjRm5v/eHRLLlmLBvYYwyS/k eKaN8x1K5FggI7aoR4ccr3/Hl7/7d7AgaGn0bg6dACGnOLtsZRakSHdPS5Pz FUl58UdFnQUeB3bs+95PgLz7Q5uUvSz4zXm98ftfAr5N3+6QPcCCOMmeLOk2 AvbddbOKPswCvm3nt3DqCDALMbYIN2bBT3vRlZNIQM9q3RZBSxYsWTjUtDqL gIvv1M0C7MjxbWni+f//K/xT15vcPMeCwCB9g6VvyHzUhBrG3FhQQ1yq6HlK wJufPEauHizwu3/6irw/AemVg4b2Piw49UZTZO48ud9M2qtb/Vmg6nv6Xogt AWUdlceNgligt3dyUaghAd2UL8cOPWfBoGomdCsR4OoeV54XwYIKt/UBO6UI mJx+cUQ9mgUui21HR4UJWL7kjt62Tyzo1fOwzKczICLErTgujQU/aPoztX8Y sFn81CHJTBaMLebMGFcwQEtO94AwktfFDnh8jmPAhUNC+yabWdBWeX9/8QkG sCp58i53smDHCtlSV00G+JkwtSj/WOCTVhEbKE2279Su+YfGgn3mxMzaCTqU 3o1TK+KZhIEtj1wqntDBZMnLDC3+SbCVCPyw0YMOf0MeqmYumwRZG4GqEQs6 sN65KX8UnwTqmvEyYiMdZPLUFZ4qTILmrf7OVPI9nnZoWwq/6iTEbrgeXRc8 Cnuq1m/305iEac+DXpddR8Gok2frtYOTcOHPmjKZ7aPgO1O52dpqEjgHT6/1 JOuEP2qn1ssFTIJk4FybiS8Nzs7uFg4MngTWhlP+6lY0GMtfvngwZBJO1AbW fVChAe+RXNqHN5Ogp+25WLafCorWq3Nlv0xC1qe9koU6VPDzqbKS7ZwEjyzF fuHhYZAv1Xi1WXkKRJd3rro1OADpj4Qe3d89BaYTMi9lvg2A1slBn36tKTiX 4drn7jsAJ9ufucTrTUH25jxf7uoBuEWjq222nYKzdX3GVJ1+qBL60CTzYAoq 3hpzaQ96wd1ypYhM1xTcs+w+VZX5B5yTlCLleqdAm1WdMX/wD5jPnti8bWgK 2vlrrMrrO0Hr7dPdymNToPg3yl9upAP4/gna7OedhtaL52U117dD5Fm+eBuF aViZszBwzLUZim+w1Z57T8MO1YClXu8rYO2LASveDTOwt9Ap/Wh5Imre3yR+ XWYGHhZVyAgtT0ELD5um/i0zMNYweMLq5Bd8ZlRv+Ft1BspiUkPFaRm4fEXe Qf+jM1ATapZk55qH84HPFXiuz4B/hVbc+qRSHLh5kIdbOQOrspL1At424aJz PvkX62dgJcPo6rkNzShlkX3nT8sMyLRJE4zoZrRXU5zM7ZmB0MHbn3pjW7B1 bC3t9tQMjLh5T6yObcOKC+NN09Kz8FbxU1pB8B9Ms439yLw1C8E5n76a+PSi WttmNr/vLLwPDt/85lsv/jT5aLDu/iz07LU78ma4F8uPpY3rPJ2FOev7tr+N +rBfI29vyPtZcOrksj5u6sc1q9rrtlbOgv657V94vgxgdKitjHbdLPAvthXy /zeAcsv+XT/ZTN7vIOGfLjyIqouG1np2z0JXd2+yyJVBNBxjnv49MQvxhn/P 1G8bQv9q4Rn79WxYc19oPjpkGAWOPte/KsUGwTMKHZE5wxj6W/xdgBwb7rbf vq45MIxRuRsOpiixYedf4oiFJgWzknY8mTnEhhV2rnsFuyg4GnBE6rkbG4oN +MTLVtLwGk+VR+JVNrTqF/c/201DtteJkhxPNtSk6z6fsqbhkmvmrj1+bHAp HLW4/56GMk6nM3e+ZAN3eJFA/I4RtNx392h5PhuEaynagTtGsWtySPjXLzaM vpChzhwdRee0E20/y9gQvG/mNc/ZUXTbtPHslwY2rNqEhyqjR9H/v/z7rwbZ 8EUzct3eZXQUyJU9HkZj/7/OkTgkR8enHk9EHxFs4KfG1fzZT8eIftv3PrNs UCpN6813p2NaCbvgzAoO+I94O2rV0VHN1/mBgygH1q1Y0ZY/SMcc9UpDKwkO dHmc2FrHoWPxxzddx6U5sCnn9bJIeQZ2BGuyVXdzoGU/v2C5JwMdDsYWKWhx IPnbgu/XYAYOsJcEywMHcqx/2MlHMZBxsU1i3TEOvJ3U1vqKDOQ94bn7P3sO LDNKU9f9j8BH/N1cthMHGFGu0fdWEiiMesWssxy416fkdnQTgeuUV5tS3DlQ ZTNufXUvgTEU73V9Nzhw1M9VqOkogbLvB3r/3OFA+EaKcb45gUqime51ARz4 fMXn1/bLBGZWrtesCOaAkpDJs8+3CdS6f3/hVwgHxh0T1bMDSJ+zTEJ+RHBA SIJtfuYN6e3UXPP0dxxIjFnuzxdP4EkXmQ3JcRw4aFY6sDOVQJvW8ZR3qRw4 byhTLJZPYE+I9bXXXznwvkSHp4H0tcuRIq3wHxwIKFsYX0X6m7awddHjnxyo 1Izz+ddIoHt2WEVAIfl9b61g5Q4Cp9xnwnxLOJDWmsxd8o9Ar22OVrcqObC5 LKHIZYBAnr6yTR51HBg4lfb7GJXAB5FKwxebOYDP1oxl0Alcbvo6zaWDAxm3 lqp/GCcwfNnCjVPdHDj57OaDdZMEihef3Wfdz4E1/+1oFp8hMMq7lteUwgHe 3HyxN2wCpXerVxvQOTCd/nbvey6BifR3zw9PcMB+bpGu0jyBCol8tjrTHCie Xrzl0AKBXx0uyWhxORBkdK+ni4ydv49tiP2PC7kP13rNkvGq5dfX8i/hgnnd 9sMPyLjEeXqV23IuXBvOPXSfbM8z587KRhEuxDSZ3xoj+9uycn6ZpgQXLpWu GKkh82k/e29JtCQXPv/nlbCezDc4n3cxrwwXjFJ+ZnSwyPVbFTR/YQsXJl5d kxUgxzviuoxdp8CFZbzVAh9HyfEVhUzuVuVCm9G16z+GCTRcIzr+VoMLne+j fNT7CJy//HL0v31ckPVd0N7SReCXkjWUcwe5oObYVhPUQqCjZFR/zREuxO7t N7StJfBXRVznGxMulHVJxZgWEHhNSr51wZILVzh22be/k/vv5qcGF3suPLzX YyRC7o8HsunlKue5YNdpm/LyNYEaXruKX1/iQoa0U4X/EwIpDT9wzoMLyyXL Nvb5EXj8bv6PCh8udMlqHJo5RyC3Reeb0n0uyFE1/L/YEJimUPz5ZRAXWpsD 2jsMCFzZWfnB6TkX1N/uLA1SIrBZrf3ZbBIX1lWNrrBkMDDwsW3IqTQunLok 75DWxUD1vu7gkgwuGDAmOHcqGRgROugXXkCuh1HvhRsfGGhPm7i8rZkL3hai kTPGDBQ64Oka2sGFVTGV9Yu1GVj4etZlspsL7TdktjyUY6CMHo99EZULu1IN K6an6DgUs+K49QIXtgsnPnjynI6vp8IOI+8cFDI/G5y5TcejhqsOygnOwYf1 c1FZDnRMZq/bM75qDl766RU0bqHjFfOtW4K3z0FG0suvlIxRnBE8tDjHfA5y Hj4+IpA5gqIMoRe/bObA9st+1c0vRnBHQ6ds9SnyfkxXabw2gg6vPQ7/uzAH O08fd2WojODvzXHBfL5zsNJn9/zOTzQM0f5vpUniHFwUMWrTCaBi0qaaWNuU ORh8s737jz0Vixa9UXFJn4MnbunvxTSoyCpXNr2VOwcXRPTRlkJBG3PHV9G1 ZP4h3ganDlNQ7jJKjkzNwX57ISgcG8L9xo8/szhzcCDR7srV4iG0UrPcP88z D9PnVIMqXg/hIzbjlMiyebjuV650dd8Qjj3YGK+xaR5Krywq/xowiHkxPtsC jsyD3siB8deLB9CkYa/6hoh52BP74rdGeQ8K7l1WlPduHpI9ou4PPO7Bog+d x+3i5+EUOrzQOdmDyrduO71Nm4dnXUVh4sn/UGhT1pO1JfOgz6fgKJH7Fyvc VPtXT8wD3zfPlEDsQB2BbWFCBgvgff1Dus7VBpy5OrMuzXgBluulP5Ck1uOX P2UJhpb/C+oAFf//P1as5+alYNC/Hq9mu4xi/z81By1al53Ov/xVpOYKef8/ H04R61hPyr+3ox89B6b/P7U0nNognMG/bg3vx6ar/z9M8W2V/4PAvyZ3vlJG sf8/fW/xjhvXvr+USl1ohbz/P4BrdOGbc7q/cvGakwPT/z+KKuV95qaxvypb ah6j2P8/w7p3PI7lrr/hxDmpQt7/P0mdLNS4fKq/UJjYvoHp/z/eBQkNoKmh vwgCqEkh7/8/M4g4bA9/mr+/a3fUwPT/P0s0eYpdqpG/dtVGX2D6/z+jXRUJ q6qBvy4/Fur///8/xZdGzuM1ob7ELQxE "]]}, {Hue[0.9060679774997897, 0.6, 0.6], LineBox[CompressedData[" 1:eJwUm3c81f8Xx2lQKk2VvkKkkCJRoZxC0iDZo6yMiERWygwNW4XsvTOyhXe2 ZGRvrr3v55r3usb9fX5/ebwezn2/z+ecc9/v19N1zxhYKhntoKOj+28XHd3/ f16C47M0Gg1tMV8PFXsvfNNynfvjOpWGzsfJdSacxySzcy+fW16lobtLocnb 5w7CogVUz5NoKHHKTb3Y8wwI88obTM7REP3Pppe3zwnC61EtOsIkDRX20L0K VL0OeRHPo3pHaOhq3MITBs/bsKZmd6N9AI+v3LAW6bkL1w579DV205CdsLqm +NlH4PA30KG2jYY+rv/X7pSnDCWe0cd/N9HQO46UowLKGrABP/KK62koafXs IsvLp3CDWqKUW4XnE61S88VdH5zy6kkZ5TQ05bLgy+NjCOUvu/ySimmIjyPO Oa/dBG6NLTZ8z6Ihxvjqtm9sluAWSXv+JY2GXuQqz0/4WUGl+gFG30Qa2txP 43mW+RpkGnmlXcNp6FKBRt7oPQfw9Lo68iaYhj7cuHWyvcYRam/JuLwOpCEC fVirm54T3MvX/WX8gYby78VFURzc4LOlhaaeOw0xuH7jVFhxh0a+t2RNJxpy z6DnWHD2AIWo4Cvyr2mIP8FBGav4AEofmtKv6OL5+hhh8tt+8OV2/72LWjQk PO/LE/kmADo2pqfOqdLQH5bN1oi3gaD2atfZUw9oqMajv4s3+Atoa0pE0F2j oVaJHc7bZ0Mh4ug9ceplGop3Ldd+qP0dhprUepYFaEhEJoeL/nsY6ElZH5vi wl8fcWLDmz8SDC+k+jQx09CTMzw3GpViIXGigL9uLw1dkxVnkNsXB5PR1fW/ d9HQqdKregZ1cWB6jLArj7qNIlKPypjcT4CXW8edwia3EbOAxg2dt8lg3+Jh YVK+jeSvtdOuemWCz5xd90rRNjoWFng4yDsL4hhNb7vnbqOw3o4LDvezoRHk WSJTthH9I4uSVs0c4MpmKWsL2kZecieULgbkQnNA0n5Jk21E5W5tltYsgvGM ULu/+ttIv5MtvY9aBOv1nwkaT7bR4ETItlxUMZylt8x7/XgbzbPSK8fMloCj 1bUnqRLbSJGpqWsitAzOKdWnHzu0jWJvy2h/SqiAGy9LWOKYtlEbPVVSY2cl PP6c4SK4exsRtwNC1g0q4V1lgPJ96hbSdDzclHG2CtqENTdcxreQH2HCLSGn GpyOzt6fK9pCjYyXGe+S6qCjY99shf4W+hpr0cqy3Axuhvnl6U+20C3RhrV/ ei1waUXnyzf1LbRUr3GHuaUFPh79ecNUfguljD6S9FD7BzeVNPwPiW0hl9D4 p0bXWiGpJUFE99AWCujXq9ja2Q4ODTddNss3kXyl8o1LlV1w+rflsWtsm+hM jsgrn8ghaDwiaiN+YhO9Y4iw5x8YAkcjavvNI5volpDwUOOpYehi8vwis2cT aSgz7/kvdBgCVMOOKK1soCvxwtL69wiwc676kEXjBlo65rCeLz0CMyynDsS/ 20C1n351N10Zg9Dnw+ZJ9huozFjgu6PSGMj+SmhMtd5ADNWMkaesxiBOT9An +/kGwkaMg4Uzx+BJusy+cpUN1N/K6pF/fhxablnu7RXYQKf0ODNiT0xA/ovq 3QcHqajlw8r9lalJuM758nJSNxXVdh919mWYgpKOE09vtlGRs/T2JgPPFPy+ +SLvRR0VmTVlF4XqT0HDwSPP6nOoyP23/G3e3ikg5Or+dvPC48X+PnOvmAaD 53vnT7pRUbSsgcDI4DRMsOWeyH5LRSi7e/EEdRpmPRksh15RUfCXJrt9wjOw qv7jtIQ2FV3YY5m6GT0DTJtUxxVBKnJ4xygQ8XoWfLMTkrz5qYhUW557y3cW DhkptHHxUNFAUG5kftIssDTH8j0+RUUqPRlNzL2zwBkj1/NjFxUNl3NJW0vM gahMsKhJ7zri0RAJjFybgyIK6G+3r6MdBcwPjx2YB/EfMz7fmteRoCBLogr3 PNw6fnO8qmod+Xwmxwg9mof702NBnJnriPO/MvoHCfOg53OZ1Ou+jjb/qRUW SC+AY16QV5PTOnrQsfubpuoCfBtYZqtwWEdBarVM9cYL0CBQcC/l5TrKUL35 g+HTAlxpEo+301pHNVdb3Xf+XQCF1XAxM9V1VMYL/zb6FuD56a2Wp4rrKDHH LaVsdgEiLNCmjOw6yvSN2RG5lwgMzDJqR4XX0QWtO41VMkTgvJo4z3BxHd38 /b6XXpkIEjoM76nn15HptZ7vjPpEeJVZnzVyeh19fSGgYfqOCL0K8nuz966j EsbzGy7ZRMjwVyt9OEJBPWauEs0HMKgtLFS6NUBBgb47AixPYjAyfHLmSjcF 3WKL8e/kwuC4UD/Lf00UdI4zYoF4FQOXf7qWM0UUtNtyckLpCQZhlN+7B3Mp yIPxqgKLEQZ5nFwR/zIpqJZfVyTcAoPpV+P1hQkUdFfk4irJCQOlw6ZcXgEU NNbq2vs7HANzsYaiN94UJOo4VRIeh8EH/QuPLLwoaKBMlVcsFYPSnIW3Ku8o qNpS4tavfAy6ehWOyNlTUIP0p+LoXxiQ6LNTJKwpaBh8nshWYMCjZN3J9ZyC Smyb6nr/YnDLsf3F8WcUlPzU0bj2HwZacSI7mHQo6IlFSb9NJwY2Dd9CtzQo yFDoPMtELwZ+S2uXFpUp6GaTAv2JIQxSTmnUjCtQUN+9PH+mUQyqpIq1e+5R 0NvGlmw0gQEl6O1HBPh+HzusXs5jMMVWMSsrTkFajj0jCRiebxKDfLMIBfFI N1UELmFQLfQwS1WQgobohHeJrmKQWxJ4eJCPgvTieiP8yBjEyXS/NjxLQVUc c65R6xgENLN1zbFTkHPGSJLhBl5/DYPrr1kpSHHMh2FkE4OXo8lh1KMUdHT+ 0Pej2xg8MV/YdGOmILXwSY1NXD9YE9bdu5eCKN79t8NpGIi7OlQE7KQge+Ej j0m45mUq5z65TUaXZuk9N3B94utOr2gKGZlv2g2W4pqB/d70uWUyehYbpC2C 65Vkv/uZC2Q0R22gN8DXH7vckSE6TUaCe+fa72xh0PaL9WDZKBlxfz/SPYzn +/uOrpXMIBn1CRQcFqJikNWS0P63m4xqBqO8r1IwiNKcFVVuI6Nf12fll/F6 +IwJhvY1ktHEUaZnxssYvLWwperXkdFnneoufxIGZuSSJzMVZJQ3K1xguYCB hhsdelVKRgVCVQcZZjG4u0/2DKWAjL7vv7qsNInB1W/e711yyOiJbbSVGt6/ sxytEwwZZHT6knHkIby/R1OPy/klkdE1K+nPbnj/d1x5ksYSS0Znv0nJp3bg 81Uauz8ynIy0039vfmjBoPmfQGt6ABnd4JdxM6vG51PL+soVbzIyjgz99LIc g/Txwm8lnmTEfGHvBF8RBh8pUlp/HMnIVOU+U10aBvbuH0sVbcmILXnicGo8 Bsb7m9l7LMnopNHlaakIDKQ5NccmDcnIWa/mc5QPBsJpUXde6pLR7ktS0Xoe GHCKjCevapJRsVj3kf63GGzftTTf9YiMJrfn89dNMSiy9Fw9I4b3M1Ly86gU BsnrDeqpV8jo6Z1xAfPrGAS/P1QidImMmhH4Zl3E4HVIuDNwk5GvUriC4QkM LqEcxqcHyOjDIUZ/7ykixDMPsYaOrCET+XzyjrdECNIGRrGBNQQvJSc/mBPB PSVmpbdrDXm0FiQ3PiWCgdSzlv8a15DUZHlaMBCBy27aI7pgDeX/4+YSoSNC 3OASluS9hi7Gxy212y5AEL/K4F2vNfQghHLJ/tkCuNvnN0y7riGG2ODeIcUF MDjskMhvt4Y2guNqNvkX4MydLa1MvTVUf+aE7LuBeYjJYKzNF11Db5MLIrtF 5iFg/XmumtAaKr2aWjrLPg+usg0xZP41pLM2vlC3Bz/PCT5vxTjX0Crh1JHR /jngOHbkchnTGnI59ko/xmUOot6yRVQPryLrHcmHYspmIeL+Zev2T6tIB8mp ZB+fgbP77jf881hFtwcPshZsTkP6XwOuZpdVNKN75Oj30Wkoefi1rd52Fc0u /pCg/JjGz1+ycLn+KrLPkPM7Jz0Nx5XLllPEVpFNOEExymQK/LXv2TrPrKAn yH5jNnwC3M31HfjurSD375q9xQ0jMOSnE1EivYKqmFXb/qSMgHiO9u8Hkivo Zm36zTavEVhaVd3z8soKMlfc1dUsNQL6LvdDf55eQafsxrc+lBDgVtCVIoml ZRQY9IWwU3kYtgt3U+TDl9HVu9zKSUf7QatvB9vwt2UU7N1YLfGvDwo2afAq YBmdCX7TNu3TBy9vUz8EeS4jw5N3vP0Y+mCwgXii23IZpft+7OPb6IHSwe5r ejLLiKOt0Cp1tgve7kyzt15YQs2P2BZWZ9vg5XcdBr3pJTS635x7IrsNDASP fpMfW0K0ep1ze+3b4L72u5+8vUuo7JLr+eWdbXAyV2FhqHoJ3ZsO2TThbIU8 g2WDBxFLSGkg64Xwn2YgVtxQOPtgCd1+rD54+FY9jKovDhyWXUJTEtcHHQbq oHMh8QXt1hLapmM55fKmDkpZD37qu7qEROTGzCzza8HbaqQqgGsJEahjpXtF a4D3jJfY1voi6s7ZJWOpUgn6ri1nu1IWUX7rIzMXiRJQ642WHIxfRFPCMdxp CcVwX/iVxnjUIkJmLWzaB4tBZPyQz9LXRfTBafOHxkwh7JFTWmZ2W0RzTvVs tKx8yDzYWXFXcxH9lMKON37Kgfjnif0KKovoxsn1WI39ORBaYbuq+mgRFR6a uuwTkA1ur4/zGd5ZRJ49ojbDElmg0q0e4Hp5EQ0KvCbnfU+Hjag+neK9i8jM XPWOzXoCkMhpDr93LSLOT19N94smwLji26A6GgnxPqV5n7eJh+YdbLWdqyS0 YpEssbQZC3HGTy8ujZDQv8s9fx9aR0EIunh3fYCE5gsVF+9yRYLPyW09uh4S usWtwmLTGw62DVFfmZtJiFLxoMP66XeQu0TY4C8hoSb1X54+pV/h5odsFuF8 EmrgrC4ISvoCwgRXQbFsEvps9piZGBIE/wWdeXY3iYS058xE8gIC4NDc4juF WBJ6bCvgJC/kD7tkKoNVI0hoy7mpcUPeF4irBg3PgkhoU+t47L/8TzCmcGXc zJeELCN39u2i+wg9yTu3rT6SUN18YMFpTS+o1Ey47OpMQp0FwsrHr7+Hwp82 Dz68IaGeVXn6HeVukLHvjpGfDQldkydemlVyhW9lE6ERZiRkJPp35LPyW9Bx CHO+ZkRCEi35Aj1xDsB75ZFhmy4JuVrKHo9msYPFhZ33LbRISE3e+Mhc+mso SSkS3KNKQuNOgau1Rlbw/pkFS/wjvB5ZD2feeL2Eh+xcGzfvk9CfO5b3fnw0 g6Ev3rWvgYQe3pEOFXr2DJIVbmUwi5MQ/xmDsBgJPXi1dzUwVYSE+kI+3RMq 1AKx6lR7GUESeuLBICnnpQo7XHSeDvORkDjzoE7MuCL8FTsq7XiWhBgMrObC Eu7B15U6XhYOEiJwjwZWRUmBTtY75mxWvN9zw+Z5lmJw3uzyyv1jJERr/qo1 gQSBdHayd4KZhJo9SFG9bGegeDgMue4lIc+AmWen+/aBe9ijxP92kVDjv2OW Fa3jkiFpe45bbGHo53igYKxGtiQ/p/VI3BKG5DZEt/Q+b0iWfuvP6JnCkI93 T/gvp+OgsO+OA/MghlpW1O9KfzoPBNdMaZk2DPEk92Zz8YqA9dqJg451GBJ8 mm3S+EcSdpm79WWV4uvrXfhY2HEHgkdmEydyMOT6Udfq+TN54FNXsfovGUM1 MbNuL/YoQ2lj2Y3HERjSemV37iVRHRSkzu/5EIgh67g+vqRnT4FQGNBe6oUh G3lzr61cfbC+SI1aeoshi9b5yZQtQ9gV/8yM1wpDXYfzbGr9nkPwySZRHWMM vWXWuihrYg68flfpv2pjiJK/x8Rb+hX82hnT+EcRQ3X21Jkj9tag8GZvKO0O hhrvXSwXbLYBAtH6magEvj5bsEG3nD3s6rtDjeHB0Pslc+r3lHcQ/CirpusU hnaOzTdH+LoAb83JwP2HMPTwDet/W/fdQD577rwDlYgEI452yX70gGCvQNVH LUR0MPJZUHGnN/BuUjk9q4nIfLz4RWeHL5RYGc6XFBMRRyLPG90Jfxh+cu39 uQQiGrT0eP7wdBA+v4PZWw5ENDTKOC3TF4zPq+y7Ky+JqJLtiBE9Ryg+n9l3 TZ8R0fTBibQH5t/Bau/7oQ55IqIrJDBZc0ZAyTDv/gwuIuJrIngLkGPg3Q36 H2Eniejnt45S3sxYuPm9V/4TMxG5ryCJ+udx8Fvps78xdQGJtV7MnpiOh7qa uSNn2hbQv0PMonePJUNHeiZrsNsCkuBuGRw4lgnBez6UeNgvoCbBPJPvu7JA 3UhX+7XFAoqnj+OsIWdBH/uhSEXNBYTMQyIurmTDSKAV577LC4h1ysNk3/pP INqLnHclzCNHfRUzbqVCyO7YX/+yax4tf11l9BsvBKvLE8+fNs4j5yXqG3+H IliZ/ZYmXjSP7E09/sonFsPGU/LFVf95pOCyqGN/uBT2yJSImME8mjjIxy/8 /TdwH7olpRI1h96sCE4oSdWCn9CIo9mXOSS6ozc8Oa0WKIruua4f55BHnft/ JUfroDGw+uwP6znEfiV7+tB0HdgcvcfIcHcOna7+wK34/Q/UHldqLMRm0SGx kuanbE1gdtpQ7b/bs2gl5hn50oM2+Mn/0Wx0bBol6ai/eGXZBxytesUXeqfR A3ajttqcPvCxF9tj2zyNIpq6ckVW+sCoejaRsXga8dumySu96YeTOvIjAn7T KO3PYpSNxwA4BR7RsL8+jUr2Mv5RihwCOUrEnf2+U4i5yFMk7fkIDNfkcF69 Oonujt7r+Oc6Ae+U12WuC0yibx2f4iFqAk6O3DIV55pEQvpC7aG/JkBxsyVH knkSTdRfDtizNgG/hYlSdycnkHbBW4lW00mIieY30gieQOc5cjSSHk6BwZv4 VMe1cUR/eCHLHPdH2wxzTe/mx1FJNP0eFdw/hX0VXnIeHUeyn0yMTwrNQFtW hfj75nHUMLiVevXZDEhPDv/1ThpHGfr3v5XX4X5LmY0YoTaOks4OHE/5NAsT At+EUcEYGtVg/KJPnAN+50TidPoYQuKtAau75uFlS37akdgxtEC+zK383zxQ rLq4jL3H0InPcVamd+eBqfDE0QN6Y0hzSG2YHDEPQrfDlrX2jiEmGtM3uZsL YBuUluWxPYp0K4f95XD/WTJW8iJzeRSdFBGQ3o/7U2mv/jH6oVFUGPDcdfDD Aqj9ZetI+TmKIPmVQlTzArxVjc5b0x5FyvfOfFdRJMLvpKxXnI9HUYnaeJqZ LhF2UZDAfdlR1MfklQovieAXRkiIFBpFqQ8wfR5vIsQMn/kms3sUZWiwZPdU EGFCSPjxS+oI2qx2PzzcTAR+d6kDodgIoqdcNInrJ0Lu2Weec70jqLRVbq/u ChFqTRNsgzJHUNaDgjNpOL/v+5V3uTR+BJXdWGQJwv2+4v6ahYnQEcRKTHws ivNAb+aEkdj7EVTBfoCQ8RADdrq1M88cRtC7gmNdrmoYGDxmGPKxGEEbo7e1 DuphML98To2gPoJYbojoa1tjIHTn2hEm+RGUj84EnsR5xDb4bvMVqRF0acsr 1f89zifXn8t+EBhBUjeSN9K+YHDYOfXqJfoRdD3XUSooGwOvAt76Q2QCqttQ DPpRgAGVmKy5PE9Al30nJj+XYjCqm/SuqIeAFjMLpLzrMFAL5WEObyagU1J+ 7JmNGDT8S4h2qiaguWatlKBWDH7ejq+UyiagqsTgNzF9GJxz5FLhSSIgixeP Iv/gvBf2M3aCMYKAhjIDzufhPMg8x2k/G0hAxeSpPXo4L7pzx+xp+kBAV9Z6 hZtmMFjT5gjLciIgKB0N2cD53uxr1IWg1wTUvWR7YQ7n+6HG02U2pgTkuI82 Eo7zvdLuSAV1XQKasBjJPoDzbO1NNoKYKr5frIPfLZzvxe3CrdgeENBt25PW IjjfZ2ae2km7RUAy7AdUZnA+5pr6/nXkKgFVa4Zf1MX5PpiD9Vy1AAENe9Kt f8P5mkkjtDCJi4BSiqxzfHH+dg44ce/TSQJibudUlsX5fLk+uO8FMwFN+wv3 I1yb0B83V9hFQBf86+9ScV3wmn9Df2UYqT7dDFnFddQ4L/t5wjCatyP8zcG1 l+r52/N/h9FdOdfxS7h+WctjmFM4jPT4CGPm+H5q185+sIsfRhOqW40v8Hwk U7jSJPyHkfVIU/wFPN/zrGea6N4Oo9nkWxYZ+PMc+sxBqjEeRjvEbwoScd6n UE8f9VYaRrSaeBJpDQPCC7aripLDyGfzYXHeCgb1A6c0WfiHUcvi3iAxvJ7Z 8qzv+liGURQ13sMFr3do+YnoaPphNO05EO6F9+N5zLEJvt4hlKHL8LxnAp/v w0f3YNVD6LPT42vceH+vux++kJc9hH6qEHUF8f7vNWS2kvw4hEpzX216d2Kw 1LH/606bIeS09Dxo4B8GfXf2FdbrDqGh1u4a4l8M0s7v2VK6NoS4EtqVNSow CApl4DzJPYR4Wrh7sn5h4Lh3t/Qg8xBSMH4l/ycfg/tz9J9MJgeR1KP9plKp OL8/ocsQaBtEy8w1t+LiMDjVtN28WDaIUpQfmleHYzCXuXHs3bdBFEE+KKDo i0EHB/XabbdB9Kjx0XqxJwalARQtBotBxCRk6DPphIGP9WpMgMwgClexdf1o gYHAVUwgcXkAFXVUSCzfw8D4kotL8eAACpbZYE8FDKLPHWxrqhtAvuNCz06K YnDkhKD9WvgAkgsNaOfmwIBMfllxV2YAqZfe3V7GiCBE2j765NIAmiP7f3Yc I4LZtJ/xq5MDyO/Vb67SLiIM9GTu+z7fjxQPXjS0KiVCZTFRdfZrP8r37l9I 8yDCZo5zyrZzP4o3kvtyyI4IomnMG0dM+9EWVR2umBAhJexSjMTNfpSbu4Sy 5Yjg+/blrM9EH0qzNbv6dQ8RNG4SnQWv9qHL8SF28G4BgkSdW6U5+5AJfZpR qOkC/L3IfFaDqQ9dqP51NVdtASTZL/1xHepFy492DwkKLQA3zeJom1cv4st0 Z31EmAfi74Vkm+4elMfXGGYvOg/vZRb+FTt0I2vsiqt4wSxUys0/EnnWjf7Y 2zAzRM4Cnfxcc6Z8N+ooMJGIez8L71RnGuO5utHhyO/XFBRnwc54ot63sQtp n6A8dpuagecfB3/rc3YhgZXi578OzMDDxqbsvfUdyJl0yIVwYwpYVDIDNE+0 oWemou2M0mPwc63mYP3ZBrTm+rpKdaEL/NLiKiXX/yCUI8fald4FL3RcbPOb /qDLd9iY3My64Gzt9f44uz/o4KG3RtrTnRD8LT3Jqb4e/ZvRei012QGOIoE3 r5jXoYfGLN/65tpAyvrJi6jcasT//pHonofNwH5OjJ3lYzVqeL/Wf7CnCTZ6 WVq9n1Qj04yTbrmGTZB3u+Xqm93VaPSANa3LpRHOHZbaoaJehf7upS+uK2sA puzz3/duVKD2LnLVAa06SOyf8J3xKEdM91j2WJ+pgL53x6Mjr5Sjpytjn/sa fgMz+93sx6NlKOM9Ax3N5jfY6aW0FUMZUm26dWFHCALZCbMTn6m/kFCd0MXT O8tgmojF8L8qRryv9bw6eIqALYDz5xB7MVIJyD+jHlgIipcfVwU1FaG0ovPv 32wXQNHrnxNU/iJkfrgsL2kwHz5RbPj/ThQgkRaWCyNZucC/g5r7QjsPudIL 5ho/yAKdeP4aDqY8xKzkMftCIxOCZLS72otykZVygtfy8x9A9SqlSBzPRcOn O6pDv6bD330uN/e35qC5K/v5Yo6nAN2PLIXfLjko6QwUnb6VDCIKBF2bSzlI 7ZHNnJhFEkQE3HYf8M5GBrMEee22BOjh3+On6ZuJDE9t3gmrj4VbFqbZFbM/ kFXInkijg7GQktXQxif3A1EcH96c1oyBNyK+J6g7MlDmajXfzZVIOCV5JDbM IRUVPgzfEm0JBXd8TnZ0pSCNA40NPaEhMFfZMWF2JQXxlNUcPGYWDKV3Q/gl iEnoDNGgyJj7Kzx9zJbX/ywB7T47XLU45o/f16tittXxaOnegzbtDV94F9yC mHniUdSnU69iz/hARL/739uTsUj7QcHr/rCPIOD85HG/bCz692ZBfXDBC35x Xu22SY5B6Q589Z2PPCHvb1vNo9YodFnCsKPyljt0HPJqdQ+KRG+T6s5WtbjC sqrYYL5yBMppCW2P63cGYUL0yn9d39FI14i7ZuYbeMyjTPcoJBTJfL5jz3jH Hl6ZMex31whB195OL1HWbSBrxZx7uu8rgp1PeP6Uv4JmMU7B/yK+IHXSIOur SAsgOreLKzwNQjITB0tYqKZwoNpL1o09EE1oHzsR+MUYNI7YJDxH/kg1Y+YK ZvoMQiL6fjXf9kW3ZL/y33DSg65zt9tFqj8jhhqCOkO4NhzLSZ4Nk/2I6vWZ aRH5aqAswbyD/o8nerq7heHRfSUIqrFhNXnwHjk2MGZr/XwI/x71CzU1uaI9 F7gO+VXfAfa89wHGMe/QfVl/g8RggPB6RSScaI9O7aUNOvuKwsnB08TtVGv0 hyVsKbKfHy6MdYoFP32B/G7x87UPscG5/a9CLpnoo1VWhfRbWozg2sHb8V+V PCpQ08jgOzoiKXBw0Gz3RRGoOmQww/MsS7Jr0T36EEUDuG0EHl7YS5EkPTq/ ZGltDFNpomUD5kfh7RfZhhcir+CiD7PWWTgL285vwqMFbUHVyMvLX/4yuJpl mLfzO8KacmvlUSNx2Kk2fJPxnAsIs4/v2/4pBVWcnz5EHnIH3Z2qogd574FH MNera34e8ODpRZU2OUWQ3V+q0brvAwz6re9stVcBRnfV2y8+fYLE98vJy5ya UE8m8u1m9AEzszgzXhkd+Gzx8Ui0hx94XS9p/UHSh6TFACc2twDI2PaYk9g0 BBMTfuOC7SBIvOVwhKHhBchx2Wu9v/kVaugrj/P6WALvYJWC4rtv4NX9Sdqz xgpmlZ5em10PgT/iFfKmHHbQcCDtQuH17zAbEfDm7xsHSK9f4/CwDwMXVR5/ 8yVHMJcM2MO+GgGZ1IBQLg5XkF8f2Jy9EgXCR3/dyPvoBpfy+BYLraMhcrLv 8GP690D5OjLPS4kB4W88gd84vKCY6W1npW08MDTy80Qd9IWYiyztWVwJIP6l nM7wlD94KWb9i2hJAMU/1ZGK4QGgEjz2144vCca9tct/tAYB6czDSv7BFLhQ UTipkRQC3TKTOIukgpn/0/x9i6FQbuJatutaGsTXX5t9JBMG3j/yioYC0kG6 IdfVZlcknBM7nRUkkwmPsZAZSdtY2P+kMMNlMRNSnUz4vW7EwbLz4zTzqCzY rat1fpMxHvRGK5W432WDvv/AolF6AlziJctvdeZA8ekj5DruFPiTqyuT8ykP cpri3kt1Z8GNGoGq84Q8KLzRVNRimQ3ZXeu3o67mg+/r4NCV1WwIXv8C3mP5 8Iugy3pyz08whHpxo5uF0C55Y8JNOg9oDUKXWReLQbTlm2/csWKwHtjK8r9b Anu7K+z2FhbD5ELDJYaoEmD0vEF3U7sEGg8ZCSzf/wVcExI62ym/IEzt+/mm hFKgvrtoEaJZDqKj9OxuGgi+ZmtfFGOohEsl6otCqQhOUo+FlOtUwrmgH9WE dQQZ9UdX1gorYV9shmiM/G/gV/E78Na8CjYVNQZoxN8QHbWrJXWwGgazs/jQ 5Uo4L9z1Un+4DqJf6VTfLKyGpesWxvmqzcBN+rUuXvkHbEouZylodsG9+N4m BY020GxlskxOGgOSZ6ZxjUUbvOX99sK67v+fz7+nSbxvAwOW7zEC02MwffHi Zb7MNghI/s/SnG8cPha5ft25qx3eabY37k0fh/qm89pFWe3Quus9p2TaBNyl 2E6fYewE5sWK2YKvU0Dsu+8WytYJirfzItR+TkFwGcepg8Kd0B0txtXRMgWT 7n8ebD7phCLurghjpmnwOnA6q+tnJwwwWZ3td5qGWq5qW2+dLvCuFrj65ekM 3JE/snM1vxtkUrNezWzOgp/+3sX1P91w/b9XPVlH56DHlm54e7Ab3pcU2j3g nwOzKGLJHoYe3HddodKpz4Ef1mDNptYD3cErRdqZeHzg+1HptR7oPVXL/0Fl Hs4kOf6TY+qF/mQ+tzfP58GsxKpcnr0XnhwomJF4Nw+bo7ph6rK98K2i4Ldg PB4vckPpRTAez62q/ZeIx3etVARd7QMOg+CnX3B/lzs7lxVyvw96y0iZhr4L sLk9Ghmh0wfVd7aS6KMWwO9865skrz64MXzXO7Icj3f4cbmkqw8+uzEqqW3h 8T4JHGi2D8rUuuic9xNBNjb8QPV2H6BcwxeW/xGh58+nmaZz/RD5Its38zru T08Zx47Y9UNAeutsyCsi3BF86j/5uR9EevNUGZ1xHpdWcZqL6odbkvU1kjiP nzGX0lyt7QdJf+7ZXYn4+mXsh/eeGAC+ij9j051E8G9loR24MAAyqiZHvozg +03sXzgCA3DSM7tm5wLun5k36tlMBiDeUJ/p+k4M/HW7XYUKB8DZps9iSgDn rfkbMNk4AAvUoGdfruE89yZuK3x0ALbce69Tb+P89cXCkZF5ELgj7tWSVXF/ z9l+vYx7EGST47n9dDHQ+XGdbC02CAkyxLSh5xgo1OE0YzgIigZK/j8cMZBV MRX+6jgIP4W8wi/gPC450ky6FzAIWARB8Jk3Bpc2vlvk/xqEAVXqk+0wnIcF hUx8jgyB273kHSM4jzOUfuOR4h2Ca7PX3c6X4TwvtzFGvjkEDqWfXM9VYUA0 qNV7ZjoER1lKvsk3YzCJXeBgdRkC1n+Yg207zsfvAgebvw4Bx/4ge9UeDJqD n2iJ/x6Cm8Qmy5sjOB9zV54kdQ6BvdbSrTs4v5Vnn+9OnBuCOu/vA7tw/i64 6ftNm34YRB+UXn6H815mw5Ly4RPDIJsfLpSO82CSusaROoFhsHKraPj/5+tR 42X/3kkNQ7803bIgzt/BVtz+whrDcC31daQnzt9+2x/lpy2GoSLDFQXh/O3l TdwX9X4YXuPuRn0Dr/9JlQbl78OgwfFCth3nWbvE4o97s4ZhV5x7BAPOvy+F Oe6i6mGQuJjycBHXxshjt23fMBTE5Sh9wXlZ5+FsFT9pGBg2y9PncZ0+f/42 aQcBfqiLq23h+nyuFuffAwRQpOt5XIPr+De+tMSTBGB6GRwtg2uOW7+HXLkJ gN0uv/0WXz+cYblM+xIBEiVGJUxx3j7RxBN5VYwAQnzDQcx4fl++aLw7LEOA jn/9D1/gvH1Qy1t7XoEA5zrlrFxw3vbmLBev0yTA3S+EPQ9w3macIrHGGRLg 8kbS6eZlDN7/4F5/Z0kASYOZkj2LGNBeq/WoOxKg85HkAnUBg7finwqFPQlw RcazMmEW50W60uADAQR48WbyHsMUBq/riLbTYQTwiWr7wjGGAeZ7RrUqkQAz Pjt+knDenjr14eibXwRQZXEoKsF5+9lI8ZJyLQFGpL815OK8PZw833qplQDh SQm7jHDe7hZRChifJMDrzcdKJISB8oaHJVokgKsC9XtDMQYtFYUKYZsE4EtK sXqai0GdwukDikdG4M6tM3d/JGJw7NLIcWu2EUh/FK05HYWB3oFEzq/nRmB9 xDp4IgQD6l8BkR7xEbhw/jDt3Cecn+/d0NZ7NgLooVRrPf7+ceClM3K3GMHv qxabk3oY1DBWv0ywH4FPDmoSF9Tx/tY+cJ/2HoGqC2EoTAaDAGnt1Fd5I8D9 3qwskQ2DAS6O3KDyEXB+HvH5yBEM+HaMlebVj4BVSVyWNCMGlb/N/lEGRoDs JP5jmUSE1ZuOZNfdo3AtU0XHv4IIWte/3wlUG4Wrbqdbh9WJkHTi6aNcvVHY u5V7PuUeEZbXODU7zUahjNUeuyZBBJ/8FHNWl1EYP01XlHmaCEi46Ets8ii8 PHo6gTa8AGcvdo/kUEahO9HO0khrAV7tD59r3zEGil98PSrkFqBsTmd1df8Y /CdSuXPm6gKopU3uET8zBmSpCe3wIwvw8fyaYOW9MVhlrNH9VjcPC2dYnNvC xkAhUz2Xk3cerr+NtapIGINFMzsfdHQe3DsuGmVnjoHXpqiNEG0Ojn+QfehX OQaepFOpnzrnQHLe/tT9WXy9L3/1uFznwL+gr6BCbBzklh2WRZpm4fKDGCy7 Zxxcrp+gg3sz8C5BYCx6dBx+bkhkVAnOQO1WUZff/DgM/d0y4jk+A1rZrWXm dBMQ1vXjo9voNLiz7PTh5Z2AIDUv5eQ309A+bMQbYz8BOipOBLq4KbC1uaDv f3wSEr8wpVYOTsBxJqxU7cwk6J7RcRMpn4Ci6J8n2QUm4ZiLTYxP1ARsNoj9 y7g9CenZ72cXdSbA/YwcNJhPQi3B5UHM0Dj4NRue3l01CWmeFEemvjFI4o3q dbScAuryhf9O1oxA98AhJeP6aVgeO1bexNoP972NemzapmFJxXzRqL8PSsVK dN4PTAPrdTPhI5F9EBP87EUMaRokZzhS0zj74LligUffyRkw4uWdWeXtBWqV dqGC6Qz0Hui2qpfsBrb0JLZrTLPwKzpzo8+zHfw0N+LuHJsFGT2vz1UP2oFu jyKfCvssNJzTjxs83A7jhuuiVsKzkOqtu5wa1QY/2B8+SteaBe5Wp7BfJa0g GbToxpE+C19PBQXt2WgBvTc3phgfzgHDl5Az+03+AL9hfSdRbQ7ynA2H2Kj1 sKygUt2pPwe29ntfEHzrweuseWy8/RyU0Dtkfyisg4wWHLLi54D9MctTn6O1 sM6z0WJHnYMsaZUcZlIlVB76UP509zzcufLt20X/SvDZOPJD5tA8LEuRc9gE K4Gzlf/zkXPzYFN09pW1VQXIvtOSyXw8D9lrF8Qu0P2GoLbioomUeRgQoiM5 +ZXAk7I7yY2585DbdtJPYboYeFJav+WWz0PgfMLGknQxFDnNWLt1zMMnaV76 KroiGOJlvXiabgGaX/jSWgLyIeVo4n+79i0AHb1YpP96HlhtCzHNsSzAYTPP BDHDPNjVITdVdGEBOoJVQ9UhF/hdHGJV1BfAhO5O+c4DObBiuitAwgCP3+Pj r+uZDWUqAc5cFgvwVIXF2IaWBYr8Kdok9wVgHj+3NLvyA+w6u1l8MhdgKCjq 5adDafi5cu1z1W4ifGHnJ2kyx4OOoEr84kEitAnN071RiAOKsFUpxykiKBVL I/mgWBAQTye+vUSEoKlDq9w8MfBVjkNZBD831MkyqfFYGFx6eMPcQJ8I3zcP BPWlf4f6R5qeAS+IwNJp65tiGQpbal8K513weG8G7dPMwWBsxMiWmEIEnu6i 7fmkQKAzPSva/hP3Qb5dW7oxARBmfluBvowImdqxRmzS/tD8+q3r01YieMbF HNSw84bn9qHfvfuJ0E265Syb/Al2vM3/WTxBBMvtD/l/pj7ANXdsnIWKn2tl YoJpIR7Q5rl/W3oXBjxfxTKPMb4H8098J6yZcZ8U2PnykpcbxAQ8u9fMhYFB VweV2cQJxL+6GmzivmlQS4UnocoROkIi3/LjvmkhsQmrBgfYE939w+sBBmjS /2Rr8GuIi1upzcN9U6k8L0uLlRXcSDpMGMV9k9/q6YGNnpfQlXpp/ZAZ7iPo Hpr/PfACXv14cARs8HvqPtdONncTYMp5fsHCGYOia4J/N0QNISHPUyb8Iwa7 zA8u2vPpg2RR3NM/QRiIPLSWFSt+Ar2/kB05AoMffCHcs1HqYIMG/HmS8Xv5 bvXA8V3KwFy1nqKcg/uCHVlZ8a3ykFJ7vNLtFwacL09S1cJkQarhSn9WDX6P 2L22MDS4BQNNiiuDLRjspjOp/qN8FexaLQ7s78O1Z/6/vKoLcKjz8znxcQwy PnIesS49DWk9yfCciPuYNuVRhUFGuDNQrRGM+wCTnza7PywRJEkY6boBPQnK mkgRRhM/JcusXO68YSCB1QGa+XLvuuTn5QNKAftIcJVYykSMOgbqthE6yYdI wLmXeE/DgAfOkvlflLOQwDbGYrtPTBgWHYrtO0+RwHBMYjW1QgLKqXc95jlI UJH701EsQRq833UF7OQhQYp6NmWnyX3Q2DaMPMVPAr0/uUU+xx4Dj+ty6mVB Epy62Wl90VYVlujdC+RESNAoaPhDSVUL0PtDVbpiJJip8VmYztMFn93RLXaS JNj9K+npwh8DOLe3dDpBjgRTIf0hRSamsFR3ySxOngTlcu5L/TssoNwrdi5a CX8+57UeV4tXoLbrAzHsCQnG2DOv7I+1Aa6qdctQfRK8pd73sZm2A6Kb+eI3 YxLkk0vbbiq8AU/a45WAVySQyOYhNNk4g2J5ta2fLQn8ZEssf4e5ApvTNbK3 Iwl+GjREXWVyhzwqG9XLgwR9RP9qg+OeML46RXsXSoJdURKhh8e8ITtPy80x kgRb6mlfUn/5wrvXTTsc4vDnM09uvxDvD8cWf+5+nUGCbaei9uctgSA977TP 9DcJkoTYp8a4g4E5neRjXIPHT6yrmz8IgT7TZ8yGDSSQs9fwvecYCtZTcod1 O0iQyCi8hS2EQdzo0ROq0yRoT6s1u3I8Bl7GeoUqLZCg6ic/0566GBDXW2dV XCLBkdT7Gq/fxkLb4BDbg00SfBTz59iJxQF9byrX7UOLUPtfuXARXRL8/1/s L15fBEXzez/b/maAgN/PLP6bi/Bd5XJBVt4PoDzkucwrtQilO1srF2Mywb+B SYT74SKQbHbr/L2dDeU1nWKseovA7/51xPn6Tzhd+uLO7o+L4LGbwdHKpgCO sVKpL30XgU+F1UjhYCHst/uY3RO0CFvffznsziiETcHE/zIiF6HmMoWOPFsE ffFDi0q5i3DhwA3WUOdfEOz9OCpmaBGur2yvnXb6Dcza18gSoksw/3nqpG5w LTAU1WQkii8Bt0iKqO12LWwdUzE4eGsJwmP4wmRM6mC++VXT6P0lMA6Z+cco UQ8NUmnxn/SW8Dm9ozs3+wc+8J9W7PZegq6zNWcdzJqAjroj1Xp0Cey2bQ7K W7SB3ljvssvUEgT7dd2YSGqD343Zkr7zSxC1LrycQ2gD12idjuS1JRDzYTef UGkHmkwJbYBpGYxiB9+GQwds+1up3b2yDHQL0YffnO6CTR7CTjaPZXAUEqe6 rPQC+XGZTg3PCjT+t89WaIEA7r1Zg5IXVqD8r+4Dz4MjwKwf96RIaAUOXqoS 77w8AudefdBKl1iByA+2s8/sRkDF77Fa4OMV4FeiSlygjUB2w4T8U6cV+Lol ENzNPAam0sw3VztWwMR1ZUafawJWGuhKX/atQIJNNNus1AS4Ki2LTw+vwMfj G1uazyYgVL/nev/sCoR9+GhLjJ+AWpc4kQq6VZCIPo31ck8CV+lVAV+BVWh3 7nkmzj4F/SK6//F4rAIt5tRjsfVpMF4XPej5aRWqWrPmTrHMAKls/84Jv1W4 ybnjUIfQDOy6WzKb8H0VMi389vw1mYFLmiwlZ7NWgXzdzrC8fQZcnf5qnO1b BUXGyK9K8bPAJBX30GN4Fby+3/ewKZ2Fbwxvbo2Pr0LOws9o485ZSPM/x5uA rYKbxs6oYoY5aI91I3PvXoMLytK1zCZzcK72WjC30BosiVUfYGXHfcZn5s/v Rdfg9Y01j30i8yD+aMJpTHwNerISo+ruzcOjniCj+Dtr8OHRmWvhNvPgMLsg wq29BrLuv2MTcb/8lzmhnctrDZoP0JeTcV+g1u5Y5+69BnF2f05p2i4AIeTx r9GANaB3TXN3/rAAK5y0uLjwNdjnbHz5WPoCsF/RsubKWQPdRzG2Bhju39UP HeYaWANyQ8Dre+ZEMEgRDOMZWQM11+ryf2+IoLquwM03uQa30+bmOD4QQTzc V1SItAb8qr7sLLFE2D3MpCW5iwx3ezTtVNuIQBHkH7u9lwxbbPZPjg8RYdb1 nvkdZjLwmP2Ljpwhwj+uj84PT5JB0knZZ5tGhDDj3fFaAmRI3e2ruJsfA5/C swI6l8lgKmL4cuUKBi57ZPL1r+Lri4VEpNzEwDDNve75LTLkj737qquIgfpG rKL5HTJcqoxjMdDE4P7Dil7L+2Soo99/nM8AA0Eibc5OhQw3C20O7HqNARdw 2DpqkiH5B1vVibc43wVIbjvpkOHrTi1bzB3nuctOhzyfk6EzeERtNhCDaluq yJd3ZFD7rrLC9AODglrW8mA3fP0xp5cSOC+mnhC7G+ZFxu/f8H2COE/6Fdtr xgaQ4ecZZWXdagzcmEJGE76RYcrIry38DwY22gUvUsLI0JK5fTq8GQPNrRWn rAQyRL8jNo50Y/BQ4RhjbioZ9t122M83gIFk9JWAgkwyBB97+E+YgMFlkhJr SS4ZiNaVe2g4H5+9bR1XVkQGdQuuZF+cn48HBV6oKCPD37HYyCGcr/eOZedV V5LhWYnR8CLO35tX/t2sryPD5X3uenUkDIgeWO3fRjI4qVBZdHF+H+lkVmxp JYNSfMVq0SoGHecu9bZ1kcG5pGStg4xBrb28QVc/GQiiRYdy1zEorjef6yWQ 4UzauxvKG7hvYPWxGZwgw6/fJa/zNzGIMkvfIsySwUaRJad3C4PAXw1e4xg+ D9YcJLSNgcf+2YPTK2QYDHxy8TkNA7une7/PrZPB5N0t4zZcm2bycmHbZBAy Ffy+jesntLvpSzsp8I7Oueb/fw9RUDQRWdtDgd06VnMRuL4d61W2foACEwdh /0Fciywlym4docDi4QP80vh+56RrWuhOUsCoZvGuGJ4P69dxjV2nKTAwvmy6 iOd//T3HcRsuChw2EB+7S8VAzVqrfew8Bf70zH5SxX2Pjf63AOWLFBhLHDc+ tYZBkOI/+SphCvhOKnkE4/XLhn37rlynwNy9jIU/eH1bLsnWx92kQOfAz6w8 vP7E026eR6QpkN/yukcN78/+A6VS7nIUsLt61z57EgP+zTXaojwFwipbIipG MZCbu1ymr0wBE3uq1uchDDz/JF+7rUOBqkNPMKlODBKKRleyn1GAEjKICf/D oDL59E9OU/z5Gr8N9jVgsO35RYDOBv/9b90xJYQBm23zjOUbClxapQly4/Mq Ybg3ediZAoItS23pPzFwkHI5gz5R4G7qetBkAgbBl0uGLvlTwGPtHzE08v/f x1kNj/pKgUYjV/ZdwRgsbpsdd46mQEPUqMduLwwOERPbFxIoIJz5dleEEwaX BgkBT9MoUMNeNDOH+2CzX2r7buZTIJftt0cR/v4ct5ei22yggNNsXMxeCQx2 mDiVvfhHgeq1U9OWQriPVSty7O+kQITK0koADwZPRS6tlhAosG+e79yugxh0 kVhn36xRQG/+XnQeft6sDKskz2xQYJU1rmIN54ijLf6GmvTrQPmPpL5aTQTF H7uHr+9fhxz5X828aUT4Y7rYTj6zDg7xzBmWVkSY1hAINDm/Dg3acQIRBkRg kDNR6BZYh1uff7J9UCaC1LnB+oJr67BTxVT3uwgRSkfry2zl1yHJYe5G4fIC zjExycsO6zDj2+dxyngBRLq5qQzO63Da9Ot2oMoC/FJKfnjq/TqMese975Ba gPp7mYu3fNehSsG64Rf7AoxdK5Xwi12H+Y8mV/7DufLksZ4W3oZ1SLi7rqor Og/ujQcpT/+jwstRGX2RjlnYI/flvhUnFb4+e7AjEb+f/KuOR3rwUIG1kXtz NmEWIkpOS6ULUmHuOuU1xWYWClMu+FCkqeBBeDLPfXQW5j3ucn4xp0Ky/YmO I3IzoH7TRa6+jAqnP11XZA+ZgoHVyYOVlVTYX/np+ee3U2CQqdD9q44Kf+Od sF7dKTDnYDfOaqXCJ89vpLO8U+BOX/Y+eIIKJR6ppnaFk5BZQy03PLABa3rX 241aJ2CXgp0o/dMNiL1F3HBaHYMcHQsu8c0NUI8J/5F3ggAG+aTTMfSb4HFw cT5obhiO7bdhZWDchMVOu77S5GGwK3Y81HZ4E1YClHyOcw6D+LGP26bnN8GY 1T9mx+EhqPwT1/ddaRNutGd31K30Q4dIT9B6yibYyK9MPWjsBk9vbT/dzE3o uqHG3/i5G66ODn2qyd0EpKNpaX2vG0L9J1wDyzdh8Kl6iGhdFzydXXrJ17EJ Gy2cSgXVnTAZfeCBJm0TSn5bukfVtwOFSXpnseoW7K0hN3iRW+AIkflrpdYW GN7xv3PhcwtcaO0726i7BVWS0TUKp1tAJ8Radth0CxhCeN6x3mmGKu64T7ud t2DtGM/gXFgj+N2gP6SUtAXxc3S2RL0/kMLRFKOdvgVX/mQ7ym7WQ8WO75eN srfAWzT9wrXQelipF1J2KMH3L1FJn26tAy1VveCo5i3QW96hW/CwFnheIra5 tS2QfCFjL6tfBZKPvX+sbGzBNjHLtJ+hCjRE1CW36bbBbNFfg/NHJXymEnUP 79uGbuSYiDYqgOTFHn+NYxt4L0QVvon9DaXRTnwed7fB7XhALx1nKXS53yvx fbgN9xn/UzVx/wWYEcuDkMfb8PHD4/3qkyXAJfDDPE17G1peu/zs/1kMH4oG sv5ZbsPnGFP+XzqFoNQqcfV06DZI973pqd+ZC0wS+ypKI7fh+GjiaPCrn1CR 0PfgSfw2fCmiv/B2OAeEHN7oh2dug6aDoWNgVTYwcxT6sNZsw6ulPyMu939A 7UevE8UN25Dqw3jmuGwGOC2pxmn824YohjftO2TTYb5mpTCkfxuqL7yhLSml wh9z4TGWpW3Y35lXlxObCK5d9C/zydsQ+6Ltg8vvBLh+q5WisrUN5281PK8f i4eko6+Yv+6hwcVuE7mBa3HgUfJD7AgHDZrr34esC0TBjbNO1TlnaZCwxrbI mxsBy74PHz3mp8HmM/KGj1Q4GOjPGQaI0sAF42I+6BQKt/bwBTA/pIHjWnZM nv4XoFhRTmU+poHhRw5xGeEgyOqvS5RXp4FMk1epxP5AYM8y/uVjQIOe9Xqz xSJf6Dp5VVbgOQ2w4D9pgYne4Ou+u/WvBQ32Crw1EEj8BJuqCZNMb2jA+tJp 0n7QE/LQa6s0Zxr8iv9yRuK4B7zgk96850GDdDqfnNMG7tC3OXL4kz++30VF rSpjZwg0zong/UYDeYn7EolWb0Hun+v5+jA8P7uunp3xDlAYz3GTMYkGL85/ V7B48xpeHsDqktJpUGcmohzIbgXn7MuVZHNo8N5Yv7e+wwIGCb6DEwU0+Dss njdabApf7z997llKA3FXEwmPeSN4mCewfLaSBrTHD9aRuQHsZN90qq6jQbdT 1Ya8rQ6UfPi7x7CJBpWFHaWBGRpgvRj2ZWc7Dbb7xcxMXJSBX9uMPb6HBjci g97/65eHkWqxVKkhGs61n4+pku5A6KW9IqNjNFh+9OsBwxtJUAztKXebocGz tNjGNdcrsGdHyr0zGB5/XOCxwSIPoBf2Hb9XaPC5OHz2rdtRsOuU1dWj0uB/ O+/YsvV+42c76PkM9rDzGQDLfuwA "]]}, {Hue[0.1421359549995791, 0.6, 0.6], LineBox[CompressedData[" 1:eJxF1P0vFHAcwPHjMjp5XDTlyOM8zVCdRcYUc3LGjdHEOS01D6lbujOb0LWu prFiu6TWdnci7UTJ5Nx5unlYpjx0uIudy3UY7nC6u3DVls/3h/de/8HbLaeI fNUUg8GQ/vbPwEjHFaPRKDqwSO/B0huQ794He29pkSE+pBzlKjLUjjn3WYKM UmhGn7UiyQ/GWk5RkPRxZuE14T44NWW50kfdA/G9RUdDnXfBjvxBM5vvBjC7 Klg9W6kHdU9KWaJIHcixnndiy3fAhvhg2uRDLVhZQGX4ErfBUuwbOm1tE6SW j3t+a9KAdT1L7IY8NfhpwefIW/d10MM2Kjrl5SrY7sfKW1SowAVx20kCQQku BdSFiD4qQLuyZkKgiRwMIGwE8LZk4L0La1+6GBLQIYVfc+nYBNi+I7YZ9hwF edKlx8tMIZiZ7PxBeoULduFKp/uLOZEHnlk0calIF4Ee6m59WP8ISOTMjiWm T4AxJHustkMCVlMk5UGdMnAoEW+VZC8H19wcyibqFWDxbX9qtaMSlMhsybnD KjC75NxP84RVcMA/9NGA2TrofVig4sapQbwgP8aMpQExBtNm2uIm+Cu5J0vs tQ1KT1NOeDG14M00Wzt32Q7oVPsj/RBeB/IzXr3eYujBtIi7ccM9BrAtq9A9 bPc3qMOdx3al7oHkr+EEPHsfxIVb9gleIPu4cxcvc5BBjBLqcz7S2rWzykmM HCkIUThsIqMsfGusE4yg7pbuOD8Z2Sod4pHSkC6tud1VOcjdVK4SV4Ls5LhG mDcib1htDDW2IL3pQnJsG7I2PvP6fQGSpql/ip1E+mXkuXBmkPLBs83R88gk 9oywYhlpYdpEdNtAivLpU73byDvTsZRsA/L/t8A/BhudfQ== "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesOrigin->{0, 0}, Frame->True, FrameLabel->{ FormBox["\"x\"", TraditionalForm], FormBox["\"elements\"", TraditionalForm]}, PlotRange->{{-2, 2}, {-1.999999918367347, 1.999999918367347}}, PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}]], "Output", CellChangeTimes->{{3.528453745028695*^9, 3.528453759576365*^9}, 3.5284597357053843`*^9}] }, Open ]], Cell["\<\ [5] Charge Transport Properties of Semiconductors\ \>", "Section", CellChangeTimes->{{3.558880162123597*^9, 3.558880176788707*^9}, { 3.5614713141646137`*^9, 3.561471323495611*^9}, {3.5614713536240683`*^9, 3.5614713685260878`*^9}, {3.5614715751062737`*^9, 3.5614715852343683`*^9}, 3.572604679687608*^9}] }, Open ]], Cell[CellGroupData[{ Cell[TextData[StyleBox["5.1) The Boltzmann Transport Equation", "Subtitle"]], \ "Subsubtitle", CellChangeTimes->{{3.492861069259028*^9, 3.4928611014194098`*^9}, { 3.496030277369309*^9, 3.496030287282919*^9}, {3.497106630417016*^9, 3.497106637191511*^9}, {3.561471490343113*^9, 3.561471504867713*^9}, { 3.56147165526653*^9, 3.561471655448987*^9}, {3.561471952917699*^9, 3.561471956546934*^9}, {3.5619026622594433`*^9, 3.561902664071287*^9}, { 3.573990712436009*^9, 3.573990720858088*^9}, 3.573990769218904*^9}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"\[Lambda]dB", "[", RowBox[{"meff_", ",", "T_"}], "]"}], ":=", RowBox[{ FractionBox[ RowBox[{"6.63", "*", SuperscriptBox["10", RowBox[{"-", "34"}]]}], SqrtBox[ RowBox[{"2", "*", "meff", "*", "9.1", "*", SuperscriptBox["10", RowBox[{"-", "31"}]], "*", "0.026", "*", RowBox[{"(", FractionBox["T", "300"], ")"}], "*", "1.6", "*", SuperscriptBox["10", RowBox[{"-", "19"}]]}]]], "*", SuperscriptBox["10", "9"]}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Lambda]dB", "[", RowBox[{"0.05", ",", "T"}], "]"}], ",", RowBox[{"\[Lambda]dB", "[", RowBox[{"0.2", ",", "T"}], "]"}], ",", RowBox[{"\[Lambda]dB", "[", RowBox[{"0.4", ",", "T"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"T", ",", "100", ",", "400"}], "}"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{"0", ",", "50"}], "}"}]}]}], "]"}]}], "Input", CellChangeTimes->{{3.497013474434067*^9, 3.497013646344898*^9}, { 3.497869866539687*^9, 3.4978699371011553`*^9}, {3.529231856688891*^9, 3.529231884402172*^9}, {3.574411450892056*^9, 3.574411492904366*^9}, { 3.574411530127625*^9, 3.5744115390486813`*^9}}], Cell[BoxData[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwdjns0FXYAxy+L7mzjLkMxJO2w5XGsZej+ru/l0kUPk+XVltfVrnfce/3y WEUkNbmuR7QaUXasB4e7jmpei5DXHEZnRNn1CqkTRh5r+5zzOZ9/P0aBUR4C ZQaDwX3rf906qFV7JTwAjP9xQfho/0h3fwC0zlbt3FXFB99AR49THIigL8+z iBkfYVOSKqNvgiANYcb3yvdgPuDZzBPTYMwkJk93sfegOTQybdN4MCz+5MuN epwxGSjkpBcLoDzsL5yNdEasavTF/rAQHCxt9+9mOoO3O9/9sulRxLfcTubf ckKiXls5e/4ozKVf2E+6O0H1edh2g9rv4HVg5J9bSzz0u1msiI8LcdI6zmft Fx40vFfEZbxQqGrm3Yjw4+HC/NS+A8phKHKycBNr8iDmKB52d4XhSp1Iv7bF ETcl+wNyCsKx6aWWGU12hDkGvDu/jsC+lS02CY6O0JRHvHpqFInCSzrFXUqO 4N4zngobiYTxGLuss9kBDRV8JZtLUSh19d63numA3p/ZQ7OfR0NqeLX1oqcD priKiURpNDYtDmmsGzqgukLWtLgYjdpGb525CS5M8pcqZYeP4QLrsaCumgvS HNURevcYhN9OWZamcrHx0fMai60x+Piarr2FJxfizbTP/EQMkpIUD0UmXJwf usfYPxiDlrEhwdgKcIiqrPpyYzEjendKpxt44HfEtOSnWGiWRwallAGKj+q2 D6iIQKpz19sSgXJtS3e+QIRLuTcs1Q4Bm7MOnXvcKIJ04HAEywqwHU7J9zIV g9lhkv6eGrAmaehhnRGjnv2yfleHPSR/bxj+dUYMecM106hke+S3ri8neUhw OTXm+KqdPQ4vqjmfrJDgvvRD443LHPQu6wVGacdhlGWr6yPnYM6Z3CwQx6Fv Qce5W8KBXE2bqeiJQ3doi9sLOw7MS1/v1LehSGjWYJ16Q+CSNpqZlUdh1zPo V9VA4OCaudf6IkW/+knr6noCO3VbtcECCt/fH3wmryMwy8tMNblMsTHcyP/O bwSs67aJtSUUFX/dXr1fQzDQdEE4XUFhGS9gdFQShKiwefxHFCHvZKgyrhIc aR1Tmm2nKL5u+MGGYgLvH6R1sk6KJ4IuM2YRgavWuN3wHxSFmeF3WFcIzD/J tpIMUIzrfrq0rZDgNW/CoFRBMdmntmNvNsEMUzboMk5hc9C94SspwVg7KXwx QaEnj4j2ynr74ynT2j1N4XLXcEtQJsH9YM77Pa8o2pmzsoQMArnpZGvca4rq ZyfmTp0luDUtO6O/QKH7tEWQnk5QJJpUFi5RcFejCnPTCApscurV31B4LDT5 /JhKkL3C+b56hSK+rdGq5DRBRv3kbt81ihph4LbyFIKU0zlL6+sUSk1FOyqT Cf4F5gLcGw== "]]}, {Hue[0.9060679774997897, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwVkXk01AkAx4d1zE5bpiyKsFKP3fzmMI7BjL7KekpiZctI5Wi0404z4xe6 HKW2HU0joq0oHU8Ry2xbCVMRIlLtaJcoOXOUV0Rk2z8+7/Pv572PRWisn1CT QqF4f+F/T4wUL6FQBPjrfsnishQ+/lBLsnq0BSDSuqcd9/MRreLrPZgnwJ3E CsOaJD5eZzVryYwE8LkX+vGJmI8nLiNjJkwBypRqH9pOPkqP2NQ5bhNgjVqz rNSLj4gVV+NjKwXYJTIWdRnw0RV05eELMhBm4+/+OVfMQ/ayW6q4hUEwLeLY tD93QQdtvnhMthV2964mNFq6oO4xXziutR0FN5a6cfY5o3pytbe/dzByQ6d5 vmonvMrRrbtIC8HLvEw/pocTonrU3a3qEBgcKefYl3PhaWZk4loQijDHY3S+ DReRQ9Jyi61hkIdTE58qHfEh5NXIC+sdGElOGW7hOaIuIubQov4dYPztqbRo c8BgqMg1o0AIza5g0WiMA3brxJ1SR4ZjY2FTcCvVAe4uOb5nrHcisf56imeJ PZJNGot4H3aCkNutGvS1h86byOVmVb9gs0/3x5IpO6i9GDOSPSIccEgQfL5q B72AGcll9wjo6Gdfi95ih8wPQ94+mpHI/5HhJdG3g8S190FrSyTOVotNq+o5 KJZuCMnKjcKidwY2ZAoHBNoDHv0cDe+ZJdykNRzoK6PHX1rEIO+0UUGLBgdu ty2HIrtjYNnHu/yozhaqUk8N7ulYFK4L8J6T2eLpFV7nqG0c5ObnG07522LI rXcgWR6HRZOdenPmtqgoVdROTsah6m6A0dsBNqxypsoUQbuQSX8urK5gg18X 2xxxaxdE24aYhels6D58c5PxXTyWXjRexfBnQ7KYfEbsj8fevb0PxFZsHOu8 TdnQEY/6vk5h3wwLm0jt2UC33RgRfz1k1MrC/S3brS+c2w39opiw1Mss9H5b vbxdWwx+xcm5xmQWigyZvp5CMU6fvMakbWJh8fFNvz6/K4a8PSiazmbBqSs1 Z7O1BNRmq4x5NBY+S1Vt9MMS1PDe1dg3MyF9rdX154gEStVF69gUJnIa5qb3 +klxJj1+z6wzE0GTNI8DpVJUyhda6k4z8HTaJDTWMAE9dCdjgZKBtx784lxJ Ap5NGHm0ShlQ0gypvW0JaI2o9xpzZoAofM8x5ZJIqtOjH/xEYO2hHtnxbBLO bR1bylUEVq+TrXc4RUK94IBDRQ0B5wVOtI5cEoH37v+grCZgky1LtzpDQjfK IvjGHQL0S07JVRdIlP57fbby5pfbtZmi4VISzEQhpbmMQLg2z93zIYnwr47q UM4T2N7QpzHaRKLgkvl8rQICAb/JqxWPSLwQtthQ8wmsM+h37npMIk8WdYN+ lgCx4gRb2k6i3/j7qWV5BN67D5gV9pIYfEZbuf4EgRGqomNtPwnuRl/VT3IC fU38vLEBEibK6LjNx7/0+CsMXIZJrL1lviRMRqByh+s3beMkmqijiqSjBJTW gw0J70lUvNr/9uARAiXDisOmEySMX9YLMzII5IsHNUVTJNxmY/NOHiKQy82q WfCJhN9EreD3dAInZlz3VcyQSGy8y76QRuBozaBL4GcSN0Why4pSCaSmZU3N zZHQqM1fWZZC4D8/mDF6 "]]}, {Hue[0.1421359549995791, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwVx3k41HkAx3HmcZQuiZRrs/3GzLiP2SLMftxHoXp0TCkRipGRzPi2q9tR iojHsbttPNmiHi2FVkQ2jUVaaXqoMI4coxlJIlLW/vF+3s/LMJi/PZSmoKDg s9D/n5KXrFVQ4MJr0MV7ppuNux2CrAFlLn4fm89OeMPGkXrHFY1LuAirOlOv /oqNt1mtSmnaXLwZby0xEbPxwl7+XteCi2jRwZe8ZjZKL5iKNu7n4rxxxbjm fTYi6Ldj+DVcNK4jYyoZbEgCilp6yB5Etcpn/TzYyP7+QX30ygBYzquXXy6z QZfastj3afugZOB8UmxpA9Fzx9AJpUCsnFEMelhtjbppZx9/nwPY7/KtsNrN Gv05qqI/1ILQENKdriexQuRAR29bRxBMlp/tM4+zgqeBti6nIBhODaniWm0r 8EaF9wz3HYTbEC1XqcESn4L65T3MEBToSxfFRFlCFBGVpDEcgkxhSwttvSWk weGc8wWhsOo1tq2ussAxlejcDl4YviZotG5lWcDVPmfrVeYh3NGoMfUqNke8 bvMth0+HsHlK9tqBbg6VdzzKoPYwLmW8W9VXbIaOzeZzguPh+MkgcBvNwQwr ds8JbrpGgDnnd02j2RSXP436+NF40A5bedU7xBQCzmBj2788MC5U3c2fNUGJ 0DcoKy8Snb+Vr/oxxwRm6Nz9bMcRyKR6H405JlhVcWSizzAKPeHRTzb3GcOp ev0orzcKSUlfdV+nGqO+1FPR9lc+POh7a2UcY4iLHLrHrKPxz9oPiTtkLIw6 DY7EZ0Sj6f5ZvYkCFspLM59MT0cjtE2xTdOfBUbOTFlmwFFYqvuPu6mx4Cji t0Y8OIqCFZXXbzYyodryrsp8XQwOtyV9LD/DhGANeWl2KgY2ty2mYp2ZuNRd reDbFYNxL+dZNxUmdhLlr3ucjuHE8wyXEREDDXsDmdevHYPEI/52QioDg5p1 VKdyLJZMB3jobGPg1mqLrZ6hsXBZUmG4RYeBNek7L776OxZ9S/uSFIeMYCc5 l7OLKcDNh8fXvLhjhG/C+nb1ZAGeJp6OLI83gvCtkqRSLkCC1p/pYg8j5DTN z57YLkRKOeuZn5YRAqbV3E+XCvFdc1LQgWE6xLO6wfzVcUjh+yq2VdIx7u5Y kieIw+T6xmW5KXRUqK1eNNgeh073MDEO0GFWOGmjb0vwg6fVrTAbOrySBtLS swncY4p0k9XocPZO27Ihl+Bwv29Z+2I6Ni23U+vKI7D+osk1WLBpdloi4yrB MuXJngpVOtRv2MXXXiegVRY9HlSio/PJ5XBZKYG8znPMc55CmLKDq2cLgdZw +D29SQqBTUOKY08JZJHWyREfKexOzajLfEbQ/vZB5F8TFLy1hjdJnhPw++cj /T9QMKNfsRJ2EogeqTqnjlGYdB0xKBwkiCo8aU+TUpAvyuzyGiaQ2g2xto1Q GHrq+Mv7EYLZsR5W/jCFTv9MLXsZwWcdsp8zRKEmhLO0fYJg147PeT8PUKhg SpviJgkkD3M0W/op3JFlJutPEVzQL8vXWXB+rJQWPkPweJO7vKqXQp5t1qPl Xwg2bqgpWbzgK3Ock+VzBHmF+ae4Egopj6T2e74RJN4YDy7uoXAuIWtmfp7A dV/xrpluCv8BSwE40g== "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesOrigin->{100., 0}, BaseStyle->{FontSize -> 15}, Frame->True, FrameLabel->{ FormBox["\"Temperature (K)\"", TraditionalForm], FormBox["\"de Broglie wavelength (nm)\"", TraditionalForm]}, GridLines->Automatic, PlotRange->{{100, 400}, {0, 50}}, PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Automatic}]], "Output", CellChangeTimes->{{3.4970136232818727`*^9, 3.497013646782961*^9}, { 3.497869915437833*^9, 3.497869937450745*^9}, {3.529231872290162*^9, 3.529231885172679*^9}, 3.561902187357891*^9, 3.5739907405006247`*^9, 3.57441027542316*^9, {3.5744114779691563`*^9, 3.574411494003826*^9}, 3.574411542493555*^9, 3.574418075224887*^9, 3.574590399654113*^9, 3.575201932704784*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"fd0", "[", RowBox[{"kx_", ",", "ky_", ",", "Ec_", ",", "Ef_", ",", "T_"}], "]"}], ":=", FractionBox["1", RowBox[{"1", "+", RowBox[{"Exp", "[", FractionBox[ RowBox[{"Ec", "+", RowBox[{ FractionBox[ SuperscriptBox[ RowBox[{"(", RowBox[{"1.055", "*", SuperscriptBox["10", RowBox[{"-", "34"}]]}], ")"}], "2"], RowBox[{"2", "*", "0.2", "*", "9.1", "*", SuperscriptBox["10", RowBox[{"-", "31"}]], "*", "1.6", "*", SuperscriptBox["10", RowBox[{"-", "19"}]]}]], RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"kx", "*", SuperscriptBox["10", "8"]}], ")"}], "2"], "+", SuperscriptBox[ RowBox[{"(", RowBox[{"ky", "*", SuperscriptBox["10", "8"]}], ")"}], "2"]}], ")"}]}], "-", "Ef"}], RowBox[{"0.026", "*", RowBox[{"(", FractionBox["T", "300"], ")"}]}]], "]"}]}]]}], ";"}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{"2", "D", " ", "Fermi"}], "-", RowBox[{"Dirac", " ", "distribution"}]}], " ", "*)"}]}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"fd0", "[", RowBox[{"kx", ",", "0", ",", "0", ",", "0.1", ",", "T"}], "]"}], ",", RowBox[{"{", RowBox[{"kx", ",", RowBox[{"-", "10"}], ",", "10"}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{"0", ",", "1.2"}], "}"}]}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\<\!\(\*SubscriptBox[\(k\), \(x\)]\)(\!\(\*SuperscriptBox[\(10\), \ \(8\)]\)/m)\>\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"T", ",", "500", ",", "10"}], "}"}]}], "]"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot3D", "[", RowBox[{ RowBox[{"fd0", "[", RowBox[{"kx", ",", "ky", ",", "0", ",", "0.1", ",", "T"}], "]"}], ",", RowBox[{"{", RowBox[{"kx", ",", RowBox[{"-", "20"}], ",", "20"}], "}"}], ",", RowBox[{"{", RowBox[{"ky", ",", RowBox[{"-", "20"}], ",", "20"}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{"0", ",", "1.2"}], "}"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"T", ",", "500", ",", "10"}], "}"}]}], "]"}]}], "Input", CellChangeTimes->{{3.561902704658483*^9, 3.561903023693694*^9}, { 3.561903070966268*^9, 3.561903229794736*^9}, {3.561903326588026*^9, 3.561903579124935*^9}, {3.5619041229232197`*^9, 3.56190412880987*^9}, { 3.574418126034832*^9, 3.5744181328430643`*^9}}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`T$$ = 500, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`T$$], 500, 10}}, Typeset`size$$ = { 360., {119., 126.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`T$5447$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`T$$ = 500}, "ControllerVariables" :> { Hold[$CellContext`T$$, $CellContext`T$5447$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot[ $CellContext`fd0[$CellContext`kx, 0, 0, 0.1, $CellContext`T$$], {$CellContext`kx, -10, 10}, PlotRange -> {0, 1.2}, Frame -> True, PlotStyle -> Thick, FrameLabel -> { "\!\(\*SubscriptBox[\(k\), \(x\)]\)(\!\(\*SuperscriptBox[\(10\), \(8\ \)]\)/m)", "f(\!\(\*SubscriptBox[\(k\), \(x\)]\),\!\(\*SubscriptBox[\(k\), \(y\ \)]\)=0) "}, BaseStyle -> {FontSize -> 15}], "Specifications" :> {{$CellContext`T$$, 500, 10}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{403., {162., 168.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{{3.561902788153351*^9, 3.561902842686503*^9}, 3.561903050046814*^9, {3.561903096435007*^9, 3.5619031955728893`*^9}, 3.56190323165446*^9, {3.561903328226673*^9, 3.5619034321230173`*^9}, { 3.5619035043779793`*^9, 3.5619035804312487`*^9}, 3.561904129336988*^9, 3.5620758442450457`*^9, 3.5739907429843187`*^9, 3.5744102783023443`*^9, 3.5744180780719557`*^9, 3.574418133350062*^9, 3.5745904012794733`*^9}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`T$$ = 500, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`T$$], 500, 10}}, Typeset`size$$ = { 360., {143., 148.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`T$5475$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`T$$ = 500}, "ControllerVariables" :> { Hold[$CellContext`T$$, $CellContext`T$5475$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot3D[ $CellContext`fd0[$CellContext`kx, $CellContext`ky, 0, 0.1, $CellContext`T$$], {$CellContext`kx, -20, 20}, {$CellContext`ky, -20, 20}, PlotRange -> {0, 1.2}], "Specifications" :> {{$CellContext`T$$, 500, 10}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{403., {185., 191.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{{3.561902788153351*^9, 3.561902842686503*^9}, 3.561903050046814*^9, {3.561903096435007*^9, 3.5619031955728893`*^9}, 3.56190323165446*^9, {3.561903328226673*^9, 3.5619034321230173`*^9}, { 3.5619035043779793`*^9, 3.5619035804312487`*^9}, 3.561904129336988*^9, 3.5620758442450457`*^9, 3.5739907429843187`*^9, 3.5744102783023443`*^9, 3.5744180780719557`*^9, 3.574418133350062*^9, 3.57459040131496*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"f0", "[", RowBox[{"kx_", ",", "ky_", ",", "Ec_", ",", "Ef_", ",", "T_"}], "]"}], ":=", FractionBox["1", RowBox[{"1", "+", RowBox[{"Exp", "[", FractionBox[ RowBox[{"Ec", "+", RowBox[{ FractionBox[ SuperscriptBox[ RowBox[{"(", RowBox[{"1.055", "*", SuperscriptBox["10", RowBox[{"-", "34"}]]}], ")"}], "2"], RowBox[{"2", "*", "0.2", "*", "9.1", "*", SuperscriptBox["10", RowBox[{"-", "31"}]], "*", "1.6", "*", SuperscriptBox["10", RowBox[{"-", "19"}]]}]], RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{"kx", "-", "2"}], ")"}], "*", SuperscriptBox["10", "8"]}], ")"}], "2"], "+", SuperscriptBox[ RowBox[{"(", RowBox[{"ky", "*", SuperscriptBox["10", "8"]}], ")"}], "2"]}], ")"}]}], "-", "Ef"}], RowBox[{"0.026", "*", RowBox[{"(", FractionBox["T", "300"], ")"}]}]], "]"}]}]]}], ";"}], " ", RowBox[{"(*", " ", RowBox[{"perturbed", " ", "2", "D", " ", "distribution", " ", "function"}], " ", "*)"}]}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"f0", "[", RowBox[{"kx", ",", "0", ",", "0", ",", "0.1", ",", "T"}], "]"}], ",", RowBox[{"{", RowBox[{"kx", ",", RowBox[{"-", "10"}], ",", "10"}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{"0", ",", "1.2"}], "}"}]}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\<\!\(\*SubscriptBox[\(k\), \(x\)]\)(\!\(\*SuperscriptBox[\(10\), \ \(8\)]\)/m)\>\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"T", ",", "500", ",", "10"}], "}"}]}], "]"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot3D", "[", RowBox[{ RowBox[{"f0", "[", RowBox[{"kx", ",", "ky", ",", "0", ",", "0.1", ",", "T"}], "]"}], ",", RowBox[{"{", RowBox[{"kx", ",", RowBox[{"-", "20"}], ",", "20"}], "}"}], ",", RowBox[{"{", RowBox[{"ky", ",", RowBox[{"-", "20"}], ",", "20"}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{"0", ",", "1.2"}], "}"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"T", ",", "500", ",", "10"}], "}"}]}], "]"}]}], "Input", CellChangeTimes->{{3.561904071547038*^9, 3.5619041397134953`*^9}, { 3.561904179240857*^9, 3.5619043970241327`*^9}, {3.561904462049301*^9, 3.561904462775173*^9}, {3.574418156395803*^9, 3.5744181636173563`*^9}}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`T$$ = 500, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`T$$], 500, 10}}, Typeset`size$$ = { 360., {119., 126.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`T$5976$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`T$$ = 500}, "ControllerVariables" :> { Hold[$CellContext`T$$, $CellContext`T$5976$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot[ $CellContext`f0[$CellContext`kx, 0, 0, 0.1, $CellContext`T$$], {$CellContext`kx, -10, 10}, PlotRange -> {0, 1.2}, Frame -> True, PlotStyle -> Thick, FrameLabel -> { "\!\(\*SubscriptBox[\(k\), \(x\)]\)(\!\(\*SuperscriptBox[\(10\), \(8\ \)]\)/m)", "f(\!\(\*SubscriptBox[\(k\), \(x\)]\),\!\(\*SubscriptBox[\(k\), \(y\ \)]\)=0) "}, BaseStyle -> {FontSize -> 15}], "Specifications" :> {{$CellContext`T$$, 500, 10}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{403., {162., 168.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{{3.561904116066819*^9, 3.561904140373013*^9}, 3.561904404717395*^9, 3.562075850994314*^9, 3.573990746227586*^9, 3.57441808132171*^9, 3.5744181642511463`*^9, 3.574590404778007*^9}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`T$$ = 500, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`T$$], 500, 10}}, Typeset`size$$ = { 360., {143., 148.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`T$6000$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`T$$ = 500}, "ControllerVariables" :> { Hold[$CellContext`T$$, $CellContext`T$6000$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot3D[ $CellContext`f0[$CellContext`kx, $CellContext`ky, 0, 0.1, $CellContext`T$$], {$CellContext`kx, -20, 20}, {$CellContext`ky, -20, 20}, PlotRange -> {0, 1.2}], "Specifications" :> {{$CellContext`T$$, 500, 10}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{403., {185., 191.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{{3.561904116066819*^9, 3.561904140373013*^9}, 3.561904404717395*^9, 3.562075850994314*^9, 3.573990746227586*^9, 3.57441808132171*^9, 3.5744181642511463`*^9, 3.5745904048143272`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"ftrans", "[", RowBox[{ "kx_", ",", "ky_", ",", "Ec_", ",", "Ef_", ",", "T_", ",", "t_", ",", "taum_"}], "]"}], ":=", RowBox[{ RowBox[{"fd0", "[", RowBox[{"kx", ",", "ky", ",", "Ec", ",", "Ef", ",", "T"}], "]"}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"f0", "[", RowBox[{"kx", ",", "ky", ",", "Ec", ",", "Ef", ",", "T"}], "]"}], "-", RowBox[{"fd0", "[", RowBox[{"kx", ",", "ky", ",", "Ec", ",", "Ef", ",", "T"}], "]"}]}], ")"}], "*", RowBox[{"Exp", "[", RowBox[{"-", FractionBox["t", "taum"]}], "]"}]}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"ftrans", "[", RowBox[{ "kx", ",", "0", ",", "0", ",", "0.1", ",", "T", ",", "t", ",", "0.2"}], "]"}], ",", RowBox[{"{", RowBox[{"kx", ",", RowBox[{"-", "10"}], ",", "10"}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{"0", ",", "1.2"}], "}"}]}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\<\!\(\*SubscriptBox[\(k\), \(x\)]\)(\!\(\*SuperscriptBox[\(10\), \ \(8\)]\)/m)\>\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"t", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"T", ",", "500", ",", "10"}], "}"}]}], "]"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot3D", "[", RowBox[{ RowBox[{"ftrans", "[", RowBox[{ "kx", ",", "ky", ",", "0", ",", "0.1", ",", "T", ",", "t", ",", "0.2"}], "]"}], ",", RowBox[{"{", RowBox[{"kx", ",", RowBox[{"-", "20"}], ",", "20"}], "}"}], ",", RowBox[{"{", RowBox[{"ky", ",", RowBox[{"-", "20"}], ",", "20"}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{"0", ",", "1.2"}], "}"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"t", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"T", ",", "500", ",", "10"}], "}"}]}], "]"}]}], "Input", CellChangeTimes->{{3.561904480113347*^9, 3.561904554257351*^9}, { 3.5744181920760393`*^9, 3.574418200006769*^9}}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`t$$ = 0, $CellContext`T$$ = 500, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`t$$], 0, 1}, { Hold[$CellContext`T$$], 500, 10}}, Typeset`size$$ = { 360., {119., 126.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`t$6151$$ = 0, $CellContext`T$6152$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`t$$ = 0, $CellContext`T$$ = 500}, "ControllerVariables" :> { Hold[$CellContext`t$$, $CellContext`t$6151$$, 0], Hold[$CellContext`T$$, $CellContext`T$6152$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot[ $CellContext`ftrans[$CellContext`kx, 0, 0, 0.1, $CellContext`T$$, $CellContext`t$$, 0.2], {$CellContext`kx, -10, 10}, PlotRange -> {0, 1.2}, Frame -> True, PlotStyle -> Thick, FrameLabel -> { "\!\(\*SubscriptBox[\(k\), \(x\)]\)(\!\(\*SuperscriptBox[\(10\), \(8\ \)]\)/m)", "f(\!\(\*SubscriptBox[\(k\), \(x\)]\),\!\(\*SubscriptBox[\(k\), \(y\ \)]\)=0) "}, BaseStyle -> {FontSize -> 15}], "Specifications" :> {{$CellContext`t$$, 0, 1}, {$CellContext`T$$, 500, 10}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{403., {176., 182.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{{3.561904526643346*^9, 3.561904555027834*^9}, 3.562075861280463*^9, 3.573990749166463*^9, 3.574418084333747*^9, 3.574418200540187*^9, 3.574590408215542*^9}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`t$$ = 0, $CellContext`T$$ = 500, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`t$$], 0, 1}, { Hold[$CellContext`T$$], 500, 10}}, Typeset`size$$ = { 360., {143., 148.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`t$6180$$ = 0, $CellContext`T$6181$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`t$$ = 0, $CellContext`T$$ = 500}, "ControllerVariables" :> { Hold[$CellContext`t$$, $CellContext`t$6180$$, 0], Hold[$CellContext`T$$, $CellContext`T$6181$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot3D[ $CellContext`ftrans[$CellContext`kx, $CellContext`ky, 0, 0.1, $CellContext`T$$, $CellContext`t$$, 0.2], {$CellContext`kx, -20, 20}, {$CellContext`ky, -20, 20}, PlotRange -> {0, 1.2}], "Specifications" :> {{$CellContext`t$$, 0, 1}, {$CellContext`T$$, 500, 10}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{403., {199., 205.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{{3.561904526643346*^9, 3.561904555027834*^9}, 3.562075861280463*^9, 3.573990749166463*^9, 3.574418084333747*^9, 3.574418200540187*^9, 3.5745904082612333`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"fd0", "[", RowBox[{"kx_", ",", "ky_", ",", "Ec_", ",", "Ef_", ",", "T_"}], "]"}], ":=", FractionBox["1", RowBox[{"1", "+", RowBox[{"Exp", "[", FractionBox[ RowBox[{"Ec", "+", RowBox[{ FractionBox[ SuperscriptBox[ RowBox[{"(", RowBox[{"1.055", "*", SuperscriptBox["10", RowBox[{"-", "34"}]]}], ")"}], "2"], RowBox[{"2", "*", "0.2", "*", "9.1", "*", SuperscriptBox["10", RowBox[{"-", "31"}]], "*", "1.6", "*", SuperscriptBox["10", RowBox[{"-", "19"}]]}]], RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"kx", "*", SuperscriptBox["10", "8"]}], ")"}], "2"], "+", SuperscriptBox[ RowBox[{"(", RowBox[{"ky", "*", SuperscriptBox["10", "8"]}], ")"}], "2"]}], ")"}]}], "-", "Ef"}], RowBox[{"0.026", "*", RowBox[{"(", FractionBox["T", "300"], ")"}]}]], "]"}]}]]}], ";"}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{"2", "D", " ", "Fermi"}], "-", RowBox[{"Dirac", " ", "distribution"}]}], " ", "*)"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"df0dkx", "[", RowBox[{"kx_", ",", "ky_", ",", "Ec_", ",", "Ef_", ",", "T_"}], "]"}], "=", RowBox[{"D", "[", RowBox[{ RowBox[{"fd0", "[", RowBox[{"kx", ",", "ky", ",", "Ec", ",", "Ef", ",", "T"}], "]"}], ",", "kx"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"df0dkx", "[", RowBox[{"kx", ",", "0", ",", "0", ",", "0.1", ",", "T"}], "]"}], ",", RowBox[{"{", RowBox[{"kx", ",", RowBox[{"-", "10"}], ",", "10"}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"-", "2"}], ",", "2"}], "}"}]}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\<\!\(\*SubscriptBox[\(k\), \(x\)]\)(\!\(\*SuperscriptBox[\(10\), \ \(8\)]\)/m)\>\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"T", ",", "500", ",", "10"}], "}"}]}], "]"}]}], "Input", CellChangeTimes->{{3.5620811080443153`*^9, 3.5620812723471813`*^9}, { 3.574418227337084*^9, 3.57441823047954*^9}}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`T$$ = 500, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`T$$], 500, 10}}, Typeset`size$$ = { 360., {119., 126.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`T$6223$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`T$$ = 500}, "ControllerVariables" :> { Hold[$CellContext`T$$, $CellContext`T$6223$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot[ $CellContext`df0dkx[$CellContext`kx, 0, 0, 0.1, $CellContext`T$$], {$CellContext`kx, -10, 10}, PlotRange -> {-2, 2}, Frame -> True, PlotStyle -> Thick, FrameLabel -> { "\!\(\*SubscriptBox[\(k\), \(x\)]\)(\!\(\*SuperscriptBox[\(10\), \(8\ \)]\)/m)", "df/dkx(\!\(\*SubscriptBox[\(k\), \ \(x\)]\),\!\(\*SubscriptBox[\(k\), \(y\)]\)=0) "}, BaseStyle -> {FontSize -> 15}], "Specifications" :> {{$CellContext`T$$, 500, 10}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{403., {162., 168.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{{3.562081204717445*^9, 3.562081272897212*^9}, 3.573990752562737*^9, 3.574418088105401*^9, 3.574418230875008*^9, 3.57459041136733*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ FractionBox["k", RowBox[{"(", RowBox[{"1", "+", RowBox[{"Exp", "[", RowBox[{ RowBox[{"\[Alpha]", "*", SuperscriptBox["k", "2"]}], "-", "\[Eta]"}], "]"}]}], ")"}]], RowBox[{"\[DifferentialD]", "k"}]}]}]], "Input", CellChangeTimes->{{3.574423540098847*^9, 3.574423543721277*^9}}], Cell[BoxData[ RowBox[{"ConditionalExpression", "[", RowBox[{ FractionBox[ RowBox[{"Log", "[", RowBox[{"1", "+", SuperscriptBox["\[ExponentialE]", "\[Eta]"]}], "]"}], RowBox[{"2", " ", "\[Alpha]"}]], ",", RowBox[{ RowBox[{"Re", "[", "\[Alpha]", "]"}], ">", "0"}]}], "]"}]], "Output", CellChangeTimes->{3.57442354517731*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ FractionBox[ RowBox[{ SuperscriptBox["k", "3"], "*", RowBox[{"Exp", "[", RowBox[{ RowBox[{"\[Alpha]", "*", SuperscriptBox["k", "2"]}], "-", "\[Eta]"}], "]"}]}], SuperscriptBox[ RowBox[{"(", RowBox[{"1", "+", RowBox[{"Exp", "[", RowBox[{ RowBox[{"\[Alpha]", "*", SuperscriptBox["k", "2"]}], "-", "\[Eta]"}], "]"}]}], ")"}], "2"]], RowBox[{"\[DifferentialD]", "k"}]}]}]], "Input", CellChangeTimes->{{3.574422750608181*^9, 3.5744227695995827`*^9}, { 3.574422832111347*^9, 3.57442286929503*^9}, {3.574423638240992*^9, 3.574423645671603*^9}, {3.574423999522874*^9, 3.574424010443989*^9}}], Cell[BoxData[ RowBox[{"ConditionalExpression", "[", RowBox[{ FractionBox[ RowBox[{"Log", "[", RowBox[{"1", "+", SuperscriptBox["\[ExponentialE]", "\[Eta]"]}], "]"}], RowBox[{"2", " ", SuperscriptBox["\[Alpha]", "2"]}]], ",", RowBox[{"\[Alpha]", "\[GreaterEqual]", "0"}]}], "]"}]], "Output", CellChangeTimes->{3.57442285878122*^9, 3.5744229448327513`*^9, 3.574423660793206*^9, 3.574424024443953*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[StyleBox["5.2) Diffusive Charge Transport in 3D Bulk \ Semiconductors: Mobility", "Subtitle"]], "Subsubtitle", CellChangeTimes->{{3.492861069259028*^9, 3.4928611014194098`*^9}, { 3.496030277369309*^9, 3.496030287282919*^9}, {3.497106630417016*^9, 3.497106637191511*^9}, {3.561471490343113*^9, 3.561471504867713*^9}, { 3.56147165526653*^9, 3.561471655448987*^9}, {3.561471952917699*^9, 3.561471956546934*^9}, {3.5619026622594433`*^9, 3.561902664071287*^9}, 3.5739907290600843`*^9, 3.57399077518533*^9}], Cell["\<\ 5.2.1) Neutral Impurity Scattering\ \>", "Subsubtitle", CellChangeTimes->{{3.5614717074097347`*^9, 3.5614717309111567`*^9}, 3.573990731785879*^9, 3.573990776737318*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"Seeger", " ", "Eq", " ", "6.1", ".9"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"muNeutral", "[", RowBox[{"Nx_", ",", "meff_", ",", "epsDc_"}], "]"}], ":=", RowBox[{ FractionBox[ RowBox[{"1.44", "*", SuperscriptBox["10", "22"]}], RowBox[{"Nx", "*", SuperscriptBox["10", "17"]}]], "*", FractionBox["meff", "epsDc"]}]}], ";"}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{ "Neutral", " ", "impurity", " ", "scattering", " ", "limited", " ", "mobility", " ", "in", " ", RowBox[{ SuperscriptBox["cm", "2"], "/", "Vs"}]}], ",", " ", RowBox[{"Nx", " ", "is", " ", "in", " ", RowBox[{ SuperscriptBox["10", "17"], "/", SuperscriptBox["cm", "3"]}]}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"LogLogPlot", "[", RowBox[{ RowBox[{"muNeutral", "[", RowBox[{"Nx", ",", "0.2", ",", "9"}], "]"}], ",", RowBox[{"{", RowBox[{"Nx", ",", "0.1", ",", "10"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"AspectRatio", "\[Rule]", "1"}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}]}], "]"}]}]}]], "Input", CellChangeTimes->{{3.561567093000585*^9, 3.561567281013891*^9}, { 3.561567589730451*^9, 3.56156769106429*^9}, {3.561902215156744*^9, 3.5619022398353043`*^9}}], Cell[BoxData[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwl1Ps3lHkcwPF5HpkabWytfM0Mc/OkSNNutS4ZPR+XbaWLWxitdGGUNEgl U7NZWteSMmVbp3uJcokRqbP6jns6xCkqdaildSnLcY+Jds/uD+/z+g/ewt0R XjKSwWBs/rf/ZBvfLQ4jNVNdW+zWYgrCk7G4aS+pqXxky457RMGZyZDCPhmp Sc0STdVXUNDaVlrA30lquF4T5T5/ULAtwzs/bSupkVResj3wgIKQ+em3Qx1I TeyVAZvcEgqOz+jeFBqQGt2AVGujXAru/jl64aya0Cxsq109coYCdhZ/ydt+ hsaquiWzNpACLfPqIYWYoQnuLLIcWElBSdPZG3F/z+IAIy0xS1Dwi/zE9Y+B M9jHrd1xeYsZOETzlg190GJ53il13jUzYO3wH2nym8ZJ81pP/hhhBs0r/nrJ bPyEd8Qn5D51MIMEGcelfdsk9rX4aiLXwAzcfh4aS3wyjt0bzfMvd4iAMSu3 erp1DIdcNFL1FoqgKNghNqJnBEtSIiu4cSKIyMs3GpAO42+iAj3C3EUgKUsN ndM4hFnJQkN9oQgetGnFvTkDmMiKgcZBIVhW6i8/ntGPyx/bFR2uEILy+KE1 ruoenEa1eESlC2FAy65/rOrGwcpp/9TtQpBsXLRHeecd9iemVeNiIfiWnhM0 6b7BHvFp1srPAjDd7/qO1dqKmYKTJoNPBLAhzfmwP/spfvNh++qSiwJocRrf ojhbiYuLa9SqfQLY/eXxkfOKHJydzQiqtxeAeLN5V/SeW7S07JZvzwIBTMiY d9bPr6K5iZUyx3I+CIZtQrpzmuiqqbexAT/xoc+hdPYZr43eLzMPK5zggd9H vY6Nm97QmXqOHS9UPDhxdLvH3aR3tJbFLM624YEEjy+Lz+mmg4hRn7znprB4 lf2YMKOHZnmnBvhFm8LUq87kBeH9tFXneH87xxQwdjrnlDxAe+9KcVXdN4Hs Vu8MF/kQXbauft7oNhMoO5eh4+o6TJsarshKmeCC5QtPm614hNY4O6TVXeDC je807syVY3RXvnDuawkXFhScNuuoGKfn6Yu9qHYOJOGSSM6qSTq04f2soZID I8O2CmXtJ7pZWa2UIA4ErZOH/Oo5TatDo+PW3mPDe+GnxpEqLf2s6Hlvpx8b fJZ0DyZ4z9ATQ1L+w1FjeIGp1NiGWdo3JbncPtMYxA/1EgxMGLAm4NQr1Vpj CKVKrg93MQAtLW8QvURg9Zo5k3iRgO83nTaRHkWwjN+cU32FgPsWlvUPYhAs Cf7Ni3GDALu5dQe4RxDwBpfmKm4TIKmaqes8iOBrcoP3/jICnG3lB2RyBGMW J297thDgSW2qi9qJoEJh4GsyhwT5Z1Zk2noEDx+9ZPjPJWGwPZsz5IKgTOdq 3nk9EiLvO9Z6OCMoSvuWMFhIwsEoBccQEFy/5plP8Eg42tdXk2WHILFBRfba kJDcWs/OtUIQrx9QYGZPgp46qIa1HEGsNyXduY6EU+lfwsMsEMR03CtodyEh 3c2mRmyOYN9wm7TRk4RMza3wUj6CEOvLOiwfEowvO7ERD0HQsZDCH6Qk/H6s szrGBEGA7qQODiThkrURW8JGIHXDhdpdJPAN1dWXEAKf9CR/WxkJV4c3h39Z jMCr1X3O4b0kiJr7jXcZItjy/7/gZn5CddUiBP8AgMsjuQ== "]]}}, AspectRatio->1, Axes->True, AxesOrigin->{-2.3025850929940455`, 5.768321089776837}, BaseStyle->{FontSize -> 15}, CoordinatesToolOptions:>{"DisplayFunction" -> ({ Exp[ Part[#, 1]], Exp[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ Exp[ Part[#, 1]], Exp[ Part[#, 2]]}& )}, Frame->True, FrameLabel->{ FormBox[ "\"Nx (\\!\\(\\*SuperscriptBox[\\(10\\), \ \\(17\\)]\\)/\\!\\(\\*SuperscriptBox[\\(cm\\), \\(3\\)]\\))\"", TraditionalForm], FormBox[ "\"Mobility (\\!\\(\\*SuperscriptBox[\\(cm\\), \\(2\\)]\\)/Vs)\"", TraditionalForm]}, FrameTicks->{{{{6.907755278982137, FormBox["1000", TraditionalForm]}, {7.600902459542082, FormBox["2000", TraditionalForm]}, {8.517193191416238, FormBox["5000", TraditionalForm]}, {9.210340371976184, FormBox[ TemplateBox[{"1", TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> SuperscriptBox]}, "Row", DisplayFunction -> (RowBox[{#, "\[Times]", #2}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", "\"\[Times]\""}], "]"}]& )], TraditionalForm]}, {9.903487552536127, FormBox[ TemplateBox[{"2", TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> SuperscriptBox]}, "Row", DisplayFunction -> (RowBox[{#, "\[Times]", #2}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", "\"\[Times]\""}], "]"}]& )], TraditionalForm]}, {10.819778284410283`, FormBox[ TemplateBox[{"5", TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> SuperscriptBox]}, "Row", DisplayFunction -> (RowBox[{#, "\[Times]", #2}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", "\"\[Times]\""}], "]"}]& )], TraditionalForm]}, {11.512925464970229`, FormBox[ TemplateBox[{"1", TemplateBox[{"10", "5"}, "Superscript", SyntaxForm -> SuperscriptBox]}, "Row", DisplayFunction -> (RowBox[{#, "\[Times]", #2}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", "\"\[Times]\""}], "]"}]& )], TraditionalForm]}, {12.206072645530174`, FormBox[ TemplateBox[{"2", TemplateBox[{"10", "5"}, "Superscript", SyntaxForm -> SuperscriptBox]}, "Row", DisplayFunction -> (RowBox[{#, "\[Times]", #2}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", "\"\[Times]\""}], "]"}]& )], TraditionalForm]}, {13.122363377404328`, FormBox[ TemplateBox[{"5", TemplateBox[{"10", "5"}, "Superscript", SyntaxForm -> SuperscriptBox]}, "Row", DisplayFunction -> (RowBox[{#, "\[Times]", #2}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", "\"\[Times]\""}], "]"}]& )], TraditionalForm]}, {8.006367567650246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.294049640102028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.699514748210191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.85366542803745, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.987196820661973, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.104979856318357, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.308952660644293`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.596634733096073`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.002099841204238`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.156250521031495`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.289781913656018`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.407564949312402`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.611537753638338`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.89921982609012, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{6.907755278982137, FormBox["\"\"", TraditionalForm]}, {7.600902459542082, FormBox["\"\"", TraditionalForm]}, {8.517193191416238, FormBox["\"\"", TraditionalForm]}, {9.210340371976184, FormBox["\"\"", TraditionalForm]}, {9.903487552536127, FormBox["\"\"", TraditionalForm]}, {10.819778284410283`, FormBox["\"\"", TraditionalForm]}, {11.512925464970229`, FormBox["\"\"", TraditionalForm]}, {12.206072645530174`, FormBox["\"\"", TraditionalForm]}, {13.122363377404328`, FormBox["\"\"", TraditionalForm]}, {8.006367567650246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.294049640102028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.699514748210191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.85366542803745, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.987196820661973, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.104979856318357, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.308952660644293`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.596634733096073`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.002099841204238`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.156250521031495`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.289781913656018`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.407564949312402`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.611537753638338`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.89921982609012, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}, {{{-2.302585092994046, FormBox[ TagBox[ InterpretationBox["\"0.1\"", 0.1, AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {-1.6094379124341003`, FormBox[ TagBox[ InterpretationBox["\"0.2\"", 0.2, AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {-0.6931471805599453, FormBox[ TagBox[ InterpretationBox["\"0.5\"", 0.5, AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {0., FormBox[ TagBox[ InterpretationBox["\"1.0\"", 1., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {0.6931471805599453, FormBox[ TagBox[ InterpretationBox["\"2.0\"", 2., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {1.6094379124341003`, FormBox[ TagBox[ InterpretationBox["\"5.0\"", 5., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {2.302585092994046, FormBox[ TagBox[ InterpretationBox["\"10.0\"", 10., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {2.995732273553991, FormBox[ TagBox[ InterpretationBox["\"20.0\"", 20., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {3.912023005428146, FormBox[ TagBox[ InterpretationBox["\"50.0\"", 50., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {-1.2039728043259361`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.5108256237659907, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.35667494393873245`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.2231435513142097, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.10536051565782628`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{-2.302585092994046, FormBox["\"\"", TraditionalForm]}, {-1.6094379124341003`, FormBox["\"\"", TraditionalForm]}, {-0.6931471805599453, FormBox["\"\"", TraditionalForm]}, {0., FormBox["\"\"", TraditionalForm]}, {0.6931471805599453, FormBox["\"\"", TraditionalForm]}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm]}, {2.302585092994046, FormBox["\"\"", TraditionalForm]}, {2.995732273553991, FormBox["\"\"", TraditionalForm]}, {3.912023005428146, FormBox["\"\"", TraditionalForm]}, {-1.2039728043259361`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.5108256237659907, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.35667494393873245`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.2231435513142097, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.10536051565782628`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}}, GridLines->{None, None}, Method->{}, PlotRange->NCache[{{-2.3025850929940455`, Log[10]}, {5.768321089776837, 10.373491087798799`}}, {{-2.3025850929940455`, 2.302585092994046}, { 5.768321089776837, 10.373491087798799`}}], PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}, Ticks->{{{-2.302585092994046, FormBox[ TagBox[ InterpretationBox["\"0.1\"", 0.1, AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {-1.6094379124341003`, FormBox[ TagBox[ InterpretationBox["\"0.2\"", 0.2, AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {-0.6931471805599453, FormBox[ TagBox[ InterpretationBox["\"0.5\"", 0.5, AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {0., FormBox[ TagBox[ InterpretationBox["\"1.0\"", 1., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {0.6931471805599453, FormBox[ TagBox[ InterpretationBox["\"2.0\"", 2., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {1.6094379124341003`, FormBox[ TagBox[ InterpretationBox["\"5.0\"", 5., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {2.302585092994046, FormBox[ TagBox[ InterpretationBox["\"10.0\"", 10., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {2.995732273553991, FormBox[ TagBox[ InterpretationBox["\"20.0\"", 20., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {3.912023005428146, FormBox[ TagBox[ InterpretationBox["\"50.0\"", 50., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {-1.2039728043259361`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.5108256237659907, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.35667494393873245`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.2231435513142097, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.10536051565782628`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{6.907755278982137, FormBox["1000", TraditionalForm]}, {7.600902459542082, FormBox["2000", TraditionalForm]}, {8.517193191416238, FormBox["5000", TraditionalForm]}, {9.210340371976184, FormBox[ TemplateBox[{"1", TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> SuperscriptBox]}, "Row", DisplayFunction -> (RowBox[{#, "\[Times]", #2}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", "\"\[Times]\""}], "]"}]& )], TraditionalForm]}, {9.903487552536127, FormBox[ TemplateBox[{"2", TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> SuperscriptBox]}, "Row", DisplayFunction -> (RowBox[{#, "\[Times]", #2}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", "\"\[Times]\""}], "]"}]& )], TraditionalForm]}, {10.819778284410283`, FormBox[ TemplateBox[{"5", TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> SuperscriptBox]}, "Row", DisplayFunction -> (RowBox[{#, "\[Times]", #2}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", "\"\[Times]\""}], "]"}]& )], TraditionalForm]}, {11.512925464970229`, FormBox[ TemplateBox[{"1", TemplateBox[{"10", "5"}, "Superscript", SyntaxForm -> SuperscriptBox]}, "Row", DisplayFunction -> (RowBox[{#, "\[Times]", #2}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", "\"\[Times]\""}], "]"}]& )], TraditionalForm]}, {12.206072645530174`, FormBox[ TemplateBox[{"2", TemplateBox[{"10", "5"}, "Superscript", SyntaxForm -> SuperscriptBox]}, "Row", DisplayFunction -> (RowBox[{#, "\[Times]", #2}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", "\"\[Times]\""}], "]"}]& )], TraditionalForm]}, {13.122363377404328`, FormBox[ TemplateBox[{"5", TemplateBox[{"10", "5"}, "Superscript", SyntaxForm -> SuperscriptBox]}, "Row", DisplayFunction -> (RowBox[{#, "\[Times]", #2}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", "\"\[Times]\""}], "]"}]& )], TraditionalForm]}, {8.006367567650246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.294049640102028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.699514748210191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.85366542803745, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.987196820661973, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.104979856318357, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.308952660644293`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.596634733096073`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.002099841204238`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.156250521031495`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.289781913656018`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.407564949312402`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.611537753638338`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.89921982609012, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}]], "Output", CellChangeTimes->{3.561567284007142*^9, 3.561567630335545*^9, 3.5615676930401373`*^9, 3.561902190030754*^9, 3.561902241298905*^9, 3.5739908730549*^9, 3.575029167570574*^9, 3.5752022975092688`*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["\<\ 5.2.2) Charged Impurity Scattering\ \>", "Subsubtitle", CellChangeTimes->{{3.5614717074097347`*^9, 3.561471749087064*^9}, { 3.573990780576806*^9, 3.573990782576994*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"IImatrix", "[", RowBox[{"\[Alpha]_", ",", "LD_", ",", "k_"}], "]"}], ":=", FractionBox["1", RowBox[{ RowBox[{"4", "*", SuperscriptBox["k", "2"], "*", SuperscriptBox[ RowBox[{"Sin", "[", FractionBox["\[Alpha]", "2"], "]"}], "2"]}], "+", SuperscriptBox[ RowBox[{"(", FractionBox["1", "LD"], ")"}], "2"]}]]}], ";"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"IImatrix", "[", RowBox[{"\[Alpha]", ",", "LD", ",", "k"}], "]"}], ",", RowBox[{"{", RowBox[{"\[Alpha]", ",", "0", ",", "\[Pi]"}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{"0", ",", "5"}], "}"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"LD", ",", "1", ",", "10"}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", "1", ",", "10"}], "}"}]}], "]"}]}], "Input", CellChangeTimes->{{3.5750378691308813`*^9, 3.5750381424249563`*^9}}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`k$$ = 1., $CellContext`LD$$ = 1., Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`LD$$], 1, 10}, { Hold[$CellContext`k$$], 1, 10}}, Typeset`size$$ = {360., {119., 123.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`LD$26299$$ = 0, $CellContext`k$26300$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`k$$ = 1, $CellContext`LD$$ = 1}, "ControllerVariables" :> { Hold[$CellContext`LD$$, $CellContext`LD$26299$$, 0], Hold[$CellContext`k$$, $CellContext`k$26300$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot[ $CellContext`IImatrix[$CellContext`\[Alpha], $CellContext`LD$$, \ $CellContext`k$$], {$CellContext`\[Alpha], 0, Pi}, PlotRange -> {0, 5}], "Specifications" :> {{$CellContext`LD$$, 1, 10}, {$CellContext`k$$, 1, 10}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{403., {175., 181.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{{3.5750380671810217`*^9, 3.57503814287895*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"Seeger", " ", "Eq", " ", "6.3", ".23"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Beta]BH", "[", RowBox[{"epsDc_", ",", "T_", ",", "meff_", ",", "n_"}], "]"}], ":=", RowBox[{ SqrtBox[ FractionBox["epsDc", "16"]], "*", RowBox[{"(", FractionBox["T", "100"], ")"}], "*", SqrtBox["meff"], "*", SqrtBox[ FractionBox[ RowBox[{"2.08", "*", SuperscriptBox["10", "18"]}], RowBox[{"n", "*", SuperscriptBox["10", "17"]}]]]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"muIonizedImp", "[", RowBox[{"Nd_", ",", "epsDc_", ",", "T_", ",", "meff_", ",", "n_"}], "]"}], ":=", RowBox[{ FractionBox[ RowBox[{"3.68", "*", SuperscriptBox["10", "20"]}], RowBox[{"Nd", "*", SuperscriptBox["10", "17"]}]], "*", SuperscriptBox[ RowBox[{"(", FractionBox["epsDc", "16"], ")"}], "2"], "*", SuperscriptBox[ RowBox[{"(", FractionBox["T", "100"], ")"}], FractionBox["3", "2"]], "*", FractionBox["1", RowBox[{ FractionBox[ SqrtBox["meff"], RowBox[{"Log", "[", "10.0", "]"}]], "*", RowBox[{"(", RowBox[{ RowBox[{"Log", "[", RowBox[{"1", "+", SuperscriptBox[ RowBox[{"\[Beta]BH", "[", RowBox[{"epsDc", ",", "T", ",", "meff", ",", "n"}], "]"}], "2"]}], "]"}], "-", FractionBox[ SuperscriptBox[ RowBox[{"\[Beta]BH", "[", RowBox[{"epsDc", ",", "T", ",", "meff", ",", "n"}], "]"}], "2"], RowBox[{"1", "+", SuperscriptBox[ RowBox[{"\[Beta]BH", "[", RowBox[{"epsDc", ",", "T", ",", "meff", ",", "n"}], "]"}], "2"]}]]}], ")"}]}]]}]}], ";"}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{ "Ionized", " ", "impurity", " ", "scattering", " ", "limited", " ", "mobility", " ", "in", " ", RowBox[{ SuperscriptBox["cm", "2"], "/", "Vs"}]}], ",", " ", RowBox[{ "Nd", " ", "is", " ", "the", " ", "ionized", " ", "impurity", " ", "density", " ", "and", " ", "n", " ", "is", " ", "the", " ", "free", " ", "carrier", " ", "concentration"}], ",", " ", RowBox[{"both", " ", "in", " ", RowBox[{ SuperscriptBox["10", "17"], "/", SuperscriptBox["cm", "3"]}]}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"LogLogPlot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"muIonizedImp", "[", RowBox[{"Nd", ",", "16", ",", "300", ",", "1", ",", "Nd"}], "]"}], ",", RowBox[{"muIonizedImp", "[", RowBox[{"Nd", ",", "16", ",", "77", ",", "1", ",", "Nd"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"Nd", ",", SuperscriptBox["10", RowBox[{"-", "4"}]], ",", SuperscriptBox["10", "1"]}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ SuperscriptBox["10", "3"], ",", SuperscriptBox["10", "8"]}], "}"}]}], ",", RowBox[{"AspectRatio", "\[Rule]", "1"}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\<\!\(\*SubscriptBox[\(N\), \(D\)]\) (\!\(\*SuperscriptBox[\(10\), \ \(17\)]\)/\!\(\*SuperscriptBox[\(cm\), \(3\)]\))\>\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}]}], "]"}], " ", RowBox[{"(*", " ", RowBox[{"Fig", " ", "6.4", " ", "Seeger"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"LogLogPlot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"muIonizedImp", "[", RowBox[{"Nd", ",", "9", ",", "300", ",", "0.2", ",", "Nd"}], "]"}], ",", RowBox[{"muIonizedImp", "[", RowBox[{"Nd", ",", "9", ",", "77", ",", "0.2", ",", "Nd"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"Nd", ",", SuperscriptBox["10", RowBox[{"-", "4"}]], ",", SuperscriptBox["10", "1"]}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ SuperscriptBox["10", "3"], ",", SuperscriptBox["10", "8"]}], "}"}]}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"AspectRatio", "\[Rule]", "1"}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\<\!\(\*SubscriptBox[\(N\), \(D\)]\) (\!\(\*SuperscriptBox[\(10\), \ \(17\)]\)/\!\(\*SuperscriptBox[\(cm\), \(3\)]\))\>\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}]}], "]"}], " ", RowBox[{"(*", " ", RowBox[{"For", " ", "GaN"}], " ", "*)"}]}]}]], "Input", CellChangeTimes->{{3.561567749919179*^9, 3.56156775446723*^9}, { 3.56156779096558*^9, 3.561567855952734*^9}, {3.561567888293508*^9, 3.5615681834773607`*^9}, {3.56156827344176*^9, 3.5615682878233643`*^9}, { 3.5615684030288477`*^9, 3.5615684291462517`*^9}, {3.561568484161273*^9, 3.561568524324431*^9}, {3.561568638525262*^9, 3.561568822974052*^9}, { 3.561568860254127*^9, 3.561568932947735*^9}, {3.561568983391471*^9, 3.561569080969892*^9}, {3.5615691503372383`*^9, 3.561569184244855*^9}, { 3.5616503455753803`*^9, 3.561650348724065*^9}, {3.561902260979925*^9, 3.561902380925538*^9}, {3.561902413583493*^9, 3.561902434975258*^9}}], Cell[BoxData[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAuQ/Ts7FrIsB2zKAX9k0xQC61m+Pi aSLAYLED5x9NMUCiWmQTFGgiwPoTj7dJTDFAjKX1cnZkIsDd8R9cnUoxQGA7 GDI7XSLAbm8us0RHMUAIZ12wxE4iwAiFIZmTQDFAWL7nrNcxIsB1X3pFMjMx QPds/KX99yHAxwzkKHMYMUA5wJcdjnohwEsTuZ2F3jBARgRIj24FIcDWvkTk g6gwQDKQgSmbkiDA8b6m36VzMEAiEi1JDBYgwDMYsY5kOjBAugnbxZpDH8CC WaiaDAUwQDnbPwSmRx7AhwiSTq+WL0B1PLeTSVAdwOo1tKeXJS9AR39YF41p HMB9XyVaTbwuQCKu3aVZbxvAFA+X0FtKLkCTvowoxoUawJum1tU14C1AwV5O /MqgGcB3gHCEXngtQPjq89pYqBjA9fOaCvUHLUDFWMOthsAXwOZ33oZRnyxA nLJ2iz3FFsC+JmpCLi4sQC+cPLqMzhXAauszhmq/K0BYZyzde+gUwKdE2Lhm WCtAix4AC/TuE8BEqbFp/+gqQFS3/SwMBhPACyuyvFaBKkAmPN9ZrQkSwKRY eh9jESpAtVDT1+YREcBMoJiN3qMpQNpG8UnAKhDABEuzqhI+KUARUuaNRWAO wKpwF48i0ChAmtk9cEqMDMBhVNb66mkoQJyAuvR/wQrA+ZpVHiIGKECx//6O x88IwH30exhjmidA8kGXEU//BsCIf9DWVzYnQEZc96noBwXArVXvNIDKJkAT lnzkshkDwDY9VxhDYSZADJNVB71MAcBACvD/tf8lQDHQ7H+ysf6/h/2F5KGW JUCiANbBagz7v94B+6RCNSVABXAJSIR5978gkQWUh9YkQI6PzPnBmPO/0DrM m5xwJEDeam74/vTvv6YhWYtoEiRA7BZjVMIc6L+95/mpVq0jQKrPplGFyeC/ X7nSkwlQI0CYDP6uFTbTvzus7jiq9SJAmtNpR4sNrb8Cqa0P/JQiQKH8CjVn 0cU/ttHmiSM8IkB9drnvh6raP4JjJwqH3SFAcTnimWsR5T9ZkFsUgoIhQPOq mJqTSOw/E1uPBHQvIUAV3heiuQ3yPxS22sCk1yBAWOA7pqm09T+HGWDZA4gg QKmjFWY4Sfk/eTbtO2k8IEDUtl/6oiv9P1QW7Gzu2h9A0yEB38ZlAECeaRmm FE4fQErO9YnebQBAFuXwFa9LH0DCeuo09nUAQESe9hFKSR9AsNPTiiWGAEBo 36mvgUQfQIyFpjaEpgBAkqKDifc6H0BG6UuOQecAQNhbI/b9Jx9AurCWPbxo AUBsiQ20dwIfQDFdi+jTcAFAqnGhNiQAH0CoCYCT63gBQMmdlk7R/R5Al2Jp 6RqJAUBCetU/LfkeQHQUPJV5qQFA+hQDMOzvHkAueOHsNuoBQA5RkIqG3R5A pSTWl07yAUBsTEGHPNseQBzRykJm+gFAlKooHvPYHkALKrSYlQoCQGNf1Rti 1B5A6NuGRPQqAkBfRUtfR8seQF+Ie+8LMwJAEtVSNgLJHkDWNHCaIzsCQDyM Cqq9xh5AxI1Z8FJLAkAlXMpoNsIeQDs6TptqUwJAB9FytPO/HkCy5kJGglsC QLglDJ6xvR5AKpM38ZljAkD97uYlcLseQKE/LJyxawJAwOpTTC+5HkBSUiup "]]}, {Hue[0.9060679774997897, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwV1nk0Vd0bB/B7SWaSiNK5XEKXbhHK9O6HelFKSHVJSaIMmSohb0qDSqV4 RVSGoojS/clQ4VBIc6ZKReqSSrjGO/vt94+zzvqsvfZaZ5317O936+2K8AyU olAo7/Hz37tGtf1/90Pp5Ir32gGWQiYwH+R8/xZMJ3/+odVd4jOhwGe3+ry9 dPLsaKvO8DQTzhVORsfsppOaTKX+ogkm7LTVMrfdTicLGn3ytYaZILdne/lT NzrZfLmkVfSVCay6H6Xvzegk3yPiS0szE6bDRIXiaT0y1HHAIjiNCdZk5qIL 8Xrk+tJr2mp6THCa5ZIaLqNHysyrYSVWLQXzi8eW5KTpkvb5N4UO7kuBPnfp WiVNXbKtbtwh7aspPJT/1JS9mkaqbzhpcCPWFKw/oVlFzgR52S/elCVnCgft qtLXui8i9SvteDHZJuCcyJp/PliHjLT7usndwgTod78UekcsJMuW/6BymxiQ XnfOuPnkAnK0Pa/I1Y8BDTvcRM/ztMnrAZ8/qAiXAO/XeDfrthZJaaN8aryw BJpYT8pOkfNJXpRJpgljCVxlx6TYN2mS6fP9U0tqjWHZVbuH515rkG3r469X bzIG1h7TL4cH55EKE15NMVwjSCEoihPD6uTcdU2XTicbgVeV2FRptjqZ84pJ blhsBIZ2vd5l8nPJ/b63PK8/MoQH7u3vB9TUSCnbJYIyL0PoduKuJRlzyK6H 7J7IycWg5jlw/u+dKmRMrdwpInUxZH+0j1x3Tol0qqTzzixfDFePPpxIbFAg +bXsjNYOA7g/I7nQ8kaOrLnUeSIi2gDGHDLVNs7MJuP2zI7rmW8ATr7TxYOy MmSPWlMZo0of1C8ncNja0uRU+23tbm99UErfLFu7nkpac7YEh8zSB7O3Q4ns +5L6fp3VHexiOhRQuhpClIT1+/db18hupYNMpLzLibjp+oaAiiFNOTpcSH3J b8gar5/1wvMf5Qd60BMSzpNMjNSf8S6/tylED4Y0A7wadQbrL0Zoa5Tr6EHJ myKPk61f6x9tu2tb914XspQkdzWs2us/n63K4WTqQnZ7sHOKcll9gFh1M2ur LuSLFCz3vGtCah6LwtV0deGfmJqR5JJupKiQaH68gwZR1t+uhKr1I41NrwXF sTRYpd5v7cLsR/qK+csjDtFAMvTjo4FrP5p376qtZQwNzub90e450Y++zw1o e7KfBgWy/CvuvH7E0fpH6Xc4Ddo6VbMtewfQj5cXxP6BNDCPts+eKR1EMv3b GBOeNOC5gs3n1kH09npfSYcHDeoWr+6uHhhEz8RrFCvdabDuo8uCaN2fyOov cdhhNxrsAq9sTvpPlCHIq52zjgZpKqHZrfG/UEcyszfQgQbjJVnZ6S5DiB3L SXy8HH+/LNLu3TOEJvKSP91YRoOEgP5MRvIQKq6f73qOSYPZOuYZDU1DiHqv as9OUxosOP8idcTxD6JmSd/QMKYBREhOuNoPI+11pkkVNBq0aLOrqNqj6K8D JKdZlQa/nGUO3TIeRfstbNPfqdBAKYZltWHVKKoY8wv4okwD9zZJRdbWUbSj 3jeEp0iD7rOu7GWXR1GRoibNTo4Gw0JO6XZ1Lurc9jtJQKGBRs/8ghrlMTRc /dRkyzgBRLjxrs06Y2g+5XRZ+hgBxpJVdC5jDFmap6xs4xJgQ/gUGLuMoaio skDPUQJ27LhakJk0ht5V9K3w+0NAUY/ujYPTY+iiV8v3kh8EWPUuuWnWN45u Lm36pfSFABRhs/vVyDiSDjm+MOwzAS4z6wyCJeNI2G3l9/ITAT60sJt5CyfQ 28WvdC92E3DE7+5N1S0TaJFHb4bBBwJaes0L/zyfQH5/oi8eayeA9dW2qLhi ElVec5JVeUFAoLNtn7BxEi2cs6Ms7TkB0XdtdNzeTaJlV84HamGfT7BOG/sz iR7X7lQ2aiWgUWvlEVujKcS+QV3t0UKAqYf5lldXplCjLyX54xMCrKvNLtFu T6F96qFREdhONLOXUZVTyMYjJXo2tv+fZY6a7VPogIHKw5WNBFw+s5TppzSN nGUpQbdIAiiNxrO5R6ZRSdaCyEe1BCgvMXZYfX4aeR859GMX9oKLRgkZOdNo W7soThHbcofhmHX1NCq1zOT6PSYgRKDfk8SdRtlLr5lrPiLgkL++dufMNPpg 8u5s80MCTjyjexmp8BAnbjMlFjv3st7zFwweMnHyW9NTQ0CHOa1y3m4eMrTt WVldTUDfFYIbFM1Dg/dFx6KwhymEac1RHopsOPXbBFv+jU7B9ms81LXvx6Kb VQT8FbrgQlEXD238V122oJKA9W3arTwOD63vfrZpN7a3tfYs13EeMm2cbjDC PiCrFT+iykd39zZJsx8QUHxDI2jVWj6KZRkbdFQQMPUiaE4ji4/CKsu1crAd J6oeuu7lo3dlrN0B2J/X+Kj6JfPR369cpHj/w/O3707N4GU+6v+0fPNT7IMZ ooDoIj7Sco+lpGGrDFyvPtnERwN3/P3NsLepjO5S7eSjjZy8+dLYt60clK9w +GiEHm/UxSbAIfm7f6m0AIVUmG0+in3A2Fix3UGA/GL0uZz7BJDucQ98PQSI mnAjoQFbOe6538BOAYJW+u5c7KLWsAp+ogCt8nV18cMe59buOJ4qQNfaz/zt gA0LVOWVc/H+SW6uAfbHkPvbdesEqLM6cN9IOQGG6VJyJa/+s3RfF3b0o03s FV8ESKIzyq7Hrv9+07d2SIDGl+7/XoytpDQ121kkQBHvO6IzsFkWzvffKgpR 8y1f/yTsQt+sbT4LhWjfG497kdhjJ37KcBhCdExX6LsT+68ym/J9NkLkrJIb 4oGd0pniM71WiB6VHv+wGvuD+POsY95CNKd8uGgltoEh855CsBDZhi3uMsWO ckv0/jdWiOI6woL0seti3koTp4WoLV6etRBbIVfv7q1MISpJRXfmYW9tiWaZ 3RIi1Oe5UxX75sgTqUeVQrTq06lDitij8zXK1jQLEeMUwZXDtoegra87hYie 7PtKFvvs3ioqq1+IltGOK/233nVRrrRvQogGGB135bH1a7y3hM4SoQm9SxVK 2JF9JZRJdRHK1xQuUsN+LC8qOaIvQn4PPH9rYsubb9gst0KENqz5oENgb/G5 PnPJUYReFbxgG2IXJI0UL/QUoVlrw8qWY4+UgFehvwjtc+Yr2WHbtV+SMKNE aJfT/Xcu2KeF325XHxWh4pNtwi3YnfoWmxwvipDkU3ZKEHb4ga5bm++J0E8t zS9nsB9dNfLsrROhpzmOudew5ZpiRXtfi9DWffLP2Nj5Ggs9Ev6IkOdVL7c+ 7GH7MKGMWIR6bTeWCrBtgmoLU5XE6EzZ2ygNPE8dlX6CAhMxWtW70WIjtqxD eCHdRowqTgnUw7BtXiS4F7iIUW5KzNKz2Pm9V4ryA8Uo9foVlef/7Q++7aF3 QIxkPHO6fmPLTVSK8pLEyKpM/6MKPg/hch2eebli9E0Sd4GFnZ/2TUy7K0bx 3FyHROwOHe7t3MditPe4aNktbFszlZnrH8UorVWmXoAt5+Ny55q6BK2sFpaU 4/Nny9myZRFdgmZ/PGzXhx0eHki9tlyCfNckKajj896ZlLT16gYJmnB64huP XXDnsXROsgRxU0J7tuL8sBcv980SStDxpo+H3HAeRSYjWS2FGdTn9vt7GvZN NTd2ptYM6g7qvfABW8EwVC7TcgYtbuHn78F59sGtsCIjAjuilPwX52F0nrZy +vcZRDxIEDFwvhYyjKvnjs2giJxlQcexw3xyzNZSKGDp/HTOF+w8TvHnZyoU 4OTKLPkX5/NsfrP5MxMK3Gmf3KtWT0C7HrW3OZACSSUP7F1w/q97PXmmZx8F GPzpgw3YjfG/LKYOUiDkxiKww31R3t5+dvEpCgyVpZ61ekrAuZNFVieKKJBd 6SW0b8b98tP1gsMPCmxMPLc7C/dVbQZYe49QILOF9YyB+83C0ZITOU0Bl5X/ q6/D1s8hbPJkqWDjuyf490vcNxu4/RIjKsQPCUq2viHgYfll+8d7qeB/cMnU 4Q4CzLanDLZHUuGD86Eco06cj/JH03/HUqHthG9nB3bmruCfC85QYVhRW9bi Pc7HeXYZccVU4JzbGyCD+5gZ2zdk9YsKidvuyUz04v9n0JXpNkYFqYt2vOqv BOi8e+4YJKDCWNnTxMQ+AhQZFVkZClLwz5mWDWrfCRj8dGrNBEMKBocT+50H CPA7fXhEcYUUJNi9S9TG94Uui8hsfVspSJk1594Q9tPz3qOerlJgyHZ8mfkT z5ONW07IJimQ/9vkYcQvAtgDjk5J26Sgv/SX3drfBDDSV3KvBEiB7eU4L4Mh PL/I9Or9UCkYkXpLoeL7yf8BHLFFQQ== "]]}}, AspectRatio->1, Axes->True, AxesOrigin-> NCache[{-Log[10000], 6.907755278982137}, {-9.210340371976184, 6.907755278982137}], BaseStyle->{FontSize -> 15}, CoordinatesToolOptions:>{"DisplayFunction" -> ({ Exp[ Part[#, 1]], Exp[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ Exp[ Part[#, 1]], Exp[ Part[#, 2]]}& )}, Frame->True, FrameLabel->{ FormBox[ "\"\\!\\(\\*SubscriptBox[\\(N\\), \\(D\\)]\\) \ (\\!\\(\\*SuperscriptBox[\\(10\\), \\(17\\)]\\)/\\!\\(\\*SuperscriptBox[\\(cm\ \\), \\(3\\)]\\))\"", TraditionalForm], FormBox[ "\"Mobility (\\!\\(\\*SuperscriptBox[\\(cm\\), \\(2\\)]\\)/Vs)\"", TraditionalForm]}, FrameTicks->{{{{6.907755278982137, FormBox["1000", TraditionalForm]}, {9.210340371976184, FormBox[ TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {11.512925464970229`, FormBox[ TemplateBox[{"10", "5"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {13.815510557964274`, FormBox[ TemplateBox[{"10", "6"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {16.11809565095832, FormBox[ TemplateBox[{"10", "7"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {18.420680743952367`, FormBox[ TemplateBox[{"10", "8"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {7.600902459542082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.006367567650246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.294049640102028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.517193191416238, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.699514748210191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.85366542803745, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.987196820661973, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.104979856318357, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.903487552536127, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.308952660644293`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.596634733096073`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.819778284410283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.002099841204238`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.156250521031495`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.289781913656018`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.407564949312402`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.206072645530174`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.611537753638338`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.89921982609012, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.122363377404328`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.304684934198283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.458835614025542`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.592367006650065`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.710150042306449`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {14.508657738524219`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {14.914122846632385`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.201804919084164`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.424948470398375`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.60727002719233, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.761420707019587`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.89495209964411, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {16.012735135300492`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {16.811242831518264`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {17.216707939626428`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {17.50439001207821, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {17.72753356339242, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {17.909855120186375`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {18.064005800013632`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {18.197537192638155`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {18.31532022829454, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{6.907755278982137, FormBox["\"\"", TraditionalForm]}, {9.210340371976184, FormBox["\"\"", TraditionalForm]}, {11.512925464970229`, FormBox["\"\"", TraditionalForm]}, {13.815510557964274`, FormBox["\"\"", TraditionalForm]}, {16.11809565095832, FormBox["\"\"", TraditionalForm]}, {18.420680743952367`, FormBox["\"\"", TraditionalForm]}, {7.600902459542082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.006367567650246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.294049640102028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.517193191416238, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.699514748210191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.85366542803745, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.987196820661973, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.104979856318357, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.903487552536127, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.308952660644293`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.596634733096073`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.819778284410283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.002099841204238`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.156250521031495`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.289781913656018`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.407564949312402`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.206072645530174`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.611537753638338`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.89921982609012, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.122363377404328`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.304684934198283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.458835614025542`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.592367006650065`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.710150042306449`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {14.508657738524219`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {14.914122846632385`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.201804919084164`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.424948470398375`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.60727002719233, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.761420707019587`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.89495209964411, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {16.012735135300492`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {16.811242831518264`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {17.216707939626428`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {17.50439001207821, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {17.72753356339242, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {17.909855120186375`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {18.064005800013632`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {18.197537192638155`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {18.31532022829454, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}, {{{-9.210340371976182, FormBox[ TemplateBox[{"10", RowBox[{"-", "4"}]}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {-6.907755278982137, FormBox["0.001`", TraditionalForm]}, {-4.605170185988091, FormBox["0.01`", TraditionalForm]}, {-2.3025850929940455`, FormBox["0.1`", TraditionalForm]}, {0., FormBox["1", TraditionalForm]}, {2.302585092994046, FormBox["10", TraditionalForm]}, {-8.517193191416238, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-8.111728083308073, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.824046010856292, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.600902459542082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.418580902748127, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.264430222920869, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.1308988302963465`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.013115794639964, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.809142990314028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.521460917862246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.115995809754082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.961845129926823, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.8283137373023015`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.710530701645918, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.506557897319982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.2188758248682006`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.8134107167600364`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.659260036932778, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.5257286443082556`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.407945608651872, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.203972804325936, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.5108256237659905, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.35667494393873245`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.2231435513142097, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.10536051565782616`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{-9.210340371976182, FormBox["\"\"", TraditionalForm]}, {-6.907755278982137, FormBox["\"\"", TraditionalForm]}, {-4.605170185988091, FormBox["\"\"", TraditionalForm]}, {-2.3025850929940455`, FormBox["\"\"", TraditionalForm]}, {0., FormBox["\"\"", TraditionalForm]}, {2.302585092994046, FormBox["\"\"", TraditionalForm]}, {-8.517193191416238, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-8.111728083308073, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.824046010856292, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.600902459542082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.418580902748127, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.264430222920869, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.1308988302963465`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.013115794639964, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.809142990314028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.521460917862246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.115995809754082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.961845129926823, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.8283137373023015`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.710530701645918, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.506557897319982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.2188758248682006`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.8134107167600364`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.659260036932778, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.5257286443082556`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.407945608651872, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.203972804325936, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.5108256237659905, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.35667494393873245`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.2231435513142097, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.10536051565782616`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}}, GridLines->{None, None}, Method->{}, PlotRange->NCache[{{-Log[10000], Log[10]}, {6.907755278982137, 18.420680743952367`}}, {{-9.210340371976184, 2.302585092994046}, { 6.907755278982137, 18.420680743952367`}}], PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], {None, None}}, Ticks->{{{-9.210340371976182, FormBox[ TemplateBox[{"10", RowBox[{"-", "4"}]}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {-6.907755278982137, FormBox["0.001`", TraditionalForm]}, {-4.605170185988091, FormBox["0.01`", TraditionalForm]}, {-2.3025850929940455`, FormBox["0.1`", TraditionalForm]}, {0., FormBox["1", TraditionalForm]}, {2.302585092994046, FormBox["10", TraditionalForm]}, {-8.517193191416238, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-8.111728083308073, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.824046010856292, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.600902459542082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.418580902748127, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.264430222920869, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.1308988302963465`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.013115794639964, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.809142990314028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.521460917862246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.115995809754082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.961845129926823, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.8283137373023015`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.710530701645918, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.506557897319982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.2188758248682006`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.8134107167600364`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.659260036932778, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.5257286443082556`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.407945608651872, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.203972804325936, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.5108256237659905, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.35667494393873245`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.2231435513142097, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.10536051565782616`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{6.907755278982137, FormBox["1000", TraditionalForm]}, {9.210340371976184, FormBox[ TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {11.512925464970229`, FormBox[ TemplateBox[{"10", "5"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {13.815510557964274`, FormBox[ TemplateBox[{"10", "6"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {16.11809565095832, FormBox[ TemplateBox[{"10", "7"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {18.420680743952367`, FormBox[ TemplateBox[{"10", "8"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {7.600902459542082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.006367567650246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.294049640102028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.517193191416238, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.699514748210191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.85366542803745, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.987196820661973, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.104979856318357, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.903487552536127, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.308952660644293`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.596634733096073`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.819778284410283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.002099841204238`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.156250521031495`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.289781913656018`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.407564949312402`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.206072645530174`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.611537753638338`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.89921982609012, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.122363377404328`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.304684934198283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.458835614025542`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.592367006650065`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.710150042306449`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {14.508657738524219`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {14.914122846632385`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.201804919084164`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.424948470398375`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.60727002719233, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.761420707019587`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.89495209964411, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {16.012735135300492`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {16.811242831518264`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {17.216707939626428`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {17.50439001207821, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {17.72753356339242, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {17.909855120186375`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {18.064005800013632`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {18.197537192638155`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {18.31532022829454, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}]], "Output", CellChangeTimes->{ 3.561568827489737*^9, 3.5615689353723097`*^9, {3.561569025519142*^9, 3.5615690831766357`*^9}, 3.561569185423417*^9, 3.561902319689431*^9, 3.561902351874312*^9, 3.5619023862523746`*^9, {3.561902420152441*^9, 3.5619024362677193`*^9}, 3.5739908753250237`*^9, 3.575029175630484*^9, 3.5752023060035343`*^9}], Cell[BoxData[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwV03k01fkbB/Dv95YtIVnCqHy/yLUkFy22Po+UpeIXRSimEcqaNqm00MRM UqKyF3JNKSbGEo253yu0LyKVNZQUdbvXckmu36c/nvOc1znvf97nPA8VsMcj iEUQxGU8P3eNUss/ZWE0U0VS0o9oDphWZvf3hdBMmc+EiZjiQIFvoIrqbpp5 FhHtqYd9lju2LzqQZlTbd908vpgDO2w0zG38aKbXwiDMQpsDsrv8bje4YRdv ts5V44D3fx9vvebQDEjWau6T5YA4/Ad3WkwxhdqPB3W+moEVk77w3BGKEa4y FLIrzcBxtvP5SCmKWTdYOqR20gzMU+IMs1N1GI+3N52MN5oBPX+py1x1HSYm 2ktrWsUMauU6GrMcFjOCQGnNAN4ysOpAs4ucFjG92dJ1Xm7L4KBtdZrLpoVM k93jlNIeU3A64b0gOUSbOXxyTVZDjCnQpV1cnz2/MI/O5MxKkDOFtP/OsptO azFvPnJTZxcsBb6/249HeZrM4CVN0/e2S2Hi80i793UNht9+tyv1uQk0et8r SWAWMErXdVQnQ0wgpzw6ya5RnQls3uDu9sMYluXY1p59psZ8GtpdpnfBGLx3 mXQdHVRlQleeYpcsNYakRYT86FcVpiptq713vRFsqZ42mSutwgQM3leo9jeC JbY9PiVy8xnVV+h18IghVG5qeT2grMxcMSvzrjtjCO2OQhfGaB5zuO24oMHQ EJQ9BpLX7VBkPDIEHmF8NmS9tYtaf3Yuk29hvv/hDjbknKwdPcGfwzgtKLjY wWJD2Yzk3P3nskxamoqfINcARPbpyv+bkWb0a/Se8sAAHLeLbwzKSDExoW4P BJ1LQOVy7PtyzVmMNGumwj52CcxN85Sp20gyKyL69/vpLgHOi+ET5WUS3lWi oj+uQR8KiDZ+6NwpXrrxmSvJEfogFSXn/PthMc/2C3/5uKY+nDv/ZJKfMcJT kN/ywpWvB92hkROSUQHvXGPjdHWUHgyr79xSrz3IK6Ydbo39ogfFz4vcTz98 x9Plt1slPdeFjLmSUrUVLTxdwaj68URdyGoJcUpSKOENKwZ4frPVhfwfc5bv am5EOakqlgZTNByLrhEkFrcj4bHJksQ7NOy16ssMU/6AFo1uTdwbS8NIcUZW mvMwilYySatzoUGte0FBjYIIybzitrpq0rAokh3gqS1CHe4DL4s0aGBLVtFC IxGaVLKzIbCtF/kWsJ1FiDfesb5CnQZ//5yC9HgRMkr5K5RSpaGoW+faQbEI 2TQ/famkRMOKHsNCTu8Ikh/ZfXi1FA3e72yKblSMoR1/rXw5LKIgyMmmd6p+ DA0Qd8IDsfeVWmu7NY+hoMaWQ51CCpJjrVJFX8ZQwu6Ed0+/UVCvsfK4jcE4 2u4aTVR9pcDE3dzraeY44jodvJr9mQKini0tPC5G23sK4+r6KFAwZNs7JIuR 1JfgOAdsrRSD2EvZYuTZIC9+2EvBcv8lIqs7YtT0e9HaN+8oCP2u2x0vFCPF pn8jvndT0Gq+uEo1cAKdfOKk7dlBwY1rasGrXCZRv6+cclArBeOPg+fVe0+i 9e3ZisIWCtaMVtdu2D2JXCp0c49hd671Vfo1cRL1hAxGZLykQHHgyp3TjZPI Ll/9fesLCg6w2fIt9t+R/NNI95CnFKwusb4dYT2FSopW5pP3KUh6leQrdplC QqZfN6+JgjfTnbPjfKbQq7WaqxH2XrcTPhdjplDIE4HViUYKCgX3WHerptBQ iGiLdAMFcuaunrIWP9AV1tZ1HD7uU/Xr9wLjaeQoFXpg6i4FMvaRXNp6GsXw 006WY1s/jt1U4DyNvnEt1UOx83syi/KDphF8i+1ur6UgUrbVI+/qNOrTTvpY X0OBrK/zzVwVCZpg4iS3qimwee/ltZCWoIWn31aEY0dGBpG5ZhIUV6EnNsF+ FR+/NcdVgjIGODp/V1FQcPPfWdmJEuSwJUy2tpICu2mz7RlTEiR/b8Xmz/9Q EJWIZDTmzCCvNWPt5diFym7l6RozqGb7POFR7DlLwmTTl8+gby9GHihhv3Hj VlzaM4Pq+84Zry7H95SnqZDWP4OcMho6K29TwDVi35kvmkFaRNe2ROxw32yO C0FA6C5umA923vsbnQ8UCQh6/tpu5m8KpCebzB8YE2D17M5td+wWiuxpCiLA f12TQLmUgvXPxv7sjiBg+sBn68ESfJ9HPluOHyTA4bSBHQ/7dkvLGf0EAgry S3btwT57umjF70UElL0w9H1zi4JZ5tm92aUEfLXw2lmBfaT7/Nl/qgi4xtfU v4AdsvJwX18TAWar6JaN2I6fNpyz/0jARK5795ObFNRdAisfAQGnMt3LSrEt 1yx/HyUmQOrZttUXsHWzF1nnyZAwKlyb6I2d5aTyoVqJhMm9xx3ssOePyqQ8 X0DCnxsO1dLYhKvwg8SAhCMavm8FxRQcmvyQom5GwmyN3LjX2F+57Tamq0ho /sP9Aw+7S3Lvgp8zCRsq/+tJxa69fdnu390kxIgjufbYHL+kwZYoEqQzZ5ku w74udzJtKIaER/sD9y/ETg8I+aT1Jwk7gi2X/7iB/0PJ/6L5BRKO3hOXDWMn 3PVA6zNJeNi/bLgL+4Cq7aXDN0iY+rswsx57iDGDC2U4P26hUIUdEKE/dL2G hFbLrtXF2O2aWpcZPgnXzB6aXsV2b1K0f/OQhMoYna6L2A/2zRoWNJPAC5Rf n4QNiycuy7SToKxWfjAeu/rxsP3iPtxvn+2OI9imMb3DKz6ToLL0pdx+bK5e W7qbiIQndVn7wrG1mx+tCf5OgnNgXVYw9sVjvC/HWCw4ZfBb/G/Y8kYVGZfm sMD91S1DP+z4tusOJfNZsJh1P8UH+3t87tcGLRZclW2r9sLeuyw1s5NmQaIc cXUL9mBHwtpRIxagoVDHzdi//nFUIG/Bgjwf21IP7DbLqCxdGxb81ZjZ9tOu vYHrbBxYYBx0nfcz35Ds881jAwsyzJNDPLFtrN2yQzezoHA4vHUrdvnAGsf4 bSyQUQ8ntmEbpa0UZu5kgcVY6Rd/7HxkklMWxgLFiz45O7H/D0cGRvI= "]]}, {Hue[0.9060679774997897, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwd13c8lf3/B/BjZ5UVohKXI/umSOb1KUIIGSX3jVK33fgquyUju1DZKiIV yogIn4sy70qcOPZexx7J5vc5v7/O4/nHdV2f9f68X0fc8brFv4wkEomJgUSi /5btoRQVuEsQy+YWCsVVikDxY8rwkKsEEfVoLk60UhFk2F7hF3CRIG6uGW4/ +KwIorKWPb2vSBAdkqpjZz8pgouawkc07SSI0jqBjbkCRbDL2e7DV1MJgtrN oKGQpQhsqsZzqcoShEaK/N7cSEWw4rGZtbUiTpzqoIZ+tlEE6kTCgRh/ccLs 80RU6qQC0Gc2fHSNRZxo3JwKPRasAI48DpRJiTtECCzoNeocUgASfAqnuQQP ES3v/7U1LZYH5ezdtcm6YoTdjsE+PnN5oN6NM2cbHCSOyic+ZB2RA15apfGn zQ8Qf71wjX/iLwcM7tkIRbvuJzztuhgpwnJAIr8368J1UcJKKqUm9L0siK+K kq4LESG8b/S+mDsjC6rtTTebXuwjxn67R23MyoDVyaUumxxh4l5TxEhrmAyo tfmSF0oIETIukeCSrAxILfSO1K4VJII85w9x1UqDv1K1yqN+7CXE5Ma0Sx2l gY2zfG/AhADR/WzoovguaRB5kMT5e5afIPmMsRx/fRhYlW7Jc7HyE9XcVGVJ 08NASqv/Qh47H5Ee/z5Wf04KfDSnUMd4eYk7N2DLVrwU6NJfOE3I8hDcIomB 74AU4LUYiz51cTcR8sl39dEEGSR3at8wiuIi5F4Xtb9MJIPU++W/71VzENOk GtsSEzIo2NmOqW/eRZzxaHdw2ZIEiycSeM12WIkt8/XZtBJJoP/PypsJNhYi /oxILPWqJOB/dnukcB8TETZPeI7JSgKueGu2ShMGooyzOHp7HgPKP6fvFRZs Q87jJfxfSjGQQWqvduPagCKzXSZKYRi4+GP2sNj2OjRrbBwIfIiBA6lsMZS5 ddj6sbWNEoqBRDV1Wy3KOhTjoQz7hmAg5lrqInfyOlQpX4ivf4CBgB5HrODw OhSSHXT2uYMBq09zwSsn16Dj4NKa+E0MsNxgNwz2W4Ea54zK3jlgIPj2Tx0G txV4R1lOgQOZMTxB9a7tCjSP9RRztcfA9ksy5qu5Ammt7Pel7TDwh3Ji233r D2zSUFTLs8XAhJp/sWXgH3hoeuvdD2sMNO1MHsLCl6ES0x6pmyYYMOQqFHrh twxdBbV/DBpjoE7Yb/cBt2WYZBm4YY5co8y2KWi8DBVWJcaUjDDw+TJG5eBe hsXUNwwrBhjIrf87evHxbyjHDO+n6qL5Pvq2Vp24BIOMSwVNNTEgpdE+Zxix BAVnHe3aNTBQOdI/2hywBO9frTjggDytvtTSa78EXX5JcXmqY8BoZN/bNckl OGac9CpNDQOs6s62ygWLsOMWjcapgoG7QwyfXzQuwGirP79PKWBAMJqz4PDn BTj2Vbe2Vx4DeWp7X+fnLkCuC1kC3sg9UdLxFY8WoKaquXKOHAY01MzcO6wX oLroohOfLFqvyFRRnqF52N1TOrEthYE+t2ur27/noEUR53V1cTQf7T6W9LY5 eEWdc2/XIQzo8Jjya5fMweDW1HMByM8/KigG+MzBzn+M8qAYOh+kmcsra7Pw PmNivtlBDAw9dW+e256Bp6ncf0WLYiDOpbsnpn8G/uc+lq2GfFLTeFKBmIEM z5Iqh0QwkDkgy+IROAMrjjs0aCBfkZvUmGCagc9EeC4sCmNglHDJHtg1DSUa WJ7cE8TAs/iOonu0KfiiJJ9XBVnfybD6YNMUvEI4KdP2YiCbU7rnn8gp+E3h x3lrZKdz47yd3FMww3rjlKoAOh9T/95p4ZuEH2KDKPx86PxWtUXcWKJBPDgh vJUXnY/YU4l7ftGgmDZ1JBb5zTFy0ZmnNEgLS4vkQ3YLHJloFKLBdLbE56I8 aD8FL1vV7J+ATn98Oc/sxkAz2eai1844jK6TatiHXKhyxkN6aBz6dt0SGufG gK+FWnDM63HIORtxLQiZOYaz2PbIODx6qpHxCxcG9rMU8y8ZjMFG3scjdpwY 2OF/I5YtOwbPcJN6jyIPSaTLXeAeg/HnXN04kHNAmC5sHYXtt8v1yjgwoHL7 n5uRdqOwuNxy4wCy8RIzBbs5AmnE5CMmdgwoMq73tVuPwM600YmhXRjg4Z2b DD8+Av2zhDprkNsVOxnnt4bhSG7uvWBkR7e8IxVhw7Bc/QptN/Ipvwyd6+7D cHf30M4iGwakwxKMJEyHIbtfbj4VeTYr0DGMfxiq6ea0ZSD7D1rHWaUPwQda 8yYA2W7eKJ0tcAhuN3nJyCCDHfxt+eUhePSkxXM+ZNYDsjWHZIag6q348+Os GKDJif2gcA7BGy/Uk1uRv2kIdIXODsLhhDLvKuQ4m+2F6aJBOG3TsJWA7OW8 tPX82SDMDEnICUG28Z5gt/QbhH661TM3kQ8+aRUv0xmEl6oyDSyQ3zZnnw1p HICKmLC2IHKwUpXzf7kDsJTJg8SO7BDbdof38QCEh7kvbLJgQMCS+W3auQEo zP6uaQR5tkiUGFZHz9sODnciNwocbZc5MAC393bENSNv5n5h9qjvh6uBvoUV yAXXFpVWo/vheoktVozspCRuF2zVD/ddvCabiyy6aBbOI9oP/3Ntrn+F/LPo 7sfUwT7Yn5a0kYYc4pU3KJ3TB00yJ2oTWOj13cP98Vof5NqmSsUhz69yaJxQ 7YNLu4MORiNnlas7fd/ohaH8LHlhyLa3XeIu1PTCFrJfazAyj05C1WhYL8S1 1mMCkWt3aif/Z9YLPWUyh+4i+1f/Ftze2wv3p8Z8v438VxCmG9HTA1sPUs0C kEf0LK4LZvZAmlCCqz9yEmtgSoZrDzzdOCFCt2nD+3pFpR5oaD52mW6miL6l 8j/dMCjrjR79+U/G3IcMKrthUapJJf39V7m1TChB3TBkZOI7/fsSzW6+Dkbd 0Is10Zs+PurjpFdTPN0w2+lmKX38URYNP32oXbBU98lj+vxOCKxsMqV3wecl /Iz0+f9pI8s8vtIFQwo5uOjr8y7Bynq/XBdMZI7Lp6/fxQtBgTkLnZBmWUOj r+9e0cI8lU+d8KR4cSV9/Zt6BjqJu52QVH/v//fnXvoe1jOnOuGcr7YSff9U Luoc6eTshPv1WJrp+5s+nBKxkNgBxxP4Ouj7b5nVVHLHoQPm+Dw82YW8y3lt iF2qA6Yd/Fd/FNlz8pymRBEVHoWlIlvIh3NDnPP9qJD8y3aKfv56rhbHawAq fDlWYy2EbLDAO23xvR1KBmmtHkXeLATC/fHtcGHcX0kXufDWdT1323YYuUNl tETev/otNWi8DUbo6HvfQm4p22jYk98GH2w8EApFDg2QXU651QbFn6laJiLP bz88U8zQBjebzibT6yuLKPEDDb/g9ofRLHr92T4YzfoW8wuOc+qZ0OvzK4vu 9ojoL6g/U+hKr99Eru38vccokOFrPO06snnj6IGvK63whUjsfAQyW+j3KM+y Vrjn0dX8bGTvnVS3Zq1WKJUgZTaAbLWoKRWu2wInfPDD/6D7hus99lSNpQWK ve8dv438xZ2TeazuJ5zxFrmYjnxktGvwpNFPuLPY5DOMfPDDksbayx+wuMlX 3xvdd9EyX4TPkX9Akv3dulTkzYy4P4U532HNx9btL8idT5ULPd5/gwlKnxMF 0H35JOC6zEBFE2xlqrtZhcxpMCVUT62D9u4NVBV0P/sT5cvY33VQeHFn1Al5 Qj2Ccr+vFj53Ls1LQq6Tl3mkMfoV6iXSXBnQ/f6Az5k1f7EGjjOREzqRFz/X 0mREq2Du42utuXtQfedfyRoWr4QLgcz3J5HzXzJdSpOugCUnOCakUX9xfXii g+dYOTy/ljD+GnnAorJuxbwExmzxZOejfpRMcTWI5M6D6to6sv386Hu3N7J1 tN7ByUz2ZAz1O1dyNOui2xu4ZPcz1wX5uM+HWpuGLOj1l/vn38i5qrMPTVjT IJ9DxB0B1E9JJT6zW+tcuJXTxWRP1H+99lyq27U/D284PGXx5gDKB07NTtYz +bjj0HU5RtTvKX3pTGcdPuBHPa+8/ht5SpX7VZpSIf7HLi2cB+WD/SO0kWOU j/hzD72VQJQf7oJMJ1fhStxExdE7CMPAy00OVeeWWnzu7Nl5EsonjqnFVC+z Orx4zcPeB1lSy94/+HsdfunyZuQscnZAAXzZWI/fs7Ak96N8k7t+3qinuhHf l9Zl1ojy0afVVw5nC7/jzr37AqqVMeDsL1ab1tiKN5WM/wQofxka3RLM2kXB i/m+CjYjS4s0OucaUHBmzEXEHuW3yTJPjs+1FJzle6XtXS0MeKzVmnVU/8LL nkRW1uugevX16OIrb8e9TETW76D8d8e7bO7h2y68yJda6HMGA9cyGuVdJ7rw LxdYAkVM6fm509VIqht/XmDPVIWsJ7U+zJXRjf+CspJs5hjgaNfoiE3qwbWs NCgvLVC+Ua0gUsL68NNDtB+r51H/8u9vOH90EH8X4OkhfxkD/1MfSnLnHcXv v8iZzAhA+8k/qm6oOIovyu8avHwb5ePp8U5J41G8MqXag4zydsSLmX19waP4 ybdlum/vonzPtpZkvjqK/929NlUeiIHWtj3Jqv1juFLLLrZVlO+PeGon7+RO 4D6hJ10HnmBg6W1icrzhNH4/rN/t0gd0P/YJZZRxL+KvSy55uiyh8Q1oZr8p Xsbvzoezu2tIgjeZe52On17D876Z7BZ9KAl+lTisZ8ht4Q+S+2X1BiUBRZyh v+5fEtD04DPk1CQDox/L4X1XSSAjtkL3tRYZ1PhPqvzxIgFyVEyKrg4ZfKBQ IsihJLDMkWp/5wQZRIVkHwvOJoHmWAa5ZQMy0KcZx5wYJwHny94Zy1ZkUP7h mXaFCwOQi5vSPn6dDJTtIicoNxhAd9u4dv8NMshhvx8/5csA1PdQYkM9ySDB 0ZUmEs4A3nP4qLR7kcEtAa2nfm8YQLgHyd7vNhko+g5OH5tkAGuKHRzN4WSQ JdmeYLrIAJQlhOQDIslgf0vTSad1BpCXaZ12OJoMOGWLE59yMIL48s5rgY/J YKI7VO+3LCOo3cTrjyeQgUNYwBznUUZQbFxxaRz9v2tXuZGMaTICbyUTo2fJ ZPA1+sK8hTEj4BYpYl5OIwNNDdMUN0tGsJXG0/7qORkUjp3Uf/A3I9hXEvPb 6iUZyMarLSRdZgQVC/MOLJlk8BKXTy1wZwTBpA2hkldk8H9knaOn "]]}}, AspectRatio->1, Axes->True, AxesOrigin-> NCache[{-Log[10000], 6.907755278982137}, {-9.210340371976184, 6.907755278982137}], BaseStyle->{FontSize -> 15}, CoordinatesToolOptions:>{"DisplayFunction" -> ({ Exp[ Part[#, 1]], Exp[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ Exp[ Part[#, 1]], Exp[ Part[#, 2]]}& )}, Frame->True, FrameLabel->{ FormBox[ "\"\\!\\(\\*SubscriptBox[\\(N\\), \\(D\\)]\\) \ (\\!\\(\\*SuperscriptBox[\\(10\\), \\(17\\)]\\)/\\!\\(\\*SuperscriptBox[\\(cm\ \\), \\(3\\)]\\))\"", TraditionalForm], FormBox[ "\"Mobility (\\!\\(\\*SuperscriptBox[\\(cm\\), \\(2\\)]\\)/Vs)\"", TraditionalForm]}, FrameTicks->{{{{6.907755278982137, FormBox["1000", TraditionalForm]}, {9.210340371976184, FormBox[ TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {11.512925464970229`, FormBox[ TemplateBox[{"10", "5"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {13.815510557964274`, FormBox[ TemplateBox[{"10", "6"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {16.11809565095832, FormBox[ TemplateBox[{"10", "7"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {18.420680743952367`, FormBox[ TemplateBox[{"10", "8"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {7.600902459542082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.006367567650246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.294049640102028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.517193191416238, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.699514748210191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.85366542803745, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.987196820661973, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.104979856318357, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.903487552536127, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.308952660644293`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.596634733096073`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.819778284410283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.002099841204238`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.156250521031495`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.289781913656018`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.407564949312402`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.206072645530174`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.611537753638338`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.89921982609012, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.122363377404328`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.304684934198283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.458835614025542`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.592367006650065`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.710150042306449`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {14.508657738524219`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {14.914122846632385`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.201804919084164`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.424948470398375`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.60727002719233, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.761420707019587`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.89495209964411, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {16.012735135300492`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {16.811242831518264`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {17.216707939626428`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {17.50439001207821, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {17.72753356339242, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {17.909855120186375`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {18.064005800013632`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {18.197537192638155`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {18.31532022829454, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{6.907755278982137, FormBox["\"\"", TraditionalForm]}, {9.210340371976184, FormBox["\"\"", TraditionalForm]}, {11.512925464970229`, FormBox["\"\"", TraditionalForm]}, {13.815510557964274`, FormBox["\"\"", TraditionalForm]}, {16.11809565095832, FormBox["\"\"", TraditionalForm]}, {18.420680743952367`, FormBox["\"\"", TraditionalForm]}, {7.600902459542082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.006367567650246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.294049640102028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.517193191416238, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.699514748210191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.85366542803745, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.987196820661973, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.104979856318357, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.903487552536127, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.308952660644293`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.596634733096073`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.819778284410283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.002099841204238`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.156250521031495`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.289781913656018`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.407564949312402`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.206072645530174`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.611537753638338`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.89921982609012, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.122363377404328`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.304684934198283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.458835614025542`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.592367006650065`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.710150042306449`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {14.508657738524219`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {14.914122846632385`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.201804919084164`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.424948470398375`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.60727002719233, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.761420707019587`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.89495209964411, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {16.012735135300492`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {16.811242831518264`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {17.216707939626428`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {17.50439001207821, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {17.72753356339242, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {17.909855120186375`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {18.064005800013632`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {18.197537192638155`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {18.31532022829454, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}, {{{-9.210340371976182, FormBox[ TemplateBox[{"10", RowBox[{"-", "4"}]}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {-6.907755278982137, FormBox["0.001`", TraditionalForm]}, {-4.605170185988091, FormBox["0.01`", TraditionalForm]}, {-2.3025850929940455`, FormBox["0.1`", TraditionalForm]}, {0., FormBox["1", TraditionalForm]}, {2.302585092994046, FormBox["10", TraditionalForm]}, {-8.517193191416238, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-8.111728083308073, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.824046010856292, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.600902459542082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.418580902748127, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.264430222920869, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.1308988302963465`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.013115794639964, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.809142990314028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.521460917862246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.115995809754082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.961845129926823, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.8283137373023015`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.710530701645918, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.506557897319982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.2188758248682006`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.8134107167600364`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.659260036932778, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.5257286443082556`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.407945608651872, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.203972804325936, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.5108256237659905, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.35667494393873245`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.2231435513142097, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.10536051565782616`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{-9.210340371976182, FormBox["\"\"", TraditionalForm]}, {-6.907755278982137, FormBox["\"\"", TraditionalForm]}, {-4.605170185988091, FormBox["\"\"", TraditionalForm]}, {-2.3025850929940455`, FormBox["\"\"", TraditionalForm]}, {0., FormBox["\"\"", TraditionalForm]}, {2.302585092994046, FormBox["\"\"", TraditionalForm]}, {-8.517193191416238, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-8.111728083308073, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.824046010856292, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.600902459542082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.418580902748127, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.264430222920869, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.1308988302963465`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.013115794639964, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.809142990314028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.521460917862246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.115995809754082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.961845129926823, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.8283137373023015`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.710530701645918, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.506557897319982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.2188758248682006`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.8134107167600364`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.659260036932778, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.5257286443082556`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.407945608651872, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.203972804325936, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.5108256237659905, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.35667494393873245`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.2231435513142097, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.10536051565782616`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}}, GridLines->{None, None}, Method->{}, PlotRange->NCache[{{-Log[10000], Log[10]}, {6.907755278982137, 18.420680743952367`}}, {{-9.210340371976184, 2.302585092994046}, { 6.907755278982137, 18.420680743952367`}}], PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], {None, None}}, Ticks->{{{-9.210340371976182, FormBox[ TemplateBox[{"10", RowBox[{"-", "4"}]}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {-6.907755278982137, FormBox["0.001`", TraditionalForm]}, {-4.605170185988091, FormBox["0.01`", TraditionalForm]}, {-2.3025850929940455`, FormBox["0.1`", TraditionalForm]}, {0., FormBox["1", TraditionalForm]}, {2.302585092994046, FormBox["10", TraditionalForm]}, {-8.517193191416238, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-8.111728083308073, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.824046010856292, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.600902459542082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.418580902748127, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.264430222920869, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.1308988302963465`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.013115794639964, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.809142990314028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.521460917862246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-5.115995809754082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.961845129926823, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.8283137373023015`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.710530701645918, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.506557897319982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.2188758248682006`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.8134107167600364`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.659260036932778, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.5257286443082556`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.407945608651872, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.203972804325936, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.5108256237659905, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.35667494393873245`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.2231435513142097, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.10536051565782616`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{6.907755278982137, FormBox["1000", TraditionalForm]}, {9.210340371976184, FormBox[ TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {11.512925464970229`, FormBox[ TemplateBox[{"10", "5"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {13.815510557964274`, FormBox[ TemplateBox[{"10", "6"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {16.11809565095832, FormBox[ TemplateBox[{"10", "7"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {18.420680743952367`, FormBox[ TemplateBox[{"10", "8"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {7.600902459542082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.006367567650246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.294049640102028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.517193191416238, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.699514748210191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.85366542803745, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.987196820661973, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.104979856318357, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.903487552536127, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.308952660644293`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.596634733096073`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.819778284410283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.002099841204238`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.156250521031495`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.289781913656018`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.407564949312402`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.206072645530174`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.611537753638338`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.89921982609012, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.122363377404328`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.304684934198283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.458835614025542`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.592367006650065`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.710150042306449`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {14.508657738524219`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {14.914122846632385`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.201804919084164`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.424948470398375`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.60727002719233, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.761420707019587`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.89495209964411, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {16.012735135300492`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {16.811242831518264`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {17.216707939626428`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {17.50439001207821, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {17.72753356339242, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {17.909855120186375`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {18.064005800013632`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {18.197537192638155`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {18.31532022829454, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}]], "Output", CellChangeTimes->{ 3.561568827489737*^9, 3.5615689353723097`*^9, {3.561569025519142*^9, 3.5615690831766357`*^9}, 3.561569185423417*^9, 3.561902319689431*^9, 3.561902351874312*^9, 3.5619023862523746`*^9, {3.561902420152441*^9, 3.5619024362677193`*^9}, 3.5739908753250237`*^9, 3.575029175630484*^9, 3.575202306168314*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["\<\ 5.2.3) Acoustic Phonon Scattering: Deformation Potential\ \>", "Subsubtitle", CellChangeTimes->{{3.5614717074097347`*^9, 3.561471759166543*^9}, { 3.561569248923622*^9, 3.5615692528160553`*^9}, {3.561569327255177*^9, 3.5615693380870657`*^9}, {3.573990786656712*^9, 3.573990788792673*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"Phon", "[", RowBox[{"N_", ",", "x_", ",", "t_"}], "]"}], ":=", RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{"n", "=", "1"}], "N"], RowBox[{"n", "*", RowBox[{"Re", "[", RowBox[{"Exp", "[", RowBox[{"\[ImaginaryI]", "*", RowBox[{"(", RowBox[{"x", "-", RowBox[{"n", "*", "t"}]}], ")"}]}], "]"}], "]"}]}]}]}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"Phon", "[", RowBox[{"N", ",", "x", ",", "t"}], "]"}], ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"-", "5"}], ",", "5"}], "}"}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"-", "20"}], ",", "20"}], "}"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"t", ",", "0", ",", "100"}], "}"}], ",", RowBox[{"{", RowBox[{"N", ",", "1", ",", "5"}], "}"}]}], "]"}]}], "Input", CellChangeTimes->{{3.575037146174966*^9, 3.575037257141589*^9}, { 3.575037299560092*^9, 3.5750374090070543`*^9}, {3.5750374736590157`*^9, 3.5750376162301207`*^9}, 3.575037787106379*^9}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{N$$ = 1., $CellContext`t$$ = 0., Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`t$$], 0, 100}, { Hold[N$$], 1, 5}}, Typeset`size$$ = {360., {113., 118.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`t$25372$$ = 0, N$25373$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {N$$ = 1, $CellContext`t$$ = 0}, "ControllerVariables" :> { Hold[$CellContext`t$$, $CellContext`t$25372$$, 0], Hold[N$$, N$25373$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot[ $CellContext`Phon[ N$$, $CellContext`x, $CellContext`t$$], {$CellContext`x, -5, 5}, PlotStyle -> Thick, Frame -> True, PlotRange -> {-20, 20}], "Specifications" :> {{$CellContext`t$$, 0, 100}, {N$$, 1, 5}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{403., {169., 175.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{{3.5750372301649446`*^9, 3.575037257600553*^9}, 3.575037330344759*^9, {3.575037378604176*^9, 3.575037409335492*^9}, { 3.575037580145237*^9, 3.575037617177596*^9}, 3.575037788355852*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"Seeger", " ", RowBox[{"Eq", ".", " ", "6.4"}], ".18"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"muacdp", "[", RowBox[{"T_", ",", "ac_", ",", "meff_", ",", "cl_"}], "]"}], ":=", RowBox[{ SuperscriptBox["10", "4"], "*", FractionBox[ RowBox[{"2", SqrtBox[ RowBox[{"2", "*", "\[Pi]"}]]}], "3"], "*", FractionBox[ RowBox[{ RowBox[{"(", RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "19"}]]}], ")"}], "*", SuperscriptBox[ RowBox[{"(", RowBox[{"1.0552", "*", SuperscriptBox["10", RowBox[{"-", "34"}]]}], ")"}], "4"], "*", RowBox[{"(", RowBox[{"cl", "*", SuperscriptBox["10", "12"], "*", FractionBox[ SuperscriptBox["10", RowBox[{"-", "5"}]], SuperscriptBox["10", RowBox[{"-", "4"}]]]}], ")"}]}], RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"meff", "*", "9.1", "*", SuperscriptBox["10", RowBox[{"-", "31"}]]}], ")"}], FractionBox["5", "2"]], "*", SuperscriptBox[ RowBox[{"(", RowBox[{"ac", "*", "1.6", "*", SuperscriptBox["10", RowBox[{"-", "19"}]]}], ")"}], "2"], "*", SuperscriptBox[ RowBox[{"(", RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "19"}]], "*", "0.026", "*", FractionBox["T", "300"]}], ")"}], FractionBox["3", "2"]]}]]}]}], ";"}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{ "Acoustic", " ", "phonon", " ", "scattering", " ", "limited", " ", "mobility", " ", "in", " ", RowBox[{ SuperscriptBox["cm", "2"], "/", "Vs"}]}], ",", " ", RowBox[{ "ac", " ", "is", " ", "deformation", " ", "potential", " ", "in", " ", "eV"}], ",", " ", RowBox[{"cl", " ", "is", " ", "in", " ", SuperscriptBox["10", "12"], RowBox[{"dynes", "/", SuperscriptBox["cm", "2"]}]}], ",", " ", RowBox[{ RowBox[{"1", " ", "dyne"}], " ", "=", " ", RowBox[{ SuperscriptBox["10", RowBox[{"-", "5"}]], " ", "Newton"}]}], ","}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"muacdp", "[", RowBox[{"100", ",", "9.5", ",", "0.2", ",", "1.56"}], "]"}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{"calibration", " ", "for", " ", "Ge"}], ",", " ", RowBox[{"get", " ", "same", " ", "result", " ", "as", " ", "Seeger"}]}], " ", "*)"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"LogLogPlot", "[", RowBox[{ RowBox[{"muacdp", "[", RowBox[{"T", ",", "8.4", ",", "0.2", ",", "2.65"}], "]"}], ",", RowBox[{"{", RowBox[{"T", ",", "10", ",", "300"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"AspectRatio", "\[Rule]", "1"}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}]}], "]"}], " ", RowBox[{"(*", " ", RowBox[{"For", " ", "GaN"}], " ", "*)"}]}]}]], "Input", CellChangeTimes->{{3.5615744451590652`*^9, 3.5615745693966827`*^9}, { 3.5615746382384663`*^9, 3.56157475545711*^9}, {3.561574794465823*^9, 3.561574975512807*^9}, {3.561575009198784*^9, 3.561575012941132*^9}, { 3.561575091921316*^9, 3.561575189247889*^9}, {3.561650307885384*^9, 3.561650308648292*^9}, {3.561902498453474*^9, 3.5619025130548677`*^9}}], Cell[BoxData[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwVj3k01AkAx8fPGMZMmoz5kXXOb5gxR4ct7GvTl1UIbejQ7ngvarzKqHYd L0cmu2nZrg01qRctS7mSq9qtSTqc46hYOlYlHZrEFFHPsvaPz/u+z/v+9XGM 3BWiIGg0WtAs/++CYMadqmgCnk5T4cvtZWDXa8q7Ywiw5Ja+u+1keCONz5nY RaAvy3VRoa0MRSaDW5bHEfiRtp1g2shgc6OBaEkhUPSop7jbSgbmwr14epgA O6tyJNpchkH22FWziwQeTkemnTKSIbf5WXX0GIGEvpY/JnRSTNYYthdlGOJL h38fRtRKEREW4zuHS8fBn3hzkvdJ0Z4Xe1Vzig5KlP3sZJAU0k03vn8nM8KK yISiKFKK49p18sDLRpi85Kl4PiDB+5qFmeJABpaeVVpwyiQIWX6uMrifgSrt jMIrToJrqii34ihjtHD31Dh6STDfTTmU9NkYUSPrR6uYEqQV/TmVst8E+S+s XPQ9YuguFTKbWUxY2XvRlxaK4f91t3d2HhMWwx0dIqUYVUmBjw8KTVHR43W8 zUMMtoxVQL9mirYQ6wA7AzF2pEVFNAaxIOKGFca3uuDeEWZaXQ8Lju+SJpLV LljA+aAVbGcjL9xwmetmF+SsFiQ2vGfjyqvdSWqpC4YnTwf3/zIHGxk+JeVj Ivj7X6R8rM2wZFtKUqNGhMoQ9obeAjNcGMz1PfqrCMyuC7Vv3OaifNyGbhIq QgwjN1bSMBe+junXFtqLsGNk7onvBBw4/BZiKX8rhPp4QsaTGA5Ss9MjPOqE 8LcykCRXc5BYdebcrTQhxrsvPP97ioPJLV/8M+0vRMGAeH7vynm4tGm61pMr RLe2dXo4cx44OxozZE+dQdMf/nz7/jyMmo0FaM87o0ofV1xtZY7oDgbLOt4Z W78Rd/rIzSG4m6pUejuD00mYqYvMsXWbXLOT5Qxv95mpmSFzeFrbmzr0OSHm gR3hsoSLvM2+q9LOOsE2LPLytkQuTjWsSz2mdEKnMG4oUMNFt6IprPgrJyQt LlmsZ1ggJy+fH004ocySEJcHWGBEL3/d3yFAj3uqh/CEBboeqM4QagEMSppv rXoy+9NNxsWbBaj+6DaTQvFQujrej5AJIE9tXhsbw4NO4Hcwc5zCoYG9Ifuq eWiaT2utb6CgURvcXfyRh4Fg27LPRyi8PnBeUbiCRJrd2eQXGymcDIktlewn oTEy8VMJKFQoHCrC00nsdGc05lIUbu5przx6gITddrpPLZ+CLk9Y9yGDhEpL w5ADBU/do/qrh0l4ZX9yD7Wl8OJnn54ANYnbDjqhkKTgWsejKUtJtC7rMO40 puDbfJPIKyORHKNNH2JQkD/aZdRVTkKS32pIn/V0g1bTJZUkDhFNMx50Cn1B qbypGhJrWuonCmgUVC9fig9pSHRtqHqV8ImPnE/ZsuvXZ3syKhXHJvk4z/Za NFpPwvWviudlE3zccz29dN1NElm2pU+ejvPhrPoWNk0kQgcLele/52NZ1pT3 mmYShuTv6xV6PtYWlazc10Ki1jf/vmqUj8Q2w4DBNhK8stOdte/4ONJ/MYhs J3HncW5Q5zAfBfrwtX4dJBLMTrYNveXjMp0VmtRJwhkn/OmzrrW8sr68i0Tv DzlNdjo+/gO5QgMY "]]}}, AspectRatio->1, Axes->True, AxesOrigin->NCache[{ Log[10], 9.459219204779329}, {2.302585092994046, 9.459219204779329}], BaseStyle->{FontSize -> 15}, CoordinatesToolOptions:>{"DisplayFunction" -> ({ Exp[ Part[#, 1]], Exp[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ Exp[ Part[#, 1]], Exp[ Part[#, 2]]}& )}, Frame->True, FrameLabel->{ FormBox["\"T (K)\"", TraditionalForm], FormBox[ "\"Mobility (\\!\\(\\*SuperscriptBox[\\(cm\\), \\(2\\)]\\)/Vs)\"", TraditionalForm]}, FrameTicks->{{{{9.210340371976184, FormBox[ TemplateBox[{"1", TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> SuperscriptBox]}, "Row", DisplayFunction -> (RowBox[{#, "\[Times]", #2}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", "\"\[Times]\""}], "]"}]& )], TraditionalForm]}, {9.903487552536127, FormBox[ TemplateBox[{"2", TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> SuperscriptBox]}, "Row", DisplayFunction -> (RowBox[{#, "\[Times]", #2}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", "\"\[Times]\""}], "]"}]& )], TraditionalForm]}, {10.819778284410283`, FormBox[ TemplateBox[{"5", TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> SuperscriptBox]}, "Row", DisplayFunction -> (RowBox[{#, "\[Times]", #2}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", "\"\[Times]\""}], "]"}]& )], TraditionalForm]}, {11.512925464970229`, FormBox[ TemplateBox[{"1", TemplateBox[{"10", "5"}, "Superscript", SyntaxForm -> SuperscriptBox]}, "Row", DisplayFunction -> (RowBox[{#, "\[Times]", #2}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", "\"\[Times]\""}], "]"}]& )], TraditionalForm]}, {12.206072645530174`, FormBox[ TemplateBox[{"2", TemplateBox[{"10", "5"}, "Superscript", SyntaxForm -> SuperscriptBox]}, "Row", DisplayFunction -> (RowBox[{#, "\[Times]", #2}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", "\"\[Times]\""}], "]"}]& )], TraditionalForm]}, {13.122363377404328`, FormBox[ TemplateBox[{"5", TemplateBox[{"10", "5"}, "Superscript", SyntaxForm -> SuperscriptBox]}, "Row", DisplayFunction -> (RowBox[{#, "\[Times]", #2}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", "\"\[Times]\""}], "]"}]& )], TraditionalForm]}, {13.815510557964274`, FormBox[ TemplateBox[{"1", TemplateBox[{"10", "6"}, "Superscript", SyntaxForm -> SuperscriptBox]}, "Row", DisplayFunction -> (RowBox[{#, "\[Times]", #2}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", "\"\[Times]\""}], "]"}]& )], TraditionalForm]}, {14.508657738524219`, FormBox[ TemplateBox[{"2", TemplateBox[{"10", "6"}, "Superscript", SyntaxForm -> SuperscriptBox]}, "Row", DisplayFunction -> (RowBox[{#, "\[Times]", #2}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", "\"\[Times]\""}], "]"}]& )], TraditionalForm]}, {15.424948470398375`, FormBox[ TemplateBox[{"5", TemplateBox[{"10", "6"}, "Superscript", SyntaxForm -> SuperscriptBox]}, "Row", DisplayFunction -> (RowBox[{#, "\[Times]", #2}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", "\"\[Times]\""}], "]"}]& )], TraditionalForm]}, {10.308952660644293`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.596634733096073`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.002099841204238`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.156250521031495`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.289781913656018`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.407564949312402`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.611537753638338`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.89921982609012, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.304684934198283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.458835614025542`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.592367006650065`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.710150042306449`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {14.914122846632385`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.201804919084164`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{9.210340371976184, FormBox["\"\"", TraditionalForm]}, {9.903487552536127, FormBox["\"\"", TraditionalForm]}, {10.819778284410283`, FormBox["\"\"", TraditionalForm]}, {11.512925464970229`, FormBox["\"\"", TraditionalForm]}, {12.206072645530174`, FormBox["\"\"", TraditionalForm]}, {13.122363377404328`, FormBox["\"\"", TraditionalForm]}, {13.815510557964274`, FormBox["\"\"", TraditionalForm]}, {14.508657738524219`, FormBox["\"\"", TraditionalForm]}, {15.424948470398375`, FormBox["\"\"", TraditionalForm]}, {10.308952660644293`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.596634733096073`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.002099841204238`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.156250521031495`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.289781913656018`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.407564949312402`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.611537753638338`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.89921982609012, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.304684934198283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.458835614025542`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.592367006650065`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.710150042306449`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {14.914122846632385`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.201804919084164`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}, {{{2.302585092994046, FormBox["10", TraditionalForm]}, {4.605170185988092, FormBox["100", TraditionalForm]}, {3.912023005428146, FormBox["50", TraditionalForm]}, {6.214608098422191, FormBox["500", TraditionalForm]}, {2.995732273553991, FormBox["20", TraditionalForm]}, {5.298317366548036, FormBox["200", TraditionalForm]}, {3.4011973816621555`, FormBox["30", TraditionalForm]}, {5.703782474656201, FormBox["300", TraditionalForm]}, {2.70805020110221, FormBox["15", TraditionalForm]}, {5.0106352940962555`, FormBox["150", TraditionalForm]}, {4.248495242049359, FormBox["70", TraditionalForm]}, {6.551080335043404, FormBox["700", TraditionalForm]}, {2.3978952727983707`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.4849066497880004`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.5649493574615367`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.6390573296152584`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.772588722239781, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.833213344056216, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.8903717578961645`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.9444389791664403`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.700480365792417, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.787491742782046, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.867534450455582, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.941642422609304, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.075173815233827, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.135798437050262, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.19295685089021, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.247024072160486, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{2.302585092994046, FormBox["\"\"", TraditionalForm]}, {4.605170185988092, FormBox["\"\"", TraditionalForm]}, {3.912023005428146, FormBox["\"\"", TraditionalForm]}, {6.214608098422191, FormBox["\"\"", TraditionalForm]}, {2.995732273553991, FormBox["\"\"", TraditionalForm]}, {5.298317366548036, FormBox["\"\"", TraditionalForm]}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm]}, {5.703782474656201, FormBox["\"\"", TraditionalForm]}, {2.70805020110221, FormBox["\"\"", TraditionalForm]}, {5.0106352940962555`, FormBox["\"\"", TraditionalForm]}, {4.248495242049359, FormBox["\"\"", TraditionalForm]}, {6.551080335043404, FormBox["\"\"", TraditionalForm]}, {2.3978952727983707`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.4849066497880004`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.5649493574615367`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.6390573296152584`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.772588722239781, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.833213344056216, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.8903717578961645`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.9444389791664403`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.700480365792417, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.787491742782046, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.867534450455582, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.941642422609304, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.075173815233827, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.135798437050262, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.19295685089021, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.247024072160486, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}}, GridLines->{None, None}, Method->{}, PlotRange->NCache[{{ Log[10], Log[300]}, {9.459219204779329, 14.561015069035985`}}, {{ 2.302585092994046, 5.703782474656201}, {9.459219204779329, 14.561015069035985`}}], PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}, Ticks->{{{2.302585092994046, FormBox["10", TraditionalForm]}, {4.605170185988092, FormBox["100", TraditionalForm]}, {3.912023005428146, FormBox["50", TraditionalForm]}, {6.214608098422191, FormBox["500", TraditionalForm]}, {2.995732273553991, FormBox["20", TraditionalForm]}, {5.298317366548036, FormBox["200", TraditionalForm]}, {3.4011973816621555`, FormBox["30", TraditionalForm]}, {5.703782474656201, FormBox["300", TraditionalForm]}, {2.70805020110221, FormBox["15", TraditionalForm]}, {5.0106352940962555`, FormBox["150", TraditionalForm]}, {4.248495242049359, FormBox["70", TraditionalForm]}, {6.551080335043404, FormBox["700", TraditionalForm]}, {2.3978952727983707`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.4849066497880004`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.5649493574615367`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.6390573296152584`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.772588722239781, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.833213344056216, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.8903717578961645`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.9444389791664403`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.700480365792417, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.787491742782046, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.867534450455582, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.941642422609304, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.075173815233827, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.135798437050262, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.19295685089021, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.247024072160486, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{9.210340371976184, FormBox[ TemplateBox[{"1", TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> SuperscriptBox]}, "Row", DisplayFunction -> (RowBox[{#, "\[Times]", #2}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", "\"\[Times]\""}], "]"}]& )], TraditionalForm]}, {9.903487552536127, FormBox[ TemplateBox[{"2", TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> SuperscriptBox]}, "Row", DisplayFunction -> (RowBox[{#, "\[Times]", #2}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", "\"\[Times]\""}], "]"}]& )], TraditionalForm]}, {10.819778284410283`, FormBox[ TemplateBox[{"5", TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> SuperscriptBox]}, "Row", DisplayFunction -> (RowBox[{#, "\[Times]", #2}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", "\"\[Times]\""}], "]"}]& )], TraditionalForm]}, {11.512925464970229`, FormBox[ TemplateBox[{"1", TemplateBox[{"10", "5"}, "Superscript", SyntaxForm -> SuperscriptBox]}, "Row", DisplayFunction -> (RowBox[{#, "\[Times]", #2}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", "\"\[Times]\""}], "]"}]& )], TraditionalForm]}, {12.206072645530174`, FormBox[ TemplateBox[{"2", TemplateBox[{"10", "5"}, "Superscript", SyntaxForm -> SuperscriptBox]}, "Row", DisplayFunction -> (RowBox[{#, "\[Times]", #2}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", "\"\[Times]\""}], "]"}]& )], TraditionalForm]}, {13.122363377404328`, FormBox[ TemplateBox[{"5", TemplateBox[{"10", "5"}, "Superscript", SyntaxForm -> SuperscriptBox]}, "Row", DisplayFunction -> (RowBox[{#, "\[Times]", #2}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", "\"\[Times]\""}], "]"}]& )], TraditionalForm]}, {13.815510557964274`, FormBox[ TemplateBox[{"1", TemplateBox[{"10", "6"}, "Superscript", SyntaxForm -> SuperscriptBox]}, "Row", DisplayFunction -> (RowBox[{#, "\[Times]", #2}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", "\"\[Times]\""}], "]"}]& )], TraditionalForm]}, {14.508657738524219`, FormBox[ TemplateBox[{"2", TemplateBox[{"10", "6"}, "Superscript", SyntaxForm -> SuperscriptBox]}, "Row", DisplayFunction -> (RowBox[{#, "\[Times]", #2}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", "\"\[Times]\""}], "]"}]& )], TraditionalForm]}, {15.424948470398375`, FormBox[ TemplateBox[{"5", TemplateBox[{"10", "6"}, "Superscript", SyntaxForm -> SuperscriptBox]}, "Row", DisplayFunction -> (RowBox[{#, "\[Times]", #2}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", "\"\[Times]\""}], "]"}]& )], TraditionalForm]}, {10.308952660644293`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.596634733096073`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.002099841204238`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.156250521031495`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.289781913656018`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.407564949312402`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.611537753638338`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.89921982609012, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.304684934198283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.458835614025542`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.592367006650065`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.710150042306449`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {14.914122846632385`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.201804919084164`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}]], "Output", CellChangeTimes->{ 3.561574978671084*^9, 3.5615750196314993`*^9, 3.5615751926012993`*^9, { 3.5619025024722757`*^9, 3.561902514772216*^9}, 3.573990879184804*^9, 3.5750291792191353`*^9, 3.575202310644343*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["\<\ 5.2.4) Acoustic Phonon Scattering: Piezoelectric\ \>", "Subsubtitle", CellChangeTimes->{{3.5614717074097347`*^9, 3.561471759166543*^9}, { 3.561569248923622*^9, 3.561569264752008*^9}, {3.5615693144976387`*^9, 3.561569352982662*^9}, {3.573990791305407*^9, 3.573990793696775*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"K", "[", RowBox[{"epsDc_", ",", "epz_", ",", "cl_"}], "]"}], ":=", FractionBox[ FractionBox[ SuperscriptBox[ RowBox[{"(", RowBox[{"epz", "*", "1.6", "*", SuperscriptBox["10", RowBox[{"-", "19"}]], "*", SuperscriptBox["10", "14"]}], ")"}], "2"], RowBox[{"cl", "*", SuperscriptBox["10", "12"], "*", FractionBox[ SuperscriptBox["10", RowBox[{"-", "5"}]], SuperscriptBox["10", RowBox[{"-", "4"}]]]}]], RowBox[{ RowBox[{"(", RowBox[{"epsDc", "*", "8.5", "*", SuperscriptBox["10", RowBox[{"-", "12"}]]}], ")"}], "+", FractionBox[ SuperscriptBox[ RowBox[{"(", RowBox[{"epz", "*", "1.6", "*", SuperscriptBox["10", RowBox[{"-", "19"}]], "*", SuperscriptBox["10", "14"]}], ")"}], "2"], RowBox[{"cl", "*", SuperscriptBox["10", "12"], "*", FractionBox[ SuperscriptBox["10", RowBox[{"-", "5"}]], SuperscriptBox["10", RowBox[{"-", "4"}]]]}]]}]]}], " ", ";"}], RowBox[{"(*", " ", RowBox[{ "epz", " ", "is", " ", "the", " ", "peizoelectric", " ", "coefficient", " ", "in", " ", "units", " ", "of", " ", SuperscriptBox["10", "12"], " ", "electron", " ", RowBox[{"charges", "/", SuperscriptBox["cm", "2"]}]}], " ", "*)"}]}], "\[IndentingNewLine]", RowBox[{"K", "[", RowBox[{"10", ",", "1", ",", "1.8"}], "]"}]}], "Input", CellChangeTimes->{{3.5615759009387827`*^9, 3.5615759530636387`*^9}, { 3.561575984615346*^9, 3.5615760276419086`*^9}, {3.561577197641335*^9, 3.561577354930511*^9}, {3.561577420682365*^9, 3.561577425232808*^9}, { 3.561577474670494*^9, 3.561577475062304*^9}}], Cell[BoxData["1.6732026143510896`*^-11"], "Output", CellChangeTimes->{3.561577355468884*^9, 3.5615774755952063`*^9, 3.5739908836572638`*^9, 3.575029189207747*^9, 3.575202314779415*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "5.2.5) ", StyleBox["Optica", FontSlant->"Italic"], "l Phonon Scattering: Deformation Potential " }], "Subsubtitle", CellChangeTimes->{{3.5614717074097347`*^9, 3.5614717309111567`*^9}, { 3.561471764038548*^9, 3.5614717962380657`*^9}, {3.561569229532487*^9, 3.561569233703992*^9}, 3.561569274023663*^9, {3.5615693606789703`*^9, 3.561569365047927*^9}, {3.573990799840232*^9, 3.573990803568143*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"fint", "[", "z_", "]"}], ":=", RowBox[{"NIntegrate", "[", RowBox[{ FractionBox[ RowBox[{ SuperscriptBox["y", FractionBox["3", "2"]], "*", RowBox[{"Exp", "[", RowBox[{ RowBox[{"-", "2"}], "*", "z", "*", "y"}], "]"}]}], RowBox[{ SqrtBox[ RowBox[{"y", "+", "1"}]], "+", RowBox[{ RowBox[{"Exp", "[", RowBox[{"2", "*", "z"}], "]"}], "*", RowBox[{"Re", "[", SqrtBox[ RowBox[{"y", "-", "1"}]], "]"}]}]}]], ",", RowBox[{"{", RowBox[{"y", ",", "0", ",", "1000"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Plot", "[", RowBox[{ RowBox[{"fint", "[", "z", "]"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "1"}], "}"}]}], "]"}]}], "Input", CellChangeTimes->{{3.561577971238842*^9, 3.561578091283732*^9}, { 3.56157816333208*^9, 3.5615781724274197`*^9}, {3.5615782114584417`*^9, 3.561578284607943*^9}, {3.561578381982821*^9, 3.561578400614161*^9}}], Cell[BoxData[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[CompressedData[" 1:eJwVknk4FPrjhW1FWbNF9pI2S4so0fmQpKK6GrcsSSqkXa42pYT8iqhUhBbk SmW5UZqxjDFmGNswDEq2VPYhky3x7ffHed7nPM/73zl6XqedjoqJiIjk/cn/ sym3hme/rBBRzfpa/o/0SBbVLfB7YSFeTA2763fokoW5C9pERYtRQlfsNfyh Tdwjf1G6VYtRK2NWOsbUJslHvlayDIsR+Mo4UC9OmxiqfPhwe38xfB/76z+A NrEJ9Hygkl2MxI4Tz5vvaRGzxH1psSZ0LL2RdHd0uyZxiajqDLOgw/ZE+h2n xZokKMBa6/xWOkJPqg6J/dIgJQ6rYl3c6JAz/HSU8kaDOPyeua59k46NSvkN ySoa5JBH2oH0tj/++xZehVCdhO7QiI/vpYO5NjP/c506STOLabglpCPq8qmr ZlnqZEDu0s6T80sw493Z9dZPnQQWO25ca1aC4aL9kpXdaiRS96dyQVQJ6BNy Z1u6F5J3XVuqai0ZWD2+IatUXpXw7a+PRG1joKfg8Ca6UIWMZRapOjj96ePl NoMtKsT88sZD5T4MmItrTfFTVUi+kskY/R4DTYWXea2WKuSD7SLd/3oYqFdd FkH5R5kUpA2fi40txZ0HW7Js5iiRVhnjeKenpXj9TeXdTYEimfY/XqSQUQpW v7vuSIsiscI3qajiUqheNW03yVIkRU2fksL6SjFFegMoboqkWIrNDiRMBNrY uSQXLiAMvyQNlwEmYnsmHI7fUyBve48f9xhj4ryH8ZOO6wok1deCdlikDDJ0 xopTZxVImHeT6ynlMjh8SVxft0eB2HsteHzDsgzixvt0/lNQILUuYWqZkWU4 qK5jcHaFPGm1P6kibsSCvhTP85SLLKlmbzoqZc5CUk24JcNKlhTZzc+TtWZh 7oUDRywXy5Kntv9S1JxZGF+iHJLcL0O8SOd9oyssCI8ZXja+JkN6zJ0V91ez wLfYECydLU1+GljJvznJRqbZ7OtlK+aTzV027FsX2Fh+Ri2vTn4+CU+yD/a9 wcYdfRnm07F5RFWZIlgSz0axV3xvGnMeMRM9XvuYyYYCtWiRq9c8cuFTXHSE Rjkupplu0kyVItPRQvkjFeWIVJredxKSxHbnFNu6oRyNlivTdFdKksi5Itd0 2suh+3H06bCyJNG6Ij38UViOJUvrK7/2zSWb/RZz/9KtgP3uZfd14uaSYNs9 MThfgWDjupy08TlEbPKVgsZSDrxNYh1ZFRJEo9pmFCYcXOaaWX7PlyCmz1sa j2zk4M7wPEfNdAlydLtkQqYjB/+3c+U+RrgEKY/3WmoTyMFuilj6lK0EibZQ tzjG5iCS8oonWiZONIPCD78/VomM/OFbyfViZP0eLbvWc5VortjTL8cUI7v0 c5eLXq3Et2rbntt5YiS4qnNwx71KZKs9oLyPEyNdmlYX2qiVGKm6t73uoBh5 WTgaOUemCoEW6tXTw6LEbNbz3d7MKsTMyBnEaosSB0d6yNb8KhwjHV8MFEXJ 4QSd3eaMKrgaze1nzRElMeZt3xfxq7BDjnPLeFCE9J52U+/6XQUD+gPZxwUi JLHDOeiMYzU8lgT41x8QIaKMHTZRA9UIkr7Xkuw0CzWFDLngsWoYe9rN8C1n Yewx79MZkRo4b3gWrLdsFq5T7HMU5RoE7xLoTP6aQe7arS80LGuwFLGPstJm 4J0CqYzbNXCoTpbUFZlBVahpDWtlLTJPb3/kyJiGhXyl2N31tZjIOmL7z5tp pMcfMncjtVjo8tjqbdw0bmTeeSZwroWJ7vZHZ0//8Zt7/NWu12L9xPoIodYf f1XSQr+mWqTfsFgwefUXbHpDsufacOHtWRdtumcKF41rOMe3cZHgYz45YDWF 7HPqX7kOXDxXsDLIXzUF7Zks9YR9XIw6mniHS07BecuvdSIHuBjomHRf930S kRF2u456cfHwcGqffeMkGNV3fTk+XMjnrC4+UzqJScXPISYnufBSMGBk5Ewi 29LceX8cF2E5bI2ZpZPQiemffDnEhXV6yaHLGhMoOhT88r9RLjafSVzkLzMB j3VKLrQJLs7NiXkd+HsciXyL/CqxOhilfld72T4ONa1bgQLVOnzob7DNSR2H YsbyUVPU4ZTWsTKyZhxzmEcHiqPr0JmpqDC8dwz94+1tjavrESK3+PC5AiHe +UQzdpjVg4TXc3yzhLjWtDmteFM9/rlD+dsvWQjV90knX9rVY7rrUdLdCCFs At2mg9zrsWFd6N7TzkI8FvLV9SPqQdFNaXIdGYX9SDXFv70e0aY/3O+tGUVq H40jd4eHF33DC0u5Izj1aPcSv/s8NLhu23SLNQJz2y+Xy+J4COGXKbkWjICT NN8oKIWHie8tPlszRjCyxyW6N5+HErfCIJ2QEWx+P7aX+YWH+Myfhd7rRtBy Y83nixsb4OS/dKtY4jDktP4VdHc3wNaUlbVGUgDy943PX3oboDfrvitrfAj+ 0Qcru4YaYLg179KGniHwRdX+7ZhogHXJ3d0nK4bw5FuER6tMI1qr7XIORg7B ONuvmmfaiNy6IuoB5SE4bjF+xQhtBOUHnRpgOIjIY3nez/T5eBbEieq+1I8+ 8iZCeiUfzWdkh1pP9GOb2ouMQBM+EnoWS3R49EOMHTvkYMFHyJTAYO6WflzU Dwic3M1HwA8d7Trpfni3rw13uswHOcHK2/+0D9bO2S8k6vlYNOy0tqe6F2Pk VbdvcBMi9NT6ftn1IGAtM1e1tBkx811f7qR/RXsm83ad3keUSaYoy577gl9+ DQkrLn0C54Lf/OybnVhlLTnjTWuFacq1xiuT7diWrOeTs7ANmVY6RgpKn3Fe 6+DiTvd21MxT363y/iMMB5ylmxw7IBGeVWD0phlK8sNSzKkOdD2pOhb6gQ+J 4oSsJYmd6GgY9Tul2YjjprSWeTu7wL2dftrwz+6vtns9KxrrAt/n6dFgi3r8 7F+k8O3hF2RKJF7q/vPbvL3bxGNtu+HjJH3/62gtgu3DnuZ+6wb/9JMEK6Ua 6H3e0ZwS9hWj9OWhxLsKFuahseprv6FdKoPtU8SBu3btpCjvG95K3Ne56VyB n5yorjPXv+Pdb6uP6QI24iQ8Apz0exA7GCS7v5AFpba8ZDFmD8LHLL9S0ssw 58p1ysazveh8cVN7/X0mRF56ZHUp9uH8ab07JLUU/o+zohQZfWCnzDrH5DJQ uCpCasGpfgj7F/pVfCzBgh3+hiFyA3hIT3rI1ipBqxGXd7FgAL/tCiSrPejI fgL9bo9B6JXW/d10phgHsswWaM0MgreCaTa5uQjXwp5fb80Ygu+GseDXfQV4 06OVIOcggIG1rufTjzREJIV5tu0SoPv328g5fBqOOA0uzfxLgN8LNIUn6mjQ LCjIdtwnQJv83bMop+FWtBsr0ksAxpI1i0bzaPA1ix+Zf1EA3xylgti7NCwO VbaXTBOgq7tSo2g7DTMbgmSb0gXQl9/A2LGVhpbBL/VprwQo2Kb9oJnQELPv 7QG7HAFCAhKKxs1pmF3pdC6sQICL4+uVbQ1oaK2LfiLOEyD9/JVjyuI05IeP H+Y1CuCdWpLydoaK2E0HV6Q0C8B1eC5OmaJi5wvjXJs2ASycQ9bGjVBBvVBd cb1XAMo8UWvjDioeGq2P/mtAgOyLzon8T1Sc7Uqk6AkEyJ/qUb/WRMVyhxPt dKEAv1IWX+LXUCEh2pAaMy7AcVGh2w0OFR15m/w8pwTIbXH1WMOiosAvxWT1 bwFirAevdZRQ8UhH+ufsrACeV61LYwqp+B8BKpHX "]]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesOrigin->{0, 0}, PlotRange->{{0, 1}, {0., 8.79579249453334}}, PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}]], "Output", CellChangeTimes->{ 3.5615781733676558`*^9, {3.561578212258292*^9, 3.561578257564621*^9}, { 3.561578383432056*^9, 3.561578403255968*^9}, 3.573990888934113*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "5.2.6) ", StyleBox["Optica", FontSlant->"Italic"], "l Phonon Scattering: Polar Optical Phonons" }], "Subsubtitle", CellChangeTimes->{{3.5614717074097347`*^9, 3.5614717309111567`*^9}, 3.5614717672464933`*^9, {3.561471800829832*^9, 3.5614718046135473`*^9}, 3.561569278031622*^9, {3.5615693765597067`*^9, 3.56156938464607*^9}, { 3.5739908068081093`*^9, 3.5739908092317553`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"Seeger", " ", "Eq", " ", "6.12", ".13"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\[Alpha]", "[", RowBox[{"Eop_", ",", "meff_", ",", "epsInf_", ",", "epsDc_"}], "]"}], ":=", RowBox[{"397.4", "*", SqrtBox[ FractionBox["meff", RowBox[{"(", RowBox[{ FractionBox["Eop", "26"], "*", "300"}], ")"}]]], "*", RowBox[{"(", RowBox[{ FractionBox["1", "epsInf"], "-", FractionBox["1", "epsDc"]}], ")"}]}]}], ";"}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{ "Dimensionless", " ", "Frohlich", " ", "coupling", " ", "constant"}], ",", " ", RowBox[{ "optical", " ", "phonon", " ", "energy", " ", "expressed", " ", "in", " ", "meV"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Theta]D", "[", "Eop_", "]"}], ":=", RowBox[{"(", RowBox[{ FractionBox["Eop", "26"], "*", "300"}], ")"}]}], ";"}], " ", RowBox[{"(*", " ", RowBox[{"Debye", " ", "temperature"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"mupop3d", "[", RowBox[{ "T_", ",", "Eop_", ",", "meff_", ",", "epsInf_", ",", "epsDc_"}], "]"}], ":=", RowBox[{ SuperscriptBox["10", "4"], "*", FractionBox[ RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "19"}]]}], RowBox[{"2", "*", RowBox[{"(", RowBox[{"9.1", "*", SuperscriptBox["10", RowBox[{"-", "31"}]], "*", "meff"}], ")"}], "*", RowBox[{"\[Alpha]", "[", RowBox[{"Eop", ",", "meff", ",", "epsInf", ",", "epsDc"}], "]"}], "*", RowBox[{"(", FractionBox[ RowBox[{ SuperscriptBox["10", RowBox[{"-", "3"}]], "*", "1.6", "*", SuperscriptBox["10", RowBox[{"-", "19"}]], "*", "Eop"}], RowBox[{"1.0552", "*", SuperscriptBox["10", RowBox[{"-", "34"}]]}]], ")"}]}]], "*", RowBox[{"Exp", "[", FractionBox[ RowBox[{"\[Theta]D", "[", "Eop", "]"}], "T"], "]"}]}]}], ";"}], " ", RowBox[{"(*", " ", RowBox[{ "Polar", " ", "optical", " ", "phonon", " ", "scattering", " ", "limited", " ", "mobility", " ", "in", " ", RowBox[{ SuperscriptBox["cm", "2"], "/", "Vs"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"LogLogPlot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"mupop3d", "[", RowBox[{"T", ",", "36", ",", "0.067", ",", "10.9", ",", "12.53"}], "]"}], " ", RowBox[{"(*", "GaAs", "*)"}], ",", RowBox[{"mupop3d", "[", RowBox[{"T", ",", "92", ",", "0.2", ",", "5", ",", "9"}], "]"}], " ", RowBox[{"(*", "GaN", "*)"}], ",", " ", RowBox[{"mupop3d", "[", RowBox[{"T", ",", "55", ",", "2", ",", "50", ",", "300"}], "]"}]}], RowBox[{"(*", "STO", "*)"}], "}"}], ",", RowBox[{"{", RowBox[{"T", ",", "1", ",", "300"}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{"10", ",", SuperscriptBox["10", "7"]}], "}"}]}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"AspectRatio", "\[Rule]", "1"}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}]}], "]"}]}]}]], "Input", CellChangeTimes->{{3.561475127718178*^9, 3.561475408475074*^9}, { 3.5614754444817247`*^9, 3.5614754877619047`*^9}, {3.561475724472578*^9, 3.5614757279487333`*^9}, {3.561475870642252*^9, 3.5614760352633944`*^9}, { 3.5615587138992357`*^9, 3.5615587141063023`*^9}, {3.561559199473373*^9, 3.561559489619664*^9}, {3.561559572186775*^9, 3.561559618942217*^9}, { 3.5615596851099663`*^9, 3.561559702123352*^9}, {3.561559806603738*^9, 3.5615598378312263`*^9}, {3.561559872043103*^9, 3.561559875450626*^9}, { 3.561559935165565*^9, 3.561559945182489*^9}, {3.5615601565806427`*^9, 3.561560236204749*^9}, {3.561560628235051*^9, 3.561560647044158*^9}, { 3.5615607633130703`*^9, 3.561560908821342*^9}, {3.561561193347546*^9, 3.5615612051633263`*^9}, {3.561566872162966*^9, 3.5615668796748457`*^9}, { 3.561566926351143*^9, 3.561566931020028*^9}, {3.5615677005335093`*^9, 3.56156770125346*^9}, {3.5615750486689243`*^9, 3.561575049858933*^9}, 3.561902547635955*^9}], Cell[BoxData[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwBYQKe/SFib1JlAgAAACUAAAACAAAAPlDLYZjHD0Bzqj6EOx4wQFEfN9fn RRBAIE6CjJzLLkDJ1qOTRcIQQOp3PqyEKy1AqD1fz2Y2EUCL11mqDtIrQMnY fkRBqBFAYbe1tFmjKkDisS1nwCMSQNGSj6nofilAYjorCQOXEkB7Im5FBowo QNkAuFjqExNAaBj8CuyhJ0CT+6jhio4TQJyO7rlB1iZAtKXo6e4AFEDYYvzu Cy0mQMyNt5/3fBRAE3coZ7iJJUBMJdXUw/AUQP51tcAZAiVADvFWQ0liFUBb Lti9O4skQMf6Z19z3RVARa5WalUYJEDos8f6YFAWQO4pq23kuCNAPNgmKGJS FkDKMx4gUrcjQJD8hVVjVBZASO77m8C1I0A3RUSwZVgWQD9KZO6fsiNAhtbA ZWpgFkCMd+3yZ6wjQCT5udBzcBZAfcGsIx2gI0BhPqymhpAWQM4hXXQZiCNA tGIL1IeSFkCOe4mUn4YjQAiHagGJlBZAjYnlcSaFI0Cwzyhci5gWQJESsmI2 giNAAGGlEZCgFkDsZEwSX3wjQJ6DnnyZsBZAK8GcV9NwI0Dyp/2pmrIWQDNM xR5lbyNARsxc15u0FkDPFUid920jQO0UGzKeuBZAc2Ltvh5rI0A8ppfnosAW QKrZt4p1ZSNAkMr2FKTCFkCyDrICDWQjQOTuVUKlxBZAjCMtL6ViI0CLNxSd p8gWQFCePKTXXyNA3ltzyqjKFkAQzhzscV4jQDKA0vepzBZAHHEV5wxdI0CG pDElq84WQP/czJSoWyNA2siQUqzQFkAolOn0RFojQMHeAtg= "]]}, {Hue[0.9060679774997897, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwBIQLe/SFib1JlAgAAACEAAAACAAAAT88O7bf0EUBzqj6EOx4wQOKxLWfA IxJA4ruHBtcfL0BiOisJA5cSQD25TrEisyxA2QC4WOoTE0ApSiuq31wqQJP7 qOGKjhNAkM3PTGVUKEC0pejp7gAUQGQILEb4oyZAzI23n/d8FECmH7mVlAIl QEwl1dTD8BRA/+M9Jf+nI0AO8VZDSWIVQHkQs485eCJAx/pnX3PdFUCX5dmd l1IhQOizx/pgUBZADT7Owq9eIEA82CYoYlIWQCSQSaerWiBAkPyFVWNUFkDX M4COqVYgQDdFRLBlWBZA3B4ZYatOIECG1sBlamAWQDF26frGPiBAJPm50HNw FkDspCciXR8gQGE+rKaGkBZAd4tGxPzDH0C0YgvUh5IWQKByt2hxvB9ACIdq AYmUFkDzKxzU6bQfQLDPKFyLmBZA6ZIx+OWlH0AAYaURkKAWQC2N1EALiB9A noOefJmwFkBw1lIxCE0fQPKn/amashZAzw4iZLhFH0BGzFzXm7QWQGLcE0Bs Ph9A7RQbMp64FkAWZAvs3i8fQDyml+eiwBZA+Kgy4e8SH0CQyvYUpMIWQJKb +Cm9Cx9A5O5VQqXEFkAHP1ENjgQfQIs3FJ2nyBZAaOuDnDr2HkDeW3PKqMoW QHXfxEQW7x5AMoDS96nMFkCxWWaA9eceQIakMSWrzhZAVg+eTdjgHkDayJBS rNAWQAyboqq+2R5A37LoLQ== "]]}, {Hue[0.1421359549995791, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwVxX0s1GEAB/DTy8aYnOd3z8i8dm43XF7a3BbZt7qzhM0dd7sV4Rqa1tLu H0XRC+KKG7eoRnY5zssaOW+1yWQ53JzJy7HJUkMZQxtLul7++Ozjq7wuzTjA YrF4//xfN7eolU85Q9US9SDCKwS62E5NSuMRGAvqA2xPBJB4C2dXxC641BYu sD8UiJGZl1XiQRfYUri3ZA/5MJxKtWSGs+EWMj6vzuVhxHpHdNrARkxS3DRp 4WKpQ5A1cMwV+wUbr86v+UF5MtDhYLUrtLqYNWGuL+ZYvYrvhKDoisdchasP qn4ZPpeVEzyqSAqa6PaEUb/6bYPF4LZRCFOHB8yPe17s5jNYmJ4fe9Pvjjj/ 6an3mwxa3Xn2ch83OG/Jz8YoOUjSBd3w7aIY3stKVS1wkNlTKXOSc7DaObyX lkDRER+6fzWMQaSVx1dKKXq4y311Agaa/SLZ5SQKg95x8SOfgVAsas9QUDT3 Wy+IvRkUzwxkZKdRNLSt74icGHB/9k2ocigUherurmWC9Ki2xmINRYJk0UtW S2BUOk6VVFIMbQnuTtYQ2Jdk25VqKa7Jyv2lWoJ2Cz9ZXUORHf8nWKEmYKXr 2Zp6ir4fnkEFNwnq7tflP22nyIs+PCyUE2w3/W5+9priON9uyCohiDYnzz43 UnxQRWzlxROsMx5hdb0U2wsOVpOIILKxekU3QGF7e683/wSBZnSHaRiksFiW 3IKDCb5uyM7ohyh2Ws31XwII1EKmtslEUfpu3S/Rj+DTRdWoYZQiR2I76uxF EFY4udtspmDSYsPH3AmKG0L9W8cprJuDqjIOwbxJI22boDhXmTgZyyb4Cx9w B20= "]]}}, AspectRatio->1, Axes->True, AxesOrigin->{0, 2.302585092994046}, BaseStyle->{FontSize -> 15}, CoordinatesToolOptions:>{"DisplayFunction" -> ({ Exp[ Part[#, 1]], Exp[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ Exp[ Part[#, 1]], Exp[ Part[#, 2]]}& )}, Frame->True, FrameLabel->{ FormBox["\"T (K)\"", TraditionalForm], FormBox[ "\"Mobility (\\!\\(\\*SuperscriptBox[\\(cm\\), \\(2\\)]\\)/Vs)\"", TraditionalForm]}, FrameTicks->{{{{2.302585092994046, FormBox["10", TraditionalForm]}, {4.605170185988092, FormBox["100", TraditionalForm]}, {6.907755278982137, FormBox["1000", TraditionalForm]}, {9.210340371976184, FormBox[ TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {11.512925464970229`, FormBox[ TemplateBox[{"10", "5"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {13.815510557964274`, FormBox[ TemplateBox[{"10", "6"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {16.11809565095832, FormBox[ TemplateBox[{"10", "7"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {7.600902459542082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.006367567650246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.294049640102028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.517193191416238, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.699514748210191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.85366542803745, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.987196820661973, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.104979856318357, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.903487552536127, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.308952660644293`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.596634733096073`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.819778284410283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.002099841204238`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.156250521031495`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.289781913656018`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.407564949312402`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.206072645530174`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.611537753638338`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.89921982609012, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.122363377404328`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.304684934198283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.458835614025542`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.592367006650065`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.710150042306449`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {14.508657738524219`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {14.914122846632385`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.201804919084164`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.424948470398375`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.60727002719233, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.761420707019587`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.89495209964411, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {16.012735135300492`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{2.302585092994046, FormBox["\"\"", TraditionalForm]}, {4.605170185988092, FormBox["\"\"", TraditionalForm]}, {6.907755278982137, FormBox["\"\"", TraditionalForm]}, {9.210340371976184, FormBox["\"\"", TraditionalForm]}, {11.512925464970229`, FormBox["\"\"", TraditionalForm]}, {13.815510557964274`, FormBox["\"\"", TraditionalForm]}, {16.11809565095832, FormBox["\"\"", TraditionalForm]}, {2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {7.600902459542082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.006367567650246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.294049640102028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.517193191416238, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.699514748210191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.85366542803745, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.987196820661973, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.104979856318357, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.903487552536127, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.308952660644293`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.596634733096073`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.819778284410283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.002099841204238`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.156250521031495`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.289781913656018`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.407564949312402`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.206072645530174`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.611537753638338`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.89921982609012, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.122363377404328`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.304684934198283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.458835614025542`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.592367006650065`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.710150042306449`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {14.508657738524219`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {14.914122846632385`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.201804919084164`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.424948470398375`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.60727002719233, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.761420707019587`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.89495209964411, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {16.012735135300492`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}, {{{0., FormBox["1", TraditionalForm]}, {0.6931471805599453, FormBox["2", TraditionalForm]}, {1.6094379124341003`, FormBox["5", TraditionalForm]}, {2.302585092994046, FormBox["10", TraditionalForm]}, {2.995732273553991, FormBox["20", TraditionalForm]}, {3.912023005428146, FormBox["50", TraditionalForm]}, {4.605170185988092, FormBox["100", TraditionalForm]}, {5.298317366548036, FormBox["200", TraditionalForm]}, {6.214608098422191, FormBox["500", TraditionalForm]}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{0., FormBox["\"\"", TraditionalForm]}, {0.6931471805599453, FormBox["\"\"", TraditionalForm]}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm]}, {2.302585092994046, FormBox["\"\"", TraditionalForm]}, {2.995732273553991, FormBox["\"\"", TraditionalForm]}, {3.912023005428146, FormBox["\"\"", TraditionalForm]}, {4.605170185988092, FormBox["\"\"", TraditionalForm]}, {5.298317366548036, FormBox["\"\"", TraditionalForm]}, {6.214608098422191, FormBox["\"\"", TraditionalForm]}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}}, GridLines->{None, None}, Method->{}, PlotRange->NCache[{{0, Log[300]}, {2.302585092994046, 16.11809565095832}}, {{ 0, 5.703782474656201}, {2.302585092994046, 16.11809565095832}}], PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], {None, None}}, Ticks->{{{0., FormBox["1", TraditionalForm]}, {0.6931471805599453, FormBox["2", TraditionalForm]}, {1.6094379124341003`, FormBox["5", TraditionalForm]}, {2.302585092994046, FormBox["10", TraditionalForm]}, {2.995732273553991, FormBox["20", TraditionalForm]}, {3.912023005428146, FormBox["50", TraditionalForm]}, {4.605170185988092, FormBox["100", TraditionalForm]}, {5.298317366548036, FormBox["200", TraditionalForm]}, {6.214608098422191, FormBox["500", TraditionalForm]}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{2.302585092994046, FormBox["10", TraditionalForm]}, {4.605170185988092, FormBox["100", TraditionalForm]}, {6.907755278982137, FormBox["1000", TraditionalForm]}, {9.210340371976184, FormBox[ TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {11.512925464970229`, FormBox[ TemplateBox[{"10", "5"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {13.815510557964274`, FormBox[ TemplateBox[{"10", "6"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {16.11809565095832, FormBox[ TemplateBox[{"10", "7"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {7.600902459542082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.006367567650246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.294049640102028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.517193191416238, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.699514748210191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.85366542803745, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.987196820661973, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.104979856318357, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.903487552536127, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.308952660644293`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.596634733096073`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {10.819778284410283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.002099841204238`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.156250521031495`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.289781913656018`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {11.407564949312402`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.206072645530174`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.611537753638338`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {12.89921982609012, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.122363377404328`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.304684934198283`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.458835614025542`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.592367006650065`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {13.710150042306449`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {14.508657738524219`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {14.914122846632385`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.201804919084164`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.424948470398375`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.60727002719233, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.761420707019587`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {15.89495209964411, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {16.012735135300492`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}]], "Output", CellChangeTimes->{ 3.5614754101289787`*^9, 3.561475457403051*^9, 3.561475490453086*^9, 3.561475729068632*^9, {3.561475891440515*^9, 3.5614759238404913`*^9}, { 3.561475979511456*^9, 3.561476035943829*^9}, 3.5615587171198606`*^9, 3.561559490768626*^9, 3.561559631554126*^9, {3.561559688615102*^9, 3.5615597046292963`*^9}, {3.5615598468138847`*^9, 3.561559876148177*^9}, 3.561559946528863*^9, 3.561560187959085*^9, 3.561560237415291*^9, 3.561560662696212*^9, {3.561560882273375*^9, 3.561560911419794*^9}, 3.561567702073543*^9, 3.561575063101636*^9, 3.561902549587373*^9, 3.573990896517515*^9, 3.575029192880926*^9, 3.5752023226754093`*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["5.2.7) Dislocation Scattering", "Subsubtitle", CellChangeTimes->{{3.5614717074097347`*^9, 3.5614717309111567`*^9}, 3.5614717697429*^9, {3.561471810045616*^9, 3.561471811557592*^9}, 3.5615692846393557`*^9, {3.5739908131356573`*^9, 3.573990815607794*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"Seeger", " ", "Eq", " ", "6.15", ".6"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"LD", "[", RowBox[{"epsDc_", ",", "T_", ",", "Nd_"}], "]"}], ":=", SqrtBox[ FractionBox[ RowBox[{"epsDc", "*", "8.85", "*", SuperscriptBox["10", RowBox[{"-", "12"}]], "*", "1.6", "*", SuperscriptBox["10", RowBox[{"-", "19"}]], "*", "26", "*", SuperscriptBox["10", RowBox[{"-", "3"}]], "*", FractionBox["T", "300"]}], RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "19"}]]}], ")"}], "2"], "*", "Nd", "*", SuperscriptBox["10", "22"]}]]]}], ";"}], " ", RowBox[{"(*", " ", RowBox[{ "Non", " ", "degenerate", " ", "Debye", " ", "length", " ", "in", " ", "m"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"mudisl3d", "[", RowBox[{ "Ndis_", ",", "a_", ",", "T_", ",", "meff_", ",", "Nd_", ",", "epsDc_", ",", "f_"}], "]"}], ":=", RowBox[{ SuperscriptBox["10", "3"], "*", FractionBox[ RowBox[{"30", "*", SqrtBox[ RowBox[{"2", "*", "\[Pi]"}]], "*", SuperscriptBox[ RowBox[{"(", RowBox[{"epsDc", "*", "8.85", "*", SuperscriptBox["10", RowBox[{"-", "12"}]]}], ")"}], "2"], "*", SuperscriptBox[ RowBox[{"(", RowBox[{"a", "*", SuperscriptBox["10", RowBox[{"-", "10"}]]}], ")"}], "2"]}], RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "19"}]]}], ")"}], "3"], "*", SuperscriptBox["f", "2"], "*", RowBox[{"LD", "[", RowBox[{"epsDc", ",", "T", ",", "Nd"}], "]"}], "*", SqrtBox[ RowBox[{"meff", "*", "9.1", "*", SuperscriptBox["10", RowBox[{"-", "31"}]]}]]}]], "*", FractionBox[ SuperscriptBox[ RowBox[{"(", RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "19"}]], "*", "26", "*", SuperscriptBox["10", RowBox[{"-", "3"}]], "*", FractionBox["T", "300"]}], ")"}], FractionBox["3", "2"]], RowBox[{"Ndis", "*", SuperscriptBox["10", "12"]}]]}]}], ";"}], " ", RowBox[{"(*", RowBox[{ RowBox[{ "Dislocation", " ", "scattering", " ", "limited", " ", "mobility", " ", "in", " ", RowBox[{ SuperscriptBox["cm", "2"], "/", "Vs"}]}], ",", " ", RowBox[{"Ndis", " ", "is", " ", "in", " ", RowBox[{ SuperscriptBox["10", "8"], "/", SuperscriptBox["cm", "2"]}]}], ",", " ", RowBox[{"a", " ", "is", " ", "in", " ", "Angstroms"}], ",", " ", RowBox[{"Nd", " ", "is", " ", "in", " ", RowBox[{ SuperscriptBox["10", "16"], "/", SuperscriptBox["cm", "3"]}]}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"LogLogPlot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"mudisl3d", "[", RowBox[{ "1", ",", "5", ",", "T", ",", "0.2", ",", "30", ",", "10", ",", "1"}], "]"}], ",", RowBox[{"mudisl3d", "[", RowBox[{ "10", ",", "5", ",", "T", ",", "0.2", ",", "30", ",", "10", ",", "1"}], "]"}], ",", RowBox[{"mudisl3d", "[", RowBox[{ "100", ",", "5", ",", "T", ",", "0.2", ",", "30", ",", "10", ",", "1"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"T", ",", "1", ",", "300"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"AspectRatio", "\[Rule]", "1"}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}]}], "]"}]}]}]], "Input", CellChangeTimes->{{3.561561105083061*^9, 3.5615611868699503`*^9}, { 3.561561229099037*^9, 3.561561457091756*^9}, {3.561561580791285*^9, 3.56156188115864*^9}, {3.5615619347812366`*^9, 3.561562045016569*^9}, { 3.56156231477425*^9, 3.561562376955769*^9}, {3.5615669423244667`*^9, 3.561566945398243*^9}, {3.561567030918395*^9, 3.561567044242199*^9}, { 3.56156771134993*^9, 3.561567711853503*^9}, 3.561902578361372*^9}], Cell[BoxData[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwVxXsw1AkAB/DVsnkuu9ZPHtnfJdkR3VyK7q76fctjajwuK4+67dR26pIj qeGywl22uRN22soj5LHsrnWOo+kxck6OKJRpN6qlXF4VSY7W8+7++MznE2Es P3IFjUYL+M//7woYnXWnUrZ7bn++L8yGjnnfH20blAIqffqPtLf2dLiE2RYk K6OpnsoyZRpJx86IYcE3ShEVbX1cp3KmI/Cw/51A5QWqeFKXS/OgY29kyriv soBilFn3Kvl0hA3nGngpqyj1yuDQhQw6eivKWTuUDdTJR+38kiU6WK3SdrW2 kyp8oa7YNKuPbr7VmTufaqgrgSm6wAEDXGfIyh39tRTb6X3js2YGTAMsQ6LS BqmUhLSB2lsrMcPqeNRvO0zd4v22xCw2RFHr3O1EvdfU3yHzidfzjBC2OiD2 uXqcuvjG/EhXljHKE4zNN9RPUswXfwbFxJsgOVxVQJNNUUl7LuaGHTfF1IzY +eXJaeo6l9bfxjdD7JEPORVbZqhTYR5XKjczcb+zoHFp7UdqjUmGUrPeHC1T qYPfTuqo7qxGbYuhBQrMSxsODM5TBhpfjle6BUSLwaIv7y9SyUHu584sW0Cn wOfO0mVKIIqJPx3Hgsu6zZqeJhrch7ZYWI2zIA89ysyT6yFuMcg18SAblvSb JYqSFVAEz/2TomWDvuqR3CWHDrKfoUO4JZozzle5i/SxbC1M+qvDEieSBKbi UwbQZPurJnw5GG/viooQMMC5kb7/2W0OJlKNtqqolbjMdvRKc7VCf53wO3gY wqzqq777cisU+uyTCuyN8Ha6Y6LPloBfcIxNs5UxWpLUtRdyCCS3+7HzjU3w 3MO7+iPLGmeLWo10EyY4UKLnwjtnjZh3EYKSYVOodwcGLyxbw+3alV8fdpqh vmRsXhq/CiduXI47WcOExm1M++rVKpT61UkOVJjj3WzC908jbBDE9Xwy4mOB 2LgQkbTHBu2aMqlPswVGeM1b3gfaQrEtovuIBwut2cmn2Hdt0d571nuHgoUR l8Kxt5vsMFjrdrTJkQ2avr9pdI0dhF+sN6LnsJF6YXd1taM9+mg3w19bWmKW r1m8XGwP6bzi5S9ZlqgNaBN72K1Gffno2ASNg55ZRnZ+5mo8yLxxbVbEwesB tXeZkQP8ndSP705yEJXw4YfYZAcw34d67RZawdXr9Oj0hAPa5o5GxGutMOQv 1udGcTFa1zZ3cA8BBmP4mqmWi62963hCPoH9Lj6dZgNcSBbSQw7vJVAdKJtj vuTC08e7JjKcQGiOMIQ1xIVY0xQZdZCAjDdgTIxzsVZ362H8CQI7/XpPcxe5 OLS9qkIsIYBdQ055TBL1QpPH5y8SOPb0UkOeOQnD81F6P18iII32Ds63IFHT zRNk5BIYkZSlXmWToB0qZ0mKCWT3HXpWSJAo+qlIlFdDoD+qX1LqQGJKvqjM /52A4WKmcxmXhO8DwZOr9QQ2Zm9rLCNJjHPsNhbdJCCuK3gjW0Nia0XOSGkT AbeF/b7ydSQkHTMcWTOBsCxjrdyZxKuJkJ3lLQTSyNvxCh6JDE9Oofwegcfe NiVKFxL9X8d3KDoILGnueVauJ7ExtWdW+YAA71hiV6UrCbHsMydVFwH+vHOk yo3E03sSftVDAqLMJ/OqDST+BfJMJR8= "]]}, {Hue[0.9060679774997897, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwVzn84E3gcwPExv2bCbPvOVNfTKTrk+kkK30/FnGMUCbWoRe7xSH6cdJof d/ccT7+udcvvtfyabQ+VDqGHTkuyEauQkjo6P89GCq2dc90f7+f972st91RQ tD6BQGB/7v9/w55Y3IozPT3WDbXV1tVjHesnm2YZB/+jDr4fZn8HO4TaCNNl cfh8g7JlqfAO3hM5xomQ8fCDbxvv+GQ24IDj/i0Bsos4IlEgHfRtwgeiM9Us mRDb3PO9SHzTjEPHCgz3yqqxznFQJjOQ44FKMWW3rBl3PPRJ1DorMKVdoOgb eow9OAbhDE4v7gmip7V83Y/1ugI1k8JBXG9UIbb1H8JzeMZMyhnGZmxqSOyP I1hybtNlwo5RvEBRPnltM4b5AePklCcTWNT+6e4ZvSnsSrSeN2+cxqGr2ade 9anxR6f6A26sWSxONbVwrpvF7+hMpx8s5nB6WJWQUDGHOxeamvyW3+O5hWz7 4aQPGOfmejl1z+NTJ97nV+5YwM0G+vXvBIu487Hw3r/rPmKbuKpB3ywtbpvL Goma1WLqlcvLt/x0WGhR1nxkRIcnb9S8kHosYd5SMG9X5xJWFnMLs+2WsVYK bvaCZVxebu/olkoAB7vt/U9bCbA/pTnqTLweSA7GmBdK9KBbrBF6hugDldhY Ki3Vh51BeFNAIBGI1k8kDvlEcIgJc1F5GYD8Qk71Vp4BTL403/XiK0NIOMsx y/7eEPKVb4scvzQCtaI7NpJjBFTmQa2BqTFoskjuVdgY6Cq+cp/aGF7Xcr8D FxMwJE4tjL41gWve4QLOKhK0Xf1zrb6SBH7B8Uw53RSSyuYlMQ9MIV3hZ1Vk SoZy62cluJEMGaJ2klZDhgo1u0AkNIP4mUhO6ZgZ5HqOT7GuroCN1/NuqB6v gGDNavfTZ80hoSE3ManGHPKMVhOsIyygzK+Wf6TSAqLY1y7rOVjC/jWuz8e9 LWG0PU10V2gJiv5ygbfcEjgZ44esmRSQekT2nHChwK7Rsjy3SxRQDGR47ZZS gJMlJ9OWKTBye2NMq60VpIQnOgvSrIC705FEzLeC+eF4VZ/aCl4QGsOmqFQ4 KdWtaYmlgkAnHT7/KxXsyqelR0apUCeemNQQaODDdrp9P5QGXZcari/yaBC5 XXdC+YwG/uv7eh/M0uBNl7Uwz4cO5u8O7vXl0qG0oMh0VRMdHn2KiUweosOh sio71jYEE7WPPh3dh4B3mCzfKkHgPmC3gRuEQJUZO7NNhoD/zy8hxw8gsK1Q rHKpQuDq7VUTHYagczondcctBNn9rdGxRxHYZBhs9GhAsE7bpEpOQNBYspTP eoTgmGd1ZTYfwYfRmZPh4wjquOTenN8Q+JgGFh+aRGCSE6t37iqCYuebHYf/ RlDTs4FzoQCBV2qcbcQMAsIxMYVfgkBgMjnAXUQg+lnEK6xBsNlxZG+cMQPm JEuyot8/OwJ3J54kMYDVxXleXIfgZXKJKJ7MADVt5RZRI4Ks5ghtggUD3Cvz x8taEfSwB2+mMBjAVy7QKuSf3Uk7X51mMuAvTcgecRuC1LxC0pmVDLjgSrsm 6UDwxZvQqLQ1DHh9OFkpVSJIJDZcObuWAVuyni7KuhA8tEd/8GwZkF2xeX1V NwKmf8p0+noGvOzgB1WrEMQn9DIz7RnwH3LqKG0= "]]}, {Hue[0.1421359549995791, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAASE3o9zM/fz70a44dDL4BwPtGghq8 qVw/prWq9Xa6AcAqVxqcfalsP1n/xs3htgHAQl/mXF6pfD/Akv99t68BwE5j TL1OqYw/i7lw3mKhAcBUZX/tRqmcPyUHU5+5hAHAV+aYBUOprD9WohchZ0sB wNimpRFBqbw/udigJMLYAMARxpPJ1d3NPxyTKaFdwP+/z1IVer0v1j8qt9b7 KPD9v7UGpKUjTN0/MgrzcA8p/L8MTRNVaoHiP1hl0i9jO/q/9hHK0d4a5j/j AnfxqG74v57G+rp4Aeo/kKje/Ft79r9XHU1v3NXtPzN9tSIqkfS/pXcKDy60 8D85lFFL6sfyv31Yq5wApPI/YbOwvRfY8L/y9oYn4XL0P9gpqmVuEu6/b2bz l6Y49j/eStGE44bqv8vNnL7+JPg/I3x+NzOu5r/E8oDiZPD5PzIytu9mF+O/ nA+ivF3i+z8G8ed26mbev3z9U3w7y/0/hDkgeHPD1r/5qEA5J5P/Py0X2wiJ R8+/KiY11tLAAECL+BvfKqe/v6dWZw6ZpwFA/0evxh5zhr8TA7ihqKECQIWk P5GOc7w/AxjRpyqXA0BEITGq55HNP8KLh6wzfARAly7M+jvx1T9we1wMhnQF QAusc/nOs90/7cnOal9cBkD4D4P2THniP+6ACTyrPwdA/OttO3wG5j/es2Jo QDYIQL230uzQ4Ok/nUVZk1wcCUC3/qyYQXntP0tTbhnCFQpAuJqA2Guv8D99 yUsSmgoLQBuHO8obmfI/fp7GCfnuC0AeMTG52WH0P27vX1yh5gxA/tJjXipR 9j8tn5at0M0NQHwy0QCJH/g/cLeVcXKwDkACY8+IzOT5P6JLs5Bdpg9AZosK x6LQ+z9RHzfX50UQQGdxgAKHm/0/ydajk0XCEEBGTzP0/Yz/P6g9X89mNhFA YXWQccGuAEDJ2H5EQagRQKOrz1t2kgFA4rEtZ8AjEkDVXS2hdIkCQGI6KwkD lxJA1W4o5flvA0DZALhY6hMTQMT7QYTIaQRAk/uo4YqOE0A38SOWCV8FQLSl 6OnuABRAeUWjptFDBkDMjbef93wUQKgVQRLjOwdATCXV1MPwFECpRHx8eyMI QA7xVkNJYhVALdx/WYYGCUDH+mdfc90VQJ7voZHa/AlA6LPH+mBQFkDiYWHI teIKQDzYJihiUhZAiaofI7jmCkCQ/IVVY1QWQDHz3X266gpAN0VEsGVYFkCA hFozv/IKQIbWwGVqYBZAHadTnsgCC0Ak+bnQc3AWQFrsRXTbIgtAYT6spoaQ FkDTdiogAWMLQLRiC9SHkhZAeb/oegNnC0AIh2oBiZQWQCIIp9UFawtAsM8o XIuYFkBymSOLCnMLQABhpRGQoBZAEbwc9hODC0Ceg558mbAWQE0BD8wmowtA 8qf9qZqyFkD2Sc0mKacLQEbMXNebtBZAnZKLgSurC0DtFBsynrgWQOsjCDcw swtAPKaX56LAFkCJRgGiOcMLQJDK9hSkwhZAMo+//DvHC0Dk7lVCpcQWQNnX fVc+ywtAizcUnafIFkAnafoMQ9MLQN5bc8qoyhZAzbG4Z0XXC0AygNL3qcwW QHX6dsJH2wtAhqQxJavOFkAdQzUdSt8LQNrIkFKs0BZAxYvzd0zjC0DLNEkG "]]}}, AspectRatio->1, Axes->True, AxesOrigin->{0, -2.217796545895448}, BaseStyle->{FontSize -> 15}, CoordinatesToolOptions:>{"DisplayFunction" -> ({ Exp[ Part[#, 1]], Exp[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ Exp[ Part[#, 1]], Exp[ Part[#, 2]]}& )}, Frame->True, FrameLabel->{ FormBox["\"T (K)\"", TraditionalForm], FormBox[ "\"Mobility (\\!\\(\\*SuperscriptBox[\\(cm\\), \\(2\\)]\\)/Vs)\"", TraditionalForm]}, FrameTicks->{{{{-2.3025850929940455`, FormBox["0.1`", TraditionalForm]}, {0., FormBox["1", TraditionalForm]}, {2.302585092994046, FormBox["10", TraditionalForm]}, {4.605170185988092, FormBox["100", TraditionalForm]}, {6.907755278982137, FormBox["1000", TraditionalForm]}, {9.210340371976184, FormBox[ TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {-1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.203972804325936, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.5108256237659905, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.35667494393873245`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.2231435513142097, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.10536051565782616`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {7.600902459542082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.006367567650246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.294049640102028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.517193191416238, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.699514748210191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.85366542803745, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.987196820661973, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.104979856318357, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{-2.3025850929940455`, FormBox["\"\"", TraditionalForm]}, {0., FormBox["\"\"", TraditionalForm]}, {2.302585092994046, FormBox["\"\"", TraditionalForm]}, {4.605170185988092, FormBox["\"\"", TraditionalForm]}, {6.907755278982137, FormBox["\"\"", TraditionalForm]}, {9.210340371976184, FormBox["\"\"", TraditionalForm]}, {-1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.203972804325936, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.5108256237659905, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.35667494393873245`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.2231435513142097, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.10536051565782616`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {7.600902459542082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.006367567650246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.294049640102028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.517193191416238, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.699514748210191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.85366542803745, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.987196820661973, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.104979856318357, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}, {{{0., FormBox["1", TraditionalForm]}, {0.6931471805599453, FormBox["2", TraditionalForm]}, {1.6094379124341003`, FormBox["5", TraditionalForm]}, {2.302585092994046, FormBox["10", TraditionalForm]}, {2.995732273553991, FormBox["20", TraditionalForm]}, {3.912023005428146, FormBox["50", TraditionalForm]}, {4.605170185988092, FormBox["100", TraditionalForm]}, {5.298317366548036, FormBox["200", TraditionalForm]}, {6.214608098422191, FormBox["500", TraditionalForm]}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{0., FormBox["\"\"", TraditionalForm]}, {0.6931471805599453, FormBox["\"\"", TraditionalForm]}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm]}, {2.302585092994046, FormBox["\"\"", TraditionalForm]}, {2.995732273553991, FormBox["\"\"", TraditionalForm]}, {3.912023005428146, FormBox["\"\"", TraditionalForm]}, {4.605170185988092, FormBox["\"\"", TraditionalForm]}, {5.298317366548036, FormBox["\"\"", TraditionalForm]}, {6.214608098422191, FormBox["\"\"", TraditionalForm]}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}}, GridLines->{None, None}, Method->{}, PlotRange->NCache[{{0, Log[300]}, {-2.217796545895448, 8.091155881941397}}, {{ 0, 5.703782474656201}, {-2.217796545895448, 8.091155881941397}}], PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}, Ticks->{{{0., FormBox["1", TraditionalForm]}, {0.6931471805599453, FormBox["2", TraditionalForm]}, {1.6094379124341003`, FormBox["5", TraditionalForm]}, {2.302585092994046, FormBox["10", TraditionalForm]}, {2.995732273553991, FormBox["20", TraditionalForm]}, {3.912023005428146, FormBox["50", TraditionalForm]}, {4.605170185988092, FormBox["100", TraditionalForm]}, {5.298317366548036, FormBox["200", TraditionalForm]}, {6.214608098422191, FormBox["500", TraditionalForm]}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{-2.3025850929940455`, FormBox["0.1`", TraditionalForm]}, {0., FormBox["1", TraditionalForm]}, {2.302585092994046, FormBox["10", TraditionalForm]}, {4.605170185988092, FormBox["100", TraditionalForm]}, {6.907755278982137, FormBox["1000", TraditionalForm]}, {9.210340371976184, FormBox[ TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {-1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-1.203972804325936, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.916290731874155, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.5108256237659905, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.35667494393873245`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.2231435513142097, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-0.10536051565782616`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.6931471805599453, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.995732273553991, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.912023005428146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.248495242049359, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.298317366548036, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.703782474656201, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.214608098422191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.551080335043404, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.684611727667927, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.802394763324311, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {7.600902459542082, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.006367567650246, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.294049640102028, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.517193191416238, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.699514748210191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.85366542803745, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {8.987196820661973, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {9.104979856318357, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}]], "Output", CellChangeTimes->{ 3.561561823262054*^9, {3.561561857187956*^9, 3.561561881550868*^9}, 3.561561936329774*^9, 3.561562045512844*^9, 3.5615677129351997`*^9, 3.5619025838239517`*^9, 3.573990899231946*^9, 3.575029195966136*^9, 3.5752023269698133`*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["5.2.8) Alloy Scattering", "Subsubtitle", CellChangeTimes->{{3.5614717074097347`*^9, 3.5614717309111567`*^9}, 3.5614717697429*^9, {3.561471810045616*^9, 3.561471811557592*^9}, { 3.561472092536283*^9, 3.5614720969198723`*^9}, 3.561569289999569*^9, { 3.573990819775598*^9, 3.5739908216954203`*^9}}], Cell["5.2.9) All Combined", "Subsubtitle", CellChangeTimes->{{3.5614717074097347`*^9, 3.5614717309111567`*^9}, 3.5614717697429*^9, {3.561471810045616*^9, 3.561471811557592*^9}, { 3.561472092536283*^9, 3.5614720969198723`*^9}, {3.561562087801815*^9, 3.5615620942087317`*^9}, 3.561569293303426*^9, {3.57399082399162*^9, 3.573990826607739*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"LogLogPlot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"mupop3d", "[", RowBox[{"T", ",", "92", ",", "0.2", ",", "5", ",", "9"}], "]"}], ",", RowBox[{"mudisl3d", "[", RowBox[{ "Ndis", ",", "5", ",", "T", ",", "0.2", ",", "30", ",", "10", ",", "1"}], "]"}], ",", RowBox[{"muacdp", "[", RowBox[{"T", ",", "8.4", ",", "0.2", ",", "2.65"}], "]"}], ",", RowBox[{"muIonizedImp", "[", RowBox[{"Nd", ",", "9", ",", "300", ",", "0.2", ",", "Nd"}], "]"}], ",", RowBox[{"muNeutral", "[", RowBox[{"Nx", ",", "0.2", ",", "9"}], "]"}], ",", RowBox[{"1", "/", RowBox[{"(", RowBox[{ FractionBox["1", RowBox[{"mupop3d", "[", RowBox[{"T", ",", "92", ",", "0.2", ",", "5", ",", "9"}], "]"}]], "+", FractionBox["1", RowBox[{"mudisl3d", "[", RowBox[{ "Ndis", ",", "5", ",", "T", ",", "0.2", ",", "30", ",", "10", ",", "1"}], "]"}]], "+", FractionBox["1", RowBox[{"muacdp", "[", RowBox[{"T", ",", "8.4", ",", "0.2", ",", "2.65"}], "]"}]], "+", FractionBox["1", RowBox[{"muIonizedImp", "[", RowBox[{"Nd", ",", "9", ",", "300", ",", "0.2", ",", "Nd"}], "]"}]], "+", FractionBox["1", RowBox[{"muNeutral", "[", RowBox[{"Nx", ",", "0.2", ",", "9"}], "]"}]]}], ")"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{"T", ",", "1", ",", "300"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ SuperscriptBox["10", "1"], ",", SuperscriptBox["10", "7"]}], "}"}]}], ",", RowBox[{"AspectRatio", "\[Rule]", "1"}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"Ndis", ",", "0.01", ",", "100"}], "}"}], ",", RowBox[{"{", RowBox[{"Nd", ",", "0.1", ",", "50"}], "}"}], ",", RowBox[{"{", RowBox[{"Nx", ",", "0.01", ",", "5"}], "}"}]}], "]"}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{"Plotting", " ", "for", " ", "GaN"}], ",", " ", RowBox[{ RowBox[{ "be", " ", "aware", " ", "of", " ", "the", " ", "approximations", " ", "such", " ", "as", " ", "non"}], "-", RowBox[{"degenerate", " ", "carriers"}]}], ",", " ", "etc"}], " ", "*)"}]}]], "Input", CellChangeTimes->{{3.561562101342125*^9, 3.5615622782018223`*^9}, { 3.5615624098414392`*^9, 3.561562448380075*^9}, {3.5615667468282557`*^9, 3.561566754712826*^9}, {3.561650259936666*^9, 3.561650328470435*^9}, { 3.561650372201475*^9, 3.561650470918858*^9}, {3.5616505078156853`*^9, 3.561650517256212*^9}, 3.56165055619981*^9, {3.5616506089360867`*^9, 3.561650627075959*^9}, {3.561650683876622*^9, 3.5616507112909718`*^9}, { 3.56165080243608*^9, 3.561650827906301*^9}}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`Nd$$ = 0.1, $CellContext`Ndis$$ = 0.01, $CellContext`Nx$$ = 0.01, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`Ndis$$], 0.01, 100}, { Hold[$CellContext`Nd$$], 0.1, 50}, { Hold[$CellContext`Nx$$], 0.01, 5}}, Typeset`size$$ = { 360., {174., 181.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`Ndis$10381$$ = 0, $CellContext`Nd$10382$$ = 0, $CellContext`Nx$10383$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`Nd$$ = 0.1, $CellContext`Ndis$$ = 0.01, $CellContext`Nx$$ = 0.01}, "ControllerVariables" :> { Hold[$CellContext`Ndis$$, $CellContext`Ndis$10381$$, 0], Hold[$CellContext`Nd$$, $CellContext`Nd$10382$$, 0], Hold[$CellContext`Nx$$, $CellContext`Nx$10383$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> LogLogPlot[{ $CellContext`mupop3d[$CellContext`T, 92, 0.2, 5, 9], $CellContext`mudisl3d[$CellContext`Ndis$$, 5, $CellContext`T, 0.2, 30, 10, 1], $CellContext`muacdp[$CellContext`T, 8.4, 0.2, 2.65], $CellContext`muIonizedImp[$CellContext`Nd$$, 9, 300, 0.2, $CellContext`Nd$$], $CellContext`muNeutral[$CellContext`Nx$$, 0.2, 9], 1/( 1/$CellContext`mupop3d[$CellContext`T, 92, 0.2, 5, 9] + 1/$CellContext`mudisl3d[$CellContext`Ndis$$, 5, $CellContext`T, 0.2, 30, 10, 1] + 1/$CellContext`muacdp[$CellContext`T, 8.4, 0.2, 2.65] + 1/$CellContext`muIonizedImp[$CellContext`Nd$$, 9, 300, 0.2, $CellContext`Nd$$] + 1/$CellContext`muNeutral[$CellContext`Nx$$, 0.2, 9])}, {$CellContext`T, 1, 300}, Frame -> True, PlotRange -> {10^1, 10^7}, AspectRatio -> 1, PlotStyle -> Thick, FrameLabel -> { "T (K)", "Mobility (\!\(\*SuperscriptBox[\(cm\), \(2\)]\)/Vs)"}, BaseStyle -> {FontSize -> 15}], "Specifications" :> {{$CellContext`Ndis$$, 0.01, 100}, {$CellContext`Nd$$, 0.1, 50}, {$CellContext`Nx$$, 0.01, 5}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{403., {245., 251.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{{3.561562166327074*^9, 3.561562205379724*^9}, { 3.561562241137618*^9, 3.5615622792690907`*^9}, {3.561562433661272*^9, 3.5615624491955013`*^9}, {3.5615667479816637`*^9, 3.561566755913455*^9}, 3.561650479392212*^9, {3.561650509693368*^9, 3.561650518308103*^9}, 3.561650557532029*^9, 3.561650629485869*^9, 3.5616507135405617`*^9, 3.561902618601123*^9, 3.5739909021662188`*^9, 3.5750291990841913`*^9, 3.575202330639434*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[StyleBox["5.3) Diffusive Charge Transport in Heterostructures", \ "Subtitle"]], "Subsubtitle", CellChangeTimes->{{3.492861069259028*^9, 3.4928611014194098`*^9}, { 3.496030277369309*^9, 3.496030287282919*^9}, {3.497106630417016*^9, 3.497106637191511*^9}, {3.561471490343113*^9, 3.561471504867713*^9}, { 3.56147165526653*^9, 3.561471655448987*^9}, {3.561471952917699*^9, 3.561471956546934*^9}, {3.561471987026391*^9, 3.561471994425887*^9}, { 3.5739908324151707`*^9, 3.57399083488791*^9}}], Cell["\<\ 5.3.1) Neutral Impurity Scattering\ \>", "Subsubtitle", CellChangeTimes->{{3.5614717074097347`*^9, 3.5614717309111567`*^9}, 3.5614720079217863`*^9, {3.573990838463375*^9, 3.573990840783441*^9}}], Cell["\<\ 5.3.2) Charged Impurity Scattering\ \>", "Subsubtitle", CellChangeTimes->{{3.5614717074097347`*^9, 3.561471749087064*^9}, 3.561472015281474*^9, {3.573990843599452*^9, 3.573990846710948*^9}}], Cell["\<\ 5.3.3) Acoustic Phonon Scattering\ \>", "Subsubtitle", CellChangeTimes->{{3.5614717074097347`*^9, 3.561471759166543*^9}, 3.561472018393608*^9, 3.573990853329529*^9}], Cell[TextData[{ "5.3.4) ", StyleBox["Optica", FontSlant->"Italic"], "l Phonon Scattering" }], "Subsubtitle", CellChangeTimes->{{3.5614717074097347`*^9, 3.5614717309111567`*^9}, { 3.561471764038548*^9, 3.5614717962380657`*^9}, 3.561472020793536*^9, 3.5739908557367773`*^9}], Cell[TextData[{ "5.3.5) Polar ", StyleBox["Optica", FontSlant->"Italic"], "l Phonon Scattering" }], "Subsubtitle", CellChangeTimes->{{3.5614717074097347`*^9, 3.5614717309111567`*^9}, 3.5614717672464933`*^9, {3.561471800829832*^9, 3.5614718046135473`*^9}, { 3.561472023017346*^9, 3.561472026233342*^9}, 3.57399085800042*^9}], Cell["5.3.6) Dislocation Scattering", "Subsubtitle", CellChangeTimes->{{3.5614717074097347`*^9, 3.5614717309111567`*^9}, 3.5614717697429*^9, {3.561471810045616*^9, 3.561471811557592*^9}, 3.561472028673362*^9, 3.573990861571059*^9}], Cell["\<\ 5.3.7) Interface Roughness Scattering\ \>", "Subsubtitle", CellChangeTimes->{{3.5614717074097347`*^9, 3.5614717309111567`*^9}, 3.5614717697429*^9, {3.561471810045616*^9, 3.561471811557592*^9}, { 3.561472028673362*^9, 3.5614720523526707`*^9}, 3.573990863680307*^9}], Cell["5.3.8) Alloy scattering", "Subsubtitle", CellChangeTimes->{{3.5614717074097347`*^9, 3.5614717309111567`*^9}, 3.5614717697429*^9, {3.561471810045616*^9, 3.561471811557592*^9}, { 3.561472028673362*^9, 3.561472070872449*^9}, 3.5739908665522842`*^9}], Cell[CellGroupData[{ Cell["\<\ [6] Tunneling Transport in Semiconductors\ \>", "Section", CellChangeTimes->{{3.558880162123597*^9, 3.558880176788707*^9}, { 3.5614713141646137`*^9, 3.561471323495611*^9}, {3.5614713536240683`*^9, 3.5614713685260878`*^9}, {3.56147159539712*^9, 3.5614715961699467`*^9}, { 3.562500728245418*^9, 3.562500753643551*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"h", "=", RowBox[{"6.63", "*", SuperscriptBox["10", RowBox[{"-", "34"}]]}]}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{ RowBox[{"Planck", "'"}], "s", " ", "constant"}], ",", " ", RowBox[{"J", ".", "s"}]}], " ", "*)"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "=", RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "19"}]]}]}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{"Electron", " ", "Charge"}], ",", " ", "Coulomb"}], " ", "*)"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"m0", "=", RowBox[{"9.1", "*", SuperscriptBox["10", RowBox[{"-", "31"}]]}]}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{"Free", " ", "electron", " ", "mass"}], ",", " ", "kg"}], " ", "*)"}], ";"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{"Simplest", " ", "'"}], "attempt", " ", RowBox[{"frequency", "'"}], " ", "model"}], " ", "*)"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Twkb", "[", RowBox[{"m_", ",", "hbar_", ",", "EG_", ",", "F_"}], "]"}], "=", RowBox[{"Exp", "[", RowBox[{ RowBox[{"-", "2"}], "*", RowBox[{ SubsuperscriptBox["\[Integral]", "0", RowBox[{"EG", "/", "qF"}]], RowBox[{ SqrtBox[ RowBox[{ FractionBox[ RowBox[{"2", "*", "m"}], SuperscriptBox["hbar", "2"]], "*", RowBox[{"(", RowBox[{"EG", "-", RowBox[{"qF", "*", "x"}]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "]"}]}], " ", RowBox[{"(*", " ", RowBox[{"WKB", " ", "tunneling", " ", "probability"}], " ", "*)"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Jtquick", "[", RowBox[{ "a_", ",", "Nv_", ",", "mstar_", ",", "F_", ",", "V_", ",", "EG_"}], "]"}], ":=", RowBox[{ FractionBox[ SuperscriptBox["q", "2"], "h"], "*", RowBox[{"(", RowBox[{"a", "*", "Nv"}], ")"}], "*", RowBox[{"Exp", "[", RowBox[{"-", FractionBox[ RowBox[{"4", SqrtBox[ RowBox[{"2", "*", "mstar", "*", "m0"}]], "*", SuperscriptBox[ RowBox[{"(", "EG", ")"}], FractionBox["3", "2"]]}], RowBox[{"3", "*", "q", "*", FractionBox["h", RowBox[{"2", "\[Pi]"}]], "*", "F"}]]}], "]"}], "*", "V"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"LogLogPlot", "[", RowBox[{ RowBox[{ RowBox[{"Jtquick", "[", RowBox[{ RowBox[{"3.15", "*", SuperscriptBox["10", RowBox[{"-", "10"}]]}], ",", RowBox[{"3", "*", SuperscriptBox["10", "24"]}], ",", "0.2", ",", RowBox[{"F", "*", SuperscriptBox["10", "8"]}], ",", "0.2", ",", RowBox[{"q", "*", "3.4"}]}], "]"}], "*", SuperscriptBox["10", RowBox[{"-", "4"}]]}], ",", RowBox[{"{", RowBox[{"F", ",", "5", ",", "15"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", RowBox[{"AspectRatio", "\[Rule]", "2"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\<\!\(\*SubscriptBox[\(J\), \(T\)]\) (A/\!\(\*SuperscriptBox[\(cm\), \ \(2\)]\))\>\""}], "}"}]}]}], "]"}], "\[IndentingNewLine]", RowBox[{"LogLogPlot", "[", RowBox[{ RowBox[{ RowBox[{"Jtquick", "[", RowBox[{ RowBox[{"3.15", "*", SuperscriptBox["10", RowBox[{"-", "10"}]]}], ",", RowBox[{"3", "*", SuperscriptBox["10", "24"]}], ",", "0.07", ",", RowBox[{"F", "*", SuperscriptBox["10", "8"]}], ",", "0.2", ",", RowBox[{"q", "*", "1.4"}]}], "]"}], "*", SuperscriptBox["10", RowBox[{"-", "4"}]]}], ",", RowBox[{"{", RowBox[{"F", ",", "1", ",", "5"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", RowBox[{"AspectRatio", "\[Rule]", "2"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\<\!\(\*SubscriptBox[\(J\), \(T\)]\) (A/\!\(\*SuperscriptBox[\(cm\), \ \(2\)]\))\>\""}], "}"}]}]}], "]"}]}], "Input", CellChangeTimes->{{3.499922117195776*^9, 3.499922222230146*^9}, { 3.499922310712257*^9, 3.499922333504731*^9}, {3.499925116075225*^9, 3.499925157395851*^9}, {3.4999257039001007`*^9, 3.499925905185136*^9}, { 3.499925998290276*^9, 3.499925998746114*^9}, {3.499926677995268*^9, 3.499926678401314*^9}, {3.499962780792109*^9, 3.499962904300741*^9}, 3.499962945023963*^9, {3.499962985347877*^9, 3.499963074179044*^9}, { 3.499963128570383*^9, 3.499963212744075*^9}, {3.562500884284813*^9, 3.5625008855541677`*^9}, {3.562500920666333*^9, 3.5625009846491003`*^9}, 3.562501015383896*^9, {3.5625010490154743`*^9, 3.5625010608135443`*^9}, 3.56250109467305*^9, {3.562501155156527*^9, 3.5625012913956633`*^9}, { 3.562501417872588*^9, 3.5625015272702312`*^9}, {3.5625016077891283`*^9, 3.5625016084762506`*^9}, {3.562501643884026*^9, 3.562501644451995*^9}, { 3.562501679915958*^9, 3.562501707746491*^9}, {3.562502287648487*^9, 3.5625022881594057`*^9}, {3.562502450333041*^9, 3.562502472930853*^9}, { 3.5625025122512207`*^9, 3.562502531697707*^9}, {3.562502710375882*^9, 3.56250271384658*^9}, {3.5625028614532843`*^9, 3.562502864988266*^9}}], Cell[BoxData[ SuperscriptBox["\[ExponentialE]", RowBox[{"-", FractionBox[ RowBox[{"4", " ", SqrtBox["2"], " ", "EG", " ", SqrtBox[ FractionBox[ RowBox[{"EG", " ", "m"}], SuperscriptBox["hbar", "2"]]]}], RowBox[{"3", " ", "qF"}]]}]]], "Output", CellChangeTimes->{ 3.562501105011079*^9, 3.562501307273075*^9, {3.562501662031858*^9, 3.5625017139667997`*^9}, 3.562502310111417*^9, 3.562502502974997*^9, 3.562502545965477*^9, 3.562502719834157*^9, 3.562502874538219*^9, 3.5753685369091177`*^9, 3.575372306726478*^9, 3.575380287487636*^9}], Cell[BoxData[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[CompressedData[" 1:eJwVkHs0lHkcxt+5vFGNWrdJw4SSJdalwqvi95vu7VKORMoKlUapVBpkXLqQ nEo5SrU0IimOWZFhu81XVEQdRVNk0GJGqeOyLYYZdvaP5zznOZ/nj+c8lmGH fffSCYLw1up/v7FpRMMDFUpLsvflPKYgJkvXu6BGhXKqXtu8qabAr2tBDrNW haiIVRtPVVIw5/hvK14+VyFrs4jQATEFJ/NuC7waVeiosY8ablHAH/Mf9Jep 0JD045u4sxS4Fj7qPvBNhfxuGD2y3EpBC5FSe8VkAnUMj27dNOAGExk/TgfE TiATxi97BvXcQLxuYz28nUAWo598uta4wt7yBL0I20kk2LcthH7KBWaNZXgn pU2isGyX+B0PlsOqsFR9j8+TaC1lkyAeXwZBhYHNfJ4afTMS6sucl0GSaM6l FpEaVclf+poeWwoOUNTSN6ZGh3VTi7jPnaGpmmsQHqBBg41mojyWM4x+iGm9 UKZBQtt/RKv2OMEicUX2D50pFKb+PXlniiN4BjVtawifQjbiqENCBwdQODVk r5NOofSJe/EF/9qDUJ7f6mg+jRbMbB7VL7YDY16wQWCCNiOXdp3IJbCyUdNi +34a1WVwxoY22cJdtsfG5RwCW4wVwmq2DYzvOMgvWk/g6lKfIoHGGtBsVupb AYH3f2RbE62LQTfb1Mr0DoEfftjsL5ZYwTxX7hnqHYGzUtQbQssXAZd34TOL TsP1uwO2R95cCPt3DRKVDjRc/tOCc6n5lkAFPssT7qBhQUTJsbYyC9A8ZXhO nqNhFniY9ISYgy7llustoWEvbvW64fNcmM1tU/krtPzQ0yDjXFPIkA/Ikozp uD7l+/fjNfMh8P7QcSGPju9+8mq7PtcEOMO7DZyO0HFUo++t02vYsHBtQ1RV Lh0b9SUMZYuMoOSoaEtwAx03Gfb0VbIMwU6v1+7xOB3bxG2WLQ7Vh5GHnFff rRiY2ryyjS2ZC2Wt0r0yPwZ2jLGs5MSz4AEtoDbzJANfS/NX26TNBPdZu24d KmXg5N4cXnvFDKhMfC+kyRk4KnhD4bkKBsTO8OTwZzJxNGskePcoAUsnjCpT 3Jm4LJ04wjZXSw82BDU/4zMxX0LUz7o4Kh0suVraksXE20s1XcwTw1L+hGfa H3VM7BhXY73FsV/6c1CbldswE2uKIxvnSTqk+6738kbMSHx2OtcwvaJWKlod HLTHi8SJNYT8tW8d4k43UMWxJO58YmvBiexA9XToPxxH4l3mRYqnjztQ9AzJ NZcTJIYtT3p36snRK738cYgncYJdZXqiWI4EZieqPySSWOQuywwf6kTN7kso MoXEiNXJDf2rG52JTncLuUxin3bRFRnVgxxjk5WLM0lMVE3ZlYb0oPZ4QfaA NjuLzL4mpfUg59NhY4IsEocm6nfN/9iDOi+vqLqQTeI3Siwxj+lF1J9fXR/l knhYWRB57EEf6invViTfJLHTkvASVkcfuiiRXV0vIvF9Wsu8fIYC9T15Nvo2 j8RlBtbxNb4KlNl0Q9JfQOLkpQzBuyEF8mi+FC6+re2/O2DvbaJE/S2p7OhC EneHHDGsQ0rk+emoYPoOicNeNEbfuahEXzr51s+LtPxFx6C+RImy/g6Wpd/V 7tVh5MbJlQgr/FJ97pHYPDVHKGf2o4Evv7qyi7V/uulkeNj3o/8AjDlNiw== "]]}}, AspectRatio->2, Axes->True, AxesOrigin->NCache[{ Log[5], -24.734776626457034`}, { 1.6094379124341003`, -24.734776626457034`}], BaseStyle->{FontSize -> 15}, CoordinatesToolOptions:>{"DisplayFunction" -> ({ Exp[ Part[#, 1]], Exp[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ Exp[ Part[#, 1]], Exp[ Part[#, 2]]}& )}, Frame->True, FrameLabel->{ FormBox[ "\"F (\\!\\(\\*SuperscriptBox[\\(10\\), \\(6\\)]\\) V/cm)\"", TraditionalForm], FormBox[ "\"\\!\\(\\*SubscriptBox[\\(J\\), \\(T\\)]\\) (A/\\!\\(\\*SuperscriptBox[\ \\(cm\\), \\(2\\)]\\))\"", TraditionalForm]}, FrameTicks->{{{{-25.328436022934504`, FormBox[ TemplateBox[{"10", RowBox[{"-", "11"}]}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {-20.72326583694641, FormBox[ TemplateBox[{"10", RowBox[{"-", "9"}]}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {-16.11809565095832, FormBox[ TemplateBox[{"10", RowBox[{"-", "7"}]}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {-11.512925464970229`, FormBox[ TemplateBox[{"10", RowBox[{"-", "5"}]}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {-6.907755278982137, FormBox["0.001`", TraditionalForm]}, {-2.3025850929940455`, FormBox["0.1`", TraditionalForm]}, {-22.843529373146502`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-22.192941807005354`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-21.80207549831834, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-21.521773533164183`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-21.303084332199354`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-21.123743403543536`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-20.97172719624491, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-20.839799653202363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-18.238359187158412`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-17.58777162101726, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-17.196905312330248`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-16.916603347176093`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-16.69791414621126, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-16.518573217555446`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-16.36655701025682, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-16.234629467214273`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-13.633189001170319`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.98260143502917, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.591735126342158`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.311433161188, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.09274396022317, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-11.913403031567354`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-11.761386824268728`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-11.629459281226179`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-9.028018815182229, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-8.377431249041079, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.986564940354067, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.706262975199909, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.487573774235079, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.308232845579262, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.156216638280637, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.024289095238088, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.422848629194137, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.7722610630529876`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.3813947543659757`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.101092789211817, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.882403588246988, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.703062659591171, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.551046452292545, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.419118909249997, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{-25.328436022934504`, FormBox["\"\"", TraditionalForm]}, {-20.72326583694641, FormBox["\"\"", TraditionalForm]}, {-16.11809565095832, FormBox["\"\"", TraditionalForm]}, {-11.512925464970229`, FormBox["\"\"", TraditionalForm]}, {-6.907755278982137, FormBox["\"\"", TraditionalForm]}, {-2.3025850929940455`, FormBox["\"\"", TraditionalForm]}, {-22.843529373146502`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-22.192941807005354`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-21.80207549831834, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-21.521773533164183`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-21.303084332199354`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-21.123743403543536`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-20.97172719624491, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-20.839799653202363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-18.238359187158412`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-17.58777162101726, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-17.196905312330248`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-16.916603347176093`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-16.69791414621126, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-16.518573217555446`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-16.36655701025682, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-16.234629467214273`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-13.633189001170319`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.98260143502917, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.591735126342158`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.311433161188, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.09274396022317, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-11.913403031567354`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-11.761386824268728`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-11.629459281226179`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-9.028018815182229, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-8.377431249041079, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.986564940354067, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.706262975199909, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.487573774235079, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.308232845579262, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.156216638280637, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.024289095238088, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.422848629194137, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.7722610630529876`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.3813947543659757`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.101092789211817, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.882403588246988, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.703062659591171, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.551046452292545, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.419118909249997, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}, {{{2.302585092994046, FormBox["10", TraditionalForm]}, {4.605170185988092, FormBox["100", TraditionalForm]}, {3.912023005428146, FormBox["50", TraditionalForm]}, {6.214608098422191, FormBox["500", TraditionalForm]}, {2.995732273553991, FormBox["20", TraditionalForm]}, {5.298317366548036, FormBox["200", TraditionalForm]}, {3.4011973816621555`, FormBox["30", TraditionalForm]}, {5.703782474656201, FormBox["300", TraditionalForm]}, {2.70805020110221, FormBox["15", TraditionalForm]}, {5.0106352940962555`, FormBox["150", TraditionalForm]}, {4.248495242049359, FormBox["70", TraditionalForm]}, {6.551080335043404, FormBox["700", TraditionalForm]}, {2.3978952727983707`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.4849066497880004`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.5649493574615367`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.6390573296152584`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.772588722239781, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.833213344056216, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.8903717578961645`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.9444389791664403`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.700480365792417, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.787491742782046, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.867534450455582, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.941642422609304, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.075173815233827, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.135798437050262, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.19295685089021, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.247024072160486, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{2.302585092994046, FormBox["\"\"", TraditionalForm]}, {4.605170185988092, FormBox["\"\"", TraditionalForm]}, {3.912023005428146, FormBox["\"\"", TraditionalForm]}, {6.214608098422191, FormBox["\"\"", TraditionalForm]}, {2.995732273553991, FormBox["\"\"", TraditionalForm]}, {5.298317366548036, FormBox["\"\"", TraditionalForm]}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm]}, {5.703782474656201, FormBox["\"\"", TraditionalForm]}, {2.70805020110221, FormBox["\"\"", TraditionalForm]}, {5.0106352940962555`, FormBox["\"\"", TraditionalForm]}, {4.248495242049359, FormBox["\"\"", TraditionalForm]}, {6.551080335043404, FormBox["\"\"", TraditionalForm]}, {2.3978952727983707`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.4849066497880004`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.5649493574615367`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.6390573296152584`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.772588722239781, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.833213344056216, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.8903717578961645`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.9444389791664403`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.700480365792417, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.787491742782046, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.867534450455582, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.941642422609304, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.075173815233827, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.135798437050262, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.19295685089021, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.247024072160486, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}}, GridLines->{{2.302585092994046, 4.605170185988092, 3.912023005428146, 6.214608098422191, 2.995732273553991, 5.298317366548036, 3.4011973816621555`, 5.703782474656201, 2.70805020110221, 5.0106352940962555`, 4.248495242049359, 6.551080335043404, 2.3978952727983707`, 2.4849066497880004`, 2.5649493574615367`, 2.6390573296152584`, 2.772588722239781, 2.833213344056216, 2.8903717578961645`, 2.9444389791664403`, 3.6888794541139363`, 4.0943445622221, 4.382026634673881, 4.499809670330265, 4.700480365792417, 4.787491742782046, 4.867534450455582, 4.941642422609304, 5.075173815233827, 5.135798437050262, 5.19295685089021, 5.247024072160486, 5.991464547107982, 6.396929655216146}, CompressedData[" 1:eJwBfQGC/iFib1JlAQAAAC4AAAD+VBliFFQ5wLj/K/MnuTTAc6o+hDseMMBb qqIqngYnwKD/j5mKoRvAFVW1u7FrAsAu4X6K8dc2wIAeX6JkMTbAPzPi0VTN NcDJ20TzkoU1wOq5Tu+WTTXAslDPpa0fNcBzgRAdw/g0wECyLRz91jTA6YuR GwU9MsA6yXEzeJYxwPnd9GJoMjHAhIZXhKbqMMCkZGGAqrIwwG374TbBhDDA LiwjrtZdMMD7XECtEDwwwEZtSFkxRCvA6ucIiRf3KcBoEQ/o9y4pwH1i1Cp0 nyjAvh7oInwvKMBPTOmPqdMnwNGta37UhSfAag+mfEhCJ8C8wm17WA4iwF89 Lqs+wSDAu81oFD7yH8Dkb/OZNtMewGboGopG8x3AiEMdZKE7HcCNBiJB958c wL/Jlj3fGBzAYjAmO/+wEcBRS041ly0OwEvxZrEYDQvAnDV8vAnPCMCiJsuc KQ8HwObcz1DfnwXA7mLZCotoBMBU6cIDW1oDwFkms7E= "]}, Method->{}, PlotRange->NCache[{{ Log[5], Log[15]}, {-24.734776626457034`, 0.7554004472274122}}, {{ 1.6094379124341003`, 2.70805020110221}, {-24.734776626457034`, 0.7554004472274122}}], PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}, Ticks->{{{2.302585092994046, FormBox["10", TraditionalForm]}, {4.605170185988092, FormBox["100", TraditionalForm]}, {3.912023005428146, FormBox["50", TraditionalForm]}, {6.214608098422191, FormBox["500", TraditionalForm]}, {2.995732273553991, FormBox["20", TraditionalForm]}, {5.298317366548036, FormBox["200", TraditionalForm]}, {3.4011973816621555`, FormBox["30", TraditionalForm]}, {5.703782474656201, FormBox["300", TraditionalForm]}, {2.70805020110221, FormBox["15", TraditionalForm]}, {5.0106352940962555`, FormBox["150", TraditionalForm]}, {4.248495242049359, FormBox["70", TraditionalForm]}, {6.551080335043404, FormBox["700", TraditionalForm]}, {2.3978952727983707`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.4849066497880004`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.5649493574615367`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.6390573296152584`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.772588722239781, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.833213344056216, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.8903717578961645`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.9444389791664403`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.382026634673881, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.499809670330265, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.700480365792417, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.787491742782046, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.867534450455582, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.941642422609304, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.075173815233827, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.135798437050262, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.19295685089021, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.247024072160486, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.991464547107982, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.396929655216146, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{-25.328436022934504`, FormBox[ TemplateBox[{"10", RowBox[{"-", "11"}]}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {-20.72326583694641, FormBox[ TemplateBox[{"10", RowBox[{"-", "9"}]}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {-16.11809565095832, FormBox[ TemplateBox[{"10", RowBox[{"-", "7"}]}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {-11.512925464970229`, FormBox[ TemplateBox[{"10", RowBox[{"-", "5"}]}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {-6.907755278982137, FormBox["0.001`", TraditionalForm]}, {-2.3025850929940455`, FormBox["0.1`", TraditionalForm]}, {-22.843529373146502`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-22.192941807005354`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-21.80207549831834, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-21.521773533164183`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-21.303084332199354`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-21.123743403543536`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-20.97172719624491, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-20.839799653202363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-18.238359187158412`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-17.58777162101726, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-17.196905312330248`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-16.916603347176093`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-16.69791414621126, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-16.518573217555446`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-16.36655701025682, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-16.234629467214273`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-13.633189001170319`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.98260143502917, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.591735126342158`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.311433161188, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.09274396022317, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-11.913403031567354`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-11.761386824268728`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-11.629459281226179`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-9.028018815182229, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-8.377431249041079, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.986564940354067, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.706262975199909, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.487573774235079, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.308232845579262, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.156216638280637, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.024289095238088, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.422848629194137, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.7722610630529876`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.3813947543659757`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.101092789211817, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.882403588246988, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.703062659591171, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.551046452292545, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.419118909249997, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}]], "Output", CellChangeTimes->{ 3.562501105011079*^9, 3.562501307273075*^9, {3.562501662031858*^9, 3.5625017139667997`*^9}, 3.562502310111417*^9, 3.562502502974997*^9, 3.562502545965477*^9, 3.562502719834157*^9, 3.562502874538219*^9, 3.5753685369091177`*^9, 3.575372306726478*^9, 3.575380287588828*^9}], Cell[BoxData[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], LineBox[CompressedData[" 1:eJwVkX0003scgBcpyfW+62V+85JDu3ZZKXWLPl9FKhVyVCbzcqJyexEKlbyc RqtDnUZ1Oqy1Myova72NXbn7do9Er5SXQoSLtRKx4bcat/vHc55/nv8ep7gj O+L1KBTKtp/87yXCrPCNoth1bbaayrVxLFyqyvL5zkRQUFD4+zEOCwtgcrqT GQL95X6MO2wWpquqwhuZMdBsU1PoEsbCHAXvTD0zCZ6c9zSj+rPwLGOGJmdm w+kb/X3Griy8PfrOiIx5EY6/My2UtHniKfLcy4dMITzyX/n4ptID/yVd3N3V JYXeoZE3XA0TcwON+KVGcnhR0RtevtwdJxpzKaKzGAQM3bqEPAZuPvBqvuFg A/hzkt82NbhhycxkoulkE4hnHQMVHq446EecgMF+CT1qImsB1wUXbT/Qwe5o gTxj8QuLb874yaoLhUe73oByr/Us54wTDuuOqDY3aocTLKGm0sARi69YZOZa dUKI42jY/N0ELhYFramyeg+bUutm2U/t8OA+BicadYN/sJ1URrXB6gDN8sGN H8DFNvIHWU7FMb3xh8fT++DfpZVznbaWWBZXGRTZ8hFSY+dSqBIzLBi4Vlve 2g8tYU0ZXjpj/EDR806mHADhsQ8V4gRD7H67ONRzdBDSTQmPHr/5uGVMmHlw 4RBcDXhYXPd2TtEYddAxz34Ymh4QI3nF0wrinYRm6DACqx9R1/u4jCtEdzY8 275KCX3WJpwbFR8VZ/nBrTqfT3BuT3m47OQDhUJAC+b5qmBeQ47EvrodXBau yX4f9hlQ+zETZ6USVCdfL7q06wtQ3JU8v1cT0LutZqPp0VHA1wfqT6WRsCQw Wruf+xWsHTbzzzfPQfPW0wvc88dg0z2Z/m8KPfS6c3pgd/A4FO000ErrDVCi 6ZfDLa3jkB7j9VQv2RBVs5G3LPQb1LIv4Ov6i1F+m++u0z3fIDvYRBgh+wVd ajsu1kZNgBn/a5SBpRlaoR8RFKGaALYbT+jINkcLa4/TDx6ahI+397uV5lig 3Gw1c3R0EnpHfAUB1yxRURqtOCRDDfZpxo1KbIU61ZmM/d/VcG9PmW72GRXd FfKs485qYInTdTTV/yvyitGgZxZToGMXf7mlskbDZSWXh/lTYOl6g1L23gax 7EYDhhymIWFefNi+NltUYZXhdFU0DWq+27lhmR166Ry/Wu48AytXcXsXFdJQ frT21qPqGQh5Kx6fOmKPjjo/D0j1JEFk7hmoXUugi/uSTtUsIyFy1lZ8Aggk qaLe13qRYN+8NVe7nkAq7xjHnNUknBS0/jOzmUB7gzTaAj8SDm3YtnNsF4F2 pjpIb4aR4DWvqqMhhUA+jSl23T+/pCRnyc0rCcRebBtKP0GC91NVbK6EQBkh f+fHniLBN7KjYOIugWRdhpqRbBIyy1KTWmsJ5DlW+lrNIyFjSh7HaySQs03T GZMSEmh6j40G+gmEog7VhQpI2PA5cXLLEIGiRRYTRcKfPbc65r6SQCXMqGha GQnKS+ubc8cIRPWb+GOphAT5OL+NpiPQirwrSX9KScjZ8Xkwm0JHO5773JTc I0EnTUgf0qejwvB8q5U1JLh2myyrNqKjqmvMoHQ5CWgPJ9zMhI6e97Xm1NWR 0OdvPZdsTkcql7Ta2XoSrn7a4tFuRUeGifZjfpiEvBKjQW8bOvoPluNd0w== "]]}}, AspectRatio->2, Axes->True, AxesOrigin->{0, -16.383723018015942`}, BaseStyle->{FontSize -> 15}, CoordinatesToolOptions:>{"DisplayFunction" -> ({ Exp[ Part[#, 1]], Exp[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ Exp[ Part[#, 1]], Exp[ Part[#, 2]]}& )}, Frame->True, FrameLabel->{ FormBox[ "\"F (\\!\\(\\*SuperscriptBox[\\(10\\), \\(6\\)]\\) V/cm)\"", TraditionalForm], FormBox[ "\"\\!\\(\\*SubscriptBox[\\(J\\), \\(T\\)]\\) (A/\\!\\(\\*SuperscriptBox[\ \\(cm\\), \\(2\\)]\\))\"", TraditionalForm]}, FrameTicks->{{{{-16.11809565095832, FormBox[ TemplateBox[{"10", RowBox[{"-", "7"}]}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {-11.512925464970229`, FormBox[ TemplateBox[{"10", RowBox[{"-", "5"}]}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {-6.907755278982137, FormBox["0.001`", TraditionalForm]}, {-2.3025850929940455`, FormBox["0.1`", TraditionalForm]}, {2.302585092994046, FormBox["10", TraditionalForm]}, {6.907755278982137, FormBox["1000", TraditionalForm]}, {-13.633189001170319`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.98260143502917, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.591735126342158`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.311433161188, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.09274396022317, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-11.913403031567354`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-11.761386824268728`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-11.629459281226179`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-9.028018815182229, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-8.377431249041079, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.986564940354067, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.706262975199909, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.487573774235079, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.308232845579262, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.156216638280637, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.024289095238088, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.422848629194137, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.7722610630529876`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.3813947543659757`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.101092789211817, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.882403588246988, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.703062659591171, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.551046452292545, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.419118909249997, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.1823215567939546, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.8329091229351039, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.2237754316221159`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.5040773967762742`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.7227665977411037`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9021075263969205`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0541237336955462`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.186051276738094, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.787491742782046, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.438079308923196, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.8289456176102075`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.1092475827643655`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.327936783729195, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.507277712385012, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.659293919683638, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.7912214627261855`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{-16.11809565095832, FormBox["\"\"", TraditionalForm]}, {-11.512925464970229`, FormBox["\"\"", TraditionalForm]}, {-6.907755278982137, FormBox["\"\"", TraditionalForm]}, {-2.3025850929940455`, FormBox["\"\"", TraditionalForm]}, {2.302585092994046, FormBox["\"\"", TraditionalForm]}, {6.907755278982137, FormBox["\"\"", TraditionalForm]}, {-13.633189001170319`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.98260143502917, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.591735126342158`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.311433161188, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.09274396022317, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-11.913403031567354`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-11.761386824268728`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-11.629459281226179`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-9.028018815182229, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-8.377431249041079, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.986564940354067, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.706262975199909, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.487573774235079, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.308232845579262, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.156216638280637, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.024289095238088, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.422848629194137, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.7722610630529876`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.3813947543659757`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.101092789211817, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.882403588246988, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.703062659591171, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.551046452292545, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.419118909249997, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.1823215567939546, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.8329091229351039, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.2237754316221159`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.5040773967762742`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.7227665977411037`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9021075263969205`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0541237336955462`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.186051276738094, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.787491742782046, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.438079308923196, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.8289456176102075`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.1092475827643655`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.327936783729195, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.507277712385012, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.659293919683638, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.7912214627261855`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}, {{{0., FormBox[ TagBox[ InterpretationBox["\"1.0\"", 1., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {2.302585092994046, FormBox[ TagBox[ InterpretationBox["\"10.0\"", 10., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {1.6094379124341003`, FormBox[ TagBox[ InterpretationBox["\"5.0\"", 5., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {3.912023005428146, FormBox[ TagBox[ InterpretationBox["\"50.0\"", 50., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {0.6931471805599453, FormBox[ TagBox[ InterpretationBox["\"2.0\"", 2., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {2.995732273553991, FormBox[ TagBox[ InterpretationBox["\"20.0\"", 20., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {1.0986122886681098`, FormBox[ TagBox[ InterpretationBox["\"3.0\"", 3., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {3.4011973816621555`, FormBox[ TagBox[ InterpretationBox["\"30.0\"", 30., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {0.4054651081081644, FormBox[ TagBox[ InterpretationBox["\"1.5\"", 1.5, AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {2.70805020110221, FormBox[ TagBox[ InterpretationBox["\"15.0\"", 15., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {1.9459101490553132`, FormBox[ TagBox[ InterpretationBox["\"7.0\"", 7., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {4.248495242049359, FormBox[ TagBox[ InterpretationBox["\"70.0\"", 70., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {0.09531017980432493, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.1823215567939548, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.26236426446749106`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.336472236621213, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.47000362924573563`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.5306282510621705, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.5877866649021191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.6418538861723948, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.3978952727983707`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.4849066497880004`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.5649493574615367`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.6390573296152584`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.772588722239781, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.833213344056216, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.8903717578961645`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.9444389791664403`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{0., FormBox["\"\"", TraditionalForm]}, {2.302585092994046, FormBox["\"\"", TraditionalForm]}, {1.6094379124341003`, FormBox["\"\"", TraditionalForm]}, {3.912023005428146, FormBox["\"\"", TraditionalForm]}, {0.6931471805599453, FormBox["\"\"", TraditionalForm]}, {2.995732273553991, FormBox["\"\"", TraditionalForm]}, {1.0986122886681098`, FormBox["\"\"", TraditionalForm]}, {3.4011973816621555`, FormBox["\"\"", TraditionalForm]}, {0.4054651081081644, FormBox["\"\"", TraditionalForm]}, {2.70805020110221, FormBox["\"\"", TraditionalForm]}, {1.9459101490553132`, FormBox["\"\"", TraditionalForm]}, {4.248495242049359, FormBox["\"\"", TraditionalForm]}, {0.09531017980432493, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.1823215567939548, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.26236426446749106`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.336472236621213, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.47000362924573563`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.5306282510621705, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.5877866649021191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.6418538861723948, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.3978952727983707`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.4849066497880004`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.5649493574615367`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.6390573296152584`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.772588722239781, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.833213344056216, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.8903717578961645`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.9444389791664403`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}}, GridLines->{{0., 2.302585092994046, 1.6094379124341003`, 3.912023005428146, 0.6931471805599453, 2.995732273553991, 1.0986122886681098`, 3.4011973816621555`, 0.4054651081081644, 2.70805020110221, 1.9459101490553132`, 4.248495242049359, 0.09531017980432493, 0.1823215567939548, 0.26236426446749106`, 0.336472236621213, 0.47000362924573563`, 0.5306282510621705, 0.5877866649021191, 0.6418538861723948, 1.3862943611198906`, 1.791759469228055, 2.0794415416798357`, 2.1972245773362196`, 2.3978952727983707`, 2.4849066497880004`, 2.5649493574615367`, 2.6390573296152584`, 2.772588722239781, 2.833213344056216, 2.8903717578961645`, 2.9444389791664403`, 3.6888794541139363`, 4.0943445622221}, CompressedData[" 1:eJwBfQGC/iFib1JlAQAAAC4AAABzqj6EOx4wwFuqoiqeBifAoP+PmYqhG8AV VbW7sWsCwBZVtbuxawJAoP+PmYqhG0BGbUhZMUQrwOrnCIkX9ynAaBEP6Pcu KcB9YtQqdJ8owL4e6CJ8LyjAT0zpj6nTJ8DRrWt+1IUnwGoPpnxIQifAvMJt e1gOIsBfPS6rPsEgwLvNaBQ+8h/A5G/zmTbTHsBm6BqKRvMdwIhDHWShOx3A jQYiQfefHMC/yZY93xgcwGIwJjv/sBHAUUtONZctDsBL8WaxGA0LwJw1fLwJ zwjAoibLnCkPB8Dm3M9Q358FwO5i2QqLaATAVOnCA1taA8B1luQRUFbHP2l7 cQgxp+o/wXEHjJWU8z8e6dx1sxD4PxQHP7VzkPs/i5o1TQhv/j89R5Fs2G4A QNfAp3MIfQFAyXlEPGQmE0CDhMPcl8AVQIYxtx7XUBdAXY8smd5vGEDaFgWp zk8ZQLi7As9zBxpAtPj98R2jGkCBNYn1NSobQMfHqXE= "]}, Method->{}, PlotRange->NCache[{{0, Log[5]}, {-16.383723018015942`, 7.523646876833601}}, {{ 0, 1.6094379124341003`}, {-16.383723018015942`, 7.523646876833601}}], PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}, Ticks->{{{0., FormBox[ TagBox[ InterpretationBox["\"1.0\"", 1., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {2.302585092994046, FormBox[ TagBox[ InterpretationBox["\"10.0\"", 10., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {1.6094379124341003`, FormBox[ TagBox[ InterpretationBox["\"5.0\"", 5., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {3.912023005428146, FormBox[ TagBox[ InterpretationBox["\"50.0\"", 50., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {0.6931471805599453, FormBox[ TagBox[ InterpretationBox["\"2.0\"", 2., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {2.995732273553991, FormBox[ TagBox[ InterpretationBox["\"20.0\"", 20., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {1.0986122886681098`, FormBox[ TagBox[ InterpretationBox["\"3.0\"", 3., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {3.4011973816621555`, FormBox[ TagBox[ InterpretationBox["\"30.0\"", 30., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {0.4054651081081644, FormBox[ TagBox[ InterpretationBox["\"1.5\"", 1.5, AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {2.70805020110221, FormBox[ TagBox[ InterpretationBox["\"15.0\"", 15., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {1.9459101490553132`, FormBox[ TagBox[ InterpretationBox["\"7.0\"", 7., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {4.248495242049359, FormBox[ TagBox[ InterpretationBox["\"70.0\"", 70., AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 1}, NumberPadding -> {"", "0"}]& ], TraditionalForm]}, {0.09531017980432493, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.1823215567939548, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.26236426446749106`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.336472236621213, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.47000362924573563`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.5306282510621705, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.5877866649021191, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.6418538861723948, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.3862943611198906`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.791759469228055, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0794415416798357`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.1972245773362196`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.3978952727983707`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.4849066497880004`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.5649493574615367`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.6390573296152584`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.772588722239781, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.833213344056216, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.8903717578961645`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.9444389791664403`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {3.6888794541139363`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.0943445622221, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}, {{-16.11809565095832, FormBox[ TemplateBox[{"10", RowBox[{"-", "7"}]}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {-11.512925464970229`, FormBox[ TemplateBox[{"10", RowBox[{"-", "5"}]}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm]}, {-6.907755278982137, FormBox["0.001`", TraditionalForm]}, {-2.3025850929940455`, FormBox["0.1`", TraditionalForm]}, {2.302585092994046, FormBox["10", TraditionalForm]}, {6.907755278982137, FormBox["1000", TraditionalForm]}, {-13.633189001170319`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.98260143502917, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.591735126342158`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.311433161188, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-12.09274396022317, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-11.913403031567354`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-11.761386824268728`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-11.629459281226179`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-9.028018815182229, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-8.377431249041079, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.986564940354067, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.706262975199909, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.487573774235079, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.308232845579262, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.156216638280637, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-7.024289095238088, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-4.422848629194137, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.7722610630529876`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.3813947543659757`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-3.101092789211817, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.882403588246988, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.703062659591171, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.551046452292545, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {-2.419118909249997, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.1823215567939546, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {0.8329091229351039, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.2237754316221159`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.5040773967762742`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.7227665977411037`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {1.9021075263969205`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.0541237336955462`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {2.186051276738094, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {4.787491742782046, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.438079308923196, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {5.8289456176102075`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.1092475827643655`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.327936783729195, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.507277712385012, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.659293919683638, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}, {6.7912214627261855`, FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}]], "Output", CellChangeTimes->{ 3.562501105011079*^9, 3.562501307273075*^9, {3.562501662031858*^9, 3.5625017139667997`*^9}, 3.562502310111417*^9, 3.562502502974997*^9, 3.562502545965477*^9, 3.562502719834157*^9, 3.562502874538219*^9, 3.5753685369091177`*^9, 3.575372306726478*^9, 3.5753802876607857`*^9}] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[StyleBox["Tunneling (Duke, Moll, Kane: various chapters & \ papers)", "Subtitle"]], "Subsubtitle", CellChangeTimes->{{3.493033188297213*^9, 3.4930332216946583`*^9}, { 3.496030297283578*^9, 3.4960303016591043`*^9}, {3.4971066436263313`*^9, 3.4971066469915237`*^9}, {3.497869783264133*^9, 3.497869786309627*^9}, { 3.497875461390973*^9, 3.497875463840555*^9}, {3.4982128765363073`*^9, 3.498212906015687*^9}, {3.498575972028274*^9, 3.498575985370852*^9}, { 3.500124871941145*^9, 3.500124888850635*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ RowBox[{ "Tunneling", " ", "from", " ", "perturbation", " ", "of", " ", "band"}], "-", "theory"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"h", "=", RowBox[{ FractionBox["6.63", RowBox[{"2", "*", "\[Pi]"}]], "*", SuperscriptBox["10", RowBox[{"-", "34"}]]}]}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{"Reduced", " ", RowBox[{"Planck", "'"}], "s", " ", "constant"}], ",", " ", RowBox[{"J", ".", "s"}]}], " ", "*)"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "=", RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "19"}]]}]}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{"Electron", " ", "Charge"}], ",", " ", "Coulomb"}], " ", "*)"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"me", "=", RowBox[{"9.1", "*", SuperscriptBox["10", RowBox[{"-", "31"}]]}]}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{"Free", " ", "electron", " ", "mass"}], ",", " ", "kg"}], " ", "*)"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"E0", "[", RowBox[{"k_", ",", "kp_"}], "]"}], "=", RowBox[{ FractionBox[ RowBox[{ SuperscriptBox["h", "2"], "*", SuperscriptBox[ RowBox[{"(", RowBox[{"k", "*", SuperscriptBox["10", "10"]}], ")"}], "2"]}], RowBox[{"2", "*", "me", "*", "q"}]], "+", FractionBox[ RowBox[{ SuperscriptBox["h", "2"], "*", SuperscriptBox[ RowBox[{"(", RowBox[{"kp", "*", SuperscriptBox["10", "10"]}], ")"}], "2"]}], RowBox[{"2", "*", "me", "*", "q"}]]}]}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{"in", " ", "eV"}], ",", " ", RowBox[{"k", " ", "is", " ", "in", " ", RowBox[{"1", "/", "m"}]}], ",", " ", RowBox[{"of", " ", "the", " ", "order", " ", "of", " ", "2", RowBox[{"\[Pi]", "/", "a"}]}], ",", " ", RowBox[{"a", " ", "is", " ", RowBox[{"in", " ", "~", "angstroms"}]}]}], " ", "*)"}], ";"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{"E0", "[", RowBox[{"k", ",", "0"}], "]"}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", RowBox[{"-", "1"}], ",", "1"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"-", "0.1"}], ",", "4"}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"AspectRatio", "\[Rule]", "1.5"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}], ",", RowBox[{"Epilog", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"PointSize", "[", "Large", "]"}], ",", RowBox[{"Point", "[", RowBox[{"{", RowBox[{"t", ",", RowBox[{"E0", "[", RowBox[{"t", ",", "0"}], "]"}]}], "}"}], "]"}]}], "}"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"t", ",", RowBox[{"-", "1"}], ",", "1"}], "}"}]}], "]"}]}]}]], "Input", CellChangeTimes->{{3.49987228979384*^9, 3.4998723493299427`*^9}, { 3.499877832788638*^9, 3.4998779541532497`*^9}, {3.499878047316278*^9, 3.499878093271537*^9}, {3.4998782558656693`*^9, 3.4998782946515703`*^9}, { 3.499878610982361*^9, 3.499878762298719*^9}, {3.499878816713358*^9, 3.499878842935378*^9}, {3.4998798387930727`*^9, 3.499879840116083*^9}, { 3.4998804894416428`*^9, 3.499880521387212*^9}, {3.499880852003591*^9, 3.499880891429123*^9}, {3.499914238748784*^9, 3.4999143661278667`*^9}, { 3.499914458826556*^9, 3.499914460304832*^9}, {3.499914525217239*^9, 3.4999145872224007`*^9}, {3.4999148084598427`*^9, 3.499914836899474*^9}, { 3.499914949871491*^9, 3.499914982274781*^9}, {3.499915012621047*^9, 3.49991511206848*^9}, {3.499962721540223*^9, 3.4999627266485033`*^9}, { 3.562503893982739*^9, 3.562503894428815*^9}, {3.562503992666568*^9, 3.562503993760893*^9}}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`t$$ = 0.4978248596191406, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`t$$], -1, 1}}, Typeset`size$$ = {290., {213., 219.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`t$11733$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`t$$ = -1}, "ControllerVariables" :> { Hold[$CellContext`t$$, $CellContext`t$11733$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot[{ $CellContext`E0[$CellContext`k, 0]}, {$CellContext`k, -1, 1}, Frame -> True, FrameLabel -> { "k (\!\(\*SuperscriptBox[\(10\), \(10\)]\)/m)", "Energy (eV)"}, GridLines -> Automatic, BaseStyle -> {FontSize -> 15}, PlotRange -> {-0.1, 4}, PlotStyle -> Thick, AspectRatio -> 1.5, BaseStyle -> {FontSize -> 15}, Epilog -> { PointSize[Large], Point[{$CellContext`t$$, $CellContext`E0[$CellContext`t$$, 0]}]}], "Specifications" :> {{$CellContext`t$$, -1, 1}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{333., {256., 262.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{3.562503895748801*^9, 3.562503994279564*^9, 3.5629526311908607`*^9, 3.5753685422114887`*^9, 3.57537231120922*^9, 3.57538185065591*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"Two", " ", RowBox[{"Bands", " ", ":", " ", RowBox[{"Opening", " ", "of", " ", "a", " ", "Energy", " ", "Gap"}]}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"twobands", "[", RowBox[{"k_", ",", "kp_", ",", "Vg_"}], "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"E0", "[", RowBox[{"k", ",", "kp"}], "]"}], ",", RowBox[{"-", "Vg"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "Vg"}], ",", RowBox[{"E0", "[", RowBox[{ RowBox[{"k", "-", "2"}], ",", "kp"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"MatrixForm", "[", RowBox[{"twobands", "[", RowBox[{"k", ",", "kp", ",", "Vg"}], "]"}], "]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"egapped1", "[", RowBox[{"k_", ",", "kp_", ",", "Vg_"}], "]"}], "=", RowBox[{ RowBox[{"Eigenvalues", "[", RowBox[{"twobands", "[", RowBox[{"k", ",", "kp", ",", "Vg"}], "]"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"egapped2", "[", RowBox[{"k_", ",", "kp_", ",", "Vg_"}], "]"}], "=", RowBox[{ RowBox[{"Eigenvalues", "[", RowBox[{"twobands", "[", RowBox[{"k", ",", "kp", ",", "Vg"}], "]"}], "]"}], "[", RowBox[{"[", "2", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"egapped1", "[", RowBox[{"k", ",", "0", ",", "Vg"}], "]"}], ",", RowBox[{"egapped2", "[", RowBox[{"k", ",", "0", ",", "Vg"}], "]"}], ",", RowBox[{"E0", "[", RowBox[{"k", ",", "0"}], "]"}], ",", RowBox[{"E0", "[", RowBox[{ RowBox[{"k", "-", "2"}], ",", "0"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", "0", ",", "1.5"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "8"}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", RowBox[{"{", RowBox[{"Thick", ",", "Thick", ",", "Red", ",", "Red"}], "}"}]}], ",", RowBox[{"AspectRatio", "\[Rule]", "1.5"}]}], "]"}], ",", RowBox[{"{", RowBox[{"Vg", ",", "0", ",", "1"}], "}"}]}], "]"}]}]}]], "Input", CellChangeTimes->{{3.499879854924164*^9, 3.499879966491503*^9}, { 3.4998805276639013`*^9, 3.499880652825197*^9}, {3.4998807975128393`*^9, 3.4998807977644873`*^9}, {3.499880899865615*^9, 3.499880928052333*^9}, { 3.4998816325230217`*^9, 3.499881655428829*^9}, 3.49988170362006*^9, { 3.49988176098503*^9, 3.49988176506962*^9}, {3.499915618981948*^9, 3.499915645847526*^9}, {3.499915816728457*^9, 3.499915818357746*^9}, { 3.499916000554723*^9, 3.499916046474923*^9}, 3.4999161245093327`*^9, { 3.499916405604431*^9, 3.499916411555025*^9}, 3.499962739132483*^9}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { RowBox[{ RowBox[{"3.823630784038357`", " ", SuperscriptBox["k", "2"]}], "+", RowBox[{"3.823630784038357`", " ", SuperscriptBox["kp", "2"]}]}], RowBox[{"-", "Vg"}]}, { RowBox[{"-", "Vg"}], RowBox[{ RowBox[{"3.823630784038357`", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "+", "k"}], ")"}], "2"]}], "+", RowBox[{"3.823630784038357`", " ", SuperscriptBox["kp", "2"]}]}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{3.56250404752273*^9, 3.575368555705535*^9, 3.5753723136794853`*^9, 3.575381853691535*^9}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`Vg$$ = 1., Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`Vg$$], 0, 1}}, Typeset`size$$ = {286., {213., 219.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`Vg$12306$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`Vg$$ = 0}, "ControllerVariables" :> { Hold[$CellContext`Vg$$, $CellContext`Vg$12306$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot[{ $CellContext`egapped1[$CellContext`k, 0, $CellContext`Vg$$], $CellContext`egapped2[$CellContext`k, 0, $CellContext`Vg$$], $CellContext`E0[$CellContext`k, 0], $CellContext`E0[$CellContext`k - 2, 0]}, {$CellContext`k, 0, 1.5}, Frame -> True, FrameLabel -> { "k (\!\(\*SuperscriptBox[\(10\), \(10\)]\)/m)", "Energy (eV)"}, GridLines -> Automatic, BaseStyle -> {FontSize -> 15}, PlotRange -> {-1, 8}, PlotStyle -> {Thick, Thick, Red, Red}, AspectRatio -> 1.5], "Specifications" :> {{$CellContext`Vg$$, 0, 1}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{329., {256., 262.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{3.56250404752273*^9, 3.575368555705535*^9, 3.5753723136794853`*^9, 3.575381853776492*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"Three", " ", RowBox[{"Bands", ":", " ", RowBox[{"Realistic", " ", "Semiconductors"}]}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"threebands", "[", RowBox[{"k_", ",", "kp_", ",", "Vg_"}], "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"E0", "[", RowBox[{ RowBox[{"k", "-", "2"}], ",", "kp"}], "]"}], ",", RowBox[{"-", "Vg"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "Vg"}], ",", RowBox[{"E0", "[", RowBox[{"k", ",", "kp"}], "]"}], ",", RowBox[{"-", "Vg"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"-", "Vg"}], ",", RowBox[{"E0", "[", RowBox[{ RowBox[{"k", "+", "2"}], ",", "kp"}], "]"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"MatrixForm", "[", RowBox[{"threebands", "[", RowBox[{"k", ",", "kp", ",", "Vg"}], "]"}], "]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"e1gapped", "[", RowBox[{"k_", ",", "kp_", ",", "Vg_"}], "]"}], "=", RowBox[{ RowBox[{"Eigenvalues", "[", RowBox[{"threebands", "[", RowBox[{"k", ",", "kp", ",", "Vg"}], "]"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"e2gapped", "[", RowBox[{"k_", ",", "kp_", ",", "Vg_"}], "]"}], "=", RowBox[{ RowBox[{"Eigenvalues", "[", RowBox[{"threebands", "[", RowBox[{"k", ",", "kp", ",", "Vg"}], "]"}], "]"}], "[", RowBox[{"[", "2", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"e3gapped", "[", RowBox[{"k_", ",", "kp_", ",", "Vg_"}], "]"}], "=", RowBox[{ RowBox[{"Eigenvalues", "[", RowBox[{"threebands", "[", RowBox[{"k", ",", "kp", ",", "Vg"}], "]"}], "]"}], "[", RowBox[{"[", "3", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"e1gapped", "[", RowBox[{"k", ",", "0", ",", "Vg"}], "]"}], ",", RowBox[{"e2gapped", "[", RowBox[{"k", ",", "0", ",", "Vg"}], "]"}], ",", RowBox[{"e3gapped", "[", RowBox[{"k", ",", "0", ",", "Vg"}], "]"}], ",", RowBox[{"E0", "[", RowBox[{ RowBox[{"k", "-", "2"}], ",", "0"}], "]"}], ",", RowBox[{"E0", "[", RowBox[{"k", ",", "0"}], "]"}], ",", RowBox[{"E0", "[", RowBox[{ RowBox[{"k", "+", "2"}], ",", "0"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", RowBox[{"-", "1.5"}], ",", "1.5"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"-", "4"}], ",", "20"}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", RowBox[{"{", RowBox[{ "Thick", ",", "Thick", ",", "Thick", ",", "Blue", ",", "Green", ",", "Red"}], "}"}]}], ",", RowBox[{"AspectRatio", "\[Rule]", "1.5"}], ",", RowBox[{"Epilog", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"PointSize", "[", "Large", "]"}], ",", RowBox[{"Point", "[", RowBox[{"{", RowBox[{"t", ",", RowBox[{"If", "[", RowBox[{ RowBox[{"Vg", "\[Equal]", "0"}], ",", RowBox[{"E0", "[", RowBox[{ RowBox[{"t", "+", "2"}], ",", "0"}], "]"}], ",", RowBox[{"e2gapped", "[", RowBox[{"t", ",", "0", ",", "Vg"}], "]"}]}], "]"}]}], "}"}], "]"}]}], "}"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"Vg", ",", "0", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"t", ",", RowBox[{"-", "1"}], ",", "1"}], "}"}]}], "]"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"E0", "[", RowBox[{ RowBox[{"k", "-", "1"}], ",", "0"}], "]"}], ",", RowBox[{"E0", "[", RowBox[{ RowBox[{"k", "+", "1"}], ",", "0"}], "]"}], ",", RowBox[{"e1gapped", "[", RowBox[{"k", ",", "0", ",", "Vg"}], "]"}], ",", RowBox[{"e2gapped", "[", RowBox[{"k", ",", "0", ",", "Vg"}], "]"}], ",", RowBox[{"e3gapped", "[", RowBox[{"k", ",", "0", ",", "Vg"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", RowBox[{"-", "0.1"}], ",", "0.1"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{"3", ",", "6"}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"AspectRatio", "\[Rule]", "2"}]}], "]"}], ",", RowBox[{"{", RowBox[{"Vg", ",", "0", ",", "2"}], "}"}]}], "]"}], " ", "*)"}]}]}]], "Input", CellChangeTimes->{{3.4998798260572243`*^9, 3.499879831375366*^9}, { 3.49988094908895*^9, 3.499881039095847*^9}, {3.499881123403578*^9, 3.499881181141902*^9}, {3.4998812696321983`*^9, 3.499881273662496*^9}, { 3.49988161706126*^9, 3.4998816174808893`*^9}, {3.499881680556676*^9, 3.4998816932757807`*^9}, {3.4999156942408047`*^9, 3.4999157572528963`*^9}, {3.4999158287327547`*^9, 3.4999158350505867`*^9}, {3.4999161859897003`*^9, 3.499916233159433*^9}, { 3.49991635561372*^9, 3.4999163599314137`*^9}, {3.499916418041288*^9, 3.499916422606524*^9}, {3.499916490345471*^9, 3.499916490881172*^9}, { 3.4999165222007723`*^9, 3.4999165626708117`*^9}, {3.499916702152787*^9, 3.499916774684531*^9}, {3.499916809794498*^9, 3.499916869179113*^9}, { 3.499916901464108*^9, 3.499916935614562*^9}, {3.499917045205723*^9, 3.499917069715383*^9}, {3.499917109849757*^9, 3.499917126211197*^9}, 3.499918044826387*^9, 3.499918090678056*^9, 3.4999627557709*^9, 3.500125050153296*^9, 3.500125092137499*^9}], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { RowBox[{ RowBox[{"3.823630784038357`", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "+", "k"}], ")"}], "2"]}], "+", RowBox[{"3.823630784038357`", " ", SuperscriptBox["kp", "2"]}]}], RowBox[{"-", "Vg"}], "0"}, { RowBox[{"-", "Vg"}], RowBox[{ RowBox[{"3.823630784038357`", " ", SuperscriptBox["k", "2"]}], "+", RowBox[{"3.823630784038357`", " ", SuperscriptBox["kp", "2"]}]}], RowBox[{"-", "Vg"}]}, {"0", RowBox[{"-", "Vg"}], RowBox[{ RowBox[{"3.823630784038357`", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"2", "+", "k"}], ")"}], "2"]}], "+", RowBox[{"3.823630784038357`", " ", SuperscriptBox["kp", "2"]}]}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{3.5625041063615513`*^9, 3.575368566060794*^9, 3.575372316229825*^9, 3.575381856608581*^9}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`t$$ = -0.8034215927124023, \ $CellContext`Vg$$ = 4.93, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`Vg$$], 0, 5}, { Hold[$CellContext`t$$], -1, 1}}, Typeset`size$$ = {297., {213., 219.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`Vg$12459$$ = 0, $CellContext`t$12460$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`t$$ = -1, $CellContext`Vg$$ = 0}, "ControllerVariables" :> { Hold[$CellContext`Vg$$, $CellContext`Vg$12459$$, 0], Hold[$CellContext`t$$, $CellContext`t$12460$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot[{ $CellContext`e1gapped[$CellContext`k, 0, $CellContext`Vg$$], $CellContext`e2gapped[$CellContext`k, 0, $CellContext`Vg$$], $CellContext`e3gapped[$CellContext`k, 0, $CellContext`Vg$$], $CellContext`E0[$CellContext`k - 2, 0], $CellContext`E0[$CellContext`k, 0], $CellContext`E0[$CellContext`k + 2, 0]}, {$CellContext`k, -1.5, 1.5}, Frame -> True, FrameLabel -> { "k (\!\(\*SuperscriptBox[\(10\), \(10\)]\)/m)", "Energy (eV)"}, BaseStyle -> {FontSize -> 15}, GridLines -> Automatic, PlotRange -> {-4, 20}, PlotStyle -> {Thick, Thick, Thick, Blue, Green, Red}, AspectRatio -> 1.5, Epilog -> { PointSize[Large], Point[{$CellContext`t$$, If[$CellContext`Vg$$ == 0, $CellContext`E0[$CellContext`t$$ + 2, 0], $CellContext`e2gapped[$CellContext`t$$, 0, $CellContext`Vg$$]]}]}], "Specifications" :> {{$CellContext`Vg$$, 0, 5}, {$CellContext`t$$, -1, 1}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{340., {270., 276.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{3.5625041063615513`*^9, 3.575368566060794*^9, 3.575372316229825*^9, 3.575381856803896*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"3", "D", " ", "Tunneling", " ", "current", " ", RowBox[{"density", ":", " ", RowBox[{"More", " ", "accurate", " ", "results"}]}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"hbar", "=", RowBox[{ FractionBox["6.63", RowBox[{"2", "*", "\[Pi]"}]], "*", SuperscriptBox["10", RowBox[{"-", "34"}]]}]}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{ RowBox[{"Planck", "'"}], "s", " ", "constant"}], ",", " ", RowBox[{"J", ".", "s"}]}], " ", "*)"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "=", RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "19"}]]}]}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{"Electron", " ", "Charge"}], ",", " ", "Coulomb"}], " ", "*)"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"m0", "=", RowBox[{"9.1", "*", SuperscriptBox["10", RowBox[{"-", "31"}]]}]}], " ", RowBox[{"(*", " ", RowBox[{ RowBox[{"Free", " ", "electron", " ", "mass"}], ",", " ", "kg"}], " ", "*)"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"T0", "[", RowBox[{"F_", ",", "mstar_", ",", "Eg_"}], "]"}], ":=", RowBox[{"Exp", "[", RowBox[{"-", FractionBox[ RowBox[{"\[Pi]", "*", SqrtBox[ RowBox[{"mstar", "*", "m0"}]], "*", SuperscriptBox[ RowBox[{"(", RowBox[{"q", "*", "Eg"}], ")"}], FractionBox["3", "2"]]}], RowBox[{"2", "*", SqrtBox["2"], "*", "q", "*", RowBox[{"(", RowBox[{"F", "*", SuperscriptBox["10", "8"]}], ")"}], "*", "hbar"}]]}], "]"}]}], " ", RowBox[{"(*", " ", RowBox[{"WKB", " ", "tunneling", " ", "probability"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Eav", "[", RowBox[{"F_", ",", "mstar_", ",", "Eg_"}], "]"}], ":=", FractionBox[ RowBox[{ SqrtBox["2"], "*", "q", "*", "hbar", "*", RowBox[{"(", RowBox[{"F", "*", SuperscriptBox["10", "8"]}], ")"}]}], RowBox[{"2", "*", "\[Pi]", "*", SqrtBox[ RowBox[{"mstar", "*", "m0"}]], "*", SqrtBox[ RowBox[{"q", "*", "Eg"}]], "*", "q"}]]}], " ", RowBox[{"(*", " ", RowBox[{"Average", " ", "energy", " ", "in", " ", "eV"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{ RowBox[{"Eav", "[", RowBox[{"F", ",", "mstar", ",", "Eg"}], "]"}], "*", SuperscriptBox["10", "3"]}], ",", RowBox[{"{", RowBox[{"F", ",", "0", ",", "12"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"AspectRatio", "\[Rule]", "1.5"}]}], "]"}], ",", RowBox[{"{", RowBox[{"mstar", ",", "0.04", ",", "0.4"}], "}"}], ",", RowBox[{"{", RowBox[{"Eg", ",", "0.4", ",", "6.2"}], "}"}]}], "]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"JT3d", "[", RowBox[{"V_", ",", "F_", ",", "mstar_", ",", "Eg_"}], "]"}], ":=", RowBox[{ FractionBox[ RowBox[{"q", "*", "mstar", "*", "m0"}], RowBox[{"2", "*", SuperscriptBox["\[Pi]", "2"], "*", SuperscriptBox["hbar", "3"]}]], "*", RowBox[{"T0", "[", RowBox[{"F", ",", "mstar", ",", "Eg"}], "]"}], "*", "q", "*", RowBox[{"Eav", "[", RowBox[{"F", ",", "mstar", ",", "Eg"}], "]"}], "*", RowBox[{"(", RowBox[{ RowBox[{"q", "*", "V"}], "-", RowBox[{"q", "*", "2", "*", RowBox[{"Eav", "[", RowBox[{"F", ",", "mstar", ",", "Eg"}], "]"}], "*", RowBox[{"(", RowBox[{"1", "-", RowBox[{"Exp", "[", RowBox[{"-", FractionBox[ RowBox[{"q", "*", "V"}], RowBox[{"q", "*", "2", "*", RowBox[{"Eav", "[", RowBox[{"F", ",", "mstar", ",", "Eg"}], "]"}]}]]}], "]"}]}], ")"}]}]}], ")"}]}]}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{ RowBox[{"JT3d", "[", RowBox[{"V", ",", "F", ",", "mstar", ",", "Eg"}], "]"}], "*", SuperscriptBox["10", RowBox[{"-", "4"}]]}], ",", RowBox[{"{", RowBox[{"V", ",", "0", ",", "0.5"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"AspectRatio", "\[Rule]", "1.5"}]}], "]"}], ",", RowBox[{"{", RowBox[{"F", ",", "0.1", ",", "12"}], "}"}], ",", RowBox[{"{", RowBox[{"mstar", ",", "0.04", ",", "0.4"}], "}"}], ",", RowBox[{"{", RowBox[{"Eg", ",", "0.4", ",", "6.2"}], "}"}]}], "]"}], "\[IndentingNewLine]", RowBox[{"Plot", "[", RowBox[{ RowBox[{ RowBox[{"JT3d", "[", RowBox[{"V", ",", "12", ",", "0.2", ",", "5.5"}], "]"}], "*", SuperscriptBox["10", RowBox[{"-", "4"}]]}], ",", RowBox[{"{", RowBox[{"V", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "15"}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"AspectRatio", "\[Rule]", "1.5"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\""}], "}"}]}]}], "]"}]}]}]], "Input", CellChangeTimes->{{3.5000881627104053`*^9, 3.500088318576626*^9}, { 3.500088354341786*^9, 3.500088638889604*^9}, 3.5000887355084047`*^9, { 3.500088785017047*^9, 3.500088861358535*^9}, {3.500088922646254*^9, 3.500088922867693*^9}, {3.5000890253886013`*^9, 3.500089209111608*^9}, { 3.50008929777029*^9, 3.50008934964669*^9}, {3.500089451313794*^9, 3.500089567676593*^9}, 3.500089739884226*^9, {3.500089877244853*^9, 3.500089963944241*^9}, {3.500090039208599*^9, 3.500090045372168*^9}, { 3.500124992491723*^9, 3.500124992670651*^9}, {3.5002297684466467`*^9, 3.500229777515587*^9}, {3.562509051569705*^9, 3.562509101616149*^9}, { 3.56250913637573*^9, 3.5625091749352016`*^9}, 3.562509208885758*^9, { 3.562509247494237*^9, 3.562509262229087*^9}, {3.562509292949188*^9, 3.5625092931483603`*^9}}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`Eg$$ = 0.4, $CellContext`mstar$$ = 0.04, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`mstar$$], 0.04, 0.4}, { Hold[$CellContext`Eg$$], 0.4, 6.2}}, Typeset`size$$ = { 308., {213., 219.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`mstar$12619$$ = 0, $CellContext`Eg$12620$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`Eg$$ = 0.4, $CellContext`mstar$$ = 0.04}, "ControllerVariables" :> { Hold[$CellContext`mstar$$, $CellContext`mstar$12619$$, 0], Hold[$CellContext`Eg$$, $CellContext`Eg$12620$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot[$CellContext`Eav[$CellContext`F, $CellContext`mstar$$, \ $CellContext`Eg$$] 10^3, {$CellContext`F, 0, 12}, Frame -> True, FrameLabel -> {"F (MV/cm)", "Eav (meV)"}, GridLines -> Automatic, BaseStyle -> {FontSize -> 15}, PlotStyle -> Thick, AspectRatio -> 1.5], "Specifications" :> {{$CellContext`mstar$$, 0.04, 0.4}, {$CellContext`Eg$$, 0.4, 6.2}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{351., {270., 276.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{3.562509322704342*^9, 3.562952654556878*^9, 3.575368612922279*^9, 3.57537231894735*^9, 3.57538185928854*^9}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`Eg$$ = 0.4, $CellContext`F$$ = 0.1, $CellContext`mstar$$ = 0.04, Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{ Hold[$CellContext`F$$], 0.1, 12}, { Hold[$CellContext`mstar$$], 0.04, 0.4}, { Hold[$CellContext`Eg$$], 0.4, 6.2}}, Typeset`size$$ = { 337., {213., 219.}}, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`F$12648$$ = 0, $CellContext`mstar$12649$$ = 0, $CellContext`Eg$12650$$ = 0}, DynamicBox[Manipulate`ManipulateBoxes[ 1, StandardForm, "Variables" :> {$CellContext`Eg$$ = 0.4, $CellContext`F$$ = 0.1, $CellContext`mstar$$ = 0.04}, "ControllerVariables" :> { Hold[$CellContext`F$$, $CellContext`F$12648$$, 0], Hold[$CellContext`mstar$$, $CellContext`mstar$12649$$, 0], Hold[$CellContext`Eg$$, $CellContext`Eg$12650$$, 0]}, "OtherVariables" :> { Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, Typeset`skipInitDone$$}, "Body" :> Plot[$CellContext`JT3d[$CellContext`V, $CellContext`F$$, \ $CellContext`mstar$$, $CellContext`Eg$$] 10^(-4), {$CellContext`V, 0, 0.5}, Frame -> True, FrameLabel -> { "V (Volts)", "J (A/\!\(\*SuperscriptBox[\(cm\), \(2\)]\))"}, GridLines -> Automatic, BaseStyle -> {FontSize -> 15}, PlotStyle -> Thick, AspectRatio -> 1.5], "Specifications" :> {{$CellContext`F$$, 0.1, 12}, {$CellContext`mstar$$, 0.04, 0.4}, {$CellContext`Eg$$, 0.4, 6.2}}, "Options" :> {}, "DefaultOptions" :> {}], ImageSizeCache->{380., {284., 290.}}, SingleEvaluation->True], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "Manipulate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{3.562509322704342*^9, 3.562952654556878*^9, 3.575368612922279*^9, 3.57537231894735*^9, 3.575381859328843*^9}], Cell[BoxData[ GraphicsBox[{{}, {}, {Hue[0.67, 0.6, 0.6], Thickness[Large], LineBox[CompressedData[" 1:eJwVkHk01QkDhkXLnRQxV7YkWVLpZhpbwmtpEEPZRxkRsmRCSFS2sZV96VJZ sxTSTS6yhGQ52bKTfc+Py6+UDDPl6/vjPc95/nrOecUuuRk7sLOxsSX82P+p 5zDfVUeYqdlpbahFvh5U2aol5D4uKIc7Brs/9k8mqf2akZJaIngaVCfpiLxR ptrMPokgHylDlKauXVnwalbTbx94kSZoipdDC/Fdfb1qElEiuZuilriww8GT cnpC7T89u2RbKWu8POTPP+34QW0hpLfBlm6LCfEVen0fqWZhv/YqQdAeAo9H H95o+qLWoCVU/ib1MqpSVrqstDfUZMVVn38RdUZ0mlmloDwbUtlt8iWzr2B0 /+X9XSkcoEwFPzKXuorbQU53DxnuQOVEd/sbU3cYdTru+mjKCfdz9npWdA98 +Upr/faUG6PHw7WiBb1wpLt/p/ATKpIyBOokL3ijtlm09G8DfuhxF6jUpF6H iev9JnlhIZQtt8mTor7Y+YtzeQz/AbhaW78It/UDp+OaQ2KlGA52kLQD2Tfx j7VXTJyHOGKKeKWNpPzRoe1urit8CL+J5OQQjgFwO1nw09Luw/BverDntWkg yk00ra2pRyGnIBNtSQ9CX7eu2U2r48jkOxt2VzAEQ7ulLBRd5XCzPbnBvDIE 5BqpLMGUh3noBLv4hVD8ZNMr1bZNEbtWPQKqUsNwvOnnQsWmk7jRm3SDJXoH PO7W/POVgEnUaNnLujv4tpDM4nyiDtppqdUQ27sYWJ7idPXRwExJuYdIdiT4 Xof7+0lowShxyMVQKgbiiy49YeXakNEXzxdqjkH1cIIK/xMdUDhcP8w5xsKt z/Pf82m6uFjxvbjWNA6+2ufEVu7pge9wHO0Pejzm2XOW9tYaIohScuiOYBL4 Nq32BqyZ4IhOfMQL9yToKBVniDwyRXeoGzHcnATBr7tPOZ41gwSHTCHt+j0E Nk2cWS02R9O3HFpvNx3neChXOumW2PWZLi8adR9nc6mLB8cuovQXb7ru9H1U ijrUn7e0gbW7yZqH8gO0erXwLjXYgLHEXdEw/wDuzXxFRIYtjOcjVFx+S/3R d3U+5mCHlFE/rdLv6YgvYkXKyzhCY59lzphZBpQF6GzMAkcsnFfcRinKQOdv fU5uR5ywn+VrV3QsEz4VNaIPjjnDzVlBkm0kE+rqEfEFmlfAa894kqv0CLJ1 p7Spj93wh2UW4+OnHGTaVrRxFHiBHDbd+UgoF+u1l71nv3ohzJriYKKVizQX USud094osXMTKkvKhezsYuPdCW9wXVUNvamYB9kiOS2KqA8ag9+f3377MTzS ZKQzS3xx4inP9n2UApx6xlb258kAvKU12rTLFiDV8mZK7b0A2BTfqPK3LICI sADf/ZUARJeNu08WFEB0ryAxaB6I+bqi4TyDQrwKpUVXUIOQ3nem+JfEp9A/ E/z49sNgcG4GWensZ6BM0iCO1huKFGcLaxltBiIi6ZLRlDBI9MrY8FxlwNvG 3VxMNQxq+QN2w68Y8I0v41vIC0NFPr20nPYcnZpyQ+u3wrFkwqrW73gOz3A1 mfUTd2D2JLnVc/cLxLaymIzGKEgaLc+/iWSC20Hl1w0kQChAR9kxi4l0IqX5 uF0C9hRlRu4sZ/74sXckMCwBGxQTmtEUE57va3S92xPQWVfuOaZUiooWDZtc q0T4yQZ9/2e2FBb16beogUno4KZSaerl4ODo6agdosOn4yRSvlRAY2U795fh h+Bn8oxt2VKL5g63Dq292Sib0mp7p1KPOk626Miz+ah3SRO2ZDWgJONo4qd1 BlalVLmL/mrGQJ4qb+3ZErCvF+4RlmyBQ+vOf8X2l0Nh06bM5FkbJm8oGW/r r0RbiFxH05F3EFk7LxmdVgPRuMX1/OVOHI79+5KN62ssro2P9cl2g3K8/D8r zzfIWahq4YrpAZdS4ETTi0ZwiTwmZ2Z6UeZL8V1caUaUc+nlTIl+kB6ajCVq C76qF844BQwgbItrv8VfbfA60cDc+2YQf6RV1F7L6cD4s4bILrEhfFJmWWdG dOJfl96Hh/2GccAqIftgdReOauz4frlqBG/XZi5KjHZD55GYYzH/GJqz29b8 BXrhI3Lx4KTVOKjyywnx6n2QYZlxDhhMIN24elLavh8/c3+kNGxMQDFrsPlt 1gC21j5kiKdOwlPTe6tG6yCuyFW9/0l/ChuOUk9zuYZQeOZSZs3XKZypz9nG bjCM1UWhPXP0aRSPLftnXB9BqYkOR9LpGdyO7RRgrxxFgG5oBnNuBidqugcv z49BbFRvMDt0FrumOH2yKBNQVgxJEjwxh0l3j7zZ/AlY7X+3vqVnDuIu3Krh 6pNYbYmecg/6gM/XsuI3pieRstXay1hiHjEcfrlVt6bw81jpI/aGeSSemJ9L 4Z3GtttBpic9CCzZi+dplE6DLd+aMcW7gIg6Qw8pgxlce8CI5q1fwLXR+MDe TzN4dTSCwnN1ERcu3CxITJwFj941mWAuFk69vEf7+8gcRo519vhWs6CgcLdF qWMOz9MhMWO9hGHp8i5Bxw/4k6HAI/J9CUZGh2a3fPuAwNCsoJGCZfiqfBZ+ ljGPonmRh1y/k1AO1ZMOVCQQkRZqM2ZIwui1wX4pZQL2xkuSz4xI4FIdtU2F wL7q6ucGFj+8boVdQJPA3dgLTVGXSDh5h8wwfifgpHD/005fEhMJB6rHbQkc DKHq7sgj8THYpQpRBL4r3do98IRESMhgzWwMgfdL0915hSRy84rqI+MJxFmU /KldTCLYMKp1gE5g84ixZ2g1CRkt6pRbFoGRrth0jh4Sqp/5D2aWEXgZtmbX 00ci+c7QUe0KAkmnLh7OHiTxnyWbAquKgH4ujak5RsKP6aWv9JpA5Y32t0EE iar8db/OVgL0Y/KxRiwSjU7vwq93EPCYSjUVI0n039p+b18XAenfXcfrvpCw YiY/d+onsHVLb07cGolzNp9quN4TmCg95WKzQULvWmE7c5hAtUv2cdlvJOae NY6cHyOQLMq5urlJYnwILLZJAv8D6EB1fA== "]]}}, AspectRatio->1.5, Axes->True, AxesOrigin->{0, 0}, BaseStyle->{FontSize -> 15}, Frame->True, FrameLabel->{ FormBox["\"V (Volts)\"", TraditionalForm], FormBox[ "\"J (A/\\!\\(\\*SuperscriptBox[\\(cm\\), \\(2\\)]\\))\"", TraditionalForm]}, GridLines->Automatic, PlotRange->{{0, 1}, {0., 0.8087162603613612}}, PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], Scaled[0.02]}]], "Output", CellChangeTimes->{3.562509322704342*^9, 3.562952654556878*^9, 3.575368612922279*^9, 3.57537231894735*^9, 3.5753818593748503`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ RowBox[{"Hemisphere", " ", "of", " ", "right"}], "-", RowBox[{ "moving", " ", "electrons", " ", "for", " ", "whom", " ", "tunneling", " ", "is", " ", "allowed", " ", "in", " ", "the", " ", "k"}], "-", "space"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"Quiet", "[", RowBox[{"ParametricPlot3D", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"Cos", "[", "\[Phi]", "]"}], " ", RowBox[{"Sin", "[", "\[Theta]", "]"}]}], ",", RowBox[{ RowBox[{"Sin", "[", "\[Phi]", "]"}], " ", RowBox[{"Sin", "[", "\[Theta]", "]"}]}], ",", RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\[Theta]", ",", RowBox[{ RowBox[{"-", " ", "\[Pi]"}], "/", "2"}], ",", RowBox[{"\[Pi]", "/", "2"}]}], "}"}], ",", RowBox[{"{", RowBox[{"\[Phi]", ",", "0.01", ",", "\[Pi]"}], "}"}], ",", RowBox[{"Mesh", "\[Rule]", RowBox[{"{", RowBox[{"{", RowBox[{"1", "/", "4"}], "}"}], "}"}]}], ",", RowBox[{"PlotPoints", "\[Rule]", "50"}], ",", RowBox[{"MeshShading", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"Opacity", "[", "0.8", "]"}], ",", "Green"}], "}"}]}], ",", RowBox[{"Axes", "\[Rule]", "False"}]}], "]"}], "]"}]}]], "Input", CellChangeTimes->{{3.500090649407641*^9, 3.500090719963966*^9}, { 3.500090766032146*^9, 3.500090798728403*^9}, {3.500090840613008*^9, 3.500090863904894*^9}, {3.500090902189748*^9, 3.500091132445055*^9}, { 3.500091167088731*^9, 3.50009117601647*^9}, {3.50009121754943*^9, 3.5000912511124496`*^9}, {3.500091312639962*^9, 3.5000913299110823`*^9}, 3.5000915602433233`*^9, {3.500091614281872*^9, 3.500091642307949*^9}, { 3.50009168076786*^9, 3.500091688063561*^9}, {3.5000917195153103`*^9, 3.5000918626622543`*^9}, {3.500091908461627*^9, 3.500091916325371*^9}, 3.5000920212789173`*^9, {3.500092081068478*^9, 3.500092109453185*^9}, { 3.500092156411166*^9, 3.500092159057682*^9}, {3.500092266358172*^9, 3.500092292982134*^9}, {3.500092378863755*^9, 3.500092395792719*^9}, { 3.500292108435429*^9, 3.500292144899027*^9}, {3.56251085543671*^9, 3.562510870796076*^9}, {3.562511204286644*^9, 3.562511212972685*^9}, { 3.5625112534767923`*^9, 3.5625112617471533`*^9}}], Cell[BoxData[ Graphics3DBox[GraphicsComplex3DBox[CompressedData[" 1:eJxM3XdYj433B3Aje89SFFFk74w4SFEhOyEiKqOsyEoaJCOFlEpLoqw0VBpH eyltpb13ITPr91yf0/fcv7+e67r/uMc57/fr+nxy1zNu75GN+7t16dIlvX+X Lt3/+++1mC0TnP61ocGd+vM5Z63xrrNqRtW8Y0urVllcjm1twy2zZUsGHLXG oC/92+v1A8DEr2H/1sg2fFptuyVZ0xpf3RtWtmrXGzh9WDfdxrAN7/s3FEyQ tMbrM+qVq0yT4ast1D5vb8WBX+fn7nhnhQpxmo/KF2eCqf4TV9VdrSgvr9ge ccQKX1gmFUdMzoXI5ytHNT9uQbsdUel+vyxx2AGzkbpiBXBWOltuV24znr1V YOZxwhL3r8Ezb+KLwFPafvv5iiasPLVHZmqBBQ6Vi8FGgzL4su2nompWI7r8 Nl7YrmCBZ7rMet7jZAVMf/lP4oNPA04fu37o0wMX8U7iutiw8VUQvCezh4lO PeZcMy9ZPtMc94xRvKIWXQ3J0roGh3/Xos6gxWd3HjbDL4t7SPZWrgWxjtH3 51vV4BC7kTusbM/hhdFql3cE1IHFROVTu9ur0K068Uig7Rl0ObXgQpxYA+xx O2J/bV0l/u4tPU7siClq7PvaULi0EQ75TLx/8m45Zt99LPli8Um0PrB8z2ad JrBMWTu28F4Jvgyz/9b983G86DzYpsfuZvi6O+Log7pCvGS9MOPgnaPoM/Om aumKFnj2Da5Nk8zHiIkq+2LUD6P6wjUfW3u1wn6FOWdN52XjrRXnxBvXGWD1 aJ35hs9aYfW+8LNzzr1F73Wt728s2otlPY/1dJvdBikyX75aGMWjzbQxcn3k t+Mmt9Zlf++2wZMYVWPfO2Goc+OGRcMpTeww2rFG7kMb7Hdx8Ptg6Im+yQ63 1nWdh9rDjlun/mqDLa6i41CYIjoO/zs+PlZ0HvhO54GfnecRGyu6LmTTdWFD 53Wt6D4hie4Tijvv05KeC0LpuaC887lSaA5QRnMAlc45DNYVzQ3u0tzgfufc 7tOcIZbmDGc653ya9gJVtBc437kXI9oj9Osj2iMod+7xBu0dntDewb5z74Mo JyBDOQGTzpzkUK7gEOUKGjtzFU05hDLKIWzpzKEi5RbmUG7hSmdu/1DOwZNy Doc7c/6YegF11Av4NoF6YUE9ggvUI1jd2aNY6h04UO/gqyH17jz1FBSop+DQ 2dMO6jUMoV5D385enyMHwIMcgLWdDpwiN+AZuQGnOt2oJmdgKzkDczqd6XQJ Ol2C/7m0dKXfNe+GNgzPiV6vUxfIXpmETDxbWNCGoXi27lBJIHt1s3L355u+ behu/mW8NwayV2c3RH/o2NiGa/QUdsrYBbJXfWbLjD1e2orFascfiqsFslcy PzW1j6q1YpZ5+P2cjy/Zq3HfRqneutOCSU0jZQIuvWSvrl3TmXz3TTO618iW jun9kr0KvNjUY0dGE1qe1m/3PB3AXkX9bPUri25ERYc0T88XL9irCcWlT5ff bsDAO8+W+695zl61uA5eGrmmHk38ts7KTXnKXtWfnfTBt7kW19hs2h0y6Ql7 9bt7fMUJkxpUv55wV+yQH3s1r/TDsBc1Vbi7e1rA3VuP2CvjvCMtv5ZXYtlj tUc7vR6yV/W9V38cdq0cXVfIXt1z7wF7Jdby0cf2UgnKr2jflnzei7062LJv VkleITZd3W5z29Wdvfo1221R9375mGD37LHeGBf2qnWqRv+fk7Lx6oP63hFW juzViG1uzx4bvEW5D2BxNMeevZJ5uirRbHc8qo0JOVEje4W9Ouk+MCnZKgyn rFlW26+fGXvV9+zuVc46nmj2+chgcz099qqDjoNzu+g4e9VC54FwOg97tZ2u CzfpuuzVerpPWE33yV71myZ6LnhKz8Veic8RzQFqaQ7s1SWaG/S7JpobeyVD c4b5NGf26ivtBfxpL+zVWdojtNAe2avltHcwor2zV73ERDkBLcoJe9VOuQJt yhV79Z1yCBcph+zVNMotRFFu2atEyjmsoJyzV6+pF2BDvWCvHKhH4E09Yq8m Uu8gjXrHXk2gnkIu9ZS9Gki9hjLqNXtlRg7AOnKAvXIgN8CD3GCvTpIz0OkM e9XpEnS6xF6tV7p5ZGNgGwbd3FyS4RjDXl1z+XvS16sNz7jpdrl5PYa9su1q IB58pA3tlufLFx6NYa+6HbAufTG6Dfc7yZmmrohhr36opMt8etyKdj4e+253 i2Gvgk/duf9peCta371w3jTgDXslrtPea+2eFtT4myedvuYNe9Va3U37jV0z ivkcWtXxAtmraBw0UMG9Cd87YKHYw2j2quc3l6XW9o2oMqNnSvaZKPbqYb3U rRb9Btw1eECO+4xI9uptnusId9l6XOP1Y1N80mv2qkfSvs+N8bUodr+oIEo5 nL16vUW610rNGjwbeMFh/MNQ9kr1Xda+2XFVaLL8l7dfSwh7lfXu8MutspXY r7p5p7RMMHulu/bkMQPjcmw7MHqT4eJA9mq6+umTuzaW4KmyBzrWKwPYq3Hl tQ9G+BVijsKa7r3OPGWvrs9dfTCjOg/7md2zHaLxmL066D9hsnmfbPw3+1nR je4+7FX5u5S/h+e/Rf0wjewfaz2Ez1c5Zt+nKcXj3/fVdnUn7rJXoybenKuh HYZ7juaePiJ2jb0apjDAfdFyTxSLNOq3us9x9qrLZNFx6B8lOs5e2dN5oIbO I3y+yhVdF6BAdF32SjJTdJ/wiO6TvbKh5wKZOaLnYq8e0xxgMs2BvVKiucEn mht7pUZzhks0Z/bqMO0F/tBe2KsS2iOMoj2yVxtp72BBe2evEigncJlywl4N olzBYMoVe5VPOQQtyiF79ZxyC4aUW/ZqIOUcNCnn7FUi9QLKqRfs1VfqEfSn HrFXY6h3sI56x16FU0/BhnrKXv2hXoMD9Zq96kEOgD45wF5dIzfgJrnBXl0n Z+AsOcNedboEnS6xV4rrlbzKtdvQp77x2I2HKezVhdNZU/XU2vCg9ivxwc4p 7NXnMS+m/hZvQ13Tg0t8j6SwV+btX5zLElpxsvlR/bNTU9irxAGHsvU2teKD 6aOUcjKS2asMeZ9VXWNa8P2NVcrDtJLZKx+Ztd82DGrBnffSTcISktirwB4z UgZDM/7KqQvbIZXEXumK2eVIbGjC5/J6qgHbEtkrX6ngg/tUGzFy5chaywsJ 7NXEvi7S/cc24PhaE6nwG/HsVfrRuFsqZXXofkpmznqbOPbqmp/1gr2XanHw PKMFOw/HslcDf/RuTh9WgxZD+uT0XBrDXhWb250ccL0KQy4/lBr9C9mrzY8O foxsq8Dk7y6DL2+LYq8Uxl8aZbesHIPW/5g4xOk1e+V8aPzAG11K0NZv2YUH 4aHs1VSlrLvn9hRimH+y27K4YPZqh2Zdn9BHeVjyeOS6nqEv2StxoxOvJ7/P wp3+q59tnPmMvXL3cagOqkvDv6ENk6tzfNmr9OInx0O7x2PNEfGxx3d7sldd /PPGbh8RhhlJziE3gm6zVyXj+mwuG+aJ7VtfLfq29ix7lSwrOg4m20TH2atT dB6Yniw6D3vVq0R0XRh+VHRd9uo93SdMCxPdJ3s1h54LrtFzsVenaA7whebA Xq2iuUEGzY29CqI5gwfNmb2aT3uBZNoLe6VLe4Qi2iN7VU97h2TaO3s1inIC Vykn7NVdyhWMolwJXlEOwZdyyF7NoNzCZMote/WCcg5xlHP2ypB6ASHUC/Yq nHoEXXNFPWKv/Kl3sId6x17lUE+hiHrKXqVRr+ER9Zq9siQHYBo5wF59ITdg L7nBXpmTM3CInGGvOl2CTpfYq2L5e7f9yluxT1oPt6XpmeyVuld9+aHMVlw4 Qm6JYXwme9UWnV0Z59GK/S6jcatfJnuVdepKcvW6Vhy8KKNvi1kme7XDrtBn fOl/3+9W9tt5a1kme+Uz49Xw72tbcI7RhQ9Lqt+xV0pgGPvNvRk1fUOvpsq9 Y6+6BfdK/JDVhB7JW8fdVs1gryITs6rO1jVifkeZseWqdPZKNXC6X3p5A64c Ghfvo/CWvQpP2XygLroeF4wZVSTfmsperYu4J/nTsg7HqK25s/luCnu1IeXB CM3ptTi1+ZuH0/hk9mrQibehmrHV+Oi74d+TTonsldmWCY1nllXhvyH79O3b 49mrmfk+dnr+FTiiNcrOc2Ece1W0WTEvtGs5fu7+Ssf0UAx71Vfc98tB+2LU +JLx7+sIZK86Xg6v1P5XgG+NgrLU5kawV/d9m7783pSHjvNvX/g3L5S9apvz d9vMW1lYbB5irC4TxF7Jmpx7/O5cGn7ReHuirf4Ze9V+PE5py6s4jDPXXJFz 4iF7td7LyF4pLBS7/b6WrJF5j70KuODpc+iJByovPphya7EFe3Xxoug4gJLo OHsVR+eBi3Qe9mrqCdF1oetF0XXZqx10nzB7jeg+he+Dc0XPBR30XOxVGM0B AmkO7NXwQNHcoJ7mxl5NoDmDAc2ZvaqnvcA/2gt7pUR7BFnaI3tlS3uHfkNF e2evJCknEEg5Ya92UK5gAeWKvdKiHMJEyiF7FUu5hRWUW/ZKk3IOaynn7FUc 9QLKqBfsVR/qEfhSj9irFdQ72EK9Y6/8qKewgHrKXulSryGFes1e5ZIDMJQc YK8+kRswgNxgrzTIGeh0hr3qdAk6XWKvNv3y6JiyqhWDlG5Zyb/KZa+UPe51 B8VW/OIZ+mL5k1z2SsbWvOpKr1Zs/BL11P1qLnt1x3pY2uKwFjzUL/Hd7s25 7JX8zGXyT9Ra8JThAoXo3rnsVfgxrZUakc145V3U6j6Pc9irQwPCSgIGN+Py TTcafGfnsFdJw3eY2q9qQttPBjZD/bLZq2cxLT5RexpRdn1gcXG/bPZKwQIm T9ZtwOcwT/3Jjiz2ymt96+9q5XosmyanoHgvk70q+b5z4qiBdfhkqOZgl6vv 2KtFP6Xt+r+pwSx91cdOMens1eYJcvekd1SjTMT5olWFaeyVv/Gw2MTySqzs 1VX7aU4Ke3X/08o+tzdW4NIBKl41gUns1Wfpxb5r9pXhsfkbU2aeSWCvpu6K 22XUrRjlI1tkaibFsVebFJMkxK0K8PBc+dBj8W/YK2mX/BffG3Lxvm2cX4hb JHuFk71kChZl4bIWJRfjW6HsVcxO5SGz2lNx2+odDjuOBLJXKx9XLNi2OQ4d fsi0JB3zZ6+e95Yr2LQiFJcfUts9MNuDvXK9GC33d4AHxij3njhx6SX2ao+l 6Dh8Xyk6zl6N7SM6DxTTedir83RdKKXrslc/6T7hAt0ne1VEzwX76bnYq4U0 B4ihObBXRjQ3MKO5sVcqNGdQpDmzV/1kRHsBS9oLe+VHe4S1tEf2KoT2Dp9o 7+zVLsoJTKOcsFcqlCsop1yxV7WUQwijHLJXfpRbqKHcslezKecQTDlnr4Kp FzCResFeZVCPwI56xF4do96BCvWOvYqinsI16il7NYV6DWeo1+yVEzkARuQA ezWO3IAmcoO9WknOwFdyhr3qdAk6XWKvLCSbVXvbteDYRUXzDW0L2KuUHaNf nr/Qgjn9pDdcPF/AXm0RH72uUbMF8wIL5udvKWCvph9PkrLs1oJH/Y/euTWi gL0qH/nJxvFuM0pLaon9jHjPXnVRDpe8278ZL05pSjJQe89e3bOS+Td8fxOu adu4Tys6n72yiVtzMNazEbfLBI3fLpXPXlWun195+E0D7hytcU5qTx57Nbxg 574uCf99juorrrXbPpe9Olx2zejSizoclRyi0dU/R/j5VYN7lYxFLfrdPvSi /Xk2ezXz49HKAYtrcMeWua5LPbPYq7/zFxr5llahduyn3L8XMtkr/UshPbYZ VWLE5KBVKc4Z7JX25vuTH9WXY59u0WP3D3vLXqkNrzPT9ilFvYmZ404fTWGv tLenhE7SKsI7nwzUkgMT2SuHIc1j5rW8x0yznEjFkjj26mN9VP+RB3NR+XsA xnx+w1713fNxu1lWJvaoFpNta45gr06M/9Gsvy4VFX4p7+3ID2Gvdm+JzZEv jcWjLk2aEptfsFetJpqKUsGvMN2iV/9Vhd7s1c89N8Ml17vj6RvGE20m27JX wXqi41BvJzrOXumcFJ0HFCxF52Gv7tJ1IZWuy1750X3CVrpP9kqOngtm0XOx V30bRHOAbTQH9sqf5gbVNDf26jjNGR7TnNmrPbQXMKW9sFf7aI8gRXtkr47R 3iGd9s5e9VYU5QT2Uk7Yq0WUK9hHuWKv8iiHEEA5ZK9OUm5hLOWWvRpNOQeg nLNXjdQL0KNesFd21CPQpR6xVx7UO1hPvWOvelBPwZp6yl5VU69BlnrNXs0k B+A4OcBeaZEb8J7cYK9SyRnIJWfYq06XoNMl9mrC6x5//4U0o9Ol5dJiysXs VeaUGX1qfZvxR+ZoH/m5xezVM3WTIY/PNKPuueTi+72KhX8frHZ8fnJ6Mya9 P+jlHFXEXlUOnfXrfkIT6gXnvNu3tYi9Cjx0ZflNaMJBGbd+GGd/YK/2hF+w yXdrxKbpcc3LZ39gry6uXtIhXdqA3127T718qpC96lc4btEssQZ0fjFvTlfP AvbqnedLm8+D6vGFePTTOy/es1fL9Y5k63WrQz3LsVZLfPPZq4Prb/l7Ftfg 6vaP+UMv5bFXm/6Fjyz1qEb3vbMLV67NZa+eaRauO7C2Cr1tta5Jdclhrxqm PNfxra1Ap3Pz9b+6Z7FXDxvn+w80KsfnPbY3qEzJZK+iPXbl7YovwWvbDkya tDadvSp+YNRj/c0PmBLj6fhpQip79Ujvhdv6pe9x+zItzUUVicL3wUknQ0ty c1C3fvCZY5fi2KvXPVIm223NxCj7XldkRrxhrxx+h5wbY5eCvTuMxBMmhrNX mosCnJU2x2J74S7M7RvIXkWpfN46ceAr3GMSNTkn5CF79eL4rmKb4/fx+pab n5x/X2evdExEx2Gulug4e6WgKjoPpNF52Ctrui5M/CC6LnuVSPcJSnSf7FUu PRe8p+dir17RHOAMzYG9QpobHKe5sVdfaM5QQXNmr/JpL+BNe2GvAmiPEE57 ZK++0N7Bm/bOXoVSTuAp5YS90qFcwWPKFXt1nHII6ymH7JUa5RYOUW7Zq/eU cwilnLNXQ6kX4EG9YK9sqEfwh3rEXhlQ7+Aj9Y69CqWewjDqKXtVS70GA+o1 e3WeHIBUcoC9ek5uwB5yg73KImfgJznDXnW6BJ0usVfTT476+AWb0Np13rER ZWXsVeXLBft3vmxCV03j5g0ZZezVwZZR470vNWEflT9io9zK2Ksr8EDhi1IT HrTKuumxuoy92hJ5vcX9fSOOmRmyc0luKXt1KvZzrwFbG3F8dEvhYShlr0K+ zk5MDGvAAPljt1OvlrBXocW2Lse6NOBJX0W74aHF7JXy917G76bVo6qS1kWF hCL2apqeY27U8jq8NTOitterD+zVmYcfxs9bUov7JY1/vr1ayF7tSetuvGpc DVZ1sTcPWlkg/Ptg0NE9Mm1VKLlorvXQmnz2aleixcB/jyoxQ8eqZYdRHns1 9EXanaVrK3Bro9t3ybIc9mpo7tTjjm/KsOhT1p3Pi7PZq2Mj1NJUE4rRbEZr sOulTPZq7vOnU4OfFCIoRzcmnktnr/pOfrBvrGk+JiuuOL0xPYW9+vsw169x cg5qzKy4EN49kb0aueGg9EjHdyh+y+fHd9lY9urK33sRY4KSMeWn9umVuyLZ q9vJewIUQmNwb8XMfTHbgtkrVRfd53IbQjDhz7S8Z+ces1dhB+UVpp1ywy1n I0bM2GbPXmkfFh2HledEx9mr53QeWPJXdB72KpGuC250XfYqgu4TxDpE98le rabngrn0XOzVSF/RHMCA5sBejaO5QRXNjb1aQ3OG7TRn9sqG9gJXaS/s1UTa I9TRHtmrMbR32Et7Z68MKCdQSDkR/n2QcgVylCv26iDlEFooh+yVBeUWjCm3 7NU8yjm4Us7ZK3XqBayjXrBXUdQjOE89Yq8iqHfwinrHXp2lnsIk6il7pU29 BlnqNXt1lRwAI3KAvTpMbkA/coO9qiJnwI2cYa86XYJOl9irq6WtGvVP//PE b/CEpqcV7JWZ0+vD5e6NOGr2ShmPBxXslYGOhuN7k0as6v7nQ7xNBXulfMnp z8/pjZig3fHgjHYFe9W+1GaCQ/p//vgvnNYqUcFe7R/mY9l9QwM+qI3YqZ9Y zl591VornRtej880JcQW7i1nr7x+V3b17l2PaePX9/UoLGOvTgWZ3pm4tA7/ bt+SqJ5eyl7dOfo6b+GOWlTyfmFx07OEvTpiW2OWpFuDWQ8znPw2F7NXTyd5 dCvQrEal1q3TvjV+YK/2rMixuKpQhYHShW8+7StkrzY6+t8e3laBv1bYucyP f89e3T5RLBbjVY52StGjz/XNZ6/KCvW+Fl8qRZ0td7/dXJjLXvUoXC82+nER lohvWbxrUzZ79cP7iLjyswL08U3fXaOdyV45ZT32N3HOQxknXHbc/S17tSby xZXWw9moc2reg78HkwWvHs2N778zA6Pany0uGhPPXpUc87+7JjoJ1bU9kkeb InulfUtN/VavGEx8q21ywOEVe1VzsiG9yCwYa/QXDfg08Ql7daf/WYOhO11R 9r7psN9jb7FXcgNFx2GKu+g4e6V2SnQeOGggOg97dZWuC73SRddlrwYeF90n XKf7ZK9W0XNBCT0Xe7WP5gDnaQ7s1XOaGyyhubFXAx+I5gyBNGf2Sor2As20 F/aqnfYIB2mP7NV92ju40t7Zqx2UE+ilLMoJe3WQcgXRlCv2KphyCKsoh+yV KeUWiii37JUr5RxUKefslRn1AnrtEPWCvXpEPYIc6hF71UG9gwDqHXt1gHoK vtRT9uo79RqCqNfslQo5AEnkAHt1gNyAanKDvep0BjqdYa86XYJOl9grw6rh t36aNeDxtT2SsrSq2KtRW/r1cTjagKcH3lV8+N/3nv955fBx8/X9qxvwYVQ+ TJ5RxV7pv0Mdrx4NqPpt2seLvyvZq3wzh/Crj+tRTy71dmlIJXt14IzPdatZ 9TjmjMPpGzsq2athqfsG9PGqQ1OP757NLRXsleswiQVB32vRwa6f7hGjCvZK /sWv6XPn12LDGflytw/l7JXtn/ILWjo1eOR2xJ1B88vZq1tDB6h1Na7GEq3I GQ1dytir3J9Km6Yd+O85F2+sH3GyhL163zvtb4tmJZrI2oWqpBaxV4uK+006 NL4CVbqXuizs9oG92rRSrjQmpQyd8k6tz5IuYK/05qzOV5pSggOG++3qI5vP XnnMP3ynt/EHnLa29fePAbns1ZQfxRE9Hd/jsIuV5e+qs9grR3nNGfMf5KLh qPbKRxveCe+3D5BrfOGahYvmhiVEhaWyV6UJF86v6p6OU5LLzob+97nrf17B vZvtfgGJaHRX/eEVxRj2qqP8+8dpqm9wNhZfORsYxl6tc9tiL+8YhFOqcu5k hT5jr56oppnuknPBPb+svuXl32avJq8WHQfr36Lj7NUzOg9E0nnYK4UK0XXh DF2XvTKm+wQHuk/2qn+i6LlgHT0XexVHc4CdNAfh51c0N7ClubFXy2jOMJ7m zF4F015gCe2FvTpFe4TRtEf2Sp/2Dr60d/ZKmXICGykn7FU55QosKFfsVTHl EJByyF7do9xCPeWWvbKnnMNJyjl7NZV6Aa3UC/bKi3oEjtQj9kqCegfnqHfs lRH1FMZST9mrD9Rr0Kdes1eG5ACsJgfYq9vkBjwiN9grSXIGzpAz7FWnS9Dp Ent1/vdOw/1z6/FGj3r9i63V7JWnyZGF/hPrse/0DW1mVdXslXa81fDLXetR 7ea2sZax1eyV37zho8bF1mGa1JWnL65Vs1cjdml/jzpQhxJaV2EZVLNXbgWy /uE/arHR3ny5dUkVe/XtZa8R147U4uclhpaV+lXsVdqhLTaxGTX41fBP+vui SvZq68TlE/qI1+DBbgcMvylVsleufh0zx6pVo8UkQ5OaqxXsVeG+nWrl+6vw q/IZZd3/Ptf9zysrg4HnFxhX4s7i++MOlZexV2+q+2lO06vAuLxnmjeGlrJX rRW3n71XKce6ryda+8sVs1f4RN0iaXoprg10lf006gN71WfWOX2ZwCJsO9R/ vm77e/aqzz31pM0ShbimqteW+0F57FVFkFbPCfvy0Uy6dmpPnRz2aqfEFY39 zjmo96zNePDnTPZqZUjfy33CMtFmVMMJu8a37NVbsduPp19Pw/c/Aj7YZyex VzMHivtrXkvA2IepmVZesezVqacWd27UReNcfdmq1+Gv2auMLgPm/nQKRK+4 9Ob1wwPYqw29Z8lszXHGwXJyQ9tNHdmryD6i46AuLzrOXk3qKjoPfKTzsFeZ dF2woOuyVzp0n1BP98le/aDngj/0XOyVNs0BntIc2KtjNDc4SXNjr77SnOEm zZm9Gk17AR3aC3slRXuEv7RH9iqL9g46tHf26hvlBL5RTtirZMoVZFOu2Ktr lEM4QDlkr8opt/CLcsteeVPOwYZyzl7tpF7AEeoFe5VJPYIO6pHw+Yp6B9+o d+yVB/UUWqin7NUo6jVIUa/Zq6fkAKSTA+zVdnID1MkN9sqLnIF+5Ax71ekS dLrEXsmuK1tnnVWLQz5ZNq39z4n/Hc9LTku2SqhF8VHvB1jo1bJXMVYVhXZe tdiSGl0hv6yWvRpxcuuWtP216O/u7bSvRy17NWqo16jTQ2sxT3zPP9OgGvaq wnlLRvOjGtx6d/WqUPUa9qrh+kebe/I1OC/I2Ms+rVr4fKXftqHnzf98NIh/ Zzu/mr0yMgvyyK7473PhR10nuF7FXk0JT/AJlqnCscedpPanV7JX3S5McTyt VonDCq3HxXVUsFeBJ+5m/NtdgaPnFSspjqhgr1zGbWiCfeWYGP6uNnBMOXv1 6kqcudXzUgybLd7l5ORS9ipkbe2VZSbFqFXlapb8s4i9GiuzIX/g6A+4rth0 +PMnhcL3wbQpKfsfv8epfzWv3Frxnr362a75qFAqD7V/S/f49yaXvXrpEVwt cSYbA06sM7mrkM1evS9w986+9A5X7D1tJPc3g72SkE3cqf4jBUMHTLthdSWF vZqhcW/nUc143P9p4pUeP+LYq+fKZTbHZKNQUtLqTb+HkcL3wZF5O3favET3 LajbuPgle/XtR0vQdgMnbH8co+/RzYm9WtshOg4r/UXH2atF4qLzwGc6D3vV baXoumBE12WvtOk+wY7uk71aTs8FZfRc7NU/mgMcoDmwVwk0N4ijubFX/b+I 5gyHac7slQTtBZbSXtirWbRH2E17ZK8Sae//fS4Q7Z29SqScQBLlhL3yplxB BuWKvQqnHMJ4yiF71ZtyC5KUW+F9Bso5yFPO2asT1Atwo16wV57UI4igHrFX LdQ7WEi9Y69qqKegTT1lr0ZTr6GAes1eiZMD8JQcYK9iyQ1oIzfYq3xyBiTI Gfaq0yXodIm9uviiQjFlaw0aL9go9bigjr36UaRWe1OjBqWb50wb87aOveql MjiuTaEGYx7UOtn61rFXW9vcpvX/XI0uU7IrhxvWsVdSA1o+yvhUo1Pk4Zgu Q+rYq5wf4T3MllVjoMuYjMf/+fc/r/ZPWKp0PakKJReWK1hK1rJXnwM/p79d WIUhKwZ0lTpfw16Nfx3+PsepEj9PSPs6Kqla+H2cr12jNCorMPBY3NElv6vY q/lNV0zaR1Wgw4W8gu2jq9irrZKn8T6U46LvzoE6kyqF99sbdJ10H5ei8lW3 x6rjKtirmaXbrVVeFuPeDfvNJvcuZ6+62/2y/uX6Abt1OGbuiSxhr2omJTsH HSzAJYMSI+XVitirxq82syJl8nHabmsHxfAC9ko1cULihagcbJlRulF1UD57 5VwirWammoV/NWp1x67LYa8uK5r39TibjiPeDrz05HQmezXH2TtxmVoyhjr5 pSWMT2Ovdm8+qbj1bywmZtckPVqYwF7BxqQdFUsjcOJaN4dDx6PZq+zkWf8O 7wvAwVteTr64IZC9MmuQfFpf6YhrB3gcWHrSmb2KahQdh6CBouPslWyK6Dxw gM7DXtnRdcGcrsteXab7hM90n+zVdnouqKLnYq+e0hxgMs1B+D5Ic4Oha0Rz Y6+20Zyh60zRnNmr37QXWEZ7Ya++0h5Bk/bIXg2jvcNw2jt7tZRyAgcpJ+yV C+UKNChX7NVOyiGsoByyV0qUW3Cm3LJX/SnnEEY5Z68mUS/gB/WCvfpOPYLX 1CP26gD1DmSod+xVPvUUXlFP2SsZ6jW4UK/Zq23kANwnB9irPuQGxJIb7NVP cgZkyBn2qtMl6HRJ+H2cf6PE3iRUYcn5dhih0MBeTZmv760dUYWJDwJ0CqUa 2KsDGRFHZ7lVYfA3Nd85X+rZqwTTiHmGhlVYW5ubsTawnr0a+Mrk0NyxVShl FKhgtLWevXKfLd6zMq4Sy25763wurxPev1rWf0L2pkpMGy3RRXtjHXul7PX2 0dnMCrSbpzhM8Ukte2XbtTRi/6IKnPuvl6FScw17FeNzdvmsW+W4sN6yZtbI Gvbqxsofm0e/LEOZAwtDfihUs1cpBUcumI8uxY6TZ7baTqpir2LKZL3nGRbj 6Mxq589DK9krhfQ5IX3ufkDPeTfNtzUKXi2I3ji69lEBjlRyl6rdXcZeLX5f 8ijbIx8dNvb+Oyq1mL3ydxt47LN5LsYO1s4TG/mBvVK0PuFioZ6NGZHGTy+o vmevtk4Z9i27ayY+cp18+PyuXPbq1ZN9E13X/+fRwLnYf08We7Wv6v6J3IuJ uPOBaoif91v26sulT0577sXgj8omHcn9iezV8IJBl/KXhuN+Wfs+vwe9Ya+s jg83eqX7HDfPuzb+46Yg9qpxwPdBd1fdwd79JIPXZNxjr4YNEh0Hi/6i4+yV +AnReSCQzsNe6dB14Q5dl72SuCy6T5hYJbpP9uoKPRfY0nOxV4U0B+igObBX BjQ3iKS5sVerac5QRXNmr17TXuA97YW9UqM9gg/tkb1aRXsHBdo7ezWfcgJ+ lBP26h3lCuQoV8Lv41AOodspUQ7ZK2fKLchTboXfd6acwzLKOXtlR72AxdQL 9mo19QhuU4/Yq/vUO8ik3rFX3tRTqKKesldDqNcgQ71mrxLJAWggB9irg+QG hJAb7FWnM5BEzgi/j0MuQadL7NWxIRXV/cZW4td+3wLm7W5krxZ+/r3BamQl mvjmvNi6oZG9qlg4+0H7zwoMCXBYlTyxkb0yfSNefTa1Ao/Eb5/xqrKBvVpQ XSKmcaUCb8eKDT5g2cBeVUokPvSbU4HzrbwUVXs1sFdOl6rT296WY8CKlunv jtWzV2OjT9+w3VyOUNd3lldsHXv1ccFFiSbHMgTTMZdNOmrZqzeex3vb7inF Z9GHY6T++5z2P6/2uaZunDWgBAuHVFRZytawV7JWGn/VXIpQbC7qPR9ezV5t lypU1O77Abdf95N8/Unw6nuCWFj33QV4ubqnVMHrCvZqePTp3v1c8rFnRm9j zWPl7NXLpqFPNKJyUSJhtenXqaXsVXCS54SI1Gw0uZERcUOriL3q5qnRsj8+ E+NGbYjdu7+AvYo49sbhw7Z0lDi6seaGdh57ZaBzeGjfvim4b47jBWXFbPZq yJ8JZys947F3H9XBHt0z2CuvVY2uvWTfYELgx9UTziSxV+dT1y0xnBCKd82/ y/7IE7yarOkwMLvgCZ5d1j5x6opg9upugFnWYKdbOHetk/Oe/q7sle9L0XHA daLj7FUgnQeK6TzsFdJ1IYmuy17F0n3CN7pP9moWPRcsoOdir2xoDnCe5sBe FdLcYDrNjb0aQnOGQpozexVHewFb2gt7hbRHmEJ7ZK/G0d5hEO2dveqeKMoJ 3KScsFcGlCvQo1yxV9MphzCAcsheHaHcQjnllr1KpZxDMOWcvfpJvQAV6gV7 NYF6BCrUI/bKlXoHIdQ74fsg9RQWUU/Zq8XUa3CiXrNXp8kBOEYOsFeV5AaE khvsVaczcJKcYa86XYJOl9gr/Tc9ffcblKO7/BHlhDNN7NV2VbHC+F3luCl4 zoMNh5rYq25fMm2aVpaj0yW5jh7Lmtgr928OVV9GlaOldXbOoB+N7NXLoWlK oyPLcOWFW1WvbzeyV4paL0ybZcswq6Q6+OiwRvaq4N3M+78MSzFA5YBSmGkD exWUfnzVgJslCHl1avNi6tmry21OoT3vFuOpY3+LHn2sY6+abztVt1woQvFt k7Y29axjrx7t8jeoV/+ACiZf7n0Vq2WvBrw6smrRr/++ry3WEctvErxaJzPk wUqH96g4deP64Mgq9mpc/9Sl1gPzsd9ij93vTleyV5PKtrffNMlF+cNnms79 9/3xf179terfTTwhG+O7jldSPVom/Lw9t6dmWdcsjLTSmGZ5vpi9Mu79vJeN dgbukFcJSjxYyF5tS16wYO/NVJz8qXnnuqX57FUfw6zINX6JqFPuXXikQ/Aq ZGPzZd0nsRjQpNc8V+Ude+Wi6qHoNScKxzf6/vMxSWavZg/YvynlUzCmPZ0r u+NqDHt15JTV6Ow5fqjR9nT2YqkQ9mpJlz99x+TYo6/xJdeZ093YqzldRcdh xVHRcfaqkc4DgXQe9sqYrgt/6brC7zvTfcJWuk/2KoeeCyrpudgreZoDnKQ5 sFcmNDdYTnNjr2xpznCc5sxejaS9QDbthb3qay3aIxTQHtmrubR3mEl7Z6+m Uk5gOOWEvdKmXMEyyhV7JU45BFXKIXsVQLmFmZRb9uor5RxkKOfC5yvqBZhR L9ir19QjUKEesVel1Dt4Rb1jr5Sop5BPPWWvQqnXsJp6zV55kANwiRxgr7qT G3CP3GCvdpAzsJmcYa86XYJOl9irV8qysXMWl2C8bLabm2kzezVW7nxUzpQS 1Hp3//QDw2b2Sv+JRHncn2J0rF2cmbS4mb36rHTZfe7LYsyc3S13wacm9mqK 7B7LU6rFuD/A7/NK2yb2qtzHJe9nVBGetn97WVusib36baU9dZ1EEfoOKNHr ptfIXmn9bUsft/UDTho5ULnhYQN7dUvr8p9lpwtxtE3y4Lz0evZqdNCi8Y7m BRicaijlVyR4FaLpnD/e6D0O+DV2wr5MwauRxoZpA1bk49zhvzbKPKthr9bs +ut1418uZsmMGDTgRDV7pTljqds33xzUOb8u0nR8FXvlO/X1gqCF2fhvQ/ju Nyh49cJpV4hyeCYGZS+ZqqNWzl71tjzz7fS6DPxS1PTphVUJe/XLeEnjlb5p OHYcqtzb8oG98pyo+lDePwln2M4Ozej3nr06l3DgRNnMeLT+VJGe4JfDXl09 fz1zu/cb1LRbcmvAnEz2yipn6LhnYq/xQ9ZWd8etKeyVr9HcMhW/QDz12faM 4dRY9uqd+OUlZ0188cSeat1FpYJX3U71Wiv/6wZKy9ZmXJ19n70KMxUdh5Tx ouPs1RIJ0XmglM7DXhXTdcGfrstehdN9wqBs0X2yVz70XGBIz8VeOdIc4D7N gb0Ko7nBKpobezX8iGjOsIDmzF6Npb1Av2LRXtir17RHiKI9slcvae/QZ6No 7+yVNuUE9Ckn7NVWyhUUUa7YKxnKISyhHLJXUZRbGEG5Za8mUM4hknLOXt2j XsB46gV7tYt6BNOpR+xVN2tR7+AJ9U74fEU9hfPUU/ZqJvUaDlKv2auv5ADk kAPslSG5AU7kBns1jpyBbeQMe9XpEnS6JHwf/GOvONC2EDcu8DcI1Gphr9In WX7wOFeIHx9O1Vde3cJe3e1eVrd3UyGu/9TXu6dkC3vln5sTZDG4EL+YD8Kp 6c3sVdeH0+6tCCrAMSHbHHvubWav0FPrRS+lAsw/u7ZYrFDw6nzDZL11T97j IPu+waGzm9grF/0/n593fY9RWgkDMo40slc5u89mFEE+5vvGtQ93aGCvnuxo +eCpn4dLFPxfnnKqZ69eh8a7VZ7KxbUrxUp/WtWxVwr3p626fywHL0T1Vn2j VcteSc1JDKzSysZ3r6MiewyvYa/uypkplU7Owp6ZkRnSrwWvHq67L3X7/Tv8 4PRlh6lGJXt1I3mtR6NiOr4JLpdwSBG8ive2v3XpTCoeSnH81P1wKXv1zWlj oapHEq79Yd6jZkIRe/Xzi8eD6U/jcVLPL3ILYgSvBl25qqL1IAatzSaPsFuZ y15185epqxoUhaPlPpU6BApejZYrSb/8+hVK9/T72Uc6lb0aeKPuw7K1AWjq tDfhVITg1eOok15+9x/ghoqtZTpXX7FXtTsmlkfMvIoh0D5QV8KdvdqvIzoO RstFx9mr3tGi8wDSedirJXRdeEbXZa806D5hM90nezWTngvm03OxV3I0B3Cn ObBXg76K5gbLaW7Cvw86i+YM+jRn9qqQ9gJWtBf2ypP2CGm0R/YqjPYONbR3 9sqDcgKDKSfs1QTKFRRSrtirWZRDsKEcslcxlFvYQrllrwIp56BCOWevCqkX UEK9+H//PijqEcRRj9grC+odDKfesVdx1FMoop6yVz2o1yBLvRbeZyAH4Ds5 wF45kxuwgdxgrzLIGeh0Rvg+SC5Bp0vsVdq9gY8VI/Nwr0q74ehRreyVVJvH 7+SAPFx6atDTVX1a2atctUFitnZ5aK/2YeyHQsGr7n3rE1y35OGYeRFPelxr Ya9SIu9PWNIzD80rgheOGdPCXp2UuuH+xjMXg6QVDtyxb2avrktM/GYvl4uO bgsG/6sRvJLW9Y6Z4ZiDZ7WXeg2WbmKvXI/4Vc79mI3ddPsauy5sZK9OP71T u1YxG3cbeqfeXNjAXnleL9BccigLN0kdG/xLup69Gl5mkFJ4PROPNLZY9mwS vJpZH2sruegdvrSrG/nNXfBquH5L78cL0/GA7OsxE5Wq2auTXUePN5VMwzVb 3ucNjBe8urD46Iq40mQ8rj6+csGCCvbq4iWVdzVXEjF10+VN1+aWsVcSa2xD N0nFo4ux/Mqs94JXDTtkCl2cY1DaRLZPuk4Be/VTcYRPdM9oNJuzqEY+VfDq wb4dx19GhuHw7X2Geo/NYq/63pC55L4tCG+MtHKclSp4JX7dbbXemyf4PHKP 2cf5cexV6K7vXbYFeuIaO138JB3KXlXqLVL4pH4ZzSPvSL8pFbyatF90HJSj RccFr3aLzgNRdB72yoCuC7V0XfZqNt0nxNN9slep9Fwwg56LvZJZIJoDONMc 2KtfNDdQpLmxV5NpzhBMc2avbtFeoJL2wl7Z0R7BjPbIXl2ivcM22jt7NZ5y AiaUE/YKKFcQSbliryQph3Cacshe+VJuYQfllr26QDkHQ8o5e+VJvYC+1Av2 SpZ6BBbUI/bKnnoHrtQ79uo09RTCqKfs1VvqNVhTr4W/10cOwFhygL3KJzfg FrnBXo0mZwDIGfaq0yXodIm9etE18Ovjgiw09G4zGRwheOXQb3CbyrssrJcs u1LrL3ilt9IySj4oC5O18lPOnG0Vvg92Vf9maP3f5405QZP+KLQKf6/vbX38 EuUs1DN5vj4hXPDKIF8/tKEtE+101detntzCXo0ZPO9U/NVM/Pln/LAx55vZ KwP8ZrBgeCb+eanwvuOF4NVI2YlW1qPeYTCUaoUlCl4tzhnUs6IhHdUbjn9T jxG8GlTfEZvg8hYNtvqGJHj+P6/g9tLb09JwWaqpxDb9OvYq91aPhykPUnDN 39LKNcNq2avqpaXzev1LwtsXC6J6+wle7XRWtu+5PBGv3p/7prdCFXv1QVmr wu1QPM69FFRSfkfwapz242+hF2Nxb9Kk8ybFglfTbKLm77R8g+o1T395GxUL f09mW1B3lZpIPP5XLKShXPBq2LPDHYceheHirCxnsUV57FXzvf53H2gGY+7C RzJp5wWv/qbcS+yIf4FP+ny5sG17Gnu1STE3a0WKLx4rfmG/2V3wytkxuKfc IVe8eXZw0HZXwauO5FCZwrWWeGbeBe8iaw/2qmeq6DioKoqOs1dj7orOA93O ic7DXjnSdcGfrsteQaroPqGK7lN4v91F9FzwkZ6LvZpDc4CtNAfhfVGaG1yn ubFXSjRn2EdzZq9m0l7gHO2FvaqnPQLQHtmrA7R3uEt7Z68+Uk7AnXIivN9O uQItypXwfZByCOqUQ/ZqFOUWjlJu2SsVyjlsopyzVzLUC4igXrBXh6hHIBYo 6hF7NY56B/+od+zVQeop3Kaeslcp1GswpF6zV+3kAPQhB9irfeQGpJIb7NUt cgYayBn2qtMl6HSJvZL4Nci6Jj4Nn0qeW1Gj1MZe3bPpq6v+Kg1diy36m05t Y6+qhi/acuVqGjpLPgpd8kvwSu5b8KH05f/lPvlfPyM/watR+9/J6Ren4qql ZyV3KLayV33NPWZEbU/FHNPNleYPBa/U1BJbt0elYH1oebbJF8GrhOT2z9Vi KZioMWbylwnNgldjolaNmZ2MG1ekzCxQbGKvHuSde1yhkoR20+I3S05vZK+e Kw1wmvyfJxvM/GWzezewVw7f9bf2lUvAAWdiZeamCF7V/R6W+uRzHGrPOXLJ /qjg1dQ9KYs3PInFKRUXyjZ0qWGvtkTo9N60PganPUq2+3VG8GrVzUGHlBIR 1w1+MmtSmeBVl/DYqv2pkXiySPyLzaxy9kpz5aWuqgHhaNu/ziGqRvDq594l E8eee4V1j9eO6aFeyF4Z6yvJbZ4ehJebny4PvC14pVsjoR3i8gJ7X3UIfJoo eLVSWm69VehjdPi5pnd9uuDVqf7hf9e/9sLk61XN8z8JXln2kR/9abMjzvC5 8GLkP8Grj11+TV167jy+Tf52vlsPT/bKvpvoOLxKER0Xft5O5wEfOg975UfX hW43RNdlr0zpPiGN7pO9ukXPBXL0XOzVZZoDeNEchP/fhJ5obtDNTzQ39kqf 5gwPaM7slTjtBSxpL+zVTtojbKc9sle6tHdYSHsX3megnMA8ygl79ZFyBXqU K/bKhXII4pRD9iqEcgvbKbfs1RPKOThRztmr0dQL2E69YK/SqEeQTj1ir9ZR 76CVesdeDaSeQgH1lL2Spl7DGuo1ezWJHIBKcoC9qiY3wIXcYK86nQE3coa9 6nQJOl1ir54mPN55PCIO2yb8lRrmLnjVP1pTf8jLOJR3jkk+dkPwyjC6y7Gf DnF40LRtg8eONvbqutzq2Rq74jDEIWhsZu829kprSXavJSPjcMeWiA07HAWv hhxYFC35OhZHH7ql/bprK3t1bM265SrqsTjHu9T6yroW9irlrcT82UkxONqx 6xbL84JX5tPGmh+aFYN7KtPCra8LXtWbaj+xs32DtbeHKlw3F7wqv5Lj6eyJ GD9byjFoq+BVy8Ukr4z+0biw/uuKOcPqhd93DraVNtSOxODkvxa7XwleRZwe NmbGldc4prBM5dFywauFK652G+AahlP1r/vceiV4NT7nsH3vO69wZEzawpiR lcLfv7IpiVU+GYwSKj2O1+sJXq1/u+rWz2WB+ER2zvkHUMJeVX06M+/75xeY 3n/7vpfOglfWoV20dq94gv3PR8hm5wtejXvnayl50hcjr9ba//wjeNV6bmPx PHsvlJnmpW8w4S17lev9Ke75rHs45uKP1mUz4oW/1yd5S6xyvR0qS742iVIL Y6+uHNryRmyJCU4eOfxswXzBq4DDouMgIS46zl6tkBKdB17TedirMQ9E14Vt dF32auh50X3CdrpP9kqFngsK6bnYK1+aA0yiObBXYp9Fc4M6mht7pUtzhgSa M3ulTXsBOdoLezWb9giytEf2ajXtHRRp7+xVMuUEJlFO2CtjyhUg5Yq96qAc gjLlkL1qptxCOuWWvWqhnEMb5Zy9sqZewAHqhfD3+qhHMJ56xF6dpN7BQuod ezWcegrjqKfs1XbqNehSr9krO3IAwsgB4fedyQ04TG6wVwPIGZhIzrBXnS5B p0vs1YYpiWOiF4Vi8/7VRnNLBa8mlrQtvTw9FFV9inYdSxe8OhoodrGpTyg+ dP5TuNBV8Mpv+uO9w9Nf4TqNSYGxqwSvuhxdXLfs9CuUbg4P1ssRvBK/YKuW 2u8VOts5rXFaKng15Wa9t+yVEHzTtr9rh63g1bDuc47ntgRjv+iybLVXgleO WiP7Wi4JRk3Xb0f3xwte9dfeUFttGoTLJR02aIQIXl2Y6Vj/9n4g2skV+0hc Fbw665BvJhPwEn0M1BR6rxS82j3s69P8FwG4WeNU+dFqwauCWUYyXZReoH6l lm/8YcErm8atxqbfn6KfysSndqWCV7BW4+fJO/54J/xRwbHFglfXirtbXBjx GFsazw2aeEnwynG7wsxZZg/x1aOg2G9nBa9UNisVrM7wxik6fde5vRW8yt1o MtS5nyd66IwZKt09n73KHzD/Zv+jLpjTlNtsKpvNXi2Q7bly1LM72LN/n5nn dQSv/NesDEp7fAPbX5RGzdomeDXkyKWbswoscOmCmI4u5wSvlteon12VY4Cf D/wOiNASvLpfKzoOFQdFx9krQzoPvKLzsFdd1oquC9MDRNdlr/ToPmE53Sd7 1XWg6LngIz0Xe1VPc4AImgN7tY3mBqo0N/bKj+YMWTRn9sqd9gIdtBf2aj3t ETxpj+yVM+0dQmjv7FU95QSOUU6E968oV7CbcsVeWVAO4TnlkL26RLkFJ8ot ezWUcg7qlHP2ypV6AVrUC/ZKgnoEQ6lH7NUM6h0kUu/YKynqKdynnrJXYtRr GE+9Zq+ekAOwgRxgr46TG/CI3GCvJpEz0OkMe9XpEnS6xF45NKmMWXrPFZfO j57W84/glcVxjbbwq65478KphtnNglfzTxo/V9rtirfVR+Wmhgte7dxiKPll pCu2SSl+6aYveOX3V3XJ1EAXPFkifnjOJ8GrXgePSGnOcsFYDbEx73cIXr3u I76y+s49jJ3ZTf6ar+CV21G/FfYlzvj38LWlA7MFr+4pBnwa1t8Z4XlLC5QJ XhUotr/QGOeExuVynjLvBK+6Wfueni59FzuCp99L8xa8Gvj3Xtnb7o64qr44 yXyH4NXwD+c+a+bcRpOBl8/c6RC8sn25o8uPG7fQ4NK7tvMWglcny1+tlprn gBl2sh8SPglenV5ZIa925yY2G+oGD1sreHVgyx798fevo4fujf7jHAWvPPae qKuyscVn26/sPeMkeBXWHNmUrHUZPz965XizRvBKZbn716mDrfCx8ZlYAwnB K5/tCpY9D5jjpLu9vLrOFbwK1Zur8tj+NBq0j3/deFrwauuKxx7H3Y/hr97K dqWHBK+aHWq0DOfsR73BQ+Oe3RK8UlZPlD69bg2eUNaIsTUQvKrQEB0HvZWi 4+zV5lui80ARnYe9sqXrwvw+ouuyV410n+BN98le5dNzgQo9F3ulQ3OAeJoD e5VJc4MBj0VzY69e0ZwhmebMXpnTXuAp7YW9ukF7hB+0R/bKnPYOH2jv7NUt ygkcp5ywV2MoV2BOuRLev6IcwgbKIXvVl3IL3UNEuWWvyinnYEo5F37eTr2A VdQL9sqbegQ9jEQ9Yq+QegfJ1Dv2qh/1FJKop+zVM+o1nKVes1e7yAH4TA6w V4rkBjiSG+yVJTkDLuQMe9XpEnS6xF5pK3k982/0hp0zDsobdgheqcwLswkt 94Z3ZnYr7jYIXhVritvXx3pDu3K3tbNDBa9uTJsnq+PgDS+2/lt1TE/wSvKd 1U61Nd4w+bbTuietglcu5W4NX9u9wKukx4Id2oJXg+0yg/CKFxz+aDJS2kfw yl7dwEq8nxfsbYpzCHwneLV25x8bi3OekGjyTfpHseDV4h8NLgohHmBmMH5E 61vBqy8esou+bnCHM1sLPQM9Ba9+pcfeLcpwg/yTw5wstAWvjo0yqjsxzRW6 3vs1KeiH4JWuQYPyySP3YFFS/pnX5oJXa24qvQ++6wQ/1O5JTPgoeBUVOvrz +IeOYNgYueuOhuDVLNeUf+lut+Hq3MGvEm4LXg3sf2R3vrkDDM3zsBvgKHgV V+G3utnTDhzP1ssfqxK8ulBvcqF93FV4cUOv3Xmk4JWbpo+8mc0lmDf20jbr 2YJXuva5n3XzL0LkuFPb7p4SvGpZfv7d6ImnQSZa/d3sg4JXmnsmBUgPNoJz cWYDn9gLXqlvNBxdqb8J1AfGyM3WF7zS3yQ6josGiY6zVyV0Hmyn87BXc1aI rovb6brC/y+V7hO/032yV9H0XLiRnou98qQ5YBrNgb2qorlhAM2NvZKmOeM0 mjN7tYz2gk60F/YqjfaIJrRH9mo77R3F1EV7Z6+MKCeoQjlhry5QrrA/5Yq9 6pUhyiGWUw7Zq7+UW7Sk3Ao/b6ec42XKOXu1gXqBGdQL9uoO9QgNqUfs1TDq HR6n3rFX96mn6Es9Za/GUK9xBvWavbpJDmAgOcBelZAb+JXcYK9UyRnMJGfY q06XsNMl9mrnpUsgnhQOUpZ+w3TyBa8+/tFefiU8HLofHyznniB45WEceaPB Phx8Xm35dfy24NVhnedl+9eGw90P7TsHLxO8Wt69XmllWxhYGj/vmpEmeLW5 fNyTulNhIGuuMV9eUfBqR1lDUkZ1KOT1bd4RYil4NcDtmPLthaHgkH5VeeEL wastjRVLG06+Ap+j6/TtowSvZrwssXN3CYGfUyx+hT0XvIo1/lV573Ew6Pad 0PLOSvBq/9RROYWeQXBHVvHpoKWCV8aTr+acsA4Ex0GfazJKBa/suiwYcnvz S3D3WC1lbiB4Vbu4cb7p0ADo/nH+6CeFgle/JP8trL3wDGYXGxl+nS949cTh S0p+uD/EPhpuOtJC8OrP1udi/gWPIL97aUbICcGrLpOP7zMo9YHf7vcXKCcK XvV82z9pZoYX/G5xvxL0R/j5leShOysvbL0Pz5cVenWVFryyXKyyLPrTXdhl u+esxVbBqxSz7WuKTOwh9eLQZTM3CV5Zwt8ZG9Kt4Jllz+8dJoJXmjKSyjuP HoT9xTYqrzYJXmWPFR3HTSWi4+xVFZ0HJ1iJzsNe/aDrYg8L0XXZq0C6T7xH 98leqdFzYRo9F3s1huaAEq2iObBXI2luKO4hmht7NUxLNGf8RHNmr97QXvAd 7YW9Gigl2iMupT2yVx9p7ziI9s5eOVFO0I9ywl6ZUq7Qk3LFXhlRDtGdcshe pVBu8QDllr2aTznHblNFORf+ngz1Ap9SL9irodQjdKYesVe61Dssot6xV9uo pziRespeqVCv0YZ6zV4dIQfwHjnAXnmRG+hLbrBXn8gZFCNn2KtOl7DTJfZq xC6Ph+1/46FHtaZ3X4f/931weheb+vZ4mDzsn8LRi4JXl5r6vs3OjgcXCFMK XCd4dXe93Yo813j4bd5/eo/fwr8PyvjYxCloxkOJ75tveEXwapjK6m9jW+Lg ywPNwh1fhX8fHHT1/q9xp+KgWnJH5YkVgleFszd39W+Mhee77VXijwpevbxm G62hEQvaRs+cFCwEr7qlbC587hwDylKnaj1MBK8avx2cfzPnDZzyv/Fi+RrB q6k9WvVP/0RY4awRqtpH8Kr1TtO9GZOjYfzG+Dfdnglexel8152yOBI83u6a VL1A8GrBkYjTJtNfw7OfxnuPPxe8ampxKprdMwwcrh7cvWaQ4NX2ux3nn8SH QPq0A+/ldQSvbDIX1y45HAQTW0/9uTNH8GrpAuvQPf8CQOb4d/UJdoJXc3JC pFd3fQYHjSZcyUoXvGoaOiNUreYRXFQ0abH7Jvy8fZXjiGmTArxBc57L43QJ wSu7HsPTIzJcoJ98UUurvOCV+b7Mtvax9nB31jOj1yB4tXLcwK3ZV06CxM+I 4wozBa/MZUXHsUeH6Dh7lU7nwf6zRecR3m+n66IqXVf4e310n2hL98leDRkm ei68T8/FXm2jOeBlmgN7tZ7mhotobuzVPZozrqA5s1eHaC9YSHthr37RHtGN 9ij8vJ32jmG0d/Yqm3KC/pQT9uoP5QqnUa7Yq4WUQ1xDOWSvPlJu0Zxyy171 opzjGso5e/WKeoF7qBfsVQn1CEOoR8LnK+odNlDv2Ctx6in+pJ6yV+Op11hB vRb+/zjkAP4jB9iry+QGupEbwvdBcgankDPsVadL2OkSe/XzmcauA2LpkDBY dXX45P/3+erXsinyX9/ChIXyXpslBa8U1LV8Die9BYVpSa2KDcL7DBKS6lWH z72FxVbSRXedBK9u7n/z4dSQt+Bl2UclSU7w6ui12d06bNNgxNAfNcvuCF5V Tnlcbl2TCk4JHTluVcL7DB1rU07FT0iFnCth5XeGC17V2JRfsVqdAnvXfc3r NknwarPbjRS/DclguN/Uvkxa8Mq7rXftouVJ4Giq1LG8Q3j/SnfxD5MtEomQ cmdIjU6E8D6DQkl78qyCeBjWHptoqSd4daTm56OxlnFg3HPBNskvwvtX5y9N arAVjwXpyW0Sj4wFr25dndvReO8NnJM7EBabK7zPsGfeZjf/EdEQsGymwehJ glf9nBYbF75/Db9vXJRtzRXeZzj6aLh2mlkohIB2L83Fglfn8rd26dUvGDp+ t/6dYCN4teXVsZ7TrALgWfly0y2Rgleywbmm9Tl+cL1BYm9ElPA+w+CZq4w1 LnvDAK8ayfs1wvsMQy+G6Omp34ULX2aOHvdJeJ/hfGnY2C+xZnAk4sTTPd+F 969mlIuOo3KU6Dh7ZU7nwXY6D3ulStfFVXRd9kqL7hMT6D7ZqyP0XJhCz8Ve 3aE54Ig/ojmwV1dobphJcxP+/4M0ZxxpJ5oze3Wa9oJRtBf26j7tES/THtkr G9o7Tqa9s1dnKCd4hnLCXs2hXKE05Yq9OkA5xBzKIXvlT7lFd8ote7WTco7H KOfsVTP1Ag9SL9irLutEPcIP1CP2qp56h/epd+yVCfUUJamn7NVt6jX6Uq/Z KylyAJeSA+zVFHIDp5AbwucrcgblyBn2qtMl7HSJvfq1pHxawslscOnz9kfO A+F90cgbs6wHHc6GrE/WKq9uC++LvjCzePNjXTYMbPs53lhP8Mrl9sXzHv99 Lj+22XrX9GGCV3mWdnfmF2VBdISWrsYD4X1RH9WFn8UuZYFyS1DxouGCV8e0 fJbvH50Fx/oO33RbX/Cqp4n8rQSvTOi/uORoP1fhfVG/LZaVviMy4bvBnA1n AoX3RTvmGs5e+CkDJk6Jds16Jrwvqq0Rn+10Nx28qtSt5O0Er37IKajnj34L sf7bH/puFrz6JJXbYXEpFULupaW5dhO8qr0/UW9VdjJILmt2OHBP8GqyUsP2 j2JJ8Gupfus1ScGrhFqPWXtlEuDIDdsHjjaCV+cGDQhwHR8H2m8WztCJF94X PRdR+DdwWAzkZFRMm7BN8Mr2knaDb1UULPs2srtkhvC+aGzgZ9dTF8OhzzX/ t98VBK/qigu8jncLgeclN6VuHRG8evisHjcbB4CRd0CBn4rgVbN47Ncih0eg 7SIx0Pym4FWvp/NGXd7pBtFq5ZMtbAWvWi+f6/an1RKur7rh0NNI8Kr7FdFx 3KYmOs5eOdB5cJa66Dzs1UwJ0XX/j6v7jufyex8HnhLtUioVoaISLWlIjgZp akepEA1aSkUURUIZlYgilIiMbPXi2HvvEdkyQnvXt899cZ3379ef18Pjuu/7 nOt6vu771es+h96G46JXmXCe9CmcJ3o1rI67LpoD14VeNcE40FkwDuhVIIwb 3Qfjhl45wDjTdzDO6JUDzAs9C/OCXpXCPNJLMI/o1TKYdypAuHlHrz5CnVAp qBP06g/UFU2CukKv+KW5OqS5UIfo1WGoWxoEdYteDVXg6pwuhDpHr0KgL+hf 6Av0agT0EZ0AfcR+zwB9Ry9C36FXAdCndD30KXpVBX1NU6Gv0asH4AA1AQfQ q3Bwg44DN9CrfmdoCTiDXvW7RPtdQq9GVU//MHxPBdFRDo1q/8XeHzy28NLB jRsryPiLCfmS79j7gw/nmg0WmV1BNBVSohoS2Ps42ZF+Le7d5UTgmp74ntPs fZyjNcudBR+UE4snnc/L+JhXXn3mhbzF5US9Us+58Dx7H0dA8Nh+qagyYvBT Z3xNLnsfZ8SjTQczxMuIRdrEQQH8zKuV/C+6V14oJRUHlrcKSjKv6DM5neVx JWS+ntuSbknmlea6tAfWbcXk1oiFm3SGMa/u/vFe8YOvmJg5dey+Vc7exyn8 /sfv1sgisibsx5RIB/Y+Tt6FIGmLYQVk5AJ934VzmVcCM6aPXV+TS27qFeWZ RrD3cdTdjiukO2WTr4N18ibOYV6Z+k/105mTSXY5/ubbMpl55TB08tNHz9LI s9525/gE9j6Ok2nM4hkTU8jWTZ/0v6oxr4zVCuWUaxPJw+kWe4Jj2Ps417c6 qacYxRNe0+nJ98Yxr3Zn77xi1xhJ+I0cHSe9YO/jCAekn822eU4i5vvl9sxi Xn3+sT3r6hxfctcyrlNtOPNqn9eu69Fvbckv0YvyJcnsfZxn3lycJk7n4my/ iZ9cHspvxeVh7+PAcWkHHBe9ugLnSZXgPNGrULguWgXXhV7dh3GgMTAO6JUv jBs9CuOGXnnBONMUGGfmFcwLPQHzgl5pwTzSwUO4eUSvJsO8U3eYd/SqFuqE ToI6Qa8qoa7oZqgr9ntRqEN6DeoQvToIdUtdoW7Rq3Soc7oU6hy9Wg19Qeuh L9CrsdBH1Br6CL0aAX1HjaDv0Ctf6FO6GfoUvTKEvqZXoa/Rq1xwgA4DB9Ar b3CD7gM30Kvj4AydAM6gV/0u0X6X0CtdFd2cz9NrSMmlpi9+S5lX3mLXXZcL 1ZAy37+aqrOZV3M3WxmOfVtN1j4+GKL0na3PIHfp133/x9Xk65lfOvHP2fvO PdY5k9euqyblwo19I9ew95137ZdT3pxTRXJGmtx7Es/ed66etFlr9dIq4i57 Om+88H+8WqwolWhXSUo3dCfz72DvOx//MXOuWUoFUdWS9VAzYe8721tu+rqm pZy41VfdSzZn7zufHeKzfWhvGdGy8pU2P87ed97wskI+pbmU5HYsK7mrzLw6 eUMw7U5qCbm+PldQ7Rdbn0FYoUvmqXMxaQxcU9bymL3vTNQ+7FLZUETOrrxz uWYp82ozT3ClcXM+uXLXb2hADHvf+ZSBW26fcC6JKoiWTdjA3ne2Giy+6OPc LHJKtydcQ4B55VO7eYWDVDp501Fy0uQpe99ZTkDtdNOIFOJWIy8ZJ8e8ij9f ZG/5MoGMDKiKSn7E3nf2P1Co9onEkqZb/AUPBzGvpvHX5H98/u/z7VRDzP6n 7H3nSTH3ZhaPe0LWbZTT/3aGve8s/jUwzzzHgWxd1Gh78QtbnyHgGxen/PJc HL0yhTw0AvKgV5vguHThae646FU5nCcVceTOE716C9dFpeG60Kt1MA40DMYB vYqBcaPfYNzQKzcYZ2oL44xe2cC80DyYF/RKB+aR2sE8olcbYN7pZZh39EoM 6oR2QZ2gVxegrqgz1BV6tR3qkJZDHaJXl6BuqR7ULdtvAuqcekOdo1enoS/o ZugL9Goc9BGtgT5i68lA31Ev6Dv2fTv0KS2EPkWvPkBf02roa/RqAThAf4AD 6JUMuEFVwQ30qt8ZWg7OoFf9LtF+l9Cro14h3Xfz6ohagPSfsu1sPRk/h9HG 7bw6YnxfML53DVtPhmqoWH5wrCPmjd/ua0xiXsmXF1q0kTryYWq488w8tp5M RVmj9cTS1yRXqvBxvD5bT2amT/WoD+tfk+SQQu8rDWz9q1Sxd+fHPKolXwPv eP4mbD0Z2eB5x0Wra0jYslGn31iz9WQu196X7P5STUxL/Ad1PmfryZSGirsY fa8iOx4Jnfn7iq0ncy98na5/YyXR7jouKxbB1pP5ucm7hYZXkNyh7m/3ubD1 ZL4bK1b+PFpOTvVNON+xl3k1cvWy8ZHDyki+4XpLoRHMK3nv99P3upaQrwEp yxYHsvVkWi+qR5weVUy0jxY3UHnmVey6aZKLWwvIOqkkRxvt/6wn4xAcy387 l5x5GqD+dDFbT0ZU5s3DSvEsEnx4VOvyd2z9qxXViRkb7qWRNzt27gxxZuvJ fHjqXSf8OYlIzKxrchRjXmUuK/Ydb/uS+K0gQp+XsPVk9no2BQgLRJKVPz+I bRRmXm3xXyk6u+Up2VY6JndJMltPRvDNIOHVLk7kyDjDabkjmVcZDVycjh3P xdGrBMhDX0Ieth4yHJeehuOiV3/gPGkFnCd6NTqAuy66Aq4LvdoJ40C/wTig VwowbjQVxo2tJ3OTG2dqB+OMXhXCvND9MC/oVR/MIz0K84heKcO808GB3Lyj V5OgTmgl1Al6NeQsV1fUFOqKPQ9u5uqQlkEdoldeULdUH+oWvaqFOqf7oM7R q+vQF9QS+gK9koc+otHQR+hVNvQd/Q19h17NgT6lGdCn6FUt9DUtgr5Gr5aC A/QzOIBeJYMb9DK4gV49BmfoWXAGvep3ifa7hF75PvAcZRvSQCYM0vl0QoOt 15dr/FM76UkDWfe1x2PsarZeX+rXLAdThwayekZekMAktl5f49KjK3P+t+7W +50nLAvYen1LH8roNUs2kGRJebF0Q7Zen0bdYIlhgW+Injx5qtLF1heNOSam 86uznghITJU13cbW62uv/qFnOLqefDkx8dqYB2y9vsPO+atWjqsjF4Z1XEnJ Zev1iSecXW/2qZakz/ggf6qZrS8aU7tukMarGiK+OF9QoJmtL9qeJ1I19Eg1 GXZOKdo9l63XN354eCn/l0qyeN/xBRu82Xp9cgajJhSeqCBJJsEn9mqz9fo+ 8hYrDs4rI1J8U6dMFGReRbQPS9w1sZRo8jvplxC2Xp9JtMhk143FpHq2wrQH 29h6fSHbFeNUawvIGsfYe55r2Xp9aYtf3Ho3KJd4KY4/LiD6n/X67txdKzci kyg0GokvrGPr9b1ZX7Fn4c8UkrUo32TIRLZeX9a0jisXwxOIwIHjyz5tZev1 eadp9e7YFE3cT5wO23GardenM+LeQ+dHz8jeSImqyB9sfdFPLSt7hk+7TWTd Tq9KGczW6+tp5eI03Z2Ls99fQR6aCHnQq1o4Ls2G46JXQ0W586TL4TzRq99w XfQHXBdbrw/GgW6BcUCvGmDcaBSMG3qVDeNMtWCc0atrMC+0F+aFrS8K80hP wjyiV39h3ukCmHf0ajnUCc2BOkGvpkNdUSWoK/TqPdQhFYI6RK+SoG7pbKhb 9Gou1DnNgzpHr05AX9DL0BfoVQ/0Ef0FfYRe8aDv6EjoO/RqF/QpPQJ9il4t h76m6dDX6FUzOED3gAPoVRq4QdeCG+hVvzNUFZxBr/pdov0uoVcPht7R2Hm4 iYyT9/pkupCthxzjY6kVoNVE8o0i7CJmsPWQ35OTT0OUmohg8JKMk9870Kvd C01f2IxqIk9ml0+qiGLrIT+4Pn/WoexGcu7FEz/53Ww9ZImgtb7W5xrJ14p5 /F01b9ErUbE1lzaPbCR9C9zqLdTYesif7e22zb7dQKQldfZcv8/WQ54974uv 69AG8vDcxJOvitl6yGL3LK23ltQTE/t8lb4PbP32YvGv5oJmdeRP1IKFY36z 9dsvLxxlQAe9Jq+mtTdPfs/Wb9/15t2EwUY1pMvKXnl2EVsPeV9ezb5L8VVk 7JKxS048YOshL7WTVO/79/ldNUHYYd4uth7y4nE6autHlBPxIfr85l/r0CvZ kT/FLcaVkvjdcW9EZrP1kJ/zmtv9BheTW+TMBWlFth7ypVP0bnZ6PpHZOdI/ Vp6th7x5mbL9zyPZxFbXePLPScyr6okjfUzepRFTq5Y3Jwvy0av8m6taOg4k Ed+Z84MdNNh6yBV0zkSNS7EkQTS7RjKOrYfcnkxvL1B5Ttyyxg5Xnc68ml78 dej413eItFnAZ+PXnujV4hIuTsMucXH0yjiFy0O/QR70amoSd1zaA8dFr3rh PGkxnCd69QOuiwbAdaFXJ2AcqBeMA3rlAeNGVWDc0KtXMM7UD8YZvVoJ80IL YV7QKxWYRyoP84herYN5p00w72x/Z6gTKgJ1gl7pQF3RT1BX6JUd1CFNhTpE r15D3dKh0Vzdolezoc6pBdQ5238Q+oI+hr5Ar75DH1FZ6CP0SgL6jn6GvkOv ZkCf0p/Qp+iVN/Q1vQh9jV7tBQfoU3AAvfoAbtDh4AZ6FQvO0AJwBr3qd4n2 u4ReXRWIEn87tIWkRCT1zfryFr1aHLvq76GfzcTS7kz1kI636NV0+bKoktpm kucYfCQ0me038faJsbFuQDMxap70fYsV229CTbDj0NqDzWTr8Fd7Zkux/SYa resM0wc1E5lRwXqe4Wy/ia7oqq4Nzk3EfLB0nORMtt/E7Z6yteojmsjazw/n 7rjM9psYsj3wwOazjUSiadasGsr2m7jZWDb1S2YDkbzx/atVVwt6teeAZvC3 kQ1k059iAWk+5tUdFy0/+Sv15HdccxXlY14t+2opoZf2mgiMuTllfw/bHydg yiX3Ld015Ny8IIspWWy/CZ9Jso/bvlaRJtPCaboSbL+JTAvvoJUdFeRD1LSK Ime238S6PatiLqSUka/BtHxJYzV6ZbtRYG7t9RKyquHx4UOT2X4Te/tGHEpV KCK5+9ecIApsv4kVH1yOKj3LJc/Koo/XrWL7Tai71rdWZWcQR7cCg/BjbL+J q87uJyxKksnDPMMjqcvYfhNGdHdBkks8cVghvbynnqJX3xxK2tenhpJmf+fM Alm238QgyVCTw/auZP+zm+2jPdl+E3IzuDgtDuLi6JXTTS4PVXnK5UGvouG4 tA2Oi149hfOkOXCe6NUJuC76Eq4LvdKGcaAUxgG9OgbjRhtg3NArdxhnugPG Gb3aBfNCRz7n5gW9qoB5/OcGN4/oVRjMO/0M845eRUOdUHOoE/RqHdQVHQt1 hV55Qx1S/niuDtErbahbugPqln1/BXVO50Cdo1fDoC+oNPQFenUP+ohugD5C r3qh76gV9B161QJ9SudDn6JXG6Cv6Q7oa/SqExygp8AB9Eoc3KD54AZ6JQ/O UCtwBr3qd4n2u4ReiYqHf3K620r4D/y4GO/L9vM6byD4XMGuldTvtDu16R7b z2s+b226wpFWUru29NiYM2w/r/NXHPgj5VrJxD/yd+cuZvt5ee3Y8PptfQuR dMocXl/bhl7J8oXMl7nUQgrGvL9re5Lt56VbeOZLw99mQrJr1rm3t6JXHhP1 Kh3PNJMHE/bzeW1k+3l90BztnpnXRK7oJXQpubP9vATXzryiOLGJ0IsjY+QL 2H5eN7cpPQ7Y2EgqjBxrd/U1oVdxdfHiLScbyA697Sn2f9j+g9mXlhwK/1tP MvqepBd9Z/sPZmruvfRrcB1R5xu62zTjDXoVT5QjU9tryPlNIn8aL7L9vMwm S6xfFV5FnKts8zaNYPt5FZzdsSLxYAVJrrDxW2vF9vNqEF79JuZzKbF9+WDr +dfl6FXttwCN8IvFZK/wLl6AJNvPq8j6+um7/+4z3iVrDXu5g+3nlcSzXGzk lEUy9fd9UWnNYfsPKvDaTy5JJZom02tThrH9vPrGpF4wu/WKTLn+4qi6LNvP S+qd3hLRu+HkytZrpltms/28Orb+MV0l6UaU5bPHtiux/bzktnFx6rOEi6NX FyAPrYQ86JXKWO649Awcl/3+Cs6TWsN5olftcF30A1wXevUFxoHypXDjgF69 g3GjRjBu6NUHGGfqCeOMXjXAvNBymBf0yh7mkfrCPKJX2TDv1BbmHb0qhzqh WlAn6FUV1BUtgLpCryjUIdWCOkSvbkPd0tdQt+jVaKhzmg51jl59hb6gNtAX 6JU39BH1gT5Crwyg7+g66Dv0aiH0KS2GPkWvfKCvqRT0NXp1ERygk8EB9GoB uEHrwA306gI4Q9+AM+hVv0u03yX06lZBunTgiHbiJKd5yHMJ2y81zoV3x/5P GynzrtftnsP2S23juXko1rSRc4tqonuGsv1S78xfc7LR6995CxjIZOS2oleL Mh/bJ2xoI57vfd+FXWL7pZ6cVmg8u76VnL2ts5lvAtsvNWVY5w6X/f/cq9fV nH2P7ZdqLj3d8WpKC1nq9+D8Uz62X6ritokzH05oIQfsPhZM0WL7pcZpeIy7 r9FM0lT4Ixc/ZPulCpUOs197sYnsPX+/OjaX7ZfKt+Hk9Gs3G8n35Ed3bN42 oFeuJRNLNjk2kNWLPiaObX+DXo0mR8Q1f9aTjbZCvba1dejVfY3Rc66+ek0E /y44ey+c7ZeaqutpdeZADdEt0hprfYztl7rSf3Xs4+ZKMjP946KYoWy/1Aka a29EbysnM2X1D79wYPulLq2+OW1/QAmpSpMOGPejGL3a2zzcKKWskDgbzjYd HcL2Sy3dK3thx4ocsuSm2c0oVbZfavDqugObr6URH4eXyempbL/U64LTtY4Y JZBuQZ67yD62X+qo67dWrY58Qaz/SJmUjGH7pcb+psmffd3J3ww+fcMMN/RK 6C8Xp5uzuDh6pQd5aCXkQa9q4LhUeRh3XPSqAs6TZsN5su+v4LqoNlwXemUJ 40BjYBzQq40wbrQLxg29koZxpkthnNGrLTAvVAHmBb0qh3mkZ2Ee0atnMO9U BOad/f8g1AndB3WCXj2EuqLboK7Qq2FQh/Qv1CF6NRnqlh6AukWvKNQ5zYE6 R69UoC/oYegL9MoK+ogqQh+hVxnQd3Qq9B16ZQx9Si9An6JXCtDX1Bv6Gr1y BQfoKHAAvXoLblATcAO9igdnaDk4g171u0T7XUKv1DpW+QYff0skvpVtUQ1n +9FXzmw4Uab9lmzVDb992J/tRy+mJLVbe+lb4jfNvSTbhu1Hf66notjoSzuZ 8bpzv+dWth+9tf9nKTWvdlLN3yg3Zgjbj14g74vIhnntpGDVrWQTP7YfvfB7 MddunzayYP2aaHk5th+9vK3mrJQ/reTDl2jdjMdsP3rZDgldE9VWUlauoJkg wPajX587fEXG+RbCX+uek7CH7UfvnBA6645LM/FbfbbOypXtRy/h0aiS7dZE LjuG5/hfZfvRS90Q2H7WvpEYHS4Ul4qvQ68WX3oWFHi8gQjZj/94qLgWvbqd 9GbSUuN6MvZvlO7evGr0qmShSrRwby3Jf+26fd5zth99pM60MBeNanK9cISC yDm2H/0+oQcnTtyrINt148NNZrL96P1Xa2jappaStmv5UmGU7Ue/udCzpvx1 EZH2cVRzc2X70du/CD5flJVLGtz6ribcZPvRT7F8XfLyZToZYj6hQNyQ7Uf/ 0+xB9Z15lLh6aE1QM2T70ZfFBdW3JkWQmhvxRUOzw9Crsxt95/0Y7kFUJ27b Lb6c7UffsImLU/NJXBy9WhjP5aHn7bg86NXuS9xxaQMcF71Sg/Okc+E80asY uC4q4M5dF3qlC+NAN8I4oFfxMG70K4wbenUaxpkehnFGrzJhXqgbzAt61QLz SOtgHtGrxzDvdDrMO3q1EuqEikOdoFdyUFf0EtQVejUb6pA6QB2iV25QtzQQ 6ha92gp1TodDnaNXi6EvaDX0BXq1HPqIfoE+Qq9EoO+oPPQdejUC+pQWQ5+i Vzegr+lr6Gv06gI4QGeBA+x5ENygj8EN9KoKnKH9zqBX/S7RfpfQK/cgYiET 1kEufDgut21SM3p1w+XehEDfDhIhcmG82qhm9KpPRGnCArMOoju7cefinib0 qnD0rTGdCh1E1sH83hJeE3p1Jm9HtnjVWzJmx7eTVy80oVcXF+m+W6zzlsQO erBAT6wJvVpkmOznW9BOpH5PfLDkRSN69b560Mihs9rJu7JOC8PFjehVUegU n3G6baR2eJSCvW8DevXR0//ibdtWEhX1fP+OP2/Qq96tEkYn/31+XF25z7DT vR69uhIoKu3n1Ew2xkd57xSqQ69s+wynrTvXRDz29NbMOVGLXsW+Ude7vK6R yGX0zZMKqkavunbnW9wa0kBSpVd/lcyvRK/OrY8Usj1cR7S8Rg6fWFmOXom/ aowf5ltD1G2JzZicUvTqVlD5LLuUSnLH/lfM0sBi9Eq3bfLvYbllxGTYrGD3 9gL0SnCL4vKghGJS3dOhRA7moFfPcxMerl2ZT06UaZTOjU9Hr5qihSPPvs4g j+5u2qz4Owm96qr2VrlnkETeDykUrzwYh14dLatZ1fcykmhIGG+W2xmCXgkP tzQo2etJjqeILXt69y565TaCi1O7VC6OXmVBHloPedj37TXccekyfu64bL2+ GO48aQqcJ3pVA9dFneG60KvpMA70J4wDenUBxo26wrihV34wztQPxhm9WgLz QvfCvKBXN2Ae6VGYR/TqM8w7LYZ5R68o1AlVhDpBr5yhruhTqCv0yhbqkO6B OkSvvkLd0ptQt+jVD6hzmgh1jl5VQF/QBugLtr8z9BF9D32EXi2FvqNzoO/Q K3PoU/oS+hS9MoG+pkLQ1+hVMThA54MD7Pt2cIPqgRvolR04Q/udQa/6XaL9 LqFXlmK7LYqqO4n2qLRrR481oleylvv/hOd2ktWbTG+QQ43olbC++WFd305S /jFpRfHaRvSqvnTa/DH7O8lenxyTFZMa0asYiTeafN87yMaq/PmBFQ3olf2q omF+5h0krtFTTed6A3p1Jr5RwqT5LQm9uHpV7IwG9CrQZmHs5EVvybQ8pbi5 B9+gVwnGD0+oG/xzYsd+59bd9eiVtufRgNdWbSS9ZvbfWLk69Kpjw/MXaTat ZMWIvPtVbbXoVWmYG2/42RbSreuy7NG1GvRKe82J7LwNzSR1zkz3a4Or0SuB DbZmqqObCFHWz550rBK9mq5jmZGU0EAir+1yHBldjl6V+1SvJ/H15MPPdjuZ rlL06uzxOSLBFbXkxuX7R3ePKkGv/vCrf8ivqCJXVCPfWE8tQq88Jgp7FPLK SeXsdyrWC/LQq0ER8zZ/vFlCsjW09miOykKvTlq5R8xxLiBzt4yVbyxMRa/e m8TMUW3LJFpP92yV+p2IXo1wTTq3alYyWV5YXt+zIga9Gno07M8+nygiKysS F5IYhF5tuUXNJB0ekCyfLzdjam6z+ytHLk7zfbk4enUc8tBQyINerYTjUlM4 Lno14zx3ntQDzhO98obroupwXejVZBgH2g7jgF6Fw7jRTzBu7PdXQ7lxpo4w zuiVHcwLdYN5Qa86YB7pX5hH9GoOzDtNgnlHr8ZCndBNUCfo1RGoK1oIdYVe vYY6pF+gDtn7zlC3dA3ULXqlD3VOC6HO0as06Av6CfoCvQqFPqIzoI/Y+zjQ d/QF9B165QR9Sl9Bn6JXL6Gv6Rboa/SqERygmuAAejUJ3KCV4AZ6JQfO0DXg DHrV7xLtdwm9Mvg5+oLB2y6iIvtin8e2N+hVsfdH/9jqLuLn9ChTQuUNenUh yzEoIaSL+O41OJI15g37/up8boa//r/75cok8TRePXp1r7qwnvenkzQWdSga bqxHr5ZfHDv7lEUnaXtYMFg+rg698g63j1xT30EWL7BfHydQh14tM77X3jCr gxiNuM2LWvqa7Y/jV5Uxcvtb4nN415IhG2rRKzXHGXP8DreTxaMFX3op16BX 5h8H5XodaCMPtnk4PBSpRq+2WQpsH6/SSnoNu94tqapEr2a0VEyTHdVCPmWf ex97pQK9GhU3V2hBahOZtCl06O3R5ehV4MlxauePNJLdZtmW62xL0atHcblS tT1vyI4fM/lOdRajVwmP82Ys6X1NqtrWZySuLEKv5qmNGi1WXE1CpPcmfv2a h179/XX4XJ17BZlmNN//m1Y2epX19PSFarVSkuqw4cBW33T06uyex6dEUwvJ jbCMcc3FyWy/icqdmqKVWeRvQnOE8ZtX6FX9+2W8H0XJ5MSk6PG5vyPRK6NP ujuXnokmjzYGXVoxJhC90ikQXhnw6CFxHC+hKDbWhb0/WMTFqekELo5elUEe KryJy4Nejf/AHZc+heOiV4uquPOkyxO580Sv/OG66GO4LvSqAcaBvoFxQK8m /+bGjSrAuKFXa2CcaSaMM3pVCvNCW2Fe0KsomEd6EOYRvYqEeae6MO/s96JQ J1QS6gS9mgd1Rf9AXaFXmlCH9DvUIXplDXVLn0DdsudBqHO6EuocvfKDvqCB 0Bfo1SroI3oW+gi9egJ9R5dD37H9UqFPaRf0KXrlCX1N26Cv2fdX4ABtBwfQ K1Nwgz4GN9CrEnCGPgZn0Kt+l2i/S+hV8dotrgXV3SS4aN/MwLBa9KroAX+O b043kYrZME/Etxa9styZZTDPq5v8Krlz/+L5WvSKn0QpPtjeTe4snLztk2wt evVRbHSGyj8Pb4966lGTWcPeHxziV+ug20W2GSQWuqrVoFeXDixdJJjYScJK QnqDnlWjV65Kp7N1/3SQVO1rI1LeV6FXBpENyvozO8j2fAP3B+JV6FWq7/fe T3JvyTnpKYHCSyrRq2+CIaMmibcToT1HBkktrECvpAorbVu+tpLsbAuheuFy 9OpzglWbW3wLuSe0qeZ4cyl65dMtN8TCoJlEzeUPHe5Vgl6N0w54/P1XI1m3 cGqT8Npi9v2VosfQm1cbyNTls3J6QgrRK5sba72udNSRkGxNS52oPPRKO+N1 0enwGiIa0TnE52E2ehXwfO3dLfsrScff7JU9xzPQq6hDfvs83pWSUs+7eoHi qeiV4Pfe8z2GRUTo77wh9tcoerXEaJv1r5BsMuqVhfuDJ3Ho1et7Pg4iRilk 4sLrGcnPX6BX32dafA2cG0PuaBbJ+6zzR69Uo+fcXe3uRb66PNt53uAWevUl hotTtztcHL0ymMXloT8gD3ol5MYdl6rDcdGr43CelMB5oleScF10LVwXepUP 40C7YBzQKwrjRgcNyvnfuKFX52Gc6RIYZ/TqIcwLTYV5Qa/qYB7pAphH9Goq zDvdCvOOXgVBndAEqBP06i/UFfWGumL70UMd0mKoQ/Rq0DCubukUqFv0Khfq nJpDnbPfi0JfUE3oC/TKE/qIZkMfoVeW0Hc0CvqOvT8IfUp3Q5+iV9+gr6kb 9DV6JQgO0HvgAHplBW7Q3+AGelUMzlBpcAa96neJ9ruEXnmbdVuODfn3+Sxk eSjjfeV/1m+XvH/O6x3Z8Hv+yvmtleiV0R6dbeGn3hG3JAWhc7QSvSqS/lj9 ReIdWanhfYdnVYlerRWQ+XY/qpvknZ8Qt3luJXrlsmZP0DCZbiIfbGZhGV+B Xu2e8iay8moXkY2StchZVIFeGZ/rGhzL6yQGTWpmvDvl6FWexpov52s7SMhE k/Rfr8vQq5eBUtZ8b94SnlnP7Y1CZWy/1K2jlQ5n/fNq7kFpi4Wl6NWx9+tX JN1vIzfVT/+9vLIEvfJaEdiyd3sr+f1qZMV2+WL2vvPma8+ufWwmw2cru4ye UsTWk1m03yHcqon8rolZEVWbj141Ls/0Ovqjgdw12XyhxSAXverQFHtrk1ZP jqgbHlpTmoVevapxKXh9rpYMu9xbeE06A70yidUN2ylQRY7tvTPtgl4qW09m y8LnNpZlZNx08SlDHZLQqys/gi2kmouIdHStlLbKK/RKyG3o2KGGOUT9nNPq Idui0aui5rcZn9+n/OuTGS8v3wlFr3YbfRj/PjeGyIg8z83V90OvSrzLX7w7 7U3WNy/35nO2Q6+cfbg4DW3h4uhVGuShNpAHvRJs4Y5LQ+C46JU6nCc1gfNE rzzguugOuC62vzOMA5WCcUCvnGDcqAWMG3pVBuNMRWGc0Ss+LW5eqBnMC3rV DfNI/WEe0Ss7mHc6tpabd/SqAuqECkGdoFcBUFd0KI+rK/TKGOqQ3oU6RK9S oG6pCNQtepUCdU5Toc7RqzLoCxoJfYFeXYQ+oobQR+jVPug7uhD6Dr26B31K l0Gfolfroa9pEfQ1elUCDlBlcAC9Oglu0Pvgxn/Wb+ecoRvBGfSq3yXa7xJ6 1WBpeXSTbg9pmTFOo25qGXo12Z8/ctv2HuK81XvOxnFl6NWOFv7jxpI9pOdl XeWDvlL2+3ZT59Y3xe9IykLb8I+vStnzoIjd6169d0Sdzplsf7YUvdoX68E3 qbyb9Gh3qj0TLkWv0uzOOrbP6SYbzFQHxfqVoFclF3N8phzqIoe/zpaUEStB r0pkqq9bmXaSZVU10s42xegVT5C/eMyFDtKkuNzTtroIvWqaFaZbpvmWnJTJ PZImWoRe6bqvWvdbsp0soBNXTvcuQK/kf568UFTSSgbPeL/+SlMeelWofMg5 9EQLcRH96mM+LJe9j3MrYPO4902kb2VFx7Dx2ez3V9ZDBK7rNpLWIJfwpXyZ 6BVP+fJ4Pcs3ZNzji6v/tx7SgFcKd8WS3Ke+JlPsvh5Q9khBr0zXHRuy6n4V cVF/WPVSLQm98mywbRn8q4zM9Xi8aGHGK/TqWt7cx9EbionV1Z9CkY0x6JW0 pd1p4xG5ZJH/luaZrS/Qq4kK0aZDDVLJKft0IevgZ+jVy+IUfoM9sWSCxe6C S83e6FXX6tBp2XMeEbWr99c0edugVxFruTg9d42Lo1eyJVweGgR50KstcFwa B8dFrw7CedI9cJ7s+yu4LuoP14VeRcE40M0wDujVbRg36gvjhl5pwDjTuTDO 6FU5zAuVgHlBr2xgHuknmEf2Pg7MOx2kxM07elUNdUK9oU7QK2WoKzoO6gq9 MoI6pCuhDtGrLqhbeg7qlq3PAHVO30Kdo1c10BdUCfoCvaqGPqJHoY/Qqxzo O7oZ+g69OgR9St9Dn7LnQehrugn6Gr3SBAdoGjiAXu0CN2gvuIFeiYAz1AWc Qa/6XaL9LqFXF3Wl2tI/9xDR+4f3980vQq8UjJtFLrf2EPW1N1ROShehV0fN cyoio3qI59mrbd2jitj67Z+Hn/U63ENOOCavFk4vRK+2Oj1Y5vzhHbnz2WhU 89ZC9GqJ642Jg/451nRJ81pKbAF65f8rS8wuopucVVzvvX1QAdsvNWBX25uW f8+PgbO0ts/NR69kZndnvPneSUJLhr95LJ+HXs3daff5yocOwl+n4btJIhe9 ujVi07WSwrfk1K9wNcO+bPSq/OXwJaPutpO7n1wvEf8s9Cpp7WM1s1VtxMUr ++FslUz0apHHuVFXi1qItvzwnZ4p6ejVkbbdJo+3NBOBj4W/58xPQ68UylLO X4xpJKZxEuMv26SgVzOLIvWfjWog2lmftPZkJqFXBoemHfzw+DW5smC/4vj3 CeiV7IHqEcbjqsmBxX3Hv8m/RK/Ee6813dYrJ3vtNSZv3R+DXi2dfj1K3ruY SC1TnyRuFIFeJfGJfvZwyiVqv/b0iRc+R6/iRF7uK0xNJXLdKjqRz56gV8mD 1gmbZMUSqYSpdsJ199GrbWIv3cYnPyJzQ3z4FTys0CtJcS5ORUO5OHqlwMfl od6QB716D8elx+G46NV3OE96Dc4TvdoB10XXwHWhV4owDvQcjAN6tR7GjZrC uKFXVjDO1APGme2XCvNCDWFe2Ps4MI/UBuYRvTKGeacTYN7Z7xmgTuhRqBP0 Khfqij6AukKv3kAdUi+oQ/TKFeqWXoS6Ra8WQ53T0VDn6NUi6AsaA32BXp2C PqJ7oY/Qq2DoO2oKfYderYA+pe3Qp+jVTuhr6g59jV65gAP0NDjA9vMCN+gD cAO9WgrO0A3gDHrV7xLtdwm92kVNspqP95JnAg45i/Sz0Kuosi/tB7R6SflK 64sH9mahVxYuZs/rZveSoa/TBvUszEKvNB8FzHEv7yEaDfzlI99nolf6Q452 NOj1kN+H5Ob8cM9Er6b15nnKF70j25ODnk+SzkSvdt2RtZ87/R0J+FOzsPpB Bnoldjjjz+Ut3aQ2bKhk6fd09ErKL+XKqH/3XcondHtCVdLRq3pttfrCnZ3E 8Wzm/gXGaehVV+U9pUbZDqK+pCR8/q1U9v3VZ63aC13tpG+jcpnXnRT0yimE VDW5tBF/fcut1teT0aveT+rZt6e3kp8JdxV+GCShV1qLVFcNd2sm4w8aC+gZ JqJXAa/4Z7R9ayQvJM6FFL19hV7ttPoiVKveQFT0NNY3b4hHr4Ybvp94YGwd sdrH89rvEsPWv5I2lzh7qppkSTpdmEwj0SvnSRfOZkSUk01eRc6jq8PRqzH+ OofWNxSTYzMVh9xLCUav9ny5aP7pcy5x+9MqVBvtj14Ze5zT7BudRu4aFP10 nfUIvTq32WhYgGQcebvozd9w3h30qtly2aWJoj5klDbvkDa/GXpVaMXFqdkB Lo5edUAeunYxlwe9Cobj0ndwXPTKBc6TpsJ5olcycF30HlwXehUM40B1YRzY en0wbvQ1jBtbXxTGmbrCOKNXOjAvdBfMC3oVCfNIU2Ee0SsDmHcqBfOOXv2A OqH8iVydoFceUFc0FOoKvVoAdUi/QR2iV5+gbqkG1C161Q51Tl2hztn7g9AX dB30BXo1C/qINkIfsedB6DsaDH2HXklAn9Jd0Kfo1XHoa8qnw/U1erUfHKDb wQH06gq4QQXBDfQqGpyhFeAMetXvEu13Cb3yHBMTOi+hl9wfLPVtyPYk9Oqs 3sFBl573ktsu5X2n1JPQK/eKc/YXLvWS9i+7W+LmJ6FXS6aEtu3+59gylxf1 v4YkoVdJ5446nI78d59uGxdY6ELRKzfVRzqrxP89by4saj3zLRG9OrU+but+ o3dkSuO8xMskEb26Z23mbHu/m2y0HJ0cdyQBvVK58afrYUAXqWvL/TL0NA+9 cl9yrOSBRyf5cOR933GtV+jV8CdrNz063UEi1CTihs1+ybyyowUNMm/J5Wd1 92dVx6FXX/Q7f0TntZExf64XiRrHolc9V3bJOu9pJV2+hdNO9EWz/bxuOv/4 nN1MlI7rzAnQjEKvetNnet6c00TGzp3SdSk4Ar3a9jVEStCkgfyYVPk6qDMc vVqv8vbRUe06Un5gJJm+MBS9+qETwlf/opqMPN8xVcooiP2eoXtJ4ubuctLS 8v24rsNT9nsG0WV3gseWEK2SWdfbb/uhV41u838Iq+SRWc+rT2aP9EKvxkvG fJ66No3Ih8uEKJS7su+v7ho98dGNIxqbg5eeFrJHr2xVR7zOUfMh39aIGMzh nUGvTNS4OH23loujV3mQh2ZDHvY8CMelp+G46NU0d+48qQ6cJ3rlANdFL8J1 oVfTYBwoXys3DujVRF1u3OhsGDf0Sg/GmfbBOKNX2jAvVHAyNy9s/XaYRyoK 84heXYV5p+ow7+jVd6gT+hXqBL3iM+Dqik6BumLft0Md0htQh+jVeKhb+grq Fr3ygTqnP6HO0St16AvaCn2BXj2EPqLboY/QKxPoOyoOfYdePYA+pa7Qp+hV OvQ1jYe+Rq+WgQN0BTiAXnmAG/QtuIFenQNn6B1wBr3qd4n2u4RejRBOuanW 20vCx1wc7qIVjl7tOsm7dqm+l0SLqVl/2RaOXpkJ202e88+xoKa6P4uXhaNX B5d2rbDR7CUCmSZuOqPC0ashVpvb2pp7SOW5Sc81fcPQK1OdWdk5W3uI659x IkHDwtCrSaV9CXke70g0b/uYPRqh6NXbs/IywendREtnqI34hRD0qt5otoJq aReJ1/ryrfPyc/RK9BdfnUdqJ9kdIncj4WgwerXmYlRnhnsH2dG0vujVkiD0 qvj7hnTB7W/Jne/e2XPaAtGruNFi0lF9bWTdGsdj+pcD0Kus9WvClE1bybQz 8xd2/vRHrz4rPTGQ72gmVadm+WkcfsJ+z/DZcNxS1SaS1T3EdU20H3oVJWpg OcipgfhqzTW68dEHvYpsszVJdqgjGQJPrvYQb/RqVft0hVM11WRXS23DT1NP 9Op0ddyTt2MqyIypJ2YtdHNj7+Nsd0ydL1tCAgO3ZPk+uINeyY7z+BxyIo98 Gr7RadA0R/RqTtzzR5MPp/27rqVHxBts0Kv5kTLDp9vFEYWNS1tcppuhVxVN xnkWOj5EOvKwW3eaDnqV3szF6bQoLo5ePYU8NBzyoFeH4bh0LxwXvToK50kX juDOE73qg+uiGXBd6NVNGAdKYBzYfqkwbvQ0jBt6VQDjTJtgnNGrZJgXGgrz gl4FwzzSMphH9IpvFTfvtBXmHb0qhTqh0lAn6FUq1BXVgLpCr2qhDulDqEP0 ahPULdWGukWvpKDO6UGoc/SqDfqCJkNfoFe90EdUB/oIvRKFvqOvoO/Qq8vQ p9QD+hS9GgZ9TV9DX6NXuuAAHQYOoFfm4AYNBjfQq93gDI0BZ9Crfpdov0vo Ve3f//3rJVKLHF3qZhsnDsRb1vPPm/fPsejfZjcqpxsnDnhVxbfIIJH3734/ MKS7YIhx4oBXxteHvuw51kvUZmotbKg4kzjg1a+IXzuFP/WQZ++a3RTvn0kc 8GouL1886GAPefV1saCE+pnEAa/+aopu2vLsHfm1PsghO/904oBXpWckHvHK uklXPE++vuNUInol/TG2srGLrPv2MO9k68nEAa8mGu2a4l3cScYe6dzikHwi ccCr89caJOf7dxBrEpZ+xNIoccArP/WiutQDb8lL9YPCeyQMEwe8eix09WXs r38+5e2xy/Y/ljjglUinpOhl61bS3GOgpSF0NHHAK1ntIZU+H//dp/+sG3pb 3yBxwKvlMbOcMrc2kcHHf93Z7ns4ccCrY1+ivwW7NRDF/ecjjLJ1Ewe8ehlK JRQ964jL0wXejxIOJQ54lVF0cde39mpy2X3BUP7M/YkDXlWO+fHt/NQKsnTt +ncLIvcmDniVlREvFalQQiIK/h45abszccCryKXlhS7meeRgVoPZaoetifj/ g99629JO/nuuyBYKutGumjjglXHk7J9fXONIzNEb3df3KyYOePV+f8jpccd9 iHCpXIHNfclE3C9Vm4vTSWVcXBmfByEPXXaMy6M84NXI79xxaTAcV3nAqx44 T+oN56k84FUrXBcthutSHvDqI4wD3QXjoDzgVSOMG/WEcVMe8KocxpmGwDgr D3h1HuaFqsO8KA94tQ7mkY6FeVQe8Go5zDv9BPOuPODVTKgT2gt1ojzgVSjU FS2DulIe8Oo51CFNhzpUHvDqCtQtdYS6VR7wajrUOZ0Cda6MXkFf0C3QF8oD XtVAH9GP0EfKA14N1eL6jg5R5/pOecCr+dCnNBH6VHnAK75Irq/pc+hr5QGv TMABqg4OKA94VQNu0CJwQ3nAq1ZwhvY7ozzgVb9LtN8l5QGXwhdFNaz6nq8U bji2+p2kjdIg7l8fmWBg3zuoPF/pScupuUu1PTD+wbRnxb3b+Up1xp4+ZmpP MP6dT3DF6gX5Sof+Xox8mh2M8UkiFlFGoXlKgWE/BVrcX2B80YnRex+MzVOy 1XVuc1kejXGViHzJCztzlQQ6u8nY1DiMt1zzSky6lKOkpjvHIVieh/EEYc+I A7bZSqO3Hd6Yb0sxfiRkj/Hmi1lKU6f/MLysnYzxj+pV2wO3Ziq5nZK9dKo5 BeOSdw2PBIzOUKo9f3e+7540jJelWy/3iE5Tenxb5sbtqHSMpyiMMGxdn6o0 g4a9Kv6ZgXHPOYarRmQkK7Uc/fly5LwsjPc18ws8WJSkJLjUyWXw6myMl65Q GHpZJEGpbdGbsLtKORiX7ixU2xcWrzSuduysONFcjPMX25sfnBejdCkry+96 A4ufz9t8cKlLhJLDVfGrC27kYXx7QFn6ltQQpai71+0Fx+VjXGBYr8P49U+V OlUbX1y5xOLXtSqFRI96KWXdEXohlcHi2T7tGqFrbikdklh9LuQDi2sqCXyW k9/Jc/V2OtH+l8Wfb52Xa27rwnOTispOf8fis2aaRlzJesRbEH/pyn4ei+cH Sx14YhLAqyvvXPTaiMXH+ZU22HSH8ip5W4c9/MWua+vEFYrDZ0TyTvQobxp7 msX7zjcuL4qP4fklC/dlp7LxCRWpHVSx4iVv/+w1v6/8/M84z5/z09g7gZey emHh30ksXhQ0V3TU2STeFsNjq1ZOZvNlL5dwJ3RICu+lQbeP0u9MNv5PU5wt rqXyLF6l8GRyWD2c9D3S19qdxhPeVGuvZsnqZ018QdPp1Rm8Pjmn9g4xVm8N IuPPxlzJ5Jm6T1hsG8Dqc+HozT9OPs7ihXmcSvITY/VcxltrrR+azRNN4LnF DGH1P/q58iBr7xxeUungK7zgVxi3oGHnCs7m8vjNqt+XL2X9JVRz+/MxmTxe o8rUjkeBURh/WLP/wZ20PJ5t0YXCYn7WvyU2D1SCVPJ5M1I/qp7zDsK4o7/B gvne+bwL3g0fT09+zM5HryuA9zqfp25sX977zQ3jB78/VRP+lc9bL/5A9UPw FYz/qdn/996nXpplOHt25AV/uuSIpNv4f5+LFxLU7XO+9VJH5TolWzN/fB4c Fd6jN6wrX8muLcK8Pe425vkLeUg25CFRBv9PHtKfB+/fvNTd1OVi85WS1Sx7 jS18MI/qzTnua/TzleYo5nkuGRmIcUvXQz+8P+Qppb120C+3CsN42M/PivF6 eUofRbSmpRlGYrxT83LK7OhcpVu2JyOLB8Vi/M5BqT+POnOUtp488Lr0ykv2 93WTfT8PyVGqXz1j6qzGBIyH9y3InDI4W+med6Gx6J0k5ue9j9+mtGUq+X9z Ddo1g9VPsmylkPiLDCVy3Uzn/qNUjG/Rej/8hH660qiUnFFaw1h9uroefqLN l6b0SdjLQ2w/q2eNQ1VD9O1TlMRUP3VZu7H61x90V3rknyQl1eC23WvimXsl gZvd65MTldYuWd47J4X10U3xQbZWR18pBQ4aWjojnPVd4LvJuy73xSrVuS5Y vewa61/FcEc5E50oJTEhfT+HZazfvRv3HJn+KlxpR6DPyUOFLH7hZ8E892FB ShOO7+yZtIF5or2ifukrSz+liDXKnYuesPizrI6V4zPvKT16c056ewOLt98y Xhn0xkype0dTjsJvFveekzl4EO8qz/TWkCfJP1hcWM4x11/mPm9k56k1X6tY nBxTNeIPe8yraJX59t2dxed+PJI1Y0kwLycsOXL0chaXVhxce2zrC57QBhLv Fs+u60bXrx3P+qJ4N/cdXjFFjMUNZV+dFLgcx1PYaZK5/DAbN9/UppCc3le8 JqV1obG32Dg3Nvvu3a9KeZKDpkpd8GTzsrn1/tTpq5J5PYd2Ghg7snmclRHn ZZ+ewnsSEOWbcoTN+1Ixg6F7FNN4q2MvNXjNZnUSbqz15LdHOi85SC9+WzHz jY6QaR/XnMF7Fvj1m4oBq8NfYeZly4SzeFo778p0tTDfYnKdTeRls3k+ue4j GrezOqfTQqa/mZvDc5oikO68n/XFk9PDgheNyuWFzZTyDfkUj/GJEe9uKJfk 8uIlbnx/djaG3Q/cEHyx1DyPlywhfmlBdQTGz4xMvXFc4J9LCfuCB2uGYtz4 3LubqufyeZuPNIb01D1l9wMhOR81k/N5ffqqxu3u3hiv/TB05o6+fJ7XSirU E+DEPkcuup94+LWXKB1RfOCo5YO+xVWc1C7+d1+vk3f4eNR+H/TNAf6eroK/ R8dSn+y1/vccQA8b/W1/IGWsPBAXlDCN1v0Xz/29pl3S1AbzD4M4yYM45kmB PKQ/T+L/dz60/3zQSRETYYkFv3rpnHFbwlbc96RicqHt3sddyBSIk7kQJ16y EI910v/a9vvf88q33yHR+13w7+MgTvvj+Pe93P1qPk/0oE3soYnbVg6Mm43B uAivf/cZsiOnqkrLH8bx7DkcekLpX56/77d6TPHwxHGraOhItf/TS25utBCe fckG8+/WlXz44V/894/mmVv+PacPnA8/Pb/j059e6r3k2jGi7YLXWw55qAPk wfPvPy7pPy7+fX8e0p8Hz2cPHJf2H1d54HzW58d9MtAIJxXBYY/5XpkT35rl cv/7vuD62GUnbm73IS8vu1QGJBrh91TPZxwxNNnoQnRy1D0iOw8RTa9Q7nq0 18rOD9UOI6b86dVVSncxzxHRq/EFOo8IX5Tse51/T+sDedYk/Dx7doUz6Qs0 apmsYoJ5fJ+bF0zpCCZh8mXNt5V8MY/A5OUTMrofEF6qxu0KZfbe4ooa09VK T28SLTF+xfEvrmKeUUW5ZKdYIPF3MzVbt+op5nE1e+VnKXGf8G3tDFukwtbD yRr/capF+g1S/nr+qRY/W8zjttB0vcbpx+RxTNnl7SeDMM9YuZbB9cZ3icLE pVm5Z9g6q2HWdk9jhlqTVb+N/PYmOWAegble+dsmWJHN79d7qK0PxzwjNvAd ODXxDEkyn/nXcAPbf1azs2fs20HapODqoKX+210wj7ODQk6T0FnaFpIU1afN 8tx/ye+wVliP5g8//2nyIZanN3eCY/raPTTupqiz2T6Wx7DlbkKdvz2V25AX 0TGR5ZnyJCxr1TMzOrIszENQhOUxEbSV7Iw1ohe6y892jGB5fmXKZpd1udJn V3a9NJgcxubrRLX7vR4bekX74ezL09i+byembbGd+O48ldZP7Qrtc8I82VXm mzVDHtKfTp//Tr0agnk25xjqT39xi2poFX/+ZcP2C2guUxf29btMRS/YuGls dMQ8OVOMJRx++tKuwlcrXE8HY56CrlO97b9v051xLlYLzz3APMumrFFffOoa zVa/NcFj7k3M4/Qict6paSFUqerq8eLV3pjnlufapDXiXtSzz+1VnqoT5hke vfvT/AOOtFE16Zzj3suYR0TdKfLEonAqv1qmc1WDDeZ5OXT9Cid5H/pz+PHF v5tMME+cdOeMVcoudOQ0BZeCIj3Mc13UclqqfjgtWJwu0pmmg3msnkbrdR3x oS1qKwTFM7dhnpinCtuEjrtQqYjd9YpZCzHP/LGrvigcDqfbPonJPhlyhPr1 53HesnD4QQMfOilwab69wB78vto+2vPFgmMu9NMLs50B6ivpQJ6nkIe8hzx4 PpZbuTxE6xmXh71fHMvlIeOjuTx4Pock+WY46bnQK4tkNqcc24r5C/M4l+hI cAnP020M5xKdZcG5hOepNWWW3BNNF/pn+tAxj+7sZXkkOK/oqwzOK4wvGPPh mr1MOHU48+aw5zxbzJ+x47FEkKwPzVFTXH99/gXMf1FNyHnwche6wfLw8uVi +pjn7+BDJ3dKulCt1SXRZeQYxkUtZLc7dYTRacbbDW7oOWH+GxOPH0l+94ha PtMbeuPIFcyv6aXw8YSAC91/a7vLVO0TmOdj8dLtzwucqc7yiAPmy89g/MIa zlvaNYTzFvM/mMp5S9sjOG8xv9fNpP3z7ZzpEYuN/x7RzmKeF/Gcw9TnKecw xpfIl9QNDQulX8X2L9ixxB3z/1Wudxob6U0T6iLeHlp2A/Mv0jg4z7HJieau ex62XOkC5pm4hMtDfKdzebBOklS4PGTcGy4Pq/8dXB6yez2XB+ukIMNy5T1r J8p/qNTLfrEpy+8/v3VjYwh1Ha2v4jDhAZ7nGD4T6xWtXlRsgpPh1Mk38TxN N8y98FjUicq2OOvdmHEJ83z1rUotCXGkn07laIaPtMD4sNsxGrs+PacTPil9 MqnwxvzmnUPozG8PaXpmSrl1jRPmrwyLnaayzJGmGNo9sXl3GfMsXDjCYkT8 LboyYe8u20xLjJcHc593dBF83mH+kxO5zzualMJ93mH+PxUTmnbI36Jvp4kl P8yzwjxLa7g4KRXj4jhu4yq5z0e6axr3+Yh/b265LjoiKYiqUONPLT/98LjB 8h7flqV50rfLQi31/9zB47pPmWbeJXSTdv/wqWt3uYZ5ntld2HnjggPt9J8p 02xkjfGWWXcrdlk8o6IXV4voBDzB/NNenzIMs/SgERNoy+QgV8wf+v7KseVl 9nRM0YWmnNU2mKdDavDsufPsacbYpWJHx1/HuHYh9/lOh8DnO+aXN+U+3ylv M/f5jvl3iN+m183t6JT5m3ZerWN5hMZxn/uU1HCf+xgPfJ5fIer/lF78vb60 41UA5o+weho7OdCN3n95U384dWf7MutKFawcfoMeEswu19a7gXm2hnB5iNQf Lg/W/++rXB7y8RWXB+u/6DCXh4wcweXBeUxN7Rr9Rc2Wvtj57nLcNDvMH3fr TI3iRH8qd2aPXJLkMzxPo5DMaXwi92j784DyMVJsvWVf14++dVeu09oPpz9m FLA8G3odK6Vf2NBB4YXHtMztMS4I9z+0MZq7/8H8H+dx9z//5pG7/8H8Sm+H mAjWW1OxOOOUNZIOmOdqJxcnU19xcbwu66vc/RJd8IO7X8K/r2kNmjkh2pcu fnph4VqvYDxuR2Lu86Oxt6nr762XWn0e4HHLhuZ9PzHnGp04rPbcKc2bmOeh 8xJVfbWrNOFq0vlDHSxevydQ91nRI9p3Ms5lb/hzzD/hyKqF1WXO1NT+0ejp UWwfkJr71KvykBVVlT+azn/uFuZ5M0bSUaDzCk2bv/GY4mcWN98uM6Fr4kOa r/d54mn/EMw/9VbCKq8p//r35PPS3c/YvkiBV3TWbBh1mUptsthdf9oR86x6 MWTlJ2lzGnHH8UpRE4u3Lfm2s3jVfeqo+tnZ3jwU8/M9tvvNt9qOnsiyvXTL ku1rKb6ncYetohmV2Npd+WGLE+ZZ1harYrX+It1iTnXmvmDxrrjGXJ3NrvR9 dvTizEVhrL/087xHadjQmqY4kSYFts9vRq6dif7W81TLb7nMvlHOmMdC3upz jMY5KiO+/+DJQyx+6OaCR3GqLnSeuabV8UyWXzAruOj1eitq17Bj8v1cll/k zFnye5MxLZuyTG1LEMtTAXmIsAWXB/vrM+QhWk1cHuyv8We5POSsGJcH6/B5 179zvXGKDnZ002jrZvn3SJ0jotp2lK6UGNYpFo7neWCDXeu2Q6b0457bv4ZJ +OB5xonoSQ85bUg3nh5tf3eCC+YpqDZR8dU4QofXtMy1kmVxlznccwEt6+Oe CzD/dHXuuYCWXOKeCzD/sflxhoYyenRrh7Xt4tUsj/lCLk5kurg4XpdUO/cc Qd9bcs8R+Pdenotb6ttO0RyhkGWPDrHjbv8d0tPbeZAqjYsvztBlx3187Izx M/+dVHpQYlfpAZbnVLT7BhcHNXrvxy3TVwYsXti1O/runyXkq4D1mZojLH8g 78bPPXxSJE9W9s/g4yz/4OrXh/3Hzqbya6xytY6zPLPc7tIrw5YSObmLH0KO sfgIeA4ip+A5iN3HxnPPQaRuGPcchPn1v3l122ZvIiX12lPjDrM8+tnc8xGp seeejzAu5bHX2kLnKqn/KaDbvZrl57fJ70zXMyZ3Q2+PH7eO5X84zjb/88OD ZF7oxlefNrM8FqqLc8dfPEwyj1nPllvJ4qHN3PMXiVPnnr8wv58f9/xFJEq5 5y/M37asd76r51EiPuiK2Wwplue+IhenX/m4OM77Bn7ueY34dnLPa/j3alNi Ope9dSEpgmG75SJY38mNvnbFuNOKCGmrS2rFsL5792SfBl/BaXJv9YQ3H6tY XxhLF81qeWdMcpQPZSXfZfHD8DxI0i9zz4OYv8yQex4ksfu450G2X8nwjrbJ fedI/cy02K1qLI/ZSC5OjWdzcbyuLhHu+ZF463DPj/j31bzuPXer75MHjpMP TNdmHjqcTLGsem1HHHyXSInpMA+vhY/4trflIhn8uiH92x2Wx6gzLHx/uRnx 3Judtk6Oxb9Wcs+nZCY8n2L+Z1nc8ynx2cs9n2L+2tbnGd7UnJw61HU5hDK3 rYq551aSdpZ7bsX45UfWabcX+ZCVYa9cVG6wz6O08WIakfIuxO/HIX++m+zz SLlWQqvlsiWpWjqLtyGffe58hDx0VDiXBz18MYHLQ9f94vKgh5X1XB46U5HL g+O8bIar3IVAK6ITGPCQp37rP/XDPV+TGfB8jeeZ2ck9X5OUGO75Gs/T3MLF +pHjVRKiH1qXw2Ofv6KTueduEqbKPXdjfN4Gv+sxEY9J8NzCbYor2f3GmY+Z 4luj75IVc6OHhCqz+42TmsezPm6wJvPD4mO3OLP7h1eQhxrJcHlwHFw+cXlo nAyXB8fBdx+Xhy6L4PLgOLzXmnE3SMKGhI9Kny7Uw+6LPGVtWzft9ie3FNOk zncF4nnqzZ1/b6rmPaI7SuAZr4etG//h1lu76R9syB7JrJOj1Vge/YVrOkUS r//r08POp9zZ/ZjaoKWxro1PyVPFiy8eX2X3n0/LpR3dW9zIlEPO7q9s2P3n neSxR/RtbEnLV9U5ek3s/rMyyHx2/robJEJB8ebk2SwetCs/6cPuQOKk81la 5a8/5r9YvNFdWus+UTo4c4nUYHb/PPKmbbPE3xvEbnPec2rA7pPrbsq2zY+0 Ixb55pMcvdl9tdU3/ayG8GdE4YDMsXoDdv+vanRJbU2UBzn6s/Se4zF2//9y j4R4lo494be1rY4sZvf/k3aLzKeCDmTiqc1Xj/9lzxe9M7tlPvUFkeFbog/J xLLnl8Gi3ZmWnzxJBXF54xPPnl/W8QefehvgQKrotqGts1mesrWxQ6auvkk+ NNS+PLiJPddEPFq6t174OSk08F7d9skH8y9yOXHQReQheSr2yEryK1unyMtv d9O80ptE881qtXGG7DkrsEDj9dcDt8i+fcU3l9iw57X4cO77JXKwkvt+CfM3 3ee+XyINPdz3S5h/ldG0IK3GW8Tidp3K2CXs+dH+FBeno+5xcazbsBfc91Hk xhru+yj8ez4lHYXbQ0KJzeOgfIVLnnhcY/Vte2wEvUmBwP6cF5cd8LjNugna e4sdieFgz1U658wxz7GgQNuoVU7E/HePrICdGbsfo08LduWFkik2K6e+c3PD /LLPx+zXK/ImlePniLV52GL+W8Wfpsv4OZFDJYfD/967iHlik7g8lEIe7N/e EC4PlRTm8mD/jirn8lChci4PjkPmrZPNXn+cyIw78z4XeJ3H/NdU+cTaTcLI rdHuAYIP7+B53pm+v2qE2SOSaqp+75L3NTzPsElBz77ucCZjh/Glf310DvM8 WH7QQPKRM9kkG3X470NjNg5yu7rdf4WRl6aTv2tPc8T8ed9Mko8M8iE9g/Vv LhK/zN678RGbL9jsTGTtnlVVyZzGPAKD1f02jXUhBrcFtB0nGGHcbz33vSLx VOG+V8T8+fzc94okexj3vSLmf7/HYWTjHBey707TuPmfj7D+ncV930haRbjv GzG+rkhzt8/OcHI+5YyGx3QzzL+6VW1/xm4fopl017Fd8jjm/94hvnOfhguJ V+YbPkzjAJvHlt8zlmi7EP1ZSSnZn3ZhfDR8n0l2wveZmN/Fn/s+k/Soct9n Yn7+4w+WZuq7kBj174YzZDaw7xkMuTh128TFcd4rnnDffxLFcO77T/b3c3eb pf67b87dfqLtzXB2vTLLvi8al5mvtOd6C//VeV7s/wc37ns4ZKwzVdXazlej zOonRG+z3FX7PCX3XM3Gnqvs/+9+5q47MkkxT+npr6TLu3aw3zN0aWbniF68 RbtnqEfEaTIHdq9UX82Xka1kfVzV6XtUIv79ucMfkr9p36RZsYIxrpLMJfXK GLGxqtlKon/+r6krD8eq+9pRoYkoTS+SNCpTlAytElFCiRKVIYQyRKUUIWQq QySRzGSeIuM2Z3xQEoXM81hRinz9zvO+e3//3u5rXefZe6111r7XPsvqWkUB 0pfc9rADbTZ+iDiFAvn0FpM8H7z7ljXKKZc+yWAksDuV9EM/Pj9bkL6qXNrs xx22nTqk/240dYJ2WNEZWZR7zm6rJ+8pN1nuxao7S6TPVwU+9e4ifdgbZ6XO JgU6oW9f/1GXX0Xe4xZCxTwh+sXSVXP5nt+sSD/XOJ9B2lrFCs1ldjH0uZB6 r4O5tajuRYp0cuSId/Qk6S8LrE7dliJjgIL/TMzrHiB1rGrZFgeh52HSze1L z/Jnkf61RUo/x+qmc8jTpeC4vCbhb3z9RXosMEg64vWLCbGm/9d/t2dsl7yu BakNZvmgTvhOr7oYpM775xetGvPR7CX8yWjG6IfuhvDk2+nCNGHCl+Gy/ejm F52vlR0+2eVE+GfO7socLzWDd9vYG8x/kt9rJ19ke0DjVf7KFUIyw2qEX9h9 92rIhBUkbT6+k82c8Nfr7LNplEjPH8naukk2gKyPmu2c0a2hW8D7C+38UELq 1erjV/oXLc/Md6p9UbNIgfCtpWauyPraQ6tzYRxaSepPLuGP/emcefnWjctl f5eRfj3jUm1Otsr8/CUW+yey1Qgu15Fan9rmBCphT7jV20ndJW1Uy8DXUpS/ K/rs7Lb3ZN/dr3PVzYYV5y/EurDxHSP4oU3jB5+FecHXZzYWUWwkLsRWqrWu MqzOPz48kOTvTO7d6dinZkk+ewTqYR7GBkZEp71fIfpOsrk63+XXOj3ORnKP JaYkbHrM8jG4LTe43OBNdOOlkRUTMgs1+RDoe+T8Y3IPcFforv4zCj5wIOaS 0ut8XcxnTc8ZzUuty78g75V8RDSc9Ov7BpKZ9Hzg8o/bFXfKT2F+lINU+94f dfl8K7bMZSy4Yn40ve8Ae65TfQf8Xss4Q/UdgFWR6jvg95qaItV3gKeOVN8B 57fPdF0apum6NLbDN0rp0uBWRenS2M7tfZT+DO1FlP6M7YADpQNDDV0HxnZE xSkdGOYlKB2Y9De5KB0YVsxTOjC2o/aI0iGhl65DYjsvkykdEs4lUzok+d5h itIbYSid0huxnQv9lO4Hc3TdD9sZRZTuBzsXKN0P2xlgpnQ/EF9B6X7Yzv0c Sr+C5mpKv8J2LhhS+hVE9FL6FbaTJk7pVFDER+lU2A7Ldkr/AXFpSv/BdopP UPoPfDlH6T/YjnYbpfNA92dK5yHPE0zpLSDLQekt2A7nAqW3gAA7pbdgO92m lN4CSxgpvQXbiaLrEkhjjtIlsB1GF0qXQI4plC6B7fyzltIlEEsqpUtgO68V KF0CRZhSugTGi+n6AIpnofQBbJ+fldIHUNdFSh/A9r3jKH0ASchT+gC2Y7+T 0geQkSylD2Dcu4A6p6M7j6lzOtHrzKlzOlKIpM7p2L50BnVORw5fqHM6tuMQ RtXnSMmIqs+xnVpfqj5HoTxUfY7t9DVSdTiSuUDV4dhOO70eRseiqHoY29l5 gqqH0WkWqh7GdpQMqXoYPVpK1cPYTlsSVQ8jo0UT/6uHMZ5Hr6PQ3lKqjsL2 hfupOgr9XZz/1VHYfvMIVUchDlmqjsJ2AvqpOgpVbafqKHJO/4fqe0LqFqrv SXBvqt8H9+ypfh/GefioPgg8E6b6IBj3+U3pYyitk9LHMM48ROkYqEmf0jEw bmdPnetRyxXqXI/xKk2qzkS//Kk6E+N7M6i+GOw1p/piGOcMpPoRkDpN9SMw Lk6j9GToi6b0ZIwX/EPpq8B7ndJXMV4dTZ2/0Nku6vyF8Y8MfJLXtVNhcPGA xFdda3LPQf9oe71THFQLR5uZJl6HcHbL0Yczf/MeY3ejuVUiCGmkFLKcJX5V PGV+OZI/GmZG1GxfCwdh/pGr5yRG5KJgYI1I1UA1yXsb7kVLmFe/AJhP2CEZ GIn5OvvdT2pLOoODzxOXLDESvxGcl2ekZO5CS3LW7TidOMw/HshwaN7FBS1h V9RhEST8Js0LRXrpjugAk3lAsDjhhz4ds7s/6oe4yxpNe41J/Mq9L3B27nuE rs0oOyVaxWL+Ikm9rOmK54iFd3mU61dy7yL35/vhnjp/5BtlrlCnHIP59V92 zVRtCEfFFy3Wrlkg+bmmi12KV+05kn6eKlBeE4X5+z5IWfQEJyJZTov7i1aR 9Rz0fM7MHRuNpkCT649BIObn8dIualxKRQeLh6aySywx/8Gx2neMAXGocuH5 9q/t+mS/LPdvSTdKhRvb7ip7/pHD/O9R7hs2P4+DEm3VHek31DHf5Fyf/eCy FHhotrdLWyoA87MlbQa7dsRCpbSpQGaCD+avE1mZcMwgFriTol48WyD3iNJq i5hM5MMhIXJiQsotHPOV637UWir5gWiC0vksB7L+PvZfbr2ecIca84TWqAKy /srekzNSXqHIeb3mullmsv6vRVzXnA8JRJKTPUYcz6IxPyz5yp+nrRHo3uMA p6EWomuJGQuJGIyGoHbueb68IeJvP+wlPoxeTUb7PpxLr/B8hvl39+/4HPwj BuW7eCd/TfbFfFPHMaX1kAqTp0wKBpmcML/9SW9u1+k4qPO9zya0yx7zNQ1W CNzRTIDL9uqxQTykfpjZ+aAjTikKFK9VxA43B2M+Q3V6LnNnNOzQ2tfFZBWH +WYeqzTyucNALWCxt3VQBOZPeRi3h/pHwAKL9cd3LMTflI0ZVx+WDIa3szM3 XR2Iv4Xp8Ajct/GCxwUO6wYYSbyUBoVpuDQ+gLbNUXPwD4kX2xsWsK3BBtbl cJsEaBB+bn9B6OBNM2hTeVj71IPwayovM3dfs0WFm9hcfE4TvmRI+nTmt1tI Vuib1InrhD+74cqS5egR+lSy/szeb8QfdjhYPDRpeYiifg7nhnYSfzCRLOVP 73uKcnmv+lYUkPej8EfVgpQhX/SFgbflwCiJR621IvsvPklCBh2nhHL0QjB/ s7WAywrtGLROK5o5198f82/ce0qLkUtFPPI1A99zHIi/uf9R6b4Rh+CjxDPN 2ZuYz2RH3WOBWfo9FsxfpvhL8UhsCvxybXNXOeiL8coouUG2qFiYOSlUFKzt ie283EbdB4AM+n0Asi/sXvs5GuIgZamYKO/NaIzbmJVsYdGOgMLegs5UgzCy PqNUXwlZMFN9JczfVN70Tt3gMlrIG5hZZkDwxSz3dU9/MEDPuNafvPaE7EuR IKXPIO87lD5Dnv9I4/IfG1PRmxSdJRwM7iS+PNdai0jFofMvri3X3e+I7UzS 75+AFit1/wTznVgXzsSZJ4H7+Z2jlT/Jvuz49XK/80A0bNGMDBOwfIrtBIpT /Vy4dozq52L+gZ5uN0bFp6Aecj059RPBOy35j1V99YbcgLYBCQXiP5n8lC6K /Oi6KOYP06wFnVwTkP3YzMWLLeRepbKo6S2vtiiUu8tqJY3rObbDFsCy+mF8 PXzffO6QvpwBhI/bvVRnmAB/rtamWv96UAS3EK7XfhhPT99fynapHhy1njuw XQnH+Ab5SA53pnpYd6FoQkfvFcYVY+UO+z+mgbfzGlP/sFSMBy07mpI8Uwde uyN91t/PxDhye7PNBurgdDDzakHFNxjX/ZC7PcmkFgoc06a6f+Rh3Mdsz27h WzUw39FWoe2BMC4Xuz3jj2E16Fo3nRu3K8b4ROakvLhkFXAabt5ixF+K8ao3 QYdWfX8LUg9nYz5nlWHcrfSa+2f/Cjh1/qBU/L4KjLNuDjjExlMOcQHBjUeD 3hL7+lf4hH1LofFH00vR/kqM7zfpXNE+UQyqPYpRmzZWYzxLkGlftVQRODyo Zc8TrsF4BPrSaD+WD1d2/QqdEKjFuOjFyFt75HPA3jArO21ZHca5puaWWzq9 BrUHsd4bqwh+XKGq68CrNFB3clirY0LDeMVt65A1dxPAX5EPfRoiePCKko55 10jQu/VGlulEPcZNy0+Hzs89hRMNmzbauRN82z+FRzpV78KWB50jc7EE77y8 XVTvjRMqvJbdahhN8L1OagE+TkEoaTwrMNeR4ONjhbu3vo1CoTc9zXllCM4Q yMx5LDsRDcfbrfnykTzn07Fsq3S5dJSy0v6irhrBReumrr7alIWi5B80CyWR dZCbHnR3ac1B3oPJu34NkvVMuvbb9YJdARJZ2mjuxUTwNsbhvcKORWj6ELP6 eyayLx4PykOui5ag77bntn8arsJ4uO3KtKSGUiRQqJhblUH2/a2Up9k+rXIk dTxUfECf+ElR+827V+oqUKPsnTy/2XKML3t6qaV8ZyWSE5Wbk79D/NDxVNXV HtMqNM0yFO/XU4Lxar9MJwu/aqRpMN7CK0n8/Mk3DyHx0Br05rPhLa35Qozz y696xPWoFi1c3JPOakTi6OJwT7fApTr06faQ6ub0bIy/c4mOd1tNQ0fP9e66 2peB8dndsjduR9LQZ0+pP8OLSVyXq/TG6a2rR9IbZXy0tsZhfHHZXYFa43ok ejpkSdS2MIyXfTvRrPe8Ht2zOnFxo6APxg05vzWNx9ejCaZSG9lfpw79hwuY 1Tc0/vWnMvXjVvDHEfNl7sy59zrVw6fKDqeBbUEYz/zxmJ8Z6iHN4O20aFAU xnl/3/dx+ESDcpGfEsPuiSSfiDp35WjQ4A7rhKGRYDrGF6nv75JJq4PdtO7H zUuyMK4ytMT+zVgtnPfVT5Qty8H40a1318+sqIXDrQrdyLgA4x+9wuK6V9ZA /jJUADZFJJ+MqDS6TVUBh+U1q6GdZH81eBzQ6rxKMGPYXRr4luSrdo3s2ULT t3DdV1sq6DTxn/dCVSu+MVRA05UvjGrlJF9t1DJcv92pDOpqPb1kthD//Fjb dXxotASio87smbxM/Dk1sUei92gx2PmZPNngRfJVi6qEagw7gn3Hm4Qdn5G4 UJBquLb8bh48ur/4JrsbiaOuYYv5zLfZYHhyzQ/aeRKPShrWks6/M+CErqdt x0oSvwuikZqWm1Kh9IFbk3MYwbnY5kpZ/9al3g26KTvWkvzwoOHiVOOZMNi1 fUZA5QrBx6IceFg8fUD1IKtueBDBlRzPCBgqHoC1gnvSRuMJHpmiHHIywhvN l3ut4AkmeP/3iOy+8ZcoMG7FtLzp/8tjKaWsEdOxSI2p427gBoLrNuWNln9K QRsixRiMY8jzT3OtGVSpz0AC7PNfBNcS/GJN/KRLSDa6brh50lmfrI9d/f4q 1tN56HZdbv9WP7Ke6czMP5YNFSIFJhb/vkiy/hq0xaNawsXIIThxoeQZ2a8/ l2YUDn4qQXLD1wzeXyf76/aEZUjfsgzN/Dm5UkmY+MPVdyyyQlPlqPHyaVbb D8R/jlkkblqp/Rb5ZAlPVOsTf/N4P7/vfmIlEpEy3F7cSvxT7Ebe+x29VUjN abf7Dyniz4dUl4sXLapBsXdZX/B4Ev8f9PrVxsNQi8xeJcVO+5J4uadh23ig txaJm203LB8n8VXZdD2N+1UdKrQOqLkjTOIxLqwnkVGVhmZUHrnPaZH41dnO euHgBxpqWH1ww8teEu/jkHRDXKoeud35HMI+TfLDgG3oBS+Hv/knquy0xBeS T35XqgRNR9Wj0GVicc5WDzAe07qocOnUOJqvVy889jef/Td/w5v+d2Twbz77 7zudef4X8ruLxhGKuLdE929e/G8uB3dDfPC0+ThK7OvfZsFJ5spy6vzeUzA/ huw0kvVrwml4jtC74rk1P6+NoZ2mpbrjq8hc2cEY8+BDBaOIW/l7grVWHZ4j pMQsGHp8YgRFrDrJscGtFs8R2mGFyqYWjyBTsZvtbwJr8Byh468MwgXnhlBz 9OSQmkc1niPEcSopgbN1EMlncr5g0CNzZXWi/laOwQMoVuxb7jwXmSsro6KT WCHfjyJFlLhDUAWeI2S+zWvfsZZexKi1WPnkCTJX1vbgceEW9R6kqf1g4Wlh KZ4jFKH2W2RtQRfS6gq8w8VD5souN3bcE8vRiWh1Xq1+pmSurCr3uElkchvS ePnU302JzJWd5w0/U7uxFW3TLpbdFJmD5wgJ7HbyeWT6AX33bnyf8eU1niPE 39eu9zaqEf3ubs4/sZTMle2RErrd86wGnU7dr9oqRObKHrvUvE+4phTJifBc unWAzJWt83gyqt6YjTLlBjaFniFzZdmM/MTGal+CuhDvY0sZMj/2iCfFBwF5 io/nBd2n24f7dPt4XhCXNPU84EV/Hjwv6DD9+WF9D/X8eF7QMfrvBTYf6veS /3+0hVofOExfHzwvyIS+nmBBX088L2g9ff3hM3398bygJPp+gRF9v/C8IFf6 /oIBfX/xvKA7dH+AVXR/wPOCFOn+A0l0/8Hzgozp/gZpdH/D84L+ofsnKNP9 E88LUqP7M3TQ/RnPCxKk+z9Y0f0fzwtSo8cLvKLHC54XNE6PL9hKjy88L6iZ Ho+wlx6PeF7QJnr8ghM9fvG8IF56vEMKPd7xvKAFen6AYnp+wPOCYul5Bv7Q 8wyeF/RvnoF/8wz+TtDUUbSA6ec4Sjhqtco8vB7lSIpreFXGgcWeOobN9ePI u+GcT4xNPQras+VmAcqHq0f3nqe5jKMTs6VtZXvq0ZrJG8p37Ssg59veHj2u cXTzjPWb9cU09IKpWdjchQYfd3i7Kj4ZQ/511carxWnonufCB77972FtuNI9 jpFRZBeaIiXrXockW7X6NTk/wsCLrmxL/r/4Yr9RvcJalKbX4Xes7ROcjNm7 V+zwCIqpV+6X+/A3/ziqpH517QBz1eDvJ2EYvayN0++kVSPL8qv9RSxd4Cvy RKWKbwh93qBtrJhYhZYuu7KZO78buoqFHjaNDCCx7tS4ZPNK9O7jV+Yy7V6o 4DXIex3cjyynZmT01r9Fibd1dBf198EYe6cDbV8fSlJdcrIqthzpGl+13Hd+ AET++ccq6HUPmixUczbZUoYY5h7mNWcMQg0Ha1gcXzdKihf3bnMpQWy/Xgbb fR+CH2sPjUTe60QS9z5rv28uQswrU4uaN45Ax8sEz8ce7SjrIUrbvqcQeTi+ eJLENwrnLOWKi+daUVPIc8Ehj1xkztNsO7JqDERa8txDzzSj0M8rMlFdFpq+ eXnh2acxOGwfkPPH7x3yyRTbEfQzHd13kWnseDgO7UMJma/s6lD/3ny13zzJ yOR19SsmzgmQEJxgOpVVjqYir2Wu3RuDVH+HrrjnOAGfuRfZHErNQz/k+tgy FULQJuPUjtraCcgo1Uq4nRSLZrqcU+cF3ZBN/YXBVzMTcKq3aMmgtA/kd556 nxtgCdHHSngG/tdPyWjkGZnMgE7FkMSFi/5wo47j492+v+cFPalljR3F0Gd8 q933cAREGqbTnOInQJ9N8Y9OehVcbCn2mDwUDzsY1rFJqkxAUFmivvXrBuBR GghoXZ0GKR0OiYyN47Dc5h7HVocmOClUulJhMhNW/O7V0d03DrsZNSeOiLeA cjRrTlLOG9BZqjb38+YYxBxJdx9q+Aym1+M/sJv8PTc/dy56EjQKAzJzUiqq X6AiZGHW7xcCmoKyy4aXI2Doetlf72wXdB+dWyfxuhgCmhKqHj8chierZVd+ +doN3NHW4y5apaCu8/IFl/oQ1JqZBJnd7YVjv5412oyUgfoQ7dpSpkEwPfpG wXK8DwQO6M9eMaoApzeq8XGh/bBI2KVO98QAtLseLH9b9RZu2ExcctjcB4c/ CW1vfDQIoWLql7asrYJlC67Bmz164DL/7jVm2UNwhX3m8Ea5arDn/dkg3NkF pnd6HX+XD0NQ5OJ4C80a4Lf1Z7uxtRNGk/k/6LwZgXU++gMMp2qhzc5Dxzah DfqZzVYHPxqFb3oV7jW76mDXo7c1PVMtwHFZordWbgw8FsXdGuitAzjs68rG 8wESjaeCxNrHYEeYQquPAw3WKWooLxFrhDy7xA6Rs+NQGp03tXWOBkVyvTZF FtVgJll/VT5lHMITRYt5zv09V61LnIjTLoH4n9+82AfHweN2ht8W33owCrrA 9cA4E0wi7jlpLZqAwtlqnYlX9bC9ydVparUPZLO5agB7nTRvb+QApCbhvrkJ 3a+QCd2v0M1//eqQAfV+RFcEqfcjvi90v5vyT9TVQfkn+s8/aTf6QrfweaPr mxYdsai1QO7Ju9rn/+IhZZSfQ2835edw618/PyeZa1lYmQKSDYF5ylI+WDeb XKp0YzCZBs6c/HXobAqu9/4PO3OVHQ== "], {{ {EdgeForm[None], GraphicsGroup3DBox[{Polygon3DBox[CompressedData[" 1:eJxMnWW4VVXXhvepHWcfu7tbsQHFAEUEQUQsSlFs7FbswkTFVrAFERUQOzFB Uezu7u7mG/c77nWd78e45hpr1phzPDPWXmvPZ5lhB/U/sLFUKq28UKnUFOFv tVIJfb2Qo0O2COkRMiJky5CeIQeHbByySciBIV1CNgrZJ2T9kI4hx5iPPHuF rGuZexuS7siQzUO6hxxlSH1HhGxm3B/1KKMhygs5MmTzkO4hZ7WWSmeGbBHX B1k/Nj0T9veIe0eHHBZ615BuIYcbUu4h2r5pyKGGpNtX2zuF7BfSOWSDkOHe Qz8upFfIViEXhOwcskvIaMOhIeeFDA4ZEnJmyA4hO4acFLJ1SN+QkSHbhWwf MiHa2C3aMj1s79qaaU6kH6INm9nm8y2P+s6yvJ3o10j/V+T7M2R/7d0w5ABD fDMqZJA2HasPacO5IQONOzTKOSSkd1yfbdkDQs4xJN0Z2kt7jg2beob0op9D uoZ0Cxke0imkc8gBIRuGdAnZP2QD9QO9t1HIHiFrh6wTsp/5SDc4ZOWQVUKG hawZslbIviEdrWNP860bspfheiGToz9PCHk2+uSm0A9vyL6cYAiOBoWsZB2j ot3nhhwV1yNDtgvZPuTMkB1CdgzZ27LXD9nHEDsGhqxoWbtrI+0Zou2rhpwe 0t9yTwnZJqRfyKmG24acHNLXuNO8R55KW/RHW/bzwSEbh2xim7qJjxENOUbw x6Ehm+qP40O2CukdcmJIn5CtQ3YL6WCf7qyNq4XsYrh6yAnmI8+uIWuY5yD9 hh1n2E/00UmWTRsO0UbsGN+Q+MDek8X+NiGN0ab12vK6OcKOIXfE9cUhu4UM C3ky5MKQi0Ied7wxzsY5bhnfkyLf8SEfx/UNzk2M7xsNSTcifHtMyOS4vi3S HhfyUVxPt+yLHYtLhywjxgmXDdk2ZMmQpUKuL+VcQx336Cd8e4n27m55u9qG GZZN/FOGl4aM13bmpAmlnO+YC2/yHvoTtpX2X+UcxJx0tSFjfUwp51zmrVtL OecyTz/kGGbsTnLMM289UMr5iPnjQUPS9bd9tH+s5VHftc4jzPG3lHI9oI6b tZc5e6IhcVeWcn7HpuvMR39dUco1gLhrtP0A+4I+2yPk8pA9TXdqSD/7viF8 tW7IEuQJHy5WyvmROWyBkAVLucbMr97Le7Gc/W9ej6ylOUq5NkT2UkwL/1tj 5g2Zr5TzPetecynneMKWUq5d81ku69I85ulqeXPqm6H6+zTtpS9PNwRTrHON 1kFb1wpZu5Rr29yWC1Y6hKxZyjWKsucq5Vo1l+k20Xba01kby6Wc4yshVW1Z PWQNbVrDclkzVg1ZrZRr1Gqm2y86ZHjIIqWc08H7cqWc+5cPWaGU45U+X7yU Y5UQX+xoWtKxLq1iHawTK4asVMq1B7tiGv7f+lzTBxtoO3YPsB7yDLMP6KOD IuGBIU/Wcq3FnwuXcq2i7JVLuZ6tbN23NuQegbnwBudK5qEbDZkXWVfKzKkN uQ4RVp3LG0OanNtqIa0NuUZV1VmXWszPOlMKaXBNaDA/a1Kz6TpaHvqm4fy2 kDlCtgrHLRSycEjPkAVCFgzpG7JYyOItuabNLmUdvYwnT2/zLRLSx3DRkK6W PWdIN8O5mnIu/yOK+bOUc/zvpdRZl34rpc4as1TI0q5FS4Qs6by/SMiizuuE i7kuLWme7cy3jOsA4bKuGwubn/X111LW1z1snSdk3pZcJyhvcdeqOULmdE36 J9L+W8p1CNv/KuV6g0/qDblGLq6trEl/lzIPay/5/ivlGkxIP7IOtVnHJpaB zpq6YMhCIVto13whW9uv+KNLSDWkFrJxSGtIPWQj76FvGtIWMkfIJsajdwpp DmkJ6RjSpN7VtHOGdDa+HLKBYSVkQ0PqHhGypXg51hBcHN2SdvcIWS+kIaQx 5PiWxBl4WTXk95jU/gg5znzEDQxZMWSlkMEhK4esEnJLTDLbxbh7L8bdexG+ G/J35F094v6M8K+QHeN6uZDlQ7YPWSZk2ZB+IUuELBmyreFSITsYT56dzLdC yABD7NhG7JN/s5C5Qua2bfhk/pD+lrd0yObGg6e1Q/4Lu2aH9A97/41wzbi3 vv1Bv29nPmxdqyXTkGfRmFD7tGXedVtyYqUfu+kf7BhkP9FH7MXnDpmnIfde c6l3E7/oYxpyj8he9eqG3Ney/72qIffH6Nd4jz3yJQ25x2X/ONZ8pDu3IfeX 7FUvash9GHu3KxtyP0odl5qPffRlhnuK6U+iOZ/SpGhfp7a83rw190oLRPw5 IQOsgz3uciHLe2+FhtzX7uQ99Mstm732FYbYcbbpyHexNtKeUdrOXv7uhtzv sme6oyH3i+x57zRkXzy1IfepxN3lPfLc1pDzOs8c1zXk8wP70HENOa+zvzy+ nvP/LY5p2kj7q9HuDdsy75SG3BOzt70wZKh9ep42smc/35B98eSQ48xzgffY I1+r37DjLPuO9t9u2bThem1kHbo5bOse/f50LefRz8OuL0qJofcifL+Uc9vr Eb5RyjXn1QhfK+X68WKEL5VyXSF8uZRrEvHkYT4j35ulnNcI3yrl+vNCKfMz 93Hv7VKuV89F+Hwp1zPKe6WUPv4pwp9DRoa9p4fMrOXzNrbOG1KOvuzclvhi /SQftp4SaU8OmQ8ftya+imeSBfQJeKLsX0r5vETI2nB/KZ8t2ZuyjmLXC87j z4Q8W0ps/hDhj6XEIyG2suZ8F+H3pVx7CEnHOHwnwndLuQ59Vsp+Z82h778s ZXvo+w9CTgibjw/50LXk6ZCZpVzfvi1lHaw3X0X4tesKds1ynSZ8znVrpnaz RlEPeXhGWtYxxnyBXfieOQOfYCvrKmV/U8r1lZC6Hy7lXp7n9UdK+TzPbwzT vId+SmDs5JDnwl/V2HC+Cj5CWuP6dfARUmvMe+htcf0mmAhpieuXwEHIInH9 GRgNqTdmPtKVGzP+FfzemCF1XBp9dknI2/g47n8c4Sch88f1hxF+RHvj+l2w Tv815LPTveCiMePJs1Bj5vs0ZOHGDLHjpHrmnSvuNYW8wHjAhw05RzCvzGzI uY/56emGnBPRH27IOY559EnHPPPoAw35bM/YfdCQOeyRhpyzmA8ea8i5gHE/ zTKI+9I6acOjpiXdPI3ZvvdDHrI86p5uncyLz2gjc+cM7zH3P2WI3U+EjNbW WQ0517OePN+QawNryLOWQdwL3mOdec60Y+0j7rHOtMZ43agtbWtuzDj8/W9c zwx5JmR2yLMhs0L+8x56Q+wjn4vweR9iiEdviusXKCvk+JCtQnqHbB0b+0VD Fgv5K/QZIU+F/G34dMg/htTdGuW8Ds5C6k0ZvhnSpzXv1+LesRH2DOnVmPvc tyJ8O+SPkCdDpofMFe3r1pZ5G5vSXuxrbkobX8IG+xqM/KUP0P/UT+g/iht8 /r34wJ+/hTyuf74JuS/k/pAfjCfPT+YDRz8bgpHGxvQfvvpa7JN/vrj/QUOO k28tD2z+Yj4w+J+4wef/aDt4/0NMY/d35sPWf40nz2zzgSMeQmeJkd9tB/kb GvMe9jG+WdtYYxmXrH9TtG+S+t6Rfr2Q9UMODtk4ZJOQ4SGdQjqH7B+yQciG Ift5D30f83UMOcD4LiEHGm4Usq/xlHWQ96jj6sDDVSGbxnVb+HmTkM3jemLM D1vF/Rdi3usVYbe4d1jIYo05RzBej47rLUJ6hIwI2VI8HRXS3bg9Q9YJWTfk GNOSrk9jzomLinHmKean1RsTN+Boxcb0N35bojHnOPy8ZGOG4GWpxgzx89KN GeK3ZRozBGvLNmYIppZrzBA8Lt+YIfg6vDHbuFnICo15j7qxfbZ+XqUx8Yqf V23MELys1pghdq8c17+K6zUasx2Mjw6OE7C2ZmOGYGqtxgzB49qNGVLfEdqC L/ay/8DHHo2ZDrtYb3gOZ7/WozX3aMzpr4g19kqvGvLsznrD74b8djs60l8Q cnNDrkXjjDvO+QCfvGVaft/FT6xd+P41y6Nu5mbq5XeCj8U1+7X3vccesxaY 6tKW1xdFnVuGzKrlWsTelH0rZbNnZe35xDKIYz69xvHzmWlJ19KUc8/LIYs3 Jh7BxxD9hH+2bUysgJGdGtPf+LavOCbfNobga7vGxBDY2aExcQNe+lsGcVuL WfJvb1rS7WydYKGf5VH3AOsEy7sYD8YHhazUmHgZbIjdO1ontu7amBgCO8Ma EzfgZahlELe798DEbqYl3Yn+lsEzd7kp++mVkMm8Bwl5uZZrzpUhYxpzTr8q 5OrGnOPHqr8bMjHklpBJjblmgJHnzEe682wDfX9rY45z5gPWuSusA19dE3Jt Y65Rl4Zc1pjrzYSQm0PeMaQ+1pvxITeFjLK/qIN17+KQSxpz/bnacl+27Osa c/2j7Msbc729XDvODRloWWeLCfxzvrbjw5HiAN+eqi/B0WmGYOGUxsQNcad7 bzttGqZPbrMPjrUdzJ2HaxdjmHlxzhgTXduyjWc2Jubw/0mNiTNwepE4wLcX aCM4Gm0IFk5szPmUPBd6jzxnWd5O9tlu2neyZdOGM2wrdd/YmnaOa8z9wjht vznuTwi5Ia7vLuXvyPwuexf7Y3XWXn6z5z3PfYa8x7jfkH0h7yFOKuX7ioej rHP0yTRD/NwU/bF+W6aZWsr3deS5t5S///J+77ZS/h7P7++PumfnPd5jhrzP eND24+f7zMez0Ih6lnl7yD22g3KPjPYdwbNKXB8XaY4NmRFj5AF9Q1mPaCN4 f0zc4JO7xQoYuccQXNxpX4OXuwxJN7kxxxD7u6fEDeNhuv7GV1Oi/tNCXgob Tq2nL9i3vSLGrw+5Q6xQxxTLOyHkce0CI08YgotHtR2772tMrOP/J42n7nu1 nbj7jaf9t1s2WJtqSN3jo8/GhbwYdl4f4XW872xMTIN31rG1mnJPzP53zabc p6Kv05T7Y/a/azdlPPr7jTmPMIY6NOUelzz8/sp8wTwxd1POTe+FrNeU+2n2 p6s15f71z5DVmzJkvzx3YGqzttwLj6zn/rdLyEZNec1++YdI91BjYnNj75F+ fctmb75KyG8R/3vIGk1ZNvat25TtwI7vGhM3YPBb+xH9G/sd/VP7ER9+Zghe PrGviftKPOGTL8QQWOM3aPqA9n9uvrtsMxiaoX1P6Nszo71nhLwSPvqwMedx MPixuKG+nxpzHILxnw3By4/2B3EfmY88vzbmGABrvxlS3y/mI+5L7aUNX9sO 2t/RvuQZopMh63lnQ9Yr5nT2u+xnWWPYv7IXvsqQ/S/rzz7GXe29/cXELWII zPL8xPy4dFP6A/98IL7oi6Wa0jfEMbbYN7NHZs1g77W35bHfZW2bI3C0aVti m/XqyMbc87LO7Gmeid4jz/WWx76ecc76wBpwpWXThmttK3XfFmPo1pBX43rJ puw77Fs2rr9vTJwu0pS4wf8LNqUvwc5CTRmCrwWa0mfELdyU98izclP6D7/N 05T9xZibGnXeHlKJe6s2JYYYS0s0JRaxY7GmxCK+na8p+xFMrdiUuMH/yzmW wM7yTRmCr3mbsh7yrNCU98izeFOWRx0rNWUZ2Dd/U5ZNGxZtyrZ+oT95VuD5 4Qh/1+Z366Na8l0Iv90fGek3D+keckTIZuqH+y4H/XjeG4X0DjnKtFuEHBfS y7ijvdcj5BjDLUNOMF+fkLNCdgzZKeSMkO1Ddgg5KWTrkL4hJxtuE3KKYT+e wUN6Wt+JlkeekSHbWdappt025EzLpr7TvNc/ZIR2UdZhTfnuinaerV0DQs4L GRwyJOR8w51DLgkZFrJ7yGUhe4TsGTIqZJB5LjDtLiGXmpZ0o703NORCw13p k5hvXoywqTnWeesfGHJtyAEhB4ZcGbJ3yD4hYwz3DTnXtNR9Tcj+5rkiZC/z jDXt8JDLtZe4+wO/94XsF9ev1TLv1SEXh+xmO5ub07aX8Fdcbx+yQ8i+IR1D OoXsE7K++iEhm4RsGrJfSOeQDUIOCNkwpEvIgjEf9GzLvAeFbBSyccj+piXd wd6jrEMtryvvj0J6hWwVcpj3uoUcbrhZyBGGm4ccaJ3UcVRI95AtQo427BFy jOGWISMMe4Yca0h9l4bsHrJHyPHW3zvkpJCtQ/qGnGy4Tcgphv1CTjXcNuQs 3l2F7BRytuGAkJEh29m/p5m2f8iZ9jd5Tvce6Vqa0ycvh5xjGQNDLgrZNWS3 kFEhg0IGh5xnOCTkfMOdQ06wHX1CzrUM8lwYMtSyLjDtLiEXW/awkNHeI92R 9jf9e5G4BkOHNuW7Z8bYByG3hUwKeS/klpBbQ94IGRcyPuT1kBvVXwu5Qf3r kHtD7gt507Q3hbxvGZT7RchdIXeHfBVyj3k+C7kj5M6QT0JuD5lquYdo47yB x+4hB8X12yETQm4O+Thkink+1PbJIR8ZEve5ZVP3p5ZNfW9pI2W9GzLRNr9j 2ei/hzwR8mTInyHTQ2aEfMv4DHkg5LEYo4+GPB/XP4Y8HDIt5PuQB0MeCvnB kLifjH8k5A/Lptzp4gMf3h5zztkhb/BBROizIv65kO+sk3K/sb+x49WQ6/XH 7JBnmzLPvyEzQ54J+TvkqZCnQ/4xJO4/48nzl+0j3XVNObfR58w17HfZ/4Id 9ovsZ1k3WI9Zw1lbWBdZS1l/5lFnrZpbvY9pWQO3NmQdZq5njWf972EZrJnM tayvrMmsE6zHrMM7GRLHesK6zv5iW0P2QfPw+19b7n+3tDzqYL1a3Dz9Tct+ qq+2EMdatUxT7lN2MKRu1tGFbHMv7UUHp5s05VhiDWHvzp6ddYXnAZ4PmNPZ W7PHZz1gf8D+hbVoVfPsaVrSsaatYtxu9jc+GGrZ+GB3fbK2viqeA14N3GzY lGsG6wp7U/akg62TcgfaryvpY/LRV6xFHc2zt/by3LCPIXGsYRta392B/btC NojrS5x7mItf5DfXkD3jev7wQ4+2nA+ZzxYOWcS5vxpScz1pDam7HtTUWVva QuYIWSDK2LIt59c+lrFoc65DddOxRpVDKs25VlWso6tlzOm6sUDIgq4n86uz zsynzlqxWMjizp1zh8zjekO+hVxnFrI93Sx7ruZc3+YyzzaWsYTz8Wohqztn r6rOmrF0yDLO8SuGrNSc6xL5lmzONYdwqeZcc5YNWa4516jlQ1ZozvVpGeNY 79mzsEfY0bSkY12d13b2t7ylXVeoc2XXDGxcoznXJe6t0pzr0iraPcA6sZU1 p0PImvp+rZC1m3N9WsO4TtqC74aZlnRPtaad7FG628fYN6Aa5YesGPJozIVD It3K5Zg743pgXD8Re+OFIhwU8ltL3uP6o8D+C5FmcFwPNv3DIQN4v17Pb8YW LWWZj5juM+N/b8kyBlrmzq1Z7yDeV0W4a8jDcf14pB/KN8FxvUhrpiPNk3F/ WFwvXs140n9Wy/tPhOwW+heG21SzbPJ+Eml2b828feP+cq2pc833d/v53TXf uQ33+vcoZ8+4XjDyzojrfeJ6RC3v/xayR+hfGfaK+ytHuFdIz7i+NWTvuL6t lmVw/+da/kbG75X8ZkaZ0+uZjt9v+O3mtcZMu6flUOe+Ib+yP9VOvhXs6H3q WUSb+TaPe/t4n7T7+/3enfX8dpPvNjt5n3zD7Ifvaum7p0w3E1+GvFnLcct6 z16Accs+AH2biN879CtCrm/OvSz71oX4Vrot98hXN+c+mL3tVSHD1a9szrzs na8xnj3ytYbsW8cYTznXeY86brAe9toTmnO/y/7rRu+xXx5nyB755bCzH+/H oy0Tm3MfzP731ubc+7LnvdkyiLvNe+x/bzEt6SZ5jz34lObcB7N/fKQ595rs MR9ozj0r+9ypISc25x75DkP2yHcaske+y5A98t2G7H/vMWTPe68he+T7DHkW GW/72Pvf7z3qnqyN2PdQc+6z2SM/bMg+d5ohdj+ovaR71HawR37MkP3v44bs eZ8wZI/8pCH7qpu0BX+cW8/5Bh9PjetRIW/Vcr1hj8uel7mbfSF7YdaQV5py n8VaQsj+l/WG/S57SeZ+9qbsH1mLKIM4nkmYC9dpzvWHtKRjXmcfzN6ZtY7y qJv5jzrZO7POgGv2xcyJ3GOfztxNCNZZZ6gTW1mH2OOyp2ZdZO/Lvps1ijKI Yy36sinrZv0kLel+CXk05LGmXBPYX7LPZf5mX8j+kTWEvSz7XNaB35pyj8z6 QVr2p6w/hOx/WR/Y7/7clGsLdfzalOsQZRA3K7D/bMi6zbmW/KwtrBnUyV6V 9YzyqJu1hzrZO7OGEM8+l3WUe+zTWbsIsZu1izqxFT+w32WPPJ25J6ShOdch yiCONRaf0H58RtqSdj1iH1HW4035bPCrfYbOd51vgInm/DbwbXzTnN9yvtWc Ot8Lcu/d5vyu86UIX27O70HJR7qfAo/PNOc3iHyb+EKELzbnt6SvN2cdfAdK vlea8ztQwlepK9aht6ib7xPLGb4TUo/rN6gj5N3A+kz6jrHgt558w3i231/y 3eU5hgP9xpSyX2vOb1oJseMt5mDm4ub8bhUbaQ/fTWL/s835XeQv+KA5v+v8 kfY153edhD8353efPzRnHN96co88fB/6NVhszu8432MMNOf3zh+D6eb8JvRL xhJ9WM72veV3oOT7tjm/6fwODDXn957PN2efztbGWSGLxJrQuy2v+Q6UfOTh W8/nmjMP35PiN+zgO9cZIU8157erlE0b+EYYGz9ozm9SP4zwI3wXtr3ekj6o xPUr9Cnfn8b18/iY70rj+rmW1JvKee/FkD9DpofMaMl9ypMtuVeZHfJsyCz6 L+ShkIfpY8NpfK9aznjK/S/kGfMsGW3t15ZljtL/fOe7STmxQl9uagimvo+4 B61jydC/pn/5TjZkpuUuHve/jPCrkL9Dngp5OuQfQ9L90ZL2056ftPERMBLy aMhjLfl90OcRftGS3wkRUu7Ccf1phJ+FLFLOkHQtcf0S4yFk7rh+F6yEzBvX 70f4ARguZ3+/FlIrZ4g/5ilnWtItFNeftGQd88f1hxF+hG/Zg4Q8Tt+6P2Sf +bO2Y/d85ayHPEuUsw/oo3I57cLfzeX0J7YuUM6yPw5ZsJwhdfMtM9gBN3zr DK4ZA3zfD94/DTmwJb875xvzA1ryW3D0g1vyG3S+MT/IePRDvMd36Pu35Hfk 5NkzZJ2W/K5575b8Rpxvovcx5Jv0fQ35Vn24YWftYh/A+v95c+4b2C98Ych+ 4SO+lwxZoyXH6N3m4Tvy35rzu3PGD8+N/Ia3n2Vj32ot+U0635Tvos435ju3 5Dfr6HtpO3aPbMlvuPne/AxDvis/vSW/Cyfu5Jb8HwXfkp/Vkt+pM98d1pLf 3PNN95nmI+6ElvxGnu8PTmrJbxDI/1lz7plo8ymWx7ftp7Xkd+3Ud2E9vzHf LWRYS17zXfnFcf+ikPd5H2o+8iwWY3HrtvxWfUhL9hHt3N183D9cG3lPcKj+ xG7mOfZe9zvXsMea4vx4e3Pu9Zi32F/e4hrDfmiCaxLhza5b4417x3sTXWPY 417v3EcZtzp3sr++0nmfvTJ75PPref8Z1yTy3eCawT6Y/S//nQAr4IL/rIBr +nUR+xdMvWY+8vB/i8/FF5iY7vzLN/esLeDpDcseL7bYC7IH3KicY545eHTY dkHIO7Wc67F9jPkfNw/rD/tm9pu/GLLfZL2aZtyv3iPPt/b9A8777NEnOVan ipWvHSv46WX7iT79znzsc1k/2BOzF2Ytvdo+XThwsVVb2sk6NLY5n1e+Nx95 XvAeed7XP9jxh31Af/1o2bThQ20EK0e25Hsn3jltbD+xBmwWMlc551Tm70tD LmN+43+ZIZe05PpxcUteMw+eF3J+S86Lo9RZx64Kubol575rQq5tybn/XNO9 aDxxM63n8pZcC8eaH3/z+yjzBe+9eH88t/sw3t/w3uYx678g5DXePYZc1pxr 3hUhV7bkWnW5OuviGOuYZTz65YGRy0I+DJx8zbN0yOiWXLcuss3M9ZNCJrfk enuO7WGtujvknpZcBwjvbck15taQ21py7bkxZFxL7gkIx7fkGnKb5bJG3WC6 J20fv9+z5t0ZcldLroF3qLPGXBdyfUuuOdeqX1pPm1l3vzAf9r1qWupg7bk9 ZGpLrn9TLfcj2zelJdeoKaZ7U3tvasn9L+/hLnB/fJ46v03zHpF3ffwez/tI 3lXyPoD3fLwz5Dd43mXybpP3Boep827g9KZ8fzjJtOTn3cOhprvPeOrg933e R/KO8W5D3ivyHoZ3b7yvmy8wu0Vb/rbNb+UHN+VvtxOsn3etvBvgfSfvOXmv wPtR3mdONSTuTuOpb4ptIh3vDHj/yrvWmy0PnXcgx9hmflvnPSXvHvkdn3eu vNt8vZbv914I+bueNvNub7o+570f7w14pzjKZ5FR9vUM4ymXdwznmO5xfcLY 4P0B7yZ538i7gSvVH9A/2PGy/UT/3GI7sPvhwP5DfF/blO8xzrYO3hvwzpL3 mc8aUu7Tto93sDMNScezyISQm1tyj36TOvuvWxwb65RzX8u+db1y7onZI69a zj0v+8ex0T9jQj6OPlvWvSn733XLmY88S4d8G/e+C1mmnCHp1irnnpW98Nrl DKlvzXLuU4kj3/0hD7TkHvc+dcYl/7XjP3ZX1tOeVSybtOyP1+C79pbc/3Yo Z0i5q5XTdvbySwUGt23L6+XKaTt79hXKuSdmX7l8Oe+hdyzn8wD7x97l3Aez /+1jyH65Vzn3kexhN3fOZm+7YTmfN9j/dnUvz3Nh53Lum9mfbmBIukm2j/8C bmV51Nfd8thTL1XOfqGfViynvezff+F3RH4PjOue5dzjYtP6+pA2bFnOvTVx nWwTdmxh2eyjexiSbmJLfg9xtPg4Rh+AoSONYy5nL7uX8xl734Od/9gfH+g8 eKBxi0ff923LvRVrBfst9pUXGLLfZP3Zw3JZwwab7rNo36chQ1tyvWLPyp6a 9Wm4Ojhgf8nz9EOGrA3vaDdtusZ8B4idM83D2sP+m333WEPKvcL2sU+/0pB0 XfQt+5sdWnO/yVzPesy+kzYyX7OX5Vta1hKeBw4V1+ybzxDfZ2jHZP3P/0QZ o+w7+T5lgiH9PsV4ymUdOMx0X4QNO4Z8UMt1jz0xe3DWm1PVb9A/2MEz0r3a wppa7JfvNR/2jdNe6mCdYx/PvvsuQ8qdavvYp99hSDp+q38sZJfW/Pac79/5 T0Odd4Nt+b+cEx1L/Ddlr3LOI8w9+4hdxt/RYhRsHuV4QN+pnGOVsXuEeybG 35GGpBtgPGNlh3LOWYz7HQ3J/wfvH0JWKuc7CeYV3l/sWc45EZuOsX7G0HbO ccxt25bzmZxx2d+QuO2Np75bfYfCu4Zjyzk+mTNGWB768eUc88wxU9RPCHml EuMn5PqQg8q5n2afeLAhvxlMLWc/ngQWo65pEf4Y8lM5rx9hfon75ZCH4roe YWvI57z7KOe8zHx8gHMWuN7fuQn98JBu9u/e+gffHGc7sPtA82HfIdrFbxjD nWuY8/YzpNxDjWde3Fc/k+5n7X00ZA/twgfDyrlOYOtlxuGfK8QNdt2s78HI BDGBfpNtQD85pG/INiETTQu+xoccZrozxQoYOcsQrI3U9/j2NH2Pz882Hqxx EMRs5ine9Ygb/HxqSD/z/BPxf/NbRlyfoi3EnWHZ1H26ZVPfLdpIWZPKiSH6 /jbLPlasgJ0+4mBr2znZtODpWn2Mr4aGrF7ONXPncq7xrJNLx7js35bXuxrP WjqknOOCdLt5D39cZ3lg85py4oY6rvceOL1RTODzy/UbPrtaTJBnrDgAL1fq T+aAMYbEXWU8eW6wbMq9tJw4BhO/hjwW8njI7yFPhDwZcr/9i2/v05foH9qn 9NNTIZdY3sxy4gx779Hf+OTNcmIFTL1lCNbuNZ5y79bf5HmwnBgCIzNCLrYO bLow5KKQ6YbEvREyzjqaAkuNIefE9V3lxArlPmA7KPcO/Q2u7zQk3Wv2EX3/ tjYyPt4tJ+7B1Iv6AL+9ZAhGntcf9PcLhqR71XnohpDXQ24MGRfymvfQ36pG n4RMCHnb8OZq+uOCkNEhz+lX6njGPmYcv6ddjJv3DcH4O9qO3a+UE3Pg62l9 hZ9e1nbiXjWe9j9r2WBqliF1LxcY36Et55kntAt/3Ob7Zd4df6Xv8e3H5ZyX bw/5U5/hz7/FDbbUK+k/MPK1+cBatZI24ZNW+k4/f6FfwcuXhtT3ub4k7jv9 DY7+EDfU/Vs5+xTbK5XsF+r4xjrB+6flXBvAyGeGlPut8ZT7iW0iXVslbQfX c1YSN/T9HJW897ZpmWtYbxoriRUw0lTJEExxeMws/fxROccWfUdfnxdyfsgH +paxx/5gVLl9rRplumXDP9u3ZfqGSpZHfS2VxCs+/0s/4IO5KmkvGJ+7kiGY mi0OsKlcyXz013/lxB9xzZW0nXL/0Z/MAf8ako7xydzHWnSJ4e7ihvmU+XKj KKdWST9vWEnf4P8NKlk3eudKtgF9Y9OCndUriS3atIn38Mmmhvhh1UrOa2Dh UOO6hixWSTyBowUq2e9gdsFKhvh5oUqG4KJbJX1Mny1ZSbyCnUUriT/KWriS acHO4pUsmzGxSCXvka6rdlHWapW0izZ0qmSf0s47Q04OOSXkLsNTQ44I2Sxk 85DDK2kT+h0hJ5nnbtOeFjI15ETjFo1xukjI6dgeY3VkhPeGLFFJG2nPYfYN 5a5XSQyB2Q6VHLf4ec1Khvh5fePB8rqVxDF51qikT8izViXTgp2OpqWda1fy Hlhbp5Ih+e8POSPkzJClKtnHjL+V4vqXcq5XwyvZX+Bi30qWi75PJW1C318M gamDKokzsLOf+Yg7pJK4ARMHhnQx3ZCQVcTO4JCV1QdV0g70gSErqvcImS9k /pAtDcHUwdZJHb0qiS0wtZUheOltCEb6GIKprQ3B6RYh81rH3vqGdu5Zyb6j 7+cM384R8j1YDP/+wHwQ95er5DX7W7ACfhnrS1eyX5kvl485Y8e23EsuX2nf C9NO+pu5c4VK3iMNfcE9xtXmljdPyO6V9De+3dn+A+O7GDJehxqCke7mo217 2Q7aNqySOKOsXU0LBvewbNq8m/dId18l8QxuHhA7Z4XcHnJCJcfAKP2HP8eK G3A0RtygX2n/ol+hTejnhAzQ59eGHCBerrIMMHWjeGKOOU5/4+fjDfHzUbYZ fx5t2EMbe+v/qy0P/B5Zyf4lzzGm3dL29BEjI7zXM+RYQ+r+3/NPJTF4nfai n2s76ItlwufbteV+Fj8w97OPwB/vu+aAOcIPXYfY15L+P79ZK9aewcZd5LzO vM8eYRfn+pO0t2/IxfoPP18oJvDzBeIGvFwqnvD55ZXEOv64xHzEnV/JsUqe y0xLuvP0M3EXWTb1jbZs6lsx2j0gZCfxskPIjuKGkPvPigNwMcsQvDwsJujL laKMgW2Z7xltJc9zpgVrM7WPuOe9B3ZeMMTnL4stfDW+knMxc/wk/QqmJlRy DQAXNxuCqcnGg7XbxAR5brIM8kw0LbibYlpwd4v3wNethuR/M/ag492bvhT6 Ndr3tL6hPawz/UK2reR6Q9i/kntbcMd4YL97qO1hHdvGPAvGXLUA53NVct3q a9xXMXdtX2kfz9vrm4dCzrbfmV/BI2v2dH0Mph6p5DjH/48agpEZxoOdJyuJ OfJM04fkecy0YPAp09LOx70Hdp4wJP8b0S/j7KN33LNPDHkv5JaQW0PesP34 80N9ia/e1pf48F19gx/e8R76m+bDh+8Zj3/eN8TPbxlPWR94jzo+sh78/Hkl 9xPsIz72HvPiJ4bsEcrVxB+/nSwZPlki5J64/q+ec+vXIV9YBvuLbyp5n7X6 m1ruI74K+dZ7zMHfhzyo3/6r5NhgPP1ZSZ/hkx+MZzz9aIhPfjLEnz8b4s9f DPHVr4b45zdD/PO7IX7+1PaxP/rDe9S9cozXQW1p59/6G1z/Y8h4/dcQu//S XtLNth3MBxwISchYb6hmyPhurGbI+G6O6xcrOYYuj+s9Q/YK+Uy78E2lmn3P 8+K81fQx/myrJg7w85zVxA0YmaOa99DnriaGwEitms+WPGtWq1ke+lzVzEe6 1mrGg826GKWOeapZBnUvWk3c4POFq9mP2Dt/NXEMvpasJi7AwiK2hzzLBmaW CfmS9kV4dci3gZH5qtkm8l9Vz7xLxL1Vwg+D2xI7a1bTB/R9h2r6Bn35auID XKxaTR/jz2Xi+juxtmw1QzDFd9g/i5eVq4kVMMI32j+JqY5x3VRN/6xUzbSk a3G+YzwsV83yqHu1atYJfteqpo3gevVq3gMja1QzxO5Vqlkntq5TTdyAl/Wq iRUwsnY1yyBuqWr2Jf2wbjXTkq6TNmLXBtUcq+DlmJAeIVuGdKmmv/H/hsaj b15NfODbjavpe3y+aTWxBY42Mh9x3aqJM/CyiWlJt5n3KKu75YHTlf2GnG+e t/DefNpFOL/2ES4Q0tU6qaNXyIIhC4VsZQjWehuCqT6G4HHFqGuFkMXiep+Q 9avpQ75PB0d8o75tNXFJX64amBrSltfbhSxdTbxsbwheBul7MDLYEL/tVE3M gZcdTAsWBlYTW+TZ0Xuk62n7aM8QywCne+hj/L9LNTEEXoYagpddDcF7v2q2 hTbsbBnk2b2amKOs3UzLWNnTssHLMO+Rbi/vgbV97Sdw1LmaOAJDh+tvfLuf ceBrf0NwdIAh+DrQELwcZAimDjYEL4cYgq9DDfH58P9X/2Heo+7Vwp+rhmwd 10dWE6/g6yhDMHW0IZg6QntJN6Ka2KLvjzUEU8cZgqnjDcHUCYZ99BVzGOvh 9VH/dTw3BYZH6yf8c67+BiOn6hvwtRr75ba8Pj2kfzXxNdIQfJ1hCHbONAQv ZxmCr7MN+e/IKdXEL3Wc4z3qvrae908OOa+aGAVf5xuCkQsMsXuU9pLuQtsB vi4yBDsXG4KXSwzB16WGYJZnCJ5feV4F0/QT+4XLjAd314kJsHCtWEG/QUyA heuNR3/aOijjmmrijDxr17N9d4SsGdcdOCukmnurQ8XL2GriGBxdZQhmJ+tv /Mx+6xhxcZshuHjM/qKfJnmPPOMtm3EwxTLAyNWWjX032g7seFQfUNYj9jX6 NLGCfq+YAAv3GYKFe0JOM+4hfY+fHxAf4GJMNec12nm/+Yj7x76bGfJXyIyQ p6q5xzzaNt9ZzT4ER6sHNndpS8w+UU1Mg4UnDcHC4/YHcXeZ71TLvlhcrBt+ WCfkhxgX081H3IPaSxseth20f2P+kxBSr+UzA/3KeGVfzNhmTL9o/+L/V6qJ ITDycjUxhP5syBUhV4Z8pI/xz0vmI93P+gCf/Bj1TY3wk5AXxAd1vFZNLOLD WZZHH79fTayAkQ8MwcW71dy/068/6Vfq+NB47HhVeyn3dcsGp89ZNjh93hA7 frSPKOsHfY/+i7aDzW+qiRV8/mXI3dXEy1eGYGqN8OfQtvTV1967T0wwnthX /llNP82wHUeJj6f0J2Nvgj7BH99VE3/487Nqjj9w9Ec1sUJZv2ojePnNEEx9 Ws0+J8/v3iPP95ZHOzvyv5WQ2+P6c8vG/m9tK3VvFL6riZsunPWpvmFIRb2h lv1LvzbV0sfgqLGW99BbaokPcNRcy3h0ynhFv81XS3/jz9Vq2U767L+QZ6qJ u9mG4IUD3mfp2zlr+W6G57y5ahmClzlq+f6GuA2jrRvwnU9cz1PL50CwNm8t Q+qeu5b5iCvX0l7so53YCGaXryVuwOBytcQN+rK17F/0xeL6C/GySC39Rx8v VUs80cc/1XJM8J+7DoGdXdsyzeK1zAe+lqhlCKYYH3tXcw7i/Srfx/NtOP7A LvD+az19v1DcW7KW+ahvpVpiGrysUEvbGaPL1BJn2L1wLfNi64q1jCfPyrXM B75WqWUIppauZTvIP38t/cZ8AFawhedv5hpCfqtoq2WIP9atpf/AznqG4GWd WvqYuM61xA1+6FhLbIGdNWo5z/4dsr75iOtRSwxhS/da+hjf7lBL3+CrDrXM x5y9di2xRX2b1tI+8NLVEExt4nxJ3Foh/4rHzWqJM/CyuSH1dTMfcZ20lzZs YDvAO/voT3z23b6WPsC+/rXEB/3au5b+ADtrBi52a8vrrWrpW+L61RIf+Llv LTG3uO1jTmFN2jr0RY1btZZ+Y1ytXsuxRT9uZ53YsUngZ2N+96nlfz2pi/97 7lRL3IOdAYZgZEf7lbhJ/oeU/34OqiXmwM4W+gHfDDQfcdtoL23Y1nbQfs7s 5AxTzt/lNyd+X+ddDb9J8S6EdztnaxO2HKkP8PkplkvfnFTL9tM34zkrLOSX uD7HfNhytPaBnc0ivlvIlnF9prihfWcZUt8ZtfQZcUfUEgfUPco2Dw7Zq5b4 BtcnWz82HaWN1He6/qbvRxpS7qnaTn+cZki6G+vph2NDjhcHYOQ4/YO+WSm5 XOB06VpKzhf4aLp5Dx1eD3hq4JSB1wNul+Gl5MEYVkpuEDhK9i0lr0rB7QHX Rwfj0fe2fYy/gteKcuHa2N9yOb8ajgf4E9YK/A5rS5tPDOmjbzbWFnhbHtY3 59aSv4N7cLo8Yv+eV2vnmqKOLsajd7Id2L1HLcc2c8nutRy36DeFHK7f7hAf +Of2kBO0q0f08xac7R7XE/UZGHlATICFqaYl/83ij3QPGg8279Ov4OV+Q/JP sH7yjA85TJvODxkSsnNIT/9/zf+g7xEH4OUu8Q1G7jYk7l7jqe9O20S6SeIF jPC/a675j/bafKvYljgaXst5qrN2dBPTh9ZyTuyqjV2N20efMx/vWsu5mDl1 WMia9vW+xlPu0FrONaTbU58wNg6u5X6U+fWgWu4zNtbHg+2Lh+xLMDHZdmDz IebbVKwwjhl7B9RyX8I+5UBDyt3P9jEH729IustqiRXsggNmd8cA3GZcw5uz Qik5Y+CoWbmUHDAFJwwh/DPw9vQoJc8PvEZw8cDNs6Lx5F/I/9v3KiUXFRxD cA4tb9nw2yxdSg4f8i9TSl6o7fL4vP+NyfVL7bxB6L/Xkj8PrrsFLbtnKXlx 4OCBJwc+oS21b15t7F5K7p0drGM560dfwDLIs6TtwE7+c4/9/O++OJuV80I5 m3WIOme+cmYmZ36uZDznii7tPc4D5exXzgvljNClvIfOOcecrdvLM8x6qzfa bjj8OC+Wc0k5t5OzYDnDk/M5C64guIMO9twAzgHgbAb+39+nlOfG7mSexUzL +QCcgb+t89Qutdx3gtdlLZv2cCY/3DNw19DXe5WSO2rtKHv1kAsj/aNil3GM zzkn/5xSO6fd2aV23sEj7dNTS3lOKLZwrudJ+uGsUnIT4APO8zxGnxyrvpPl naXPSHuGvjrNcuFbYs7epdTOg7iXfbmPeg/Lhktrc+06QkxQ3kjxcrR2F1xT p4nLkepNcqudIgaP09bDW5PnD57Bgl+KtWhu60OH26prKdeQOY1Hn8f+Il1L KdcqcM9PtKwBrDOP2d8XhDxuOLqWXE8bmKfNsln3Iup/6wrrBvyHcB+eIA7o e84/hZMQ+8F61bTUN825hnVolVKOLeaC1exjxltk/d96Rh1160S/3DmGfcEl zpWsS5caMgfR9zeXkp+NPuVc1+IcVsLifFnC4nxZwjtLubbfVEqeN7AA79r9 +uc+ywKvcJ5dJg6uUGe+gycO3rhdS8knd6H4uNJ0+5aSp22MuLjfcoeadrSY GmOegp+S82aZRy+1jt2shzrAL7xxBS/cg9p9hH1Ae+DFgJ8JziV4LuBbQi/4 ltDhxYC/Ch1eDLiy0AuuLHQ4PtZXh6OkozpcJ53UD7P/xoUc3Zrn3nLOLTiG 046zdRkr8N7dIlY4h5fzcps9mxdfcD4uZ+lOKeW4Ie1E8XWHeQoeO/zN2bqU D+ZGWA91wL3SWfsKfsEbSrknur6UfHecWQ+/AnwaHd0vo18ZZV4RMkdjnoMP lwYcGpx5D1cHvBydzUcc593D2wH/xoamJd0m3oO74/noizkj7NqY5603uEf/ vp5cGcUZ8VzDv7G5Id/Db2Sd1MHZ9/M2JhdBD0O4O7Y0hKOjp+GCrgcLuj7w 7e9iPvf289mX79TB2hOl5GxkL3htKXn/mHcfFmfMx9PU4S95RH1/08JzyP7x KrG+n/fQD7bv6fcD7XvqOFS84Jtj+e97W3K7HNeaHJBP1XJ8PKl9xVnMjzo2 HleHH/IZOSIZHzNKyRVZ8DjOcMxMt6zzLIM23M4ZA23JZwkvGWMF7kx41+Bj g4cN3hq4duCxgRcITqb5G5J/Bk4abIarB86egs+HsOD5IYQvCP4feIDgC4JD Bi4Z8pzUmnw28A19Vcp9P1w0X5dyfUX/opRcOPARfVZKjhw42+ATomzKhdeH suH5ga8G3hp4dcrySZH+41Jy+8Dx80kpeYHQvyxlndTxeSnroQ54bigDW+He ob0FDxIhdVzh3MwzzRj3uOxhx7kPZv97g3tW9p4Xuq/d1TWHPfsurj27GLdq a87zF4dcadmUC78O+wn4dm60POq43n0wdQwSo2B2sP5GHyKG0K9zj0uea9zX sv+9qpZ7eva8VxsSd63x5Blr+0j3dCnnWbAzs5TzLDo8S/gBviZ4meBY6mG/ w7G0pf3eS70iT9NW+hVOvq30QR/1gtuvj37qq764z4h9G9q5EjcQZ13UC74l +Jfg6IOrD3zDvQTHEXEFV9Ny2r2BcygcUHBBMQYKLih0uKDgC0SHLxCeQnR4 Chk36MUcxJx0RmvyTsFRxZiA2w+ewGdKuSbRd3A0zVYvuJrQ4WpqcI2Cb6rR NQreqSbXKHizml2jCv4tdPiyaE+L2IUfC164greJMbazcwr4gBeLNPM6rjay H1u1Fx1+Kfpyacf8praH8dxVnTHTTZ0xtJn63NaPDrfDzj4DcO5wH/fu8EBw lj5n78OpDT82+DmnNbm04c2GKw2u4ePEB1xmBYcw4XHiDC62Y8TNiaYDNyep g79jTYfP4bmD8461E147+O3ABZxpcKfhW7jVhjS0c0luJ1b2Mw/4gKdugJiA r22QGBpgWWAWzriTxdAg88ATfqR+oo/ggD7cfoejDR43eHvgUoFnpeDvQYeH 5xd1+H/gS4E3Bf6c39Xh0flDHT6eP9XhE/pLHZ6hv9UZGzvYTuyFSwSuELDD M822+vNIbWW8HWA/dtHeA+xveEbgHwFHB9secHOIOrg5VB3cHKbezT5Ah1Po H+1bTp9gX8EJjW/gx56gTfgVjhR4U8AEvEDwA9Xk2uMaTMCNAs/K+a3JsQ0f N76HnwqequONJz983XD4TWxIbFH2Lfr+KvPgY3i1ztI+uBrOEAvwcI1qaOf5 vsl2nGU6MHKO+cHEuer7aMuV9jv8hKfaL/DMjLOv4XUpOBsJ4dZijwvfIvyL rPFwCcIpyJq/mzr742HqBU85HIoFjzj8iet4j7LY++5r3HrGk4e5b4htXcs6 KbfgET9FXFynrYfbB7RhP+2lH5nTGR8niQ/4ca4XE7QVrpyDvEdZjOep+rLg 0yUPfFeMFTiK4J2CtwgeI7jR4LiBf+fi1uTvgUMHDp+3/p9vuH5TH8PNAx9Q q/w7cGLBvQNX0DviAz6qD8XF++bBb3BXwWsFHxpcV89oK9w8H+vnadp7qvbd pZ/vUZ9k2dRb8ILAE1LwgqCDoQfUC944dPD0kPqV2vKs/U773rDP4ECCj+jL Wn5jzjea8wbe5+Hbr0p+A8q3+3xjzu9t/E7Pux2+4yy+Sd/W39pJt6P3+PZ8 J0O+N1+B73Pb8vp020E7h1ge7xwKviX4lxhXz9uP4OMFdfDyovrO5uO3mHG2 6XXxQRnwhjEmXjLPDbb1VbH4snHn6Af6i7H6iL65XL/NtOy6zyb0X5vPPHAM cg1uLm9N3kG4DuE8hCOQZyEwNLfPPOBjHp956vLf8ZyDj+fzmYc64bH6V5/N VmdOhcPpU239QXwzR39u3F1i/HPtpox/7Gv4nb60779WB0PfqIOhb9XB0Hfq zP2ni036t9XnNPzR6DMe89yj9h28g4+pwxnImsQaBXfgk+pwD05Xh29whnrB O4gO7+DT6pfZnqf1X9XnT+ZpxhPjsOBtvUM/13w+LXjmZosn7EWfal9+Ip6a fFYFK80+J4OPFp+XwUvZ5+GCbxJ9G9878c6J/cFI+2uQeGKsz+VzbzefhXk+ Bhtt/h+8+/97HiZdwXMGH9XY1nxW59m67LN6Z9vWxWfxms/PXcToxup1n8/R C743flsFB4u7/wIH8G0tbr/wf3X40QquOOIKDrY1tA/uDvhp+P1gE5/9Cz62 Ne1ryig42QjX0mcb2ga4ceBygdMEjpwH1Ed6D76TgvsHjhb4juBSgWOm4D1C h1voQfMX/DpwspxsPrhhGBO0Fe4xOITuttzTrecefc87xfX0fUf1Bu/RLwVH 0d3iAD/w+8occv8dKVY6mZ/fMeAwKTj9CEkDDwr8KvCiFHx7/P7NGGZ/zG/b 8AoerP+62d/wS8ErCKfgoY3tv4NsqS1wuMDvcm1rchPCP0i/w5kyTJvge9lH TFD+Qfpjf/PjnwPUC463vuKgnzr9yJ69j/6mbPix4GeDV2tnsQKPVsG3NtS4 gluROjayfvQOlrGr/TdcW8HOHraBPevq1sMel/cKvGcoOAXR2Qdzj3cLBb8g cQWXIX3NfncN7WKupD30e8GDyDgpOF/5TangPiQ/+2/eMSwvPuhLeGjA+57a Clb2Ui+4EpcTR3sbV/y2BUaK37bQ2dPDd0cd8xrfXRyBl4IbhxD+HHikwPhU +xEOnv9xubUmd07h4+uNg28KrrIb4/qm1uSdgn+q4Acq+IIIx+hL+LDOFx9X mw58XKN+gHWi8z4GLi04unjGO0G9l/eOtQ/g77lCHNEGxi4Yh/uKM6H7eO+E xnbONuwYoi3niRf4vgqeN8KCw+1C8xQc5Kwnw1xjWHN4frjA9Wqo6xPr1e6m JR3738vNX/CLoxec3Kx77IWvNI6xwZzF3LOr6xzlso+bX5+DD3js4DJi3Fxi G/axv+mX3bSR/Lub9hLxdLn597L/0Fn/FhBHrIf8HrGAeDpG7ICvEeo99cMI /Qb/30vi4xX1a7z3onbBWQjn4S2tyWkHtxo+gK8Kvis47l4RZwV34EzbQ75n 9QmcWk+Ir+ct92rreUG74JW6TbxMVh/hvVvF3wvmBx/M9/BqMbcyJiaIuSnm By+Paeso7WX94Fn3DNfsgu/tcfv1WdvAu0DWGNYo3g2erb6D91jHCo5D1pZB 1sEaNVicog/0HutYXzEC7vuZD9xcYP3YyjvP0y13e+sZKVbgKJsuJp5Sv8h7 9O92piX/ZfoB3kj2Osxn4ONS75GfdYUxB0/enPJz0YcveYYN/08veA3h0Sve m/LOtOCeLLgoCd/SJ3BpwZ/FvAVP1rv6EA4ruKwmeu8d/QRX1Yf6+H3zTLEM 4pjjPrVc9gHwZMHpVfDAEcea/7k6a/wX6pMsm7pZw+HLgjeL9f9rdfYd36iz F/lWnb3Fd+rwf8IDXW3K/ceP2lFwv8HLBc5+UceXv6oXfG+/NrZzTv+tf/5V x4dw0cEdBh5/N0/BV/2XPv7DuLttB+0Er/9ZFmMYLjg44Rh/fCAAPyDjDZ49 dMYP3Hzo07Sd9oD92ZbFHEAZ8Mwx5uCeIw8ca5TPmGfsEk/clNbkYIMjFazA AwhHINxo8IGQB1/CiwI/ytxyZLc1JW7g0uYaHMFZiA4+OHcRHbxw/iI6+IDj BR28wP2Cjo/hc0EvOLyxA/9TJ3H4Eg4WuFgK7je4VcAQXCvoYAjuGHQwSDx2 09fwtsAlQ9/D34IOhuB4QQdD8MKggyHqQZ+hD/8Uu/C8LKM/4GCBiwU/w70C 3wo+gXMG7hnwBH8KOniCRwUdPMGxgg5W4FpBBx9wuaCDF/he0At+R/SCZw6u GeyiTuLANPewDzzB+QIXDJiA+2Ut8YS96GCX+A7iaT3bA1bWVwcfHdUL/sKO Te38heicqQ5nCVwld7Ymrx7ci2AIvpgu+nJj9XnkptxE3MCHs4m+hx+ou/7u oQ5uOMezm9jqap55TLu5OOtm3Nze20y8bmlZ+Bhen77iBm6enuJmK3Vw01u9 4ArqJ4Z6WtZilgE3EVjrY54lTLtNUzt3UR/7CH4dOHPgwBlu3xW8Qdvryx3V C+6iHcXNAHV8D2/Qzvp7qDq4gbMHviCwNdA8q5oWjqCVjCcOXPe3bWBnV8sq +Hvg8wEX8DnBKQRudlcHN3uoL6Pt8PZ1MC1lrWcZcBmBtT3N09E+oI51jSeO uX5R+/Le1uQKgpsIezm7kjMqwRDcRXAKgaGD1OeVv+lgfc5ZmkeIi6PUwQTn gHIeKDjjLE/Sb2ZazhHd1HjiunmPPODvaMvCn5zreaI44JzOY8TFsepg6Dj1 gvuQM0ALPsWjxQRlcBYoODvePAVvInX0Np44uEzhcIVLaUP7YH/7nXNNT9cP Z6iDoTPVwdBZ6gUP4nni4gL1gfYxZ3WCs7PNM9i0+GCA8cSB8VNtG/gbbVn4 k7M9LxcHnEd6obi4WB0MXaIO/k6zrIJPcbSYoAzOAwVnl5oHTF1pHXsYT1zB p0gc+BqrDi8i18P1M+e33mTfcW7q1fblterg6bqm9jNg4ZKDLw2scA4s1+Dj RnXwMk4drIxXL7jT4KU43DrH61fOjeWMWPDEObA3i4lb1MHIrepHGo/d4Inz bTkTF6xMVgcfU9TBy+3qxVm06CPMR7ng607twB+cG/ukfuZMXs6LBU+cqwv3 Hni6Tx083a8Onh5QBysPqoOPh9TBy8Pq4GuaenH2LmfxFmfUEneK97APPHEu LWcGg4kn1C/UXvTzjcdu8DTD9oCVp9Qv1R/oxTmz6ODrGXXkX31WnFFLHBji PNxZ9ikcK3AGPdKaZ91yFi9n8HIWL1gCQ5wjzHm8YOhl9fk9TxhuGDAELwzX YOg1dTD0ujo++8T6wNMbxoEjeGHgiwEf8L8UnISEBSchIdwx4037hr5/3zwT jH9LXHxgHHj6UL3gR0S/0j6gX8DUp9qHP+A4+VW/wtXyg/6DK+Yz/fmFOniC TwZeGfD0tTp4+kYdPH2rDp6+UwdP36vfYdnYUfAmEsfZw/iLMQ+m4GKBOwZ8 /KL+mPaiTzMeu8HT77YHfP2hDp7+VAdPf6mDp7/V2asxtzJfghv4YcATvD/w 0sE7h1/h74EXiL7kg184Y+CE5Bq7n2hNnkj4HOF1hFO2sTnxBCca/GfgCW40 9AXky4PHDjzBP8Q1dsGLAydPwUVEHL6E+wpeIDAB/xBcRm9qKzqYgH8IHcwR j91gCg4h+IvAGrxH6OAJLiJ0MAT/EHrBP4QO1shHuWAKLi7swAfw/cDng//g 74EXCL/CUQQfEX6GfwgdDMFXhA6G4CiCew8MwZOEDobg5kEHQ3AUoYMh+IfQ wS5lw5tUcBERx3jjHvaBCfiH4DICI3AUoYMh7EUHd8RjN5iCQ4j2gCF4j9DB EFxE6GCIvTJ6wT+EzriaLW7AE34j7sHW5PeF17fgKYS3kHRwFK0lhuAfQoen iGvw9ExrchfBfQYHGvx564khOP/WF0Od1BeUMxGuX7BL2WuKJ+rsrC/hBewu JuBf7CKGNlavi/eNxXoX7cb3XR0PYKGbesGD2E0Mba4+j/WgMy9jSwex20M7 8AH8gjvpP/gR++tX+Bd7NrfzL/YSQ73VwVAfdTAEj+PWYmgbdTDUT73gVuwn Pih7S/HU37j5vddDTMC/uL0Y2lF9ee1FX8Z47AZTA20PGBqkDoYGqxfcioPF 0M7qxVn8n3im8Wfq9Beci7uKFTgXC07FYcbhV7js4LSDXwseMjAE1xn8Z3s1 J7b2MD9YgcsOTrvnW5OXC060heSDHi5e9rdc/Acn3RHi4ADjwMWB6uDmIPX1 LRvONXAEF97B4uZQdXBzmHrBG31Ycztv9OH2DVxvcL+Bo6O0o+CKPrq5nSv6 mOZ2rugRYuU49YL7+RR9fJo6WIELD2488HS8eQreaLjxwNYJxm1sOw4SL6db Fn6Fv+5csQD/3UixcqY6WDlLveC9PkrcjLSsgZYBN17BS31WcztvNHUMMP7s 5nYOaeJ4dh9tf5EO3hK4PxaWAxEeETAEPx48eeDmYnVwdIk6+LhUHU5XrsHN K63J8wp3IRyGcC5ero/hVYEDZqhlj9b/Y4zDl/DMwNUCnuAtgb8EDF2jXnAu og83fqx9DafMdfb9Depg6Eb1gmcR/TDrQS+4wPExmJqgHfgDDpf7mtu5D+/U J/DdwIMDnm5VB0+3qYOnSepgZbI6+JiiDp7ggrm9uZ1zcar+puybm9v5F4k7 0nvYV3Au3t3czrmIXnAuohccjdgNnh6wPWDlQXXw8ZB6wbmIXnAuoq8hJvAb GIL7BtwUPIuPNbfzLD7e3M6ziA5upqvje/iBntHfs9ThY4HzCQyBrRnmgZMH 3iB46cDZU8a90Zo8LvD1LCIPznP6GH6gV8UF/Ddw44CbF9XBzUvq+B5+IDiI xpqWcq63DDiOwNrL5rnRtNRxnfEv20fw6Pxgn/2kDtcrZ/bCD4vf4E96W9++ qw5u3lPH9/ADfaK/P1MHN3DzwCMEtt43z+2mhffuNuOJA9dv2jaw87ll4WP4 gb4TF/AswZ0Ebr5SBzdfqzMG3rKsgseLsh6wDDiOwNo35nnIPqCO+40n7kD7 i74ENz/bR9gLtxn8eGAI/iS4lcDQb+pg6Hd1OBDhJwQPYAhOwX/FBNx7cECB sz/M805r8hHCbTjdeOLgJyQ9eAJ/sy2r4E2ERxEcwPPHH5fABRyB6GAI/kX0 gvsQLsRF5QokPZigDLgcwRk8iOQBU6SlDvBEPHEFd+mjze38Uj/b73BAwiGJ H+CMRAdDcEmigyH4I9HBATyIC7QkLuCHQwcT9DF8ieAMzkLygCn4CPEBeCKe ODAOryRtA39wcVEW/oQHER5FcAD/Ftxc4ALuLnQwBP8iOvjDdsoqeLwoC0xQ BlyO4AxOO/KAKXgZqQM8EU8ceIJPkTjwBTckOmMM/kj07cKn/UM6tGTfwRkJ nyR9Cd8kOniCGwwdPMGnhg5W4FVDBx/wyKGDF/jl0N9tzWtw009+CXgmPoj7 7yG19CscenDVgSf42eBpg8etT1vy6oEP+Om4BrvEryme4NdbT6x0VAcfndTB S2f1svV0FpfrWS746qId+AN+uj5iomfIluIJ7r+NxdOm6uCpqzp46qYOVjZT Bx+bq4OX7urgawv1VsveSGz1MK7mvS7iaauQXmKit/oi2ou+oPE9xVNf2wNW tlEHH/3Uwcu26uCrvzpymj4DW9sZB4bg9du+pZ3LEG4VMAUHIHx/YGiAOhga qA6GBqmDocHqYGiIOhjaWR0M7aKOz/azPrgQuQ+24ACEI3DXlsQHPDPwzSwu DyDX4AX+FvhQPmlNPkV4A/H9XuZZ0/jdxMXexhU8jugFjyP6MvYB/QKm9tc+ /AGfy3H6FV6dI/UfvDkH6M+D1PH5werg6RB18HSoOng6TB08Ha4Ono5Q39Cy sWNz6yRuOX2Cz8AxnD/HiI9j1XtpLzqYO1q7wdMJtgd8nagOnk5SB08nq4On U9R5Pmfvw94Z3MBBA57g1IH77cmWdq6g81va+SZHauuZ6th+ljp4Olu94NZF B0/nqoOnUerg6Tz1gucG3psh1nmevoQrCC6gL1uTlwjOHbh34AG6UExcrO1w FmEz+FtC/iP4/MAZXEdcg6fL1cHQFeoF5xA6WLvEcguOojH6AO6o21rauYJu 0q9wHV2tn69VLziZ0MHQ9epg6AZ1MHSjOhgapw6GxqvvZ9nwLx1uncQN995Y MQHnEtxLYAgeKfjGRmgv+pHGYzeYmmx7wNAUdTB0uzoYmqpecA6hbycWwM3J +o24gvN4ef0HV+IjpoPr6B7z3adecDKhg6EH1MHQg+oFvxQ6GHpYHQxNUz/N suFfGmWd0/QlnIhwIcJtCG8i+Pi2NfkO4T2E/xDuwCdaEnePaTe+h/eR8bCk XJBw/YIheCK5BkMz1S+3HvRTtQVMg6lZ2oEP4Ed8T//BL/iGPoQ/8nn9/KI6 GHpJHQy9rA6GXlEHQ6+qg6HX1MHQ6+pjLRseyIKLkbgx3pslJuCue0uMvKN+ i/bCN3yT8dgNpj6wPWDoQ3Uw9JF6waeIDoY+UedZEQ5X9mtgB65Hfvd5yHNY OY+14JUseCYJv9Cv8MX9KG7gaPtarMBRB1/bvd77SqzAPQcv3v3Gf9PSziH9 g3j52XLxH/x4/4iDX4yDG/kX8fFTa/Ilw4/8oGVTN/Mm/Hdw5oGbP9WXkoca zjxwA18e1wVv9N/2DTx0cMmBo/+0A99weMBsfQXvHzr+hG8OHazAO4decD/D l4aP4TlFByvw38FDB57gpCMPWCEtvHhgi3ji4H+Gh/s38QJXKmXhVzjr4K4D C3DtwZ9dcLGjgxW4+eBVBfezbQ+4IS1lgRXKgA8PfMG7Rx6wAm8edYAt4okr OKSJ4/dB+PoWMh3cXnCG4Uu4xuACA1NwBsIdWHBso4Ojxf3PNvhYwv9ug5cl /f82+FjK/3GDF3jG0AueRfSCnxs78D91EldwIsLnBJ7gRIP7DAzBjYYOfyDX v4hB4rEbvkc4F1cuJ4bggIILCgzBE4W+tLyKcEqBIerhmvGPD/ExmIIzqoP+ gPtrUzEBd9iG4gm+r7XFE9xr64in9dTB0/rqYKWjOvjopA5eOqsXPIvoBffk WmJrQ+PANPfWFE9wq20kJjZRL3jZNxG7G2k3eIIbrZtY2VwdfHRXBy9bqBc8 i+hwd8CPAO8CGOopbsAQvGq99GVv9YJ7sre42Vod38MV1l9/b68Obvj//zZi q695Cr66bcXZNsYt6T3ygJ0dLAsfw5MwRNzAd7ajuBmgDoce1yvqe3gS4Eso +PYoaxXLgF/hr9bk3oMXbxl5x0gPVx48fIPsI7jPjrLPjlHHT/Dv7KYvd1fH t3uog5s91Qv+ueH6e391cAO/GHxjYGsv83QyLbxj6xlPHLje1baBnQMsq+Ad PEJcwH0GL1rB1YcObg5R76DtlNXFtJS1mWXAQwfWDjVPd/uAOroZD1/db63J /QkfK7gZYR9hL1xXcF+BITjg4IkDQ8erg6ET1PE5fGWniovT1cEEnGJwjIGz E83Tz7RwjW1tPHHbeI884G+kZeFveDVGiQP4y84ot3PsoYOhs9WXlcsDzrDt TUtZcOvB1XFuOTn0SA/mwNT51tFQT449OPgWtP09lWPtI/odbo8L9cPF6gW3 EzoYulQdHMBXNkZcXKW+l30Mhxk4u8w8BXcdPtjTeOLANzwitAv8XW1Z+BMu ufHiAC6za8TFdepg6Hr1odpOWfub9moxQRlwyIGzG8wDpiZYB3i60TjwdLNx 4GuiOmPsFnX8DDfZXfYdvF232peT1MHTZHXwNEUdrNyuDj6mqoOXO9QL7jp0 uNHgw4JD6xTrvFO/wh8GPxh4glvtHjFxnzoYuV/9NOOxGzzBnwbfGXx6XIOb lnpy7MH1xu/Hu/gb8ijr4XvvM81HucvJR/aY/oBH7CX9DDfZLH0CRxu8bAW3 Hzp4mqEOnp5SBytPq4OPmerg5Rl18PWs+mjLhvut4LQj7gLvYVvB2/e8mHhR veD5Qx9rPHaDp1dsD1h5VR18vKYOnt7QP+DrTXUEnjJ8VnAiEgeG4GKDMw6u UXhJ4W0CU/DywM1W8Pyhg6EP1MHQh+pg6CN1MPSxOhj6RB0MfaqOz+B1gvOp 4L0jDhzBafa5+ICHq+DoIyy4/gjhObvTtJ/p+2/NU3D1fSEuvjMOblWuwVZb PflW4VedYB/QL2DqZ+0rOPPgG8OvcIf9q//gqPpFf/6mjs9/VwdPf6iDpz/V wdNf6uDpb3Xw9I/68vIeUn7Bb0fcRH2Cz8AUh4fNFh9woKGDF+xFB3OztRs8 wYFGe8AXnG/o4AmOO3TwBPcdOniCEw+dvRpz6z7iBp478FRwhsELVXDXcX47 fQnXHJxz2Ar/F3rB+YcOnuB/Qi/4n9AL/id08ATvDjp44nz4+Z134EyDO63g zyNu7npyksFFBibgNYPnDIxgKzqYWEzbwRzx2A2mlvD/sWBtSf8nC56W8n/j YGhp/z8O7xnX34m1xT3XlfGznP85xwdwi8ExVvDYdfA/5nCfweWGj+Fz4xoM wX+GDobgPEMHQ/CaoYMheM3QwRC8ZuhgCM4ydLC7gv9pB0/USRzjbXn/9w4m 4DVbq9LOh7e2GMJedHBH/JqOgfVtDxjqqA6GOqmDoc7qYGgDdcYVWGgTTxsa xx6I+eUWfQsHwJaVdj7FTcRQV3Uw1E0dDG2mDoY2VwdD3dXB0BbqYKiHet2y N6608+cRx1kCnCOwdKWdM69XpZ0zb6tKO2ce+oLG99T3nO27tRjaRh0M9VMH Q9uqg6H+6q3aAqbnr+e5BpxzgA/gFttD/8EpNrTSfmYBZxis6HkFA8QQPGsD xNAgdTA0WB0MDVEHQzurF5x5O4sPyubshII/j7hlvbe9mIATDY4zMLK7+tra i97BeOwGU3vZHjC0tzoY2kcdDO2rDoaGq0/zbHLOJL/L33J4Rqe/4Jc7UH/C /VXwHx5sHH6FXwy+MXADJ9ihYgWOMrjKNvXeIWIFzjJ4zroZT56CP+8o8TLC cgseslMr7Xx4I8TFceoFJx/65pZN3eAIXj040cDNSerg5mR1cHOKej/rOcW+ gccNXjc4zbChv76Bw2ykvjpTveCZQ19JHrqz9TdcY+fr49HqYAWOMrjKwBMc aKQfYlp4zgYaT1xv20E7wcuFloVf4bC7QizAiQYPGli5RB2sXKq+cD152uBk 29W0F4oVyoDPDnxdZh6wMsY69jSeuH3tG+J4dr/a/ip49Z7Vl/CewX8GhuDB g28O3FyvDo5uUAcfN6qDl3Hq4GO8Oni5SR0fT1A/wLKvqbRz6U2otPOtwslV 8OHBuwaGblMHQ5PUjzZ+on0Nt9pk+/52dTA0VR0M3aF+svWgD9aH+BhM3a0d +APesen6Gb4z+M/AE/xr8K6Bp/vVwdMD6ivLSwgHG1jhN1muwcfD6uBlmjp1 P6K+eD35YuGJLbj0iIM/FtvAd8GH97iYeFL9Iu1Fv8B47AZPT9kesPK0OviY qQ5enlG/QlygdxET+A0MwbMGbgoOxef1JbxdL+rbl9XBzSvq+B7etDf199vq 4AZONLjSwNar5hlvWjjSbjCeuHHeIw/YeceyCl69j8UFfGpwrhW8fejg5gN1 fA9vGmf1TzQtZU2xDDiKwNqH5plqWuqYbPyH9hE8Yv/aZ7PV4fGDww2fLV1P bj/4+uD1g68P/IAbeMe+rrRz7/1YaefeQwc3/JYP1xrY+tY8BW8fv/WvIqce acD157at4O37udLOsfd3pZ23D861grcPHdz8oc4Y+MKyCs4/ynrKMuBaA2t/ mqfg7aOOGcYTd5z9RV8WvH2zbQ9cYHCDFbx9cK6BITjX4IcDQ3BmoReceXCl gQu40dDBBHxr8K6BM/i1yAM+SAu/GnginjhwxD3ygD840SgLf8JNBV8aOIBz Da40cAH3GjoYgn9tbnke4HuAown8kZaywARlwMEGzuBlIw+YIi11gCfiiWNu pv3PVdq5DOkj+h3uNTjY4PTjGn8sX0+eP3j94PeDz2/xauIATjT40sAF3Gjo q8rxRz+DM/jN4DkrePvwAXiCq404MA4HHG0Df/CwUVbBsQd3GjiAhw0+NnAB dxs6GIJ/DR38YTtlgT/SUhaYoAy41cAZPGvkAVNwq1EHeCKeOPAEtxpx4AuO NXTGGJxsa4kJeNA2su/gX1tHPK2nDp7gYltfPHVSByud1cHHBurgZUN1sNJF veD9Ol9sbWQcfoUHbUvxBP/aJmKiqzoY6aZeN35j8QSv2mZipbs6+NhCveD2 26Lazu3XQ1xuZrngq5d24A/4yAaKCXjQtq+2c/vBxwanH9dga5V68vzBJwiv INx+fcUK3GjbiI9t1VeT4w8ONrAF/1r/ajuP4FbVds6/7artXIO9xBP8azuK iQHqK2ov+nLGY3fBEThIrAxRX1V/oIOXXdQLnr9dlNH6rOD8Iw4Mwb+2W7Wd 6w7eJjAFzxp8bGBoT3UwtJc6GIKrB84eMLSvOhgarg6G9lMvuP3202fHWF/B 80dcwe13oPiAH63g8SMs+P0I4XQreAEP0PeHm6fgBTxIXBxhHHg6Ur3g+UPv YB/QL2BqhPYVPHln6Vf4006rtvP8HVtt5/k7rtrO84cOryDXYGuNenINwvEH 1x+8eidVE09wn8GdBp5OVS84BbFjdfn+qHctfYLPCp6/kdV2nj/0gucPveAF xG7wdI7tAV/nqoOnUerg6Tz1gucPnedz+MDZO4MbeNzAE3xp8Ee9rF/hPbuq 2s7zd1G1nefv4mo7zx86eLpMHTxdrg6e4IKCgw08jVEHT2PVsQteMDjMCk6+ sfoSvrcJYgKutmvEyHXqYOJ69f2Nx24wBZ8a3GpgbZw6eBqvDoZuUj/CetAP Nh/lgqmJ2oEP4BmDb2wNefHurrZzBN6qnyepg6HJ6mBoijqchFyDp/XqyVMI Lx78ePAXwoUGhuA4gxPtGMuGSw483WXc0d6bKCbgcbun2s4XiH6G9qKfZjw2 g6kHbQ8YekgdDD2sDoamqYOhR9QLDkhwc55+I449EPPL2tV27rrnqu18gU+Y b7o6GJqhDoaeUgdDT6uDoZnqYAg+NfjVwNAs9dGWDZ/cGOucpS/h73pTTMDj 9oIYeUkdDL2sfpXxz+t7ONReEQuvqYOh19XB0Bvq460H/QJtAdNg6m3twAfw m32t/+BP+0wfwuH2rn5+X73gFEQHQx+qg6GP1OHE4xo8da4nT17BYQg/Gpxt Ey0bnrk7rJO4m733tpiAxw0euIIvEP1e7UXvIG8gacDUt7YHDH2nDoa+VwdD P6iDoR/VwQp8bfzuw3883vb7e/oL7jZ43ODKgDMDrhJ4iuArgtcIDpPHPb/8 TO/dX2vn1SAPPDwPmafgNILjaGv4knh/Gde3RTumt+W59yfGvX9reSZ870iz Weh/c5Y678dryQlCyHlDnDW0f9zv1Jr6UaaFfwHODbg34Ib6x3twKxzbmjp1 nWM89p1n+wrOqEfMX/OsEc5FmF3LM7w5j3r7sK13xLWENHsWI2c4nhj3GzxD +J7WzM9ZEyXPruY86/NaUydNq/GcGTAw8vblHKGQneJ6UoSVkOU4e7U19+R9 4/pU++3s1rSJck+vZ1rO4JrIOTxe32F5tGGHSHODNpc9440z366xDZwN+EBr 2sR/Qpt5LmjNd4KD43pGXM/Bf6BD5vR/ed9EuIDf6c3p/0H5H+h58DuY5gp+ azLNznH9UmvGtfkfd/7f/rg6/00+p571cH1JXM/v98ZvRziP/63YM+7vZN27 836pNdPN4390+L/G3szlrVn30LjeNsK5qdOQdPvG/UFxvRDCc3Rr/iZGyG/D /M63sN8U8M3Pr6ZFX7w132vxLmK/yLtz6Iu0Zp/xvp338n+2Zn6+6ziwnv/P WSxk/7j+1/R1+5v/+B8U96v1TDPNOPpovri3hDYR8u6F34mX0l5+N1q6NX/X 4dl/sXrGoc9VT1vJs1Q90/FbwTKG/F7wcVzPZz/345vw1sRx/7juGWFjyL4h HVuTX+wY+O5CVgl9nZAOrckpdZP34Ms72DHbO+De2XRwT8GFRFr4hW4SizcE Dnes51ly4Hik8wQcZcPq+d05/r21nv2JLy6vp//5xvhH/cw3onvV8/tR9DVb k5cLTq596vldIP4bW8+Qb+cm1NNO5pPdS5l+jwg35zsv28K9v7x/XD3nGTiA OOO3qTU5U06pZz9xFvS29TxXGn1KPdvIWGOeID1nvV5kH3OW+Be2j+/wu/Cs 1Jo8n53ieoXWXEc2jeuVWpMn8Yi4XitkefrOkD3w6nG9nNdH8f/a1mzDSpYH Z+iKlsd6RNk/uEZdpr2cV7xHPb/npn+H1/P7JLC6Sz3/bzm345DxxlgbXc97 /O/yDcfh03E9qJ7nDjCeH3GMP9+U/5OaN+TvSPOy8wH/BZ5pWs4l4D/mzCnr xvUY+7noP2ykD6/h94rWnBsPoX/UD4tw99bsC86MYh7eIOqdWs8ymaOG1PM/ xtR9Zj3nSc5wG1DPM8vQb6+nzcxRkDPRB3yLVXeM8o3EF84FP/i+m+vvy+1j 9X/vKJ1Lz4n7u9bzPzyMt7kd15yt/ZtzxUqR5jbTM4dcXM+0/M/oVdck1qPX XD9YOzjXiOv9mnK+YN5gPnnQOeSquD6gnt95YPct9ex//ts22TH3WvTnxHqu Baxlu8X19to5r/4mPf+xfaCe/7N9MMKH6olb/kfyoNc7GMe3/5yNd289z37j vPR76nlmOn7AH6wR99ezTDBA2vvqaQ9n63FNGdtpNzZgI7ayZvFt+MP1HPv8 r5wy8S+/X91Rz/kNzq4768nZxf/O77cu2sA1/xU+wDTMA8yN5AVXp9bTJuz5 rZ5cufCbwln6ez35Tv+sJ18FnABwT3DNPgGugD+9Tz7yMwa591c99wN/mIZr 9j4313P/Q7m/WRf8UK/XkyMKG+/STsq/u55zCNxk3Ket3LvH+z3UOcOe8n7X Bsp6rZ6cVMwRcJ0y17EfxVbmh63sZ/AwxPmXuZfzhp+t55nDfIP2Qj2/a7vR +5wf2eaYB4/PeX4KY5/zZmfVMy3n3EwzDflmWeZgy2SsEb7oNd+8cU2dfEvz cj2/p+FZ7ZV6Pqtd6zW/A/Ac96rxnFHxXD3PqJgZ4TP15DN6xTSk50wU0jD/ cK7F8/8v3/PeLzuns79qc45gr7Kw/cNaP69Yfc/9KmsMe1fOXSE98wnrJOvl iFr6boI+hWsJDHxUyn3i5HruFeGemCxO8DG+Yw3iG3Dwz7ft/O+G8biDcz7c uj+L1Un6/bR62s96xLdezDXMM4t6zX7vfcc89v8MLhx3+P2Hep4//VaEb1sO Nn9XT46o07zPuGFO+Kie/w/7KsKvQ3rWkpcWHQ5a/oP2sWnBxFuWSX6uOWeU 8/PfrOcZ+vznkjKZD9+J8N16ztvMEe94/YbpWYvJg865+4ypr7SBM89IzzmC jJE3TM/vSF/WE0fjtBl7J8UzyrMh39TzG/DP6vkNOP3PNXsJvg///P/Ff+59 9jDsUYe25P9ZPq3nvMX/ofjP1OiWjP/MNB9E3If1XE+x44t6/qZFnk/q+V8q OOSwheca+v3bevJc4bv3XFs/sm//r6k7D/urqO4Aft+EkNzf7wWUJJQCFYso aAmErUBAoMimGNsHAaEqlgICgkIgJAEJkdWyuLAlrArBBMIie4IhgbCGpaUa EDSRpQVZSi1bWAQinc8739/z8sc8c+7cmXPPneWcmXPOzKirl/Jf9K76Bzzm Ts+HnoG9Wp2aTx7t/HrG/k9Dz08S0Gdv/V0Zw+TL3VkvWk8uTLrx3s0Yl8d5 HmTuwStVOTYvcpkssK4g6z/o1nOvnEukz+OT+Bx6Xu0Onpn/WmgjF5anX+BX aNZP9Vv7t1dk7zbYXEW/fib1I+3N9O09U0b+p5NH/3fuFnrI06dSt2OG1TP8 0WEeou7/L2P26RI/060yiKzx7NwRfOTppBu7T2b8/ij55f1h+rO+STY9mz7A rvdht8oydj3P5vnSXFYpXb2t6Fbego99kDp8P/DAOWLJz65zWXC+Ejx/CXxm 8MDhrgGydofyj7M7de2IP3+1W8+U9wy2rpwwpJ4xbz1JLjtHXLp1pvOhrUvx TPMr69LhQ2t8c2BzkGuTZ+Cs8k5dF1wZGP6BM8uTvnJwgn1j4BzzIVWG/Ht4 yYTkd+b5XqEZbTflu/re0uSdFfovTzlnaN6UPPKi9fHMv24N7Fxb63Rn21q/ gH87pK7fb0i6OQzY/MH5nM6fNE+T9/rkd7b/z/LdlVKH6twZ2nOSh37gxuB0 Zu51qbebQw86nUV4W/BvE9h/zEndwjM8/wWHZ3geT3x9cIpvDOxOJHcjzemr 9T0ndf546INj09zT7T5sd4q7b9m9y+7rdue19C8mzX3S7jV313TvnnNx7971 H6SMe53da+euut7dzO6i69197u7q3r3y7lh3j7S78w5o67007qdxv7M7YdwN 07tb5ht517sr3X3Y7ozZP/nc4/utPP9T3qN1u9CCjlmRCWQ3Xxpr7dOG1/U2 2Hpcn70qdUX3Mrsz2E9nZxz1dA30DCsnvzz68KzkuTL1rO+7B96d4e4Bd9+2 O8EH7t/u1vvG3Uffu3u7dxe3uHf39YTU6c7dem+9+Z575acE7xeCG95/CG64 PtPW+7LVtf5Ah2VOIvY82Zn4K9VzVZyp4jwe68QZOftiafitc3t+k/SD8+wM H/oZ+Z3hMz3p8jyU8g/mvI3fB4+zWKwzvZ8bOWJtZH36ZMqKn+gM0vVE8j+Y Z/CS0IOWjwcnvZC8Twb2fklos2Zckvx0WY8l3Z5Vspwc/1Zge5zhXJZvkRn2 3tt3T4ZYA0qzn55+QzmyydrYWst/kjf+e174hjE9KvnpavYPTmWty9BjXWNN S85aWy1L/aNhaeiB3zr0uY/Q8FxwwvffwflcYHmatLu2pnd0ryF9qDuO6A6s yd2bdXZ4Bf2kO/t26avB/XbutpPmHb0lnGcFPiNwD/+ZKTspZScnPiPw5HzL +77wKH3S3Uvu8VrWV+kAo4tO65zOYNo5yYPX4r347dnpz/L8Y7eWAcsLdkcY /dh5geki6Cbof+By/5Pv05udnzzKnp9vyX9h6sodORek7PSkr5K06YFnBF4W ndKMwN65aweOHSI/3AuDlos7g+8vzn9tn2fwxaGZLoWsuTSwtbn/smY8Kjgn JP+lKbtBeCpeMKatd5nilWPbeic1/mutYZ5tjv2x8BS8apXwJjxp9fAd/Ozz 3cq3RpUwMjzMu4/nvfKrhh8pv1rwDTyXstt36xpnnbbKFfLkE+Hv+PffJPbu k22VH3vi04nl+9sS9so7620yjLzqhm+SRWwk5M36bbWdfKrE67XVXjVMXbbV lvZuCe/EDiZ+Ozaot2NTYQ9zqfiHI6q97c8pw34m7S8jqu3tvbxje3s/z2uW cnuEPra1vrbiYgNrSzyirbY0tAxtqw1NPKSttjSxMuxsK7eVbrY05Ya31Wbm nztttaWJ4WV7816ZR0LjihLGFpl/QH+V82un7seHNxjDxi85TY87r63jXDrd yKlJmxta/76ELUOreIu2yl7vbyvhy916ZzDbx+mJrd+tlelNzL2/1K33x9PP Gr94Ql/4ShO+gf8+FZ7GDsQeZA3Vl29u3tZ1tvzW2u71lueGpta195ulvbcK 3eplmxK2bmubmUOYU2hXsTmINty4reNGW4rls14iX/Ut/UVe85T+jJXt0x76 oDnIWqljda4dNm3r+NO3zHs2SLtuHfq0rfnTuLTxuNDaBt+26Yv+CS5rODjQ pM+iBd6B9m7rPIsN+IP0S7ZEY8J4YHftz7gxh7u5hJvaOn/Shre2dX53S96d lDTPX8QHutW+YC5yTQlz2jrncw+x+4pPDL4bSzi0tMshJVzX1jnlL0u4vq1z ODZIdstvJGbf27utdkp2yCOCz13H5nNX5BvmR+5Xdm+zueoNwbtZ6eMH9tfv HpX3vbuXZ6b8Lt1K85TU40Ft5Yn6sjucD0l7uD/5sPSbw/Jum9B0ePrWwSk/ Lv9/RNrz8JTHg9kp2Tn1x2+nDH5mvBlb5n2z8j/mcVeVMLut87nZeTcpdXx1 W+d8VyffFqEX3r1SZ6enjfdJXX499YqO/UILmyp54K5rdmH27b9uK9+iU6R/ ej42dfydfGAPF+PrbOBi/J6dnszQn9jdyQxl/hg+iE+zu/fkBjs3Po7Hs4Xj 7+QAmzp8cLGdkwdkBZu6GN9iRxcbW5uUdv6X/gqzl+Px8LKpww0vOzzccNkr 6V4ctgA+AWhB6zbdShufAO3s/uxL2sE7tt25vUUp+3edeu937y5wfXff1OWZ ae/LUl7ds8Hrx1/Le8/blW+N61Ybj3Zzd3jvfnLxhW3d82Kt8dXh9Z/2Ttuu H1z7pA/JOyP9Tzy9rX30kuAl4y9o6x3lB+a956WZu5q30smqE3sQ3QNO1+ou cHp0ej22ALqOAbvL0Gq/pje0RhZ7pgegEzgt6dbbyrB90JH8IXqSZSlr7f9U dChwst/Ar9yK6EDoNOg32JjpbJ+Jfobuhd1J+pDYr+llzKV9z3fcEcE+xs5n /jY/5dgOpnSrPfS4tsa7Bt4l8LVt1a+yqbMB2ZPdF5gtmG2JzZh+G0zXbT+u /PSxYLabhdlXOSTwWsGj7KP5P/ptdmn6cTYpQXu8nr2Z9mO+mv2aKwdeGBju 7+Vbvjsi+b1/LG0KF1vSiKQPD+ybZ4U2e4rPSl2rT220NG1Pp8dPwlydjpbe lY6Wno8dhK6PzJbHXJR+zXv6Nvnpgulpe/eqej835dg4puUbyr4XmBxnK6T/ 4s98X7fqv/ifSvOOrYduzDN92q5pU/LIfILdd3H6jL6xRdZZP04/oc9jp6HT U06foOPfObD+YB5hPgHPpE71WQH/spQ5tlPnGOJJgScHntrUOQqbDb2v/z45 9YAWNCxNP1fndH3KTQke4bhO/Y45M9swmw96T/gIzcflf/0LHaXv7Z50/3Jd qZ/F/RUX+MES/qup/wAXGtXhh6lf/Xdo+jm7jf6tb+sfziyQzg/CeNhv5XoG Bp8JNpT3ky4PG/SK5HlrWD2fxdks3kvX/5V9L3n4Y7wXPPvlW85GcDaQc6bu HVbX6mBrd34szpvqpb2SPPd0q63JPvg1Qxv7rHM93gzMh4RfgbOGnPvxbmjg b8BfBL3i5YHZ9PmG3TSi+oyBnxtR5cSWgaXJx07PXr91YPb6rVJ2VGTM6Lbm 3zpl+caw3TuHzR4vfi30TOwY9FbWZW+Gng3io/Ju4AEaO9W/xf++HXh5YHng g5cc8eyf1ce+gfcLDxga/qAu1S//H746L4U2/Ikdndxk/7Yv1J5QeO21s8/O PmM2cu/Z1fvDZ/Cc/vAuwT5h/OzUlKWLs79zVOgk98Bs8vhYJ989MjTAyQ4/ Mt8Sr94dpGv14JEHPWz+0kYG557JJ49/WCVl+d6s2h2kcdWk81F5LX2Mn9Lr 6T/OdAKzZTu/6o30GXX4p+SX/lrysxe9nH7LZ+N/A7MDqme2eHlfTVnBOVnG AVpW6w76L6wWOkenfdVhTyadnfH764yHNUKPNl0enG8lfjWwvqh/6tfsTuxK bFlsZPxv2MXwjqn6Q4lP7NT13ci+ylceCm+hh6PX419iPWddRycj30nlefW+ qjuUh66PbyE8bOjeTQ1OvoW+Aae7Co8sYa2myjoyj18EHzG6SDo9dfi19FXr y2kpa+3JD8/6c2pwwi+elu+ekjz0Y2gZn/z4//fDk4/vVPjBpB2fdHomOia6 o61CJ/9Guh86IHMQa+FT8t2jO9U/sucbCd6jqTL5yPRteU9O/p1Tb7tEJ6Y+ yVu0mqtZm5uvgUcFZi8/Ne/EuwXHycFzXmjuS9opwTehU+mbGnq+m3oeFhh/ 4GPC14Stjb6RXnJk+rU+rT8/m/QxgQ9IHjZTttVRGSt48V+F3yg7Om2IJ2pH vO3Q5NF/jcN7M0bAa2RsGZPG1+uB1wj+AZ4+rOpffZeO9J/zXflfzrdGZ/wd GNpeDIwGcok8wycfT3/Tt/kuHdWt/kvdtJ26Mh80R+R7RNaBjUv+XxO71fdr /ZRde0TFf3jy8zfUt19Ifn5j/L3GpOy0ERXnd5L/mylLbvIlO7pbfag+G3g8 HUO3+lqtl/Rjkoe/Fdgenw2SB/xixrzxfn76MB3mCU3tH/qG+uUniu9pVz5P dNFTMx+Slx2br8CA3b+tNmn2XIFNmo2XjVo6m6l+NzH498i3vtTUtuE7iHex e7N/T0878TfFM33ngtCArhmhTazsuclzfuiRftFHcM5IHrScE3rQzx5/btpb uv/o+fDxP+EPQkazKz3QrTYmuo1F3epT4Mywx8NH+bqQ6f+TfD2/RvJa25jT muvemf/jH8K3wbf4B+LJntn6L0jd+vcFoZHvlvpkg1a/2vGF0OEb2pQv0JXB g37xzODUJ2bmW8eED2gHPonmn3S25qKTStitrW1Ff6e9wPy/zbsnJx28U9Lx On2Jnh0/ZCNmh2aP3jz9XL3yV6VXeis8EN/Eh+mOdk89wzcx/HP34MR7D+9U H1Y07xIe/lD4OTx4KZ9ovtH8ns2Rd8+3rB1817pPHn6Q1pf3Be5bqdpX2XSt U/mSs0+zTbMz75t0dsK981/sxWzMPTs5mO318pTt5WF7ZiO+IbD8X0g9b5i6 gpOd8SuhQf6H8y/oZONi6+rZkcAHx1fzm0lfEpisvDE0sxeTQeqNzLo87cKO YO1o7mXeZV5AX2Huas+NvTfmtHOLzD+thFfcI2ydUcLTBb61xKeU8HJTfcXd Y8W3hM8jn3X27qvK+8kl/KGpfib8SayJbrPHi49ESb+5xCeV8GKBbynxyfZQ FPhnJf5uCZcX+Ocl/l4JV1hzlXhaCX+0hmLfLuH5Al9b4u/313nLFSWeUMIT TaULfXQL15S040t4pqRf7g7JEn4b/Ee6r63AV5d4SglPFfj+Ep/vDNKm3jHm fkE+Mw9nLnRCp/rS8Onk+8keeHv+XR3MD3x7yfvDEv7U1PqRh230spJ2RAk/ byru+cH/q5L2b/Z3l/SZJT66hCcL/IsSTyzh9wW+ssTHlPC7As8u8aQSlhV4 VomPLWFpU/HdEdrmlbTT+UqlbtXnYwW+r8TnlfDnpt4fxcd38/ja6X90BfwW 2aKs341VY888xDg3Pq155bHm3zVpuyXdnOX05P9d3vP72i35jGu+IfyD+Cjy FXotz/x3+LGxI/Cj5GfZ87MT85PEf/jqnRiesHO+Zc7D5mEuZCzzQzo6fnHy 4RuXlv8+nH6hlF2txDv21/uN8QM8Ak/oT//Rt92XpB8bd48GVleCd+5ROiiw PL27uOgl+Co+lPpcNfXsvfH9cGB56Iz4JfV4k357U6HrByW8kDZanPzu/3og NCwOjGZ03J/0vsDuCLsnOKU9ne/wg1K36pCv4z3lO+eU8E6B73BWSgmvFfiu Ev+ohLsLfGeJzy5hUYEXJM+dTa0j99vxLeVrtij1xibwQOQmOu4ODQtLubNK uCvfOqOEhQW+u8Q/KeHeAl9U4sNKeLSpvAjfuD10/rSE+wq8qMQ/LuEefT5j Z0FTZfADkSm3p//Pb+r4Mh7vaOre5/u71c+ODur+yGjlFqcsWX93ZKu1Fh2E 9Rf/W+lfT9q9Sd8/z3QUdC73Bad5unn76L46B7irW+cwFxdavlPCfzZ1vSmd DyO8izLH4Av9YIHXbqqsRJt6tW56qDv4HrxW/A99y1gwP1gU+vmXohONvX+m c1uQtni9lJ1R4kP4VhZ4eom/XcIjTeV79oVZe80P38Ov+GA+0l99H68Nj72+ qe/4HeKdN4ZX3xy+PbW/6s0uyRj8dVP5IZ6/pKl8E0/kPzU/feNVsqbE55bw blP7j374RvqnPrA8/VNffTMyhXy5Lf1Ev3orfUz/eTsyyPi6NXKNDJrb1H56 T/rqpeHVv2mq/CL75jWVr5KPvyrwBSU+qISHIzvw1cXhz3jy1aHf+Lo/vNe/ PFDgC0t8aAn/0VS5iZ/PCT/H869qqvwif6+LnCJbr4mMIO9+EdlHrl0ZGUeu zYzsIC9mR3aQKbMi08m7a5tB/Zf9kr25Hb6qH+lP+q1zaZxXM294je1r4mO1 dtJPyx6otQPbK+f8ipeH19gzva5vbNybYwyveOdlz9Q6wUnnsWbwOLPAuRjW U3CBX0q8XtKVdw7L3NC2TnDan25PurUV2uCkfzst36Wjst/4c8kzPrD97NZP 1lTWTdZPGwb2znkK8lpbfSY0fDqwdPEGyY/G9ZOHjsj609rzqOSR7syYT/bq qlPzqys8asPwkI3yL/CLPZvPHx1Yunn2mKTLMyb/1aNvrdD22eS3t+JT+a61 jn0HdJLS0WNP2kupW3nME+2JYtsyhzWXtV6Q5h09k7Sdks7+yh+Ovn2n5F+e tJ2Sbi28Sei0R8Cawfrl2MDWyPYEWGttmrxjkz4xsLL0sVt0B/dQyWtfb0/v 77u9/eTew7lZvoWWnUMPuzFbkfVCz27kP/jw2/dlnkyHSfdKx7hxaNKfp6Vv 61P687rph/xilLXOUpefSH2uG1ge8bqpc34426cOd80zmP5529TzbqlH7+Xd MXlGJ/+o0Lxd2muH4PR+cvKjR7ttl3RzAWPf+kt/uCr11tPdWEfbA8SPlh3Q PiG+bmwu1kgDe2aH1jzsi19O2vikTw+fvLCpNkPv+fyPTz5rH2tc/tZ82uGf n+eezl3b0a+rC/XwRuqFLdt/+Gf/Yo/jdp26HxJ/PriEGU39j33yL2y+23eq 3Ze+0b9cmH1Vnq2nZkQOXtRU33Z+6b19D2L7KejN+L7TP1j77ZE5pzmt+Sff +I8FJ/zmt/zU8dYt9SvjtlP3haCfbd634OQPL/YNermLIi8uiewgry+OPDWX uKyp8wpzp0ub+n30WM+ODJ6Ns9fA3gP7F+xTWZBnPMDadPeM8R17z906lsyL Pm+OWcJmTa0/9XheW23n6pLfr7RxSfeP25pztHW/qTYpVTKAY5vg0V72phZR M6BnpW81n9kodWMf+yb5rj2gaNaO9CT0u9Ya9JzafLPgeSf9wDfHhc6xqXM4 N8r34dwkNHq3aafqOeg76EDGpuzn0lZb5l/IGePc+DVuwfYC4J14qDE+MXx4 /fAnfRiv2Dxp+M+U8B/1+6+pR3W4ab6FzluCkz2U7Bg4H6pTdRt0K/gVXw95 +S6MDb18A/yfNnsv8gL/pxPaMDjIF3rcZ9PHZuY93dH/Axlq3CQ= "]], Polygon3DBox[CompressedData[" 1:eJwtlnfYj2UUx4/f+/v9Xq/3bmkYZVVaNBSR0KAhyshqkBWZrwZlltHSIKUl iYYUoqJB2SO8GjRoUCoUGjR0XV31/Vzn/PG9rs9znvu57/uc+5zz3DW6l7Qd mDGzD6SstDqZrZNGlDNbW2RWT5yV3tC70dJ68QZpb7HZd3q+X/yutFj8nvQA LL0vXiKNFy9K/g7bQ7yTloqXSXeLF0pvi9+R7oWZU7xIukf8VvJ32IaJX5Fm i+dI9/Eu+Vj28CBrJV+bNYaKZ0mvmn8zTryAOc3XvFM8T3rd3MdR4tek+ea2 0byT3hQvkFqLq0prc2b/SGN5hw/mcw5nreR7myuNIXbJv2VMW3F1qXberIvU QlxJ2kjwNd8d4pfx0XzPrcRVpMdzvmYbcbXkazNHX/HT0jMaO1UaKH5Wek48 XbpFPEN6QfyidBssvSSeKd0qfj75O2wl4mnJv50h3QwzxnyOQcyd/B22i8WH S6nArIl0ufgYqYH86SsNYS180thZ0mDWSr42ttvh5O/wuRe+Sk+Kn5JugvFR PEXqLX4i+Tts/fEdn8XTpCvEFbFlPabNxRWS7wXbAPHU5GOJUT/xlOSxY46e 4smsYb6HPqyVfG1ifJH4MGlrxn2+Snyc1DPnZ9RSXDn5WZ6d8/gT3y9k+jzi yXnAn0k3xnrrogYHRbx592mcD+e1xXyOuyIfd4p/jPwkv3aZ28ZEPu42t42K /P5B/H34R3zXm6/ZK+K5wdzWO+Jdam7rG/H5SPxhxIN8gzea94K50g7zntAv zuNj82/6R7w/MbcNiPzcZG4bGPm22dxWEvmF75vj/Ik/a5VG/dIvfhb/JF0p PjZ5rHtGPVLfvNsd/YX+scf8G/oT/eF38W/RL+hH+81t9Kcl0gFz26PiVdSb +KD0sHip9If5mAniZdKf5raJ4uXSX+a2R8QrpL/NbZPEK5PPhY3+SL9kL7+a 91P6JfyLeX+jv8L7on6opy/FW83ri/r5ytw2Mnn/4qx3RL1Tb4zdEvVGf/na /Bv6I/10m/gb8/5LP2Wtveb9ln623XwM/Yl+yljmoD/TrxlLjC8UH8oaGa+R q8U1kve6iVJT8RHJe8Ugqav4TKmS/jU7y5p1FteWxorbSF3Ep3OmZd12vbhW 8nfVpBvEZyT/ljET4nyWay8r4rw4T/412NaKZ0tD9X8bVs7Pi/Nj7Eqpu7iO NFL7aSFdIz6FMynU2UjXik/F30K3NRDnpYpl1Huk88SFyXmEVF+cS16rjDlf XETNiLdLDcVlk4/F1lF8ktRRc9eUrhOfltxX1uwmPiv53ohZD3KfMy/yPfP/ npP83/yvns8Rl5Gq6rm1NCLe82+fR89JHhNiwT+/Qey/ufZSQaorLkj+729l /r8sDZ/oKfXDf8by3DD8m6Pn4VIjcTFnrlzYFvHBX96xBvvLJJ+7inl8yiUf yxyPRf2t4eyiHqmf1ea2SVFfq8xt5B/9eYvWm5nxeqA/7Sn2fzr3F2KA79jW RD58a57j+IaP3AXOTV6/1DO5wRqNxUlqmnGfmogPkQZn3HZB5D9rY2N+7gTc Bcg54s39irNhzbrhP2czRuokPjl5rpEDXSO/d+n8Kxd5ftQkR/SuU6GPJ1/g 8YWer3wPL458JX/hfZFP5C9cPeqJ/ILbRv1RX/C4qD/qEV4Y9UY9wuypW9Qv e2tZ5P4TjyEZ7wGXiY8mR7J+J2gmLp+89mdIl4iPTM6bpUvFRyVnvmknPj55 71gutRefkJwP5L1eqQfWHhX1QP3C86QO4hOTjyVmTeL8mmV8j40jP8tn3NYo 8o/axMb9i/veGv1bJuf8fsF9rVR7m5L1+wD3n+ICzznuQ/S3xgVuaxb+TReX hH/EI6dvN4X/+AszpkOcL7W/P+/x4z5VP+vfcL/iPtMn67amEU/mZs16Ua/k EndW7j/ch9gr37SPeDD3srzfV/h/1pFv/2X9f8p9pkfObdxvuH/iOzbuv9w/ D+Y8JtTL/OT9jZ7A/ZZ+31lz18p7/+f8JuTd1i7Oj7WxcZ/lPsxY5uQ+zP2J vRDj/wHV47v7 "]], Polygon3DBox[{{3200, 3249, 3126, 3076, 180}}]}]}, {}, {}, {}, {}}, {{}, {}, {}, Line3DBox[CompressedData[" 1:eJwNw+c2AmAAANAvKxKyt2RlZe+drQjZK8RvntQ7ufecmyr/Fn8iIYRvI/EQ Fq1wyUqXrXLFP6tdtcY1o65b64Z1bhpzy3q3jbtjg7s2umeTWRPu2+yBLR7a 6pFtHtvuiR2e2umZXebsNm+P5/Z6YZ8F+710wCuTXjto0ZQ3DnnrsHeOeO+o D475aNonx312whcnfXXKN6ctmfHdGT+c9dM5y8775YL/1kka6w== "]], Line3DBox[CompressedData[" 1:eJwNw1VSAlAAAMDnv5fwSh7BMVEBOzGxuzvA7u7uvpO7M5uVE8uOZoQQIuZl hjBhrpPmO2WB0xY6Y5GzRpyz2HlLXLDURaMuGXPZuCnLTFvuihWuWumaVa5b 7YY1blrrlnVuW++ODX6466dffvvuno3++Ou+CQ9s8tBm/zyyxWNbPbHNU9s9 M+m5HV7Y6aVdXtnttT3e2Outfd7Z770DPjjoo0M+OeyzI7446qtjvjnuP9FM Rjs= "]]}}, VertexNormals->CompressedData[" 1:eJx03XdYT+//OHAjkf1WRKWIouyZkZ5okJBVSSKiMjNSVkVDhVJpKi1JZZSm NE577733nhIh6+f6vp73fX4+1+Wv93WdP854jofnfZ/z6j3/pP6B02NGjRqV N3nUqLF//vswSWWh6+8B0HPqvF1y0wLc3BTyW9ZdTmjZcfdecv8AqKwWrZty yQLCPk0e6tQJZQyCuk6rxg3Aq1YblUxlC4h0523YcSyRuX5eK89KbwCeBndV LhSwgIcrOmVbjDKZzzbQ/maoH6Z+Xl+qUWAOEinKLxo3FzJGOi89FI71g7i4 1FCsvjmEmGXUxkqWMnFv5Ob0BvaBnUZ8XtB3M+A9YzxLi6uSuSlcLHastBdu OlYae181g9O7mRuJqTWMj7D9kdtNPdBseEJkaeVdmCGWxHTrNjCfD3+TUijq Bo8fFzcOSdyFG6NWvRl3rYlZ/vb37Gr/Llg+b9+MV2fugHP63uR3C1qYiBOF 4ww0O6HkgWndtpWmcGKulLViQiuTJayle/5HOxybtvnm0fPG8HnzOIEJsu3M 2BGhp+vN22C63SwNc5tbYCKkeE8jtIO5u0jW8PhQC3i2puuH2dyAJ4YbTFK4 upgTnvr2D/Y2w48JwvO59I1g96nPXVUy3cw5/0VPr7k0QrFLoEDI5mtgcWbb iUOaPYxZ1p55Ve518Pad/fDYj1fgjtt0q3HHe5nPx2MvPeuoAkuLjflnnS6B /8pHCvXb+5hXw/BgmUA5vF8kfypp13lQ2rj7Q//4fua0xJqbRuuKwXH7Lf7u vbrQJqS5Xu91P7PjVMzNNbdywXdvf4XtppPQwH2Z23P1AJMl8unz3QupYLVs rhiP+BE46Nm/9ZfLAPMqSeFigNM7OG5re7fLUBm+X9DYLVY9wJx64hBUrecD zzMdHPeOXgfqvFcssr8PMCoenONVWX8dhwXJnPN8wfN845wHxs7jXLcIr7uP c10ww/vMwPus4dwn3MXnisLnauQ8F2RiHOoxDnKcOMB/Wpy4uWDcvDhxA0+M czLG+QYnznAd89KCeTHm5AXOYx55eDh5lOXkEWwx7y8x7/acvMNUrJO5WCcG nDqBEqyr81hX3Zy6AgbrsAHrUIVTh7Ae63Y11q01p27hB9a5D9b5eU6dQyD2 RQf2xZeF/9cXcAf7yAT7aAenjyAZ+84B++6T3v/1HdzGPpXAPrXn9CmMYF// h309kdPXcAsd8EYH9nAcAEN04zW6YchxA1rRGVV0Zg3HGfiHSzIgF/TAr2sA 3pck7NPsCANX9Opq5KKbVZUDEMXc7DhXFwbh6NWj5uMfHwUMgJfppwV+TBj1 6ub+hOqRAwOwW1viqIhdGPWKZ7XIvCv1/VCjeOU5v2IY9Urkm7L6JcV+KDKN eVry4S2Eolfzh+coODr1QXrPLJFQy7fUq/sPNCVdEnvBq020fu6Et6CDXoXd 6Rmnkd8DZtd1hnyuhwIvehX/rT+oIaEbpBxyfHxCQqhXYrX1r7Y97oIwp9fb gne/gcfoVa/HdJm43Z1wNUh1VWnWK+pV183F1QG97bDX6uDxyMUvqVc/xqY2 XTVoA8WHaS5c54LAFL1aW1/NG9LWAsfG5oS6OL6gXl0s0+/7vq0ZGgIVXxz1 fU696pyw8wPvg0bw2C56/4T7M+rV2L4P/jaWdSC+fehw5m1f6tWZvlOr6sqq oPv+EavHHl7Uq++rPTeNnVQOaXavA7XnPqFe9S9VmvxtcTHcf9Y5IdbcmXrF d9jzdaBuLiyshruXSuypV8KvdqQbH0+FnXMjr7aJWlOvDL2mZmSavwPJ3Vvb J00ypl5NvHl8h5umDxh/1J9uqq1NvfqGx12H/joOvXieaDwP8Uodr2uH1yVe 7cX73IH3SbyauIzzXC/xuYhXs9Zw4tCGcSBeWWDcJj7gxO0peiWMcV6HcSZe fca8BGNeiFc3MI89mEfi1TbM+wXMuwN6NZ6LUydqWCfX0KshrCt1rCvi1TDW oSnWIfFqGdZtPNYt8SoN63wb1jnxKgb7wgr7Yhi9csA+8sM+UkSvxLHvsrHv htGrBdinJdinDujVFOzreuxr4pUxOrAXHSBeOaAb3ugG8coAnYlGZ1ajV/9w SWa/9CP9A2EDEPHoUF2+cxL16sGTX9cCfAfghqfWqEcPk6hXNqN1+SP0B8Bu W7l41aUk6tWYMxb1IUIDcNpVzCh7exI8QK++yeeJDAb2wyN/71OPxyRRryIN nZ4O8vWDpYvJbaPQRDpf8WsOjd9zog+UfpUJ5+1OpF4NtI5RT7TrhXH+53aM hDBwCr1KYKZNlfDqgQoHporreQKdr7iHn8hY2HeD/ArurOIb8dQr/05Bxz6d Ljg2fUqJ14o4cEKvcso8ZnqJdsJu368HUzPeU6+4M0597E5th3FPayrjZWOo V+9VhMfLKbfBzTAThwXPo+l8pVBQdGp1SgsYbPvuF9QXSb0qKjj/VlW0GSa1 9h4VFokAJfRKa8+1y7oXG2HgjNBBvc1h1Kvlu65fO3agDgwbnmlayIWCKXol 2tj+bGZQFZRI7B47/sYr6tXDtTvP5reWwSRjd5v/lAKpV2eDF0qa8hTD79Wv a2zH+lOvmgqyfp1fnwu675SKv+7xpl5llxh/WSadCr8rWu06rrpQrwQXPVqr pP4OtC+VXtfnekC94pWY4rVpmw9wxV2YtJPnCvVqlCTn+OT4v46DA56nHc9D 56tSznVlKjnXJV4JFnLuMxDvsxa9uofPJbyG81zEqyCMw1KMgwJ6tQXj9hHj RuYrRYyzJcaZeHUB8/IL80K8qsM8zsE8Eq8OYN7vYt7JfJWGdXIP64TMV9Ox rv7DuupCryqwDlWxDolXb7Bu9bBuiVdTsc6Vsc6JV+nYF43YF8SrYeyjKdhH xKu52Hd7se8+o1cx2KdW2KdkvvqBfW2PfU284kYHdNCBvejVQ3TjEbpBvHqI ztxEZ9aiV/9wSWbjPmnfRvUBCOjsvmz7PAtc0CuT60VLtRUH4Kx6FP90tyy6 HhyaG7L0B/8AaBmd3RKgnwXR6JXp0Ce3hrR+kDS9pHNzaRb1KmPKuWLtg/3g v3yOdEl+JvUqT9x/x+ikPqiw3SHLq5ZJvXousmd4/7Q+0HTPM3iXlkG9Chu3 Ims69ML3ko53GoIZdL7S4rIrmb2/B96IayuEHk6H/9CrAMGIs6cUuiFObla7 mUka3ESvFk18Ijx5XhcsaDcQjLFNpV7lXUpxlG/oAC9DkTX7rFJAC716GGSx 4aRlO0xfd2HD0fPJ8Am9mvp1Qm8ebxvc/Y+nhFsmiXpVY2p3bcrDFgi/91xQ 6DtDvTr04uyHuIEmyPryZPq9w/HUK8kFlnPstjZCxL6vi/5zfU+9cju3YKrt qDqwCdpq8iwmmnq1VLrI5daJKogOzvTcmhJBvdJQ7uCJflEGdYGz9nJHv6Ve zb5w9b1kRRFoBu98fWDla+qVl79Da3hHDvyK7pJsLQmgXuXXvrwSPTYV2vX5 51057kO9Gh1cNu/IzHdQkOEWaRv+mHpVN5/nUAOvDwypRm0a3nOTepUpyjlu cPiv42CI51meyTkP8Yq7jnNdvkuc6xKvKvE+l7/j3Cfxai0+10N8LuKVEcbh M8aBeLUD45aPcSPzVTjG2RvjTLxaj3nJxLzcRq+0MI+1mMft6FUn5j0T807m qzlYJ/exTohXLlhXc7CuyHxVgXX4AutQFb1agXUriXVLvArBOk/GOide6WFf RGBffEavYrCPRpdy+oh49RL77iT2HfGqBPu0BvvUEb3Kxr4OwL7mQa/M0YFl 6ADx6jO6oY1uEK9M0Zlz6Azx6h8uydSKuz8OauwHnpxxnjJ5hdSrXb6djecK +2HjTLEteqmFdL4aSChuTvHuh0n3mIv9QYV0vio0tM5s3dsP0zflT+wzLqTr QQ27Kv8F9X2QITfpqOPWQuqV/4oovi97+mDNBZPqLa0F1Ctp0Ese9uoF5YDo +9liBdSrMRHj06uLesA7U3X+Y4V86lVcelHLzY5uKB9puGi2I4+uBxXClgfl NXaB3IyUVH+JXDpfvcs6dKYjoROk5s6pEe/Ppl7tjXUX+GbWAUKKu50OuWTR +Wp/1rOZysvbYWnvsLfrgkw6X027mhutnNwKL77o/brmmk69uq2ysPvG1hb4 9d8pHfuhVOrVynJ/O+3gJpjZH2/nszGFrgdrDkmVRY9uhI9jozSNziVRr3j4 Az6dta+FXZ/yf3+eydD14Le3fM3qvysh+0J4keLaWOrV04CeTz8OloHz+scm v9dFs+vBNb8Or3QsghrTyIu7RMKpV/MNbgUW3MqBIaXcqwOdr6lXQ1dSpFWi UiDFVHl7ydXn1Kt9vhfspd9Fw5gfDzKVCt2pV29MfPzPvfSG7ZvPZjluvku9 Mr7DOS4j/ddxSMXz3MHzEK+WXOVcd9QdznWJV0fwPlft5twnWQ9OWst5rhF8 LuJVDMYhAuNAvOIN48StE+NG5quFGGddjDPxqgPz8gvzQrySxjyKYh7JfGWN eZ84g5P3R8QrrJO3WCfEKw2sqw1YV8QrNazDRViHZL5KxrrdjnVLvNqLdb4b 65x4lYJ90Yh9QfaveLCPnmMfkf2r7dh3Kth3ZP8qEPtUCvuUrAePY19nYl+T +aoEHfgPHdiNXg2iG1PQDSP0Sul/nCH7V/9wSebgd++RJTv6IVza0Vw8qpR6 JeftPhak+uGTT3TItpel1CsRG9MW6z/57/4U/8rrfilEoVdOFrw5m9/1wblJ 6QXHD5VSr8RXbhV/qdgHhnobJBImlFKvYi6rySnF9YJ1QfxOnsAS6tW5Ke/q Qqf3wraDtl0Bq0uoVxl8Gkb2O3rAZlDXakZQMfXqdVKff/yJbhDdF1ZbO6mY rgcl7oKkpFYXvIF1u15qFFGvfPf1/2iV7YSGZWISUu6F1Ku6L0cXzZnaAcEz lKc/uV9A56vN34TtJie2QbGOQqBrUh6drw4tFHMX1mgFkdjbNTuqcuj+VfBF 3uT0xmZoHj9a/VVJFvXq6aAcz+MDTSAzRd63LSyDzldDwpsDdp9qgMvrD2St vJFGvVp6LOXYhTG1IB7XJ9K2OIV6dUAqYza/eSWcWysefTk1kXol8qQ85EtX KXjZpARFesbBLvSKkfQVqdxUBFv7pJ9cdIymXiUdlf1v1VA2qO/UcNDQD4NG 9EousGnD4UMpYP9VpC/jcjD1KmSCWOXB7dGw/Zzi8anF3tQr9zsJYr+meAMj O2HRIhlL6tUJM87xL3J/HQcRHs55avA8xKtbeN1avC7x6ivepwneJ/GqGp9L G5+LeLUR45CEcSBence43ca4kflKDuO8HuNMvJoowsmLGeaFrAeDMI97MI/E q0jM+wfMO5mvjmGdLMM6IftXclhXDVhXxKsOrMNorEPiVRDWbRvWLfFqFdZ5 BNY58Soc+2IR9gVZD+ZhH9lhHxGvLmPfyWPfEa/isU8fYJ+S+WoJ9vUN7Gvi lRs6cAEdIPPVfHSjB90g8xVx5jM6Q+arf7gkYybQqzDBrg/mb6pZr2dTSb3K 0hB6e9ukD0omCe+/c7uSeqXKL7S3W7kPysIq15erVFKvll/JEDQb0weXgi85 Oc6spOvBplmDVs4uvSAioMb1LbaCejVKNkbAZXIv3FnSk6GrWEG9cjcX+c13 ugd2Dxw4pZZQTr2yStl9NtmnG46IhC84IlhO3w8271vffD6xC44KKd0SPFFG vZpZefTUqLRO2DiRX+24fSn16nzDgwuWIR0gkBmpNDq4hL4fzO3yahG52w7B j8+FDL0ppvPVqg+XmqdsboOjKms9ZHyK6Hz1a/3GCwH1LaCePFj6y6SQzlc6 lpHjDl9ohljJ8B1ZbvnUq8OHnkq+6GyECWMS5p3mzYVd6JUiX4exun89aC8q nH/9Uhb1Sv1IVvRitRpwGtRVzAxLp+tBx/96567rq4Ai45I4qboU6tVgZ/zk WWdLQfZLKJP0MZF6NenEhyPGRYUwvpVLdKA3lnplsOBrr87ebJD4LntypDyS zlfHVZJLxOuT4dKTHuXZh0KoVwMGylKCEVGQf3f85B1VftSrbycexQjs84Lr thcXWUnaUK8itDnHO+3+Og7HrnHOI2nGOQ/xyhmvm4nXJV4F432q4X2S9aAY PtcqfC7i1cQuThwOYxyIV68wbu0YNzJfXcE4B2KciVfamJfrmBcyX53CPApi HolXVzDv+Zh3sn81QYpTJyexTsh8tQnr6hTWFfGqDOswFOuQeHUN63Ye1i3x SgjrHLDOiVfd2Bfa2BdkvrLDPtLCPtqJXnlj3+3DviPrwXHYpxbYp2T/qhX7 WhT7mqwHV6EDV9EBst9+GN2oRDeuoVfZ6EwpOkPmq3+4JCP2ftyv35G94Ga5 TZhLtpbutxcsWcHTHtALXwuF/MXX1lKvXu8y+C/wRi9o3cqsfTq+ln0/2Or8 5tryXsioOOvrFl9D56vmGau+P03rAe2IkoJTqjXUq7Bz1tseQQ9My3f8erG4 Gt6gVydiTKzKPbuhZ3lK77bV1TADvbqzc8uIcH0XfPEYu/SeYRX1alLV/E2r /tSFW8i6NaN9KqlXhT5vrT5O64Q3/AmvnEIqqFfbtPWLtcd0gLbZPPMtAeXU q7P7HIN9attg59CH8hmWZdSrQ79jZtV7t4L3ydVVcntKqVevlav2ntnTAn42 ag8ER5VQr7qXvNEMaG8Ct1vrdT57FYEHevW8e33w1AuN8GbckS75JYV0vkrw PlZ2LLUOHhw+s3jxnjzqVe2zC+P2PaqGrCQf58GF2XS+eqEd4rlPpgLUt6op b2pKZ9eDi69F15WWgFbn9BuXLVPoevD9uCxJO9VCSLAfby0yM5F65fAj8tZc uyyYMHKBP21RDPVq36ZQN+lDyfCp6hhTOjGMepUg/1F10dQoOGkQL1kS+Zx6 9frKsVqrK0/hvsqjQbcfD6lXmgac42vV/joOkgqc8+TieYhX5nhd8WrOdYlX GXif0nifxKtSfK4KfC7iVTTG4SbGgXiViHG7inEj89UnjHMTxpl4VYF58ce8 kPkqFPMYg3kkXn3CvPth3olXUVgnL7FOiFeaWFeBWFfEqytYh/uwDolXili3 57BuiVcVWOfRWOfEqxnYFz7YF2S+ssI++oF9RLzSxb77gH1HvIrGPuXFPiVe tWNf62Jf0/eD6EAOOkDmqxB04yS6QearInTmGzpD5qt/uCSz4tqcD5+YHrD0 WHd5ZkMD9arl7YbTR9/2gKfyxd79+Q3Uq7N9cxb4WfYAj/xPrjmeDdQra3gm 8Um6B86ZFz3y3tlAvVKJe9jnVdENwisjj24pradeGSZ/HD9FtRsWJPRVnYd6 Ol9FfV6dnv6uC96KX36cfb+OzlfRtTZPLo/qgmsBUnZ80bXUK7kv4y8WLOuE HdJqdyTSaqhXy7WdS+O3dYDTytj28VHV1Kubz6sXrNvSDjoCF7/l3q+i68GT OWMv7pjfBq2j7E3D5SrZ94Phl06IDLSA4Ka1FjPayul68Fj63am/X/z591TT vE/jQhkYo1czQnKcZPY0gWq35xeBhhJwR6/+K116xTmxAWoGi5w+bi6mXl2e qZijkFYLxiv6IzwsC6lX69+8Whrxsgq2ySZ0p9/Ko15NlHx2ap5ROWRKbb9+ IC+LevX7eWlQt2QJ7F7ZZBIzNp3OV/z7zwrPci6A2Y7+X7+IJlOvbH65x84N z4Tsb+rX5Y7FUa+cMk+ESkQngXbTylNJhyOoVzufaL0R2x8JGT+Xlb2+FUi9 ijkrLrHM0BNUb8bOXHHYnnqlfp5zXO7WX8chBM8j84tzHuJVBl73KV53P3oV i/c5boRzn8Srnfhca/G5iFf8AZw46GEciFeiGLcWjBvxajfGWQPjTLyyxrw8 wLyQ+Uoc89iBeST77XMx7ycx72T/Sg/rpBrrhHg1DetKHOuKeHUO67AP65B4 dRfrVh/rlni1HuvcA+uceLUL+0IZ+4J4lYB9ZIx9RNaDsdh3Udh3ZD14E/t0 MfYp8Uod+1oU+5rMVw/QgYvoANm/Oo9uTEI3yHz1v86Q+eofLsncr+9X6nz1 J95B0xf2vGqi60Fj1/fnG726Yc5qORHvZ03UK11NJecKg25oGfuzOtWqiXol a+n689vybkhTH3l2Q72JejUkY7XQIe+PP8Ebl/XPbqJe6fD6m43d3wXP2mOP 6qQ3Uq8+qe0RLo3phNfKs7k2nmykXvn+aB7tN6ETshfsm+hd1UD3rwzDjZwW yXTAzyMq6bvy6qlXTpfel23UaAdpv5C7j3zqqFf6Nm3GGVptUPw83zXoUC31 6tVi7zGVyq0g3a+6bLi7mnp1cnvJ3fsSLRAhXJU4eKqKzlcHnIMf8w00wfft dk/Wp1bQ+crxai1Xkm8j2EonCN2aWE7Xgw1V2p9rLetBU8Vl+NHGUrrfPq5q H5dQYA3U8atsPnawmHr11U+fX/Z1JfgH5B1vUy+kXrkWBQYbuJWBiCuz9YpX LvVqT1yIdf/5YjhmuO7Zr7OZ1KtZL9amTj6aD/FDrzfXzE2lXtVfDnbZnZAB SuremUJGDN2/UndU3OU4PgnSc9UNzjhEUa/ar3Xl1RhHQLvOpimDi15Sr5wm 39SdcdQDRJ8a8f6Y50i9WjCVc1zS66/jsMuQc55zupzzEK9s8LrceZzrkvlq 2hXOfdrifRKvFPC56vC5iFenMA7GGAfy/dUbjJs0xo14NfUZJ85hGGfi1VzM Sx/mhcxXQ5jHs5hHMl89xbx7YN7J/tVRrJMJspw6IV6dxbpKwLrqQa8isA53 YB0Sr4ywbmuwbolXHljn8ljnxKvb2BfcGpy+IF4FYB8VYx+R+WoE+y4U+47M V2ewTwOwT4lXX7Cvw7GvyXwljw5koANkPXgG3WhFN8h89b/OEK/+4ZKMXguf 4zfjLriyZ1xGkVoL9WqOyiQeh0tdcH2qi9TzP/Ms+Z7B4cOhh6d3dsHz+HKQ XNFCvdIpYDR9x3WBwvCyD3d+NIMtelVu7BBzP7ATtMWyH9dHNlOvztzwf2i+ qhPm3nC4bqvRTL3iyz41hce3A657f/Hp7WuiXnnwzt4Q/qUdHOwmaelfaKLz lXjI9+Vr17dD1w3xRs/qRuqVzc9GEzXNNtB/HOs0bX0j9cphxhTF0RdboV4t bkXXqAbqVek36YPLzrRA+OYDnTOv1VGvKifk/OpTboZronbR8tk11KtNtZMW n1vQBHJj659sHFNNvTooJ1aflPXn34Myw31FwpXUq1NrdpZLL6mDqXxBx3hE y+l85b3+vNOEi9WwbE//j69TSqlXS77WxnI7VwDvnebGgtYiun/lLK68Yv2z UtCbM9T8Yn8B9erNFLHuEI8i2Lz2XVr8u2zqVWOaye0dY/NgWWbDzeg/8wbx aqv7o6Gg0HS44LLrubVUEp2vRhq/fFimkAirmVrrm2HvqFfKnir24s7hsKyl xKko+jX16qVCjtExsSdw4rv5cFn5Y+qVxE7OcfMffx2HN3ieBDwP8WpxE+e6 1/G6xKvzeJ/2eJ9kv31yOue59uJzEa9SMQ6aGAcyX73EuN3HuJH9q60Y5wUY Z+JVBOZlC+aFzFeGmEchzCPxShfzHoB5J17JYp0cwDohXjViXd3FuiLzVS3W YSLWIfHKHeu2E+uWeGWPdX4N65x4tRT7oh/7gnzP4It95Ix9RL5nmI19dwv7 jsxXF7BP52Gfkv32auxrHexrMl+dQQd2ogNkPfgY3XiBbhCvBNCZG+gMWQ/+ wyWZ2z+O6p1e2wm24zp17vS3Uq98DPQ3Bi/qhInL9w8Yt7TS+epwqjnfvdGd oPjo8Dyz5Fa63x60jm/O/OQOyBG0fhXyoJV6NfOY+pf4Mx0wR+0+bIVWkESv PCpFg2O+/nHG3nSbRV0L9Wr47fiZD/TbYXCLnlmzTgv1KuecilVyftsf93/m VdQ00/lKddG2hTz8bXB2zBm9Yelm6tWToJGV8xT/zNGL9Qza7jfR76+qTh1V bDzdAp9lb8hq/fn3gnhlrjv19oaLzXC09un8c40N1KvE1knKy7SbILXstbLt jHrqVX/T49cV8o3Q8flq/2SxWvp+kHm5627G8nrYE+YhOjinmnrFs+qWjkhY DQycm7xea6iCzlfj3XdlHJpdBUot41WehpdRrxrD1bgXnioHY+H2pdyaJXS+ OjrbWum0Wwlovx64OP1jIfVKLnLiPZ53hWA1p+uqXXcu3b/K5XocuPxhDlR8 Da22L86gXq2cyh+s/CANkp9nF5r7JlOvDF/ddbLtSIC1OqIt72PeU68KRk1Z +801DPxS8nr38YVSr5QnrBJRLXGDaWJiM4aMnKlXsTyc44rifx2HxaM55/mA 5yFeFeB1TfG6ZD14DO+zC++TzFdf8bl+4nMRrw5jHF5iHMh8dQnjZoBxI/PV Z4yzHcaZeCWEedHEvJD5ShDz+AvzSLwqwrwfw7wTrz5jnXzGOiFeZWJdFWNd Ea/uYx3qYR0Srxqxbr9j3RKvfLHO72GdE6+OYl/oY1+Q/fZC7KMR7CPi1Qj2 3TD2HZmvvLFP+7BPiVezsa8FsK/JfPUKHchDB4hXR9CNXegG8cr3f5wh89U/ XJIR3duw16KoHf4bNOvZ8+d+iVdlmTmZ5mntwD+nYspd7XbqVaJ5U5Wdbzv0 Zic0iW9tp17NvKaqknO6HYK8/FxPjWunXs2Z4Tvn+ox2KOU/8dsovI3OV41u Kvm9L9pA1WXnjuhdbfT3OJ0PP1i5i7fB2vCLvvY5rex8pTOwn/vRHx91Uwts 1rdSry4Yh3sXN7WA8wctV3jYQr+/WhKT5h8h0gLzrrgKns5rpl6NNlnifF3x j2tVFvNTRpqoV2+vuuT/Pt4EQutqpaVmNsFJ9OrJ/P09cKoR0mMK2sPmNtL9 q0jrFFPzN/UQtZp/1DXJejpfhe9pt95qUAsqLR7Gmd9qqFciIvvLpwpVw55a I743L6vo+8GxOUuyTgdWgOQvZWvH7RXsenBI+UWVYBmo/xAe9zuxlHoV6h3R OvtGMby5utfARaKYelVR6eVXbFkA209evyD2K596NUs0/eiur1kQOWWZrbl1 FvVquZL70UvKqXBqcJH1uK8p1KsQ2Qary6LxICBgnjjpeRz1qm1W2dGjVm/B S4XR6t78lnr16Wtf+BFdVxgMTNLxHuNKvVIa4RyXDf7rOGzi55xnEM9DvBot x7nuebwu8UoN7/Mh3ieZrwCfqw6fi3j1A+Ogg3GQR69SMW7JGDfi1aRPnDif xzgTr/gxL1swL2S+Wol51MQ8yqFXaZh3Xcw78SoV6yQd64R45Yt1lYd1Rbx6 h3UoinVIvhedgHUrgHVLv2fAOhfDOideXcW+8MC+IF75YB/FYh+R9WAf9t0G 7DviVRv2qTr2Kfn+ShD7ugL7mng1Cx14iQ6Q9WASujGAbpD9q3J0ZjY6Q+ar f7gkcyekSSpL9Y/DGw4IBlZ20P32rzWK7Y+U2kC4d82yubkd1Kvx8tNTBiTa IOlZu6tNQAf1SnXAc9nkj63wZElxM59eB92/EpzS90HEvxVc484njfqvg3pV 8jVmnPHWVgh7Mjc/8M9zkPnq9EIZ6YcZLTBnY6OEmUA78KFXH8M+5uVu/LP+ 3D5ltODtNroeFH0fU1Hi2gwfF+Z8npPRSr9v5/48Ol6puQneXk65tOVHC/Vq XY+1wdCcJnAwKas8ItRCvVIVuM48hUbY9MUtTHNxM52vHnZpuWoF1oPcfc9A hflNdL5aWX/EQv5tLZzcf9pYckIjna/G2n23+O5RDWNGnAtPxNVRr9oWZ7qF n62ELdPS48QVa+h81f3ZalWcSDksO27hIBVTSb1SSF+YbhJfAn0r6g8oTCun XrnUCSsaKxTBD6V2rXl7S+AZenVPynSi9808mJk71fLl9ULq1Ro3v/StipkQ 7RqUk7Ygh3qldeialOqvZMgobst4sTGN7l/BgQyNJplYWLzH0+HclQTqVUnm qt/nT4XCfypvJe/sD6Ne3eoSeNXZ7Ay7p3ifkbnmRr2K6+YcD5v613FYkMU5 z1k8D/HKFq9rgtclXt3D+xzE+yReqeNzNeNz0d/jYBwWYxyIV8EYt/92c+JG vFLDOI9ayYkz8eoH5mUr5oXMV58xj8qYRzJf8WLe+TDvxKstWCdnsU7I91ce WFdKWFfEq6NYh9uwDsl8JY1164Z1a4NeTcY6f4d1TrxajH3xFfuCePUF++g9 9hGZr/Sw70Sw74hX5dinUdinxCsR7Osn2NfEq8PowFN0gMxXPOhGMrpBvhf9 X2fIfPUPl2Q2/J7DlZjWAg23h2CmRBedr5as1/FTj22BjGehmlWCXdSrM/mx l1Z5tkDEsGLAmk+ddP8qzSh2nZ5eC3S0l+bvCeukXk2LMji3dl4LCF0Ik7ig 2km98l7Nz92c0gwNj/00PzZ2sN9fbZ28sPhgM+QIzR6lfqCDfs8g55v74mZh EzxaJ8Ur9bKdzlf3R9fHnt7UBOt+j9eT7m2j68Ek/5vbVjk2wsZOs7ZVs9ro /pWt3NdDQm8bQOTMxsivEq3Uq+xKfRNToXr4fu2Gqs3iFupVcoOo3zq9Wphb 2Or2cUYzna+W5K2J5HGpBt91j0wPdzfS+WpjwgGh9heVwC/tJdh+vIF6tbmi 7kWxdzk4HJjwa052Ld2/CvacevmjaSkkT1cv45pVTb2Ssrj65O6uYiiIu/jK RKGC7l+pLuEdLh5dCC88JM/fPlZK56vol6cWeez749HUtczkE0V0/0qn5enV 0jvpcOyZQmSQXy716rPloOsJ9yT41tyjKXA6nXrFXznNslwmBnRE7Xl+TEuk Xlle4bsQpfUGVNY9WPDhYDj1qnvKl2kuO5xgwiSBiN357tSrmdM4x80n/3Uc Zl/lnCccz0O8OobXdcbrEq9m3+Pcp3gL5z6JV9b4XDb4XMSraozDCMaB7F/p YtziMW7Eq50Y5xaMM/HqPealAvNCvFLEPD7HPJL3gzsx70sw7+R7BimskyCs k6voVQHWlRjWFf09DtbhWENOHdL9K6zbRVi3ZL5KxzrfinVOvLLDvtiMfUH2 2xWxjx5jHxGvnmLfFWLfEa/8sE9bsE/Jfvt/2Nci2Ndk/yodHehCB4hXZ9GN KHSDrAf/1xni1T9ckrnyX1PrpHnNMDxpOHTd8W7q1caPP/abz2qGqwElIar7 u+l+e9PG1c+GvjVBZKjDjsxF3dQro0T+1pvZTaCfemRFVHMX9WpDax2XkvWf dVcy1/QzZl2wGL1qnp3+PGhNE6w395VSGN9Fv79ytWzNG8hthNDtfcsLLndS r+YlXLe1OdQI0DFxle+f9THx6sOGO7N7nBsAjObeMxhpp/MV43Nlgs2Jenid cD5J8M+/F8SrUx7ZB1ZNqYOq/5pazETbqFcLzJV+KT6pgXFrGe03fK3UKw3B Kin1idWg8TBI4P1gM52vvqRxvRt7vBLutXILVr5vol7xJlyfMOlJOYzLn3BR +XIj9SqsZ8ZLpfhSEEjbafR5aT31KiLDZ2FsdjEY2ObH2qrVUK/G+Cj1nU4t hNQ5+5NPnq6kXsVeTnSoPpwHsy8daLNVL6Ne6WmenzFxYhacWuNsIitVTL2a 8XPhzWafVJjIozDde2w+9cpvR7fHeNFESAv7sHPhjQzqlXH23i16C6PB1fSL 6Ncy1itJZYepxZUv4ebWoUVLt0dQr1xCjYumuzrC2j2ubicme1CvAt5yjjN7 /zoO4XieOjwP8SoRr5uJ1yVepeB9DuN9kv2rVfhcG/G5iFf3MA63MQ5k/6oa 47YC40b22//DOFdhnIlXqZiX+5gX4hWDeVyCeSReiWLep2PeiVdj0zl18gjr hKwHdbGutLGuiFfLsQ6nYB0Sr/SxbhuxbolXWVjnEVjnxKtv2Bfy2BfEKzHs I3nsI+KVB/ZdJPYd2W9vxT7dhH1K5qvN2Neu2NfEqxvowBV0gKwHm9GNaHSD eEWcuYbOEK/+4ZKMTiJ3wGndRvAW15dNu9FD14MaClxVqcca4VDEmmf7z/XQ +WrMp0KrHrlGcLUUGxm3tYd65T3s0PJpTiOYWRSXTPvaTb0Km5EjLRT3J24m ji3vH3fT+UpKLcSoV7QBiupaIy7xdlOvqgpWPv2uVw+h8mek3xl10f2riLwr O6Y8qgMo61Bcl9RJ14NWA67R3C61YHj5V82LDx3Uq77Hrq19JjXAf3ixag93 B/XqxbFg3c5d1SBh8Mn9M1c79WpylP6OTd//rNc2a3KV97TS3+PsFfnvmZxD BWxYemBfRFwL9Wr+5GwZi6nlMGmz9/GC6810Pbi44cjQI4NSED9/o+fWnzmf ePXLfPIY/rRiSBu9QFrhUgP1iqeUW7lhdBHEmSstM7tdS726OOHNeCv1fDgi Lh+efraKrgcPZ27YcPJRNkgM9h7dK1NOvZqoVxS3O+jPHNXoV6U/wnoVdaD3 ntbLZAjr0e5dK19AvXqi4C3luyYeFnQH/PY3yKT7V6unnD6YNRgBOa/Wimrc T6JeXTI0FypeEwS7B16t3iwYSb3aMurnxLkl9hBw0dJj5XJP6tWa0Zzj2y/9 dRx68DxheB7i1QW87k+8Lnk/WI73qYL3SearEnyuZnwu4tUijIMhxoHMVwYY t20YNzJf2WCcr2Cc6f4V5qUE80L2ryZacPJYiXnchl6txbyvxLyT9eAyrJOZ WCfEK3Wsq21YV8QrfqxDBaxD4lUo1u0KrFvi1Wes83lY53S+wr4wwb4g7wdj sY8UsI+IV/XYd1HYd2S+2ox9WoZ9SryKxr7eiX1NvPJBB+6hA2S+GotuuKMb xKv/dYZ49Q+XZKJlRZPXbK6DNNFiT0+jXjpfzRO7HV+ypA7UCp5ef6bXS+cr nZezG1N+1oJL++bCjM29dP/qo/Q9r7V/1umFq8eUbhjsoV4tFT1hZqhQCzqh QR/lbHrY/Xb/J2Xf4mvgun3uPXWuHroe/GmuvnTv7Bp4MaVOe4x2N/VK7ddA 3nzValg8a6ps1/Mu6tVjtXs/t16vgrlWmdPL8jrpenBu+KYFzqaVEJGtJxhU w3oVqexWvuBCBUz5Pm/hqULWq1kX9XKmbC+HtXzfD4i8bqPz1Z5jv3xtf5dC scjMaVOuttL1oPIKGc/hgBLQvL03zuhP3ZD5KmDp+w3hG4vh9/6Y44kM61WI 67FI2ZhCCC/eslRTsZF6NcHsxvD1vfnwqaZnMMS8jnr1/eKWbuuJOTBvPiPv rlJNvfJZpPBcPDgDltusjs6fVEG9up125mrDylSwHGzKSwsqoV7dv/2w8Ihf IijbbXGcsqaQemVRMmP+a673UFOk6uWsmkW9CriwtkE+KAwMP9rc0FuazL4f 5L+35aZBABicaNXaVM96NcZw/B7x77YgLNqef3/1U+rVOyPO8awFfx0Hmdmc 8zTgeYhXdXjdl3hdMl+9w/ucVsy5T+KVPz6XHj4X8coF4+CFcSBexWDcdmLc yHzFp8+J8waMM/FqPuZlSi0nL2S+eo95jMc8kvnqLead5wAn72S+OoJ1oot1 QrxSw7qqxboiXolgHW7BOiRexWPdzsS6tUKvFmKdx2GdE6/csS8WYF+Q+eoY 9tEK7CPi1RgLTt+9xL4j81U79qkx9inxaiX29Vnsa7J/9RkdKEEH6PdX6IYb ukG8mo/OHEZniFf/cEnm8k97qak2VXBgQ7BumFof9Sp3sVm1960qGHi+VEd2 Zx+dr1zGNnScPFgF+wYn+nEL9FGvgktLwu9Or4JPptOYpXm91KvRz5e5bw+v hLmRh525T/ZSrxgftZDx0pVQcXNPLVdVD30/eLtLUnvvywqYZj8xInp1D/Xq ic7Pj29GV0C8WtqUfP1u6lXJ8Zv5NVAO5QEpQ3wOXdSrlxp91T46ZSAjEfzW 0LWTevU+OtWz2bAU9shx1X8z76BeSTxdtuPp5RIwiZ+gkKjWTt8PCq1JD2tR K4bC9/Fx4/ja6HzlImYsXS9ZBNyFcfnC71vofOW/96ng44oCqHL9pGGk1Ey9 ss3c490tlQeJEY2zHbIa6X57qp+9o+WNbDiX5Tw49nw99WrY9UCVgncG7Plq Oq5tYQ1dD3775P1s+atUWMz9SWxDEuvVNOv78mrPksDCWHKmnVwp3W8fGyzS 0TItHoTEBusdwliv5orV5d17HwXC3EHfeISzqVdTbTuqt+4JBSPXk2mGsaxX QfHXfIOePoP9TaoNmvejqFftGosaY1feh0gYmqo124t6pa3JOX5u21/HgSeB cx4Gz0O8ksHrvsHrEq+U8D5V8D7pehCfSwqfi3i1EOPwFONA1oPTP3Pith3j RuaryW6cOOtgnIlXVZgXc8wLma98MI85mEey3x6DeW/HvBOvvLBOpmGdEK8W Yl1VYV0Rr1ZhHVphHZL3g8lYtypYt2S+CsM6l8c6J15VYV/UYV+w7wc5fZSK fUTeD97FvuPDviNepWCf1mCfku8ZuLCv52Nf0+8Z0IGv6ACZr9zQjf3oBvEq H535gM4Qr/7hkkyu+9RAqbgy0JYf0hOa00+9Ehzw/pEZ+qffDae92sHTT70q VZzGZWNXBvaK1fOqq/roenDsxM40D5UymLsu9uW4B33Uq6y4pwu3cJfBnaaI jXPn9lGvrgnaeiX6lEK4sMQZJ/teOl89nL1o2F6sFJw9N0z/3cZ6JaLll7TC uQRuqcv4ThfuoftXnvpBzWs/FMMYrYkXPTZ20+8Zbrxyat8jVQxaen7ZjzZ2 0feDPg8rlbecK4KDgpenfxfupF7xNehmVT0sBP3uPjPunnb2986dyTYCmwog zK5j1rAX69VMnb4JgRvz4Kzo+7mLpFvpfGU4WmiBkUAO7FGpKJua2kx/P2iy +dL2lPpMuLJrQfOGDU10vrpjKV/QZp0O2QfvHXywtoF6NXu3TfRBwVR4clFc rqiC9apLQ6TqiVsSCBuI8uRpVlKvRqRm+idwJ4DJmk1t4tmldL56dkrjytu4 d8B3hGeG37wi6tVEWxFLr8PhYDvL3HlVNuvVnIeeO7UTX0JI3AnjD+tTqFfR x76MOhzmA3vstJhB4WjqVbP2JonBXffANM5JOLGe9Wrxac5x2YS/jgPPcc55 GDwP8UoHr9uG1yXrwTV4n2l4n8SrbHyuFfhcxKv5GzhxcMc4kPnqB8ZtA8aN zFeSGOdwjDPx6jHmpQXzQuYrO8yjMeaReGWBeT+MeSfrwQVYJwZYJ+T9IGBd xWFdEa8EsA6vYx2S+SoA6/Yo1i2Zr0ywzvWwzolXPtgXE7EvyHwlin10B/uI zFf22Hce2HdkPXgd+/Qd9inxKhf72gL7mqwHx6ED89ABMl9VoBuP0Q3iFXEG 0Bny90X/4ZJMyOiwz4GVRaDnN2AwPZb1ymHS9AH5giLoFGiwbg9mvdKWM4sX Dy+CTLXyrBs3++l8NTh617CeRRGMWxO++KdEP/3+Kj23M3WLbBFoG7zZlxbD eqVbrhPdNVAItlq79u6U7KPz1dzp6wxT7xfCt58LeOfe7qVe6TDDuhv4CuHH W4mKkRDWq5mii8wt5hRABNSrvUvvpvtXm0qmcTd15YFi15XhXUlddL6a1jmS nPYkF3RVAyLTfDrp75354LHM42U5sDXbaPZhnQ7qVanjuOdZz7Jg96/65t28 7dSrVpn6deN/Z8DjO5XxE4Ja6Xyl4SZrz70tHWyerk2cINFC56sqWbUmz3Op sMYyvK7RifVqnnrgcPSdZNDKWHzboJb1aqlV/PqjZomg2Pbqu9+FWvbvyRwO HyvfFgeXf3FFdjWyXvG9Pj9y7sU72FxU5Ma1qYzOV73uk12eKUdA6cYXIjm3 Wa9+ZLmnj6SGQBDPJ5PDR3KoVwelSou2ZwXA5doQ+0NerFduzhHcYuc8wP7m 9PAjHqxX3zKjRar2mIHROhO/Ggtv6hV3Nue4gtRfx0HIhXOe0bc45yFeOeF1 g/C6ZL6SyebcZzPeJ/17yE84z9WPz0W8Wo1xUME4kPnqMsbtIcaNeCWNcdbG OBOvVmJebmFeiFedmEfAPBKvzmDeXTDvxKsBrJOnWCdkvmrAulLDuqLrQazD XViHxKs5WLf6WLdkvpLDOj+IdU68EsG+iMW+IF6dwz7iCuP0EfFqPvbdb+w7 +nsc7NPH2KdkPZiJfa2LfU3mqyF0gAcdIF6dQjey0Q3ilSM604XOkO+v/uGS jMD3aRZtqTnwWuDW9jbpAbrf7m41UWtXVA541N6dbLR0gO5ftfJtUrG+nwPu Ai+it3xnvVo4HHEub1sO1Gf+nnQhqJ/OV3NOF4jp1GbDDpmbAhpS/dSriabe K+KPZEOJ0aFm0+d9dL5SVEzvPxKfBZ3RjcUGn1iv0jKHPrZyZUG60lzJTwt7 qVez5sbvmLs6Ew5sz1pZKdVD14P+ZbcCm+QzwG5Z6iGB5d3UqzfSU1wl/9TV fuNg0eIJXXS+cvyiozpRLA2m3kgWWZvFetXxgzf75ccUUF+jb2l/qZ3uXy09 kbV5/8tkWNJk0rB/VBudrw7Fak44uC8Jlr7ItPt+g/VK/tG0c9LpDOyZ/nLV 4gbWq1ExyS2ns+PgWg3/J6tVjdQrZTnL0QqhMWAzucMhvo316tvJLYvm3YqC jsA9c8ftqqJeXdSRFju0PBzu9b7aFvaY9epE22z1yCchwHPfIexVOuuVnLDY PvPoQHD4tntCZx7rleHkmF/73vtC5sOW3vWDrFdmPOJCg4ecYYW/Scis36xX H0Z9Xypz6zbkZg7fHjPOh3plP4ZzPCrrr+PQjefxx/MQrwLxuqNtOdclXhnh fWbhfRKv7PG5FuJz0feDGAdfjAPxapo2J26jgzhxI+tBHYzzM4wz3W/HvJhh XohXRzCP6phH4tVxzPsGzDv5vfN6rJN1WCfEqw9YV9pYV8SrJ1iH/FiHxKsI rNsjWLfEq5dY565Y58QrIeyLI9gXZD2Yg32Uh31EvNqDfdePfUfWg1OxTyux T8l8JYx9vRv7mni1CB1oQgeIV8SNJ+gG8Yo444nOkPXgP1ySeZUWePRKbAp8 WPhLkNdrgM5XkxKUdf57mwJibkmZl20H2N87J4y6/M0hBc4YDez31higXj0Q 27la6VgKRDiEzyucMEDnK7UtxeO3zEoBDZXY/RrOrFf/ndmUIPA+GYTOOaq/ H91P3w9e3r13m/yuZFjtV29hvbePepWVO3v96owkEHIerWL2x3+yf2W6bJ7p uVVJcKI5J8biYQ+drzqN1F/a2SRC++MZEg9NWa8arEt83HwYSFkt6ByuynrV eyfDN39yAkh1ft6+hreT7l+diLAR1lOPg4jMX3ePR7HzVex13rkrrN/D3KoG +RfbWK82bL8/ZorHO1ii89DfMYr1akHJefsJTlEwKylnY9KsZrp/pWhVlyx7 LQJmy4+70qnNerUvd4fjt61h8FJ0ze1nUEe9ahm8se7LxxDInXzk1Fs31iuL 6FFqx7e/hMm3Y0WLy1mvRAsCzASuBUD8/Xb7bz9ZrwZuHahdZ+8L85b56ugu zKVelfkNprxZ5Q7Cd772b12Ryv69PgFHruZ9diAn8N4gXvEd9cr6nEoi1xYD kJzFd7NyPetVyHnOcX7+v46DrCDnPO/xPMQrwWec66rhdYlXM25z7lMd75N4 JY/PVYXPRbx6gXGQwDiQ9eC4j5y4dWLcyHylhXFOwzgTr9QxL2KYF/p9O+Zx PuaReLUT8y6FeSf7V1lYJ4uxTohXF7CuErCuyO+dv2EdymIdHkKv+rBu87Bu iVd9WOcDWOfEKwvsCz3sC+JVHvaRKPYR2b8ywL7biH1H5is+7NP52KfEqyPY 18exr4lXtuhANDpA/j7DGXTjPLpBvJqCzoijM8Srf7gkc2BJ+tyETdHQd3rn hbX1rFeL6gZk7i2PBgX/mmOX81ivLodx3enhiYYAt59VGz1Yr4KXB57ky4sC ZaXFYck7Btj99kubO7ZejwKR3pgI7RLWK34TG8XsSVHgbue621WG9WrJo04/ UetISBw4PXrEpo9+f8U7ds2V0r4ImJzQUKwYxc5XzmqzJpptiQBlj+FLp1PZ +Wqy+v72VqNw2CbgsF8pkvXKZKVzZ+7TMLATq/WffZ/16qZDubFI6Fvw11WU mCDXSecrLd7Pr8pDQuGQkmHjpVbWq+pVF0RGSYeAbrNaQOp51qt73aoXjb68 giD5Ra/s6lvo35OBPUrfrjkFg1PMi8rLm5vpfPWgduxdk5mB0Nd9a9oiS9Yr 5yMSK1cZP4eoF+HJwzfr6P6V/CHpyp35frBEc+Jez1zWq7IDBjPcJvmAj+bc GcJjy+n+VcWU9Y8mX3oCpT2lvUaixdSrDaLccnNeO8H4yTwrb2uyXr3aLRee E2gLn0Lq41cdZr2aoW/5aFXlXYANSSOjbrFebWvbdXNHiS58PPMjNFaN9epp O+d409m/joMenicKz0N/j7OHc90VoZzrEq9O4n1uxfskXo2eynmuD/hcxKtO jEMcxoF4dRjjpoBxI/NVEMa5GONMvPLBvHzHvJD5ah/m0QfzSLxyw7xHYt6J V11YJ1ewTuj3V1hXx7GuyHx1F+vwNdYhma8ssW7dsG6JVzOwzhWxzolXHtgX h7EvyPcMc7CPeLGPyHy1AvsuHfuOzFdC2Kde2KdkPciFfb0A+5rsX71CBw6g A2S+uopuBKIbxKvF6MwOdIZ49Q+XZBx75OfKuHsArE9Yxv2TXQ/evaI0EHPf A9xNDLtW97Jerbt28Y30cQ9w3DWnNDtmgO63H1XRE/g0ywMGBKU+jdEZoH9f NOiXwpalYU/gWh3/+TWDrFfjz+oLKq96AilKXHMrNPrpejCWh1+u1ckdUlaO EX8QwM5XnpeCttvXucHv8w9kphazXrlLhQ7yTnYDeNPXBw3sfFUlNRSiNN8V 9BvFfEQKWK/GWARcXy7sAt8jlrvn+LFeTf3l3pA71hl2dNZmmGp00u+vZlbf +qhc8hgMp9674TTCemXzVmPUV1tH0LUsGLh9l/XqWmPUTsF1DpBvJ1qdNsh6 dUOuSVzR6RH06mlF8O5hvTqjckJnwdOH4K1lO3m+M+uV98mrHS1WNvD6iPXJ G66sV+9643oy1e7B4Iso50dtrFcK27w+L51uDkEXbyTrzma98j8iYcZ9xhQW u4z3Hb2W9Spae618oP110Bta8L77OuuV2vZA7ytel+HHBFm7+nOsV30ObWp6 a07DqekzUl47sl7J7koXvr53N1yVVUqy0WW9alLiHNeW++s4HHLknKcWz0O8 ssbrruPhXJfst3fjffrjfZL99nJ8Lnl8LuKVJsYhFeNA1oOFGLepgZy4kfkq CuOciXEmXt3BvLzGvBCvHmIev2IeyfcMppj3asw78coR6+QK1gnxai7WlQnW FfFqNtbhfqxD8n5wEtbt2EhO3RKvGrHOjbDOz5H9duyLHdgXxKtn2EfcFzh9 RLxisO8yse+IV5OxTzOwT4lXr7Cvb2BfE6+OoQMf0QEyX0mhG87oBvHKDJ15 gs6Q/at/uCRzRNr3dXC3H6O54qy43gg7X8mve2cV3ejHFBjbbXfpYr2qVea3 70z2Y4Zkx+xZHc16Zbtsnaimgx8Tovp7x2Vt1ivBAvOjirv9mCWPXfe+7Ge9 etLo2fV5yJfxrRu3QUOd9eo/u8JwxtqXufDBYJawP+uV/S5dc/5JvszJnhSH sAJ2Pbj36E+ru7d8mAyDYeGvtex8Jf2164lEpDdjortgZn8u69Vnb9FNn/d7 MTdVq3zCfFivvuclu9TkezIV13hd76qzXl2dc6Hj6jIPZqz798XhX1mvTuh2 yV7Td2c2Z5TfeG/KerX7kXRFhIsr81XRffbCD+x6MD5a6OOC586MXnfcMScl 1qtVHlm/8zwfM/fXTo9Ke8x6NW2y/vFyUweGt8zbboozux5MaQra2etjxzjf 7BS/3MJ6ZdppYDI0/z4TYqs95DarnK4Hnyr7ixtbWTLr51ketljNenXCvvSj VvkdJmG+4WEXQ9arvm23C4QWXWdEEnYVrD7LerX/xOJQ4ekXGOMU46kv7Vmv dh/QE2rWOcgoTU0SW63DeqV7kHN887S/jkMtnmcIz0O8Wrudc10NvC6Zryzw Pr/hfRKvEvC5DuBzEa98MA45GAfiVRvG7S3GjXglgnFejnEmXm3HvLhhXohX OZhHA8wj8eoI5p1rFyfvxKuLWCcKWCfEqztYV1OwrohXE/I5ddiIdUjWg7+x bs2xbolX8ljn97DOyXx1APuiAPuC7Lc7Yx+dwT4if6+PD/vuKvYdWQ96YZ++ wD4lXgljX6/AvibrwUfoQDg6QL5nqEM3PqMbxCsFdKYQnSFe/cMlGU1LS+DP iGGEzIJ4NctZrz78VN9mHRPDjL0yXcwrjfXK+2KcbZd9DOMfpfL9ymPWq/Oa bxpO74lhXKuHjk7fynq1bWyntNzAO8bs4pvR+TmsVyqN8192GL5jRE2V1otL setBjYaujPzWaKZsYq9GpBnr1RTPy7KPN0Yzjnn3ZTeGsPOVSneTTNe1KMb/ 0l4d+3jWqxVv6+y8nkQy35bc/f7uDetV8sXvze6BEYzWxIV9BeasV6eXzimp 8glnnESlXk2TYdeD+pL3S65ahDEu0z625dezXtmN2vDf40NvGS/vnYKmuqxX HZu71xvNCGW4PqwXelnVQr9nGBH4vbHd5DWzuvaC3uf1rFevHT5llccEMykv +Ixm3WW9+qX6hiu48gVTMbY+P/Iq69VoySundOv9mZ9eTzfIprNejc+dnLEy 35f52edlHf6zjM5Xguec5ExUnzIhW6t8RwuzXplvlt+aMOjCHLc5cfOuKutV tvGR3TUG9kzOnRlbVx5kvTKHXyv255kzb8y4v4wYsF4piwjIHr10ljldayUf dZD1qmQe5/ihur+OQyueR8yccx7i1Re8LtddznXJfPUW79MN75OsB3fhc+Xg cxGvhDEOc/o5cSDrQX6M2xxvTtzIepBPjRPnjxhn4lUi5qUA80L2r6YKcvIo g3kkXn3AvE/HvBOvXLBOArFOiFdGWFc+WFfEqwtYh15Yh2Q9mIV1ewbrlni1 Dut89FJOndO/J4N98Qr7gnjFi33kjn1EvNLCvqvBviPzlTr26WLsU+KVPPa1 FfY1ma8uoQNP0AGyHvRFNwLQDeLVIDrDhc6Q7xn+4ZLMrGPez4d+pTLcrcp+ Ex3+v/Xg8lFWnUOpjCTvb4lLd1ivLHom5hYXpzLu8E46bC+7f+W8z257mUcq 89108vJxP9j3gyL+VikSyqlMXUDiMGPNesUrv3N4Xl8KM/RMuUrjM/t+cNr9 p9/nG6YwLQIazVe3s15Vrz40Org7mXlz3F4+9RI7X719YJOgpJTMqF947Spx l/VqTNahqjduSYysoGG7twHrVffw2fWPShIZw2DbkG27Wa+WjuvXuf6NYba7 KUUr8LD77QNOPe4rJBOYBQdSE8e8Zr1K1vyitWRzHOOVe2xx6wbWKyn92OsG y98zr75dPHnlDTtfdfe51qzmfsfY3z97fPc01qvDLiO3X6ZGMrnLzlSIa7Je WRVubt9yPpwR6zf86bSG9Upmg0X0id+hzLwrX3YttGO9WlMSKbxz9Gvm7IWF 1kV57H57z4wV0YptL5g7UgZ9dsPsfvsO55nLFof6McrrngTmzWa9sh/Hlxeb /4SZLF7T1y/OemV6qnBgaJ4947zq9YX3wHq1ff5U1WLrawz/t9grEitZr4xF Oce5Rv46Dnl4nsmrOechXtXgdeXxumS+uoD3aY33Sbyaxst5Lk98Lvr3rzAO 9zAOxKt9GLdNGDfilTvGeRvGmXh1DvNShXkh89V3zKMn5pHsX+3AvL/DvBOv irBOgrBOiFc/sa6WYV0RrzZiHSphHZL14AesW1OsW+LVeKxzJaxz4lUk9oUW 9gXxqg77KBL7iKwHebHvurDviFf82KdfsU/Jfrso9nUj9jWZr1zRgd/oAJmv LNEND3SDrgfRmSXoDNm/+odLMt9fKx07w5XHpE9X2BkjyXo18H3rEvHPucyC jeK+hwTY7xkkdqn5n8/IZSSWZfRLdfXT+Wq2wK6W87dymc3mwjUurv10vnp0 OrHa8L9cxteMRz5DjPVK/8HqMSM2OQzfjK9tW53Y769algQ2WrRlM25pIyWe Lb3078mM7MkyTF2YzZRYv2t04mO9arNqtDbfmcVo7/1cNmYx69UhT9usoP2Z jN5pI/sGYdYr34EJ7Zu2ZTBORtIj20bY70WPb/5qoDI7ncl0+q9NM5b9nkGi bihzVWUqwzeUnG6mzX7PoN/27cU8sxTmIveGwwKf2O+vblsu7rLhT2aEJQdm v7jIeuV4f+1It3sic0vszLvk0ib6fvDEukOewTMTmNCtK3WFFrNeTXLdfLGq 4j3zw/aOaH8p+z3DpRd86jnG0UwkqI9X3sx6datcddT4SRHMyI/+XwutWK9U oy5zLzMPZd40bjNSiWO9mh9RatRZEsQ86Jp9Mjae/Z5h+sodF5Xu+TFTfNsE nrax3zPMuBOprb3LhTH5tFJo/iD7PcPt+nfzPiUbM/qxV1+d+MJ+f7WikXNc Lv6v42CC5xnC8xCv5PG6CnhdMl8dxvtMx/sk60F9fK4sfC7i1WOMA99PThzI etAa41aAcSNeLcQ4z7LjxJl4ZYh5icO8kPnqKebxHuaReGWFeZfEvBOvrmOd XMc6IV6txrqai3VFvDqDdViMdUjWg8FYt15Yt8Sro1jnl7HOyf5VD/bFWewL 8n5w1F5OH1VjHxGvOrHvnmLfEa+uYp8KYJ+Sv8/wGPs6APuaeCWIDsigA2S+ WoJuLEE3yN+T+YDOLERnyHz1D5dkfmxpXJZ2rZjx4Mn9WvKsn3oVZ7vKYtr5 YqZo0EI+6jH7vWiI8d3Er3uLmakD3xZc1Ga/v3ry+M5tb+Fi5vIhi2PLedn5 qtzMzml9TRHDxKppKT3ro39f1F9h40cuyyJGti+8dhMfO19dVvPfdlqoiLk8 ke/gY51e+n6Q20DcMc23kJm8ue7SJI8e6lWQillzwMxC5ovumv03wrqpVz/W 6q3eOJjPLFqS4FH0mv2+XV0ptdjVJY/xbdllLm7HevVVTGJXuVAukxx85HnA Idarj4KlI3cts5ko95wcjzGsV+1PF2nvKM5kBLb2Opxxb6X/vwlJ6a4jH7gy mO8yOv0PBFiv0tq9V50USWP0bW2eOVux31/dmjYl1GNBCnMkceMKzVT2e9Fb sVW/wniTmJL8pmULD9fS/XZrS/WugJZ4BoZnjRXIZ78XTQn76GF4J4aZ+CA4 94sEux7sqK30vTImknlT90jQUZ/16vnrTubQxVDmol9oZZA861Uvf/LnGocX jPqT2VNNH7FeTXi1bs69o54Mo9goedeG9ar/3q0xP/vNmAc7bB24L7BejbXm HD+s+NdxcMDzrNrFOQ/xatVsznUd8bpkvsrA+wzA+yTz1YQ6znNl43MRr1ox DmIYBzJfvcC4qWPciFf3Mc59GGfi1QPMy1XMC5mvSjCPNzGPxCspzDs3cPJO vBrEOlmIdUK8+oV1lYh1RbwaJ86pwxysQ7IePIV1G4x1S7ziWsep85VY52S+ eoV98Rv7guy3T8I+4sU+Il5dw74zwr4jXr3APt2BfUrmq0rs62Tsa7Ie9EQH rqEDZL4KRTemoxtkviLOFKMzZP/qHy7JTKkS/sijWs6ckHkT0fGjj3qlt/Lm sV27ypkZRvF58/vY3w96StwYM3tROXN4XXJEYzz7+8HMcL9W194yZpzZSRFV /T76/ZVu9YZH4z3KmNv+3a9KR7NeeX64VRC3uozZWXHyUcE19vc43OP1NMQi SpnT37VmVOf00PlqkrfSsXSRUuZ26sxRL7h6QBe92sz1tnezYQlTrrmhbfx8 9vc4CUHLtDa8K2aWnXRZ2zuf/b5dTS7Vw7y9iHkwcaWS1gT2+3bHX14bR0YX MdftulQelrG/xyn49svv4aRCZnvIyJzw++zvcXINg8VvT8hnJq045btSgv09 Dreo8LQd1TnMg5OFudfDmun7wZ0uZ9al2WUxX8Zo5c5czM5X158L+GktzmAO 2v4cvYef9er+OP4A76BUJmig41FMfA2dr2yvR60WnZnM7FH6dOqLAuvVJYWC ZTI1CYyn8G3Vl1Hs7wct99rtTD4Xw8Q16/M7T2e9Us06aGLdFM5wnbO1nfU2 m/49Gd4XaVeyLF4xb5f75fQvZL0aHtmfeXexL/PY9F23Ag/r1ZGnhywjO+8x P4SM1hQnsb/HCfLiHE8Q/us47PzOOQ/XHc556O9x8LqdeF0yXxnjfUrjfRKv XuNzVeBzEa/cMQ7RGAfilS/GTQfjRvbbn2KcUzDOxKv7mJdzmBfilTrmccxY Th6JVzMx7y6Yd/K9aBXWyUysE+JVBdbVbqwr4pU71qEZ1iHx6hjWrRPWLfEq Det8HdY58Wob9kUd9gWZr6ZhH5ljH5HvryZi353FvhtGr3yxT3djn5L9q7PY 13ewr8l8lYMOTEAHiFde6MYRdIN49f8Ie+94rv738V8Z7aFoSahQokUqPXOi rJamSGWEiijRkIpKVhklhAglIiNbPethZ+8te29N7X59P+d6PM77+brduv38 ed3crvM417g/r+s65zwep4Azs4EzuB/8B5cUDbYYFHxe1IAqLrd/CZVnvncO Er51fwN/A6oK+aOtIsnwatlOe9MZvfVI+fGxaNY3Zn8G6cs/H4Q9rkdfzv7U T3vOfO88fLNg7tZt9ahaoG10ijLzvfMBXRnFnQV1qGCKtfeTNGZ/hvo5O3WU 5OuQr/SZolkCzPeDk9cqiL9xrkWVGoMZPPuY751PfV+y3CazBqnoSPupWjPf Ozvb7RhT7qxG3s113hm2zPfO57iD9/KOVCEd+xAJ21M9hFcaL2tkMzsqUWHf +govRYZX5k4Tsu9lVaBbaoUTVH92Ul+AVwLrBqSeepSjtgjlqs7HzPfOiqof DmzRKEOWm+5dbZBnvnfezp6wybKjGF31CuUNT2b2Z7Aw9ikcFShEiSVJ0q81 mO+d7caLrPm4PA+ZGwzHafIxvApu3LnRVTwHtfRVmFs/Zb53luFTPdM+ORP5 NMiKpcowvHp1vszF7uVrNDW8LjHjEfO9c9jRUtVPVApqv8NT8pCL+X5QiKeh +OPzOPTDojVZ9ynzvfPcZO8l5TOfIJXtMkZfzzLfOwuPRRTZFriinWvaHC9+ YfZnCP9Ky3lkOeTUJdATD3owr7bDdVedoa+LeVUN65zrRq8T86oP7ksC7gvz SgXsEAd2wLxKAruNgd1wfeUDdnYEO2NeOYBfisAvmFf64Edn8CPmlQb4/Sr4 HX+PswjiZBDiBPPqAsSVB8QV5tUeiMMqiEPMKxuIW0OIW8wrD4jzIIhzzCsL yIudkBeYVzMhjxogj8h+MpB3gZB3+PngIcjTEshTzKsPkNf1kNeYV6uAA9+B A5hXy4EbKsANvB8y5kw1cAbXV//gkuKpwOhBr6ImpB4u8btqL7OfzGPXaZY9 7CZ07sGEtJG/68G8Qppb7D64NSHbtq8PNOcMkvmVbHXplW6qCX1YEOexpGiA cgVe1Va13RSsfIeKxEsfpxkx+8ksDa6f+kHtHcqMLg261tpPeJUtPHR++qNG NBZxz/8XxewnIx214tTC+gYUu37qmZabfdRx4NW1xgdig1/qkU1FGFf/c2Y/ mcoYEU+zb3Vo3yP+s39eMfvJ+MRtMwhrq0VHB05JC8cz+8n82BHUieJqUCGv b+9hT2Y/me+WCrU/TlSjM6Ozz/cdYvaTmaq0flbCxCpUYqpmxz+Z2U9GLuj9 okP3K9DX8Mz1ayPayPPB7ovq8WemlqOjJ8pbkSzDq+RtQmJru0rQNvF0N4cj /7OfjGtUCs/dQmT5NFz96VpmPxlhqZaHtSJ5KPL41K4NQ8z+Vwr1b3I1vLNR 6779+6M9mP1kPj4NahL4nI7EljS1uwkzvHq7vjxkluNLFLqR4v8sx+wnc8i/ PVyALwFt+vFBeLsAwyvNsE0LJTufor2V0wvlMpj9ZCa0cAkoebojk5mmQoVT GF7lttLyGbM45NQb0PMS9JD9kOG6FnBdzKs/sM5aWCeeX00Lp+9rI9wX5tUB sMM3sAPmlTzYLRvshusrwdu0nZ3BzphXZeCXo+AXzKtR8OMJ8CN+PkiB37kj aL/jfnAuxEkdxAnmFfc5Oq4uQVxhXvHspOOwGuIQ8yoQ4tYI4hbzqgHi/DDE OeaVI+SFPeQFnrfLQh4lQx7h+iof8u4X5B3uB5dBnuZCnuL5VSPkdRnkNebV euDAF+AA5lUGcOMqcAPXV0/+wxlcX/2DS4ohAf5THaNbkQCX/qfTmsx+fYWW P46kP2lF28aG/WYoMfv1ZY3luV5ybUVKi4si+eYw+/W1yZ/YVHCsFR14v/+0 XUk/mbfLP5Qy7BBrRZlissI5psx+fZpN40UnRrQgQ1nq6ZaBPua81JPC+j/7 mxGf6ALpS3uY/fp6678bmk5rRmOnBW9MD+gl/aCxR/HmTTOb0IWJfdcyC3sI r0Ren1Oz+dSIchZ/kLXoYPYXTW7cxqX5qgGJrC2ewNfB7C/aVzSvjtekHk2y YiX5FjL7i86eFFfJ86UWyR4+tUojiNmvT8Z46uzS0zUo3Trq9KEj7YRXH9lr FcYXVSHxcQvmC05g9r+K75n45oBgJdLhcTeqoJj9+qyT5s29v70c1UuuEwrY w+zXF71XIVWlsQQpu6V4+2+tJ/Or7LUv7gxxFaJAhVmn+BYyvJp0z2urzOS3 aF2bmcjqpgpSX7Wo1Wit/pGJ8tYUW3MLMvv15Qn1XbsY9xrxHT21/tNuZr++ oGydkX07kpDv6TOx+84w+/UZTPZ+6PHoGdJOEK1L+M7sL/qpc9PwJKG7SNrn zObM8cx+fcNdtDzHl0NONYGeN6AH86oBrpsH18W84ltIr3MjrBPz6hfc1ze4 L8wrCbDDLrADnre3gt0SwW6YV/lgZx2wM+bVTfDLe/AL2V8U/Hga/Ijrqz/g 91Xgd8yrDRAnBRAneD/kRRBXLIgrzKv3EIf8EIeYV+kQt5IQt5hXyyHOiyDO Ma9OQ15cgbzA9dUI5NEvyCNcX7Eh76ZA3uH66gDkqQnkKebVBsjrHMhrPL/q AA4cAg5gXmUDN7YCNzCvMGdUgTOYV//gkuJD3nua+4+3I37ZwE+XVjP7IScH 2+mE67SjYrN45/jF/YRX7ynzp9GsdjQhSi7X/Fsf4dXB1ZdeOExtR08kq+fU JDL7IT+8tXKpXn4bsn7xJFT2YB/hlWjk1pCbVm1orGYFz0BDL3n/aqGw8uWd U9rQ+1U+zVdUewmvvrg475G824okxPS1bj1g9kNetuJLyH3eVhRoJWj+qryb 8GqRt93N3RXN6LxL8ZbRD8z+7RUiY7YTbJrQn8RVq6f/YvZvv7Z6qjHieode CfV0zH3P7N9+sGVo9nizBjRo76IoWcbs365b1HD4clodmik3Q+50ALMf8npn MfXRoRpUP1vAdcWBVlJfyc7UV1WbXI1EuY14bMeaCK9kpvwQuTKzEr06mNoy T5LZD/k5u6MndHw5cqPOXpBQqCP11WUL5JWfU4yk9k8JS5Fl9kPevV7R5YdJ PnIysJz7Yw6zv2iD4JRg66FsZGPf2WJeUkx4VXx7c2ff0XQUumRllKsmsx9y LVomqHk5Bb1ZmN8glsrsh9yXge6u2vIc+ebNmKSyiOHVovIx3lnv7iEJm/DP lu/8mf1FK2h53GUOOXUuk9bzDfRgXs1Pp687DNfFvBqBdVbAOjGvvsN9hcN9 YV6Zgx2CwA64vvIHuymB3TCvXoGdQ8HOmFebwC+l4Bf8fHAL+FEW/Ih5pQJ+ 7wC/Y16dhDiZD3GC6yt9iKtPEFeYV84Qh1kQh5hX7yBueZPouMW8koQ4vwJx Ts4fhLx4DHmB5+3fII+kIY/w+1dikHefIe/w/GoJ5OkPyFPcDwZBXl+EvMa8 OgQceAocwLz6ANyYDNzAvEoBzpQAZzCv/sElxRt8iSK9vJ0oKz59dOmXXsKr tSmb/+j96EB2zmfruft6yfsMi2SrEisaO1CRW5RJTAZz3kTvE0tLg/AOZNYx 59sue+a8CdUJfXpbj3Wg3ZNeaUmKM+dNtN1sMs3h6kBSU6MM/eOY8yYGkuoG NDzake14iVSxJT2EV3eHq7aqT25HWz8/XL7vKnPexPi9EUd3nmtDou1Llzag LvI9zu22qgVf3rYiMadvY/YDnYRXWke1o75OaUU7fpfzSYzrZObtnjqhstf+ /u6kdtShcQyvNozZiRpmv0N802/P1x1mzsd5Ov+y767BBmS1IvLK/DzmvIng OdKPu8fqUPulUiED0RYyb8+7EhS5qa8GfUwUqinzYM6b2Ka1OflCZhUai0LV cm31hFeO2/mWN96qQJtbHx/Xm8ucN3FodLJe1royVKirfJpax5w3sfGD5wnW s0L0rCrpVNPmclJfqd9v7qrLz0VuPiXGcSeZ8yZuePievlKRgQKLTE2y1jPn TZihgyXpnmnIdaPEhuFmRHj13bWiRy0rBnWGebwtkWbOm+ASi7E+7nIf6T67 3TPNnzlvQmYxLS+P5JBTHrdpPUpPaT2YVwlw3U64Ln4++BTWWQjrxLw6DfeV BveFeXUE7IDADri+OgV2awO74fmVL9h5H9gZ8+og+GXac9ovmFc14EfeJNqP eD/kWPD7F/A7nrcnQZzYQpxgXm2DuJoBcYV5FQRxyJNGxyHm1RGI230Qt3j/ K0+Ic0mIc8yriZAXEpAXuL7yhjzSgDzC/eAI5J095B3Zvx3ydCXkKX4+qAF5 vQ/yGvOqHzhgARzA7zOIAjdKgBuYV7LAGXvgDObVP7ikuFAk7pO7VxfiOfr9 YlpID+HVeeMJz9c5d6Gm/c4WO7yZ87xk2Ftz1pl0oYatlSenn2XO8zp/zZUn QaYLCf6W9Vq+ljnPK3Cfxrve5k4k5v52UnNjN3k+uGJc9Eqpy52oePp7L0fz bvL+lUHp2S+tfzqQYn7DNt+eLsKrB4KGtW5nO1DAbN1xgduZ87w+aE/zfVvU jq4Zvh5g+XaS+opv65JrCoLtCF2ckixb0kF45bqH9Th8exuqMXNrPDDaTniV 0pQm0mn+Nx4M92a6/GbOH8y/LKcX96cZ5Y4+ySn71kp4laN96PLP8U1IbRzv wUu5LYRXKZRiQlZPA7LeMe9320XmPC+buaJqm+PqkEedY9GOycx5XiXn9m18 c6wGZdQ4hG61Z87zahFQakn+XIkcXwbsPv+umtRXjV/DNeMuliMtgQPscLFK wquym7fOeJUUo6EMnYkv9zHneaWz7daaueeht0aHv2zpKmDOH1zH7jGXy0KH rBc1Zk7MIf3gyPSsCzZ3XqG5t16cUJdmzvOSGDKUW+gVh+x237i0S5I5z6t3 9+9Lm8V8EEs2f0YPiznPa8UeWh4kxyGnzoOeWtBD9hedQV/XAq6LeaUF67wB 68Tz9m64r/dwX5hXn8EOXJm0HTCvBsFupmA3zKv3YGc/sPNl4FUz+KUK/IJ5 5QJ+DAE/4voqH/zuCH7H8/YqiBNtiBPMqxqIq2KIK8wrBHGoA3GIeXUX4vYd xC2ur6ZCnGdDnGNejUFe3IS8wPOrIMijYMgjzCtjyLttkHe4H1wFeVoGeYrr q2DI66WQ13h+dRE4MA84gOurVcCNJuAGfv8Kc6YZOIN59Q8uKd4pyZGImNyD PGS09fzlusn8KtWTfc/ldzeqCmo2GFzGnJfazfbxU2joRlZrGpKGeZnzUu+t VDZvC+xGk/mMpXILuwiv1rx97PJaoxsFvA8Zir3MnJdqLlRqKdnchc7d1d85 bnYXqa8yJ/bv89T9y71mA21J707yPsNliUVu1zM7kXxowPmn45jzUhX2CC55 OLsTHXX+WDJfp4PwKlXTb+YDzQ6UvYUnYe3DdsKrmZUTXbZebEda5x/UpxQy 56VyaZgvunG7DX3NeHTPobeV8Op+hWDFDrdWpLTm45sZPS2EV9MoExHtH81o uyP/iGNjE+GVr+a0ZddfvUO8f1ad845jzkvNMvC3P3u0ARmU6cy4ebKe8Eoh TCnlcUctEsv5uCaZlzkvdbbmVqekPdVoibTR8ReuzHmp8vW3hXTDK1BdtkT4 zO/lhFeHOiaZZVaVIg9TyUvTopnzUisPSV/Yt7EAyd22uZ2owpyX+lyp6ejO G9koxPVlRk5WFqmvbk1YpGNi9hoNTmD7zjvMnJc67dadzUoJL5DDb3HriunM eanJv1DG5xBf9Ct3nJFprg/h1Yw/tHx7HoecMgQ9taAH86oersuaSF8X94NV sM48WCfm1S+4ryNwX5hX18AOKWAHzCsNsFs/2A3zSgLsLA92xvXVLvDLOvAL nl9Vgx/PgR8xr56B3+eB3zGvFkKc6ECcYF49hLjaA3FFvh+EOPwDcYh5NRfi 9ijELebVG4jzAohzzKstkBfHIS9wfXUd8kgB8gjPr3Ig7xZA3mFenYU8PQ95 inm1DvI6EPIa88obODAVOIB51QvcsAZu4PoKc6YaOIN59Q8uKar2bQ6JOtWL RL9W7VKJY86jr1vSerrqSC/abRB393gYcx69MEv84BH5XhQq5FuR79BJ+kGr 4Zpysy89aPG7fl3/3Z2EVzfDPourBvagep42mencnYRXfEVf5mms6EElm+9k WId2kPmVwHvh+4PB3WiVmnKSrAxzHr2so/bSzN9d6MOXJIPcx8x59NJ9ogbW Kl2osnqd9mu+dtIPqhZO2ph7vhPxNPoWvNZqI7zyeB2z9J5nBwpVOtdkf585 j17Ur21Lvk87uuoWVxB2nTmPXsKJb+85lzZ0+nipiHhaE+GV7OVnkRGnWtFs l1kf9cobCa/uprfMkbds/puviQaHiupJP1ixekuSwEgjKn53f++K57WkH0zQ F4r11KxHt0onr5tnxZxHf5g/4PRp7xq01yAtznpJJekHw5Q0tR2zKlH3jWLx WMScR7+z1L+h+l0Zkgx2U/W5z5xH7/oi6nxZXiFq8xm9/vo2cx79Art3FS9f 5iBu29klIqbMefQ/bQLq761A6L6fzmxVU+Y8+urUyOau9HjU6JRWxpsfS3h1 dnvIiu+T/NA2wT0HRTYw59G37qDltnM45NTqNFrPeWdaD+aV1mX6uu1wXVxf qcE6pWCduB9Mgvvi8aXvC/PKEOywE+yA51cvwW5jYDc8vzoDdj4Odsa8ygO/ +IJfMK86wY9N4EfMq1Dw+yLwO55fbYI4EYU4wfN2GYiryxBXmFeSEIeuEIeY Vz4QtxEQt5hXuyHOJ0GcY16thbyoh7zAvNoIefQF8gjPr+ZB3slC3mFeTYY8 LYc8xf2gE+T1O8hrzKsLwIGlwAHcD4oANx4DN/D7DP/lDObVP7ik6BtJXZGK 7UMXPpyS2TOng/DKydN7dkRIH4qfd2GW6tQOwqvReazZq2z6kIFk2/61w+2E V6XT7kzvX9eHZFxtveXY7eR90bNF+/JF6nrR9H1fza9faCe8urjGYGitfi9K 4QpYZSjcTni1xjQjNKSkB4n/EgyQe9FGePW+nmsK79IeNFTVf8V0bRvpB0tj 5gfPNOhGjZMS17mEtBJeffQPu3jXsQslJj7X3fe7hfBqZLeombl3J7q+6bBp v28z5YXn7RELJULdO9D2tMSg/fxNhFdOo6ZC26zakb/WSMOy042EV8kt6oZX t7Uh6dzRFeKR9YRXAweLr9zhbkVZEkpjYsW1hFdWagn8jsebkE7glEmCtdWE VyKv2tImhjQgdUfKYXpBJeGVW2T1UufMWnTP5WeyfEQ5qa8Muuf+mlhYhawn Lo3y7SlhvnfepbAh8nU5qh/uY1HHCgivogpfP9y6qRidrtKsXJ6WQ3jVniSQ cO5dLgr22rFT4Vc64dVAfdAWb+N09J67VKT2WCrh1cmqhs2jLxPQHlHLnTL7 owmvBCbZGVcc8kenMoXXP/XyIrzynkzLnbI45FQe6GkBPWTe3kBfV56Hvi7m 1cxkep0ZsE5cXzXAfXnAfWFeCYMdvoMdcH11EezmDXbD9VUo2DkU7Ix5JQ9+ 0Qa/YF45gR9PgB8xrz6D38vB77i+QhAnChAneP92d4irMIgrzCtHiEMtiEPM qzGI29sQt5hXPyDO30CcY17VQl60Ql6Q850hj95DHuF+UB7ybhnkHeaVLeTp S8hTXF9ZQV7zQ15jXlUAB1YCB8i8HbhhCNzA9ZXzfziDefUPLinaCx+8Ulbf j45Ozb5x4mQb6Qel7XR/xxX2I6Udl5wovTYybxcwsj1uENKPqj+mbyzf2kZ4 1VwptHK6bj86FFxgvXFOG6mvUkRbtMd960M76opXRtS0El65bC6bGGrbh1Lb /FX1b7WSfvBMWpuodUcvirmotDllcSvhVYTD6pS5a3qRUBErdfmxFsKr15YP T6sb96D+fboeXQebCa+O+J8If2ffjXIaJP+kyDQRXvVqPH+R7dCF1k8uelDX 3UjmV5WxPuxJ5zrRoIHn+kc3Ggivjiqfzi/S+NtXLlvie2N8PXk+yKfhaKMy rR1Rikb5c07WEl4J69vlpr9uRfE3DrhNSaom/WB1cL0aldaMPvzocZYaqCT9 4LlTy+ZF1TQip6sPThycWsHsz8Cj/qG4pg5dU0loubmgjPDKT1DAr5RdjWok h7bcXFVEeMUVv2Lnx9sVKF9TR0t7ah7hlYW9b/wyjxK0fNcM2bbSLMKr99bJ y1S636LDT7V2i/96Q/rByffTrTb/je0NpdXNwxuTCa94T8T+PhyciGSk56VG v4kkvNp1B9mIuQagvOAvt5Mb7jL1lRstLw7hkFOnQE8M6MG8YsF1beC6mFdL ztPr9Id14voqCO5LHe4L82ou2KEH7IDrq1iw20ewG9mfgZe2sxvYGfPKGfzi A37BvOoDP/4BP2JeLQO/p4PfMa9mQJzsgDjB/aAJxFUpxBXm1TuIwy8Qh/h7 5/cQt1shbjGvjCDOSyDOMa+yIS8+Ql7g54MxkEeLIY/I9ziQdy8g7zCv3CFP X0Ge4vcZXkJe74K8xrxqAw5oAwdwfTUHuFEL3MD1lQxwRhk4g98X/QeXFI1/ TLtg3DuAlKRfHPbb00J4VR70MSylfgCFuj96K7qlhdRXF/LcIl9HD6CQQ8Ym edNbmPnV+cLcMKMB1FGbLpLNbia88q4vbWb/7kdtZX0KptubCa82XJwhaXGl H3U/LBkvm9pE5u2P4lwSlJv70NpVLmqpfE3k+8H1lt49rUv7kNnku+xE+Xek HwwIrcudsrcXBR8/IMet0Ui+x1F1W7ws9HgPWjttwstAxQbCK9uPXIWBR7tR wB4/14fz6kk/uMeOb++sLV1o2HRgSK6ulsyvFnfWCElP7USf8q3ep1yrYd4X TV3OvyqrHc3ZEcN7d1o1eb89wnym6nmTNnTQJt9um2Ml4dWj1ELxxuEWtO/7 knEW/eWkvnr1uGix3Mg7VNutlvvmr78xr1aoTp0mXF6PoiUOvRkbKyK8+v3z uFWTbw1aYLYy7KtOPuFV3tMzF+pVK1GWq8bR3SE5hFfntB5bLMwqRU6xuTM7 yjMIr37X7tdeWJuH/rzuiLdseUXqq+b369nfyzLQ6TlJswp/JRBenf5ksF/+ bBIK3h55eeP0CMKrYyUCm8IfPUR3ZokqCM/wJLwaX0bLL87mkFNVoEdgB60H 84r/A33dMLgunl+tqaPXufENvU7MqzC4r8dwX5hXbWCHVrAD5tWcX7Td5MBu mFfKYOc8sDPmVSX4pQv8gnmVCH48Bn7EvIoHv+uD33E/KAhxIgpxgnm1AuLq N8QV5pU2xOFXiENcX92EuH0CcUv6QYjzTRDnmFchkBfhkBe4vtoMeWQFeYR5 9Rjybj3kHeYVC/J0APIU94N+kNddkNdkfgUc6AUO4PrqEnDjMXAD11cVwJnH wBnMq39wSbF86677JfWDKKrs8JKI2EbSD5YF8BSEFAwi8WSNFfNCGkl9Zbc/ z3hF4CD6WXHvwcXzjYRXPFSiQsDeQXRv9dw9n6QbCa8+CU/L3fL3uvemPvVr eNtAeBXEHdroajCA9hi/Kb2v2kDqq8tH5ddMeNOPYiuiRyKf1RNe3WedyTf4 3YeyjtyYnPm+jvDKOKFV0WhJH9pbbOwbIFJH5u1ZId9GPsn0ImuJ+RECcrWE V18nRE+dI9KD+LVMuMRX1xBeiZfWOnaOdaH8/Cv8zQLVpL768tq+2yetE/nw 72g41VFJ+sHgQRnuK8YdKHE5T8ykwApSX804Ev742882tHX1gnaBreWEVxUK fry3r7eiBRuWFgxHl5L6ysFpa+C1viYUna9tp59YRHh1NPdd2Zm4BiQc388d /DCf8Cr8+VavXbq1qPdP/qbhU7mEV0l6oYf9hipRlb+XYYRIFnn/asK3kfPD pmVo5p8V3C43EOGVnNmemz+j89HUV1d8A56kEl698w52nWeWiQRX38rNeP6C eZ9hyZWxiOXJyEu7TDZ4WxjhlUrSMi8l30A05vls/3njO4RXX5Jpuc89Djll vJTW8w30YF7N8qGvqwHXxfXVSVinIqwT94NicF/KcF+YV6VghyGwA+bVG7Ab F1fB/9kNz6/Og53lwM6YVw/BL1ngF/x8sAn8uAr8iHklBH7XBL9jXkVCnLyG OMG8+gNxFQRxRc6jhzgsgzjEvOKaSMftfIhbzKtCiHNbiHPMKzPIC23IC/x8 MADyqADyCPPKDvIuEfIOv88QAnl6APIU94NjkNfekNf4fYYJwAFv4ACur+yB G7+AG5hX5cAZCeAM7gf/wSXFRzaDdjOih1A+v51e7vtaUl9JNok9sAocQhq/ Vm5a2VVLeGWmpb8nzmII+aSv47dCtcz8SuJj/RfRIaSgGXSPbV9LeLWVT+rr g8RBVHR+durO5bWEV3eVtSInSg0i2SibK3ZpNaS+OjC/JaH2+gCSTpS+UrCm hvSDZ60Gxqew+5FRu6oN+1414VWxpvKX8419KEbQOufnuyrCq5cR4jfHtfSi VzbDd7fzVzHnpe6exjqe95dXy49JXFldSfrBk+/VNqY/6Ea31c/8ubqpgvAq aGNE56G9Xej3qyk1e2XLme+dd954duNjB5okqeg5bX4Zs5/MGl3XOPt29Ksh eWNiYzHhVduGt4EnvrciL+udFzqNCwmv+rSFex2ym5GJuqmecmUe4RW7wbPk nVUjmnR1pPSGRC7hlXWKQex+vjp08tA9oQuGWcx+MrtWP3ewq0IzF4nM53VN J/WV3feoK+IdZWhZUqP4kS2vCK9m+fDO4DUtQBpW7krce5IIr8o6enM/v89E B4QXv7x6L4bw6qDZh1nvC5PRinnPCwuNQgmvKoKqXwydCUJqHRuCxnk4E155 BNPymE4OOZUNehxAD+YVXyd93edwXVxfqcE6rWCdmFd+cF/74L7I+c5gBwmw A+aVO9jtCtgN11dVYOeFYGfMK24d2i+24BdcXw2CH8PAj5hXzuD36Y2033E/ WAtxMgviBPMqHOKKl03HFeaVJcShF8Qh5lUGxO08iFvMq0yI8yyIc8yrKsiL BMgLzKuLkEemkEeYV4ch71ZD3uH6yhvydD3kKa6v1CCvyyCvyfwKOEABB3B9 ZQ7ceADcwLz6L2cwr/7BJcU2O7sTOwyGUdfimZpNC6oIr+aG8STs2TuMPHYH Lds+s4rwan8nzylLsWE08rKpNmC0ktRXBy95dLWUD6HM1Y5xH19VMv3gPOd3 I4Z/14OWzXU5V0l4pZviN25O9SAaPtKv+kygkvAq2/mcW8+yQaRho8KVElpB eFV5sSB4vt4AMhqTFJMSrqCM8PnOUvW37C/1ow11DRIeDuWEV+wJPOXTL/Sh doUN/o71ZYRX7UtjDaq0e5G5VKFJ9sIywisD383bfon1oFVIcNOioBLCK7kf 5hfKKroQz+L3atfaiwivyhT1PGJOd6K7C8eCbScWkvrq053wnTPft6P3m2r6 Js7KZ96/usnNd8ugDXVFesbJj3tL+kG24tVZhnYtaObji0pr6rIJr+S9hNN9 F7xDC5zHjir6ZRJeXdp2knvzgzrkqf6w7qVqOuFVQKtj5/ifVWiF3+M1q3Nf kfrqZtHyx0ka5ej69R/8CW3JhFeSds5nLCcXojVhuzqWdL0g8yvBdUmXeI2z kLlLDv/NqGeEV6/LM3mMtVKQ4JWDJZc7ggivBpRihPKXPUKq1x8otwc5EF7F b6XlVjc45JRMBa0nEvRgXu2G66bBdXF9pQfr1IJ1kvkV3FcY3BfmVRLYYRfY AfPqHtgtFOyG6ytNsPNysDPmVQ34RRT8gusrB/DjJ/Aj/n7wD/idi0X7HddX 9RAnQRAnmFeKEFf8EFeYV2YQh5sgDjGvBiFurSBuMa+yIc57Ic4xrxogL1iQ F5hX9ZBHJyCP8Ly9APJuJ+Qd5pU+5Ol7yFM8v/KDvN4BeY3rK23gQDZwANdX B4Ebo8ANzKt5wBlP4Azm1T+4pHjJQLw75/MwWvjguO7oyjLCq3WWHfOudg0j 9a1OW8wlygivTtoW1CQkDiP/c9e7B6eWkfrqzudJ5wKPDyMztwwlgZxSwqvd 7gHrPT4MIa/PZlM7dpcSXsnddxLk+nu/HZe1b2SmlJDng2E/84Sd4wfROQW1 oL1cJYRXJ8IPdLd0/u0fI5bq7F1eTObtUpKDuS3f+lFMxaSWx7JFhFfL9zt/ vvahD/E0aYbsEC0kvLo9eceNitJeZPEzTtV0NJ/wqublJLmpXj3o/qf7l6mw PMKrjK2PVW02d6O7gfkPJbe8Jbxa42c19XpZJzoiO2m/f2YO4ZVJ90Hrx7s6 EN/H0l/LVmYTXq2ryjx/MbkNXUoVnXXVIZPwamlZgtGzqa3oaN4nHa236YRX J/SEjn14/A7Zr9JVmPX+NeGV9NH6yZYz69HRtaOnvsq+JLwSHbnRftewGmm7 aM7drZtMeLV+0a1E2aByJLFefY6IWTzhVca4hZ/93AuR2k+tUZHS56S+Sp33 8nBpVhaSGdyin/DsCeFVJtc2Aeu8FCTxeoGzQNMDwqu9wi99ZmU8Qsujg3nW +dkTXomK0PKFMRxyat04Ws8j0IN59QGuawrXxbz6Duu8CevEvNoH96UM94V5 tQnsYA12wLxSA7tdArvh+soO7PwA7EzOSwW/mIJfyPc44EcH8CPmlSX4fTb4 HfOKBXFyEuIE86oQ4ioA4grzqgXiMAjiEPPqPsTtRYhbzKu1EOdTIc7xfn1r IS+SIS/wvP0M5JE25BGur6Ig7y5B3uF+cCPkaQ/kKa6v9kNe+0JeY17dBQ6c BQ7g+soUuBEA3MDzdnngjAZwBvPqH1xSPIis8zpOjaBIPteCNUZ5ZH6VVPWl 56jOCKrZdPPi0UN5VCLw6oqnzfMmyRHE+y6ba3h1HuHVoUfhy3yrh5FmK0/1 lPdvCa+MuE/0tRoOo196Msu++74lvFo4UuQvWzaE9mVEPp8j8ZbMrw7ck3ZZ vmgIhf9uWF0fkEt4teh47u+ruwbRu1hescpvOaQfFA/NvDb17+/F5tMGwzFb csi8veWIanPp/n7kdu6t7irLbMKrgVpvVpt0H1KXq4hbeSeLmV991mm8MNCD RrcrVgXeyyS88oim6to9u9FTI7vdN29lEF6NfFLPv7uoC/147bXuu3E64ZXO GpXNk3w6EP8xSz5D0zfkfYaIVzyLu7+2oQRRq+iy3leEVwfsv/A3qrciZUNN tQ6NNMKrSabvBY/OaELXD7MDdT2TCa/cJWxFz1nUo7di7hfmogTCK885F87l xlejnYFlHtPq4wivpofp66m1lqOTSxS4vTOjCK8Ofblo++lzIfL93cXfmBRG 6itLPyvt0WnZ6L5x2Y/7Sx8RXlnvNJsYLpaK+ta0/Ilj3yO86rBbf1lwYTCa eoStd4THhvCqxJ6WXzrKIad6QI/yWloP5lUkXHcArov7QU9YZyasE/eDUnBf 3nBfmFeRYAd9sAN+n+EZ2K0J7IbrqyVgZy+wM+aVAfhFC/yC+8EE8GMW+BHz ygj8vhT8jr/H+Q5xwvOGjhP8/pUfxFUMxBXm1SqIw68Qh5hXnyBuNSFuMa+6 Ic7vQ5zj+koG8kIF8gLXV+KQR+2QR/j9q8OQd1GQd7i+EoU8PQB5iuurk5DX XPp0XmNe6QIH9gIHcH11DbgxAbiB66tk4EwtcAbz6h9cUgyYnhyz4vUIejBe /Cv33nRSX50zPMZ1+fkIuutZPWqhnk6eD/rWWLlcuDyCer4c7ExdmU76Qbn5 Md0H/65nveeL5p/c6YRX6VYnXM8kDKNEx9SIUk9EeOWr8kh/s8jfOnB1WdfZ r28IryzUUnfrmg2heW0r3lyl3hBeed+08XB8MIi2203LSDV5TeqrLU6/Bx6G D6Cm7sIvvGfYpL7ylTtZEeDXjz6YvB89pfOK8GrSk607Hp3529eriqZOlHxJ 6qulzqikVaoXXXnW9GBpfSrh1ZhR//ekom404/etsoWWKYRXQ9cOSHtodaH+ kFKh06NJhFfWtz2+f87vQJtO6S8L104k9dVIzhL/28va0Yzl8wcuR8WT+dWe sWjxCdat6Puc2neR/XGEV2pbeh+dONKEqo9OoRatjmHOd9aPHtf8oh5NPt+3 QNwsknmfYVDuzc7BatTZ+e2UgetT5n2GhevvRc2oQIcrlt7quRtKeNXms/K7 wJYitPR5vXn+lEBSX80WS/68YGs2kouTil5XfZ+ZX3mZPQk2SEV7dkbJn+F3 Iby6pTL5XYFqMBpTnme8jH2W8MpKlZYPbuWQU0WgJx/0YF7thOtawHUxr+b7 0uvUg3ViXrnAfV2A+8K8Wgh2GN9F2wHXVwIGtN0kwG64vjIEO4+AnTGvjoJf Js6l/UL2bwc/LgQ/bgNe2YPf1cDvmFdfIU6+QJzg+mq8MR1X8yGuMK9kIA6d IA4xr/ghbl9C3GJePYI4/w5xjnmlDnnRBXmBefUQ8mgv5BE5LxXyTgTyDvMq APL0PuQp5lUO5HUa5DXZTwY4sBE4gOsrP+BGL3ADf49jBZy5B5zBvPoHlxSn CGTeVh0ZQXHTL07y1IkjvNpvzr5xuXkEJQmr3vyyJ47UVzYCznOX/dUf2d70 e+36OMKro/IDGx20RxDfW2sf/alx5H1Rbvud3d0dw6jWas5z7ZBYwqtL+kvz C3b/tcPvmfMiJ8YSXs2pHH1d5DeEkth7p2tpxjD7yZyTlYrKGUQ6+rwOIhei SX3VbCa5TqVyAKXpfPnaf/U54ZXQz3FNfln9aH+0jNPrE1GEV0oXE/tzffvQ 3na1sldykYRXZd80cibs7UV3vwXlL+uOILxKmSYskTjajbYpu500uhpO9uvL U1OOVbzUhYTOrlzd/yOMzNs/sZ4Yy/Z1oFqLpaGax58QXgV9Np0pr9KO3g5y 31dOCiX1VeJCYzsu91YUorPczOljMOFVQrejdYZrE8rle3J9mAoivNrcs2id RUM9OtDZ2Prjkj/h1Zn61Ce902vQ4gWnl6728WG+x9nrlrVSugJFROzKCwm4 R3glPdPvc/TpIvRp0nZ3LiE3wqtlqc8fzT2e/fe+5E1EWh0Ir1YmSE1a5JyK 5LfLd3ousiG8qm63LLqiH4zEE477DGbrE17ldNByoUQOORUGemJBD+aVIVxX C66L+0ETWOeqyfQ6Ma9G4L5y4L4wr26DHSiwA+bVIbCbBdgN86oY7NwOdsa8 ygS/xIJfMK8iwY+V4EfMK67NtN87we+4H6yEOJGAOMHvi2ZCXO2GuMK8aoA4 DIA4xLzaAXF7BOLWBXi1FOL8KMQ55lU35EUG5AXm1QjkkT7kEe4HF0LevYK8 w7y6CnnqB3mK+8GJkNfvIK+nAK/0gQMTgQOYV7bAjSjgBubVgf9wBvPqH1xS bPzz//5GkPgaN88mSUtF3A92qvGsWPH3/5N+2TjVLrJUxPVV3bg1xm/YI6g0 InqwhNtSEfPK8hbvy+GTI0h1ic7q1pqziri++hn/c7/Ap2H0bKjDR+HBWUXM q2XsYpHIY8Po5djaCaLqZxXxvP2P9sIdu54NoZ9qka75xWcUybz9rOgjdtUg Gkhjyzb3WSgSXkl8TKltG0Dbvj4sMu8yV8TviwqaHZgfVN6PZpr073LNOK2I eWV9o1VsZVgfukHF5pjYmSnifjBUvawp62gveql+TEBL1FQRnz/4mP/6y5Sf 3Si/SMs5P+ykIq6v5vaLLbx6swu1DxvraPKfUMT11Yoj3LXBHztQ948m3rtG xoqYV+uTl7q/3d2Oxp36eW9vyHFFzKsTX5K+Rvm0oo265+PN8g0UbwGvXsYg UQX/JuT5dFXQo9d6iphXOWUXD3ztqUdXfFfx8rzVVcS8qpn+/ev5BTVo3Va1 oVUJhxQxr/Jy08QT1lWg+JI/JuaO+xUxrxLkq0s9bYvQsbxWGyXX3YqYV6Vf R7qzzbORWT5/pFOPiiLm1bkEyR9f7qeilBNOg7d0FRQxr0Z1o8/MPBWMZlfK lDg8EFMk74seoeWCVRxyqg/0rD9J68G8mvyNvm4kXBfzagjWGQjrxLzqhPsq g/vCvPoAdjgAdsD9YBvYzQ/shnlVDXaOBjtjXlmDX9TAL5hXW8GP08GPZP92 8PtH8Dvm1WKIk2GIE1xfxUBcVUFcYV49hzjMhTjEvLoGcesGcYvrq0UQ5/Mh zgmvIC92QV6QeTvk0QfII1xf8erQecetTucd5pUM5OkbyFPMK64EOq+fQ17j +uo8cEADOKAJvGoAbpQBNzCvuv7DGfz+1T+4pBi3JrF187diVpzpjPohMQcW 1//9jVKzjF1GuKqLWY87LZbLH/Ej8g+Xhjd63y1mNVn6B9uoPiHyb+MmbFRa VczS+3Mx4Wl+FJHPmXcl0SymiPUs9gdfp+8LIl99etqhgBlFLEcDj27PDUlE viW+WOzC/kIWX/8gNSMrlcg7bwS+Sb9cwFI1WOYaJcsmcraAf/xRx3zW1D3H txc7IiI3iday3Hkxj7Vg0XfTq0cyiPyTet3eiN1vWb4W0pctOjKJXMzL1CR8 Wi6r8bzXyhCtbCKvyrm5wS8pm/X4rpTT3cQcIs9cN9m0Sy2LtRjFvir/kUvk /stMN0/OzWB1nvjxcsqKPCIf7eDhC1iTzpog7+45XimfyCs3ruO9Ou81q3tN S6wXq4DIJfpLVQ/HprFmNs5YmrqwkMh5yl1sj61IZtnk5YXeamXk54t2HpP3 jGe5Xhe5vsqpiMj3hlfl7MqKZiV63XKZMLOYyCdMHHGdpfaUNaDS9uLaZUbu qFPLv/BEIKvgHv8L8VxGnh/coxmjfIelL6pkFf2BkR9i8X2Wkd3Pvh/kfrrn DyN/vntFoa2jJ9tXPDE/Z4iRL11yKf5a3iP2qrTL13TZjLw4SvzoE+twdlN1 /5p3ZoycP7Sy1WEwhl3H3j3x4U/mvnYLblSYtDiBfXpYcceMM4x89HzbhrK0 ZHZohsBofhZjn5h5jVw1G1+ydSWVf1378T92Xrnsh2XQa3am0urSP3MYeVnk 8oVTz6Wzd5me3LxpLuMvF5nX92K4M9kvjQeDWb/eMvZ/mulx5UYW+8qrTLZU ARMP5iEmo12D2WyBHY0uqnZM/GxLK2k/o5TLfi/j3tMnzMRb67xZ55KvvWVf 9J291jGcic/V03Z+N3+cx471s0gPFWbiuYq99aZRTD574Wu2TzI3E//Tnity 3QwqYKdXjr/GjnpF5FdRrFXJuUI2r039+2p5Jr9mNtz9fFKqiN26ZUHfo4hE In/YoBtwL7uI7Vh2obSch8nfcoeALZFbitliWR9VrIIiifxOmPGqlUHF7AtB rR/PzH3MrMdwIJz9rpitYelSPfLVh8iPfXuqKvCzmK0mEqDyIeoakf9u0P3j /WmEyjOVlEy4EEbJmYj5zPr7+3fxtbpLwdcRyk2xieVoE0b6wSlxw4YTB4pZ zt3xtj2pd4meP6AnH/QkGv+fHuofehQD1X3UZVKKWRmqdiOWV4KJHpXby3yV jYpZyxWK/OWmRBD5tft634M+FLGy3rkaVdvHMvH247NCmmER6+M8HaFs0wQi 79e+mimZVMi642ieUM6VQuT3jon/ftRfwNptfvRd5bWXzP83zQ35zF3AalFa vGBp22sijxtd9Xb++HyWd1Cp5cJ76Qw/vT9+nd/9lhX29X7kgcVM/GRI1/KL vMhlUbds9B88yiLynTrvJ502ymFNySyYqjORic/7948/OTIum/VJINBPWJeJ 5z16ddxGLpmsRSqfBm76MPFvzOUlMeV3Oks1qvugchrDvYqInb7NGW9YW+U2 jCzLZPLotgiXo/2JV6xnXLyVi+OYvHs2NPfA1dEUVtP9VUrrbzD5qxDnJmOt n8gS5jcKdV3P5Htgm5bJoldxrL0RweZ6pYz8wo+SFb4TI1mzT+0fnqPB8OTI xmb5V3ahrHhlxf41Txj5s7y+TbPeerOCW6wk9rYy8p47lpsiW2xYg/vaC9b9 YuRBy96O52JfZ1+6w/0k4zsjF5BxKwyTesCe0m+hPFbHyKmTKmY8sY/ZNV1S X7/5MvLlH03yFstFsQtiMxKmbWDkEgrjG0/ufsHm16DSfNKY+3Ia+Lnv2Wgi 2/Xw8Y3zhRm5qfQrc76rqex1+63fbjjO2C0kqz26YOQVu521LSblDmPnto6Q Q7oqiC3GtUD8gj/jl51dDxYs2pzBHtbbb2zpxvhxaW5qoEtOJvtJeGJIpgnj d3lhY14thWz2lpTLrYGSTJzEWeo8+eWXw86INEzbU87wDU2W6pnZkct+FjH2 dYsxE4c/Y22r1gvksXX2e0kNdDJ8Sy70sJaVzmcHF/pObtvLxDkSil7UsryA 7T6fL8dDl8mLJ2cmRq2ZWsiOXSIeEv0pjcgF44ecFCsK2WmiTt+enUsm8o9O E17I2xaxM0RFLq+qjydyyylZTqf4itnqrw9HjdeOYeRWQ7dVrIrZO03aooeb njL5FV3wUTujmD1ipGLZ4xtE5I0feJfsGy1mB25C/MPh7szvyEXf0w/HRhDL RCHATSeYWgd8S6sxP1L+t97XLzp+KlE3mPDNFf5/M/x/AnAs68mhm/+vPzhu 9qcnQNxSMQnkE0QvJRn87Q8Kfyn3iF1yIPz8rxzryfyPnv+f9SjOtxYQXfVz hFo+c1fsxgf+1CKZmJ6gU57ov/Ig6f+TU6nuRmPdv0ZQ39df0Um6npQw/P9/ 5YHw/yP/V68Wsxcec0jRE9yzCdvNwXhmfODfOkN6ygIVCdnjxJ4jx2NOs36N UFwfdvvN9/Mndqtp7cty+T1C3d5+RUDysgNZj5aB2MMPv0fQr+8dS3b9rYfx +nnR+X2f/sqD5G6cpI54kucm/9WD//8f11X8h543/70uXo9qceonY804qjoq 9vG4V7ZUcMMGmb91PHVrxvrTt/cGUy+vetaGvzEjc6roxSam1ts9KcMCdb+E fj1KJzDm/+mljm6VXhlzJJa6xJNTX8fyInqMF15PK9F/RHElSr/Xp24SPcqv f5w7t9GDGo0w65y7xZroefTctmR+XxQVI1vVcZcVQvTwzN0wO3cwgHqVpXm3 RpH5bnFjwyUl1tPblI4wj8KsF9eJnqllhdR+4QgqzOeSzbbNT4me+zavQu1E H1DjdvfHrtnC7IdTMOvjgis5TlTNu5UWnaGORI/36ktqmmceU6HJVVf3mkcS PTNkOsc3W3pR6wTl8wrPMvusvrjp/DSZ9yZF/TILPZTuSvTwLQ8s3jPbntr5 Xs1PVS2O6JmsMe6oheBZKt12yR9TDeb82cP9wzN6uY5Qpde55MP2ehI97q7r Ctr5z6Gu6PTE0SOMngcveVy3Chii4knnP83VY/SMFs52y9mqhdJuL/SwOczo Odnp9bopzAVJaxTF9wkyeuY/ic3b/MwGTamK9Zswj9FjPcFRrD/FDF0YrD7X N5nR8/2tdH7VwH0Ufu3AS+O5sUQP3+l6X+9hB3TtyEPJq0LMuW/mQrscBYfO I0mjrIGYUXei522d7U7t6Ifou/vnPwuuRxM9OwtMjRa9uIM0dco//3Rgzgvo qFIXCAm9ihZecPDR3O5G9OTPtxR1/RGC+kpfbbx/JoroKR6wGOn5dRftTfW0 X20VQPSsn6+svtbiBspXvzPbb/ltxs4vElZYCEUjVt31U+VKQUTPHf+t6coi gch/1OdVkYo70TMp6eCnlUfdUJtKupXboatEzzx194TTa+KQrJJU/+ZWB6In jVdto7tsMPo+6dTaX+3WRE+qRP/izYqeaIrQOs+SMkOi59ZCO6EsozhUsjZn Xn+2PtFj/zTJcMAkGHWqbpwg8nYP0ZP8dN0e/r+cEI8/2KyQt5roWTlj85d1 x+OoPZ+EpZ9wm1ChtB7ksWv1pGPGwdScCPliFz4tMq92SfJ/seqkJ/Xphc3+ cPVNWA96Cnregx68nmu7aT2HnnHooUxTaD0CSRx6KH2xcYvdDT0p+zVSOzNP 7ib6S4toLk0BLuF1ek+nubT4CgeXkM78pTJPtD2p34t4pz+6d4joKROlefUm l4NXaNX0DzdcpOIo17Mtx/1XOBL9ufsei0ZKB1MFqgpqt1ZeIPovqvJ7jN/g SWnYHd+wQdiI6OHi1jPfL+ZJHVaqSKqiThK50BXpve59sZSQ5V5jJ0N3ov+W 4CmTjKFH1NVnhrxOJteY9Qeu+3iaz5M6emev54Ijp4mej+Xye5+XeFD6G+KP 2m44S+QXlGneDnDTvMX6AxbQvO2J5+AtCrydrrvS2YMyubL9b4t2juiJS6M5 HPyUg8NITraiiTc2hhoT1l21T86X6P+l2Ow+IyGIYjfF9+qtdyL612geW+HW 7k4Vbnseu4F1geiZLUfrCV5E68Fxkr6F1jOzhUMPlbqP1nNQjUMPVZJrt8n7 pjvFo1cZ6LL2EtEvGLaya3tbNHV/mtEW19kBZJ3Tx1nf3NgVSAnPdjddMPc2 WedljeUXHi90p2Q6PQydFl8mesZC6rIqot2oTxYF2nFTrhD5xLvJmgc+Padm f2J9sq4JIvpt+7nRkq8PqZy3mdU3GwgHUH1sitCW9W5UtqnzE4chwgG0evXk K5PT7lAKrw8dcHxrR+TVUfTv3Rr4vcP6TwvSv3cok+P3Dv2umd2+T/YO1Ssk nPGwyJ7oWd9Ay6uEOeTUzFr69/GAEMfvI7K125YUnx5JbUGWnzp/hJLrRsn6 fV2f7U/1ro+xM/p9j1zXb76Q7QD/bWroe3BTj+cNoueZ84X9Thdcqf6wJVId ZjeJvHOpV82BK8+ohReV5umHPyH6hd5ZmMba+VHxs1Hn3Mj7RH/M+2snN1S5 UNPLLrQXKDkQPb3i4yWXr3ChsmfIC5+YdYvIj5TSv+/c8PuO9cteon/f2Ts5 ft/RPpG76JatMzV/5Y7915sYPfwz6d99qoHjdx9FPC+uWRj2lLr4S62y71U4 0R9v/zRlboTP39/b20aTkC9zLrOBeMmmSU6U3oT86iOGTkTP7mhaj/hvWg+O /9/XaT2fXnHooSqO03qmTubQQ2VlDUz7oupIvdg/dDVVyJnoT71ztkFBMIyS Oaslky72jKzTLPqt0Lh53lTP8/Dq6eLMfssh9z+GNF279bc/OPMxt4TRoz7i VivxwoH6HVt6UsfWhcgnQP3TlkTXP1j/xxV0/RM/m6P+QaxebusJzTcp4VTL TGUxUv+g6/20fMErDjl18zpdL636zlEvoYauyCWzk0KotU8vrN4aGEWu2/um 8PmJlLuU16/dl7uCye84quIt+nZ62Q1KcGKjlYU2+R1HDz3kVIxUr1Ovr6ef 1+tj5M1aEQbPyh5Ro+apnofinhP9s0w2r66v8qAuuDyatiiROQek4QEKrNWz p1RkT+TwWN0helqmi7nx9V+jslduP6nwmZHb7pWaPSD4kCo2/Cx4Jiya6F9w 5/XmwPl/89f8eeXBZ8y5SBHX9JU1pl6lxHdcOdh8htQzSPEF96ZPErZU4j23 a2XtjLxT7uv+8s0PqDsqnz1cbGOI/j+hzr/GKTlTpnmOl+/YMedaimi17XNU sKFEdw/WftjlznCjO2WLvdpFapct0l/+gpEPpLYV6u+8T73PT1r7dk0s0b/W qChoqqYDVdeeOq99HXPOb26hs7XR7vOUTugGqcNTPYieK7L2n5M1rSgpEd1j 5nqMXO/2qkepKp6UtK22/am3jP4JeVFl79TsKZfWfXMfFDL65509R/3aYUlV z1+vuiuS0VMDemZfofXg/PoMeg63c+ihZp2j9VgKc+ihng+MUFecLKjxbj6a 3YOM/kPiVtTCI85U+ibRif3CcWSdRzWcu/boXaI+at39OVGU1MkodZ6hBPcZ U2r7mWkuXrNJnYxK6q23hGiaUJMaOpfbSzNyz2V0X1A1SvcFWP8idbovqLjM 0Rcg05WppqZShpRm303HtUqMHtvVtFxqgENOiffQfcR7O44+AgX6r+1s7rag Cvij1z/SY66791f08Ej/MYo1M60814C57uOTZy2fhe2nJLjeDFQeZfScSfLV 8HRVpXy+37n0ypiRlw4cTPL6LYfG+G6ebTBh9EewnX5ojRNHRdLSv8efYvSP r393PGyGJCWrbF+oc4rRs8THC12bKI+kZS5+iD7JyCdDH2QBfRCpY9PoPqhp IkcfhIy+Bg465u9AFc1HFqQeZ/QY59P9UaMLR3+ExP0O3byifx01/+AzGFRi 9PM4FPfnGFoir5i7s2ZuY/QHznQs/vzwGJKO2f7q005Gz1WVtYWzLh5HeSdv SspsYuTPO+j+K0Wd7r+w/pBQuv8SqeTov1D3+pGV9/1PIBGuazaS4oyeBwq0 fGwch5zS4KH7tZB+jn4Nqc5P7l/f64myJsQelIln8k5m2o1rlv32aOYRdTGd ZCbvhp8c1hxXcgZ5K81u+VjH5MU5ibKlnUOWqFhRLy/Di5Efh34w5yrdD2L9 FaZ0P5h0mKMfRLKT+rrnjlqh1iXZKbtVGT02U2j5WUkOOTUwj+4fg/Q5+kdU zx7U8qp/gALc5h5ddIThoat5pl3dO2fkGiInLqzP8PBG3OSvhzovovHvWnO+ 3mP0mPXHxulW2yD/Q/nZ22QY+Vgt3Z8ugf6UxHMe3Z8GHeLoT1Fj1/PcIGSL LPQGrkYjhtv25XTfmn2Oo29FVx/dzL67Jhhtin3lucWJ+T3KniWsmSDriUK/ 64WNu838Hik2iup0XrVDdfJL2RrFzO/OR9AzNY7Wg3kYN5vWo/yTQw9V20zr WaLAoYdav/i+zIUIe6QfEf6QrX7nf+KH7q8XQ39N+qZ+ur9OT+bor5HtFc+b j9yuo2ijmKYCNvP7u3Au3XfHqnD03WiFRuit5PjHKGp56R6FTUy9cebjW5Hd SV5ow/Ik7hhFpt4w1z6V91HjJloZm5ayy4OpH16CHlMpWg+2g+cnWk+qFIce KuQwrWd9PIce6r3OYq9IUQcUNzVnEf8wUxf5Szt27TgYhu4oZIufH4gg6zRY vtJ7gbY30pvK94w9zOwb/+FOr/OiDw5ISyzPfJoqo8dktXL/vDe3UGj/cQ8L X6YeU+WST7nf9hQ9Vbj44vF1pv4Mq5Zw8+30QfP0PHxfOTD1572MGSZGDo6o c0xlmWE7U3/WRtpKFm9zQvHrFG7PlWTkkQeK0z8cjEDu+p8ltvwJI/ovlm/3 ldB5gFjHlsiJj2fq56m3HTtE/zghl51Fz5ExUyc33ZbuXpngjK4U285xC2Lq avuvRnmtcc/QuqNSJ5uNmfpfxeyyqnKiHzrxo9Lb7SRT/7O1REXy9F0Qr6Nj fUI5U//POThvJZrgigQtdl4/9YfpL0aWDEp9Go1Ek3Yl6UmlMP0L98LBt3af /FEt5dkSnMb0L9t4oix6w11RHdrD2yXJ6KnZmsK9QOk2+tja+PLYDqaviX8k f6hZ4DkqNQ5S6v4UTPSv8Tx9zHPeQ/RU+JG92BizT1Fg6MH2FZW3kXaLkupM U6bPiijRfDd29A46fLj8tpwD06+lxdHzpWO19HwJ629/QM+XWoc55ktos5lQ pE7bHXT1btOWGXJM/+hiQcuneXPIqdgX9DzKSZljHoXGsfTX3eWOQQ6PI4vX XfYn17VU36PlMCEIlfDpFry46kqu22Hw+sihcjdkOt5/s76VLdFzMjLCMXGz O7L9NSzN52xD5FXoacmBohg0z2HTgiEfH6Jf6vl0XcOyIFQza5lwt58j0X+n /NMiqVB3pFdxPO6P90WiJymd1vMG9OD8HYqm9YgKcOihplbTevirOfRQb++Y dwT+dkeL7634XBJ4nolPlXHCPdaxyHWab/iEh/fIOj0X6dZNtnmEMi+pe18O usF8dzwn8tnYPg/EP3FcztgjK6a/2HDMWOyRB9ohnXj8z0NLxg4yBwZ9f8ai 1Etzvx0RciP6i75aZ5hwBaPh8Ua314hcJfpLg4VXTujwQNLOz+rqpM4QPbzj 1UN3zPBEx+/yHXGbbUbkoWr0XNF/Cz1XJPp56Lni24kcc0X0Xst1StsyT3T4 XvvMlZ9NmPxdSs8bu+ZxzBvRtjLtg8H749D5zLOafotsiH6lLlXd3IPBSDvd y61H7BTR/61PZP9hTU+Upjhu0kTNo0RPSuevxXJHPJHR0vTM/E8HiHwazDP3 wzyT2D+MnmcOq3DMMxHvqQD5t0aef+ulb6aLpTSYPsiUlvvs4JBTtU/o+eem OI75J+paftAm6299XLT3dHfLJOZ+V6z/tmbm22LWoVudPNdXBDLPB7cffsg9 w4NS0dk7rkGRiZ9ow50y112KWL6F2m3D15nnd98Lt5nMUShiPf2ZfvXAPuZ9 hkHt/IKFF+9QQ4vV41O1GQ5obVJXGpebz3I4peL+LfEN+X+r4x8yvh65TeWl TEi+L8ZwSb02WXiGSj5L6PfMIvUVzHNJcadmJHLSiRJc5bvYgJvhfIDUBSuU lsPaOc5khVQc8zy01l/rdfy0HJb5mM2MZXrM8/cT77eXbFF3oM7m3P4mXsr8 TjkrC3NrLstkaef7+ni0Mc9hrbU2aUX73qA+fhA6oDKN+R0/sypj0UPDDFb+ T/btj+eY57kn2eNYVrvPUT8T28Z13WLqvaYJ9enFgbGs6McDHmGjzPPlFTPj xGM3G1EBv0d+6a9n6ljNbDH7Vf7BrNomXq2lyczz6zOx3bNmVh2ibt96raGi zfz/vKQW1pCvHyskKXBEror5/6hr45sULA+jF2XmbOoA8//Xn7WN26Rzn42m DXlqdzL/Pxo2PszJxRh5fdz75sVq5v9ZCy/XOt8LY+ukhIy23WD+f7/W8sTh LHNULs5fZvH1f/pilfTL6w8+Y0+Zsmpz/z7m/9+025o9HDmHokU0ls2wYP5/ rp7sxfIN8eyB5CULlL0Z++y7/NPkQt8FJPodLavOZOrVAo0T3VyTE9k3igIL udSY/z+/6csJ5bvXUKPDmwg0lak/hVbXdscLvmKfK5+s/CObeV4/nldXcEYe m81zRn4kZR8j39YcVxr37gbaHewlfKCJqbtYJkXjFtels5eHaX0Tr2T87mK5 sPhbcAb7T/itGYtVGbniguGND4LvoA8PLp55MoPJC7mp++qnGRewNfp7ou87 MO/d6V2LS1Z44IYOBLueNDJh5rR2uWsrFGoK2Le+zzEQLGfeY3maGfx56Kw7 cp5sdLzMg5kb8z7OHdn8p5BN+d5V0nFn3gNcHrS8e7+aJ1r/9NiOJLY++f8Z 8WmDr+KK2UdU7sQorQ0h/3+2qyeGz+Avn8cu5drk7CH//9R+U5PMWDF76RSx nwl/HMn/h8FzB2lL+rkD/l1L2E8/d5iuzvHcgdqnTj938LnO8dyBaoS59GeY S2M9iwfpubRzPsdcmrokS8+fm9I55s8UZU/PgQthDoz1rF1Hz4F/beCYA1Ox C+k58JRfHHNgap8bPYfshDkk1vMohp5DHorhmENST9/T88a+eI55I6XbTc/9 fsDcD+sZQPTcT+IPx9yP6plAz/3WTeGY+1HX0uj5VVUBPb/Ceo4Y0/Or0E6O +RX1Yh09p0KLOeZU1GQJev4jz6LnP1hPxnZ6/tNyiGP+Q+m+o+c87Y0ccx7q agA9b1GaRc9bsJ65f+h5izQ/x7yF6jCl5y284znmLdQTmEsc/EnPJbCe8bfo ucT1WI65BCUsQM8lJsVxzCWoZDV6LvHYlGMuQWXAfODZRHo+gPUvnU7PB9qO cswHKM8Iej6wQYVjPkDZLaPnAyeUOeYDlPtruk+/6E736Vj/Rwu6T1d5zNGn U6wEuk+3b+Ho0yn7YLo+32FC1+dYT9Fduj4PWsRRn1Nd5XQdvvkIRx1ONUE9 rPqEroexnmXb6Xp470SOepjaYUzXw268HPUw9S6arodNuEb+tx6m2FBHrcyi 6yisf3U3XUf9Nc7/1lFUzQBdR81S5qijKJ9uuo4qlOCoo6j1QvRzzzgxjuee 1AYP+nnflWscz/sokcX0cxD/1RzPQah7P+j5WHwrx3yMmtRHzzGqDTnmGNTV a3RfX3eCo6+nCrTpOvPHfY46k1qVQD8XW2XB8VyMEvSln0fEfeZ4HkGtK6Hn yV1hHPNk6rUQPV8VteSYr1KFYXT/daiNo/+iasctVrDUjaN6uXs2fNC3Yt5z MNzaVHojgipYHWZu+tySCuU/O+j05S/3xreXW5x7Tq06GPtmohYTV5nvLY4/ XhpGfRnYdzlptR/5f2WzQxsGtj2hemevye8pYLg3/0rYBouCQGrLryhJBd/H 5P+Pybvs1FVwoOw8vW4lyzH5+0Tw+JdNm22phpjkSxF6EeT/1X3HKf66dQtx 86vrTVzJ/H+V9pF0g/jraAOfhXfAOub/g3yGrtoN3kPC2eWmnf9fHecdTvX7 /3GljAalaIqEBiWRrLwaklGKKLtFKKREH0kZoY2QvY+99+p02xzOUMhK9h5H RONjfH2/5/R+X9fvun7/Pjyv+7rfr9fz+XLc7/uwwPOr0kh89mzgDbKZO++W ej8B0y/JXc+frQ5BbIJrCJ7T+L2L4l+No30Uf+RLsDlLOR+P6Wld++dIW6NR mfHdzZuW8PlM7tmoIKgdgo6HZIpV1RMwvVSzwt2+0FR0ivfuU5b1eD1HXoWw 8yfEoe+gt3PRNBDTlwhSjXVNMpFc2cj3gnJb/D6SCvnzyoBEVLcUIjrdeQPv l63M7uxbmfBAxOn8q0Vl/Pyf8GKrQEgiVBhe2Jv9QAfTW14ZeDLMmQFe1gd7 DBUCMH2B/MPhnr0JUKt4Wyw3xQfT80quS1ExTYCdaYTwoCX8HlE2uZTN8kw0 pMTS6QrPozG9BuUn2VbjHRxO0dDPd8Hr/+5Jl0Me/QWQbVLaCES8/ue9p+YU XkegZ1v0+H6z4/UvkPTcpB8WiBSn+m7xBMVh+qh088X3bTHo8dsAt5FW/FxL 2kJC0nQ8DHXyLwiVjOB+m30i2zx+Jx1JNl/Jrn4VhOkfyeztCP0Zjz54eKdP p/ti+tuuExpbIBOmLloSh9ncMP03v/7iHq1EoPo+5ZbY/wTT65muFXPUS4Gb T3QSgnfhnx9+7nP/lqhBADWr6oTRL6GYnqUuu5i9Ow5EDaR62O4nYnrrl+t1 P/BHgXYAq7ddcAym//7SojPCPwaWOOxaPnPgftO0WLnhhHwo1P6es/d0wf0W cXWX2NPlv7PeEF34hlbieSkPjtL1+OQO7QKEediRCNFMveODuyDS8BB4i/gt A3RxfckgMWLY3hq+anqR37/E80Wqvcnea/UIEbdze/ho4XqFsOzZ3BkHpCwx o6B+D9f/3Gq+ag16g1rKt1w6OIP7YZ/LXS/LVi9E+DVaHNGN+8FcvkI4e+A9 KhS841tNxH8/SrRcIGaM+KLOFYKtx8bjsf0bbJaUMfZLQ6bfLkoUXQ/D9AJ2 Yh5rDeMRn0Ece7G/P7b+g8fvqfHKmWjXmfqhH0UumD7/xaJm74NEdKJFNkjv tz2mZ3Nm3GP5zbzH8lfPqfpH9WRCBvzx/PpCU84X4ySC8jA3IQFmz0mUhhq+ wtaJFGHcB8hh3gf4q6/Y+FqGpyERMlZLHxG0j8P4P9bluzkMYwD1E7szTaPw /I4z3ivdZWe8V/qr317V9FnH9CZaKhma4zTFOSvH02tazaYoeOeWc1Z+eF8+ HmKcz7xxZJzP/NXXnvy05ue2TFSYcXUVz4oXGD/6arOdpEIiMgi3WnNNxhVb Z4p5/8SAi3H/5K/ejWvpUqJNGrzQ3zde+wvvy94/kTLPhuJgt15slJjte2yd gKOM97m3VRjvc//qZfp6n69UfQ/aYffSM9tx3m0rrEKa9obigK9Dsmdx/+QK M85F3zHPRf/qh6l2h9w8U5DzxJyxcSt+r/L8kdsOr78SUNH+++uoO0OwdU44 aNDsk2ngN