10951 lines
480 KiB
Mathematica
Executable file
10951 lines
480 KiB
Mathematica
Executable file
(* Content-type: application/vnd.wolfram.mathematica *)
|
|
|
|
(*** Wolfram Notebook File ***)
|
|
(* http://www.wolfram.com/nb *)
|
|
|
|
(* CreatedBy='Wolfram 14.1' *)
|
|
|
|
(*CacheID: 234*)
|
|
(* Internal cache information:
|
|
NotebookFileLineBreakTest
|
|
NotebookFileLineBreakTest
|
|
NotebookDataPosition[ 154, 7]
|
|
NotebookDataLength[ 479918, 10943]
|
|
NotebookOptionsPosition[ 454530, 10559]
|
|
NotebookOutlinePosition[ 454954, 10576]
|
|
CellTagsIndexPosition[ 454911, 10573]
|
|
WindowFrame->Normal*)
|
|
|
|
(* Beginning of Notebook Content *)
|
|
Notebook[{
|
|
Cell[BoxData[
|
|
RowBox[{"f1", "="}]], "Input",
|
|
CellChangeTimes->{
|
|
3.9918455833864365`*^9},ExpressionUUID->"e6c462cd-8982-3c4a-8614-\
|
|
a4032c2a753f"],
|
|
|
|
Cell[BoxData[""], "Input",
|
|
CellChangeTimes->{{3.991845586273697*^9,
|
|
3.9918455862781773`*^9}},ExpressionUUID->"abfd70d0-05dc-ae40-8117-\
|
|
a301872389cf"],
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"f2", "="}]], "Input",
|
|
CellChangeTimes->{
|
|
3.9918455848875866`*^9},ExpressionUUID->"ab6f3c19-7b16-eb44-924b-\
|
|
0479fa42666f"],
|
|
|
|
Cell[BoxData[""], "Input",
|
|
CellChangeTimes->{{3.991845587327196*^9,
|
|
3.991845587331728*^9}},ExpressionUUID->"6e63ff1c-fb16-304a-8e59-\
|
|
6a9d82a9fa7a"],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"Ir", "=",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox[
|
|
RowBox[{"A1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}]}], "A"], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.16", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "1"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"1", "/", "3"}]]}], "+",
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.16", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "1"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"1", "/", "3"}]]}], "+",
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.16", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "1"], "*", "d"}]}], ")"}], "2"]}],
|
|
")"}]}]], "Input",
|
|
CellLabel->
|
|
"In[233]:=",ExpressionUUID->"764f2b72-583f-404a-86dd-302e46704fa0"],
|
|
|
|
Cell[BoxData["2.3793916761039797`*^-53"], "Output",
|
|
CellChangeTimes->{3.9913335367025833`*^9},
|
|
CellLabel->
|
|
"Out[233]=",ExpressionUUID->"a1ad1275-791c-2c4f-89d0-0191b45c7ed9"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"Il", "=",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.16", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}]}]], "Input",
|
|
CellChangeTimes->{
|
|
3.9915575926932735`*^9, {3.9915581188955975`*^9,
|
|
3.9915581216343517`*^9}},ExpressionUUID->"296c29c6-b9f9-1d4a-99c7-\
|
|
5d23057d1dfa"],
|
|
|
|
Cell[BoxData["5.020725113795862`*^-55"], "Output",
|
|
CellChangeTimes->{3.991333536726557*^9},
|
|
CellLabel->
|
|
"Out[234]=",ExpressionUUID->"3e2faead-b69d-5c48-9979-35e754d12d58"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"Ih", "=",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.16", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*",
|
|
"f2"}]}]], "Input",
|
|
CellChangeTimes->{{3.991557595005127*^9, 3.991557596789215*^9},
|
|
3.9915581158968887`*^9},ExpressionUUID->"da02f8be-1800-4945-83f1-\
|
|
7acaa76423f4"],
|
|
|
|
Cell[BoxData["1.871372642785671`*^-54"], "Output",
|
|
CellChangeTimes->{3.9913335367515736`*^9},
|
|
CellLabel->
|
|
"Out[235]=",ExpressionUUID->"4f5ae42d-c740-c045-be91-9f9e31eab3b6"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"Qb3", "=",
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.05", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "34"}]]}], ")"}], "2"],
|
|
RowBox[{"1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}]], ")"}],
|
|
RowBox[{"-", "1"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"Ih", "*", "Ir"}],
|
|
RowBox[{"Ih", "+", "Ir"}]]}]}]], "Input",
|
|
CellLabel->
|
|
"In[236]:=",ExpressionUUID->"c6346807-3d42-e948-8c5a-115ea1f6a2c2"],
|
|
|
|
Cell[BoxData["25.178011816139865`"], "Output",
|
|
CellChangeTimes->{3.9913335367605553`*^9},
|
|
CellLabel->
|
|
"Out[236]=",ExpressionUUID->"2bcde3f6-d18f-c142-963c-217812e9dc72"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"Qw3", "=",
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.05", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "34"}]]}], ")"}], "2"],
|
|
RowBox[{"1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}]], ")"}],
|
|
RowBox[{"-", "1"}]], "*",
|
|
FractionBox[
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{"Ih", "+", "Il"}], ")"}], "*", "Ir"}],
|
|
RowBox[{"Ih", "+", "Ir", "+", "Il"}]]}]}]], "Input",
|
|
CellLabel->
|
|
"In[237]:=",ExpressionUUID->"474c5dd1-c344-a04c-8714-ada3650bf998"],
|
|
|
|
Cell[BoxData["31.32034821453639`"], "Output",
|
|
CellChangeTimes->{3.991333536783556*^9},
|
|
CellLabel->
|
|
"Out[237]=",ExpressionUUID->"482feae7-b6d8-8143-b572-b9146e6d2e0c"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"hb", "=",
|
|
SqrtBox[
|
|
FractionBox["Kb", "Qb3"]]}]], "Input",
|
|
CellLabel->
|
|
"In[238]:=",ExpressionUUID->"2305be88-628a-524a-b468-85b3cc42efc7"],
|
|
|
|
Cell[BoxData["0.7475613664925793`"], "Output",
|
|
CellChangeTimes->{3.9913335367915726`*^9},
|
|
CellLabel->
|
|
"Out[238]=",ExpressionUUID->"1c1deb9e-a6ca-0143-8db8-21cdffc73907"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"hw", "=",
|
|
SqrtBox[
|
|
FractionBox["Kw", "Qw3"]]}]], "Input",
|
|
CellLabel->
|
|
"In[239]:=",ExpressionUUID->"426f7e1e-7abd-a446-8679-e422e283f98f"],
|
|
|
|
Cell[BoxData["3.5403946764909393`"], "Output",
|
|
CellChangeTimes->{3.99133353681583*^9},
|
|
CellLabel->
|
|
"Out[239]=",ExpressionUUID->"ae59e030-d7e1-1a4a-8ffb-9ecfb821ce05"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"Cw", "=",
|
|
FractionBox[
|
|
RowBox[{"Qw3", "*", "hw"}], "1"]}]], "Input",
|
|
CellLabel->
|
|
"In[240]:=",ExpressionUUID->"933badd0-5ce1-e645-bb03-d046b1312945"],
|
|
|
|
Cell[BoxData["110.88639408458714`"], "Output",
|
|
CellChangeTimes->{3.991333536826782*^9},
|
|
CellLabel->
|
|
"Out[240]=",ExpressionUUID->"c953f025-a342-2549-9fa6-f90bea449e4f"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"Cb", "=",
|
|
FractionBox[
|
|
RowBox[{"Qb3", "*", "hb"}], "1"]}]], "Input",
|
|
CellLabel->
|
|
"In[241]:=",ExpressionUUID->"2d8a17a7-6a4c-d94e-b0e2-4da7c60ebbeb"],
|
|
|
|
Cell[BoxData["18.822108918839827`"], "Output",
|
|
CellChangeTimes->{3.9913335368508377`*^9},
|
|
CellLabel->
|
|
"Out[241]=",ExpressionUUID->"6e8c23f5-f692-db4e-8373-e6c78b3e7fda"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"o1", "=",
|
|
RowBox[{
|
|
RowBox[{"1", "/",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], "+",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*",
|
|
"f2"}]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.05", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "34"}]]}], ")"}], "2"],
|
|
RowBox[{"1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}]], ")"}],
|
|
RowBox[{"-", "2"}]], "*", "Cb"}], "+",
|
|
RowBox[{"Cw", "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], ")"}],
|
|
"2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.05", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "34"}]]}], ")"}], "2"],
|
|
RowBox[{"1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}]], ")"}],
|
|
RowBox[{"-", "2"}]]}]}], ")"}]}],
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], "+",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*",
|
|
"f2"}]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.05", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "34"}]]}], ")"}], "2"],
|
|
RowBox[{"1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}]], ")"}],
|
|
RowBox[{"-", "2"}]]}]}]], "Input",
|
|
CellLabel->
|
|
"In[242]:=",ExpressionUUID->"042e7197-09fd-dc46-b3fd-dc1740a81970"],
|
|
|
|
Cell[BoxData["0.042044960793272385`"], "Output",
|
|
CellChangeTimes->{3.9913335368758316`*^9},
|
|
CellLabel->
|
|
"Out[242]=",ExpressionUUID->"d074617c-8fe0-114b-b207-70158bd6cc83"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{"2", "*", "x", "*", "x", "*", "o1", "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-", "x"}], "*", "x", "*", "o1"}]],
|
|
RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",
|
|
CellLabel->
|
|
"In[243]:=",ExpressionUUID->"bccf6e25-da00-4449-8f0f-f2b61c58f67f"],
|
|
|
|
Cell[BoxData["4.322031867849089`"], "Output",
|
|
CellChangeTimes->{3.991333536973074*^9},
|
|
CellLabel->
|
|
"Out[243]=",ExpressionUUID->"cdd7cedd-6455-ac4a-8fce-733ce51f863b"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"o2", "=",
|
|
RowBox[{
|
|
RowBox[{"1", "/",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], "+",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*",
|
|
"f2"}]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.05", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "34"}]]}], ")"}], "2"],
|
|
RowBox[{"1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}]], ")"}],
|
|
RowBox[{"-", "2"}]], "*", "Cb"}], "+",
|
|
RowBox[{"Cw", "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*",
|
|
"f2"}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.05", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "34"}]]}], ")"}], "2"],
|
|
RowBox[{"1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}]], ")"}],
|
|
RowBox[{"-", "2"}]]}]}], ")"}]}],
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], "+",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*",
|
|
"f2"}]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.05", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "34"}]]}], ")"}], "2"],
|
|
RowBox[{"1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}]], ")"}],
|
|
RowBox[{"-", "2"}]]}]}]], "Input",
|
|
CellLabel->
|
|
"In[244]:=",ExpressionUUID->"9f9260b3-ca67-3f4a-a0c4-5bf2cb98e110"],
|
|
|
|
Cell[BoxData["0.011395075201487413`"], "Output",
|
|
CellChangeTimes->{3.9913335369870644`*^9},
|
|
CellLabel->
|
|
"Out[244]=",ExpressionUUID->"aa72f32c-329c-9c4a-b6f4-833dbea197c6"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{"2", "*", "x", "*", "x", "*", "o2", "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-", "x"}], "*", "x", "*", "o2"}]],
|
|
RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",
|
|
CellLabel->
|
|
"In[245]:=",ExpressionUUID->"52f82243-9920-3742-90e6-48395671d171"],
|
|
|
|
Cell[BoxData["8.302069082299768`"], "Output",
|
|
CellChangeTimes->{3.9913335370800858`*^9},
|
|
CellLabel->
|
|
"Out[245]=",ExpressionUUID->"e26071fd-e2c1-5f40-9a42-81481b4dd96b"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"h1", "=",
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}],
|
|
")"}], "/",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], "+",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}],
|
|
")"}]}]}]], "Input",
|
|
CellLabel->
|
|
"In[246]:=",ExpressionUUID->"a147c908-551b-8647-9cf0-48614f0cb274"],
|
|
|
|
Cell[BoxData["0.7884625602161153`"], "Output",
|
|
CellChangeTimes->{3.9913335370930634`*^9},
|
|
CellLabel->
|
|
"Out[246]=",ExpressionUUID->"88673969-cab9-0b40-80f0-7c0bcdf60439"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"h2", "=",
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], ")"}], "/",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], "+",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}],
|
|
")"}]}]}]], "Input",
|
|
CellLabel->
|
|
"In[247]:=",ExpressionUUID->"4c078cff-433d-8245-900f-0a3b49ecb9e6"],
|
|
|
|
Cell[BoxData["0.21153743978388478`"], "Output",
|
|
CellChangeTimes->{3.991333537118065*^9},
|
|
CellLabel->
|
|
"Out[247]=",ExpressionUUID->"bfe4c50a-d3a5-244b-8f56-30e5a15018a1"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"h3", "=",
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], ")"}], "*",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}],
|
|
")"}]}], ")"}], "/",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], "+",
|
|
"\[IndentingNewLine]",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*",
|
|
"f2"}]}], ")"}], "2"]}]}]], "Input",
|
|
CellLabel->
|
|
"In[248]:=",ExpressionUUID->"f07c74eb-272f-1743-a996-1dc503a54262"],
|
|
|
|
Cell[BoxData["0.16678935135356415`"], "Output",
|
|
CellChangeTimes->{3.9913335371420746`*^9},
|
|
CellLabel->
|
|
"Out[248]=",ExpressionUUID->"857149a1-8aab-954b-86f3-2a3228e46ae1"]
|
|
}, Open ]],
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"Clear", "[",
|
|
RowBox[{"x", ",", "y"}], "]"}]], "Input",ExpressionUUID->"c5ebf9ff-e333-\
|
|
7b4d-b8d5-46482917dc06"],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"J1", "=",
|
|
RowBox[{
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
FractionBox[
|
|
RowBox[{"4", "x", "*", "x", "*", "y", "*", "\[Pi]", "*",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
UnderoverscriptBox["\[Sum]",
|
|
RowBox[{"n", "=", "0"}], "100"],
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
RowBox[{"2",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox["1", "Cw"]}], "+",
|
|
FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}],
|
|
"2"], ")"}],
|
|
RowBox[{"2", "*", "n"}]], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox["1",
|
|
RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}],
|
|
")"}]}],
|
|
RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(", "x", ")"}], "2"], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
RowBox[{"y", "*", "y"}], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]],
|
|
RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}],
|
|
RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input",
|
|
CellChangeTimes->{
|
|
3.991845612037445*^9},ExpressionUUID->"e7569d02-bed5-3743-8058-\
|
|
837bf8cfd65c"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"3.2914107257951473`*^-244\\\", \
|
|
\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\
|
|
\"]\\) is too small to represent as a normalized machine number; precision \
|
|
may be lost.\"", 2, 249, 217, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913335371540604`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[249]:=",ExpressionUUID->"3a1412e4-c6f1-e745-8a72-cd3619617eb0"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"8.101217087106948`*^-252\\\", \
|
|
\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\
|
|
\\\"]\\) is too small to represent as a normalized machine number; precision \
|
|
may be lost.\"", 2, 249, 218, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913335371630745`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[249]:=",ExpressionUUID->"413e4690-bb6f-134e-9c1c-5e19bdbe37ff"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"1.9939692660683834`*^-259\\\", \
|
|
\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\
|
|
000\\\"]\\) is too small to represent as a normalized machine number; \
|
|
precision may be lost.\"", 2, 249, 219, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913335371710587`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[249]:=",ExpressionUUID->"557c737f-44e5-b047-9b96-8c222633e876"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "stop",
|
|
"\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \
|
|
\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
|
|
during this calculation.\"", 2, 249, 220, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.99133353717906*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[249]:=",ExpressionUUID->"0989ac4b-acdb-9949-b4d2-70d1b9f65dbd"],
|
|
|
|
Cell[BoxData["4.322031867849086`"], "Output",
|
|
CellChangeTimes->{3.9913335399194164`*^9},
|
|
CellLabel->
|
|
"Out[249]=",ExpressionUUID->"0cfc830e-08fa-4f4b-aef5-0a6c70777af2"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"J2", "=",
|
|
RowBox[{
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
FractionBox[
|
|
RowBox[{"4", "x", "*", "y", "*", "y", "*", "\[Pi]", "*",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
UnderoverscriptBox["\[Sum]",
|
|
RowBox[{"n", "=", "0"}], "100"],
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
RowBox[{"2",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox["1", "Cw"]}], "+",
|
|
FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}],
|
|
"2"], ")"}],
|
|
RowBox[{"2", "*", "n"}]], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox["1",
|
|
RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}],
|
|
")"}]}],
|
|
RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(", "x", ")"}], "2"], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
RowBox[{"y", "*", "y"}], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]],
|
|
RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}],
|
|
RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input",
|
|
CellChangeTimes->{
|
|
3.9918456299851303`*^9},ExpressionUUID->"71739d4a-f3fc-9d4f-b803-\
|
|
99b4407cdc6f"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"3.2914107257951473`*^-244\\\", \
|
|
\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\
|
|
\"]\\) is too small to represent as a normalized machine number; precision \
|
|
may be lost.\"", 2, 250, 221, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913335399544125`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[250]:=",ExpressionUUID->"726ccd2e-9850-144f-ac6f-a8db23e40300"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"8.101217087106948`*^-252\\\", \
|
|
\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\
|
|
\\\"]\\) is too small to represent as a normalized machine number; precision \
|
|
may be lost.\"", 2, 250, 222, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913335399644184`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[250]:=",ExpressionUUID->"d5c6080a-ef9c-5541-93e6-fcef34fc5c6b"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"1.9939692660683834`*^-259\\\", \
|
|
\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\
|
|
000\\\"]\\) is too small to represent as a normalized machine number; \
|
|
precision may be lost.\"", 2, 250, 223, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991333539972414*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[250]:=",ExpressionUUID->"a5735bd1-5fc2-3c47-a19f-be9d8c805502"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "stop",
|
|
"\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \
|
|
\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
|
|
during this calculation.\"", 2, 250, 224, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991333539979416*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[250]:=",ExpressionUUID->"1dd8474a-97c2-3246-8ead-1536370ac767"],
|
|
|
|
Cell[BoxData["8.302069082299772`"], "Output",
|
|
CellChangeTimes->{3.991333542631773*^9},
|
|
CellLabel->
|
|
"Out[250]=",ExpressionUUID->"96c807db-2e4e-1f4a-822d-d2a69cd27982"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"a", "=",
|
|
RowBox[{"Plot", "[",
|
|
RowBox[{
|
|
RowBox[{
|
|
FractionBox[
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
FractionBox[
|
|
RowBox[{"4", "x", "*", "y", "*", "\[Pi]"}],
|
|
RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{"2",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox["1", "Cw"]}], "+",
|
|
FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y", "*",
|
|
RowBox[{"Cos", "[",
|
|
FractionBox[
|
|
RowBox[{"z", "*", "\[Pi]"}], "180"], "]"}]}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(", "x", ")"}], "2"], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
RowBox[{"y", "*", "y"}], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]],
|
|
RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}],
|
|
RowBox[{"\[DifferentialD]", "y"}]}]}], "1"], "//", "N"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input",
|
|
CellChangeTimes->{
|
|
3.991845637746252*^9},ExpressionUUID->"762274ee-d7cb-9644-9b5c-\
|
|
516685cd7481"],
|
|
|
|
Cell[BoxData[
|
|
GraphicsBox[
|
|
InterpretationBox[{
|
|
TagBox[{{{}, {},
|
|
TagBox[
|
|
{RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2],
|
|
Opacity[1.], LineBox[CompressedData["
|
|
1:eJwd13k0Vd0bB3BzEjJmCmWqS0qu4YrsJ/ci8yyExD0neZUxr5Ch0qSkUqlX
|
|
URKJhChDUnlLUvQSpcgQleneZKrEb5/fH2ed9Vl77ef5rr33Onud1YFhrgQf
|
|
Dw/POH6od8Tr9Wvut702j/dMVd14g4PMJ24YBrKKUUqplRrlvhyjTA1WHQo4
|
|
cUKbsjP7lZAo/V+0bdiZQbksNumpIKsF0Z9esqN8/Jl8Q1LRG+SvSrApV7dF
|
|
XJ3Xf4vO/Sw/SHmkuzlhf+07NO106CZlxSH17TPMj+jgqs5WynacBJOolk9o
|
|
Mvj2AuX6+ZFlsUX96K4WP10fuzNFLr5q7yAy9ewJpTwhxBqZ0h9C7VMmxZSF
|
|
ToZ702eH0d8L8t8pq0heaYqo/Yq8wuJM6diOSjM3J5hjSHVfYx9lMldtha7w
|
|
BIrjKTE1wE7SdEr9q4WDTPvksim/k+vYGF30HYWmRu8xxGb7hOw+d3ISLUdk
|
|
L2VuNs+18r0/UI1Bt7sRtrCarsR3/WmU8WCrqzF2JvuptYTsDHJgMN9TXlXg
|
|
nbRhdga97XxEMLAZ645M7KmdQ4bO6LQJdrDRp5YR5jzimnlqmGFPxe4TENH6
|
|
g3gaArooJ9cuM6MJLyBt+fHTm7GzgHF7V8siClRJk0RUvvwmVmQRL7hZfPC0
|
|
wC56dq4vRYkPmIY/DJlU3i/+CWdO8kFlzklFFnaC9nTF3b38kHyTOWVJ5S1d
|
|
rc7RF4TcmYZvNtjdbWP1C3mCsFxjcMqWyj9530dcVgh6PI8I2mMXGzie1Z0V
|
|
guFTTsaO2I3VcbyhtcJAixn96Io9/bT901emKMi2mOj5YUvZi0rE14vCtP/h
|
|
Mn9svQ4WiJmIQVqepUkAdsjnytyN68XhQpeObxB2OF+L3mZRCWj8doizG3tI
|
|
7c731BlJMDGzsY+l1odsXtpKlwKJtO8Gcdh8t4dXy0dIgXWpuEYClZeu6lo0
|
|
KgW132/KJmP7MDPKX/dJQ3+WndUx7NagyCi5l7LQ+c6y5xJ2b0F6WoDwCgju
|
|
0tbNxh4bLcq7ZbkCrHYcPHQVWyR6sN20YQWkBx9j5mGzDrsbBFTKwWLXqEQJ
|
|
ds0No+nCHAXY9vdI32PsG0O/YjZFK4ObyUF3LvZWj6O9USXKEPzLcfMPqn6j
|
|
tFXJsDIcza3UmcE2uLFOdpW3Ckx9dVKYp9Yz0L9C0FwVHiZXGAvnc9Akp+/v
|
|
r4dWQbu7eMpqbOk9rHsVDmqQffAhywt7+IZIsHOIGtDKQ/q2Yz/42KY0fkQN
|
|
mJdvp+zA9rX3O6TVoAbBD750kNg3dGJcL+mrw4A8s34ftsFIATdRTgO+Vrln
|
|
Z2K771qma9uvCbbHWYc7sVGMh/62P5qgouxY142tnZpjzFbQgtmG4p+92Dx5
|
|
dItEFy14ZRF8+At2Se/2beWPtWDR/837OWwhz+IUxetrYM9hg8Mrb+J8LIfO
|
|
kUAaPJ+MfLsLO8/t4ofZRBocI67dD8VOD+zvE/iHBim5K3MisNnJ+0ZV2mkw
|
|
6Dx3IB5bsu4KjxtTG4rqzeJPY4fQJ7Rr1XVgx2B11ANsJbXTSWmf18HSDTE+
|
|
4gUcVHdiivaTTxeCHhn6y2D7/vDuIFfrws48rWBF7KuNGjQLf13Y1nQ5XQtb
|
|
bVfNf3NduiCu9lgTYWsXD2mSL9eDd9qthAhsZSUVcpW3HuzT57zoxl6XHy36
|
|
G+lDbY/ai0eFHBTIPjSt66gPD8uzO55hZ6mf7Q3w1Yci4cChV9j810vvPovV
|
|
hwNnXq34iN19dcT9bJk+XE9YWT2HfTwr4ApNnQ5x46a/9W/h/U2zX+8lZACm
|
|
5w5G3sa+FqnhXNliCMNvjGSKizioLQYZH843gYqZ6jWqJRy02v+to1/oZjBm
|
|
d3AHSjmIWKy6o7wf4JvM/t5n5RwkN/pgiVygBZj3cBfMqjgomm728aw2Cwb4
|
|
N5U+rcb5x+ebpEcsIcqlYEnCQ7yfFlFLclqtgRFp3NXyGJ+fqZDHxZk2ECWw
|
|
6b3UMw6a2yL/qjHJDpYGqj+dauagHh7+7/07HWBDaPOR360ctHdlWEaKuhOs
|
|
M/2g9LGDg+7sbmo4n+oM0r9kuj26OSjuh8Kszm4XcA8au3bpE/5+2Fp5Pt/h
|
|
CpmbWQuRQxxksv3MliEXNyh5u9vAeZSD/lO4EtJId4fmII/GXi6+T24eqitc
|
|
6wFpCV7dMzP4fPVp2zuKecIv0UCd8nl8H3Rwd8WMewK/cGK6Ni8X0c+fKc7r
|
|
2waxshczGQJcdEXgx/qzT71g7a3qZ+JLuKhqy4bu1GpvsK/5fFlRhIuyjE9I
|
|
zhf5gDUSShMT46LWD/lH6Ce3g/DtFtPHy7mo0iFbIzzZF6qmb2VdleKi73vc
|
|
ePay/cDjzbN/GLJcNG1FC55g+gM79XVimRwXFY6/n4sy2gFk/Htea0Uu8rqW
|
|
H+QnGgArKxXmzq/koopyux38RwNAPanSdFaFi0yU/vt5/GcAlJGJWyRWc5F6
|
|
367uN7t3gvWmgooFNS76vOwvp+zBnRCerzbE1eCitnTHIGuPQLgdc0I+W4uL
|
|
MmNzlu1rC4RIi863aC0X1dUv/gyyCQK+e+Pb7tC4aLkvHKXXBIGFVI9wtzYX
|
|
rZJ53rqyLgiq7KcberH1WhzkheqDwKVwdt8gtqvZ9lvvHgdBjE915xh25sqY
|
|
lwdeBMHJD1pRi9iKPbeXN70LAtZlXzkNHS7S8JfL8p0NgtbQNyJ/YZsETBSm
|
|
GrChbs2FNA72zUvcKEcjNujUPWL8wJZpnzSXY7Chtk1rcAZ7wnK2o9CUDeap
|
|
xRsWsG/o8PC2WLChK/J0geg6LhKflfSWcmFDaWmiFA378ynDpTl72LD1Ktm+
|
|
A9vluXHHrjA2XOe2rAnCrufZlKMXwYa5yN37SexLUeaGT6LZcJfGktmD7eht
|
|
vXMong1rveLWxmFXa3hX65xgg5V8TfM57PTahN0PbrJhd4n0dCP2Hv2LJrGF
|
|
bPhbqa/vObb9rbKljCI2DG2Ye9GMLXJx+Nb9EjY8yhDJbMNOjXQeqbrHBjOV
|
|
iiUfsRNoGn9VPmGDqMdo6CR2yMWXoeW9bGAcatBV1uUiG/Fhs8g+NoS7FD1R
|
|
xV6byiOmP8AGZeh2V8MejjQsKRtiw4n3yyLWYO90zBm/O8YGvpSyYxuxvQSj
|
|
9pb+wv3dBw0ssa2jFMOLVxDw/FprUgj2k5wjtmflCZik/zseim3WMqkRq0jA
|
|
nwtJXmHYepov3zNVCKiXt9CIxlboimd+0CSgQO5n5gHs0U09K0QMCWjYKPzh
|
|
NPZpvtyHu9wIePgxea4MW2SDaJaDBwGdEXULFdiHt8dG0rcRwHf+Pm8Vduw9
|
|
5zWLPgTYjY/+qabyk7xnLgQSoPZia+tjbHpzIPvfCAI2y1S8bcPuOqO5TD2D
|
|
gLQ3HuFj2HeQWPDXMwQ8Ni6aHKfqj081lpwjIEBUK5KDrW/TmMi4SID61XPB
|
|
k9jpPEGTDlcJeFfDpM9hW4Xlvo8tJsBk3SDiX89FysrHjMzvEOCyNS9TAHuq
|
|
Oewc/10CdP2ODwtiX9dCDukVBDAUn6cIY//p6WnIqyGAJ03oghj2PXulwtdN
|
|
BGjpHjKUw077xSeY2UxAsuAlX3nswMKRnd4tBAhmtCcrYEsI1Ch9biXAJ7yq
|
|
QQk7tNbr9M9OAiR9NqqswlbXvhCjMUTADrsxp7XYv7oOtH8bJqC9i2VDw25L
|
|
JfRKvxKwuNCAtLET+w1GTMYIEOtV11iH3Z3V7uf0g4AU3bPNG7DPLpG0jOMl
|
|
IXqVQLoRdt1kz/ZofhImni6LMMb+0lMUuVeQhIF/UpwZ2Gb3WLmBS0nIu3Zf
|
|
YBP2cEDsb1tJEmpV7Sw2U/ntLaUspUlYlfxE2Bzb1FiKhmRJcDlV8JJyhlix
|
|
J12BhCdhNVZAjdd8KlNaTYLZXV4pJjaZX9wkq05CYtvnWsoZGfs/LdckwXot
|
|
/i2h+pHSYgI0EnRtlG9YUuPS1sFjerjf2NI/1tg1C9JJw/okbA70OLEVe+hb
|
|
3/k+AxK4xWIyNtibGuKedjBI0MxsXGmL/Tn0jspDIGEo1ZbfHlvcK97wvgUJ
|
|
X+J+R1E2YW61L2ORMP9Dvp9yusLA/vytJGQ6XbrrgP1AoDQjx5aEXavnpRyx
|
|
BznxBZfsSZjyeBlBmfFM9u0pZzy/6Y6GE7XfZQOjR11JUPz5JJbyqexSvoPu
|
|
JKwJY76gPBBpoxfjRcIx6eM7nLHF/FdYh/uQ8K+hYz5lhs2gX4gvCS9Tk75Q
|
|
PqV6IM0/gASTy1o7Xag8IrbXvQJJeOeenUV5YHpFtSubhHJaYgtlsf7BVnuS
|
|
hGyZlnnKjJa7w1bBeFzyCM2Vynf/wB8IIcFPudiV8qnrtjKmoSQ4GpjHUn5w
|
|
Sk7HcC8JKW5mlykPxH7esiGcBOPYmw8oi7LLvGiRJPDmJrRTNnZKDFOPJqGy
|
|
qX7k//U32R1RjiEhhhu6QPmkpvwVuVgSSmSPirthV0kMVUjGkSBhLKZEuf93
|
|
WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4=
|
|
"]]},
|
|
Annotation[#, "Charting`Private`Tag#1"]& ]}, {}},
|
|
{"WolframDynamicHighlight", <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}],
|
|
StyleBox[
|
|
DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {},
|
|
Slot["HighlightElements"],
|
|
Slot["LayoutOptions"],
|
|
Slot["Meta"],
|
|
Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {},
|
|
Annotation[{
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]],
|
|
Line[CompressedData["
|
|
1:eJwd13k0Vd0bB3BzEjJmCmWqS0qu4YrsJ/ci8yyExD0neZUxr5Ch0qSkUqlX
|
|
URKJhChDUnlLUvQSpcgQleneZKrEb5/fH2ed9Vl77ef5rr33Onud1YFhrgQf
|
|
Dw/POH6od8Tr9Wvut702j/dMVd14g4PMJ24YBrKKUUqplRrlvhyjTA1WHQo4
|
|
cUKbsjP7lZAo/V+0bdiZQbksNumpIKsF0Z9esqN8/Jl8Q1LRG+SvSrApV7dF
|
|
XJ3Xf4vO/Sw/SHmkuzlhf+07NO106CZlxSH17TPMj+jgqs5WynacBJOolk9o
|
|
Mvj2AuX6+ZFlsUX96K4WP10fuzNFLr5q7yAy9ewJpTwhxBqZ0h9C7VMmxZSF
|
|
ToZ702eH0d8L8t8pq0heaYqo/Yq8wuJM6diOSjM3J5hjSHVfYx9lMldtha7w
|
|
BIrjKTE1wE7SdEr9q4WDTPvksim/k+vYGF30HYWmRu8xxGb7hOw+d3ISLUdk
|
|
L2VuNs+18r0/UI1Bt7sRtrCarsR3/WmU8WCrqzF2JvuptYTsDHJgMN9TXlXg
|
|
nbRhdga97XxEMLAZ645M7KmdQ4bO6LQJdrDRp5YR5jzimnlqmGFPxe4TENH6
|
|
g3gaArooJ9cuM6MJLyBt+fHTm7GzgHF7V8siClRJk0RUvvwmVmQRL7hZfPC0
|
|
wC56dq4vRYkPmIY/DJlU3i/+CWdO8kFlzklFFnaC9nTF3b38kHyTOWVJ5S1d
|
|
rc7RF4TcmYZvNtjdbWP1C3mCsFxjcMqWyj9530dcVgh6PI8I2mMXGzie1Z0V
|
|
guFTTsaO2I3VcbyhtcJAixn96Io9/bT901emKMi2mOj5YUvZi0rE14vCtP/h
|
|
Mn9svQ4WiJmIQVqepUkAdsjnytyN68XhQpeObxB2OF+L3mZRCWj8doizG3tI
|
|
7c731BlJMDGzsY+l1odsXtpKlwKJtO8Gcdh8t4dXy0dIgXWpuEYClZeu6lo0
|
|
KgW132/KJmP7MDPKX/dJQ3+WndUx7NagyCi5l7LQ+c6y5xJ2b0F6WoDwCgju
|
|
0tbNxh4bLcq7ZbkCrHYcPHQVWyR6sN20YQWkBx9j5mGzDrsbBFTKwWLXqEQJ
|
|
ds0No+nCHAXY9vdI32PsG0O/YjZFK4ObyUF3LvZWj6O9USXKEPzLcfMPqn6j
|
|
tFXJsDIcza3UmcE2uLFOdpW3Ckx9dVKYp9Yz0L9C0FwVHiZXGAvnc9Akp+/v
|
|
r4dWQbu7eMpqbOk9rHsVDmqQffAhywt7+IZIsHOIGtDKQ/q2Yz/42KY0fkQN
|
|
mJdvp+zA9rX3O6TVoAbBD750kNg3dGJcL+mrw4A8s34ftsFIATdRTgO+Vrln
|
|
Z2K771qma9uvCbbHWYc7sVGMh/62P5qgouxY142tnZpjzFbQgtmG4p+92Dx5
|
|
dItEFy14ZRF8+At2Se/2beWPtWDR/837OWwhz+IUxetrYM9hg8Mrb+J8LIfO
|
|
kUAaPJ+MfLsLO8/t4ofZRBocI67dD8VOD+zvE/iHBim5K3MisNnJ+0ZV2mkw
|
|
6Dx3IB5bsu4KjxtTG4rqzeJPY4fQJ7Rr1XVgx2B11ANsJbXTSWmf18HSDTE+
|
|
4gUcVHdiivaTTxeCHhn6y2D7/vDuIFfrws48rWBF7KuNGjQLf13Y1nQ5XQtb
|
|
bVfNf3NduiCu9lgTYWsXD2mSL9eDd9qthAhsZSUVcpW3HuzT57zoxl6XHy36
|
|
G+lDbY/ai0eFHBTIPjSt66gPD8uzO55hZ6mf7Q3w1Yci4cChV9j810vvPovV
|
|
hwNnXq34iN19dcT9bJk+XE9YWT2HfTwr4ApNnQ5x46a/9W/h/U2zX+8lZACm
|
|
5w5G3sa+FqnhXNliCMNvjGSKizioLQYZH843gYqZ6jWqJRy02v+to1/oZjBm
|
|
d3AHSjmIWKy6o7wf4JvM/t5n5RwkN/pgiVygBZj3cBfMqjgomm728aw2Cwb4
|
|
N5U+rcb5x+ebpEcsIcqlYEnCQ7yfFlFLclqtgRFp3NXyGJ+fqZDHxZk2ECWw
|
|
6b3UMw6a2yL/qjHJDpYGqj+dauagHh7+7/07HWBDaPOR360ctHdlWEaKuhOs
|
|
M/2g9LGDg+7sbmo4n+oM0r9kuj26OSjuh8Kszm4XcA8au3bpE/5+2Fp5Pt/h
|
|
CpmbWQuRQxxksv3MliEXNyh5u9vAeZSD/lO4EtJId4fmII/GXi6+T24eqitc
|
|
6wFpCV7dMzP4fPVp2zuKecIv0UCd8nl8H3Rwd8WMewK/cGK6Ni8X0c+fKc7r
|
|
2waxshczGQJcdEXgx/qzT71g7a3qZ+JLuKhqy4bu1GpvsK/5fFlRhIuyjE9I
|
|
zhf5gDUSShMT46LWD/lH6Ce3g/DtFtPHy7mo0iFbIzzZF6qmb2VdleKi73vc
|
|
ePay/cDjzbN/GLJcNG1FC55g+gM79XVimRwXFY6/n4sy2gFk/Htea0Uu8rqW
|
|
H+QnGgArKxXmzq/koopyux38RwNAPanSdFaFi0yU/vt5/GcAlJGJWyRWc5F6
|
|
367uN7t3gvWmgooFNS76vOwvp+zBnRCerzbE1eCitnTHIGuPQLgdc0I+W4uL
|
|
MmNzlu1rC4RIi863aC0X1dUv/gyyCQK+e+Pb7tC4aLkvHKXXBIGFVI9wtzYX
|
|
rZJ53rqyLgiq7KcberH1WhzkheqDwKVwdt8gtqvZ9lvvHgdBjE915xh25sqY
|
|
lwdeBMHJD1pRi9iKPbeXN70LAtZlXzkNHS7S8JfL8p0NgtbQNyJ/YZsETBSm
|
|
GrChbs2FNA72zUvcKEcjNujUPWL8wJZpnzSXY7Chtk1rcAZ7wnK2o9CUDeap
|
|
xRsWsG/o8PC2WLChK/J0geg6LhKflfSWcmFDaWmiFA378ynDpTl72LD1Ktm+
|
|
A9vluXHHrjA2XOe2rAnCrufZlKMXwYa5yN37SexLUeaGT6LZcJfGktmD7eht
|
|
vXMong1rveLWxmFXa3hX65xgg5V8TfM57PTahN0PbrJhd4n0dCP2Hv2LJrGF
|
|
bPhbqa/vObb9rbKljCI2DG2Ye9GMLXJx+Nb9EjY8yhDJbMNOjXQeqbrHBjOV
|
|
iiUfsRNoGn9VPmGDqMdo6CR2yMWXoeW9bGAcatBV1uUiG/Fhs8g+NoS7FD1R
|
|
xV6byiOmP8AGZeh2V8MejjQsKRtiw4n3yyLWYO90zBm/O8YGvpSyYxuxvQSj
|
|
9pb+wv3dBw0ssa2jFMOLVxDw/FprUgj2k5wjtmflCZik/zseim3WMqkRq0jA
|
|
nwtJXmHYepov3zNVCKiXt9CIxlboimd+0CSgQO5n5gHs0U09K0QMCWjYKPzh
|
|
NPZpvtyHu9wIePgxea4MW2SDaJaDBwGdEXULFdiHt8dG0rcRwHf+Pm8Vduw9
|
|
5zWLPgTYjY/+qabyk7xnLgQSoPZia+tjbHpzIPvfCAI2y1S8bcPuOqO5TD2D
|
|
gLQ3HuFj2HeQWPDXMwQ8Ni6aHKfqj081lpwjIEBUK5KDrW/TmMi4SID61XPB
|
|
k9jpPEGTDlcJeFfDpM9hW4Xlvo8tJsBk3SDiX89FysrHjMzvEOCyNS9TAHuq
|
|
Oewc/10CdP2ODwtiX9dCDukVBDAUn6cIY//p6WnIqyGAJ03oghj2PXulwtdN
|
|
BGjpHjKUw077xSeY2UxAsuAlX3nswMKRnd4tBAhmtCcrYEsI1Ch9biXAJ7yq
|
|
QQk7tNbr9M9OAiR9NqqswlbXvhCjMUTADrsxp7XYv7oOtH8bJqC9i2VDw25L
|
|
JfRKvxKwuNCAtLET+w1GTMYIEOtV11iH3Z3V7uf0g4AU3bPNG7DPLpG0jOMl
|
|
IXqVQLoRdt1kz/ZofhImni6LMMb+0lMUuVeQhIF/UpwZ2Gb3WLmBS0nIu3Zf
|
|
YBP2cEDsb1tJEmpV7Sw2U/ntLaUspUlYlfxE2Bzb1FiKhmRJcDlV8JJyhlix
|
|
J12BhCdhNVZAjdd8KlNaTYLZXV4pJjaZX9wkq05CYtvnWsoZGfs/LdckwXot
|
|
/i2h+pHSYgI0EnRtlG9YUuPS1sFjerjf2NI/1tg1C9JJw/okbA70OLEVe+hb
|
|
3/k+AxK4xWIyNtibGuKedjBI0MxsXGmL/Tn0jspDIGEo1ZbfHlvcK97wvgUJ
|
|
X+J+R1E2YW61L2ORMP9Dvp9yusLA/vytJGQ6XbrrgP1AoDQjx5aEXavnpRyx
|
|
BznxBZfsSZjyeBlBmfFM9u0pZzy/6Y6GE7XfZQOjR11JUPz5JJbyqexSvoPu
|
|
JKwJY76gPBBpoxfjRcIx6eM7nLHF/FdYh/uQ8K+hYz5lhs2gX4gvCS9Tk75Q
|
|
PqV6IM0/gASTy1o7Xag8IrbXvQJJeOeenUV5YHpFtSubhHJaYgtlsf7BVnuS
|
|
hGyZlnnKjJa7w1bBeFzyCM2Vynf/wB8IIcFPudiV8qnrtjKmoSQ4GpjHUn5w
|
|
Sk7HcC8JKW5mlykPxH7esiGcBOPYmw8oi7LLvGiRJPDmJrRTNnZKDFOPJqGy
|
|
qX7k//U32R1RjiEhhhu6QPmkpvwVuVgSSmSPirthV0kMVUjGkSBhLKZEuf93
|
|
WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4=
|
|
"]]}, "Charting`Private`Tag#1"]}}, {}}, <|
|
|
"HighlightElements" -> <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>,
|
|
"LayoutOptions" -> <|
|
|
"PanelPlotLayout" -> <||>,
|
|
"PlotRange" -> {{0, 180}, {0.9887929549829119,
|
|
1.0113097844802965`}},
|
|
"Frame" -> {{False, False}, {False, False}},
|
|
"AxesOrigin" -> {0, 0.9887929549829141},
|
|
"ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True},
|
|
"LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1),
|
|
"DefaultStyle" -> {
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]]},
|
|
"HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ),
|
|
"ScalingFunctions" -> {{Identity, Identity}, {
|
|
Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" ->
|
|
False|>,
|
|
"Meta" -> <|
|
|
"DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" ->
|
|
Plot, "GroupHighlight" -> False|>|>]]& )[<|
|
|
"HighlightElements" -> <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>,
|
|
"LayoutOptions" -> <|
|
|
"PanelPlotLayout" -> <||>,
|
|
"PlotRange" -> {{0, 180}, {0.9887929549829119,
|
|
1.0113097844802965`}},
|
|
"Frame" -> {{False, False}, {False, False}},
|
|
"AxesOrigin" -> {0, 0.9887929549829141},
|
|
"ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True},
|
|
"LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1),
|
|
"DefaultStyle" -> {
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]]},
|
|
"HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ),
|
|
"ScalingFunctions" -> {{Identity, Identity}, {
|
|
Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>,
|
|
"Meta" -> <|
|
|
"DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" ->
|
|
Plot, "GroupHighlight" -> False|>|>],
|
|
ImageSizeCache->{{120.79808473007536`,
|
|
258.9819285854564}, {-15.577506565567944`, 5.594368434432056}}],
|
|
Selectable->False]},
|
|
Annotation[{{{{}, {},
|
|
Annotation[{
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]],
|
|
Line[CompressedData["
|
|
1:eJwd13k0Vd0bB3BzEjJmCmWqS0qu4YrsJ/ci8yyExD0neZUxr5Ch0qSkUqlX
|
|
URKJhChDUnlLUvQSpcgQleneZKrEb5/fH2ed9Vl77ef5rr33Onud1YFhrgQf
|
|
Dw/POH6od8Tr9Wvut702j/dMVd14g4PMJ24YBrKKUUqplRrlvhyjTA1WHQo4
|
|
cUKbsjP7lZAo/V+0bdiZQbksNumpIKsF0Z9esqN8/Jl8Q1LRG+SvSrApV7dF
|
|
XJ3Xf4vO/Sw/SHmkuzlhf+07NO106CZlxSH17TPMj+jgqs5WynacBJOolk9o
|
|
Mvj2AuX6+ZFlsUX96K4WP10fuzNFLr5q7yAy9ewJpTwhxBqZ0h9C7VMmxZSF
|
|
ToZ702eH0d8L8t8pq0heaYqo/Yq8wuJM6diOSjM3J5hjSHVfYx9lMldtha7w
|
|
BIrjKTE1wE7SdEr9q4WDTPvksim/k+vYGF30HYWmRu8xxGb7hOw+d3ISLUdk
|
|
L2VuNs+18r0/UI1Bt7sRtrCarsR3/WmU8WCrqzF2JvuptYTsDHJgMN9TXlXg
|
|
nbRhdga97XxEMLAZ645M7KmdQ4bO6LQJdrDRp5YR5jzimnlqmGFPxe4TENH6
|
|
g3gaArooJ9cuM6MJLyBt+fHTm7GzgHF7V8siClRJk0RUvvwmVmQRL7hZfPC0
|
|
wC56dq4vRYkPmIY/DJlU3i/+CWdO8kFlzklFFnaC9nTF3b38kHyTOWVJ5S1d
|
|
rc7RF4TcmYZvNtjdbWP1C3mCsFxjcMqWyj9530dcVgh6PI8I2mMXGzie1Z0V
|
|
guFTTsaO2I3VcbyhtcJAixn96Io9/bT901emKMi2mOj5YUvZi0rE14vCtP/h
|
|
Mn9svQ4WiJmIQVqepUkAdsjnytyN68XhQpeObxB2OF+L3mZRCWj8doizG3tI
|
|
7c731BlJMDGzsY+l1odsXtpKlwKJtO8Gcdh8t4dXy0dIgXWpuEYClZeu6lo0
|
|
KgW132/KJmP7MDPKX/dJQ3+WndUx7NagyCi5l7LQ+c6y5xJ2b0F6WoDwCgju
|
|
0tbNxh4bLcq7ZbkCrHYcPHQVWyR6sN20YQWkBx9j5mGzDrsbBFTKwWLXqEQJ
|
|
ds0No+nCHAXY9vdI32PsG0O/YjZFK4ObyUF3LvZWj6O9USXKEPzLcfMPqn6j
|
|
tFXJsDIcza3UmcE2uLFOdpW3Ckx9dVKYp9Yz0L9C0FwVHiZXGAvnc9Akp+/v
|
|
r4dWQbu7eMpqbOk9rHsVDmqQffAhywt7+IZIsHOIGtDKQ/q2Yz/42KY0fkQN
|
|
mJdvp+zA9rX3O6TVoAbBD750kNg3dGJcL+mrw4A8s34ftsFIATdRTgO+Vrln
|
|
Z2K771qma9uvCbbHWYc7sVGMh/62P5qgouxY142tnZpjzFbQgtmG4p+92Dx5
|
|
dItEFy14ZRF8+At2Se/2beWPtWDR/837OWwhz+IUxetrYM9hg8Mrb+J8LIfO
|
|
kUAaPJ+MfLsLO8/t4ofZRBocI67dD8VOD+zvE/iHBim5K3MisNnJ+0ZV2mkw
|
|
6Dx3IB5bsu4KjxtTG4rqzeJPY4fQJ7Rr1XVgx2B11ANsJbXTSWmf18HSDTE+
|
|
4gUcVHdiivaTTxeCHhn6y2D7/vDuIFfrws48rWBF7KuNGjQLf13Y1nQ5XQtb
|
|
bVfNf3NduiCu9lgTYWsXD2mSL9eDd9qthAhsZSUVcpW3HuzT57zoxl6XHy36
|
|
G+lDbY/ai0eFHBTIPjSt66gPD8uzO55hZ6mf7Q3w1Yci4cChV9j810vvPovV
|
|
hwNnXq34iN19dcT9bJk+XE9YWT2HfTwr4ApNnQ5x46a/9W/h/U2zX+8lZACm
|
|
5w5G3sa+FqnhXNliCMNvjGSKizioLQYZH843gYqZ6jWqJRy02v+to1/oZjBm
|
|
d3AHSjmIWKy6o7wf4JvM/t5n5RwkN/pgiVygBZj3cBfMqjgomm728aw2Cwb4
|
|
N5U+rcb5x+ebpEcsIcqlYEnCQ7yfFlFLclqtgRFp3NXyGJ+fqZDHxZk2ECWw
|
|
6b3UMw6a2yL/qjHJDpYGqj+dauagHh7+7/07HWBDaPOR360ctHdlWEaKuhOs
|
|
M/2g9LGDg+7sbmo4n+oM0r9kuj26OSjuh8Kszm4XcA8au3bpE/5+2Fp5Pt/h
|
|
CpmbWQuRQxxksv3MliEXNyh5u9vAeZSD/lO4EtJId4fmII/GXi6+T24eqitc
|
|
6wFpCV7dMzP4fPVp2zuKecIv0UCd8nl8H3Rwd8WMewK/cGK6Ni8X0c+fKc7r
|
|
2waxshczGQJcdEXgx/qzT71g7a3qZ+JLuKhqy4bu1GpvsK/5fFlRhIuyjE9I
|
|
zhf5gDUSShMT46LWD/lH6Ce3g/DtFtPHy7mo0iFbIzzZF6qmb2VdleKi73vc
|
|
ePay/cDjzbN/GLJcNG1FC55g+gM79XVimRwXFY6/n4sy2gFk/Htea0Uu8rqW
|
|
H+QnGgArKxXmzq/koopyux38RwNAPanSdFaFi0yU/vt5/GcAlJGJWyRWc5F6
|
|
367uN7t3gvWmgooFNS76vOwvp+zBnRCerzbE1eCitnTHIGuPQLgdc0I+W4uL
|
|
MmNzlu1rC4RIi863aC0X1dUv/gyyCQK+e+Pb7tC4aLkvHKXXBIGFVI9wtzYX
|
|
rZJ53rqyLgiq7KcberH1WhzkheqDwKVwdt8gtqvZ9lvvHgdBjE915xh25sqY
|
|
lwdeBMHJD1pRi9iKPbeXN70LAtZlXzkNHS7S8JfL8p0NgtbQNyJ/YZsETBSm
|
|
GrChbs2FNA72zUvcKEcjNujUPWL8wJZpnzSXY7Chtk1rcAZ7wnK2o9CUDeap
|
|
xRsWsG/o8PC2WLChK/J0geg6LhKflfSWcmFDaWmiFA378ynDpTl72LD1Ktm+
|
|
A9vluXHHrjA2XOe2rAnCrufZlKMXwYa5yN37SexLUeaGT6LZcJfGktmD7eht
|
|
vXMong1rveLWxmFXa3hX65xgg5V8TfM57PTahN0PbrJhd4n0dCP2Hv2LJrGF
|
|
bPhbqa/vObb9rbKljCI2DG2Ye9GMLXJx+Nb9EjY8yhDJbMNOjXQeqbrHBjOV
|
|
iiUfsRNoGn9VPmGDqMdo6CR2yMWXoeW9bGAcatBV1uUiG/Fhs8g+NoS7FD1R
|
|
xV6byiOmP8AGZeh2V8MejjQsKRtiw4n3yyLWYO90zBm/O8YGvpSyYxuxvQSj
|
|
9pb+wv3dBw0ssa2jFMOLVxDw/FprUgj2k5wjtmflCZik/zseim3WMqkRq0jA
|
|
nwtJXmHYepov3zNVCKiXt9CIxlboimd+0CSgQO5n5gHs0U09K0QMCWjYKPzh
|
|
NPZpvtyHu9wIePgxea4MW2SDaJaDBwGdEXULFdiHt8dG0rcRwHf+Pm8Vduw9
|
|
5zWLPgTYjY/+qabyk7xnLgQSoPZia+tjbHpzIPvfCAI2y1S8bcPuOqO5TD2D
|
|
gLQ3HuFj2HeQWPDXMwQ8Ni6aHKfqj081lpwjIEBUK5KDrW/TmMi4SID61XPB
|
|
k9jpPEGTDlcJeFfDpM9hW4Xlvo8tJsBk3SDiX89FysrHjMzvEOCyNS9TAHuq
|
|
Oewc/10CdP2ODwtiX9dCDukVBDAUn6cIY//p6WnIqyGAJ03oghj2PXulwtdN
|
|
BGjpHjKUw077xSeY2UxAsuAlX3nswMKRnd4tBAhmtCcrYEsI1Ch9biXAJ7yq
|
|
QQk7tNbr9M9OAiR9NqqswlbXvhCjMUTADrsxp7XYv7oOtH8bJqC9i2VDw25L
|
|
JfRKvxKwuNCAtLET+w1GTMYIEOtV11iH3Z3V7uf0g4AU3bPNG7DPLpG0jOMl
|
|
IXqVQLoRdt1kz/ZofhImni6LMMb+0lMUuVeQhIF/UpwZ2Gb3WLmBS0nIu3Zf
|
|
YBP2cEDsb1tJEmpV7Sw2U/ntLaUspUlYlfxE2Bzb1FiKhmRJcDlV8JJyhlix
|
|
J12BhCdhNVZAjdd8KlNaTYLZXV4pJjaZX9wkq05CYtvnWsoZGfs/LdckwXot
|
|
/i2h+pHSYgI0EnRtlG9YUuPS1sFjerjf2NI/1tg1C9JJw/okbA70OLEVe+hb
|
|
3/k+AxK4xWIyNtibGuKedjBI0MxsXGmL/Tn0jspDIGEo1ZbfHlvcK97wvgUJ
|
|
X+J+R1E2YW61L2ORMP9Dvp9yusLA/vytJGQ6XbrrgP1AoDQjx5aEXavnpRyx
|
|
BznxBZfsSZjyeBlBmfFM9u0pZzy/6Y6GE7XfZQOjR11JUPz5JJbyqexSvoPu
|
|
JKwJY76gPBBpoxfjRcIx6eM7nLHF/FdYh/uQ8K+hYz5lhs2gX4gvCS9Tk75Q
|
|
PqV6IM0/gASTy1o7Xag8IrbXvQJJeOeenUV5YHpFtSubhHJaYgtlsf7BVnuS
|
|
hGyZlnnKjJa7w1bBeFzyCM2Vynf/wB8IIcFPudiV8qnrtjKmoSQ4GpjHUn5w
|
|
Sk7HcC8JKW5mlykPxH7esiGcBOPYmw8oi7LLvGiRJPDmJrRTNnZKDFOPJqGy
|
|
qX7k//U32R1RjiEhhhu6QPmkpvwVuVgSSmSPirthV0kMVUjGkSBhLKZEuf93
|
|
WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4=
|
|
"]]}, "Charting`Private`Tag#1"]}}, {}}, <|
|
|
"HighlightElements" -> <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>,
|
|
"LayoutOptions" -> <|
|
|
"PanelPlotLayout" -> <||>,
|
|
"PlotRange" -> {{0, 180}, {0.9887929549829119, 1.0113097844802965`}},
|
|
"Frame" -> {{False, False}, {False, False}},
|
|
"AxesOrigin" -> {0, 0.9887929549829141},
|
|
"ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True},
|
|
"LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> {
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]]},
|
|
"HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ),
|
|
"ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>,
|
|
"Primitives" -> {}, "GCFlag" -> False|>,
|
|
"Meta" -> <|
|
|
"DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" ->
|
|
Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]],
|
|
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
|
|
Axes->{True, True},
|
|
AxesLabel->{None, None},
|
|
AxesOrigin->{0, 0.9887929549829141},
|
|
DisplayFunction->Identity,
|
|
Frame->{{False, False}, {False, False}},
|
|
FrameLabel->{{None, None}, {None, None}},
|
|
FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
|
|
GridLines->{None, None},
|
|
GridLinesStyle->Directive[
|
|
GrayLevel[0.5, 0.4]],
|
|
ImagePadding->All,
|
|
Method->{
|
|
"DefaultBoundaryStyle" -> Automatic,
|
|
"DefaultGraphicsInteraction" -> {
|
|
"Version" -> 1.2, "TrackMousePosition" -> {True, False},
|
|
"Effects" -> {
|
|
"Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
|
|
"Droplines" -> {
|
|
"freeformCursorMode" -> True,
|
|
"placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" ->
|
|
AbsolutePointSize[6], "ScalingFunctions" -> None,
|
|
"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
|
|
(Identity[#]& )[
|
|
Part[#, 1]],
|
|
(Identity[#]& )[
|
|
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
|
|
(Identity[#]& )[
|
|
Part[#, 1]],
|
|
(Identity[#]& )[
|
|
Part[#, 2]]}& )}},
|
|
PlotRange->{{0, 180}, {0.9887929549829119, 1.0113097844802965`}},
|
|
PlotRangeClipping->True,
|
|
PlotRangePadding->{{
|
|
Scaled[0.02],
|
|
Scaled[0.02]}, {
|
|
Scaled[0.05],
|
|
Scaled[0.05]}},
|
|
Ticks->{Automatic, Automatic}]], "Output",
|
|
CellChangeTimes->{3.991333813212965*^9},
|
|
CellLabel->
|
|
"Out[251]=",ExpressionUUID->"925ecd2b-bb46-b241-b0ae-91df536967b1"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"x", "=",
|
|
RowBox[{"Plot", "[",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox[
|
|
RowBox[{"4", "x", "*", "y", "*", "\[Pi]", "*",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
UnderoverscriptBox["\[Sum]",
|
|
RowBox[{"n", "=", "0"}], "100"],
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
RowBox[{"2",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox["1", "Cw"]}], "+",
|
|
FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}],
|
|
"2"], ")"}],
|
|
RowBox[{"2", "*", "n"}]], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox["1",
|
|
RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}],
|
|
")"}]}],
|
|
RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(", "x", ")"}], "2"], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
RowBox[{"y", "*", "y"}], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]]}], ")"}],
|
|
RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"x", ",", "0", ",", "20"}], "}"}]}], "]"}]}]], "Input",
|
|
CellChangeTimes->{{3.9918456416071854`*^9,
|
|
3.991845656553877*^9}},ExpressionUUID->"c4af1473-2d54-b047-b3e2-\
|
|
18c19d38cfdd"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"2.0784227471040894`*^-281\\\", \
|
|
\\\"5919012181389927685417441689600000000\\\"]\\) is too small to represent \
|
|
as a normalized machine number; precision may be lost.\"", 2, 252, 225,
|
|
24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991333813432829*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[252]:=",ExpressionUUID->"9c0b88be-018b-9b49-8992-9f69ff2c8721"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"1.9214123648785273`*^-295\\\", \
|
|
\\\"2610284371992958109269091785113600000000\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 252,
|
|
226, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991333813442087*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[252]:=",ExpressionUUID->"0dc889c7-e5c7-5d48-8218-94f8d4104b1d"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*SuperscriptBox[RowBox[{\\\"(\\\", RowBox[{\\\"-\\\", \
|
|
\\\"9.614868462060315`*^-8\\\"}], \\\")\\\"}], \\\"44\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 252,
|
|
227, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991333813450123*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[252]:=",ExpressionUUID->"e3ce988d-52a1-6c46-93b1-24547de7012f"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "stop",
|
|
"\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \
|
|
\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
|
|
during this calculation.\"", 2, 252, 228, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991333813469118*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[252]:=",ExpressionUUID->"1ec64821-f1c6-944d-83dd-2975f7431573"],
|
|
|
|
Cell[BoxData[
|
|
GraphicsBox[
|
|
InterpretationBox[{
|
|
TagBox[{{{}, {},
|
|
TagBox[
|
|
{RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2],
|
|
Opacity[1.], LineBox[CompressedData["
|
|
1:eJwVl3c8Vu8bx2XLnsnK3ns9eJ5z7ouMSEjJqGRkj5CRFQkhhGQlkRGRUJRR
|
|
X/MpJYlClDKSEClb6ff8/jqv9+vc576uz+e67nHEXM5Zu1FTUVEF0FBR/f+5
|
|
PtHbLXm1DOfOnGIcL/XB3xXxh+uPxiHTBqPaxw6mCHjfuPCPZqED5icq/R3s
|
|
UajVvRGa0TvI9kMNC4uDF+Jc2pe1NdKARrOiz07ZhaPPbRbnVkc60Z3zDCW+
|
|
x5ORseT8p5WRQXSb5nVio0E+2hoh3Pg5MoVcPtsXOf2pRE/UGZ3uyk0jjfKz
|
|
61FuVSg0bVTeMXIa7U/R/H2uvwr9MghvfyUygzInKvCR2/fQ/P2WhQq3r+jv
|
|
t5alPKhBHy9jBqd/f0OssycH7MIfoHaVg8u9bD/QAwkG0sPJBtR18G7Z2zu/
|
|
EWGnVd6w7wlSTX/wfePFb6SRE1dhvP4EFY0+VhZZ/o0EvxyfkBZtRhf8Xjzx
|
|
Jq4iQz/3RzHnm5Fy7vc+mner6IFHlk8afwsqmFdY06JbR2LVYXk/TraigMw6
|
|
owKPTVQuKhgcSn6KJsafpLSnbSKXa41vBxeeosPSHW9mH26iqdYNAQbOZ0i6
|
|
9a29BtUWok371bfu8AyNz/zy68vbQqOz06ZLi8+QsY5Wzm7vNloplnifRtuO
|
|
hD43z7oo/kWkM8dimjk6ENXvwLzeo38RYeHvl0DRDjRDL2+mGvYXcRa3feZR
|
|
7UD3lQvu/+34i3Y37aIFLDsQfjEiOM92FzlxbLSLp3agM8JE6v64f2hEI4wo
|
|
RN2J3ipNpBcuUgHVabv/XD51om5CyzfLf1RQlu/iaDvfiZr0c4CGaw/8jGIj
|
|
aG10ogIbi19ehD1Qe7k2uIajC7lEP7MhxO2B6KN1xkkGXehXX5HQ4D5q2NNz
|
|
mmG5pAvx+J65x3CQBvReZJpbWXYjeYZSspUtDfRuaE7oOHQjuDM7le9DA9am
|
|
pu/p3LqR76ifoGI2DUgP7MyaR3SjbsOoVKuvNECl5Wt+rbQbBQvn++dfoYVW
|
|
o6uJ0z+7UcqTjylTN2nh9ulffpzb3aj4mOhdhTpauGOhUypB04P6ku9+fjpK
|
|
CzvqzVurPD1Icr3RakqODtZqN88fJvSgof5BdYU+OugsEDfrDe1Bc158lsFf
|
|
6ICthmeAdLEH7dI6+DxdpQPdlp/PsxN6kDxxstRSmB52Fm1Ffl3vQXF3l3mC
|
|
/emhUWVhzuVBD8oz0FB7GkcP3n2lMduNPaj2U+gR+lx6KOz9/iC0rQeNce8m
|
|
5P1HDxYPBNaEenuQeizLRhsHAxQe4iOLTfagQ4JW3PRSDDBj8mR8YrYHOTZd
|
|
V7HUZYDMvoj22MUelLIo4DnpzAASWjp85zd60JSd3Ae6hwxwK0dzmIuFjDZ/
|
|
+65ZPGeAq3q7xhscZMR2rY4zb5wBdBDty3ZeMtLrIZjJ0zJCIBMo0hwgoyw1
|
|
41YLG0Ywu6J03liVjFTG7U0wT0bQf9DOzaFJRn3xfkMKkYxAX6WR0EkgI/rR
|
|
7AXGEkZg0Ti2O4mTUemlyrCNh4yww67Ib2lARqDQRjNLZoTxXZJMuREZRV6c
|
|
FuxaZISMH7tmLOZkxC+7cbf+HyP8d5zpvLAlGTW93atZzMUEa7DbtM+ajH5K
|
|
qptH6zCBxORKy3NbMjr7KjaKEM8ER2gZ3vO5kNGekGxG6VwmOHfN82/gWTIq
|
|
EqnM5rnHBLNU2zea3MloNPBNzcobJnhnfMHwjzcZhQhO63yZYoKQz+KBf33J
|
|
iKtnvbt/jQns4i8Q5/zJ6Ai/yKdqwb0gpXRgNCKIjOY71LwKlPfCDbODneLB
|
|
ZJTkY7SWpL8X3hg8CX8UQkZSvPaXwo7vBa+2tr2qYWTU+cyX1d1jL1Cz1l+6
|
|
cYGMznjG5h+P2Av89PsWZsLJ6A9nttTBtL3Q25F5TCSSjLTdWjHRh3shWGTj
|
|
uGU0GQ2xvellI+8FwbQ+BpOLZBTwZMrm7+hecFi5+kM2hoxYXdYnFxb2wqee
|
|
SO41Ct9j3us/trsXNrOpr1THkpFJo/D2C05maO2qsDG/REYzjmqJjyWZYfgU
|
|
W9oIheMYjbgqCMxwcHxX70gcGR1osCvKNmOGe6un/O5TuO2kr/zl08xQ4aqo
|
|
vklhB7rYpsAAZhirv5ardJmMNmqvGzhdZoaOPS+qj1A42+5uv0UOM5iNakbb
|
|
UViNutUBq2IGr9ljAhYU7q/un1VoYwajwfZMZQr72EwFCbxhhrNUWr+2KPMz
|
|
/lvbZZxihkunrpjVUbi8kunqxiozWInXVB2lsIG18L5ZBhYQqngkMkHJ//OO
|
|
auk7ARbgEn7zxIbCUeWGKl1KLJDsZnzlCUX/fku71npgAe43l/LpKdy06WNS
|
|
fIwFTkzR/kMUv47diRlKd2eBIdlzz89S/P15+PqZ6HAWuLQaSR1C8T9trWLB
|
|
J5UF5GWo2wOiyEj+dkuYw20W6Nv6zW5HqdfzQ/00pg0sUNHlSK0QQenHX5PX
|
|
CD0sYNrhffc7pd57CtcEpUdZwHfcgT2b0g9FRkyVPAssUOeXaiYfSkYf8lTb
|
|
VzhY4Z1FTZTAeTIqGKpmD5VihY4vNQ5WgRS/2WTObOuygn1vxbD/OTLlPBPe
|
|
pXZlBdnv+btuPmR061nekSthrHB+5Nd73IuMHLe4bzGnskLOR5o7VB5k9MV/
|
|
L4mnkRW412IDEGV9lFQlXM3rZYUyPvvbbWfIyGWGalxoghVE29oFJU5T+sN+
|
|
I1yKgQ0O7EbY1lDW15zhzGNtezZ4GCRl33CYjKpizjC0+rEBj6RoUNQhMvJu
|
|
GTuB4tjghv/hDFXKel5UebtmUs0Grtb6eraU9f9T4JmG/V82YP5s9alYhbL/
|
|
/Mx9EFnCDl2eHTF6bGTUrMD9718jOzTpMCvUMZFRhHu6RfxLdmCJkXDipKOs
|
|
j/H4H6m/2aGo2bUvZ6cHxU4/4X0jzgES8Q+C6r71oPj+8mNfgjmA7jmdjxZl
|
|
/5zxcY0Uj+EAsbFrNeeaepARk1jp2WQOWMi35cmt60H0hoW/5m5xwMXS4Pb7
|
|
ZT0oqTkrc4XMAbNPk8//vdqDrpbFvKHezwlHFkTbMdseZKbpxcUrwQkV2aqW
|
|
YVY9iLHb2kZGiROKfeKPFptS4k9LjR/W54RN2kf7Oog9KEq8bzbbixOkznXH
|
|
wYEe5F/MvyvdwgkHTUqbj0x3o6OF9YqHT3LBhEZImoNTN+JQvHnutBsXKDKX
|
|
BzbadqP+1viGc+e44FTXAh8N5Tw0G7fVyb7MBfZvBtnDsG5kILB78FM1F8R7
|
|
r1Z27+9GmnlmJ8/94YIEf5hnHehC+7Knk6/f4gYe/r49PJpdiF+hMX6zghss
|
|
K/xWKuW7kEBnYszpOm44NLsAWmJdSOSnXIhMFzccpPO30WTrQlLmAU6tc9zw
|
|
dXGlpv9bJ9Kg/as9rcEDJSMnyYn5ncgymG9G/SUP/Dw02p630YGuHDfFB9d5
|
|
4Rd9094Xd9rRed2SM71x/BA6FKPuotmKDJe3I/ynBUBuMgiPKG9El0hHnQV0
|
|
hGFn5IPNtdo6dMix6BfBQBg+n+m8E1RQh9hiFy7bmAtD1n5/a9fEOlTYlVCR
|
|
4SQMxbdHGfwc69ATs5YF+mRhGLA+ukeCvQ79tJMI/f1BGF5wZd8wnK1FjiFr
|
|
KX2RIhB8P/TFyas1SK82/9HF/w7At5oPr94rViLDkf6/Sy8OQJXxFVoqtkpk
|
|
QUVrcmbwAHyKDQLD5bvI1dr/A/p6AOqYj7wUaLiLjCPFYmLpRIFEPXycSvcu
|
|
CjiwXqqvIArPrwrz1h6uQN0et390hYrCvZ+HOjLiy5DpH12uqEhREG993brj
|
|
WYb6M95pa8aKgnHEQFHskTL0oZkptixZFPSfMLGP8pWhJeZgroRCUYDbBMmn
|
|
90oRf90hgnGnKHwtfrh9cuQO8t1ciX3BKgZ6xc5iXQdLkF6gO98slxi8DiGN
|
|
2MiVIMb5sWoafjG46CvHR89egsrHu4ZxcTFw3/pA899YMZp4dkOxUVsMCCK4
|
|
W+b5YmSZoDtackYMgkekB07a3EbqXJdUIuvFQPrunr73pwoR1dW17rwmMUga
|
|
OH5USaUQ9dN4OzS1ioGLqkde255C5LNmnbDSIwbp3LNLl+7eRGWjkuMeY2LA
|
|
8SrBqGytAPHdfpF4nEYcOg4K8SsUUu7zChwTSjbiQMUxyGfNmYvWbwlc0nAQ
|
|
hxM9z9f5FnLQKruUpO4ZcUhjOejL2pODln7reht6iYO38qPk9PAcyr3Ydd0h
|
|
WhwyDVTKPs3cQC8PP2ZLKheHxZK53Gvd2ajAxxFNrYlDgFPXefxuFsr95Dn1
|
|
bVsciJ9eTS0lZqFsy/MJP/6JQ5OtLN7nnoXSNZJebTJJwKWeAhFWmSwUt1Nv
|
|
yy4iASwJ6wdLqzKRz1W6AJKxBLA+cPi425SBSNU1xTk5EiCKfoY9nUpD46LV
|
|
t41uSoCfzMy8c10aisipKlq9LQGTMynLhy+moceXKgqtqySgya/o3rJAGlK3
|
|
K85ja5MAQpDSgL9tKpKjy85InJSAtd+8gtyfUhDfmcjYUEVJ4KlzDVben4Qa
|
|
34XHSKlJAnX6YgnD8hV03OzCxXdakpDF+MBcpOcKytIKiVJHkiAqXbGfJugK
|
|
YmU5d2HpqCR8+05/vbQ/EdE2uwS4h0lCRnGpMeP1BLTCZeZ0olMS7msn1VcY
|
|
X0ajvuID3s8lITE4zKpT9DJqJ2+jmD5JIL1q/Cu0E4cyIqoPVA5LwtDiM9P0
|
|
ujikOsXyeWteEtp2WkXsROKQf/2b07e4pcC/8sWqId0lNG9pc3LmrBSwb/aX
|
|
jP+JRoNVSq82vaSA66jq75r/olELDT2R9ZwUrPl1+n6Pi0bJj5sEtMOl4KGo
|
|
a1bJ3mgke4B/7EqaFDjftBvaFYlCHktjdgpNUiBN7P687BCBZlKdTgQxSMPH
|
|
czqvRgTDkP+8orgqizS8qFtO0FsKRRsmWz9+cEiD+uaBqIX2ULSXJivBS0Aa
|
|
mF/z+Gt7hCLV8K5HTkrS4Ev40HH2cQiKdpPmtjwmDXzZEQLP3YIRH774RuG2
|
|
NCRTe9a+2whExTef3PxeKg1mfNe7tIYCkdxWvMfdSmmg6hm0H60NRKRHwv/E
|
|
G6Thn5R1yhf3QOQqb6ks0CMN7Ir/sn99CEB1fA2pjAvSEDglU5KTew6ZLoeZ
|
|
ftWWgc2g98zlj32QkJpIIiNJBpTD1bySLvigpaDuTgV9GRhmjNy7oOuDstc5
|
|
SEGHZeDw0Fq7/DNvNPG3SvnfGRnw5nTuj+rzQkEsH7n3J8uA+64GofGfBzK0
|
|
iLMipctAK393rvwLD7QvQzbtzHUZIOiaW3FleqA27hD6ilsy4N/xs05L0gPR
|
|
C7JtqTfIQOQ13adNlu6oQA4mzMdl4In885tbLWeRr8+sQMAXGQgkH6/UTTmL
|
|
0P1U2+tfZSC0u1noi/1ZNKP6YeDDsgwImI66nN52Rco6QV3utLIwbHXxDh24
|
|
oi7jsspYJVnQyvf9E/jJGS26Mp5/FCMLCe8DZWSeOKKlIsOn/8XLwjEab5Md
|
|
f0e0/CGW4VWyLDhXnjTzlXZEvyy3bk5elwWjZbUg0dzTaIM4381WKQsrQqdX
|
|
62NOIWqePj6vAVkIpmv1iPd1QLSWjM7B72UhWmlA/46iA6JLMayOGZOFFH2b
|
|
osM/7BEj1VOUMyMLBz+JPSMF2CO2xfueXZuywPzjA3NUlB3a332tRVhMDlYH
|
|
D8Zdu38CCfx7RSsnLQfnfbqmFkNOICE9RktNBTnI5tJe68FPIJG62GkzLTlQ
|
|
/RAQ8O2tDZIsDGS5YEoZjz98//rvcaQafMxxMFAO3vhwPD/tcwwZS+6jvtIp
|
|
B2y+zr0xuVbou4tJJfG5HLxumWDwDrBCqSVhFj9fyYHT8gudSlMrNCQyWmD/
|
|
Xg7qnWcWiNuWyGl/vobinByI+o05tb6xQOFsgm5vWeVhYKSx2zLPHAkdOcyc
|
|
yCUPPJ+LL3IeN0ftVyPr9fbJg/exLkFPDnNEz/Txb6moPNTkP4x9k3IYZdHc
|
|
ygnVkId019VJj0QzVLMp8kLQXh7ohZiN+nIPIUuCpf/AaXn4Q/uIwf7UIfQr
|
|
JIYnwUUe0mR9Yr3EDiHd35+dlnzkQe5+bgLnfRNE/lG81X5RHrpn8FHnl8bo
|
|
85S4gnuZPPQXnBmTFTJCXK+l0+uW5WH5x8m7/bwGaHdZtfzlqjxoKtww1fmq
|
|
j+a5iG0zW/Jgt5kjJtCojzrtLOf5aRWg8xh+yOCEPjo/E2Z8iV8BrNm/P2Qo
|
|
AvRu58XuUX0FeO7dT8uegKN2kSFeX2MFsCIEcW+o4ahG/5Ni4mEF0GGd33zw
|
|
GUMJV1YcWmwUQN4icDYVw5A2t8BjcW8FSPl5yLOdmoRy5X3O/c5SgN2465fi
|
|
6nVR/JGQRNY8BegezPlU4q2LAgJibsncUoCrijxioZK66FDT9Vcn7ypAb87Y
|
|
B+0CHbSp3ybT3aoAt/pmZBfTCMjBnvVL9owCMOm99+vN1kJCSQ+stLUVYUck
|
|
+xITnzq6V3u/a0tPEVYM7szozqohnffV2k+RInCEcT3+3KSGjotXChmaKoIh
|
|
uplxxV4NpbYVzx09pQiZUjffKZSpop2fmbF+cYpwoCR03/BNZZS0L+O36hVF
|
|
MOZqoNswVabsZ+nuq1cVoZOhuH96UwmpX00xj7yhCEPY+Uf77ZWQt9Rl/uRK
|
|
RfDfcl3vFldEY/bBdWX9itAuO6ea80EOecYGSXgOKULoXZAsvS6H1isCchRG
|
|
FeGN38VCJws5xLXqG9UwqQjJ+q+fzvbIIrN0t0Ptq4og8f7M999tMqi588SX
|
|
cQElsDm7mfK0VwrlKehycHsogXWC6ADzcXFkc/h1xjMfJfjy5tYTc3FxxOXj
|
|
zOkdoATiQWxbzCti6Oq9ZK6OcCXYs/T4K1WGGLooN8ZzLlUJrhPK6sqGRNFZ
|
|
mcj9r+qVQO5n8ePWSREkZsJeENqkBHEvJTv/poqgCfdSAfFWJai1NG3bryuC
|
|
bCteCYZ3K4GodbjfyHVhZCYlJCIzogSv0q201Y8JITWJp+KX/yiBoOrz9qaN
|
|
/WjJ4Gip8h5luE3K8qx9sB/dc/kqMUanDDryErecPfcjyTusUmrsyiDPe7v4
|
|
9zg/4hdzlPkspgxWRgev33i1D+2K/FMgmijDzOPQC/aveNFLAX2t35nKUF8l
|
|
NDOhz4UGRB5I0+Yqw2Rx4FAPExcaFhfm5y1UhmVxOXrLQU40Kb+1rV2hDON1
|
|
8576bpxoU6++PaJFGUb8ngaGZXEg6ZNi5tTTynDZ7Oz5WE42pHjmGsY9pwx3
|
|
CzSS2B+xInXXv8qSP5RBIQ4/U2fLijCfD5zGG8qAW9M9ELzDgo5HZo4kM6tA
|
|
sc612UMHmVHczT2unJoq8IEhz/TGI0aUdPvccXFdFWiQ7elfcWdE6aWfjDRw
|
|
FUjiCqjRFGBE+dXNsjaHVKCySzzW9TIDqmsNXMo7pQL/vY+2EnOiRxPjk+Gi
|
|
CSpgMMEyxK5Pi2Y+W/qopajAo7Dt44+oaNH89NNTBtdUgPwiTl6ggwatLeSj
|
|
s/kqcHMw2V7MkAax/DlKV3lfBcbPPHs8bU2N9IQ6M1SGVeBATuSh8EwqNCUh
|
|
OfF9TAVGEAnvPUOFkhUSFco+q8BGhqR+hTIVGtUzI/N/VwGiuagCTeE/PMx+
|
|
cGfPHxWYo+8pk5fexR0OB2rMc6jC37fvMta9d3BlS3EHE25V8P9r0/Ft3w5O
|
|
fWwotoxXFZrozrg979nGqxy0+h0FVEHqahftIcltfNNry3NIQhXcEtZnmBY3
|
|
8ZykS0Vt2qrQERPPcbFsHfdOVe/Zr6sKWYoRFdpn1nE8Y3ohlKgKRTGMDk8E
|
|
1vGvuUa6aqAKLC/DUtmy13DNu0zvyk1VIaqU6Pfq2io+2JPJdO2UKqTdsHnU
|
|
WfULr+g1UF10VIUlP2LQvoBfeMTr3ydMnVXh31XlIF7CL1zsvU0ZjbsqmH6J
|
|
XaJ7voIHzOxHF86pQnjD2Gji0k+cjeZOsHMcJd52fDxb4xJOv/XfsZV4VTCw
|
|
vzFlcGQJ3136pH7piircd377uXv2B748tn+lOFUVaI3xjRLhH/hAQ6bflxxV
|
|
GICH/x0vWMCzXC65n6mmvKdbXHbqm8NT7G4bLd9XhbJJza2asDk8zuKpZEyd
|
|
KlStD/mzSM7h5/W2pooaKXq+oKDNmG/4ca7AMxP/qUJ0RVSNvOEsztfpZHf6
|
|
nSpcNZ0Cw51pnO3JRcKPYVW4x0vbbNE0jdPXFvJFf1CFbiLHP2LQNL6RP/qu
|
|
cEIVxjxvbDxcnMJHA62OfpxThb1nBLz6FybxAjEwO/lXFQL99X74cnzBs/Y5
|
|
yi38U4VGNKfwvu4znsIaxRhJrQYcEcl8Rgaf8citx+QCBjVo9xnxD/CawE+9
|
|
VTk4xqkGF7YbhC+8+IiLXDpAspdWg3TNkdC0ng947XlG8U+yapT/pRJrf98P
|
|
OO6+wuCsoAar//leDOH5gJ8+3DXkqaoGlW4J3nMeo3ghr4fPBT01EOOJddwV
|
|
HMH336styLVQg6zUJ9rbje/wysLcWMGjalBtYRVe4fcO17kW6377mBr8HSYq
|
|
Gkq/w+2CrdXv2qlBxU7AhknBEJ6Dr/c2uVA4LeT2gbRBnGcI23ofqgbjm6W0
|
|
t28O4GU90p/tw9WAKfNFCJvzAK7xhL3nU6Qa5bwZjj4oM4Bb35rM+BqrRtkv
|
|
pb7N+bzBMz0SZNdS1CCld/f3qSevcbY/fbY8t9VgLYuX4e/1l3jRUiOWV6IG
|
|
iYvxFqe0XuLKk0USQmUUvxpqdXZHevEj5IBliSqKH8nnKrZEe/HUDJ4rGg/V
|
|
YN+t7JAzHc9xJqlTTdbP1eB0YsjlLJ0e3Hs/MqvuVYNvcm/F3Fa68Zes4hM0
|
|
fWrA9+TuNaHqbjx1/Rtd44AamBJeLSmLdeNsL87b7BtTA0LyNm3uvi6cy+fq
|
|
6viiGkDW76cEhQ486Ix/kuYyxd+atZsHVtrxoWNHhdJWKPHy1um7H7fj2aR9
|
|
hvg6xU9XM19dk3Z8H1vp9eJ/atDT+TVW9dMzXKi+Rd2NSx3uM3h3ZbW04lHl
|
|
t8hPedRhzn2P3o+Trfin/FgHvn3qkKJa0Be924IXxRnHPRdUhxGO03LqJi24
|
|
6PHBt3JS6hDyZt0jdvYJLrXxPWCJoA7KpaYuN+2b8MSFPloTPXVocEutqmRp
|
|
wmc/P8i7TVKHzWt25x61N+KVL0LarfTVYXSVdrlFoRGXL9jD8dBMHZwJhdzK
|
|
rI9wZWz/g7DT6vBUeFdAeKcefyjhtUPtpA7Tqo1TAY/rcZ29zSbpLupQPtOU
|
|
0BxcjxuM2H0p81CHh928CkK/6vATgXmcg4HqoMVhNJK//ACPKd8XrJioDt/O
|
|
0C+etKvBaVM92h8nqYMonY9pw2I1nhL0mOXgVXWIbLq+LyuuGs9GtuX2GeqQ
|
|
H6SRM9pwD6/8kDOcWKAOAg8uzC9JVuEDrHy6k7Xq0FY1d+CbWQVus+qW4Fuv
|
|
DpPqej+D18rxsbHGtxsP1cHILZwPLynHZ+7aeLM1q8Me2n76wD9l+Kb+jZvE
|
|
LnUI907jmG4vxcVCeXZvjFD0+TIYB10swStOnTUTG1MHblfja716JbjiwUc5
|
|
NR/VIYuJd1tosxjX5jiu0jWpDm8PPFO4F1KMm9277vRzQR3MxQ8++rNRhAdN
|
|
cHWZUWnA2pawiK/bTfwF+dTTe9QaoP7VRjd7z01c5EHF4710GnBbhUpO8HYB
|
|
/jJGr+YlkwacVtfYpzGRj4uLudww49YARz9wZvXNw9+61nuYSWuAoQPbg+rO
|
|
G7i0+Y7zPVkN+Dyq9agx6AYepWl0aq+CBpgbuquPS9zAZek+WL1U0YCNQo8M
|
|
r+RsPLaCSs9MVwPm314lKDlfx1W/W7KYmWuAydXNW/qQiSe+zae/Z6EBcXaK
|
|
4XZUmfjH5mmqvUc1gD5e5Nuxjgw8KSVsrddGA+jks7FFowz8i8LtCdMzGsAz
|
|
ZXi3qCEdz/BfqjMN0oBd7jiZHvOr+OwJneqqYA1QTTcd759NwUkorpwpTAMa
|
|
TdM8D8Wl4HPsfAW9kRrw9kebYtjTZBzqscumCRrwQGC8jWiYhC//TrUxzdOA
|
|
1O7CCttrCfjH0ZITtwo0IJw8VN6BEvCXT5tsVwo1QCidJcdkJR4vu/LFPr9E
|
|
A5qWC/jzbONxB0FNx+/3NOBHyiW6GdXLeI/BuHvyUw34AJfSObkv4Q0yPz0+
|
|
/UeJx8zUe3UoFi9mofNS69QA2es9qfPZsXjEsLLPB7IG9P/ysTcViMVVvePO
|
|
yQ1owCW6AvI5x4v4zUy5C71TFFalMn6wG4EnheLhwl81oIfrYHB4fgQeevJY
|
|
ROA3DZAPu/6yQSsCt5KKjtq/qAFv5suWHYPCcfrmgVivNQ0I2+xs5/kThgd+
|
|
CUtmYtSEiOJynjnzENyxJzXl9F5NuHibUdP/TzBufq/kaj2LJshF2tUI3A/G
|
|
pYNfpdlzaoLVf9MRw5zB+EeGA1lVApogoyxs4TMXhJuokAtMlTThn2R+Sic5
|
|
ALejP3R8QEUTSqNdW2MuBeDen3pZbdU1IYhf+etRLABPv/o69ixBE/a8Uvlz
|
|
KOAcPvztnXuMviZMv4hRkAj2w+eenRClN9SEeUGtz0zbvvj2jdEPqcaaUE5q
|
|
/DN2yRcXNvxoXnBYE1qfdYyI5PrgZ4un1RttNOHWi6pW1xEvPDTMbZFopwkG
|
|
invKhny88CSLb+WdDprwi34tdG2PF17zZ55/4Iwm5Hy3T9bU8MR/2/3anffS
|
|
hJtiwQE/Kt3xOM49r0QvakIq13Hvf+OuePZcXPzdWE0wmsoXrEpyxSv+o8WV
|
|
L2sC+TTr93JtV/ylH2M9MUkTLl0q5InPccE5X7LnnsjShKHZb9lGbs64eEmm
|
|
1adsTTCnU4ndFnTGNS9w7z2bqwlv75esjA054XbS+6IDCzWhZWjfNrOJE14c
|
|
J+KaWqEJlws6Z1xCHPEG+2Ih7ipNsGH705m8ehrvVhUfzq/WBIajHoEdIafx
|
|
uQkp07t1mmDtOplhcPEUrkJUUuls0YSyH7Uf71c44M9+E3c2+jUhw361It/C
|
|
Fi/pe+xy7K0mCO4NOjG4cgKPL9d4WTtE0VMfdykw5wRuaquQ7zaqCSd3f3v3
|
|
T9vg71oECEOTmlBrkRMXnH4cf3w9p0h5RhMKN6IuWpOO4wW+XPQps5rwLZCP
|
|
59zCMfyMyN73sKAJSRcv+Bw9cgyfv7QVVLuqCaTFHWbSAWv8tUPIGNOGJpjK
|
|
DBZeGz6K12ms6LttacJTKT613fSjeMjXOQ6hXU3Qs1zpEaQ5ilOZjtYmM2jB
|
|
XGOT/JtlS5yP4/H8WQEtUGzAvgyImuNbc+rW7UJaUGZ7zVnlwWH8Y0dts+AB
|
|
Ldi9eXn8MDqMl5yvSBqU0IJjeTLWZWfNcMWRG9KgpAU5Ec8eH+g6hLPXcabf
|
|
VNECKLnX1ux4CP+VlLa2rqYFt5g/H/28Y4I/1kvovq+tBSoSOlWNeia4QVGw
|
|
iyBogZkIUXy51wiXCvvZG2qgBdN/EiSMAo1wRitftUFDLaB7HT24td8If73n
|
|
LFWyKSU/1adm3ucMcTu3Y0Xr1lqwo8Bt9UHuIO6vqD721o0yfuI/g+ZRwEM2
|
|
BLbPeGrBqgfBciEN8KhOGoElby2waDjs4GQI+FW79/Z7A7Rg5uCtp3+8EF4Z
|
|
f+GDQYQW3CvnerZ+CMMfWDpvDURpAbX1bwZfMglvEjDbfyZGCzwObh3ZZ0zC
|
|
e+oE7SPjtWC8h69j/jARn/r4bPRhuhY8JPezpATo4t/v3t3Uz9SCI2ctfzbs
|
|
6uA/gzL4B65rwdcEZb9X6Tr4P0YXu8U8Ldhry3fr3iMCLqRFNypZqgX6dLXL
|
|
hnza+Im0wyM3HmvBeo8kg5e8Bn7aTnNDokULCqxdi3aG1PGzEsL7Gtq04NCd
|
|
4RSmGHX8fPPSif4OLej22U+8+EENz/iaOUzfpwUfAt5Eit5WxXPrItaz+yn1
|
|
cs64PHVMFS+KdOWTeKsFoeXyB34yqeL3ObVOoGEtiCjM23zwWxl/iY2+D/ui
|
|
BTJ8iceSBxTxt4wda3TTWhB1VZql4IgiPjpUxZv9VQvc33nsX+pTwL95RdrU
|
|
zVP65UN1oO6gPE6bI/J+blULqJr1M0+sy+LY0tl39kza0P3d/smvQimcr9Xk
|
|
ThuzNrx+9a4hGqTwpSvyAQfYtOEiaWol+askXiT2k/krlzZ86bNbZdWUxHeP
|
|
Rx4MENKGe0xuagemxPFhMUfOIRFtEJx895ItUxyvXYLPWmKU7880BxzVF8cd
|
|
k+gjd6S0weXPjG9LuRj+X2tmQ6KKNpQxylxJjhbF85KCY7+raYORUNPhGG1R
|
|
PMDG1sJcUxte+tzLwicP4KLLQvOcutqU/7Xb2zcGRPBY8UqxWwaU/H/K+JT0
|
|
CuH6yc8yHtpoQ1qzY+UN4f24wIkSRz47SvyP17JL6vjxX+LxiuEOlPmVyvQj
|
|
jPjxO22mL/Az2nDBSdMxOHgfTv3z3b9eT2249l9UdNcsLz7W9vi1oo82JLCf
|
|
vuB7hRdvSC64ec1PGzafXRW8J8eLu0g4EWyCtOEEMdSuN4gH7zqx4P8lUhvo
|
|
WuTRNz5uvFCin3TwojYMeRZax3dx4cE/6/ZWxGpDrrN4YXwgFy6ZElrhk6AN
|
|
UYbas7lvOfH4p3sm1tO1IWff2oxfCQduJMl/hPWONjiZjyUmrrPgj370iJ0t
|
|
0wa+Ssdjt8JZcMnH59dbKrQhr9axsmOXGac1e3Pbs1obHrte9uZkZ8Y7zyX+
|
|
6nqkDaGOr3e+GzPh6rqazwUea8NcQ+bzpA+MeAn11M3AZm2w/OPsuubHiMfe
|
|
wIwOPNOG6J530QKFDDjeupob8VwbCh796XzFQo/Xxt/xfdurDfT0xc/Y79Ph
|
|
whZW+rJ9lPo129p/t6DD/3ypnn8/oA2qXiWOB3Np8RZ6V0xtTBti3mmtTOrS
|
|
4NrWb6e+LWpD8nqkZnYHFV4hGPMYX9aGkbYuYbsLVDjvV8XUGyvacAiqo4+r
|
|
UuGrYUlaB9e1QeFb21C3yT+s4RZKKvpH4T+MjdfV/mLiHj9Ore0hQHmeae61
|
|
+j9YpupNNXNaAuju9Gc80PiDBXStj20xEmDUUFtdB9/BVL7fV7LhIkDuEd0P
|
|
ET5bWFHDSeoaHgK4y/IKlu9sYmxRTCPU+wjgd0Dk/YO0TWyJzS22TpAAlgdP
|
|
O5s83sBqNIWGmKUIYMMRmnbvwDomG5tyoZNAgI7BP/ge9BtrI5bTmesRYFDP
|
|
KPL21C/MauO/rPckAmxcMJlduvILu+C/VjOnTwCGp4thcSMr2ItTTpNs5gQw
|
|
bCvAapJ/Yqf4I/3zLAiQ/PrhPWq9n9jPoRs7YkcJEJHvzFQ8sozxH37Fq3WC
|
|
ABkzBkFed5cwT11ts5NOBFArzj815bGI/Vm1GplxIcB0VLZH1sQCllHnc9bf
|
|
jQDiMZW8r2wXsCcyJRcveROgv0Jo/O7ReYyRj+Xh3WAC1D849Oad8xxW9WtS
|
|
cDWJAItfOOJfzs9geO2fyuirBNDyOi+0GT+DDXrt02ZIJ4CeAAdxr9gMtv3F
|
|
3ErgOgE+nj60t9lxGjN78zgebhHgCK/PhePLk9hEyiDny9sEkG7vvfckdxIL
|
|
Mv5RdOwOxf8sQ+P/9Cexgqfize53CVDR+s/pRsEXbL467UdqPQH+XK93UX06
|
|
gV30qIzge0QAdh/FqMvSExiXRBdDcRNFP9utN5VZnzC9gk2xh60EeNFclql1
|
|
/iOWkuR64kMPAQTP5QesHhvD5N10/5MaI4DtMZ/miuRh7Jq4xfbljxS/9O2l
|
|
u8WGsdXPLlpTEwS48i1/rbH1PfbMIbW6aJoAp1Wpy9ZX32HWVp9z9/0gwEqd
|
|
PAd31BD2mHV1MGSZ0g8rDW5bYkOY0CtGtncrBBAJunYsrHcQmzVSj89YJ8Cv
|
|
50d/CQsPYuHEhAAmKh3AV1Xy7IYHsInN/GoPah3IyChXw5IGMIOm2tkeWh24
|
|
zOBsFU8cwFjURk/FMemARuYBq4Pmb7BiaQXTHS4deKj1PmaW9zX2gvOt2A8p
|
|
HRirdG5XFurFlN58PXVYVgc4OU7Sr1W8wLJSt3Or5HXAdufY/KDGC+wUgySb
|
|
u4oO7Ok9cqLu2HNs+U/o9oSODnhn6tOv3+vBjrdc1cKIOhDqzekYZdSDPQkr
|
|
DriJUfgt79ehyW4s7lfvrK2BDhzGJ7iGD3RjfHNCQwOHdcCOZTP7cF0nFlmu
|
|
xqZioQN377WzxNh1Yl9cjE3TrHTgrwKnjTF1J3bv07n/TG104D795L5ghw4M
|
|
H+qs7nTUgdhIi1NpQu2Y2zPP+EeBOsBOU55E7G7Flvzmw4yCdeAr/1rJPu1W
|
|
7IKwr89wKMUfnbojbfdasJSoc9abkTpA/qjMKFfYjNXphYqSEnWAyOjfJVb0
|
|
GNOb3+B+naQDT00XrAYlH2Nd+eEMjld14Em1n9zX+03Y8GbUUkyGDhxJfs1A
|
|
87wR+9N0ua2rQAe6pGyqZ7gfYYnudHXHb+nALb5ROZ+ahxg735XSr7cp+qtp
|
|
WP8YP8TEQ1JSGMp14IKz6BRPXANmopFpd/iBDtD39JzmYa/Hsh4UrQ526UDv
|
|
tYfL7zdrMKEzonOuZB3Y3p6wTHCpwcrZ7oyvvtCB8geXP6m+qcae+JV38vVT
|
|
5q/MdNGvv4d9UqjJcBjVASefs0+bcyox93Gl+IUxHWhcKpNp4avEfqY8CIv6
|
|
pAPmyg1pJvl3Mer5BseiKYoe/T0Fw+UVmGxls+LUog5kma9KBoyXYQ22RNHz
|
|
yzpw0jZe6JJ/GUZkeMpN+0sH2Ax/Nv9HU4ZZuLdvS21Q9AzrBBVolmLBks9f
|
|
eO3RhTZ7LemS2hLsv+J3Z1d4daEzeSbsy/ot7Iu52JlQfl2wm273VDl1C6Pa
|
|
8rPfEdCFOqvaI2ndhZjBUQYLOlFdYNyZu6lbdBMj79Ej7JfXhXdJe6qens/H
|
|
vt1PVCtS1IWSOPaEheU8jNFhSEFChcI6ywNN/nmYaYOvqJKmLrB5zKysnM/F
|
|
+lxuM+njuhClShd36+YN7AfbIg0ZdCHS1oVop3ADY2vV2TU7qAunV/xpLZ9m
|
|
Y1bcg7+OH9IFKamZM93frmNDXbQfPa11YTbotWSpTRY2Juldm+GuC68TqFu2
|
|
+a9hOwNNlbxeuvCDev776dB0TCiaprTARxe0iO3qNCNp2On3hbllAbpw3aDg
|
|
y2BJKvYl4U3skwhdUOUrfvDmZAq2R10oEovWhXqJW84pb5Mx8QnPkM4YXeDR
|
|
Wq9iMUvGzmpTe/fF64L1Qy411YNJ2LdZzWNf0nUh/MqAfeTxRIzx+qUjbpm6
|
|
0OHXyrQ1kYDJon6T+eu6cFh5IeS9TwLmnetBWs3TBRbrrJ6I1HhsyaRAirFU
|
|
F/YymQ9pzcVhq5X/NlQe68LJZFcdPqpYbPaEcXFyMyX/PRfLdpxjsFHatEPT
|
|
rbpge3f80EvyRazVSSA/p10XuDz+iSjlR2Nx/Fp6f3t1wTe4fyb5TCQWTI6c
|
|
OtGnC96+tCVDIxGYe3BnSl2/LsxUbnbUW0dgpgOW465DuiC0IqK2bRmOcSR5
|
|
R738qAvzidz8gR5hGLV2vaTkZ1149b3wPufvUGx1eqMvelIXlKliDedjQ7ER
|
|
lCCsNqsLexzOKu8vDcGKNm4/y13Whd8/ntZYUQVjih7vqdyo9eBasX/REG8g
|
|
JsIrVPWMVg9WB8rfOrUHYBxdLkf5GfSgT3jrZqZvAPZb5GfJK2Y9qNIQ5Yi+
|
|
fg5rGd57UJ1XD1hrV8OnFf2wmvijC1f36UFwe45mWoEvVqSed/3rfj3YkRiu
|
|
YWD2xS6lS83kieiB7r6YWp1Vb+yQMST8k9GDbuFjjcKznpjeaqKSvbweFKvZ
|
|
mE54emKKd16/b1DUg43T924wLXlg7LsO0u5qepCeytsY+M8dG24Med6npwdS
|
|
F5mzjmBumKtUNVPBET3I+XJ2k1HIBYvocfSWttIDh3dCe8hPnLEMN65XDdZ6
|
|
8GxrKzzf1hlrKw9PfWVLye/HrWHbm04Yj/Qh9r/OegDXm7z4gh0xefLOueSz
|
|
ejBdtapW0XcaA/cHA7welPFSay7PZE9jfhV8Wcq+euA9LBOGLZzEyNJfeZxC
|
|
9cAj61r6pVx77CM5L2Txgh78Fn/z79Ree+yXu/nwhUg9IHRbG2jF2mEH7j7M
|
|
zYzVg+PnknYLg22xCzJxAl0pejCxRhNQfNEGk5c9ICp9m6LX0VZKntkagxeD
|
|
sQ0levBH6vJXprtHsROeiZN4mR5gBzirmY2OYpcrf9yxrdKD6JOF70yuWGEf
|
|
Zdukkh/qgVk3bceUsQX268W5RN4mPfgq+t/9U0VHMEYviW8lT/Rg6kRHUsCW
|
|
OaZVlVLZ8pSi94ox2/6Ww1i6nL3C4nM9iOMcPurpaoqV9bKkXnipBzeKVMhV
|
|
7w9hLV7ti7Sv9UBReV5wzewQ9q1KplZ4UA+4eST0PXETDOTXVS0/6kGEpc6H
|
|
vSZG2Ir8de2Gn3og8e/62fxBfWy0D4y4f+tBpXblR84Qfazdf+lY8JoeeP1O
|
|
mfTdr4+lN5gGam9T6r8af7XMAzB5PaqaFhoiWPsbv9ZUxzHOj/dbBOmJUDx9
|
|
5+vh6xi2GX2yN4qRCF51A/r5GySM3NE0i7MS4b/gyBc3eomYi6mfWBcfEbLf
|
|
X77llKmLmS4IqEruJ4KM1RvuoL26mGraCzxBkAjp3xi6UaIOtjsgccpElAhX
|
|
ZdstRxMI2E27sZxXckRIs7sQlVSqhb3zMGF5RyLCkaqxemYLdayVaU1ACxFh
|
|
Lszi0+yiGnan+o5cjj4Rfpt58j1NU8MClv8a2xkTIVW6Rl/9vSrGGvbo0kdL
|
|
IuhkB/Y7ripjq/wuGZg1EbbKopfuWCpjH1vYbxcdJ8JrMT8Xo1ol7N6ud5uT
|
|
PRF6/CLMnUIUMeNEsY0ZFyKoqOeJiMjJY0qyb+iM3Sj5sMbZxt2Sw3heRvHc
|
|
9SCC2r/QC108ctgU66ialy8RQowLKkqYZbGYG+m+P0KIIMKgpmKwXxp7UrYz
|
|
uZZEBKd7YnIFleJY4+QiS3EaEbQGU18SZ8WwBpEJglkWEXZD2I0qFMSwmrz2
|
|
tKKbRIhzT72P5R/Aqt7XPzlUTPHnjueUmqUIVsFVOv2rjAhPtj1dPLiEseLU
|
|
BF2TWiKIlaDjl58JYLd6Q8+uNBCBP0dY2K9iP1ZA73nt5mMiHJzKiSzK58ey
|
|
Y82+LrcT4YaxxTRXMR+WHMyemTdEBCr8V0+/GDeWWE/VZjBKBNfGdgMnOy4s
|
|
fmlldvEjERIWZob353JiFz3fkfRniRDmYNDbqsBBuT/1eCzME+HFt4iPbNTs
|
|
2IWppqwby0TQFzP7FdfCigWdyp/7vkkEi6HcjTfWzNi5/BTu7L9E4OLtG76l
|
|
thfzHY7EcWoSSDS7rKkJMWHuVo7ZWcwkoCquv9vPxYA5GEoAUYQErH2skuRw
|
|
GqzYbWncTIIEbC+kq+3zqbHZxOYwB1kSmP9sC/3SuQcL6rV8EK5OAtN4s7/s
|
|
6lTYk3mBw8kEErjl19O9/bFL2mWenc0jkeAyo++2dNJfUopFlMgTYxJ8KdIv
|
|
/7ywTeLL5DoxYkWC5ELbQ++SN0l3hirT1h1IUJw7LkJ3ep2kzId6eN1IoPKq
|
|
N2nCaZXUYvf+j+Y5EhzLZGZTzfxFMr7po3k8nASndCKEJed/kgY/7fE9f5kE
|
|
43/9VgIGlkiOonmlWWkkih/L0f4ci6R5F+Xx+lwSmETs4XFO/04KLe/meltC
|
|
gvApaonvht9I1HMOZj+rSSCtTpMtpPKVlC6/com9iQSLY4/now5NkwT9rjQr
|
|
t5NArlmFsJQ6SWqhis/jGiJBqGTtbeK5TySH7Niw9a8kWI76pzFWPUrakok+
|
|
MbZJgo2os10nqt+R8lrDtZ4xY2CSx7+5avGWRLAM5bkjgoGSQq3spa0+0vBU
|
|
0O8ENQwW+z5Fl2IvSGYh1uemNDA4+nVBJv/Rc9IzBvUFXBuD6/efXElRfk6q
|
|
UFyZ2tDDgMz9FTugQCaFhp4b9DLEQHz0u9VJo24S717f+iO2GJR4XCy/uNJO
|
|
2rwTYxBxCYOBvsdX7KubSGPE60MV1RicvVOxVm5QS/IMKSs0rcVgeDyPpyv2
|
|
Pmm9ttFtsQ6D8zRe56u6akhc4qMbak0YrHNqepy0rSYdZhQWetpOiZ/rGIE9
|
|
rCS1vas4O/QegxxGsYSz0mUkM7YnSqGjGGhd+aB+rayUNGrSu84/jsGaJL3A
|
|
b6lS0mrLQpLjFwyQp7MRn/odklKJ6v3v8xhwOgslNfgVk9rG9ENTf2BwZ3Fn
|
|
7ipNMcmM5xhS+YkBtX3pOLfObZL7lZC3wWsYtGjp1blW3SKtticW7NvEIDTi
|
|
qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw
|
|
18hpWOkpIP0PtXjCHw==
|
|
"]]},
|
|
Annotation[#, "Charting`Private`Tag#1"]& ]}, {}},
|
|
{"WolframDynamicHighlight", <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}],
|
|
StyleBox[
|
|
DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {},
|
|
Slot["HighlightElements"],
|
|
Slot["LayoutOptions"],
|
|
Slot["Meta"],
|
|
Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {},
|
|
Annotation[{
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]],
|
|
Line[CompressedData["
|
|
1:eJwVl3c8Vu8bx2XLnsnK3ns9eJ5z7ouMSEjJqGRkj5CRFQkhhGQlkRGRUJRR
|
|
X/MpJYlClDKSEClb6ff8/jqv9+vc576uz+e67nHEXM5Zu1FTUVEF0FBR/f+5
|
|
PtHbLXm1DOfOnGIcL/XB3xXxh+uPxiHTBqPaxw6mCHjfuPCPZqED5icq/R3s
|
|
UajVvRGa0TvI9kMNC4uDF+Jc2pe1NdKARrOiz07ZhaPPbRbnVkc60Z3zDCW+
|
|
x5ORseT8p5WRQXSb5nVio0E+2hoh3Pg5MoVcPtsXOf2pRE/UGZ3uyk0jjfKz
|
|
61FuVSg0bVTeMXIa7U/R/H2uvwr9MghvfyUygzInKvCR2/fQ/P2WhQq3r+jv
|
|
t5alPKhBHy9jBqd/f0OssycH7MIfoHaVg8u9bD/QAwkG0sPJBtR18G7Z2zu/
|
|
EWGnVd6w7wlSTX/wfePFb6SRE1dhvP4EFY0+VhZZ/o0EvxyfkBZtRhf8Xjzx
|
|
Jq4iQz/3RzHnm5Fy7vc+mner6IFHlk8afwsqmFdY06JbR2LVYXk/TraigMw6
|
|
owKPTVQuKhgcSn6KJsafpLSnbSKXa41vBxeeosPSHW9mH26iqdYNAQbOZ0i6
|
|
9a29BtUWok371bfu8AyNz/zy68vbQqOz06ZLi8+QsY5Wzm7vNloplnifRtuO
|
|
hD43z7oo/kWkM8dimjk6ENXvwLzeo38RYeHvl0DRDjRDL2+mGvYXcRa3feZR
|
|
7UD3lQvu/+34i3Y37aIFLDsQfjEiOM92FzlxbLSLp3agM8JE6v64f2hEI4wo
|
|
RN2J3ipNpBcuUgHVabv/XD51om5CyzfLf1RQlu/iaDvfiZr0c4CGaw/8jGIj
|
|
aG10ogIbi19ehD1Qe7k2uIajC7lEP7MhxO2B6KN1xkkGXehXX5HQ4D5q2NNz
|
|
mmG5pAvx+J65x3CQBvReZJpbWXYjeYZSspUtDfRuaE7oOHQjuDM7le9DA9am
|
|
pu/p3LqR76ifoGI2DUgP7MyaR3SjbsOoVKuvNECl5Wt+rbQbBQvn++dfoYVW
|
|
o6uJ0z+7UcqTjylTN2nh9ulffpzb3aj4mOhdhTpauGOhUypB04P6ku9+fjpK
|
|
CzvqzVurPD1Icr3RakqODtZqN88fJvSgof5BdYU+OugsEDfrDe1Bc158lsFf
|
|
6ICthmeAdLEH7dI6+DxdpQPdlp/PsxN6kDxxstRSmB52Fm1Ffl3vQXF3l3mC
|
|
/emhUWVhzuVBD8oz0FB7GkcP3n2lMduNPaj2U+gR+lx6KOz9/iC0rQeNce8m
|
|
5P1HDxYPBNaEenuQeizLRhsHAxQe4iOLTfagQ4JW3PRSDDBj8mR8YrYHOTZd
|
|
V7HUZYDMvoj22MUelLIo4DnpzAASWjp85zd60JSd3Ae6hwxwK0dzmIuFjDZ/
|
|
+65ZPGeAq3q7xhscZMR2rY4zb5wBdBDty3ZeMtLrIZjJ0zJCIBMo0hwgoyw1
|
|
41YLG0Ywu6J03liVjFTG7U0wT0bQf9DOzaFJRn3xfkMKkYxAX6WR0EkgI/rR
|
|
7AXGEkZg0Ti2O4mTUemlyrCNh4yww67Ib2lARqDQRjNLZoTxXZJMuREZRV6c
|
|
FuxaZISMH7tmLOZkxC+7cbf+HyP8d5zpvLAlGTW93atZzMUEa7DbtM+ajH5K
|
|
qptH6zCBxORKy3NbMjr7KjaKEM8ER2gZ3vO5kNGekGxG6VwmOHfN82/gWTIq
|
|
EqnM5rnHBLNU2zea3MloNPBNzcobJnhnfMHwjzcZhQhO63yZYoKQz+KBf33J
|
|
iKtnvbt/jQns4i8Q5/zJ6Ai/yKdqwb0gpXRgNCKIjOY71LwKlPfCDbODneLB
|
|
ZJTkY7SWpL8X3hg8CX8UQkZSvPaXwo7vBa+2tr2qYWTU+cyX1d1jL1Cz1l+6
|
|
cYGMznjG5h+P2Av89PsWZsLJ6A9nttTBtL3Q25F5TCSSjLTdWjHRh3shWGTj
|
|
uGU0GQ2xvellI+8FwbQ+BpOLZBTwZMrm7+hecFi5+kM2hoxYXdYnFxb2wqee
|
|
SO41Ct9j3us/trsXNrOpr1THkpFJo/D2C05maO2qsDG/REYzjmqJjyWZYfgU
|
|
W9oIheMYjbgqCMxwcHxX70gcGR1osCvKNmOGe6un/O5TuO2kr/zl08xQ4aqo
|
|
vklhB7rYpsAAZhirv5ardJmMNmqvGzhdZoaOPS+qj1A42+5uv0UOM5iNakbb
|
|
UViNutUBq2IGr9ljAhYU7q/un1VoYwajwfZMZQr72EwFCbxhhrNUWr+2KPMz
|
|
/lvbZZxihkunrpjVUbi8kunqxiozWInXVB2lsIG18L5ZBhYQqngkMkHJ//OO
|
|
auk7ARbgEn7zxIbCUeWGKl1KLJDsZnzlCUX/fku71npgAe43l/LpKdy06WNS
|
|
fIwFTkzR/kMUv47diRlKd2eBIdlzz89S/P15+PqZ6HAWuLQaSR1C8T9trWLB
|
|
J5UF5GWo2wOiyEj+dkuYw20W6Nv6zW5HqdfzQ/00pg0sUNHlSK0QQenHX5PX
|
|
CD0sYNrhffc7pd57CtcEpUdZwHfcgT2b0g9FRkyVPAssUOeXaiYfSkYf8lTb
|
|
VzhY4Z1FTZTAeTIqGKpmD5VihY4vNQ5WgRS/2WTObOuygn1vxbD/OTLlPBPe
|
|
pXZlBdnv+btuPmR061nekSthrHB+5Nd73IuMHLe4bzGnskLOR5o7VB5k9MV/
|
|
L4mnkRW412IDEGV9lFQlXM3rZYUyPvvbbWfIyGWGalxoghVE29oFJU5T+sN+
|
|
I1yKgQ0O7EbY1lDW15zhzGNtezZ4GCRl33CYjKpizjC0+rEBj6RoUNQhMvJu
|
|
GTuB4tjghv/hDFXKel5UebtmUs0Grtb6eraU9f9T4JmG/V82YP5s9alYhbL/
|
|
/Mx9EFnCDl2eHTF6bGTUrMD9718jOzTpMCvUMZFRhHu6RfxLdmCJkXDipKOs
|
|
j/H4H6m/2aGo2bUvZ6cHxU4/4X0jzgES8Q+C6r71oPj+8mNfgjmA7jmdjxZl
|
|
/5zxcY0Uj+EAsbFrNeeaepARk1jp2WQOWMi35cmt60H0hoW/5m5xwMXS4Pb7
|
|
ZT0oqTkrc4XMAbNPk8//vdqDrpbFvKHezwlHFkTbMdseZKbpxcUrwQkV2aqW
|
|
YVY9iLHb2kZGiROKfeKPFptS4k9LjR/W54RN2kf7Oog9KEq8bzbbixOkznXH
|
|
wYEe5F/MvyvdwgkHTUqbj0x3o6OF9YqHT3LBhEZImoNTN+JQvHnutBsXKDKX
|
|
BzbadqP+1viGc+e44FTXAh8N5Tw0G7fVyb7MBfZvBtnDsG5kILB78FM1F8R7
|
|
r1Z27+9GmnlmJ8/94YIEf5hnHehC+7Knk6/f4gYe/r49PJpdiF+hMX6zghss
|
|
K/xWKuW7kEBnYszpOm44NLsAWmJdSOSnXIhMFzccpPO30WTrQlLmAU6tc9zw
|
|
dXGlpv9bJ9Kg/as9rcEDJSMnyYn5ncgymG9G/SUP/Dw02p630YGuHDfFB9d5
|
|
4Rd9094Xd9rRed2SM71x/BA6FKPuotmKDJe3I/ynBUBuMgiPKG9El0hHnQV0
|
|
hGFn5IPNtdo6dMix6BfBQBg+n+m8E1RQh9hiFy7bmAtD1n5/a9fEOlTYlVCR
|
|
4SQMxbdHGfwc69ATs5YF+mRhGLA+ukeCvQ79tJMI/f1BGF5wZd8wnK1FjiFr
|
|
KX2RIhB8P/TFyas1SK82/9HF/w7At5oPr94rViLDkf6/Sy8OQJXxFVoqtkpk
|
|
QUVrcmbwAHyKDQLD5bvI1dr/A/p6AOqYj7wUaLiLjCPFYmLpRIFEPXycSvcu
|
|
CjiwXqqvIArPrwrz1h6uQN0et390hYrCvZ+HOjLiy5DpH12uqEhREG993brj
|
|
WYb6M95pa8aKgnHEQFHskTL0oZkptixZFPSfMLGP8pWhJeZgroRCUYDbBMmn
|
|
90oRf90hgnGnKHwtfrh9cuQO8t1ciX3BKgZ6xc5iXQdLkF6gO98slxi8DiGN
|
|
2MiVIMb5sWoafjG46CvHR89egsrHu4ZxcTFw3/pA899YMZp4dkOxUVsMCCK4
|
|
W+b5YmSZoDtackYMgkekB07a3EbqXJdUIuvFQPrunr73pwoR1dW17rwmMUga
|
|
OH5USaUQ9dN4OzS1ioGLqkde255C5LNmnbDSIwbp3LNLl+7eRGWjkuMeY2LA
|
|
8SrBqGytAPHdfpF4nEYcOg4K8SsUUu7zChwTSjbiQMUxyGfNmYvWbwlc0nAQ
|
|
hxM9z9f5FnLQKruUpO4ZcUhjOejL2pODln7reht6iYO38qPk9PAcyr3Ydd0h
|
|
WhwyDVTKPs3cQC8PP2ZLKheHxZK53Gvd2ajAxxFNrYlDgFPXefxuFsr95Dn1
|
|
bVsciJ9eTS0lZqFsy/MJP/6JQ5OtLN7nnoXSNZJebTJJwKWeAhFWmSwUt1Nv
|
|
yy4iASwJ6wdLqzKRz1W6AJKxBLA+cPi425SBSNU1xTk5EiCKfoY9nUpD46LV
|
|
t41uSoCfzMy8c10aisipKlq9LQGTMynLhy+moceXKgqtqySgya/o3rJAGlK3
|
|
K85ja5MAQpDSgL9tKpKjy85InJSAtd+8gtyfUhDfmcjYUEVJ4KlzDVben4Qa
|
|
34XHSKlJAnX6YgnD8hV03OzCxXdakpDF+MBcpOcKytIKiVJHkiAqXbGfJugK
|
|
YmU5d2HpqCR8+05/vbQ/EdE2uwS4h0lCRnGpMeP1BLTCZeZ0olMS7msn1VcY
|
|
X0ajvuID3s8lITE4zKpT9DJqJ2+jmD5JIL1q/Cu0E4cyIqoPVA5LwtDiM9P0
|
|
ujikOsXyeWteEtp2WkXsROKQf/2b07e4pcC/8sWqId0lNG9pc3LmrBSwb/aX
|
|
jP+JRoNVSq82vaSA66jq75r/olELDT2R9ZwUrPl1+n6Pi0bJj5sEtMOl4KGo
|
|
a1bJ3mgke4B/7EqaFDjftBvaFYlCHktjdgpNUiBN7P687BCBZlKdTgQxSMPH
|
|
czqvRgTDkP+8orgqizS8qFtO0FsKRRsmWz9+cEiD+uaBqIX2ULSXJivBS0Aa
|
|
mF/z+Gt7hCLV8K5HTkrS4Ev40HH2cQiKdpPmtjwmDXzZEQLP3YIRH774RuG2
|
|
NCRTe9a+2whExTef3PxeKg1mfNe7tIYCkdxWvMfdSmmg6hm0H60NRKRHwv/E
|
|
G6Thn5R1yhf3QOQqb6ks0CMN7Ir/sn99CEB1fA2pjAvSEDglU5KTew6ZLoeZ
|
|
ftWWgc2g98zlj32QkJpIIiNJBpTD1bySLvigpaDuTgV9GRhmjNy7oOuDstc5
|
|
SEGHZeDw0Fq7/DNvNPG3SvnfGRnw5nTuj+rzQkEsH7n3J8uA+64GofGfBzK0
|
|
iLMipctAK393rvwLD7QvQzbtzHUZIOiaW3FleqA27hD6ilsy4N/xs05L0gPR
|
|
C7JtqTfIQOQ13adNlu6oQA4mzMdl4In885tbLWeRr8+sQMAXGQgkH6/UTTmL
|
|
0P1U2+tfZSC0u1noi/1ZNKP6YeDDsgwImI66nN52Rco6QV3utLIwbHXxDh24
|
|
oi7jsspYJVnQyvf9E/jJGS26Mp5/FCMLCe8DZWSeOKKlIsOn/8XLwjEab5Md
|
|
f0e0/CGW4VWyLDhXnjTzlXZEvyy3bk5elwWjZbUg0dzTaIM4381WKQsrQqdX
|
|
62NOIWqePj6vAVkIpmv1iPd1QLSWjM7B72UhWmlA/46iA6JLMayOGZOFFH2b
|
|
osM/7BEj1VOUMyMLBz+JPSMF2CO2xfueXZuywPzjA3NUlB3a332tRVhMDlYH
|
|
D8Zdu38CCfx7RSsnLQfnfbqmFkNOICE9RktNBTnI5tJe68FPIJG62GkzLTlQ
|
|
/RAQ8O2tDZIsDGS5YEoZjz98//rvcaQafMxxMFAO3vhwPD/tcwwZS+6jvtIp
|
|
B2y+zr0xuVbou4tJJfG5HLxumWDwDrBCqSVhFj9fyYHT8gudSlMrNCQyWmD/
|
|
Xg7qnWcWiNuWyGl/vobinByI+o05tb6xQOFsgm5vWeVhYKSx2zLPHAkdOcyc
|
|
yCUPPJ+LL3IeN0ftVyPr9fbJg/exLkFPDnNEz/Txb6moPNTkP4x9k3IYZdHc
|
|
ygnVkId019VJj0QzVLMp8kLQXh7ohZiN+nIPIUuCpf/AaXn4Q/uIwf7UIfQr
|
|
JIYnwUUe0mR9Yr3EDiHd35+dlnzkQe5+bgLnfRNE/lG81X5RHrpn8FHnl8bo
|
|
85S4gnuZPPQXnBmTFTJCXK+l0+uW5WH5x8m7/bwGaHdZtfzlqjxoKtww1fmq
|
|
j+a5iG0zW/Jgt5kjJtCojzrtLOf5aRWg8xh+yOCEPjo/E2Z8iV8BrNm/P2Qo
|
|
AvRu58XuUX0FeO7dT8uegKN2kSFeX2MFsCIEcW+o4ahG/5Ni4mEF0GGd33zw
|
|
GUMJV1YcWmwUQN4icDYVw5A2t8BjcW8FSPl5yLOdmoRy5X3O/c5SgN2465fi
|
|
6nVR/JGQRNY8BegezPlU4q2LAgJibsncUoCrijxioZK66FDT9Vcn7ypAb87Y
|
|
B+0CHbSp3ybT3aoAt/pmZBfTCMjBnvVL9owCMOm99+vN1kJCSQ+stLUVYUck
|
|
+xITnzq6V3u/a0tPEVYM7szozqohnffV2k+RInCEcT3+3KSGjotXChmaKoIh
|
|
uplxxV4NpbYVzx09pQiZUjffKZSpop2fmbF+cYpwoCR03/BNZZS0L+O36hVF
|
|
MOZqoNswVabsZ+nuq1cVoZOhuH96UwmpX00xj7yhCEPY+Uf77ZWQt9Rl/uRK
|
|
RfDfcl3vFldEY/bBdWX9itAuO6ea80EOecYGSXgOKULoXZAsvS6H1isCchRG
|
|
FeGN38VCJws5xLXqG9UwqQjJ+q+fzvbIIrN0t0Ptq4og8f7M999tMqi588SX
|
|
cQElsDm7mfK0VwrlKehycHsogXWC6ADzcXFkc/h1xjMfJfjy5tYTc3FxxOXj
|
|
zOkdoATiQWxbzCti6Oq9ZK6OcCXYs/T4K1WGGLooN8ZzLlUJrhPK6sqGRNFZ
|
|
mcj9r+qVQO5n8ePWSREkZsJeENqkBHEvJTv/poqgCfdSAfFWJai1NG3bryuC
|
|
bCteCYZ3K4GodbjfyHVhZCYlJCIzogSv0q201Y8JITWJp+KX/yiBoOrz9qaN
|
|
/WjJ4Gip8h5luE3K8qx9sB/dc/kqMUanDDryErecPfcjyTusUmrsyiDPe7v4
|
|
9zg/4hdzlPkspgxWRgev33i1D+2K/FMgmijDzOPQC/aveNFLAX2t35nKUF8l
|
|
NDOhz4UGRB5I0+Yqw2Rx4FAPExcaFhfm5y1UhmVxOXrLQU40Kb+1rV2hDON1
|
|
8576bpxoU6++PaJFGUb8ngaGZXEg6ZNi5tTTynDZ7Oz5WE42pHjmGsY9pwx3
|
|
CzSS2B+xInXXv8qSP5RBIQ4/U2fLijCfD5zGG8qAW9M9ELzDgo5HZo4kM6tA
|
|
sc612UMHmVHczT2unJoq8IEhz/TGI0aUdPvccXFdFWiQ7elfcWdE6aWfjDRw
|
|
FUjiCqjRFGBE+dXNsjaHVKCySzzW9TIDqmsNXMo7pQL/vY+2EnOiRxPjk+Gi
|
|
CSpgMMEyxK5Pi2Y+W/qopajAo7Dt44+oaNH89NNTBtdUgPwiTl6ggwatLeSj
|
|
s/kqcHMw2V7MkAax/DlKV3lfBcbPPHs8bU2N9IQ6M1SGVeBATuSh8EwqNCUh
|
|
OfF9TAVGEAnvPUOFkhUSFco+q8BGhqR+hTIVGtUzI/N/VwGiuagCTeE/PMx+
|
|
cGfPHxWYo+8pk5fexR0OB2rMc6jC37fvMta9d3BlS3EHE25V8P9r0/Ft3w5O
|
|
fWwotoxXFZrozrg979nGqxy0+h0FVEHqahftIcltfNNry3NIQhXcEtZnmBY3
|
|
8ZykS0Vt2qrQERPPcbFsHfdOVe/Zr6sKWYoRFdpn1nE8Y3ohlKgKRTGMDk8E
|
|
1vGvuUa6aqAKLC/DUtmy13DNu0zvyk1VIaqU6Pfq2io+2JPJdO2UKqTdsHnU
|
|
WfULr+g1UF10VIUlP2LQvoBfeMTr3ydMnVXh31XlIF7CL1zsvU0ZjbsqmH6J
|
|
XaJ7voIHzOxHF86pQnjD2Gji0k+cjeZOsHMcJd52fDxb4xJOv/XfsZV4VTCw
|
|
vzFlcGQJ3136pH7piircd377uXv2B748tn+lOFUVaI3xjRLhH/hAQ6bflxxV
|
|
GICH/x0vWMCzXC65n6mmvKdbXHbqm8NT7G4bLd9XhbJJza2asDk8zuKpZEyd
|
|
KlStD/mzSM7h5/W2pooaKXq+oKDNmG/4ca7AMxP/qUJ0RVSNvOEsztfpZHf6
|
|
nSpcNZ0Cw51pnO3JRcKPYVW4x0vbbNE0jdPXFvJFf1CFbiLHP2LQNL6RP/qu
|
|
cEIVxjxvbDxcnMJHA62OfpxThb1nBLz6FybxAjEwO/lXFQL99X74cnzBs/Y5
|
|
yi38U4VGNKfwvu4znsIaxRhJrQYcEcl8Rgaf8citx+QCBjVo9xnxD/CawE+9
|
|
VTk4xqkGF7YbhC+8+IiLXDpAspdWg3TNkdC0ng947XlG8U+yapT/pRJrf98P
|
|
OO6+wuCsoAar//leDOH5gJ8+3DXkqaoGlW4J3nMeo3ghr4fPBT01EOOJddwV
|
|
HMH336styLVQg6zUJ9rbje/wysLcWMGjalBtYRVe4fcO17kW6377mBr8HSYq
|
|
Gkq/w+2CrdXv2qlBxU7AhknBEJ6Dr/c2uVA4LeT2gbRBnGcI23ofqgbjm6W0
|
|
t28O4GU90p/tw9WAKfNFCJvzAK7xhL3nU6Qa5bwZjj4oM4Bb35rM+BqrRtkv
|
|
pb7N+bzBMz0SZNdS1CCld/f3qSevcbY/fbY8t9VgLYuX4e/1l3jRUiOWV6IG
|
|
iYvxFqe0XuLKk0USQmUUvxpqdXZHevEj5IBliSqKH8nnKrZEe/HUDJ4rGg/V
|
|
YN+t7JAzHc9xJqlTTdbP1eB0YsjlLJ0e3Hs/MqvuVYNvcm/F3Fa68Zes4hM0
|
|
fWrA9+TuNaHqbjx1/Rtd44AamBJeLSmLdeNsL87b7BtTA0LyNm3uvi6cy+fq
|
|
6viiGkDW76cEhQ486Ix/kuYyxd+atZsHVtrxoWNHhdJWKPHy1um7H7fj2aR9
|
|
hvg6xU9XM19dk3Z8H1vp9eJ/atDT+TVW9dMzXKi+Rd2NSx3uM3h3ZbW04lHl
|
|
t8hPedRhzn2P3o+Trfin/FgHvn3qkKJa0Be924IXxRnHPRdUhxGO03LqJi24
|
|
6PHBt3JS6hDyZt0jdvYJLrXxPWCJoA7KpaYuN+2b8MSFPloTPXVocEutqmRp
|
|
wmc/P8i7TVKHzWt25x61N+KVL0LarfTVYXSVdrlFoRGXL9jD8dBMHZwJhdzK
|
|
rI9wZWz/g7DT6vBUeFdAeKcefyjhtUPtpA7Tqo1TAY/rcZ29zSbpLupQPtOU
|
|
0BxcjxuM2H0p81CHh928CkK/6vATgXmcg4HqoMVhNJK//ACPKd8XrJioDt/O
|
|
0C+etKvBaVM92h8nqYMonY9pw2I1nhL0mOXgVXWIbLq+LyuuGs9GtuX2GeqQ
|
|
H6SRM9pwD6/8kDOcWKAOAg8uzC9JVuEDrHy6k7Xq0FY1d+CbWQVus+qW4Fuv
|
|
DpPqej+D18rxsbHGtxsP1cHILZwPLynHZ+7aeLM1q8Me2n76wD9l+Kb+jZvE
|
|
LnUI907jmG4vxcVCeXZvjFD0+TIYB10swStOnTUTG1MHblfja716JbjiwUc5
|
|
NR/VIYuJd1tosxjX5jiu0jWpDm8PPFO4F1KMm9277vRzQR3MxQ8++rNRhAdN
|
|
cHWZUWnA2pawiK/bTfwF+dTTe9QaoP7VRjd7z01c5EHF4710GnBbhUpO8HYB
|
|
/jJGr+YlkwacVtfYpzGRj4uLudww49YARz9wZvXNw9+61nuYSWuAoQPbg+rO
|
|
G7i0+Y7zPVkN+Dyq9agx6AYepWl0aq+CBpgbuquPS9zAZek+WL1U0YCNQo8M
|
|
r+RsPLaCSs9MVwPm314lKDlfx1W/W7KYmWuAydXNW/qQiSe+zae/Z6EBcXaK
|
|
4XZUmfjH5mmqvUc1gD5e5Nuxjgw8KSVsrddGA+jks7FFowz8i8LtCdMzGsAz
|
|
ZXi3qCEdz/BfqjMN0oBd7jiZHvOr+OwJneqqYA1QTTcd759NwUkorpwpTAMa
|
|
TdM8D8Wl4HPsfAW9kRrw9kebYtjTZBzqscumCRrwQGC8jWiYhC//TrUxzdOA
|
|
1O7CCttrCfjH0ZITtwo0IJw8VN6BEvCXT5tsVwo1QCidJcdkJR4vu/LFPr9E
|
|
A5qWC/jzbONxB0FNx+/3NOBHyiW6GdXLeI/BuHvyUw34AJfSObkv4Q0yPz0+
|
|
/UeJx8zUe3UoFi9mofNS69QA2es9qfPZsXjEsLLPB7IG9P/ysTcViMVVvePO
|
|
yQ1owCW6AvI5x4v4zUy5C71TFFalMn6wG4EnheLhwl81oIfrYHB4fgQeevJY
|
|
ROA3DZAPu/6yQSsCt5KKjtq/qAFv5suWHYPCcfrmgVivNQ0I2+xs5/kThgd+
|
|
CUtmYtSEiOJynjnzENyxJzXl9F5NuHibUdP/TzBufq/kaj2LJshF2tUI3A/G
|
|
pYNfpdlzaoLVf9MRw5zB+EeGA1lVApogoyxs4TMXhJuokAtMlTThn2R+Sic5
|
|
ALejP3R8QEUTSqNdW2MuBeDen3pZbdU1IYhf+etRLABPv/o69ixBE/a8Uvlz
|
|
KOAcPvztnXuMviZMv4hRkAj2w+eenRClN9SEeUGtz0zbvvj2jdEPqcaaUE5q
|
|
/DN2yRcXNvxoXnBYE1qfdYyI5PrgZ4un1RttNOHWi6pW1xEvPDTMbZFopwkG
|
|
invKhny88CSLb+WdDprwi34tdG2PF17zZ55/4Iwm5Hy3T9bU8MR/2/3anffS
|
|
hJtiwQE/Kt3xOM49r0QvakIq13Hvf+OuePZcXPzdWE0wmsoXrEpyxSv+o8WV
|
|
L2sC+TTr93JtV/ylH2M9MUkTLl0q5InPccE5X7LnnsjShKHZb9lGbs64eEmm
|
|
1adsTTCnU4ndFnTGNS9w7z2bqwlv75esjA054XbS+6IDCzWhZWjfNrOJE14c
|
|
J+KaWqEJlws6Z1xCHPEG+2Ih7ipNsGH705m8ehrvVhUfzq/WBIajHoEdIafx
|
|
uQkp07t1mmDtOplhcPEUrkJUUuls0YSyH7Uf71c44M9+E3c2+jUhw361It/C
|
|
Fi/pe+xy7K0mCO4NOjG4cgKPL9d4WTtE0VMfdykw5wRuaquQ7zaqCSd3f3v3
|
|
T9vg71oECEOTmlBrkRMXnH4cf3w9p0h5RhMKN6IuWpOO4wW+XPQps5rwLZCP
|
|
59zCMfyMyN73sKAJSRcv+Bw9cgyfv7QVVLuqCaTFHWbSAWv8tUPIGNOGJpjK
|
|
DBZeGz6K12ms6LttacJTKT613fSjeMjXOQ6hXU3Qs1zpEaQ5ilOZjtYmM2jB
|
|
XGOT/JtlS5yP4/H8WQEtUGzAvgyImuNbc+rW7UJaUGZ7zVnlwWH8Y0dts+AB
|
|
Ldi9eXn8MDqMl5yvSBqU0IJjeTLWZWfNcMWRG9KgpAU5Ec8eH+g6hLPXcabf
|
|
VNECKLnX1ux4CP+VlLa2rqYFt5g/H/28Y4I/1kvovq+tBSoSOlWNeia4QVGw
|
|
iyBogZkIUXy51wiXCvvZG2qgBdN/EiSMAo1wRitftUFDLaB7HT24td8If73n
|
|
LFWyKSU/1adm3ucMcTu3Y0Xr1lqwo8Bt9UHuIO6vqD721o0yfuI/g+ZRwEM2
|
|
BLbPeGrBqgfBciEN8KhOGoElby2waDjs4GQI+FW79/Z7A7Rg5uCtp3+8EF4Z
|
|
f+GDQYQW3CvnerZ+CMMfWDpvDURpAbX1bwZfMglvEjDbfyZGCzwObh3ZZ0zC
|
|
e+oE7SPjtWC8h69j/jARn/r4bPRhuhY8JPezpATo4t/v3t3Uz9SCI2ctfzbs
|
|
6uA/gzL4B65rwdcEZb9X6Tr4P0YXu8U8Ldhry3fr3iMCLqRFNypZqgX6dLXL
|
|
hnza+Im0wyM3HmvBeo8kg5e8Bn7aTnNDokULCqxdi3aG1PGzEsL7Gtq04NCd
|
|
4RSmGHX8fPPSif4OLej22U+8+EENz/iaOUzfpwUfAt5Eit5WxXPrItaz+yn1
|
|
cs64PHVMFS+KdOWTeKsFoeXyB34yqeL3ObVOoGEtiCjM23zwWxl/iY2+D/ui
|
|
BTJ8iceSBxTxt4wda3TTWhB1VZql4IgiPjpUxZv9VQvc33nsX+pTwL95RdrU
|
|
zVP65UN1oO6gPE6bI/J+blULqJr1M0+sy+LY0tl39kza0P3d/smvQimcr9Xk
|
|
ThuzNrx+9a4hGqTwpSvyAQfYtOEiaWol+askXiT2k/krlzZ86bNbZdWUxHeP
|
|
Rx4MENKGe0xuagemxPFhMUfOIRFtEJx895ItUxyvXYLPWmKU7880BxzVF8cd
|
|
k+gjd6S0weXPjG9LuRj+X2tmQ6KKNpQxylxJjhbF85KCY7+raYORUNPhGG1R
|
|
PMDG1sJcUxte+tzLwicP4KLLQvOcutqU/7Xb2zcGRPBY8UqxWwaU/H/K+JT0
|
|
CuH6yc8yHtpoQ1qzY+UN4f24wIkSRz47SvyP17JL6vjxX+LxiuEOlPmVyvQj
|
|
jPjxO22mL/Az2nDBSdMxOHgfTv3z3b9eT2249l9UdNcsLz7W9vi1oo82JLCf
|
|
vuB7hRdvSC64ec1PGzafXRW8J8eLu0g4EWyCtOEEMdSuN4gH7zqx4P8lUhvo
|
|
WuTRNz5uvFCin3TwojYMeRZax3dx4cE/6/ZWxGpDrrN4YXwgFy6ZElrhk6AN
|
|
UYbas7lvOfH4p3sm1tO1IWff2oxfCQduJMl/hPWONjiZjyUmrrPgj370iJ0t
|
|
0wa+Ssdjt8JZcMnH59dbKrQhr9axsmOXGac1e3Pbs1obHrte9uZkZ8Y7zyX+
|
|
6nqkDaGOr3e+GzPh6rqazwUea8NcQ+bzpA+MeAn11M3AZm2w/OPsuubHiMfe
|
|
wIwOPNOG6J530QKFDDjeupob8VwbCh796XzFQo/Xxt/xfdurDfT0xc/Y79Ph
|
|
whZW+rJ9lPo129p/t6DD/3ypnn8/oA2qXiWOB3Np8RZ6V0xtTBti3mmtTOrS
|
|
4NrWb6e+LWpD8nqkZnYHFV4hGPMYX9aGkbYuYbsLVDjvV8XUGyvacAiqo4+r
|
|
UuGrYUlaB9e1QeFb21C3yT+s4RZKKvpH4T+MjdfV/mLiHj9Ore0hQHmeae61
|
|
+j9YpupNNXNaAuju9Gc80PiDBXStj20xEmDUUFtdB9/BVL7fV7LhIkDuEd0P
|
|
ET5bWFHDSeoaHgK4y/IKlu9sYmxRTCPU+wjgd0Dk/YO0TWyJzS22TpAAlgdP
|
|
O5s83sBqNIWGmKUIYMMRmnbvwDomG5tyoZNAgI7BP/ge9BtrI5bTmesRYFDP
|
|
KPL21C/MauO/rPckAmxcMJlduvILu+C/VjOnTwCGp4thcSMr2ItTTpNs5gQw
|
|
bCvAapJ/Yqf4I/3zLAiQ/PrhPWq9n9jPoRs7YkcJEJHvzFQ8sozxH37Fq3WC
|
|
ABkzBkFed5cwT11ts5NOBFArzj815bGI/Vm1GplxIcB0VLZH1sQCllHnc9bf
|
|
jQDiMZW8r2wXsCcyJRcveROgv0Jo/O7ReYyRj+Xh3WAC1D849Oad8xxW9WtS
|
|
cDWJAItfOOJfzs9geO2fyuirBNDyOi+0GT+DDXrt02ZIJ4CeAAdxr9gMtv3F
|
|
3ErgOgE+nj60t9lxGjN78zgebhHgCK/PhePLk9hEyiDny9sEkG7vvfckdxIL
|
|
Mv5RdOwOxf8sQ+P/9Cexgqfize53CVDR+s/pRsEXbL467UdqPQH+XK93UX06
|
|
gV30qIzge0QAdh/FqMvSExiXRBdDcRNFP9utN5VZnzC9gk2xh60EeNFclql1
|
|
/iOWkuR64kMPAQTP5QesHhvD5N10/5MaI4DtMZ/miuRh7Jq4xfbljxS/9O2l
|
|
u8WGsdXPLlpTEwS48i1/rbH1PfbMIbW6aJoAp1Wpy9ZX32HWVp9z9/0gwEqd
|
|
PAd31BD2mHV1MGSZ0g8rDW5bYkOY0CtGtncrBBAJunYsrHcQmzVSj89YJ8Cv
|
|
50d/CQsPYuHEhAAmKh3AV1Xy7IYHsInN/GoPah3IyChXw5IGMIOm2tkeWh24
|
|
zOBsFU8cwFjURk/FMemARuYBq4Pmb7BiaQXTHS4deKj1PmaW9zX2gvOt2A8p
|
|
HRirdG5XFurFlN58PXVYVgc4OU7Sr1W8wLJSt3Or5HXAdufY/KDGC+wUgySb
|
|
u4oO7Ok9cqLu2HNs+U/o9oSODnhn6tOv3+vBjrdc1cKIOhDqzekYZdSDPQkr
|
|
DriJUfgt79ehyW4s7lfvrK2BDhzGJ7iGD3RjfHNCQwOHdcCOZTP7cF0nFlmu
|
|
xqZioQN377WzxNh1Yl9cjE3TrHTgrwKnjTF1J3bv07n/TG104D795L5ghw4M
|
|
H+qs7nTUgdhIi1NpQu2Y2zPP+EeBOsBOU55E7G7Flvzmw4yCdeAr/1rJPu1W
|
|
7IKwr89wKMUfnbojbfdasJSoc9abkTpA/qjMKFfYjNXphYqSEnWAyOjfJVb0
|
|
GNOb3+B+naQDT00XrAYlH2Nd+eEMjld14Em1n9zX+03Y8GbUUkyGDhxJfs1A
|
|
87wR+9N0ua2rQAe6pGyqZ7gfYYnudHXHb+nALb5ROZ+ahxg735XSr7cp+qtp
|
|
WP8YP8TEQ1JSGMp14IKz6BRPXANmopFpd/iBDtD39JzmYa/Hsh4UrQ526UDv
|
|
tYfL7zdrMKEzonOuZB3Y3p6wTHCpwcrZ7oyvvtCB8geXP6m+qcae+JV38vVT
|
|
5q/MdNGvv4d9UqjJcBjVASefs0+bcyox93Gl+IUxHWhcKpNp4avEfqY8CIv6
|
|
pAPmyg1pJvl3Mer5BseiKYoe/T0Fw+UVmGxls+LUog5kma9KBoyXYQ22RNHz
|
|
yzpw0jZe6JJ/GUZkeMpN+0sH2Ax/Nv9HU4ZZuLdvS21Q9AzrBBVolmLBks9f
|
|
eO3RhTZ7LemS2hLsv+J3Z1d4daEzeSbsy/ot7Iu52JlQfl2wm273VDl1C6Pa
|
|
8rPfEdCFOqvaI2ndhZjBUQYLOlFdYNyZu6lbdBMj79Ej7JfXhXdJe6qens/H
|
|
vt1PVCtS1IWSOPaEheU8jNFhSEFChcI6ywNN/nmYaYOvqJKmLrB5zKysnM/F
|
|
+lxuM+njuhClShd36+YN7AfbIg0ZdCHS1oVop3ADY2vV2TU7qAunV/xpLZ9m
|
|
Y1bcg7+OH9IFKamZM93frmNDXbQfPa11YTbotWSpTRY2Juldm+GuC68TqFu2
|
|
+a9hOwNNlbxeuvCDev776dB0TCiaprTARxe0iO3qNCNp2On3hbllAbpw3aDg
|
|
y2BJKvYl4U3skwhdUOUrfvDmZAq2R10oEovWhXqJW84pb5Mx8QnPkM4YXeDR
|
|
Wq9iMUvGzmpTe/fF64L1Qy411YNJ2LdZzWNf0nUh/MqAfeTxRIzx+qUjbpm6
|
|
0OHXyrQ1kYDJon6T+eu6cFh5IeS9TwLmnetBWs3TBRbrrJ6I1HhsyaRAirFU
|
|
F/YymQ9pzcVhq5X/NlQe68LJZFcdPqpYbPaEcXFyMyX/PRfLdpxjsFHatEPT
|
|
rbpge3f80EvyRazVSSA/p10XuDz+iSjlR2Nx/Fp6f3t1wTe4fyb5TCQWTI6c
|
|
OtGnC96+tCVDIxGYe3BnSl2/LsxUbnbUW0dgpgOW465DuiC0IqK2bRmOcSR5
|
|
R738qAvzidz8gR5hGLV2vaTkZ1149b3wPufvUGx1eqMvelIXlKliDedjQ7ER
|
|
lCCsNqsLexzOKu8vDcGKNm4/y13Whd8/ntZYUQVjih7vqdyo9eBasX/REG8g
|
|
JsIrVPWMVg9WB8rfOrUHYBxdLkf5GfSgT3jrZqZvAPZb5GfJK2Y9qNIQ5Yi+
|
|
fg5rGd57UJ1XD1hrV8OnFf2wmvijC1f36UFwe45mWoEvVqSed/3rfj3YkRiu
|
|
YWD2xS6lS83kieiB7r6YWp1Vb+yQMST8k9GDbuFjjcKznpjeaqKSvbweFKvZ
|
|
mE54emKKd16/b1DUg43T924wLXlg7LsO0u5qepCeytsY+M8dG24Med6npwdS
|
|
F5mzjmBumKtUNVPBET3I+XJ2k1HIBYvocfSWttIDh3dCe8hPnLEMN65XDdZ6
|
|
8GxrKzzf1hlrKw9PfWVLye/HrWHbm04Yj/Qh9r/OegDXm7z4gh0xefLOueSz
|
|
ejBdtapW0XcaA/cHA7welPFSay7PZE9jfhV8Wcq+euA9LBOGLZzEyNJfeZxC
|
|
9cAj61r6pVx77CM5L2Txgh78Fn/z79Ree+yXu/nwhUg9IHRbG2jF2mEH7j7M
|
|
zYzVg+PnknYLg22xCzJxAl0pejCxRhNQfNEGk5c9ICp9m6LX0VZKntkagxeD
|
|
sQ0levBH6vJXprtHsROeiZN4mR5gBzirmY2OYpcrf9yxrdKD6JOF70yuWGEf
|
|
Zdukkh/qgVk3bceUsQX268W5RN4mPfgq+t/9U0VHMEYviW8lT/Rg6kRHUsCW
|
|
OaZVlVLZ8pSi94ox2/6Ww1i6nL3C4nM9iOMcPurpaoqV9bKkXnipBzeKVMhV
|
|
7w9hLV7ti7Sv9UBReV5wzewQ9q1KplZ4UA+4eST0PXETDOTXVS0/6kGEpc6H
|
|
vSZG2Ir8de2Gn3og8e/62fxBfWy0D4y4f+tBpXblR84Qfazdf+lY8JoeeP1O
|
|
mfTdr4+lN5gGam9T6r8af7XMAzB5PaqaFhoiWPsbv9ZUxzHOj/dbBOmJUDx9
|
|
5+vh6xi2GX2yN4qRCF51A/r5GySM3NE0i7MS4b/gyBc3eomYi6mfWBcfEbLf
|
|
X77llKmLmS4IqEruJ4KM1RvuoL26mGraCzxBkAjp3xi6UaIOtjsgccpElAhX
|
|
ZdstRxMI2E27sZxXckRIs7sQlVSqhb3zMGF5RyLCkaqxemYLdayVaU1ACxFh
|
|
Lszi0+yiGnan+o5cjj4Rfpt58j1NU8MClv8a2xkTIVW6Rl/9vSrGGvbo0kdL
|
|
IuhkB/Y7ripjq/wuGZg1EbbKopfuWCpjH1vYbxcdJ8JrMT8Xo1ol7N6ud5uT
|
|
PRF6/CLMnUIUMeNEsY0ZFyKoqOeJiMjJY0qyb+iM3Sj5sMbZxt2Sw3heRvHc
|
|
9SCC2r/QC108ctgU66ialy8RQowLKkqYZbGYG+m+P0KIIMKgpmKwXxp7UrYz
|
|
uZZEBKd7YnIFleJY4+QiS3EaEbQGU18SZ8WwBpEJglkWEXZD2I0qFMSwmrz2
|
|
tKKbRIhzT72P5R/Aqt7XPzlUTPHnjueUmqUIVsFVOv2rjAhPtj1dPLiEseLU
|
|
BF2TWiKIlaDjl58JYLd6Q8+uNBCBP0dY2K9iP1ZA73nt5mMiHJzKiSzK58ey
|
|
Y82+LrcT4YaxxTRXMR+WHMyemTdEBCr8V0+/GDeWWE/VZjBKBNfGdgMnOy4s
|
|
fmlldvEjERIWZob353JiFz3fkfRniRDmYNDbqsBBuT/1eCzME+HFt4iPbNTs
|
|
2IWppqwby0TQFzP7FdfCigWdyp/7vkkEi6HcjTfWzNi5/BTu7L9E4OLtG76l
|
|
thfzHY7EcWoSSDS7rKkJMWHuVo7ZWcwkoCquv9vPxYA5GEoAUYQErH2skuRw
|
|
GqzYbWncTIIEbC+kq+3zqbHZxOYwB1kSmP9sC/3SuQcL6rV8EK5OAtN4s7/s
|
|
6lTYk3mBw8kEErjl19O9/bFL2mWenc0jkeAyo++2dNJfUopFlMgTYxJ8KdIv
|
|
/7ywTeLL5DoxYkWC5ELbQ++SN0l3hirT1h1IUJw7LkJ3ep2kzId6eN1IoPKq
|
|
N2nCaZXUYvf+j+Y5EhzLZGZTzfxFMr7po3k8nASndCKEJed/kgY/7fE9f5kE
|
|
43/9VgIGlkiOonmlWWkkih/L0f4ci6R5F+Xx+lwSmETs4XFO/04KLe/meltC
|
|
gvApaonvht9I1HMOZj+rSSCtTpMtpPKVlC6/com9iQSLY4/now5NkwT9rjQr
|
|
t5NArlmFsJQ6SWqhis/jGiJBqGTtbeK5TySH7Niw9a8kWI76pzFWPUrakok+
|
|
MbZJgo2os10nqt+R8lrDtZ4xY2CSx7+5avGWRLAM5bkjgoGSQq3spa0+0vBU
|
|
0O8ENQwW+z5Fl2IvSGYh1uemNDA4+nVBJv/Rc9IzBvUFXBuD6/efXElRfk6q
|
|
UFyZ2tDDgMz9FTugQCaFhp4b9DLEQHz0u9VJo24S717f+iO2GJR4XCy/uNJO
|
|
2rwTYxBxCYOBvsdX7KubSGPE60MV1RicvVOxVm5QS/IMKSs0rcVgeDyPpyv2
|
|
Pmm9ttFtsQ6D8zRe56u6akhc4qMbak0YrHNqepy0rSYdZhQWetpOiZ/rGIE9
|
|
rCS1vas4O/QegxxGsYSz0mUkM7YnSqGjGGhd+aB+rayUNGrSu84/jsGaJL3A
|
|
b6lS0mrLQpLjFwyQp7MRn/odklKJ6v3v8xhwOgslNfgVk9rG9ENTf2BwZ3Fn
|
|
7ipNMcmM5xhS+YkBtX3pOLfObZL7lZC3wWsYtGjp1blW3SKtticW7NvEIDTi
|
|
qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw
|
|
18hpWOkpIP0PtXjCHw==
|
|
"]]}, "Charting`Private`Tag#1"]}}, {}}, <|
|
|
"HighlightElements" -> <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>,
|
|
"LayoutOptions" -> <|
|
|
"PanelPlotLayout" -> <||>,
|
|
"PlotRange" -> {{0, 30}, {0., 0.17588335145564066`}},
|
|
"Frame" -> {{False, False}, {False, False}},
|
|
"AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio},
|
|
"Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" ->
|
|
GoldenRatio^(-1), "DefaultStyle" -> {
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]]},
|
|
"HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ),
|
|
"ScalingFunctions" -> {{Identity, Identity}, {
|
|
Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" ->
|
|
False|>,
|
|
"Meta" -> <|
|
|
"DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" ->
|
|
Plot, "GroupHighlight" -> False|>|>]]& )[<|
|
|
"HighlightElements" -> <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>,
|
|
"LayoutOptions" -> <|
|
|
"PanelPlotLayout" -> <||>,
|
|
"PlotRange" -> {{0, 30}, {0., 0.17588335145564066`}},
|
|
"Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0},
|
|
"ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True},
|
|
"LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1),
|
|
"DefaultStyle" -> {
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]]},
|
|
"HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ),
|
|
"ScalingFunctions" -> {{Identity, Identity}, {
|
|
Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>,
|
|
"Meta" -> <|
|
|
"DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" ->
|
|
Plot, "GroupHighlight" -> False|>|>],
|
|
ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, {
|
|
4.503599627370496*^15, -4.503599627370496*^15}}],
|
|
Selectable->False]},
|
|
Annotation[{{{{}, {},
|
|
Annotation[{
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]],
|
|
Line[CompressedData["
|
|
1:eJwVl3c8Vu8bx2XLnsnK3ns9eJ5z7ouMSEjJqGRkj5CRFQkhhGQlkRGRUJRR
|
|
X/MpJYlClDKSEClb6ff8/jqv9+vc576uz+e67nHEXM5Zu1FTUVEF0FBR/f+5
|
|
PtHbLXm1DOfOnGIcL/XB3xXxh+uPxiHTBqPaxw6mCHjfuPCPZqED5icq/R3s
|
|
UajVvRGa0TvI9kMNC4uDF+Jc2pe1NdKARrOiz07ZhaPPbRbnVkc60Z3zDCW+
|
|
x5ORseT8p5WRQXSb5nVio0E+2hoh3Pg5MoVcPtsXOf2pRE/UGZ3uyk0jjfKz
|
|
61FuVSg0bVTeMXIa7U/R/H2uvwr9MghvfyUygzInKvCR2/fQ/P2WhQq3r+jv
|
|
t5alPKhBHy9jBqd/f0OssycH7MIfoHaVg8u9bD/QAwkG0sPJBtR18G7Z2zu/
|
|
EWGnVd6w7wlSTX/wfePFb6SRE1dhvP4EFY0+VhZZ/o0EvxyfkBZtRhf8Xjzx
|
|
Jq4iQz/3RzHnm5Fy7vc+mner6IFHlk8afwsqmFdY06JbR2LVYXk/TraigMw6
|
|
owKPTVQuKhgcSn6KJsafpLSnbSKXa41vBxeeosPSHW9mH26iqdYNAQbOZ0i6
|
|
9a29BtUWok371bfu8AyNz/zy68vbQqOz06ZLi8+QsY5Wzm7vNloplnifRtuO
|
|
hD43z7oo/kWkM8dimjk6ENXvwLzeo38RYeHvl0DRDjRDL2+mGvYXcRa3feZR
|
|
7UD3lQvu/+34i3Y37aIFLDsQfjEiOM92FzlxbLSLp3agM8JE6v64f2hEI4wo
|
|
RN2J3ipNpBcuUgHVabv/XD51om5CyzfLf1RQlu/iaDvfiZr0c4CGaw/8jGIj
|
|
aG10ogIbi19ehD1Qe7k2uIajC7lEP7MhxO2B6KN1xkkGXehXX5HQ4D5q2NNz
|
|
mmG5pAvx+J65x3CQBvReZJpbWXYjeYZSspUtDfRuaE7oOHQjuDM7le9DA9am
|
|
pu/p3LqR76ifoGI2DUgP7MyaR3SjbsOoVKuvNECl5Wt+rbQbBQvn++dfoYVW
|
|
o6uJ0z+7UcqTjylTN2nh9ulffpzb3aj4mOhdhTpauGOhUypB04P6ku9+fjpK
|
|
CzvqzVurPD1Icr3RakqODtZqN88fJvSgof5BdYU+OugsEDfrDe1Bc158lsFf
|
|
6ICthmeAdLEH7dI6+DxdpQPdlp/PsxN6kDxxstRSmB52Fm1Ffl3vQXF3l3mC
|
|
/emhUWVhzuVBD8oz0FB7GkcP3n2lMduNPaj2U+gR+lx6KOz9/iC0rQeNce8m
|
|
5P1HDxYPBNaEenuQeizLRhsHAxQe4iOLTfagQ4JW3PRSDDBj8mR8YrYHOTZd
|
|
V7HUZYDMvoj22MUelLIo4DnpzAASWjp85zd60JSd3Ae6hwxwK0dzmIuFjDZ/
|
|
+65ZPGeAq3q7xhscZMR2rY4zb5wBdBDty3ZeMtLrIZjJ0zJCIBMo0hwgoyw1
|
|
41YLG0Ywu6J03liVjFTG7U0wT0bQf9DOzaFJRn3xfkMKkYxAX6WR0EkgI/rR
|
|
7AXGEkZg0Ti2O4mTUemlyrCNh4yww67Ib2lARqDQRjNLZoTxXZJMuREZRV6c
|
|
FuxaZISMH7tmLOZkxC+7cbf+HyP8d5zpvLAlGTW93atZzMUEa7DbtM+ajH5K
|
|
qptH6zCBxORKy3NbMjr7KjaKEM8ER2gZ3vO5kNGekGxG6VwmOHfN82/gWTIq
|
|
EqnM5rnHBLNU2zea3MloNPBNzcobJnhnfMHwjzcZhQhO63yZYoKQz+KBf33J
|
|
iKtnvbt/jQns4i8Q5/zJ6Ai/yKdqwb0gpXRgNCKIjOY71LwKlPfCDbODneLB
|
|
ZJTkY7SWpL8X3hg8CX8UQkZSvPaXwo7vBa+2tr2qYWTU+cyX1d1jL1Cz1l+6
|
|
cYGMznjG5h+P2Av89PsWZsLJ6A9nttTBtL3Q25F5TCSSjLTdWjHRh3shWGTj
|
|
uGU0GQ2xvellI+8FwbQ+BpOLZBTwZMrm7+hecFi5+kM2hoxYXdYnFxb2wqee
|
|
SO41Ct9j3us/trsXNrOpr1THkpFJo/D2C05maO2qsDG/REYzjmqJjyWZYfgU
|
|
W9oIheMYjbgqCMxwcHxX70gcGR1osCvKNmOGe6un/O5TuO2kr/zl08xQ4aqo
|
|
vklhB7rYpsAAZhirv5ardJmMNmqvGzhdZoaOPS+qj1A42+5uv0UOM5iNakbb
|
|
UViNutUBq2IGr9ljAhYU7q/un1VoYwajwfZMZQr72EwFCbxhhrNUWr+2KPMz
|
|
/lvbZZxihkunrpjVUbi8kunqxiozWInXVB2lsIG18L5ZBhYQqngkMkHJ//OO
|
|
auk7ARbgEn7zxIbCUeWGKl1KLJDsZnzlCUX/fku71npgAe43l/LpKdy06WNS
|
|
fIwFTkzR/kMUv47diRlKd2eBIdlzz89S/P15+PqZ6HAWuLQaSR1C8T9trWLB
|
|
J5UF5GWo2wOiyEj+dkuYw20W6Nv6zW5HqdfzQ/00pg0sUNHlSK0QQenHX5PX
|
|
CD0sYNrhffc7pd57CtcEpUdZwHfcgT2b0g9FRkyVPAssUOeXaiYfSkYf8lTb
|
|
VzhY4Z1FTZTAeTIqGKpmD5VihY4vNQ5WgRS/2WTObOuygn1vxbD/OTLlPBPe
|
|
pXZlBdnv+btuPmR061nekSthrHB+5Nd73IuMHLe4bzGnskLOR5o7VB5k9MV/
|
|
L4mnkRW412IDEGV9lFQlXM3rZYUyPvvbbWfIyGWGalxoghVE29oFJU5T+sN+
|
|
I1yKgQ0O7EbY1lDW15zhzGNtezZ4GCRl33CYjKpizjC0+rEBj6RoUNQhMvJu
|
|
GTuB4tjghv/hDFXKel5UebtmUs0Grtb6eraU9f9T4JmG/V82YP5s9alYhbL/
|
|
/Mx9EFnCDl2eHTF6bGTUrMD9718jOzTpMCvUMZFRhHu6RfxLdmCJkXDipKOs
|
|
j/H4H6m/2aGo2bUvZ6cHxU4/4X0jzgES8Q+C6r71oPj+8mNfgjmA7jmdjxZl
|
|
/5zxcY0Uj+EAsbFrNeeaepARk1jp2WQOWMi35cmt60H0hoW/5m5xwMXS4Pb7
|
|
ZT0oqTkrc4XMAbNPk8//vdqDrpbFvKHezwlHFkTbMdseZKbpxcUrwQkV2aqW
|
|
YVY9iLHb2kZGiROKfeKPFptS4k9LjR/W54RN2kf7Oog9KEq8bzbbixOkznXH
|
|
wYEe5F/MvyvdwgkHTUqbj0x3o6OF9YqHT3LBhEZImoNTN+JQvHnutBsXKDKX
|
|
BzbadqP+1viGc+e44FTXAh8N5Tw0G7fVyb7MBfZvBtnDsG5kILB78FM1F8R7
|
|
r1Z27+9GmnlmJ8/94YIEf5hnHehC+7Knk6/f4gYe/r49PJpdiF+hMX6zghss
|
|
K/xWKuW7kEBnYszpOm44NLsAWmJdSOSnXIhMFzccpPO30WTrQlLmAU6tc9zw
|
|
dXGlpv9bJ9Kg/as9rcEDJSMnyYn5ncgymG9G/SUP/Dw02p630YGuHDfFB9d5
|
|
4Rd9094Xd9rRed2SM71x/BA6FKPuotmKDJe3I/ynBUBuMgiPKG9El0hHnQV0
|
|
hGFn5IPNtdo6dMix6BfBQBg+n+m8E1RQh9hiFy7bmAtD1n5/a9fEOlTYlVCR
|
|
4SQMxbdHGfwc69ATs5YF+mRhGLA+ukeCvQ79tJMI/f1BGF5wZd8wnK1FjiFr
|
|
KX2RIhB8P/TFyas1SK82/9HF/w7At5oPr94rViLDkf6/Sy8OQJXxFVoqtkpk
|
|
QUVrcmbwAHyKDQLD5bvI1dr/A/p6AOqYj7wUaLiLjCPFYmLpRIFEPXycSvcu
|
|
CjiwXqqvIArPrwrz1h6uQN0et390hYrCvZ+HOjLiy5DpH12uqEhREG993brj
|
|
WYb6M95pa8aKgnHEQFHskTL0oZkptixZFPSfMLGP8pWhJeZgroRCUYDbBMmn
|
|
90oRf90hgnGnKHwtfrh9cuQO8t1ciX3BKgZ6xc5iXQdLkF6gO98slxi8DiGN
|
|
2MiVIMb5sWoafjG46CvHR89egsrHu4ZxcTFw3/pA899YMZp4dkOxUVsMCCK4
|
|
W+b5YmSZoDtackYMgkekB07a3EbqXJdUIuvFQPrunr73pwoR1dW17rwmMUga
|
|
OH5USaUQ9dN4OzS1ioGLqkde255C5LNmnbDSIwbp3LNLl+7eRGWjkuMeY2LA
|
|
8SrBqGytAPHdfpF4nEYcOg4K8SsUUu7zChwTSjbiQMUxyGfNmYvWbwlc0nAQ
|
|
hxM9z9f5FnLQKruUpO4ZcUhjOejL2pODln7reht6iYO38qPk9PAcyr3Ydd0h
|
|
WhwyDVTKPs3cQC8PP2ZLKheHxZK53Gvd2ajAxxFNrYlDgFPXefxuFsr95Dn1
|
|
bVsciJ9eTS0lZqFsy/MJP/6JQ5OtLN7nnoXSNZJebTJJwKWeAhFWmSwUt1Nv
|
|
yy4iASwJ6wdLqzKRz1W6AJKxBLA+cPi425SBSNU1xTk5EiCKfoY9nUpD46LV
|
|
t41uSoCfzMy8c10aisipKlq9LQGTMynLhy+moceXKgqtqySgya/o3rJAGlK3
|
|
K85ja5MAQpDSgL9tKpKjy85InJSAtd+8gtyfUhDfmcjYUEVJ4KlzDVben4Qa
|
|
34XHSKlJAnX6YgnD8hV03OzCxXdakpDF+MBcpOcKytIKiVJHkiAqXbGfJugK
|
|
YmU5d2HpqCR8+05/vbQ/EdE2uwS4h0lCRnGpMeP1BLTCZeZ0olMS7msn1VcY
|
|
X0ajvuID3s8lITE4zKpT9DJqJ2+jmD5JIL1q/Cu0E4cyIqoPVA5LwtDiM9P0
|
|
ujikOsXyeWteEtp2WkXsROKQf/2b07e4pcC/8sWqId0lNG9pc3LmrBSwb/aX
|
|
jP+JRoNVSq82vaSA66jq75r/olELDT2R9ZwUrPl1+n6Pi0bJj5sEtMOl4KGo
|
|
a1bJ3mgke4B/7EqaFDjftBvaFYlCHktjdgpNUiBN7P687BCBZlKdTgQxSMPH
|
|
czqvRgTDkP+8orgqizS8qFtO0FsKRRsmWz9+cEiD+uaBqIX2ULSXJivBS0Aa
|
|
mF/z+Gt7hCLV8K5HTkrS4Ev40HH2cQiKdpPmtjwmDXzZEQLP3YIRH774RuG2
|
|
NCRTe9a+2whExTef3PxeKg1mfNe7tIYCkdxWvMfdSmmg6hm0H60NRKRHwv/E
|
|
G6Thn5R1yhf3QOQqb6ks0CMN7Ir/sn99CEB1fA2pjAvSEDglU5KTew6ZLoeZ
|
|
ftWWgc2g98zlj32QkJpIIiNJBpTD1bySLvigpaDuTgV9GRhmjNy7oOuDstc5
|
|
SEGHZeDw0Fq7/DNvNPG3SvnfGRnw5nTuj+rzQkEsH7n3J8uA+64GofGfBzK0
|
|
iLMipctAK393rvwLD7QvQzbtzHUZIOiaW3FleqA27hD6ilsy4N/xs05L0gPR
|
|
C7JtqTfIQOQ13adNlu6oQA4mzMdl4In885tbLWeRr8+sQMAXGQgkH6/UTTmL
|
|
0P1U2+tfZSC0u1noi/1ZNKP6YeDDsgwImI66nN52Rco6QV3utLIwbHXxDh24
|
|
oi7jsspYJVnQyvf9E/jJGS26Mp5/FCMLCe8DZWSeOKKlIsOn/8XLwjEab5Md
|
|
f0e0/CGW4VWyLDhXnjTzlXZEvyy3bk5elwWjZbUg0dzTaIM4381WKQsrQqdX
|
|
62NOIWqePj6vAVkIpmv1iPd1QLSWjM7B72UhWmlA/46iA6JLMayOGZOFFH2b
|
|
osM/7BEj1VOUMyMLBz+JPSMF2CO2xfueXZuywPzjA3NUlB3a332tRVhMDlYH
|
|
D8Zdu38CCfx7RSsnLQfnfbqmFkNOICE9RktNBTnI5tJe68FPIJG62GkzLTlQ
|
|
/RAQ8O2tDZIsDGS5YEoZjz98//rvcaQafMxxMFAO3vhwPD/tcwwZS+6jvtIp
|
|
B2y+zr0xuVbou4tJJfG5HLxumWDwDrBCqSVhFj9fyYHT8gudSlMrNCQyWmD/
|
|
Xg7qnWcWiNuWyGl/vobinByI+o05tb6xQOFsgm5vWeVhYKSx2zLPHAkdOcyc
|
|
yCUPPJ+LL3IeN0ftVyPr9fbJg/exLkFPDnNEz/Txb6moPNTkP4x9k3IYZdHc
|
|
ygnVkId019VJj0QzVLMp8kLQXh7ohZiN+nIPIUuCpf/AaXn4Q/uIwf7UIfQr
|
|
JIYnwUUe0mR9Yr3EDiHd35+dlnzkQe5+bgLnfRNE/lG81X5RHrpn8FHnl8bo
|
|
85S4gnuZPPQXnBmTFTJCXK+l0+uW5WH5x8m7/bwGaHdZtfzlqjxoKtww1fmq
|
|
j+a5iG0zW/Jgt5kjJtCojzrtLOf5aRWg8xh+yOCEPjo/E2Z8iV8BrNm/P2Qo
|
|
AvRu58XuUX0FeO7dT8uegKN2kSFeX2MFsCIEcW+o4ahG/5Ni4mEF0GGd33zw
|
|
GUMJV1YcWmwUQN4icDYVw5A2t8BjcW8FSPl5yLOdmoRy5X3O/c5SgN2465fi
|
|
6nVR/JGQRNY8BegezPlU4q2LAgJibsncUoCrijxioZK66FDT9Vcn7ypAb87Y
|
|
B+0CHbSp3ybT3aoAt/pmZBfTCMjBnvVL9owCMOm99+vN1kJCSQ+stLUVYUck
|
|
+xITnzq6V3u/a0tPEVYM7szozqohnffV2k+RInCEcT3+3KSGjotXChmaKoIh
|
|
uplxxV4NpbYVzx09pQiZUjffKZSpop2fmbF+cYpwoCR03/BNZZS0L+O36hVF
|
|
MOZqoNswVabsZ+nuq1cVoZOhuH96UwmpX00xj7yhCEPY+Uf77ZWQt9Rl/uRK
|
|
RfDfcl3vFldEY/bBdWX9itAuO6ea80EOecYGSXgOKULoXZAsvS6H1isCchRG
|
|
FeGN38VCJws5xLXqG9UwqQjJ+q+fzvbIIrN0t0Ptq4og8f7M999tMqi588SX
|
|
cQElsDm7mfK0VwrlKehycHsogXWC6ADzcXFkc/h1xjMfJfjy5tYTc3FxxOXj
|
|
zOkdoATiQWxbzCti6Oq9ZK6OcCXYs/T4K1WGGLooN8ZzLlUJrhPK6sqGRNFZ
|
|
mcj9r+qVQO5n8ePWSREkZsJeENqkBHEvJTv/poqgCfdSAfFWJai1NG3bryuC
|
|
bCteCYZ3K4GodbjfyHVhZCYlJCIzogSv0q201Y8JITWJp+KX/yiBoOrz9qaN
|
|
/WjJ4Gip8h5luE3K8qx9sB/dc/kqMUanDDryErecPfcjyTusUmrsyiDPe7v4
|
|
9zg/4hdzlPkspgxWRgev33i1D+2K/FMgmijDzOPQC/aveNFLAX2t35nKUF8l
|
|
NDOhz4UGRB5I0+Yqw2Rx4FAPExcaFhfm5y1UhmVxOXrLQU40Kb+1rV2hDON1
|
|
8576bpxoU6++PaJFGUb8ngaGZXEg6ZNi5tTTynDZ7Oz5WE42pHjmGsY9pwx3
|
|
CzSS2B+xInXXv8qSP5RBIQ4/U2fLijCfD5zGG8qAW9M9ELzDgo5HZo4kM6tA
|
|
sc612UMHmVHczT2unJoq8IEhz/TGI0aUdPvccXFdFWiQ7elfcWdE6aWfjDRw
|
|
FUjiCqjRFGBE+dXNsjaHVKCySzzW9TIDqmsNXMo7pQL/vY+2EnOiRxPjk+Gi
|
|
CSpgMMEyxK5Pi2Y+W/qopajAo7Dt44+oaNH89NNTBtdUgPwiTl6ggwatLeSj
|
|
s/kqcHMw2V7MkAax/DlKV3lfBcbPPHs8bU2N9IQ6M1SGVeBATuSh8EwqNCUh
|
|
OfF9TAVGEAnvPUOFkhUSFco+q8BGhqR+hTIVGtUzI/N/VwGiuagCTeE/PMx+
|
|
cGfPHxWYo+8pk5fexR0OB2rMc6jC37fvMta9d3BlS3EHE25V8P9r0/Ft3w5O
|
|
fWwotoxXFZrozrg979nGqxy0+h0FVEHqahftIcltfNNry3NIQhXcEtZnmBY3
|
|
8ZykS0Vt2qrQERPPcbFsHfdOVe/Zr6sKWYoRFdpn1nE8Y3ohlKgKRTGMDk8E
|
|
1vGvuUa6aqAKLC/DUtmy13DNu0zvyk1VIaqU6Pfq2io+2JPJdO2UKqTdsHnU
|
|
WfULr+g1UF10VIUlP2LQvoBfeMTr3ydMnVXh31XlIF7CL1zsvU0ZjbsqmH6J
|
|
XaJ7voIHzOxHF86pQnjD2Gji0k+cjeZOsHMcJd52fDxb4xJOv/XfsZV4VTCw
|
|
vzFlcGQJ3136pH7piircd377uXv2B748tn+lOFUVaI3xjRLhH/hAQ6bflxxV
|
|
GICH/x0vWMCzXC65n6mmvKdbXHbqm8NT7G4bLd9XhbJJza2asDk8zuKpZEyd
|
|
KlStD/mzSM7h5/W2pooaKXq+oKDNmG/4ca7AMxP/qUJ0RVSNvOEsztfpZHf6
|
|
nSpcNZ0Cw51pnO3JRcKPYVW4x0vbbNE0jdPXFvJFf1CFbiLHP2LQNL6RP/qu
|
|
cEIVxjxvbDxcnMJHA62OfpxThb1nBLz6FybxAjEwO/lXFQL99X74cnzBs/Y5
|
|
yi38U4VGNKfwvu4znsIaxRhJrQYcEcl8Rgaf8citx+QCBjVo9xnxD/CawE+9
|
|
VTk4xqkGF7YbhC+8+IiLXDpAspdWg3TNkdC0ng947XlG8U+yapT/pRJrf98P
|
|
OO6+wuCsoAar//leDOH5gJ8+3DXkqaoGlW4J3nMeo3ghr4fPBT01EOOJddwV
|
|
HMH336styLVQg6zUJ9rbje/wysLcWMGjalBtYRVe4fcO17kW6377mBr8HSYq
|
|
Gkq/w+2CrdXv2qlBxU7AhknBEJ6Dr/c2uVA4LeT2gbRBnGcI23ofqgbjm6W0
|
|
t28O4GU90p/tw9WAKfNFCJvzAK7xhL3nU6Qa5bwZjj4oM4Bb35rM+BqrRtkv
|
|
pb7N+bzBMz0SZNdS1CCld/f3qSevcbY/fbY8t9VgLYuX4e/1l3jRUiOWV6IG
|
|
iYvxFqe0XuLKk0USQmUUvxpqdXZHevEj5IBliSqKH8nnKrZEe/HUDJ4rGg/V
|
|
YN+t7JAzHc9xJqlTTdbP1eB0YsjlLJ0e3Hs/MqvuVYNvcm/F3Fa68Zes4hM0
|
|
fWrA9+TuNaHqbjx1/Rtd44AamBJeLSmLdeNsL87b7BtTA0LyNm3uvi6cy+fq
|
|
6viiGkDW76cEhQ486Ix/kuYyxd+atZsHVtrxoWNHhdJWKPHy1um7H7fj2aR9
|
|
hvg6xU9XM19dk3Z8H1vp9eJ/atDT+TVW9dMzXKi+Rd2NSx3uM3h3ZbW04lHl
|
|
t8hPedRhzn2P3o+Trfin/FgHvn3qkKJa0Be924IXxRnHPRdUhxGO03LqJi24
|
|
6PHBt3JS6hDyZt0jdvYJLrXxPWCJoA7KpaYuN+2b8MSFPloTPXVocEutqmRp
|
|
wmc/P8i7TVKHzWt25x61N+KVL0LarfTVYXSVdrlFoRGXL9jD8dBMHZwJhdzK
|
|
rI9wZWz/g7DT6vBUeFdAeKcefyjhtUPtpA7Tqo1TAY/rcZ29zSbpLupQPtOU
|
|
0BxcjxuM2H0p81CHh928CkK/6vATgXmcg4HqoMVhNJK//ACPKd8XrJioDt/O
|
|
0C+etKvBaVM92h8nqYMonY9pw2I1nhL0mOXgVXWIbLq+LyuuGs9GtuX2GeqQ
|
|
H6SRM9pwD6/8kDOcWKAOAg8uzC9JVuEDrHy6k7Xq0FY1d+CbWQVus+qW4Fuv
|
|
DpPqej+D18rxsbHGtxsP1cHILZwPLynHZ+7aeLM1q8Me2n76wD9l+Kb+jZvE
|
|
LnUI907jmG4vxcVCeXZvjFD0+TIYB10swStOnTUTG1MHblfja716JbjiwUc5
|
|
NR/VIYuJd1tosxjX5jiu0jWpDm8PPFO4F1KMm9277vRzQR3MxQ8++rNRhAdN
|
|
cHWZUWnA2pawiK/bTfwF+dTTe9QaoP7VRjd7z01c5EHF4710GnBbhUpO8HYB
|
|
/jJGr+YlkwacVtfYpzGRj4uLudww49YARz9wZvXNw9+61nuYSWuAoQPbg+rO
|
|
G7i0+Y7zPVkN+Dyq9agx6AYepWl0aq+CBpgbuquPS9zAZek+WL1U0YCNQo8M
|
|
r+RsPLaCSs9MVwPm314lKDlfx1W/W7KYmWuAydXNW/qQiSe+zae/Z6EBcXaK
|
|
4XZUmfjH5mmqvUc1gD5e5Nuxjgw8KSVsrddGA+jks7FFowz8i8LtCdMzGsAz
|
|
ZXi3qCEdz/BfqjMN0oBd7jiZHvOr+OwJneqqYA1QTTcd759NwUkorpwpTAMa
|
|
TdM8D8Wl4HPsfAW9kRrw9kebYtjTZBzqscumCRrwQGC8jWiYhC//TrUxzdOA
|
|
1O7CCttrCfjH0ZITtwo0IJw8VN6BEvCXT5tsVwo1QCidJcdkJR4vu/LFPr9E
|
|
A5qWC/jzbONxB0FNx+/3NOBHyiW6GdXLeI/BuHvyUw34AJfSObkv4Q0yPz0+
|
|
/UeJx8zUe3UoFi9mofNS69QA2es9qfPZsXjEsLLPB7IG9P/ysTcViMVVvePO
|
|
yQ1owCW6AvI5x4v4zUy5C71TFFalMn6wG4EnheLhwl81oIfrYHB4fgQeevJY
|
|
ROA3DZAPu/6yQSsCt5KKjtq/qAFv5suWHYPCcfrmgVivNQ0I2+xs5/kThgd+
|
|
CUtmYtSEiOJynjnzENyxJzXl9F5NuHibUdP/TzBufq/kaj2LJshF2tUI3A/G
|
|
pYNfpdlzaoLVf9MRw5zB+EeGA1lVApogoyxs4TMXhJuokAtMlTThn2R+Sic5
|
|
ALejP3R8QEUTSqNdW2MuBeDen3pZbdU1IYhf+etRLABPv/o69ixBE/a8Uvlz
|
|
KOAcPvztnXuMviZMv4hRkAj2w+eenRClN9SEeUGtz0zbvvj2jdEPqcaaUE5q
|
|
/DN2yRcXNvxoXnBYE1qfdYyI5PrgZ4un1RttNOHWi6pW1xEvPDTMbZFopwkG
|
|
invKhny88CSLb+WdDprwi34tdG2PF17zZ55/4Iwm5Hy3T9bU8MR/2/3anffS
|
|
hJtiwQE/Kt3xOM49r0QvakIq13Hvf+OuePZcXPzdWE0wmsoXrEpyxSv+o8WV
|
|
L2sC+TTr93JtV/ylH2M9MUkTLl0q5InPccE5X7LnnsjShKHZb9lGbs64eEmm
|
|
1adsTTCnU4ndFnTGNS9w7z2bqwlv75esjA054XbS+6IDCzWhZWjfNrOJE14c
|
|
J+KaWqEJlws6Z1xCHPEG+2Ih7ipNsGH705m8ehrvVhUfzq/WBIajHoEdIafx
|
|
uQkp07t1mmDtOplhcPEUrkJUUuls0YSyH7Uf71c44M9+E3c2+jUhw361It/C
|
|
Fi/pe+xy7K0mCO4NOjG4cgKPL9d4WTtE0VMfdykw5wRuaquQ7zaqCSd3f3v3
|
|
T9vg71oECEOTmlBrkRMXnH4cf3w9p0h5RhMKN6IuWpOO4wW+XPQps5rwLZCP
|
|
59zCMfyMyN73sKAJSRcv+Bw9cgyfv7QVVLuqCaTFHWbSAWv8tUPIGNOGJpjK
|
|
DBZeGz6K12ms6LttacJTKT613fSjeMjXOQ6hXU3Qs1zpEaQ5ilOZjtYmM2jB
|
|
XGOT/JtlS5yP4/H8WQEtUGzAvgyImuNbc+rW7UJaUGZ7zVnlwWH8Y0dts+AB
|
|
Ldi9eXn8MDqMl5yvSBqU0IJjeTLWZWfNcMWRG9KgpAU5Ec8eH+g6hLPXcabf
|
|
VNECKLnX1ux4CP+VlLa2rqYFt5g/H/28Y4I/1kvovq+tBSoSOlWNeia4QVGw
|
|
iyBogZkIUXy51wiXCvvZG2qgBdN/EiSMAo1wRitftUFDLaB7HT24td8If73n
|
|
LFWyKSU/1adm3ucMcTu3Y0Xr1lqwo8Bt9UHuIO6vqD721o0yfuI/g+ZRwEM2
|
|
BLbPeGrBqgfBciEN8KhOGoElby2waDjs4GQI+FW79/Z7A7Rg5uCtp3+8EF4Z
|
|
f+GDQYQW3CvnerZ+CMMfWDpvDURpAbX1bwZfMglvEjDbfyZGCzwObh3ZZ0zC
|
|
e+oE7SPjtWC8h69j/jARn/r4bPRhuhY8JPezpATo4t/v3t3Uz9SCI2ctfzbs
|
|
6uA/gzL4B65rwdcEZb9X6Tr4P0YXu8U8Ldhry3fr3iMCLqRFNypZqgX6dLXL
|
|
hnza+Im0wyM3HmvBeo8kg5e8Bn7aTnNDokULCqxdi3aG1PGzEsL7Gtq04NCd
|
|
4RSmGHX8fPPSif4OLej22U+8+EENz/iaOUzfpwUfAt5Eit5WxXPrItaz+yn1
|
|
cs64PHVMFS+KdOWTeKsFoeXyB34yqeL3ObVOoGEtiCjM23zwWxl/iY2+D/ui
|
|
BTJ8iceSBxTxt4wda3TTWhB1VZql4IgiPjpUxZv9VQvc33nsX+pTwL95RdrU
|
|
zVP65UN1oO6gPE6bI/J+blULqJr1M0+sy+LY0tl39kza0P3d/smvQimcr9Xk
|
|
ThuzNrx+9a4hGqTwpSvyAQfYtOEiaWol+askXiT2k/krlzZ86bNbZdWUxHeP
|
|
Rx4MENKGe0xuagemxPFhMUfOIRFtEJx895ItUxyvXYLPWmKU7880BxzVF8cd
|
|
k+gjd6S0weXPjG9LuRj+X2tmQ6KKNpQxylxJjhbF85KCY7+raYORUNPhGG1R
|
|
PMDG1sJcUxte+tzLwicP4KLLQvOcutqU/7Xb2zcGRPBY8UqxWwaU/H/K+JT0
|
|
CuH6yc8yHtpoQ1qzY+UN4f24wIkSRz47SvyP17JL6vjxX+LxiuEOlPmVyvQj
|
|
jPjxO22mL/Az2nDBSdMxOHgfTv3z3b9eT2249l9UdNcsLz7W9vi1oo82JLCf
|
|
vuB7hRdvSC64ec1PGzafXRW8J8eLu0g4EWyCtOEEMdSuN4gH7zqx4P8lUhvo
|
|
WuTRNz5uvFCin3TwojYMeRZax3dx4cE/6/ZWxGpDrrN4YXwgFy6ZElrhk6AN
|
|
UYbas7lvOfH4p3sm1tO1IWff2oxfCQduJMl/hPWONjiZjyUmrrPgj370iJ0t
|
|
0wa+Ssdjt8JZcMnH59dbKrQhr9axsmOXGac1e3Pbs1obHrte9uZkZ8Y7zyX+
|
|
6nqkDaGOr3e+GzPh6rqazwUea8NcQ+bzpA+MeAn11M3AZm2w/OPsuubHiMfe
|
|
wIwOPNOG6J530QKFDDjeupob8VwbCh796XzFQo/Xxt/xfdurDfT0xc/Y79Ph
|
|
whZW+rJ9lPo129p/t6DD/3ypnn8/oA2qXiWOB3Np8RZ6V0xtTBti3mmtTOrS
|
|
4NrWb6e+LWpD8nqkZnYHFV4hGPMYX9aGkbYuYbsLVDjvV8XUGyvacAiqo4+r
|
|
UuGrYUlaB9e1QeFb21C3yT+s4RZKKvpH4T+MjdfV/mLiHj9Ore0hQHmeae61
|
|
+j9YpupNNXNaAuju9Gc80PiDBXStj20xEmDUUFtdB9/BVL7fV7LhIkDuEd0P
|
|
ET5bWFHDSeoaHgK4y/IKlu9sYmxRTCPU+wjgd0Dk/YO0TWyJzS22TpAAlgdP
|
|
O5s83sBqNIWGmKUIYMMRmnbvwDomG5tyoZNAgI7BP/ge9BtrI5bTmesRYFDP
|
|
KPL21C/MauO/rPckAmxcMJlduvILu+C/VjOnTwCGp4thcSMr2ItTTpNs5gQw
|
|
bCvAapJ/Yqf4I/3zLAiQ/PrhPWq9n9jPoRs7YkcJEJHvzFQ8sozxH37Fq3WC
|
|
ABkzBkFed5cwT11ts5NOBFArzj815bGI/Vm1GplxIcB0VLZH1sQCllHnc9bf
|
|
jQDiMZW8r2wXsCcyJRcveROgv0Jo/O7ReYyRj+Xh3WAC1D849Oad8xxW9WtS
|
|
cDWJAItfOOJfzs9geO2fyuirBNDyOi+0GT+DDXrt02ZIJ4CeAAdxr9gMtv3F
|
|
3ErgOgE+nj60t9lxGjN78zgebhHgCK/PhePLk9hEyiDny9sEkG7vvfckdxIL
|
|
Mv5RdOwOxf8sQ+P/9Cexgqfize53CVDR+s/pRsEXbL467UdqPQH+XK93UX06
|
|
gV30qIzge0QAdh/FqMvSExiXRBdDcRNFP9utN5VZnzC9gk2xh60EeNFclql1
|
|
/iOWkuR64kMPAQTP5QesHhvD5N10/5MaI4DtMZ/miuRh7Jq4xfbljxS/9O2l
|
|
u8WGsdXPLlpTEwS48i1/rbH1PfbMIbW6aJoAp1Wpy9ZX32HWVp9z9/0gwEqd
|
|
PAd31BD2mHV1MGSZ0g8rDW5bYkOY0CtGtncrBBAJunYsrHcQmzVSj89YJ8Cv
|
|
50d/CQsPYuHEhAAmKh3AV1Xy7IYHsInN/GoPah3IyChXw5IGMIOm2tkeWh24
|
|
zOBsFU8cwFjURk/FMemARuYBq4Pmb7BiaQXTHS4deKj1PmaW9zX2gvOt2A8p
|
|
HRirdG5XFurFlN58PXVYVgc4OU7Sr1W8wLJSt3Or5HXAdufY/KDGC+wUgySb
|
|
u4oO7Ok9cqLu2HNs+U/o9oSODnhn6tOv3+vBjrdc1cKIOhDqzekYZdSDPQkr
|
|
DriJUfgt79ehyW4s7lfvrK2BDhzGJ7iGD3RjfHNCQwOHdcCOZTP7cF0nFlmu
|
|
xqZioQN377WzxNh1Yl9cjE3TrHTgrwKnjTF1J3bv07n/TG104D795L5ghw4M
|
|
H+qs7nTUgdhIi1NpQu2Y2zPP+EeBOsBOU55E7G7Flvzmw4yCdeAr/1rJPu1W
|
|
7IKwr89wKMUfnbojbfdasJSoc9abkTpA/qjMKFfYjNXphYqSEnWAyOjfJVb0
|
|
GNOb3+B+naQDT00XrAYlH2Nd+eEMjld14Em1n9zX+03Y8GbUUkyGDhxJfs1A
|
|
87wR+9N0ua2rQAe6pGyqZ7gfYYnudHXHb+nALb5ROZ+ahxg735XSr7cp+qtp
|
|
WP8YP8TEQ1JSGMp14IKz6BRPXANmopFpd/iBDtD39JzmYa/Hsh4UrQ526UDv
|
|
tYfL7zdrMKEzonOuZB3Y3p6wTHCpwcrZ7oyvvtCB8geXP6m+qcae+JV38vVT
|
|
5q/MdNGvv4d9UqjJcBjVASefs0+bcyox93Gl+IUxHWhcKpNp4avEfqY8CIv6
|
|
pAPmyg1pJvl3Mer5BseiKYoe/T0Fw+UVmGxls+LUog5kma9KBoyXYQ22RNHz
|
|
yzpw0jZe6JJ/GUZkeMpN+0sH2Ax/Nv9HU4ZZuLdvS21Q9AzrBBVolmLBks9f
|
|
eO3RhTZ7LemS2hLsv+J3Z1d4daEzeSbsy/ot7Iu52JlQfl2wm273VDl1C6Pa
|
|
8rPfEdCFOqvaI2ndhZjBUQYLOlFdYNyZu6lbdBMj79Ej7JfXhXdJe6qens/H
|
|
vt1PVCtS1IWSOPaEheU8jNFhSEFChcI6ywNN/nmYaYOvqJKmLrB5zKysnM/F
|
|
+lxuM+njuhClShd36+YN7AfbIg0ZdCHS1oVop3ADY2vV2TU7qAunV/xpLZ9m
|
|
Y1bcg7+OH9IFKamZM93frmNDXbQfPa11YTbotWSpTRY2Juldm+GuC68TqFu2
|
|
+a9hOwNNlbxeuvCDev776dB0TCiaprTARxe0iO3qNCNp2On3hbllAbpw3aDg
|
|
y2BJKvYl4U3skwhdUOUrfvDmZAq2R10oEovWhXqJW84pb5Mx8QnPkM4YXeDR
|
|
Wq9iMUvGzmpTe/fF64L1Qy411YNJ2LdZzWNf0nUh/MqAfeTxRIzx+qUjbpm6
|
|
0OHXyrQ1kYDJon6T+eu6cFh5IeS9TwLmnetBWs3TBRbrrJ6I1HhsyaRAirFU
|
|
F/YymQ9pzcVhq5X/NlQe68LJZFcdPqpYbPaEcXFyMyX/PRfLdpxjsFHatEPT
|
|
rbpge3f80EvyRazVSSA/p10XuDz+iSjlR2Nx/Fp6f3t1wTe4fyb5TCQWTI6c
|
|
OtGnC96+tCVDIxGYe3BnSl2/LsxUbnbUW0dgpgOW465DuiC0IqK2bRmOcSR5
|
|
R738qAvzidz8gR5hGLV2vaTkZ1149b3wPufvUGx1eqMvelIXlKliDedjQ7ER
|
|
lCCsNqsLexzOKu8vDcGKNm4/y13Whd8/ntZYUQVjih7vqdyo9eBasX/REG8g
|
|
JsIrVPWMVg9WB8rfOrUHYBxdLkf5GfSgT3jrZqZvAPZb5GfJK2Y9qNIQ5Yi+
|
|
fg5rGd57UJ1XD1hrV8OnFf2wmvijC1f36UFwe45mWoEvVqSed/3rfj3YkRiu
|
|
YWD2xS6lS83kieiB7r6YWp1Vb+yQMST8k9GDbuFjjcKznpjeaqKSvbweFKvZ
|
|
mE54emKKd16/b1DUg43T924wLXlg7LsO0u5qepCeytsY+M8dG24Med6npwdS
|
|
F5mzjmBumKtUNVPBET3I+XJ2k1HIBYvocfSWttIDh3dCe8hPnLEMN65XDdZ6
|
|
8GxrKzzf1hlrKw9PfWVLye/HrWHbm04Yj/Qh9r/OegDXm7z4gh0xefLOueSz
|
|
ejBdtapW0XcaA/cHA7welPFSay7PZE9jfhV8Wcq+euA9LBOGLZzEyNJfeZxC
|
|
9cAj61r6pVx77CM5L2Txgh78Fn/z79Ree+yXu/nwhUg9IHRbG2jF2mEH7j7M
|
|
zYzVg+PnknYLg22xCzJxAl0pejCxRhNQfNEGk5c9ICp9m6LX0VZKntkagxeD
|
|
sQ0levBH6vJXprtHsROeiZN4mR5gBzirmY2OYpcrf9yxrdKD6JOF70yuWGEf
|
|
Zdukkh/qgVk3bceUsQX268W5RN4mPfgq+t/9U0VHMEYviW8lT/Rg6kRHUsCW
|
|
OaZVlVLZ8pSi94ox2/6Ww1i6nL3C4nM9iOMcPurpaoqV9bKkXnipBzeKVMhV
|
|
7w9hLV7ti7Sv9UBReV5wzewQ9q1KplZ4UA+4eST0PXETDOTXVS0/6kGEpc6H
|
|
vSZG2Ir8de2Gn3og8e/62fxBfWy0D4y4f+tBpXblR84Qfazdf+lY8JoeeP1O
|
|
mfTdr4+lN5gGam9T6r8af7XMAzB5PaqaFhoiWPsbv9ZUxzHOj/dbBOmJUDx9
|
|
5+vh6xi2GX2yN4qRCF51A/r5GySM3NE0i7MS4b/gyBc3eomYi6mfWBcfEbLf
|
|
X77llKmLmS4IqEruJ4KM1RvuoL26mGraCzxBkAjp3xi6UaIOtjsgccpElAhX
|
|
ZdstRxMI2E27sZxXckRIs7sQlVSqhb3zMGF5RyLCkaqxemYLdayVaU1ACxFh
|
|
Lszi0+yiGnan+o5cjj4Rfpt58j1NU8MClv8a2xkTIVW6Rl/9vSrGGvbo0kdL
|
|
IuhkB/Y7ripjq/wuGZg1EbbKopfuWCpjH1vYbxcdJ8JrMT8Xo1ol7N6ud5uT
|
|
PRF6/CLMnUIUMeNEsY0ZFyKoqOeJiMjJY0qyb+iM3Sj5sMbZxt2Sw3heRvHc
|
|
9SCC2r/QC108ctgU66ialy8RQowLKkqYZbGYG+m+P0KIIMKgpmKwXxp7UrYz
|
|
uZZEBKd7YnIFleJY4+QiS3EaEbQGU18SZ8WwBpEJglkWEXZD2I0qFMSwmrz2
|
|
tKKbRIhzT72P5R/Aqt7XPzlUTPHnjueUmqUIVsFVOv2rjAhPtj1dPLiEseLU
|
|
BF2TWiKIlaDjl58JYLd6Q8+uNBCBP0dY2K9iP1ZA73nt5mMiHJzKiSzK58ey
|
|
Y82+LrcT4YaxxTRXMR+WHMyemTdEBCr8V0+/GDeWWE/VZjBKBNfGdgMnOy4s
|
|
fmlldvEjERIWZob353JiFz3fkfRniRDmYNDbqsBBuT/1eCzME+HFt4iPbNTs
|
|
2IWppqwby0TQFzP7FdfCigWdyp/7vkkEi6HcjTfWzNi5/BTu7L9E4OLtG76l
|
|
thfzHY7EcWoSSDS7rKkJMWHuVo7ZWcwkoCquv9vPxYA5GEoAUYQErH2skuRw
|
|
GqzYbWncTIIEbC+kq+3zqbHZxOYwB1kSmP9sC/3SuQcL6rV8EK5OAtN4s7/s
|
|
6lTYk3mBw8kEErjl19O9/bFL2mWenc0jkeAyo++2dNJfUopFlMgTYxJ8KdIv
|
|
/7ywTeLL5DoxYkWC5ELbQ++SN0l3hirT1h1IUJw7LkJ3ep2kzId6eN1IoPKq
|
|
N2nCaZXUYvf+j+Y5EhzLZGZTzfxFMr7po3k8nASndCKEJed/kgY/7fE9f5kE
|
|
43/9VgIGlkiOonmlWWkkih/L0f4ci6R5F+Xx+lwSmETs4XFO/04KLe/meltC
|
|
gvApaonvht9I1HMOZj+rSSCtTpMtpPKVlC6/com9iQSLY4/now5NkwT9rjQr
|
|
t5NArlmFsJQ6SWqhis/jGiJBqGTtbeK5TySH7Niw9a8kWI76pzFWPUrakok+
|
|
MbZJgo2os10nqt+R8lrDtZ4xY2CSx7+5avGWRLAM5bkjgoGSQq3spa0+0vBU
|
|
0O8ENQwW+z5Fl2IvSGYh1uemNDA4+nVBJv/Rc9IzBvUFXBuD6/efXElRfk6q
|
|
UFyZ2tDDgMz9FTugQCaFhp4b9DLEQHz0u9VJo24S717f+iO2GJR4XCy/uNJO
|
|
2rwTYxBxCYOBvsdX7KubSGPE60MV1RicvVOxVm5QS/IMKSs0rcVgeDyPpyv2
|
|
Pmm9ttFtsQ6D8zRe56u6akhc4qMbak0YrHNqepy0rSYdZhQWetpOiZ/rGIE9
|
|
rCS1vas4O/QegxxGsYSz0mUkM7YnSqGjGGhd+aB+rayUNGrSu84/jsGaJL3A
|
|
b6lS0mrLQpLjFwyQp7MRn/odklKJ6v3v8xhwOgslNfgVk9rG9ENTf2BwZ3Fn
|
|
7ipNMcmM5xhS+YkBtX3pOLfObZL7lZC3wWsYtGjp1blW3SKtticW7NvEIDTi
|
|
qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw
|
|
18hpWOkpIP0PtXjCHw==
|
|
"]]}, "Charting`Private`Tag#1"]}}, {}}, <|
|
|
"HighlightElements" -> <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>,
|
|
"LayoutOptions" -> <|
|
|
"PanelPlotLayout" -> <||>,
|
|
"PlotRange" -> {{0, 30}, {0., 0.17588335145564066`}},
|
|
"Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0},
|
|
"ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True},
|
|
"LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> {
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]]},
|
|
"HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ),
|
|
"ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>,
|
|
"Primitives" -> {}, "GCFlag" -> False|>,
|
|
"Meta" -> <|
|
|
"DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" ->
|
|
Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]],
|
|
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
|
|
Axes->{True, True},
|
|
AxesLabel->{None, None},
|
|
AxesOrigin->{0, 0},
|
|
DisplayFunction->Identity,
|
|
Frame->{{False, False}, {False, False}},
|
|
FrameLabel->{{None, None}, {None, None}},
|
|
FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
|
|
GridLines->{None, None},
|
|
GridLinesStyle->Directive[
|
|
GrayLevel[0.5, 0.4]],
|
|
ImagePadding->All,
|
|
Method->{
|
|
"DefaultBoundaryStyle" -> Automatic,
|
|
"DefaultGraphicsInteraction" -> {
|
|
"Version" -> 1.2, "TrackMousePosition" -> {True, False},
|
|
"Effects" -> {
|
|
"Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
|
|
"Droplines" -> {
|
|
"freeformCursorMode" -> True,
|
|
"placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" ->
|
|
AbsolutePointSize[6], "ScalingFunctions" -> None,
|
|
"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
|
|
(Identity[#]& )[
|
|
Part[#, 1]],
|
|
(Identity[#]& )[
|
|
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
|
|
(Identity[#]& )[
|
|
Part[#, 1]],
|
|
(Identity[#]& )[
|
|
Part[#, 2]]}& )}},
|
|
PlotRange->{{0, 30}, {0., 0.17588335145564066`}},
|
|
PlotRangeClipping->True,
|
|
PlotRangePadding->{{
|
|
Scaled[0.02],
|
|
Scaled[0.02]}, {
|
|
Scaled[0.05],
|
|
Scaled[0.05]}},
|
|
Ticks->{Automatic, Automatic}]], "Output",
|
|
CellChangeTimes->{3.991334471589432*^9},
|
|
CellLabel->
|
|
"Out[252]=",ExpressionUUID->"b1f00f3e-b26c-bf4d-a0fd-9968a9b2c4e7"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"xx", "=",
|
|
RowBox[{"ListPlot", "[",
|
|
RowBox[{"{", "}"}], "]"}]}]], "Input",
|
|
CellChangeTimes->{{3.991714709387436*^9, 3.991714738003292*^9}, {
|
|
3.991714834117689*^9, 3.991714842328617*^9}, 3.991793311407936*^9,
|
|
3.9917953263701286`*^9},ExpressionUUID->"7383cf4d-77c8-1d41-ab20-\
|
|
d4ea9a390940"],
|
|
|
|
Cell[BoxData[
|
|
GraphicsBox[{{},
|
|
InterpretationBox[{
|
|
TagBox[
|
|
TagBox[
|
|
{RGBColor[0.368417, 0.506779, 0.709798], PointSize[
|
|
0.011000000000000001`], AbsoluteThickness[2], PointBox[CompressedData["
|
|
1:eJxTTMoPSmViYGAwBWIQDQNKeX6qzA5T7SG8D/amib9PSsivg/IZHJZPW/vV
|
|
1Wk7lM/hwHVn1+zlVnugfAEHySd6h0Se7oPyRRy2/nq1ykEXxpdwsL2qaH6Y
|
|
F6ZexiG6yuTq5J8w8xQcwpLmTd3yaDOUr+Rg0TqVS2sVzH4Vh/kKG+/aOiyH
|
|
8tUcEv+YvDubvwDK13B48SOj8JjBdChfy2ERx8rbN8P7oHwdB80ta34fd2qB
|
|
8vUcdkyNm907tQLKN3Dwn9LicutYPpRv6HAtb/eFmOWJUL6Rw9aCyNazDOFQ
|
|
vrHDpJcXXlaau0H5Jg6ZsqG+AqX2UL6pA/+1/5ZnpqtD+WYOZuVf9sd0q0H5
|
|
5g66zjKvH5n9soPwLRxkVFx+NokJQeUtHRhQgJXDrzm7Y/V9GaHy1mjyNg4f
|
|
Mx53bP3xBWqeLZq8nQPrIvXUIOfXUHl7NHkHh5AnAoXFWjch8g0OaPKOUPmT
|
|
UHlHNHknh963Wxd8P7YBKu+EJu+MJu+MJu+CJu+CJu+Kym9A4zO4ocmj8Rnc
|
|
0eTR+AweaPJofAZPNHk0PoMXnA8AFc+iCQ==
|
|
"]]},
|
|
Annotation[#, "Charting`Private`Tag#1"]& ],
|
|
{"WolframDynamicHighlight", <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}],
|
|
StyleBox[
|
|
DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {},
|
|
Slot["HighlightElements"],
|
|
Slot["LayoutOptions"],
|
|
Slot["Meta"],
|
|
Charting`HighlightActionFunction["DynamicHighlight", {{
|
|
Annotation[{
|
|
Directive[
|
|
PointSize[0.011000000000000001`],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]],
|
|
Point[CompressedData["
|
|
1:eJxTTMoPSmViYGAwBWIQDQNKeX6qzA5T7SG8D/amib9PSsivg/IZHJZPW/vV
|
|
1Wk7lM/hwHVn1+zlVnugfAEHySd6h0Se7oPyRRy2/nq1ykEXxpdwsL2qaH6Y
|
|
F6ZexiG6yuTq5J8w8xQcwpLmTd3yaDOUr+Rg0TqVS2sVzH4Vh/kKG+/aOiyH
|
|
8tUcEv+YvDubvwDK13B48SOj8JjBdChfy2ERx8rbN8P7oHwdB80ta34fd2qB
|
|
8vUcdkyNm907tQLKN3Dwn9LicutYPpRv6HAtb/eFmOWJUL6Rw9aCyNazDOFQ
|
|
vrHDpJcXXlaau0H5Jg6ZsqG+AqX2UL6pA/+1/5ZnpqtD+WYOZuVf9sd0q0H5
|
|
5g66zjKvH5n9soPwLRxkVFx+NokJQeUtHRhQgJXDrzm7Y/V9GaHy1mjyNg4f
|
|
Mx53bP3xBWqeLZq8nQPrIvXUIOfXUHl7NHkHh5AnAoXFWjch8g0OaPKOUPmT
|
|
UHlHNHknh963Wxd8P7YBKu+EJu+MJu+MJu+CJu+CJu+Kym9A4zO4ocmj8Rnc
|
|
0eTR+AweaPJofAZPNHk0PoMXnA8AFc+iCQ==
|
|
"]]}, "Charting`Private`Tag#1"]}}, <|
|
|
"HighlightElements" -> <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>,
|
|
"LayoutOptions" -> <|
|
|
"PanelPlotLayout" -> <||>,
|
|
"PlotRange" -> {{0, 52.}, {0, 0.120683}},
|
|
"Frame" -> {{False, False}, {False, False}},
|
|
"AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio},
|
|
"Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" ->
|
|
GoldenRatio^(-1), "DefaultStyle" -> {
|
|
Directive[
|
|
PointSize[0.011000000000000001`],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]]},
|
|
"HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ),
|
|
"ScalingFunctions" -> {{Identity, Identity}, {
|
|
Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" ->
|
|
False|>,
|
|
"Meta" -> <|
|
|
"DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" ->
|
|
ListPlot, "GroupHighlight" -> False|>|>]]& )[<|
|
|
"HighlightElements" -> <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>,
|
|
"LayoutOptions" -> <|
|
|
"PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 52.}, {0, 0.120683}},
|
|
"Frame" -> {{False, False}, {False, False}},
|
|
"AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio},
|
|
"Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" ->
|
|
GoldenRatio^(-1), "DefaultStyle" -> {
|
|
Directive[
|
|
PointSize[0.011000000000000001`],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]]},
|
|
"HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ),
|
|
"ScalingFunctions" -> {{Identity, Identity}, {
|
|
Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" ->
|
|
False|>,
|
|
"Meta" -> <|
|
|
"DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" ->
|
|
ListPlot, "GroupHighlight" -> False|>|>],
|
|
ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, {
|
|
4.503599627370496*^15, -4.503599627370496*^15}}],
|
|
Selectable->False]},
|
|
Annotation[{{
|
|
Annotation[{
|
|
Directive[
|
|
PointSize[0.011000000000000001`],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]],
|
|
Point[CompressedData["
|
|
1:eJxTTMoPSmViYGAwBWIQDQNKeX6qzA5T7SG8D/amib9PSsivg/IZHJZPW/vV
|
|
1Wk7lM/hwHVn1+zlVnugfAEHySd6h0Se7oPyRRy2/nq1ykEXxpdwsL2qaH6Y
|
|
F6ZexiG6yuTq5J8w8xQcwpLmTd3yaDOUr+Rg0TqVS2sVzH4Vh/kKG+/aOiyH
|
|
8tUcEv+YvDubvwDK13B48SOj8JjBdChfy2ERx8rbN8P7oHwdB80ta34fd2qB
|
|
8vUcdkyNm907tQLKN3Dwn9LicutYPpRv6HAtb/eFmOWJUL6Rw9aCyNazDOFQ
|
|
vrHDpJcXXlaau0H5Jg6ZsqG+AqX2UL6pA/+1/5ZnpqtD+WYOZuVf9sd0q0H5
|
|
5g66zjKvH5n9soPwLRxkVFx+NokJQeUtHRhQgJXDrzm7Y/V9GaHy1mjyNg4f
|
|
Mx53bP3xBWqeLZq8nQPrIvXUIOfXUHl7NHkHh5AnAoXFWjch8g0OaPKOUPmT
|
|
UHlHNHknh963Wxd8P7YBKu+EJu+MJu+MJu+CJu+CJu+Kym9A4zO4ocmj8Rnc
|
|
0eTR+AweaPJofAZPNHk0PoMXnA8AFc+iCQ==
|
|
"]]}, "Charting`Private`Tag#1"]}}, <|
|
|
"HighlightElements" -> <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>,
|
|
"LayoutOptions" -> <|
|
|
"PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 52.}, {0, 0.120683}},
|
|
"Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0},
|
|
"ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True},
|
|
"LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> {
|
|
Directive[
|
|
PointSize[0.011000000000000001`],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]]},
|
|
"HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ),
|
|
"ScalingFunctions" -> {{Identity, Identity}, {
|
|
Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>,
|
|
"Meta" -> <|
|
|
"DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" ->
|
|
ListPlot, "GroupHighlight" -> False|>|>,
|
|
"DynamicHighlight"]], {{}, {}}},
|
|
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
|
|
Axes->{True, True},
|
|
AxesLabel->{None, None},
|
|
AxesOrigin->{0, 0},
|
|
DisplayFunction->Identity,
|
|
Frame->{{False, False}, {False, False}},
|
|
FrameLabel->{{None, None}, {None, None}},
|
|
FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
|
|
GridLines->{None, None},
|
|
GridLinesStyle->Directive[
|
|
GrayLevel[0.5, 0.4]],
|
|
Method->{
|
|
"AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic,
|
|
"DefaultGraphicsInteraction" -> {
|
|
"Version" -> 1.2, "TrackMousePosition" -> {True, False},
|
|
"Effects" -> {
|
|
"Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
|
|
"Droplines" -> {
|
|
"freeformCursorMode" -> True,
|
|
"placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" ->
|
|
AbsolutePointSize[6], "DefaultPlotStyle" -> {
|
|
Directive[
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.880722, 0.611041, 0.142051],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.560181, 0.691569, 0.194885],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.922526, 0.385626, 0.209179],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.528488, 0.470624, 0.701351],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.772079, 0.431554, 0.102387],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.363898, 0.618501, 0.782349],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[1, 0.75, 0],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.647624, 0.37816, 0.614037],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.571589, 0.586483, 0.],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.915, 0.3325, 0.2125],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.40082222609352647`, 0.5220066643438841, 0.85],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.9728288904374106, 0.621644452187053, 0.07336199581899142],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.736782672705901, 0.358, 0.5030266573755369],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.28026441037696703`, 0.715, 0.4292089322474965],
|
|
AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02],
|
|
"PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05],
|
|
"OptimizePlotMarkers" -> True, "IncludeHighlighting" -> "CurrentPoint",
|
|
"HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True,
|
|
"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& )}},
|
|
PlotRange->{{0, 52.}, {0, 0.120683}},
|
|
PlotRangeClipping->True,
|
|
PlotRangePadding->{{
|
|
Scaled[0.02],
|
|
Scaled[0.02]}, {
|
|
Scaled[0.02],
|
|
Scaled[0.05]}},
|
|
Ticks->{Automatic, Automatic}]], "Output",
|
|
CellChangeTimes->{3.9917148467316074`*^9},
|
|
CellLabel->
|
|
"Out[529]=",ExpressionUUID->"d1a933a5-9ae5-3c4e-953d-5f1d02c204a8"]
|
|
}, Open ]],
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"Show", "[",
|
|
RowBox[{"x", ",", "xx"}], "]"}]], "Input",
|
|
CellChangeTimes->{{3.991714856368782*^9, 3.9917149167980614`*^9}, {
|
|
3.991795329890896*^9,
|
|
3.99179533223897*^9}},ExpressionUUID->"e431227d-0e31-a446-ad0d-\
|
|
76902a9a3bd8"],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"L", "=",
|
|
FractionBox[
|
|
SqrtBox[
|
|
RowBox[{"Cw", "*", "\[Pi]"}]], "2"]}]], "Input",
|
|
CellChangeTimes->{
|
|
3.991846110594208*^9},ExpressionUUID->"4e5b3330-e10a-4342-8f3d-\
|
|
b24f9b16b9de"],
|
|
|
|
Cell[BoxData["9.33220071900516`"], "Output",
|
|
CellChangeTimes->{3.991334803166374*^9},
|
|
CellLabel->
|
|
"Out[254]=",ExpressionUUID->"1560efbb-94f0-5144-9b19-9d176fc4dd8d"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"L", "=",
|
|
RowBox[{"Plot", "[",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
FractionBox[
|
|
RowBox[{"4", "x", "*", "y", "*", "\[Pi]", "*",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
UnderoverscriptBox["\[Sum]",
|
|
RowBox[{"n", "=", "0"}], "100"],
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
RowBox[{"2",
|
|
RowBox[{"(",
|
|
FractionBox["h2", "Cb"], ")"}], "*", "x", "*", "y"}], "2"],
|
|
")"}],
|
|
RowBox[{"2", "*", "n"}]], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox["1",
|
|
RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}],
|
|
")"}]}],
|
|
RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(", "x", ")"}], "2"], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
RowBox[{"y", "*", "y"}], "1"]}],
|
|
RowBox[{"(",
|
|
FractionBox["1", "Cb"], ")"}]}]],
|
|
RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}], "//", "N"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input",
|
|
CellChangeTimes->{
|
|
3.991846112020672*^9},ExpressionUUID->"bb5f3a72-8528-7a48-a67a-\
|
|
a23038fc5b71"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"8.015132160320536`*^-259\\\", \
|
|
\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \
|
|
to represent as a normalized machine number; precision may be lost.\"", 2,
|
|
255, 233, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.99133480336051*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[255]:=",ExpressionUUID->"aec1bc78-c42d-654b-9d44-6cd3626266ac"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"3.802481548114291`*^-269\\\", \
|
|
\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \
|
|
small to represent as a normalized machine number; precision may be lost.\"",
|
|
2, 255, 234, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991334803369583*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[255]:=",ExpressionUUID->"f1a8642b-581b-a442-a1d9-50687b910475"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"1.803946040382125`*^-279\\\", \
|
|
\\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \
|
|
small to represent as a normalized machine number; precision may be lost.\"",
|
|
2, 255, 235, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991334803378134*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[255]:=",ExpressionUUID->"5a841663-4049-3b42-9c28-d33b4ccb324b"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "stop",
|
|
"\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \
|
|
\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
|
|
during this calculation.\"", 2, 255, 236, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991334803386196*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[255]:=",ExpressionUUID->"002a296e-87c0-e748-91ba-edf75724ad49"],
|
|
|
|
Cell[BoxData[
|
|
GraphicsBox[
|
|
InterpretationBox[{
|
|
TagBox[{{{}, {},
|
|
TagBox[
|
|
{RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2],
|
|
Opacity[1.], LineBox[CompressedData["
|
|
1:eJwV13k0VW8XB3BRKTLPl3vNksxycd1rb0QuMmasTKVBpjIUKlIUSkglFElK
|
|
ynRPyVAJlQaROVJIfo00mJLynvevsz5rnbPWeZ699/c8RzEgzCWQm4uLa/cS
|
|
Lq7/X2fePm1RSSs2cy3zqGm/s8Gs+5J0jHl/IrxRnBFqa1QFlGgPkO7PgrO9
|
|
ET65jYYQ7XSjj6e/CPYLMHKiGq1AZEIq63dfNejYVMUbNrrBuwaHsKm+JrhN
|
|
7SzyeRAI1iqfh370dcLsUKaZdEMU/O4zOvu9bxTkm+lTAhVJ0Gx5rfhV0S9I
|
|
q02Q9NpyDuTe1Y4HaP6FL0Gq9boehSAe7HuD15IHHwnX0OQpVyFLz7rewW0F
|
|
Vr2t4FD6SuF1jm7jD2EBrNGLQ9entyC3q0woWlUAG69G2Lu+vgXegqt9500E
|
|
8C5zIZP96Ra8OUr9x71NAM1uF9dKryyH4VA+pvhtAew91sZvblMOH9eP1dC9
|
|
BNF7/YjTnZZymPt+viLushD+WVmuLHOnAtKK49u5ZUTweGj53GJDJdiu2y0q
|
|
oSyCPYcZnAvNlbCixcVttZYIbo+ScdJ+VgnH3qsO2pmLoDK1da1NXyUcVHox
|
|
nr1bBE/sN7cx+1EJoYXS/9TqRPDqsm8rDFSqwDm/StNusyiW7rvwnJ5cBcKa
|
|
eWFbA0Xxp15+psbJKnhZf6w6LEwUKaevSMpkVYHtoIdx9lFRXOW/1Hv8YhVY
|
|
UP5ZDpWJolbJoZvmt6tgXY7t5rAFUfz33rFhfrQKpLLfp5y5KIau+n2T4Yxq
|
|
kF57+9hciRjet3+o5AfVQGlKjt9aKYbMew9v2a6vBtr3NVGrm8XQN5TvmYhD
|
|
Najah/vVfxTDMRNbwV3+1WCw9C/9vYE47moN9Ft3vBocIyXH9J+JI7dy2C52
|
|
ezU48X98e75LHHmaXdqKuqrBpaj29cIbcTxH0zg8S/aNe8eW9seT4phRUNWU
|
|
NVwNWzWv1HlLSODpp4c7Mn5Uw54xncxEPwlkJhp33BDlwPFNbLPOGQlsnBja
|
|
6ObMAQrxksK9RBK1d/7s2uXGgXKxTbN6/JLYZCjUFu3Fgd5On8pMeUmcHXKS
|
|
TvTngIpzpJKzjSSmSguJue/lQNPGguUdFyTxD/Gi6NdpDvy1nn7ZxpTCvxKr
|
|
/i57yoGMktiyv9ZSKHuJWLXrBfn8cq4TWs5SeDXs0ZmWdg7YP+IzPxUohQqm
|
|
7itDejmQa6nAsU+XQtF7zLy49xwwRrvzz99J4cHiUzdOL3AgwuSy79NEaXyc
|
|
F3vwnAYBtoWCU3YnpTGqay6bokWAEu/BEy/PSmPxne3/XdAhoKPbvarrujR+
|
|
tONipq4jQDt8Fc/bl9Io/Oh4tZ4ZAR9L9pf8pMjgqb/P7POdCHgg8IERpSKD
|
|
2rnrLbtdCDgX6dI+qyWDqYs7D/K6EWBloTW3gDLIf02m1teLgKKhUTbvThmM
|
|
fZ4S0udPwBZxh2+yHBkcYge5ju0lwCCu/silBhkc+DjX2BFBAN+ouqTiYxk8
|
|
dLU67m4UAbUVPKD2WgY3pR0bjIkhQNKuNkN3UQZ5kwW8WhLI9z+iss7KjoKz
|
|
0SVTB9IJuPYxs/XJJgoWCXqkUzIIOOy4uMXWh4JDnsFHajIJ0KIOJDnupaCj
|
|
g+D+99kEpN493ed1noIJ10/V8OQRsH5yPjb0PXk/8WrjjhICYmyyNR5+pWB6
|
|
+SvNmmsElF/WGhCboeDFpG+FPKUESG/yM6ldIYuBz3/ZnS4j4OvdR7M82rLI
|
|
lfH50d5KAhRFfa+5G8li2EjojoIqAtz3zLmXoiyOhK690lpNQCN17R0HV1nk
|
|
t5+dErhNwJnEjMgLB0h3vBLbXktA6+Aala9HZFHp2LLK0DoCFtY1d5mlyeIi
|
|
88tkZD0BO/6b1h+7KIv+C8U+kfcIYNhv/qHdLItWyC8GDwkYlVALbRGQQysH
|
|
sTtLWwmQCntAlZKSQ6Pbt3iekbZv9WzbrSCHkZ//LU17SsCd2DRNIQM5DLs9
|
|
q8b1nNyfd98/e3nKoYDmt2U1bWT9jVNzb/rLYX/9W0HvlwRMZSrbLgbJ4e4E
|
|
we450j7r3UuLD8lhtkzy+TUdBOiX1u+cLJJDjYpyRc9OAnZyu0lZ3JTDojP+
|
|
a1+Tzt888Tj7thxeZ+vOu3URsFxQUY3RKodV6qVfLLoJMN1Z13PylRy25eQK
|
|
c0iHN7omvRuQw5Yd9EVaDwED+5LHjn2Tw0fL+Mw+kxZ6IZ/dNyOHkylnMti9
|
|
ZD1Vay01uKjo2BFUVUy6vO9LUbsoFacYRIBDHwHvdZNclOSomOubOJ1PWjqV
|
|
xh2lSt5v5b75P9JHmM7+FGMqKm7uKQ7rJ8DG59JPIwsqftXsyK8mLZjw5aib
|
|
PRUvBstXfifdc9lYIsKdip+yHYfXvCbX15xUkuFHxZVDE9o+pLd96DQqD6Ki
|
|
mdGpi6dIa/AqPH0eSUUPxwatu6R/qId4fzpMRc0UoZEh0ndt674sT6Gi7qJs
|
|
7T/S8cG8h1TOUPFLwoEaygAB1umbBC0uUjEp896QHmmByssFvteoaLQjSWs9
|
|
6e5XE7qHqqj4bmzPdWfSeb9Mm3LrqRhTJOjkTTpAIsX17iMq5o+sUvMhvcao
|
|
d6ynnYoLGbyaW0l/91SO/vWaXC/78jYP0jWx4bwiY1Rsdzj80p704fx7OdoT
|
|
VLyVsj6URdrqPp+G/RwVs1Pz1q8hvWrYo343Nw3VkjVdhUl3Lblqf3wVDYU3
|
|
FeX9JNeTq/xzqFiShsdDSuU7SPtZQViTAg3rvkwOXye9eudJrmENGjonq44c
|
|
JD1x4nXm33U0/JH5R9GeNHFDTVkWaJj/T+WqJOm4FxGEMZuGTHf34DdkPSwm
|
|
Gq3cXWkoVW8Vc5H0SmHBvoitNGSN32jzIt2ht3lX5k4arlSDPSKkfaKmU1/E
|
|
0VD238iJfWT9Vc9byH1OomG20J5Vcn3/n+/Tt3gzaLioIj3cSPZT7MKaDoti
|
|
Gn4NGTu8QPafOW2/v185DbmOp248Q3oFtvw8dJeGK4IDIlRJnz3qI1H7gobX
|
|
8PFzU7Kft1wtK+ntpWGI04cljWT/Kz2ZM5oapuGe3eRhhXQl3xlvnWlyPekp
|
|
I7rkvLzIfFJwlSqPOqIcgzftZF5wxPWaV8ujiM3m06akvXv8m4b15LG9Y9Lj
|
|
HDmPH6UXxmSt5fHcB0sjM3J+eQp1NbJC5XG7HifA4xkBzx4eqq84II85/S+9
|
|
ssj5z3j/zL4tUR57Ga0vWsl8oK0ODFtxXh5Pvv5PS/0JmS/lF4jDD+TRU1Ff
|
|
tKqZnK++l38nWuVR4sPjvr4mAhy4lm7w7ZTHHfzz9fNk/mxzCX0NH+Qx8Ujy
|
|
+LpGsl/jFOMTlimgk/bh77EN5DzLz1wxX6uAHFYgy5EgYJqT0fpbh/SlxjJj
|
|
Drm/Nmu/Va1TwNJL3i40Mi+T9vrRlcwUsLWl2+FtBdk/zc9auZ0VcKrmrb4e
|
|
mb8tOwu+NUcrIGWTOUXlMgHsBRPRg3EKqHa0rPNVAQEvM7rp6xIUMN7701Dc
|
|
JQJe165MKE5RQNn54l8tZP5P8EeKJuUrIO+TCru158g8qLQxsm5SQMPOY1q2
|
|
qQQEz/1IaBVQRL4nQe/ehJH7sXeH5LioIsoNyCn+DCHr/XmgjEdaEbX+Fbjw
|
|
BBNwdbC510xJESsnmOkyuwh4e/+s5m26It6fWXJdwo8AxyST/su+iohK+4Mc
|
|
HMm8FD2iE1eliLNmoYmd5PebK226JeeOIt5uusAKUiffnyfI+069IrYYHDb4
|
|
p0rAnmmXpB+PFDFr9crXFEUCivtVBncOKGLb3miH1VLk97KgNXkTjxIqXLix
|
|
mM5NwO+1wm+13JTQMdcj5QZ5npi5SDli4K2EbO3LdYNdHJgSUlUx8VXCkZcD
|
|
2StfcWDil0nQ+t1KOBR1bOPm5xwYrd82431ICXkGc0X6HnDgmV2N4ImrSlj8
|
|
o21a7zp5PtnjA6PTSviAzdOeFM0BZtnNwnPnlFEyz4aiyceBQYWyAqs8ZXyV
|
|
YfanbzkHYs+VXpoqUMYjA7MxR3g4UHOkJN+lVBkHXfM92xaqQd+zMEewQRld
|
|
Ovg6bSarYc2y7IzkEWV8/l9LeAd53pP0jUuI1lTBARsRpm5eNfwQtfVzb1LB
|
|
T9+ZUpeVq2HspJ/7Pl41fP7p64pk3ipgT+5nf6CvxoGSe9rP2irg67YVEUS8
|
|
OiZZXt8caXqL/J+Q4j7etAbLliiN/ii+AaJtaumVkxrIbbJvL4VxHeROVDjR
|
|
6ZqorBcYqHntKuSsNREW26mF9x4IrtZzuwLPKOaGvzK1MeV3tCdb4zIw5Joy
|
|
dHp1cEhyavTu54sgyFMU6Z+oiy92iAQHUHKBdkSe6aWmh/dcl2cpuJ6Dlapb
|
|
7rg80cOZIcNNkgtZoM2Sqdi/VR+Xd5hHvdLPgH1vRZttuQww+U6l5wGBNJj8
|
|
ddKNnWOAFWF1L/ZXJsMGnce5bK11KBBQwZafSYT7v0z/zL5ch9fxRN/N2cMQ
|
|
qqk/8CrQEHWbhHDDvhiImqXM++4yxJpGgst8SwwcbOKhTAQZ4kScZZytdQyk
|
|
efZ48YUb4jhbOf4kJQauHzvw2iLWELl15T89bz4Ao2/u93PSDZGx6VaCnswB
|
|
cD9l13e2xhDjN0eV+rdHA2tie7fXSjp+3LjU/NrOSJCs31DUwE/HvZ3XVFLc
|
|
I2HiuEa4vCAdnV3aRfdbRcIlxe/8H0TpmM/PPxOtHAn/NsVZhsvRMUFCUHP5
|
|
cAQ8qM+sTtaho/U2hbktmyPAPOV+BseNjr9Nal0feu8DKxXpjQJFdPRvTG0T
|
|
jQsH4tsjxe3FdKysW1QQCgkHlZqImboSOho6DGVL+IbDUtv2gl1ldIznrXmC
|
|
luHQFJb8s5mgY3Z36AOhVeFgVj91PvYJHd2uKzlKQhjQXV6N/veVji06khuv
|
|
5IWAekLqgSYjIxxbG/Bo+GQQNJheXWbPMMJIK73JvIggcJp9kNXDNMJ56weP
|
|
9ngHwYHQ6ZsfzY2Q82vberZ6ELRu8RsRtDdCD/03UvMtu2GXCd12s58RZly4
|
|
ULKaezeU/hyRnTphhNflLJ95pO0EjUCTB6oDRqi+JaXcunc7nFZymD/6xggV
|
|
Vm0+qtq8HabeBRiOvjXCVcJG+WKV2+G+98myS++NsJm9KoKauh1cnN6dl/pm
|
|
hB2tP4vHzbZDjGlS+EouY9zw39Zi67Jt0CrySvGbqjGqfDmjM58eAIH3dx0j
|
|
9hrjmjAdYdUEP5gI+UyWyRj3VG0bZ4b5wQFq8J7eaGMU042e3ObjB6kHw1zm
|
|
4owxM/9YyDumH1QyohWYycY4UmTWLDHtCwt3jjY05xrjFonRBdcfPpBVcWmq
|
|
s9kYx49cz49Z3AIPCru3/5AwwdDLOTefhnjBsL2ib7S0CXYNOvXscPUCrt8h
|
|
Xn8oJpjE186QM/ECC2deh2UKJrixcnBv+1IveLyEYSSjYYKnjxamul30hBcB
|
|
BSvNzUwweNpic0enBwyoBJVn7DDBpwGbNLkd3WHq+uKsTo0JDlgXTB074Qrj
|
|
7taFKbUm6DFZUcUf5Qr9S0/ZvK83wS+WEg+v+LtCvR/lwrlGE4zNu1LEa+oK
|
|
idKGjL9PTfAxpXPpxQkXED4RdPDZGxOUt839+9PTBTR39nAFcjNwZlkB1y8T
|
|
Z6BJyJXeX8pA1+RV1mnqziDcHOAszcvADvsRtoGUM/yifb/8nJ+BeoTaluop
|
|
J6jr5bPUl2BgxL1Yzz2VTmBjjUmLqxk4XR+sf1/DCbaplq3M3cjA8izjd2vc
|
|
HCD2kU+QmhMDAyaOy8QbOEBGoOjzahcG8qjqjk2LOEDD1ZiTzz0Y6HegoGZD
|
|
+0YQV7MR+uvPQC/XanqM3UZ4rPZB3C+agZ3+V1/Ns+1BQ11eQa2AgRWh3w3v
|
|
+NgCtnYmVF9mYC1zwJDX3BbcdyWPmBUzkHsy1yVa2RaOXv9W5FHKQO0Svpjy
|
|
j2x4o96gmsJhoPfPxNyjkWxIX+O19usTBj4xctx3I9MGfmicoVd/Z+BE96iR
|
|
8Yg19L9AK7FfDPy2MC3d22oNjaETrpHTDOTLEj+QVmkN6dXsvfR5BopzPfRn
|
|
JliDBoPrZh2PKYpMdd4nFKwhgB2i2CxpiolJt29MBFpB984Nq7qZpth3Xo/N
|
|
vWQ91K+cphiCKTbpqjYHfbGEorKiNefMTbEicYPPxx5LCJ/8a+1pbYrcCl0V
|
|
SmWWILCfOPLG0RRrqoZaM90twTpZcXYswBRDiywtbKss4G7xn5HpE6YY8Oe3
|
|
640oc6BbRs7appni4XHeu1MB5nB75OuqwlOmeGj5sJuzkzlU094a2WaZogLP
|
|
GS7zteZwM6fx1KU8U9Qufu87N4JQeDLJZEO5Ke7vb+6vdUFIiRTKzOkyxfSC
|
|
DTPMRDNYIXai5FuPKWqp2/mq+ptBchVXg0U/+fxn/nhtNINjEz/Gv74xxZhz
|
|
ZeFF/1hweFc303zcFAeW63ILHmLBvi0XPn6aM8WodXcdB+OZ4L1eGU1pTKz4
|
|
XGaZns+Av90rBJsVmEhlFnYOHWRAYeDEoK0yE0/zvRx03MqA8eTa/d7qTDz0
|
|
9FtfLo0B+546VsToM1GIXT/QWmQCqQ4HaXetmWgWGX9oV5Ux1Hn2LKwLY2Jt
|
|
voVm3zgdtn6qe9awl4lDc8wzRs/pwBVbmLM+kok0HuH4OxV0sM7bs25TDBNX
|
|
rLAMEYqhQ+fQkuCIo0xMV/T11xCgw+cA7cGq80wcnnH/8JlhCLIhx2u1G5l4
|
|
bUsvq63MANIXdximNTEx6eb6fX5nDYA7y7rqvxYmPrItkOePN4DPd5aVFj5l
|
|
Yoyt46kSFwOo4zqWI9rFRL2xUedf8/rgnZ2wf+YDE/8uHyx65agPOfUxhvf5
|
|
WdihOTEvwKcHqxy8qiiCLNQtM+DfOaMLCcPGWvuFWWgZfW6me1QXdi2bU9GV
|
|
YKEJdZPQZL0uGDlGixfRWJi85IICJUwXekf3/UrSY+G5HHZwVLUOSPAFV230
|
|
YOFlgZUi5ge0oNjyUOx3Lxa+UaDqjzprgf6hdMszW1gosXVwe9VaLXD4XtnT
|
|
78/CoT8bjV+/04Tk3unf24JZGHHiuw7bVhPmiuItYo+wcOJ404P41WthwPRM
|
|
V0kZaS1m2p8la2BXVHE+u5yFt+497loyog4z5bcDv1ayMO/CNTvdRnUQVeqf
|
|
1bvDwi92WdLL4tXBbgVV7l4jC89zHL1T/q2Ghu6S7V09LOS6kFfYu3Q12Are
|
|
1YruZ6GmTEWc3bga9G94OiM9yMKPL8/2fHiiBlN1X074DLMQ7T19U9PUQOuy
|
|
7q1Pn1lo9eCNVbq4GjQMmEef/MbCe1oXMjVmVcFW3BV0vrPQ0FhP7MtrVdhx
|
|
POpV5DQLl1vskewvUIWpxuRcqTmyHuJlG5YeVYXE+fPb6uZZuPrbEsFNO1RB
|
|
eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe
|
|
"]]},
|
|
Annotation[#, "Charting`Private`Tag#1"]& ]}, {}},
|
|
{"WolframDynamicHighlight", <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}],
|
|
StyleBox[
|
|
DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {},
|
|
Slot["HighlightElements"],
|
|
Slot["LayoutOptions"],
|
|
Slot["Meta"],
|
|
Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {},
|
|
Annotation[{
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]],
|
|
Line[CompressedData["
|
|
1:eJwV13k0VW8XB3BRKTLPl3vNksxycd1rb0QuMmasTKVBpjIUKlIUSkglFElK
|
|
ynRPyVAJlQaROVJIfo00mJLynvevsz5rnbPWeZ699/c8RzEgzCWQm4uLa/cS
|
|
Lq7/X2fePm1RSSs2cy3zqGm/s8Gs+5J0jHl/IrxRnBFqa1QFlGgPkO7PgrO9
|
|
ET65jYYQ7XSjj6e/CPYLMHKiGq1AZEIq63dfNejYVMUbNrrBuwaHsKm+JrhN
|
|
7SzyeRAI1iqfh370dcLsUKaZdEMU/O4zOvu9bxTkm+lTAhVJ0Gx5rfhV0S9I
|
|
q02Q9NpyDuTe1Y4HaP6FL0Gq9boehSAe7HuD15IHHwnX0OQpVyFLz7rewW0F
|
|
Vr2t4FD6SuF1jm7jD2EBrNGLQ9entyC3q0woWlUAG69G2Lu+vgXegqt9500E
|
|
8C5zIZP96Ra8OUr9x71NAM1uF9dKryyH4VA+pvhtAew91sZvblMOH9eP1dC9
|
|
BNF7/YjTnZZymPt+viLushD+WVmuLHOnAtKK49u5ZUTweGj53GJDJdiu2y0q
|
|
oSyCPYcZnAvNlbCixcVttZYIbo+ScdJ+VgnH3qsO2pmLoDK1da1NXyUcVHox
|
|
nr1bBE/sN7cx+1EJoYXS/9TqRPDqsm8rDFSqwDm/StNusyiW7rvwnJ5cBcKa
|
|
eWFbA0Xxp15+psbJKnhZf6w6LEwUKaevSMpkVYHtoIdx9lFRXOW/1Hv8YhVY
|
|
UP5ZDpWJolbJoZvmt6tgXY7t5rAFUfz33rFhfrQKpLLfp5y5KIau+n2T4Yxq
|
|
kF57+9hciRjet3+o5AfVQGlKjt9aKYbMew9v2a6vBtr3NVGrm8XQN5TvmYhD
|
|
Najah/vVfxTDMRNbwV3+1WCw9C/9vYE47moN9Ft3vBocIyXH9J+JI7dy2C52
|
|
ezU48X98e75LHHmaXdqKuqrBpaj29cIbcTxH0zg8S/aNe8eW9seT4phRUNWU
|
|
NVwNWzWv1HlLSODpp4c7Mn5Uw54xncxEPwlkJhp33BDlwPFNbLPOGQlsnBja
|
|
6ObMAQrxksK9RBK1d/7s2uXGgXKxTbN6/JLYZCjUFu3Fgd5On8pMeUmcHXKS
|
|
TvTngIpzpJKzjSSmSguJue/lQNPGguUdFyTxD/Gi6NdpDvy1nn7ZxpTCvxKr
|
|
/i57yoGMktiyv9ZSKHuJWLXrBfn8cq4TWs5SeDXs0ZmWdg7YP+IzPxUohQqm
|
|
7itDejmQa6nAsU+XQtF7zLy49xwwRrvzz99J4cHiUzdOL3AgwuSy79NEaXyc
|
|
F3vwnAYBtoWCU3YnpTGqay6bokWAEu/BEy/PSmPxne3/XdAhoKPbvarrujR+
|
|
tONipq4jQDt8Fc/bl9Io/Oh4tZ4ZAR9L9pf8pMjgqb/P7POdCHgg8IERpSKD
|
|
2rnrLbtdCDgX6dI+qyWDqYs7D/K6EWBloTW3gDLIf02m1teLgKKhUTbvThmM
|
|
fZ4S0udPwBZxh2+yHBkcYge5ju0lwCCu/silBhkc+DjX2BFBAN+ouqTiYxk8
|
|
dLU67m4UAbUVPKD2WgY3pR0bjIkhQNKuNkN3UQZ5kwW8WhLI9z+iss7KjoKz
|
|
0SVTB9IJuPYxs/XJJgoWCXqkUzIIOOy4uMXWh4JDnsFHajIJ0KIOJDnupaCj
|
|
g+D+99kEpN493ed1noIJ10/V8OQRsH5yPjb0PXk/8WrjjhICYmyyNR5+pWB6
|
|
+SvNmmsElF/WGhCboeDFpG+FPKUESG/yM6ldIYuBz3/ZnS4j4OvdR7M82rLI
|
|
lfH50d5KAhRFfa+5G8li2EjojoIqAtz3zLmXoiyOhK690lpNQCN17R0HV1nk
|
|
t5+dErhNwJnEjMgLB0h3vBLbXktA6+Aala9HZFHp2LLK0DoCFtY1d5mlyeIi
|
|
88tkZD0BO/6b1h+7KIv+C8U+kfcIYNhv/qHdLItWyC8GDwkYlVALbRGQQysH
|
|
sTtLWwmQCntAlZKSQ6Pbt3iekbZv9WzbrSCHkZ//LU17SsCd2DRNIQM5DLs9
|
|
q8b1nNyfd98/e3nKoYDmt2U1bWT9jVNzb/rLYX/9W0HvlwRMZSrbLgbJ4e4E
|
|
we450j7r3UuLD8lhtkzy+TUdBOiX1u+cLJJDjYpyRc9OAnZyu0lZ3JTDojP+
|
|
a1+Tzt888Tj7thxeZ+vOu3URsFxQUY3RKodV6qVfLLoJMN1Z13PylRy25eQK
|
|
c0iHN7omvRuQw5Yd9EVaDwED+5LHjn2Tw0fL+Mw+kxZ6IZ/dNyOHkylnMti9
|
|
ZD1Vay01uKjo2BFUVUy6vO9LUbsoFacYRIBDHwHvdZNclOSomOubOJ1PWjqV
|
|
xh2lSt5v5b75P9JHmM7+FGMqKm7uKQ7rJ8DG59JPIwsqftXsyK8mLZjw5aib
|
|
PRUvBstXfifdc9lYIsKdip+yHYfXvCbX15xUkuFHxZVDE9o+pLd96DQqD6Ki
|
|
mdGpi6dIa/AqPH0eSUUPxwatu6R/qId4fzpMRc0UoZEh0ndt674sT6Gi7qJs
|
|
7T/S8cG8h1TOUPFLwoEaygAB1umbBC0uUjEp896QHmmByssFvteoaLQjSWs9
|
|
6e5XE7qHqqj4bmzPdWfSeb9Mm3LrqRhTJOjkTTpAIsX17iMq5o+sUvMhvcao
|
|
d6ynnYoLGbyaW0l/91SO/vWaXC/78jYP0jWx4bwiY1Rsdzj80p704fx7OdoT
|
|
VLyVsj6URdrqPp+G/RwVs1Pz1q8hvWrYo343Nw3VkjVdhUl3Lblqf3wVDYU3
|
|
FeX9JNeTq/xzqFiShsdDSuU7SPtZQViTAg3rvkwOXye9eudJrmENGjonq44c
|
|
JD1x4nXm33U0/JH5R9GeNHFDTVkWaJj/T+WqJOm4FxGEMZuGTHf34DdkPSwm
|
|
Gq3cXWkoVW8Vc5H0SmHBvoitNGSN32jzIt2ht3lX5k4arlSDPSKkfaKmU1/E
|
|
0VD238iJfWT9Vc9byH1OomG20J5Vcn3/n+/Tt3gzaLioIj3cSPZT7MKaDoti
|
|
Gn4NGTu8QPafOW2/v185DbmOp248Q3oFtvw8dJeGK4IDIlRJnz3qI1H7gobX
|
|
8PFzU7Kft1wtK+ntpWGI04cljWT/Kz2ZM5oapuGe3eRhhXQl3xlvnWlyPekp
|
|
I7rkvLzIfFJwlSqPOqIcgzftZF5wxPWaV8ujiM3m06akvXv8m4b15LG9Y9Lj
|
|
HDmPH6UXxmSt5fHcB0sjM3J+eQp1NbJC5XG7HifA4xkBzx4eqq84II85/S+9
|
|
ssj5z3j/zL4tUR57Ga0vWsl8oK0ODFtxXh5Pvv5PS/0JmS/lF4jDD+TRU1Ff
|
|
tKqZnK++l38nWuVR4sPjvr4mAhy4lm7w7ZTHHfzz9fNk/mxzCX0NH+Qx8Ujy
|
|
+LpGsl/jFOMTlimgk/bh77EN5DzLz1wxX6uAHFYgy5EgYJqT0fpbh/SlxjJj
|
|
Drm/Nmu/Va1TwNJL3i40Mi+T9vrRlcwUsLWl2+FtBdk/zc9auZ0VcKrmrb4e
|
|
mb8tOwu+NUcrIGWTOUXlMgHsBRPRg3EKqHa0rPNVAQEvM7rp6xIUMN7701Dc
|
|
JQJe165MKE5RQNn54l8tZP5P8EeKJuUrIO+TCru158g8qLQxsm5SQMPOY1q2
|
|
qQQEz/1IaBVQRL4nQe/ehJH7sXeH5LioIsoNyCn+DCHr/XmgjEdaEbX+Fbjw
|
|
BBNwdbC510xJESsnmOkyuwh4e/+s5m26It6fWXJdwo8AxyST/su+iohK+4Mc
|
|
HMm8FD2iE1eliLNmoYmd5PebK226JeeOIt5uusAKUiffnyfI+069IrYYHDb4
|
|
p0rAnmmXpB+PFDFr9crXFEUCivtVBncOKGLb3miH1VLk97KgNXkTjxIqXLix
|
|
mM5NwO+1wm+13JTQMdcj5QZ5npi5SDli4K2EbO3LdYNdHJgSUlUx8VXCkZcD
|
|
2StfcWDil0nQ+t1KOBR1bOPm5xwYrd82431ICXkGc0X6HnDgmV2N4ImrSlj8
|
|
o21a7zp5PtnjA6PTSviAzdOeFM0BZtnNwnPnlFEyz4aiyceBQYWyAqs8ZXyV
|
|
YfanbzkHYs+VXpoqUMYjA7MxR3g4UHOkJN+lVBkHXfM92xaqQd+zMEewQRld
|
|
Ovg6bSarYc2y7IzkEWV8/l9LeAd53pP0jUuI1lTBARsRpm5eNfwQtfVzb1LB
|
|
T9+ZUpeVq2HspJ/7Pl41fP7p64pk3ipgT+5nf6CvxoGSe9rP2irg67YVEUS8
|
|
OiZZXt8caXqL/J+Q4j7etAbLliiN/ii+AaJtaumVkxrIbbJvL4VxHeROVDjR
|
|
6ZqorBcYqHntKuSsNREW26mF9x4IrtZzuwLPKOaGvzK1MeV3tCdb4zIw5Joy
|
|
dHp1cEhyavTu54sgyFMU6Z+oiy92iAQHUHKBdkSe6aWmh/dcl2cpuJ6Dlapb
|
|
7rg80cOZIcNNkgtZoM2Sqdi/VR+Xd5hHvdLPgH1vRZttuQww+U6l5wGBNJj8
|
|
ddKNnWOAFWF1L/ZXJsMGnce5bK11KBBQwZafSYT7v0z/zL5ch9fxRN/N2cMQ
|
|
qqk/8CrQEHWbhHDDvhiImqXM++4yxJpGgst8SwwcbOKhTAQZ4kScZZytdQyk
|
|
efZ48YUb4jhbOf4kJQauHzvw2iLWELl15T89bz4Ao2/u93PSDZGx6VaCnswB
|
|
cD9l13e2xhDjN0eV+rdHA2tie7fXSjp+3LjU/NrOSJCs31DUwE/HvZ3XVFLc
|
|
I2HiuEa4vCAdnV3aRfdbRcIlxe/8H0TpmM/PPxOtHAn/NsVZhsvRMUFCUHP5
|
|
cAQ8qM+sTtaho/U2hbktmyPAPOV+BseNjr9Nal0feu8DKxXpjQJFdPRvTG0T
|
|
jQsH4tsjxe3FdKysW1QQCgkHlZqImboSOho6DGVL+IbDUtv2gl1ldIznrXmC
|
|
luHQFJb8s5mgY3Z36AOhVeFgVj91PvYJHd2uKzlKQhjQXV6N/veVji06khuv
|
|
5IWAekLqgSYjIxxbG/Bo+GQQNJheXWbPMMJIK73JvIggcJp9kNXDNMJ56weP
|
|
9ngHwYHQ6ZsfzY2Q82vberZ6ELRu8RsRtDdCD/03UvMtu2GXCd12s58RZly4
|
|
ULKaezeU/hyRnTphhNflLJ95pO0EjUCTB6oDRqi+JaXcunc7nFZymD/6xggV
|
|
Vm0+qtq8HabeBRiOvjXCVcJG+WKV2+G+98myS++NsJm9KoKauh1cnN6dl/pm
|
|
hB2tP4vHzbZDjGlS+EouY9zw39Zi67Jt0CrySvGbqjGqfDmjM58eAIH3dx0j
|
|
9hrjmjAdYdUEP5gI+UyWyRj3VG0bZ4b5wQFq8J7eaGMU042e3ObjB6kHw1zm
|
|
4owxM/9YyDumH1QyohWYycY4UmTWLDHtCwt3jjY05xrjFonRBdcfPpBVcWmq
|
|
s9kYx49cz49Z3AIPCru3/5AwwdDLOTefhnjBsL2ib7S0CXYNOvXscPUCrt8h
|
|
Xn8oJpjE186QM/ECC2deh2UKJrixcnBv+1IveLyEYSSjYYKnjxamul30hBcB
|
|
BSvNzUwweNpic0enBwyoBJVn7DDBpwGbNLkd3WHq+uKsTo0JDlgXTB074Qrj
|
|
7taFKbUm6DFZUcUf5Qr9S0/ZvK83wS+WEg+v+LtCvR/lwrlGE4zNu1LEa+oK
|
|
idKGjL9PTfAxpXPpxQkXED4RdPDZGxOUt839+9PTBTR39nAFcjNwZlkB1y8T
|
|
Z6BJyJXeX8pA1+RV1mnqziDcHOAszcvADvsRtoGUM/yifb/8nJ+BeoTaluop
|
|
J6jr5bPUl2BgxL1Yzz2VTmBjjUmLqxk4XR+sf1/DCbaplq3M3cjA8izjd2vc
|
|
HCD2kU+QmhMDAyaOy8QbOEBGoOjzahcG8qjqjk2LOEDD1ZiTzz0Y6HegoGZD
|
|
+0YQV7MR+uvPQC/XanqM3UZ4rPZB3C+agZ3+V1/Ns+1BQ11eQa2AgRWh3w3v
|
|
+NgCtnYmVF9mYC1zwJDX3BbcdyWPmBUzkHsy1yVa2RaOXv9W5FHKQO0Svpjy
|
|
j2x4o96gmsJhoPfPxNyjkWxIX+O19usTBj4xctx3I9MGfmicoVd/Z+BE96iR
|
|
8Yg19L9AK7FfDPy2MC3d22oNjaETrpHTDOTLEj+QVmkN6dXsvfR5BopzPfRn
|
|
JliDBoPrZh2PKYpMdd4nFKwhgB2i2CxpiolJt29MBFpB984Nq7qZpth3Xo/N
|
|
vWQ91K+cphiCKTbpqjYHfbGEorKiNefMTbEicYPPxx5LCJ/8a+1pbYrcCl0V
|
|
SmWWILCfOPLG0RRrqoZaM90twTpZcXYswBRDiywtbKss4G7xn5HpE6YY8Oe3
|
|
640oc6BbRs7appni4XHeu1MB5nB75OuqwlOmeGj5sJuzkzlU094a2WaZogLP
|
|
GS7zteZwM6fx1KU8U9Qufu87N4JQeDLJZEO5Ke7vb+6vdUFIiRTKzOkyxfSC
|
|
DTPMRDNYIXai5FuPKWqp2/mq+ptBchVXg0U/+fxn/nhtNINjEz/Gv74xxZhz
|
|
ZeFF/1hweFc303zcFAeW63ILHmLBvi0XPn6aM8WodXcdB+OZ4L1eGU1pTKz4
|
|
XGaZns+Av90rBJsVmEhlFnYOHWRAYeDEoK0yE0/zvRx03MqA8eTa/d7qTDz0
|
|
9FtfLo0B+546VsToM1GIXT/QWmQCqQ4HaXetmWgWGX9oV5Ux1Hn2LKwLY2Jt
|
|
voVm3zgdtn6qe9awl4lDc8wzRs/pwBVbmLM+kok0HuH4OxV0sM7bs25TDBNX
|
|
rLAMEYqhQ+fQkuCIo0xMV/T11xCgw+cA7cGq80wcnnH/8JlhCLIhx2u1G5l4
|
|
bUsvq63MANIXdximNTEx6eb6fX5nDYA7y7rqvxYmPrItkOePN4DPd5aVFj5l
|
|
Yoyt46kSFwOo4zqWI9rFRL2xUedf8/rgnZ2wf+YDE/8uHyx65agPOfUxhvf5
|
|
WdihOTEvwKcHqxy8qiiCLNQtM+DfOaMLCcPGWvuFWWgZfW6me1QXdi2bU9GV
|
|
YKEJdZPQZL0uGDlGixfRWJi85IICJUwXekf3/UrSY+G5HHZwVLUOSPAFV230
|
|
YOFlgZUi5ge0oNjyUOx3Lxa+UaDqjzprgf6hdMszW1gosXVwe9VaLXD4XtnT
|
|
78/CoT8bjV+/04Tk3unf24JZGHHiuw7bVhPmiuItYo+wcOJ404P41WthwPRM
|
|
V0kZaS1m2p8la2BXVHE+u5yFt+497loyog4z5bcDv1ayMO/CNTvdRnUQVeqf
|
|
1bvDwi92WdLL4tXBbgVV7l4jC89zHL1T/q2Ghu6S7V09LOS6kFfYu3Q12Are
|
|
1YruZ6GmTEWc3bga9G94OiM9yMKPL8/2fHiiBlN1X074DLMQ7T19U9PUQOuy
|
|
7q1Pn1lo9eCNVbq4GjQMmEef/MbCe1oXMjVmVcFW3BV0vrPQ0FhP7MtrVdhx
|
|
POpV5DQLl1vskewvUIWpxuRcqTmyHuJlG5YeVYXE+fPb6uZZuPrbEsFNO1RB
|
|
eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe
|
|
"]]}, "Charting`Private`Tag#1"]}}, {}}, <|
|
|
"HighlightElements" -> <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>,
|
|
"LayoutOptions" -> <|
|
|
"PanelPlotLayout" -> <||>,
|
|
"PlotRange" -> {{0, 30}, {0., 0.08145702771151381}},
|
|
"Frame" -> {{False, False}, {False, False}},
|
|
"AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio},
|
|
"Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" ->
|
|
GoldenRatio^(-1), "DefaultStyle" -> {
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]]},
|
|
"HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ),
|
|
"ScalingFunctions" -> {{Identity, Identity}, {
|
|
Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" ->
|
|
False|>,
|
|
"Meta" -> <|
|
|
"DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" ->
|
|
Plot, "GroupHighlight" -> False|>|>]]& )[<|
|
|
"HighlightElements" -> <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>,
|
|
"LayoutOptions" -> <|
|
|
"PanelPlotLayout" -> <||>,
|
|
"PlotRange" -> {{0, 30}, {0., 0.08145702771151381}},
|
|
"Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0},
|
|
"ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True},
|
|
"LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1),
|
|
"DefaultStyle" -> {
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]]},
|
|
"HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ),
|
|
"ScalingFunctions" -> {{Identity, Identity}, {
|
|
Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>,
|
|
"Meta" -> <|
|
|
"DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" ->
|
|
Plot, "GroupHighlight" -> False|>|>],
|
|
ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, {
|
|
4.503599627370496*^15, -4.503599627370496*^15}}],
|
|
Selectable->False]},
|
|
Annotation[{{{{}, {},
|
|
Annotation[{
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]],
|
|
Line[CompressedData["
|
|
1:eJwV13k0VW8XB3BRKTLPl3vNksxycd1rb0QuMmasTKVBpjIUKlIUSkglFElK
|
|
ynRPyVAJlQaROVJIfo00mJLynvevsz5rnbPWeZ699/c8RzEgzCWQm4uLa/cS
|
|
Lq7/X2fePm1RSSs2cy3zqGm/s8Gs+5J0jHl/IrxRnBFqa1QFlGgPkO7PgrO9
|
|
ET65jYYQ7XSjj6e/CPYLMHKiGq1AZEIq63dfNejYVMUbNrrBuwaHsKm+JrhN
|
|
7SzyeRAI1iqfh370dcLsUKaZdEMU/O4zOvu9bxTkm+lTAhVJ0Gx5rfhV0S9I
|
|
q02Q9NpyDuTe1Y4HaP6FL0Gq9boehSAe7HuD15IHHwnX0OQpVyFLz7rewW0F
|
|
Vr2t4FD6SuF1jm7jD2EBrNGLQ9entyC3q0woWlUAG69G2Lu+vgXegqt9500E
|
|
8C5zIZP96Ra8OUr9x71NAM1uF9dKryyH4VA+pvhtAew91sZvblMOH9eP1dC9
|
|
BNF7/YjTnZZymPt+viLushD+WVmuLHOnAtKK49u5ZUTweGj53GJDJdiu2y0q
|
|
oSyCPYcZnAvNlbCixcVttZYIbo+ScdJ+VgnH3qsO2pmLoDK1da1NXyUcVHox
|
|
nr1bBE/sN7cx+1EJoYXS/9TqRPDqsm8rDFSqwDm/StNusyiW7rvwnJ5cBcKa
|
|
eWFbA0Xxp15+psbJKnhZf6w6LEwUKaevSMpkVYHtoIdx9lFRXOW/1Hv8YhVY
|
|
UP5ZDpWJolbJoZvmt6tgXY7t5rAFUfz33rFhfrQKpLLfp5y5KIau+n2T4Yxq
|
|
kF57+9hciRjet3+o5AfVQGlKjt9aKYbMew9v2a6vBtr3NVGrm8XQN5TvmYhD
|
|
Najah/vVfxTDMRNbwV3+1WCw9C/9vYE47moN9Ft3vBocIyXH9J+JI7dy2C52
|
|
ezU48X98e75LHHmaXdqKuqrBpaj29cIbcTxH0zg8S/aNe8eW9seT4phRUNWU
|
|
NVwNWzWv1HlLSODpp4c7Mn5Uw54xncxEPwlkJhp33BDlwPFNbLPOGQlsnBja
|
|
6ObMAQrxksK9RBK1d/7s2uXGgXKxTbN6/JLYZCjUFu3Fgd5On8pMeUmcHXKS
|
|
TvTngIpzpJKzjSSmSguJue/lQNPGguUdFyTxD/Gi6NdpDvy1nn7ZxpTCvxKr
|
|
/i57yoGMktiyv9ZSKHuJWLXrBfn8cq4TWs5SeDXs0ZmWdg7YP+IzPxUohQqm
|
|
7itDejmQa6nAsU+XQtF7zLy49xwwRrvzz99J4cHiUzdOL3AgwuSy79NEaXyc
|
|
F3vwnAYBtoWCU3YnpTGqay6bokWAEu/BEy/PSmPxne3/XdAhoKPbvarrujR+
|
|
tONipq4jQDt8Fc/bl9Io/Oh4tZ4ZAR9L9pf8pMjgqb/P7POdCHgg8IERpSKD
|
|
2rnrLbtdCDgX6dI+qyWDqYs7D/K6EWBloTW3gDLIf02m1teLgKKhUTbvThmM
|
|
fZ4S0udPwBZxh2+yHBkcYge5ju0lwCCu/silBhkc+DjX2BFBAN+ouqTiYxk8
|
|
dLU67m4UAbUVPKD2WgY3pR0bjIkhQNKuNkN3UQZ5kwW8WhLI9z+iss7KjoKz
|
|
0SVTB9IJuPYxs/XJJgoWCXqkUzIIOOy4uMXWh4JDnsFHajIJ0KIOJDnupaCj
|
|
g+D+99kEpN493ed1noIJ10/V8OQRsH5yPjb0PXk/8WrjjhICYmyyNR5+pWB6
|
|
+SvNmmsElF/WGhCboeDFpG+FPKUESG/yM6ldIYuBz3/ZnS4j4OvdR7M82rLI
|
|
lfH50d5KAhRFfa+5G8li2EjojoIqAtz3zLmXoiyOhK690lpNQCN17R0HV1nk
|
|
t5+dErhNwJnEjMgLB0h3vBLbXktA6+Aala9HZFHp2LLK0DoCFtY1d5mlyeIi
|
|
88tkZD0BO/6b1h+7KIv+C8U+kfcIYNhv/qHdLItWyC8GDwkYlVALbRGQQysH
|
|
sTtLWwmQCntAlZKSQ6Pbt3iekbZv9WzbrSCHkZ//LU17SsCd2DRNIQM5DLs9
|
|
q8b1nNyfd98/e3nKoYDmt2U1bWT9jVNzb/rLYX/9W0HvlwRMZSrbLgbJ4e4E
|
|
we450j7r3UuLD8lhtkzy+TUdBOiX1u+cLJJDjYpyRc9OAnZyu0lZ3JTDojP+
|
|
a1+Tzt888Tj7thxeZ+vOu3URsFxQUY3RKodV6qVfLLoJMN1Z13PylRy25eQK
|
|
c0iHN7omvRuQw5Yd9EVaDwED+5LHjn2Tw0fL+Mw+kxZ6IZ/dNyOHkylnMti9
|
|
ZD1Vay01uKjo2BFUVUy6vO9LUbsoFacYRIBDHwHvdZNclOSomOubOJ1PWjqV
|
|
xh2lSt5v5b75P9JHmM7+FGMqKm7uKQ7rJ8DG59JPIwsqftXsyK8mLZjw5aib
|
|
PRUvBstXfifdc9lYIsKdip+yHYfXvCbX15xUkuFHxZVDE9o+pLd96DQqD6Ki
|
|
mdGpi6dIa/AqPH0eSUUPxwatu6R/qId4fzpMRc0UoZEh0ndt674sT6Gi7qJs
|
|
7T/S8cG8h1TOUPFLwoEaygAB1umbBC0uUjEp896QHmmByssFvteoaLQjSWs9
|
|
6e5XE7qHqqj4bmzPdWfSeb9Mm3LrqRhTJOjkTTpAIsX17iMq5o+sUvMhvcao
|
|
d6ynnYoLGbyaW0l/91SO/vWaXC/78jYP0jWx4bwiY1Rsdzj80p704fx7OdoT
|
|
VLyVsj6URdrqPp+G/RwVs1Pz1q8hvWrYo343Nw3VkjVdhUl3Lblqf3wVDYU3
|
|
FeX9JNeTq/xzqFiShsdDSuU7SPtZQViTAg3rvkwOXye9eudJrmENGjonq44c
|
|
JD1x4nXm33U0/JH5R9GeNHFDTVkWaJj/T+WqJOm4FxGEMZuGTHf34DdkPSwm
|
|
Gq3cXWkoVW8Vc5H0SmHBvoitNGSN32jzIt2ht3lX5k4arlSDPSKkfaKmU1/E
|
|
0VD238iJfWT9Vc9byH1OomG20J5Vcn3/n+/Tt3gzaLioIj3cSPZT7MKaDoti
|
|
Gn4NGTu8QPafOW2/v185DbmOp248Q3oFtvw8dJeGK4IDIlRJnz3qI1H7gobX
|
|
8PFzU7Kft1wtK+ntpWGI04cljWT/Kz2ZM5oapuGe3eRhhXQl3xlvnWlyPekp
|
|
I7rkvLzIfFJwlSqPOqIcgzftZF5wxPWaV8ujiM3m06akvXv8m4b15LG9Y9Lj
|
|
HDmPH6UXxmSt5fHcB0sjM3J+eQp1NbJC5XG7HifA4xkBzx4eqq84II85/S+9
|
|
ssj5z3j/zL4tUR57Ga0vWsl8oK0ODFtxXh5Pvv5PS/0JmS/lF4jDD+TRU1Ff
|
|
tKqZnK++l38nWuVR4sPjvr4mAhy4lm7w7ZTHHfzz9fNk/mxzCX0NH+Qx8Ujy
|
|
+LpGsl/jFOMTlimgk/bh77EN5DzLz1wxX6uAHFYgy5EgYJqT0fpbh/SlxjJj
|
|
Drm/Nmu/Va1TwNJL3i40Mi+T9vrRlcwUsLWl2+FtBdk/zc9auZ0VcKrmrb4e
|
|
mb8tOwu+NUcrIGWTOUXlMgHsBRPRg3EKqHa0rPNVAQEvM7rp6xIUMN7701Dc
|
|
JQJe165MKE5RQNn54l8tZP5P8EeKJuUrIO+TCru158g8qLQxsm5SQMPOY1q2
|
|
qQQEz/1IaBVQRL4nQe/ehJH7sXeH5LioIsoNyCn+DCHr/XmgjEdaEbX+Fbjw
|
|
BBNwdbC510xJESsnmOkyuwh4e/+s5m26It6fWXJdwo8AxyST/su+iohK+4Mc
|
|
HMm8FD2iE1eliLNmoYmd5PebK226JeeOIt5uusAKUiffnyfI+069IrYYHDb4
|
|
p0rAnmmXpB+PFDFr9crXFEUCivtVBncOKGLb3miH1VLk97KgNXkTjxIqXLix
|
|
mM5NwO+1wm+13JTQMdcj5QZ5npi5SDli4K2EbO3LdYNdHJgSUlUx8VXCkZcD
|
|
2StfcWDil0nQ+t1KOBR1bOPm5xwYrd82431ICXkGc0X6HnDgmV2N4ImrSlj8
|
|
o21a7zp5PtnjA6PTSviAzdOeFM0BZtnNwnPnlFEyz4aiyceBQYWyAqs8ZXyV
|
|
YfanbzkHYs+VXpoqUMYjA7MxR3g4UHOkJN+lVBkHXfM92xaqQd+zMEewQRld
|
|
Ovg6bSarYc2y7IzkEWV8/l9LeAd53pP0jUuI1lTBARsRpm5eNfwQtfVzb1LB
|
|
T9+ZUpeVq2HspJ/7Pl41fP7p64pk3ipgT+5nf6CvxoGSe9rP2irg67YVEUS8
|
|
OiZZXt8caXqL/J+Q4j7etAbLliiN/ii+AaJtaumVkxrIbbJvL4VxHeROVDjR
|
|
6ZqorBcYqHntKuSsNREW26mF9x4IrtZzuwLPKOaGvzK1MeV3tCdb4zIw5Joy
|
|
dHp1cEhyavTu54sgyFMU6Z+oiy92iAQHUHKBdkSe6aWmh/dcl2cpuJ6Dlapb
|
|
7rg80cOZIcNNkgtZoM2Sqdi/VR+Xd5hHvdLPgH1vRZttuQww+U6l5wGBNJj8
|
|
ddKNnWOAFWF1L/ZXJsMGnce5bK11KBBQwZafSYT7v0z/zL5ch9fxRN/N2cMQ
|
|
qqk/8CrQEHWbhHDDvhiImqXM++4yxJpGgst8SwwcbOKhTAQZ4kScZZytdQyk
|
|
efZ48YUb4jhbOf4kJQauHzvw2iLWELl15T89bz4Ao2/u93PSDZGx6VaCnswB
|
|
cD9l13e2xhDjN0eV+rdHA2tie7fXSjp+3LjU/NrOSJCs31DUwE/HvZ3XVFLc
|
|
I2HiuEa4vCAdnV3aRfdbRcIlxe/8H0TpmM/PPxOtHAn/NsVZhsvRMUFCUHP5
|
|
cAQ8qM+sTtaho/U2hbktmyPAPOV+BseNjr9Nal0feu8DKxXpjQJFdPRvTG0T
|
|
jQsH4tsjxe3FdKysW1QQCgkHlZqImboSOho6DGVL+IbDUtv2gl1ldIznrXmC
|
|
luHQFJb8s5mgY3Z36AOhVeFgVj91PvYJHd2uKzlKQhjQXV6N/veVji06khuv
|
|
5IWAekLqgSYjIxxbG/Bo+GQQNJheXWbPMMJIK73JvIggcJp9kNXDNMJ56weP
|
|
9ngHwYHQ6ZsfzY2Q82vberZ6ELRu8RsRtDdCD/03UvMtu2GXCd12s58RZly4
|
|
ULKaezeU/hyRnTphhNflLJ95pO0EjUCTB6oDRqi+JaXcunc7nFZymD/6xggV
|
|
Vm0+qtq8HabeBRiOvjXCVcJG+WKV2+G+98myS++NsJm9KoKauh1cnN6dl/pm
|
|
hB2tP4vHzbZDjGlS+EouY9zw39Zi67Jt0CrySvGbqjGqfDmjM58eAIH3dx0j
|
|
9hrjmjAdYdUEP5gI+UyWyRj3VG0bZ4b5wQFq8J7eaGMU042e3ObjB6kHw1zm
|
|
4owxM/9YyDumH1QyohWYycY4UmTWLDHtCwt3jjY05xrjFonRBdcfPpBVcWmq
|
|
s9kYx49cz49Z3AIPCru3/5AwwdDLOTefhnjBsL2ib7S0CXYNOvXscPUCrt8h
|
|
Xn8oJpjE186QM/ECC2deh2UKJrixcnBv+1IveLyEYSSjYYKnjxamul30hBcB
|
|
BSvNzUwweNpic0enBwyoBJVn7DDBpwGbNLkd3WHq+uKsTo0JDlgXTB074Qrj
|
|
7taFKbUm6DFZUcUf5Qr9S0/ZvK83wS+WEg+v+LtCvR/lwrlGE4zNu1LEa+oK
|
|
idKGjL9PTfAxpXPpxQkXED4RdPDZGxOUt839+9PTBTR39nAFcjNwZlkB1y8T
|
|
Z6BJyJXeX8pA1+RV1mnqziDcHOAszcvADvsRtoGUM/yifb/8nJ+BeoTaluop
|
|
J6jr5bPUl2BgxL1Yzz2VTmBjjUmLqxk4XR+sf1/DCbaplq3M3cjA8izjd2vc
|
|
HCD2kU+QmhMDAyaOy8QbOEBGoOjzahcG8qjqjk2LOEDD1ZiTzz0Y6HegoGZD
|
|
+0YQV7MR+uvPQC/XanqM3UZ4rPZB3C+agZ3+V1/Ns+1BQ11eQa2AgRWh3w3v
|
|
+NgCtnYmVF9mYC1zwJDX3BbcdyWPmBUzkHsy1yVa2RaOXv9W5FHKQO0Svpjy
|
|
j2x4o96gmsJhoPfPxNyjkWxIX+O19usTBj4xctx3I9MGfmicoVd/Z+BE96iR
|
|
8Yg19L9AK7FfDPy2MC3d22oNjaETrpHTDOTLEj+QVmkN6dXsvfR5BopzPfRn
|
|
JliDBoPrZh2PKYpMdd4nFKwhgB2i2CxpiolJt29MBFpB984Nq7qZpth3Xo/N
|
|
vWQ91K+cphiCKTbpqjYHfbGEorKiNefMTbEicYPPxx5LCJ/8a+1pbYrcCl0V
|
|
SmWWILCfOPLG0RRrqoZaM90twTpZcXYswBRDiywtbKss4G7xn5HpE6YY8Oe3
|
|
640oc6BbRs7appni4XHeu1MB5nB75OuqwlOmeGj5sJuzkzlU094a2WaZogLP
|
|
GS7zteZwM6fx1KU8U9Qufu87N4JQeDLJZEO5Ke7vb+6vdUFIiRTKzOkyxfSC
|
|
DTPMRDNYIXai5FuPKWqp2/mq+ptBchVXg0U/+fxn/nhtNINjEz/Gv74xxZhz
|
|
ZeFF/1hweFc303zcFAeW63ILHmLBvi0XPn6aM8WodXcdB+OZ4L1eGU1pTKz4
|
|
XGaZns+Av90rBJsVmEhlFnYOHWRAYeDEoK0yE0/zvRx03MqA8eTa/d7qTDz0
|
|
9FtfLo0B+546VsToM1GIXT/QWmQCqQ4HaXetmWgWGX9oV5Ux1Hn2LKwLY2Jt
|
|
voVm3zgdtn6qe9awl4lDc8wzRs/pwBVbmLM+kok0HuH4OxV0sM7bs25TDBNX
|
|
rLAMEYqhQ+fQkuCIo0xMV/T11xCgw+cA7cGq80wcnnH/8JlhCLIhx2u1G5l4
|
|
bUsvq63MANIXdximNTEx6eb6fX5nDYA7y7rqvxYmPrItkOePN4DPd5aVFj5l
|
|
Yoyt46kSFwOo4zqWI9rFRL2xUedf8/rgnZ2wf+YDE/8uHyx65agPOfUxhvf5
|
|
WdihOTEvwKcHqxy8qiiCLNQtM+DfOaMLCcPGWvuFWWgZfW6me1QXdi2bU9GV
|
|
YKEJdZPQZL0uGDlGixfRWJi85IICJUwXekf3/UrSY+G5HHZwVLUOSPAFV230
|
|
YOFlgZUi5ge0oNjyUOx3Lxa+UaDqjzprgf6hdMszW1gosXVwe9VaLXD4XtnT
|
|
78/CoT8bjV+/04Tk3unf24JZGHHiuw7bVhPmiuItYo+wcOJ404P41WthwPRM
|
|
V0kZaS1m2p8la2BXVHE+u5yFt+497loyog4z5bcDv1ayMO/CNTvdRnUQVeqf
|
|
1bvDwi92WdLL4tXBbgVV7l4jC89zHL1T/q2Ghu6S7V09LOS6kFfYu3Q12Are
|
|
1YruZ6GmTEWc3bga9G94OiM9yMKPL8/2fHiiBlN1X074DLMQ7T19U9PUQOuy
|
|
7q1Pn1lo9eCNVbq4GjQMmEef/MbCe1oXMjVmVcFW3BV0vrPQ0FhP7MtrVdhx
|
|
POpV5DQLl1vskewvUIWpxuRcqTmyHuJlG5YeVYXE+fPb6uZZuPrbEsFNO1RB
|
|
eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe
|
|
"]]}, "Charting`Private`Tag#1"]}}, {}}, <|
|
|
"HighlightElements" -> <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>,
|
|
"LayoutOptions" -> <|
|
|
"PanelPlotLayout" -> <||>,
|
|
"PlotRange" -> {{0, 30}, {0., 0.08145702771151381}},
|
|
"Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0},
|
|
"ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True},
|
|
"LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> {
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]]},
|
|
"HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ),
|
|
"ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>,
|
|
"Primitives" -> {}, "GCFlag" -> False|>,
|
|
"Meta" -> <|
|
|
"DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" ->
|
|
Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]],
|
|
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
|
|
Axes->{True, True},
|
|
AxesLabel->{None, None},
|
|
AxesOrigin->{0, 0},
|
|
DisplayFunction->Identity,
|
|
Frame->{{False, False}, {False, False}},
|
|
FrameLabel->{{None, None}, {None, None}},
|
|
FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
|
|
GridLines->{None, None},
|
|
GridLinesStyle->Directive[
|
|
GrayLevel[0.5, 0.4]],
|
|
ImagePadding->All,
|
|
Method->{
|
|
"DefaultBoundaryStyle" -> Automatic,
|
|
"DefaultGraphicsInteraction" -> {
|
|
"Version" -> 1.2, "TrackMousePosition" -> {True, False},
|
|
"Effects" -> {
|
|
"Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
|
|
"Droplines" -> {
|
|
"freeformCursorMode" -> True,
|
|
"placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" ->
|
|
AbsolutePointSize[6], "ScalingFunctions" -> None,
|
|
"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
|
|
(Identity[#]& )[
|
|
Part[#, 1]],
|
|
(Identity[#]& )[
|
|
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
|
|
(Identity[#]& )[
|
|
Part[#, 1]],
|
|
(Identity[#]& )[
|
|
Part[#, 2]]}& )}},
|
|
PlotRange->{{0, 30}, {0., 0.08145702771151381}},
|
|
PlotRangeClipping->True,
|
|
PlotRangePadding->{{
|
|
Scaled[0.02],
|
|
Scaled[0.02]}, {
|
|
Scaled[0.05],
|
|
Scaled[0.05]}},
|
|
Ticks->{Automatic, Automatic}]], "Output",
|
|
CellChangeTimes->{3.991335257344549*^9},
|
|
CellLabel->
|
|
"Out[255]=",ExpressionUUID->"c4fa73a0-9f42-fb44-a044-6efcf5132509"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
FractionBox[
|
|
RowBox[{"4", "*", "x", "*", "x", "*", "y", "*", "\[Pi]", "*",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
UnderoverscriptBox["\[Sum]",
|
|
RowBox[{"n", "=", "0"}], "100"],
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
RowBox[{"2",
|
|
RowBox[{"(",
|
|
FractionBox["h2", "Cb"], ")"}], "*", "x", "*", "y"}], "2"],
|
|
")"}],
|
|
RowBox[{"2", "*", "n"}]], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox["1",
|
|
RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], ")"}]}],
|
|
RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(", "x", ")"}], "2"], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
RowBox[{"y", "*", "y"}], "1"]}],
|
|
RowBox[{"(",
|
|
FractionBox["1", "Cb"], ")"}]}]],
|
|
RowBox[{"\[DifferentialD]", "y"}],
|
|
RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input",
|
|
CellLabel->
|
|
"In[256]:=",ExpressionUUID->"0da19810-21b5-1440-b6da-efec04765d71"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"7.39639867535232`*^-188\\\", \
|
|
\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\
|
|
4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 256,
|
|
237, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991335257395241*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[256]:=",ExpressionUUID->"7bcbb4da-a8de-1b45-8b24-dc27272fdaa1"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"9.342395211692676`*^-192\\\", \
|
|
\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\
|
|
6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 256,
|
|
238, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913352574052296`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[256]:=",ExpressionUUID->"15898f02-540e-cf4f-a0a1-f3ae96bbddb6"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"1.1800384500947783`*^-195\\\", \
|
|
\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\
|
|
7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \
|
|
to represent as a normalized machine number; precision may be lost.\"", 2,
|
|
256, 239, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991335257413231*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[256]:=",ExpressionUUID->"99a44b10-ed73-684f-a35a-9a86c980f3d9"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "stop",
|
|
"\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \
|
|
\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
|
|
during this calculation.\"", 2, 256, 240, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913352574212303`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[256]:=",ExpressionUUID->"5e0acd55-8564-1749-9f1a-5e9cd04ef83a"],
|
|
|
|
Cell[BoxData["9.332200719005158`"], "Output",
|
|
CellChangeTimes->{3.991335263670042*^9},
|
|
CellLabel->
|
|
"Out[256]=",ExpressionUUID->"a97106d2-ef63-9147-8535-daa57b06eb20"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"q", "=",
|
|
RowBox[{
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
FractionBox["1",
|
|
RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]],
|
|
RowBox[{"(",
|
|
RowBox[{"4", "x", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"x", "-", "J1"}], ")"}], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"y", "-", "J2"}], ")"}], "*", "y", "*", "\[Pi]", "*",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
UnderoverscriptBox["\[Sum]",
|
|
RowBox[{"n", "=", "0"}], "100"],
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
RowBox[{"2",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox["1", "Cw"]}], "+",
|
|
FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}],
|
|
"2"], ")"}],
|
|
RowBox[{"2", "*", "n"}]], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox["1",
|
|
RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}],
|
|
")"}]}], ")"}], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(", "x", ")"}], "2"], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
RowBox[{"y", "*", "y"}], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]],
|
|
RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}],
|
|
RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input",
|
|
CellChangeTimes->{{3.991845708089321*^9,
|
|
3.9918457122231236`*^9}},ExpressionUUID->"d3b2932a-2d3f-fa41-a705-\
|
|
f816ef30ba1b"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"3.2914107257951473`*^-244\\\", \
|
|
\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\
|
|
\"]\\) is too small to represent as a normalized machine number; precision \
|
|
may be lost.\"", 2, 257, 241, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991335263710146*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[257]:=",ExpressionUUID->"4287df48-5412-ba4f-8ac5-009fa9b4a304"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"8.101217087106948`*^-252\\\", \
|
|
\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\
|
|
\\\"]\\) is too small to represent as a normalized machine number; precision \
|
|
may be lost.\"", 2, 257, 242, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913352637201557`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[257]:=",ExpressionUUID->"59c4f004-977d-f648-9c23-b4080e1c8591"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"1.9939692660683834`*^-259\\\", \
|
|
\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\
|
|
000\\\"]\\) is too small to represent as a normalized machine number; \
|
|
precision may be lost.\"", 2, 257, 243, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991335263728153*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[257]:=",ExpressionUUID->"60f490e4-4b4a-6845-a3d9-028c70afb6db"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "stop",
|
|
"\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \
|
|
\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
|
|
during this calculation.\"", 2, 257, 244, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913352637361546`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[257]:=",ExpressionUUID->"9ab542c7-4ae7-1e4b-b6a8-ee19008898f7"],
|
|
|
|
Cell[BoxData["0.00046079539931050297`"], "Output",
|
|
CellChangeTimes->{3.991335268779545*^9},
|
|
CellLabel->
|
|
"Out[257]=",ExpressionUUID->"0d1e7940-37bf-bf4f-bfa4-a5ba2d7cb1dd"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"S1", "=",
|
|
RowBox[{
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
FractionBox["1",
|
|
RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]],
|
|
RowBox[{"(",
|
|
RowBox[{"4", "x", "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]",
|
|
"*",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
UnderoverscriptBox["\[Sum]",
|
|
RowBox[{"n", "=", "0"}], "100"],
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
RowBox[{"2",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox["1", "Cw"]}], "+",
|
|
FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}],
|
|
"2"], ")"}],
|
|
RowBox[{"2", "*", "n"}]], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox["1",
|
|
RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}],
|
|
")"}]}], ")"}], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(", "x", ")"}], "2"], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
RowBox[{"y", "*", "y"}], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]],
|
|
RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}],
|
|
RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input",
|
|
CellChangeTimes->{{3.9918457167596684`*^9,
|
|
3.991845720288498*^9}},ExpressionUUID->"3a5379d3-3adc-3844-bbe2-\
|
|
4530809b7b8c"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"3.2914107257951473`*^-244\\\", \
|
|
\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\
|
|
\"]\\) is too small to represent as a normalized machine number; precision \
|
|
may be lost.\"", 2, 258, 245, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991335268812542*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[258]:=",ExpressionUUID->"79bb4b1f-3177-c842-aa67-d93f3ad3365e"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"8.101217087106948`*^-252\\\", \
|
|
\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\
|
|
\\\"]\\) is too small to represent as a normalized machine number; precision \
|
|
may be lost.\"", 2, 258, 246, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991335268822542*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[258]:=",ExpressionUUID->"517afb64-9d7b-6748-abe1-5fa348ccbc29"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"1.9939692660683834`*^-259\\\", \
|
|
\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\
|
|
000\\\"]\\) is too small to represent as a normalized machine number; \
|
|
precision may be lost.\"", 2, 258, 247, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991335268831545*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[258]:=",ExpressionUUID->"d19413a7-2cf4-0549-a8b8-37f98f04b017"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "stop",
|
|
"\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \
|
|
\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
|
|
during this calculation.\"", 2, 258, 248, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913352688395576`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[258]:=",ExpressionUUID->"e2ebea89-90c0-5d4f-8c43-eea596c7d6fb"],
|
|
|
|
Cell[BoxData["5.104103620353258`"], "Output",
|
|
CellChangeTimes->{3.991335272704685*^9},
|
|
CellLabel->
|
|
"Out[258]=",ExpressionUUID->"7c4d0729-640a-ed41-ad1f-5a5a75f62d87"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"S2", "=",
|
|
RowBox[{
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
FractionBox["1",
|
|
RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]],
|
|
RowBox[{"(",
|
|
RowBox[{"4", "x", "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]",
|
|
"*",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
UnderoverscriptBox["\[Sum]",
|
|
RowBox[{"n", "=", "0"}], "100"],
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
RowBox[{"2",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox["1", "Cw"]}], "+",
|
|
FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}],
|
|
"2"], ")"}],
|
|
RowBox[{"2", "*", "n"}]], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox["1",
|
|
RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}],
|
|
")"}]}], ")"}], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(", "x", ")"}], "2"], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
RowBox[{"y", "*", "y"}], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]],
|
|
RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}],
|
|
RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input",
|
|
CellChangeTimes->{3.991845728758301*^9,
|
|
3.9918461210058537`*^9},ExpressionUUID->"208e04c0-4af7-a344-9e86-\
|
|
ceb616bf22d8"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"3.2914107257951473`*^-244\\\", \
|
|
\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\
|
|
\"]\\) is too small to represent as a normalized machine number; precision \
|
|
may be lost.\"", 2, 259, 249, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913352727386665`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[259]:=",ExpressionUUID->"c1d8bb29-16c6-3f4b-8a9b-ba7e90da9672"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"8.101217087106948`*^-252\\\", \
|
|
\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\
|
|
\\\"]\\) is too small to represent as a normalized machine number; precision \
|
|
may be lost.\"", 2, 259, 250, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913352727476673`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[259]:=",ExpressionUUID->"1756ecee-a1fe-bb40-bfd8-48d4df8ef76d"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"1.9939692660683834`*^-259\\\", \
|
|
\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\
|
|
000\\\"]\\) is too small to represent as a normalized machine number; \
|
|
precision may be lost.\"", 2, 259, 251, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913352727556705`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[259]:=",ExpressionUUID->"d0cb69f1-ced4-d843-98c1-600cac395a38"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "stop",
|
|
"\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \
|
|
\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
|
|
during this calculation.\"", 2, 259, 252, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913352727636833`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[259]:=",ExpressionUUID->"ab747287-9372-314d-a7c4-14fc011f850b"],
|
|
|
|
Cell[BoxData["18.832858301324727`"], "Output",
|
|
CellChangeTimes->{3.991335275154251*^9},
|
|
CellLabel->
|
|
"Out[259]=",ExpressionUUID->"e6bb3b57-900e-ed41-845d-3c49874fc850"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
FractionBox["q",
|
|
SqrtBox[
|
|
RowBox[{"S1", "*", "S2"}]]]], "Input",
|
|
CellChangeTimes->{{3.991846126007372*^9,
|
|
3.9918461306014214`*^9}},ExpressionUUID->"53a3c067-888b-bc49-a5e6-\
|
|
f228162e6070"],
|
|
|
|
Cell[BoxData["0.00004699917922538678`"], "Output",
|
|
CellChangeTimes->{3.991335275186266*^9},
|
|
CellLabel->
|
|
"Out[260]=",ExpressionUUID->"88a5aaa2-9216-404d-a8aa-70ecb36db857"]
|
|
}, Open ]],
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"Clear", "[",
|
|
RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input",
|
|
CellChangeTimes->{{3.991846134278736*^9, 3.9918461363904533`*^9},
|
|
3.9919238355720615`*^9},ExpressionUUID->"0c2ac2c8-096e-e64a-aaeb-\
|
|
bb84e7548fdc"],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"Qb2", "=",
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.05", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "34"}]]}], ")"}], "2"],
|
|
RowBox[{"1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}]], ")"}],
|
|
RowBox[{"-", "1"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"Il", "*", "Ih"}],
|
|
RowBox[{"Il", "+", "Ih"}]]}]}]], "Input",
|
|
CellLabel->
|
|
"In[262]:=",ExpressionUUID->"5c8cab9c-f39b-364c-ae6b-c415e4dbcf46"],
|
|
|
|
Cell[BoxData["5.744985073726737`"], "Output",
|
|
CellChangeTimes->{3.9913352752142563`*^9},
|
|
CellLabel->
|
|
"Out[262]=",ExpressionUUID->"2dde55a6-2323-454c-b60b-61a76b5d44f2"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"hb", "=",
|
|
SqrtBox[
|
|
FractionBox["Kb", "Qb2"]]}]], "Input",
|
|
CellLabel->
|
|
"In[264]:=",ExpressionUUID->"106a4571-94f1-5343-b4a9-78f21d5e84b3"],
|
|
|
|
Cell[BoxData["1.564995573098557`"], "Output",
|
|
CellChangeTimes->{3.9913352752482567`*^9},
|
|
CellLabel->
|
|
"Out[264]=",ExpressionUUID->"344bf722-e54f-374f-b65c-1dfe2f693b7e"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"Cb", "=",
|
|
FractionBox[
|
|
RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input",
|
|
CellLabel->
|
|
"In[267]:=",ExpressionUUID->"b7c1808d-73a9-d645-bf95-223de85093e2"],
|
|
|
|
Cell[BoxData["8.990876207899632`"], "Output",
|
|
CellChangeTimes->{3.9913352753089123`*^9},
|
|
CellLabel->
|
|
"Out[267]=",ExpressionUUID->"37f05469-042d-5c49-acdf-eb29d6a15290"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"o1", "=",
|
|
RowBox[{
|
|
RowBox[{"1", "/",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], "+",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*",
|
|
"f2"}]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.05", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "34"}]]}], ")"}], "2"],
|
|
RowBox[{"1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}]], ")"}],
|
|
RowBox[{"-", "2"}]], "*", "Cb"}], "+",
|
|
RowBox[{"Cw", "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], ")"}],
|
|
"2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.05", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "34"}]]}], ")"}], "2"],
|
|
RowBox[{"1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}]], ")"}],
|
|
RowBox[{"-", "2"}]]}]}], ")"}]}],
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], "+",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*",
|
|
"f2"}]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.05", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "34"}]]}], ")"}], "2"],
|
|
RowBox[{"1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}]], ")"}],
|
|
RowBox[{"-", "2"}]]}]}]], "Input",
|
|
CellLabel->
|
|
"In[268]:=",ExpressionUUID->"e9c41729-285f-7d42-bb43-ee09dea88444"],
|
|
|
|
Cell[BoxData["0.07167004636648908`"], "Output",
|
|
CellChangeTimes->{3.9913352753341656`*^9},
|
|
CellLabel->
|
|
"Out[268]=",ExpressionUUID->"a9f66528-7902-3848-84e1-d06cd8efb93c"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{"2", "*", "x", "*", "x", "*", "o1", "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-", "x"}], "*", "x", "*", "o1"}]],
|
|
RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",
|
|
CellLabel->
|
|
"In[269]:=",ExpressionUUID->"efa9c5ac-4baa-3e4e-9760-1e46cf5c01c0"],
|
|
|
|
Cell[BoxData["3.3103666491187544`"], "Output",
|
|
CellChangeTimes->{3.9913352754296722`*^9},
|
|
CellLabel->
|
|
"Out[269]=",ExpressionUUID->"c5f93787-bd57-b143-93de-29b700483396"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"o2", "=",
|
|
RowBox[{
|
|
RowBox[{"1", "/",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], "+",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*",
|
|
"f2"}]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.05", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "34"}]]}], ")"}], "2"],
|
|
RowBox[{"1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}]], ")"}],
|
|
RowBox[{"-", "2"}]], "*", "Cb"}], "+",
|
|
RowBox[{"Cw", "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*",
|
|
"f2"}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.05", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "34"}]]}], ")"}], "2"],
|
|
RowBox[{"1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}]], ")"}],
|
|
RowBox[{"-", "2"}]]}]}], ")"}]}],
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], "+",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*",
|
|
"f2"}]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.05", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "34"}]]}], ")"}], "2"],
|
|
RowBox[{"1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}]], ")"}],
|
|
RowBox[{"-", "2"}]]}]}]], "Input",
|
|
CellLabel->
|
|
"In[270]:=",ExpressionUUID->"7dcb74da-1357-7e4e-a03d-852f8e740128"],
|
|
|
|
Cell[BoxData["0.012832691268660865`"], "Output",
|
|
CellChangeTimes->{3.9913352754426765`*^9},
|
|
CellLabel->
|
|
"Out[270]=",ExpressionUUID->"7b0024b2-1e68-904c-b216-49c58abdde0a"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{"2", "*", "x", "*", "x", "*", "o2", "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-", "x"}], "*", "x", "*", "o2"}]],
|
|
RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",
|
|
CellLabel->
|
|
"In[271]:=",ExpressionUUID->"4c537c9f-ce6a-8f4c-9e68-01e12e3017b7"],
|
|
|
|
Cell[BoxData["7.823229443917166`"], "Output",
|
|
CellChangeTimes->{3.991335275540678*^9},
|
|
CellLabel->
|
|
"Out[271]=",ExpressionUUID->"725e176a-1300-6f41-9ba3-e070b7b00753"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"h1", "=",
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}],
|
|
")"}], "/",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], "+",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}],
|
|
")"}]}]}]], "Input",
|
|
CellLabel->
|
|
"In[272]:=",ExpressionUUID->"1e3d1dc2-d9ac-9045-a648-58006d1d6cf6"],
|
|
|
|
Cell[BoxData["0.7884625602161153`"], "Output",
|
|
CellChangeTimes->{3.9913352755566807`*^9},
|
|
CellLabel->
|
|
"Out[272]=",ExpressionUUID->"56e25769-5fae-9845-ac42-be0bc3e98c92"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"h2", "=",
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], ")"}], "/",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], "+",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}],
|
|
")"}]}]}]], "Input",
|
|
CellLabel->
|
|
"In[273]:=",ExpressionUUID->"2371743b-ee83-9146-bf98-330cb0fb7e0a"],
|
|
|
|
Cell[BoxData["0.21153743978388478`"], "Output",
|
|
CellChangeTimes->{3.991335275581682*^9},
|
|
CellLabel->
|
|
"Out[273]=",ExpressionUUID->"0574b2f8-313d-764f-97a0-b69ae3bd044d"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"h3", "=",
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], ")"}], "*",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}],
|
|
")"}]}], ")"}], "/",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], "+",
|
|
"\[IndentingNewLine]",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*",
|
|
"f2"}]}], ")"}], "2"]}]}]], "Input",
|
|
CellLabel->
|
|
"In[274]:=",ExpressionUUID->"8b6de8d6-9524-3347-a11b-48bba48b07d0"],
|
|
|
|
Cell[BoxData["0.16678935135356415`"], "Output",
|
|
CellChangeTimes->{3.9913352756087036`*^9},
|
|
CellLabel->
|
|
"Out[274]=",ExpressionUUID->"95ff35fe-9928-0447-aa14-c396ca299126"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"J1", "=",
|
|
RowBox[{
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
FractionBox[
|
|
RowBox[{"4", "x", "*", "x", "*", "y", "*", "\[Pi]", "*",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
UnderoverscriptBox["\[Sum]",
|
|
RowBox[{"n", "=", "0"}], "100"],
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
RowBox[{"2",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox["1", "Cw"]}], "+",
|
|
FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}],
|
|
"2"], ")"}],
|
|
RowBox[{"2", "*", "n"}]], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox["1",
|
|
RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}],
|
|
")"}]}],
|
|
RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(", "x", ")"}], "2"], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
RowBox[{"y", "*", "y"}], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]],
|
|
RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}],
|
|
RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input",
|
|
CellChangeTimes->{
|
|
3.991846151022602*^9},ExpressionUUID->"a41abb59-b808-8547-b1d9-\
|
|
a574acad5c53"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"1.1126821353218566`*^-190\\\", \
|
|
\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\
|
|
358493165635789279094374400000000000000000000\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 275,
|
|
253, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991335275636673*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[275]:=",ExpressionUUID->"87b7fc82-cf0a-ec4d-83b9-1f172c2a1277"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"1.0111242895395887`*^-194\\\", \
|
|
\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\
|
|
4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 275,
|
|
254, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913352756456738`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[275]:=",ExpressionUUID->"e0980964-44fb-0a4c-8205-9ce871cb8c93"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"9.188359338592283`*^-199\\\", \
|
|
\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\
|
|
6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 275,
|
|
255, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913352756546745`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[275]:=",ExpressionUUID->"769d7438-8b0f-d04b-94dc-ec99bab472ff"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "stop",
|
|
"\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \
|
|
\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
|
|
during this calculation.\"", 2, 275, 256, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991335275662676*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[275]:=",ExpressionUUID->"c243bb4e-27de-574b-aeb4-b19a9e2e805b"],
|
|
|
|
Cell[BoxData["3.3103666491187513`"], "Output",
|
|
CellChangeTimes->{3.991335279487499*^9},
|
|
CellLabel->
|
|
"Out[275]=",ExpressionUUID->"678e1d2b-842e-e545-b4df-7b6cad732095"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"J2", "=",
|
|
RowBox[{
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
FractionBox[
|
|
RowBox[{"4", "x", "*", "y", "*", "y", "*", "\[Pi]", "*",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
UnderoverscriptBox["\[Sum]",
|
|
RowBox[{"n", "=", "0"}], "100"],
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
RowBox[{"2",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox["1", "Cw"]}], "+",
|
|
FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}],
|
|
"2"], ")"}],
|
|
RowBox[{"2", "*", "n"}]], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox["1",
|
|
RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}],
|
|
")"}]}],
|
|
RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(", "x", ")"}], "2"], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
RowBox[{"y", "*", "y"}], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]],
|
|
RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}],
|
|
RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input",
|
|
CellChangeTimes->{
|
|
3.9918461538845863`*^9},ExpressionUUID->"779c8db8-6bae-9046-915d-\
|
|
05cf0a3cee42"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"1.1126821353218566`*^-190\\\", \
|
|
\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\
|
|
358493165635789279094374400000000000000000000\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 276,
|
|
257, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991335279522499*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[276]:=",ExpressionUUID->"513e0bd5-dbba-a448-aa49-b2f50bf64a60"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"1.0111242895395887`*^-194\\\", \
|
|
\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\
|
|
4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 276,
|
|
258, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991335279532501*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[276]:=",ExpressionUUID->"af5e90bc-196b-e043-94e8-4bb9c49c6b5c"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"9.188359338592283`*^-199\\\", \
|
|
\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\
|
|
6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 276,
|
|
259, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913352795405006`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[276]:=",ExpressionUUID->"8f26edac-d5c1-324e-91b6-0e386d5a872d"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "stop",
|
|
"\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \
|
|
\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
|
|
during this calculation.\"", 2, 276, 260, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913352795487957`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[276]:=",ExpressionUUID->"6833928c-ef21-0d4b-aeed-ecf995491543"],
|
|
|
|
Cell[BoxData["7.82322944391716`"], "Output",
|
|
CellChangeTimes->{3.991335283631424*^9},
|
|
CellLabel->
|
|
"Out[276]=",ExpressionUUID->"74d46ae4-1766-0c42-9255-78e61714806e"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"a", "=",
|
|
RowBox[{"Plot", "[",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{
|
|
FractionBox["1", "1"],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
FractionBox[
|
|
RowBox[{"4", "x", "*", "y", "*", "\[Pi]"}],
|
|
RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{"2",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox["1", "Cw"]}], "+",
|
|
FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y", "*",
|
|
RowBox[{"Cos", "[",
|
|
FractionBox[
|
|
RowBox[{"z", "*", "\[Pi]"}], "180"], "]"}]}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(", "x", ")"}], "2"], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
RowBox[{"y", "*", "y"}], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]],
|
|
RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}],
|
|
RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input",
|
|
CellChangeTimes->{
|
|
3.991846157029255*^9},ExpressionUUID->"2fa4bc1d-3549-0e49-9fa0-\
|
|
9e5dc16aa40f"],
|
|
|
|
Cell[BoxData[
|
|
GraphicsBox[
|
|
InterpretationBox[{
|
|
TagBox[{{{}, {},
|
|
TagBox[
|
|
{RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2],
|
|
Opacity[1.], LineBox[CompressedData["
|
|
1:eJwV1nk8Ffv/B3BryVIkJPvalUj2LZ93iJT9UvZ0nDNKlsLXJeK2SDcppKhf
|
|
pYWSfSmyXkVSTpFQKuscS/btMFTX7+OPeczj+ZiZ1+c1n5nPPEaBFuLM4OLg
|
|
4BjF29r+1AfN7RVtH8x+GTnQNixTyGwqS49mmY8ii66O8GH3Z+qnKVvWIP9E
|
|
17/WYzvS368T1HmNlNSyRHixSyLjGngtmUhRIbqcE/ufpq31cbkfUd3+b4zf
|
|
FIUq207d+6XdiaD0tRyFPfb1XUxU9Rc0l2/CmsXeNqTkuWjxHXG9Nisbwz44
|
|
HWMUxuxDdxvargxi1/0aE4jMHUCdhfMnu7G7zkpElweTqObt0yOt2FPrLMcW
|
|
tIeQVRrbrRF73ZWT7jpLw8ippdvrBbasyN3mU9Wj6MUx9xN52PZSi4+nLCaQ
|
|
1ZRBzlVs4r6iuAbfFLq7crcrFjtOxSH+BHMaZTwv2BSM/UWiY3d47ixKkPn2
|
|
wAab7hFw/PqVOVTayflTD3vmDseD0uB5NOjM8lHA5lPUEJ7VZiMJx1kr9hKF
|
|
0ugN1sJii0j4lWpLD7b8E/e4XUuLaOC7hsdrbMOdF6eCqinUmfQ2IwX7mH4f
|
|
c8ziF3LKn86QxV6I/B8Pv+pvJJB4PHx1kUJ/VwuYqvH9h4LRhEcfdgYY5vkz
|
|
VxETdtrcwaZnN1uG5nJCy7ULefzYuU3X+89KccEpr939JBv3HfGJSbnCBVsO
|
|
acjXYMfsYJcVB3PDk9PGr45jpxUpKE1r8wIZwLxWuUChr20Tdf894oW33aLy
|
|
idjycxUeG8XWwZPJ1WpP7Hxd+1SNpXXgZ8IWX5mnUGPlac7Aaj6Iksv3UMdm
|
|
N3zqG7UQBGPeD8q+sxTabCsoHF0nCC6XOYxlsLU6LEHISAhcODl3d89QKID1
|
|
/P5uzY2wdU91ox32SS6m1h5BYdhv+We82jSFhhQLZ+MXRUD93ubYvAk8P8S7
|
|
Da06m2FkSbbqEDZX3rDC1lObwTPMq5sDW15Hzjl3fDMYt3946TROIQ+L5NIP
|
|
/aJwTvrInuEfFGr1Cw2TaBGDIoecxe5hCvU+uZroyycO/QXbQ8OwJ8ZzHz3d
|
|
Jw6EaFK7ADZ/OPnJpF4ceNA5c6MhCllecNH1fS4B66tPDV4kKVSVpc/OyZQE
|
|
/SAbs8k+CmUNrUQYh8uAeqiz68hnCu13TegNK5CBuO/3OwnsiUZRq4JhGdiS
|
|
PkQb6qKQbtZOMXl3WaDxdGT1deL5pPmU8ZrJweeuvrfNnyg0N93/1+h5eSh9
|
|
alse1Eoh0SDLZ2V2ijB5U0+Eu4lCw1n8xxwDFEHl7K0w+msKvfjeJjV5URHO
|
|
z4WONDZSyMvW+7xqvSK0uqjwnG/A/dQjnG9pK8G/bRNiC/V4/LEnM7ESypDs
|
|
wqp7it9LF38BjQMDKhByrMGRXkwhFOGqffi3CnhIfR7KK6LQjvhMA7qkKng4
|
|
td6eK6QQxyMd81gnVVgdlGacKaBQQa/n4dKXqmCdw/P3pVy8Pg/ln932cDt4
|
|
/J//YngW7mdp1zVGU4P6v07syEmnkJTitbhE1k5wcT5z6lw0hWouL6gtc2mA
|
|
c2DIzrjTuP+8ewehoAGGlP3U6SgK3WtUVjP30YD89NmEkL8opOhf1U591gBO
|
|
o+RtdmG4X/6QCtGiCS7dtr+6AygkIyVLyLtrwYKfa7mpO4V2ZocL/kTawGtp
|
|
0KuvQyEa/Txbw14bgiKcVwS18fpSSu319dIGzWYv+0EtCnE/LCpuitSGuADH
|
|
zMuaeH3cG3NJLdGGt5P6Ex/V8Pcvw/eumpIOnH98LdhEHj+PRFtNt3W6sDjH
|
|
xRkjSKEHocqOz5l6ADKNKg2DS6gtAhlcyDaCV07q8g2xS0jBp9PeO3APhCid
|
|
s5USWUKM1fJCmSiAwE5v9tKDRSQx/mK9BM0cUgsrVbwVFlG4jun31B2WsLtF
|
|
8IfKIzaiTf5qFh3bBz4cTSWLimxUYB62PrPVGuprn0g6pC2grIWAl/lpNiDf
|
|
oTsoLrSAqL1b3zfGHYRgU/+8s1HzqIeDe3bgqB2Y50/sbh6dQ8HSIclnlRwg
|
|
QbLrCIs2hwqPN9ffiHeEtsFdKf9+mkWn5yWX1I87wWK/lR3TcRaxD1gdenPE
|
|
GcZTYpSjmmaQkWfK3iGnP6GHVtbWZT6D2iXvBjTquIDYyzuVrhnTaNvj8zU5
|
|
f7hC4qvsmtL7U+hF/w5be6FDoMyUnBZumESyHTP+EZOHgDdUQUJsfgLp3EjJ
|
|
f9R/GBJT5eQkpCfQXZ55zdQGNzDUN/BO8R5H5Xt3fY2vdIel9rOSSrfHUIbB
|
|
ZZFfuR6gvVegI2joB2r9ln1R54onjDkLxtZb/UDP7e4on/zbC8yq2wdts0fR
|
|
bNCfHMF0b6gbCDMnto4itpXasSkLH+DxbOg7kD6Ccia7qTD9I1BRwqgRExtB
|
|
bg+y/bwFfeEQcwt3XtYwKis9eIQ7wRdCmpgoTHcYGUm1L/+z7AszNhoxZzuG
|
|
kFK//9ePx4/C6z/oGQmxQ4glcMLhDnkUjhsOVErtGEJtV+39rF1p8G3GaPIE
|
|
yUJpkZkC/2ujwbmaSMPwTBaqqVtd9rPxgxjlxL+tGCy0yQsSdKr8gK3YpRer
|
|
z0LyW960Stf4gYtB1MYGPRbSYtptXVfnB6pvKgL5sJ1NPZ9+eekHC6pkZZoO
|
|
zpeOaDnz1g80PyzeKNNioW09eZuav/hBhLqlHb86Cyn7SGR4LflBvhGKlpJn
|
|
ISPfqZx4XTpIVhP/vRNgoce3ZsLs9elglhuqZYK95dOcmYQhHabdFDvz+Flo
|
|
at9SR44JHVoOuURc3cDC3xsOTqY5HebjDku4r2ehjUsi7pud6OCz4doHbm4W
|
|
YiXpbcgMooNyhfto4QqJnN4YdPiH0GHf+v1+Gth1HMaZWqfoEDwn45i/TKJb
|
|
YWZ6r8LpcNw2IC6PIpG9u/XRoWg61LN/6BQtkqhS2b1S/TIdPHKrp1vmSHS1
|
|
Oub4i8d0QO3OSR7jJArSTjeKzKGDTCh/7I8xEtk+LdlgmEsHvuz0b5HY/OnD
|
|
TysK6DDCluvJ+EGi+FDHsfJndBhLYyz3jJAoRk35xPNXdOh/WJsawyJRQHpL
|
|
YGkvHbj87NQEeklks3HYNLQf9xWeynvSQ6I/4jmEtAfpYKXXddsSezhUr6Bk
|
|
iA7PrANr476T6Kh95mTxBB3e65uK/fxKIjfesOCiFTpETvQKrPtCIuuwbSfz
|
|
xRnwH/PZcmA7iV5lXjyQupUB5uXZzzZhmzLnlCO3McDhSuRU6UcSaam0dFvI
|
|
MmD7nZLelTYSSX6OtvimwgD5mdni5FYSjRv3iPPrMWBHQ+PWDiaJrnHdr/X/
|
|
E+d7vvxc+Qbf/y7BDDtXBlzzjiECsS94RobqHGbA9YWUMDnsyGeO21c9GCB4
|
|
s5YvoQn3JzhTbtIYsMrKl/V6TSKddzT661MMuLVSwpZpINHnFBUBpWQGmPS8
|
|
N+D4l0SFSOjYaAoDjPnbHzfV4fzJhcaC6wx4oxB9Pglb26Yx1jAd91MpjZfG
|
|
vsrhN2d3jwF7xEIKUC2JrELud0fmM0C6W/jS7WoSychc0jcrZMCXHos2f+yF
|
|
dyHXuYsZIGuxGK+H/VAV2V0tYwB/aJtRexWJfvf01D+qYkC2mWyDMPYzW6mc
|
|
D80MeMFp7/HwBYkSV7h4094xoLT4dFQENi1n7Kg7kwG3Z3jXHcQW5qmSYrUy
|
|
YOcNLX92BYkCq92uLXcxwDb9oY0DttKOmxHKQwwYMwtIkign0crnM59+DDMA
|
|
KT85O/ecRG3xDK2iUQa8T1Al32PHDuiOGU0woCpgeDIe+2vGJ2+HeQYsbkaK
|
|
P5+RKHW9yL7TnARckFjPu1KG/4PnejzDuQloaBV2/II90pMbGsxLgMF6ZaUK
|
|
bNNnlvdpGwgobDhyNAJ72Dfy5wERAj7X/tzzsxT3t923eZ8oAW0J8m97sE0M
|
|
NqshMQICtfZ+r8dOFso/pCNJgE93yO1La8er+kqkFAhwOugWIYtNZOc3iykR
|
|
EJW+ey/v2vnJUX2bVAiQXlm5PlGCxyNEhXjUCFjOdftYg50san1sQouAmDmp
|
|
PD/sqv9E44a1CVhgOz23xx760X+jX5eAOPlga2Ns4/rTDR2GBKjHuXCLYrMC
|
|
C2VrgYBekZrud8Uk2ugWrVdhToBZM69SFbaRxX7bEksCJK5pLDzFvio5GJW9
|
|
n4CIVlHNROwXPEXJmQcIEL7TdjMGm5yOfnLLlgBLuWMJwdiGTWKdSY4ESO5V
|
|
5nDBppUMjic4E7AYZH3JGjvpThHXORcC2oPMM0ywB0NttCLcCLjuUuuggi3k
|
|
I2590oOATh7TpW1reTakd4AXAf3bklVF1q6XO5Po40tApFe59GoR7sN/4KEb
|
|
jYCbVxLIRexBtnilM52Af9R3ak9jCw2QrbYEAVIfHvGNYhsyi4etjhEQLjxF
|
|
DGDTKs78hgAC5G7y233DTnp4YItJIAGc/MtVnWv5SRLqesE4T7ayuG0tP5K1
|
|
d9dJArySDmgysQXpJW5qoQRkSxToNGMbOMSGKIUTMB7fX9+4lm988KJMBAF8
|
|
OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs
|
|
5Y/EDvDGEsAfJRlZja3ffpBajSPghOMu3TX/P3lgJlM=
|
|
"]]},
|
|
Annotation[#, "Charting`Private`Tag#1"]& ]}, {}},
|
|
{"WolframDynamicHighlight", <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}],
|
|
StyleBox[
|
|
DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {},
|
|
Slot["HighlightElements"],
|
|
Slot["LayoutOptions"],
|
|
Slot["Meta"],
|
|
Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {},
|
|
Annotation[{
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]],
|
|
Line[CompressedData["
|
|
1:eJwV1nk8Ffv/B3BryVIkJPvalUj2LZ93iJT9UvZ0nDNKlsLXJeK2SDcppKhf
|
|
pYWSfSmyXkVSTpFQKuscS/btMFTX7+OPeczj+ZiZ1+c1n5nPPEaBFuLM4OLg
|
|
4BjF29r+1AfN7RVtH8x+GTnQNixTyGwqS49mmY8ii66O8GH3Z+qnKVvWIP9E
|
|
17/WYzvS368T1HmNlNSyRHixSyLjGngtmUhRIbqcE/ufpq31cbkfUd3+b4zf
|
|
FIUq207d+6XdiaD0tRyFPfb1XUxU9Rc0l2/CmsXeNqTkuWjxHXG9Nisbwz44
|
|
HWMUxuxDdxvargxi1/0aE4jMHUCdhfMnu7G7zkpElweTqObt0yOt2FPrLMcW
|
|
tIeQVRrbrRF73ZWT7jpLw8ippdvrBbasyN3mU9Wj6MUx9xN52PZSi4+nLCaQ
|
|
1ZRBzlVs4r6iuAbfFLq7crcrFjtOxSH+BHMaZTwv2BSM/UWiY3d47ixKkPn2
|
|
wAab7hFw/PqVOVTayflTD3vmDseD0uB5NOjM8lHA5lPUEJ7VZiMJx1kr9hKF
|
|
0ugN1sJii0j4lWpLD7b8E/e4XUuLaOC7hsdrbMOdF6eCqinUmfQ2IwX7mH4f
|
|
c8ziF3LKn86QxV6I/B8Pv+pvJJB4PHx1kUJ/VwuYqvH9h4LRhEcfdgYY5vkz
|
|
VxETdtrcwaZnN1uG5nJCy7ULefzYuU3X+89KccEpr939JBv3HfGJSbnCBVsO
|
|
acjXYMfsYJcVB3PDk9PGr45jpxUpKE1r8wIZwLxWuUChr20Tdf894oW33aLy
|
|
idjycxUeG8XWwZPJ1WpP7Hxd+1SNpXXgZ8IWX5mnUGPlac7Aaj6Iksv3UMdm
|
|
N3zqG7UQBGPeD8q+sxTabCsoHF0nCC6XOYxlsLU6LEHISAhcODl3d89QKID1
|
|
/P5uzY2wdU91ox32SS6m1h5BYdhv+We82jSFhhQLZ+MXRUD93ubYvAk8P8S7
|
|
Da06m2FkSbbqEDZX3rDC1lObwTPMq5sDW15Hzjl3fDMYt3946TROIQ+L5NIP
|
|
/aJwTvrInuEfFGr1Cw2TaBGDIoecxe5hCvU+uZroyycO/QXbQ8OwJ8ZzHz3d
|
|
Jw6EaFK7ADZ/OPnJpF4ceNA5c6MhCllecNH1fS4B66tPDV4kKVSVpc/OyZQE
|
|
/SAbs8k+CmUNrUQYh8uAeqiz68hnCu13TegNK5CBuO/3OwnsiUZRq4JhGdiS
|
|
PkQb6qKQbtZOMXl3WaDxdGT1deL5pPmU8ZrJweeuvrfNnyg0N93/1+h5eSh9
|
|
alse1Eoh0SDLZ2V2ijB5U0+Eu4lCw1n8xxwDFEHl7K0w+msKvfjeJjV5URHO
|
|
z4WONDZSyMvW+7xqvSK0uqjwnG/A/dQjnG9pK8G/bRNiC/V4/LEnM7ESypDs
|
|
wqp7it9LF38BjQMDKhByrMGRXkwhFOGqffi3CnhIfR7KK6LQjvhMA7qkKng4
|
|
td6eK6QQxyMd81gnVVgdlGacKaBQQa/n4dKXqmCdw/P3pVy8Pg/ln932cDt4
|
|
/J//YngW7mdp1zVGU4P6v07syEmnkJTitbhE1k5wcT5z6lw0hWouL6gtc2mA
|
|
c2DIzrjTuP+8ewehoAGGlP3U6SgK3WtUVjP30YD89NmEkL8opOhf1U591gBO
|
|
o+RtdmG4X/6QCtGiCS7dtr+6AygkIyVLyLtrwYKfa7mpO4V2ZocL/kTawGtp
|
|
0KuvQyEa/Txbw14bgiKcVwS18fpSSu319dIGzWYv+0EtCnE/LCpuitSGuADH
|
|
zMuaeH3cG3NJLdGGt5P6Ex/V8Pcvw/eumpIOnH98LdhEHj+PRFtNt3W6sDjH
|
|
xRkjSKEHocqOz5l6ADKNKg2DS6gtAhlcyDaCV07q8g2xS0jBp9PeO3APhCid
|
|
s5USWUKM1fJCmSiAwE5v9tKDRSQx/mK9BM0cUgsrVbwVFlG4jun31B2WsLtF
|
|
8IfKIzaiTf5qFh3bBz4cTSWLimxUYB62PrPVGuprn0g6pC2grIWAl/lpNiDf
|
|
oTsoLrSAqL1b3zfGHYRgU/+8s1HzqIeDe3bgqB2Y50/sbh6dQ8HSIclnlRwg
|
|
QbLrCIs2hwqPN9ffiHeEtsFdKf9+mkWn5yWX1I87wWK/lR3TcRaxD1gdenPE
|
|
GcZTYpSjmmaQkWfK3iGnP6GHVtbWZT6D2iXvBjTquIDYyzuVrhnTaNvj8zU5
|
|
f7hC4qvsmtL7U+hF/w5be6FDoMyUnBZumESyHTP+EZOHgDdUQUJsfgLp3EjJ
|
|
f9R/GBJT5eQkpCfQXZ55zdQGNzDUN/BO8R5H5Xt3fY2vdIel9rOSSrfHUIbB
|
|
ZZFfuR6gvVegI2joB2r9ln1R54onjDkLxtZb/UDP7e4on/zbC8yq2wdts0fR
|
|
bNCfHMF0b6gbCDMnto4itpXasSkLH+DxbOg7kD6Ccia7qTD9I1BRwqgRExtB
|
|
bg+y/bwFfeEQcwt3XtYwKis9eIQ7wRdCmpgoTHcYGUm1L/+z7AszNhoxZzuG
|
|
kFK//9ePx4/C6z/oGQmxQ4glcMLhDnkUjhsOVErtGEJtV+39rF1p8G3GaPIE
|
|
yUJpkZkC/2ujwbmaSMPwTBaqqVtd9rPxgxjlxL+tGCy0yQsSdKr8gK3YpRer
|
|
z0LyW960Stf4gYtB1MYGPRbSYtptXVfnB6pvKgL5sJ1NPZ9+eekHC6pkZZoO
|
|
zpeOaDnz1g80PyzeKNNioW09eZuav/hBhLqlHb86Cyn7SGR4LflBvhGKlpJn
|
|
ISPfqZx4XTpIVhP/vRNgoce3ZsLs9elglhuqZYK95dOcmYQhHabdFDvz+Flo
|
|
at9SR44JHVoOuURc3cDC3xsOTqY5HebjDku4r2ehjUsi7pud6OCz4doHbm4W
|
|
YiXpbcgMooNyhfto4QqJnN4YdPiH0GHf+v1+Gth1HMaZWqfoEDwn45i/TKJb
|
|
YWZ6r8LpcNw2IC6PIpG9u/XRoWg61LN/6BQtkqhS2b1S/TIdPHKrp1vmSHS1
|
|
Oub4i8d0QO3OSR7jJArSTjeKzKGDTCh/7I8xEtk+LdlgmEsHvuz0b5HY/OnD
|
|
TysK6DDCluvJ+EGi+FDHsfJndBhLYyz3jJAoRk35xPNXdOh/WJsawyJRQHpL
|
|
YGkvHbj87NQEeklks3HYNLQf9xWeynvSQ6I/4jmEtAfpYKXXddsSezhUr6Bk
|
|
iA7PrANr476T6Kh95mTxBB3e65uK/fxKIjfesOCiFTpETvQKrPtCIuuwbSfz
|
|
xRnwH/PZcmA7iV5lXjyQupUB5uXZzzZhmzLnlCO3McDhSuRU6UcSaam0dFvI
|
|
MmD7nZLelTYSSX6OtvimwgD5mdni5FYSjRv3iPPrMWBHQ+PWDiaJrnHdr/X/
|
|
E+d7vvxc+Qbf/y7BDDtXBlzzjiECsS94RobqHGbA9YWUMDnsyGeO21c9GCB4
|
|
s5YvoQn3JzhTbtIYsMrKl/V6TSKddzT661MMuLVSwpZpINHnFBUBpWQGmPS8
|
|
N+D4l0SFSOjYaAoDjPnbHzfV4fzJhcaC6wx4oxB9Pglb26Yx1jAd91MpjZfG
|
|
vsrhN2d3jwF7xEIKUC2JrELud0fmM0C6W/jS7WoSychc0jcrZMCXHos2f+yF
|
|
dyHXuYsZIGuxGK+H/VAV2V0tYwB/aJtRexWJfvf01D+qYkC2mWyDMPYzW6mc
|
|
D80MeMFp7/HwBYkSV7h4094xoLT4dFQENi1n7Kg7kwG3Z3jXHcQW5qmSYrUy
|
|
YOcNLX92BYkCq92uLXcxwDb9oY0DttKOmxHKQwwYMwtIkign0crnM59+DDMA
|
|
KT85O/ecRG3xDK2iUQa8T1Al32PHDuiOGU0woCpgeDIe+2vGJ2+HeQYsbkaK
|
|
P5+RKHW9yL7TnARckFjPu1KG/4PnejzDuQloaBV2/II90pMbGsxLgMF6ZaUK
|
|
bNNnlvdpGwgobDhyNAJ72Dfy5wERAj7X/tzzsxT3t923eZ8oAW0J8m97sE0M
|
|
NqshMQICtfZ+r8dOFso/pCNJgE93yO1La8er+kqkFAhwOugWIYtNZOc3iykR
|
|
EJW+ey/v2vnJUX2bVAiQXlm5PlGCxyNEhXjUCFjOdftYg50san1sQouAmDmp
|
|
PD/sqv9E44a1CVhgOz23xx760X+jX5eAOPlga2Ns4/rTDR2GBKjHuXCLYrMC
|
|
C2VrgYBekZrud8Uk2ugWrVdhToBZM69SFbaRxX7bEksCJK5pLDzFvio5GJW9
|
|
n4CIVlHNROwXPEXJmQcIEL7TdjMGm5yOfnLLlgBLuWMJwdiGTWKdSY4ESO5V
|
|
5nDBppUMjic4E7AYZH3JGjvpThHXORcC2oPMM0ywB0NttCLcCLjuUuuggi3k
|
|
I2590oOATh7TpW1reTakd4AXAf3bklVF1q6XO5Po40tApFe59GoR7sN/4KEb
|
|
jYCbVxLIRexBtnilM52Af9R3ak9jCw2QrbYEAVIfHvGNYhsyi4etjhEQLjxF
|
|
DGDTKs78hgAC5G7y233DTnp4YItJIAGc/MtVnWv5SRLqesE4T7ayuG0tP5K1
|
|
d9dJArySDmgysQXpJW5qoQRkSxToNGMbOMSGKIUTMB7fX9+4lm988KJMBAF8
|
|
OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs
|
|
5Y/EDvDGEsAfJRlZja3ffpBajSPghOMu3TX/P3lgJlM=
|
|
"]]}, "Charting`Private`Tag#1"]}}, {}}, <|
|
|
"HighlightElements" -> <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>,
|
|
"LayoutOptions" -> <|
|
|
"PanelPlotLayout" -> <||>,
|
|
"PlotRange" -> {{0, 180}, {0.6152015704378874,
|
|
1.5607999649251942`}},
|
|
"Frame" -> {{False, False}, {False, False}},
|
|
"AxesOrigin" -> {0, 0.6152015704378887},
|
|
"ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True},
|
|
"LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1),
|
|
"DefaultStyle" -> {
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]]},
|
|
"HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ),
|
|
"ScalingFunctions" -> {{Identity, Identity}, {
|
|
Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" ->
|
|
False|>,
|
|
"Meta" -> <|
|
|
"DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" ->
|
|
Plot, "GroupHighlight" -> False|>|>]]& )[<|
|
|
"HighlightElements" -> <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>,
|
|
"LayoutOptions" -> <|
|
|
"PanelPlotLayout" -> <||>,
|
|
"PlotRange" -> {{0, 180}, {0.6152015704378874,
|
|
1.5607999649251942`}},
|
|
"Frame" -> {{False, False}, {False, False}},
|
|
"AxesOrigin" -> {0, 0.6152015704378887},
|
|
"ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True},
|
|
"LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1),
|
|
"DefaultStyle" -> {
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]]},
|
|
"HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ),
|
|
"ScalingFunctions" -> {{Identity, Identity}, {
|
|
Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>,
|
|
"Meta" -> <|
|
|
"DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" ->
|
|
Plot, "GroupHighlight" -> False|>|>],
|
|
ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, {
|
|
4.503599627370496*^15, -4.503599627370496*^15}}],
|
|
Selectable->False]},
|
|
Annotation[{{{{}, {},
|
|
Annotation[{
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]],
|
|
Line[CompressedData["
|
|
1:eJwV1nk8Ffv/B3BryVIkJPvalUj2LZ93iJT9UvZ0nDNKlsLXJeK2SDcppKhf
|
|
pYWSfSmyXkVSTpFQKuscS/btMFTX7+OPeczj+ZiZ1+c1n5nPPEaBFuLM4OLg
|
|
4BjF29r+1AfN7RVtH8x+GTnQNixTyGwqS49mmY8ii66O8GH3Z+qnKVvWIP9E
|
|
17/WYzvS368T1HmNlNSyRHixSyLjGngtmUhRIbqcE/ufpq31cbkfUd3+b4zf
|
|
FIUq207d+6XdiaD0tRyFPfb1XUxU9Rc0l2/CmsXeNqTkuWjxHXG9Nisbwz44
|
|
HWMUxuxDdxvargxi1/0aE4jMHUCdhfMnu7G7zkpElweTqObt0yOt2FPrLMcW
|
|
tIeQVRrbrRF73ZWT7jpLw8ippdvrBbasyN3mU9Wj6MUx9xN52PZSi4+nLCaQ
|
|
1ZRBzlVs4r6iuAbfFLq7crcrFjtOxSH+BHMaZTwv2BSM/UWiY3d47ixKkPn2
|
|
wAab7hFw/PqVOVTayflTD3vmDseD0uB5NOjM8lHA5lPUEJ7VZiMJx1kr9hKF
|
|
0ugN1sJii0j4lWpLD7b8E/e4XUuLaOC7hsdrbMOdF6eCqinUmfQ2IwX7mH4f
|
|
c8ziF3LKn86QxV6I/B8Pv+pvJJB4PHx1kUJ/VwuYqvH9h4LRhEcfdgYY5vkz
|
|
VxETdtrcwaZnN1uG5nJCy7ULefzYuU3X+89KccEpr939JBv3HfGJSbnCBVsO
|
|
acjXYMfsYJcVB3PDk9PGr45jpxUpKE1r8wIZwLxWuUChr20Tdf894oW33aLy
|
|
idjycxUeG8XWwZPJ1WpP7Hxd+1SNpXXgZ8IWX5mnUGPlac7Aaj6Iksv3UMdm
|
|
N3zqG7UQBGPeD8q+sxTabCsoHF0nCC6XOYxlsLU6LEHISAhcODl3d89QKID1
|
|
/P5uzY2wdU91ox32SS6m1h5BYdhv+We82jSFhhQLZ+MXRUD93ubYvAk8P8S7
|
|
Da06m2FkSbbqEDZX3rDC1lObwTPMq5sDW15Hzjl3fDMYt3946TROIQ+L5NIP
|
|
/aJwTvrInuEfFGr1Cw2TaBGDIoecxe5hCvU+uZroyycO/QXbQ8OwJ8ZzHz3d
|
|
Jw6EaFK7ADZ/OPnJpF4ceNA5c6MhCllecNH1fS4B66tPDV4kKVSVpc/OyZQE
|
|
/SAbs8k+CmUNrUQYh8uAeqiz68hnCu13TegNK5CBuO/3OwnsiUZRq4JhGdiS
|
|
PkQb6qKQbtZOMXl3WaDxdGT1deL5pPmU8ZrJweeuvrfNnyg0N93/1+h5eSh9
|
|
alse1Eoh0SDLZ2V2ijB5U0+Eu4lCw1n8xxwDFEHl7K0w+msKvfjeJjV5URHO
|
|
z4WONDZSyMvW+7xqvSK0uqjwnG/A/dQjnG9pK8G/bRNiC/V4/LEnM7ESypDs
|
|
wqp7it9LF38BjQMDKhByrMGRXkwhFOGqffi3CnhIfR7KK6LQjvhMA7qkKng4
|
|
td6eK6QQxyMd81gnVVgdlGacKaBQQa/n4dKXqmCdw/P3pVy8Pg/ln932cDt4
|
|
/J//YngW7mdp1zVGU4P6v07syEmnkJTitbhE1k5wcT5z6lw0hWouL6gtc2mA
|
|
c2DIzrjTuP+8ewehoAGGlP3U6SgK3WtUVjP30YD89NmEkL8opOhf1U591gBO
|
|
o+RtdmG4X/6QCtGiCS7dtr+6AygkIyVLyLtrwYKfa7mpO4V2ZocL/kTawGtp
|
|
0KuvQyEa/Txbw14bgiKcVwS18fpSSu319dIGzWYv+0EtCnE/LCpuitSGuADH
|
|
zMuaeH3cG3NJLdGGt5P6Ex/V8Pcvw/eumpIOnH98LdhEHj+PRFtNt3W6sDjH
|
|
xRkjSKEHocqOz5l6ADKNKg2DS6gtAhlcyDaCV07q8g2xS0jBp9PeO3APhCid
|
|
s5USWUKM1fJCmSiAwE5v9tKDRSQx/mK9BM0cUgsrVbwVFlG4jun31B2WsLtF
|
|
8IfKIzaiTf5qFh3bBz4cTSWLimxUYB62PrPVGuprn0g6pC2grIWAl/lpNiDf
|
|
oTsoLrSAqL1b3zfGHYRgU/+8s1HzqIeDe3bgqB2Y50/sbh6dQ8HSIclnlRwg
|
|
QbLrCIs2hwqPN9ffiHeEtsFdKf9+mkWn5yWX1I87wWK/lR3TcRaxD1gdenPE
|
|
GcZTYpSjmmaQkWfK3iGnP6GHVtbWZT6D2iXvBjTquIDYyzuVrhnTaNvj8zU5
|
|
f7hC4qvsmtL7U+hF/w5be6FDoMyUnBZumESyHTP+EZOHgDdUQUJsfgLp3EjJ
|
|
f9R/GBJT5eQkpCfQXZ55zdQGNzDUN/BO8R5H5Xt3fY2vdIel9rOSSrfHUIbB
|
|
ZZFfuR6gvVegI2joB2r9ln1R54onjDkLxtZb/UDP7e4on/zbC8yq2wdts0fR
|
|
bNCfHMF0b6gbCDMnto4itpXasSkLH+DxbOg7kD6Ccia7qTD9I1BRwqgRExtB
|
|
bg+y/bwFfeEQcwt3XtYwKis9eIQ7wRdCmpgoTHcYGUm1L/+z7AszNhoxZzuG
|
|
kFK//9ePx4/C6z/oGQmxQ4glcMLhDnkUjhsOVErtGEJtV+39rF1p8G3GaPIE
|
|
yUJpkZkC/2ujwbmaSMPwTBaqqVtd9rPxgxjlxL+tGCy0yQsSdKr8gK3YpRer
|
|
z0LyW960Stf4gYtB1MYGPRbSYtptXVfnB6pvKgL5sJ1NPZ9+eekHC6pkZZoO
|
|
zpeOaDnz1g80PyzeKNNioW09eZuav/hBhLqlHb86Cyn7SGR4LflBvhGKlpJn
|
|
ISPfqZx4XTpIVhP/vRNgoce3ZsLs9elglhuqZYK95dOcmYQhHabdFDvz+Flo
|
|
at9SR44JHVoOuURc3cDC3xsOTqY5HebjDku4r2ehjUsi7pud6OCz4doHbm4W
|
|
YiXpbcgMooNyhfto4QqJnN4YdPiH0GHf+v1+Gth1HMaZWqfoEDwn45i/TKJb
|
|
YWZ6r8LpcNw2IC6PIpG9u/XRoWg61LN/6BQtkqhS2b1S/TIdPHKrp1vmSHS1
|
|
Oub4i8d0QO3OSR7jJArSTjeKzKGDTCh/7I8xEtk+LdlgmEsHvuz0b5HY/OnD
|
|
TysK6DDCluvJ+EGi+FDHsfJndBhLYyz3jJAoRk35xPNXdOh/WJsawyJRQHpL
|
|
YGkvHbj87NQEeklks3HYNLQf9xWeynvSQ6I/4jmEtAfpYKXXddsSezhUr6Bk
|
|
iA7PrANr476T6Kh95mTxBB3e65uK/fxKIjfesOCiFTpETvQKrPtCIuuwbSfz
|
|
xRnwH/PZcmA7iV5lXjyQupUB5uXZzzZhmzLnlCO3McDhSuRU6UcSaam0dFvI
|
|
MmD7nZLelTYSSX6OtvimwgD5mdni5FYSjRv3iPPrMWBHQ+PWDiaJrnHdr/X/
|
|
E+d7vvxc+Qbf/y7BDDtXBlzzjiECsS94RobqHGbA9YWUMDnsyGeO21c9GCB4
|
|
s5YvoQn3JzhTbtIYsMrKl/V6TSKddzT661MMuLVSwpZpINHnFBUBpWQGmPS8
|
|
N+D4l0SFSOjYaAoDjPnbHzfV4fzJhcaC6wx4oxB9Pglb26Yx1jAd91MpjZfG
|
|
vsrhN2d3jwF7xEIKUC2JrELud0fmM0C6W/jS7WoSychc0jcrZMCXHos2f+yF
|
|
dyHXuYsZIGuxGK+H/VAV2V0tYwB/aJtRexWJfvf01D+qYkC2mWyDMPYzW6mc
|
|
D80MeMFp7/HwBYkSV7h4094xoLT4dFQENi1n7Kg7kwG3Z3jXHcQW5qmSYrUy
|
|
YOcNLX92BYkCq92uLXcxwDb9oY0DttKOmxHKQwwYMwtIkign0crnM59+DDMA
|
|
KT85O/ecRG3xDK2iUQa8T1Al32PHDuiOGU0woCpgeDIe+2vGJ2+HeQYsbkaK
|
|
P5+RKHW9yL7TnARckFjPu1KG/4PnejzDuQloaBV2/II90pMbGsxLgMF6ZaUK
|
|
bNNnlvdpGwgobDhyNAJ72Dfy5wERAj7X/tzzsxT3t923eZ8oAW0J8m97sE0M
|
|
NqshMQICtfZ+r8dOFso/pCNJgE93yO1La8er+kqkFAhwOugWIYtNZOc3iykR
|
|
EJW+ey/v2vnJUX2bVAiQXlm5PlGCxyNEhXjUCFjOdftYg50san1sQouAmDmp
|
|
PD/sqv9E44a1CVhgOz23xx760X+jX5eAOPlga2Ns4/rTDR2GBKjHuXCLYrMC
|
|
C2VrgYBekZrud8Uk2ugWrVdhToBZM69SFbaRxX7bEksCJK5pLDzFvio5GJW9
|
|
n4CIVlHNROwXPEXJmQcIEL7TdjMGm5yOfnLLlgBLuWMJwdiGTWKdSY4ESO5V
|
|
5nDBppUMjic4E7AYZH3JGjvpThHXORcC2oPMM0ywB0NttCLcCLjuUuuggi3k
|
|
I2590oOATh7TpW1reTakd4AXAf3bklVF1q6XO5Po40tApFe59GoR7sN/4KEb
|
|
jYCbVxLIRexBtnilM52Af9R3ak9jCw2QrbYEAVIfHvGNYhsyi4etjhEQLjxF
|
|
DGDTKs78hgAC5G7y233DTnp4YItJIAGc/MtVnWv5SRLqesE4T7ayuG0tP5K1
|
|
d9dJArySDmgysQXpJW5qoQRkSxToNGMbOMSGKIUTMB7fX9+4lm988KJMBAF8
|
|
OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs
|
|
5Y/EDvDGEsAfJRlZja3ffpBajSPghOMu3TX/P3lgJlM=
|
|
"]]}, "Charting`Private`Tag#1"]}}, {}}, <|
|
|
"HighlightElements" -> <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>,
|
|
"LayoutOptions" -> <|
|
|
"PanelPlotLayout" -> <||>,
|
|
"PlotRange" -> {{0, 180}, {0.6152015704378874, 1.5607999649251942`}},
|
|
"Frame" -> {{False, False}, {False, False}},
|
|
"AxesOrigin" -> {0, 0.6152015704378887},
|
|
"ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True},
|
|
"LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> {
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]]},
|
|
"HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ),
|
|
"ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>,
|
|
"Primitives" -> {}, "GCFlag" -> False|>,
|
|
"Meta" -> <|
|
|
"DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" ->
|
|
Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]],
|
|
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
|
|
Axes->{True, True},
|
|
AxesLabel->{None, None},
|
|
AxesOrigin->{0, 0.6152015704378887},
|
|
DisplayFunction->Identity,
|
|
Frame->{{False, False}, {False, False}},
|
|
FrameLabel->{{None, None}, {None, None}},
|
|
FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
|
|
GridLines->{None, None},
|
|
GridLinesStyle->Directive[
|
|
GrayLevel[0.5, 0.4]],
|
|
ImagePadding->All,
|
|
Method->{
|
|
"DefaultBoundaryStyle" -> Automatic,
|
|
"DefaultGraphicsInteraction" -> {
|
|
"Version" -> 1.2, "TrackMousePosition" -> {True, False},
|
|
"Effects" -> {
|
|
"Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
|
|
"Droplines" -> {
|
|
"freeformCursorMode" -> True,
|
|
"placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" ->
|
|
AbsolutePointSize[6], "ScalingFunctions" -> None,
|
|
"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
|
|
(Identity[#]& )[
|
|
Part[#, 1]],
|
|
(Identity[#]& )[
|
|
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
|
|
(Identity[#]& )[
|
|
Part[#, 1]],
|
|
(Identity[#]& )[
|
|
Part[#, 2]]}& )}},
|
|
PlotRange->{{0, 180}, {0.6152015704378874, 1.5607999649251942`}},
|
|
PlotRangeClipping->True,
|
|
PlotRangePadding->{{
|
|
Scaled[0.02],
|
|
Scaled[0.02]}, {
|
|
Scaled[0.05],
|
|
Scaled[0.05]}},
|
|
Ticks->{Automatic, Automatic}]], "Output",
|
|
CellChangeTimes->{3.9913355426284504`*^9},
|
|
CellLabel->
|
|
"Out[277]=",ExpressionUUID->"1101a597-b433-8944-aac8-4b6263f307b3"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"x", "=",
|
|
RowBox[{"Plot", "[",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox[
|
|
RowBox[{"4", "x", "*", "y", "*", "\[Pi]", "*",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
UnderoverscriptBox["\[Sum]",
|
|
RowBox[{"n", "=", "0"}], "100"],
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
RowBox[{"2",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox["1", "Cw"]}], "+",
|
|
FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}],
|
|
"2"], ")"}],
|
|
RowBox[{"2", "*", "n"}]], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox["1",
|
|
RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}],
|
|
")"}]}],
|
|
RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(", "x", ")"}], "2"], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
RowBox[{"y", "*", "y"}], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]]}], ")"}],
|
|
RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"x", ",", "0", ",", "20"}], "}"}]}], "]"}]}]], "Input",
|
|
CellChangeTimes->{{3.9918461617737026`*^9,
|
|
3.9918461709620533`*^9}},ExpressionUUID->"6e23e6bb-e46c-1c43-a88f-\
|
|
db092cf7ac8d"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"2.219251816068453`*^-266\\\", \
|
|
\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 278,
|
|
261, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913355428514004`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[278]:=",ExpressionUUID->"698a0ec2-6362-4a4c-9512-68ac03e6ab94"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"1.8936448232315485`*^-277\\\", \
|
|
\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \
|
|
to represent as a normalized machine number; precision may be lost.\"", 2,
|
|
278, 262, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991335542864294*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[278]:=",ExpressionUUID->"c7464263-6d3c-ad4b-944d-708e3b53f8de"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"1.6158106487006413`*^-288\\\", \
|
|
\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \
|
|
small to represent as a normalized machine number; precision may be lost.\"",
|
|
2, 278, 263, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991335542873293*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[278]:=",ExpressionUUID->"3b2b96d7-8ae3-e140-a8cb-bb0d54486d84"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "stop",
|
|
"\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \
|
|
\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
|
|
during this calculation.\"", 2, 278, 264, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913355428812923`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[278]:=",ExpressionUUID->"52f611be-ecf7-624a-b8a8-553d5cafe96b"],
|
|
|
|
Cell[BoxData[
|
|
GraphicsBox[
|
|
InterpretationBox[{
|
|
TagBox[{{{}, {},
|
|
TagBox[
|
|
{RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2],
|
|
Opacity[1.], LineBox[CompressedData["
|
|
1:eJwVl3k4VV8Xx81DRco8zxd3+DUoGeqsRcoYySxKStGAQpIGhFQyZCZCSJMM
|
|
lTGEynAviRBChlIRQkh47/vPOc/n2c8+e63vXut79pZ38TzgysbCwqLBfPz/
|
|
/ae/sV7pVhwhYhs/VB95guhIF/PX7T4HhvW5HQJ39wAKt7qIdQdDN8VyT2+q
|
|
NZzf/6iLvfsOGLkVTT5MdYUNv0TvLHZlAbdNCP+OVF8YqDTznO0qgvmjlV1x
|
|
yaGwV+nH5+muWjAMi2mRj42Hxa4d8VNdH+C+kRHJ2z8H6nY/yG7LGoa+cyWz
|
|
gz9egNRA2VcX6gRUXE5W+hZSDSwzZ5MaLSbg2rUit/N51TDCRTbe7DcBBNvE
|
|
h5nmanj6X8rT5dcTcOVFuZsjbw0QVy76JNn+gj1qKjXPzWvgsLQOW0vwJPyn
|
|
fFHocU8NtNH6I++OT0GHz0XKue+vQej04Ufcu2eA5Efzzx2rAzL3/bf7bWeA
|
|
r+rpjZ2LdYBZX4eST83AzOaQ2je89XC6+4wkNW4GSq703iwk10O9/qWI/aMz
|
|
IDTSEj5xqh58pJM9kq/PQi0o/Jv8WQ/tLR+2Uuhz0PFJsvjblzcw5i5i7jM4
|
|
B9q9wurtU29ghcPh1KvZOSBfsx0uWH0DZJ0v982l/8C5DvcyPem3EPxgUsjH
|
|
4w984Vm+Wm37FrYGrpuvFJiHwDNCDaJNb+HOlr0VZtYLsDvuCF0s+x1s6rU3
|
|
2OW2AD2Dh/gPFbwDesiZdkrAAlTr7bqfUPkOuLrjfvJkLkB/2+EXXzreQcCV
|
|
Ycm68QVoi2JfN8DRAMeaAy/tCFmEHz2TNG+XBtBwrdglV/wXZDZfnBgTbIR2
|
|
/tZG/rd/4e+e5OAYmUbwKh2yXu7+C1IPVFeoao3waO0aj56Vv3CSZSVtJ9EI
|
|
skV26XHGS7DRtFaz6kQj8KzOrfAMLcHxhozXhqWN8Clpc820wDI4lOrnnjZv
|
|
gpT2x+vPKy8Dd2iZ1H/2TeDAr3L4rxZzfHR5dMClCfquSa+wHV0GjzcZJ4XO
|
|
N8Ggx5qdQi+WofWCreDr1CYY0x8p0bBfgS0fPtFVRprg4dXD3BVnVqCmbL5t
|
|
YrwJTpb32EDwCjhvCBDNnmuC8U1tcwaPV8BIg3zkC1czTElUqdsvr8Bx/qrB
|
|
dNVmWJhKfBaQuQoZ766bKbs3QxlFcHX1xSrk7ZCjTXo1w8XjkWYhTauQ+uad
|
|
4cMLzfCvN2QiYmYVPnP4af663gyBw6XCrQos6D47zVGR0wwhLTmWgz4sOBxm
|
|
MODc3wy3sq+2somz4hDfy8WR3XQw3ua+UViRFQ+fGxFMM6IDT/0BaxUaK8b9
|
|
bZbba06HkGHlXhNdVmw4WSBxyoEOlxToX+PcWfHeTs5GFi86eGSIrZDKWfGT
|
|
19W1Tkl0oG5m09WqZ8WOm2R75TQ6/Kj+ec2khRXnYlaq+jPpcGKgitdriMn6
|
|
Gv1Kj+ngLOMqXLaGDdUHKBUrlXSwuFtINTnIhrxWZck/P9NBgJrq6eTKhisu
|
|
A61vv9ChpSKkyNOTDaeW1++PHWXG32urGXeNDcUlCnayTNBBT2Jl9+fHbGhE
|
|
PkQlL9GB5dG3sMkXbPidMi8avUKHKq22RtYaNrysvu7UN1YG6Nhnm5M62HB/
|
|
lK7tSR4GbEsyPuj5jw1l3a+VvBZiwG+VbelBXOxo8MnKrFiUAQUl0l9iBdhx
|
|
dNu/0wkSDKB1TR0vVWLH9bc/HNgixwCSSOI51n3sTL12aZeTGTCSE/hC0JYd
|
|
tyP/DU0aA7K2n1xQPsKO0Y4jwXmbGCBjveuKsS87Cuisvem0jQGiccM3YtPY
|
|
MelynLvULgaIUV6ELOSyo+m7v02cwACJ2rCrTgXsKKpT3jGEzPlTar4qdeyY
|
|
W2s67afPALnrS54RdHZsF9Jct3kvAxRkGCenP7LjztUnA70GDFA29XKuGGNH
|
|
pd2VNfwmzHiHdQ/K/WbHB+35nfGmDFC9KGgTusSOgQd7XwiYMYCa99LEnJ8D
|
|
FzO/D37ZzwB1jmWNYXUOVIB6l9/WTL1SW7YY7uLABGdNHTFbBmhszaA+3cuB
|
|
f+9Ur26xY4C2824FP3sO3K7KdVjXgQE754Wk+1w48MqabrYdBxlARH4V1T3N
|
|
geSJL9lyjgzQrbzBt/YqBw4+EP7T6sQAPcuDPF7hHChOi8yPP8QA/R9U9o8x
|
|
HOi53OtnfpgBe4NWlrVSOdB5tdRmmcmGYu8X0rM5cM2Fr+b3nBlg/Cxzhj2f
|
|
A3ez09y2H2GA6V7vX24lHFh2yzG7mslmn/W/M2o4cEnPlJdwYYC5j8jI1iYO
|
|
TEvuSS1g8v61Y/2J7cx8d0w4ix5lwIGssk//+jhQ4LeX0zkmW2nd6jjylanP
|
|
O/uE10y2ee/Y+naSA498zBLgPMYAuxP/NVEWOfDlPrO2nUx2WFmtj2bjRCNv
|
|
189uTHaMb6ueW8uJ6lELWjeY7ES9X+4gzIm7vsuMpzH5UJ3Pi2oZTqyr/rOQ
|
|
y2Rnh70FSqqcGAg5rtlMdpkWfXxjCydGBNjsSGDysfDvOb+0OZHTdZf3JSYf
|
|
l63IsNTnxIXaWBlbJru9jEgt3ceJKuQUgsTkk/sOJUjbcmLDbGL3d2b8p0Y2
|
|
xQQ7c6K5du90JpNPB7BGfHPnROq70igzJntsbA8z9eZEX6GIkkmmPl4Ps4MK
|
|
L3HiKyjxCGXyOTx/SSSMExPY7pevZ7JPl4FfQBQnnnpUlRHJ1Pu8h/i5wSRO
|
|
5BUIJLEx2f9u5YlHjzlxduUn6R1z/y6qR7qsf8GJtQ+ynogx+VLTYSefKk5M
|
|
2yk6doi5/4ELbJZEGyd2diQlNDLrJTiqY9/9Hk58wD4q9ItZTyGkXEOeEU68
|
|
cuzMYW4mX7cyIj784UTWtX88xeyZ/fO8RYKNlQuz2uZ8F5n1mi9oNb9lLRcu
|
|
mZ0+xbBhQOeHQwUxslxITtqjZ2bF1GfrSMRrNS4MPBO0dekAA5Zj3N2n1blw
|
|
9PfoplQLBihZ+ChYGHJhPKHh9ZzZL6UFiyuBB7hwWmBXLW0fs94ErvYWOHJh
|
|
cUwWpDD7zbv1RpzAWS6MvSvWa2rIgNp997jeJ3Nh0ojNaXFdZv08VRpevc+F
|
|
6cE1U1Rmv/9Y96h6Uz4X2o9796sz/WAD/fmFqFoupK+gsJQWsx6Mm36Y/eRC
|
|
adfuFpvNzPj2zrUwdnJjn/6By5ekGBCde/Hx8l5udA6stG0SZ8bLxRJOs+DG
|
|
2bZvUuuYfmb6Zo3ubVdutP7ZGX5qAwNSdssVm0Zyo6brcFsKJwM00SSxeYAb
|
|
JbfFx9X+pAP93nvvpe/cmOtZIGA5xvTvVev9lFlu/Gf5cbVrhA7Xq5x5b/Hw
|
|
YHGwqkM10787d54PMN7Cg4tPns9ytNLBWyvzcGMwD1ZxKAV7P2P6dwb/rEkE
|
|
D2o4NkgmMP8HCtyXwlviefBeX7vsswd0eN9hU9iex4Pemnkh9ffo8J/XOvb+
|
|
Fh70PdwRfTmKDmO5frm/JXjx1Z/POpvO0MFRyGxCspgX10ssdL+Rp4N6QEVQ
|
|
eiUvDhw3taiXosOaIVUR+be8aHB/mlQuSoeyZ+xA+sSLEmsceSP46CBiUha9
|
|
eZUXLWSCQhsXmuF9kNK2PSZrkGvLqFYRoxn0J/9e9Bheg34fTNnPnW0Gf8M4
|
|
8uvxNfgofbD7xqlmyM+k9Qj+WYMC9wqsU1ybQczKWauMZy3mSx87mmPfDOOl
|
|
b+bZ/1uLnOKr94/pNkNscLRP8oW1uCnL0zVyfTMMCZM86vnW4fuDE5frc5sg
|
|
aKfFEQlNPnzQfWfZvbYRDA+l/96hx4eD+1676Jc3An/gz2vWpnyYFlbnKlbU
|
|
CHfrQnOjnfmw/Wr66aeZjVBqXP6T6wYfNn5li4kIbIQpO8XzM5/40KR1J11l
|
|
VyMc8p27SQ/gR+GTYpEiRQ2gnZ/8/Er1ehwIapqYiXgHpxemAxv4NuCkprvj
|
|
Db03sEgR6KdZb0TuxrpKhYe1sPPxk4yEBEFUUPoUsCRZA9MbjZ1taoWQ39zZ
|
|
ui+zAkYinG3OcYsg6Zzeq45/L8Fo0s9oVEMUT8ZKHFflK4bxozzez6+K4aq1
|
|
8+beyHzm+V2U7XqtOLIuGeyK2ZwH310M8nTeieO/FtEnVRJ5EJHpZzbVLI6n
|
|
CwS0/3LkQbtMd4r9R3Fs3TD8MPXTA3AWT1anjolje9nv2OvXHoA/v6RrG58E
|
|
igVf2sfakwtPFmQaJO0lkLeu8KZbTA5sZJAiCyYl0Mu8d5252n1Ymdyc0zQr
|
|
gTvOby9wFr4PPzbqVI4sSuAKY3U6iPU+1NqZ/xDjkESTjGs6M5+ywHvEb2+Q
|
|
mCQ+Ehkxi76VBR1LDSsWupLM/izIejadCYnkU54zdyTxCtD6HBozQCr82X4N
|
|
DSlkkIPnxY3T4FH+07pFbSn01cwS+UhJA82PjzVegRTeVpWszeNLAyuFPCl9
|
|
IyncNeUVk9x2FyIqM8YsHKVQUbek657DXViaigk8EyyFOq96ZLafTYUee5+C
|
|
7BYpdAop2be1IBmSKFoCgiek0clpB+/ouQSwNmFEV52SRqNK08EhhwTYeOrI
|
|
hpNe0iiz83rAnF4C3Hp0Y+Nrf2nUbrN7byeYAFfUeoQ8I6QxwuNygciLeDim
|
|
EiDeXCiNwt6naa7/4mCL4iuFa/+kcWiH6tBSciz80rO4/x+rDEa7EC0BIbHw
|
|
yGVUsYdTBreZbVy73jMWlLL4lLesl8FZSwNDT/1YEJM/pDIgL4NjUdI3hafu
|
|
wIrMKkXHQAaVv4fO/jK+A00SuttnYmRQ9L1UwTX+GHgv84zEkSiDq3+L3UoW
|
|
o6FTQVpM+K4M/pQ3U2IZjYYv5MW/GrkyyMev7P6+IhoWtAtrLpbLIJgO3jh5
|
|
MhpIB+VN2YZlsPFZ05GphCgITmU9umGbLD62fRuhqHUbwu95WiloyWKo3fD5
|
|
O0K3IfL+5z3qhCxi7UqJylQEJD8uU7U2lEWF9ntN9Q8ioKDi7K8kR1nkUPrN
|
|
9lYsAvp7v/jLhcpiEyPWuZn1FmhL1UZv6pTFL6JBJmKT4TCkqNT/vUcWlQI9
|
|
aDvbwuEGJYySPSCLVu8krK4Uh0O3tvFbse+y2P2PQ8jpQjj42X9YYv0niw8e
|
|
Tn0OYg8HB5Oz6j8E5NBuT/QzK9nrkBDOtDcNOSQ2y/oEnQ6FkxFb34hryeGd
|
|
HQt8egdCgYge/nleRw7dPglLy2iGwmjiHq0tKIef+bV2q3KEwrYHvB05RnJ4
|
|
m5ZnFJwWAh/exPBGOcphfjp5k/bHa8DPnuVzJFgOX2wezlawCwauxWrL6RA5
|
|
dN3ky7MTgmHl1+etQdflkD3ZPuQcKRgme8SnMyKY88kDDhpzQfC+KObMYIIc
|
|
SoTIpIvEBcEdl6Djhx/LIaP7VbBCVyCI1DrbOXXIoX79rLPr8BXgL72yY6JT
|
|
Dh++2mjiX3oFuPLvilz+JIddAzZzNbevwHxyd8fdfjnUNb1U90PzCnSf3W/R
|
|
N8Zcb01aX1bMZUiRR+ODy3Lo+YNN8KLpJZAJkt1pT5JHvaNf2by/+kO+N4/C
|
|
Z1V5nLgZesa01h+I49PcRyjyaNVYNG2R7g9OJnXtbpvlcS+rZdKgjT/cFT5x
|
|
6oK2PLZumrvH3XQBxB/lpySayeN41dyyTakfCLXvWvx4Xh7N4znb24t9IfsN
|
|
acDeXx7/ma2y9cf5gnrp+jefA+SRkHHhX3/eFw6kfYkeDZTHkulJkVFNX4g5
|
|
Eao6d1MeRYModxxrfID/H91W6J48Rjvo59h0egOvsuPLA+/k8eqJsEw36XNw
|
|
UhyMHzfKY7NW69YGjnPQxKfQz06XR80k/uN7xs9CxJ9vnC/ey6PCQLxOUsVZ
|
|
4G/wthbtkUf37W4n7h48y+z3W7O94/KYnHeUypnpBVKF5VtdNyqg5NFASbkg
|
|
D7iUk/b2lZAC6o2vLe6y8YDPyYEOIqIK+Ll7wauO6gHpwXuD30kqoJvd1usa
|
|
n86AnNWHNjVlBfS93qoZuu0MKM9/9/q1QwFFvpgJJ8yegv92iT/zc1LANR9e
|
|
EuLJ7lCs6L7E5qyArJfyJ4fPuoPmmjKDSBcF7Osutxoxdge9LrvB7BMKOL1U
|
|
gKHLbmBzNmnDh7MKKHjpSju6usHVHFEfapgCOqeIbXMnTsB7PhGtL/kKKGFY
|
|
ea1P2BWsZ11DTxcq4Na3mhfGZo9BT8+LtvliBWwp93yh0HEMRh5Yn+QvU8Cr
|
|
xelk+dhjsKAbn6pTp4AeyR6TIHgM5M8LrcR3KWCk6U+ej5JH4Vz/xjpjFkV0
|
|
khra/t30CDS8dXz1iE0Rj/SeUiWrHwGZZ7klazgV8QVPQtFt8SPQdFX7SROv
|
|
It7ekzte8dUZFORd4o0FFVHpzsfEgmBnaDtaeMKYpIjLbyNuFAQdhs3fzdcZ
|
|
mypi4bXiKNVHjhDWlsz1yEwR2U4ceVJ2xRH6yoZZ1lgoolXvprNhlo4QftNv
|
|
rtFaEU305jralg/CIOVev9FhRTSyeYWq1gch2uNXgdE5RYS56RMJ/A4wORNh
|
|
bZSkiMmWRW2pj2yhrzvTJi1FEXMFT/S1h9lC06uXttN3FTFONllu11FbyL4+
|
|
aJ+cqYgcS8YnsqRswUFy26HvjxRxcP9Tv8IYG3ij13v8xitFrEngLM4PsYbU
|
|
GLULjUOK+HNdbF9yhCWEnyf8pUcVsaIykeOmhyWcP2h58ew3Rez71+iSvd8S
|
|
9itfviQ+ztQvc3HSRtgSuMreB7rPMfMJ2JL2NOMAnB30u8HLo4Sumsles1UW
|
|
YLDpbYoRTQn1R120IsT2gx2XodX7TUpYPD356vJfczj5uZHPdqsSak5/GtlR
|
|
bw6RtxiBx3YoIS01YyrPzhw6v3Ucv6qrhL0eNYZnQ83gWMbw1hfWSqiVxLKs
|
|
8csUgjewNstdUcISqewHMYtGEDcWHPIgkLmeucR8Kd0Icqs5iP+uKaHGo9M+
|
|
KhlG0HSGp1AnXAmTJK2OdRsYwYam9Yk2d5TwKaNQ+WqKIWQEyxyNyFXCRa2z
|
|
sjdNDaBqRmdpvkUJ51eLipYH9SGTXuJi2aaEfBEanbVV+hCSo96U366EO250
|
|
l1Xc1QcjW0qya7cSWlsuPzCw14eOcokd7V+UUOGdz9Wajt3wI2jxXP6sEkpw
|
|
3lX826EHIgIlP45JKOOWMJlPrxYQFse2HqiRUkYX0p3kC30Ifa/zyyRllfHD
|
|
GPH1UA1Cpndu+AdFZeTI6dzyNByB2hVPQpoyil3mZjWWRNBL93GRRGXkNNrU
|
|
lBlNgAd1a0+bqzL6H1DsXxOoA77zEn8PuynjqmrI5rR9OnCpll3i10llbJaN
|
|
1A2V1IFbdh/t13gpo9nzsEirUm3IC7nwSe+iMnp8u3Dty5wWDPVVdRdHKuNQ
|
|
T2qCfqAm2Nw26YovUcZ4id3e71u2g5PdtnnFcmU8Z31cSSV3OxxTlBYtqlTG
|
|
h+seHai/vB28y37ZtLxWRmI/4f6eth2iR2M6uejM9S3UvRVjtkHTru6PfoPK
|
|
SL11Ic7mmDrs+nWsw56XhO/Zv1lJaW8BkQqDrMq1JIx8Y/4hTXIL/LpO9pLl
|
|
J2Ebq2yGxfJmSJefWju6kYQhy1uWzV5vhhWrgN1eUiRcp64emmSyGaorYorC
|
|
NpGQI5LyxPTDf6B7oyq62JqEi15R8RcjKCBhk3lIxI6Eh9u7WP86UOC3QgjV
|
|
34GEjyajr9PVKJBVadRAHCahJA91wK2BDGxTHauNbiQ0sfMY8eIlQ53NT4/B
|
|
ABKWlK19YpGiCnuUxPbxZZEwLN57SnBWGZ5PvJE/lk1C+tmv1u10ZVAq8f5T
|
|
nkvCG5qGXh05ysBh3HrP7TEJBTeW/pdipwy1nmG/656TsFV8/WfV10pAVMwm
|
|
XnxHwpacEYnlNEXQONA29G2chMopqX4T1+QhV/JqCTFJQv0hYSO1Y/IgPEqN
|
|
iJ8mYQHXTVKqvjzM+oVv3/2HhI5bnhbKcslDURqEp6+SMFzowKesW3Kw6ftT
|
|
5vVABedmzCfuoCyoBt68ULtDBfWeG9wa6JWESp0cTlNtFSTSlY6YZ0vC/vnq
|
|
Ox93qmCUFsNZ5YwkXPCYezKmq4I368hr+FgkocHR+Qu/qQruz/wdkEqWADct
|
|
DeODzip4XGFZhXpHDP7N7u8acVHBb2+LJenOYhBdcOqYh6sK2nyWO9m4SQxK
|
|
VTKvBJ1UwWqGQ/inFlHgEVlX/MBHBQfr/0oSG0Th4e8vkrPhKviQ5bVvZK4w
|
|
EPn/8i7fUsFFlSseZReF4YO7qAZ3pAqOtUb+3WEuDH8HTfdLxKrgzHjxJdqi
|
|
EBi3loRgmgo+aw+g/dgvBD8e356IKGTGN0G40tYLAtlVq1q5RwVbBM1LFeoE
|
|
IErB7O+1PhXMG43b/S9LAGYHXLYP9augSfPQ8vprAlDlEPE4fVgFpd44+Y3s
|
|
FoAD+wcSRSdUMFA4qelM9Hrw1wn14mVRRf19ahlOL/mgYUOb/ISyKh4vne8e
|
|
Ml8DtNZRRxNVVdTQC9WvkFoDdyL+Jj4kq6Lc0nz+9HdecORW4j++SRVzWwqX
|
|
fEN5YfLf+b/9mqpYsm2Ot7mGB0TGpNrfm6hizRfHLhlDbnCtcgt5flYVd13Y
|
|
F+IUzwG/zvzw2+Ojik5bX9l4uHPABenTpzrPq+L0garJrl0ccPOS54GFAFXs
|
|
TN3TWfSNHQq0z8vtDFPFZfofB19gh38vr1XWpaiioZaTRMYKK4Qd5yywSlPF
|
|
ri/5rNNdrLBe5Pr90XuquNDC+Ty6kBUUfG/e5M5Rxf3XEuTKXVnBQD3GzuSZ
|
|
Kuav7R7KbmOBO8/SZz/UMfPx57Iu8VglpA7LjR19q4rE7fvtD8mrRA5/Vu9s
|
|
gypOhNbxqH5bIUrP5NSKtKjiAeKbS92RFeIz5Um0Q7cqCsy//WjntEyo5pVR
|
|
h8ZVkWH8O1/qzBJRndFxbFpYDa+HRFlYjc0Tg6byh8+LqWFO08FTTc/nCZbF
|
|
M/ZLEmpYne+x5lHQPKFnwW3GKaeG8RH+T7Kk5om3rNo7xMlqqHeuPPWo7R+C
|
|
7nKPV5dQQ+40j0j/gVlign+c/S2q4cGV5RJK0SzBX6G5YrxbDaW38dvqhM4S
|
|
+wU//LYyVEMOwaNyXtRZor2Oo8/tgBqmhcsekLo6Q/QoncyPPq6G3zK7+r5u
|
|
+00svX+ZJ+yuhr7P/Bak+X4TUpfZ76ecUkOWqw/rH4xOE04f7yZme6mhRXrs
|
|
t4LEaWIwtDWw9KIa7v8eOXp9dYr49nWb5WCkGpbJ8L0LqpgkZvNW5zeVqOEp
|
|
22arwoyfxFebvRk3ytTw3TNty5QTP4lujtuGwxVqGMASnz/z30+iwlkiOaFG
|
|
DXnXZmrNVv0ggsW2ay83qmGvuqysyMh3QiD85KWmPjVca2mVQdMbI9g0CpWU
|
|
BtRwd2JjyKv1Y8Ts8Dz98hc1TDUjORZ+/kZ0Qaj0lq9qyL774fzri9+I9Pl7
|
|
VYmTauggVfbiXNlXgnriI4srGxn5gjW5fA1HCRlhqYdVHGQ8JBa/blJylBCo
|
|
c7EQ4yZjyq4LX19PjhAzMlOZzWvJWGm30c8zaYQo71yze6swGQ2xZalrYpgw
|
|
3IuhqypkvDiW2WCRN0QcVX7Mm7KPjL8/q3JV2A4SF98cOknaT8YoNW8bza2D
|
|
RLTrxuaiA2QUvnqxj5tvkKjM8Y9otiUj583E6u3XBwghkuH65SNkTDtjQv/n
|
|
1k+8JY0KOZ8n43hShp29UR/R9zbJd/wCGdc/WSfDwtNH/D5u2nkhgIy+UyTF
|
|
He96CdkHxYkxgWQcVdbRsDDoJS6oBEvU3STjnEQ/p7BZD0FWlZUj3SPjD5mo
|
|
wX6fbgIbPgQWZZIx3N5skWVnN2HjFvaFyCYjz4TX5Uz2buJa3kSW7UMy83zh
|
|
nm4f10X0qVYq3ygm46UsrrgbFZ1EpJo9ZfwdGdssD5/mlftITJNjNYqmyLj3
|
|
60jGH+0PRDcd9wjOkLH/DIOrf+MHosbjl6XPHBmlp592iv9sIyKLjM5q/CXj
|
|
HbuADRF32wiyNsuTcnYK7pJMqTdkbyNcjM7I14lQcGrqshGlupUw+imxWUmc
|
|
gjebvdR/XWglNt9uIEIlKXj+oN7vPeqtxMp7RUcDOQq6fBLHZw9biFS7noRm
|
|
NQpyqg22G6YxiI4TBus6dlIwL72y6G56M1HBOyexHSi4TjBwWelIM5H1OEst
|
|
QZeCUfjVabNSM+E1ubzXbi8FvZLjNOmPmwg+v+dBfeYUHCo2KF6qaST2hsnP
|
|
j7hQkL9zO89BtgaiNHvpy1w4BTnk+n+G9dQTGrt95o1vUdCJzqZ85Uk98eLL
|
|
+LqM2xSUaYju7rxSTxTJ9O8wvkNBNfupuw+V6oknSTW301Mp2H4x36Pap47I
|
|
iAjVMsinYOxQQAg3qZaQoayY3S2g4MJAtu6r5ddEWuP5Y9NFFDRQ2tzZ8PE1
|
|
kcLlFpVaQkH7j7H0/rDXRFyg8ehkDQX3GWSozYzXEDd81scktVNQIV/dzja6
|
|
muARDM+d+EjBTdyXygeMqomwQpZKvW4K2tjuoKyyVxMhv6a/jvcxv8d11XXF
|
|
v4q44taxU/crBU8yppb7Tr8izjkmj31foOD9DbraYmcqCAd9RdSRoaIgZPGM
|
|
tpYQyx08/HVyVBSKOH0/Mb6EyHD91WusSMW3JwPPth8sIb6Glfk5qFIx5bJB
|
|
15fvL4lzjebP/LdScSmuOVdz3UviptklmdK9VHTqdPRkuD0naANHxsGIircD
|
|
BnjCNZ4T7z0Nyt+ZUPHm9+DnZRzPCZGYjTZd+6m4z0ue70pWMZHVnnf7jwMV
|
|
eYKjWs4MFxHldh//bfOkYnH8Rmnei4WE0/fypsqzVDRUNN1WYVZIsFzMSNL3
|
|
oaLI6p+wDsVCYm/qqW1W/lTMfgdbtVoLiA+fWU97X6Pii9ppu0JyAfHD5b/e
|
|
wkQqPlkWZdn67SkheeZ62X81VNQpcuPgj3pIRK4e336rloqX+TtP77J8SLDd
|
|
2Vv4rZ6Knje0s2ZEHxI/XnI+zGik4na+qO+TWXlEOUtI0sZ2Kg4CezZP9QPC
|
|
IS7Q788oFQP1VTkb+HOJFpLzzIExKpa6i1cP9uQQemXg+ewHFbkEHRU8H+QQ
|
|
5P6V426TzPzzq76N6eYQiyqXbXoWqKi1231u26VsIqnCf3vVWhrSt5PG7Tnv
|
|
E+vM7Asl+GkY+Cqm2r47iwgc1KT5CdDQreLCpprHWYQb54LSZmEa/vKNPPbK
|
|
MovYYX5eKEuGhrGRR3mO5GUSnUPnZkK30HCTqjvlztEMQnjN6cJ9tjTUXNQ7
|
|
oal5l8jeffnilD0Nfzwd3DsxnkpsvRy5O9aRhkdcwqeOZqUSZlMFH7uP0JDD
|
|
hosctT6VCOucWzx6moZqUeHDD38nEwtZV/UuBtHQl3T909GeRCKsL3qtdAgN
|
|
j9bJ0w6lJBJCIlkd1WE0rLuUabPikEhsvlF/nDOChq4uTRVq/QmEuyfvregE
|
|
Gvr7ySWyjMcTPTqx7bmPaWhJ05m3U4oj3Hyz7xrl0xDTRffNT8QSf/JfuI4X
|
|
0HBHVICrYmkssVGhe37LSxqa36ZbyprFEiY80lKvamjoKTArFhh4h6jsyD3W
|
|
/pGGB+2LnKqXowlj/lLa+W4aXqdWOKW0RhPdBo1/xHppaJS17uQv5gVptvxn
|
|
+KFBGo64Hx35ZxBN0DI3P/3+g4YuAiWWyupRRGWP7vmICeb4mu3XyP2RhLGQ
|
|
JWyaouH4gUqL9TcjiePXfdt85mh4N5VnwWPkNjFbE5YiukDDU1d1vEfv3CaC
|
|
/yYeLf9Lw/T32h1b9W4TAtseUp2Wafhn2/Ci1e8IIv1M+dzqKg3jGnY1GN2P
|
|
IP4Hz0wYnA==
|
|
"]]},
|
|
Annotation[#, "Charting`Private`Tag#1"]& ]}, {}},
|
|
{"WolframDynamicHighlight", <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}],
|
|
StyleBox[
|
|
DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {},
|
|
Slot["HighlightElements"],
|
|
Slot["LayoutOptions"],
|
|
Slot["Meta"],
|
|
Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {},
|
|
Annotation[{
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]],
|
|
Line[CompressedData["
|
|
1:eJwVl3k4VV8Xx81DRco8zxd3+DUoGeqsRcoYySxKStGAQpIGhFQyZCZCSJMM
|
|
lTGEynAviRBChlIRQkh47/vPOc/n2c8+e63vXut79pZ38TzgysbCwqLBfPz/
|
|
/ae/sV7pVhwhYhs/VB95guhIF/PX7T4HhvW5HQJ39wAKt7qIdQdDN8VyT2+q
|
|
NZzf/6iLvfsOGLkVTT5MdYUNv0TvLHZlAbdNCP+OVF8YqDTznO0qgvmjlV1x
|
|
yaGwV+nH5+muWjAMi2mRj42Hxa4d8VNdH+C+kRHJ2z8H6nY/yG7LGoa+cyWz
|
|
gz9egNRA2VcX6gRUXE5W+hZSDSwzZ5MaLSbg2rUit/N51TDCRTbe7DcBBNvE
|
|
h5nmanj6X8rT5dcTcOVFuZsjbw0QVy76JNn+gj1qKjXPzWvgsLQOW0vwJPyn
|
|
fFHocU8NtNH6I++OT0GHz0XKue+vQej04Ufcu2eA5Efzzx2rAzL3/bf7bWeA
|
|
r+rpjZ2LdYBZX4eST83AzOaQ2je89XC6+4wkNW4GSq703iwk10O9/qWI/aMz
|
|
IDTSEj5xqh58pJM9kq/PQi0o/Jv8WQ/tLR+2Uuhz0PFJsvjblzcw5i5i7jM4
|
|
B9q9wurtU29ghcPh1KvZOSBfsx0uWH0DZJ0v982l/8C5DvcyPem3EPxgUsjH
|
|
4w984Vm+Wm37FrYGrpuvFJiHwDNCDaJNb+HOlr0VZtYLsDvuCF0s+x1s6rU3
|
|
2OW2AD2Dh/gPFbwDesiZdkrAAlTr7bqfUPkOuLrjfvJkLkB/2+EXXzreQcCV
|
|
Ycm68QVoi2JfN8DRAMeaAy/tCFmEHz2TNG+XBtBwrdglV/wXZDZfnBgTbIR2
|
|
/tZG/rd/4e+e5OAYmUbwKh2yXu7+C1IPVFeoao3waO0aj56Vv3CSZSVtJ9EI
|
|
skV26XHGS7DRtFaz6kQj8KzOrfAMLcHxhozXhqWN8Clpc820wDI4lOrnnjZv
|
|
gpT2x+vPKy8Dd2iZ1H/2TeDAr3L4rxZzfHR5dMClCfquSa+wHV0GjzcZJ4XO
|
|
N8Ggx5qdQi+WofWCreDr1CYY0x8p0bBfgS0fPtFVRprg4dXD3BVnVqCmbL5t
|
|
YrwJTpb32EDwCjhvCBDNnmuC8U1tcwaPV8BIg3zkC1czTElUqdsvr8Bx/qrB
|
|
dNVmWJhKfBaQuQoZ766bKbs3QxlFcHX1xSrk7ZCjTXo1w8XjkWYhTauQ+uad
|
|
4cMLzfCvN2QiYmYVPnP4af663gyBw6XCrQos6D47zVGR0wwhLTmWgz4sOBxm
|
|
MODc3wy3sq+2somz4hDfy8WR3XQw3ua+UViRFQ+fGxFMM6IDT/0BaxUaK8b9
|
|
bZbba06HkGHlXhNdVmw4WSBxyoEOlxToX+PcWfHeTs5GFi86eGSIrZDKWfGT
|
|
19W1Tkl0oG5m09WqZ8WOm2R75TQ6/Kj+ec2khRXnYlaq+jPpcGKgitdriMn6
|
|
Gv1Kj+ngLOMqXLaGDdUHKBUrlXSwuFtINTnIhrxWZck/P9NBgJrq6eTKhisu
|
|
A61vv9ChpSKkyNOTDaeW1++PHWXG32urGXeNDcUlCnayTNBBT2Jl9+fHbGhE
|
|
PkQlL9GB5dG3sMkXbPidMi8avUKHKq22RtYaNrysvu7UN1YG6Nhnm5M62HB/
|
|
lK7tSR4GbEsyPuj5jw1l3a+VvBZiwG+VbelBXOxo8MnKrFiUAQUl0l9iBdhx
|
|
dNu/0wkSDKB1TR0vVWLH9bc/HNgixwCSSOI51n3sTL12aZeTGTCSE/hC0JYd
|
|
tyP/DU0aA7K2n1xQPsKO0Y4jwXmbGCBjveuKsS87Cuisvem0jQGiccM3YtPY
|
|
MelynLvULgaIUV6ELOSyo+m7v02cwACJ2rCrTgXsKKpT3jGEzPlTar4qdeyY
|
|
W2s67afPALnrS54RdHZsF9Jct3kvAxRkGCenP7LjztUnA70GDFA29XKuGGNH
|
|
pd2VNfwmzHiHdQ/K/WbHB+35nfGmDFC9KGgTusSOgQd7XwiYMYCa99LEnJ8D
|
|
FzO/D37ZzwB1jmWNYXUOVIB6l9/WTL1SW7YY7uLABGdNHTFbBmhszaA+3cuB
|
|
f+9Ur26xY4C2824FP3sO3K7KdVjXgQE754Wk+1w48MqabrYdBxlARH4V1T3N
|
|
geSJL9lyjgzQrbzBt/YqBw4+EP7T6sQAPcuDPF7hHChOi8yPP8QA/R9U9o8x
|
|
HOi53OtnfpgBe4NWlrVSOdB5tdRmmcmGYu8X0rM5cM2Fr+b3nBlg/Cxzhj2f
|
|
A3ez09y2H2GA6V7vX24lHFh2yzG7mslmn/W/M2o4cEnPlJdwYYC5j8jI1iYO
|
|
TEvuSS1g8v61Y/2J7cx8d0w4ix5lwIGssk//+jhQ4LeX0zkmW2nd6jjylanP
|
|
O/uE10y2ee/Y+naSA498zBLgPMYAuxP/NVEWOfDlPrO2nUx2WFmtj2bjRCNv
|
|
189uTHaMb6ueW8uJ6lELWjeY7ES9X+4gzIm7vsuMpzH5UJ3Pi2oZTqyr/rOQ
|
|
y2Rnh70FSqqcGAg5rtlMdpkWfXxjCydGBNjsSGDysfDvOb+0OZHTdZf3JSYf
|
|
l63IsNTnxIXaWBlbJru9jEgt3ceJKuQUgsTkk/sOJUjbcmLDbGL3d2b8p0Y2
|
|
xQQ7c6K5du90JpNPB7BGfHPnROq70igzJntsbA8z9eZEX6GIkkmmPl4Ps4MK
|
|
L3HiKyjxCGXyOTx/SSSMExPY7pevZ7JPl4FfQBQnnnpUlRHJ1Pu8h/i5wSRO
|
|
5BUIJLEx2f9u5YlHjzlxduUn6R1z/y6qR7qsf8GJtQ+ynogx+VLTYSefKk5M
|
|
2yk6doi5/4ELbJZEGyd2diQlNDLrJTiqY9/9Hk58wD4q9ItZTyGkXEOeEU68
|
|
cuzMYW4mX7cyIj784UTWtX88xeyZ/fO8RYKNlQuz2uZ8F5n1mi9oNb9lLRcu
|
|
mZ0+xbBhQOeHQwUxslxITtqjZ2bF1GfrSMRrNS4MPBO0dekAA5Zj3N2n1blw
|
|
9PfoplQLBihZ+ChYGHJhPKHh9ZzZL6UFiyuBB7hwWmBXLW0fs94ErvYWOHJh
|
|
cUwWpDD7zbv1RpzAWS6MvSvWa2rIgNp997jeJ3Nh0ojNaXFdZv08VRpevc+F
|
|
6cE1U1Rmv/9Y96h6Uz4X2o9796sz/WAD/fmFqFoupK+gsJQWsx6Mm36Y/eRC
|
|
adfuFpvNzPj2zrUwdnJjn/6By5ekGBCde/Hx8l5udA6stG0SZ8bLxRJOs+DG
|
|
2bZvUuuYfmb6Zo3ubVdutP7ZGX5qAwNSdssVm0Zyo6brcFsKJwM00SSxeYAb
|
|
JbfFx9X+pAP93nvvpe/cmOtZIGA5xvTvVev9lFlu/Gf5cbVrhA7Xq5x5b/Hw
|
|
YHGwqkM10787d54PMN7Cg4tPns9ytNLBWyvzcGMwD1ZxKAV7P2P6dwb/rEkE
|
|
D2o4NkgmMP8HCtyXwlviefBeX7vsswd0eN9hU9iex4Pemnkh9ffo8J/XOvb+
|
|
Fh70PdwRfTmKDmO5frm/JXjx1Z/POpvO0MFRyGxCspgX10ssdL+Rp4N6QEVQ
|
|
eiUvDhw3taiXosOaIVUR+be8aHB/mlQuSoeyZ+xA+sSLEmsceSP46CBiUha9
|
|
eZUXLWSCQhsXmuF9kNK2PSZrkGvLqFYRoxn0J/9e9Bheg34fTNnPnW0Gf8M4
|
|
8uvxNfgofbD7xqlmyM+k9Qj+WYMC9wqsU1ybQczKWauMZy3mSx87mmPfDOOl
|
|
b+bZ/1uLnOKr94/pNkNscLRP8oW1uCnL0zVyfTMMCZM86vnW4fuDE5frc5sg
|
|
aKfFEQlNPnzQfWfZvbYRDA+l/96hx4eD+1676Jc3An/gz2vWpnyYFlbnKlbU
|
|
CHfrQnOjnfmw/Wr66aeZjVBqXP6T6wYfNn5li4kIbIQpO8XzM5/40KR1J11l
|
|
VyMc8p27SQ/gR+GTYpEiRQ2gnZ/8/Er1ehwIapqYiXgHpxemAxv4NuCkprvj
|
|
Db03sEgR6KdZb0TuxrpKhYe1sPPxk4yEBEFUUPoUsCRZA9MbjZ1taoWQ39zZ
|
|
ui+zAkYinG3OcYsg6Zzeq45/L8Fo0s9oVEMUT8ZKHFflK4bxozzez6+K4aq1
|
|
8+beyHzm+V2U7XqtOLIuGeyK2ZwH310M8nTeieO/FtEnVRJ5EJHpZzbVLI6n
|
|
CwS0/3LkQbtMd4r9R3Fs3TD8MPXTA3AWT1anjolje9nv2OvXHoA/v6RrG58E
|
|
igVf2sfakwtPFmQaJO0lkLeu8KZbTA5sZJAiCyYl0Mu8d5252n1Ymdyc0zQr
|
|
gTvOby9wFr4PPzbqVI4sSuAKY3U6iPU+1NqZ/xDjkESTjGs6M5+ywHvEb2+Q
|
|
mCQ+Ehkxi76VBR1LDSsWupLM/izIejadCYnkU54zdyTxCtD6HBozQCr82X4N
|
|
DSlkkIPnxY3T4FH+07pFbSn01cwS+UhJA82PjzVegRTeVpWszeNLAyuFPCl9
|
|
IyncNeUVk9x2FyIqM8YsHKVQUbek657DXViaigk8EyyFOq96ZLafTYUee5+C
|
|
7BYpdAop2be1IBmSKFoCgiek0clpB+/ouQSwNmFEV52SRqNK08EhhwTYeOrI
|
|
hpNe0iiz83rAnF4C3Hp0Y+Nrf2nUbrN7byeYAFfUeoQ8I6QxwuNygciLeDim
|
|
EiDeXCiNwt6naa7/4mCL4iuFa/+kcWiH6tBSciz80rO4/x+rDEa7EC0BIbHw
|
|
yGVUsYdTBreZbVy73jMWlLL4lLesl8FZSwNDT/1YEJM/pDIgL4NjUdI3hafu
|
|
wIrMKkXHQAaVv4fO/jK+A00SuttnYmRQ9L1UwTX+GHgv84zEkSiDq3+L3UoW
|
|
o6FTQVpM+K4M/pQ3U2IZjYYv5MW/GrkyyMev7P6+IhoWtAtrLpbLIJgO3jh5
|
|
MhpIB+VN2YZlsPFZ05GphCgITmU9umGbLD62fRuhqHUbwu95WiloyWKo3fD5
|
|
O0K3IfL+5z3qhCxi7UqJylQEJD8uU7U2lEWF9ntN9Q8ioKDi7K8kR1nkUPrN
|
|
9lYsAvp7v/jLhcpiEyPWuZn1FmhL1UZv6pTFL6JBJmKT4TCkqNT/vUcWlQI9
|
|
aDvbwuEGJYySPSCLVu8krK4Uh0O3tvFbse+y2P2PQ8jpQjj42X9YYv0niw8e
|
|
Tn0OYg8HB5Oz6j8E5NBuT/QzK9nrkBDOtDcNOSQ2y/oEnQ6FkxFb34hryeGd
|
|
HQt8egdCgYge/nleRw7dPglLy2iGwmjiHq0tKIef+bV2q3KEwrYHvB05RnJ4
|
|
m5ZnFJwWAh/exPBGOcphfjp5k/bHa8DPnuVzJFgOX2wezlawCwauxWrL6RA5
|
|
dN3ky7MTgmHl1+etQdflkD3ZPuQcKRgme8SnMyKY88kDDhpzQfC+KObMYIIc
|
|
SoTIpIvEBcEdl6Djhx/LIaP7VbBCVyCI1DrbOXXIoX79rLPr8BXgL72yY6JT
|
|
Dh++2mjiX3oFuPLvilz+JIddAzZzNbevwHxyd8fdfjnUNb1U90PzCnSf3W/R
|
|
N8Zcb01aX1bMZUiRR+ODy3Lo+YNN8KLpJZAJkt1pT5JHvaNf2by/+kO+N4/C
|
|
Z1V5nLgZesa01h+I49PcRyjyaNVYNG2R7g9OJnXtbpvlcS+rZdKgjT/cFT5x
|
|
6oK2PLZumrvH3XQBxB/lpySayeN41dyyTakfCLXvWvx4Xh7N4znb24t9IfsN
|
|
acDeXx7/ma2y9cf5gnrp+jefA+SRkHHhX3/eFw6kfYkeDZTHkulJkVFNX4g5
|
|
Eao6d1MeRYModxxrfID/H91W6J48Rjvo59h0egOvsuPLA+/k8eqJsEw36XNw
|
|
UhyMHzfKY7NW69YGjnPQxKfQz06XR80k/uN7xs9CxJ9vnC/ey6PCQLxOUsVZ
|
|
4G/wthbtkUf37W4n7h48y+z3W7O94/KYnHeUypnpBVKF5VtdNyqg5NFASbkg
|
|
D7iUk/b2lZAC6o2vLe6y8YDPyYEOIqIK+Ll7wauO6gHpwXuD30kqoJvd1usa
|
|
n86AnNWHNjVlBfS93qoZuu0MKM9/9/q1QwFFvpgJJ8yegv92iT/zc1LANR9e
|
|
EuLJ7lCs6L7E5qyArJfyJ4fPuoPmmjKDSBcF7Osutxoxdge9LrvB7BMKOL1U
|
|
gKHLbmBzNmnDh7MKKHjpSju6usHVHFEfapgCOqeIbXMnTsB7PhGtL/kKKGFY
|
|
ea1P2BWsZ11DTxcq4Na3mhfGZo9BT8+LtvliBWwp93yh0HEMRh5Yn+QvU8Cr
|
|
xelk+dhjsKAbn6pTp4AeyR6TIHgM5M8LrcR3KWCk6U+ej5JH4Vz/xjpjFkV0
|
|
khra/t30CDS8dXz1iE0Rj/SeUiWrHwGZZ7klazgV8QVPQtFt8SPQdFX7SROv
|
|
It7ekzte8dUZFORd4o0FFVHpzsfEgmBnaDtaeMKYpIjLbyNuFAQdhs3fzdcZ
|
|
mypi4bXiKNVHjhDWlsz1yEwR2U4ceVJ2xRH6yoZZ1lgoolXvprNhlo4QftNv
|
|
rtFaEU305jralg/CIOVev9FhRTSyeYWq1gch2uNXgdE5RYS56RMJ/A4wORNh
|
|
bZSkiMmWRW2pj2yhrzvTJi1FEXMFT/S1h9lC06uXttN3FTFONllu11FbyL4+
|
|
aJ+cqYgcS8YnsqRswUFy26HvjxRxcP9Tv8IYG3ij13v8xitFrEngLM4PsYbU
|
|
GLULjUOK+HNdbF9yhCWEnyf8pUcVsaIykeOmhyWcP2h58ew3Rez71+iSvd8S
|
|
9itfviQ+ztQvc3HSRtgSuMreB7rPMfMJ2JL2NOMAnB30u8HLo4Sumsles1UW
|
|
YLDpbYoRTQn1R120IsT2gx2XodX7TUpYPD356vJfczj5uZHPdqsSak5/GtlR
|
|
bw6RtxiBx3YoIS01YyrPzhw6v3Ucv6qrhL0eNYZnQ83gWMbw1hfWSqiVxLKs
|
|
8csUgjewNstdUcISqewHMYtGEDcWHPIgkLmeucR8Kd0Icqs5iP+uKaHGo9M+
|
|
KhlG0HSGp1AnXAmTJK2OdRsYwYam9Yk2d5TwKaNQ+WqKIWQEyxyNyFXCRa2z
|
|
sjdNDaBqRmdpvkUJ51eLipYH9SGTXuJi2aaEfBEanbVV+hCSo96U366EO250
|
|
l1Xc1QcjW0qya7cSWlsuPzCw14eOcokd7V+UUOGdz9Wajt3wI2jxXP6sEkpw
|
|
3lX826EHIgIlP45JKOOWMJlPrxYQFse2HqiRUkYX0p3kC30Ifa/zyyRllfHD
|
|
GPH1UA1Cpndu+AdFZeTI6dzyNByB2hVPQpoyil3mZjWWRNBL93GRRGXkNNrU
|
|
lBlNgAd1a0+bqzL6H1DsXxOoA77zEn8PuynjqmrI5rR9OnCpll3i10llbJaN
|
|
1A2V1IFbdh/t13gpo9nzsEirUm3IC7nwSe+iMnp8u3Dty5wWDPVVdRdHKuNQ
|
|
T2qCfqAm2Nw26YovUcZ4id3e71u2g5PdtnnFcmU8Z31cSSV3OxxTlBYtqlTG
|
|
h+seHai/vB28y37ZtLxWRmI/4f6eth2iR2M6uejM9S3UvRVjtkHTru6PfoPK
|
|
SL11Ic7mmDrs+nWsw56XhO/Zv1lJaW8BkQqDrMq1JIx8Y/4hTXIL/LpO9pLl
|
|
J2Ebq2yGxfJmSJefWju6kYQhy1uWzV5vhhWrgN1eUiRcp64emmSyGaorYorC
|
|
NpGQI5LyxPTDf6B7oyq62JqEi15R8RcjKCBhk3lIxI6Eh9u7WP86UOC3QgjV
|
|
34GEjyajr9PVKJBVadRAHCahJA91wK2BDGxTHauNbiQ0sfMY8eIlQ53NT4/B
|
|
ABKWlK19YpGiCnuUxPbxZZEwLN57SnBWGZ5PvJE/lk1C+tmv1u10ZVAq8f5T
|
|
nkvCG5qGXh05ysBh3HrP7TEJBTeW/pdipwy1nmG/656TsFV8/WfV10pAVMwm
|
|
XnxHwpacEYnlNEXQONA29G2chMopqX4T1+QhV/JqCTFJQv0hYSO1Y/IgPEqN
|
|
iJ8mYQHXTVKqvjzM+oVv3/2HhI5bnhbKcslDURqEp6+SMFzowKesW3Kw6ftT
|
|
5vVABedmzCfuoCyoBt68ULtDBfWeG9wa6JWESp0cTlNtFSTSlY6YZ0vC/vnq
|
|
Ox93qmCUFsNZ5YwkXPCYezKmq4I368hr+FgkocHR+Qu/qQruz/wdkEqWADct
|
|
DeODzip4XGFZhXpHDP7N7u8acVHBb2+LJenOYhBdcOqYh6sK2nyWO9m4SQxK
|
|
VTKvBJ1UwWqGQ/inFlHgEVlX/MBHBQfr/0oSG0Th4e8vkrPhKviQ5bVvZK4w
|
|
EPn/8i7fUsFFlSseZReF4YO7qAZ3pAqOtUb+3WEuDH8HTfdLxKrgzHjxJdqi
|
|
EBi3loRgmgo+aw+g/dgvBD8e356IKGTGN0G40tYLAtlVq1q5RwVbBM1LFeoE
|
|
IErB7O+1PhXMG43b/S9LAGYHXLYP9augSfPQ8vprAlDlEPE4fVgFpd44+Y3s
|
|
FoAD+wcSRSdUMFA4qelM9Hrw1wn14mVRRf19ahlOL/mgYUOb/ISyKh4vne8e
|
|
Ml8DtNZRRxNVVdTQC9WvkFoDdyL+Jj4kq6Lc0nz+9HdecORW4j++SRVzWwqX
|
|
fEN5YfLf+b/9mqpYsm2Ot7mGB0TGpNrfm6hizRfHLhlDbnCtcgt5flYVd13Y
|
|
F+IUzwG/zvzw2+Ojik5bX9l4uHPABenTpzrPq+L0garJrl0ccPOS54GFAFXs
|
|
TN3TWfSNHQq0z8vtDFPFZfofB19gh38vr1XWpaiioZaTRMYKK4Qd5yywSlPF
|
|
ri/5rNNdrLBe5Pr90XuquNDC+Ty6kBUUfG/e5M5Rxf3XEuTKXVnBQD3GzuSZ
|
|
Kuav7R7KbmOBO8/SZz/UMfPx57Iu8VglpA7LjR19q4rE7fvtD8mrRA5/Vu9s
|
|
gypOhNbxqH5bIUrP5NSKtKjiAeKbS92RFeIz5Um0Q7cqCsy//WjntEyo5pVR
|
|
h8ZVkWH8O1/qzBJRndFxbFpYDa+HRFlYjc0Tg6byh8+LqWFO08FTTc/nCZbF
|
|
M/ZLEmpYne+x5lHQPKFnwW3GKaeG8RH+T7Kk5om3rNo7xMlqqHeuPPWo7R+C
|
|
7nKPV5dQQ+40j0j/gVlign+c/S2q4cGV5RJK0SzBX6G5YrxbDaW38dvqhM4S
|
|
+wU//LYyVEMOwaNyXtRZor2Oo8/tgBqmhcsekLo6Q/QoncyPPq6G3zK7+r5u
|
|
+00svX+ZJ+yuhr7P/Bak+X4TUpfZ76ecUkOWqw/rH4xOE04f7yZme6mhRXrs
|
|
t4LEaWIwtDWw9KIa7v8eOXp9dYr49nWb5WCkGpbJ8L0LqpgkZvNW5zeVqOEp
|
|
22arwoyfxFebvRk3ytTw3TNty5QTP4lujtuGwxVqGMASnz/z30+iwlkiOaFG
|
|
DXnXZmrNVv0ggsW2ay83qmGvuqysyMh3QiD85KWmPjVca2mVQdMbI9g0CpWU
|
|
BtRwd2JjyKv1Y8Ts8Dz98hc1TDUjORZ+/kZ0Qaj0lq9qyL774fzri9+I9Pl7
|
|
VYmTauggVfbiXNlXgnriI4srGxn5gjW5fA1HCRlhqYdVHGQ8JBa/blJylBCo
|
|
c7EQ4yZjyq4LX19PjhAzMlOZzWvJWGm30c8zaYQo71yze6swGQ2xZalrYpgw
|
|
3IuhqypkvDiW2WCRN0QcVX7Mm7KPjL8/q3JV2A4SF98cOknaT8YoNW8bza2D
|
|
RLTrxuaiA2QUvnqxj5tvkKjM8Y9otiUj583E6u3XBwghkuH65SNkTDtjQv/n
|
|
1k+8JY0KOZ8n43hShp29UR/R9zbJd/wCGdc/WSfDwtNH/D5u2nkhgIy+UyTF
|
|
He96CdkHxYkxgWQcVdbRsDDoJS6oBEvU3STjnEQ/p7BZD0FWlZUj3SPjD5mo
|
|
wX6fbgIbPgQWZZIx3N5skWVnN2HjFvaFyCYjz4TX5Uz2buJa3kSW7UMy83zh
|
|
nm4f10X0qVYq3ygm46UsrrgbFZ1EpJo9ZfwdGdssD5/mlftITJNjNYqmyLj3
|
|
60jGH+0PRDcd9wjOkLH/DIOrf+MHosbjl6XPHBmlp592iv9sIyKLjM5q/CXj
|
|
HbuADRF32wiyNsuTcnYK7pJMqTdkbyNcjM7I14lQcGrqshGlupUw+imxWUmc
|
|
gjebvdR/XWglNt9uIEIlKXj+oN7vPeqtxMp7RUcDOQq6fBLHZw9biFS7noRm
|
|
NQpyqg22G6YxiI4TBus6dlIwL72y6G56M1HBOyexHSi4TjBwWelIM5H1OEst
|
|
QZeCUfjVabNSM+E1ubzXbi8FvZLjNOmPmwg+v+dBfeYUHCo2KF6qaST2hsnP
|
|
j7hQkL9zO89BtgaiNHvpy1w4BTnk+n+G9dQTGrt95o1vUdCJzqZ85Uk98eLL
|
|
+LqM2xSUaYju7rxSTxTJ9O8wvkNBNfupuw+V6oknSTW301Mp2H4x36Pap47I
|
|
iAjVMsinYOxQQAg3qZaQoayY3S2g4MJAtu6r5ddEWuP5Y9NFFDRQ2tzZ8PE1
|
|
kcLlFpVaQkH7j7H0/rDXRFyg8ehkDQX3GWSozYzXEDd81scktVNQIV/dzja6
|
|
muARDM+d+EjBTdyXygeMqomwQpZKvW4K2tjuoKyyVxMhv6a/jvcxv8d11XXF
|
|
v4q44taxU/crBU8yppb7Tr8izjkmj31foOD9DbraYmcqCAd9RdSRoaIgZPGM
|
|
tpYQyx08/HVyVBSKOH0/Mb6EyHD91WusSMW3JwPPth8sIb6Glfk5qFIx5bJB
|
|
15fvL4lzjebP/LdScSmuOVdz3UviptklmdK9VHTqdPRkuD0naANHxsGIircD
|
|
BnjCNZ4T7z0Nyt+ZUPHm9+DnZRzPCZGYjTZd+6m4z0ue70pWMZHVnnf7jwMV
|
|
eYKjWs4MFxHldh//bfOkYnH8Rmnei4WE0/fypsqzVDRUNN1WYVZIsFzMSNL3
|
|
oaLI6p+wDsVCYm/qqW1W/lTMfgdbtVoLiA+fWU97X6Pii9ppu0JyAfHD5b/e
|
|
wkQqPlkWZdn67SkheeZ62X81VNQpcuPgj3pIRK4e336rloqX+TtP77J8SLDd
|
|
2Vv4rZ6Knje0s2ZEHxI/XnI+zGik4na+qO+TWXlEOUtI0sZ2Kg4CezZP9QPC
|
|
IS7Q788oFQP1VTkb+HOJFpLzzIExKpa6i1cP9uQQemXg+ewHFbkEHRU8H+QQ
|
|
5P6V426TzPzzq76N6eYQiyqXbXoWqKi1231u26VsIqnCf3vVWhrSt5PG7Tnv
|
|
E+vM7Asl+GkY+Cqm2r47iwgc1KT5CdDQreLCpprHWYQb54LSZmEa/vKNPPbK
|
|
MovYYX5eKEuGhrGRR3mO5GUSnUPnZkK30HCTqjvlztEMQnjN6cJ9tjTUXNQ7
|
|
oal5l8jeffnilD0Nfzwd3DsxnkpsvRy5O9aRhkdcwqeOZqUSZlMFH7uP0JDD
|
|
hosctT6VCOucWzx6moZqUeHDD38nEwtZV/UuBtHQl3T909GeRCKsL3qtdAgN
|
|
j9bJ0w6lJBJCIlkd1WE0rLuUabPikEhsvlF/nDOChq4uTRVq/QmEuyfvregE
|
|
Gvr7ySWyjMcTPTqx7bmPaWhJ05m3U4oj3Hyz7xrl0xDTRffNT8QSf/JfuI4X
|
|
0HBHVICrYmkssVGhe37LSxqa36ZbyprFEiY80lKvamjoKTArFhh4h6jsyD3W
|
|
/pGGB+2LnKqXowlj/lLa+W4aXqdWOKW0RhPdBo1/xHppaJS17uQv5gVptvxn
|
|
+KFBGo64Hx35ZxBN0DI3P/3+g4YuAiWWyupRRGWP7vmICeb4mu3XyP2RhLGQ
|
|
JWyaouH4gUqL9TcjiePXfdt85mh4N5VnwWPkNjFbE5YiukDDU1d1vEfv3CaC
|
|
/yYeLf9Lw/T32h1b9W4TAtseUp2Wafhn2/Ci1e8IIv1M+dzqKg3jGnY1GN2P
|
|
IP4Hz0wYnA==
|
|
"]]}, "Charting`Private`Tag#1"]}}, {}}, <|
|
|
"HighlightElements" -> <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>,
|
|
"LayoutOptions" -> <|
|
|
"PanelPlotLayout" -> <||>,
|
|
"PlotRange" -> {{0, 15}, {0., 0.22963416248739862`}},
|
|
"Frame" -> {{False, False}, {False, False}},
|
|
"AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio},
|
|
"Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" ->
|
|
GoldenRatio^(-1), "DefaultStyle" -> {
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]]},
|
|
"HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ),
|
|
"ScalingFunctions" -> {{Identity, Identity}, {
|
|
Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" ->
|
|
False|>,
|
|
"Meta" -> <|
|
|
"DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" ->
|
|
Plot, "GroupHighlight" -> False|>|>]]& )[<|
|
|
"HighlightElements" -> <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>,
|
|
"LayoutOptions" -> <|
|
|
"PanelPlotLayout" -> <||>,
|
|
"PlotRange" -> {{0, 15}, {0., 0.22963416248739862`}},
|
|
"Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0},
|
|
"ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True},
|
|
"LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1),
|
|
"DefaultStyle" -> {
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]]},
|
|
"HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ),
|
|
"ScalingFunctions" -> {{Identity, Identity}, {
|
|
Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>,
|
|
"Meta" -> <|
|
|
"DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" ->
|
|
Plot, "GroupHighlight" -> False|>|>],
|
|
ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, {
|
|
4.503599627370496*^15, -4.503599627370496*^15}}],
|
|
Selectable->False]},
|
|
Annotation[{{{{}, {},
|
|
Annotation[{
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]],
|
|
Line[CompressedData["
|
|
1:eJwVl3k4VV8Xx81DRco8zxd3+DUoGeqsRcoYySxKStGAQpIGhFQyZCZCSJMM
|
|
lTGEynAviRBChlIRQkh47/vPOc/n2c8+e63vXut79pZ38TzgysbCwqLBfPz/
|
|
/ae/sV7pVhwhYhs/VB95guhIF/PX7T4HhvW5HQJ39wAKt7qIdQdDN8VyT2+q
|
|
NZzf/6iLvfsOGLkVTT5MdYUNv0TvLHZlAbdNCP+OVF8YqDTznO0qgvmjlV1x
|
|
yaGwV+nH5+muWjAMi2mRj42Hxa4d8VNdH+C+kRHJ2z8H6nY/yG7LGoa+cyWz
|
|
gz9egNRA2VcX6gRUXE5W+hZSDSwzZ5MaLSbg2rUit/N51TDCRTbe7DcBBNvE
|
|
h5nmanj6X8rT5dcTcOVFuZsjbw0QVy76JNn+gj1qKjXPzWvgsLQOW0vwJPyn
|
|
fFHocU8NtNH6I++OT0GHz0XKue+vQej04Ufcu2eA5Efzzx2rAzL3/bf7bWeA
|
|
r+rpjZ2LdYBZX4eST83AzOaQ2je89XC6+4wkNW4GSq703iwk10O9/qWI/aMz
|
|
IDTSEj5xqh58pJM9kq/PQi0o/Jv8WQ/tLR+2Uuhz0PFJsvjblzcw5i5i7jM4
|
|
B9q9wurtU29ghcPh1KvZOSBfsx0uWH0DZJ0v982l/8C5DvcyPem3EPxgUsjH
|
|
4w984Vm+Wm37FrYGrpuvFJiHwDNCDaJNb+HOlr0VZtYLsDvuCF0s+x1s6rU3
|
|
2OW2AD2Dh/gPFbwDesiZdkrAAlTr7bqfUPkOuLrjfvJkLkB/2+EXXzreQcCV
|
|
Ycm68QVoi2JfN8DRAMeaAy/tCFmEHz2TNG+XBtBwrdglV/wXZDZfnBgTbIR2
|
|
/tZG/rd/4e+e5OAYmUbwKh2yXu7+C1IPVFeoao3waO0aj56Vv3CSZSVtJ9EI
|
|
skV26XHGS7DRtFaz6kQj8KzOrfAMLcHxhozXhqWN8Clpc820wDI4lOrnnjZv
|
|
gpT2x+vPKy8Dd2iZ1H/2TeDAr3L4rxZzfHR5dMClCfquSa+wHV0GjzcZJ4XO
|
|
N8Ggx5qdQi+WofWCreDr1CYY0x8p0bBfgS0fPtFVRprg4dXD3BVnVqCmbL5t
|
|
YrwJTpb32EDwCjhvCBDNnmuC8U1tcwaPV8BIg3zkC1czTElUqdsvr8Bx/qrB
|
|
dNVmWJhKfBaQuQoZ766bKbs3QxlFcHX1xSrk7ZCjTXo1w8XjkWYhTauQ+uad
|
|
4cMLzfCvN2QiYmYVPnP4af663gyBw6XCrQos6D47zVGR0wwhLTmWgz4sOBxm
|
|
MODc3wy3sq+2somz4hDfy8WR3XQw3ua+UViRFQ+fGxFMM6IDT/0BaxUaK8b9
|
|
bZbba06HkGHlXhNdVmw4WSBxyoEOlxToX+PcWfHeTs5GFi86eGSIrZDKWfGT
|
|
19W1Tkl0oG5m09WqZ8WOm2R75TQ6/Kj+ec2khRXnYlaq+jPpcGKgitdriMn6
|
|
Gv1Kj+ngLOMqXLaGDdUHKBUrlXSwuFtINTnIhrxWZck/P9NBgJrq6eTKhisu
|
|
A61vv9ChpSKkyNOTDaeW1++PHWXG32urGXeNDcUlCnayTNBBT2Jl9+fHbGhE
|
|
PkQlL9GB5dG3sMkXbPidMi8avUKHKq22RtYaNrysvu7UN1YG6Nhnm5M62HB/
|
|
lK7tSR4GbEsyPuj5jw1l3a+VvBZiwG+VbelBXOxo8MnKrFiUAQUl0l9iBdhx
|
|
dNu/0wkSDKB1TR0vVWLH9bc/HNgixwCSSOI51n3sTL12aZeTGTCSE/hC0JYd
|
|
tyP/DU0aA7K2n1xQPsKO0Y4jwXmbGCBjveuKsS87Cuisvem0jQGiccM3YtPY
|
|
MelynLvULgaIUV6ELOSyo+m7v02cwACJ2rCrTgXsKKpT3jGEzPlTar4qdeyY
|
|
W2s67afPALnrS54RdHZsF9Jct3kvAxRkGCenP7LjztUnA70GDFA29XKuGGNH
|
|
pd2VNfwmzHiHdQ/K/WbHB+35nfGmDFC9KGgTusSOgQd7XwiYMYCa99LEnJ8D
|
|
FzO/D37ZzwB1jmWNYXUOVIB6l9/WTL1SW7YY7uLABGdNHTFbBmhszaA+3cuB
|
|
f+9Ur26xY4C2824FP3sO3K7KdVjXgQE754Wk+1w48MqabrYdBxlARH4V1T3N
|
|
geSJL9lyjgzQrbzBt/YqBw4+EP7T6sQAPcuDPF7hHChOi8yPP8QA/R9U9o8x
|
|
HOi53OtnfpgBe4NWlrVSOdB5tdRmmcmGYu8X0rM5cM2Fr+b3nBlg/Cxzhj2f
|
|
A3ez09y2H2GA6V7vX24lHFh2yzG7mslmn/W/M2o4cEnPlJdwYYC5j8jI1iYO
|
|
TEvuSS1g8v61Y/2J7cx8d0w4ix5lwIGssk//+jhQ4LeX0zkmW2nd6jjylanP
|
|
O/uE10y2ee/Y+naSA498zBLgPMYAuxP/NVEWOfDlPrO2nUx2WFmtj2bjRCNv
|
|
189uTHaMb6ueW8uJ6lELWjeY7ES9X+4gzIm7vsuMpzH5UJ3Pi2oZTqyr/rOQ
|
|
y2Rnh70FSqqcGAg5rtlMdpkWfXxjCydGBNjsSGDysfDvOb+0OZHTdZf3JSYf
|
|
l63IsNTnxIXaWBlbJru9jEgt3ceJKuQUgsTkk/sOJUjbcmLDbGL3d2b8p0Y2
|
|
xQQ7c6K5du90JpNPB7BGfHPnROq70igzJntsbA8z9eZEX6GIkkmmPl4Ps4MK
|
|
L3HiKyjxCGXyOTx/SSSMExPY7pevZ7JPl4FfQBQnnnpUlRHJ1Pu8h/i5wSRO
|
|
5BUIJLEx2f9u5YlHjzlxduUn6R1z/y6qR7qsf8GJtQ+ynogx+VLTYSefKk5M
|
|
2yk6doi5/4ELbJZEGyd2diQlNDLrJTiqY9/9Hk58wD4q9ItZTyGkXEOeEU68
|
|
cuzMYW4mX7cyIj784UTWtX88xeyZ/fO8RYKNlQuz2uZ8F5n1mi9oNb9lLRcu
|
|
mZ0+xbBhQOeHQwUxslxITtqjZ2bF1GfrSMRrNS4MPBO0dekAA5Zj3N2n1blw
|
|
9PfoplQLBihZ+ChYGHJhPKHh9ZzZL6UFiyuBB7hwWmBXLW0fs94ErvYWOHJh
|
|
cUwWpDD7zbv1RpzAWS6MvSvWa2rIgNp997jeJ3Nh0ojNaXFdZv08VRpevc+F
|
|
6cE1U1Rmv/9Y96h6Uz4X2o9796sz/WAD/fmFqFoupK+gsJQWsx6Mm36Y/eRC
|
|
adfuFpvNzPj2zrUwdnJjn/6By5ekGBCde/Hx8l5udA6stG0SZ8bLxRJOs+DG
|
|
2bZvUuuYfmb6Zo3ubVdutP7ZGX5qAwNSdssVm0Zyo6brcFsKJwM00SSxeYAb
|
|
JbfFx9X+pAP93nvvpe/cmOtZIGA5xvTvVev9lFlu/Gf5cbVrhA7Xq5x5b/Hw
|
|
YHGwqkM10787d54PMN7Cg4tPns9ytNLBWyvzcGMwD1ZxKAV7P2P6dwb/rEkE
|
|
D2o4NkgmMP8HCtyXwlviefBeX7vsswd0eN9hU9iex4Pemnkh9ffo8J/XOvb+
|
|
Fh70PdwRfTmKDmO5frm/JXjx1Z/POpvO0MFRyGxCspgX10ssdL+Rp4N6QEVQ
|
|
eiUvDhw3taiXosOaIVUR+be8aHB/mlQuSoeyZ+xA+sSLEmsceSP46CBiUha9
|
|
eZUXLWSCQhsXmuF9kNK2PSZrkGvLqFYRoxn0J/9e9Bheg34fTNnPnW0Gf8M4
|
|
8uvxNfgofbD7xqlmyM+k9Qj+WYMC9wqsU1ybQczKWauMZy3mSx87mmPfDOOl
|
|
b+bZ/1uLnOKr94/pNkNscLRP8oW1uCnL0zVyfTMMCZM86vnW4fuDE5frc5sg
|
|
aKfFEQlNPnzQfWfZvbYRDA+l/96hx4eD+1676Jc3An/gz2vWpnyYFlbnKlbU
|
|
CHfrQnOjnfmw/Wr66aeZjVBqXP6T6wYfNn5li4kIbIQpO8XzM5/40KR1J11l
|
|
VyMc8p27SQ/gR+GTYpEiRQ2gnZ/8/Er1ehwIapqYiXgHpxemAxv4NuCkprvj
|
|
Db03sEgR6KdZb0TuxrpKhYe1sPPxk4yEBEFUUPoUsCRZA9MbjZ1taoWQ39zZ
|
|
ui+zAkYinG3OcYsg6Zzeq45/L8Fo0s9oVEMUT8ZKHFflK4bxozzez6+K4aq1
|
|
8+beyHzm+V2U7XqtOLIuGeyK2ZwH310M8nTeieO/FtEnVRJ5EJHpZzbVLI6n
|
|
CwS0/3LkQbtMd4r9R3Fs3TD8MPXTA3AWT1anjolje9nv2OvXHoA/v6RrG58E
|
|
igVf2sfakwtPFmQaJO0lkLeu8KZbTA5sZJAiCyYl0Mu8d5252n1Ymdyc0zQr
|
|
gTvOby9wFr4PPzbqVI4sSuAKY3U6iPU+1NqZ/xDjkESTjGs6M5+ywHvEb2+Q
|
|
mCQ+Ehkxi76VBR1LDSsWupLM/izIejadCYnkU54zdyTxCtD6HBozQCr82X4N
|
|
DSlkkIPnxY3T4FH+07pFbSn01cwS+UhJA82PjzVegRTeVpWszeNLAyuFPCl9
|
|
IyncNeUVk9x2FyIqM8YsHKVQUbek657DXViaigk8EyyFOq96ZLafTYUee5+C
|
|
7BYpdAop2be1IBmSKFoCgiek0clpB+/ouQSwNmFEV52SRqNK08EhhwTYeOrI
|
|
hpNe0iiz83rAnF4C3Hp0Y+Nrf2nUbrN7byeYAFfUeoQ8I6QxwuNygciLeDim
|
|
EiDeXCiNwt6naa7/4mCL4iuFa/+kcWiH6tBSciz80rO4/x+rDEa7EC0BIbHw
|
|
yGVUsYdTBreZbVy73jMWlLL4lLesl8FZSwNDT/1YEJM/pDIgL4NjUdI3hafu
|
|
wIrMKkXHQAaVv4fO/jK+A00SuttnYmRQ9L1UwTX+GHgv84zEkSiDq3+L3UoW
|
|
o6FTQVpM+K4M/pQ3U2IZjYYv5MW/GrkyyMev7P6+IhoWtAtrLpbLIJgO3jh5
|
|
MhpIB+VN2YZlsPFZ05GphCgITmU9umGbLD62fRuhqHUbwu95WiloyWKo3fD5
|
|
O0K3IfL+5z3qhCxi7UqJylQEJD8uU7U2lEWF9ntN9Q8ioKDi7K8kR1nkUPrN
|
|
9lYsAvp7v/jLhcpiEyPWuZn1FmhL1UZv6pTFL6JBJmKT4TCkqNT/vUcWlQI9
|
|
aDvbwuEGJYySPSCLVu8krK4Uh0O3tvFbse+y2P2PQ8jpQjj42X9YYv0niw8e
|
|
Tn0OYg8HB5Oz6j8E5NBuT/QzK9nrkBDOtDcNOSQ2y/oEnQ6FkxFb34hryeGd
|
|
HQt8egdCgYge/nleRw7dPglLy2iGwmjiHq0tKIef+bV2q3KEwrYHvB05RnJ4
|
|
m5ZnFJwWAh/exPBGOcphfjp5k/bHa8DPnuVzJFgOX2wezlawCwauxWrL6RA5
|
|
dN3ky7MTgmHl1+etQdflkD3ZPuQcKRgme8SnMyKY88kDDhpzQfC+KObMYIIc
|
|
SoTIpIvEBcEdl6Djhx/LIaP7VbBCVyCI1DrbOXXIoX79rLPr8BXgL72yY6JT
|
|
Dh++2mjiX3oFuPLvilz+JIddAzZzNbevwHxyd8fdfjnUNb1U90PzCnSf3W/R
|
|
N8Zcb01aX1bMZUiRR+ODy3Lo+YNN8KLpJZAJkt1pT5JHvaNf2by/+kO+N4/C
|
|
Z1V5nLgZesa01h+I49PcRyjyaNVYNG2R7g9OJnXtbpvlcS+rZdKgjT/cFT5x
|
|
6oK2PLZumrvH3XQBxB/lpySayeN41dyyTakfCLXvWvx4Xh7N4znb24t9IfsN
|
|
acDeXx7/ma2y9cf5gnrp+jefA+SRkHHhX3/eFw6kfYkeDZTHkulJkVFNX4g5
|
|
Eao6d1MeRYModxxrfID/H91W6J48Rjvo59h0egOvsuPLA+/k8eqJsEw36XNw
|
|
UhyMHzfKY7NW69YGjnPQxKfQz06XR80k/uN7xs9CxJ9vnC/ey6PCQLxOUsVZ
|
|
4G/wthbtkUf37W4n7h48y+z3W7O94/KYnHeUypnpBVKF5VtdNyqg5NFASbkg
|
|
D7iUk/b2lZAC6o2vLe6y8YDPyYEOIqIK+Ll7wauO6gHpwXuD30kqoJvd1usa
|
|
n86AnNWHNjVlBfS93qoZuu0MKM9/9/q1QwFFvpgJJ8yegv92iT/zc1LANR9e
|
|
EuLJ7lCs6L7E5qyArJfyJ4fPuoPmmjKDSBcF7Osutxoxdge9LrvB7BMKOL1U
|
|
gKHLbmBzNmnDh7MKKHjpSju6usHVHFEfapgCOqeIbXMnTsB7PhGtL/kKKGFY
|
|
ea1P2BWsZ11DTxcq4Na3mhfGZo9BT8+LtvliBWwp93yh0HEMRh5Yn+QvU8Cr
|
|
xelk+dhjsKAbn6pTp4AeyR6TIHgM5M8LrcR3KWCk6U+ej5JH4Vz/xjpjFkV0
|
|
khra/t30CDS8dXz1iE0Rj/SeUiWrHwGZZ7klazgV8QVPQtFt8SPQdFX7SROv
|
|
It7ekzte8dUZFORd4o0FFVHpzsfEgmBnaDtaeMKYpIjLbyNuFAQdhs3fzdcZ
|
|
mypi4bXiKNVHjhDWlsz1yEwR2U4ceVJ2xRH6yoZZ1lgoolXvprNhlo4QftNv
|
|
rtFaEU305jralg/CIOVev9FhRTSyeYWq1gch2uNXgdE5RYS56RMJ/A4wORNh
|
|
bZSkiMmWRW2pj2yhrzvTJi1FEXMFT/S1h9lC06uXttN3FTFONllu11FbyL4+
|
|
aJ+cqYgcS8YnsqRswUFy26HvjxRxcP9Tv8IYG3ij13v8xitFrEngLM4PsYbU
|
|
GLULjUOK+HNdbF9yhCWEnyf8pUcVsaIykeOmhyWcP2h58ew3Rez71+iSvd8S
|
|
9itfviQ+ztQvc3HSRtgSuMreB7rPMfMJ2JL2NOMAnB30u8HLo4Sumsles1UW
|
|
YLDpbYoRTQn1R120IsT2gx2XodX7TUpYPD356vJfczj5uZHPdqsSak5/GtlR
|
|
bw6RtxiBx3YoIS01YyrPzhw6v3Ucv6qrhL0eNYZnQ83gWMbw1hfWSqiVxLKs
|
|
8csUgjewNstdUcISqewHMYtGEDcWHPIgkLmeucR8Kd0Icqs5iP+uKaHGo9M+
|
|
KhlG0HSGp1AnXAmTJK2OdRsYwYam9Yk2d5TwKaNQ+WqKIWQEyxyNyFXCRa2z
|
|
sjdNDaBqRmdpvkUJ51eLipYH9SGTXuJi2aaEfBEanbVV+hCSo96U366EO250
|
|
l1Xc1QcjW0qya7cSWlsuPzCw14eOcokd7V+UUOGdz9Wajt3wI2jxXP6sEkpw
|
|
3lX826EHIgIlP45JKOOWMJlPrxYQFse2HqiRUkYX0p3kC30Ifa/zyyRllfHD
|
|
GPH1UA1Cpndu+AdFZeTI6dzyNByB2hVPQpoyil3mZjWWRNBL93GRRGXkNNrU
|
|
lBlNgAd1a0+bqzL6H1DsXxOoA77zEn8PuynjqmrI5rR9OnCpll3i10llbJaN
|
|
1A2V1IFbdh/t13gpo9nzsEirUm3IC7nwSe+iMnp8u3Dty5wWDPVVdRdHKuNQ
|
|
T2qCfqAm2Nw26YovUcZ4id3e71u2g5PdtnnFcmU8Z31cSSV3OxxTlBYtqlTG
|
|
h+seHai/vB28y37ZtLxWRmI/4f6eth2iR2M6uejM9S3UvRVjtkHTru6PfoPK
|
|
SL11Ic7mmDrs+nWsw56XhO/Zv1lJaW8BkQqDrMq1JIx8Y/4hTXIL/LpO9pLl
|
|
J2Ebq2yGxfJmSJefWju6kYQhy1uWzV5vhhWrgN1eUiRcp64emmSyGaorYorC
|
|
NpGQI5LyxPTDf6B7oyq62JqEi15R8RcjKCBhk3lIxI6Eh9u7WP86UOC3QgjV
|
|
34GEjyajr9PVKJBVadRAHCahJA91wK2BDGxTHauNbiQ0sfMY8eIlQ53NT4/B
|
|
ABKWlK19YpGiCnuUxPbxZZEwLN57SnBWGZ5PvJE/lk1C+tmv1u10ZVAq8f5T
|
|
nkvCG5qGXh05ysBh3HrP7TEJBTeW/pdipwy1nmG/656TsFV8/WfV10pAVMwm
|
|
XnxHwpacEYnlNEXQONA29G2chMopqX4T1+QhV/JqCTFJQv0hYSO1Y/IgPEqN
|
|
iJ8mYQHXTVKqvjzM+oVv3/2HhI5bnhbKcslDURqEp6+SMFzowKesW3Kw6ftT
|
|
5vVABedmzCfuoCyoBt68ULtDBfWeG9wa6JWESp0cTlNtFSTSlY6YZ0vC/vnq
|
|
Ox93qmCUFsNZ5YwkXPCYezKmq4I368hr+FgkocHR+Qu/qQruz/wdkEqWADct
|
|
DeODzip4XGFZhXpHDP7N7u8acVHBb2+LJenOYhBdcOqYh6sK2nyWO9m4SQxK
|
|
VTKvBJ1UwWqGQ/inFlHgEVlX/MBHBQfr/0oSG0Th4e8vkrPhKviQ5bVvZK4w
|
|
EPn/8i7fUsFFlSseZReF4YO7qAZ3pAqOtUb+3WEuDH8HTfdLxKrgzHjxJdqi
|
|
EBi3loRgmgo+aw+g/dgvBD8e356IKGTGN0G40tYLAtlVq1q5RwVbBM1LFeoE
|
|
IErB7O+1PhXMG43b/S9LAGYHXLYP9augSfPQ8vprAlDlEPE4fVgFpd44+Y3s
|
|
FoAD+wcSRSdUMFA4qelM9Hrw1wn14mVRRf19ahlOL/mgYUOb/ISyKh4vne8e
|
|
Ml8DtNZRRxNVVdTQC9WvkFoDdyL+Jj4kq6Lc0nz+9HdecORW4j++SRVzWwqX
|
|
fEN5YfLf+b/9mqpYsm2Ot7mGB0TGpNrfm6hizRfHLhlDbnCtcgt5flYVd13Y
|
|
F+IUzwG/zvzw2+Ojik5bX9l4uHPABenTpzrPq+L0garJrl0ccPOS54GFAFXs
|
|
TN3TWfSNHQq0z8vtDFPFZfofB19gh38vr1XWpaiioZaTRMYKK4Qd5yywSlPF
|
|
ri/5rNNdrLBe5Pr90XuquNDC+Ty6kBUUfG/e5M5Rxf3XEuTKXVnBQD3GzuSZ
|
|
Kuav7R7KbmOBO8/SZz/UMfPx57Iu8VglpA7LjR19q4rE7fvtD8mrRA5/Vu9s
|
|
gypOhNbxqH5bIUrP5NSKtKjiAeKbS92RFeIz5Um0Q7cqCsy//WjntEyo5pVR
|
|
h8ZVkWH8O1/qzBJRndFxbFpYDa+HRFlYjc0Tg6byh8+LqWFO08FTTc/nCZbF
|
|
M/ZLEmpYne+x5lHQPKFnwW3GKaeG8RH+T7Kk5om3rNo7xMlqqHeuPPWo7R+C
|
|
7nKPV5dQQ+40j0j/gVlign+c/S2q4cGV5RJK0SzBX6G5YrxbDaW38dvqhM4S
|
|
+wU//LYyVEMOwaNyXtRZor2Oo8/tgBqmhcsekLo6Q/QoncyPPq6G3zK7+r5u
|
|
+00svX+ZJ+yuhr7P/Bak+X4TUpfZ76ecUkOWqw/rH4xOE04f7yZme6mhRXrs
|
|
t4LEaWIwtDWw9KIa7v8eOXp9dYr49nWb5WCkGpbJ8L0LqpgkZvNW5zeVqOEp
|
|
22arwoyfxFebvRk3ytTw3TNty5QTP4lujtuGwxVqGMASnz/z30+iwlkiOaFG
|
|
DXnXZmrNVv0ggsW2ay83qmGvuqysyMh3QiD85KWmPjVca2mVQdMbI9g0CpWU
|
|
BtRwd2JjyKv1Y8Ts8Dz98hc1TDUjORZ+/kZ0Qaj0lq9qyL774fzri9+I9Pl7
|
|
VYmTauggVfbiXNlXgnriI4srGxn5gjW5fA1HCRlhqYdVHGQ8JBa/blJylBCo
|
|
c7EQ4yZjyq4LX19PjhAzMlOZzWvJWGm30c8zaYQo71yze6swGQ2xZalrYpgw
|
|
3IuhqypkvDiW2WCRN0QcVX7Mm7KPjL8/q3JV2A4SF98cOknaT8YoNW8bza2D
|
|
RLTrxuaiA2QUvnqxj5tvkKjM8Y9otiUj583E6u3XBwghkuH65SNkTDtjQv/n
|
|
1k+8JY0KOZ8n43hShp29UR/R9zbJd/wCGdc/WSfDwtNH/D5u2nkhgIy+UyTF
|
|
He96CdkHxYkxgWQcVdbRsDDoJS6oBEvU3STjnEQ/p7BZD0FWlZUj3SPjD5mo
|
|
wX6fbgIbPgQWZZIx3N5skWVnN2HjFvaFyCYjz4TX5Uz2buJa3kSW7UMy83zh
|
|
nm4f10X0qVYq3ygm46UsrrgbFZ1EpJo9ZfwdGdssD5/mlftITJNjNYqmyLj3
|
|
60jGH+0PRDcd9wjOkLH/DIOrf+MHosbjl6XPHBmlp592iv9sIyKLjM5q/CXj
|
|
HbuADRF32wiyNsuTcnYK7pJMqTdkbyNcjM7I14lQcGrqshGlupUw+imxWUmc
|
|
gjebvdR/XWglNt9uIEIlKXj+oN7vPeqtxMp7RUcDOQq6fBLHZw9biFS7noRm
|
|
NQpyqg22G6YxiI4TBus6dlIwL72y6G56M1HBOyexHSi4TjBwWelIM5H1OEst
|
|
QZeCUfjVabNSM+E1ubzXbi8FvZLjNOmPmwg+v+dBfeYUHCo2KF6qaST2hsnP
|
|
j7hQkL9zO89BtgaiNHvpy1w4BTnk+n+G9dQTGrt95o1vUdCJzqZ85Uk98eLL
|
|
+LqM2xSUaYju7rxSTxTJ9O8wvkNBNfupuw+V6oknSTW301Mp2H4x36Pap47I
|
|
iAjVMsinYOxQQAg3qZaQoayY3S2g4MJAtu6r5ddEWuP5Y9NFFDRQ2tzZ8PE1
|
|
kcLlFpVaQkH7j7H0/rDXRFyg8ehkDQX3GWSozYzXEDd81scktVNQIV/dzja6
|
|
muARDM+d+EjBTdyXygeMqomwQpZKvW4K2tjuoKyyVxMhv6a/jvcxv8d11XXF
|
|
v4q44taxU/crBU8yppb7Tr8izjkmj31foOD9DbraYmcqCAd9RdSRoaIgZPGM
|
|
tpYQyx08/HVyVBSKOH0/Mb6EyHD91WusSMW3JwPPth8sIb6Glfk5qFIx5bJB
|
|
15fvL4lzjebP/LdScSmuOVdz3UviptklmdK9VHTqdPRkuD0naANHxsGIircD
|
|
BnjCNZ4T7z0Nyt+ZUPHm9+DnZRzPCZGYjTZd+6m4z0ue70pWMZHVnnf7jwMV
|
|
eYKjWs4MFxHldh//bfOkYnH8Rmnei4WE0/fypsqzVDRUNN1WYVZIsFzMSNL3
|
|
oaLI6p+wDsVCYm/qqW1W/lTMfgdbtVoLiA+fWU97X6Pii9ppu0JyAfHD5b/e
|
|
wkQqPlkWZdn67SkheeZ62X81VNQpcuPgj3pIRK4e336rloqX+TtP77J8SLDd
|
|
2Vv4rZ6Knje0s2ZEHxI/XnI+zGik4na+qO+TWXlEOUtI0sZ2Kg4CezZP9QPC
|
|
IS7Q788oFQP1VTkb+HOJFpLzzIExKpa6i1cP9uQQemXg+ewHFbkEHRU8H+QQ
|
|
5P6V426TzPzzq76N6eYQiyqXbXoWqKi1231u26VsIqnCf3vVWhrSt5PG7Tnv
|
|
E+vM7Asl+GkY+Cqm2r47iwgc1KT5CdDQreLCpprHWYQb54LSZmEa/vKNPPbK
|
|
MovYYX5eKEuGhrGRR3mO5GUSnUPnZkK30HCTqjvlztEMQnjN6cJ9tjTUXNQ7
|
|
oal5l8jeffnilD0Nfzwd3DsxnkpsvRy5O9aRhkdcwqeOZqUSZlMFH7uP0JDD
|
|
hosctT6VCOucWzx6moZqUeHDD38nEwtZV/UuBtHQl3T909GeRCKsL3qtdAgN
|
|
j9bJ0w6lJBJCIlkd1WE0rLuUabPikEhsvlF/nDOChq4uTRVq/QmEuyfvregE
|
|
Gvr7ySWyjMcTPTqx7bmPaWhJ05m3U4oj3Hyz7xrl0xDTRffNT8QSf/JfuI4X
|
|
0HBHVICrYmkssVGhe37LSxqa36ZbyprFEiY80lKvamjoKTArFhh4h6jsyD3W
|
|
/pGGB+2LnKqXowlj/lLa+W4aXqdWOKW0RhPdBo1/xHppaJS17uQv5gVptvxn
|
|
+KFBGo64Hx35ZxBN0DI3P/3+g4YuAiWWyupRRGWP7vmICeb4mu3XyP2RhLGQ
|
|
JWyaouH4gUqL9TcjiePXfdt85mh4N5VnwWPkNjFbE5YiukDDU1d1vEfv3CaC
|
|
/yYeLf9Lw/T32h1b9W4TAtseUp2Wafhn2/Ci1e8IIv1M+dzqKg3jGnY1GN2P
|
|
IP4Hz0wYnA==
|
|
"]]}, "Charting`Private`Tag#1"]}}, {}}, <|
|
|
"HighlightElements" -> <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>,
|
|
"LayoutOptions" -> <|
|
|
"PanelPlotLayout" -> <||>,
|
|
"PlotRange" -> {{0, 15}, {0., 0.22963416248739862`}},
|
|
"Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0},
|
|
"ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True},
|
|
"LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> {
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]]},
|
|
"HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ),
|
|
"ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>,
|
|
"Primitives" -> {}, "GCFlag" -> False|>,
|
|
"Meta" -> <|
|
|
"DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" ->
|
|
Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]],
|
|
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
|
|
Axes->{True, True},
|
|
AxesLabel->{None, None},
|
|
AxesOrigin->{0, 0},
|
|
DisplayFunction->Identity,
|
|
Frame->{{False, False}, {False, False}},
|
|
FrameLabel->{{None, None}, {None, None}},
|
|
FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
|
|
GridLines->{None, None},
|
|
GridLinesStyle->Directive[
|
|
GrayLevel[0.5, 0.4]],
|
|
ImagePadding->All,
|
|
Method->{
|
|
"DefaultBoundaryStyle" -> Automatic,
|
|
"DefaultGraphicsInteraction" -> {
|
|
"Version" -> 1.2, "TrackMousePosition" -> {True, False},
|
|
"Effects" -> {
|
|
"Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
|
|
"Droplines" -> {
|
|
"freeformCursorMode" -> True,
|
|
"placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" ->
|
|
AbsolutePointSize[6], "ScalingFunctions" -> None,
|
|
"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
|
|
(Identity[#]& )[
|
|
Part[#, 1]],
|
|
(Identity[#]& )[
|
|
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
|
|
(Identity[#]& )[
|
|
Part[#, 1]],
|
|
(Identity[#]& )[
|
|
Part[#, 2]]}& )}},
|
|
PlotRange->{{0, 15}, {0., 0.22963416248739862`}},
|
|
PlotRangeClipping->True,
|
|
PlotRangePadding->{{
|
|
Scaled[0.02],
|
|
Scaled[0.02]}, {
|
|
Scaled[0.05],
|
|
Scaled[0.05]}},
|
|
Ticks->{Automatic, Automatic}]], "Output",
|
|
CellChangeTimes->{3.991336179267145*^9},
|
|
CellLabel->
|
|
"Out[278]=",ExpressionUUID->"63518a14-6f7d-6f44-bb1f-32ae8d6f657f"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"Show", "[",
|
|
RowBox[{"x", ",", "xx"}], "]"}]], "Input",
|
|
CellChangeTimes->{{3.991714856368782*^9, 3.9917149167980614`*^9}, {
|
|
3.991795329890896*^9,
|
|
3.99179533223897*^9}},ExpressionUUID->"028f7072-05bf-cf40-ac60-\
|
|
9f298ef86e88"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"Show", "gcomb",
|
|
"\"Could not combine the graphics objects in \
|
|
\\!\\(\\*RowBox[{\\\"Show\\\", \\\"[\\\", RowBox[{\\\"x130\\\", \\\",\\\", \
|
|
GraphicsBox[List[List[], List[List[TagBox[List[Skeleton[2]], \
|
|
Function[Annotation[Slot[1], \\\"Charting`Private`Tag#1\\\"]]]]], \
|
|
List[List[], List[]]], List[Rule[DisplayFunction, Identity], \
|
|
Rule[DisplayFunction, Identity], Rule[DisplayFunction, Identity], \
|
|
Rule[AspectRatio, NCache[Power[GoldenRatio, -1], 0.6180339887498948`]], \
|
|
Rule[Axes, List[True, True]], Rule[AxesLabel, List[None, None]], \
|
|
Rule[AxesOrigin, List[0, 0]], RuleDelayed[DisplayFunction, Identity], \
|
|
Rule[Frame, List[List[False, False], List[False, False]]], Rule[FrameLabel, \
|
|
List[List[None, None], List[None, None]]], Rule[FrameTicks, \
|
|
List[List[Automatic, Automatic], List[Automatic, Automatic]]], \
|
|
Rule[GridLines, List[None, None]], Rule[GridLinesStyle, \
|
|
Directive[GrayLevel[0.5`, 0.4`]]], Rule[Method, \
|
|
List[Rule[\\\"AxisPadding\\\", Scaled[0.02`]], \
|
|
Rule[\\\"DefaultBoundaryStyle\\\", Automatic], \
|
|
Rule[\\\"DefaultGraphicsInteraction\\\", List[Rule[Skeleton[2]], \
|
|
Rule[Skeleton[2]], Rule[Skeleton[2]]]], Rule[\\\"DefaultMeshStyle\\\", \
|
|
AbsolutePointSize[6]], Rule[\\\"DefaultPlotStyle\\\", \
|
|
List[Directive[Skeleton[2]], Directive[Skeleton[2]], Directive[Skeleton[2]], \
|
|
Directive[Skeleton[2]], Directive[Skeleton[2]], Directive[Skeleton[2]], \
|
|
Directive[Skeleton[2]], Directive[Skeleton[2]], Directive[Skeleton[2]], \
|
|
Directive[Skeleton[2]], Directive[Skeleton[2]], Directive[Skeleton[2]], \
|
|
Directive[Skeleton[2]], Directive[Skeleton[2]], Directive[Skeleton[2]]]], \
|
|
Rule[\\\"DomainPadding\\\", Scaled[0.02`]], Rule[\\\"PointSizeFunction\\\", \
|
|
\\\"SmallPointSize\\\"], Rule[\\\"RangePadding\\\", Scaled[0.05`]], \
|
|
Rule[\\\"OptimizePlotMarkers\\\", True], Rule[\\\"IncludeHighlighting\\\", \\\
|
|
\"CurrentPoint\\\"], Rule[\\\"HighlightStyle\\\", Automatic], \
|
|
Rule[\\\"OptimizePlotMarkers\\\", True], Rule[\\\"CoordinatesToolOptions\\\", \
|
|
List[Rule[Skeleton[2]], Rule[Skeleton[2]]]]]], Rule[PlotRange, List[List[0, \
|
|
52.`], List[0, 0.120683`]]], Rule[PlotRangeClipping, True], \
|
|
Rule[PlotRangePadding, List[List[Scaled[0.02`], Scaled[0.02`]], \
|
|
List[Scaled[0.02`], Scaled[0.05`]]]], Rule[Ticks, List[Automatic, \
|
|
Automatic]]]]}], \\\"]\\\"}]\\).\"", 2, 532, 171, 24485846962764810879,
|
|
"Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{{3.9917148948888054`*^9, 3.991714918948065*^9}},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[532]:=",ExpressionUUID->"b564c677-bd9d-0e4f-82de-383dbfb5076a"],
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"Show", "[",
|
|
RowBox[{"x130", ",",
|
|
GraphicsBox[{{},
|
|
InterpretationBox[{
|
|
TagBox[
|
|
TagBox[
|
|
{RGBColor[0.368417, 0.506779, 0.709798], PointSize[
|
|
0.011000000000000001`], AbsoluteThickness[2],
|
|
PointBox[CompressedData["
|
|
1:eJxTTMoPSmViYGAwBWIQDQNKeX6qzA5T7SG8D/amib9PSsivg/IZHJZPW/vV
|
|
1Wk7lM/hwHVn1+zlVnugfAEHySd6h0Se7oPyRRy2/nq1ykEXxpdwsL2qaH6Y
|
|
F6ZexiG6yuTq5J8w8xQcwpLmTd3yaDOUr+Rg0TqVS2sVzH4Vh/kKG+/aOiyH
|
|
8tUcEv+YvDubvwDK13B48SOj8JjBdChfy2ERx8rbN8P7oHwdB80ta34fd2qB
|
|
8vUcdkyNm907tQLKN3Dwn9LicutYPpRv6HAtb/eFmOWJUL6Rw9aCyNazDOFQ
|
|
vrHDpJcXXlaau0H5Jg6ZsqG+AqX2UL6pA/+1/5ZnpqtD+WYOZuVf9sd0q0H5
|
|
5g66zjKvH5n9soPwLRxkVFx+NokJQeUtHRhQgJXDrzm7Y/V9GaHy1mjyNg4f
|
|
Mx53bP3xBWqeLZq8nQPrIvXUIOfXUHl7NHkHh5AnAoXFWjch8g0OaPKOUPmT
|
|
UHlHNHknh963Wxd8P7YBKu+EJu+MJu+MJu+CJu+CJu+Kym9A4zO4ocmj8Rnc
|
|
0eTR+AweaPJofAZPNHk0PoMXnA8AFc+iCQ==
|
|
"]]},
|
|
Annotation[#, "Charting`Private`Tag#1"]& ],
|
|
{"WolframDynamicHighlight", <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}],
|
|
StyleBox[
|
|
DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {},
|
|
Slot["HighlightElements"],
|
|
Slot["LayoutOptions"],
|
|
Slot["Meta"],
|
|
Charting`HighlightActionFunction["DynamicHighlight", {{
|
|
Annotation[{
|
|
Directive[
|
|
PointSize[0.011000000000000001`],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]],
|
|
Point[CompressedData["
|
|
1:eJxTTMoPSmViYGAwBWIQDQNKeX6qzA5T7SG8D/amib9PSsivg/IZHJZPW/vV
|
|
1Wk7lM/hwHVn1+zlVnugfAEHySd6h0Se7oPyRRy2/nq1ykEXxpdwsL2qaH6Y
|
|
F6ZexiG6yuTq5J8w8xQcwpLmTd3yaDOUr+Rg0TqVS2sVzH4Vh/kKG+/aOiyH
|
|
8tUcEv+YvDubvwDK13B48SOj8JjBdChfy2ERx8rbN8P7oHwdB80ta34fd2qB
|
|
8vUcdkyNm907tQLKN3Dwn9LicutYPpRv6HAtb/eFmOWJUL6Rw9aCyNazDOFQ
|
|
vrHDpJcXXlaau0H5Jg6ZsqG+AqX2UL6pA/+1/5ZnpqtD+WYOZuVf9sd0q0H5
|
|
5g66zjKvH5n9soPwLRxkVFx+NokJQeUtHRhQgJXDrzm7Y/V9GaHy1mjyNg4f
|
|
Mx53bP3xBWqeLZq8nQPrIvXUIOfXUHl7NHkHh5AnAoXFWjch8g0OaPKOUPmT
|
|
UHlHNHknh963Wxd8P7YBKu+EJu+MJu+MJu+CJu+CJu+Kym9A4zO4ocmj8Rnc
|
|
0eTR+AweaPJofAZPNHk0PoMXnA8AFc+iCQ==
|
|
"]]}, "Charting`Private`Tag#1"]}}, <|
|
|
"HighlightElements" -> <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>,
|
|
"LayoutOptions" -> <|
|
|
"PanelPlotLayout" -> <||>,
|
|
"PlotRange" -> {{0, 52.}, {0, 0.120683}},
|
|
"Frame" -> {{False, False}, {False, False}},
|
|
"AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio},
|
|
"Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" ->
|
|
GoldenRatio^(-1), "DefaultStyle" -> {
|
|
Directive[
|
|
PointSize[0.011000000000000001`],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]]},
|
|
"HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ),
|
|
"ScalingFunctions" -> {{Identity, Identity}, {
|
|
Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" ->
|
|
False|>,
|
|
"Meta" -> <|
|
|
"DefaultHighlight" -> {"Dynamic", None}, "Index" -> {},
|
|
"Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<|
|
|
"HighlightElements" -> <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>,
|
|
"LayoutOptions" -> <|
|
|
"PanelPlotLayout" -> <||>,
|
|
"PlotRange" -> {{0, 52.}, {0, 0.120683}},
|
|
"Frame" -> {{False, False}, {False, False}},
|
|
"AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio},
|
|
"Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" ->
|
|
GoldenRatio^(-1), "DefaultStyle" -> {
|
|
Directive[
|
|
PointSize[0.011000000000000001`],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]]},
|
|
"HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ),
|
|
"ScalingFunctions" -> {{Identity, Identity}, {
|
|
Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" ->
|
|
False|>,
|
|
"Meta" -> <|
|
|
"DefaultHighlight" -> {"Dynamic", None}, "Index" -> {},
|
|
"Function" -> ListPlot, "GroupHighlight" -> False|>|>],
|
|
ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, {
|
|
4.503599627370496*^15, -4.503599627370496*^15}}],
|
|
Selectable->False]},
|
|
Annotation[{{
|
|
Annotation[{
|
|
Directive[
|
|
PointSize[0.011000000000000001`],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]],
|
|
Point[CompressedData["
|
|
1:eJxTTMoPSmViYGAwBWIQDQNKeX6qzA5T7SG8D/amib9PSsivg/IZHJZPW/vV
|
|
1Wk7lM/hwHVn1+zlVnugfAEHySd6h0Se7oPyRRy2/nq1ykEXxpdwsL2qaH6Y
|
|
F6ZexiG6yuTq5J8w8xQcwpLmTd3yaDOUr+Rg0TqVS2sVzH4Vh/kKG+/aOiyH
|
|
8tUcEv+YvDubvwDK13B48SOj8JjBdChfy2ERx8rbN8P7oHwdB80ta34fd2qB
|
|
8vUcdkyNm907tQLKN3Dwn9LicutYPpRv6HAtb/eFmOWJUL6Rw9aCyNazDOFQ
|
|
vrHDpJcXXlaau0H5Jg6ZsqG+AqX2UL6pA/+1/5ZnpqtD+WYOZuVf9sd0q0H5
|
|
5g66zjKvH5n9soPwLRxkVFx+NokJQeUtHRhQgJXDrzm7Y/V9GaHy1mjyNg4f
|
|
Mx53bP3xBWqeLZq8nQPrIvXUIOfXUHl7NHkHh5AnAoXFWjch8g0OaPKOUPmT
|
|
UHlHNHknh963Wxd8P7YBKu+EJu+MJu+MJu+CJu+CJu+Kym9A4zO4ocmj8Rnc
|
|
0eTR+AweaPJofAZPNHk0PoMXnA8AFc+iCQ==
|
|
"]]}, "Charting`Private`Tag#1"]}}, <|
|
|
"HighlightElements" -> <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>,
|
|
"LayoutOptions" -> <|
|
|
"PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 52.}, {0, 0.120683}},
|
|
"Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0},
|
|
"ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True},
|
|
"LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1),
|
|
"DefaultStyle" -> {
|
|
Directive[
|
|
PointSize[0.011000000000000001`],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]]},
|
|
"HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ),
|
|
"ScalingFunctions" -> {{Identity, Identity}, {
|
|
Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>,
|
|
"Meta" -> <|
|
|
"DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" ->
|
|
ListPlot, "GroupHighlight" -> False|>|>,
|
|
"DynamicHighlight"]], {{}, {}}},
|
|
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
|
|
Axes->{True, True},
|
|
AxesLabel->{None, None},
|
|
AxesOrigin->{0, 0},
|
|
DisplayFunction->Identity,
|
|
Frame->{{False, False}, {False, False}},
|
|
FrameLabel->{{None, None}, {None, None}},
|
|
FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
|
|
GridLines->{None, None},
|
|
GridLinesStyle->Directive[
|
|
GrayLevel[0.5, 0.4]],
|
|
Method->{
|
|
"AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic,
|
|
"DefaultGraphicsInteraction" -> {
|
|
"Version" -> 1.2, "TrackMousePosition" -> {True, False},
|
|
"Effects" -> {
|
|
"Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
|
|
"Droplines" -> {
|
|
"freeformCursorMode" -> True,
|
|
"placement" -> {"x" -> "All", "y" -> "None"}}}},
|
|
"DefaultMeshStyle" -> AbsolutePointSize[6], "DefaultPlotStyle" -> {
|
|
Directive[
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.880722, 0.611041, 0.142051],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.560181, 0.691569, 0.194885],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.922526, 0.385626, 0.209179],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.528488, 0.470624, 0.701351],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.772079, 0.431554, 0.102387],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.363898, 0.618501, 0.782349],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[1, 0.75, 0],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.647624, 0.37816, 0.614037],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.571589, 0.586483, 0.],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.915, 0.3325, 0.2125],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.40082222609352647`, 0.5220066643438841, 0.85],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.9728288904374106, 0.621644452187053, 0.07336199581899142],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.736782672705901, 0.358, 0.5030266573755369],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.28026441037696703`, 0.715, 0.4292089322474965],
|
|
AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02],
|
|
"PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05],
|
|
"OptimizePlotMarkers" -> True, "IncludeHighlighting" -> "CurrentPoint",
|
|
"HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True,
|
|
"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& )}},
|
|
PlotRange->{{0, 52.}, {0, 0.120683}},
|
|
PlotRangeClipping->True,
|
|
PlotRangePadding->{{
|
|
Scaled[0.02],
|
|
Scaled[0.02]}, {
|
|
Scaled[0.02],
|
|
Scaled[0.05]}},
|
|
Ticks->{Automatic, Automatic}]}], "]"}]], "Output",
|
|
CellChangeTimes->{{3.9917148949168243`*^9, 3.991714918978077*^9}},
|
|
CellLabel->
|
|
"Out[532]=",ExpressionUUID->"5679b5e8-e1a4-b440-bec7-c61c864a5d89"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
FractionBox[
|
|
RowBox[{"4", "*", "x", "*", "x", "*", "y", "*", "\[Pi]", "*",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
UnderoverscriptBox["\[Sum]",
|
|
RowBox[{"n", "=", "0"}], "100"],
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
RowBox[{"2",
|
|
RowBox[{"(",
|
|
FractionBox["h2", "Cb"], ")"}], "*", "x", "*", "y"}], "2"],
|
|
")"}],
|
|
RowBox[{"2", "*", "n"}]], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox["1",
|
|
RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], ")"}]}],
|
|
RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(", "x", ")"}], "2"], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
RowBox[{"y", "*", "y"}], "1"]}],
|
|
RowBox[{"(",
|
|
FractionBox["1", "Cb"], ")"}]}]],
|
|
RowBox[{"\[DifferentialD]", "y"}],
|
|
RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input",
|
|
CellLabel->
|
|
"In[282]:=",ExpressionUUID->"e94e1ddb-0658-3b45-ad00-7392c646ee51"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"2.443621462424051`*^-173\\\", \
|
|
\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\
|
|
734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \
|
|
too small to represent as a normalized machine number; precision may be lost.\
|
|
\"", 2, 282, 273, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991337269930374*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[282]:=",ExpressionUUID->"5789d8fb-150e-9a49-8a2f-15984a4083a0"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"1.352709009016139`*^-176\\\", \
|
|
\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\
|
|
116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \
|
|
is too small to represent as a normalized machine number; precision may be \
|
|
lost.\"", 2, 282, 274, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913372699413757`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[282]:=",ExpressionUUID->"10eb161e-8740-e441-b61b-b27d08d291d7"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"7.488155146821548`*^-180\\\", \
|
|
\\\"16119865811878511595667829951875854656452559288804368514530318561267900247\
|
|
2153109099682969421627018644700669916936247705600000000000000000000000000\\\"]\
|
|
\\) is too small to represent as a normalized machine number; precision may \
|
|
be lost.\"", 2, 282, 275, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991337269949375*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[282]:=",ExpressionUUID->"f2d20661-5fdd-a74c-8183-e6888fe98835"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "stop",
|
|
"\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \
|
|
\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
|
|
during this calculation.\"", 2, 282, 276, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913372699573765`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[282]:=",ExpressionUUID->"775942df-185d-1b4c-9fb6-75af36168c8b"],
|
|
|
|
Cell[BoxData["9.332200719005147`"], "Output",
|
|
CellChangeTimes->{3.9913372766841774`*^9},
|
|
CellLabel->
|
|
"Out[282]=",ExpressionUUID->"03db46c0-47c3-f348-bb46-ea4092806a8c"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"q", "=",
|
|
RowBox[{
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
FractionBox["1",
|
|
RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]],
|
|
RowBox[{"(",
|
|
RowBox[{"4", "x", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"x", "-", "J1"}], ")"}], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"y", "-", "J2"}], ")"}], "*", "y", "*", "\[Pi]", "*",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
UnderoverscriptBox["\[Sum]",
|
|
RowBox[{"n", "=", "0"}], "100"],
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
RowBox[{"2",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox["1", "Cw"]}], "+",
|
|
FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}],
|
|
"2"], ")"}],
|
|
RowBox[{"2", "*", "n"}]], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox["1",
|
|
RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}],
|
|
")"}]}], ")"}], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(", "x", ")"}], "2"], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
RowBox[{"y", "*", "y"}], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]],
|
|
RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}],
|
|
RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input",
|
|
CellChangeTimes->{{3.991846210534153*^9,
|
|
3.991846213941681*^9}},ExpressionUUID->"23c7e6b2-69d5-1a4e-bd5f-\
|
|
947421a54e26"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"1.1126821353218566`*^-190\\\", \
|
|
\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\
|
|
358493165635789279094374400000000000000000000\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 283,
|
|
277, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913372767181473`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[283]:=",ExpressionUUID->"fed85baf-99d5-3544-911c-9e3778d04d17"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"1.0111242895395887`*^-194\\\", \
|
|
\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\
|
|
4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 283,
|
|
278, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913372767281475`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[283]:=",ExpressionUUID->"74041ff4-8835-8a41-a4dd-eea6e1a39915"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"9.188359338592283`*^-199\\\", \
|
|
\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\
|
|
6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 283,
|
|
279, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913372767351475`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[283]:=",ExpressionUUID->"9e09393a-eefe-ba45-99ee-c640606d2ee1"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "stop",
|
|
"\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \
|
|
\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
|
|
during this calculation.\"", 2, 283, 280, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991337276743145*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[283]:=",ExpressionUUID->"70437e48-0dcf-4e4f-a146-b3bdae4f632b"],
|
|
|
|
Cell[BoxData["0.5406905105605413`"], "Output",
|
|
CellChangeTimes->{3.991337284091696*^9},
|
|
CellLabel->
|
|
"Out[283]=",ExpressionUUID->"86f3d22e-a660-0b41-baff-cdb033e864e0"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"S1", "=",
|
|
RowBox[{
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
FractionBox["1",
|
|
RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]],
|
|
RowBox[{"(",
|
|
RowBox[{"4", "x", "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]",
|
|
"*",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
UnderoverscriptBox["\[Sum]",
|
|
RowBox[{"n", "=", "0"}], "100"],
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
RowBox[{"2",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox["1", "Cw"]}], "+",
|
|
FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}],
|
|
"2"], ")"}],
|
|
RowBox[{"2", "*", "n"}]], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox["1",
|
|
RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}],
|
|
")"}]}], ")"}], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(", "x", ")"}], "2"], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
RowBox[{"y", "*", "y"}], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]],
|
|
RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}],
|
|
RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input",
|
|
CellChangeTimes->{{3.991846217504902*^9,
|
|
3.991846220659443*^9}},ExpressionUUID->"38ca1203-b2e6-3044-aa85-\
|
|
97017d76bb30"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"1.1126821353218566`*^-190\\\", \
|
|
\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\
|
|
358493165635789279094374400000000000000000000\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 284,
|
|
281, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991337284131695*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[284]:=",ExpressionUUID->"f4fc5672-9e6d-3748-ab75-56a8f1b8c47a"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"1.0111242895395887`*^-194\\\", \
|
|
\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\
|
|
4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 284,
|
|
282, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991337284142767*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[284]:=",ExpressionUUID->"4aa61d0b-cbfc-004d-8be6-ff84c5742fd0"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"9.188359338592283`*^-199\\\", \
|
|
\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\
|
|
6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 284,
|
|
283, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991337284150778*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[284]:=",ExpressionUUID->"bcdde3fc-988d-814c-a83c-ce90996db47a"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "stop",
|
|
"\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \
|
|
\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
|
|
during this calculation.\"", 2, 284, 284, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913372841597614`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[284]:=",ExpressionUUID->"f371b728-3599-4340-a62e-fdf04344dabe"],
|
|
|
|
Cell[BoxData["2.9943030245183917`"], "Output",
|
|
CellChangeTimes->{3.9913372907074146`*^9},
|
|
CellLabel->
|
|
"Out[284]=",ExpressionUUID->"077bbedf-862f-cc4e-b648-9dad11154cf8"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"S2", "=",
|
|
RowBox[{
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
FractionBox["1",
|
|
RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]],
|
|
RowBox[{"(",
|
|
RowBox[{"4", "x", "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]",
|
|
"*",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
UnderoverscriptBox["\[Sum]",
|
|
RowBox[{"n", "=", "0"}], "100"],
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
RowBox[{"2",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox["1", "Cw"]}], "+",
|
|
FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}],
|
|
"2"], ")"}],
|
|
RowBox[{"2", "*", "n"}]], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox["1",
|
|
RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}],
|
|
")"}]}], ")"}], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(", "x", ")"}], "2"], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
RowBox[{"y", "*", "y"}], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]],
|
|
RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}],
|
|
RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input",
|
|
CellChangeTimes->{{3.9918462258948135`*^9,
|
|
3.9918462291469593`*^9}},ExpressionUUID->"087e4064-7024-cb41-8231-\
|
|
fe78ad70afda"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"1.1126821353218566`*^-190\\\", \
|
|
\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\
|
|
358493165635789279094374400000000000000000000\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 285,
|
|
285, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991337290744484*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[285]:=",ExpressionUUID->"d528e032-b6a6-a543-9b8d-23228fe63677"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"1.0111242895395887`*^-194\\\", \
|
|
\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\
|
|
4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 285,
|
|
286, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991337290753483*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[285]:=",ExpressionUUID->"e6016862-564d-8a4b-ba73-420e4cefde7e"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"9.188359338592283`*^-199\\\", \
|
|
\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\
|
|
6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 285,
|
|
287, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913372907615204`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[285]:=",ExpressionUUID->"52da723a-eab2-1040-978c-52ac672efc66"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "stop",
|
|
"\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \
|
|
\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
|
|
during this calculation.\"", 2, 285, 288, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.99133729076952*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[285]:=",ExpressionUUID->"d1a6585d-5cf1-364e-9714-b29a76c14a20"],
|
|
|
|
Cell[BoxData["16.72305770548981`"], "Output",
|
|
CellChangeTimes->{3.991337294569908*^9},
|
|
CellLabel->
|
|
"Out[285]=",ExpressionUUID->"5c7deb9d-a1b0-ad49-bd81-bf4a15d59971"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
FractionBox["q",
|
|
SqrtBox[
|
|
RowBox[{"S1", "*", "S2"}]]]], "Input",
|
|
CellChangeTimes->{{3.9918462331551914`*^9,
|
|
3.991846236994051*^9}},ExpressionUUID->"cd9a77e7-d597-394b-a710-\
|
|
f971fc40d827"],
|
|
|
|
Cell[BoxData["0.07640873836855284`"], "Output",
|
|
CellChangeTimes->{3.9913372946009064`*^9},
|
|
CellLabel->
|
|
"Out[286]=",ExpressionUUID->"5a5422b6-c991-1740-997c-c4f205d8ff82"]
|
|
}, Open ]],
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"Clear", "[",
|
|
RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input",
|
|
CellChangeTimes->{{3.991846241790388*^9, 3.9918462437859745`*^9},
|
|
3.9919238532202225`*^9},ExpressionUUID->"13a90bf7-f7dc-7e48-845e-\
|
|
80048a92ff15"],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"Qb1", "=",
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.05", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "34"}]]}], ")"}], "2"],
|
|
RowBox[{"1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}]], ")"}],
|
|
RowBox[{"-", "1"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"Ir", "*", "Il"}],
|
|
RowBox[{"Il", "+", "Ir"}]]}]}]], "Input",
|
|
CellLabel->
|
|
"In[288]:=",ExpressionUUID->"ce764b10-5670-7a4e-86ae-3f77893f67b3"],
|
|
|
|
Cell[BoxData["7.13574266196526`"], "Output",
|
|
CellChangeTimes->{3.991337294629921*^9},
|
|
CellLabel->
|
|
"Out[288]=",ExpressionUUID->"e25dfa18-ea25-df40-8f5d-0ff169fa5ae7"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"hb", "=",
|
|
SqrtBox[
|
|
FractionBox["Kb", "Qb1"]]}]], "Input",
|
|
CellLabel->
|
|
"In[290]:=",ExpressionUUID->"717d3ead-30a8-ec47-9afe-f9884217d594"],
|
|
|
|
Cell[BoxData["1.4042291233212119`"], "Output",
|
|
CellChangeTimes->{3.9913372946629753`*^9},
|
|
CellLabel->
|
|
"Out[290]=",ExpressionUUID->"96aab3a1-95e4-7349-96b6-43128457940c"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"Cb", "=",
|
|
FractionBox[
|
|
RowBox[{"Qb1", "*", "hb"}], "1"]}]], "Input",
|
|
CellLabel->
|
|
"In[293]:=",ExpressionUUID->"c43d0cec-6a64-9643-a5bb-27ab984c3bb2"],
|
|
|
|
Cell[BoxData["10.020217662457247`"], "Output",
|
|
CellChangeTimes->{3.9913372947367725`*^9},
|
|
CellLabel->
|
|
"Out[293]=",ExpressionUUID->"98fcf8be-ba43-ae41-a6cd-62aef0ebb50c"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"o1", "=",
|
|
RowBox[{
|
|
RowBox[{"1", "/",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], "+",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*",
|
|
"f2"}]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.05", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "34"}]]}], ")"}], "2"],
|
|
RowBox[{"1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}]], ")"}],
|
|
RowBox[{"-", "2"}]], "*", "Cb"}], "+",
|
|
RowBox[{"Cw", "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], ")"}],
|
|
"2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.05", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "34"}]]}], ")"}], "2"],
|
|
RowBox[{"1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}]], ")"}],
|
|
RowBox[{"-", "2"}]]}]}], ")"}]}],
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], "+",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*",
|
|
"f2"}]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.05", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "34"}]]}], ")"}], "2"],
|
|
RowBox[{"1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}]], ")"}],
|
|
RowBox[{"-", "2"}]]}]}]], "Input",
|
|
CellLabel->
|
|
"In[294]:=",ExpressionUUID->"e15da858-b31b-c344-a560-00b30705c2c2"],
|
|
|
|
Cell[BoxData["0.06674599726273667`"], "Output",
|
|
CellChangeTimes->{3.9913372947513313`*^9},
|
|
CellLabel->
|
|
"Out[294]=",ExpressionUUID->"4ae926cc-90a9-5a4e-8bc7-efdead49917a"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{"2", "*", "x", "*", "x", "*", "o1", "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-", "x"}], "*", "x", "*", "o1"}]],
|
|
RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",
|
|
CellLabel->
|
|
"In[295]:=",ExpressionUUID->"f53a321d-2180-024b-b925-7b08c74c1c33"],
|
|
|
|
Cell[BoxData["3.430301770911147`"], "Output",
|
|
CellChangeTimes->{3.9913372948636913`*^9},
|
|
CellLabel->
|
|
"Out[295]=",ExpressionUUID->"f2f17f7a-79ff-794b-914c-ee087932d3fc"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"o2", "=",
|
|
RowBox[{
|
|
RowBox[{"1", "/",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], "+",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*",
|
|
"f2"}]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.05", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "34"}]]}], ")"}], "2"],
|
|
RowBox[{"1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}]], ")"}],
|
|
RowBox[{"-", "2"}]], "*", "Cb"}], "+",
|
|
RowBox[{"Cw", "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*",
|
|
"f2"}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.05", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "34"}]]}], ")"}], "2"],
|
|
RowBox[{"1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}]], ")"}],
|
|
RowBox[{"-", "2"}]]}]}], ")"}]}],
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], "+",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*",
|
|
"f2"}]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.05", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "34"}]]}], ")"}], "2"],
|
|
RowBox[{"1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}]], ")"}],
|
|
RowBox[{"-", "2"}]]}]}]], "Input",
|
|
CellLabel->
|
|
"In[296]:=",ExpressionUUID->"6fc2e120-104b-274c-a69b-ff643539124b"],
|
|
|
|
Cell[BoxData["0.01266539131451536`"], "Output",
|
|
CellChangeTimes->{3.991337294877693*^9},
|
|
CellLabel->
|
|
"Out[296]=",ExpressionUUID->"a5f469a0-4ca3-e047-b336-e38d98804459"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{"2", "*", "x", "*", "x", "*", "o2", "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-", "x"}], "*", "x", "*", "o2"}]],
|
|
RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",
|
|
CellLabel->
|
|
"In[297]:=",ExpressionUUID->"1ebbe4bd-69b2-ba4a-b880-612b325b749b"],
|
|
|
|
Cell[BoxData["7.874729317258519`"], "Output",
|
|
CellChangeTimes->{3.991337294976324*^9},
|
|
CellLabel->
|
|
"Out[297]=",ExpressionUUID->"dfd045e6-0547-5948-8a30-f6f21ca1851b"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"h1", "=",
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}],
|
|
")"}], "/",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], "+",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}],
|
|
")"}]}]}]], "Input",
|
|
CellLabel->
|
|
"In[298]:=",ExpressionUUID->"1efe60b3-9182-2c4c-bd13-9e4d244d7e70"],
|
|
|
|
Cell[BoxData["0.7884625602161153`"], "Output",
|
|
CellChangeTimes->{3.9913372950022793`*^9},
|
|
CellLabel->
|
|
"Out[298]=",ExpressionUUID->"235fc321-e687-b140-a2ed-ea3ad35e3bb8"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"h2", "=",
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], ")"}], "/",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], "+",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}],
|
|
")"}]}]}]], "Input",
|
|
CellLabel->
|
|
"In[299]:=",ExpressionUUID->"66f987a0-c978-3745-b4d7-87ccf5fea6cf"],
|
|
|
|
Cell[BoxData["0.21153743978388478`"], "Output",
|
|
CellChangeTimes->{3.991337295013279*^9},
|
|
CellLabel->
|
|
"Out[299]=",ExpressionUUID->"1e144329-9e43-bf4f-9d10-823c44cb18a4"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"h3", "=",
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], ")"}], "*",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}],
|
|
")"}]}], ")"}], "/",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox["A1",
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*", "f1", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b1"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], "+",
|
|
"\[IndentingNewLine]",
|
|
RowBox[{
|
|
FractionBox["2", "5"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"1.3", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "15"}]]}], ")"}], "2"], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"A", "-", "A1"}], ")"}],
|
|
RowBox[{"5", "/", "3"}]], "*",
|
|
FractionBox[
|
|
RowBox[{"931.5", "*", "1.6", "*",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]]}],
|
|
RowBox[{"9", "*",
|
|
SuperscriptBox["10", "16"]}]], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"1", "+",
|
|
RowBox[{
|
|
FractionBox["1", "2"],
|
|
SqrtBox[
|
|
FractionBox["5",
|
|
RowBox[{"4", "\[Pi]"}]]], "b2"}], "+",
|
|
RowBox[{
|
|
FractionBox["25",
|
|
RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*",
|
|
"f2"}]}], ")"}], "2"]}]}]], "Input",
|
|
CellLabel->
|
|
"In[300]:=",ExpressionUUID->"696f9a62-0454-0540-abef-a5c123c32f5f"],
|
|
|
|
Cell[BoxData["0.16678935135356415`"], "Output",
|
|
CellChangeTimes->{3.991337295041279*^9},
|
|
CellLabel->
|
|
"Out[300]=",ExpressionUUID->"c1758059-ccb3-1040-a83d-304abcce69c4"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"J1", "=",
|
|
RowBox[{
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
FractionBox[
|
|
RowBox[{"4", "x", "*", "x", "*", "y", "*", "\[Pi]", "*",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
UnderoverscriptBox["\[Sum]",
|
|
RowBox[{"n", "=", "0"}], "100"],
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
RowBox[{"2",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox["1", "Cw"]}], "+",
|
|
FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}],
|
|
"2"], ")"}],
|
|
RowBox[{"2", "*", "n"}]], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox["1",
|
|
RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}],
|
|
")"}]}],
|
|
RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(", "x", ")"}], "2"], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
RowBox[{"y", "*", "y"}], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]],
|
|
RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}],
|
|
RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input",
|
|
CellChangeTimes->{
|
|
3.991846260820032*^9},ExpressionUUID->"efacefcd-90be-574d-92a2-\
|
|
eec47ae06964"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"1.5023512908051311`*^-195\\\", \
|
|
\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\
|
|
098005054611040868761600000000000000000000\\\"]\\) is too small to represent \
|
|
as a normalized machine number; precision may be lost.\"", 2, 301, 289,
|
|
24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913372950662746`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[301]:=",ExpressionUUID->"7a1e7ba8-a6bf-2f4a-bf31-4a2ed3016295"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"8.739446301903759`*^-200\\\", \
|
|
\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\
|
|
358493165635789279094374400000000000000000000\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 301,
|
|
290, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991337295076277*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[301]:=",ExpressionUUID->"9c2e507b-ef90-ac45-8745-64f07a4cab70"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"5.083892304770298`*^-204\\\", \
|
|
\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\
|
|
4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 301,
|
|
291, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913372950842743`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[301]:=",ExpressionUUID->"79a512ec-e31d-8844-bf00-025e94c5ef0a"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "stop",
|
|
"\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \
|
|
\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
|
|
during this calculation.\"", 2, 301, 292, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913372950922775`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[301]:=",ExpressionUUID->"52a2b255-a51b-1c41-afb5-2c6906cc81b7"],
|
|
|
|
Cell[BoxData["3.430301770911144`"], "Output",
|
|
CellChangeTimes->{3.991337298790371*^9},
|
|
CellLabel->
|
|
"Out[301]=",ExpressionUUID->"8f590d85-cd49-4b4a-b80f-ef4df8529f15"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"J2", "=",
|
|
RowBox[{
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
FractionBox[
|
|
RowBox[{"4", "x", "*", "y", "*", "y", "*", "\[Pi]", "*",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
UnderoverscriptBox["\[Sum]",
|
|
RowBox[{"n", "=", "0"}], "100"],
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
RowBox[{"2",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox["1", "Cw"]}], "+",
|
|
FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}],
|
|
"2"], ")"}],
|
|
RowBox[{"2", "*", "n"}]], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox["1",
|
|
RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}],
|
|
")"}]}],
|
|
RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(", "x", ")"}], "2"], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
RowBox[{"y", "*", "y"}], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]],
|
|
RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}],
|
|
RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input",
|
|
CellChangeTimes->{
|
|
3.991846268674473*^9},ExpressionUUID->"113e0d2a-28bc-cb46-97f5-\
|
|
cf1d438fc6f4"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"1.5023512908051311`*^-195\\\", \
|
|
\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\
|
|
098005054611040868761600000000000000000000\\\"]\\) is too small to represent \
|
|
as a normalized machine number; precision may be lost.\"", 2, 302, 293,
|
|
24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913372988243732`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[302]:=",ExpressionUUID->"9c88a8d0-79f6-c641-aaf7-46f5907e3958"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"8.739446301903759`*^-200\\\", \
|
|
\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\
|
|
358493165635789279094374400000000000000000000\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 302,
|
|
294, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913372988343716`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[302]:=",ExpressionUUID->"5bdaba15-f4c0-7a4a-905b-a46ed4994f1b"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"5.083892304770298`*^-204\\\", \
|
|
\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\
|
|
4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 302,
|
|
295, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913372988425922`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[302]:=",ExpressionUUID->"921e00ea-3ed1-4d4f-a4c6-636b2e493926"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "stop",
|
|
"\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \
|
|
\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
|
|
during this calculation.\"", 2, 302, 296, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913372988505898`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[302]:=",ExpressionUUID->"94646a19-438b-8144-9028-59ac2200b652"],
|
|
|
|
Cell[BoxData["7.87472931725852`"], "Output",
|
|
CellChangeTimes->{3.991337302457178*^9},
|
|
CellLabel->
|
|
"Out[302]=",ExpressionUUID->"85256f71-2c5b-a942-af45-97021273c9d1"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"a", "=",
|
|
RowBox[{"Plot", "[",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{
|
|
FractionBox["1", "1"],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
FractionBox[
|
|
RowBox[{"4", "x", "*", "y", "*", "\[Pi]"}],
|
|
RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{"2",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox["1", "Cw"]}], "+",
|
|
FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y", "*",
|
|
RowBox[{"Cos", "[",
|
|
FractionBox[
|
|
RowBox[{"z", "*", "\[Pi]"}], "180"], "]"}]}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(", "x", ")"}], "2"], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
RowBox[{"y", "*", "y"}], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]],
|
|
RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}],
|
|
RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input",
|
|
CellChangeTimes->{
|
|
3.9918462728234997`*^9},ExpressionUUID->"1fd4421d-3fcd-2d4f-bd05-\
|
|
28d15302273b"],
|
|
|
|
Cell[BoxData[
|
|
GraphicsBox[
|
|
InterpretationBox[{
|
|
TagBox[{{{}, {},
|
|
TagBox[
|
|
{RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2],
|
|
Opacity[1.], LineBox[CompressedData["
|
|
1:eJwV1Hk4Fe0bB3BE9lKKIrJLZemIKHnu7GSLsi/Hcc5YElmSUqQslSV5FXnL
|
|
ViRZQmRPpV5J8SuVlFDm0LFmOae0+D3+mGuuzzUz3/k+91zzyNNCHBg8XFxc
|
|
Y/hYPoe+0lB90PPKkEd38MofgoMMp27p0EzKkMDFQb1lD+XpZiqZNKN300z5
|
|
39j29JcrRbSfoqLCBftF7Kqo2Cd8Jl2IwifyjIN94dmGttjS/6GKgq1x89gN
|
|
PaG5vylvUZeaw9kZbFZ/56kTTX3obuS55+PYUqSiO9v4E/p5/qETE3v/9Cn9
|
|
8K5B1Heef+sQdutvlnBU6TDqe+ph/AH7XZxkdF3wV7TxQVvh/7CnVpqw5ikk
|
|
kv210+I59sqUo67aHCYad27SbsOWXXOjI7RpDC01HmLUYdtKs4unjCeQwuru
|
|
nHxsIl9BQl1gCh3Pr87NxI5Vtks43DWNkqJqxpKw+yR7d0SUfkcO05J2Qdh0
|
|
t8CAf1Jm0YeAuMOe2DPXuQqqg+dQ6RfxVzbYAgrqYt8pCyhF7xFjO3Ym/Ym5
|
|
2Ho2atr+NUcKW+62a6wmh40u2RhICGDrbU+cOtL0A3XP3xwcYnCQv+5gF8v4
|
|
N3qS2dZyAXs+6hivkMof5HhlrXIY9pkmYQM1gb8oPu7ha1fsbNC769e1hH6M
|
|
GnKrYtOLOkzCSrmhQzz4bj2dg0qf/TMUJ80D7Hgts3+xZ0a9Tl1O4YEbx6JV
|
|
T2Of2rpQcy94BfhcaG8xxM6slFecpvABdXFQv8GXg/p7Jlr/3uSDk70Fglex
|
|
5WYfuK1avxIolxXlwrDLdtpmqHNWAlgnyG/Bbm84yR3UJAAPL+ZHJtM4aOHJ
|
|
m8ExYxHQ9SkL1fThoLXWImLRrSKg9UKr8TeVg7R6TUBUXxRGxAvUnmMHjtTm
|
|
79BYBTYdUae9sY/ydGntFREDC9UTi3HeHEQqVHxPYK8BhxYxp1xPPB+iU7Bb
|
|
ey14PXwh7oXNc5cpvyF0LcwuuvzchC2nvdmhdHwtRHNtM8j24CA34/TqV0Pi
|
|
ULo6tjDenYO6fcPCJV+sh90Ritw6rhz0+XZaMlVAAowshExGXThoYrz05h1T
|
|
CRj/9LkyG1so4uubPW0SYEzN4/npzEEm8Qd3UmsloXH27tVKJw5qvKW7UJK3
|
|
EXZJiiXPO3LQLXIxcneEDAR8vAqfbTjI4lDS5/ByGaAtZLacwp5oFzcrZ8rA
|
|
ubmEOCnsnbe2r5dzlYVh9SufHa3xPGleNXyGm8FO5NF0ixUHzU4PHR87Jwey
|
|
/ulxIeYcJH7E5H6NjQK0hrF5LYGDmLeE/O0DsUc3pfQgDqr/1CM9magAwu2K
|
|
ns7YHtae51TaFMDRfPcAzRD32xbpcI2iCPqVfi6hBvj9rNszMZJK0O2i6hCk
|
|
x0EH/YTVrYaV4ZPi5/UfNTkIRR6iOP9RBoO7MwO22FsT8nbRN6pAhqDT4iMN
|
|
DuK6qW0Uc0AFDq5O0SpW56Dyz+7O1Y9UwKWz+wqxDf+fTmVxUoWqQI095vmf
|
|
Cu5nYvOORVMDku99raAMB0krXIpNHtkO15LLs7L5Oaj54rzaTx51sJPeOvt6
|
|
Je4/59pLyKvD2Y97UkSwc9uV1Iy81EFC90PsaV4OUvBrfP3jvTpslt8U6MSN
|
|
+5WRysQLDVAPtY4YWWQjGWlZQs5VC1R6H9SETbLR9qIIkV+IApOU8b+0Hjai
|
|
0c8tqNtSIOR4j2RsNxtlK2Z8pnpQoKnaODPnFRutKKy89yyKAt9KL9R3d7FR
|
|
fy7rYEYVBe4nptdQnrPRhWzqDTVFbTDQbf/34yM2YiZba7is3AmkR0V0YzUb
|
|
FYQp2dd26cBEFmWpLoONeiLRrvgifdhsW7itzpSN5L3e2noG7YWgxMVLb2YW
|
|
EGOprkLmBADvOMPJLmcBSY7X80vSjMATvUSZOgsoQtvgU8ZWEzC8IFIk9noe
|
|
0SZ/d4izTOHkv6pvHYLmUblROH9etzl8I/bvsVicQ7fmAx+VZVrCwR38J6mp
|
|
c+jHvg0v22P3w2nDIHRt/Rwa4FrxfdjHBlabfrfckTeLgjeFpMcp2oFo8YRI
|
|
l9YsqgjoaLuSYA+toVeU+xq+o5NzGznbAg7AlhhW+1br72jByszpP28HKKo9
|
|
6er3fgbpu1/eRx5whHq2fx3hN4Neb7wR2K59EGocoq/e5Z5BUsXnmku2HIKi
|
|
tAXitPo0qh/aam0r6gQ5m3mpdUFTSLZ3xi9y0gl+pJqxsuomkfaVy2U3h5zh
|
|
vOILxXU/J9AN3jmNjCcucE34nbSw/QSq26fZn9DgCp39ftGXC8ZR9q6La36X
|
|
ugEXwarau8RC3R+LErVT3CFSf9UZZggL1dpcVzp6xgM2LCWSJgPf0PcjjlzB
|
|
dE8IYE6oF3l8Qwtmav5Txl4wElj7bS9zDJVMfvgRrusNLINetlXwGHIpKPL1
|
|
FKHC0c5pzf0rx1BN9X7vFUlUIC5mm6/JHUX60q9/XvhJhfTH34zzTUaR4pBf
|
|
//8CfMAtx9hm1zwTjQgftrv+1QfCe72O8RYxUU+ara/5IRqo5ai5x9OYKDMq
|
|
T/hYDw2YgzGlAQpM1Ny69NPX0hey1GR/BYyTaLUHJGk3+sLfb8+cpR6SSG7d
|
|
f92bmn0hwSp63L+VRFpdNhtWtvoC4Zn3+0ELiRwM3O/0PfKFfXdls5ybSZS5
|
|
KfLF6ee+sEPFsex6A4mkBu6u7ujzhRKDAAfD+yRS8pLE26YvuGbX0AfvkEif
|
|
OlWSsJMOEUVCAVlXSVR8bSbcVpcOF3fMD6zCXvdm1lBSjw48lX9aE6+QaMqU
|
|
01uyhw40XurT45kk3m+4uLuM6FDrP/3FK4NEqzhrXNceoIOhZrnnvjQSjaTq
|
|
COYdoUPSuiEd50QSHfhvV69fCB0KD/GqfkogUSvX7jytUDoEOXee88G+Fm6o
|
|
8ziCDsG5288ciSeRrau5DxlNB2/W8LmLZ0nUoOTasO0izv/yrqYvhkRpTacC
|
|
6ovp4F7cfv3pcRIdoWTpR5XQYWdGl7wbtvWdKkG9UjqM9b8XnY4kkVAW886D
|
|
cjpk9IxLSWEnhNmz6u7TIV2kSuBYBIlOqSkdrn1MB9XNPzQNQ0kUmPUiqPoz
|
|
HVJmLLNlDpPIchXTIGyIDqeVXnJaA0m0JYFLlPKFDseuzbVQsZlhOuVVJB30
|
|
eDfHFAWQyMc2b/LeBJ5PVcFLbX8SufCFB1cu0iHtxlSxL4NE5uFSR8skGKDb
|
|
w60lRiXR47xEq4wNDChmqR194E0ig65ZpSgpBmxUf7jFG1tL+cUHY1kG9JQq
|
|
rbjnRaKN76ONPyozYIId7+HsSaLx3QMSQjoMMK6dy212I9ElnvwWP0cGWFLV
|
|
bIcP4fVrimTbHGKAfYvu1SzsePeoMG1nBjiqHHKyxY66b6+65MYA04pGw5aD
|
|
uD/BffkqjQEDMUOV+Y4k0u6k0Z+GMsBMir4m5gCJ3l9WFlZMZ4DD7bS2DBsS
|
|
VSBR/7HLDHhpc2faHTt+cr69/B8GOM+IJiljUyzbY/SycF9axVSDNf5+XL6z
|
|
NrkMCDeSKRjdTyKzkPwPUWUMqEo1v+xkRSIZmfO6hhUM+Gi910QFe74z5J8V
|
|
9xjwgerrzbYkUaEKskmrYcCF1N2vsrD/DAy03WxkwK2P46mDFiS6by1d8qqD
|
|
AfVfpTPPmpMoeZGHL7OTAVlugc9dsGklLB/XLgbQal8TmthivI3SI914/uPj
|
|
HwbMSBTU5HLp5zu83sFNBQhbcevVSCWSAd63/KolTEm0+P70m29MBjyaf+g/
|
|
Z0KingSGVuUYA/bPyib1YMcM72TpTzAgLHviVzJ2f/YbT7s5BrxtLXnKj53B
|
|
v8b0JDcBQ4ltfWuNSdQ8O+AesYKA13XlzbNGJBodKA0L5iNAV2iLwhtsg/sm
|
|
+TRBAmo0HoZewWZSo35ZrSEgRMxJUQ5bzNp0rak4AXf6L4rzYu/ZtVYNrSfA
|
|
OMw4YWwfidJFy5y0NxJAbd0zWY29p3GwSlqegIPvt3XbYBNFZR3rFQkQYfu8
|
|
0Fm+P/3E4GplAgy7xS1lsZmEuCivGgEZ/KMdM4Cvi5v7T2gRcFtQu/9f7Ma/
|
|
4rFMCgHSDhpfkrDJb0NXhnYScD8h93AE9u62k0969QgYLO7nscMeCaqQbQEC
|
|
ZOvLjYSwV7lE6zwwIsBNxsBpEeH9ydjCusqEAPoX/XEWdtrGLyeKLPB6VOKu
|
|
vcSu561Mz7PCfWOfVz/E/jodffuaNQFHx2NsqrH1nq1/m2pPwGOWBv81bFrV
|
|
l/EkB/y+M1tUUrFTr1fynD1IgIBG6rM47C9hllqRLgRQxK4mB2GLekmYH3Uj
|
|
IDZE/x5tOc/yq2egBwEWe82cXJef33w62YtKQEx1jorFch8hq0IXGgGHy4ft
|
|
YTlvQaLBgY7zW9N/6y3nDX/ttiYIeJZzW42ynNd1j2nmT4DpknLftuV+D07/
|
|
gUACBMuEBVSW8wut1u0Jwv0Jlwa55fxUyW06wQQYLApPSC/nR43s0zxKgJGu
|
|
Sr4ktgi9ykUtjICC6eK34ti77GJCFCMICORKSxFbzt+9P1EmkoAc84/totgp
|
|
yhtuSEYRYHsnLUYYu06MrFlzkoB7q0oaBLGHf1V1Cp8i4BdDNVJgOX80Zpgv
|
|
hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc
|
|
"]]},
|
|
Annotation[#, "Charting`Private`Tag#1"]& ]}, {}},
|
|
{"WolframDynamicHighlight", <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}],
|
|
StyleBox[
|
|
DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {},
|
|
Slot["HighlightElements"],
|
|
Slot["LayoutOptions"],
|
|
Slot["Meta"],
|
|
Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {},
|
|
Annotation[{
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]],
|
|
Line[CompressedData["
|
|
1:eJwV1Hk4Fe0bB3BE9lKKIrJLZemIKHnu7GSLsi/Hcc5YElmSUqQslSV5FXnL
|
|
ViRZQmRPpV5J8SuVlFDm0LFmOae0+D3+mGuuzzUz3/k+91zzyNNCHBg8XFxc
|
|
Y/hYPoe+0lB90PPKkEd38MofgoMMp27p0EzKkMDFQb1lD+XpZiqZNKN300z5
|
|
39j29JcrRbSfoqLCBftF7Kqo2Cd8Jl2IwifyjIN94dmGttjS/6GKgq1x89gN
|
|
PaG5vylvUZeaw9kZbFZ/56kTTX3obuS55+PYUqSiO9v4E/p5/qETE3v/9Cn9
|
|
8K5B1Heef+sQdutvlnBU6TDqe+ph/AH7XZxkdF3wV7TxQVvh/7CnVpqw5ikk
|
|
kv210+I59sqUo67aHCYad27SbsOWXXOjI7RpDC01HmLUYdtKs4unjCeQwuru
|
|
nHxsIl9BQl1gCh3Pr87NxI5Vtks43DWNkqJqxpKw+yR7d0SUfkcO05J2Qdh0
|
|
t8CAf1Jm0YeAuMOe2DPXuQqqg+dQ6RfxVzbYAgrqYt8pCyhF7xFjO3Ym/Ym5
|
|
2Ho2atr+NUcKW+62a6wmh40u2RhICGDrbU+cOtL0A3XP3xwcYnCQv+5gF8v4
|
|
N3qS2dZyAXs+6hivkMof5HhlrXIY9pkmYQM1gb8oPu7ha1fsbNC769e1hH6M
|
|
GnKrYtOLOkzCSrmhQzz4bj2dg0qf/TMUJ80D7Hgts3+xZ0a9Tl1O4YEbx6JV
|
|
T2Of2rpQcy94BfhcaG8xxM6slFecpvABdXFQv8GXg/p7Jlr/3uSDk70Fglex
|
|
5WYfuK1avxIolxXlwrDLdtpmqHNWAlgnyG/Bbm84yR3UJAAPL+ZHJtM4aOHJ
|
|
m8ExYxHQ9SkL1fThoLXWImLRrSKg9UKr8TeVg7R6TUBUXxRGxAvUnmMHjtTm
|
|
79BYBTYdUae9sY/ydGntFREDC9UTi3HeHEQqVHxPYK8BhxYxp1xPPB+iU7Bb
|
|
ey14PXwh7oXNc5cpvyF0LcwuuvzchC2nvdmhdHwtRHNtM8j24CA34/TqV0Pi
|
|
ULo6tjDenYO6fcPCJV+sh90Ritw6rhz0+XZaMlVAAowshExGXThoYrz05h1T
|
|
CRj/9LkyG1so4uubPW0SYEzN4/npzEEm8Qd3UmsloXH27tVKJw5qvKW7UJK3
|
|
EXZJiiXPO3LQLXIxcneEDAR8vAqfbTjI4lDS5/ByGaAtZLacwp5oFzcrZ8rA
|
|
ubmEOCnsnbe2r5dzlYVh9SufHa3xPGleNXyGm8FO5NF0ixUHzU4PHR87Jwey
|
|
/ulxIeYcJH7E5H6NjQK0hrF5LYGDmLeE/O0DsUc3pfQgDqr/1CM9magAwu2K
|
|
ns7YHtae51TaFMDRfPcAzRD32xbpcI2iCPqVfi6hBvj9rNszMZJK0O2i6hCk
|
|
x0EH/YTVrYaV4ZPi5/UfNTkIRR6iOP9RBoO7MwO22FsT8nbRN6pAhqDT4iMN
|
|
DuK6qW0Uc0AFDq5O0SpW56Dyz+7O1Y9UwKWz+wqxDf+fTmVxUoWqQI095vmf
|
|
Cu5nYvOORVMDku99raAMB0krXIpNHtkO15LLs7L5Oaj54rzaTx51sJPeOvt6
|
|
Je4/59pLyKvD2Y97UkSwc9uV1Iy81EFC90PsaV4OUvBrfP3jvTpslt8U6MSN
|
|
+5WRysQLDVAPtY4YWWQjGWlZQs5VC1R6H9SETbLR9qIIkV+IApOU8b+0Hjai
|
|
0c8tqNtSIOR4j2RsNxtlK2Z8pnpQoKnaODPnFRutKKy89yyKAt9KL9R3d7FR
|
|
fy7rYEYVBe4nptdQnrPRhWzqDTVFbTDQbf/34yM2YiZba7is3AmkR0V0YzUb
|
|
FYQp2dd26cBEFmWpLoONeiLRrvgifdhsW7itzpSN5L3e2noG7YWgxMVLb2YW
|
|
EGOprkLmBADvOMPJLmcBSY7X80vSjMATvUSZOgsoQtvgU8ZWEzC8IFIk9noe
|
|
0SZ/d4izTOHkv6pvHYLmUblROH9etzl8I/bvsVicQ7fmAx+VZVrCwR38J6mp
|
|
c+jHvg0v22P3w2nDIHRt/Rwa4FrxfdjHBlabfrfckTeLgjeFpMcp2oFo8YRI
|
|
l9YsqgjoaLuSYA+toVeU+xq+o5NzGznbAg7AlhhW+1br72jByszpP28HKKo9
|
|
6er3fgbpu1/eRx5whHq2fx3hN4Neb7wR2K59EGocoq/e5Z5BUsXnmku2HIKi
|
|
tAXitPo0qh/aam0r6gQ5m3mpdUFTSLZ3xi9y0gl+pJqxsuomkfaVy2U3h5zh
|
|
vOILxXU/J9AN3jmNjCcucE34nbSw/QSq26fZn9DgCp39ftGXC8ZR9q6La36X
|
|
ugEXwarau8RC3R+LErVT3CFSf9UZZggL1dpcVzp6xgM2LCWSJgPf0PcjjlzB
|
|
dE8IYE6oF3l8Qwtmav5Txl4wElj7bS9zDJVMfvgRrusNLINetlXwGHIpKPL1
|
|
FKHC0c5pzf0rx1BN9X7vFUlUIC5mm6/JHUX60q9/XvhJhfTH34zzTUaR4pBf
|
|
//8CfMAtx9hm1zwTjQgftrv+1QfCe72O8RYxUU+ara/5IRqo5ai5x9OYKDMq
|
|
T/hYDw2YgzGlAQpM1Ny69NPX0hey1GR/BYyTaLUHJGk3+sLfb8+cpR6SSG7d
|
|
f92bmn0hwSp63L+VRFpdNhtWtvoC4Zn3+0ELiRwM3O/0PfKFfXdls5ybSZS5
|
|
KfLF6ee+sEPFsex6A4mkBu6u7ujzhRKDAAfD+yRS8pLE26YvuGbX0AfvkEif
|
|
OlWSsJMOEUVCAVlXSVR8bSbcVpcOF3fMD6zCXvdm1lBSjw48lX9aE6+QaMqU
|
|
01uyhw40XurT45kk3m+4uLuM6FDrP/3FK4NEqzhrXNceoIOhZrnnvjQSjaTq
|
|
COYdoUPSuiEd50QSHfhvV69fCB0KD/GqfkogUSvX7jytUDoEOXee88G+Fm6o
|
|
8ziCDsG5288ciSeRrau5DxlNB2/W8LmLZ0nUoOTasO0izv/yrqYvhkRpTacC
|
|
6ovp4F7cfv3pcRIdoWTpR5XQYWdGl7wbtvWdKkG9UjqM9b8XnY4kkVAW886D
|
|
cjpk9IxLSWEnhNmz6u7TIV2kSuBYBIlOqSkdrn1MB9XNPzQNQ0kUmPUiqPoz
|
|
HVJmLLNlDpPIchXTIGyIDqeVXnJaA0m0JYFLlPKFDseuzbVQsZlhOuVVJB30
|
|
eDfHFAWQyMc2b/LeBJ5PVcFLbX8SufCFB1cu0iHtxlSxL4NE5uFSR8skGKDb
|
|
w60lRiXR47xEq4wNDChmqR194E0ig65ZpSgpBmxUf7jFG1tL+cUHY1kG9JQq
|
|
rbjnRaKN76ONPyozYIId7+HsSaLx3QMSQjoMMK6dy212I9ElnvwWP0cGWFLV
|
|
bIcP4fVrimTbHGKAfYvu1SzsePeoMG1nBjiqHHKyxY66b6+65MYA04pGw5aD
|
|
uD/BffkqjQEDMUOV+Y4k0u6k0Z+GMsBMir4m5gCJ3l9WFlZMZ4DD7bS2DBsS
|
|
VSBR/7HLDHhpc2faHTt+cr69/B8GOM+IJiljUyzbY/SycF9axVSDNf5+XL6z
|
|
NrkMCDeSKRjdTyKzkPwPUWUMqEo1v+xkRSIZmfO6hhUM+Gi910QFe74z5J8V
|
|
9xjwgerrzbYkUaEKskmrYcCF1N2vsrD/DAy03WxkwK2P46mDFiS6by1d8qqD
|
|
AfVfpTPPmpMoeZGHL7OTAVlugc9dsGklLB/XLgbQal8TmthivI3SI914/uPj
|
|
HwbMSBTU5HLp5zu83sFNBQhbcevVSCWSAd63/KolTEm0+P70m29MBjyaf+g/
|
|
Z0KingSGVuUYA/bPyib1YMcM72TpTzAgLHviVzJ2f/YbT7s5BrxtLXnKj53B
|
|
v8b0JDcBQ4ltfWuNSdQ8O+AesYKA13XlzbNGJBodKA0L5iNAV2iLwhtsg/sm
|
|
+TRBAmo0HoZewWZSo35ZrSEgRMxJUQ5bzNp0rak4AXf6L4rzYu/ZtVYNrSfA
|
|
OMw4YWwfidJFy5y0NxJAbd0zWY29p3GwSlqegIPvt3XbYBNFZR3rFQkQYfu8
|
|
0Fm+P/3E4GplAgy7xS1lsZmEuCivGgEZ/KMdM4Cvi5v7T2gRcFtQu/9f7Ma/
|
|
4rFMCgHSDhpfkrDJb0NXhnYScD8h93AE9u62k0969QgYLO7nscMeCaqQbQEC
|
|
ZOvLjYSwV7lE6zwwIsBNxsBpEeH9ydjCusqEAPoX/XEWdtrGLyeKLPB6VOKu
|
|
vcSu561Mz7PCfWOfVz/E/jodffuaNQFHx2NsqrH1nq1/m2pPwGOWBv81bFrV
|
|
l/EkB/y+M1tUUrFTr1fynD1IgIBG6rM47C9hllqRLgRQxK4mB2GLekmYH3Uj
|
|
IDZE/x5tOc/yq2egBwEWe82cXJef33w62YtKQEx1jorFch8hq0IXGgGHy4ft
|
|
YTlvQaLBgY7zW9N/6y3nDX/ttiYIeJZzW42ynNd1j2nmT4DpknLftuV+D07/
|
|
gUACBMuEBVSW8wut1u0Jwv0Jlwa55fxUyW06wQQYLApPSC/nR43s0zxKgJGu
|
|
Sr4ktgi9ykUtjICC6eK34ti77GJCFCMICORKSxFbzt+9P1EmkoAc84/totgp
|
|
yhtuSEYRYHsnLUYYu06MrFlzkoB7q0oaBLGHf1V1Cp8i4BdDNVJgOX80Zpgv
|
|
hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc
|
|
"]]}, "Charting`Private`Tag#1"]}}, {}}, <|
|
|
"HighlightElements" -> <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>,
|
|
"LayoutOptions" -> <|
|
|
"PanelPlotLayout" -> <||>,
|
|
"PlotRange" -> {{0, 180}, {0.6639439823901716,
|
|
1.4626441816684523`}},
|
|
"Frame" -> {{False, False}, {False, False}},
|
|
"AxesOrigin" -> {0, 0.663943982390173},
|
|
"ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True},
|
|
"LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1),
|
|
"DefaultStyle" -> {
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]]},
|
|
"HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ),
|
|
"ScalingFunctions" -> {{Identity, Identity}, {
|
|
Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" ->
|
|
False|>,
|
|
"Meta" -> <|
|
|
"DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" ->
|
|
Plot, "GroupHighlight" -> False|>|>]]& )[<|
|
|
"HighlightElements" -> <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>,
|
|
"LayoutOptions" -> <|
|
|
"PanelPlotLayout" -> <||>,
|
|
"PlotRange" -> {{0, 180}, {0.6639439823901716,
|
|
1.4626441816684523`}},
|
|
"Frame" -> {{False, False}, {False, False}},
|
|
"AxesOrigin" -> {0, 0.663943982390173},
|
|
"ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True},
|
|
"LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1),
|
|
"DefaultStyle" -> {
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]]},
|
|
"HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ),
|
|
"ScalingFunctions" -> {{Identity, Identity}, {
|
|
Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>,
|
|
"Meta" -> <|
|
|
"DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" ->
|
|
Plot, "GroupHighlight" -> False|>|>],
|
|
ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, {
|
|
4.503599627370496*^15, -4.503599627370496*^15}}],
|
|
Selectable->False]},
|
|
Annotation[{{{{}, {},
|
|
Annotation[{
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]],
|
|
Line[CompressedData["
|
|
1:eJwV1Hk4Fe0bB3BE9lKKIrJLZemIKHnu7GSLsi/Hcc5YElmSUqQslSV5FXnL
|
|
ViRZQmRPpV5J8SuVlFDm0LFmOae0+D3+mGuuzzUz3/k+91zzyNNCHBg8XFxc
|
|
Y/hYPoe+0lB90PPKkEd38MofgoMMp27p0EzKkMDFQb1lD+XpZiqZNKN300z5
|
|
39j29JcrRbSfoqLCBftF7Kqo2Cd8Jl2IwifyjIN94dmGttjS/6GKgq1x89gN
|
|
PaG5vylvUZeaw9kZbFZ/56kTTX3obuS55+PYUqSiO9v4E/p5/qETE3v/9Cn9
|
|
8K5B1Heef+sQdutvlnBU6TDqe+ph/AH7XZxkdF3wV7TxQVvh/7CnVpqw5ikk
|
|
kv210+I59sqUo67aHCYad27SbsOWXXOjI7RpDC01HmLUYdtKs4unjCeQwuru
|
|
nHxsIl9BQl1gCh3Pr87NxI5Vtks43DWNkqJqxpKw+yR7d0SUfkcO05J2Qdh0
|
|
t8CAf1Jm0YeAuMOe2DPXuQqqg+dQ6RfxVzbYAgrqYt8pCyhF7xFjO3Ym/Ym5
|
|
2Ho2atr+NUcKW+62a6wmh40u2RhICGDrbU+cOtL0A3XP3xwcYnCQv+5gF8v4
|
|
N3qS2dZyAXs+6hivkMof5HhlrXIY9pkmYQM1gb8oPu7ha1fsbNC769e1hH6M
|
|
GnKrYtOLOkzCSrmhQzz4bj2dg0qf/TMUJ80D7Hgts3+xZ0a9Tl1O4YEbx6JV
|
|
T2Of2rpQcy94BfhcaG8xxM6slFecpvABdXFQv8GXg/p7Jlr/3uSDk70Fglex
|
|
5WYfuK1avxIolxXlwrDLdtpmqHNWAlgnyG/Bbm84yR3UJAAPL+ZHJtM4aOHJ
|
|
m8ExYxHQ9SkL1fThoLXWImLRrSKg9UKr8TeVg7R6TUBUXxRGxAvUnmMHjtTm
|
|
79BYBTYdUae9sY/ydGntFREDC9UTi3HeHEQqVHxPYK8BhxYxp1xPPB+iU7Bb
|
|
ey14PXwh7oXNc5cpvyF0LcwuuvzchC2nvdmhdHwtRHNtM8j24CA34/TqV0Pi
|
|
ULo6tjDenYO6fcPCJV+sh90Ritw6rhz0+XZaMlVAAowshExGXThoYrz05h1T
|
|
CRj/9LkyG1so4uubPW0SYEzN4/npzEEm8Qd3UmsloXH27tVKJw5qvKW7UJK3
|
|
EXZJiiXPO3LQLXIxcneEDAR8vAqfbTjI4lDS5/ByGaAtZLacwp5oFzcrZ8rA
|
|
ubmEOCnsnbe2r5dzlYVh9SufHa3xPGleNXyGm8FO5NF0ixUHzU4PHR87Jwey
|
|
/ulxIeYcJH7E5H6NjQK0hrF5LYGDmLeE/O0DsUc3pfQgDqr/1CM9magAwu2K
|
|
ns7YHtae51TaFMDRfPcAzRD32xbpcI2iCPqVfi6hBvj9rNszMZJK0O2i6hCk
|
|
x0EH/YTVrYaV4ZPi5/UfNTkIRR6iOP9RBoO7MwO22FsT8nbRN6pAhqDT4iMN
|
|
DuK6qW0Uc0AFDq5O0SpW56Dyz+7O1Y9UwKWz+wqxDf+fTmVxUoWqQI095vmf
|
|
Cu5nYvOORVMDku99raAMB0krXIpNHtkO15LLs7L5Oaj54rzaTx51sJPeOvt6
|
|
Je4/59pLyKvD2Y97UkSwc9uV1Iy81EFC90PsaV4OUvBrfP3jvTpslt8U6MSN
|
|
+5WRysQLDVAPtY4YWWQjGWlZQs5VC1R6H9SETbLR9qIIkV+IApOU8b+0Hjai
|
|
0c8tqNtSIOR4j2RsNxtlK2Z8pnpQoKnaODPnFRutKKy89yyKAt9KL9R3d7FR
|
|
fy7rYEYVBe4nptdQnrPRhWzqDTVFbTDQbf/34yM2YiZba7is3AmkR0V0YzUb
|
|
FYQp2dd26cBEFmWpLoONeiLRrvgifdhsW7itzpSN5L3e2noG7YWgxMVLb2YW
|
|
EGOprkLmBADvOMPJLmcBSY7X80vSjMATvUSZOgsoQtvgU8ZWEzC8IFIk9noe
|
|
0SZ/d4izTOHkv6pvHYLmUblROH9etzl8I/bvsVicQ7fmAx+VZVrCwR38J6mp
|
|
c+jHvg0v22P3w2nDIHRt/Rwa4FrxfdjHBlabfrfckTeLgjeFpMcp2oFo8YRI
|
|
l9YsqgjoaLuSYA+toVeU+xq+o5NzGznbAg7AlhhW+1br72jByszpP28HKKo9
|
|
6er3fgbpu1/eRx5whHq2fx3hN4Neb7wR2K59EGocoq/e5Z5BUsXnmku2HIKi
|
|
tAXitPo0qh/aam0r6gQ5m3mpdUFTSLZ3xi9y0gl+pJqxsuomkfaVy2U3h5zh
|
|
vOILxXU/J9AN3jmNjCcucE34nbSw/QSq26fZn9DgCp39ftGXC8ZR9q6La36X
|
|
ugEXwarau8RC3R+LErVT3CFSf9UZZggL1dpcVzp6xgM2LCWSJgPf0PcjjlzB
|
|
dE8IYE6oF3l8Qwtmav5Txl4wElj7bS9zDJVMfvgRrusNLINetlXwGHIpKPL1
|
|
FKHC0c5pzf0rx1BN9X7vFUlUIC5mm6/JHUX60q9/XvhJhfTH34zzTUaR4pBf
|
|
//8CfMAtx9hm1zwTjQgftrv+1QfCe72O8RYxUU+ara/5IRqo5ai5x9OYKDMq
|
|
T/hYDw2YgzGlAQpM1Ny69NPX0hey1GR/BYyTaLUHJGk3+sLfb8+cpR6SSG7d
|
|
f92bmn0hwSp63L+VRFpdNhtWtvoC4Zn3+0ELiRwM3O/0PfKFfXdls5ybSZS5
|
|
KfLF6ee+sEPFsex6A4mkBu6u7ujzhRKDAAfD+yRS8pLE26YvuGbX0AfvkEif
|
|
OlWSsJMOEUVCAVlXSVR8bSbcVpcOF3fMD6zCXvdm1lBSjw48lX9aE6+QaMqU
|
|
01uyhw40XurT45kk3m+4uLuM6FDrP/3FK4NEqzhrXNceoIOhZrnnvjQSjaTq
|
|
COYdoUPSuiEd50QSHfhvV69fCB0KD/GqfkogUSvX7jytUDoEOXee88G+Fm6o
|
|
8ziCDsG5288ciSeRrau5DxlNB2/W8LmLZ0nUoOTasO0izv/yrqYvhkRpTacC
|
|
6ovp4F7cfv3pcRIdoWTpR5XQYWdGl7wbtvWdKkG9UjqM9b8XnY4kkVAW886D
|
|
cjpk9IxLSWEnhNmz6u7TIV2kSuBYBIlOqSkdrn1MB9XNPzQNQ0kUmPUiqPoz
|
|
HVJmLLNlDpPIchXTIGyIDqeVXnJaA0m0JYFLlPKFDseuzbVQsZlhOuVVJB30
|
|
eDfHFAWQyMc2b/LeBJ5PVcFLbX8SufCFB1cu0iHtxlSxL4NE5uFSR8skGKDb
|
|
w60lRiXR47xEq4wNDChmqR194E0ig65ZpSgpBmxUf7jFG1tL+cUHY1kG9JQq
|
|
rbjnRaKN76ONPyozYIId7+HsSaLx3QMSQjoMMK6dy212I9ElnvwWP0cGWFLV
|
|
bIcP4fVrimTbHGKAfYvu1SzsePeoMG1nBjiqHHKyxY66b6+65MYA04pGw5aD
|
|
uD/BffkqjQEDMUOV+Y4k0u6k0Z+GMsBMir4m5gCJ3l9WFlZMZ4DD7bS2DBsS
|
|
VSBR/7HLDHhpc2faHTt+cr69/B8GOM+IJiljUyzbY/SycF9axVSDNf5+XL6z
|
|
NrkMCDeSKRjdTyKzkPwPUWUMqEo1v+xkRSIZmfO6hhUM+Gi910QFe74z5J8V
|
|
9xjwgerrzbYkUaEKskmrYcCF1N2vsrD/DAy03WxkwK2P46mDFiS6by1d8qqD
|
|
AfVfpTPPmpMoeZGHL7OTAVlugc9dsGklLB/XLgbQal8TmthivI3SI914/uPj
|
|
HwbMSBTU5HLp5zu83sFNBQhbcevVSCWSAd63/KolTEm0+P70m29MBjyaf+g/
|
|
Z0KingSGVuUYA/bPyib1YMcM72TpTzAgLHviVzJ2f/YbT7s5BrxtLXnKj53B
|
|
v8b0JDcBQ4ltfWuNSdQ8O+AesYKA13XlzbNGJBodKA0L5iNAV2iLwhtsg/sm
|
|
+TRBAmo0HoZewWZSo35ZrSEgRMxJUQ5bzNp0rak4AXf6L4rzYu/ZtVYNrSfA
|
|
OMw4YWwfidJFy5y0NxJAbd0zWY29p3GwSlqegIPvt3XbYBNFZR3rFQkQYfu8
|
|
0Fm+P/3E4GplAgy7xS1lsZmEuCivGgEZ/KMdM4Cvi5v7T2gRcFtQu/9f7Ma/
|
|
4rFMCgHSDhpfkrDJb0NXhnYScD8h93AE9u62k0969QgYLO7nscMeCaqQbQEC
|
|
ZOvLjYSwV7lE6zwwIsBNxsBpEeH9ydjCusqEAPoX/XEWdtrGLyeKLPB6VOKu
|
|
vcSu561Mz7PCfWOfVz/E/jodffuaNQFHx2NsqrH1nq1/m2pPwGOWBv81bFrV
|
|
l/EkB/y+M1tUUrFTr1fynD1IgIBG6rM47C9hllqRLgRQxK4mB2GLekmYH3Uj
|
|
IDZE/x5tOc/yq2egBwEWe82cXJef33w62YtKQEx1jorFch8hq0IXGgGHy4ft
|
|
YTlvQaLBgY7zW9N/6y3nDX/ttiYIeJZzW42ynNd1j2nmT4DpknLftuV+D07/
|
|
gUACBMuEBVSW8wut1u0Jwv0Jlwa55fxUyW06wQQYLApPSC/nR43s0zxKgJGu
|
|
Sr4ktgi9ykUtjICC6eK34ti77GJCFCMICORKSxFbzt+9P1EmkoAc84/totgp
|
|
yhtuSEYRYHsnLUYYu06MrFlzkoB7q0oaBLGHf1V1Cp8i4BdDNVJgOX80Zpgv
|
|
hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc
|
|
"]]}, "Charting`Private`Tag#1"]}}, {}}, <|
|
|
"HighlightElements" -> <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>,
|
|
"LayoutOptions" -> <|
|
|
"PanelPlotLayout" -> <||>,
|
|
"PlotRange" -> {{0, 180}, {0.6639439823901716, 1.4626441816684523`}},
|
|
"Frame" -> {{False, False}, {False, False}},
|
|
"AxesOrigin" -> {0, 0.663943982390173},
|
|
"ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True},
|
|
"LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> {
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]]},
|
|
"HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ),
|
|
"ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>,
|
|
"Primitives" -> {}, "GCFlag" -> False|>,
|
|
"Meta" -> <|
|
|
"DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" ->
|
|
Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]],
|
|
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
|
|
Axes->{True, True},
|
|
AxesLabel->{None, None},
|
|
AxesOrigin->{0, 0.663943982390173},
|
|
DisplayFunction->Identity,
|
|
Frame->{{False, False}, {False, False}},
|
|
FrameLabel->{{None, None}, {None, None}},
|
|
FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
|
|
GridLines->{None, None},
|
|
GridLinesStyle->Directive[
|
|
GrayLevel[0.5, 0.4]],
|
|
ImagePadding->All,
|
|
Method->{
|
|
"DefaultBoundaryStyle" -> Automatic,
|
|
"DefaultGraphicsInteraction" -> {
|
|
"Version" -> 1.2, "TrackMousePosition" -> {True, False},
|
|
"Effects" -> {
|
|
"Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
|
|
"Droplines" -> {
|
|
"freeformCursorMode" -> True,
|
|
"placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" ->
|
|
AbsolutePointSize[6], "ScalingFunctions" -> None,
|
|
"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
|
|
(Identity[#]& )[
|
|
Part[#, 1]],
|
|
(Identity[#]& )[
|
|
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
|
|
(Identity[#]& )[
|
|
Part[#, 1]],
|
|
(Identity[#]& )[
|
|
Part[#, 2]]}& )}},
|
|
PlotRange->{{0, 180}, {0.6639439823901716, 1.4626441816684523`}},
|
|
PlotRangeClipping->True,
|
|
PlotRangePadding->{{
|
|
Scaled[0.02],
|
|
Scaled[0.02]}, {
|
|
Scaled[0.05],
|
|
Scaled[0.05]}},
|
|
Ticks->{Automatic, Automatic}]], "Output",
|
|
CellChangeTimes->{3.991337564416748*^9},
|
|
CellLabel->
|
|
"Out[303]=",ExpressionUUID->"000d3cc5-e7e7-7f42-9c78-51dba6db4bf3"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"x", "=",
|
|
RowBox[{"Plot", "[",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox[
|
|
RowBox[{"4", "x", "*", "y", "*", "\[Pi]", "*",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
UnderoverscriptBox["\[Sum]",
|
|
RowBox[{"n", "=", "0"}], "100"],
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
RowBox[{"2",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox["1", "Cw"]}], "+",
|
|
FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}],
|
|
"2"], ")"}],
|
|
RowBox[{"2", "*", "n"}]], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox["1",
|
|
RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}],
|
|
")"}]}],
|
|
RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(", "x", ")"}], "2"], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
RowBox[{"y", "*", "y"}], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]]}], ")"}],
|
|
RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"x", ",", "0", ",", "15"}], "}"}]}], "]"}]}]], "Input",
|
|
CellChangeTimes->{
|
|
3.991846277689621*^9},ExpressionUUID->"0a8036ea-ac95-654b-96a9-\
|
|
78af964912a2"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"4.976253354341118`*^-271\\\", \
|
|
\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 304,
|
|
297, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991337564646551*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[304]:=",ExpressionUUID->"fe707fb7-e6dc-184a-a72e-2be6d5c085cf"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"2.718150004511881`*^-282\\\", \
|
|
\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \
|
|
to represent as a normalized machine number; precision may be lost.\"", 2,
|
|
304, 298, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913375646565304`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[304]:=",ExpressionUUID->"a7e21b46-c6c9-1c4d-875a-309332ed6699"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"1.4847193100774497`*^-293\\\", \
|
|
\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \
|
|
small to represent as a normalized machine number; precision may be lost.\"",
|
|
2, 304, 299, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913375646656475`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[304]:=",ExpressionUUID->"50e13f26-4720-f342-8c8a-f93078defe94"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "stop",
|
|
"\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \
|
|
\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
|
|
during this calculation.\"", 2, 304, 300, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913375646736584`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[304]:=",ExpressionUUID->"68974fe2-070e-264b-8432-db9f06367365"],
|
|
|
|
Cell[BoxData[
|
|
GraphicsBox[
|
|
InterpretationBox[{
|
|
TagBox[{{{}, {},
|
|
TagBox[
|
|
{RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2],
|
|
Opacity[1.], LineBox[CompressedData["
|
|
1:eJwVl3c8le8bx+0ZSUj2djjnlBDfpOe6VJSREKIoFdKw9whJyqiIIkrIqJRo
|
|
yIoi85yQUUK2QlkZoeJ3fv88z+v9ul/381yfzzVe9y170t3CiYWJiUmE8fj/
|
|
e7Gv8b1CbBJRJG772nXGiehIFw3U6/ICbZsK0j/pvYDCLSdFuyJg0nOtkCZt
|
|
CX5mjz+zdt2ELbImTvelHWHD1Kaby5+z4H2pDfNOaR/orzB1n//8HJrNEr+1
|
|
SEaCgcLE19nP1dBxIyVPWzQJlj9r35r53AZHFZ7WTDNnQ82evOyPWcOQlWDr
|
|
J+z9EiT6S7+dpEzC+waZItvANyB0/vhjzj1zYHZNzDL4STWocj6oMzs8BwsX
|
|
du+0qKgGzPo2dOfcHLwQuN0jSa+G812u4pSkOfjy7gQp8Uc1vN8bEmc2Ogch
|
|
VZ6bF1RqwEfyjtudK/Nwq0e0+EZ2DbQ3t6mT6QuQBXSJyfj3MHZG5KDPwALU
|
|
v7/RanL/PayyHTn3Zn4BNr+Ltsl4+h5Udw4+OCi5CD4Zt2hyTe8hIm9ayMdt
|
|
EeIudl9LYqkF9fB1vysEfsO56GmSkmct3NxmUG5qtQQWqVKnvuytg609tvt2
|
|
uSzBVbVXpR/M6oAe6dpODl6C8029XcV2dcDRlfSDK3MJgq9znjjtUwfBocPi
|
|
NT+XQPrfL7LegzpwpIWHaEcuA8VOxrFjtQ60nMp3ybxYgeBT+rwnntZDO39L
|
|
I3/dClTb/wj4/roePEqGrP51rcDx+wd3n6yuh8e8PG7dqytwz1Dtq+bnepB+
|
|
bpOeZPQHdPw9vh9gagCutYVVrqE/oMDyle+AWQN8SVF7OyvwDyQORCW4f2+A
|
|
1Pb89X6K/yDW47AOMdsAR/iVj6/s+AdOuyyHV1caoPeS5CrLqX9Qtz6fas3f
|
|
CANuPLpCr/7B6t8UVzvNRhjbO/Jay3YV6kQUNtZdaISlmeRnwZlr0Lfpth0b
|
|
RxOUkjeurb1agw+hD3gF+JsgyPm6aWTTGgzLk27yiTTB357Iybi5Ndi32iHf
|
|
p9gE4cMlwi1yTBhhRjXr3NsEkc05hwZ8mPCHxNlH4uFNEJsd1sKymRmXjgs1
|
|
c/9sAiPNM4LC8szILxFipvGrCbjeW1gpU5nRXDBR6+ASY/+wYo+xHjMqv1vY
|
|
doyNBiFy9G9JZ5jxozo/+xdxGrhliK4qlTHj7Y4Punv204CixqK34z0z8lrm
|
|
Xks8QIOJqh+XjJuZMSKh6fAnCxqc7q/k9hhixpWHPcc07GngIOUkXMrDgtn8
|
|
784ae9LA/G4RxfgoC77pebVt4TYNBChp7vZOLFjAY/vXNY0GzeWRz93dWVBw
|
|
+0uHL/dpYNRz+L+kSyyY/FaK6epDGuwWW93zNZ8FPxT39+0tpYFmitFR978s
|
|
GKxY6AxdNPilrJl+kYMVX9reYxruoUHha8nBRAFWtH0pfjywnwbUzzPOJQqs
|
|
uK91xDf0Gw2URJK9mA+wYtHWyBMTczTYlDQcnXiPFZ0iSFwm6+ggSn4VuZTL
|
|
iuZW9ocn+ekgVh0VZl/IipTBabNLG+ggNaPiq1zDirPei6bXROigaOLhUD7G
|
|
ihHpt5o2y9BBaVjvqMwvVnyUkfDWQY4OpKCN1pf/sOKvqe2BdxXoQHlYbHyQ
|
|
nw3VwuThF4kOGmz/tIY12DBgttl/0zY6aKY1b9u/iw1L7US/smnQQUs9g/LU
|
|
gA0lb26S/q5JBx2HPXL+tmy4PeydQcx/dNCriObjDWPDfhuuy8ZAh92HjnJ5
|
|
XGXD3FYhtQGkw94JCmtnAhu2sdxtP7ObDvtFW5fSs9mQazlE0E6fDgd9REbU
|
|
m9hQ2fdpZ4URHcx4x/qS29lwTOTy42VjOlhklX7528uGYVz7b5EP0MG61a6l
|
|
bpoN5UPfl7sdpIPN6S1N5GU2fB5IWgszo8OR1bX38Szs2JpHPx1lTgd7yoOy
|
|
I8LsuHWjZ4nXITocq/F5VSXFjjbzpg9tLOngcMSgUIHEjsf2kD5oWNHB8ep4
|
|
zpQOO5qOf6httKaDs3R5xqG97Di4/3Fm5GE6uBTHpZUcYEde8axqTRs6nBvZ
|
|
mhDhwI4z0ftHfGzpcD6YOe77GXY81PTfJNsROrgJtkeZeLNjz+t64xgGezzK
|
|
vlgUwo59nops7Efp4IV+ISJR7KhGvirmy2Cfz/v8g2+wY6U8JbGbwX5um70G
|
|
UtiRK+uQ13Y7OgSw/zivn8WOr38aVFxmcODditOP89lRea+lL43BQRrXT65/
|
|
xY7feloyOezpENJ03N6nkh01OjYaaDM49MQ2my/17OinEe5sz+DwJZZDxEd2
|
|
fNMfxBnI4IgbHQcedLOjeoo7NYbBkUq5+7lG2DFsqqU3nsFRb/z3uE6yozFu
|
|
FLvG4CuWhkTbIjveKSweD2Ww2MtmMRZmDhQZ1605xeCCjZa/t/FyoN5Si6Mu
|
|
g3d7f2k/IcyBrJ+hg4vBn9qOFSZIc2CqheOmRkb8Z9VH4t6pcOB7FknNCwz+
|
|
l3DmzKwGB94CczVFBsfPTunLEhx4Y9PMhncMfxTMfeTM93NgpP5MnxmDSwqX
|
|
V8MtGOtKZvc6GH6bCIT1FNpx4OIz4UMmDB5wZysZcObA9U6mHCWMfHm3RCcJ
|
|
eHKg8oH1bzYxmGPrek8M5kDzcZ8L5xj5Tb2edMDjMgfuVn1w4AUj/9UH7nO0
|
|
3uFAO1N+LWlGfVg/VRhee8CBlqOvj+xh1M/EusdVWwsYen1YHx5l1NcG+suA
|
|
G9UcuK7mUaeLBR2yyTpWVXQOpIvlV9sz6vO/2Kpt05848OHltFkDRv06GDVN
|
|
mP5g7B8c2bLIqPf5RwfrQxcY8bBJGlWYMPzm7nxQsMaBfjEs7/wY/VHQ0G/H
|
|
L8SJ3YEDPQ37GX4ZLDR/0OVElcSiC0OMfovPDcr/Z8CJFc2TVBM9hl8cTFep
|
|
5pxoZnTP7TGjX01qefSuOXHiWo12xV5dht49Mi9MrnOi16E5/VlGv295kHMj
|
|
JIUTC8o1tJkY86CahXz+SRYnBjRZTLMy5sX4u+2K615z4k/ZnpZxCkMPGifT
|
|
+jnxzXF1YTXGvKHfb/X+M86JM3G2TN9kGfrWrMzI85z4Wf3oRLw0Q0+lA3cs
|
|
FxdWCh/7XCvGqAddv2CjbVy4M7Ls6xMBRn52ZB5vjODCwi+Gs74rjPmcwT9v
|
|
HMeFxdfbx4t+00COM+Rq8y0uNOcQLxyZp0Frh3VR+0MuFPqmWLllmgZbPNax
|
|
9jVz4U+N7hirYRqM5frn/hLjxoCnjfvnGmlQxTeq46vAjdcT/v5Nr6PBbR+L
|
|
lt9UbqTlPh/Uq6GB/m7q0l/kRqLqi5VrBQ2yvg4Zcp7mRlWfLalHC2hgJ2Q6
|
|
Kf6CG7t8aUpp8TTQCC6/mF7BjSJLS18r4mjAM0QSka3jRh2tX+RPV2lQ+owV
|
|
lL5w410dw9zpcBqIGJfGq61xY5/CDlqlByP+iwqa+sY86Pqe/1a7KQ32Tq8E
|
|
uQ3z4I9zpk/Z2WkQuD9J9d1PHmSb5swGJhoUZFK7Ny7y4O2BrRZef5pA1NJh
|
|
RykXL74yCZl6N9sEP0tqf7Nu4cWp1P09PH1NkBgR73MngBf9GhKphq+aYEhY
|
|
ye093zqMKZQ3zDnWBBd1zU+I/ceHofnnCZP0Rth/LP2X9m4+5Kx2V7dLbgT+
|
|
8B+XrEz4cM8z10in+Ea4W3M5N96BDyf2Rzs6RjRCiVHZD45oPox7kcYm5NwI
|
|
MzbyfnNf+LBRshh2UxrhmO9CDD2YH++++hgi8rIBdAruvAytWo8XKFauwS/q
|
|
4fzSbHgD3wb0Zn6Xo55XC8tkgT6qlSD++D0XUaZfA7r5TzJu396I4+ZpVZxD
|
|
b2FW0MjBuloIlw6f1VU8+QZG4hysvThF8LVzloJxTwkYTvsbjmptQpfzllY+
|
|
sy/h5yku75dhomhQOpBZJFnEOD9vYrlSvRnX0uaTSzPzQfCD0vXCaTH05bCU
|
|
0zmYC6vTajlN82I4//h837cduTAhuLNiZFkMw460nsxSyIVqm4MTomzi6MnK
|
|
VqK/kgPeI/4GF0XF0X/5u86u3Bzo+NOwaq4njkHBZ8p/MuVAsuo597mbjPXv
|
|
vTma7x6AxNVnZlpaEvj4x7Xay+cz4XHB05plHQn8dfjTq7mjmfBfZ77WG5BA
|
|
0urWbFfjTLCUeyix11ACcwebz15WzYS4iowxczsJdMtpoOwdz4A/MwnhrhES
|
|
2POi/euKSwZ02/oUZjcz1oNudtkPpUMKeYfAxtOSaKgfcOnsvjSwMv4QX3lO
|
|
EtX9EqejKWkgeO7EhrMekvjL3G9n5YY0iH0cLfguUBKdnU4fcOpNhVCVbiH3
|
|
OEn8bE23fOKVCo7KwZtpRZK4+QWWCT+4A9vk38hd+iuJ991/WW7cmAJNYnrb
|
|
5xKkkPe0QGgq9Ra0Sj1TYkuWwqFMXfMm4VvwSU5SVPiuFHJPDXatX02CQdXl
|
|
Fa1cKVzb6tTW05wESzpFb4PKpFBoNJzTzzMJlI7KmrAMS6HPm5VdD8sSISKN
|
|
+dQGTWm0uj3y8pHdTdCRqI7f+kka7f7mCKSV3IAheYW+8W5p9A/TsIq9dQOi
|
|
yVHk7H5plGxkpad53YAuHaM60XFprNw991eCegP8bdv+MP+VRj0OUEh/cB2O
|
|
GHtqTAjI4JNGN4vo29fg9lVGe2vJ4K80kohXYiycjVOv3bxDBs8nCrugTywQ
|
|
8cM//HbKoMhDdmuKVSyMJuvv2IYyuBQm9NJuUyxo5nF35BjKIPtUn67kvRho
|
|
q03gvmEng/tqZZ/xFkQDP2uWz4kIGXQqcL0gMHoFOJarDs1GyqDi0Vku8for
|
|
sDr1Vf3iFRk0ri86pf/oCkx3b57NiJPBZwoDssuuV6D1eYLrwG0Z9P/pvfZl
|
|
KQpunrzofDxfBlMfGpmeE4oCkWoHG/sOGTzwIN5T6mQk8JeEak9+kkEJN7Ob
|
|
v/ZFAkfBXZELX2QwYmj32WFqJPy+09Vxt08GxUJl+8VWLkGXp5l575gM+r1N
|
|
1OlLvASpsmh09J8MehpAfSY9AqQuSuvaKsli9vWxWj+Li1DgzSX3lSSLM7bB
|
|
w5K6F4FwnuU8QZZFFopT11fFi2BvXNPuoiaLnbfKZ/OWw+Gu8OlzATqy6LQg
|
|
d+VkVjhsflyQmmwqi6KCdVxvZsJAqH3XcqefLNqPZdlXnLsA2bVK/baBsvgw
|
|
7Cl5au8F0ChZX/s1WBaflrq5mEhdAIt7g/Gj4bKoKVcVe+1jCCScvkxaiJHF
|
|
XjlRfimdEOD/Sz8sdF8W00R6piw3BgO3ol2xRb0sSpMtSRyjAXB2MxjlN8oi
|
|
teWgb2ltADTxyfWx0mUxwPSh8o3cAIhb/M7+qlUWF8v79TJdAoC/wdtqUzeD
|
|
A40X7ab8Gf0UO9/zUxb1ot5938TkDxJFZepOgnIYGniihbbTF0Jy7tW9EZLD
|
|
wREsTpDxha93wo+IbJJDnY9xB/3YfSE9wiCiXlwOZQ8XKKe1+ICMZdtHFUU5
|
|
HPrcZWXm5AOKv8c9prTlsC1pi5zZbW/YsmvzM397OewYERwZ4fOCF/Jn/rA4
|
|
yOHj2ojDpvOe8B9P6b7rJ+Vwa+RKz+duT9j92WYg+7QcfomxuWn00BOsPVM2
|
|
tHnK4T73OMH8vZ4QlrPJhxIlhwktYvd3XvKAVj6RHYMFcqhpZl3qTXUDq3mn
|
|
y+eL5FDl+grzB2Y36O5+9fH3Czn8947sfuyTK4zkWZ3lL5XD1A/b35PCXWFJ
|
|
71bazho5/HXKo9Ly03mQ9RNavfVZDp1kpis6486BV59gjRGTPAbKrc0My5yB
|
|
hjq7N49Z5HH9sxh//VUXkHqW+5qHXR6Z9yekf+xxgaYwnSdN3PL4nSdR/Eyy
|
|
C8jJnrxltFEeD1i8/H1DwAU+nio6baQkj3KPPn29zXMa1MYPrjMykcdYttgC
|
|
ewkniPp4h+OxqTym26eeqlp1hN7SYSYec3lc7Y87bTDoCFdj/BcareRxpLW/
|
|
rCbXEQbI9/sMj8vjDP8S1V/DEeLdpgoNveQx+2nio/RDp2B6Ls7KMEUeX+n9
|
|
1zf49AT0dmVa30uVx2LntAaZWyeg6U3x4dm78vglXmsuNOQEZF8ZsL2TKY8H
|
|
7TLCU4xPwBFxzWPjj+XR0zW0XveHA9Tu7nGOfsPQVy1URVFzgLQElYDGIXl0
|
|
32MsHnffHq76EYGSo/IYRN0lfMTXHvyOHgry/C6PLatH/I4Z24OZ4oWQzT/l
|
|
Ud+kPJB7yQ44SlvDzyww/JGMGBo8ZAeeA/7R3FwK2Oi1r+e08FHYt7Uu1ZCq
|
|
gAk+s95qlTZgw7HfsnWrAlaMRJqaJtvA2a+NfIfVFfDCqsvTBx42cD32Q7ij
|
|
tgIeb5UdmpO3gU/fO5zD9BTwykzbXblrh8ExY1j9lZUC6jDxTVw4Yw0RG5hp
|
|
MqEKmHbb4emx/ZaQNBYRmReugDH3k2/8ULaE3Co2YsslBRwDuaY8TktocuUq
|
|
2nlVAR99MbV8Wn8INjStT7a+qYCCehwy3wwPQUaE1Km4XAVkCzcP77a2gMq5
|
|
nX9+NytgvKlriU6CGWTSX5889FEBg9LvX+YPMIPIHI2mgnYFVBb0P8R+3AwM
|
|
D5PvOHUpYN9Ptb1HqWbQUSam3T6ogP4bS2/uSz4IExeXvQrmFbCNZ22ATdIU
|
|
RAReTziKKWJioYH0MxtjWB5Tt3groYiPrG8M+m4xht53BaXi0oqo/435QgCb
|
|
MWR6515tk1fEL8f8BdSKjIDy+ZYSUhXxnvqklwOfEexO9zkpjoqo8NUs4HLr
|
|
fnCjqHd/dFLEzh/y+j/CDMD3t9jKcRdF/E95cVu+rQGEVLOKTZ1VxL3GRqu5
|
|
GgYQa9Npy+OhiE+9yKNmY/rwMDLgy+4gRfxr2dniaKkPQ72VXS+uK6LD90/h
|
|
+tp7wfqa8edbrxXRUe9I2jvF3WBvo/lbvkwRLw7Lfj3BsRsc5SU3Pa9QxDc3
|
|
PbU0v+uBd+mUdfM7RZSCPevdHulB/GjCJw66Ip44diVmi5oeNO3q6vQfUMRN
|
|
MeLmOQYIu6YcO2y5lZBeM2MuR94FIuX7sip4lTCOONSOf3Rh6oqqhzS/EtY8
|
|
75Z6SNOFdNkZ3lFBJUx0uXDpoKsurFoG7/GQUMKuXKe8xRc7oao84XnUViXc
|
|
5+PAYm6qA3rRlfEvrJQwxP8/0QcvtUHMOvOYiI0SuoaoHJO9pg2/5CIpgUeU
|
|
UNBt4n2vkzZkVRg2EMeVkF934C63qDawzHSsNboo4X8ivxXVw7SgxvqH20Cw
|
|
El7lm3X3tdkO+gqiB/iylJDn7rXAeE0NeDlZK+uYzYj3feyZYiENUHjtvViW
|
|
q4THX8xE8C2oA5tRy32XfCXMnf4lYVqsDtXuUb9qXiphq2Ob64ad6kCUzycH
|
|
1Sshp4pIqtOBbaBl8XHo+08l1Nm1/dUfpa2QKx72mphWQrns9cw3f20B4VFK
|
|
3K1ZJRz+/DYuqHILzPtf3b5nUQkPB32LwcNb4Pk9uJq+poSLC0zWiXFU2Dr+
|
|
lHE8VkaXgcCCaXYKkMJjAqq1lfH10wXHC2oqULEzh91ERxkNys88HmBWAbPf
|
|
VTc7dZUxTC33RlI7CQLcFp6M6SljeZzQjp/+JGiwcxjkN1HGgIweyoH3yuCy
|
|
Q8voqIMyGt9tX3fmnBI8+jUoPn9VGWWbh1kbpuWBKPj78EKsMnIp1opaNslD
|
|
25lNWpzXlfGLfJiIXI48rAyYmIklKuNC9rRMxFF5MGp5HYn3lFHI6s+QAU0O
|
|
JvKvTcYVKaNYZufdq8WyoOq0o0qxW5lx3/MYcfOShhtypiuXepVRXQ1f++pI
|
|
w3z/ye1DfcrooPGHv5tFGiqPxOWnDzP0ED68pUlSYGHWn7xpUhkj3ximvK2Q
|
|
hMCdlz24mUi4ppgSGywpAQ0bPspOKpLQtXq6YF5yM1BbRu2MSSRsowa9yJoR
|
|
hZtxK8mPVEkY1tCZfq9GFOw4FfidtzJ4ebtBwFlRmP7rt9L3HwmzXduqX5Rv
|
|
ApExifZWYxKK3a1d6T0nAk6VLpEvPUnItn/L+W9rG2HKdcJf34eErLlqNIOu
|
|
jRAgef7cJz8SNjlGSc8WboSYEHeLpWASjk1K5sme2giFOn4yulEkfFY4aT3S
|
|
JAh/iy9V1KSScPLS4OSlvA0Q5cxeaHmPhPq1Z2QMIzfAepErD0bvk5Ae+vue
|
|
2YkNIOcbE8OZQ0KS3vdHChIbYJ9Ggo3xMxJqrbGFdCQJwM1n6fNtNSSsc+ig
|
|
DMmvB4njMmOn6ki4VCghZjLKDzn8WT3zDSQUbdn8lpLHDyWuOdUizST84sE7
|
|
bUrhh6/kJ/FHukgoPjyixqTLB6SHpZShnyRcl/fK0MmDF6oyOhxnhVXwP+89
|
|
3+eUuWDARPa4n6gKNu1ZCkz7zQlMy662f8RUMGVH1pX0ek7Ybc5pyi6jgoEe
|
|
etdeunBCHbOO9mZVFfxUtkLnf8YB9JP3ufUIFdxiHVE7Z8wOk/w/WetQBWfk
|
|
om25ZdmBv/y/VaM9KpjB41PtscgGZhvbflnuV8Fjr3xp6lls0F7D1utioYIe
|
|
tXPL3v9YoVvhbEG8swrWtbs0ulezwJ/W4ofCZ1TQoqBJ3eEuC0hcYH2Qek4F
|
|
X1vzvrnjxwL2nXeTsz1UsCNeWekbmQUGLreElwSp4Mt/TqKf7jDD92+ahwau
|
|
q6DjMDnvQQQTzD9c+731tQpeDsvlsuD+R3yzNsiILlXBDYXJQWkf/xJdbNf2
|
|
D5eroIHxk4NGqX+JcgexO7ffquCCJZN7J+UvESG6XedfowpKW5m2Xrf+Qwhc
|
|
PRvS1KuCqeyi//6ULxOU051MTiyq2KkWK+LYtEhICUs8qmRTxYm9MXxS6YuE
|
|
QM1Jc1FOVcyT1Hip4rVIzEnNZNJ4VZE3eeWLhvgiUfaJZ4+6sCq2p3vtZPNc
|
|
IPYb4OU1ZVV8tprRLkmeJ04p5nOnHlBFUwWBkOzOWSKo9thZJTNVXHzKaprx
|
|
bJaIdxKkPbdQxaTptW3j0bNERU5gHO2wKhosvh0+DrOEkNL+9f9OqKKR7bYN
|
|
H5/OEHVKo0IOfqpoV/lu4JraNNFbl+L7M0AVV1xTubMmp4hfziafAoJVsTY0
|
|
sZvInyKk814kJ4Sr4sI6ki0/aYoIUI4Qq4lRxbToBNcx5UlClSQto3RfFcmU
|
|
K8xP4AeBDW3hzzNVcZRTitzO9oOwdokaJLJV0TJi1N67aYK49HAy6/AjVQw2
|
|
mNQQPzxB9JIqFKNfqKI6z6LZtO84cV3FlvyzXhXfjHuLjTR8J2ZVE7Wez6gi
|
|
z7Y8YVLlCNFFR/2Nc6poY7T4pz5xhHjrNnXIZ0EVZUXn3MvOjBDXnxt6aq2o
|
|
YryPSmaSyAihqsP0pIyVjK+DBGv4fIaJk4ausjUiZIzdtVk2cdcQYfhDTE1h
|
|
Mxk/hvVXiIgOEWrXGojL4mR8IVbUPfxrkFhtlbfbJ0PGL6cNgm0eDRJpNt23
|
|
aSpkrNa5nXZ38yDRcXrfug5dMhaH2udLcg4Q5dwLYtuBjCfd6bRFWj+RlZ+l
|
|
cluPjD2jAeu2x/QTHtP/DGwMyGhUHyKtxdVP8Pm/vNh7kIyTpdHb1Hj6CIMo
|
|
2d8jJ8lom6dxTUuxlyjJ/jO4cJWM0vwx3V5FXYTWHp/fRrFk9FX7ltMS2kW8
|
|
Gvy5LuMaGdfnpjy/YdJFPJfq0za6SUa1yQsFWuOfiScpb6+lp5Hxt/GS8Trl
|
|
z0RG3OUd+wrI+HyulHXny05CirxqereQjA11k+wBVzqJe41+jrPPyTivHWTO
|
|
d7STSOVwuZH2moxTG3jUCNZOIincaHT6LRmpT1x18g53ENE+6xNS2sm4c/Da
|
|
A16BdoJr49XcyU4yfr8sKhsx1kZEFTFV7O5i/E/jm/C+d21E5NTst5+9ZKxM
|
|
VRQp824jQl06dPW+MfLT4hiu2fuR8LK7Mza+xPArvfvNalkrcWSvPO6UouDl
|
|
kQP1XjYfiH8dXPw1MhSUT9pCKhL+QGQ4TfUYyVMweX0408V2OvEtqtT/CImC
|
|
H+een2w1oxNejQefBapTUETkVAifBY2IMQ2RKjGg4KEO6c9sbo0Etf/ETzCk
|
|
4F9dA9U2jUai1X1fWb0xBTXHbilIrzQQIgmC1p/NKGhEezeqcbWByGp/eG3x
|
|
CAXP6ClNkR/XE2U2nX813SmMeVm+25+tjrAfL2uq8KSgcJu9Y93HWoIpKCNl
|
|
rw8F/cWW3S/fryUM0s5pWgZSUDurNOWgbi3R9pX5vPclCm6/m9i/EvSemDi5
|
|
pacomfH9iJvxY7w1hLjrldItbyk4Yusraun3lri+5rw9tpqCpXXd+Vcs3hIs
|
|
Nw2Kvr9n6PuCy+xb3xITxeyPMhop+GKrSP/bj1VEGVNkimA7Bf12ycYuV1US
|
|
R5LC/RdHKbhRyO3bk+IKolnJYc5ijII9OoanR/wriN2l4P5sgoKn5IIr7++o
|
|
IFT7Vp1dphl+JUi13qssJ5aVL1h3L1EQ+/XXpzWXESnlgdsreakoxNlRXMFe
|
|
SqwztS0S46ciP29zb2lzCRE+8B/VX4CKbfEeWuSUEsKFfUlBTZiKDVUCvc6U
|
|
EkL7oJ9QlhQVjex4i0lHXhOfhrzmLm+jYvExndOCTa8IYZ7zRQcOU/FxqF1o
|
|
0cJzInvPhaAZWyoe7fEzKah7TqhfuL4n0Y6Klbt7tMRTnhOmM4WdXSeoOFbm
|
|
cEpP9zkR9Wlh+dR5Kh7z7c97EF1ELGWF7Q66SMVl2zPyP7QLiajeeF7JSCru
|
|
YJM467e+kBASyeqoiqKiTLLErdrmZ4Ra9Htn9jhG/M4sFcVqz4gz7tyx8bep
|
|
KBxpWXH631Oie2die24+FXWWq64nlOQTLr7Zdw0LqCgQOwUs3vnEYsErp5+F
|
|
VJyI8FoS25JPCMp1/d5WTMUzPIfdidzHhDGXpMSbt1QsHIp8I5/+iKjoyHVs
|
|
76Ri5o1tbxXy8wgj/hKqXxcVW5NGq5zd84iufY2Loj1UfF9V/2eHZh4xX/bj
|
|
6rEBKibuVxq8XpVLUDPVno5PULF6mSbU3JtDVHTr+cVNUpEyfj3RNyeHMBI6
|
|
BFtnqBigeZ832y2HcL7i+9FngYqXhNr/xLPkEPNvo1I3LVGxPHSU7cCHbCJi
|
|
JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT
|
|
/wN9xxCi
|
|
"]]},
|
|
Annotation[#, "Charting`Private`Tag#1"]& ]}, {}},
|
|
{"WolframDynamicHighlight", <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}],
|
|
StyleBox[
|
|
DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {},
|
|
Slot["HighlightElements"],
|
|
Slot["LayoutOptions"],
|
|
Slot["Meta"],
|
|
Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {},
|
|
Annotation[{
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]],
|
|
Line[CompressedData["
|
|
1:eJwVl3c8le8bx+0ZSUj2djjnlBDfpOe6VJSREKIoFdKw9whJyqiIIkrIqJRo
|
|
yIoi85yQUUK2QlkZoeJ3fv88z+v9ul/381yfzzVe9y170t3CiYWJiUmE8fj/
|
|
e7Gv8b1CbBJRJG772nXGiehIFw3U6/ICbZsK0j/pvYDCLSdFuyJg0nOtkCZt
|
|
CX5mjz+zdt2ELbImTvelHWHD1Kaby5+z4H2pDfNOaR/orzB1n//8HJrNEr+1
|
|
SEaCgcLE19nP1dBxIyVPWzQJlj9r35r53AZHFZ7WTDNnQ82evOyPWcOQlWDr
|
|
J+z9EiT6S7+dpEzC+waZItvANyB0/vhjzj1zYHZNzDL4STWocj6oMzs8BwsX
|
|
du+0qKgGzPo2dOfcHLwQuN0jSa+G812u4pSkOfjy7gQp8Uc1vN8bEmc2Ogch
|
|
VZ6bF1RqwEfyjtudK/Nwq0e0+EZ2DbQ3t6mT6QuQBXSJyfj3MHZG5KDPwALU
|
|
v7/RanL/PayyHTn3Zn4BNr+Ltsl4+h5Udw4+OCi5CD4Zt2hyTe8hIm9ayMdt
|
|
EeIudl9LYqkF9fB1vysEfsO56GmSkmct3NxmUG5qtQQWqVKnvuytg609tvt2
|
|
uSzBVbVXpR/M6oAe6dpODl6C8029XcV2dcDRlfSDK3MJgq9znjjtUwfBocPi
|
|
NT+XQPrfL7LegzpwpIWHaEcuA8VOxrFjtQ60nMp3ybxYgeBT+rwnntZDO39L
|
|
I3/dClTb/wj4/roePEqGrP51rcDx+wd3n6yuh8e8PG7dqytwz1Dtq+bnepB+
|
|
bpOeZPQHdPw9vh9gagCutYVVrqE/oMDyle+AWQN8SVF7OyvwDyQORCW4f2+A
|
|
1Pb89X6K/yDW47AOMdsAR/iVj6/s+AdOuyyHV1caoPeS5CrLqX9Qtz6fas3f
|
|
CANuPLpCr/7B6t8UVzvNRhjbO/Jay3YV6kQUNtZdaISlmeRnwZlr0Lfpth0b
|
|
RxOUkjeurb1agw+hD3gF+JsgyPm6aWTTGgzLk27yiTTB357Iybi5Ndi32iHf
|
|
p9gE4cMlwi1yTBhhRjXr3NsEkc05hwZ8mPCHxNlH4uFNEJsd1sKymRmXjgs1
|
|
c/9sAiPNM4LC8szILxFipvGrCbjeW1gpU5nRXDBR6+ASY/+wYo+xHjMqv1vY
|
|
doyNBiFy9G9JZ5jxozo/+xdxGrhliK4qlTHj7Y4Punv204CixqK34z0z8lrm
|
|
Xks8QIOJqh+XjJuZMSKh6fAnCxqc7q/k9hhixpWHPcc07GngIOUkXMrDgtn8
|
|
784ae9LA/G4RxfgoC77pebVt4TYNBChp7vZOLFjAY/vXNY0GzeWRz93dWVBw
|
|
+0uHL/dpYNRz+L+kSyyY/FaK6epDGuwWW93zNZ8FPxT39+0tpYFmitFR978s
|
|
GKxY6AxdNPilrJl+kYMVX9reYxruoUHha8nBRAFWtH0pfjywnwbUzzPOJQqs
|
|
uK91xDf0Gw2URJK9mA+wYtHWyBMTczTYlDQcnXiPFZ0iSFwm6+ggSn4VuZTL
|
|
iuZW9ocn+ekgVh0VZl/IipTBabNLG+ggNaPiq1zDirPei6bXROigaOLhUD7G
|
|
ihHpt5o2y9BBaVjvqMwvVnyUkfDWQY4OpKCN1pf/sOKvqe2BdxXoQHlYbHyQ
|
|
nw3VwuThF4kOGmz/tIY12DBgttl/0zY6aKY1b9u/iw1L7US/smnQQUs9g/LU
|
|
gA0lb26S/q5JBx2HPXL+tmy4PeydQcx/dNCriObjDWPDfhuuy8ZAh92HjnJ5
|
|
XGXD3FYhtQGkw94JCmtnAhu2sdxtP7ObDvtFW5fSs9mQazlE0E6fDgd9REbU
|
|
m9hQ2fdpZ4URHcx4x/qS29lwTOTy42VjOlhklX7528uGYVz7b5EP0MG61a6l
|
|
bpoN5UPfl7sdpIPN6S1N5GU2fB5IWgszo8OR1bX38Szs2JpHPx1lTgd7yoOy
|
|
I8LsuHWjZ4nXITocq/F5VSXFjjbzpg9tLOngcMSgUIHEjsf2kD5oWNHB8ep4
|
|
zpQOO5qOf6httKaDs3R5xqG97Di4/3Fm5GE6uBTHpZUcYEde8axqTRs6nBvZ
|
|
mhDhwI4z0ftHfGzpcD6YOe77GXY81PTfJNsROrgJtkeZeLNjz+t64xgGezzK
|
|
vlgUwo59nops7Efp4IV+ISJR7KhGvirmy2Cfz/v8g2+wY6U8JbGbwX5um70G
|
|
UtiRK+uQ13Y7OgSw/zivn8WOr38aVFxmcODditOP89lRea+lL43BQRrXT65/
|
|
xY7feloyOezpENJ03N6nkh01OjYaaDM49MQ2my/17OinEe5sz+DwJZZDxEd2
|
|
fNMfxBnI4IgbHQcedLOjeoo7NYbBkUq5+7lG2DFsqqU3nsFRb/z3uE6yozFu
|
|
FLvG4CuWhkTbIjveKSweD2Ww2MtmMRZmDhQZ1605xeCCjZa/t/FyoN5Si6Mu
|
|
g3d7f2k/IcyBrJ+hg4vBn9qOFSZIc2CqheOmRkb8Z9VH4t6pcOB7FknNCwz+
|
|
l3DmzKwGB94CczVFBsfPTunLEhx4Y9PMhncMfxTMfeTM93NgpP5MnxmDSwqX
|
|
V8MtGOtKZvc6GH6bCIT1FNpx4OIz4UMmDB5wZysZcObA9U6mHCWMfHm3RCcJ
|
|
eHKg8oH1bzYxmGPrek8M5kDzcZ8L5xj5Tb2edMDjMgfuVn1w4AUj/9UH7nO0
|
|
3uFAO1N+LWlGfVg/VRhee8CBlqOvj+xh1M/EusdVWwsYen1YHx5l1NcG+suA
|
|
G9UcuK7mUaeLBR2yyTpWVXQOpIvlV9sz6vO/2Kpt05848OHltFkDRv06GDVN
|
|
mP5g7B8c2bLIqPf5RwfrQxcY8bBJGlWYMPzm7nxQsMaBfjEs7/wY/VHQ0G/H
|
|
L8SJ3YEDPQ37GX4ZLDR/0OVElcSiC0OMfovPDcr/Z8CJFc2TVBM9hl8cTFep
|
|
5pxoZnTP7TGjX01qefSuOXHiWo12xV5dht49Mi9MrnOi16E5/VlGv295kHMj
|
|
JIUTC8o1tJkY86CahXz+SRYnBjRZTLMy5sX4u+2K615z4k/ZnpZxCkMPGifT
|
|
+jnxzXF1YTXGvKHfb/X+M86JM3G2TN9kGfrWrMzI85z4Wf3oRLw0Q0+lA3cs
|
|
FxdWCh/7XCvGqAddv2CjbVy4M7Ls6xMBRn52ZB5vjODCwi+Gs74rjPmcwT9v
|
|
HMeFxdfbx4t+00COM+Rq8y0uNOcQLxyZp0Frh3VR+0MuFPqmWLllmgZbPNax
|
|
9jVz4U+N7hirYRqM5frn/hLjxoCnjfvnGmlQxTeq46vAjdcT/v5Nr6PBbR+L
|
|
lt9UbqTlPh/Uq6GB/m7q0l/kRqLqi5VrBQ2yvg4Zcp7mRlWfLalHC2hgJ2Q6
|
|
Kf6CG7t8aUpp8TTQCC6/mF7BjSJLS18r4mjAM0QSka3jRh2tX+RPV2lQ+owV
|
|
lL5w410dw9zpcBqIGJfGq61xY5/CDlqlByP+iwqa+sY86Pqe/1a7KQ32Tq8E
|
|
uQ3z4I9zpk/Z2WkQuD9J9d1PHmSb5swGJhoUZFK7Ny7y4O2BrRZef5pA1NJh
|
|
RykXL74yCZl6N9sEP0tqf7Nu4cWp1P09PH1NkBgR73MngBf9GhKphq+aYEhY
|
|
ye093zqMKZQ3zDnWBBd1zU+I/ceHofnnCZP0Rth/LP2X9m4+5Kx2V7dLbgT+
|
|
8B+XrEz4cM8z10in+Ea4W3M5N96BDyf2Rzs6RjRCiVHZD45oPox7kcYm5NwI
|
|
MzbyfnNf+LBRshh2UxrhmO9CDD2YH++++hgi8rIBdAruvAytWo8XKFauwS/q
|
|
4fzSbHgD3wb0Zn6Xo55XC8tkgT6qlSD++D0XUaZfA7r5TzJu396I4+ZpVZxD
|
|
b2FW0MjBuloIlw6f1VU8+QZG4hysvThF8LVzloJxTwkYTvsbjmptQpfzllY+
|
|
sy/h5yku75dhomhQOpBZJFnEOD9vYrlSvRnX0uaTSzPzQfCD0vXCaTH05bCU
|
|
0zmYC6vTajlN82I4//h837cduTAhuLNiZFkMw460nsxSyIVqm4MTomzi6MnK
|
|
VqK/kgPeI/4GF0XF0X/5u86u3Bzo+NOwaq4njkHBZ8p/MuVAsuo597mbjPXv
|
|
vTma7x6AxNVnZlpaEvj4x7Xay+cz4XHB05plHQn8dfjTq7mjmfBfZ77WG5BA
|
|
0urWbFfjTLCUeyix11ACcwebz15WzYS4iowxczsJdMtpoOwdz4A/MwnhrhES
|
|
2POi/euKSwZ02/oUZjcz1oNudtkPpUMKeYfAxtOSaKgfcOnsvjSwMv4QX3lO
|
|
EtX9EqejKWkgeO7EhrMekvjL3G9n5YY0iH0cLfguUBKdnU4fcOpNhVCVbiH3
|
|
OEn8bE23fOKVCo7KwZtpRZK4+QWWCT+4A9vk38hd+iuJ991/WW7cmAJNYnrb
|
|
5xKkkPe0QGgq9Ra0Sj1TYkuWwqFMXfMm4VvwSU5SVPiuFHJPDXatX02CQdXl
|
|
Fa1cKVzb6tTW05wESzpFb4PKpFBoNJzTzzMJlI7KmrAMS6HPm5VdD8sSISKN
|
|
+dQGTWm0uj3y8pHdTdCRqI7f+kka7f7mCKSV3IAheYW+8W5p9A/TsIq9dQOi
|
|
yVHk7H5plGxkpad53YAuHaM60XFprNw991eCegP8bdv+MP+VRj0OUEh/cB2O
|
|
GHtqTAjI4JNGN4vo29fg9lVGe2vJ4K80kohXYiycjVOv3bxDBs8nCrugTywQ
|
|
8cM//HbKoMhDdmuKVSyMJuvv2IYyuBQm9NJuUyxo5nF35BjKIPtUn67kvRho
|
|
q03gvmEng/tqZZ/xFkQDP2uWz4kIGXQqcL0gMHoFOJarDs1GyqDi0Vku8for
|
|
sDr1Vf3iFRk0ri86pf/oCkx3b57NiJPBZwoDssuuV6D1eYLrwG0Z9P/pvfZl
|
|
KQpunrzofDxfBlMfGpmeE4oCkWoHG/sOGTzwIN5T6mQk8JeEak9+kkEJN7Ob
|
|
v/ZFAkfBXZELX2QwYmj32WFqJPy+09Vxt08GxUJl+8VWLkGXp5l575gM+r1N
|
|
1OlLvASpsmh09J8MehpAfSY9AqQuSuvaKsli9vWxWj+Li1DgzSX3lSSLM7bB
|
|
w5K6F4FwnuU8QZZFFopT11fFi2BvXNPuoiaLnbfKZ/OWw+Gu8OlzATqy6LQg
|
|
d+VkVjhsflyQmmwqi6KCdVxvZsJAqH3XcqefLNqPZdlXnLsA2bVK/baBsvgw
|
|
7Cl5au8F0ChZX/s1WBaflrq5mEhdAIt7g/Gj4bKoKVcVe+1jCCScvkxaiJHF
|
|
XjlRfimdEOD/Sz8sdF8W00R6piw3BgO3ol2xRb0sSpMtSRyjAXB2MxjlN8oi
|
|
teWgb2ltADTxyfWx0mUxwPSh8o3cAIhb/M7+qlUWF8v79TJdAoC/wdtqUzeD
|
|
A40X7ab8Gf0UO9/zUxb1ot5938TkDxJFZepOgnIYGniihbbTF0Jy7tW9EZLD
|
|
wREsTpDxha93wo+IbJJDnY9xB/3YfSE9wiCiXlwOZQ8XKKe1+ICMZdtHFUU5
|
|
HPrcZWXm5AOKv8c9prTlsC1pi5zZbW/YsmvzM397OewYERwZ4fOCF/Jn/rA4
|
|
yOHj2ojDpvOe8B9P6b7rJ+Vwa+RKz+duT9j92WYg+7QcfomxuWn00BOsPVM2
|
|
tHnK4T73OMH8vZ4QlrPJhxIlhwktYvd3XvKAVj6RHYMFcqhpZl3qTXUDq3mn
|
|
y+eL5FDl+grzB2Y36O5+9fH3Czn8947sfuyTK4zkWZ3lL5XD1A/b35PCXWFJ
|
|
71bazho5/HXKo9Ly03mQ9RNavfVZDp1kpis6486BV59gjRGTPAbKrc0My5yB
|
|
hjq7N49Z5HH9sxh//VUXkHqW+5qHXR6Z9yekf+xxgaYwnSdN3PL4nSdR/Eyy
|
|
C8jJnrxltFEeD1i8/H1DwAU+nio6baQkj3KPPn29zXMa1MYPrjMykcdYttgC
|
|
ewkniPp4h+OxqTym26eeqlp1hN7SYSYec3lc7Y87bTDoCFdj/BcareRxpLW/
|
|
rCbXEQbI9/sMj8vjDP8S1V/DEeLdpgoNveQx+2nio/RDp2B6Ls7KMEUeX+n9
|
|
1zf49AT0dmVa30uVx2LntAaZWyeg6U3x4dm78vglXmsuNOQEZF8ZsL2TKY8H
|
|
7TLCU4xPwBFxzWPjj+XR0zW0XveHA9Tu7nGOfsPQVy1URVFzgLQElYDGIXl0
|
|
32MsHnffHq76EYGSo/IYRN0lfMTXHvyOHgry/C6PLatH/I4Z24OZ4oWQzT/l
|
|
Ud+kPJB7yQ44SlvDzyww/JGMGBo8ZAeeA/7R3FwK2Oi1r+e08FHYt7Uu1ZCq
|
|
gAk+s95qlTZgw7HfsnWrAlaMRJqaJtvA2a+NfIfVFfDCqsvTBx42cD32Q7ij
|
|
tgIeb5UdmpO3gU/fO5zD9BTwykzbXblrh8ExY1j9lZUC6jDxTVw4Yw0RG5hp
|
|
MqEKmHbb4emx/ZaQNBYRmReugDH3k2/8ULaE3Co2YsslBRwDuaY8TktocuUq
|
|
2nlVAR99MbV8Wn8INjStT7a+qYCCehwy3wwPQUaE1Km4XAVkCzcP77a2gMq5
|
|
nX9+NytgvKlriU6CGWTSX5889FEBg9LvX+YPMIPIHI2mgnYFVBb0P8R+3AwM
|
|
D5PvOHUpYN9Ptb1HqWbQUSam3T6ogP4bS2/uSz4IExeXvQrmFbCNZ22ATdIU
|
|
RAReTziKKWJioYH0MxtjWB5Tt3groYiPrG8M+m4xht53BaXi0oqo/435QgCb
|
|
MWR6515tk1fEL8f8BdSKjIDy+ZYSUhXxnvqklwOfEexO9zkpjoqo8NUs4HLr
|
|
fnCjqHd/dFLEzh/y+j/CDMD3t9jKcRdF/E95cVu+rQGEVLOKTZ1VxL3GRqu5
|
|
GgYQa9Npy+OhiE+9yKNmY/rwMDLgy+4gRfxr2dniaKkPQ72VXS+uK6LD90/h
|
|
+tp7wfqa8edbrxXRUe9I2jvF3WBvo/lbvkwRLw7Lfj3BsRsc5SU3Pa9QxDc3
|
|
PbU0v+uBd+mUdfM7RZSCPevdHulB/GjCJw66Ip44diVmi5oeNO3q6vQfUMRN
|
|
MeLmOQYIu6YcO2y5lZBeM2MuR94FIuX7sip4lTCOONSOf3Rh6oqqhzS/EtY8
|
|
75Z6SNOFdNkZ3lFBJUx0uXDpoKsurFoG7/GQUMKuXKe8xRc7oao84XnUViXc
|
|
5+PAYm6qA3rRlfEvrJQwxP8/0QcvtUHMOvOYiI0SuoaoHJO9pg2/5CIpgUeU
|
|
UNBt4n2vkzZkVRg2EMeVkF934C63qDawzHSsNboo4X8ivxXVw7SgxvqH20Cw
|
|
El7lm3X3tdkO+gqiB/iylJDn7rXAeE0NeDlZK+uYzYj3feyZYiENUHjtvViW
|
|
q4THX8xE8C2oA5tRy32XfCXMnf4lYVqsDtXuUb9qXiphq2Ob64ad6kCUzycH
|
|
1Sshp4pIqtOBbaBl8XHo+08l1Nm1/dUfpa2QKx72mphWQrns9cw3f20B4VFK
|
|
3K1ZJRz+/DYuqHILzPtf3b5nUQkPB32LwcNb4Pk9uJq+poSLC0zWiXFU2Dr+
|
|
lHE8VkaXgcCCaXYKkMJjAqq1lfH10wXHC2oqULEzh91ERxkNys88HmBWAbPf
|
|
VTc7dZUxTC33RlI7CQLcFp6M6SljeZzQjp/+JGiwcxjkN1HGgIweyoH3yuCy
|
|
Q8voqIMyGt9tX3fmnBI8+jUoPn9VGWWbh1kbpuWBKPj78EKsMnIp1opaNslD
|
|
25lNWpzXlfGLfJiIXI48rAyYmIklKuNC9rRMxFF5MGp5HYn3lFHI6s+QAU0O
|
|
JvKvTcYVKaNYZufdq8WyoOq0o0qxW5lx3/MYcfOShhtypiuXepVRXQ1f++pI
|
|
w3z/ye1DfcrooPGHv5tFGiqPxOWnDzP0ED68pUlSYGHWn7xpUhkj3ximvK2Q
|
|
hMCdlz24mUi4ppgSGywpAQ0bPspOKpLQtXq6YF5yM1BbRu2MSSRsowa9yJoR
|
|
hZtxK8mPVEkY1tCZfq9GFOw4FfidtzJ4ebtBwFlRmP7rt9L3HwmzXduqX5Rv
|
|
ApExifZWYxKK3a1d6T0nAk6VLpEvPUnItn/L+W9rG2HKdcJf34eErLlqNIOu
|
|
jRAgef7cJz8SNjlGSc8WboSYEHeLpWASjk1K5sme2giFOn4yulEkfFY4aT3S
|
|
JAh/iy9V1KSScPLS4OSlvA0Q5cxeaHmPhPq1Z2QMIzfAepErD0bvk5Ae+vue
|
|
2YkNIOcbE8OZQ0KS3vdHChIbYJ9Ggo3xMxJqrbGFdCQJwM1n6fNtNSSsc+ig
|
|
DMmvB4njMmOn6ki4VCghZjLKDzn8WT3zDSQUbdn8lpLHDyWuOdUizST84sE7
|
|
bUrhh6/kJ/FHukgoPjyixqTLB6SHpZShnyRcl/fK0MmDF6oyOhxnhVXwP+89
|
|
3+eUuWDARPa4n6gKNu1ZCkz7zQlMy662f8RUMGVH1pX0ek7Ybc5pyi6jgoEe
|
|
etdeunBCHbOO9mZVFfxUtkLnf8YB9JP3ufUIFdxiHVE7Z8wOk/w/WetQBWfk
|
|
om25ZdmBv/y/VaM9KpjB41PtscgGZhvbflnuV8Fjr3xp6lls0F7D1utioYIe
|
|
tXPL3v9YoVvhbEG8swrWtbs0ulezwJ/W4ofCZ1TQoqBJ3eEuC0hcYH2Qek4F
|
|
X1vzvrnjxwL2nXeTsz1UsCNeWekbmQUGLreElwSp4Mt/TqKf7jDD92+ahwau
|
|
q6DjMDnvQQQTzD9c+731tQpeDsvlsuD+R3yzNsiILlXBDYXJQWkf/xJdbNf2
|
|
D5eroIHxk4NGqX+JcgexO7ffquCCJZN7J+UvESG6XedfowpKW5m2Xrf+Qwhc
|
|
PRvS1KuCqeyi//6ULxOU051MTiyq2KkWK+LYtEhICUs8qmRTxYm9MXxS6YuE
|
|
QM1Jc1FOVcyT1Hip4rVIzEnNZNJ4VZE3eeWLhvgiUfaJZ4+6sCq2p3vtZPNc
|
|
IPYb4OU1ZVV8tprRLkmeJ04p5nOnHlBFUwWBkOzOWSKo9thZJTNVXHzKaprx
|
|
bJaIdxKkPbdQxaTptW3j0bNERU5gHO2wKhosvh0+DrOEkNL+9f9OqKKR7bYN
|
|
H5/OEHVKo0IOfqpoV/lu4JraNNFbl+L7M0AVV1xTubMmp4hfziafAoJVsTY0
|
|
sZvInyKk814kJ4Sr4sI6ki0/aYoIUI4Qq4lRxbToBNcx5UlClSQto3RfFcmU
|
|
K8xP4AeBDW3hzzNVcZRTitzO9oOwdokaJLJV0TJi1N67aYK49HAy6/AjVQw2
|
|
mNQQPzxB9JIqFKNfqKI6z6LZtO84cV3FlvyzXhXfjHuLjTR8J2ZVE7Wez6gi
|
|
z7Y8YVLlCNFFR/2Nc6poY7T4pz5xhHjrNnXIZ0EVZUXn3MvOjBDXnxt6aq2o
|
|
YryPSmaSyAihqsP0pIyVjK+DBGv4fIaJk4ausjUiZIzdtVk2cdcQYfhDTE1h
|
|
Mxk/hvVXiIgOEWrXGojL4mR8IVbUPfxrkFhtlbfbJ0PGL6cNgm0eDRJpNt23
|
|
aSpkrNa5nXZ38yDRcXrfug5dMhaH2udLcg4Q5dwLYtuBjCfd6bRFWj+RlZ+l
|
|
cluPjD2jAeu2x/QTHtP/DGwMyGhUHyKtxdVP8Pm/vNh7kIyTpdHb1Hj6CIMo
|
|
2d8jJ8lom6dxTUuxlyjJ/jO4cJWM0vwx3V5FXYTWHp/fRrFk9FX7ltMS2kW8
|
|
Gvy5LuMaGdfnpjy/YdJFPJfq0za6SUa1yQsFWuOfiScpb6+lp5Hxt/GS8Trl
|
|
z0RG3OUd+wrI+HyulHXny05CirxqereQjA11k+wBVzqJe41+jrPPyTivHWTO
|
|
d7STSOVwuZH2moxTG3jUCNZOIincaHT6LRmpT1x18g53ENE+6xNS2sm4c/Da
|
|
A16BdoJr49XcyU4yfr8sKhsx1kZEFTFV7O5i/E/jm/C+d21E5NTst5+9ZKxM
|
|
VRQp824jQl06dPW+MfLT4hiu2fuR8LK7Mza+xPArvfvNalkrcWSvPO6UouDl
|
|
kQP1XjYfiH8dXPw1MhSUT9pCKhL+QGQ4TfUYyVMweX0408V2OvEtqtT/CImC
|
|
H+een2w1oxNejQefBapTUETkVAifBY2IMQ2RKjGg4KEO6c9sbo0Etf/ETzCk
|
|
4F9dA9U2jUai1X1fWb0xBTXHbilIrzQQIgmC1p/NKGhEezeqcbWByGp/eG3x
|
|
CAXP6ClNkR/XE2U2nX813SmMeVm+25+tjrAfL2uq8KSgcJu9Y93HWoIpKCNl
|
|
rw8F/cWW3S/fryUM0s5pWgZSUDurNOWgbi3R9pX5vPclCm6/m9i/EvSemDi5
|
|
pacomfH9iJvxY7w1hLjrldItbyk4Yusraun3lri+5rw9tpqCpXXd+Vcs3hIs
|
|
Nw2Kvr9n6PuCy+xb3xITxeyPMhop+GKrSP/bj1VEGVNkimA7Bf12ycYuV1US
|
|
R5LC/RdHKbhRyO3bk+IKolnJYc5ijII9OoanR/wriN2l4P5sgoKn5IIr7++o
|
|
IFT7Vp1dphl+JUi13qssJ5aVL1h3L1EQ+/XXpzWXESnlgdsreakoxNlRXMFe
|
|
SqwztS0S46ciP29zb2lzCRE+8B/VX4CKbfEeWuSUEsKFfUlBTZiKDVUCvc6U
|
|
EkL7oJ9QlhQVjex4i0lHXhOfhrzmLm+jYvExndOCTa8IYZ7zRQcOU/FxqF1o
|
|
0cJzInvPhaAZWyoe7fEzKah7TqhfuL4n0Y6Klbt7tMRTnhOmM4WdXSeoOFbm
|
|
cEpP9zkR9Wlh+dR5Kh7z7c97EF1ELGWF7Q66SMVl2zPyP7QLiajeeF7JSCru
|
|
YJM467e+kBASyeqoiqKiTLLErdrmZ4Ra9Htn9jhG/M4sFcVqz4gz7tyx8bep
|
|
KBxpWXH631Oie2die24+FXWWq64nlOQTLr7Zdw0LqCgQOwUs3vnEYsErp5+F
|
|
VJyI8FoS25JPCMp1/d5WTMUzPIfdidzHhDGXpMSbt1QsHIp8I5/+iKjoyHVs
|
|
76Ri5o1tbxXy8wgj/hKqXxcVW5NGq5zd84iufY2Loj1UfF9V/2eHZh4xX/bj
|
|
6rEBKibuVxq8XpVLUDPVno5PULF6mSbU3JtDVHTr+cVNUpEyfj3RNyeHMBI6
|
|
BFtnqBigeZ832y2HcL7i+9FngYqXhNr/xLPkEPNvo1I3LVGxPHSU7cCHbCJi
|
|
JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT
|
|
/wN9xxCi
|
|
"]]}, "Charting`Private`Tag#1"]}}, {}}, <|
|
|
"HighlightElements" -> <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>,
|
|
"LayoutOptions" -> <|
|
|
"PanelPlotLayout" -> <||>,
|
|
"PlotRange" -> {{0, 15}, {0., 0.22160540372702894`}},
|
|
"Frame" -> {{False, False}, {False, False}},
|
|
"AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio},
|
|
"Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" ->
|
|
GoldenRatio^(-1), "DefaultStyle" -> {
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]]},
|
|
"HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ),
|
|
"ScalingFunctions" -> {{Identity, Identity}, {
|
|
Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" ->
|
|
False|>,
|
|
"Meta" -> <|
|
|
"DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" ->
|
|
Plot, "GroupHighlight" -> False|>|>]]& )[<|
|
|
"HighlightElements" -> <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>,
|
|
"LayoutOptions" -> <|
|
|
"PanelPlotLayout" -> <||>,
|
|
"PlotRange" -> {{0, 15}, {0., 0.22160540372702894`}},
|
|
"Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0},
|
|
"ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True},
|
|
"LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1),
|
|
"DefaultStyle" -> {
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]]},
|
|
"HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ),
|
|
"ScalingFunctions" -> {{Identity, Identity}, {
|
|
Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>,
|
|
"Meta" -> <|
|
|
"DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" ->
|
|
Plot, "GroupHighlight" -> False|>|>],
|
|
ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, {
|
|
4.503599627370496*^15, -4.503599627370496*^15}}],
|
|
Selectable->False]},
|
|
Annotation[{{{{}, {},
|
|
Annotation[{
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]],
|
|
Line[CompressedData["
|
|
1:eJwVl3c8le8bx+0ZSUj2djjnlBDfpOe6VJSREKIoFdKw9whJyqiIIkrIqJRo
|
|
yIoi85yQUUK2QlkZoeJ3fv88z+v9ul/381yfzzVe9y170t3CiYWJiUmE8fj/
|
|
e7Gv8b1CbBJRJG772nXGiehIFw3U6/ICbZsK0j/pvYDCLSdFuyJg0nOtkCZt
|
|
CX5mjz+zdt2ELbImTvelHWHD1Kaby5+z4H2pDfNOaR/orzB1n//8HJrNEr+1
|
|
SEaCgcLE19nP1dBxIyVPWzQJlj9r35r53AZHFZ7WTDNnQ82evOyPWcOQlWDr
|
|
J+z9EiT6S7+dpEzC+waZItvANyB0/vhjzj1zYHZNzDL4STWocj6oMzs8BwsX
|
|
du+0qKgGzPo2dOfcHLwQuN0jSa+G812u4pSkOfjy7gQp8Uc1vN8bEmc2Ogch
|
|
VZ6bF1RqwEfyjtudK/Nwq0e0+EZ2DbQ3t6mT6QuQBXSJyfj3MHZG5KDPwALU
|
|
v7/RanL/PayyHTn3Zn4BNr+Ltsl4+h5Udw4+OCi5CD4Zt2hyTe8hIm9ayMdt
|
|
EeIudl9LYqkF9fB1vysEfsO56GmSkmct3NxmUG5qtQQWqVKnvuytg609tvt2
|
|
uSzBVbVXpR/M6oAe6dpODl6C8029XcV2dcDRlfSDK3MJgq9znjjtUwfBocPi
|
|
NT+XQPrfL7LegzpwpIWHaEcuA8VOxrFjtQ60nMp3ybxYgeBT+rwnntZDO39L
|
|
I3/dClTb/wj4/roePEqGrP51rcDx+wd3n6yuh8e8PG7dqytwz1Dtq+bnepB+
|
|
bpOeZPQHdPw9vh9gagCutYVVrqE/oMDyle+AWQN8SVF7OyvwDyQORCW4f2+A
|
|
1Pb89X6K/yDW47AOMdsAR/iVj6/s+AdOuyyHV1caoPeS5CrLqX9Qtz6fas3f
|
|
CANuPLpCr/7B6t8UVzvNRhjbO/Jay3YV6kQUNtZdaISlmeRnwZlr0Lfpth0b
|
|
RxOUkjeurb1agw+hD3gF+JsgyPm6aWTTGgzLk27yiTTB357Iybi5Ndi32iHf
|
|
p9gE4cMlwi1yTBhhRjXr3NsEkc05hwZ8mPCHxNlH4uFNEJsd1sKymRmXjgs1
|
|
c/9sAiPNM4LC8szILxFipvGrCbjeW1gpU5nRXDBR6+ASY/+wYo+xHjMqv1vY
|
|
doyNBiFy9G9JZ5jxozo/+xdxGrhliK4qlTHj7Y4Punv204CixqK34z0z8lrm
|
|
Xks8QIOJqh+XjJuZMSKh6fAnCxqc7q/k9hhixpWHPcc07GngIOUkXMrDgtn8
|
|
784ae9LA/G4RxfgoC77pebVt4TYNBChp7vZOLFjAY/vXNY0GzeWRz93dWVBw
|
|
+0uHL/dpYNRz+L+kSyyY/FaK6epDGuwWW93zNZ8FPxT39+0tpYFmitFR978s
|
|
GKxY6AxdNPilrJl+kYMVX9reYxruoUHha8nBRAFWtH0pfjywnwbUzzPOJQqs
|
|
uK91xDf0Gw2URJK9mA+wYtHWyBMTczTYlDQcnXiPFZ0iSFwm6+ggSn4VuZTL
|
|
iuZW9ocn+ekgVh0VZl/IipTBabNLG+ggNaPiq1zDirPei6bXROigaOLhUD7G
|
|
ihHpt5o2y9BBaVjvqMwvVnyUkfDWQY4OpKCN1pf/sOKvqe2BdxXoQHlYbHyQ
|
|
nw3VwuThF4kOGmz/tIY12DBgttl/0zY6aKY1b9u/iw1L7US/smnQQUs9g/LU
|
|
gA0lb26S/q5JBx2HPXL+tmy4PeydQcx/dNCriObjDWPDfhuuy8ZAh92HjnJ5
|
|
XGXD3FYhtQGkw94JCmtnAhu2sdxtP7ObDvtFW5fSs9mQazlE0E6fDgd9REbU
|
|
m9hQ2fdpZ4URHcx4x/qS29lwTOTy42VjOlhklX7528uGYVz7b5EP0MG61a6l
|
|
bpoN5UPfl7sdpIPN6S1N5GU2fB5IWgszo8OR1bX38Szs2JpHPx1lTgd7yoOy
|
|
I8LsuHWjZ4nXITocq/F5VSXFjjbzpg9tLOngcMSgUIHEjsf2kD5oWNHB8ep4
|
|
zpQOO5qOf6httKaDs3R5xqG97Di4/3Fm5GE6uBTHpZUcYEde8axqTRs6nBvZ
|
|
mhDhwI4z0ftHfGzpcD6YOe77GXY81PTfJNsROrgJtkeZeLNjz+t64xgGezzK
|
|
vlgUwo59nops7Efp4IV+ISJR7KhGvirmy2Cfz/v8g2+wY6U8JbGbwX5um70G
|
|
UtiRK+uQ13Y7OgSw/zivn8WOr38aVFxmcODditOP89lRea+lL43BQRrXT65/
|
|
xY7feloyOezpENJ03N6nkh01OjYaaDM49MQ2my/17OinEe5sz+DwJZZDxEd2
|
|
fNMfxBnI4IgbHQcedLOjeoo7NYbBkUq5+7lG2DFsqqU3nsFRb/z3uE6yozFu
|
|
FLvG4CuWhkTbIjveKSweD2Ww2MtmMRZmDhQZ1605xeCCjZa/t/FyoN5Si6Mu
|
|
g3d7f2k/IcyBrJ+hg4vBn9qOFSZIc2CqheOmRkb8Z9VH4t6pcOB7FknNCwz+
|
|
l3DmzKwGB94CczVFBsfPTunLEhx4Y9PMhncMfxTMfeTM93NgpP5MnxmDSwqX
|
|
V8MtGOtKZvc6GH6bCIT1FNpx4OIz4UMmDB5wZysZcObA9U6mHCWMfHm3RCcJ
|
|
eHKg8oH1bzYxmGPrek8M5kDzcZ8L5xj5Tb2edMDjMgfuVn1w4AUj/9UH7nO0
|
|
3uFAO1N+LWlGfVg/VRhee8CBlqOvj+xh1M/EusdVWwsYen1YHx5l1NcG+suA
|
|
G9UcuK7mUaeLBR2yyTpWVXQOpIvlV9sz6vO/2Kpt05848OHltFkDRv06GDVN
|
|
mP5g7B8c2bLIqPf5RwfrQxcY8bBJGlWYMPzm7nxQsMaBfjEs7/wY/VHQ0G/H
|
|
L8SJ3YEDPQ37GX4ZLDR/0OVElcSiC0OMfovPDcr/Z8CJFc2TVBM9hl8cTFep
|
|
5pxoZnTP7TGjX01qefSuOXHiWo12xV5dht49Mi9MrnOi16E5/VlGv295kHMj
|
|
JIUTC8o1tJkY86CahXz+SRYnBjRZTLMy5sX4u+2K615z4k/ZnpZxCkMPGifT
|
|
+jnxzXF1YTXGvKHfb/X+M86JM3G2TN9kGfrWrMzI85z4Wf3oRLw0Q0+lA3cs
|
|
FxdWCh/7XCvGqAddv2CjbVy4M7Ls6xMBRn52ZB5vjODCwi+Gs74rjPmcwT9v
|
|
HMeFxdfbx4t+00COM+Rq8y0uNOcQLxyZp0Frh3VR+0MuFPqmWLllmgZbPNax
|
|
9jVz4U+N7hirYRqM5frn/hLjxoCnjfvnGmlQxTeq46vAjdcT/v5Nr6PBbR+L
|
|
lt9UbqTlPh/Uq6GB/m7q0l/kRqLqi5VrBQ2yvg4Zcp7mRlWfLalHC2hgJ2Q6
|
|
Kf6CG7t8aUpp8TTQCC6/mF7BjSJLS18r4mjAM0QSka3jRh2tX+RPV2lQ+owV
|
|
lL5w410dw9zpcBqIGJfGq61xY5/CDlqlByP+iwqa+sY86Pqe/1a7KQ32Tq8E
|
|
uQ3z4I9zpk/Z2WkQuD9J9d1PHmSb5swGJhoUZFK7Ny7y4O2BrRZef5pA1NJh
|
|
RykXL74yCZl6N9sEP0tqf7Nu4cWp1P09PH1NkBgR73MngBf9GhKphq+aYEhY
|
|
ye093zqMKZQ3zDnWBBd1zU+I/ceHofnnCZP0Rth/LP2X9m4+5Kx2V7dLbgT+
|
|
8B+XrEz4cM8z10in+Ea4W3M5N96BDyf2Rzs6RjRCiVHZD45oPox7kcYm5NwI
|
|
MzbyfnNf+LBRshh2UxrhmO9CDD2YH++++hgi8rIBdAruvAytWo8XKFauwS/q
|
|
4fzSbHgD3wb0Zn6Xo55XC8tkgT6qlSD++D0XUaZfA7r5TzJu396I4+ZpVZxD
|
|
b2FW0MjBuloIlw6f1VU8+QZG4hysvThF8LVzloJxTwkYTvsbjmptQpfzllY+
|
|
sy/h5yku75dhomhQOpBZJFnEOD9vYrlSvRnX0uaTSzPzQfCD0vXCaTH05bCU
|
|
0zmYC6vTajlN82I4//h837cduTAhuLNiZFkMw460nsxSyIVqm4MTomzi6MnK
|
|
VqK/kgPeI/4GF0XF0X/5u86u3Bzo+NOwaq4njkHBZ8p/MuVAsuo597mbjPXv
|
|
vTma7x6AxNVnZlpaEvj4x7Xay+cz4XHB05plHQn8dfjTq7mjmfBfZ77WG5BA
|
|
0urWbFfjTLCUeyix11ACcwebz15WzYS4iowxczsJdMtpoOwdz4A/MwnhrhES
|
|
2POi/euKSwZ02/oUZjcz1oNudtkPpUMKeYfAxtOSaKgfcOnsvjSwMv4QX3lO
|
|
EtX9EqejKWkgeO7EhrMekvjL3G9n5YY0iH0cLfguUBKdnU4fcOpNhVCVbiH3
|
|
OEn8bE23fOKVCo7KwZtpRZK4+QWWCT+4A9vk38hd+iuJ991/WW7cmAJNYnrb
|
|
5xKkkPe0QGgq9Ra0Sj1TYkuWwqFMXfMm4VvwSU5SVPiuFHJPDXatX02CQdXl
|
|
Fa1cKVzb6tTW05wESzpFb4PKpFBoNJzTzzMJlI7KmrAMS6HPm5VdD8sSISKN
|
|
+dQGTWm0uj3y8pHdTdCRqI7f+kka7f7mCKSV3IAheYW+8W5p9A/TsIq9dQOi
|
|
yVHk7H5plGxkpad53YAuHaM60XFprNw991eCegP8bdv+MP+VRj0OUEh/cB2O
|
|
GHtqTAjI4JNGN4vo29fg9lVGe2vJ4K80kohXYiycjVOv3bxDBs8nCrugTywQ
|
|
8cM//HbKoMhDdmuKVSyMJuvv2IYyuBQm9NJuUyxo5nF35BjKIPtUn67kvRho
|
|
q03gvmEng/tqZZ/xFkQDP2uWz4kIGXQqcL0gMHoFOJarDs1GyqDi0Vku8for
|
|
sDr1Vf3iFRk0ri86pf/oCkx3b57NiJPBZwoDssuuV6D1eYLrwG0Z9P/pvfZl
|
|
KQpunrzofDxfBlMfGpmeE4oCkWoHG/sOGTzwIN5T6mQk8JeEak9+kkEJN7Ob
|
|
v/ZFAkfBXZELX2QwYmj32WFqJPy+09Vxt08GxUJl+8VWLkGXp5l575gM+r1N
|
|
1OlLvASpsmh09J8MehpAfSY9AqQuSuvaKsli9vWxWj+Li1DgzSX3lSSLM7bB
|
|
w5K6F4FwnuU8QZZFFopT11fFi2BvXNPuoiaLnbfKZ/OWw+Gu8OlzATqy6LQg
|
|
d+VkVjhsflyQmmwqi6KCdVxvZsJAqH3XcqefLNqPZdlXnLsA2bVK/baBsvgw
|
|
7Cl5au8F0ChZX/s1WBaflrq5mEhdAIt7g/Gj4bKoKVcVe+1jCCScvkxaiJHF
|
|
XjlRfimdEOD/Sz8sdF8W00R6piw3BgO3ol2xRb0sSpMtSRyjAXB2MxjlN8oi
|
|
teWgb2ltADTxyfWx0mUxwPSh8o3cAIhb/M7+qlUWF8v79TJdAoC/wdtqUzeD
|
|
A40X7ab8Gf0UO9/zUxb1ot5938TkDxJFZepOgnIYGniihbbTF0Jy7tW9EZLD
|
|
wREsTpDxha93wo+IbJJDnY9xB/3YfSE9wiCiXlwOZQ8XKKe1+ICMZdtHFUU5
|
|
HPrcZWXm5AOKv8c9prTlsC1pi5zZbW/YsmvzM397OewYERwZ4fOCF/Jn/rA4
|
|
yOHj2ojDpvOe8B9P6b7rJ+Vwa+RKz+duT9j92WYg+7QcfomxuWn00BOsPVM2
|
|
tHnK4T73OMH8vZ4QlrPJhxIlhwktYvd3XvKAVj6RHYMFcqhpZl3qTXUDq3mn
|
|
y+eL5FDl+grzB2Y36O5+9fH3Czn8947sfuyTK4zkWZ3lL5XD1A/b35PCXWFJ
|
|
71bazho5/HXKo9Ly03mQ9RNavfVZDp1kpis6486BV59gjRGTPAbKrc0My5yB
|
|
hjq7N49Z5HH9sxh//VUXkHqW+5qHXR6Z9yekf+xxgaYwnSdN3PL4nSdR/Eyy
|
|
C8jJnrxltFEeD1i8/H1DwAU+nio6baQkj3KPPn29zXMa1MYPrjMykcdYttgC
|
|
ewkniPp4h+OxqTym26eeqlp1hN7SYSYec3lc7Y87bTDoCFdj/BcareRxpLW/
|
|
rCbXEQbI9/sMj8vjDP8S1V/DEeLdpgoNveQx+2nio/RDp2B6Ls7KMEUeX+n9
|
|
1zf49AT0dmVa30uVx2LntAaZWyeg6U3x4dm78vglXmsuNOQEZF8ZsL2TKY8H
|
|
7TLCU4xPwBFxzWPjj+XR0zW0XveHA9Tu7nGOfsPQVy1URVFzgLQElYDGIXl0
|
|
32MsHnffHq76EYGSo/IYRN0lfMTXHvyOHgry/C6PLatH/I4Z24OZ4oWQzT/l
|
|
Ud+kPJB7yQ44SlvDzyww/JGMGBo8ZAeeA/7R3FwK2Oi1r+e08FHYt7Uu1ZCq
|
|
gAk+s95qlTZgw7HfsnWrAlaMRJqaJtvA2a+NfIfVFfDCqsvTBx42cD32Q7ij
|
|
tgIeb5UdmpO3gU/fO5zD9BTwykzbXblrh8ExY1j9lZUC6jDxTVw4Yw0RG5hp
|
|
MqEKmHbb4emx/ZaQNBYRmReugDH3k2/8ULaE3Co2YsslBRwDuaY8TktocuUq
|
|
2nlVAR99MbV8Wn8INjStT7a+qYCCehwy3wwPQUaE1Km4XAVkCzcP77a2gMq5
|
|
nX9+NytgvKlriU6CGWTSX5889FEBg9LvX+YPMIPIHI2mgnYFVBb0P8R+3AwM
|
|
D5PvOHUpYN9Ptb1HqWbQUSam3T6ogP4bS2/uSz4IExeXvQrmFbCNZ22ATdIU
|
|
RAReTziKKWJioYH0MxtjWB5Tt3groYiPrG8M+m4xht53BaXi0oqo/435QgCb
|
|
MWR6515tk1fEL8f8BdSKjIDy+ZYSUhXxnvqklwOfEexO9zkpjoqo8NUs4HLr
|
|
fnCjqHd/dFLEzh/y+j/CDMD3t9jKcRdF/E95cVu+rQGEVLOKTZ1VxL3GRqu5
|
|
GgYQa9Npy+OhiE+9yKNmY/rwMDLgy+4gRfxr2dniaKkPQ72VXS+uK6LD90/h
|
|
+tp7wfqa8edbrxXRUe9I2jvF3WBvo/lbvkwRLw7Lfj3BsRsc5SU3Pa9QxDc3
|
|
PbU0v+uBd+mUdfM7RZSCPevdHulB/GjCJw66Ip44diVmi5oeNO3q6vQfUMRN
|
|
MeLmOQYIu6YcO2y5lZBeM2MuR94FIuX7sip4lTCOONSOf3Rh6oqqhzS/EtY8
|
|
75Z6SNOFdNkZ3lFBJUx0uXDpoKsurFoG7/GQUMKuXKe8xRc7oao84XnUViXc
|
|
5+PAYm6qA3rRlfEvrJQwxP8/0QcvtUHMOvOYiI0SuoaoHJO9pg2/5CIpgUeU
|
|
UNBt4n2vkzZkVRg2EMeVkF934C63qDawzHSsNboo4X8ivxXVw7SgxvqH20Cw
|
|
El7lm3X3tdkO+gqiB/iylJDn7rXAeE0NeDlZK+uYzYj3feyZYiENUHjtvViW
|
|
q4THX8xE8C2oA5tRy32XfCXMnf4lYVqsDtXuUb9qXiphq2Ob64ad6kCUzycH
|
|
1Sshp4pIqtOBbaBl8XHo+08l1Nm1/dUfpa2QKx72mphWQrns9cw3f20B4VFK
|
|
3K1ZJRz+/DYuqHILzPtf3b5nUQkPB32LwcNb4Pk9uJq+poSLC0zWiXFU2Dr+
|
|
lHE8VkaXgcCCaXYKkMJjAqq1lfH10wXHC2oqULEzh91ERxkNys88HmBWAbPf
|
|
VTc7dZUxTC33RlI7CQLcFp6M6SljeZzQjp/+JGiwcxjkN1HGgIweyoH3yuCy
|
|
Q8voqIMyGt9tX3fmnBI8+jUoPn9VGWWbh1kbpuWBKPj78EKsMnIp1opaNslD
|
|
25lNWpzXlfGLfJiIXI48rAyYmIklKuNC9rRMxFF5MGp5HYn3lFHI6s+QAU0O
|
|
JvKvTcYVKaNYZufdq8WyoOq0o0qxW5lx3/MYcfOShhtypiuXepVRXQ1f++pI
|
|
w3z/ye1DfcrooPGHv5tFGiqPxOWnDzP0ED68pUlSYGHWn7xpUhkj3ximvK2Q
|
|
hMCdlz24mUi4ppgSGywpAQ0bPspOKpLQtXq6YF5yM1BbRu2MSSRsowa9yJoR
|
|
hZtxK8mPVEkY1tCZfq9GFOw4FfidtzJ4ebtBwFlRmP7rt9L3HwmzXduqX5Rv
|
|
ApExifZWYxKK3a1d6T0nAk6VLpEvPUnItn/L+W9rG2HKdcJf34eErLlqNIOu
|
|
jRAgef7cJz8SNjlGSc8WboSYEHeLpWASjk1K5sme2giFOn4yulEkfFY4aT3S
|
|
JAh/iy9V1KSScPLS4OSlvA0Q5cxeaHmPhPq1Z2QMIzfAepErD0bvk5Ae+vue
|
|
2YkNIOcbE8OZQ0KS3vdHChIbYJ9Ggo3xMxJqrbGFdCQJwM1n6fNtNSSsc+ig
|
|
DMmvB4njMmOn6ki4VCghZjLKDzn8WT3zDSQUbdn8lpLHDyWuOdUizST84sE7
|
|
bUrhh6/kJ/FHukgoPjyixqTLB6SHpZShnyRcl/fK0MmDF6oyOhxnhVXwP+89
|
|
3+eUuWDARPa4n6gKNu1ZCkz7zQlMy662f8RUMGVH1pX0ek7Ybc5pyi6jgoEe
|
|
etdeunBCHbOO9mZVFfxUtkLnf8YB9JP3ufUIFdxiHVE7Z8wOk/w/WetQBWfk
|
|
om25ZdmBv/y/VaM9KpjB41PtscgGZhvbflnuV8Fjr3xp6lls0F7D1utioYIe
|
|
tXPL3v9YoVvhbEG8swrWtbs0ulezwJ/W4ofCZ1TQoqBJ3eEuC0hcYH2Qek4F
|
|
X1vzvrnjxwL2nXeTsz1UsCNeWekbmQUGLreElwSp4Mt/TqKf7jDD92+ahwau
|
|
q6DjMDnvQQQTzD9c+731tQpeDsvlsuD+R3yzNsiILlXBDYXJQWkf/xJdbNf2
|
|
D5eroIHxk4NGqX+JcgexO7ffquCCJZN7J+UvESG6XedfowpKW5m2Xrf+Qwhc
|
|
PRvS1KuCqeyi//6ULxOU051MTiyq2KkWK+LYtEhICUs8qmRTxYm9MXxS6YuE
|
|
QM1Jc1FOVcyT1Hip4rVIzEnNZNJ4VZE3eeWLhvgiUfaJZ4+6sCq2p3vtZPNc
|
|
IPYb4OU1ZVV8tprRLkmeJ04p5nOnHlBFUwWBkOzOWSKo9thZJTNVXHzKaprx
|
|
bJaIdxKkPbdQxaTptW3j0bNERU5gHO2wKhosvh0+DrOEkNL+9f9OqKKR7bYN
|
|
H5/OEHVKo0IOfqpoV/lu4JraNNFbl+L7M0AVV1xTubMmp4hfziafAoJVsTY0
|
|
sZvInyKk814kJ4Sr4sI6ki0/aYoIUI4Qq4lRxbToBNcx5UlClSQto3RfFcmU
|
|
K8xP4AeBDW3hzzNVcZRTitzO9oOwdokaJLJV0TJi1N67aYK49HAy6/AjVQw2
|
|
mNQQPzxB9JIqFKNfqKI6z6LZtO84cV3FlvyzXhXfjHuLjTR8J2ZVE7Wez6gi
|
|
z7Y8YVLlCNFFR/2Nc6poY7T4pz5xhHjrNnXIZ0EVZUXn3MvOjBDXnxt6aq2o
|
|
YryPSmaSyAihqsP0pIyVjK+DBGv4fIaJk4ausjUiZIzdtVk2cdcQYfhDTE1h
|
|
Mxk/hvVXiIgOEWrXGojL4mR8IVbUPfxrkFhtlbfbJ0PGL6cNgm0eDRJpNt23
|
|
aSpkrNa5nXZ38yDRcXrfug5dMhaH2udLcg4Q5dwLYtuBjCfd6bRFWj+RlZ+l
|
|
cluPjD2jAeu2x/QTHtP/DGwMyGhUHyKtxdVP8Pm/vNh7kIyTpdHb1Hj6CIMo
|
|
2d8jJ8lom6dxTUuxlyjJ/jO4cJWM0vwx3V5FXYTWHp/fRrFk9FX7ltMS2kW8
|
|
Gvy5LuMaGdfnpjy/YdJFPJfq0za6SUa1yQsFWuOfiScpb6+lp5Hxt/GS8Trl
|
|
z0RG3OUd+wrI+HyulHXny05CirxqereQjA11k+wBVzqJe41+jrPPyTivHWTO
|
|
d7STSOVwuZH2moxTG3jUCNZOIincaHT6LRmpT1x18g53ENE+6xNS2sm4c/Da
|
|
A16BdoJr49XcyU4yfr8sKhsx1kZEFTFV7O5i/E/jm/C+d21E5NTst5+9ZKxM
|
|
VRQp824jQl06dPW+MfLT4hiu2fuR8LK7Mza+xPArvfvNalkrcWSvPO6UouDl
|
|
kQP1XjYfiH8dXPw1MhSUT9pCKhL+QGQ4TfUYyVMweX0408V2OvEtqtT/CImC
|
|
H+een2w1oxNejQefBapTUETkVAifBY2IMQ2RKjGg4KEO6c9sbo0Etf/ETzCk
|
|
4F9dA9U2jUai1X1fWb0xBTXHbilIrzQQIgmC1p/NKGhEezeqcbWByGp/eG3x
|
|
CAXP6ClNkR/XE2U2nX813SmMeVm+25+tjrAfL2uq8KSgcJu9Y93HWoIpKCNl
|
|
rw8F/cWW3S/fryUM0s5pWgZSUDurNOWgbi3R9pX5vPclCm6/m9i/EvSemDi5
|
|
pacomfH9iJvxY7w1hLjrldItbyk4Yusraun3lri+5rw9tpqCpXXd+Vcs3hIs
|
|
Nw2Kvr9n6PuCy+xb3xITxeyPMhop+GKrSP/bj1VEGVNkimA7Bf12ycYuV1US
|
|
R5LC/RdHKbhRyO3bk+IKolnJYc5ijII9OoanR/wriN2l4P5sgoKn5IIr7++o
|
|
IFT7Vp1dphl+JUi13qssJ5aVL1h3L1EQ+/XXpzWXESnlgdsreakoxNlRXMFe
|
|
SqwztS0S46ciP29zb2lzCRE+8B/VX4CKbfEeWuSUEsKFfUlBTZiKDVUCvc6U
|
|
EkL7oJ9QlhQVjex4i0lHXhOfhrzmLm+jYvExndOCTa8IYZ7zRQcOU/FxqF1o
|
|
0cJzInvPhaAZWyoe7fEzKah7TqhfuL4n0Y6Klbt7tMRTnhOmM4WdXSeoOFbm
|
|
cEpP9zkR9Wlh+dR5Kh7z7c97EF1ELGWF7Q66SMVl2zPyP7QLiajeeF7JSCru
|
|
YJM467e+kBASyeqoiqKiTLLErdrmZ4Ra9Htn9jhG/M4sFcVqz4gz7tyx8bep
|
|
KBxpWXH631Oie2die24+FXWWq64nlOQTLr7Zdw0LqCgQOwUs3vnEYsErp5+F
|
|
VJyI8FoS25JPCMp1/d5WTMUzPIfdidzHhDGXpMSbt1QsHIp8I5/+iKjoyHVs
|
|
76Ri5o1tbxXy8wgj/hKqXxcVW5NGq5zd84iufY2Loj1UfF9V/2eHZh4xX/bj
|
|
6rEBKibuVxq8XpVLUDPVno5PULF6mSbU3JtDVHTr+cVNUpEyfj3RNyeHMBI6
|
|
BFtnqBigeZ832y2HcL7i+9FngYqXhNr/xLPkEPNvo1I3LVGxPHSU7cCHbCJi
|
|
JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT
|
|
/wN9xxCi
|
|
"]]}, "Charting`Private`Tag#1"]}}, {}}, <|
|
|
"HighlightElements" -> <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>,
|
|
"LayoutOptions" -> <|
|
|
"PanelPlotLayout" -> <||>,
|
|
"PlotRange" -> {{0, 15}, {0., 0.22160540372702894`}},
|
|
"Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0},
|
|
"ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True},
|
|
"LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> {
|
|
Directive[
|
|
Opacity[1.],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]]},
|
|
"HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ),
|
|
"ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>,
|
|
"Primitives" -> {}, "GCFlag" -> False|>,
|
|
"Meta" -> <|
|
|
"DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" ->
|
|
Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]],
|
|
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
|
|
Axes->{True, True},
|
|
AxesLabel->{None, None},
|
|
AxesOrigin->{0, 0},
|
|
DisplayFunction->Identity,
|
|
Frame->{{False, False}, {False, False}},
|
|
FrameLabel->{{None, None}, {None, None}},
|
|
FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
|
|
GridLines->{None, None},
|
|
GridLinesStyle->Directive[
|
|
GrayLevel[0.5, 0.4]],
|
|
ImagePadding->All,
|
|
Method->{
|
|
"DefaultBoundaryStyle" -> Automatic,
|
|
"DefaultGraphicsInteraction" -> {
|
|
"Version" -> 1.2, "TrackMousePosition" -> {True, False},
|
|
"Effects" -> {
|
|
"Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
|
|
"Droplines" -> {
|
|
"freeformCursorMode" -> True,
|
|
"placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" ->
|
|
AbsolutePointSize[6], "ScalingFunctions" -> None,
|
|
"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
|
|
(Identity[#]& )[
|
|
Part[#, 1]],
|
|
(Identity[#]& )[
|
|
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
|
|
(Identity[#]& )[
|
|
Part[#, 1]],
|
|
(Identity[#]& )[
|
|
Part[#, 2]]}& )}},
|
|
PlotRange->{{0, 15}, {0., 0.22160540372702894`}},
|
|
PlotRangeClipping->True,
|
|
PlotRangePadding->{{
|
|
Scaled[0.02],
|
|
Scaled[0.02]}, {
|
|
Scaled[0.05],
|
|
Scaled[0.05]}},
|
|
Ticks->{Automatic, Automatic}]], "Output",
|
|
CellChangeTimes->{3.9913381496467495`*^9},
|
|
CellLabel->
|
|
"Out[304]=",ExpressionUUID->"ba3a3065-c61d-5943-9ee3-286e0d374549"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"Show", "[",
|
|
RowBox[{"x", ",", "xx"}], "]"}]], "Input",
|
|
CellChangeTimes->{{3.991714856368782*^9, 3.9917149167980614`*^9}, {
|
|
3.991795329890896*^9,
|
|
3.99179533223897*^9}},ExpressionUUID->"936846c9-ebd9-0340-9945-\
|
|
b210a517ddeb"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"Show", "gcomb",
|
|
"\"Could not combine the graphics objects in \
|
|
\\!\\(\\*RowBox[{\\\"Show\\\", \\\"[\\\", RowBox[{\\\"x130\\\", \\\",\\\", \
|
|
GraphicsBox[List[List[], List[List[TagBox[List[Skeleton[2]], \
|
|
Function[Annotation[Slot[1], \\\"Charting`Private`Tag#1\\\"]]]]], \
|
|
List[List[], List[]]], List[Rule[DisplayFunction, Identity], \
|
|
Rule[DisplayFunction, Identity], Rule[DisplayFunction, Identity], \
|
|
Rule[AspectRatio, NCache[Power[GoldenRatio, -1], 0.6180339887498948`]], \
|
|
Rule[Axes, List[True, True]], Rule[AxesLabel, List[None, None]], \
|
|
Rule[AxesOrigin, List[0, 0]], RuleDelayed[DisplayFunction, Identity], \
|
|
Rule[Frame, List[List[False, False], List[False, False]]], Rule[FrameLabel, \
|
|
List[List[None, None], List[None, None]]], Rule[FrameTicks, \
|
|
List[List[Automatic, Automatic], List[Automatic, Automatic]]], \
|
|
Rule[GridLines, List[None, None]], Rule[GridLinesStyle, \
|
|
Directive[GrayLevel[0.5`, 0.4`]]], Rule[Method, \
|
|
List[Rule[\\\"AxisPadding\\\", Scaled[0.02`]], \
|
|
Rule[\\\"DefaultBoundaryStyle\\\", Automatic], \
|
|
Rule[\\\"DefaultGraphicsInteraction\\\", List[Rule[Skeleton[2]], \
|
|
Rule[Skeleton[2]], Rule[Skeleton[2]]]], Rule[\\\"DefaultMeshStyle\\\", \
|
|
AbsolutePointSize[6]], Rule[\\\"DefaultPlotStyle\\\", \
|
|
List[Directive[Skeleton[2]], Directive[Skeleton[2]], Directive[Skeleton[2]], \
|
|
Directive[Skeleton[2]], Directive[Skeleton[2]], Directive[Skeleton[2]], \
|
|
Directive[Skeleton[2]], Directive[Skeleton[2]], Directive[Skeleton[2]], \
|
|
Directive[Skeleton[2]], Directive[Skeleton[2]], Directive[Skeleton[2]], \
|
|
Directive[Skeleton[2]], Directive[Skeleton[2]], Directive[Skeleton[2]]]], \
|
|
Rule[\\\"DomainPadding\\\", Scaled[0.02`]], Rule[\\\"PointSizeFunction\\\", \
|
|
\\\"SmallPointSize\\\"], Rule[\\\"RangePadding\\\", Scaled[0.05`]], \
|
|
Rule[\\\"OptimizePlotMarkers\\\", True], Rule[\\\"IncludeHighlighting\\\", \\\
|
|
\"CurrentPoint\\\"], Rule[\\\"HighlightStyle\\\", Automatic], \
|
|
Rule[\\\"OptimizePlotMarkers\\\", True], Rule[\\\"CoordinatesToolOptions\\\", \
|
|
List[Rule[Skeleton[2]], Rule[Skeleton[2]]]]]], Rule[PlotRange, List[List[0, \
|
|
52.`], List[0, 0.120683`]]], Rule[PlotRangeClipping, True], \
|
|
Rule[PlotRangePadding, List[List[Scaled[0.02`], Scaled[0.02`]], \
|
|
List[Scaled[0.02`], Scaled[0.05`]]]], Rule[Ticks, List[Automatic, \
|
|
Automatic]]]]}], \\\"]\\\"}]\\).\"", 2, 532, 171, 24485846962764810879,
|
|
"Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{{3.9917148948888054`*^9, 3.991714918948065*^9}},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[532]:=",ExpressionUUID->"2b65c8b7-2b0d-7840-9c22-f596c7681ee5"],
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"Show", "[",
|
|
RowBox[{"x130", ",",
|
|
GraphicsBox[{{},
|
|
InterpretationBox[{
|
|
TagBox[
|
|
TagBox[
|
|
{RGBColor[0.368417, 0.506779, 0.709798], PointSize[
|
|
0.011000000000000001`], AbsoluteThickness[2],
|
|
PointBox[CompressedData["
|
|
1:eJxTTMoPSmViYGAwBWIQDQNKeX6qzA5T7SG8D/amib9PSsivg/IZHJZPW/vV
|
|
1Wk7lM/hwHVn1+zlVnugfAEHySd6h0Se7oPyRRy2/nq1ykEXxpdwsL2qaH6Y
|
|
F6ZexiG6yuTq5J8w8xQcwpLmTd3yaDOUr+Rg0TqVS2sVzH4Vh/kKG+/aOiyH
|
|
8tUcEv+YvDubvwDK13B48SOj8JjBdChfy2ERx8rbN8P7oHwdB80ta34fd2qB
|
|
8vUcdkyNm907tQLKN3Dwn9LicutYPpRv6HAtb/eFmOWJUL6Rw9aCyNazDOFQ
|
|
vrHDpJcXXlaau0H5Jg6ZsqG+AqX2UL6pA/+1/5ZnpqtD+WYOZuVf9sd0q0H5
|
|
5g66zjKvH5n9soPwLRxkVFx+NokJQeUtHRhQgJXDrzm7Y/V9GaHy1mjyNg4f
|
|
Mx53bP3xBWqeLZq8nQPrIvXUIOfXUHl7NHkHh5AnAoXFWjch8g0OaPKOUPmT
|
|
UHlHNHknh963Wxd8P7YBKu+EJu+MJu+MJu+CJu+CJu+Kym9A4zO4ocmj8Rnc
|
|
0eTR+AweaPJofAZPNHk0PoMXnA8AFc+iCQ==
|
|
"]]},
|
|
Annotation[#, "Charting`Private`Tag#1"]& ],
|
|
{"WolframDynamicHighlight", <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}],
|
|
StyleBox[
|
|
DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {},
|
|
Slot["HighlightElements"],
|
|
Slot["LayoutOptions"],
|
|
Slot["Meta"],
|
|
Charting`HighlightActionFunction["DynamicHighlight", {{
|
|
Annotation[{
|
|
Directive[
|
|
PointSize[0.011000000000000001`],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]],
|
|
Point[CompressedData["
|
|
1:eJxTTMoPSmViYGAwBWIQDQNKeX6qzA5T7SG8D/amib9PSsivg/IZHJZPW/vV
|
|
1Wk7lM/hwHVn1+zlVnugfAEHySd6h0Se7oPyRRy2/nq1ykEXxpdwsL2qaH6Y
|
|
F6ZexiG6yuTq5J8w8xQcwpLmTd3yaDOUr+Rg0TqVS2sVzH4Vh/kKG+/aOiyH
|
|
8tUcEv+YvDubvwDK13B48SOj8JjBdChfy2ERx8rbN8P7oHwdB80ta34fd2qB
|
|
8vUcdkyNm907tQLKN3Dwn9LicutYPpRv6HAtb/eFmOWJUL6Rw9aCyNazDOFQ
|
|
vrHDpJcXXlaau0H5Jg6ZsqG+AqX2UL6pA/+1/5ZnpqtD+WYOZuVf9sd0q0H5
|
|
5g66zjKvH5n9soPwLRxkVFx+NokJQeUtHRhQgJXDrzm7Y/V9GaHy1mjyNg4f
|
|
Mx53bP3xBWqeLZq8nQPrIvXUIOfXUHl7NHkHh5AnAoXFWjch8g0OaPKOUPmT
|
|
UHlHNHknh963Wxd8P7YBKu+EJu+MJu+MJu+CJu+CJu+Kym9A4zO4ocmj8Rnc
|
|
0eTR+AweaPJofAZPNHk0PoMXnA8AFc+iCQ==
|
|
"]]}, "Charting`Private`Tag#1"]}}, <|
|
|
"HighlightElements" -> <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>,
|
|
"LayoutOptions" -> <|
|
|
"PanelPlotLayout" -> <||>,
|
|
"PlotRange" -> {{0, 52.}, {0, 0.120683}},
|
|
"Frame" -> {{False, False}, {False, False}},
|
|
"AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio},
|
|
"Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" ->
|
|
GoldenRatio^(-1), "DefaultStyle" -> {
|
|
Directive[
|
|
PointSize[0.011000000000000001`],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]]},
|
|
"HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ),
|
|
"ScalingFunctions" -> {{Identity, Identity}, {
|
|
Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" ->
|
|
False|>,
|
|
"Meta" -> <|
|
|
"DefaultHighlight" -> {"Dynamic", None}, "Index" -> {},
|
|
"Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<|
|
|
"HighlightElements" -> <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>,
|
|
"LayoutOptions" -> <|
|
|
"PanelPlotLayout" -> <||>,
|
|
"PlotRange" -> {{0, 52.}, {0, 0.120683}},
|
|
"Frame" -> {{False, False}, {False, False}},
|
|
"AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio},
|
|
"Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" ->
|
|
GoldenRatio^(-1), "DefaultStyle" -> {
|
|
Directive[
|
|
PointSize[0.011000000000000001`],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]]},
|
|
"HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ),
|
|
"ScalingFunctions" -> {{Identity, Identity}, {
|
|
Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" ->
|
|
False|>,
|
|
"Meta" -> <|
|
|
"DefaultHighlight" -> {"Dynamic", None}, "Index" -> {},
|
|
"Function" -> ListPlot, "GroupHighlight" -> False|>|>],
|
|
ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, {
|
|
4.503599627370496*^15, -4.503599627370496*^15}}],
|
|
Selectable->False]},
|
|
Annotation[{{
|
|
Annotation[{
|
|
Directive[
|
|
PointSize[0.011000000000000001`],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]],
|
|
Point[CompressedData["
|
|
1:eJxTTMoPSmViYGAwBWIQDQNKeX6qzA5T7SG8D/amib9PSsivg/IZHJZPW/vV
|
|
1Wk7lM/hwHVn1+zlVnugfAEHySd6h0Se7oPyRRy2/nq1ykEXxpdwsL2qaH6Y
|
|
F6ZexiG6yuTq5J8w8xQcwpLmTd3yaDOUr+Rg0TqVS2sVzH4Vh/kKG+/aOiyH
|
|
8tUcEv+YvDubvwDK13B48SOj8JjBdChfy2ERx8rbN8P7oHwdB80ta34fd2qB
|
|
8vUcdkyNm907tQLKN3Dwn9LicutYPpRv6HAtb/eFmOWJUL6Rw9aCyNazDOFQ
|
|
vrHDpJcXXlaau0H5Jg6ZsqG+AqX2UL6pA/+1/5ZnpqtD+WYOZuVf9sd0q0H5
|
|
5g66zjKvH5n9soPwLRxkVFx+NokJQeUtHRhQgJXDrzm7Y/V9GaHy1mjyNg4f
|
|
Mx53bP3xBWqeLZq8nQPrIvXUIOfXUHl7NHkHh5AnAoXFWjch8g0OaPKOUPmT
|
|
UHlHNHknh963Wxd8P7YBKu+EJu+MJu+MJu+CJu+CJu+Kym9A4zO4ocmj8Rnc
|
|
0eTR+AweaPJofAZPNHk0PoMXnA8AFc+iCQ==
|
|
"]]}, "Charting`Private`Tag#1"]}}, <|
|
|
"HighlightElements" -> <|
|
|
"Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>,
|
|
"LayoutOptions" -> <|
|
|
"PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 52.}, {0, 0.120683}},
|
|
"Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0},
|
|
"ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True},
|
|
"LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1),
|
|
"DefaultStyle" -> {
|
|
Directive[
|
|
PointSize[0.011000000000000001`],
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]]},
|
|
"HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ),
|
|
"ScalingFunctions" -> {{Identity, Identity}, {
|
|
Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>,
|
|
"Meta" -> <|
|
|
"DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" ->
|
|
ListPlot, "GroupHighlight" -> False|>|>,
|
|
"DynamicHighlight"]], {{}, {}}},
|
|
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
|
|
Axes->{True, True},
|
|
AxesLabel->{None, None},
|
|
AxesOrigin->{0, 0},
|
|
DisplayFunction->Identity,
|
|
Frame->{{False, False}, {False, False}},
|
|
FrameLabel->{{None, None}, {None, None}},
|
|
FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
|
|
GridLines->{None, None},
|
|
GridLinesStyle->Directive[
|
|
GrayLevel[0.5, 0.4]],
|
|
Method->{
|
|
"AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic,
|
|
"DefaultGraphicsInteraction" -> {
|
|
"Version" -> 1.2, "TrackMousePosition" -> {True, False},
|
|
"Effects" -> {
|
|
"Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
|
|
"Droplines" -> {
|
|
"freeformCursorMode" -> True,
|
|
"placement" -> {"x" -> "All", "y" -> "None"}}}},
|
|
"DefaultMeshStyle" -> AbsolutePointSize[6], "DefaultPlotStyle" -> {
|
|
Directive[
|
|
RGBColor[0.368417, 0.506779, 0.709798],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.880722, 0.611041, 0.142051],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.560181, 0.691569, 0.194885],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.922526, 0.385626, 0.209179],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.528488, 0.470624, 0.701351],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.772079, 0.431554, 0.102387],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.363898, 0.618501, 0.782349],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[1, 0.75, 0],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.647624, 0.37816, 0.614037],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.571589, 0.586483, 0.],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.915, 0.3325, 0.2125],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.40082222609352647`, 0.5220066643438841, 0.85],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.9728288904374106, 0.621644452187053, 0.07336199581899142],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.736782672705901, 0.358, 0.5030266573755369],
|
|
AbsoluteThickness[2]],
|
|
Directive[
|
|
RGBColor[0.28026441037696703`, 0.715, 0.4292089322474965],
|
|
AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02],
|
|
"PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05],
|
|
"OptimizePlotMarkers" -> True, "IncludeHighlighting" -> "CurrentPoint",
|
|
"HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True,
|
|
"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
|
|
Identity[
|
|
Part[#, 1]],
|
|
Identity[
|
|
Part[#, 2]]}& )}},
|
|
PlotRange->{{0, 52.}, {0, 0.120683}},
|
|
PlotRangeClipping->True,
|
|
PlotRangePadding->{{
|
|
Scaled[0.02],
|
|
Scaled[0.02]}, {
|
|
Scaled[0.02],
|
|
Scaled[0.05]}},
|
|
Ticks->{Automatic, Automatic}]}], "]"}]], "Output",
|
|
CellChangeTimes->{{3.9917148949168243`*^9, 3.991714918978077*^9}},
|
|
CellLabel->
|
|
"Out[532]=",ExpressionUUID->"e2584817-ac95-084f-bbb3-4911b5281f79"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
FractionBox[
|
|
RowBox[{"4", "*", "x", "*", "x", "*", "y", "*", "\[Pi]", "*",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
UnderoverscriptBox["\[Sum]",
|
|
RowBox[{"n", "=", "0"}], "100"],
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
RowBox[{"2",
|
|
RowBox[{"(",
|
|
FractionBox["h2", "Cb"], ")"}], "*", "x", "*", "y"}], "2"],
|
|
")"}],
|
|
RowBox[{"2", "*", "n"}]], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox["1",
|
|
RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], ")"}]}],
|
|
RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(", "x", ")"}], "2"], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
RowBox[{"y", "*", "y"}], "1"]}],
|
|
RowBox[{"(",
|
|
FractionBox["1", "Cb"], ")"}]}]],
|
|
RowBox[{"\[DifferentialD]", "y"}],
|
|
RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input",
|
|
CellLabel->
|
|
"In[308]:=",ExpressionUUID->"2b7767f9-449f-c646-ae0c-43037957b685"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"5.611115182999938`*^-175\\\", \
|
|
\\\"65057412219066675752453169974731864698669050632262085573439989315594807001\
|
|
54550540918463145870938904834370174976000000000000000000000000\\\"]\\) is too \
|
|
small to represent as a normalized machine number; precision may be lost.\"",
|
|
2, 308, 309, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.99133920579224*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[308]:=",ExpressionUUID->"b8ddd204-96bd-c44c-a461-fca25ce38083"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"2.5007447195984937`*^-178\\\", \
|
|
\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\
|
|
734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \
|
|
too small to represent as a normalized machine number; precision may be lost.\
|
|
\"", 2, 308, 310, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913392058022385`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[308]:=",ExpressionUUID->"4d331042-6820-214d-a3a7-faad1e0acd9a"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"1.1145242877114216`*^-181\\\", \
|
|
\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\
|
|
116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \
|
|
is too small to represent as a normalized machine number; precision may be \
|
|
lost.\"", 2, 308, 311, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991339205811241*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[308]:=",ExpressionUUID->"2b7f80c1-4d86-8c41-ad69-d2816819dae8"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "stop",
|
|
"\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \
|
|
\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
|
|
during this calculation.\"", 2, 308, 312, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913392058197193`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[308]:=",ExpressionUUID->"39d74612-fbdc-ff40-a7d1-fc3dfa4019c6"],
|
|
|
|
Cell[BoxData["9.33220071900515`"], "Output",
|
|
CellChangeTimes->{3.9913392124888554`*^9},
|
|
CellLabel->
|
|
"Out[308]=",ExpressionUUID->"5f3f7d29-276c-ce44-8205-70c169040bde"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"q", "=",
|
|
RowBox[{
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
FractionBox["1",
|
|
RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]],
|
|
RowBox[{"(",
|
|
RowBox[{"4", "x", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"x", "-", "J1"}], ")"}], "*",
|
|
RowBox[{"(",
|
|
RowBox[{"y", "-", "J2"}], ")"}], "*", "y", "*", "\[Pi]", "*",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
UnderoverscriptBox["\[Sum]",
|
|
RowBox[{"n", "=", "0"}], "100"],
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
RowBox[{"2",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox["1", "Cw"]}], "+",
|
|
FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}],
|
|
"2"], ")"}],
|
|
RowBox[{"2", "*", "n"}]], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox["1",
|
|
RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}],
|
|
")"}]}], ")"}], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(", "x", ")"}], "2"], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
RowBox[{"y", "*", "y"}], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]],
|
|
RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}],
|
|
RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input",
|
|
CellChangeTimes->{{3.99184628914184*^9,
|
|
3.9918462932986107`*^9}},ExpressionUUID->"8304a1af-5a77-304f-9cc7-\
|
|
82724e2b3df7"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"1.5023512908051311`*^-195\\\", \
|
|
\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\
|
|
098005054611040868761600000000000000000000\\\"]\\) is too small to represent \
|
|
as a normalized machine number; precision may be lost.\"", 2, 309, 313,
|
|
24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913392125258827`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[309]:=",ExpressionUUID->"4fd30c53-5c63-3547-b8da-55deec45ffe9"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"8.739446301903759`*^-200\\\", \
|
|
\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\
|
|
358493165635789279094374400000000000000000000\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 309,
|
|
314, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991339212535879*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[309]:=",ExpressionUUID->"94d8d63e-6d20-a549-87b6-9bb940b1a184"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"5.083892304770298`*^-204\\\", \
|
|
\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\
|
|
4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 309,
|
|
315, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913392125438805`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[309]:=",ExpressionUUID->"94cf357c-30eb-ce43-bfa6-645e621ccaab"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "stop",
|
|
"\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \
|
|
\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
|
|
during this calculation.\"", 2, 309, 316, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913392125518837`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[309]:=",ExpressionUUID->"6c01af9f-f680-4741-8cf0-c5de4c3f5776"],
|
|
|
|
Cell[BoxData["0.41157157699018565`"], "Output",
|
|
CellChangeTimes->{3.9913392196090164`*^9},
|
|
CellLabel->
|
|
"Out[309]=",ExpressionUUID->"c62861b9-4f65-8643-97a2-f7acbf90accd"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"S1", "=",
|
|
RowBox[{
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
FractionBox["1",
|
|
RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]],
|
|
RowBox[{"(",
|
|
RowBox[{"4", "x", "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]",
|
|
"*",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
UnderoverscriptBox["\[Sum]",
|
|
RowBox[{"n", "=", "0"}], "100"],
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
RowBox[{"2",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox["1", "Cw"]}], "+",
|
|
FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}],
|
|
"2"], ")"}],
|
|
RowBox[{"2", "*", "n"}]], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox["1",
|
|
RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}],
|
|
")"}]}], ")"}], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(", "x", ")"}], "2"], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
RowBox[{"y", "*", "y"}], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]],
|
|
RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}],
|
|
RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input",
|
|
CellChangeTimes->{{3.9918462963096733`*^9,
|
|
3.991846299126808*^9}},ExpressionUUID->"3ed977a3-b24a-0644-a438-\
|
|
d2ebbf0c1dea"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"1.5023512908051311`*^-195\\\", \
|
|
\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\
|
|
098005054611040868761600000000000000000000\\\"]\\) is too small to represent \
|
|
as a normalized machine number; precision may be lost.\"", 2, 310, 317,
|
|
24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913392196440163`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[310]:=",ExpressionUUID->"2222d8d9-5ab2-9842-a5d2-c83e0de9e07d"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"8.739446301903759`*^-200\\\", \
|
|
\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\
|
|
358493165635789279094374400000000000000000000\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 310,
|
|
318, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913392196535416`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[310]:=",ExpressionUUID->"f866d339-6477-0c45-9660-98eca56f0e20"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"5.083892304770298`*^-204\\\", \
|
|
\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\
|
|
4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 310,
|
|
319, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991339219661541*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[310]:=",ExpressionUUID->"ac7b6c07-69b3-8847-9707-6d5a111d812d"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "stop",
|
|
"\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \
|
|
\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
|
|
during this calculation.\"", 2, 310, 320, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991339219670542*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[310]:=",ExpressionUUID->"11ccb074-812f-ce43-be93-ac274425113d"],
|
|
|
|
Cell[BoxData["3.215201591157595`"], "Output",
|
|
CellChangeTimes->{3.9913392268711624`*^9},
|
|
CellLabel->
|
|
"Out[310]=",ExpressionUUID->"e407b037-0c43-434a-ae6e-d9d9cac64d0c"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"S2", "=",
|
|
RowBox[{
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"],
|
|
RowBox[{
|
|
FractionBox["1",
|
|
RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]],
|
|
RowBox[{"(",
|
|
RowBox[{"4", "x", "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]",
|
|
"*",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
UnderoverscriptBox["\[Sum]",
|
|
RowBox[{"n", "=", "0"}], "100"],
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
RowBox[{"2",
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox["1", "Cw"]}], "+",
|
|
FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}],
|
|
"2"], ")"}],
|
|
RowBox[{"2", "*", "n"}]], "*",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
FractionBox["1",
|
|
RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}],
|
|
")"}]}], ")"}], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(", "x", ")"}], "2"], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*",
|
|
SuperscriptBox["\[ExponentialE]",
|
|
RowBox[{
|
|
RowBox[{"-",
|
|
FractionBox[
|
|
RowBox[{"y", "*", "y"}], "1"]}],
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
FractionBox["1", "Cw"], "+",
|
|
FractionBox[
|
|
RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]],
|
|
RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}],
|
|
RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input",
|
|
CellChangeTimes->{{3.991846303469427*^9,
|
|
3.991846306205721*^9}},ExpressionUUID->"0a258b12-85fc-2a47-9b1a-\
|
|
8264aa20d65c"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"1.5023512908051311`*^-195\\\", \
|
|
\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\
|
|
098005054611040868761600000000000000000000\\\"]\\) is too small to represent \
|
|
as a normalized machine number; precision may be lost.\"", 2, 311, 321,
|
|
24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991339226907137*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[311]:=",ExpressionUUID->"51fd61ee-1a5d-9048-806e-e5a8ccbc9ee8"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"8.739446301903759`*^-200\\\", \
|
|
\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\
|
|
358493165635789279094374400000000000000000000\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 311,
|
|
322, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.991339226917137*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[311]:=",ExpressionUUID->"b60547f8-8180-8e42-a50a-2f95a9bbb448"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "munfl",
|
|
"\"\\!\\(\\*FractionBox[\\\"5.083892304770298`*^-204\\\", \
|
|
\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\
|
|
4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \
|
|
represent as a normalized machine number; precision may be lost.\"", 2, 311,
|
|
323, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913392269251385`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[311]:=",ExpressionUUID->"e6102528-f151-984e-9d65-5e941faf5653"],
|
|
|
|
Cell[BoxData[
|
|
TemplateBox[{
|
|
"General", "stop",
|
|
"\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \
|
|
\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
|
|
during this calculation.\"", 2, 311, 324, 24483298974280422597, "Local"},
|
|
"MessageTemplate"]], "Message", "MSG",
|
|
CellChangeTimes->{3.9913392269341373`*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[311]:=",ExpressionUUID->"5973ee85-238a-1f47-b298-fa05fe19e0b7"],
|
|
|
|
Cell[BoxData["16.94395627212904`"], "Output",
|
|
CellChangeTimes->{3.9913392304284153`*^9},
|
|
CellLabel->
|
|
"Out[311]=",ExpressionUUID->"1b8a1f16-b0cf-1c4c-bae9-5db73555a85f"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
FractionBox["q",
|
|
SqrtBox[
|
|
RowBox[{"S1", "*", "S2"}]]]], "Input",
|
|
CellChangeTimes->{{3.991846309734665*^9,
|
|
3.991846313322897*^9}},ExpressionUUID->"1cb0d12f-90a8-b449-9dd4-\
|
|
8435ee411a7c"],
|
|
|
|
Cell[BoxData["0.05576142449710889`"], "Output",
|
|
CellChangeTimes->{3.9913392304624157`*^9},
|
|
CellLabel->
|
|
"Out[312]=",ExpressionUUID->"afcb3269-c8ab-6a44-9d7c-8a434189e156"]
|
|
}, Open ]]
|
|
},
|
|
WindowSize->{718.5, 729.75},
|
|
WindowMargins->{{Automatic, 0}, {Automatic, 0}},
|
|
CellContext->Notebook,
|
|
FrontEndVersion->"14.1 for Microsoft Windows (64-bit) (July 16, 2024)",
|
|
StyleDefinitions->"Default.nb",
|
|
ExpressionUUID->"1d8c20c2-003a-2a4c-a42e-33895f032914"
|
|
]
|
|
(* End of Notebook Content *)
|
|
|
|
(* Internal cache information *)
|
|
(*CellTagsOutline
|
|
CellTagsIndex->{}
|
|
*)
|
|
(*CellTagsIndex
|
|
CellTagsIndex->{}
|
|
*)
|
|
(*NotebookFileOutline
|
|
Notebook[{
|
|
Cell[554, 20, 149, 4, 28, "Input",ExpressionUUID->"e6c462cd-8982-3c4a-8614-a4032c2a753f"],
|
|
Cell[706, 26, 154, 3, 28, "Input",ExpressionUUID->"abfd70d0-05dc-ae40-8117-a301872389cf"],
|
|
Cell[863, 31, 149, 4, 28, "Input",ExpressionUUID->"ab6f3c19-7b16-eb44-924b-0479fa42666f"],
|
|
Cell[1015, 37, 152, 3, 28, "Input",ExpressionUUID->"6e63ff1c-fb16-304a-8e59-6a9d82a9fa7a"],
|
|
Cell[CellGroupData[{
|
|
Cell[1192, 44, 1301, 43, 113, "Input",ExpressionUUID->"764f2b72-583f-404a-86dd-302e46704fa0"],
|
|
Cell[2496, 89, 178, 3, 32, "Output",ExpressionUUID->"a1ad1275-791c-2c4f-89d0-0191b45c7ed9"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[2711, 97, 913, 30, 56, "Input",ExpressionUUID->"296c29c6-b9f9-1d4a-99c7-5d23057d1dfa"],
|
|
Cell[3627, 129, 175, 3, 32, "Output",ExpressionUUID->"3e2faead-b69d-5c48-9979-35e754d12d58"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[3839, 137, 961, 32, 56, "Input",ExpressionUUID->"da02f8be-1800-4945-83f1-7acaa76423f4"],
|
|
Cell[4803, 171, 177, 3, 32, "Output",ExpressionUUID->"4f5ae42d-c740-c045-be91-9f9e31eab3b6"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[5017, 179, 558, 19, 52, "Input",ExpressionUUID->"c6346807-3d42-e948-8c5a-115ea1f6a2c2"],
|
|
Cell[5578, 200, 173, 3, 32, "Output",ExpressionUUID->"2bcde3f6-d18f-c142-963c-217812e9dc72"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[5788, 208, 623, 21, 52, "Input",ExpressionUUID->"474c5dd1-c344-a04c-8714-ada3650bf998"],
|
|
Cell[6414, 231, 170, 3, 32, "Output",ExpressionUUID->"482feae7-b6d8-8143-b572-b9146e6d2e0c"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[6621, 239, 170, 5, 56, "Input",ExpressionUUID->"2305be88-628a-524a-b468-85b3cc42efc7"],
|
|
Cell[6794, 246, 173, 3, 32, "Output",ExpressionUUID->"1c1deb9e-a6ca-0143-8db8-21cdffc73907"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[7004, 254, 170, 5, 55, "Input",ExpressionUUID->"426f7e1e-7abd-a446-8679-e422e283f98f"],
|
|
Cell[7177, 261, 170, 3, 32, "Output",ExpressionUUID->"ae59e030-d7e1-1a4a-8ffb-9ecfb821ce05"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[7384, 269, 181, 5, 43, "Input",ExpressionUUID->"933badd0-5ce1-e645-bb03-d046b1312945"],
|
|
Cell[7568, 276, 171, 3, 32, "Output",ExpressionUUID->"c953f025-a342-2549-9fa6-f90bea449e4f"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[7776, 284, 181, 5, 43, "Input",ExpressionUUID->"2d8a17a7-6a4c-d94e-b0e2-4da7c60ebbeb"],
|
|
Cell[7960, 291, 173, 3, 32, "Output",ExpressionUUID->"6e8c23f5-f692-db4e-8373-e6c78b3e7fda"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[8170, 299, 6055, 185, 498, "Input",ExpressionUUID->"042e7197-09fd-dc46-b3fd-dc1740a81970"],
|
|
Cell[14228, 486, 175, 3, 32, "Output",ExpressionUUID->"d074617c-8fe0-114b-b207-70158bd6cc83"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[14440, 494, 368, 9, 42, "Input",ExpressionUUID->"bccf6e25-da00-4449-8f0f-f2b61c58f67f"],
|
|
Cell[14811, 505, 170, 3, 32, "Output",ExpressionUUID->"cdd7cedd-6455-ac4a-8fce-733ce51f863b"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[15018, 513, 6122, 187, 500, "Input",ExpressionUUID->"9f9260b3-ca67-3f4a-a0c4-5bf2cb98e110"],
|
|
Cell[21143, 702, 175, 3, 32, "Output",ExpressionUUID->"aa72f32c-329c-9c4a-b6f4-833dbea197c6"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[21355, 710, 368, 9, 42, "Input",ExpressionUUID->"52f82243-9920-3742-90e6-48395671d171"],
|
|
Cell[21726, 721, 172, 3, 32, "Output",ExpressionUUID->"e26071fd-e2c1-5f40-9a42-81481b4dd96b"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[21935, 729, 2663, 88, 187, "Input",ExpressionUUID->"a147c908-551b-8647-9cf0-48614f0cb274"],
|
|
Cell[24601, 819, 173, 3, 32, "Output",ExpressionUUID->"88673969-cab9-0b40-80f0-7c0bcdf60439"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[24811, 827, 2603, 85, 165, "Input",ExpressionUUID->"4c078cff-433d-8245-900f-0a3b49ecb9e6"],
|
|
Cell[27417, 914, 172, 3, 32, "Output",ExpressionUUID->"bfe4c50a-d3a5-244b-8f56-30e5a15018a1"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[27626, 922, 3712, 118, 348, "Input",ExpressionUUID->"f07c74eb-272f-1743-a996-1dc503a54262"],
|
|
Cell[31341, 1042, 174, 3, 32, "Output",ExpressionUUID->"857149a1-8aab-954b-86f3-2a3228e46ae1"]
|
|
}, Open ]],
|
|
Cell[31530, 1048, 138, 3, 42, "Input",ExpressionUUID->"c5ebf9ff-e333-7b4d-b8d5-46482917dc06"],
|
|
Cell[CellGroupData[{
|
|
Cell[31693, 1055, 2052, 59, 228, "Input",ExpressionUUID->"e7569d02-bed5-3743-8058-837bf8cfd65c"],
|
|
Cell[33748, 1116, 524, 11, 60, "Message",ExpressionUUID->"3a1412e4-c6f1-e745-8a72-cd3619617eb0"],
|
|
Cell[34275, 1129, 526, 11, 60, "Message",ExpressionUUID->"413e4690-bb6f-134e-9c1c-5e19bdbe37ff"],
|
|
Cell[34804, 1142, 530, 11, 60, "Message",ExpressionUUID->"557c737f-44e5-b047-9b96-8c222633e876"],
|
|
Cell[35337, 1155, 455, 10, 26, "Message",ExpressionUUID->"0989ac4b-acdb-9949-b4d2-70d1b9f65dbd"],
|
|
Cell[35795, 1167, 172, 3, 32, "Output",ExpressionUUID->"0cfc830e-08fa-4f4b-aef5-0a6c70777af2"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[36004, 1175, 2054, 59, 228, "Input",ExpressionUUID->"71739d4a-f3fc-9d4f-b803-99b4407cdc6f"],
|
|
Cell[38061, 1236, 524, 11, 60, "Message",ExpressionUUID->"726ccd2e-9850-144f-ac6f-a8db23e40300"],
|
|
Cell[38588, 1249, 526, 11, 60, "Message",ExpressionUUID->"d5c6080a-ef9c-5541-93e6-fcef34fc5c6b"],
|
|
Cell[39117, 1262, 528, 11, 60, "Message",ExpressionUUID->"a5735bd1-5fc2-3c47-a19f-be9d8c805502"],
|
|
Cell[39648, 1275, 456, 10, 26, "Message",ExpressionUUID->"1dd8474a-97c2-3246-8ead-1536370ac767"],
|
|
Cell[40107, 1287, 170, 3, 32, "Output",ExpressionUUID->"96c807db-2e4e-1f4a-822d-d2a69cd27982"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[40314, 1295, 1936, 53, 115, "Input",ExpressionUUID->"762274ee-d7cb-9644-9b5c-516685cd7481"],
|
|
Cell[42253, 1350, 19981, 375, 230, "Output",ExpressionUUID->"925ecd2b-bb46-b241-b0ae-91df536967b1"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[62271, 1730, 2118, 60, 211, "Input",ExpressionUUID->"c4af1473-2d54-b047-b3e2-18c19d38cfdd"],
|
|
Cell[64392, 1792, 490, 11, 60, "Message",ExpressionUUID->"9c0b88be-018b-9b49-8992-9f69ff2c8721"],
|
|
Cell[64885, 1805, 493, 11, 60, "Message",ExpressionUUID->"0dc889c7-e5c7-5d48-8218-94f8d4104b1d"],
|
|
Cell[65381, 1818, 508, 11, 27, "Message",ExpressionUUID->"e3ce988d-52a1-6c46-93b1-24547de7012f"],
|
|
Cell[65892, 1831, 456, 10, 26, "Message",ExpressionUUID->"1ec64821-f1c6-944d-83dd-2975f7431573"],
|
|
Cell[66351, 1843, 61603, 1057, 233, "Output",ExpressionUUID->"b1f00f3e-b26c-bf4d-a0fd-9968a9b2c4e7"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[127991, 2905, 327, 7, 42, "Input",ExpressionUUID->"7383cf4d-77c8-1d41-ab20-d4ea9a390940"],
|
|
Cell[128321, 2914, 9707, 222, 240, "Output",ExpressionUUID->"d1a933a5-9ae5-3c4e-953d-5f1d02c204a8"]
|
|
}, Open ]],
|
|
Cell[138043, 3139, 257, 6, 42, "Input",ExpressionUUID->"e431227d-0e31-a446-ad0d-76902a9a3bd8"],
|
|
Cell[CellGroupData[{
|
|
Cell[138325, 3149, 215, 7, 48, "Input",ExpressionUUID->"4e5b3330-e10a-4342-8f3d-b24f9b16b9de"],
|
|
Cell[138543, 3158, 169, 3, 32, "Output",ExpressionUUID->"1560efbb-94f0-5144-9b19-9d176fc4dd8d"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[138749, 3166, 1814, 53, 183, "Input",ExpressionUUID->"bb5f3a72-8528-7a48-a67a-a23038fc5b71"],
|
|
Cell[140566, 3221, 502, 11, 60, "Message",ExpressionUUID->"aec1bc78-c42d-654b-9d44-6cd3626266ac"],
|
|
Cell[141071, 3234, 506, 11, 60, "Message",ExpressionUUID->"f1a8642b-581b-a442-a1d9-50687b910475"],
|
|
Cell[141580, 3247, 509, 11, 60, "Message",ExpressionUUID->"5a841663-4049-3b42-9c28-d33b4ccb324b"],
|
|
Cell[142092, 3260, 456, 10, 26, "Message",ExpressionUUID->"002a296e-87c0-e748-91ba-edf75724ad49"],
|
|
Cell[142551, 3272, 28560, 514, 233, "Output",ExpressionUUID->"c4fa73a0-9f42-fb44-a044-6efcf5132509"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[171148, 3791, 1616, 48, 70, "Input",ExpressionUUID->"0da19810-21b5-1440-b6da-efec04765d71"],
|
|
Cell[172767, 3841, 576, 12, 70, "Message",ExpressionUUID->"7bcbb4da-a8de-1b45-8b24-dc27272fdaa1"],
|
|
Cell[173346, 3855, 582, 12, 70, "Message",ExpressionUUID->"15898f02-540e-cf4f-a0a1-f3ae96bbddb6"],
|
|
Cell[173931, 3869, 584, 12, 70, "Message",ExpressionUUID->"99a44b10-ed73-684f-a35a-9a86c980f3d9"],
|
|
Cell[174518, 3883, 458, 10, 70, "Message",ExpressionUUID->"5e0acd55-8564-1749-9f1a-5e9cd04ef83a"],
|
|
Cell[174979, 3895, 170, 3, 70, "Output",ExpressionUUID->"a97106d2-ef63-9147-8535-daa57b06eb20"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[175186, 3903, 2249, 64, 70, "Input",ExpressionUUID->"d3b2932a-2d3f-fa41-a705-f816ef30ba1b"],
|
|
Cell[177438, 3969, 522, 11, 70, "Message",ExpressionUUID->"4287df48-5412-ba4f-8ac5-009fa9b4a304"],
|
|
Cell[177963, 3982, 526, 11, 70, "Message",ExpressionUUID->"59c4f004-977d-f648-9c23-b4080e1c8591"],
|
|
Cell[178492, 3995, 528, 11, 70, "Message",ExpressionUUID->"60f490e4-4b4a-6845-a3d9-028c70afb6db"],
|
|
Cell[179023, 4008, 458, 10, 70, "Message",ExpressionUUID->"9ab542c7-4ae7-1e4b-b6a8-ee19008898f7"],
|
|
Cell[179484, 4020, 175, 3, 70, "Output",ExpressionUUID->"0d1e7940-37bf-bf4f-bfa4-a5ba2d7cb1dd"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[179696, 4028, 2221, 64, 70, "Input",ExpressionUUID->"3a5379d3-3adc-3844-bbe2-4530809b7b8c"],
|
|
Cell[181920, 4094, 522, 11, 70, "Message",ExpressionUUID->"79bb4b1f-3177-c842-aa67-d93f3ad3365e"],
|
|
Cell[182445, 4107, 524, 11, 70, "Message",ExpressionUUID->"517afb64-9d7b-6748-abe1-5fa348ccbc29"],
|
|
Cell[182972, 4120, 528, 11, 70, "Message",ExpressionUUID->"d19413a7-2cf4-0549-a8b8-37f98f04b017"],
|
|
Cell[183503, 4133, 458, 10, 70, "Message",ExpressionUUID->"e2ebea89-90c0-5d4f-8c43-eea596c7d6fb"],
|
|
Cell[183964, 4145, 170, 3, 70, "Output",ExpressionUUID->"7c4d0729-640a-ed41-ad1f-5a5a75f62d87"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[184171, 4153, 2219, 64, 70, "Input",ExpressionUUID->"208e04c0-4af7-a344-9e86-ceb616bf22d8"],
|
|
Cell[186393, 4219, 524, 11, 70, "Message",ExpressionUUID->"c1d8bb29-16c6-3f4b-8a9b-ba7e90da9672"],
|
|
Cell[186920, 4232, 526, 11, 70, "Message",ExpressionUUID->"1756ecee-a1fe-bb40-bfd8-48d4df8ef76d"],
|
|
Cell[187449, 4245, 530, 11, 70, "Message",ExpressionUUID->"d0cb69f1-ced4-d843-98c1-600cac395a38"],
|
|
Cell[187982, 4258, 458, 10, 70, "Message",ExpressionUUID->"ab747287-9372-314d-a7c4-14fc011f850b"],
|
|
Cell[188443, 4270, 171, 3, 70, "Output",ExpressionUUID->"e6bb3b57-900e-ed41-845d-3c49874fc850"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[188651, 4278, 213, 6, 70, "Input",ExpressionUUID->"53a3c067-888b-bc49-a5e6-f228162e6070"],
|
|
Cell[188867, 4286, 175, 3, 70, "Output",ExpressionUUID->"88a5aaa2-9216-404d-a8aa-70ecb36db857"]
|
|
}, Open ]],
|
|
Cell[189057, 4292, 247, 5, 70, "Input",ExpressionUUID->"0c2ac2c8-096e-e64a-aaeb-bb84e7548fdc"],
|
|
Cell[CellGroupData[{
|
|
Cell[189329, 4301, 558, 19, 70, "Input",ExpressionUUID->"5c8cab9c-f39b-364c-ae6b-c415e4dbcf46"],
|
|
Cell[189890, 4322, 172, 3, 70, "Output",ExpressionUUID->"2dde55a6-2323-454c-b60b-61a76b5d44f2"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[190099, 4330, 170, 5, 70, "Input",ExpressionUUID->"106a4571-94f1-5343-b4a9-78f21d5e84b3"],
|
|
Cell[190272, 4337, 172, 3, 70, "Output",ExpressionUUID->"344bf722-e54f-374f-b65c-1dfe2f693b7e"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[190481, 4345, 181, 5, 70, "Input",ExpressionUUID->"b7c1808d-73a9-d645-bf95-223de85093e2"],
|
|
Cell[190665, 4352, 172, 3, 70, "Output",ExpressionUUID->"37f05469-042d-5c49-acdf-eb29d6a15290"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[190874, 4360, 6055, 185, 70, "Input",ExpressionUUID->"e9c41729-285f-7d42-bb43-ee09dea88444"],
|
|
Cell[196932, 4547, 174, 3, 70, "Output",ExpressionUUID->"a9f66528-7902-3848-84e1-d06cd8efb93c"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[197143, 4555, 368, 9, 70, "Input",ExpressionUUID->"efa9c5ac-4baa-3e4e-9760-1e46cf5c01c0"],
|
|
Cell[197514, 4566, 173, 3, 70, "Output",ExpressionUUID->"c5f93787-bd57-b143-93de-29b700483396"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[197724, 4574, 6122, 187, 70, "Input",ExpressionUUID->"7dcb74da-1357-7e4e-a03d-852f8e740128"],
|
|
Cell[203849, 4763, 175, 3, 70, "Output",ExpressionUUID->"7b0024b2-1e68-904c-b216-49c58abdde0a"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[204061, 4771, 368, 9, 70, "Input",ExpressionUUID->"4c537c9f-ce6a-8f4c-9e68-01e12e3017b7"],
|
|
Cell[204432, 4782, 170, 3, 70, "Output",ExpressionUUID->"725e176a-1300-6f41-9ba3-e070b7b00753"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[204639, 4790, 2663, 88, 70, "Input",ExpressionUUID->"1e3d1dc2-d9ac-9045-a648-58006d1d6cf6"],
|
|
Cell[207305, 4880, 173, 3, 70, "Output",ExpressionUUID->"56e25769-5fae-9845-ac42-be0bc3e98c92"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[207515, 4888, 2603, 85, 70, "Input",ExpressionUUID->"2371743b-ee83-9146-bf98-330cb0fb7e0a"],
|
|
Cell[210121, 4975, 172, 3, 70, "Output",ExpressionUUID->"0574b2f8-313d-764f-97a0-b69ae3bd044d"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[210330, 4983, 3712, 118, 70, "Input",ExpressionUUID->"8b6de8d6-9524-3347-a11b-48bba48b07d0"],
|
|
Cell[214045, 5103, 174, 3, 70, "Output",ExpressionUUID->"95ff35fe-9928-0447-aa14-c396ca299126"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[214256, 5111, 2052, 59, 70, "Input",ExpressionUUID->"a41abb59-b808-8547-b1d9-a574acad5c53"],
|
|
Cell[216311, 5172, 574, 12, 70, "Message",ExpressionUUID->"87b7fc82-cf0a-ec4d-83b9-1f172c2a1277"],
|
|
Cell[216888, 5186, 580, 12, 70, "Message",ExpressionUUID->"e0980964-44fb-0a4c-8205-9ce871cb8c93"],
|
|
Cell[217471, 5200, 582, 12, 70, "Message",ExpressionUUID->"769d7438-8b0f-d04b-94dc-ec99bab472ff"],
|
|
Cell[218056, 5214, 456, 10, 70, "Message",ExpressionUUID->"c243bb4e-27de-574b-aeb4-b19a9e2e805b"],
|
|
Cell[218515, 5226, 171, 3, 70, "Output",ExpressionUUID->"678e1d2b-842e-e545-b4df-7b6cad732095"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[218723, 5234, 2054, 59, 70, "Input",ExpressionUUID->"779c8db8-6bae-9046-915d-05cf0a3cee42"],
|
|
Cell[220780, 5295, 574, 12, 70, "Message",ExpressionUUID->"513e0bd5-dbba-a448-aa49-b2f50bf64a60"],
|
|
Cell[221357, 5309, 578, 12, 70, "Message",ExpressionUUID->"af5e90bc-196b-e043-94e8-4bb9c49c6b5c"],
|
|
Cell[221938, 5323, 582, 12, 70, "Message",ExpressionUUID->"8f26edac-d5c1-324e-91b6-0e386d5a872d"],
|
|
Cell[222523, 5337, 458, 10, 70, "Message",ExpressionUUID->"6833928c-ef21-0d4b-aeed-ecf995491543"],
|
|
Cell[222984, 5349, 169, 3, 70, "Output",ExpressionUUID->"74d46ae4-1766-0c42-9255-78e61714806e"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[223190, 5357, 2028, 55, 70, "Input",ExpressionUUID->"2fa4bc1d-3549-0e49-9fa0-9e5dc16aa40f"],
|
|
Cell[225221, 5414, 20326, 381, 70, "Output",ExpressionUUID->"1101a597-b433-8944-aac8-4b6263f307b3"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[245584, 5800, 2120, 60, 70, "Input",ExpressionUUID->"6e23e6bb-e46c-1c43-a88f-db092cf7ac8d"],
|
|
Cell[247707, 5862, 502, 11, 70, "Message",ExpressionUUID->"698a0ec2-6362-4a4c-9512-68ac03e6ab94"],
|
|
Cell[248212, 5875, 504, 11, 70, "Message",ExpressionUUID->"c7464263-6d3c-ad4b-944d-708e3b53f8de"],
|
|
Cell[248719, 5888, 507, 11, 70, "Message",ExpressionUUID->"3b2b96d7-8ae3-e140-a8cb-bb0d54486d84"],
|
|
Cell[249229, 5901, 458, 10, 70, "Message",ExpressionUUID->"52f611be-ecf7-624a-b8a8-553d5cafe96b"],
|
|
Cell[249690, 5913, 41632, 730, 70, "Output",ExpressionUUID->"63518a14-6f7d-6f44-bb1f-32ae8d6f657f"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[291359, 6648, 257, 6, 70, "Input",ExpressionUUID->"028f7072-05bf-cf40-ac60-9f298ef86e88"],
|
|
Cell[291619, 6656, 2580, 42, 70, "Message",ExpressionUUID->"b564c677-bd9d-0e4f-82de-383dbfb5076a"],
|
|
Cell[294202, 6700, 10201, 227, 70, "Output",ExpressionUUID->"5679b5e8-e1a4-b440-bec7-c61c864a5d89"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[304440, 6932, 1616, 48, 70, "Input",ExpressionUUID->"e94e1ddb-0658-3b45-ad00-7392c646ee51"],
|
|
Cell[306059, 6982, 592, 12, 70, "Message",ExpressionUUID->"5789d8fb-150e-9a49-8a2f-15984a4083a0"],
|
|
Cell[306654, 6996, 597, 12, 70, "Message",ExpressionUUID->"10eb161e-8740-e441-b61b-b27d08d291d7"],
|
|
Cell[307254, 7010, 599, 12, 70, "Message",ExpressionUUID->"f2d20661-5fdd-a74c-8183-e6888fe98835"],
|
|
Cell[307856, 7024, 458, 10, 70, "Message",ExpressionUUID->"775942df-185d-1b4c-9fb6-75af36168c8b"],
|
|
Cell[308317, 7036, 172, 3, 70, "Output",ExpressionUUID->"03db46c0-47c3-f348-bb46-ea4092806a8c"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[308526, 7044, 2247, 64, 70, "Input",ExpressionUUID->"23c7e6b2-69d5-1a4e-bd5f-947421a54e26"],
|
|
Cell[310776, 7110, 576, 12, 70, "Message",ExpressionUUID->"fed85baf-99d5-3544-911c-9e3778d04d17"],
|
|
Cell[311355, 7124, 580, 12, 70, "Message",ExpressionUUID->"74041ff4-8835-8a41-a4dd-eea6e1a39915"],
|
|
Cell[311938, 7138, 582, 12, 70, "Message",ExpressionUUID->"9e09393a-eefe-ba45-99ee-c640606d2ee1"],
|
|
Cell[312523, 7152, 456, 10, 70, "Message",ExpressionUUID->"70437e48-0dcf-4e4f-a146-b3bdae4f632b"],
|
|
Cell[312982, 7164, 171, 3, 70, "Output",ExpressionUUID->"86f3d22e-a660-0b41-baff-cdb033e864e0"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[313190, 7172, 2219, 64, 70, "Input",ExpressionUUID->"38ca1203-b2e6-3044-aa85-97017d76bb30"],
|
|
Cell[315412, 7238, 574, 12, 70, "Message",ExpressionUUID->"f4fc5672-9e6d-3748-ab75-56a8f1b8c47a"],
|
|
Cell[315989, 7252, 578, 12, 70, "Message",ExpressionUUID->"4aa61d0b-cbfc-004d-8be6-ff84c5742fd0"],
|
|
Cell[316570, 7266, 580, 12, 70, "Message",ExpressionUUID->"bcdde3fc-988d-814c-a83c-ce90996db47a"],
|
|
Cell[317153, 7280, 458, 10, 70, "Message",ExpressionUUID->"f371b728-3599-4340-a62e-fdf04344dabe"],
|
|
Cell[317614, 7292, 173, 3, 70, "Output",ExpressionUUID->"077bbedf-862f-cc4e-b648-9dad11154cf8"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[317824, 7300, 2223, 64, 70, "Input",ExpressionUUID->"087e4064-7024-cb41-8231-fe78ad70afda"],
|
|
Cell[320050, 7366, 574, 12, 70, "Message",ExpressionUUID->"d528e032-b6a6-a543-9b8d-23228fe63677"],
|
|
Cell[320627, 7380, 578, 12, 70, "Message",ExpressionUUID->"e6016862-564d-8a4b-ba73-420e4cefde7e"],
|
|
Cell[321208, 7394, 582, 12, 70, "Message",ExpressionUUID->"52da723a-eab2-1040-978c-52ac672efc66"],
|
|
Cell[321793, 7408, 455, 10, 70, "Message",ExpressionUUID->"d1a6585d-5cf1-364e-9714-b29a76c14a20"],
|
|
Cell[322251, 7420, 170, 3, 70, "Output",ExpressionUUID->"5c7deb9d-a1b0-ad49-bd81-bf4a15d59971"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[322458, 7428, 213, 6, 70, "Input",ExpressionUUID->"cd9a77e7-d597-394b-a710-f971fc40d827"],
|
|
Cell[322674, 7436, 174, 3, 70, "Output",ExpressionUUID->"5a5422b6-c991-1740-997c-c4f205d8ff82"]
|
|
}, Open ]],
|
|
Cell[322863, 7442, 247, 5, 70, "Input",ExpressionUUID->"13a90bf7-f7dc-7e48-845e-80048a92ff15"],
|
|
Cell[CellGroupData[{
|
|
Cell[323135, 7451, 558, 19, 70, "Input",ExpressionUUID->"ce764b10-5670-7a4e-86ae-3f77893f67b3"],
|
|
Cell[323696, 7472, 169, 3, 70, "Output",ExpressionUUID->"e25dfa18-ea25-df40-8f5d-0ff169fa5ae7"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[323902, 7480, 170, 5, 70, "Input",ExpressionUUID->"717d3ead-30a8-ec47-9afe-f9884217d594"],
|
|
Cell[324075, 7487, 173, 3, 70, "Output",ExpressionUUID->"96aab3a1-95e4-7349-96b6-43128457940c"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[324285, 7495, 181, 5, 70, "Input",ExpressionUUID->"c43d0cec-6a64-9643-a5bb-27ab984c3bb2"],
|
|
Cell[324469, 7502, 173, 3, 70, "Output",ExpressionUUID->"98fcf8be-ba43-ae41-a6cd-62aef0ebb50c"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[324679, 7510, 6055, 185, 70, "Input",ExpressionUUID->"e15da858-b31b-c344-a560-00b30705c2c2"],
|
|
Cell[330737, 7697, 174, 3, 70, "Output",ExpressionUUID->"4ae926cc-90a9-5a4e-8bc7-efdead49917a"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[330948, 7705, 368, 9, 70, "Input",ExpressionUUID->"f53a321d-2180-024b-b925-7b08c74c1c33"],
|
|
Cell[331319, 7716, 172, 3, 70, "Output",ExpressionUUID->"f2f17f7a-79ff-794b-914c-ee087932d3fc"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[331528, 7724, 6122, 187, 70, "Input",ExpressionUUID->"6fc2e120-104b-274c-a69b-ff643539124b"],
|
|
Cell[337653, 7913, 172, 3, 70, "Output",ExpressionUUID->"a5f469a0-4ca3-e047-b336-e38d98804459"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[337862, 7921, 368, 9, 70, "Input",ExpressionUUID->"1ebbe4bd-69b2-ba4a-b880-612b325b749b"],
|
|
Cell[338233, 7932, 170, 3, 70, "Output",ExpressionUUID->"dfd045e6-0547-5948-8a30-f6f21ca1851b"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[338440, 7940, 2663, 88, 70, "Input",ExpressionUUID->"1efe60b3-9182-2c4c-bd13-9e4d244d7e70"],
|
|
Cell[341106, 8030, 173, 3, 70, "Output",ExpressionUUID->"235fc321-e687-b140-a2ed-ea3ad35e3bb8"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[341316, 8038, 2603, 85, 70, "Input",ExpressionUUID->"66f987a0-c978-3745-b4d7-87ccf5fea6cf"],
|
|
Cell[343922, 8125, 172, 3, 70, "Output",ExpressionUUID->"1e144329-9e43-bf4f-9d10-823c44cb18a4"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[344131, 8133, 3712, 118, 70, "Input",ExpressionUUID->"696f9a62-0454-0540-abef-a5c123c32f5f"],
|
|
Cell[347846, 8253, 172, 3, 70, "Output",ExpressionUUID->"c1758059-ccb3-1040-a83d-304abcce69c4"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[348055, 8261, 2052, 59, 70, "Input",ExpressionUUID->"efacefcd-90be-574d-92a2-eec47ae06964"],
|
|
Cell[350110, 8322, 573, 12, 70, "Message",ExpressionUUID->"7a1e7ba8-a6bf-2f4a-bf31-4a2ed3016295"],
|
|
Cell[350686, 8336, 573, 12, 70, "Message",ExpressionUUID->"9c2e507b-ef90-ac45-8745-64f07a4cab70"],
|
|
Cell[351262, 8350, 579, 12, 70, "Message",ExpressionUUID->"79a512ec-e31d-8844-bf00-025e94c5ef0a"],
|
|
Cell[351844, 8364, 458, 10, 70, "Message",ExpressionUUID->"52a2b255-a51b-1c41-afb5-2c6906cc81b7"],
|
|
Cell[352305, 8376, 170, 3, 70, "Output",ExpressionUUID->"8f590d85-cd49-4b4a-b80f-ef4df8529f15"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[352512, 8384, 2052, 59, 70, "Input",ExpressionUUID->"113e0d2a-28bc-cb46-97f5-cf1d438fc6f4"],
|
|
Cell[354567, 8445, 573, 12, 70, "Message",ExpressionUUID->"9c88a8d0-79f6-c641-aaf7-46f5907e3958"],
|
|
Cell[355143, 8459, 575, 12, 70, "Message",ExpressionUUID->"5bdaba15-f4c0-7a4a-905b-a46ed4994f1b"],
|
|
Cell[355721, 8473, 579, 12, 70, "Message",ExpressionUUID->"921e00ea-3ed1-4d4f-a4c6-636b2e493926"],
|
|
Cell[356303, 8487, 458, 10, 70, "Message",ExpressionUUID->"94646a19-438b-8144-9028-59ac2200b652"],
|
|
Cell[356764, 8499, 169, 3, 70, "Output",ExpressionUUID->"85256f71-2c5b-a942-af45-97021273c9d1"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[356970, 8507, 2030, 55, 70, "Input",ExpressionUUID->"1fd4421d-3fcd-2d4f-bd05-28d15302273b"],
|
|
Cell[359003, 8564, 20296, 381, 70, "Output",ExpressionUUID->"000d3cc5-e7e7-7f42-9c78-51dba6db4bf3"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[379336, 8950, 2092, 60, 70, "Input",ExpressionUUID->"0a8036ea-ac95-654b-96a9-78af964912a2"],
|
|
Cell[381431, 9012, 500, 11, 70, "Message",ExpressionUUID->"fe707fb7-e6dc-184a-a72e-2be6d5c085cf"],
|
|
Cell[381934, 9025, 505, 11, 70, "Message",ExpressionUUID->"a7e21b46-c6c9-1c4d-875a-309332ed6699"],
|
|
Cell[382442, 9038, 509, 11, 70, "Message",ExpressionUUID->"50e13f26-4720-f342-8c8a-f93078defe94"],
|
|
Cell[382954, 9051, 458, 10, 70, "Message",ExpressionUUID->"68974fe2-070e-264b-8432-db9f06367365"],
|
|
Cell[383415, 9063, 39609, 697, 70, "Output",ExpressionUUID->"ba3a3065-c61d-5943-9ee3-286e0d374549"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[423061, 9765, 257, 6, 70, "Input",ExpressionUUID->"936846c9-ebd9-0340-9945-b210a517ddeb"],
|
|
Cell[423321, 9773, 2580, 42, 70, "Message",ExpressionUUID->"2b65c8b7-2b0d-7840-9c22-f596c7681ee5"],
|
|
Cell[425904, 9817, 10201, 227, 70, "Output",ExpressionUUID->"e2584817-ac95-084f-bbb3-4911b5281f79"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[436142, 10049, 1616, 48, 70, "Input",ExpressionUUID->"2b7767f9-449f-c646-ae0c-43037957b685"],
|
|
Cell[437761, 10099, 589, 12, 70, "Message",ExpressionUUID->"b8ddd204-96bd-c44c-a461-fca25ce38083"],
|
|
Cell[438353, 10113, 595, 12, 70, "Message",ExpressionUUID->"4d331042-6820-214d-a3a7-faad1e0acd9a"],
|
|
Cell[438951, 10127, 596, 12, 70, "Message",ExpressionUUID->"2b7f80c1-4d86-8c41-ad69-d2816819dae8"],
|
|
Cell[439550, 10141, 458, 10, 70, "Message",ExpressionUUID->"39d74612-fbdc-ff40-a7d1-fc3dfa4019c6"],
|
|
Cell[440011, 10153, 171, 3, 70, "Output",ExpressionUUID->"5f3f7d29-276c-ce44-8205-70c169040bde"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[440219, 10161, 2248, 64, 70, "Input",ExpressionUUID->"8304a1af-5a77-304f-9cc7-82724e2b3df7"],
|
|
Cell[442470, 10227, 573, 12, 70, "Message",ExpressionUUID->"4fd30c53-5c63-3547-b8da-55deec45ffe9"],
|
|
Cell[443046, 10241, 573, 12, 70, "Message",ExpressionUUID->"94d8d63e-6d20-a549-87b6-9bb940b1a184"],
|
|
Cell[443622, 10255, 579, 12, 70, "Message",ExpressionUUID->"94cf357c-30eb-ce43-bfa6-645e621ccaab"],
|
|
Cell[444204, 10269, 458, 10, 70, "Message",ExpressionUUID->"6c01af9f-f680-4741-8cf0-c5de4c3f5776"],
|
|
Cell[444665, 10281, 174, 3, 70, "Output",ExpressionUUID->"c62861b9-4f65-8643-97a2-f7acbf90accd"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[444876, 10289, 2221, 64, 70, "Input",ExpressionUUID->"3ed977a3-b24a-0644-a438-d2ebbf0c1dea"],
|
|
Cell[447100, 10355, 573, 12, 70, "Message",ExpressionUUID->"2222d8d9-5ab2-9842-a5d2-c83e0de9e07d"],
|
|
Cell[447676, 10369, 575, 12, 70, "Message",ExpressionUUID->"f866d339-6477-0c45-9660-98eca56f0e20"],
|
|
Cell[448254, 10383, 577, 12, 70, "Message",ExpressionUUID->"ac7b6c07-69b3-8847-9707-6d5a111d812d"],
|
|
Cell[448834, 10397, 456, 10, 70, "Message",ExpressionUUID->"11ccb074-812f-ce43-be93-ac274425113d"],
|
|
Cell[449293, 10409, 172, 3, 70, "Output",ExpressionUUID->"e407b037-0c43-434a-ae6e-d9d9cac64d0c"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[449502, 10417, 2219, 64, 70, "Input",ExpressionUUID->"0a258b12-85fc-2a47-9b1a-8264aa20d65c"],
|
|
Cell[451724, 10483, 571, 12, 70, "Message",ExpressionUUID->"51fd61ee-1a5d-9048-806e-e5a8ccbc9ee8"],
|
|
Cell[452298, 10497, 573, 12, 70, "Message",ExpressionUUID->"b60547f8-8180-8e42-a50a-2f95a9bbb448"],
|
|
Cell[452874, 10511, 579, 12, 70, "Message",ExpressionUUID->"e6102528-f151-984e-9d65-5e941faf5653"],
|
|
Cell[453456, 10525, 458, 10, 70, "Message",ExpressionUUID->"5973ee85-238a-1f47-b298-fa05fe19e0b7"],
|
|
Cell[453917, 10537, 172, 3, 70, "Output",ExpressionUUID->"1b8a1f16-b0cf-1c4c-bae9-5db73555a85f"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[454126, 10545, 211, 6, 70, "Input",ExpressionUUID->"1cb0d12f-90a8-b449-9dd4-8435ee411a7c"],
|
|
Cell[454340, 10553, 174, 3, 70, "Output",ExpressionUUID->"afcb3269-c8ab-6a44-9d7c-8a434189e156"]
|
|
}, Open ]]
|
|
}
|
|
]
|
|
*)
|
|
|