程序代写代做代考 x86 cache (* Content-type: application/vnd.wolfram.mathematica *)

(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy=’Mathematica 12.0′ *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
NotebookDataLength[ 74770, 2120]
NotebookOptionsPosition[ 71350, 2058]
NotebookOutlinePosition[ 71976, 2080]
CellTagsIndexPosition[ 71933, 2077]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell[TextData[{
StyleBox[“:52a8:6001:4f18:5316:3002
:8ba1:7b97:5dee:5f02:3002
”,

FontSize->72,
FontColor->RGBColor[0, 0, 1]],
StyleBox[“
:4f18:5316 ”,
FontColor->RGBColor[0, 0, 1]],
Cell[BoxData[
FormBox[
RowBox[{
SubsuperscriptBox[“[Integral]”,
SubscriptBox[“t”, “0”],
SubscriptBox[“t”, “1”]],
RowBox[{
RowBox[{“F”, “(“,
RowBox[{
RowBox[{
SubscriptBox[“x”, “1”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[“x”, “2”], “(“, “t”, “)”}], “,”, “…”, “,”,
RowBox[{
SubscriptBox[“x”, “n”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “1”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “2”], “(“, “t”, “)”}], “,”, “…”, “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “n”], “(“, “t”, “)”}], “,”, “t”}], “)”}],
“dt”}]}], TraditionalForm]],
FontColor->RGBColor[0, 0, 1],ExpressionUUID->
“e6297231-b7cd-4551-a108-049c6078ee89”],
StyleBox[“
:670d:4ece x(“,
FontColor->RGBColor[0, 0, 1]],
Cell[BoxData[
FormBox[
SubscriptBox[“t”, “0”], TraditionalForm]],
FontColor->RGBColor[0, 0, 1],ExpressionUUID->
“84d56917-5b2d-426a-9173-b6b7f42dcd86”],
StyleBox[“) = “,
FontColor->RGBColor[0, 0, 1]],
Cell[BoxData[
FormBox[
RowBox[{“(“,
RowBox[{
FormBox[
SuperscriptBox[
SubscriptBox[“x”, “1”], “0”],
TraditionalForm], “,”,
FormBox[
SuperscriptBox[
SubscriptBox[“x”, “2”], “0”],
TraditionalForm], “,”, “…”, “,”,
FormBox[
SuperscriptBox[
SubscriptBox[“x”, “n”], “0”],
TraditionalForm]}], “)”}], TraditionalForm]],
FontColor->RGBColor[0, 0, 1],ExpressionUUID->
“501601f1-a2df-40e1-ab6c-64ac037b7b1f”],
StyleBox[“
x(“,
FontColor->RGBColor[0, 0, 1]],
Cell[BoxData[
FormBox[
SubscriptBox[“t”, “1”], TraditionalForm]],
FontColor->RGBColor[0, 0, 1],ExpressionUUID->
“5984e356-89a0-4e95-a99c-6bdbb27889a9”],
StyleBox[“) =”,
FontColor->RGBColor[0, 0, 1]],
Cell[BoxData[
FormBox[
RowBox[{” “,
RowBox[{“(“,
RowBox[{
FormBox[
SuperscriptBox[
SubscriptBox[“x”, “1”], “1”],
TraditionalForm], “,”,
FormBox[
SuperscriptBox[
SubscriptBox[“x”, “2”], “1”],
TraditionalForm], “,”, “…”, “,”,
FormBox[
SuperscriptBox[
SubscriptBox[“x”, “n”], “1”],
TraditionalForm]}], “)”}]}], TraditionalForm]],
FontColor->RGBColor[0, 0, 1],ExpressionUUID->
“e450b3a3-6a92-4b8f-b870-b95ff0728cd3”],
StyleBox[“
:548c “,
FontColor->RGBColor[0, 0, 1]],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{“x”, “(“, “t”, “)”}], ” “, “=”,
RowBox[{“(“,
RowBox[{
RowBox[{
SubscriptBox[“x”, “1”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[“x”, “2”], “(“, “t”, “)”}], “,”, “…”, “,”,
RowBox[{
SubscriptBox[“x”, “n”], “(“, “t”, “)”}]}], “)”}]}], TraditionalForm]],
FontColor->RGBColor[0, 0, 1],ExpressionUUID->
“45d94d82-7166-4fcf-b7ab-8d38ac7e8d4b”],
StyleBox[“, “,
FontColor->RGBColor[0, 0, 1]],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
OverscriptBox[“x”, “.”], “(“, “t”, “)”}], ” “, “=”,
RowBox[{“(“,
RowBox[{
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “1”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “2”], “(“, “t”, “)”}], “,”, “…”, “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “n”], “(“, “t”, “)”}]}], “)”}]}],
TraditionalForm]],
FontColor->RGBColor[0, 0, 1],ExpressionUUID->
“8152d89c-3af6-423a-898c-fd80b809af4c”],
StyleBox[”

:5bf9:4e8e:5168:5c40:6700:5927:503c:ff08:5168:5c40:6700:5c0f:503c
:ff09:ff0c:4e0a:4e00:4e2a:95ee:9898:7684:89e3x:ff08t:ff09:5fc5
:987b:9a8c:8bc1:4ee5:4e0b:6761:4ef6:ff1a

:6b27:62c9:7684
:5fc5:8981:6761:4ef6:3002:5bf9:4e8e:6240:6709 t [Epsilon] [“,
FontColor->RGBColor[0, 0, 1]],
Cell[BoxData[
FormBox[
SubscriptBox[“t”, “0”], TraditionalForm]],
FontColor->RGBColor[0, 0, 1],ExpressionUUID->
“80f13230-8bb9-4eb0-a9ea-22b3407a2c8e”],
StyleBox[“, “,
FontColor->RGBColor[0, 0, 1]],
Cell[BoxData[
FormBox[
SubscriptBox[“t”, “1”], TraditionalForm]],
FontColor->RGBColor[0, 0, 1],ExpressionUUID->
“74800634-9730-4d03-8662-9afaea76fcef”],
StyleBox[“] :5bf9:4e8e:6240:6709 i [Epsilon] {1,…,n} :5df2:9a8c
:8bc1:ff1a
”,
FontColor->RGBColor[0, 0, 1]],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
SubscriptBox[“F”,
SubscriptBox[“x”, “i”]], “(“,
RowBox[{
RowBox[{
SubscriptBox[“x”, “1”], “(“, “t”, “)”}], “,”, “…”, “,”,
RowBox[{
SubscriptBox[“x”, “n”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “1”], “(“, “t”, “)”}], “,”, “…”, “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “n”], “(“, “t”, “)”}], “,”, “t”}], “)”}],
” “}], TraditionalForm]],
FontColor->RGBColor[0, 0, 1],ExpressionUUID->
“62a8fb32-57b0-4475-a5d4-fc1149296f64”],
StyleBox[“-“,
FontColor->RGBColor[0, 0, 1]],
Cell[BoxData[
FormBox[
FractionBox[“[DifferentialD]”,
RowBox[{“[DifferentialD]”, “t”}]], TraditionalForm]],
FontColor->RGBColor[0, 0, 1],ExpressionUUID->
“6f80d50e-8b0d-4bdc-985f-240b69385e25″],
StyleBox[” (“,
FontColor->RGBColor[0, 0, 1]],
Cell[BoxData[
FormBox[
RowBox[{
SubscriptBox[“F”,
OverscriptBox[
SubscriptBox[“x”, “i”], “.”]], “(“,
RowBox[{
RowBox[{
SubscriptBox[“x”, “1”], “(“, “t”, “)”}], “,”, “…”, “,”,
RowBox[{
SubscriptBox[“x”, “n”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “1”], “(“, “t”, “)”}], “,”, “…”, “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “n”], “(“, “t”, “)”}], “,”, “t”}], “)”}],
TraditionalForm]],
FontColor->RGBColor[0, 0, 1],ExpressionUUID->
“bb19867f-e9c4-42ab-bac0-9c9853fbc57a”],
StyleBox[“) = 0

”,
FontColor->RGBColor[0, 0, 1]],
StyleBox[“:521d:59cb:6761:4ef6:ff1a “,
FontWeight->”Bold”,
FontColor->RGBColor[0, 0, 1]],
StyleBox[“
x(“,
FontColor->RGBColor[0, 0, 1]],
Cell[BoxData[
FormBox[
SubscriptBox[“t”, “0”], TraditionalForm]],
FontColor->RGBColor[0, 0, 1],ExpressionUUID->
“90426232-ca6b-499d-a4e5-874e973046bc”],
StyleBox[“) = “,
FontColor->RGBColor[0, 0, 1]],
Cell[BoxData[
FormBox[
RowBox[{“(“,
RowBox[{
FormBox[
SuperscriptBox[
SubscriptBox[“x”, “1”], “0”],
TraditionalForm], “,”,
FormBox[
SuperscriptBox[
SubscriptBox[“x”, “2”], “0”],
TraditionalForm], “,”, “…”, “,”,
FormBox[
SuperscriptBox[
SubscriptBox[“x”, “n”], “0”],
TraditionalForm]}], “)”}], TraditionalForm]],
FontColor->RGBColor[0, 0, 1],ExpressionUUID->
“cd7911d8-44ef-410a-b133-c0a8bfe7851b”],
StyleBox[“

:6700:7ec8:6761:4ef6:ff1a
x(“,
FontColor->RGBColor[0, 0, 1]],
Cell[BoxData[
FormBox[
SubscriptBox[“t”, “1”], TraditionalForm]],
FontColor->RGBColor[0, 0, 1],ExpressionUUID->
“409f4edb-2385-43af-8e42-0826e8951189”],
StyleBox[“) =”,
FontColor->RGBColor[0, 0, 1]],
Cell[BoxData[
FormBox[
RowBox[{” “,
RowBox[{“(“,
RowBox[{
FormBox[
SuperscriptBox[
SubscriptBox[“x”, “1”], “1”],
TraditionalForm], “,”,
FormBox[
SuperscriptBox[
SubscriptBox[“x”, “2”], “1”],
TraditionalForm], “,”, “…”, “,”,
FormBox[
SuperscriptBox[
SubscriptBox[“x”, “n”], “1”],
TraditionalForm]}], “)”}]}], TraditionalForm]],
FontColor->RGBColor[0, 0, 1],ExpressionUUID->
“6ea505f2-885c-4c5f-81dd-e6ed4b0d17d8”],
StyleBox[“

:52d2:8ba9:5fb7:7684:5fc5:8981:6761:4ef6:3002:5bf9
:4e8e:6240:6709 t [Epsilon] [“,
FontColor->RGBColor[0, 0, 1]],
Cell[BoxData[
FormBox[
SubscriptBox[“t”, “0”], TraditionalForm]],
FontColor->RGBColor[0, 0, 1],ExpressionUUID->
“4fd7dc07-0b3b-40d0-88bd-b9ff1eb86d84”],
StyleBox[“, “,
FontColor->RGBColor[0, 0, 1]],
Cell[BoxData[
FormBox[
SubscriptBox[“t”, “1”], TraditionalForm]],
FontColor->RGBColor[0, 0, 1],ExpressionUUID->
“84a0e107-932f-4f75-887b-e04da67e9b9a”],
StyleBox[“] :9a8c:8bc1:77e9:9635
“,
FontColor->RGBColor[0, 0, 1]],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
SubscriptBox[“F”,
RowBox[{
OverscriptBox[“x”, “.”], ” “,
OverscriptBox[“x”, “.”]}]], “(“,
RowBox[{
RowBox[{
SubscriptBox[“x”, “1”], “(“, “t”, “)”}], “,”, “…”, “,”,
RowBox[{
SubscriptBox[“x”, “n”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “1”], “(“, “t”, “)”}], “,”, “…”, “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “n”], “(“, “t”, “)”}], “,”, “t”}], “)”}],
” “, “=”,
RowBox[{“(“, GridBox[{
{
RowBox[{
SubscriptBox[“F”,
RowBox[{
OverscriptBox[
SubscriptBox[“x”, “1”], “.”], ” “,
OverscriptBox[
SubscriptBox[“x”, “1”], “.”]}]], “(“,
RowBox[{
RowBox[{“x”, “(“, “t”, “)”}], “,”,
RowBox[{
OverscriptBox[“x”, “.”], “(“, “t”, “)”}], “,”, “t”}], “)”}], “…”,
RowBox[{
SubscriptBox[“F”,
RowBox[{
OverscriptBox[
SubscriptBox[“x”, “1”], “.”], ” “,
OverscriptBox[
SubscriptBox[“x”, “n”], “.”]}]], “(“,
RowBox[{
RowBox[{“x”, “(“, “t”, “)”}], “,”,
RowBox[{
OverscriptBox[“x”, “.”], “(“, “t”, “)”}], “,”, “t”}], “)”}]},
{“[VerticalEllipsis]”, “[DescendingEllipsis]”, “[VerticalEllipsis]”},
{
RowBox[{
SubscriptBox[“F”,
RowBox[{
OverscriptBox[
SubscriptBox[“x”, “n”], “.”], ” “,
OverscriptBox[
SubscriptBox[“x”, “1”], “.”]}]], “(“,
RowBox[{
RowBox[{“x”, “(“, “t”, “)”}], “,”,
RowBox[{
OverscriptBox[“x”, “.”], “(“, “t”, “)”}], “,”, “t”}], “)”}], “…”,
RowBox[{
SubscriptBox[“F”,
RowBox[{
OverscriptBox[
SubscriptBox[“x”, “n”], “.”], ” “,
OverscriptBox[
SubscriptBox[“x”, “n”], “.”]}]], “(“,
RowBox[{
RowBox[{“x”, “(“, “t”, “)”}], “,”,
RowBox[{
OverscriptBox[“x”, “.”], “(“, “t”, “)”}], “,”, “t”}], “)”}]}
}], “)”}]}], TraditionalForm]],
FontColor->RGBColor[0, 0, 1],ExpressionUUID->
“c1c617fa-dbe6-4970-accd-4b9d8732ff07”],
StyleBox[“
:5b83:662f:6b63:5b9a:7684:6216:8d1f:7684:534a:5b9a
:ff08:6b63:5b9a:6216:6b63:7684:534a:5b9a:ff09:3002

:5145:5206:6761:4ef6:3002 :5bf9:4e8e:6240:6709 t [Epsilon] [“,
FontColor->RGBColor[0, 0, 1]],
Cell[BoxData[
FormBox[
SubscriptBox[“t”, “0”], TraditionalForm]],
FontColor->RGBColor[0, 0, 1],ExpressionUUID->
“209e3305-fb9e-4a11-9259-36ba3f2bd76a”],
StyleBox[“, “,
FontColor->RGBColor[0, 0, 1]],
Cell[BoxData[
FormBox[
SubscriptBox[“t”, “1”], TraditionalForm]],
FontColor->RGBColor[0, 0, 1],ExpressionUUID->
“cf80d5b3-ac6a-4161-a28c-6482d253dd99”],
StyleBox[“] :9a8c:8bc1:77e9:9635
“,
FontColor->RGBColor[0, 0, 1]],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
SubscriptBox[“F”,
RowBox[{
RowBox[{“(“,
RowBox[{“x”,
OverscriptBox[“x”, “.”]}], “)”}],
RowBox[{“(“,
RowBox[{“x”,
OverscriptBox[“x”, “.”]}], “)”}]}]], “(“,
RowBox[{
RowBox[{
SubscriptBox[“x”, “1”], “(“, “t”, “)”}], “,”, “…”, “,”,
RowBox[{
SubscriptBox[“x”, “n”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “1”], “(“, “t”, “)”}], “,”, “…”, “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “n”], “(“, “t”, “)”}], “,”, “t”}], “)”}],
” “, “=”, “[IndentingNewLine]”,
RowBox[{“=”,
RowBox[{“(“, GridBox[{
{
RowBox[{
SubscriptBox[“F”,
RowBox[{
SubscriptBox[“x”, “1”], ” “,
SubscriptBox[“x”, “1”]}]], “(“,
RowBox[{
RowBox[{“x”, “(“, “t”, “)”}], “,”,
RowBox[{
OverscriptBox[“x”, “.”], “(“, “t”, “)”}], “,”, “t”}], “)”}], “…”,
RowBox[{
SubscriptBox[“F”,
RowBox[{
SubscriptBox[“x”, “1”], ” “,
SubscriptBox[“x”, “n”]}]],
RowBox[{“(“,
RowBox[{
RowBox[{“x”,
RowBox[{“(“, “t”, “)”}]}], “,”,
RowBox[{
OverscriptBox[“x”, “.”],
RowBox[{“(“, “t”, “)”}]}], “,”, “t”}], “)”}]}],
RowBox[{
SubscriptBox[“F”,
RowBox[{
SubscriptBox[“x”, “1”], ” “,
OverscriptBox[
SubscriptBox[“x”, “1”], “.”]}]],
RowBox[{“(“,
RowBox[{
RowBox[{“x”,
RowBox[{“(“, “t”, “)”}]}], “,”,
RowBox[{
OverscriptBox[“x”, “.”],
RowBox[{“(“, “t”, “)”}]}], “,”, “t”}], “)”}]}], “…”,
RowBox[{
SubscriptBox[“F”,
RowBox[{
SubscriptBox[“x”, “1”], ” “,
OverscriptBox[
SubscriptBox[“x”, “n”], “.”]}]],
RowBox[{“(“,
RowBox[{
RowBox[{“x”,
RowBox[{“(“, “t”, “)”}]}], “,”,
RowBox[{
OverscriptBox[“x”, “.”],
RowBox[{“(“, “t”, “)”}]}], “,”, “t”}], “)”}]}]},
{“[VerticalEllipsis]”, “[DescendingEllipsis]”,
“[VerticalEllipsis]”, “[VerticalEllipsis]”,
“[DescendingEllipsis]”, “[VerticalEllipsis]”},
{
RowBox[{
SubscriptBox[“F”,
RowBox[{
OverscriptBox[
SubscriptBox[“x”, “n”], “.”], ” “,
SubscriptBox[“x”, “1”]}]], “(“,
RowBox[{
RowBox[{“x”, “(“, “t”, “)”}], “,”,
RowBox[{
OverscriptBox[“x”, “.”], “(“, “t”, “)”}], “,”, “t”}], “)”}], “…”,
RowBox[{
SubscriptBox[“F”,
RowBox[{
OverscriptBox[
SubscriptBox[“x”, “n”], “.”], ” “,
SubscriptBox[“x”, “n”]}]], “(“,
RowBox[{
RowBox[{“x”, “(“, “t”, “)”}], “,”,
RowBox[{
OverscriptBox[“x”, “.”], “(“, “t”, “)”}], “,”, “t”}], “)”}],
RowBox[{
SubscriptBox[“F”,
RowBox[{
OverscriptBox[
SubscriptBox[“x”, “n”], “.”], ” “,
OverscriptBox[
SubscriptBox[“x”, “1”], “.”]}]],
RowBox[{“(“,
RowBox[{
RowBox[{“x”,
RowBox[{“(“, “t”, “)”}]}], “,”,
RowBox[{
OverscriptBox[“x”, “.”],
RowBox[{“(“, “t”, “)”}]}], “,”, “t”}], “)”}]}], “…”,
RowBox[{
SubscriptBox[“F”,
RowBox[{
OverscriptBox[
SubscriptBox[“x”, “n”], “.”], ” “,
OverscriptBox[
SubscriptBox[“x”, “n”], “.”]}]],
RowBox[{“(“,
RowBox[{
RowBox[{“x”,
RowBox[{“(“, “t”, “)”}]}], “,”,
RowBox[{
OverscriptBox[“x”, “.”],
RowBox[{“(“, “t”, “)”}]}], “,”, “t”}], “)”}]}]}
}], “)”}]}]}], TraditionalForm]],
FontColor->RGBColor[0, 0, 1],ExpressionUUID->
“20d6f69b-3ad5-45c9-985f-55d4eeb7f02c”],
StyleBox[“
:5b83:662f:6b63:5b9a:7684:6216:8d1f:7684:534a:5b9a
:ff08:6b63:5b9a:6216:6b63:7684:534a:5b9a:ff09:3002

:6211:4eec
:5982:4f55:627e:5230″,
FontColor->RGBColor[0, 0, 1]],
StyleBox[” x(t) = (“,
FontWeight->”Bold”,
FontColor->RGBColor[0, 0, 1]],
Cell[BoxData[
FormBox[
StyleBox[
SubscriptBox[“x”, “1”],
FontWeight->”Bold”,
FontColor->RGBColor[0, 0, 1]], TraditionalForm]],ExpressionUUID->
“ce6d7e8a-a7b4-4ecf-870a-c366d2e164c2”],
StyleBox[“(t), …, “,
FontWeight->”Bold”,
FontColor->RGBColor[0, 0, 1]],
Cell[BoxData[
FormBox[
StyleBox[
SubscriptBox[“x”, “n”],
FontWeight->”Bold”,
FontColor->RGBColor[0, 0, 1]], TraditionalForm]],ExpressionUUID->
“fa9ae4d6-656a-4e29-9a4e-c724ae2a9601”],
StyleBox[“(t)) :5e76 :9a8c:8bc1:4ee5:4e0a:6240:6709:5185:5bb9:ff1f
“,
FontWeight->”Bold”,
FontColor->RGBColor[0, 0, 1]],
StyleBox[“
:6b65:9aa41-:6211:4eec:5bfb:627e:5fc5:8981:7684:6b27
:62c9:6761:4ef6:7684:5fae:5206:65b9:7a0b:7684:89e3:ff0c:8be5:6761
:4ef6:9a8c:8bc1:4e86:521d:59cb:6761:4ef6:548c:6700:7ec8:6761:4ef6
:3002 :ff08:4f8b:5982:ff0c:4f7f:7528DSolve:ff09:3002
:6b65:9aa42
:548c3:3002-:6211:4eec:770b:770b:6b65:9aa41:4e2d:83b7:5f97:7684
:89e3:51b3:65b9:6848:662f:5426:9a8c:8bc1:4e86:5fc5:8981:548c:5145
:5206:7684:62c9:683c:6717:65e5:6761:4ef6:3002 :ff08:4f8b:5982
:ff0c:6211:4eec:4f7f:7528PositiveDefiniteMatrixQ:ff09:3002
:6211
:4eec:4ece:51fd:6570:8ba1:7b97:77e9:9635 “,
FontColor->RGBColor[0, 0, 1]],
Cell[BoxData[
FormBox[
RowBox[{“F”, “(“,
RowBox[{
RowBox[{
SubscriptBox[“x”, “1”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[“x”, “2”], “(“, “t”, “)”}], “,”, “…”, “,”,
RowBox[{
SubscriptBox[“x”, “n”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “1”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “2”], “(“, “t”, “)”}], “,”, “…”, “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “n”], “(“, “t”, “)”}], “,”, “t”}], “)”}],
TraditionalForm]],
FontColor->RGBColor[0, 0, 1],ExpressionUUID->
“e6187ebd-8029-4341-bc90-c99c91bcbf74″],
StyleBox[” :5e76:4e14 :6211:4eec:5728:6b65:9aa41:4e2d:83b7:5f97
:7684:89e3:5bf9:5176:8fdb:884c:8bc4:4f30:3002:6211:4eec:83b7:5f97
t:7684:76f8:5173:77e9:9635:3002 :6211:4eec:770b:5230:5b83:4eec
:5bf9:4e8e:4e0b:6807[t:ff0c0]:548c:4e0b:6807[t:ff0c1]:4e4b:95f4
:7684:6240:6709t:662f:8d1f:ff08:6b63:ff09:5b9a:8fd8:662f:534a
:5b9a:3002 “,
FontColor->RGBColor[0, 0, 1]]
}], “Section”,
CellChangeTimes->{{3.817200881728973*^9, 3.817200921409487*^9}, {
3.817200971878495*^9, 3.817201091150765*^9}, 3.8172011338411303`*^9, {
3.819597755206192*^9, 3.819597802640832*^9}, {3.819771298796628*^9,
3.819771444685248*^9}, {3.819771489545629*^9, 3.819771492240012*^9}, {
3.819864449707823*^9, 3.8198645045464354`*^9}, {3.8198672436584187`*^9,
3.819867244156375*^9}, {3.819869093449439*^9, 3.819869095009832*^9}, {
3.819870562065694*^9, 3.819870598870105*^9}, {3.8198714957837763`*^9,
3.81987149612354*^9}, {3.8198715458550777`*^9, 3.819871556241169*^9}, {
3.81987205968849*^9, 3.819872060087903*^9}, 3.81987405661483*^9, {
3.819876925365471*^9, 3.8198770851315193`*^9}, 3.819877172150462*^9, {
3.8198772966748533`*^9, 3.819877404858596*^9}, {3.8198774378783484`*^9,
3.819877662280443*^9}, {3.8198776979178047`*^9, 3.819877754518136*^9},
3.819877852607432*^9, {3.819877889044113*^9, 3.819877909243535*^9}, {
3.819878002060999*^9, 3.8198780547829103`*^9}, {3.819878133845786*^9,
3.819878135658897*^9}, {3.8198791753669653`*^9, 3.819879176644911*^9}, {
3.81987957377249*^9, 3.819879655601418*^9}, {3.820065120242651*^9,
3.820065149362859*^9}, {3.820065196375762*^9, 3.8200652000822563`*^9}, {
3.820065288907792*^9, 3.82006532075235*^9}, {3.820065433612789*^9,
3.820065440258301*^9}, {3.8200654972548733`*^9, 3.820065571315331*^9}, {
3.820065629520011*^9, 3.820065746519677*^9}, {3.820065882375341*^9,
3.820065890729514*^9}, {3.820149534953415*^9, 3.820149541921431*^9}, {
3.8201496229485064`*^9, 3.8201496414450397`*^9}, {3.820149759664892*^9,
3.820150104419347*^9}, {3.820163612854485*^9, 3.8201636145346212`*^9}, {
3.8201682403959913`*^9, 3.820168257181389*^9}, 3.820169399884671*^9,
3.820170073731977*^9, {3.8201732672605*^9, 3.8201732672606707`*^9}, {
3.820289739310481*^9, 3.820289743453817*^9}, {3.8206730199897537`*^9,
3.820673157167601*^9}, {3.8206731995689707`*^9, 3.820673332280402*^9}, {
3.820673428817347*^9, 3.8206735798223763`*^9}, {3.820673862770445*^9,
3.820673907768141*^9}, {3.82067393888278*^9, 3.820673952428359*^9}, {
3.8206739990108643`*^9, 3.8206740603487988`*^9}, {3.820674099852577*^9,
3.820674556772933*^9}, {3.820674591584783*^9, 3.820674717510456*^9}, {
3.820674748784584*^9, 3.820674829959929*^9}, {3.8206748778873034`*^9,
3.820675038665572*^9}, {3.820675087801656*^9, 3.820675586764605*^9}, {
3.820675621641074*^9, 3.820675700417783*^9}, {3.8206757345527353`*^9,
3.820675813196856*^9}, {3.820678302053158*^9, 3.8206783117585897`*^9},
3.8206798491181707`*^9, 3.8206799041495028`*^9, {3.820683565440968*^9,
3.820683571080853*^9}, {3.820683626557125*^9, 3.820683785696706*^9}, {
3.820683819406172*^9, 3.8206839220944633`*^9}, {3.8206839529540586`*^9,
3.820683998300694*^9}, {3.8206857994910297`*^9, 3.82068597226221*^9}, {
3.820686843069919*^9, 3.820686861796937*^9}, {3.820691682072111*^9,
3.820691682881631*^9}, {3.820721942002515*^9, 3.820721956201913*^9}, {
3.8207240519860563`*^9, 3.82072407108545*^9}, {3.8207251663204193`*^9,
3.8207251666829443`*^9}, 3.820955934948271*^9, {3.820956478534778*^9,
3.820956531323358*^9}, {3.8209566889030313`*^9, 3.8209568728996897`*^9}, {
3.820957097479385*^9, 3.820957111577489*^9}, {3.820957143915786*^9,
3.820957169372243*^9}, {3.8209572025905657`*^9, 3.82095720434663*^9}, {
3.8209572423956957`*^9, 3.820957263705999*^9}, {3.820957358853178*^9,
3.820957380374864*^9}, {3.820957413210372*^9, 3.820957458531279*^9}},
FontSize->24,ExpressionUUID->”131a7657-0c0d-43ef-828b-8cab14d118a7″],

Cell[CellGroupData[{

Cell[TextData[{
“:8ba9:6211:4eec:6765:89e3:51b3:8fd9:4e2a:7ec3:4e60:ff1a

:6700:5927:5316 ”,
Cell[BoxData[
FormBox[
RowBox[{
SubsuperscriptBox[“[Integral]”, “0”, “1”],
RowBox[{
RowBox[{“(“,
RowBox[{
SuperscriptBox[
OverscriptBox[
SubscriptBox[“x”, “1”], “.”], “2”], “+”,
SuperscriptBox[
OverscriptBox[
SubscriptBox[“x”, “2”], “.”], “2”], “+”,
RowBox[{“2”,
SubscriptBox[“x”, “1”]}]}], “)”}], “dt”}]}], TraditionalForm]],
ExpressionUUID->”c9efd2b1-66c1-44d7-9cec-0dac0e50b477″],

:670d:4ece (“,
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
RowBox[{
RowBox[{
SubscriptBox[“x”, “1”], “(“, “0”, “)”}], “,”, ” “,
RowBox[{
SubscriptBox[“x”, “2”], “(“, “0”, “)”}]}], “)”}], ” “, “=”, ” “,
RowBox[{“(“,
RowBox[{“1”, “,”, “0”}], “)”}]}], TraditionalForm]],ExpressionUUID->
“af5452f2-c7a7-47c9-8336-256220bf74c5”],

(“,
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
RowBox[{
RowBox[{
SubscriptBox[“x”, “1”], “(“, “1”, “)”}], “,”, ” “,
RowBox[{
SubscriptBox[“x”, “2”], “(“, “1”, “)”}]}], “)”}], ” “, “=”, ” “,
RowBox[{“(“,
RowBox[{
FractionBox[“3”, “2”], “,”, “1”}], “)”}]}], TraditionalForm]],
ExpressionUUID->”526b63db-3b42-40de-9c3d-f81d09fdb0cf”]
}], “Subsection”,
CellChangeTimes->{{3.820678374302223*^9, 3.820678608120102*^9}, {
3.8209575172521257`*^9,
3.820957536967799*^9}},ExpressionUUID->”57e03a57-b844-4dad-b005-
790d729eb6d6″],

Cell[CellGroupData[{

Cell[“:6211:4eec:5b9a:4e49:65b9:7a0b”, “Subsubsection”,
CellChangeTimes->{{3.820676154462212*^9, 3.8206761831956778`*^9}, {
3.8206786175105257`*^9, 3.820678628483739*^9}, {3.820957550108878*^9,
3.820957553572344*^9}},ExpressionUUID->”76198bc1-9174-4283-8f02-
0fa081ef8d96″],

Cell[BoxData[{
RowBox[{
RowBox[{“F”, “[“,
RowBox[{“x1_”, “,”, “x2_”, “,”, “y1_”, “,”, “y2_”, “,”, “t_”}], “]”}], “:=”,
RowBox[{
RowBox[{
RowBox[{“(“, “y1”, “)”}], “^”, “2”}], “+”,
RowBox[{
RowBox[{“(“, “y2”, “)”}], “^”, “2”}], “+”,
RowBox[{“2”, “x1”}]}]}], “[IndentingNewLine]”,
RowBox[{“F”, “[“,
RowBox[{
RowBox[{“x1”, “[“, “t”, “]”}], “,”,
RowBox[{“x2”, “[“, “t”, “]”}], “,”,
RowBox[{
RowBox[{“x1”, “‘”}], “[“, “t”, “]”}], “,”,
RowBox[{
RowBox[{“x2”, “‘”}], “[“, “t”, “]”}], “,”, “t”}], “]”}]}], “Input”,
CellChangeTimes->{{3.820171198667041*^9, 3.8201712594523993`*^9}, {
3.820172133182332*^9, 3.8201721705005713`*^9}, {3.820172552588831*^9,
3.820172594062394*^9}, 3.820172630208955*^9, 3.820172802030273*^9, {
3.8201733920635967`*^9, 3.8201734425431213`*^9}, {3.820174408048565*^9,
3.820174426897347*^9}, {3.820250339247312*^9, 3.820250367955311*^9}, {
3.820587073540884*^9, 3.820587080851606*^9}, {3.820676032041382*^9,
3.820676079943347*^9}, {3.820676188379655*^9, 3.820676239552796*^9}},
CellLabel->”In[16]:=”,ExpressionUUID->”d2b28229-210c-484d-b8f8-fa1a3ebbcfef”]
}, Open ]],

Cell[CellGroupData[{

Cell[TextData[{
“:6b27:62c9:7684:5fc5:8981:6761:4ef6:3002 :5bf9:4e8e:6240:6709 t
[Epsilon] [“,
Cell[BoxData[
FormBox[
SubscriptBox[“t”, “0”], TraditionalForm]],ExpressionUUID->
“2b0a7256-362d-450a-ba30-f54904033878”],
“, “,
Cell[BoxData[
FormBox[
SubscriptBox[“t”, “1”], TraditionalForm]],ExpressionUUID->
“49f1139a-59ba-4657-8d93-7659886aa42f”],
“] :5df2:9a8c:8bc1:ff1a
”,
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
SubscriptBox[“F”,
SubscriptBox[“x”, “1”]], “(“,
RowBox[{
RowBox[{
SubscriptBox[“x”, “1”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[“x”, “2”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “1”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “2”], “(“, “t”, “)”}], “,”, “t”}], “)”}],
” “}], TraditionalForm]],ExpressionUUID->
“434acbbe-b6cd-4124-9148-98f38d04cf94”],
“-“,
Cell[BoxData[
FormBox[
FractionBox[“[DifferentialD]”,
RowBox[{“[DifferentialD]”, “t”}]], TraditionalForm]],ExpressionUUID->
“bb5a16cb-24e6-4f99-8e98-08c7c7474148″],
” (“,
Cell[BoxData[
FormBox[
RowBox[{
SubscriptBox[“F”,
OverscriptBox[
SubscriptBox[“x”, “1”], “.”]], “(“,
RowBox[{
RowBox[{
SubscriptBox[“x”, “1”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[“x”, “2”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “1”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “2”], “(“, “t”, “)”}], “,”, “t”}], “)”}],
TraditionalForm]],ExpressionUUID->”ca37bbd1-da3f-4b5d-bf92-12da0f8ead73″],
“) = 0
”,
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
SubscriptBox[“F”,
SubscriptBox[“x”, “2”]], “(“,
RowBox[{
RowBox[{
SubscriptBox[“x”, “1”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[“x”, “2”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “1”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “2”], “(“, “t”, “)”}], “,”, “t”}], “)”}],
” “}], TraditionalForm]],ExpressionUUID->
“4688da25-1b1b-4302-bda2-fc0e9b9028c4”],
“-“,
Cell[BoxData[
FormBox[
FractionBox[“[DifferentialD]”,
RowBox[{“[DifferentialD]”, “t”}]], TraditionalForm]],ExpressionUUID->
“eb258693-43b9-4925-9c62-59c0bf5d03ec”],
” (“,
Cell[BoxData[
FormBox[
RowBox[{
SubscriptBox[“F”,
OverscriptBox[
SubscriptBox[“x”, “2”], “.”]], “(“,
RowBox[{
RowBox[{
SubscriptBox[“x”, “1”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[“x”, “2”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “1”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “2”], “(“, “t”, “)”}], “,”, “t”}], “)”}],
TraditionalForm]],ExpressionUUID->”2b6c6589-e61d-4c3e-a975-cb221a8d688f”],
“) = 0”
}], “Subsubsection”,
CellChangeTimes->{{3.820676271519905*^9, 3.8206763593667803`*^9}, {
3.820957574923284*^9,
3.820957612531424*^9}},ExpressionUUID->”94da8189-7484-42c8-809e-
72f6a4684a6a”],

Cell[BoxData[
RowBox[{
RowBox[{“(*”, ” “,
RowBox[{
RowBox[{“para”, ” “, “i”}], “=”, “1”}], ” “, “*)”}],
“[IndentingNewLine]”,
RowBox[{
RowBox[{“dfx1”, “=”,
RowBox[{“D”, “[“,
RowBox[{
RowBox[{“F”, “[“,
RowBox[{
RowBox[{“x1”, “[“, “t”, “]”}], “,”,
RowBox[{“x2”, “[“, “t”, “]”}], “,”,
RowBox[{
RowBox[{“x1”, “‘”}], “[“, “t”, “]”}], “,”,
RowBox[{
RowBox[{“x2”, “‘”}], “[“, “t”, “]”}], “,”, “t”}], “]”}], “,”,
RowBox[{“x1”, “[“, “t”, “]”}]}], “]”}]}], ” “,
RowBox[{“(*”, ” “,
StyleBox[
RowBox[{“:6216:76f4:63a5″, ” “,
RowBox[{“D”, “[“,
RowBox[{
RowBox[{
RowBox[{
RowBox[{“(“,
RowBox[{
RowBox[{“x1”, “‘”}], “[“, “t”, “]”}], “)”}], “^”, “2”}], ” “, “+”,
” “,
RowBox[{
RowBox[{“(“,
RowBox[{
RowBox[{“x2”, “‘”}], “[“, “t”, “]”}], “)”}], “^”, “2”}], ” “, “+”,
” “,
RowBox[{“2”, “*”,
RowBox[{“x1”, “[“, “t”, “]”}]}]}], “,”, ” “,
RowBox[{“x1”, “[“, “t”, “]”}]}], “]”}]}],
FontSize->16],
StyleBox[” “,
FontSize->16], ” “, “*)”}], “[IndentingNewLine]”,
RowBox[{“dfx1p”, “=”,
RowBox[{“D”, “[“,
RowBox[{
RowBox[{“F”, “[“,
RowBox[{
RowBox[{“x1”, “[“, “t”, “]”}], “,”,
RowBox[{“x2”, “[“, “t”, “]”}], “,”,
RowBox[{
RowBox[{“x1”, “‘”}], “[“, “t”, “]”}], “,”,
RowBox[{
RowBox[{“x2”, “‘”}], “[“, “t”, “]”}], “,”, “t”}], “]”}], “,”,
RowBox[{
RowBox[{“x1”, “‘”}], “[“, “t”, “]”}]}], “]”}]}], ” “,
RowBox[{“(*”, ” “,
RowBox[{“:6216:76f4:63a5″, ” “,
RowBox[{“D”, “[“,
RowBox[{
RowBox[{
RowBox[{
RowBox[{“(“,
RowBox[{
RowBox[{“x1”, “‘”}], “[“, “t”, “]”}], “)”}], “^”, “2”}], ” “, “+”,
” “,
RowBox[{
RowBox[{“(“,
RowBox[{
RowBox[{“x2”, “‘”}], “[“, “t”, “]”}], “)”}], “^”, “2”}], ” “, “+”,
” “,
RowBox[{“2”, “*”,
RowBox[{“x1”, “[“, “t”, “]”}]}]}], “,”, ” “,
RowBox[{
RowBox[{“x1”, “‘”}], “[“, “t”, “]”}]}], “]”}]}], ” “, ” “, “*)”}],
“[IndentingNewLine]”,
RowBox[{“dfx1pt”, “=”,
RowBox[{“D”, “[“,
RowBox[{“dfx1p”, “,”, “t”}], “]”}]}], “[IndentingNewLine]”,
RowBox[{
RowBox[{“dfx1”, “-“, “dfx1pt”}], “==”, “0”}], ” “,
RowBox[{“(*”, ” “,
RowBox[{
RowBox[{“:8fd9:4e2a:6761:4ef6:662f:4e3a:4e86″,
StyleBox[” “,
FontWeight->”Bold”,
FontColor->RGBColor[0.6, 0.4, 0.2]],
StyleBox[“i”,
FontWeight->”Bold”,
FontColor->RGBColor[0.6, 0.4, 0.2]]}],
StyleBox[“=”,
FontWeight->”Bold”,
FontColor->RGBColor[0.6, 0.4, 0.2]],
StyleBox[“1″,
FontWeight->”Bold”,
FontColor->RGBColor[0.6, 0.4, 0.2]]}], ” “, “*)”}],
“[IndentingNewLine]”,
RowBox[{“(*”, ” “,
RowBox[{
RowBox[{“:4e3a:4e86″, ” “, “i”}], “=”, “2”}], ” “, “*)”}],
“[IndentingNewLine]”,
RowBox[{“dfx2”, “=”,
RowBox[{“D”, “[“,
RowBox[{
RowBox[{“F”, “[“,
RowBox[{
RowBox[{“x1”, “[“, “t”, “]”}], “,”,
RowBox[{“x2”, “[“, “t”, “]”}], “,”,
RowBox[{
RowBox[{“x1”, “‘”}], “[“, “t”, “]”}], “,”,
RowBox[{
RowBox[{“x2”, “‘”}], “[“, “t”, “]”}], “,”, “t”}], “]”}], “,”,
RowBox[{“x2”, “[“, “t”, “]”}]}], “]”}]}], ” “,
RowBox[{“(*”, ” “,
RowBox[{“:6216:76f4:63a5″, ” “,
RowBox[{“D”, “[“,
RowBox[{
RowBox[{
RowBox[{
RowBox[{“(“,
RowBox[{
RowBox[{“x1”, “‘”}], “[“, “t”, “]”}], “)”}], “^”, “2”}], ” “, “+”,
” “,
RowBox[{
RowBox[{“(“,
RowBox[{
RowBox[{“x2”, “‘”}], “[“, “t”, “]”}], “)”}], “^”, “2”}], ” “, “+”,
” “,
RowBox[{“2”, “*”,
RowBox[{“x1”, “[“, “t”, “]”}]}]}], “,”, ” “,
RowBox[{“x2”, “[“, “t”, “]”}]}], “]”}]}], ” “, ” “, “*)”}],
“[IndentingNewLine]”,
RowBox[{“dfx2p”, “=”,
RowBox[{“D”, “[“,
RowBox[{
RowBox[{“F”, “[“,
RowBox[{
RowBox[{“x1”, “[“, “t”, “]”}], “,”,
RowBox[{“x2”, “[“, “t”, “]”}], “,”,
RowBox[{
RowBox[{“x1”, “‘”}], “[“, “t”, “]”}], “,”,
RowBox[{
RowBox[{“x2”, “‘”}], “[“, “t”, “]”}], “,”, “t”}], “]”}], “,”,
RowBox[{
RowBox[{“x2”, “‘”}], “[“, “t”, “]”}]}], “]”}]}], ” “,
RowBox[{“(*”, ” “,
RowBox[{“:6216:76f4:63a5″, ” “,
RowBox[{“D”, “[“,
RowBox[{
RowBox[{
RowBox[{
RowBox[{“(“,
RowBox[{
RowBox[{“x1”, “‘”}], “[“, “t”, “]”}], “)”}], “^”, “2”}], ” “, “+”,
” “,
RowBox[{
RowBox[{“(“,
RowBox[{
RowBox[{“x2”, “‘”}], “[“, “t”, “]”}], “)”}], “^”, “2”}], ” “, “+”,
” “,
RowBox[{“2”, “*”,
RowBox[{“x1”, “[“, “t”, “]”}]}]}], “,”, ” “,
RowBox[{
RowBox[{“x2”, “‘”}], “[“, “t”, “]”}]}], “]”}]}], ” “, ” “, “*)”}],
“[IndentingNewLine]”,
RowBox[{“dfx2pt”, “=”,
RowBox[{“D”, “[“,
RowBox[{“dfx2p”, “,”, “t”}], “]”}]}], “[IndentingNewLine]”,
RowBox[{
RowBox[{“dfx2”, “-“, “dfx2pt”}], “==”, “0”, ” “,
RowBox[{“(*”, ” “,
StyleBox[
RowBox[{
RowBox[{“:8fd9:4e2a:6761:4ef6:662f:4e3a:4e86″, ” “, “i”}], “=”,
“2”}],
FontWeight->”Bold”,
FontColor->RGBColor[0.6, 0.4, 0.2]], ” “, “*)”}]}]}]}]], “Input”,
CellChangeTimes->{{3.820676480586906*^9, 3.8206765231372213`*^9}, {
3.820676580194697*^9, 3.820676728208047*^9}, {3.820676764319441*^9,
3.8206769874169893`*^9}, {3.820677253835836*^9, 3.8206772583524227`*^9}, {
3.8206773490415077`*^9, 3.82067740745492*^9}, {3.8206781008817167`*^9,
3.820678101897663*^9}, {3.820680336490818*^9, 3.820680422824914*^9}, {
3.8209576412061653`*^9,
3.820957713874213*^9}},ExpressionUUID->”1aef8f1c-41e2-4586-b2dd-
4ce9b09f6ff4″],

Cell[BoxData[
RowBox[{“(*”, ” “,
StyleBox[
RowBox[{
“:4e24:8005:53ef:4ee5:540c:65f6:5b8c:6210:5417”, “:ff1f”}],
FontSize->16], ” “, “*)”}]], “Input”,
CellChangeTimes->{{3.820680334749338*^9, 3.820680362492599*^9},
3.820957756921063*^9},ExpressionUUID->”61eee88a-2dd7-4a0f-b245-
e2ac19ea03f3″]
}, Open ]],

Cell[CellGroupData[{

Cell[TextData[{
“:521d:59cb:6761:4ef6:548c:6700:7ec8:6761:4ef6:ff1a
x(“,
Cell[BoxData[
FormBox[
SubscriptBox[“t”, “0”], TraditionalForm]],ExpressionUUID->
“1d0683f7-6cd4-4adf-ab5f-d288f28bbcd7”],
“) = “,
Cell[BoxData[
FormBox[
RowBox[{“(“,
RowBox[{
FormBox[
SuperscriptBox[
SubscriptBox[“x”, “1”], “0”],
TraditionalForm], “,”,
FormBox[
SuperscriptBox[
SubscriptBox[“x”, “2”], “0”],
TraditionalForm]}], “)”}], TraditionalForm]],ExpressionUUID->
“88e1251d-7430-4285-8606-a9e941bc7cd9”],

x(“,
Cell[BoxData[
FormBox[
SubscriptBox[“t”, “1”], TraditionalForm]],ExpressionUUID->
“3d9e293b-260a-488b-a989-3ddc1e68a719”],
“) =”,
Cell[BoxData[
FormBox[
RowBox[{” “,
RowBox[{“(“,
RowBox[{
FormBox[
SuperscriptBox[
SubscriptBox[“x”, “1”], “1”],
TraditionalForm], “,”,
FormBox[
SuperscriptBox[
SubscriptBox[“x”, “2”], “1”],
TraditionalForm]}], “)”}]}], TraditionalForm]],ExpressionUUID->
“e928e01d-8165-4316-b277-5bc6c8f04694”]
}], “Subsubsection”,
CellChangeTimes->{
3.8206770435632763`*^9, {3.820678224349848*^9, 3.820678232015733*^9}, {
3.820682178298421*^9, 3.820682188493539*^9},
3.8209577805962143`*^9},ExpressionUUID->”c826b3c7-aae3-4180-8317-
dc1d9d2613c3″],

Cell[BoxData[
RowBox[{
RowBox[{“(*”, ” “,
RowBox[{
RowBox[{“para”, ” “, “i”}], “=”, “1”}], ” “, “*)”}],
“[IndentingNewLine]”,
RowBox[{
RowBox[{
RowBox[{“x1”, “[“, “0”, “]”}], “==”, “1”}], ” “,
RowBox[{“(*”, ” “,
StyleBox[
RowBox[{
RowBox[{
RowBox[{
RowBox[{“o”, ” “, “:540c:6837″, ” “,
RowBox[{“x1”, “[“, “t”, “]”}]}], ” “, “==”, ” “, “1”}], ” “, “/.”,
” “,
RowBox[{“t”, ” “, “->”, ” “, “0”}]}], “,”, ” “,
“:56e0:4e3a:5b83:9002:5408:6211:4eec”}],
FontSize->16], ” “, “*)”}], “[IndentingNewLine]”,
RowBox[{
RowBox[{
RowBox[{“x1”, “[“, “t”, “]”}], “==”, “1”}], ” “, “/.”, ” “,
RowBox[{“t”, ” “, “->”, ” “, “0”}]}], “[IndentingNewLine]”,
RowBox[{
RowBox[{“x1”, “[“, “1”, “]”}], “==”,
RowBox[{“3”, “/”, “2”}]}], ” “,
RowBox[{“(*”, ” “,
RowBox[{
RowBox[{
RowBox[{
RowBox[{“o”, ” “, “:540c:6837″, ” “,
RowBox[{“x1”, “[“, “t”, “]”}]}], ” “, “==”, ” “,
RowBox[{“3”, “/”, “2”}]}], ” “, “/.”, ” “,
RowBox[{“t”, ” “, “->”, ” “, “1”}]}], “,”, ” “,
“:56e0:4e3a:5b83:9002:5408:6211:4eec”}], “*)”}],
“[IndentingNewLine]”,
RowBox[{“(*”, ” “,
RowBox[{
RowBox[{“para”, ” “, “i”}], “=”, “2”}], ” “, “*)”}],
“[IndentingNewLine]”,
RowBox[{
RowBox[{“x2”, “[“, “0”, “]”}], “==”, “0”}], ” “,
RowBox[{“(*”, ” “,
RowBox[{
RowBox[{
RowBox[{
RowBox[{“o”, ” “, “:540c:6837″, ” “,
RowBox[{“x2”, “[“, “t”, “]”}]}], ” “, “==”, ” “, “0”}], ” “, “/.”,
” “,
RowBox[{“t”, ” “, “->”, ” “, “0”}]}], “,”, ” “,
“:56e0:4e3a:5b83:9002:5408:6211:4eec”}], ” “, “*)”}],
“[IndentingNewLine]”,
RowBox[{
RowBox[{“x2”, “[“, “1”, “]”}], “==”, “1”, ” “,
RowBox[{“(*”, ” “,
RowBox[{
RowBox[{
RowBox[{
RowBox[{“o”, ” “, “:540c:6837″, ” “,
RowBox[{“x2”, “[“, “t”, “]”}]}], ” “, “==”, ” “, “1”}], ” “, “/.”,
” “,
RowBox[{“t”, ” “, “->”, ” “, “1”}]}], “,”, ” “,
“:56e0:4e3a:5b83:9002:5408:6211:4eec”}], ” “,
“*)”}]}]}]}]], “Input”,
CellChangeTimes->{{3.8206771209278297`*^9, 3.820677226904183*^9}, {
3.820677274341434*^9, 3.820677282191557*^9}, {3.82067742591891*^9,
3.820677480813656*^9}, {3.820677862069108*^9, 3.820677935077898*^9}, {
3.8206779735869417`*^9, 3.820678116921832*^9}, {3.820957789214396*^9,
3.820957856549262*^9}},ExpressionUUID->”f87c516c-aae0-4a6e-904b-
51b75588844a”],

Cell[BoxData[
RowBox[{“(*”, ” “,
RowBox[{
StyleBox[
RowBox[{“:662f”,
StyleBox[
“:5426:53ef:4ee5:540c:65f6:4f7f:7528:4e24:4e2a:5efa:8bae
:7684:9009:9879:6765:5b8c:6210”,
FontSize->16]}]],
StyleBox[“:ff1f”,
FontSize->16]}], ” “, “*)”}]], “Input”,
CellChangeTimes->{{3.8206804585782824`*^9, 3.8206804754743643`*^9}, {
3.820957930021645*^9,
3.820957936935807*^9}},ExpressionUUID->”781d48ac-4ea4-4303-91c7-
212d2610015f”],

Cell[BoxData[{
RowBox[{
RowBox[{“solucionEcEu”, “=”,
RowBox[{“DSolve”, “[“,
RowBox[{
RowBox[{
RowBox[{
RowBox[{“dfx1”, “-“, “dfx1pt”}], “==”, “0”}], ” “, “&&”, ” “,
RowBox[{
RowBox[{“dfx2”, “-“, “dfx2pt”}], “==”, “0”}], ” “, “&&”, ” “,
RowBox[{
RowBox[{“x1”, “[“, “0”, “]”}], “==”, “1”}], ” “, “&&”, ” “,
RowBox[{
RowBox[{“x1”, “[“, “1”, “]”}], “==”,
RowBox[{“3”, “/”, “2”}]}], ” “, “&&”, ” “,
RowBox[{
RowBox[{“x2”, “[“, “0”, “]”}], “==”, “0”}], ” “, “&&”, ” “,
RowBox[{
RowBox[{“x2”, “[“, “1”, “]”}], “==”, “1”}]}], “,”, ” “,
RowBox[{“{“,
RowBox[{
RowBox[{“x1”, “[“, “t”, “]”}], “,”, ” “,
RowBox[{“x2”, “[“, “t”, “]”}]}], “}”}], “,”, ” “, “t”}], “]”}]}], ” “,
RowBox[{“(*”, ” “,
StyleBox[“:6b65:9aa4:4e00″,
FontSize->24,
FontWeight->”Bold”,
FontColor->RGBColor[1, 0, 0]], ” “, “*)”}]}], “[IndentingNewLine]”,
RowBox[{
RowBox[{“(*”, ” “,
RowBox[{
RowBox[{“:540c:6837″,
StyleBox[” “,
FontSize->16],
StyleBox[
RowBox[{“DSolve”, “[“,
RowBox[{
RowBox[{“{“,
RowBox[{
RowBox[{
RowBox[{“dfx1”, “-“, “dfx1pt”}], “==”, “0”}], “,”, ” “,
RowBox[{
RowBox[{“dfx2”, “-“, “dfx2pt”}], “==”, “0”}], “,”, ” “,
RowBox[{
RowBox[{“x1”, “[“, “0”, “]”}], “==”, “1”}], “,”, ” “,
RowBox[{
RowBox[{“x1”, “[“, “1”, “]”}], “==”,
RowBox[{“3”, “/”, “2”}]}], “,”, ” “,
RowBox[{
RowBox[{“x2”, “[“, “0”, “]”}], “==”, “0”}], “,”, ” “,
RowBox[{
RowBox[{“x2”, “[“, “1”, “]”}], “==”, “1”}]}], “}”}], “,”, ” “,
RowBox[{“{“,
RowBox[{
RowBox[{“x1”, “[“, “t”, “]”}], “,”, ” “,
RowBox[{“x2”, “[“, “t”, “]”}]}], “}”}], “,”, ” “, “t”}], “]”}],
FontSize->16]}],
StyleBox[“,”,
FontSize->16],
StyleBox[” “,
FontSize->16],
StyleBox[
RowBox[{
RowBox[{“:6211:4eec:6700:559c:6b22:7684”, “.”, ” “, “O”}], ” “,
“incluso”, ” “,
RowBox[{“DSolve”, “[“,
RowBox[{
RowBox[{
RowBox[{“{“,
RowBox[{
RowBox[{“dfx1”, “-“, “dfx1pt”}], “,”, ” “,
RowBox[{“dfx2”, “-“, “dfx2pt”}], “,”, ” “,
RowBox[{“x1”, “[“, “0”, “]”}], “,”, ” “,
RowBox[{“x1”, “[“, “1”, “]”}], “,”, ” “,
RowBox[{“x2”, “[“, “0”, “]”}], “,”, ” “,
RowBox[{“x2”, “[“, “1”, “]”}]}], “}”}], ” “, “[Equal]”, ” “,
RowBox[{“{“,
RowBox[{“0”, “,”, “0”, “,”, “1”, “,”,
RowBox[{“3”, “/”, “2”}], “,”, “0”, “,”, “1”}], “}”}]}], “,”, ” “,
RowBox[{“{“,
RowBox[{
RowBox[{“x1”, “[“, “t”, “]”}], “,”, ” “,
RowBox[{“x2”, “[“, “t”, “]”}]}], “}”}], “,”, ” “, “t”}], “]”}], ” “,
“:62163:7684:6df7:5408″}],
FontSize->16]}], ” “, “*)”}]}]}], “Input”,
CellChangeTimes->{{3.820676467670429*^9, 3.820676477890044*^9}, {
3.820681064440233*^9, 3.820681087403254*^9}, {3.820681349985221*^9,
3.820681405254566*^9}, {3.8206815236875277`*^9, 3.82068153753932*^9}, {
3.820684107982387*^9, 3.820684117456483*^9}, {3.820684578163363*^9,
3.820684623187128*^9}, {3.820719695790457*^9, 3.8207198879107037`*^9}, {
3.820719980620525*^9, 3.820719996809572*^9}, {3.820720031343834*^9,
3.820720033938594*^9}, {3.8207204731704617`*^9, 3.820720488987903*^9}, {
3.820721535866868*^9, 3.8207215925699883`*^9}, {3.820957947175597*^9,
3.820957971556332*^9},
3.82095803376728*^9},ExpressionUUID->”2316eaed-d100-47c1-9e10-
93f9abab3201″],

Cell[BoxData[
RowBox[{“DSolve”, “[“,
RowBox[{
RowBox[{“{“,
RowBox[{
RowBox[{
RowBox[{“dfx1”, “-“, “dfx1pt”}], “==”, “0”}], “,”, ” “,
RowBox[{
RowBox[{“dfx2”, “-“, “dfx2pt”}], “==”, “0”}], “,”, ” “,
RowBox[{
RowBox[{“x1”, “[“, “0”, “]”}], “==”, “1”}], “,”, ” “,
RowBox[{
RowBox[{“x1”, “[“, “1”, “]”}], “==”,
RowBox[{“3”, “/”, “2”}]}], “,”, ” “,
RowBox[{
RowBox[{“x2”, “[“, “0”, “]”}], “==”, “0”}], “,”, ” “,
RowBox[{
RowBox[{“x2”, “[“, “1”, “]”}], “==”, “1”}]}], “}”}], “,”,
RowBox[{“{“,
RowBox[{
RowBox[{“x1”, “[“, “t”, “]”}], “,”, ” “,
RowBox[{“x2”, “[“, “t”, “]”}]}], “}”}], “,”, “t”}], “]”}]], “Input”,
CellChangeTimes->{{3.820719927637171*^9, 3.820719945964595*^9}},
CellLabel->”In[34]:=”,ExpressionUUID->”be6fa906-1ffb-4398-b42e-79a264a2c0ef”],

Cell[BoxData[
RowBox[{“DSolve”, “[“,
RowBox[{
RowBox[{
RowBox[{“{“,
RowBox[{
RowBox[{“dfx1”, “-“, “dfx1pt”}], “,”, ” “,
RowBox[{“dfx2”, “-“, “dfx2pt”}], “,”, ” “,
RowBox[{“x1”, “[“, “0”, “]”}], “,”, ” “,
RowBox[{“x1”, “[“, “1”, “]”}], “,”, ” “,
RowBox[{“x2”, “[“, “0”, “]”}], “,”, ” “,
RowBox[{“x2”, “[“, “1”, “]”}]}], “}”}], “[Equal]”,
RowBox[{“{“,
RowBox[{“0”, “,”, “0”, “,”, “1”, “,”,
RowBox[{“3”, “/”, “2”}], “,”, “0”, “,”, “1”}], “}”}]}], “,”,
RowBox[{“{“,
RowBox[{
RowBox[{“x1”, “[“, “t”, “]”}], “,”, ” “,
RowBox[{“x2”, “[“, “t”, “]”}]}], “}”}], “,”, “t”}], “]”}]], “Input”,
CellChangeTimes->{{3.8207199297712517`*^9, 3.820719949162763*^9}},
CellLabel->”In[35]:=”,ExpressionUUID->”dab611e7-0f08-4b96-8d87-139be333b5dd”],

Cell[BoxData[
RowBox[{
RowBox[{
“solucionEcEu:662f:53ef:80fd:7684:89e3:51b3:65b9:6848:7684:5217
:8868”, “:ff0c”, “:56e0:4e3a:53ea:67091:4e2a”,
StyleBox[“,”,
FontSize->16],
StyleBox[” “,
FontSize->16],
RowBox[{
StyleBox[
RowBox[{“solucionEcEu”, “[“,
RowBox[{“[“, “1”, “]”}], “]”}],
FontSize->16],
StyleBox[” “,
FontSize->16],
StyleBox[“:662f”,
FontSize->16],
StyleBox[
RowBox[{“{“,
RowBox[{
RowBox[{
RowBox[{“x1”, “[“, “t”, “]”}], “[Rule]”,
RowBox[{
FractionBox[“1”, “2”], ” “,
RowBox[{“(“,
RowBox[{“2”, “+”,
SuperscriptBox[“t”, “2”]}], “)”}]}]}], “,”,
RowBox[{
RowBox[{“x2”, “[“, “t”, “]”}], “[Rule]”, “t”}]}], “}”}],
FontSize->16],
StyleBox[” “,
FontSize->16], “:662f:6211:4eec:611f:5174:8da3:7684”}]}],
“*)”}]], “Input”,
CellChangeTimes->{{3.820685068797776*^9, 3.8206851972183*^9}, {
3.820958067732493*^9, 3.820958094092142*^9}, {3.820958130362143*^9,
3.820958145660549*^9}},ExpressionUUID->”cd119ef3-e732-4a1e-bd76-
12c9cbde4658″]
}, Open ]],

Cell[CellGroupData[{

Cell[TextData[{
“:52d2:8ba9:5fb7:7684:5fc5:8981:6761:4ef6:3002:5982:679c:6240
:6709t [Epsilon] [“,
Cell[BoxData[
FormBox[
SubscriptBox[“t”, “0”], TraditionalForm]],ExpressionUUID->
“138da483-0999-4aeb-979f-16fccef8638e”],
“, “,
Cell[BoxData[
FormBox[
SubscriptBox[“t”, “1”], TraditionalForm]],ExpressionUUID->
“979150f3-b5df-4589-86ae-5e0f25f88c06”],
“] :68c0:9a8c:77e9:9635
“,
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
SubscriptBox[“F”,
RowBox[{
OverscriptBox[“x”, “.”], ” “,
OverscriptBox[“x”, “.”]}]], “(“,
RowBox[{
RowBox[{
SubscriptBox[“x”, “1”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[“x”, “2”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “1”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “2”], “(“, “t”, “)”}], “,”, “t”}], “)”}],
” “, “=”,
RowBox[{“(“, GridBox[{
{
RowBox[{
SubscriptBox[“F”,
RowBox[{
OverscriptBox[
SubscriptBox[“x”, “1”], “.”], ” “,
OverscriptBox[
SubscriptBox[“x”, “1”], “.”]}]], “(“,
RowBox[{
RowBox[{
SubscriptBox[“x”, “1”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[“x”, “2”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “1”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “2”], “(“, “t”, “)”}], “,”, “t”}], “)”}],
RowBox[{
SubscriptBox[“F”,
RowBox[{
OverscriptBox[
SubscriptBox[“x”, “1”], “.”], ” “,
OverscriptBox[
SubscriptBox[“x”, “2”], “.”]}]], “(“,
RowBox[{
RowBox[{
SubscriptBox[“x”, “1”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[“x”, “2”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “1”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “2”], “(“, “t”, “)”}], “,”, “t”}], “)”}]},
{
RowBox[{
SubscriptBox[“F”,
RowBox[{
OverscriptBox[
SubscriptBox[“x”, “2”], “.”], ” “,
OverscriptBox[
SubscriptBox[“x”, “1”], “.”]}]], “(“,
RowBox[{
RowBox[{
SubscriptBox[“x”, “1”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[“x”, “2”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “1”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “2”], “(“, “t”, “)”}], “,”, “t”}], “)”}],
RowBox[{
SubscriptBox[“F”,
RowBox[{
OverscriptBox[
SubscriptBox[“x”, “2”], “.”], ” “,
OverscriptBox[
SubscriptBox[“x”, “2”], “.”]}]], “(“,
RowBox[{
RowBox[{
SubscriptBox[“x”, “1”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[“x”, “2”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “1”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “2”], “(“, “t”, “)”}], “,”, “t”}],
“)”}]}
}], “)”}]}], TraditionalForm]], “Subsection”,ExpressionUUID->
“51642c66-3ee7-4e41-aea2-e0179fbe736b”],

:4ed6:662f:6b63:5b9a:6216:8005:8d1f:7684:534a:5b9a”
}], “Subsubsection”,
CellChangeTimes->{
3.820677110646001*^9, {3.8206781517655687`*^9, 3.8206781684352417`*^9}, {
3.820678239247151*^9, 3.8206782791774473`*^9}, {3.820685425386841*^9,
3.8206854269073343`*^9}, 3.820958173798579*^9, {3.820958205678205*^9,
3.820958260861163*^9}},ExpressionUUID->”61e4c654-654f-4f36-a4f2-
c8569a9f49b5″],

Cell[BoxData[{
RowBox[{“dfx1px1p”, ” “, “=”,
RowBox[{“D”, “[“,
RowBox[{“dfx1p”, “,”,
RowBox[{
RowBox[{“x1”, “‘”}], “[“, “t”, “]”}]}], “]”}]}], “[IndentingNewLine]”,
RowBox[{“dfx1px2p”, ” “, “=”, ” “,
RowBox[{“D”, “[“,
RowBox[{“dfx1p”, “,”,
RowBox[{
RowBox[{“x2”, “‘”}], “[“, “t”, “]”}]}], “]”}]}], “[IndentingNewLine]”,
RowBox[{“dfx2px1p”, ” “, “=”, ” “,
RowBox[{“D”, “[“,
RowBox[{“dfx2p”, “,”,
RowBox[{
RowBox[{“x1”, “‘”}], “[“, “t”, “]”}]}], “]”}]}], “[IndentingNewLine]”,
RowBox[{“dfx2px2p”, ” “, “=”, ” “,
RowBox[{“D”, “[“,
RowBox[{“dfx2p”, “,”, ” “,
RowBox[{
RowBox[{“x2”, “‘”}], “[“, “t”, “]”}]}], “]”}]}], “[IndentingNewLine]”,
RowBox[{“matrizLegendre”, “=”,
RowBox[{“{“,
RowBox[{
RowBox[{“{“,
RowBox[{“dfx1px1p”, “,”, ” “, “dfx1px2p”}], “}”}], “,”,
RowBox[{“{“,
RowBox[{“dfx2px1p”, “,”, “dfx2px2p”}], “}”}]}], “}”}]}]}], “Input”,
CellChangeTimes->{
3.820678720722122*^9, {3.82067879906155*^9, 3.820678998787842*^9}, {
3.8206791130205183`*^9, 3.820679174511094*^9}, {3.820680657110997*^9,
3.820680668399428*^9}, 3.820680700243775*^9},
CellLabel->”In[37]:=”,ExpressionUUID->”663187ca-3c4b-4ce1-93e0-1098b6edd0b6″],

Cell[BoxData[
RowBox[{
RowBox[{“(*”, ” “,
StyleBox[
RowBox[{
“:77e9:9635:6240:9700:76844:4e2a:5bfc:6570:662f:5426:53ef:4ee5
:7528:4e00:4e2a:8ba2:5355:751f:6210”, “:ff1f”}],
FontSize->16], ” “, “*)”}], ” “}]], “Input”,
CellChangeTimes->{{3.820680706047986*^9, 3.820680824839057*^9}, {
3.8206846516043262`*^9, 3.820684652636174*^9},
3.820958327632271*^9},ExpressionUUID->”ff164f55-7f55-44c6-98be-
c45262a5a224″],

Cell[BoxData[
RowBox[{“matrizLegendre2″, ” “, “=”,
RowBox[{“matrizLegendre”, ” “, “/.”,
RowBox[{“solucionEcEu”, “[“,
RowBox[{“[“, “1”, “]”}], “]”}], ” “,
RowBox[{“(*”, ” “,
RowBox[{
StyleBox[
RowBox[{
“la”, ” “, “matriz”, ” “, “de”, ” “, “Legendre”, ” “, “evaluada”, ” “,
“en”, ” “,
RowBox[{“x1”, “[“, “t”, “]”}]}],
FontSize->16],
StyleBox[“,”,
FontSize->16],
StyleBox[” “,
FontSize->16],
StyleBox[
RowBox[{“x2”, “[“, “t”, “]”}],
FontSize->16],
StyleBox[“,”,
FontSize->16],
RowBox[{
StyleBox[“…”,
FontSize->16],
StyleBox[” “,
FontSize->16],
RowBox[{
StyleBox[“:4e0a:8ff0:89e3:51b3:65b9:6848”,
FontSize->16],
StyleBox[“.”,
FontSize->16],
StyleBox[” “,
FontSize->16],
“:5b83:662f:6240:6709t:7684:5e38:6570:77e9:9635”}]}]}],
“*)”}]}]}]], “Input”,
CellChangeTimes->{{3.820681554747373*^9, 3.8206815602542562`*^9}, {
3.820681761154562*^9, 3.820681815104191*^9}, {3.820681907787921*^9,
3.820682035760227*^9}, {3.8206841642185926`*^9, 3.820684168009575*^9}, {
3.8206849549459476`*^9, 3.820684982331181*^9}, {3.82068501351586*^9,
3.820685014640051*^9}, {3.820685616988566*^9, 3.8206856600946503`*^9}, {
3.820686013536788*^9, 3.8206860201956263`*^9}, {3.820958349658012*^9,
3.820958361179536*^9}},ExpressionUUID->”3df2663c-8bb8-4bd1-8800-
27d4cfcba356″],

Cell[BoxData[{
RowBox[{“PositiveDefiniteMatrixQ”, “[“, “matrizLegendre2”,
“]”}], “[IndentingNewLine]”,
RowBox[{
RowBox[{“PositiveSemidefiniteMatrixQ”, “[“, “matrizLegendre2”, “]”}], ” “,
RowBox[{“(*”, “:7b2c:4e8c:90e8”, “*)”}]}]}], “Input”,
CellChangeTimes->{{3.8206819015837107`*^9, 3.820681904173092*^9},
3.820681934321081*^9, 3.820682052171298*^9, {3.820684664233609*^9,
3.8206846680949717`*^9}, {3.820684932164666*^9, 3.820684937801443*^9}, {
3.8206852295652027`*^9, 3.820685239475527*^9}, {3.820685454407723*^9,
3.820685463111816*^9}, {3.820685733333601*^9, 3.820685738658203*^9}, {
3.820686029448394*^9, 3.820686030425474*^9}, {3.8207218333703117`*^9,
3.820721835276466*^9}, 3.820721868779636*^9,
3.8209583795186043`*^9},ExpressionUUID->”173d35fc-1180-4950-91eb-
aaf230a68054″]
}, Open ]]
}, Open ]],

Cell[CellGroupData[{

Cell[TextData[{
“:5145:5206:6761:4ef6. :5bf9:4e8e:6240:6709t [Epsilon] [“,
Cell[BoxData[
FormBox[
SubscriptBox[“t”, “0”], TraditionalForm]],ExpressionUUID->
“7f251f7e-21bf-4eec-867c-aed8c736dade”],
“, “,
Cell[BoxData[
FormBox[
SubscriptBox[“t”, “1”], TraditionalForm]],ExpressionUUID->
“1b64a699-1acd-4e9d-b7a5-216e4e43e8fb”],
“] :90fd:53ef:4ee5:9a8c:8bc1:77e9:9635
“,
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
SubscriptBox[“F”,
RowBox[{
RowBox[{“(“,
RowBox[{“x”,
OverscriptBox[“x”, “.”]}], “)”}],
RowBox[{“(“,
RowBox[{“x”,
OverscriptBox[“x”, “.”]}], “)”}]}]], “(“,
RowBox[{
RowBox[{
SubscriptBox[“x”, “1”], “(“, “t”, “)”}], “,”, “…”, “,”,
RowBox[{
SubscriptBox[“x”, “n”], “(“, “t”, “)”}], “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “1”], “(“, “t”, “)”}], “,”, “…”, “,”,
RowBox[{
SubscriptBox[
OverscriptBox[“x”, “.”], “n”], “(“, “t”, “)”}], “,”, “t”}], “)”}],
” “, “=”, “[IndentingNewLine]”,
RowBox[{“=”,
RowBox[{“(“, GridBox[{
{
RowBox[{
SubscriptBox[“F”,
RowBox[{
SubscriptBox[“x”, “1”], ” “,
SubscriptBox[“x”, “1”]}]], “(“,
RowBox[{
RowBox[{“x”, “(“, “t”, “)”}], “,”,
RowBox[{
OverscriptBox[“x”, “.”], “(“, “t”, “)”}], “,”, “t”}], “)”}],
RowBox[{
SubscriptBox[“F”,
RowBox[{
SubscriptBox[“x”, “1”], ” “,
SubscriptBox[“x”, “2”]}]],
RowBox[{“(“,
RowBox[{
RowBox[{“x”,
RowBox[{“(“, “t”, “)”}]}], “,”,
RowBox[{
OverscriptBox[“x”, “.”],
RowBox[{“(“, “t”, “)”}]}], “,”, “t”}], “)”}]}],
RowBox[{
SubscriptBox[“F”,
RowBox[{
SubscriptBox[“x”, “1”], ” “,
OverscriptBox[
SubscriptBox[“x”, “1”], “.”]}]],
RowBox[{“(“,
RowBox[{
RowBox[{“x”,
RowBox[{“(“, “t”, “)”}]}], “,”,
RowBox[{
OverscriptBox[“x”, “.”],
RowBox[{“(“, “t”, “)”}]}], “,”, “t”}], “)”}]}],
RowBox[{
SubscriptBox[“F”,
RowBox[{
SubscriptBox[“x”, “1”], ” “,
OverscriptBox[
SubscriptBox[“x”, “2”], “.”]}]],
RowBox[{“(“,
RowBox[{
RowBox[{“x”,
RowBox[{“(“, “t”, “)”}]}], “,”,
RowBox[{
OverscriptBox[“x”, “.”],
RowBox[{“(“, “t”, “)”}]}], “,”, “t”}], “)”}]}]},
{
RowBox[{
SubscriptBox[“F”,
RowBox[{
SubscriptBox[“x”, “2”], ” “,
SubscriptBox[“x”, “1”]}]],
RowBox[{“(“,
RowBox[{
RowBox[{“x”,
RowBox[{“(“, “t”, “)”}]}], “,”,
RowBox[{
OverscriptBox[“x”, “.”],
RowBox[{“(“, “t”, “)”}]}], “,”, “t”}], “)”}]}],
RowBox[{
SubscriptBox[“F”,
RowBox[{
SubscriptBox[“x”, “2”], ” “,
SubscriptBox[“x”, “2”]}]],
RowBox[{“(“,
RowBox[{
RowBox[{“x”,
RowBox[{“(“, “t”, “)”}]}], “,”,
RowBox[{
OverscriptBox[“x”, “.”],
RowBox[{“(“, “t”, “)”}]}], “,”, “t”}], “)”}]}],
RowBox[{
SubscriptBox[“F”,
RowBox[{
SubscriptBox[“x”, “2”], ” “,
OverscriptBox[
SubscriptBox[“x”, “1”], “.”]}]],
RowBox[{“(“,
RowBox[{
RowBox[{“x”,
RowBox[{“(“, “t”, “)”}]}], “,”,
RowBox[{
OverscriptBox[“x”, “.”],
RowBox[{“(“, “t”, “)”}]}], “,”, “t”}], “)”}]}],
RowBox[{
SubscriptBox[“F”,
RowBox[{
SubscriptBox[“x”, “2”], ” “,
OverscriptBox[
SubscriptBox[“x”, “2”], “.”]}]],
RowBox[{“(“,
RowBox[{
RowBox[{“x”,
RowBox[{“(“, “t”, “)”}]}], “,”,
RowBox[{
OverscriptBox[“x”, “.”],
RowBox[{“(“, “t”, “)”}]}], “,”, “t”}], “)”}]}]},
{
RowBox[{
SubscriptBox[“F”,
RowBox[{
OverscriptBox[
SubscriptBox[“x”, “1”], “.”], ” “,
SubscriptBox[“x”, “1”]}]],
RowBox[{“(“,
RowBox[{
RowBox[{“x”,
RowBox[{“(“, “t”, “)”}]}], “,”,
RowBox[{
OverscriptBox[“x”, “.”],
RowBox[{“(“, “t”, “)”}]}], “,”, “t”}], “)”}]}],
RowBox[{
SubscriptBox[“F”,
RowBox[{
OverscriptBox[
SubscriptBox[“x”, “1”], “.”], ” “,
SubscriptBox[“x”, “2”]}]],
RowBox[{“(“,
RowBox[{
RowBox[{“x”,
RowBox[{“(“, “t”, “)”}]}], “,”,
RowBox[{
OverscriptBox[“x”, “.”],
RowBox[{“(“, “t”, “)”}]}], “,”, “t”}], “)”}]}],
RowBox[{
SubscriptBox[“F”,
RowBox[{
OverscriptBox[
SubscriptBox[“x”, “1”], “.”], ” “,
OverscriptBox[
SubscriptBox[“x”, “1”], “.”]}]],
RowBox[{“(“,
RowBox[{
RowBox[{“x”,
RowBox[{“(“, “t”, “)”}]}], “,”,
RowBox[{
OverscriptBox[“x”, “.”],
RowBox[{“(“, “t”, “)”}]}], “,”, “t”}], “)”}]}],
RowBox[{
SubscriptBox[“F”,
RowBox[{
OverscriptBox[
SubscriptBox[“x”, “1”], “.”], ” “,
OverscriptBox[
SubscriptBox[“x”, “2”], “.”]}]],
RowBox[{“(“,
RowBox[{
RowBox[{“x”,
RowBox[{“(“, “t”, “)”}]}], “,”,
RowBox[{
OverscriptBox[“x”, “.”],
RowBox[{“(“, “t”, “)”}]}], “,”, “t”}], “)”}]}]},
{
RowBox[{
SubscriptBox[“F”,
RowBox[{
OverscriptBox[
SubscriptBox[“x”, “2”], “.”], ” “,
SubscriptBox[“x”, “1”]}]], “(“,
RowBox[{
RowBox[{“x”, “(“, “t”, “)”}], “,”,
RowBox[{
OverscriptBox[“x”, “.”], “(“, “t”, “)”}], “,”, “t”}], “)”}],
RowBox[{
SubscriptBox[“F”,
RowBox[{
OverscriptBox[
SubscriptBox[“x”, “2”], “.”], ” “,
SubscriptBox[“x”, “2”]}]], “(“,
RowBox[{
RowBox[{“x”, “(“, “t”, “)”}], “,”,
RowBox[{
OverscriptBox[“x”, “.”], “(“, “t”, “)”}], “,”, “t”}], “)”}],
RowBox[{
SubscriptBox[“F”,
RowBox[{
OverscriptBox[
SubscriptBox[“x”, “2”], “.”], ” “,
OverscriptBox[
SubscriptBox[“x”, “1”], “.”]}]],
RowBox[{“(“,
RowBox[{
RowBox[{“x”,
RowBox[{“(“, “t”, “)”}]}], “,”,
RowBox[{
OverscriptBox[“x”, “.”],
RowBox[{“(“, “t”, “)”}]}], “,”, “t”}], “)”}]}],
RowBox[{
SubscriptBox[“F”,
RowBox[{
OverscriptBox[
SubscriptBox[“x”, “2”], “.”], ” “,
OverscriptBox[
SubscriptBox[“x”, “2”], “.”]}]],
RowBox[{“(“,
RowBox[{
RowBox[{“x”,
RowBox[{“(“, “t”, “)”}]}], “,”,
RowBox[{
OverscriptBox[“x”, “.”],
RowBox[{“(“, “t”, “)”}]}], “,”, “t”}], “)”}]}]}
}], “)”}]}]}], TraditionalForm]], “Subsection”,ExpressionUUID->
“dd05654e-affe-42f6-8a15-62fff68321f2”],

:4ed6:7684:6b63:5b9a:6216:8005:662f:8d1f:7684:534a:5b9a”
}], “Subsection”,
CellChangeTimes->{{3.8206790299822083`*^9, 3.820679109898031*^9}, {
3.820679273097007*^9, 3.82067927670579*^9}, {3.8206854361937847`*^9,
3.82068543735753*^9}, {3.820765857414011*^9, 3.820766113299076*^9}, {
3.82095841259173*^9,
3.8209584770030127`*^9}},ExpressionUUID->”874140cf-d360-4545-8a83-
eada8b65eedb”],

Cell[BoxData[{
RowBox[{“dfx1x1″, ” “, “=”,
RowBox[{“D”, “[“,
RowBox[{“dfx1”, “,”,
RowBox[{“x1”, “[“, “t”, “]”}]}], “]”}]}], “[IndentingNewLine]”,
RowBox[{“dfx1x2″, ” “, “=”, ” “,
RowBox[{“D”, “[“,
RowBox[{“dfx1”, “,”,
RowBox[{“x2”, “[“, “t”, “]”}]}], “]”}]}], “[IndentingNewLine]”,
RowBox[{“dfx1x1p”, ” “, “=”, ” “,
RowBox[{“D”, “[“,
RowBox[{“dfx1”, “,”,
RowBox[{
RowBox[{“x1”, “‘”}], “[“, “t”, “]”}]}], “]”}]}], “[IndentingNewLine]”,
RowBox[{“dfx1x2p”, ” “, “=”, ” “,
RowBox[{“D”, “[“,
RowBox[{“dfx1”, “,”, ” “,
RowBox[{
RowBox[{“x2”, “‘”}], “[“, “t”, “]”}]}], “]”}]}], “[IndentingNewLine]”,
RowBox[{“dfx2x1″, ” “, “=”,
RowBox[{“D”, “[“,
RowBox[{“dfx2”, “,”,
RowBox[{“x1”, “[“, “t”, “]”}]}], “]”}]}], “[IndentingNewLine]”,
RowBox[{“dfx2x2″, ” “, “=”, ” “,
RowBox[{“D”, “[“,
RowBox[{“dfx2”, “,”,
RowBox[{“x2”, “[“, “t”, “]”}]}], “]”}]}], “[IndentingNewLine]”,
RowBox[{“dfx2x1p”, ” “, “=”, ” “,
RowBox[{“D”, “[“,
RowBox[{“dfx2”, “,”,
RowBox[{
RowBox[{“x1”, “‘”}], “[“, “t”, “]”}]}], “]”}]}], “[IndentingNewLine]”,
RowBox[{“dfx2x2p”, ” “, “=”, ” “,
RowBox[{“D”, “[“,
RowBox[{“dfx2”, “,”, ” “,
RowBox[{
RowBox[{“x2”, “‘”}], “[“, “t”, “]”}]}], “]”}]}], “[IndentingNewLine]”,
RowBox[{“dfx1px1″, ” “, “=”,
RowBox[{“D”, “[“,
RowBox[{“dfx1p”, “,”,
RowBox[{“x1”, “[“, “t”, “]”}]}], “]”}]}], “[IndentingNewLine]”,
RowBox[{
RowBox[{“dfx1px2″, ” “, “=”, ” “,
RowBox[{“D”, “[“,
RowBox[{“dfx1p”, “,”,
RowBox[{“x2”, “[“, “t”, “]”}]}], “]”}]}], “[IndentingNewLine]”,
RowBox[{“(*”, ” “,
RowBox[{“dfx1px1p”, ” “, “:6211:4eec:5df2:7ecf:6709:5b83:4e86″}],
” “, “*)”}], “[IndentingNewLine]”,
RowBox[{“(*”, ” “,
RowBox[{“dfx1px2p”, ” “, “:6211:4eec:5df2:7ecf:6709:5b83:4e86″}],
” “, “*)”}]}], “[IndentingNewLine]”,
RowBox[{“dfx2px1″, ” “, “=”,
RowBox[{“D”, “[“,
RowBox[{“dfx2p”, “,”,
RowBox[{“x1”, “[“, “t”, “]”}]}], “]”}]}], “[IndentingNewLine]”,
RowBox[{
RowBox[{“dfx2px2″, ” “, “=”, ” “,
RowBox[{“D”, “[“,
RowBox[{“dfx2p”, “,”,
RowBox[{“x2”, “[“, “t”, “]”}]}], “]”}]}], “[IndentingNewLine]”,
RowBox[{“(*”, ” “,
RowBox[{“dfx2px1p”, ” “, “:6211:4eec:5df2:7ecf:6709:5b83:4e86″}],
” “, “*)”}], “[IndentingNewLine]”,
RowBox[{“(*”, ” “,
RowBox[{“dfx2px2p”, ” “, “:6211:4eec:5df2:7ecf:6709:5b83:4e86″}],
” “, “*)”}], “[IndentingNewLine]”}], “[IndentingNewLine]”,
RowBox[{“matrizSuficiente”, “=”,
RowBox[{“{“,
RowBox[{
RowBox[{“{“,
RowBox[{
“dfx1x1”, “,”, ” “, “dfx1x2”, “,”, ” “, “dfx1x1p”, “,”, ” “, “dfx1x2p”}],
“}”}], “,”,
RowBox[{“{“,
RowBox[{
“dfx2x1”, “,”, ” “, “dfx2x2”, “,”, “dfx2x1p”, “,”, ” “, “dfx2x2p”}],
“}”}], “,”,
RowBox[{“{“,
RowBox[{
“dfx1px1”, “,”, ” “, “dfx1px2”, “,”, ” “, “dfx1px1p”, “,”, ” “,
“dfx1px2p”}], “}”}], “,”,
RowBox[{“{“,
RowBox[{
“dfx2px1”, “,”, “dfx2px2”, “,”, ” “, “dfx2px1p”, “,”, ” “, “dfx2px2p”}],
“}”}]}], “}”}]}]}], “Input”,
CellChangeTimes->{{3.820679295057271*^9, 3.8206797082316628`*^9}, {
3.820680844676613*^9, 3.820680878394144*^9}, {3.8209584998279753`*^9,
3.820958510746643*^9}},ExpressionUUID->”95533dd6-f111-417a-b955-
61f250018732″],

Cell[BoxData[
RowBox[{
RowBox[{“(*”, ” “,
StyleBox[
RowBox[{
“:6211:4eec:77e9:9635:6240:9700:7684:6240:6709:5bfc:6570:90fd
:53ef:4ee5:7528:4e00:4e2a:8ba2:5355:5b8c:6210:5417”, “:ff1f”}],
FontSize->16], ” “, “*)”}], ” “}]], “Input”,
CellChangeTimes->{{3.820680887562001*^9, 3.820680888183661*^9},
3.820680924756117*^9, 3.8206852580376863`*^9,
3.820958537550439*^9},ExpressionUUID->”7feb8f13-6de1-4d13-87fd-
fb2706b794c0″],

Cell[BoxData[
RowBox[{“matrizSuficiente2”, “=”, ” “,
RowBox[{“matrizSuficiente”, “/.”,
RowBox[{“solucionEcEu”, “[“,
RowBox[{“[“, “1”, “]”}], “]”}], ” “,
RowBox[{“(*”, ” “,
StyleBox[
RowBox[{
RowBox[{
“la”, ” “, “matriz”, ” “, “de”, ” “, “la”, ” “, “condici[OAcute]n”,
” “, “suficiente”, ” “, “en”, ” “,
RowBox[{“x1”, “[“, “t”, “]”}]}], “,”, ” “,
RowBox[{“x2”, “[“, “t”, “]”}], “,”,
RowBox[{“…”, ” “, “:4ee5:4e0a:89e3:51b3:65b9:6848”}], “:3002”,
“:5b83:662f:6240:6709t:7684:5e38:6570:77e9:9635″}],
FontSize->16], ” “, “*)”}]}]}]], “Input”,
CellChangeTimes->{
3.820681628468617*^9, {3.820681858717572*^9, 3.820681872396052*^9}, {
3.820682073835137*^9, 3.820682076252119*^9}, {3.820685263652842*^9,
3.820685264790658*^9}, {3.820685670229444*^9, 3.820685680864684*^9},
3.820686044443693*^9,
3.82095855629106*^9},ExpressionUUID->”983cec1b-a34b-4458-b9a0-
821a0d7a54eb”],

Cell[BoxData[{
RowBox[{“PositiveDefiniteMatrixQ”, “[“, “matrizSuficiente2”,
“]”}], “[IndentingNewLine]”,
RowBox[{
RowBox[{“PositiveSemidefiniteMatrixQ”, “[“, “matrizSuficiente2”, “]”}], ” “,
RowBox[{“(*”, ” “, “:6b65:9aa43”, “*)”}]}]}], “Input”,
CellChangeTimes->{
3.8206820890387373`*^9, 3.820685268704315*^9, 3.820685349710012*^9, {
3.820685481760621*^9, 3.820685486002843*^9}, {3.820685687209652*^9,
3.8206857285506144`*^9}, 3.820686036025312*^9, {3.820721839973401*^9,
3.820721882090117*^9}, {3.820958629647448*^9,
3.820958632674079*^9}},ExpressionUUID->”b384ccb7-1c1b-4fcb-b6ac-
44512b40e85c”],

Cell[CellGroupData[{

Cell[TextData[{
“:7531:4e8e:7b2c:4e00:4e2a:77e9:9635:662f:6b63:5b9a:7684:ff0c
:7b2c:4e8c:4e2a:534a:5b9a:662f:6b63:7684:ff0c:56e0:6b64:6240:63d0
:51fa:95ee:9898:7684:5168:5c40:6700:5927:503c:662f:5728
solutionEcEu [[1]]:4e2d:83b7:5f97:7684:51fd:6570:ff0c:5373 “,
Cell[BoxData[
RowBox[{“{“,
RowBox[{
RowBox[{
RowBox[{“x1”, “[“, “t”, “]”}], “[Rule]”,
RowBox[{
FractionBox[“1”, “2”], ” “,
RowBox[{“(“,
RowBox[{“2”, “+”,
SuperscriptBox[“t”, “2”]}], “)”}]}]}], “,”,
RowBox[{
RowBox[{“x2”, “[“, “t”, “]”}], “[Rule]”, “t”}]}], “}”}]],
CellChangeTimes->{{3.820685383118876*^9, 3.8206853947036123`*^9}, {
3.8206860798634653`*^9, 3.820686099054778*^9}, 3.8206861566476183`*^9},
ExpressionUUID->”50360823-a96b-4b1c-ba56-eb33524e9396″],
“. Esto es:
x1(t) = “,
Cell[BoxData[
FormBox[
FractionBox[“1”, “2”], TraditionalForm]],ExpressionUUID->
“c5bc8f13-102f-48b7-9c0e-4982a842e025”],
“(2+”,
Cell[BoxData[
FormBox[
SuperscriptBox[“t”, “2”], TraditionalForm]],ExpressionUUID->
“e13f167e-5ed1-4633-a6ad-52310de1e533”],
“)
x2(t) = t
:5426:5219:ff1a
x(t) = (“,
Cell[BoxData[
FormBox[
FractionBox[“1”, “2”], TraditionalForm]],ExpressionUUID->
“cfab3707-df6e-4152-928e-3233d23d0674”],
“(2+”,
Cell[BoxData[
FormBox[
SuperscriptBox[“t”, “2”], TraditionalForm]],ExpressionUUID->
“a2b75381-50dc-4f49-b62b-d3c9d08d6a5e”],
“), t)

:5b9a:4e49:4e8e [0, 1]”
}], “Subsubsection”,
CellChangeTimes->{{3.820686175461117*^9, 3.820686221017805*^9}, {
3.8206862975944033`*^9, 3.820686572855447*^9}, {3.820686896579468*^9,
3.820686944884369*^9}, {3.820721758687607*^9, 3.820721801197404*^9}, {
3.8209585808101263`*^9,
3.820958605603607*^9}},ExpressionUUID->”f2bd543c-6418-4113-a195-
5349ba355e60″],

Cell[BoxData[
RowBox[{
RowBox[{“{“,
RowBox[{
RowBox[{“x1”, “[“, “t”, “]”}], “,”, ” “,
RowBox[{“x2”, “[“, “t”, “]”}]}], “}”}], ” “, “/.”, ” “,
RowBox[{“solucionEcEu”, “[“,
RowBox[{“[“, “1”, “]”}], “]”}]}]], “Input”,
CellChangeTimes->{{3.820721632120769*^9, 3.820721681642565*^9}, {
3.8207218593450108`*^9, 3.820721862051399*^9}},
CellLabel->”In[63]:=”,ExpressionUUID->”718d5875-a6bc-43e9-b3d9-0a920e03f52b”]
}, Open ]]
}, Open ]],

Cell[“< :73b0:5728:ff0c:4f7f:7528:6b64:6a21:677f:ff0c:6211:4eec:5fc5:987b :4f7f:8ba1:7b97:81ea:52a8:5316:5e76:9488:5bf9:5177:6709:4efb:4f55 :6570:91cf:7684:53d8:91cf:7684:6b64:7c7b:95ee:9898:5c06:5176:5f52 :4e00:5316 :6211:4eec:8fd8:5fc5:987b:5728:5176:4e2d:4e00:4e2a:53d8:91cf:ff0c :6211:4eec:60f3:8981:7684:6761:4ef6:4ee5:53ca:6211:4eec:60f3:8981 :7684:53d8:91cf:4e2d:6dfb:52a0:4e00:4e2a:6a2a:5411:6761:4ef6:3002 >“, “Subsection”,
CellChangeTimes->{{3.820682473110447*^9, 3.820682600679556*^9}, {
3.8206826613279247`*^9, 3.82068268192108*^9}, {3.820958619772708*^9,
3.820958622543111*^9}},ExpressionUUID->”caf95eb8-e129-4d0c-8106-
b46995618003″]
}, Open ]]
},
WindowSize->{1523, 747},
WindowMargins->{{0, Automatic}, {Automatic, 0}},
FrontEndVersion->”12.1 for Mac OS X x86 (64-bit)
(2020:5e746:670819:65e5)”,
StyleDefinitions->Notebook[{
Cell[
StyleData[StyleDefinitions -> “Default.nb”]]}, Visible -> False,
FrontEndVersion ->
“12.1 for Mac OS X x86 (64-bit) (2020:5e746:670819:65e5)”,
StyleDefinitions -> “PrivateStylesheetFormatting.nb”],
ExpressionUUID->”ad9e5606-94f8-4488-9a77-e334c3e82296″
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[580, 22, 22162, 608, 1447, “Section”,ExpressionUUID->”131a7657-0c0d-43ef-828b-8cab14d118a7″],
Cell[CellGroupData[{
Cell[22767, 634, 1573, 50, 144, “Subsection”,ExpressionUUID->”57e03a57-b844-4dad-b005-790d729eb6d6″],
Cell[CellGroupData[{
Cell[24365, 688, 286, 4, 45, “Subsubsection”,ExpressionUUID->”76198bc1-9174-4283-8f02-0fa081ef8d96″],
Cell[24654, 694, 1153, 25, 52, “Input”,ExpressionUUID->”d2b28229-210c-484d-b8f8-fa1a3ebbcfef”]
}, Open ]],
Cell[CellGroupData[{
Cell[25844, 724, 3255, 107, 105, “Subsubsection”,ExpressionUUID->”94da8189-7484-42c8-809e-72f6a4684a6a”],
Cell[29102, 833, 6070, 182, 312, “Input”,ExpressionUUID->”1aef8f1c-41e2-4586-b2dd-4ce9b09f6ff4″],
Cell[35175, 1017, 321, 8, 32, “Input”,ExpressionUUID->”61eee88a-2dd7-4a0f-b245-e2ac19ea03f3″]
}, Open ]],
Cell[CellGroupData[{
Cell[35533, 1030, 1339, 45, 99, “Subsubsection”,ExpressionUUID->”c826b3c7-aae3-4180-8317-dc1d9d2613c3″],
Cell[36875, 1077, 2541, 70, 159, “Input”,ExpressionUUID->”f87c516c-aae0-4a6e-904b-51b75588844a”],
Cell[39419, 1149, 480, 14, 32, “Input”,ExpressionUUID->”781d48ac-4ea4-4303-91c7-212d2610015f”],
Cell[39902, 1165, 3685, 95, 122, “Input”,ExpressionUUID->”2316eaed-d100-47c1-9e10-93f9abab3201″],
Cell[43590, 1262, 860, 23, 44, “Input”,ExpressionUUID->”be6fa906-1ffb-4398-b42e-79a264a2c0ef”],
Cell[44453, 1287, 824, 20, 44, “Input”,ExpressionUUID->”dab611e7-0f08-4b96-8d87-139be333b5dd”],
Cell[45280, 1309, 1152, 37, 53, “Input”,ExpressionUUID->”cd119ef3-e732-4a1e-bd76-12c9cbde4658″]
}, Open ]],
Cell[CellGroupData[{
Cell[46469, 1351, 4031, 118, 126, “Subsubsection”,ExpressionUUID->”61e4c654-654f-4f36-a4f2-c8569a9f49b5″],
Cell[50503, 1471, 1239, 32, 175, “Input”,ExpressionUUID->”663187ca-3c4b-4ce1-93e0-1098b6edd0b6″],
Cell[51745, 1505, 458, 11, 32, “Input”,ExpressionUUID->”ff164f55-7f55-44c6-98be-c45262a5a224″],
Cell[52206, 1518, 1493, 43, 33, “Input”,ExpressionUUID->”3df2663c-8bb8-4bd1-8800-27d4cfcba356″],
Cell[53702, 1563, 826, 14, 80, “Input”,ExpressionUUID->”173d35fc-1180-4950-91eb-aaf230a68054″]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[54577, 1583, 8229, 250, 240, “Subsection”,ExpressionUUID->”874140cf-d360-4545-8a83-eada8b65eedb”],
Cell[62809, 1835, 3347, 89, 568, “Input”,ExpressionUUID->”95533dd6-f111-417a-b955-61f250018732″],
Cell[66159, 1926, 473, 11, 32, “Input”,ExpressionUUID->”7feb8f13-6de1-4d13-87fd-fb2706b794c0″],
Cell[66635, 1939, 983, 22, 33, “Input”,ExpressionUUID->”983cec1b-a34b-4458-b9a0-821a0d7a54eb”],
Cell[67621, 1963, 631, 12, 80, “Input”,ExpressionUUID->”b384ccb7-1c1b-4fcb-b6ac-44512b40e85c”],
Cell[CellGroupData[{
Cell[68277, 1979, 1848, 47, 211, “Subsubsection”,ExpressionUUID->”f2bd543c-6418-4113-a195-5349ba355e60″],
Cell[70128, 2028, 433, 10, 30, “Input”,ExpressionUUID->”718d5875-a6bc-43e9-b3d9-0a920e03f52b”]
}, Open ]]
}, Open ]],
Cell[70588, 2042, 746, 13, 81, “Subsection”,ExpressionUUID->”caf95eb8-e129-4d0c-8106-b46995618003″]
}, Open ]]
}
]
*)

Posted in Uncategorized

Leave a Reply

Your email address will not be published. Required fields are marked *