代码拉取完成，页面将自动刷新
(* 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[ 150016, 3605]
NotebookOptionsPosition[ 139342, 3465]
NotebookOutlinePosition[ 139871, 3485]
CellTagsIndexPosition[ 139828, 3482]
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[CellGroupData[{
Cell["\:4e00\:7ef4\:7ebf\:6027\:5bf9\:6d41\:65b9\:7a0b\:9ad8\:9636\:95f4\:65ad\
\:6709\:9650\:5143\:6c42\:89e3", "Title",
CellChangeTimes->{{3.793480691427786*^9, 3.7934807279148893`*^9}, {
3.793484217916497*^9, 3.793484255185631*^9}, {3.793515447489449*^9,
3.793515482433976*^9}, {3.79392306239211*^9, 3.793923072894946*^9}, {
3.795061818683939*^9,
3.795061830593992*^9}},ExpressionUUID->"eefb7056-a20d-4056-9b49-\
b62ae2f89a19"],
Cell[CellGroupData[{
Cell["\:4e8e\:8981\:6770", "Author",
CellChangeTimes->{{3.793480739586341*^9,
3.793480742506095*^9}},ExpressionUUID->"a28ccc11-7109-46d2-a26f-\
95503b89e392"],
Cell["\:897f\:5317\:5de5\:4e1a\:5927\:5b66\:822a\:7a7a\:5b66\:9662", \
"Institution",
CellChangeTimes->{{3.793480746092642*^9,
3.7934807521616583`*^9}},ExpressionUUID->"678c6e47-fd5d-4af1-b53b-\
d4ca693a41af"]
}, Open ]],
Cell[CellGroupData[{
Cell["1 \:4e00\:7ef4\:7ebf\:6027\:5bf9\:6d41\:65b9\:7a0b", "Section",
CellChangeTimes->{{3.793515517120455*^9, 3.793515522432588*^9}, {
3.793746609924209*^9, 3.793746612115737*^9}, {3.7939229519231567`*^9,
3.793922968890067*^9}, {3.793923075855299*^9, 3.793923076870965*^9}},
TextAlignment->Left,ExpressionUUID->"a710c242-05d7-4a44-9d8e-cdaa762fc302"],
Cell["\:4e00\:7ef4\:7ebf\:6027\:6ce2\:52a8\:65b9\:7a0b\:5982\:4e0b", "Text",
CellChangeTimes->{{3.793339354890843*^9, 3.793339374607121*^9}, {
3.79341926823217*^9, 3.793419269449767*^9}, {3.793480880668414*^9,
3.793480909284091*^9}, {3.7935155937905903`*^9, 3.7935155985595913`*^9},
3.7937465446854773`*^9},ExpressionUUID->"28e19007-bf24-44e6-b361-\
12feca5abf66"],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
RowBox[{
FractionBox[
RowBox[{"\[PartialD]", "u"}],
RowBox[{"\[PartialD]", "t"}]], "+",
FractionBox[
RowBox[{"\[PartialD]",
RowBox[{"f", "(", "u", ")"}]}],
RowBox[{"\[PartialD]", "x"}]]}], "=", "0"}], ",", " ",
RowBox[{"x", "\[Element]",
RowBox[{"[",
RowBox[{
SubscriptBox["x", "L"], ",",
SubscriptBox["x", "R"]}], "]"}]}], ","}],
TraditionalForm]], "DisplayFormulaNumbered",
CellChangeTimes->{{3.793339401589134*^9, 3.7933394350751333`*^9}, {
3.7933394689855328`*^9, 3.7933394742031918`*^9}, 3.793440117526381*^9, {
3.793571772536409*^9, 3.7935718424516487`*^9}, {3.7935718804594603`*^9,
3.7935718818750763`*^9}, {3.7935726047827263`*^9, 3.79357265190879*^9}, {
3.793572750386237*^9, 3.7935727510483913`*^9}, {3.793658525730871*^9,
3.793658539434565*^9}, {3.793746549093438*^9, 3.7937465490952578`*^9}},
TextAlignment->Center,ExpressionUUID->"15d4689b-9bd7-4667-b53b-43e120be3d73"],
Cell[TextData[{
"\:5176\:4e2d\:ff0c",
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
RowBox[{"f", "(", "u", ")"}], "=",
RowBox[{"a", " ", "u"}]}], "\:ff0c",
RowBox[{"(",
RowBox[{"a", ">", "0"}], ")"}]}], TraditionalForm]],ExpressionUUID->
"a5b91d38-d013-41f1-9a5f-f9dcc3d1f820"],
"\:4e3a\:7ebf\:6027\:901a\:91cf\:9879\:3002\:65b9\:7a0b\:7684\:521d\:503c\
\:548c\:8fb9\:503c\:6761\:4ef6\:4e3a"
}], "Text",
CellChangeTimes->{{3.793746571276753*^9,
3.7937465796523848`*^9}},ExpressionUUID->"e9ba592c-0fbb-412c-b907-\
0f35dfcf43f6"],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
RowBox[{"u", "(",
RowBox[{"x", ",", "0"}], ")"}], "=",
RowBox[{"g", "(", "x", ")"}]}], ",", " ",
RowBox[{
RowBox[{"u", "(",
RowBox[{
SubscriptBox["x", "L"], ",", "t"}], ")"}], "=",
RowBox[{
RowBox[{"g", "(",
RowBox[{
SubscriptBox["x", "L"], "-",
RowBox[{"a", " ", "t"}]}], ")"}], "."}]}]}],
TraditionalForm]], "DisplayFormulaNumbered",
CellChangeTimes->{{3.793339401589134*^9, 3.7933394350751333`*^9}, {
3.7933394689855328`*^9, 3.7933394742031918`*^9}, 3.793440117526381*^9, {
3.793571772536409*^9, 3.7935718424516487`*^9}, {3.7935718804594603`*^9,
3.7935718818750763`*^9}, {3.7935726047827263`*^9, 3.79357265190879*^9}, {
3.793572750386237*^9, 3.7935727510483913`*^9}, {3.793658525730871*^9,
3.793658539434565*^9}, 3.793746549093438*^9},
TextAlignment->Center,ExpressionUUID->"440b61e5-776f-4181-99ed-52a39a8f3325"],
Cell["\<\
\:4e0a\:8ff0\:504f\:5fae\:5206\:65b9\:7a0b\:5b58\:5728\:7cbe\:786e\:7684\:89e3\
\:6790\:89e3\
\>", "Text",
CellChangeTimes->{{3.793339492182564*^9, 3.793339494970686*^9}, {
3.793419283960142*^9, 3.79341928972121*^9}, 3.793419350767411*^9, {
3.7934809134616137`*^9, 3.7934809349230223`*^9}, {3.793515607014276*^9,
3.7935156207260027`*^9}, {3.7935727349608603`*^9, 3.793572745713395*^9}, {
3.793746557381624*^9,
3.793746592228592*^9}},ExpressionUUID->"f4218dbd-4ba8-41ec-ba18-\
68d499569f53"],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"u",
RowBox[{"(",
RowBox[{"x", ",", "t"}], ")"}]}], "=",
RowBox[{
RowBox[{"g", "(",
RowBox[{"x", "-",
RowBox[{"a", " ", "t"}]}], ")"}], "."}]}],
TraditionalForm]], "DisplayFormulaNumbered",
CellChangeTimes->{{3.7933395086683283`*^9, 3.793339527305179*^9},
3.793395324269744*^9, {3.793571846628318*^9, 3.793571849275124*^9}},
TextAlignment->Center,ExpressionUUID->"d9ac867e-5e27-440a-ae33-45d3483abf77"]
}, Open ]],
Cell[CellGroupData[{
Cell["2 \:95f4\:65ad\:6709\:9650\:5143\:65b9\:6cd5", "Section",
CellChangeTimes->{{3.793480942290612*^9, 3.793480962697905*^9}, {
3.7934842863558903`*^9, 3.793484287432328*^9}, {3.793922930587058*^9,
3.793922944171115*^9}, {3.793923038266255*^9, 3.7939230400242777`*^9}},
TextAlignment->Left,ExpressionUUID->"ba71cf2e-e727-4fd0-ad7d-c63f511a7d40"],
Cell[CellGroupData[{
Cell["2.1 \:533a\:95f4\:5206\:89e3", "Subsection",
CellChangeTimes->{{3.793484000764492*^9, 3.793484035211606*^9}, {
3.793484290363908*^9, 3.793484310863199*^9}, {3.793489485933811*^9,
3.7934894860841827`*^9}, {3.793746623196424*^9, 3.7937466254677258`*^9}},
TextAlignment->Left,ExpressionUUID->"6ad77ab3-3f98-40dd-b361-4479ef9afce3"],
Cell[TextData[{
"We consider problems posed on the ",
StyleBox["physical domain",
FontWeight->"Bold",
FontSlant->"Italic"],
" \[CapitalOmega] with boundary \[PartialD]\[CapitalOmega] and assume that \
this domain is well ",
StyleBox["approximated",
FontWeight->"Bold",
FontSlant->"Italic"],
" by the ",
StyleBox["computational domain ",
FontWeight->"Bold",
FontSlant->"Italic"],
Cell[BoxData[
FormBox[
SubscriptBox["\[CapitalOmega]", "h"], TraditionalForm]],ExpressionUUID->
"9e5e6b8f-b00d-4e79-af7b-106bb2561c3a"],
". In 2D situation, this is a space filling triangulation composed of a \
collection of K geometry-conforming nonoverlapping elements, ",
Cell[BoxData[
FormBox[
SuperscriptBox["\[CapitalOmega]", "k"], TraditionalForm]],ExpressionUUID->
"bd980da4-e847-467c-8f10-168a481c9039"],
". The shape of these elements can be arbitrary although we will mostly \
consider cases where they are ",
StyleBox["d",
FontSlant->"Italic"],
"-dimensional simplexes."
}], "Text",
CellChangeTimes->{{3.793395807090664*^9, 3.793395887720182*^9}, {
3.79339592737014*^9, 3.793395982557005*^9}, {3.793396046885236*^9,
3.793396190270986*^9}, {3.793396549645535*^9, 3.793396621710918*^9}, {
3.793396849074202*^9, 3.793396850365487*^9}, {3.793396962930152*^9,
3.793396964049405*^9}, {3.7933970384912357`*^9, 3.7933970922135963`*^9}, {
3.793397132213429*^9, 3.793397138255266*^9}, {3.793577338053789*^9,
3.7935773380539007`*^9}},
TextJustification->1.,ExpressionUUID->"55a1c5d4-16fc-4ee9-b5c2-c9e7b16a6946"],
Cell[TextData[{
"Thus, \[CapitalOmega] is only approximated by the union of ",
Cell[BoxData[
FormBox[
SuperscriptBox["\[CapitalOmega]", "k"], TraditionalForm]],
CellChangeTimes->{{3.793396648502351*^9, 3.793396688426943*^9}, {
3.7933967700421953`*^9, 3.793396833070283*^9}, {3.793396864679192*^9,
3.793396915086499*^9}},
TextAlignment->Center,ExpressionUUID->
"c02b8344-9e29-41a6-88f1-d52aeef8f58d"],
", that is"
}], "Text",
CellChangeTimes->{{3.793395807090664*^9, 3.793395887720182*^9}, {
3.79339592737014*^9, 3.793395982557005*^9}, {3.793396046885236*^9,
3.793396190270986*^9}, {3.793396549645535*^9, 3.793396621710918*^9}, {
3.793396849074202*^9, 3.793396850365487*^9}, {3.793396962930152*^9,
3.793396964049405*^9}, {3.7933970384912357`*^9, 3.7933970922135963`*^9}, {
3.793397132213429*^9, 3.7933971422907553`*^9}, {3.793577338423049*^9,
3.793577338423098*^9}},
TextJustification->1.,ExpressionUUID->"cd43e390-f76b-4e38-a306-c015271a5535"],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
RowBox[{"\[CapitalOmega]", "\[TildeEqual]",
SubscriptBox["\[CapitalOmega]", "h"]}], "=",
RowBox[{
UnderscriptBox[
OverscriptBox["\[Union]",
RowBox[{" ", "K"}]],
RowBox[{" ",
RowBox[{"k", "=", "1"}]}]],
SuperscriptBox["\[CapitalOmega]", "k"]}]}], ","}],
TraditionalForm]], "DisplayFormulaNumbered",
CellChangeTimes->{{3.793396648502351*^9, 3.793396688426943*^9}, {
3.7933967700421953`*^9, 3.793396833070283*^9}, {3.793396864679192*^9,
3.793396915086499*^9}, 3.793577323859796*^9},
TextAlignment->Center,ExpressionUUID->"0566cf50-96ae-4284-9202-ec80a7bc9e71"],
Cell["\<\
although we will not distinguish the two domains unless needed.\
\>", "Text",ExpressionUUID->"9505b819-1bde-431b-8ba9-d4eb4acab085"],
Cell[TextData[{
"We define the ",
StyleBox["local inner product ",
FontWeight->"Bold",
FontSlant->"Italic"],
Cell[BoxData[
FormBox[
RowBox[{
SuperscriptBox["L", "2"], "(",
SuperscriptBox["\[CapitalOmega]", "k"], ")"}], TraditionalForm]],
ExpressionUUID->"c393dafa-5253-45a2-9baf-b51a3a230b45"],
" norm"
}], "Text",
CellChangeTimes->{{3.793397244071589*^9, 3.7933972943259487`*^9}, {
3.7935773244903193`*^9,
3.793577324490366*^9}},ExpressionUUID->"a435a032-a7a4-4b94-a259-\
07d770311082"],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
SubscriptBox[
StyleBox[
RowBox[{"(",
RowBox[{"u", ",", "v"}], ")"}],
FontSlant->"Plain"],
SuperscriptBox["\[CapitalOmega]", "k"]], "=",
RowBox[{
SubscriptBox["\[Integral]",
SuperscriptBox["\[CapitalOmega]", "k"]],
RowBox[{"u", " ", "v", " ", "d", " ", "x"}]}]}], ",", " ",
RowBox[{
SubsuperscriptBox[
RowBox[{
"\[LeftDoubleBracketingBar]", "u", "\[RightDoubleBracketingBar]"}],
SuperscriptBox["\[CapitalOmega]", "k"], "2"], "=",
SubscriptBox[
RowBox[{"(",
RowBox[{"u", ",", "u"}], ")"}],
SuperscriptBox["\[CapitalOmega]", "k"]]}], ","}],
TraditionalForm]], "DisplayFormulaNumbered",
CellChangeTimes->{{3.793397323680139*^9, 3.793397339164793*^9}, {
3.7933973739505577`*^9, 3.7933974635766697`*^9}, {3.793397560383585*^9,
3.7933975870277157`*^9}, {3.793577327513364*^9, 3.793577330493473*^9}},
TextAlignment->Center,ExpressionUUID->"6a2d8c8d-f421-4238-8e38-0108b7a9b29a"],
Cell[TextData[{
"as well as the ",
StyleBox["global broken inner product",
FontWeight->"Bold",
FontSlant->"Italic"],
" and norm"
}], "Text",
CellChangeTimes->{{3.7933974557616777`*^9, 3.7933974574158907`*^9}, {
3.79339759203574*^9,
3.7933976084345303`*^9}},ExpressionUUID->"7db65ca0-82e3-4c4e-b843-\
b1a654be3714"],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
SubscriptBox[
StyleBox[
RowBox[{"(",
RowBox[{"u", ",", "v"}], ")"}],
FontSlant->"Plain"],
SubscriptBox["\[CapitalOmega]", "h"]], "=",
RowBox[{
OverscriptBox[
UnderscriptBox["\[Sum]",
OverscriptBox["",
RowBox[{" ",
RowBox[{"k", "=", "1"}]}]]],
RowBox[{" ", "K"}]],
SubscriptBox[
RowBox[{"(",
RowBox[{"u", ",", "v"}], ")"}],
SuperscriptBox["\[CapitalOmega]", "k"]]}]}], ",", " ",
RowBox[{
SubsuperscriptBox[
RowBox[{
"\[LeftDoubleBracketingBar]", "u", "\[RightDoubleBracketingBar]"}],
SubscriptBox["\[CapitalOmega]", "h"], "2"], "=",
RowBox[{
SubscriptBox[
RowBox[{"(",
RowBox[{"u", ",", "u"}], ")"}],
SubscriptBox["\[CapitalOmega]", "h"]], "."}]}]}],
TraditionalForm]], "DisplayFormulaNumbered",
CellChangeTimes->{{3.7933976240550222`*^9, 3.793397711926545*^9}, {
3.793397777872302*^9, 3.7933977840079517`*^9}, {3.793397848071252*^9,
3.7933978490733843`*^9}, 3.7935773313385353`*^9},
TextAlignment->Center,ExpressionUUID->"7647434b-e53c-4736-8dda-52e4233ee08f"],
Cell[TextData[{
"Generally, one has local information as well as information from the \
neighboring element along an intersection between two elements. Often we will \
refer to the union of these intersections in an element as the ",
StyleBox["trace",
FontWeight->"Bold",
FontSlant->"Italic"],
" of the element. "
}], "Text",
CellChangeTimes->{{3.793397855756736*^9, 3.7933978942641277`*^9}, {
3.793397990877108*^9, 3.7933979908772593`*^9}},
TextJustification->1.,ExpressionUUID->"1cc20c53-cdf9-4707-a6f5-87f74bc52145"],
Cell[TextData[{
"For the methods we discuss here, we will have two or more solutions or \
boundary conditions at the same physical location along the trace of the \
element. To fix the notation, we refer to the ",
StyleBox["interior information",
FontWeight->"Bold",
FontSlant->"Italic"],
" of the element by a superscript \[OpenCurlyDoubleQuote]\[Minus]\
\[CloseCurlyDoubleQuote] and to the ",
StyleBox["exterior information",
FontWeight->"Bold",
FontSlant->"Italic"],
" by a superscript \[OpenCurlyDoubleQuote]+\[CloseCurlyDoubleQuote]. Using \
this notation, it is useful to define the ",
StyleBox["average",
FontWeight->"Bold",
FontSlant->"Italic"]
}], "Text",
CellChangeTimes->{{3.793397855756736*^9, 3.7933978942641277`*^9}, {
3.793397997404891*^9, 3.7933980442667933`*^9}},
TextJustification->1.,ExpressionUUID->"20fd30a3-86ab-439a-a219-f6415c081a95"],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{"{", "u", "}"}], "}"}], "=",
FractionBox[
RowBox[{
SuperscriptBox["u", "_"], "+",
SuperscriptBox["u", "+"]}], "2"]}], ","}],
TraditionalForm]], "DisplayFormulaNumbered",
CellChangeTimes->{{3.793398115888829*^9, 3.79339816367242*^9}},
TextAlignment->Center,ExpressionUUID->"c8338c0d-6e51-47f2-a38e-76da4bde47fb"],
Cell[TextData[{
"where ",
StyleBox["u ",
FontSlant->"Italic"],
"can be both a scalar and a vector. "
}], "Text",
CellChangeTimes->{{3.793398169176491*^9, 3.793398298946253*^9}, {
3.800875634895215*^9, 3.800875634902927*^9}},
TextJustification->1.,ExpressionUUID->"0f6e9df8-7202-4e04-90eb-97642f9c2519"],
Cell[TextData[{
"In the similar way we also define the jump along a normal, ",
Cell[BoxData[
FormBox[
OverscriptBox[
StyleBox["n",
FontWeight->"Bold"], "^"], TraditionalForm]],ExpressionUUID->
"d9691d5b-486e-4e28-8bb0-76af2600f0c3"],
", as "
}], "Text",
CellChangeTimes->{{3.793398169176491*^9, 3.793398298946253*^9}},
TextJustification->1.,ExpressionUUID->"29059b4f-26b3-4551-917f-a8470bf6fe4e"],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
RowBox[{"\[LeftDoubleBracket]", "u", "\[RightDoubleBracket]"}], "=",
RowBox[{
RowBox[{
SuperscriptBox[
OverscriptBox[
StyleBox["n",
FontWeight->"Bold"], "^"], "-"],
SuperscriptBox["u", "_"]}], "+",
RowBox[{
SuperscriptBox[
OverscriptBox[
StyleBox["n",
FontWeight->"Bold"], "^"], "+"],
SuperscriptBox["u", "+"]}]}]}], ",", " ",
RowBox[{
RowBox[{"\[LeftDoubleBracket]",
StyleBox["u",
FontWeight->"Bold"], "\[RightDoubleBracket]"}], "=",
RowBox[{
RowBox[{
SuperscriptBox[
OverscriptBox[
StyleBox["n",
FontWeight->"Bold"], "^"], "-"], "\[CenterDot]",
StyleBox[
SuperscriptBox["u",
StyleBox["_",
FontWeight->"Plain"]],
FontWeight->"Bold"]}], "+",
RowBox[{
SuperscriptBox[
OverscriptBox[
StyleBox["n",
FontWeight->"Bold"], "^"], "+"], "\[CenterDot]",
RowBox[{
StyleBox[
SuperscriptBox["u",
StyleBox["+",
FontWeight->"Plain"]],
FontWeight->"Bold"],
StyleBox[".",
FontWeight->"Plain"]}]}]}]}]}],
TraditionalForm]], "DisplayFormulaNumbered",
CellChangeTimes->{{3.793398314517646*^9, 3.793398368616177*^9}, {
3.793398400001802*^9, 3.79339843268159*^9}},
TextAlignment->Center,ExpressionUUID->"696b7d2e-f6d8-4923-994c-ee42583b2c7a"]
}, Open ]],
Cell[CellGroupData[{
Cell["2.2 \:5c40\:90e8\:8fd1\:4f3c", "Subsection",
CellChangeTimes->{{3.793484000764492*^9, 3.793484036571148*^9}, {
3.793484294152637*^9, 3.793484294344103*^9}, 3.793484333145851*^9, {
3.793489488758801*^9, 3.793489488916151*^9}},
TextAlignment->Left,ExpressionUUID->"e2eed9f5-98b3-4c88-8d56-060921d800bf"],
Cell[TextData[{
"\:5728\:7b2c",
StyleBox["k",
FontSlant->"Italic"],
"\:4e2a\:5355\:5143\:4e0a",
Cell[BoxData[
FormBox[
RowBox[{" ",
SuperscriptBox["\[CapitalOmega]", "k"]}], TraditionalForm]],
CellChangeTimes->{{3.793339615575333*^9, 3.793339620278076*^9}},
TextAlignment->Center,ExpressionUUID->
"04f5526f-6dd3-4378-8de1-5e1b55667edf"],
"\:ff0c\:5c40\:90e8\:89e3",
Cell[BoxData[
FormBox[
RowBox[{
SuperscriptBox["u", "k"], "(",
RowBox[{"x", ",", "t"}], ")"}], TraditionalForm]],
CellChangeTimes->{{3.793339615575333*^9, 3.793339620278076*^9}, {
3.793482565372918*^9, 3.793482566267153*^9}, 3.793482635049402*^9, {
3.793483901722826*^9, 3.7934839106188602`*^9}, {3.7934851267961617`*^9,
3.7934851305076733`*^9}},
TextAlignment->Center,ExpressionUUID->
"a680334b-3147-4405-8a68-d2d31fe7b4b5"],
"\:662f\:672a\:77e5\:7684\:ff0c\:6211\:4eec\:901a\:8fc7\:4e00\:4e2a\:7531",
StyleBox["N",
FontSlant->"Italic"],
"\:4e2a\:8282\:70b9\:6784\:9020\:4e00\:4e2a",
Cell[BoxData[
FormBox[
RowBox[{"p", "=",
RowBox[{"N", "-", "1"}]}], TraditionalForm]],ExpressionUUID->
"4c15d208-764c-4bc2-8026-a472d2802604"],
"\:9636\:7684\:591a\:9879\:5f0f",
Cell[BoxData[
FormBox[
RowBox[{
SubsuperscriptBox["u", "h", "k"], "(",
RowBox[{"x", ",", "t"}], ")"}], TraditionalForm]],
CellChangeTimes->{{3.793339615575333*^9, 3.793339620278076*^9}, {
3.793482565372918*^9, 3.793482566267153*^9}, 3.793482635049402*^9, {
3.793483901722826*^9, 3.7934839106188602`*^9}, {3.7934851267961617`*^9,
3.7934851305076733`*^9}, {3.7935158617178917`*^9, 3.793515886049634*^9}},
TextAlignment->Center,ExpressionUUID->
"dc05b6c8-b608-4c99-9a64-e0c48f2121fd"],
"\:5bf9\:5176\:8fdb\:884c\:8fd1\:4f3c"
}], "Text",
CellChangeTimes->{{3.793481189476386*^9, 3.7934812374644747`*^9}, {
3.7934838425352297`*^9, 3.793483847098032*^9}, {3.7935156504735737`*^9,
3.793515682068437*^9}, {3.793515738353259*^9, 3.79351581835806*^9}, {
3.7935158513752728`*^9, 3.7935158543478823`*^9}, 3.7935159138670692`*^9, {
3.7935161086190853`*^9, 3.7935161138898973`*^9}, {3.7935161962751293`*^9,
3.7935162240783978`*^9}, {3.7935166544058447`*^9, 3.793516668284218*^9}, {
3.7935167274286137`*^9,
3.793516751775131*^9}},ExpressionUUID->"eb906234-f7c6-4602-8c52-\
1833475085c2"],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
RowBox[{"x", "\[Element]",
RowBox[{
SuperscriptBox["\[CapitalOmega]", "k"], ":",
RowBox[{
RowBox[{
SuperscriptBox["u", "k"], "(",
RowBox[{"x", ",", "t"}], ")"}], "\[TildeTilde]",
RowBox[{
SubsuperscriptBox["u", "h", "k"], "(",
RowBox[{"x", ",", "t"}], ")"}]}]}]}], "=",
RowBox[{
UnderoverscriptBox["\[Sum]",
RowBox[{"n", "=", "1"}],
RowBox[{" ", "N"}]],
RowBox[{
RowBox[{
SubsuperscriptBox["u", "i", "k"], "(", "t", ")"}],
RowBox[{
SubsuperscriptBox["\[ScriptL]", "i", "k"], "(", "x", ")"}]}]}]}], ",",
" ",
RowBox[{"1", "\[LessEqual]", "i", "\[LessEqual]", "N"}], ",",
RowBox[{"1", "\[LessEqual]", "k", "\[LessEqual]", "K"}], ","}],
TraditionalForm]], "DisplayFormulaNumbered",
CellChangeTimes->{{3.793339615575333*^9, 3.793339620278076*^9}, {
3.793482565372918*^9, 3.793482566267153*^9}, 3.793482635049402*^9, {
3.793483901722826*^9, 3.7934839106188602`*^9}, {3.7934851267961617`*^9,
3.7934851305076733`*^9}, {3.7935158617178917`*^9, 3.793515886049634*^9}, {
3.7935164877794847`*^9, 3.793516496442627*^9}, {3.793516603031447*^9,
3.7935166181907473`*^9}, 3.793516761481583*^9},
TextAlignment->Center,ExpressionUUID->"c5c70928-1687-4229-82c5-5a9dc4812312"],
Cell[TextData[{
"\:5176\:4e2d\:ff0c",
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
SubsuperscriptBox["u", "i", "k"], "(", "t", ")"}], "=",
RowBox[{
SubsuperscriptBox["u", "h", "k"], "(",
RowBox[{
SubsuperscriptBox["x", "i", "k"], ",", "t"}], ")"}]}], TraditionalForm]],
CellChangeTimes->{{3.793339615575333*^9, 3.793339620278076*^9}, {
3.793482565372918*^9, 3.793482566267153*^9}},
TextAlignment->Center,ExpressionUUID->
"8450cc37-a388-4fc2-9f11-de07afa82285"],
" \:662f",
Cell[BoxData[
FormBox[
SubsuperscriptBox["x", "i", "k"], TraditionalForm]],
CellChangeTimes->{{3.793339615575333*^9, 3.793339620278076*^9}, {
3.793482565372918*^9, 3.793482566267153*^9}},
TextAlignment->Center,ExpressionUUID->
"72477d61-f5bb-421e-ab31-2d17d2f81c32"],
"\:70b9\:5904\:5bf9\:5e94\:7684\:8fd1\:4f3c\:89e3\:7684\:503c\:3002"
}], "Text",
CellChangeTimes->{{3.793482620351665*^9, 3.793482743093286*^9},
3.793482791876474*^9, {3.7934840244190083`*^9,
3.793484024419264*^9}},ExpressionUUID->"c0946a44-1626-4dac-ba17-\
941957a40b70"],
Cell[TextData[{
"The global solution ",
Cell[BoxData[
FormBox[
RowBox[{"u", "(",
RowBox[{"x", ",", "t"}], ")"}], TraditionalForm]],
CellChangeTimes->{{3.793339615575333*^9, 3.793339620278076*^9}, {
3.7933948142028017`*^9, 3.793394821421821*^9}, {3.793395268103619*^9,
3.793395273622018*^9}, 3.7933953371986017`*^9, {3.793400219782444*^9,
3.7934002897064734`*^9}, {3.793400346050954*^9, 3.793400356047858*^9}},
TextAlignment->Center,ExpressionUUID->
"d511616c-23ab-4bb7-8c9e-071d08054c07"],
" is then assumed to be approximated by the piecewise ",
StyleBox["N",
FontSlant->"Italic"],
"-th order polynomial approximation ",
Cell[BoxData[
FormBox[
RowBox[{
SubscriptBox["u", "h"], "(",
RowBox[{"x", ",", "t"}], ")"}], TraditionalForm]],
CellChangeTimes->{{3.793339615575333*^9, 3.793339620278076*^9}, {
3.7933948142028017`*^9, 3.793394821421821*^9}, {3.793395268103619*^9,
3.793395273622018*^9}, 3.7933953371986017`*^9, {3.793400219782444*^9,
3.7934002897064734`*^9}, {3.793400346050954*^9, 3.793400356047858*^9}},
TextAlignment->Center,ExpressionUUID->
"f04b18b6-ed47-49d8-b4f5-39d2d74528b3"],
"."
}], "Text",
CellChangeTimes->{{3.793401049375333*^9,
3.79340115969118*^9}},ExpressionUUID->"d546dbf7-32f6-4748-bc51-\
4779a8a38e6e"],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
RowBox[{"x", "\[Element]",
RowBox[{"\[CapitalOmega]", ":",
RowBox[{
RowBox[{"u", " ",
RowBox[{"(",
RowBox[{"x", ",", "t"}], ")"}]}], " ", "\[TildeEqual]",
RowBox[{
SubscriptBox["u", "h"], "(",
RowBox[{"x", ",", "t"}], ")"}]}]}]}], "=",
RowBox[{
OverscriptBox[
UnderscriptBox["\[CirclePlus]",
RowBox[{" ",
RowBox[{"k", "=", "1"}]}]], "K"],
RowBox[{
SubsuperscriptBox["u", "h", "k"], "(",
RowBox[{"x", ",", "t"}], ")"}]}]}], ","}],
TraditionalForm]], "DisplayFormulaNumbered",
CellChangeTimes->{{3.793401187190432*^9, 3.793401254129984*^9}, {
3.7935167726652107`*^9, 3.793516775639221*^9}},
TextAlignment->Center,ExpressionUUID->"35c5510d-e92c-46da-a610-ead4ed7d47b5"],
Cell[TextData[{
"defined as the ",
StyleBox["direct sum",
FontWeight->"Bold",
FontSlant->"Italic"],
" of the K local polynomial solution ",
Cell[BoxData[
FormBox[
RowBox[{
SubsuperscriptBox["u", "h", "k"], "(",
RowBox[{"x", ",", "t"}], ")"}], TraditionalForm]],
CellChangeTimes->{{3.793401187190432*^9, 3.793401254129984*^9}},
TextAlignment->Center,ExpressionUUID->
"2ebaa00c-c71c-4873-8703-f67c78cc5f59"],
"."
}], "Text",
CellChangeTimes->{{3.793401277973579*^9,
3.7934013241818123`*^9}},ExpressionUUID->"1909f1b1-a2f7-46b2-bcb6-\
4ba855d9334d"]
}, Open ]],
Cell[CellGroupData[{
Cell["2.3 \:6b8b\:5dee\:7684Galerkin\:6b63\:4ea4\:8fc7\:7a0b", "Subsection",
CellChangeTimes->{{3.79348404737889*^9, 3.7934840809053164`*^9}, {
3.793484313363077*^9, 3.793484313543312*^9}, {3.7934894928318996`*^9,
3.793489492987939*^9}, {3.793516406710246*^9, 3.793516413142578*^9}, {
3.793746641580675*^9, 3.7937466470287313`*^9}},
TextAlignment->Left,ExpressionUUID->"23f417a1-b7c4-454e-a7d2-3f2d0d4bed60"],
Cell["We form the residual", "Text",
CellChangeTimes->{{3.793401365514409*^9,
3.7934013731959057`*^9}},ExpressionUUID->"fae924b9-d58f-4f12-b027-\
194aaf7596c1"],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
RowBox[{"\[ScriptCapitalR]", "(",
RowBox[{"x", ",", "t"}], ")"}], "=",
RowBox[{
FractionBox[
RowBox[{"\[PartialD]",
SubscriptBox["u", "h"]}],
RowBox[{"\[PartialD]", "t"}]], "+",
RowBox[{"a",
FractionBox[
RowBox[{"\[PartialD]",
SubscriptBox["u", "h"]}],
RowBox[{"\[PartialD]", "x"}]]}]}]}], ","}],
TraditionalForm]], "DisplayFormulaNumbered",
CellChangeTimes->{{3.793401406987569*^9, 3.793401467931282*^9}, {
3.793519104683817*^9, 3.793519117787589*^9}},
TextAlignment->Center,ExpressionUUID->"09c6e4fb-5b9a-4fdc-b677-8d72cb3ce388"],
Cell["and we must decide in which sense this should vanish.", "Text",
CellChangeTimes->{{3.793401478775752*^9,
3.793401500191305*^9}},ExpressionUUID->"c7e06075-27f3-42a6-a442-\
78535d79b4df"],
Cell[TextData[{
"Let us introduce a globally defined space ",
Cell[BoxData[
FormBox[
SubscriptBox["V", "h"], TraditionalForm]],ExpressionUUID->
"21553b1a-6a0d-4b7d-a371-a1067eeba8ff"],
" of test functions, ",
Cell[BoxData[
FormBox[
SubscriptBox["\[Phi]", "h"], TraditionalForm]],ExpressionUUID->
"0bf5b04a-6572-42f0-8c2c-3b49157669dc"],
", as ",
Cell[BoxData[
FormBox[
RowBox[{
SubscriptBox["V", "h"], "=",
RowBox[{
UnderoverscriptBox["\[CirclePlus]",
RowBox[{"k", "=", "1"}], "K"],
SubsuperscriptBox["V", "h", "k"]}]}], TraditionalForm]],ExpressionUUID->
"13a322ab-1b06-47d0-bc2f-5908bb3677fb"],
" where the locally defined spaces are defined as ",
Cell[BoxData[
FormBox[
RowBox[{
SubsuperscriptBox["V", "h", "k"], "=",
RowBox[{"span",
RowBox[{"{",
RowBox[{
RowBox[{
SubscriptBox["\[Psi]", "n"], "(",
SuperscriptBox["\[CapitalOmega]", "k"], ")"}], ",",
RowBox[{"1", "\[LessEqual]", "n", "\[LessEqual]", "N"}]}], "}"}]}]}],
TraditionalForm]],ExpressionUUID->"316d615d-e378-420a-a8b2-7335212cad0a"],
". We recognise ",
Cell[BoxData[
FormBox[
SubscriptBox["V", "h"], TraditionalForm]],ExpressionUUID->
"00647f25-b634-400f-ae1f-34bb7ddabd24"],
" as the space of piecewise smooth functions defined on ",
Cell[BoxData[
FormBox["\[CapitalOmega]", TraditionalForm]],ExpressionUUID->
"ac561238-64d3-4b78-b910-600389ca3484"],
". "
}], "Text",
CellChangeTimes->{{3.793405127137849*^9, 3.79340548836448*^9}, {
3.79340553502113*^9, 3.7934056660654993`*^9}, {3.79351658695347*^9,
3.793516587287539*^9}, {3.7935193113654127`*^9, 3.793519359522766*^9}, {
3.793519449174429*^9, 3.793519514188879*^9}},
TextJustification->1.,ExpressionUUID->"053c6810-22db-4c42-a31c-a17d86d4ff25"],
Cell[TextData[{
"we now require that the residual is orthogonal to all test functions in ",
Cell[BoxData[
FormBox[
SubscriptBox["V", "h"], TraditionalForm]],ExpressionUUID->
"0421278a-1bbe-4151-8d7b-b6d22142b850"],
", resulting in the local statement"
}], "Text",
CellChangeTimes->{{3.793405694223846*^9, 3.7934057254223413`*^9}, {
3.7934058183434267`*^9, 3.793405834647488*^9}},
TextJustification->1.,ExpressionUUID->"18c0d3fa-a6c2-4b3c-aa43-6ab1f5f1e82b"],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
RowBox[{
SubscriptBox["\[Integral]",
SuperscriptBox["\[CapitalOmega]", "k"]],
RowBox[{
RowBox[{
SubscriptBox["\[ScriptCapitalR]", "h"], "(",
RowBox[{"x", ",", "t"}], ")"}],
RowBox[{
SubscriptBox["\[Psi]", "n"], "(", "x", ")"}],
RowBox[{"\[DifferentialD]", "x"}]}]}], "=",
RowBox[{
RowBox[{
SubscriptBox["\[Integral]",
SuperscriptBox["\[CapitalOmega]", "k"]],
RowBox[{
RowBox[{"(",
RowBox[{
FractionBox[
RowBox[{"\[PartialD]",
SubsuperscriptBox["u", "h", "k"]}],
RowBox[{"\[PartialD]", "t"}]], "+",
RowBox[{"a",
FractionBox[
RowBox[{"\[PartialD]",
SubsuperscriptBox["u", "h", "k"]}],
RowBox[{"\[PartialD]", "x"}]]}]}], ")"}], " ",
RowBox[{
SubscriptBox["\[Psi]", "n"], "(", "x", ")"}],
RowBox[{"\[DifferentialD]", "x"}]}]}], "=", "0"}]}], ",", " ",
RowBox[{"1", "\[LessEqual]", "n", "\[LessEqual]", "N"}], ",",
RowBox[{"1", "\[LessEqual]", "k", "\[LessEqual]", "K"}], ","}],
TraditionalForm]], "DisplayFormulaNumbered",
CellChangeTimes->{{3.7934058654406652`*^9, 3.79340594214729*^9}, {
3.793516592663563*^9, 3.793516593046156*^9}, {3.793519892438436*^9,
3.7935199342528687`*^9}, {3.793519970826182*^9, 3.793520020254828*^9}, {
3.793577378796753*^9, 3.7935773795180492`*^9}, {3.7939232350902567`*^9,
3.793923255609562*^9}},
TextAlignment->Center,ExpressionUUID->"11c24eb2-d8be-40a0-bff2-47050a2602c1"],
Cell[TextData[{
"on all ",
StyleBox["K",
FontSlant->"Italic"],
" elements. This yields exactly ",
Cell[BoxData[
FormBox["N", TraditionalForm]],ExpressionUUID->
"a842f636-8c7c-42c9-b990-d5fe4fc93f38"],
" equations for the ",
Cell[BoxData[
FormBox["N", TraditionalForm]],ExpressionUUID->
"aeb57d0e-d131-46ab-af0f-6a824b6f944f"],
" local unknowns on each elements. However, we have not imposed any \
particular constraints on the basis or test functions, and, thus, neglected \
the issue of how to impose boundary conditions and how to recover the global \
solution from the ",
StyleBox["K",
FontSlant->"Italic"],
" local solutions. In other words, Eq. (11) is not yet a method suitable for \
solving the global problem."
}], "Text",
CellChangeTimes->{{3.793405971740942*^9, 3.793406081859359*^9}, {
3.793519583563205*^9, 3.7935195869295263`*^9}, {3.793519658745122*^9,
3.793519662573715*^9}},
TextJustification->1.,ExpressionUUID->"2e1a96a4-80bf-4c64-886c-9fa6e4dd9239"],
Cell[TextData[{
"Assume that the test functions ",
Cell[BoxData[
FormBox[
RowBox[{
SubscriptBox["\[Psi]", "n"], "(", "x", ")"}], TraditionalForm]],
ExpressionUUID->"390e3d3b-b89b-466f-8e90-169cd728eb29"],
" are smooth but not continuous or otherwise constrained across interfaces. \
Spatial integration by parts of Eq. (11) yields"
}], "Text",
CellChangeTimes->{{3.7934061434845867`*^9, 3.7934062022469482`*^9}, {
3.793519716533496*^9, 3.79351971669135*^9}},
TextJustification->1.,ExpressionUUID->"085344ea-4815-4910-9ae4-6e07bf50f265"],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
RowBox[{
SubscriptBox["\[Integral]",
SuperscriptBox["\[CapitalOmega]", "k"]],
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
FractionBox[
RowBox[{"\[PartialD]",
SubsuperscriptBox["u", "h", "k"]}],
RowBox[{"\[PartialD]", "t"}]],
RowBox[{
SubscriptBox["\[Psi]", "n"], "(", "x", ")"}]}], "-",
RowBox[{"a", " ",
SubsuperscriptBox["u", "h", "k"],
FractionBox[
RowBox[{"d", " ",
SubscriptBox["\[Psi]", "n"], " "}],
RowBox[{"d", " ", "x"}]]}]}], ")"}],
RowBox[{"\[DifferentialD]", "x"}]}]}], "=",
RowBox[{"-",
SubsuperscriptBox[
RowBox[{"[",
RowBox[{"a", " ",
SubsuperscriptBox["u", "h", "k"], " ",
SubscriptBox["\[Psi]", "n"]}], "]"}],
SubsuperscriptBox["x", "l", "k"],
SubsuperscriptBox["x", "r", "k"]]}]}], ",", " ",
RowBox[{"1", "\[LessEqual]", "n", "\[LessEqual]", "N"}], ",",
RowBox[{"1", "\[LessEqual]", "k", "\[LessEqual]",
RowBox[{"K", "."}]}]}], TraditionalForm]], "DisplayFormulaNumbered",
CellChangeTimes->{{3.793406247680092*^9, 3.79340628518605*^9}, {
3.793406367600544*^9, 3.79340643212171*^9}, {3.7934064855289087`*^9,
3.793406546993697*^9}, {3.7934066316458187`*^9, 3.793406671916349*^9}, {
3.7934067701104517`*^9, 3.793406770997471*^9}, {3.793520011441298*^9,
3.793520011680121*^9}, 3.7935773803206987`*^9, {3.793923262672759*^9,
3.793923264721114*^9}},
TextAlignment->Center,ExpressionUUID->"f14f8c1d-f205-4d51-b458-5dc18f4e2c59"],
Cell[TextData[{
"We see that as a consequence of the lack of conditions on the local \
solution and the test functions, the solution at the interfaces between \
elements is multiply defined and we will need to choose which solution, or \
combination of solutions, is correct. Delaying the details of this choice for \
a bit, we refer to this solution as ",
Cell[BoxData[
FormBox[
SuperscriptBox[
RowBox[{"(",
RowBox[{"a", " ",
SubsuperscriptBox["u", "h", "k"]}], ")"}], "*"], TraditionalForm]],
ExpressionUUID->"ab5ca047-5d04-4007-9788-3ed300f1f8fb"],
" , known as the numerical flux. This leads to the semi-discrete scheme"
}], "Text",
CellChangeTimes->{{3.793406773606113*^9, 3.793406869787952*^9}},
TextJustification->1.,ExpressionUUID->"29f4bf15-4d8d-45c8-b59e-375cf0d4011a"],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
RowBox[{
SubscriptBox["\[Integral]",
SuperscriptBox["\[CapitalOmega]", "k"]],
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
FractionBox[
RowBox[{"\[PartialD]",
SubsuperscriptBox["u", "h", "k"]}],
RowBox[{"\[PartialD]", "t"}]],
RowBox[{
SubscriptBox["\[Psi]", "n"], "(", "x", ")"}]}], "-",
RowBox[{"a", " ",
SubsuperscriptBox["u", "h", "k"],
FractionBox[
RowBox[{"d", " ",
SubscriptBox["\[Psi]", "n"], " "}],
RowBox[{"d", " ", "x"}]]}]}], ")"}],
RowBox[{"\[DifferentialD]", "x"}]}]}], "=",
RowBox[{"-",
SubsuperscriptBox[
RowBox[{"[",
RowBox[{
SuperscriptBox[
RowBox[{"(",
RowBox[{"a", " ",
SubsuperscriptBox["u", "h", "k"]}], ")"}], "*"], " ",
SubscriptBox["\[Psi]", "n"]}], "]"}],
SubsuperscriptBox["x", "l", "k"],
SubsuperscriptBox["x", "r", "k"]]}]}], ",", " ",
RowBox[{"1", "\[LessEqual]", "n", "\[LessEqual]", "N"}], ",",
RowBox[{"1", "\[LessEqual]", "k", "\[LessEqual]",
RowBox[{"K", "."}]}]}], TraditionalForm]], "DisplayFormulaNumbered",
CellChangeTimes->{{3.793406898581669*^9, 3.793406929454144*^9}, {
3.79352032434848*^9, 3.793520324555814*^9}, {3.793520545389166*^9,
3.7935205466842947`*^9}, 3.793577380845191*^9, {3.793923267441386*^9,
3.793923268873189*^9}},
TextAlignment->Center,ExpressionUUID->"b9995022-5546-4e13-8dcc-a786231389dd"],
Cell[TextData[{
"Then, we recover a total of ",
Cell[BoxData[
FormBox[
RowBox[{"K", "\[Times]", "N"}], TraditionalForm]],ExpressionUUID->
"453a19aa-ff8e-4e13-b200-4dce518292b6"],
" equations for the same number of unknowns; that is, we have defined a \
method for obtaining the globally defined solution. We refer to this form, \
obtained after integration by parts once, as the ",
StyleBox["weak form",
FontWeight->"Bold",
FontSlant->"Italic"],
"."
}], "Text",
CellChangeTimes->{{3.793406990518564*^9, 3.793407019524852*^9}, {
3.793415624163178*^9, 3.793415624483974*^9}, {3.7935202141073523`*^9,
3.79352022935275*^9}},
TextJustification->1.,ExpressionUUID->"2de42dc3-1bc7-488c-95f4-2ee836a77eb9"],
Cell[TextData[{
"This should be contrasted by the ",
StyleBox["strong form",
FontWeight->"Bold",
FontSlant->"Italic"],
", recovered by doing integration by parts once again, as"
}], "Text",
CellChangeTimes->{{3.7934152963154507`*^9,
3.793415331566897*^9}},ExpressionUUID->"86c0f1a7-6bad-4c84-b37a-\
66d8349f388e"],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
RowBox[{
SubscriptBox["\[Integral]",
SuperscriptBox["\[CapitalOmega]", "k"]],
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
FractionBox[
RowBox[{"\[PartialD]",
SubsuperscriptBox["u", "h", "k"]}],
RowBox[{"\[PartialD]", "t"}]],
RowBox[{
SubscriptBox["\[Psi]", "n"], "(", "x", ")"}]}], "+",
RowBox[{"a",
FractionBox[
RowBox[{"\[PartialD]",
SubsuperscriptBox["u", "h", "k"], " "}],
RowBox[{"\[PartialD]", "x"}]],
SubscriptBox["\[Psi]", "n"]}]}], ")"}],
RowBox[{"\[DifferentialD]", "x"}]}]}], "=",
SubsuperscriptBox[
RowBox[{"[",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
SubsuperscriptBox["u", "h", "k"]}], "-",
SuperscriptBox[
RowBox[{"(",
RowBox[{"a", " ",
SubsuperscriptBox["u", "h", "k"]}], ")"}], "*"]}], ")"}], " ",
SubscriptBox["\[Psi]", "n"]}], "]"}],
SubsuperscriptBox["x", "l", "k"],
SubsuperscriptBox["x", "r", "k"]]}], ",", " ",
RowBox[{"1", "\[LessEqual]", "n", "\[LessEqual]", "N"}], ",",
RowBox[{"1", "\[LessEqual]", "k", "\[LessEqual]",
RowBox[{"K", "."}]}]}], TraditionalForm]], "DisplayFormulaNumbered",
CellChangeTimes->{{3.7934153500420237`*^9, 3.793415379045137*^9}, {
3.793520327580571*^9, 3.7935203284441767`*^9}, {3.793520497279307*^9,
3.7935205558513937`*^9}, 3.7935773818518867`*^9, 3.793923215827427*^9, {
3.793923273241004*^9, 3.793923274825362*^9}},
TextAlignment->Center,ExpressionUUID->"f27f7afa-c3e7-4392-a977-e40e8cd6c81a"],
Cell[TextData[{
"As in the equivalent weak form, it is the right-hand side that is \
responsible for recovering the global solution from the local solutions and \
impose boundary conditions. This emphasizes the key role played by the \
numerical flux, ",
Cell[BoxData[
FormBox[
SuperscriptBox[
RowBox[{"(",
RowBox[{"a", " ",
SubsuperscriptBox["u", "h", "k"]}], ")"}], "*"], TraditionalForm]],
CellChangeTimes->{{3.7934153500420237`*^9, 3.793415379045137*^9}},
ExpressionUUID->"dd570187-704a-4ece-8e37-15e7b6d34f1a"],
". Note also that in strong form, we don not have to require any smoothness \
of the test function."
}], "Text",
CellChangeTimes->{{3.7934153919988537`*^9, 3.793415577741385*^9}},
TextJustification->1.,ExpressionUUID->"59e237ec-5f6d-4ca8-a10a-c1d93ca17eb8"]
}, Open ]],
Cell[CellGroupData[{
Cell["2.4 \:8282\:70b9\:5f62\:5f0f\:7684DG\:65b9\:6cd5", "Subsection",
CellChangeTimes->{{3.7935206006345873`*^9, 3.793520615145536*^9}, {
3.793746670275559*^9, 3.793746678306802*^9}},
TextAlignment->Left,ExpressionUUID->"9e0a70eb-60b1-4c15-addf-35da3f864119"],
Cell["\<\
\:5982\:679c\:63d2\:503c\:57fa\:51fd\:6570\:548c\:6d4b\:8bd5\:51fd\:6570(Test \
functions)\:5747\:4e3a\:62c9\:683c\:6717\:65e5\:63d2\:503c\:591a\:9879\:5f0f(\
Lagrange polynomials)\:ff0c\:90a3\:4e48\:7531\:65b9\:7a0b(15)\:5f97\:5230\
\:7684\:5f3a\:5f62\:5f0f\:7684\:534a\:5206\:79bb\:683c\:5f0f\:53ef\:8fdb\:4e00\
\:6b65\:8868\:793a\:4e3a\
\>", "Text",
CellChangeTimes->{{3.793482620351665*^9, 3.793482743093286*^9},
3.793482791876474*^9, {3.793516310634367*^9, 3.793516315300675*^9}, {
3.793520639385881*^9, 3.793520715189623*^9}, {3.79374643408573*^9,
3.793746455285037*^9}, {3.793923186060354*^9, 3.793923196915173*^9}, {
3.7939233234799557`*^9,
3.793923413045375*^9}},ExpressionUUID->"09baa977-e640-4d03-92e2-\
1cedaf6a11ea"],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
RowBox[{
RowBox[{
SuperscriptBox["\[ScriptCapitalM]", "k"],
FractionBox[
RowBox[{"d",
StyleBox[" ",
FontWeight->"Bold"],
SuperscriptBox[
StyleBox["u",
FontWeight->"Bold"], "k"]}],
RowBox[{"d", " ", "t"}]]}], "+",
RowBox[{"a", " ",
SuperscriptBox["\[ScriptCapitalS]", "k"],
SuperscriptBox[
StyleBox["u",
FontWeight->"Bold"], "k"]}]}], "=",
RowBox[{"[",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
SubscriptBox["u", "h"]}], "-",
SuperscriptBox[
RowBox[{"(",
RowBox[{"a", " ",
SubscriptBox["u", "h"]}], ")"}], "*"]}], ")"}],
SubscriptBox["|",
SubsuperscriptBox["x", "r", "k"]],
RowBox[{
RowBox[{
StyleBox["\[ScriptL]",
FontWeight->"Bold"], "(",
SubsuperscriptBox["x", "r", "k"], ")"}], "-",
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
SubscriptBox["u", "h"]}], "-",
SuperscriptBox[
RowBox[{"(",
RowBox[{"a", " ",
SubscriptBox["u", "h"]}], ")"}], "*"]}], ")"}]}],
SubscriptBox["|",
SubsuperscriptBox["x", "l", "k"]],
RowBox[{
StyleBox["\[ScriptL]",
FontWeight->"Bold"], "(",
SubsuperscriptBox["x", "l", "k"], ")"}]}], "]"}]}], ",",
RowBox[{"1", "\[LessEqual]", "k", "\[LessEqual]", "K"}], "\:ff0c"}],
TraditionalForm]], "DisplayFormulaNumbered",
CellChangeTimes->{{3.7934161586964693`*^9, 3.793416316835725*^9}, {
3.793416376962144*^9, 3.7934164549982023`*^9}, {3.793416516365295*^9,
3.793416530515911*^9}, {3.793416647953993*^9, 3.7934166713827343`*^9}, {
3.793417077548122*^9, 3.793417113966415*^9}, {3.7934189944041853`*^9,
3.793419022003983*^9}, 3.793419364159693*^9, {3.793419399421794*^9,
3.793419491059442*^9}, {3.793437265194557*^9, 3.793437281737403*^9},
3.793481628746985*^9, {3.793482225688979*^9, 3.7934822306585217`*^9}, {
3.793482570892267*^9, 3.7934825771704884`*^9}, {3.793483625223504*^9,
3.7934836356902018`*^9}, {3.793520719167429*^9, 3.7935207289101152`*^9},
3.7935207767964783`*^9, 3.7935257662473907`*^9, {3.793571908967454*^9,
3.793571911728673*^9}, {3.793923163013194*^9, 3.793923175651428*^9}, {
3.793923300191669*^9, 3.793923300616179*^9}, {3.793923443900235*^9,
3.793923452602579*^9}, {3.794889874334921*^9, 3.794889878085889*^9},
3.794890668469255*^9},
TextAlignment->Center,ExpressionUUID->"c6448e87-e13c-4d3f-aae2-5a2f69d06f02"],
Cell["\:5176\:4e2d", "Text",
CellChangeTimes->{{3.79348154691718*^9,
3.7934815474031343`*^9}},ExpressionUUID->"0de80379-262a-4fa7-853b-\
b877d8708866"],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
SuperscriptBox[
StyleBox["u",
FontWeight->"Bold"], "k"], "=",
SuperscriptBox[
RowBox[{"[",
RowBox[{
RowBox[{
SubsuperscriptBox["u", "1", "k"], "(", "t", ")"}], ",",
RowBox[{"\[CenterDot]", "\[CenterDot]", "\[CenterDot]"}], " ", ",",
" ",
RowBox[{
SubsuperscriptBox["u", "N", "k"], "(", "t", ")"}]}], "]"}], "T"]}],
",", " ",
RowBox[{
RowBox[{
SuperscriptBox[
StyleBox["\[ScriptL]",
FontWeight->"Bold"], "k"],
StyleBox["(",
FontWeight->"Plain"],
StyleBox["x",
FontWeight->"Plain"],
StyleBox[")",
FontWeight->"Plain"]}],
StyleBox["=",
FontSlant->"Italic"],
SuperscriptBox[
RowBox[{"[",
RowBox[{
RowBox[{
SubsuperscriptBox["\[ScriptL]", "1", "k"],
StyleBox["(",
FontSlant->"Plain"], "x",
StyleBox[")",
FontSlant->"Plain"]}],
StyleBox[",",
FontSlant->"Plain"],
StyleBox[" ",
FontSlant->"Plain"],
RowBox[{"\[CenterDot]", "\[CenterDot]", "\[CenterDot]"}], " ", ",",
" ",
RowBox[{
SubsuperscriptBox["\[ScriptL]", "N", "k"],
StyleBox["(",
FontSlant->"Plain"], "x",
StyleBox[")",
FontSlant->"Plain"]}]}],
StyleBox["]",
FontSlant->"Italic"]}], "T"]}], ",", "\n",
RowBox[{
SubsuperscriptBox["\[ScriptCapitalM]",
RowBox[{"i", " ", "j"}], "k"], "=",
SubscriptBox[
RowBox[{"(",
RowBox[{
SubsuperscriptBox["\[ScriptL]", "i", "k"], ",",
SubsuperscriptBox["\[ScriptL]", "j", "k"]}], ")"}],
SuperscriptBox["\[CapitalOmega]", "k"]]}], ",", " ",
RowBox[{
SubsuperscriptBox["\[ScriptCapitalS]",
RowBox[{"i", " ", "j"}], "k"], "=",
SubscriptBox[
RowBox[{"(",
RowBox[{
SubsuperscriptBox["\[ScriptL]", "i", "k"], ",",
FractionBox[
RowBox[{"d", " ",
SubsuperscriptBox["\[ScriptL]", "j", "k"]}],
RowBox[{"d", " ", "x"}]]}], ")"}],
SuperscriptBox["\[CapitalOmega]", "k"]]}], ","}],
TraditionalForm]], "DisplayFormulaNumbered",
CellChangeTimes->{{3.79341669923407*^9, 3.7934168883983917`*^9}, {
3.793418866856481*^9, 3.793418900207712*^9}, 3.793422264847341*^9, {
3.793422307792674*^9, 3.793422320252119*^9}, {3.793422368133905*^9,
3.793422368442421*^9}, 3.793481755837995*^9, {3.793482274088921*^9,
3.793482274254257*^9}, {3.79348258160497*^9, 3.793482582010418*^9}, {
3.793483852069828*^9, 3.793483852521558*^9}, {3.7934846559432783`*^9,
3.7934846561543217`*^9}, 3.793492145207106*^9, {3.793520874976697*^9,
3.7935208778167667`*^9}},
TextAlignment->Center,ExpressionUUID->"8e9d0472-8b42-4c7b-b15d-9a4dfaa135d2"],
Cell[TextData[{
Cell[BoxData[
FormBox[
SuperscriptBox["\[ScriptCapitalM]", "k"], TraditionalForm]],
CellChangeTimes->{{3.793416467243472*^9, 3.793416591972137*^9}, {
3.793418840547224*^9, 3.793418861882279*^9}, {3.793419383055241*^9,
3.7934193928527813`*^9}},
TextAlignment->Center,ExpressionUUID->
"921eb381-ce76-42dd-9721-164b4107ef0a"],
"\:548c",
Cell[BoxData[
FormBox[
SuperscriptBox["\[ScriptCapitalS]", "k"], TraditionalForm]],
CellChangeTimes->{{3.7934161586964693`*^9, 3.793416316835725*^9}, {
3.793416376962144*^9, 3.7934164549982023`*^9}, {3.793416516365295*^9,
3.793416530515911*^9}, {3.793416647953993*^9, 3.7934166713827343`*^9}, {
3.793417077548122*^9, 3.793417113966415*^9}, {3.7934189944041853`*^9,
3.793419022003983*^9}, 3.793419364159693*^9, {3.793419399421794*^9,
3.793419491059442*^9}, {3.793437265194557*^9, 3.793437281737403*^9},
3.793481628746985*^9},
TextAlignment->Center,ExpressionUUID->
"938ec77b-9d27-4563-9a82-4d90dbd6e80a"],
"\:5206\:522b\:4e3a\:8d28\:91cf(Mass)\:77e9\:9635\:548c\:521a\:5ea6(\
Stiffness)\:77e9\:9635\:3002\:5176\:4e2d",
Cell[BoxData[
FormBox[
SuperscriptBox[
RowBox[{"(",
RowBox[{"a", " ", "u"}], ")"}], "*"], TraditionalForm]],
CellChangeTimes->{{3.793340354645352*^9, 3.7933404528966084`*^9}, {
3.7933405502525673`*^9, 3.793340551228929*^9}, {3.793350465299828*^9,
3.7933504660589523`*^9}, {3.793419206755106*^9, 3.79341920881364*^9}},
TextAlignment->Center,ExpressionUUID->
"1d36f57f-5d3e-4092-b116-1467a5261695"],
"\:4e3a\:6570\:503c\:901a\:91cf\:9879"
}], "Text",
CellChangeTimes->{{3.7934166037443323`*^9, 3.793416627589835*^9}, {
3.793481555740831*^9, 3.793481598459455*^9}, 3.79348163347823*^9, {
3.793481763019363*^9, 3.793481781747629*^9}, {3.7935719239996233`*^9,
3.793571923999709*^9}, {3.793746707410965*^9, 3.7937467243621817`*^9}, {
3.793923492810527*^9, 3.793923496530056*^9}},
TextJustification->1.,ExpressionUUID->"0b40a3d5-10c3-4c10-be29-d6b6f6998f65"],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
SuperscriptBox[
RowBox[{"(",
RowBox[{"a", " ", "u"}], ")"}], "*"], "=",
RowBox[{
RowBox[{"{",
RowBox[{"{",
RowBox[{"a", " ", "u"}], "}"}], "}"}], "+",
RowBox[{"a",
RowBox[{
FractionBox[
RowBox[{"1", "-", "\[Alpha]", " "}], "2"], "\[LeftDoubleBracket]",
"u", "\[RightDoubleBracket]"}]}]}]}], ",", " ",
RowBox[{"0", "\[LessEqual]", "\[Alpha]", "\[LessEqual]", "1"}]}],
TraditionalForm]], "DisplayFormulaNumbered",
CellChangeTimes->{{3.793340354645352*^9, 3.7933404528966084`*^9}, {
3.7933405502525673`*^9, 3.793340551228929*^9}, {3.793350465299828*^9,
3.7933504660589523`*^9}, {3.793419206755106*^9, 3.79341920881364*^9}, {
3.793571927121944*^9, 3.793571928457815*^9}},
TextAlignment->Center,ExpressionUUID->"0a0726fe-363a-4c3b-a22f-753c0758ab6e"],
Cell["\:5f53\[Alpha] = 0\:4e3a\:8fce\:98ce\:683c\:5f0f\:ff1b\:5f53\[Alpha] = \
1\:4e3a\:4e2d\:5fc3\:683c\:5f0f\:3002", "Text",
CellChangeTimes->{{3.793481463583098*^9, 3.793481506979786*^9}, {
3.793482017339348*^9,
3.793482017792551*^9}},ExpressionUUID->"d39bc15c-a189-4e23-9224-\
77fc6c249381"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["3 \:95f4\:65ad\:6709\:9650\:5143\:65b9\:6cd5\:7684\:5b9e\:73b0", \
"Section",
CellChangeTimes->{{3.793484374589945*^9, 3.7934844273811398`*^9}, {
3.793489496871129*^9, 3.793489497499833*^9}, {3.793520755741465*^9,
3.793520755883561*^9}, {3.7937464931338463`*^9, 3.793746511381652*^9}, {
3.793922990836584*^9, 3.7939230011294394`*^9}, {3.793923042232325*^9,
3.7939230423993607`*^9}},
TextAlignment->Left,ExpressionUUID->"1002af86-819e-4e44-8ea6-ccc0f85b5355"],
Cell[TextData[{
"\:5728\:5c0f\:82822.4\:4e2d\:7ed9\:51fa\:4e86\:8282\:70b9\:578b\:95f4\:65ad\
\:6709\:9650\:5143\:6cd5\:7684\:4e00\:822c\:5f62\:5f0f\:ff0c\:4e0b\:9762\:5c06\
\:66f4\:4e3a\:5177\:4f53\:5730\:8bf4\:660e\:683c\:5f0f\:7684\:6784\:9020\:ff1a\
\:5305\:62ec\:8282\:70b9\:7c7b\:578b\:7684\:9009\:62e9\:3001\:4ea4\:754c\:9762\
\:901a\:91cf\:7684\:8ba1\:7b97\:65b9\:6cd5\:4ee5\:53ca\:5c40\:90e8\:7b97\:5b50\
",
Cell[BoxData[
FormBox[
SuperscriptBox["\[ScriptCapitalM]", "k"], TraditionalForm]],
CellChangeTimes->{{3.7934161586964693`*^9, 3.793416316835725*^9}, {
3.793416376962144*^9, 3.7934164549982023`*^9}, {3.793416516365295*^9,
3.793416530515911*^9}, {3.793416647953993*^9, 3.7934166713827343`*^9}, {
3.793417077548122*^9, 3.793417113966415*^9}, {3.7934189944041853`*^9,
3.793419022003983*^9}, 3.793419364159693*^9, {3.793419399421794*^9,
3.793419491059442*^9}, {3.793437265194557*^9, 3.793437281737403*^9},
3.793481628746985*^9, {3.793482225688979*^9, 3.7934822306585217`*^9}, {
3.793482570892267*^9, 3.7934825771704884`*^9}, {3.793483625223504*^9,
3.7934836356902018`*^9}, {3.793520719167429*^9, 3.7935207289101152`*^9},
3.7935207767964783`*^9, 3.7935257662473907`*^9, {3.793571908967454*^9,
3.793571911728673*^9}, {3.793923163013194*^9, 3.793923175651428*^9}, {
3.793923300191669*^9, 3.793923300616179*^9}, {3.793923443900235*^9,
3.793923452602579*^9}},
TextAlignment->Center,ExpressionUUID->
"9ce2adbd-ccb4-40e7-8b06-1ac5da879338"],
"\:548c",
Cell[BoxData[
FormBox[
SuperscriptBox["\[ScriptCapitalS]", "k"], TraditionalForm]],
CellChangeTimes->{{3.7934161586964693`*^9, 3.793416316835725*^9}, {
3.793416376962144*^9, 3.7934164549982023`*^9}, {3.793416516365295*^9,
3.793416530515911*^9}, {3.793416647953993*^9, 3.7934166713827343`*^9}, {
3.793417077548122*^9, 3.793417113966415*^9}, {3.7934189944041853`*^9,
3.793419022003983*^9}, 3.793419364159693*^9, {3.793419399421794*^9,
3.793419491059442*^9}, {3.793437265194557*^9, 3.793437281737403*^9},
3.793481628746985*^9, {3.793482225688979*^9, 3.7934822306585217`*^9}, {
3.793482570892267*^9, 3.7934825771704884`*^9}, {3.793483625223504*^9,
3.7934836356902018`*^9}, {3.793520719167429*^9, 3.7935207289101152`*^9},
3.7935207767964783`*^9, 3.7935257662473907`*^9, {3.793571908967454*^9,
3.793571911728673*^9}, {3.793923163013194*^9, 3.793923175651428*^9}, {
3.793923300191669*^9, 3.793923300616179*^9}, {3.793923443900235*^9,
3.793923452602579*^9}},
TextAlignment->Center,ExpressionUUID->
"02a46c17-9127-4bd0-9194-39cb7899359c"],
"\:7684\:8ba1\:7b97\:65b9\:6cd5\:3002"
}], "Text",
CellChangeTimes->{{3.793484447012331*^9, 3.793484487714068*^9}, {
3.7937467458108892`*^9, 3.7937468066261168`*^9}, {3.7939235802080917`*^9,
3.793923684827827*^9}, {3.7948865046847897`*^9, 3.794886590136755*^9}, {
3.794886624936418*^9,
3.7948867509330187`*^9}},ExpressionUUID->"248bbe1b-6aff-4ed8-a3b0-\
24d272caf8c1"],
Cell[CellGroupData[{
Cell["3.1 Gauss-Legendre-Lobatto\:ff08GLL\:ff09\:8282\:70b9", "Subsection",
CellChangeTimes->{{3.794948087044182*^9, 3.794948094004344*^9}},
TextAlignment->Left,ExpressionUUID->"6b2e2143-6246-4bd2-93fb-e82736c74852"],
Cell[CellGroupData[{
Cell["3.1.1 \:4e00\:822c\:5f62\:5f0f", "Subsubsection",
CellChangeTimes->{{3.794886325472711*^9, 3.794886330489403*^9}, {
3.794948069285267*^9, 3.7949481185955153`*^9}},
TextAlignment->Left,ExpressionUUID->"56e46d86-e4a3-4fbc-b659-10f7accf1a8e"],
Cell[TextData[{
"Gauss-Legendre-Lobatto(GLL)\:8282\:70b9\:7684\:7279\:70b9\:662f\:5305\:542b\
\:5de6\:53f3\:4e24\:4e2a\:7aef\:70b9\:ff0c\:65e2",
Cell[BoxData[
FormBox[
RowBox[{
SubsuperscriptBox["x", "l", "k"], "=",
SubsuperscriptBox["x", "1", "k"]}], TraditionalForm]],
CellChangeTimes->{{3.7934161586964693`*^9, 3.793416316835725*^9}, {
3.793416376962144*^9, 3.7934164549982023`*^9}, {3.793416516365295*^9,
3.793416530515911*^9}, {3.793416647953993*^9, 3.7934166713827343`*^9}, {
3.793417077548122*^9, 3.793417113966415*^9}, {3.7934189944041853`*^9,
3.793419022003983*^9}, 3.793419364159693*^9, {3.793419399421794*^9,
3.793419491059442*^9}, {3.793437265194557*^9, 3.793437281737403*^9},
3.793481628746985*^9},
TextAlignment->Center,ExpressionUUID->
"6a45049e-6792-4763-98ef-5fe3c5fbcb2d"],
"\:548c",
Cell[BoxData[
FormBox[
RowBox[{" ",
RowBox[{
SubsuperscriptBox["x", "r", "k"], "=",
SubsuperscriptBox["x", "N", "k"]}]}], TraditionalForm]],
CellChangeTimes->{{3.7934161586964693`*^9, 3.793416316835725*^9}, {
3.793416376962144*^9, 3.7934164549982023`*^9}, {3.793416516365295*^9,
3.793416530515911*^9}, {3.793416647953993*^9, 3.7934166713827343`*^9}, {
3.793417077548122*^9, 3.793417113966415*^9}, {3.7934189944041853`*^9,
3.793419022003983*^9}, 3.793419364159693*^9, {3.793419399421794*^9,
3.793419491059442*^9}, {3.793437265194557*^9, 3.793437281737403*^9},
3.793481628746985*^9},
TextAlignment->Center,ExpressionUUID->
"fc9f8217-43ee-4f44-a1c1-3761ab93b643"],
"\:5206\:522b\:4e3a\:6700\:5de6\:548c\:6700\:53f3\:4e24\:4e2aGLL\:70b9\:ff0c\
\:4e0b\:56fe\:4e3aN=4\:ff0cK=4\:7684\:4e00\:4e2a\:4f8b\:5b50\:ff1a"
}], "Text",
CellChangeTimes->{{3.7934821230374537`*^9, 3.7934821893709793`*^9}, {
3.7934823948731728`*^9, 3.793482396971146*^9}, {3.7934828865146217`*^9,
3.793482904807382*^9}, {3.793744981468421*^9, 3.793744981468512*^9}, {
3.7948867616521*^9, 3.794886859832265*^9}, {3.794887213302153*^9,
3.79488721372783*^9}, {3.794948178817986*^9,
3.794948197650036*^9}},ExpressionUUID->"af25f846-fdf1-47f2-8184-\
c057c0b8f2e2"],
Cell[BoxData[
RowBox[{"ArrayMesh", "[",
RowBox[{
RowBox[{"{",
RowBox[{
"1", ",", " ", "1", ",", " ", "1", ",", " ", "0", ",", " ", "1", ",", " ",
"1", ",", " ", "1", ",", " ", "0", ",", " ", "1", ",", " ", "1", ",",
" ", "1", ",", "0", ",", " ", "1", ",", " ", "1", ",", " ", "1"}], "}"}],
",", " ",
RowBox[{"MeshCellLabel", " ", "->", " ",
RowBox[{"{",
RowBox[{"0", " ", "->", " ", "\"\<Index\>\""}], "}"}]}]}],
"]"}]], "Input",
CellChangeTimes->{{3.794719856683169*^9, 3.7947198702736187`*^9}, {
3.7948868864653397`*^9, 3.79488689908027*^9}, {3.794887724197304*^9,
3.794887724620154*^9}, {3.794887755982658*^9, 3.794887757995532*^9}, {
3.794887831963035*^9, 3.7948878531036386`*^9}},
FontFamily->"Source Code Pro",
FontSize->10,
FontWeight->
"SemiBold",ExpressionUUID->"ec630843-e492-4a13-b4e5-2e227b61dc46"],
Cell[BoxData[
GraphicsBox[
TagBox[
DynamicModuleBox[{Typeset`mesh = HoldComplete[
MeshRegion[{{0.}, {1.}, {2.}, {3.}, {4.}, {5.}, {6.}, {7.}, {8.}, {9.}, {
10.}, {11.}, {12.}, {13.}, {14.}, {15.}}, {
Line[{{1, 2}, {2, 3}, {3, 4}, {5, 6}, {6, 7}, {7, 8}, {9, 10}, {10,
11}, {11, 12}, {13, 14}, {14, 15}, {15, 16}}]},
Properties -> {{0, Default} -> (MeshCellLabel -> "Index"), {
1, Default} -> (MeshCellLabel -> Automatic), {0, Default} -> (
MeshCellHighlight -> Directive[
AbsolutePointSize[5],
Hue[0.125, 0.5, 0.95]])},
Method -> {
"EliminateUnusedCoordinates" -> True, "DeleteDuplicateCoordinates" ->
Automatic, "DeleteDuplicateCells" -> Automatic, "VertexAlias" ->
Identity, "CheckOrientation" -> Automatic, "CoplanarityTolerance" ->
Automatic, "CheckIntersections" -> Automatic, "BoundaryNesting" ->
Automatic, "SeparateBoundaries" -> Automatic, "TJunction" ->
Automatic, "PropagateMarkers" -> True, "ZeroTest" -> Automatic,
"Hash" -> 5097566728445980660}]]},
TagBox[
GraphicsComplexBox[{{0., 0.}, {1., 0.}, {2., 0.}, {3., 0.}, {4., 0.}, {
5., 0.}, {6., 0.}, {7., 0.}, {8., 0.}, {9., 0.}, {10., 0.}, {11., 0.}, {
12., 0.}, {13., 0.}, {14., 0.}, {15., 0.}},
{Hue[0.6, 0.3, 0.75],
TagBox[
LineBox[{{1, 2}, {2, 3}, {3, 4}, {5, 6}, {6, 7}, {7, 8}, {9, 10}, {10,
11}, {11, 12}, {13, 14}, {14, 15}, {15, 16}}],
Annotation[#, "Geometry"]& ],
{Hue[0.125, 0.5, 0.95], AbsolutePointSize[5],
PointBox[{1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15,
16}]}, {{
{Hue[0.125, 0.5, 0.95], AbsolutePointSize[5], PointBox[{1}]},
InsetBox["1", Offset[{2, 2}, {0., 0.}], ImageScaled[{0, 0}],
BaseStyle->"Graphics"]}, {
{Hue[0.125, 0.5, 0.95], AbsolutePointSize[5], PointBox[{2}]},
InsetBox["2", Offset[{2, 2}, {1., 0.}], ImageScaled[{0, 0}],
BaseStyle->"Graphics"]}, {
{Hue[0.125, 0.5, 0.95], AbsolutePointSize[5], PointBox[{3}]},
InsetBox["3", Offset[{2, 2}, {2., 0.}], ImageScaled[{0, 0}],
BaseStyle->"Graphics"]}, {
{Hue[0.125, 0.5, 0.95], AbsolutePointSize[5], PointBox[{4}]},
InsetBox["4", Offset[{2, 2}, {3., 0.}], ImageScaled[{0, 0}],
BaseStyle->"Graphics"]}, {
{Hue[0.125, 0.5, 0.95], AbsolutePointSize[5], PointBox[{5}]},
InsetBox["5", Offset[{2, 2}, {4., 0.}], ImageScaled[{0, 0}],
BaseStyle->"Graphics"]}, {
{Hue[0.125, 0.5, 0.95], AbsolutePointSize[5], PointBox[{6}]},
InsetBox["6", Offset[{2, 2}, {5., 0.}], ImageScaled[{0, 0}],
BaseStyle->"Graphics"]}, {
{Hue[0.125, 0.5, 0.95], AbsolutePointSize[5], PointBox[{7}]},
InsetBox["7", Offset[{2, 2}, {6., 0.}], ImageScaled[{0, 0}],
BaseStyle->"Graphics"]}, {
{Hue[0.125, 0.5, 0.95], AbsolutePointSize[5], PointBox[{8}]},
InsetBox["8", Offset[{2, 2}, {7., 0.}], ImageScaled[{0, 0}],
BaseStyle->"Graphics"]}, {
{Hue[0.125, 0.5, 0.95], AbsolutePointSize[5], PointBox[{9}]},
InsetBox["9", Offset[{2, 2}, {8., 0.}], ImageScaled[{0, 0}],
BaseStyle->"Graphics"]}, {
{Hue[0.125, 0.5, 0.95], AbsolutePointSize[5], PointBox[{10}]},
InsetBox["10", Offset[{2, 2}, {9., 0.}], ImageScaled[{0, 0}],
BaseStyle->"Graphics"]}, {
{Hue[0.125, 0.5, 0.95], AbsolutePointSize[5], PointBox[{11}]},
InsetBox["11", Offset[{2, 2}, {10., 0.}], ImageScaled[{0, 0}],
BaseStyle->"Graphics"]}, {
{Hue[0.125, 0.5, 0.95], AbsolutePointSize[5], PointBox[{12}]},
InsetBox["12", Offset[{2, 2}, {11., 0.}], ImageScaled[{0, 0}],
BaseStyle->"Graphics"]}, {
{Hue[0.125, 0.5, 0.95], AbsolutePointSize[5], PointBox[{13}]},
InsetBox["13", Offset[{2, 2}, {12., 0.}], ImageScaled[{0, 0}],
BaseStyle->"Graphics"]}, {
{Hue[0.125, 0.5, 0.95], AbsolutePointSize[5], PointBox[{14}]},
InsetBox["14", Offset[{2, 2}, {13., 0.}], ImageScaled[{0, 0}],
BaseStyle->"Graphics"]}, {
{Hue[0.125, 0.5, 0.95], AbsolutePointSize[5], PointBox[{15}]},
InsetBox["15", Offset[{2, 2}, {14., 0.}], ImageScaled[{0, 0}],
BaseStyle->"Graphics"]}, {
{Hue[0.125, 0.5, 0.95], AbsolutePointSize[5], PointBox[{16}]},
InsetBox["16", Offset[{2, 2}, {15., 0.}], ImageScaled[{0, 0}],
BaseStyle->"Graphics"]}}}],
MouseAppearanceTag["LinkHand"]],
AllowKernelInitialization->False],
"MeshGraphics",
AutoDelete->True,
Editable->False,
Selectable->False],
AspectRatio->0.0618034,
AxesOrigin->{Automatic, 0},
DefaultBaseStyle->{
"MeshGraphics", FrontEnd`GraphicsHighlightColor -> Hue[0.1, 1, 0.7]},
PlotRange->{{0., 15.}, {0, All}},
PlotRangePadding->{{
Scaled[0.1],
Scaled[0.1]}, {0, 1}}]], "Input",
CellChangeTimes->{{3.79488780519317*^9, 3.794887805204537*^9}},
TextAlignment->Center,ExpressionUUID->"b6437b9a-3625-48ee-8f89-b1775f190569"],
Cell["\:5219\:7531\:4e8eLagrange\:63d2\:503c\:51fd\:6570\:7684\:6784\:9020\
\:53ef\:77e5\:ff1a", "Text",
CellChangeTimes->{{3.794887003986643*^9,
3.794887025018693*^9}},ExpressionUUID->"094eb788-7787-49c6-ac5a-\
16ec6c746210"],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
RowBox[{
StyleBox["\[ScriptL]",
FontWeight->"Bold"], "(",
SubsuperscriptBox["x", "l", "k"], ")"}],
StyleBox["=",
FontSlant->"Italic"],
RowBox[{
SuperscriptBox[
RowBox[{"[",
RowBox[{
RowBox[{
SubsuperscriptBox["\[ScriptL]", "1", "k"],
StyleBox["(",
FontSlant->"Plain"],
SubsuperscriptBox["x", "1", "k"],
StyleBox[")",
FontSlant->"Plain"]}],
StyleBox[",",
FontSlant->"Plain"],
StyleBox[" ",
FontSlant->"Plain"],
RowBox[{"\[CenterDot]", "\[CenterDot]", "\[CenterDot]"}], " ", ",",
" ",
RowBox[{
SubsuperscriptBox["\[ScriptL]", "N", "k"],
StyleBox["(",
FontSlant->"Plain"],
SubsuperscriptBox["x", "1", "k"],
StyleBox[")",
FontSlant->"Plain"]}]}],
StyleBox["]",
FontSlant->"Italic"]}], "T"], "=",
SuperscriptBox[
RowBox[{"[",
RowBox[{"1",
StyleBox[",",
FontSlant->"Plain"],
StyleBox[" ",
FontSlant->"Plain"],
RowBox[{"\[CenterDot]", "\[CenterDot]", "\[CenterDot]"}], " ", ",",
"0"}],
StyleBox["]",
FontSlant->"Italic"]}], "T"]}]}], "\:ff0c",
RowBox[{
RowBox[{
StyleBox["\[ScriptL]",
FontWeight->"Bold"], "(",
SubsuperscriptBox["x", "r", "k"], ")"}],
StyleBox["=",
FontSlant->"Italic"],
RowBox[{
SuperscriptBox[
RowBox[{"[",
RowBox[{
RowBox[{
SubsuperscriptBox["\[ScriptL]", "1", "k"],
StyleBox["(",
FontSlant->"Plain"],
SubsuperscriptBox["x", "N", "k"],
StyleBox[")",
FontSlant->"Plain"]}],
StyleBox[",",
FontSlant->"Plain"],
StyleBox[" ",
FontSlant->"Plain"],
RowBox[{"\[CenterDot]", "\[CenterDot]", "\[CenterDot]"}], " ", ",",
" ",
RowBox[{
SubsuperscriptBox["\[ScriptL]", "N", "k"],
StyleBox["(",
FontSlant->"Plain"],
SubsuperscriptBox["x", "N", "k"],
StyleBox[")",
FontSlant->"Plain"]}]}],
StyleBox["]",
FontSlant->"Italic"]}], "T"], "=",
RowBox[{
SuperscriptBox[
RowBox[{"[",
RowBox[{"0",
StyleBox[",",
FontSlant->"Plain"],
StyleBox[" ",
FontSlant->"Plain"],
RowBox[{"\[CenterDot]", "\[CenterDot]", "\[CenterDot]"}], " ", ",",
"1"}],
StyleBox["]",
FontSlant->"Italic"]}], "T"], "."}]}]}]}],
TraditionalForm]], "DisplayFormulaNumbered",
CellChangeTimes->{{3.79341669923407*^9, 3.7934168883983917`*^9}, {
3.793418866856481*^9, 3.793418900207712*^9}, 3.793422264847341*^9, {
3.793422307792674*^9, 3.793422320252119*^9}, {3.793422368133905*^9,
3.793422368442421*^9}, 3.793481755837995*^9, {3.793482204748869*^9,
3.793482205961769*^9}, {3.793482245834556*^9, 3.793482269030301*^9}, {
3.793482315921001*^9, 3.793482384010062*^9}, 3.793482460428049*^9, {
3.7934829262334433`*^9, 3.7934829380305443`*^9}, {3.793483861636951*^9,
3.793483871704568*^9}, 3.793487722340178*^9, {3.794887095017605*^9,
3.794887096175891*^9}},
TextAlignment->Center,ExpressionUUID->"fd32c6ad-4a45-4a06-9d4e-bb703b1b2cdd"],
Cell[TextData[{
"\:5bf9\:4e8e\:7b2c",
StyleBox["k",
FontSlant->"Italic"],
"(1<",
StyleBox["k",
FontSlant->"Italic"],
"<",
StyleBox["N",
FontSlant->"Italic"],
")\:4e2a\:5185\:90e8\:5355\:5143\:ff0c\:5176\:5de6\:53f3\:4e24\:4fa7\:7684\
\:6570\:503c\:901a\:91cf\:5206\:522b\:4e3a\:ff1a"
}], "Text",
CellChangeTimes->{{3.793487730665043*^9, 3.793487734104967*^9}, {
3.7948872680200453`*^9, 3.794887290850223*^9}, {3.7948876300155487`*^9,
3.7948876916534767`*^9}},ExpressionUUID->"96813589-ee0b-457f-bb05-\
d56f6a66d612"],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
RowBox[{
SuperscriptBox[
RowBox[{"(",
RowBox[{"a", " ",
SubscriptBox["u", "h"]}], ")"}], "*"],
SubscriptBox["|",
SubsuperscriptBox["x", "l", "k"]]}], "=",
RowBox[{
RowBox[{
RowBox[{"a",
FractionBox[
RowBox[{
RowBox[{
SubsuperscriptBox["u", "N",
RowBox[{"k", "-", "1"}]], "(", "t", ")"}], "+",
RowBox[{
SubsuperscriptBox["u", "1", "k"], "(", "t", ")"}]}], "2"]}], "+",
RowBox[{"a",
FractionBox[
RowBox[{"1", "-", "\[Alpha]", " "}], "2"],
RowBox[{"(",
RowBox[{
RowBox[{
SubsuperscriptBox["u", "N",
RowBox[{"k", "-", "1"}]], "(", "t", ")"}], "-",
RowBox[{
SubsuperscriptBox["u", "1", "k"], "(", "t", ")"}]}], ")"}]}]}], "=",
RowBox[{
RowBox[{
FractionBox[
RowBox[{" ", "\[Alpha]", " "}], "2"], "a", " ",
RowBox[{
SubsuperscriptBox["u", "1", "k"], "(", "t", ")"}]}], "+",
RowBox[{
FractionBox[
RowBox[{"2", "-", "\[Alpha]", " "}], "2"], "a", " ",
RowBox[{
SubsuperscriptBox["u", "N",
RowBox[{"k", "-", "1"}]], "(", "t", ")"}]}]}]}]}], ",", "\n",
RowBox[{
RowBox[{
SuperscriptBox[
RowBox[{"(",
RowBox[{"a", " ",
SubscriptBox["u", "h"]}], ")"}], "*"],
SubscriptBox["|",
SubsuperscriptBox["x", "r", "k"]]}], "=",
RowBox[{
RowBox[{
RowBox[{"a",
FractionBox[
RowBox[{
RowBox[{
SubsuperscriptBox["u", "N", "k"], "(", "t", ")"}], "+",
RowBox[{
SubsuperscriptBox["u", "1",
RowBox[{"k", "+", "1"}]], "(", "t", ")"}]}], "2"]}], "+",
RowBox[{"a",
FractionBox[
RowBox[{"1", "-", "\[Alpha]", " "}], "2"],
RowBox[{"(",
RowBox[{
RowBox[{
SubsuperscriptBox["u", "N", "k"], "(", "t", ")"}], "-",
RowBox[{
SubsuperscriptBox["u", "1",
RowBox[{"k", "+", "1"}]], "(", "t", ")"}]}], ")"}]}]}], "=",
RowBox[{
RowBox[{
FractionBox[
RowBox[{"2", "-", "\[Alpha]", " "}], "2"], "a", " ",
RowBox[{
SubsuperscriptBox["u", "N", "k"], "(", "t", ")"}]}], "+",
RowBox[{
FractionBox[
RowBox[{" ", "\[Alpha]", " "}], "2"], "a", " ",
RowBox[{
RowBox[{
SubsuperscriptBox["u", "1",
RowBox[{"k", "+", "1"}]], "(", "t", ")"}], "."}]}]}]}]}]}],
TraditionalForm]], "DisplayFormulaNumbered",
CellChangeTimes->{{3.793434641013731*^9, 3.793434752921215*^9}, {
3.7934348048442*^9, 3.7934348258700438`*^9}, {3.793434911628057*^9,
3.793435025487447*^9}, {3.7934351432207537`*^9, 3.79343516668856*^9}, {
3.793435438938056*^9, 3.793435563763419*^9}, {3.793436597131547*^9,
3.793436645960273*^9}, {3.7934367294474583`*^9, 3.793436763579878*^9}, {
3.793438353416103*^9, 3.793438365919372*^9}, {3.793438862333832*^9,
3.7934388830903482`*^9}, {3.793438913521089*^9, 3.793438916072529*^9}, {
3.7934389493616877`*^9, 3.793438959886738*^9}, {3.793439074900963*^9,
3.793439082507517*^9}, 3.79343917326549*^9, {3.793439671677738*^9,
3.793439672814155*^9}, 3.79343980179983*^9, 3.79348508417838*^9, {
3.793485193744782*^9, 3.7934852760140533`*^9}, {3.7934854241754417`*^9,
3.793485425365222*^9}, {3.7934854686456623`*^9, 3.7934855183545094`*^9}, {
3.79348774127217*^9, 3.79348774580805*^9}, 3.793487847612997*^9, {
3.7935213743657923`*^9, 3.793521374368496*^9}, {3.7935215019679623`*^9,
3.793521510320006*^9}, {3.793521551638521*^9, 3.793521587884251*^9}, {
3.793521633876185*^9, 3.7935216368730183`*^9}, {3.793524019715579*^9,
3.793524146076105*^9}, 3.793524415419276*^9, {3.793524559221055*^9,
3.793524565253132*^9}, {3.793571937332097*^9, 3.793571939614216*^9},
3.793923119974519*^9, 3.7948882417161818`*^9, {3.794889234491478*^9,
3.794889239443823*^9}},
TextAlignment->Center,ExpressionUUID->"88657138-3a28-4d83-80bf-8f17e47b8d8a"],
Cell["\:5176\:5de6\:53f3\:4e24\:7aef\:7684\:901a\:91cf\:4e3a\:ff1a", "Text",
CellChangeTimes->{{3.793485547470973*^9, 3.7934855769195213`*^9}, {
3.793488418356648*^9, 3.793488419349926*^9}, {3.793525107800812*^9,
3.793525112383494*^9}, {3.794887425686029*^9, 3.79488745335566*^9}, {
3.794887513219603*^9, 3.794887524768257*^9}, {3.794887700813961*^9,
3.794887704485021*^9}, {3.794888425300898*^9,
3.794888450932577*^9}},ExpressionUUID->"0800459b-e05f-4c91-be84-\
f0b2f3ad61fd"],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{"a", " ",
SubscriptBox["u", "h"]}], ")"}],
SubscriptBox["|",
SubsuperscriptBox["x", "l", "k"]]}], "=",
RowBox[{
RowBox[{"a", " ",
RowBox[{
SubscriptBox["u", "h"], "(",
RowBox[{
SubsuperscriptBox["x", "l", "k"], "\:ff0c", "t"}], ")"}]}], "=",
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "1", "k"], "(", "t", ")"}]}]}]}], ",",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{"a", " ",
SubscriptBox["u", "h"]}], ")"}],
SubscriptBox["|",
SubsuperscriptBox["x", "r", "k"]]}], "=", " ",
RowBox[{
RowBox[{"a", " ",
RowBox[{
SubscriptBox["u", "h"], "(",
RowBox[{
SubsuperscriptBox["x", "r", "k"], "\:ff0c", "t"}], ")"}]}], "=",
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "N", "k"], "(", "t", ")"}]}]}]}], ","}],
TraditionalForm]], "DisplayFormulaNumbered",
CellChangeTimes->{{3.793434641013731*^9, 3.793434752921215*^9}, {
3.7934348048442*^9, 3.7934348258700438`*^9}, {3.793434911628057*^9,
3.793435025487447*^9}, {3.7934351432207537`*^9, 3.79343516668856*^9}, {
3.793435438938056*^9, 3.793435563763419*^9}, {3.793436597131547*^9,
3.793436645960273*^9}, {3.7934367294474583`*^9, 3.793436763579878*^9}, {
3.793438353416103*^9, 3.793438365919372*^9}, {3.793438862333832*^9,
3.7934388830903482`*^9}, {3.793438913521089*^9, 3.793438916072529*^9}, {
3.7934389493616877`*^9, 3.793438959886738*^9}, {3.793439074900963*^9,
3.793439082507517*^9}, 3.79343917326549*^9, {3.793439671677738*^9,
3.793439672814155*^9}, 3.79343980179983*^9, {3.79348508417838*^9,
3.793485109923771*^9}, {3.793485162042235*^9, 3.7934851776949863`*^9}, {
3.793485415560774*^9, 3.7934854171968813`*^9}, 3.7935250780533447`*^9, {
3.793525127559826*^9, 3.793525141510825*^9}, {3.7935719322115793`*^9,
3.793571936300638*^9}, {3.794887092105452*^9, 3.794887093008078*^9}},
TextAlignment->Center,ExpressionUUID->"d42d05c2-770e-43c4-ae33-a35bf814765b"],
Cell["\:5219\:5176\:5de6\:53f3\:4e24\:7aef\:7684\:901a\:91cf\:4e0e\:6570\:503c\
\:901a\:91cf\:7684\:5dee\:4e3a\:ff1a", "Text",
CellChangeTimes->{{3.793485547470973*^9, 3.7934855769195213`*^9}, {
3.793488418356648*^9, 3.793488419349926*^9}, {3.793525107800812*^9,
3.793525112383494*^9}, {3.794887425686029*^9,
3.79488745335566*^9}},ExpressionUUID->"002f1092-eb3a-4f41-b973-\
f716fbacaa68"],
Cell[BoxData[
FormBox[
RowBox[{" ",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
SubscriptBox["u", "h"]}], "-",
SuperscriptBox[
RowBox[{"(",
RowBox[{"a", " ",
SubscriptBox["u", "h"]}], ")"}], "*"]}], ")"}],
SubscriptBox["|",
SubsuperscriptBox["x", "l", "k"]]}], "=",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{"a", " ",
SubscriptBox["u", "h"]}], ")"}],
SubscriptBox["|",
SubsuperscriptBox["x", "l", "k"]],
RowBox[{"-",
SuperscriptBox[
RowBox[{"(",
RowBox[{"a", " ",
SubscriptBox["u", "h"]}], ")"}], "*"]}],
SubscriptBox["|",
SubsuperscriptBox["x", "l", "k"]]}], "=",
RowBox[{
FractionBox[
RowBox[{"2", "-", "\[Alpha]", " "}], "2"],
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "1", "k"], "(", "t", ")"}]}], "-",
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "N",
RowBox[{"k", "-", "1"}]], "(", "t", ")"}]}]}], ")"}]}]}]}], ",",
" ", "\n",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
SubscriptBox["u", "h"]}], "-",
SuperscriptBox[
RowBox[{"(",
RowBox[{"a", " ",
SubscriptBox["u", "h"]}], ")"}], "*"]}], ")"}],
SubscriptBox["|",
SubsuperscriptBox["x", "r", "k"]]}], "=",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{"a", " ",
SubscriptBox["u", "h"]}], ")"}],
SubscriptBox["|",
SubsuperscriptBox["x", "r", "k"]],
RowBox[{"-",
SuperscriptBox[
RowBox[{"(",
RowBox[{"a", " ",
SubscriptBox["u", "h"]}], ")"}], "*"]}],
SubscriptBox["|",
SubsuperscriptBox["x", "r", "k"]]}], "=",
RowBox[{
FractionBox[
RowBox[{"\[Alpha]", " "}], "2"],
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "N", "k"], "(", "t", ")"}]}], "-",
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "1",
RowBox[{"k", "+", "1"}]], "(", "t", ")"}]}]}], ")"}],
"."}]}]}]}]}]}], TraditionalForm]], "DisplayFormulaNumbered",
CellChangeTimes->{{3.793434641013731*^9, 3.793434752921215*^9}, {
3.7934348048442*^9, 3.7934348258700438`*^9}, {3.793434911628057*^9,
3.793435025487447*^9}, {3.7934351432207537`*^9, 3.79343516668856*^9}, {
3.793435438938056*^9, 3.793435563763419*^9}, {3.793436597131547*^9,
3.793436645960273*^9}, {3.7934367294474583`*^9, 3.793436763579878*^9}, {
3.793438353416103*^9, 3.793438365919372*^9}, {3.793438862333832*^9,
3.7934388830903482`*^9}, {3.793438913521089*^9, 3.793438916072529*^9}, {
3.7934389493616877`*^9, 3.793438959886738*^9}, {3.793439074900963*^9,
3.793439082507517*^9}, 3.79343917326549*^9, {3.793439671677738*^9,
3.793439672814155*^9}, 3.79343980179983*^9, 3.79348508417838*^9, {
3.793485193744782*^9, 3.7934852760140533`*^9}, {3.7934854241754417`*^9,
3.793485425365222*^9}, {3.7934854686456623`*^9, 3.7934855183545094`*^9}, {
3.793485600162991*^9, 3.793485695762752*^9}, {3.7934878138163023`*^9,
3.793487905929892*^9}, {3.79348798372147*^9, 3.7934879884095087`*^9},
3.793524427467082*^9, {3.793524464455105*^9, 3.7935244694883833`*^9}, {
3.79352469117663*^9, 3.793524728253927*^9}, {3.7935719436797113`*^9,
3.793571949493746*^9}, {3.793923128845755*^9, 3.7939231307499847`*^9}, {
3.7948890454094553`*^9, 3.7948890491295977`*^9}, {3.794889100720175*^9,
3.79488910334328*^9}, {3.794889196573804*^9, 3.794889196723871*^9}, {
3.794889258283462*^9, 3.794889265042399*^9}, {3.79488929646633*^9,
3.794889301752685*^9}},
TextAlignment->Center,ExpressionUUID->"e27dfef5-f0d3-4117-803f-3ae299ebf7cd"],
Cell[TextData[{
"\:5728\:5de6\:7aef(",
StyleBox["k=",
FontSlant->"Italic"],
"1)\:548c\:53f3\:7aef\:5355\:5143(",
StyleBox["k=N",
FontSlant->"Italic"],
")\:4e0a\:ff0c\:9700\:8981\:8003\:8651\:8fb9\:754c\:6761\:4ef6\:7684\:95ee\
\:9898\:ff0c\:65e2\:ff1a"
}], "Text",
CellChangeTimes->{{3.794888456327813*^9,
3.794888525226301*^9}},ExpressionUUID->"bbd52da3-6a81-4e12-b977-\
614ed8c6a4e7"],
Cell[BoxData[
FormBox[
RowBox[{" ",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
SubscriptBox["u", "h"]}], "-",
SuperscriptBox[
RowBox[{"(",
RowBox[{"a", " ",
SubscriptBox["u", "h"]}], ")"}], "*"]}], ")"}],
SubscriptBox["|",
SubsuperscriptBox["x", "l", "1"]]}], "=",
RowBox[{
FractionBox[
RowBox[{"2", "-", "\[Alpha]", " "}], "2"],
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "1", "k"], "(", "t", ")"}]}], "-",
RowBox[{"a", " ",
RowBox[{
SubscriptBox["u", "L"], "(", "t", ")"}]}]}], ")"}]}]}], ",", " ",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
SubscriptBox["u", "h"]}], "-",
SuperscriptBox[
RowBox[{"(",
RowBox[{"a", " ",
SubscriptBox["u", "h"]}], ")"}], "*"]}], ")"}],
SubscriptBox["|",
SubsuperscriptBox["x", "r", "N"]]}], "=",
RowBox[{
FractionBox[
RowBox[{"\[Alpha]", " "}], "2"],
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "N", "k"], "(", "t", ")"}]}], "-",
RowBox[{"a", " ",
RowBox[{
SubscriptBox["u", "R"], "(", "t", ")"}]}]}], ")"}]}]}], ","}]}],
TraditionalForm]], "DisplayFormulaNumbered",
CellChangeTimes->{{3.793434641013731*^9, 3.793434752921215*^9}, {
3.7934348048442*^9, 3.7934348258700438`*^9}, {3.793434911628057*^9,
3.793435025487447*^9}, {3.7934351432207537`*^9, 3.79343516668856*^9}, {
3.793435438938056*^9, 3.793435563763419*^9}, {3.793436597131547*^9,
3.793436645960273*^9}, {3.7934367294474583`*^9, 3.793436763579878*^9}, {
3.793438353416103*^9, 3.793438365919372*^9}, {3.793438862333832*^9,
3.7934388830903482`*^9}, {3.793438913521089*^9, 3.793438916072529*^9}, {
3.7934389493616877`*^9, 3.793438959886738*^9}, {3.793439074900963*^9,
3.793439082507517*^9}, 3.79343917326549*^9, {3.793439671677738*^9,
3.793439672814155*^9}, 3.79343980179983*^9, 3.79348508417838*^9, {
3.793485193744782*^9, 3.7934852760140533`*^9}, {3.7934854241754417`*^9,
3.793485425365222*^9}, {3.7934854686456623`*^9, 3.7934855183545094`*^9}, {
3.793485600162991*^9, 3.793485695762752*^9}, {3.7934878138163023`*^9,
3.793487905929892*^9}, {3.79348798372147*^9, 3.7934879884095087`*^9},
3.793524427467082*^9, {3.793524464455105*^9, 3.7935244694883833`*^9}, {
3.79352469117663*^9, 3.793524728253927*^9}, {3.7935719436797113`*^9,
3.793571949493746*^9}, {3.793923128845755*^9, 3.7939231307499847`*^9}, {
3.794888538378777*^9, 3.794888551338118*^9}, {3.7948886404319677`*^9,
3.7948886595171957`*^9}, {3.794888689646311*^9, 3.7948887472185507`*^9}, {
3.794888995962969*^9, 3.794889000811448*^9}, {3.7948893189048433`*^9,
3.794889353806992*^9}, {3.794889471924346*^9, 3.794889478683654*^9}},
TextAlignment->Center,ExpressionUUID->"5a34ab1a-c1ed-474e-a59d-1f014da54275"],
Cell[TextData[{
StyleBox["\:5176\:4e2d",
FontSlant->"Italic"],
Cell[BoxData[
FormBox[
RowBox[{
SubscriptBox["u", "L"], "(", "t", ")"}], TraditionalForm]],
CellChangeTimes->{{3.793434641013731*^9, 3.793434752921215*^9}, {
3.7934348048442*^9, 3.7934348258700438`*^9}, {3.793434911628057*^9,
3.793435025487447*^9}, {3.7934351432207537`*^9, 3.79343516668856*^9}, {
3.793435438938056*^9, 3.793435563763419*^9}, {3.793436597131547*^9,
3.793436645960273*^9}, {3.7934367294474583`*^9, 3.793436763579878*^9}, {
3.793438353416103*^9, 3.793438365919372*^9}, {3.793438862333832*^9,
3.7934388830903482`*^9}, {3.793438913521089*^9, 3.793438916072529*^9}, {
3.7934389493616877`*^9, 3.793438959886738*^9}, {3.793439074900963*^9,
3.793439082507517*^9}, 3.79343917326549*^9, {3.793439671677738*^9,
3.793439672814155*^9}, 3.79343980179983*^9, 3.79348508417838*^9, {
3.793485193744782*^9, 3.7934852760140533`*^9}, {3.7934854241754417`*^9,
3.793485425365222*^9}, {3.7934854686456623`*^9, 3.7934855183545094`*^9}, {
3.793485600162991*^9, 3.793485695762752*^9}, {3.7934878138163023`*^9,
3.793487905929892*^9}, {3.79348798372147*^9, 3.7934879884095087`*^9},
3.793524427467082*^9, {3.793524464455105*^9, 3.7935244694883833`*^9}, {
3.79352469117663*^9, 3.793524728253927*^9}, {3.7935719436797113`*^9,
3.793571949493746*^9}, {3.793923128845755*^9, 3.7939231307499847`*^9}, {
3.794888538378777*^9, 3.794888551338118*^9}, {3.7948886404319677`*^9,
3.7948886595171957`*^9}, {3.794888689646311*^9, 3.7948887472185507`*^9}},
TextAlignment->Center,ExpressionUUID->
"65a919df-6087-463c-8321-7551a09b1696"],
StyleBox["\:548c",
FontSlant->"Italic"],
Cell[BoxData[
FormBox[
RowBox[{
SubscriptBox["u", "R"], "(", "t", ")"}], TraditionalForm]],
CellChangeTimes->{{3.793434641013731*^9, 3.793434752921215*^9}, {
3.7934348048442*^9, 3.7934348258700438`*^9}, {3.793434911628057*^9,
3.793435025487447*^9}, {3.7934351432207537`*^9, 3.79343516668856*^9}, {
3.793435438938056*^9, 3.793435563763419*^9}, {3.793436597131547*^9,
3.793436645960273*^9}, {3.7934367294474583`*^9, 3.793436763579878*^9}, {
3.793438353416103*^9, 3.793438365919372*^9}, {3.793438862333832*^9,
3.7934388830903482`*^9}, {3.793438913521089*^9, 3.793438916072529*^9}, {
3.7934389493616877`*^9, 3.793438959886738*^9}, {3.793439074900963*^9,
3.793439082507517*^9}, 3.79343917326549*^9, {3.793439671677738*^9,
3.793439672814155*^9}, 3.79343980179983*^9, 3.79348508417838*^9, {
3.793485193744782*^9, 3.7934852760140533`*^9}, {3.7934854241754417`*^9,
3.793485425365222*^9}, {3.7934854686456623`*^9, 3.7934855183545094`*^9}, {
3.793485600162991*^9, 3.793485695762752*^9}, {3.7934878138163023`*^9,
3.793487905929892*^9}, {3.79348798372147*^9, 3.7934879884095087`*^9},
3.793524427467082*^9, {3.793524464455105*^9, 3.7935244694883833`*^9}, {
3.79352469117663*^9, 3.793524728253927*^9}, {3.7935719436797113`*^9,
3.793571949493746*^9}, {3.793923128845755*^9, 3.7939231307499847`*^9}, {
3.794888538378777*^9, 3.794888551338118*^9}, {3.7948886404319677`*^9,
3.7948886595171957`*^9}, {3.794888689646311*^9, 3.7948887472185507`*^9}},
TextAlignment->Center,ExpressionUUID->
"dae87c43-d894-4de7-85a8-2debafaef0f9"],
StyleBox["\:4e3a\:65bd\:52a0\:7684\:8fb9\:754c\:6761\:4ef6\:3002\:90a3\:4e48",
FontSlant->"Italic"],
"\:65b9\:7a0b(16)\:53ef\:91cd\:65b0\:5199\:4f5c\:77e9\:9635\:5f62\:5f0f\:ff1a"
}], "Text",
CellChangeTimes->{{3.7934834725367823`*^9, 3.7934834825765*^9}, {
3.793525760830957*^9, 3.7935257613896112`*^9}, {3.794889545025427*^9,
3.794889545824275*^9}, {3.79489047356406*^9,
3.794890489138629*^9}},ExpressionUUID->"28fc0207-22cc-4495-80df-\
a656537438d5"],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
RowBox[{
RowBox[{"(", GridBox[{
{
SubsuperscriptBox["\[ScriptCapitalM]", "11", "k"],
"\[CenterEllipsis]",
SubsuperscriptBox["\[ScriptCapitalM]",
RowBox[{"1", "N"}], "k"]},
{"\[VerticalEllipsis]", "\[CenterEllipsis]", "\[VerticalEllipsis]"},
{"\[VerticalEllipsis]", "\[DescendingEllipsis]",
"\[VerticalEllipsis]"},
{"\[VerticalEllipsis]", "\[CenterEllipsis]", "\[VerticalEllipsis]"},
{
SubsuperscriptBox["\[ScriptCapitalM]",
RowBox[{"N", " ", "1"}], "1"], "\[CenterEllipsis]",
SubsuperscriptBox["\[ScriptCapitalM]",
RowBox[{"N", " ", "N"}], "1"]}
}], ")"}],
RowBox[{"(", GridBox[{
{
RowBox[{"d", " ",
RowBox[{
FormBox[
RowBox[{
SubsuperscriptBox["u", "1", "k"], "(", "t", ")"}],
TraditionalForm], "/", "d"}], " ", "t"}]},
{"\[VerticalEllipsis]"},
{"\[VerticalEllipsis]"},
{"\[VerticalEllipsis]"},
{
RowBox[{"d", " ",
RowBox[{
FormBox[
RowBox[{
SubsuperscriptBox["u", "N", "k"], "(", "t", ")"}],
TraditionalForm], "/", "d"}], " ", "t"}]}
}], ")"}]}], "=",
RowBox[{
RowBox[{
RowBox[{"-", " ",
RowBox[{"(", GridBox[{
{
SubsuperscriptBox["\[ScriptCapitalS]", "11", "k"],
"\[CenterEllipsis]",
SubsuperscriptBox["\[ScriptCapitalS]",
RowBox[{"1", "N"}], "k"]},
{"\[VerticalEllipsis]", "\[CenterEllipsis]",
"\[VerticalEllipsis]"},
{"\[VerticalEllipsis]", "\[DescendingEllipsis]",
"\[VerticalEllipsis]"},
{"\[VerticalEllipsis]", "\[CenterEllipsis]",
"\[VerticalEllipsis]"},
{
SubsuperscriptBox["\[ScriptCapitalS]",
RowBox[{"N", " ", "1"}], "k"], "\[CenterEllipsis]",
SubsuperscriptBox["\[ScriptCapitalS]",
RowBox[{"N", " ", "N"}], "k"]}
}], ")"}]}],
RowBox[{"(", GridBox[{
{
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "1", "k"], "(", "t", ")"}]}]},
{"\[VerticalEllipsis]"},
{"\[VerticalEllipsis]"},
{"\[VerticalEllipsis]"},
{
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "N", "k"], "(", "t", ")"}]}]}
}], ")"}]}], "+",
RowBox[{"(", GridBox[{
{
RowBox[{
RowBox[{"-",
FractionBox[
RowBox[{"2", "-", "\[Alpha]", " "}], "2"]}],
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
SubsuperscriptBox["u", "1", "k"],
RowBox[{"(", "t", ")"}]}], "-",
RowBox[{"a", " ",
SubsuperscriptBox["u", "N",
RowBox[{"k", "-", "1"}]],
RowBox[{"(", "t", ")"}]}]}], ")"}]}]},
{"0"},
{"\[VerticalEllipsis]"},
{"0"},
{
RowBox[{
FractionBox[
RowBox[{"\[Alpha]", " "}], "2"],
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "N", "k"], "(", "t", ")"}]}], "-",
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "1",
RowBox[{"k", "+", "1"}]], "(", "t", ")"}]}]}], ")"}]}]}
}], ")"}]}]}], " ", ","}], TraditionalForm]], "DisplayFormulaNumbered",\
CellChangeTimes->{{3.79334631179887*^9, 3.793346586220757*^9}, {
3.793346631556378*^9, 3.793346689874165*^9}, {3.793346724679604*^9,
3.79334676158291*^9}, {3.793346819503441*^9, 3.793346892608966*^9}, {
3.79334938896157*^9, 3.793349439199594*^9}, 3.793349479678372*^9,
3.793352662256329*^9, {3.793421241129435*^9, 3.793421397420751*^9},
3.793421437518654*^9, {3.793421468548431*^9, 3.793421541969122*^9}, {
3.793421580609282*^9, 3.793421588302534*^9}, {3.793421622175956*^9,
3.793421791943013*^9}, {3.793421922452745*^9, 3.793421932394889*^9}, {
3.793422029103299*^9, 3.793422033981716*^9}, {3.793422404667499*^9,
3.793422412952681*^9}, {3.793437323169849*^9, 3.7934373805639057`*^9}, {
3.793437433653981*^9, 3.793437449683139*^9}, {3.7934375953582563`*^9,
3.79343760700541*^9}, {3.793437786143276*^9, 3.7934378037018023`*^9}, {
3.793437862276196*^9, 3.793437880146606*^9}, {3.793483604478245*^9,
3.7934836049313374`*^9}, {3.793483651779449*^9, 3.7934837149764214`*^9}, {
3.793483777002928*^9, 3.793483815410882*^9}, {3.793484701447744*^9,
3.793484755886343*^9}, {3.793484790268301*^9, 3.793484925113729*^9}, {
3.793485757932563*^9, 3.7934857651568203`*^9}, {3.793488037050054*^9,
3.7934880432405024`*^9}, 3.793488597167079*^9, {3.793488934988772*^9,
3.79348894056145*^9}, {3.7934901908384666`*^9, 3.793490216544455*^9}, {
3.793491209566193*^9, 3.79349121887388*^9}, 3.793520744645605*^9, {
3.7935256435800447`*^9, 3.7935256848258457`*^9}, {3.793571964248505*^9,
3.7935719662303658`*^9}, {3.793938105928001*^9, 3.793938106686057*^9}, {
3.7939389384756308`*^9, 3.7939389442189827`*^9}, 3.794889829785431*^9, {
3.794889900525729*^9, 3.794889973651618*^9}, {3.794890682476655*^9,
3.794890713978998*^9}, {3.794890773105329*^9, 3.7948908647096653`*^9}},
TextAlignment->Center,ExpressionUUID->"939e2146-54fd-4cd1-af69-a6a4b2a6a183"],
Cell[TextData[{
"\:5982\:679c\:5b9a\:4e49\:4e3a\:6807\:51c6\:5355\:5143[-1,1]\:4e0a\:7684\
\:8d28\:91cf\:77e9\:9635\:548c\:521a\:5ea6\:77e9\:9635\:5206\:522b\:4e3a\
\[ScriptCapitalM]\:548c\[ScriptCapitalS]\:ff0c\:5219\:7b2c",
StyleBox["k",
FontSlant->"Italic"],
"\:4e2a\:5355\:5143\:4e0a\:7684\:8d28\:91cf\:548c\:521a\:5ea6\:77e9\:9635\
\:4e0e\:6807\:51c6\:5355\:5143\:4e0a\:7684\:5b58\:5728\:5982\:4e0b\:5173\:7cfb\
\:ff1a"
}], "Text",
CellChangeTimes->{{3.794949842561969*^9, 3.794949884160482*^9}, {
3.794950051739032*^9,
3.794950094353513*^9}},ExpressionUUID->"ba00166a-4a26-4c0b-94c0-\
b2291f342659"],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
SuperscriptBox["\[ScriptCapitalM]", "k"], "=",
RowBox[{
FractionBox[
SuperscriptBox["h", "k"], "2"], "\[ScriptCapitalM]"}]}], ",",
RowBox[{
SuperscriptBox["\[ScriptCapitalS]", "k"], "=",
RowBox[{"\[ScriptCapitalS]", "."}]}]}],
TraditionalForm]], "DisplayFormulaNumbered",
CellChangeTimes->{
3.793488536721204*^9, 3.7934886629500313`*^9, {3.793488757523641*^9,
3.7934887884794693`*^9}, {3.79348885536605*^9, 3.793488860525187*^9}, {
3.7935258513317213`*^9, 3.793525852114415*^9}, 3.794890513767541*^9,
3.7948905727594976`*^9, {3.7948917204824266`*^9, 3.79489173381721*^9}, {
3.794949830235162*^9, 3.794949840841448*^9}, {3.794949903735197*^9,
3.79494991449542*^9}, {3.794950264579232*^9, 3.794950273467518*^9}},
TextAlignment->Center,ExpressionUUID->"ffd6cad8-b123-4e2b-a189-8f24b29bd47f"],
Cell["\:65b9\:7a0b(24)\:53ef\:91cd\:65b0\:5199\:4f5c\:ff1a", "Text",
CellChangeTimes->{{3.7949499173686237`*^9,
3.794949928198457*^9}},ExpressionUUID->"c3e285dc-18d9-491a-8079-\
be8e78f1d918"],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{
RowBox[{
FractionBox[
SuperscriptBox["h", "k"], "2"],
RowBox[{"(", GridBox[{
{
SubscriptBox["\[ScriptCapitalM]", "11"], "\[CenterEllipsis]",
SubscriptBox["\[ScriptCapitalM]",
RowBox[{"1", "N"}]]},
{"\[VerticalEllipsis]", "\[CenterEllipsis]", "\[VerticalEllipsis]"},
{"\[VerticalEllipsis]", "\[DescendingEllipsis]",
"\[VerticalEllipsis]"},
{"\[VerticalEllipsis]", "\[CenterEllipsis]", "\[VerticalEllipsis]"},
{
SubscriptBox["\[ScriptCapitalM]",
RowBox[{"N", " ", "1"}]], "\[CenterEllipsis]",
SubscriptBox["\[ScriptCapitalM]",
RowBox[{"N", " ", "N"}]]}
}], ")"}],
RowBox[{"(", GridBox[{
{
RowBox[{"d", " ",
RowBox[{
FormBox[
RowBox[{
SubsuperscriptBox["u", "1", "k"], "(", "t", ")"}],
TraditionalForm], "/", "d"}], " ", "t"}]},
{"\[VerticalEllipsis]"},
{"\[VerticalEllipsis]"},
{"\[VerticalEllipsis]"},
{
RowBox[{"d", " ",
RowBox[{
FormBox[
RowBox[{
SubsuperscriptBox["u", "N", "k"], "(", "t", ")"}],
TraditionalForm], "/", "d"}], " ", "t"}]}
}], ")"}]}], "=",
RowBox[{
RowBox[{
RowBox[{"-", " ",
RowBox[{"(", GridBox[{
{
SubscriptBox["\[ScriptCapitalS]", "11"], "\[CenterEllipsis]",
SubscriptBox["\[ScriptCapitalS]",
RowBox[{"1", "N"}]]},
{"\[VerticalEllipsis]", "\[CenterEllipsis]",
"\[VerticalEllipsis]"},
{"\[VerticalEllipsis]", "\[DescendingEllipsis]",
"\[VerticalEllipsis]"},
{"\[VerticalEllipsis]", "\[CenterEllipsis]",
"\[VerticalEllipsis]"},
{
SubscriptBox["\[ScriptCapitalS]",
RowBox[{"N", " ", "1"}]], "\[CenterEllipsis]",
SubscriptBox["\[ScriptCapitalS]",
RowBox[{"N", " ", "N"}]]}
}], ")"}]}],
RowBox[{"(", GridBox[{
{
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "1", "k"], "(", "t", ")"}]}]},
{"\[VerticalEllipsis]"},
{"\[VerticalEllipsis]"},
{"\[VerticalEllipsis]"},
{
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "N", "k"], "(", "t", ")"}]}]}
}], ")"}]}], "+",
RowBox[{"(", GridBox[{
{
RowBox[{
RowBox[{"-",
FractionBox[
RowBox[{"2", "-", "\[Alpha]", " "}], "2"]}],
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
SubsuperscriptBox["u", "1", "k"],
RowBox[{"(", "t", ")"}]}], "-",
RowBox[{"a", " ",
SubsuperscriptBox["u", "N",
RowBox[{"k", "-", "1"}]],
RowBox[{"(", "t", ")"}]}]}], ")"}]}]},
{"0"},
{"\[VerticalEllipsis]"},
{"0"},
{
RowBox[{
FractionBox[
RowBox[{"\[Alpha]", " "}], "2"],
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "N", "k"], "(", "t", ")"}]}], "-",
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "1",
RowBox[{"k", "+", "1"}]], "(", "t", ")"}]}]}], ")"}]}]}
}], ")"}]}]}], " ", ","}], TraditionalForm]], "DisplayFormulaNumbered",\
CellChangeTimes->{{3.79334631179887*^9, 3.793346586220757*^9}, {
3.793346631556378*^9, 3.793346689874165*^9}, {3.793346724679604*^9,
3.79334676158291*^9}, {3.793346819503441*^9, 3.793346892608966*^9}, {
3.79334938896157*^9, 3.793349439199594*^9}, 3.793349479678372*^9,
3.793352662256329*^9, {3.793421241129435*^9, 3.793421397420751*^9},
3.793421437518654*^9, {3.793421468548431*^9, 3.793421541969122*^9}, {
3.793421580609282*^9, 3.793421588302534*^9}, {3.793421622175956*^9,
3.793421791943013*^9}, {3.793421922452745*^9, 3.793421932394889*^9}, {
3.793422029103299*^9, 3.793422033981716*^9}, {3.793422404667499*^9,
3.793422412952681*^9}, {3.793437323169849*^9, 3.7934373805639057`*^9}, {
3.793437433653981*^9, 3.793437449683139*^9}, {3.7934375953582563`*^9,
3.79343760700541*^9}, {3.793437786143276*^9, 3.7934378037018023`*^9}, {
3.793437862276196*^9, 3.793437880146606*^9}, {3.793483604478245*^9,
3.7934836049313374`*^9}, {3.793483651779449*^9, 3.7934837149764214`*^9}, {
3.793483777002928*^9, 3.793483815410882*^9}, {3.793484701447744*^9,
3.793484755886343*^9}, {3.793484790268301*^9, 3.793484925113729*^9}, {
3.793485757932563*^9, 3.7934857651568203`*^9}, {3.793488037050054*^9,
3.7934880432405024`*^9}, 3.793488597167079*^9, {3.793488934988772*^9,
3.79348894056145*^9}, {3.7934901908384666`*^9, 3.793490216544455*^9}, {
3.793491209566193*^9, 3.79349121887388*^9}, 3.793520744645605*^9, {
3.7935256435800447`*^9, 3.7935256848258457`*^9}, {3.793571964248505*^9,
3.7935719662303658`*^9}, {3.793938105928001*^9, 3.793938106686057*^9}, {
3.7939389384756308`*^9, 3.7939389442189827`*^9}, 3.794889829785431*^9, {
3.794889900525729*^9, 3.794889973651618*^9}, {3.794890682476655*^9,
3.794890713978998*^9}, {3.794890773105329*^9, 3.7948908647096653`*^9}, {
3.79494993794219*^9, 3.794949988557369*^9}, 3.7949503681844673`*^9},
TextAlignment->Center,ExpressionUUID->"d2d2875c-3a86-48d1-8cec-ec65fa85cfc8"],
Cell["\:4ee4", "Text",
CellChangeTimes->{{3.793488529895958*^9,
3.793488530674592*^9}},ExpressionUUID->"0b29582f-73d8-49f6-bc48-\
928986d8ea09"],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"\[CapitalPhi]", "=",
SuperscriptBox["\[ScriptCapitalM]",
RowBox[{"-", "1"}]]}], ",",
RowBox[{"\[ScriptCapitalD]", "=",
RowBox[{
SuperscriptBox["\[ScriptCapitalM]",
RowBox[{"-", "1"}]], "\[ScriptCapitalS]"}]}], ","}],
TraditionalForm]], "DisplayFormulaNumbered",
CellChangeTimes->{
3.793488536721204*^9, 3.7934886629500313`*^9, {3.793488757523641*^9,
3.7934887884794693`*^9}, {3.79348885536605*^9, 3.793488860525187*^9}, {
3.7935258513317213`*^9, 3.793525852114415*^9}, 3.794890513767541*^9,
3.7948905727594976`*^9, {3.7948917204824266`*^9, 3.79489173381721*^9},
3.794949985205029*^9, {3.794950288978692*^9, 3.79495030925887*^9}, {
3.7949505303070908`*^9, 3.794950577145831*^9}, {3.7949506360009613`*^9,
3.794950647639551*^9}},
TextAlignment->Center,ExpressionUUID->"729079b6-254d-4f45-9ec1-3474861f7270"],
Cell["\:5219\:65b9\:7a0b(26)\:53ef\:4ee5\:91cd\:65b0\:5199\:4e3a\:ff1a", \
"Text",
CellChangeTimes->{{3.7934885488433657`*^9, 3.793488566433271*^9}, {
3.793488791255673*^9, 3.793488793392447*^9}, 3.7948910809517927`*^9, {
3.7948921797153807`*^9, 3.794892180210799*^9}, {3.794950239220956*^9,
3.7949502572042837`*^9}, {3.7949503217768097`*^9, 3.794950328665634*^9}, {
3.7949503953042097`*^9, 3.794950396495719*^9}, {3.794950473652781*^9,
3.794950473892273*^9},
3.794950551426333*^9},ExpressionUUID->"39e4dc51-de8b-4779-8875-\
50db21ac7d79"],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"(", GridBox[{
{
RowBox[{"d", " ",
RowBox[{
FormBox[
RowBox[{
SubsuperscriptBox["u", "1", "k"], "(", "t", ")"}],
TraditionalForm], "/", "d"}], " ", "t"}]},
{"\[VerticalEllipsis]"},
{"\[VerticalEllipsis]"},
{"\[VerticalEllipsis]"},
{
RowBox[{"d", " ",
RowBox[{
FormBox[
RowBox[{
SubsuperscriptBox["u", "N", "k"], "(", "t", ")"}],
TraditionalForm], "/", "d"}], " ", "t"}]}
}], ")"}], "=",
RowBox[{
RowBox[{"(", GridBox[{
{
RowBox[{" ",
RowBox[{
RowBox[{
SubsuperscriptBox["\[ScriptCapitalR]", "1", "k"], "(",
RowBox[{"t", ",",
RowBox[{
SubsuperscriptBox["u", "1", "1"], "(", "t", ")"}], ",",
"\[Ellipsis]", ",",
RowBox[{
SubsuperscriptBox["u", "N", "K"], "(", "t", ")"}]}], ")"}],
"\[IndentingNewLine]", "\[VerticalEllipsis]", "\[IndentingNewLine]",
"\[VerticalEllipsis]", "\[IndentingNewLine]",
"\[VerticalEllipsis]"}]}]},
{
RowBox[{
SubsuperscriptBox["\[ScriptCapitalR]", "N", "k"], "(",
RowBox[{"t", ",",
RowBox[{
SubsuperscriptBox["u", "1", "1"], "(", "t", ")"}], ",",
"\[Ellipsis]", ",",
RowBox[{
SubsuperscriptBox["u", "N", "K"], "(", "t", ")"}]}], ")"}]}
}], ")"}], "=",
RowBox[{
RowBox[{
RowBox[{"-", " ",
FractionBox["2",
SuperscriptBox["h", "k"]]}],
RowBox[{"(", GridBox[{
{
SubscriptBox["\[ScriptCapitalD]", "11"], "\[CenterEllipsis]",
SubscriptBox["\[ScriptCapitalD]",
RowBox[{"1", "N"}]]},
{"\[VerticalEllipsis]", "\[CenterEllipsis]", "\[VerticalEllipsis]"},
{"\[VerticalEllipsis]", "\[DescendingEllipsis]",
"\[VerticalEllipsis]"},
{"\[VerticalEllipsis]", "\[CenterEllipsis]", "\[VerticalEllipsis]"},
{
SubscriptBox["\[ScriptCapitalD]",
RowBox[{"N", " ", "1"}]], "\[CenterEllipsis]",
SubscriptBox["\[ScriptCapitalD]",
RowBox[{"N", " ", "N"}]]}
}], ")"}],
RowBox[{"(", GridBox[{
{
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "1", "k"], "(", "t", ")"}]}]},
{"\[VerticalEllipsis]"},
{"\[VerticalEllipsis]"},
{"\[VerticalEllipsis]"},
{
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "N", "k"], "(", "t", ")"}]}]}
}], ")"}]}], "+",
RowBox[{
FractionBox["2",
SuperscriptBox["h", "k"]],
RowBox[{"(", GridBox[{
{
SubscriptBox["\[CapitalPhi]", "11"], "\[CenterEllipsis]",
SubscriptBox["\[CapitalPhi]",
RowBox[{"1", "N"}]]},
{"\[VerticalEllipsis]", "\[CenterEllipsis]", "\[VerticalEllipsis]"},
{"\[VerticalEllipsis]", "\[DescendingEllipsis]",
"\[VerticalEllipsis]"},
{"\[VerticalEllipsis]", "\[CenterEllipsis]", "\[VerticalEllipsis]"},
{
SubscriptBox["\[CapitalPhi]",
RowBox[{"N", " ", "1"}]], "\[CenterEllipsis]",
SubscriptBox["\[CapitalPhi]",
RowBox[{"N", " ", "N"}]]}
}], ")"}],
RowBox[{
RowBox[{"(", GridBox[{
{
RowBox[{
RowBox[{"-",
FractionBox[
RowBox[{"2", "-", "\[Alpha]", " "}], "2"]}],
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
SubsuperscriptBox["u", "1", "k"],
RowBox[{"(", "t", ")"}]}], "-",
RowBox[{"a", " ",
SubsuperscriptBox["u", "N",
RowBox[{"k", "-", "1"}]],
RowBox[{"(", "t", ")"}]}]}], ")"}]}]},
{"0"},
{"\[VerticalEllipsis]"},
{"0"},
{
RowBox[{
FractionBox[
RowBox[{"\[Alpha]", " "}], "2"],
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "N", "k"], "(", "t", ")"}]}], "-",
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "1",
RowBox[{"k", "+", "1"}]], "(", "t", ")"}]}]}], ")"}]}]}
}], ")"}], " ", "."}]}]}]}]}],
TraditionalForm]], "DisplayFormulaNumbered",
CellChangeTimes->{{3.79334631179887*^9, 3.793346586220757*^9}, {
3.793346631556378*^9, 3.793346689874165*^9}, {3.793346724679604*^9,
3.79334676158291*^9}, {3.793346819503441*^9, 3.793346892608966*^9}, {
3.79334938896157*^9, 3.793349439199594*^9}, 3.793349479678372*^9,
3.793352662256329*^9, {3.793421241129435*^9, 3.793421397420751*^9},
3.793421437518654*^9, {3.793421468548431*^9, 3.793421541969122*^9}, {
3.793421580609282*^9, 3.793421588302534*^9}, {3.793421622175956*^9,
3.793421791943013*^9}, {3.793421922452745*^9, 3.793421932394889*^9}, {
3.793422029103299*^9, 3.793422033981716*^9}, {3.793422404667499*^9,
3.793422412952681*^9}, {3.793437323169849*^9, 3.7934373805639057`*^9}, {
3.793437433653981*^9, 3.793437449683139*^9}, {3.7934375953582563`*^9,
3.79343760700541*^9}, {3.793437786143276*^9, 3.7934378037018023`*^9}, {
3.793437862276196*^9, 3.793437880146606*^9}, {3.793483604478245*^9,
3.7934836049313374`*^9}, {3.793483651779449*^9, 3.7934837149764214`*^9}, {
3.793483777002928*^9, 3.793483815410882*^9}, {3.793484701447744*^9,
3.793484755886343*^9}, {3.793484790268301*^9, 3.793484925113729*^9}, {
3.793485757932563*^9, 3.7934857651568203`*^9}, {3.793488037050054*^9,
3.7934880432405024`*^9}, 3.793488597167079*^9, {3.7934886296569357`*^9,
3.7934886735176487`*^9}, {3.793488831438904*^9, 3.793488892684029*^9}, {
3.793488929789001*^9, 3.793489340425928*^9}, {3.793489590769989*^9,
3.793489621328109*^9}, {3.793489956214416*^9, 3.793490003405024*^9}, {
3.7934901618384447`*^9, 3.793490166058926*^9}, {3.793490205268186*^9,
3.793490212288604*^9}, 3.793490336120652*^9, {3.7934912218031883`*^9,
3.793491237851595*^9}, 3.793525488289863*^9, {3.7935255295439796`*^9,
3.793525529546966*^9}, {3.793525561028287*^9, 3.793525570724826*^9}, {
3.793525602342245*^9, 3.793525629995772*^9}, {3.793525692609806*^9,
3.793525736849164*^9}, {3.7935258067339983`*^9, 3.793525811132393*^9}, {
3.793571970920623*^9, 3.793571972997027*^9}, {3.793938111526452*^9,
3.793938111805427*^9}, {3.794890650796067*^9, 3.794890657204875*^9}, {
3.794890691036549*^9, 3.79489072328885*^9}, {3.794890876557989*^9,
3.79489094671603*^9}, {3.794891573455551*^9, 3.794891582527*^9}, {
3.794892055944234*^9, 3.7948920655116796`*^9}, {3.7949500052608347`*^9,
3.7949500076212473`*^9}, {3.794950447365797*^9, 3.7949504596687613`*^9}, {
3.7949505838425093`*^9, 3.794950589825347*^9}, 3.79495065558329*^9},
TextAlignment->Center,ExpressionUUID->"69709231-dd89-42c2-86c4-ad299de922f1"],
Cell[TextData[{
"\:5982\:4f55\:533a\:95f4\:7b49\:4ef7\:5212\:5206\:ff0c\:65e2\:6240\:6709",
Cell[BoxData[
FormBox[
RowBox[{
SuperscriptBox["h", "k"], "=", "h"}], TraditionalForm]],
CellChangeTimes->{
3.793488536721204*^9, 3.7934886629500313`*^9, {3.793488757523641*^9,
3.7934887884794693`*^9}, {3.79348885536605*^9, 3.793488860525187*^9}, {
3.7935258513317213`*^9, 3.793525852114415*^9}, 3.794890513767541*^9,
3.7948905727594976`*^9, {3.7948917204824266`*^9, 3.79489173381721*^9},
3.794949985205029*^9, {3.794950288978692*^9, 3.79495030925887*^9}},
TextAlignment->Center,ExpressionUUID->
"8546eae1-85cd-4990-b1fe-1cf89dbcd208"],
"\:76f8\:540c\:ff0c\:5bf9\:6240\:6709\:5355\:5143\:5219\:6709\:ff1a"
}], "Text",
CellChangeTimes->{{3.79489106625313*^9, 3.794891085295011*^9}, {
3.7948920737274437`*^9, 3.794892077703122*^9}, 3.794950479156355*^9,
3.794950553132056*^9},ExpressionUUID->"3ed032fa-3567-4c75-a114-\
59d85248619c"],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"(", GridBox[{
{
RowBox[{"d", " ",
RowBox[{
FormBox[
RowBox[{
SubsuperscriptBox["u", "1", "1"], "(", "t", ")"}],
TraditionalForm], "/", "d"}], " ", "t"}], "\[CenterEllipsis]",
RowBox[{"d", " ",
RowBox[{
FormBox[
RowBox[{
SubsuperscriptBox["u", "1",
RowBox[{"\[IndentingNewLine]", "K"}]], "(", "t", ")"}],
TraditionalForm], "/", "d"}], " ", "t"}]},
{"\[VerticalEllipsis]", "\[CenterEllipsis]", "\[VerticalEllipsis]"},
{"\[VerticalEllipsis]", "\[DescendingEllipsis]",
"\[VerticalEllipsis]"},
{"\[VerticalEllipsis]", "\[CenterEllipsis]", "\[VerticalEllipsis]"},
{
RowBox[{"d", " ",
RowBox[{
FormBox[
RowBox[{
SubsuperscriptBox["u", "N", "1"], "(", "t", ")"}],
TraditionalForm], "/", "d"}], " ", "t"}], "\[CenterEllipsis]",
RowBox[{"d", " ",
RowBox[{
FormBox[
RowBox[{
SubsuperscriptBox["u", "N", "K"], "(", "t", ")"}],
TraditionalForm], "/", "d"}], " ", "t"}]}
}], ")"}], "=",
RowBox[{
RowBox[{
RowBox[{"-",
FractionBox["2", "h"]}],
RowBox[{"(", GridBox[{
{
SubscriptBox["\[ScriptCapitalD]", "11"], "\[CenterEllipsis]",
SubscriptBox["\[ScriptCapitalD]",
RowBox[{"1", "N"}]]},
{"\[VerticalEllipsis]", "\[CenterEllipsis]", "\[VerticalEllipsis]"},
{"\[VerticalEllipsis]", "\[DescendingEllipsis]",
"\[VerticalEllipsis]"},
{"\[VerticalEllipsis]", "\[CenterEllipsis]", "\[VerticalEllipsis]"},
{
SubscriptBox["\[ScriptCapitalD]",
RowBox[{"N", " ", "1"}]], "\[CenterEllipsis]",
SubscriptBox["\[ScriptCapitalD]",
RowBox[{"N", " ", "N"}]]}
}], ")"}],
RowBox[{"(", GridBox[{
{
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "1", "1"], "(", "t", ")"}]}],
"\[CenterEllipsis]",
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "1", "K"], "(", "t", ")"}]}]},
{"\[VerticalEllipsis]", "\[CenterEllipsis]", "\[VerticalEllipsis]"},
{"\[VerticalEllipsis]", "\[DescendingEllipsis]",
"\[VerticalEllipsis]"},
{"\[VerticalEllipsis]", "\[CenterEllipsis]", "\[VerticalEllipsis]"},
{
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "N", "1"], "(", "t", ")"}]}],
"\[CenterEllipsis]",
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "N", "K"], "(", "t", ")"}]}]}
}], ")"}]}], "+",
RowBox[{
FractionBox["2", "h"],
RowBox[{"(", GridBox[{
{
SubscriptBox["\[CapitalPhi]", "11"], "\[CenterEllipsis]",
SubscriptBox["\[CapitalPhi]",
RowBox[{"1", "N"}]]},
{"\[VerticalEllipsis]", "\[CenterEllipsis]", "\[VerticalEllipsis]"},
{"\[VerticalEllipsis]", "\[DescendingEllipsis]",
"\[VerticalEllipsis]"},
{"\[VerticalEllipsis]", "\[CenterEllipsis]", "\[VerticalEllipsis]"},
{
SubscriptBox["\[CapitalPhi]",
RowBox[{"N", " ", "1"}]], "\[CenterEllipsis]",
SubscriptBox["\[CapitalPhi]",
RowBox[{"N", " ", "N"}]]}
}], ")"}],
RowBox[{
RowBox[{"(", GridBox[{
{
RowBox[{
RowBox[{"-",
FractionBox[
RowBox[{"2", "-", "\[Alpha]", " "}], "2"]}],
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
SubsuperscriptBox["u", "1", "1"],
RowBox[{"(", "t", ")"}]}], "-",
RowBox[{"a", " ",
RowBox[{
SubscriptBox["u", "L"], "(", "t", ")"}]}]}], ")"}]}],
"\[CenterEllipsis]",
RowBox[{
RowBox[{"-",
FractionBox[
RowBox[{"2", "-", "\[Alpha]", " "}], "2"]}],
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
SubsuperscriptBox["u", "1", "K"],
RowBox[{"(", "t", ")"}]}], "-",
RowBox[{"a", " ",
SubsuperscriptBox["u", "N",
RowBox[{"K", "-", "1"}]],
RowBox[{"(", "t", ")"}]}]}], ")"}]}]},
{"0", "\[CenterEllipsis]", "0"},
{"\[VerticalEllipsis]", "\[DescendingEllipsis]",
"\[VerticalEllipsis]"},
{"0", "\[CenterEllipsis]", "0"},
{
RowBox[{
FractionBox[
RowBox[{"\[Alpha]", " "}], "2"],
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "N", "1"], "(", "t", ")"}]}], "-",
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "1", "2"], "(", "t", ")"}]}]}], ")"}]}],
"\[CenterEllipsis]",
RowBox[{
FractionBox[
RowBox[{"\[Alpha]", " "}], "2"],
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "N", "K"], "(", "t", ")"}]}], "-",
RowBox[{"a", " ",
RowBox[{
SubscriptBox["u", "R"], "(", "t", ")"}]}]}], ")"}]}]}
}], ")"}], " ", "."}]}]}]}],
TraditionalForm]], "DisplayFormulaNumbered",
CellChangeTimes->{{3.79334631179887*^9, 3.793346586220757*^9}, {
3.793346631556378*^9, 3.793346689874165*^9}, {3.793346724679604*^9,
3.79334676158291*^9}, {3.793346819503441*^9, 3.793346892608966*^9}, {
3.79334938896157*^9, 3.793349439199594*^9}, 3.793349479678372*^9,
3.793352662256329*^9, {3.793421241129435*^9, 3.793421397420751*^9},
3.793421437518654*^9, {3.793421468548431*^9, 3.793421541969122*^9}, {
3.793421580609282*^9, 3.793421588302534*^9}, {3.793421622175956*^9,
3.793421791943013*^9}, {3.793421922452745*^9, 3.793421932394889*^9}, {
3.793422029103299*^9, 3.793422033981716*^9}, {3.793422404667499*^9,
3.793422412952681*^9}, {3.793437323169849*^9, 3.7934373805639057`*^9}, {
3.793437433653981*^9, 3.793437449683139*^9}, {3.7934375953582563`*^9,
3.79343760700541*^9}, {3.793437786143276*^9, 3.7934378037018023`*^9}, {
3.793437862276196*^9, 3.793437880146606*^9}, {3.793483604478245*^9,
3.7934836049313374`*^9}, {3.793483651779449*^9, 3.7934837149764214`*^9}, {
3.793483777002928*^9, 3.793483815410882*^9}, {3.793484701447744*^9,
3.793484755886343*^9}, {3.793484790268301*^9, 3.793484925113729*^9}, {
3.793485757932563*^9, 3.7934857651568203`*^9}, {3.793488037050054*^9,
3.7934880432405024`*^9}, 3.793488597167079*^9, {3.7934886296569357`*^9,
3.7934886735176487`*^9}, {3.793488831438904*^9, 3.793488892684029*^9}, {
3.793488929789001*^9, 3.793489340425928*^9}, {3.793489590769989*^9,
3.793489621328109*^9}, {3.793489956214416*^9, 3.793490003405024*^9}, {
3.7934901618384447`*^9, 3.793490166058926*^9}, {3.793490205268186*^9,
3.793490212288604*^9}, 3.793490336120652*^9, {3.7934912218031883`*^9,
3.793491237851595*^9}, 3.793525488289863*^9, {3.7935255295439796`*^9,
3.793525529546966*^9}, {3.793525561028287*^9, 3.793525570724826*^9}, {
3.793525602342245*^9, 3.793525629995772*^9}, {3.793525692609806*^9,
3.793525736849164*^9}, {3.7935258067339983`*^9, 3.793525811132393*^9}, {
3.793571970920623*^9, 3.793571972997027*^9}, {3.793938111526452*^9,
3.793938111805427*^9}, {3.794890650796067*^9, 3.794890657204875*^9}, {
3.794890691036549*^9, 3.79489072328885*^9}, {3.794890876557989*^9,
3.79489094671603*^9}, {3.7948911100147867`*^9, 3.794891226410329*^9}, {
3.794891287494652*^9, 3.794891299855709*^9}, {3.794891331015679*^9,
3.79489135290376*^9}, {3.794891423060219*^9, 3.794891495849145*^9},
3.794891593207231*^9, {3.794891636118148*^9, 3.794891665195587*^9}, {
3.7948918891011543`*^9, 3.7948919007087603`*^9}, {3.794950011125019*^9,
3.794950013716716*^9}, {3.794950834945417*^9, 3.7949508484410067`*^9}},
TextAlignment->Center,ExpressionUUID->"355ac12b-c43c-4845-8a93-db3d91902bd7"],
Cell[" \:5982\:679c\:8fb9\:754c\:6761\:4ef6\:4e3a\:5468\:671f\:8fb9\:754c\
\:6761\:4ef6\:7684\:8bdd\:ff0c\:5219\:6709\:ff1a", "Text",
CellChangeTimes->{{3.7948888125066*^9,
3.794888828014538*^9}},ExpressionUUID->"f9ab20e9-7738-4b2b-8bc5-\
10c79c73f321"],
Cell[BoxData[
FormBox[
RowBox[{" ",
RowBox[{
RowBox[{
RowBox[{
SubscriptBox["u", "L"], "(", "t", ")"}], "=",
RowBox[{
SubsuperscriptBox["u", "N", "K"], "(", "t", ")"}]}], ",",
RowBox[{
RowBox[{
SubscriptBox["u", "R"], "(", "t", ")"}], "=",
RowBox[{
RowBox[{
SubsuperscriptBox["u", "1", "1"], "(", "t", ")"}], "."}]}]}]}],
TraditionalForm]], "DisplayFormulaNumbered",
CellChangeTimes->{{3.793434641013731*^9, 3.793434752921215*^9}, {
3.7934348048442*^9, 3.7934348258700438`*^9}, {3.793434911628057*^9,
3.793435025487447*^9}, {3.7934351432207537`*^9, 3.79343516668856*^9}, {
3.793435438938056*^9, 3.793435563763419*^9}, {3.793436597131547*^9,
3.793436645960273*^9}, {3.7934367294474583`*^9, 3.793436763579878*^9}, {
3.793438353416103*^9, 3.793438365919372*^9}, {3.793438862333832*^9,
3.7934388830903482`*^9}, {3.793438913521089*^9, 3.793438916072529*^9}, {
3.7934389493616877`*^9, 3.793438959886738*^9}, {3.793439074900963*^9,
3.793439082507517*^9}, 3.79343917326549*^9, {3.793439671677738*^9,
3.793439672814155*^9}, 3.79343980179983*^9, 3.79348508417838*^9, {
3.793485193744782*^9, 3.7934852760140533`*^9}, {3.7934854241754417`*^9,
3.793485425365222*^9}, {3.7934854686456623`*^9, 3.7934855183545094`*^9}, {
3.793485600162991*^9, 3.793485695762752*^9}, {3.7934878138163023`*^9,
3.793487905929892*^9}, {3.79348798372147*^9, 3.7934879884095087`*^9},
3.793524427467082*^9, {3.793524464455105*^9, 3.7935244694883833`*^9}, {
3.79352469117663*^9, 3.793524728253927*^9}, {3.7935719436797113`*^9,
3.793571949493746*^9}, {3.793923128845755*^9, 3.7939231307499847`*^9}, {
3.794888538378777*^9, 3.794888551338118*^9}, {3.7948886404319677`*^9,
3.7948886595171957`*^9}, {3.794888689646311*^9, 3.7948887472185507`*^9}, {
3.794888847576961*^9, 3.794888895229453*^9}, {3.794891310726203*^9,
3.794891311519518*^9}},
TextAlignment->Center,ExpressionUUID->"bceaee9a-b553-4276-ad3d-44c1f6154433"],
Cell["\:8fdb\:800c\:65b9\:7a0b(29)\:53ef\:91cd\:65b0\:5199\:4f5c\:ff1a", \
"Text",
CellChangeTimes->{{3.794888904575576*^9, 3.794888906549868*^9}, {
3.794892161148281*^9,
3.794892186923201*^9}},ExpressionUUID->"9107d21c-c7b3-4e53-b165-\
1bcd60f09321"],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"(", GridBox[{
{
RowBox[{"d", " ",
RowBox[{
FormBox[
RowBox[{
SubsuperscriptBox["u", "1", "1"], "(", "t", ")"}],
TraditionalForm], "/", "d"}], " ", "t"}], "\[CenterEllipsis]",
RowBox[{"d", " ",
RowBox[{
FormBox[
RowBox[{
SubsuperscriptBox["u", "1",
RowBox[{"\[IndentingNewLine]", "K"}]], "(", "t", ")"}],
TraditionalForm], "/", "d"}], " ", "t"}]},
{"\[VerticalEllipsis]", "\[CenterEllipsis]", "\[VerticalEllipsis]"},
{"\[VerticalEllipsis]", "\[DescendingEllipsis]",
"\[VerticalEllipsis]"},
{"\[VerticalEllipsis]", "\[CenterEllipsis]", "\[VerticalEllipsis]"},
{
RowBox[{"d", " ",
RowBox[{
FormBox[
RowBox[{
SubsuperscriptBox["u", "N", "1"], "(", "t", ")"}],
TraditionalForm], "/", "d"}], " ", "t"}], "\[CenterEllipsis]",
RowBox[{"d", " ",
RowBox[{
FormBox[
RowBox[{
SubsuperscriptBox["u", "N", "K"], "(", "t", ")"}],
TraditionalForm], "/", "d"}], " ", "t"}]}
}], ")"}], "=",
RowBox[{
RowBox[{
RowBox[{"-",
FractionBox["2", "h"]}],
RowBox[{"(", GridBox[{
{
SubscriptBox["\[ScriptCapitalD]", "11"], "\[CenterEllipsis]",
SubscriptBox["\[ScriptCapitalD]",
RowBox[{"1", "N"}]]},
{"\[VerticalEllipsis]", "\[CenterEllipsis]", "\[VerticalEllipsis]"},
{"\[VerticalEllipsis]", "\[DescendingEllipsis]",
"\[VerticalEllipsis]"},
{"\[VerticalEllipsis]", "\[CenterEllipsis]", "\[VerticalEllipsis]"},
{
SubscriptBox["\[ScriptCapitalD]",
RowBox[{"N", " ", "1"}]], "\[CenterEllipsis]",
SubscriptBox["\[ScriptCapitalD]",
RowBox[{"N", " ", "N"}]]}
}], ")"}],
RowBox[{"(", GridBox[{
{
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "1", "1"], "(", "t", ")"}]}],
"\[CenterEllipsis]",
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "1", "K"], "(", "t", ")"}]}]},
{"\[VerticalEllipsis]", "\[CenterEllipsis]", "\[VerticalEllipsis]"},
{"\[VerticalEllipsis]", "\[DescendingEllipsis]",
"\[VerticalEllipsis]"},
{"\[VerticalEllipsis]", "\[CenterEllipsis]", "\[VerticalEllipsis]"},
{
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "N", "1"], "(", "t", ")"}]}],
"\[CenterEllipsis]",
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "N", "K"], "(", "t", ")"}]}]}
}], ")"}]}], "+",
RowBox[{
FractionBox["2", "h"],
RowBox[{"(", GridBox[{
{
SubscriptBox["\[CapitalPhi]", "11"], "\[CenterEllipsis]",
SubscriptBox["\[CapitalPhi]",
RowBox[{"1", "N"}]]},
{"\[VerticalEllipsis]", "\[CenterEllipsis]", "\[VerticalEllipsis]"},
{"\[VerticalEllipsis]", "\[DescendingEllipsis]",
"\[VerticalEllipsis]"},
{"\[VerticalEllipsis]", "\[CenterEllipsis]", "\[VerticalEllipsis]"},
{
SubscriptBox["\[CapitalPhi]",
RowBox[{"N", " ", "1"}]], "\[CenterEllipsis]",
SubscriptBox["\[CapitalPhi]",
RowBox[{"N", " ", "N"}]]}
}], ")"}],
RowBox[{
RowBox[{"(", GridBox[{
{
RowBox[{
RowBox[{"-",
FractionBox[
RowBox[{"2", "-", "\[Alpha]", " "}], "2"]}],
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "1", "1"], "(", "t", ")"}]}], "-",
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "N", "K"], "(", "t", ")"}]}]}], ")"}]}],
"\[CenterEllipsis]",
RowBox[{
RowBox[{"-",
FractionBox[
RowBox[{"2", "-", "\[Alpha]", " "}], "2"]}],
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
SubsuperscriptBox["u", "1", "K"],
RowBox[{"(", "t", ")"}]}], "-",
RowBox[{"a", " ",
SubsuperscriptBox["u", "N",
RowBox[{"K", "-", "1"}]],
RowBox[{"(", "t", ")"}]}]}], ")"}]}]},
{"0", "\[CenterEllipsis]", "0"},
{"\[VerticalEllipsis]", "\[DescendingEllipsis]",
"\[VerticalEllipsis]"},
{"0", "\[CenterEllipsis]", "0"},
{
RowBox[{
FractionBox[
RowBox[{"\[Alpha]", " "}], "2"],
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "N", "1"], "(", "t", ")"}]}], "-",
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "1", "2"], "(", "t", ")"}]}]}], ")"}]}],
"\[CenterEllipsis]",
RowBox[{
FractionBox[
RowBox[{"\[Alpha]", " "}], "2"],
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "N", "K"], "(", "t", ")"}]}], "-",
RowBox[{"a", " ",
RowBox[{
SubsuperscriptBox["u", "1", "1"], "(", "t", ")"}]}]}],
")"}]}]}
}], ")"}], " ", "."}]}]}]}],
TraditionalForm]], "DisplayFormulaNumbered",
CellChangeTimes->{{3.79334631179887*^9, 3.793346586220757*^9}, {
3.793346631556378*^9, 3.793346689874165*^9}, {3.793346724679604*^9,
3.79334676158291*^9}, {3.793346819503441*^9, 3.793346892608966*^9}, {
3.79334938896157*^9, 3.793349439199594*^9}, 3.793349479678372*^9,
3.793352662256329*^9, {3.793421241129435*^9, 3.793421397420751*^9},
3.793421437518654*^9, {3.793421468548431*^9, 3.793421541969122*^9}, {
3.793421580609282*^9, 3.793421588302534*^9}, {3.793421622175956*^9,
3.793421791943013*^9}, {3.793421922452745*^9, 3.793421932394889*^9}, {
3.793422029103299*^9, 3.793422033981716*^9}, {3.793422404667499*^9,
3.793422412952681*^9}, {3.793437323169849*^9, 3.7934373805639057`*^9}, {
3.793437433653981*^9, 3.793437449683139*^9}, {3.7934375953582563`*^9,
3.79343760700541*^9}, {3.793437786143276*^9, 3.7934378037018023`*^9}, {
3.793437862276196*^9, 3.793437880146606*^9}, {3.793483604478245*^9,
3.7934836049313374`*^9}, {3.793483651779449*^9, 3.7934837149764214`*^9}, {
3.793483777002928*^9, 3.793483815410882*^9}, {3.793484701447744*^9,
3.793484755886343*^9}, {3.793484790268301*^9, 3.793484925113729*^9}, {
3.793485757932563*^9, 3.7934857651568203`*^9}, {3.793488037050054*^9,
3.7934880432405024`*^9}, 3.793488597167079*^9, {3.7934886296569357`*^9,
3.7934886735176487`*^9}, {3.793488831438904*^9, 3.793488892684029*^9}, {
3.793488929789001*^9, 3.793489340425928*^9}, {3.793489590769989*^9,
3.793489621328109*^9}, {3.793489956214416*^9, 3.793490003405024*^9}, {
3.7934901618384447`*^9, 3.793490166058926*^9}, {3.793490205268186*^9,
3.793490212288604*^9}, 3.793490336120652*^9, {3.7934912218031883`*^9,
3.793491237851595*^9}, 3.793525488289863*^9, {3.7935255295439796`*^9,
3.793525529546966*^9}, {3.793525561028287*^9, 3.793525570724826*^9}, {
3.793525602342245*^9, 3.793525629995772*^9}, {3.793525692609806*^9,
3.793525736849164*^9}, {3.7935258067339983`*^9, 3.793525811132393*^9}, {
3.793571970920623*^9, 3.793571972997027*^9}, {3.793938111526452*^9,
3.793938111805427*^9}, {3.794890650796067*^9, 3.794890657204875*^9}, {
3.794890691036549*^9, 3.79489072328885*^9}, {3.794890876557989*^9,
3.79489094671603*^9}, {3.7948911100147867`*^9, 3.794891226410329*^9}, {
3.794891287494652*^9, 3.794891299855709*^9}, {3.794891331015679*^9,
3.79489135290376*^9}, {3.794891423060219*^9, 3.794891495849145*^9},
3.794891593207231*^9, {3.794891636118148*^9, 3.794891665195587*^9}, {
3.7948918891011543`*^9, 3.7948919007087603`*^9}, {3.794892209098838*^9,
3.794892216626917*^9}, {3.794949161281892*^9, 3.794949169562492*^9}, {
3.794950017180434*^9, 3.794950022772418*^9}, {3.7949508511765833`*^9,
3.794950853480414*^9}},
TextAlignment->Center,ExpressionUUID->"5872184e-4c03-494e-b07f-c74791676ad1"]
}, Open ]],
Cell[CellGroupData[{
Cell["3.1.2 \:7279\:6b8a\:5f62\:5f0f", "Subsubsection",
CellChangeTimes->{{3.794886405902508*^9, 3.794886409998868*^9}, {
3.794948036366644*^9, 3.79494806082728*^9}, {3.7949481301225*^9,
3.794948130842976*^9}, {3.794951084673502*^9, 3.7949510875608873`*^9}},
TextAlignment->Left,ExpressionUUID->"3d5d8af7-7bea-4a4a-b9d3-729da3b4f356"],
Cell[CellGroupData[{
Cell[TextData[{
" ",
Cell[BoxData[
FormBox[
RowBox[{"p", "=", "2"}], TraditionalForm]],ExpressionUUID->
"1ffba417-53ad-4f06-b8a1-62e20802f8a2"],
", ",
Cell[BoxData[
FormBox[
RowBox[{"N", "=", "3"}], TraditionalForm]],ExpressionUUID->
"82900d0c-c735-4b58-ac7a-f0dfd91548ab"]
}], "Item1Numbered",
CellChangeTimes->{{3.7947198294086037`*^9, 3.794719849622879*^9}, {
3.794720557912202*^9, 3.794720584015815*^9}, {3.7948861482496557`*^9,
3.7948861551672*^9}, 3.794886445679984*^9, {3.794948439401094*^9,
3.794948443072845*^9}, 3.794951113665204*^9},
TextAlignment->Left,ExpressionUUID->"b3ab82d8-47f5-4847-851e-471b72ed3294"],
Cell[TextData[{
"\:5f53",
StyleBox["p",
FontSlant->"Italic"],
"=2, ",
StyleBox["N",
FontSlant->"Italic"],
"=3\:65f6\:ff0c\:8282\:70b9\:5206\:5e03\:7684\:793a\:610f\:56fe\:5982\:4e0b\
\:ff1a"
}], "Item1Paragraph",
CellChangeTimes->{{3.794719958440598*^9, 3.7947199840878983`*^9}, {
3.7947205965596046`*^9, 3.7947205991108522`*^9}, {3.7949484461115303`*^9,
3.794948448888213*^9}},ExpressionUUID->"14dae363-34e6-4855-8fca-\
7b81c7d2627c"]
}, Open ]],
Cell[BoxData[
RowBox[{"ArrayMesh", "[",
RowBox[{
RowBox[{"{",
RowBox[{
"1", ",", " ", "1", ",", " ", "0", ",", " ", "1", ",", " ", "1", ",",
" ", "0", ",", " ", "1", ",", " ", "1"}], "}"}], ",", " ",
RowBox[{"MeshCellLabel", " ", "->", " ",
RowBox[{"{",
RowBox[{"0", " ", "->", " ", "\"\<Index\>\""}], "}"}]}]}],
"]"}]], "Input",
CellChangeTimes->{{3.794719856683169*^9, 3.7947198702736187`*^9}, {
3.7948868864653397`*^9, 3.79488689908027*^9}, {3.794887724197304*^9,
3.794887724620154*^9}, {3.794887755982658*^9, 3.794887757995532*^9}, {
3.794887831963035*^9, 3.7948878531036386`*^9}, 3.794948251492648*^9, {
3.794948291216922*^9, 3.794948302757552*^9}},
FontFamily->"Source Code Pro",
FontSize->10,
FontWeight->"SemiBold",
CellLabel->"In[5]:=",ExpressionUUID->"6ffb0b45-ba13-4dc6-92f0-320ac6b5f0a4"],
Cell[BoxData[
GraphicsBox[
TagBox[
DynamicModuleBox[{Typeset`mesh = HoldComplete[
MeshRegion[{{0.}, {1.}, {2.}, {3.}, {4.}, {5.}, {6.}, {7.}, {8.}}, {
Line[{{1, 2}, {2, 3}, {4, 5}, {5, 6}, {7, 8}, {8, 9}}]},
Properties -> {{0, Default} -> (MeshCellLabel -> "Index"), {
1, Default} -> (MeshCellLabel -> Automatic), {0, Default} -> (
MeshCellHighlight -> Directive[
AbsolutePointSize[5],
Hue[0.125, 0.5, 0.95]])},
Method -> {
"EliminateUnusedCoordinates" -> True, "DeleteDuplicateCoordinates" ->
Automatic, "DeleteDuplicateCells" -> Automatic, "VertexAlias" ->
Identity, "CheckOrientation" -> Automatic, "CoplanarityTolerance" ->
Automatic, "CheckIntersections" -> Automatic, "BoundaryNesting" ->
Automatic, "SeparateBoundaries" -> Automatic, "TJunction" ->
Automatic, "PropagateMarkers" -> True, "ZeroTest" -> Automatic,
"Hash" -> 4250592170805597285}]]},
TagBox[
GraphicsComplexBox[{{0., 0.}, {1., 0.}, {2., 0.}, {3., 0.}, {4., 0.}, {
5., 0.}, {6., 0.}, {7., 0.}, {8., 0.}},
{Hue[0.6, 0.3, 0.75],
TagBox[LineBox[{{1, 2}, {2, 3}, {4, 5}, {5, 6}, {7, 8}, {8, 9}}],
Annotation[#, "Geometry"]& ],
{Hue[0.125, 0.5, 0.95], AbsolutePointSize[5],
PointBox[{1, 2, 3, 4, 5, 6, 7, 8, 9}]}, {{
{Hue[0.125, 0.5, 0.95], AbsolutePointSize[5], PointBox[{1}]},
InsetBox["1", Offset[{2, 2}, {0., 0.}], ImageScaled[{0, 0}],
BaseStyle->"Graphics"]}, {
{Hue[0.125, 0.5, 0.95], AbsolutePointSize[5], PointBox[{2}]},
InsetBox["2", Offset[{2, 2}, {1., 0.}], ImageScaled[{0, 0}],
BaseStyle->"Graphics"]}, {
{Hue[0.125, 0.5, 0.95], AbsolutePointSize[5], PointBox[{3}]},
InsetBox["3", Offset[{2, 2}, {2., 0.}], ImageScaled[{0, 0}],
BaseStyle->"Graphics"]}, {
{Hue[0.125, 0.5, 0.95], AbsolutePointSize[5], PointBox[{4}]},
InsetBox["4", Offset[{2, 2}, {3., 0.}], ImageScaled[{0, 0}],
BaseStyle->"Graphics"]}, {
{Hue[0.125, 0.5, 0.95], AbsolutePointSize[5], PointBox[{5}]},
InsetBox["5", Offset[{2, 2}, {4., 0.}], ImageScaled[{0, 0}],
BaseStyle->"Graphics"]}, {
{Hue[0.125, 0.5, 0.95], AbsolutePointSize[5], PointBox[{6}]},
InsetBox["6", Offset[{2, 2}, {5., 0.}], ImageScaled[{0, 0}],
BaseStyle->"Graphics"]}, {
{Hue[0.125, 0.5, 0.95], AbsolutePointSize[5], PointBox[{7}]},
InsetBox["7", Offset[{2, 2}, {6., 0.}], ImageScaled[{0, 0}],
BaseStyle->"Graphics"]}, {
{Hue[0.125, 0.5, 0.95], AbsolutePointSize[5], PointBox[{8}]},
InsetBox["8", Offset[{2, 2}, {7., 0.}], ImageScaled[{0, 0}],
BaseStyle->"Graphics"]}, {
{Hue[0.125, 0.5, 0.95], AbsolutePointSize[5], PointBox[{9}]},
InsetBox["9", Offset[{2, 2}, {8., 0.}], ImageScaled[{0, 0}],
BaseStyle->"Graphics"]}}}],
MouseAppearanceTag["LinkHand"]],
AllowKernelInitialization->False],
"MeshGraphics",
AutoDelete->True,
Editable->False,
Selectable->False],
AspectRatio->0.0618034,
AxesOrigin->{Automatic, 0},
DefaultBaseStyle->{
"MeshGraphics", FrontEnd`GraphicsHighlightColor -> Hue[0.1, 1, 0.7]},
PlotRange->{{0., 8.}, {0, All}},
PlotRangePadding->{{
Scaled[0.1],
Scaled[0.1]}, {0, 1}}]], "Input",
CellChangeTimes->{{3.794948313161276*^9, 3.794948313170663*^9}},
TextAlignment->Center,ExpressionUUID->"c700a06e-2d23-4f1e-87d6-1aef09636b27"],
Cell["\<\
\:5219\:ff0c\:5728\:6240\:6709\:5355\:5143\:4e0aDG\:79bb\:6563\:540e\:5f97\
\:5230\:7684ODEs\:4e3a\:ff1a\
\>", "Item1Paragraph",
CellChangeTimes->{{3.794719993286001*^9, 3.7947200349382687`*^9}, {
3.7949484834561357`*^9, 3.794948498416971*^9}, {3.7949487728378468`*^9,
3.794948792806642*^9}},ExpressionUUID->"b1044c05-03d5-4fe3-8fdc-\
e33d2ba34a90"],
Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"(", GridBox[{
{
RowBox[{"d", " ",
RowBox[{
FormBox[
RowBox[{
SubscriptBox["u", "1"], "(", "t", ")"}],
TraditionalForm], "/", "d"}], " ", "t"}],
RowBox[{"d", " ",
RowBox[{
FormBox[
RowBox[{
SubscriptBox["u", "4"], "(", "t", ")"}],
TraditionalForm], "/", "d"}], " ", "t"}],
RowBox[{"d", " ",
RowBox[{
FormBox[
RowBox[{
SubscriptBox["u", "7"], "(", "t", ")"}],
TraditionalForm], "/", "d"}], " ", "t"}]},
{
RowBox[{"d", " ",
RowBox[{
FormBox[
RowBox[{
SubscriptBox["u", "2"], "(", "t", ")"}],
TraditionalForm], "/", "d"}], " ", "t"}],
RowBox[{"d", " ",
RowBox[{
FormBox[
RowBox[{
SubscriptBox["u", "5"], "(", "t", ")"}],
TraditionalForm], "/", "d"}], " ", "t"}],
RowBox[{"d", " ",
RowBox[{
FormBox[
RowBox[{
SubscriptBox["u", "8"], "(", "t", ")"}],
TraditionalForm], "/", "d"}], " ", "t"}]},
{
RowBox[{"d", " ",
RowBox[{
FormBox[
RowBox[{
SubscriptBox["u", "3"], "(", "t", ")"}],
TraditionalForm], "/", "d"}], " ", "t"}],
RowBox[{"d", " ",
RowBox[{
FormBox[
RowBox[{
SubscriptBox["u", "6"], "(", "t", ")"}],
TraditionalForm], "/", "d"}], " ", "t"}],
RowBox[{"d", " ",
RowBox[{
FormBox[
RowBox[{
SubscriptBox["u", "9"], "(", "t", ")"}],
TraditionalForm], "/", "d"}], " ", "t"}]}
}], ")"}], "=",
RowBox[{
RowBox[{
RowBox[{"-",
FractionBox["2", "h"]}],
RowBox[{"(", GridBox[{
{
SubscriptBox["\[ScriptCapitalD]", "11"],
SubscriptBox["\[ScriptCapitalD]", "12"],
SubscriptBox["\[ScriptCapitalD]", "13"]},
{
SubscriptBox["\[ScriptCapitalD]", "21"],
SubscriptBox["\[ScriptCapitalD]", "22"],
SubscriptBox["\[ScriptCapitalD]", "13"]},
{
SubscriptBox["\[ScriptCapitalD]", "31"],
SubscriptBox["\[ScriptCapitalD]", "32"],
SubscriptBox["\[ScriptCapitalD]", "33"]}
}], ")"}],
RowBox[{"(", GridBox[{
{
RowBox[{
SubscriptBox["u", "1"], "(", "t", ")"}],
RowBox[{
SubscriptBox["u", "4"], "(", "t", ")"}],
RowBox[{
SubscriptBox["u", "7"], "(", "t", ")"}]},
{
RowBox[{
SubscriptBox["u", "2"], "(", "t", ")"}],
RowBox[{
SubscriptBox["u", "5"], "(", "t", ")"}],
RowBox[{
SubscriptBox["u", "8"], "(", "t", ")"}]},
{
RowBox[{
SubscriptBox["u", "3"], "(", "t", ")"}],
RowBox[{
SubscriptBox["u", "6"], "(", "t", ")"}],
RowBox[{
SubscriptBox["u", "9"], "(", "t", ")"}]}
}], ")"}]}], "+",
RowBox[{
FractionBox["2", "h"],
RowBox[{"(", GridBox[{
{
SubscriptBox["\[CapitalPhi]", "11"],
SubscriptBox["\[CapitalPhi]", "12"],
SubscriptBox["\[CapitalPhi]", "13"]},
{
SubscriptBox["\[CapitalPhi]", "21"],
SubscriptBox["\[CapitalPhi]", "22"],
SubscriptBox["\[CapitalPhi]", "13"]},
{
SubscriptBox["\[CapitalPhi]", "31"],
SubscriptBox["\[CapitalPhi]", "32"],
SubscriptBox["\[CapitalPhi]", "33"]}
}], ")"}],
RowBox[{
RowBox[{"(", GridBox[{
{
RowBox[{
RowBox[{"-",
FractionBox[
RowBox[{"2", "-", "\[Alpha]", " "}], "2"]}],
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
SubsuperscriptBox["u", "1", "1"],
RowBox[{"(", "t", ")"}]}], "-",
RowBox[{"a", " ",
RowBox[{
SubscriptBox["u", "L"], "(", "t", ")"}]}]}], ")"}]}],
RowBox[{
RowBox[{"-",
FractionBox[
RowBox[{"2", "-", "\[Alpha]", " "}], "2"]}],
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
RowBox[{
SubscriptBox["u", "4"], "(", "t", ")"}]}], "-",
RowBox[{"a", " ",
RowBox[{
SubscriptBox["u", "3"], "(", "t", ")"}]}]}], ")"}]}],
RowBox[{
RowBox[{"-",
FractionBox[
RowBox[{"2", "-", "\[Alpha]", " "}], "2"]}],
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
RowBox[{
SubscriptBox["u", "7"], "(", "t", ")"}]}], "-",
RowBox[{"a", " ",
RowBox[{
SubscriptBox["u", "6"], "(", "t", ")"}]}]}], ")"}]}]},
{"0", "0", "0"},
{
RowBox[{
FractionBox[
RowBox[{"\[Alpha]", " "}], "2"],
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
RowBox[{
SubscriptBox["u", "3"], "(", "t", ")"}]}], "-",
RowBox[{"a", " ",
RowBox[{
SubscriptBox["u", "4"], "(", "t", ")"}]}]}], ")"}]}],
RowBox[{
FractionBox[
RowBox[{"\[Alpha]", " "}], "2"],
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
RowBox[{
SubscriptBox["u", "6"], "(", "t", ")"}]}], "-",
RowBox[{"a", " ",
RowBox[{
SubscriptBox["u", "7"], "(", "t", ")"}]}]}], ")"}]}],
RowBox[{
FractionBox[
RowBox[{"\[Alpha]", " "}], "2"],
RowBox[{"(",
RowBox[{
RowBox[{"a", " ",
RowBox[{
SubscriptBox["u", "9"], "(", "t", ")"}]}], "-",
RowBox[{"a", " ",
RowBox[{
SubscriptBox["u", "R"], "(", "t", ")"}]}]}], ")"}]}]}
}], ")"}], "."}]}]}]}], TraditionalForm]], "DisplayFormulaNumbered",
CellChangeTimes->{{3.794720117774324*^9, 3.7947203216320477`*^9}, {
3.794720403661243*^9, 3.7947204680840607`*^9}, {3.794720503406443*^9,
3.794720509378991*^9}, {3.7947206245663557`*^9, 3.794720665907839*^9}, {
3.794720697365316*^9, 3.794720722532262*^9}, {3.7947207971450872`*^9,
3.794720800671821*^9}, {3.794720918612722*^9, 3.794721080598998*^9}, {
3.7949485037934933`*^9, 3.7949485163425083`*^9}, {3.794948550647735*^9,
3.794948743887158*^9}, {3.7949488007975197`*^9, 3.7949490375098867`*^9}, {
3.794949123411828*^9, 3.79494913985086*^9}, {3.7949491805868387`*^9,
3.794949287773262*^9}, {3.7949493451159*^9, 3.794949371213862*^9},
3.794950030019989*^9, 3.794950860168408*^9, 3.795061546790769*^9},
TextAlignment->Center,ExpressionUUID->"150e3186-eb45-4d52-a355-9fafada725ae"]
}, Open ]]
}, Open ]]
}, Open ]]
}, Open ]]
},
WindowToolbars->"EditBar",
WindowSize->{730, 749},
WindowMargins->{{Automatic, 5}, {1, Automatic}},
PrintingCopies->1,
PrintingPageRange->{1, Automatic},
Magnification:>1.5 Inherited,
FrontEndVersion->"12.0 for Mac OS X x86 (64-bit) (2019\:5e744\:67088\:65e5)",
StyleDefinitions->FrontEnd`FileName[{"Article"}, "JournalArticle.nb",
CharacterEncoding -> "UTF-8"]
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[580, 22, 441, 7, 163, "Title",ExpressionUUID->"eefb7056-a20d-4056-9b49-b62ae2f89a19"],
Cell[CellGroupData[{
Cell[1046, 33, 162, 3, 62, "Author",ExpressionUUID->"a28ccc11-7109-46d2-a26f-95503b89e392"],
Cell[1211, 38, 213, 4, 20, "Institution",ExpressionUUID->"678c6e47-fd5d-4af1-b53b-d4ca693a41af"]
}, Open ]],
Cell[CellGroupData[{
Cell[1461, 47, 358, 4, 73, "Section",ExpressionUUID->"a710c242-05d7-4a44-9d8e-cdaa762fc302"],
Cell[1822, 53, 376, 5, 33, "Text",ExpressionUUID->"28e19007-bf24-44e6-b361-12feca5abf66"],
Cell[2201, 60, 1028, 24, 55, "DisplayFormulaNumbered",ExpressionUUID->"15d4689b-9bd7-4667-b53b-43e120be3d73"],
Cell[3232, 86, 562, 16, 33, "Text",ExpressionUUID->"e9ba592c-0fbb-412c-b907-0f35dfcf43f6"],
Cell[3797, 104, 953, 23, 30, "DisplayFormulaNumbered",ExpressionUUID->"440b61e5-776f-4181-99ed-52a39a8f3325"],
Cell[4753, 129, 518, 10, 33, "Text",ExpressionUUID->"f4218dbd-4ba8-41ec-ba18-68d499569f53"],
Cell[5274, 141, 489, 13, 30, "DisplayFormulaNumbered",ExpressionUUID->"d9ac867e-5e27-440a-ae33-45d3483abf77"]
}, Open ]],
Cell[CellGroupData[{
Cell[5800, 159, 354, 4, 73, "Section",ExpressionUUID->"ba71cf2e-e727-4fd0-ad7d-c63f511a7d40"],
Cell[CellGroupData[{
Cell[6179, 167, 341, 4, 50, "Subsection",ExpressionUUID->"6ad77ab3-3f98-40dd-b361-4479ef9afce3"],
Cell[6523, 173, 1549, 37, 130, "Text",ExpressionUUID->"55a1c5d4-16fc-4ee9-b5c2-c9e7b16a6946"],
Cell[8075, 212, 981, 19, 36, "Text",ExpressionUUID->"cd43e390-f76b-4e38-a306-c015271a5535"],
Cell[9059, 233, 673, 17, 72, "DisplayFormulaNumbered",ExpressionUUID->"0566cf50-96ae-4284-9202-ec80a7bc9e71"],
Cell[9735, 252, 142, 2, 32, "Text",ExpressionUUID->"9505b819-1bde-431b-8ba9-d4eb4acab085"],
Cell[9880, 256, 518, 16, 39, "Text",ExpressionUUID->"a435a032-a7a4-4b94-a259-07d770311082"],
Cell[10401, 274, 1032, 27, 52, "DisplayFormulaNumbered",ExpressionUUID->"6a2d8c8d-f421-4238-8e38-0108b7a9b29a"],
Cell[11436, 303, 327, 10, 32, "Text",ExpressionUUID->"7db65ca0-82e3-4c4e-b843-b1a654be3714"],
Cell[11766, 315, 1187, 35, 75, "DisplayFormulaNumbered",ExpressionUUID->"7647434b-e53c-4736-8dda-52e4233ee08f"],
Cell[12956, 352, 530, 11, 79, "Text",ExpressionUUID->"1cc20c53-cdf9-4707-a6f5-87f74bc52145"],
Cell[13489, 365, 880, 20, 126, "Text",ExpressionUUID->"20fd30a3-86ab-439a-a219-f6415c081a95"],
Cell[14372, 387, 417, 12, 54, "DisplayFormulaNumbered",ExpressionUUID->"c8338c0d-6e51-47f2-a38e-76da4bde47fb"],
Cell[14792, 401, 311, 8, 32, "Text",ExpressionUUID->"0f6e9df8-7202-4e04-90eb-97642f9c2519"],
Cell[15106, 411, 417, 11, 34, "Text",ExpressionUUID->"29059b4f-26b3-4551-917f-a8470bf6fe4e"],
Cell[15526, 424, 1470, 49, 33, "DisplayFormulaNumbered",ExpressionUUID->"696b7d2e-f6d8-4923-994c-ee42583b2c7a"]
}, Open ]],
Cell[CellGroupData[{
Cell[17033, 478, 315, 4, 50, "Subsection",ExpressionUUID->"e2eed9f5-98b3-4c88-8d56-060921d800bf"],
Cell[17351, 484, 2337, 55, 67, "Text",ExpressionUUID->"eb906234-f7c6-4602-8c52-1833475085c2"],
Cell[19691, 541, 1366, 33, 69, "DisplayFormulaNumbered",ExpressionUUID->"c5c70928-1687-4229-82c5-5a9dc4812312"],
Cell[21060, 576, 1082, 28, 44, "Text",ExpressionUUID->"c0946a44-1626-4dac-ba17-941957a40b70"],
Cell[22145, 606, 1305, 31, 56, "Text",ExpressionUUID->"d546dbf7-32f6-4748-bc51-4779a8a38e6e"],
Cell[23453, 639, 840, 24, 67, "DisplayFormulaNumbered",ExpressionUUID->"35c5510d-e92c-46da-a610-ead4ed7d47b5"],
Cell[24296, 665, 579, 18, 39, "Text",ExpressionUUID->"1909f1b1-a2f7-46b2-bcb6-4ba855d9334d"]
}, Open ]],
Cell[CellGroupData[{
Cell[24912, 688, 417, 5, 50, "Subsection",ExpressionUUID->"23f417a1-b7c4-454e-a7d2-3f2d0d4bed60"],
Cell[25332, 695, 164, 3, 32, "Text",ExpressionUUID->"fae924b9-d58f-4f12-b027-194aaf7596c1"],
Cell[25499, 700, 663, 19, 54, "DisplayFormulaNumbered",ExpressionUUID->"09c6e4fb-5b9a-4fdc-b677-8d72cb3ce388"],
Cell[26165, 721, 195, 3, 32, "Text",ExpressionUUID->"c7e06075-27f3-42a6-a442-78535d79b4df"],
Cell[26363, 726, 1808, 49, 95, "Text",ExpressionUUID->"053c6810-22db-4c42-a31c-a17d86d4ff25"],
Cell[28174, 777, 471, 10, 32, "Text",ExpressionUUID->"18c0d3fa-a6c2-4b3c-aa43-6ab1f5f1e82b"],
Cell[28648, 789, 1604, 41, 67, "DisplayFormulaNumbered",ExpressionUUID->"11c24eb2-d8be-40a0-bff2-47050a2602c1"],
Cell[30255, 832, 996, 24, 56, "Text",ExpressionUUID->"2e1a96a4-80bf-4c64-886c-9fa6e4dd9239"],
Cell[31254, 858, 554, 12, 32, "Text",ExpressionUUID->"085344ea-4815-4910-9ae4-6e07bf50f265"],
Cell[31811, 872, 1647, 41, 67, "DisplayFormulaNumbered",ExpressionUUID->"f14f8c1d-f205-4d51-b458-5dc18f4e2c59"],
Cell[33461, 915, 808, 16, 62, "Text",ExpressionUUID->"29f4bf15-4d8d-45c8-b59e-375cf0d4011a"],
Cell[34272, 933, 1580, 42, 67, "DisplayFormulaNumbered",ExpressionUUID->"b9995022-5546-4e13-8dcc-a786231389dd"],
Cell[35855, 977, 721, 17, 56, "Text",ExpressionUUID->"2de42dc3-1bc7-488c-95f4-2ee836a77eb9"],
Cell[36579, 996, 324, 9, 31, "Text",ExpressionUUID->"86c0f1a7-6bad-4c84-b37a-66d8349f388e"],
Cell[36906, 1007, 1719, 45, 67, "DisplayFormulaNumbered",ExpressionUUID->"f27f7afa-c3e7-4392-a977-e40e8cd6c81a"],
Cell[38628, 1054, 805, 17, 62, "Text",ExpressionUUID->"59e237ec-5f6d-4ca8-a10a-c1d93ca17eb8"]
}, Open ]],
Cell[CellGroupData[{
Cell[39470, 1076, 264, 3, 50, "Subsection",ExpressionUUID->"9e0a70eb-60b1-4c15-addf-35da3f864119"],
Cell[39737, 1081, 758, 13, 31, "Text",ExpressionUUID->"09baa977-e640-4d03-92e2-1cedaf6a11ea"],
Cell[40498, 1096, 2643, 67, 62, "DisplayFormulaNumbered",ExpressionUUID->"c6448e87-e13c-4d3f-aae2-5a2f69d06f02"],
Cell[43144, 1165, 155, 3, 31, "Text",ExpressionUUID->"0de80379-262a-4fa7-853b-b877d8708866"],
Cell[43302, 1170, 2833, 83, 118, "DisplayFormulaNumbered",ExpressionUUID->"8e9d0472-8b42-4c7b-b15d-9a4dfaa135d2"],
Cell[46138, 1255, 2025, 41, 36, "Text",ExpressionUUID->"0b40a3d5-10c3-4c10-be29-d6b6f6998f65"],
Cell[48166, 1298, 885, 22, 55, "DisplayFormulaNumbered",ExpressionUUID->"0a0726fe-363a-4c3b-a22f-753c0758ab6e"],
Cell[49054, 1322, 301, 5, 31, "Text",ExpressionUUID->"d39bc15c-a189-4e23-9224-77fc6c249381"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[49404, 1333, 476, 7, 73, "Section",ExpressionUUID->"1002af86-819e-4e44-8ea6-ccc0f85b5355"],
Cell[49883, 1342, 3007, 51, 34, "Text",ExpressionUUID->"248bbe1b-6aff-4ed8-a3b0-24d272caf8c1"],
Cell[CellGroupData[{
Cell[52915, 1397, 218, 2, 50, "Subsection",ExpressionUUID->"6b2e2143-6246-4bd2-93fb-e82736c74852"],
Cell[CellGroupData[{
Cell[53158, 1403, 249, 3, 37, "Subsubsection",ExpressionUUID->"56e46d86-e4a3-4fbc-b659-10f7accf1a8e"],
Cell[53410, 1408, 2148, 42, 38, "Text",ExpressionUUID->"af25f846-fdf1-47f2-8184-c057c0b8f2e2"],
Cell[55561, 1452, 873, 20, 43, "Input",ExpressionUUID->"ec630843-e492-4a13-b4e5-2e227b61dc46"],
Cell[56437, 1474, 5150, 96, 57, "Input",ExpressionUUID->"b6437b9a-3625-48ee-8f89-b1775f190569"],
Cell[61590, 1572, 230, 4, 31, "Text",ExpressionUUID->"094eb788-7787-49c6-ac5a-16ec6c746210"],
Cell[61823, 1578, 3389, 102, 45, "DisplayFormulaNumbered",ExpressionUUID->"fd32c6ad-4a45-4a06-9d4e-bb703b1b2cdd"],
Cell[65215, 1682, 535, 16, 31, "Text",ExpressionUUID->"96813589-ee0b-457f-bb05-d56f6a66d612"],
Cell[65753, 1700, 4125, 105, 126, "DisplayFormulaNumbered",ExpressionUUID->"88657138-3a28-4d83-80bf-8f17e47b8d8a"],
Cell[69881, 1807, 491, 7, 31, "Text",ExpressionUUID->"0800459b-e05f-4c91-be84-f0b2f3ad61fd"],
Cell[70375, 1816, 2133, 50, 50, "DisplayFormulaNumbered",ExpressionUUID->"d42d05c2-770e-43c4-ae33-a35bf814765b"],
Cell[72511, 1868, 397, 6, 31, "Text",ExpressionUUID->"002f1092-eb3a-4f41-b973-f716fbacaa68"],
Cell[72911, 1876, 4053, 104, 104, "DisplayFormulaNumbered",ExpressionUUID->"e27dfef5-f0d3-4117-803f-3ae299ebf7cd"],
Cell[76967, 1982, 399, 12, 31, "Text",ExpressionUUID->"bbd52da3-6a81-4e12-b977-614ed8c6a4e7"],
Cell[77369, 1996, 3114, 72, 57, "DisplayFormulaNumbered",ExpressionUUID->"5a34ab1a-c1ed-474e-a59d-1f014da54275"],
Cell[80486, 2070, 3790, 63, 32, "Text",ExpressionUUID->"28fc0207-22cc-4495-80df-a656537438d5"],
Cell[84279, 2135, 5535, 132, 153, "DisplayFormulaNumbered",ExpressionUUID->"939e2146-54fd-4cd1-af69-a6a4b2a6a183"],
Cell[89817, 2269, 616, 13, 31, "Text",ExpressionUUID->"ba00166a-4a26-4c0b-94c0-b2291f342659"],
Cell[90436, 2284, 893, 19, 60, "DisplayFormulaNumbered",ExpressionUUID->"ffd6cad8-b123-4e2b-a189-8f24b29bd47f"],
Cell[91332, 2305, 196, 3, 31, "Text",ExpressionUUID->"c3e285dc-18d9-491a-8079-be8e78f1d918"],
Cell[91531, 2310, 5563, 133, 153, "DisplayFormulaNumbered",ExpressionUUID->"d2d2875c-3a86-48d1-8cec-ec65fa85cfc8"],
Cell[97097, 2445, 148, 3, 31, "Text",ExpressionUUID->"0b29582f-73d8-49f6-bc48-928986d8ea09"],
Cell[97248, 2450, 912, 19, 36, "DisplayFormulaNumbered",ExpressionUUID->"729079b6-254d-4f45-9ec1-3474861f7270"],
Cell[98163, 2471, 561, 9, 31, "Text",ExpressionUUID->"39e4dc51-de8b-4779-8875-50db21ac7d79"],
Cell[98727, 2482, 7154, 167, 153, "DisplayFormulaNumbered",ExpressionUUID->"69709231-dd89-42c2-86c4-ad299de922f1"],
Cell[105884, 2651, 971, 19, 34, "Text",ExpressionUUID->"3ed032fa-3567-4c75-a114-59d85248619c"],
Cell[106858, 2672, 8213, 189, 172, "DisplayFormulaNumbered",ExpressionUUID->"355ac12b-c43c-4845-8a93-db3d91902bd7"],
Cell[115074, 2863, 257, 4, 31, "Text",ExpressionUUID->"f9ab20e9-7738-4b2b-8bc5-10c79c73f321"],
Cell[115334, 2869, 2020, 37, 38, "DisplayFormulaNumbered",ExpressionUUID->"bceaee9a-b553-4276-ad3d-44c1f6154433"],
Cell[117357, 2908, 257, 5, 31, "Text",ExpressionUUID->"9107d21c-c7b3-4e53-b165-1bcd60f09321"],
Cell[117617, 2915, 8347, 192, 172, "DisplayFormulaNumbered",ExpressionUUID->"5872184e-4c03-494e-b07f-c74791676ad1"]
}, Open ]],
Cell[CellGroupData[{
Cell[126001, 3112, 341, 4, 37, "Subsubsection",ExpressionUUID->"3d5d8af7-7bea-4a4a-b9d3-729da3b4f356"],
Cell[CellGroupData[{
Cell[126367, 3120, 651, 16, 25, "Item1Numbered",ExpressionUUID->"b3ab82d8-47f5-4847-851e-471b72ed3294"],
Cell[127021, 3138, 450, 13, 21, "Item1Paragraph",ExpressionUUID->"14dae363-34e6-4855-8fca-7b81c7d2627c"]
}, Open ]],
Cell[127486, 3154, 859, 19, 43, "Input",ExpressionUUID->"6ffb0b45-ba13-4dc6-92f0-320ac6b5f0a4"],
Cell[128348, 3175, 3555, 69, 57, "Input",ExpressionUUID->"c700a06e-2d23-4f1e-87d6-1aef09636b27"],
Cell[131906, 3246, 365, 7, 21, "Item1Paragraph",ExpressionUUID->"b1044c05-03d5-4fe3-8fdc-e33d2ba34a90"],
Cell[132274, 3255, 7016, 204, 103, "DisplayFormulaNumbered",ExpressionUUID->"150e3186-eb45-4d52-a355-9fafada725ae"]
}, Open ]]
}, Open ]]
}, Open ]]
}, Open ]]
}
]
*)
此处可能存在不合适展示的内容，页面不予展示。您可通过相关编辑功能自查并修改。
如您确认内容无涉及 不当用语 / 纯广告导流 / 暴力 / 低俗色情 / 侵权 / 盗版 / 虚假 / 无价值内容或违法国家有关法律法规的内容，可点击提交进行申诉，我们将尽快为您处理。
马建仓 AI 助手